message.c 19.3 KB
Newer Older
Ted Lemon's avatar
Ted Lemon committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
/* message.c

   Subroutines for dealing with message objects. */

/*
 * Copyright (c) 1996-1999 Internet Software Consortium.
 * Use is subject to license terms which appear in the file named
 * ISC-LICENSE that should have accompanied this file when you
 * received it.   If a file named ISC-LICENSE did not accompany this
 * file, or you are not sure the one you have is correct, you may
 * obtain an applicable copy of the license at:
 *
 *             http://www.isc.org/isc-license-1.0.html. 
 *
 * This file is part of the ISC DHCP distribution.   The documentation
 * associated with this file is listed in the file DOCUMENTATION,
 * included in the top-level directory of this release.
 *
 * Support and other services are available for ISC products - see
 * http://www.isc.org for more information.
 */

23
#include <omapip/omapip_p.h>
Ted Lemon's avatar
Ted Lemon committed
24 25 26

omapi_message_object_t *omapi_registered_messages;

27
isc_result_t omapi_message_new (omapi_object_t **o, const char *name)
Ted Lemon's avatar
Ted Lemon committed
28 29
{
	omapi_message_object_t *m;
30
	omapi_object_t *g;
Ted Lemon's avatar
Ted Lemon committed
31 32 33 34 35 36 37 38 39
	isc_result_t status;

	m = malloc (sizeof *m);
	if (!m)
		return ISC_R_NOMEMORY;
	memset (m, 0, sizeof *m);
	m -> type = omapi_type_message;
	m -> refcnt = 1;

40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
	g = (omapi_object_t *)0;
	status = omapi_generic_new (&g, name);
	if (status != ISC_R_SUCCESS) {
		free (m);
		return status;
	}
	status = omapi_object_reference (&m -> inner, g, name);
	if (status != ISC_R_SUCCESS) {
		omapi_object_dereference ((omapi_object_t **)&m, name);
		omapi_object_dereference (&g, name);
		return status;
	}
	status = omapi_object_reference (&g -> outer,
					 (omapi_object_t *)m, name);

	if (status != ISC_R_SUCCESS) {
		omapi_object_dereference ((omapi_object_t **)&m, name);
		omapi_object_dereference (&g, name);
		return status;
	}

Ted Lemon's avatar
Ted Lemon committed
61 62
	status = omapi_object_reference (o, (omapi_object_t *)m, name);
	omapi_object_dereference ((omapi_object_t **)&m, name);
63 64 65 66
	omapi_object_dereference (&g, name);
	if (status != ISC_R_SUCCESS)
		return status;

Ted Lemon's avatar
Ted Lemon committed
67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94
	return status;
}

isc_result_t omapi_message_set_value (omapi_object_t *h,
				      omapi_object_t *id,
				      omapi_data_string_t *name,
				      omapi_typed_data_t *value)
{
	omapi_message_object_t *m;
	isc_result_t status;

	if (h -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	m = (omapi_message_object_t *)h;

	/* Can't set authlen. */

	/* Can set authenticator, but the value must be typed data. */
	if (!omapi_ds_strcmp (name, "authenticator")) {
		if (m -> authenticator)
			omapi_typed_data_dereference
				(&m -> authenticator,
				 "omapi_message_set_value");
		omapi_typed_data_reference (&m -> authenticator,
					    value,
					    "omapi_message_set_value");
		return ISC_R_SUCCESS;

95 96 97 98 99 100 101 102 103 104 105 106
	} else if (!omapi_ds_strcmp (name, "object")) {
		if (value -> type != omapi_datatype_object)
			return ISC_R_INVALIDARG;
		if (m -> object)
			omapi_object_dereference
				(&m -> object,
				 "omapi_message_set_value");
		omapi_object_reference (&m -> object,
					value -> u.object,
					"omapi_message_set_value");
		return ISC_R_SUCCESS;

107 108 109 110 111 112 113 114 115 116 117 118
	} else if (!omapi_ds_strcmp (name, "notify-object")) {
		if (value -> type != omapi_datatype_object)
			return ISC_R_INVALIDARG;
		if (m -> notify_object)
			omapi_object_dereference
				(&m -> notify_object,
				 "omapi_message_set_value");
		omapi_object_reference (&m -> notify_object,
					value -> u.object,
					"omapi_message_set_value");
		return ISC_R_SUCCESS;

Ted Lemon's avatar
Ted Lemon committed
119 120 121 122 123
	/* Can set authid, but it has to be an integer. */
	} else if (!omapi_ds_strcmp (name, "authid")) {
		if (value -> type != omapi_datatype_int)
			return ISC_R_INVALIDARG;
		m -> authid = value -> u.integer;
124
		return ISC_R_SUCCESS;
Ted Lemon's avatar
Ted Lemon committed
125 126 127 128 129 130

	/* Can set op, but it has to be an integer. */
	} else if (!omapi_ds_strcmp (name, "op")) {
		if (value -> type != omapi_datatype_int)
			return ISC_R_INVALIDARG;
		m -> op = value -> u.integer;
131
		return ISC_R_SUCCESS;
Ted Lemon's avatar
Ted Lemon committed
132 133 134 135 136 137

	/* Handle also has to be an integer. */
	} else if (!omapi_ds_strcmp (name, "handle")) {
		if (value -> type != omapi_datatype_int)
			return ISC_R_INVALIDARG;
		m -> h = value -> u.integer;
138
		return ISC_R_SUCCESS;
Ted Lemon's avatar
Ted Lemon committed
139 140 141 142 143 144

	/* Transaction ID has to be an integer. */
	} else if (!omapi_ds_strcmp (name, "id")) {
		if (value -> type != omapi_datatype_int)
			return ISC_R_INVALIDARG;
		m -> id = value -> u.integer;
145
		return ISC_R_SUCCESS;
Ted Lemon's avatar
Ted Lemon committed
146 147 148 149 150 151

	/* Remote transaction ID has to be an integer. */
	} else if (!omapi_ds_strcmp (name, "rid")) {
		if (value -> type != omapi_datatype_int)
			return ISC_R_INVALIDARG;
		m -> rid = value -> u.integer;
152
		return ISC_R_SUCCESS;
Ted Lemon's avatar
Ted Lemon committed
153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177
	}

	/* Try to find some inner object that can take the value. */
	if (h -> inner && h -> inner -> type -> set_value) {
		status = ((*(h -> inner -> type -> set_value))
			  (h -> inner, id, name, value));
		if (status == ISC_R_SUCCESS)
			return status;
	}
			  
	return ISC_R_NOTFOUND;
}

isc_result_t omapi_message_get_value (omapi_object_t *h,
				      omapi_object_t *id,
				      omapi_data_string_t *name,
				      omapi_value_t **value)
{
	omapi_message_object_t *m;
	if (h -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	m = (omapi_message_object_t *)h;

	/* Look for values that are in the message data structure. */
	if (!omapi_ds_strcmp (name, "authlen"))
178
		return omapi_make_int_value (value, name, (int)m -> authlen,
Ted Lemon's avatar
Ted Lemon committed
179 180 181 182 183 184 185 186 187
					     "omapi_message_get_value");
	else if (!omapi_ds_strcmp (name, "authenticator")) {
		if (m -> authenticator)
			return omapi_make_value (value,
						 name, m -> authenticator,
						 "omapi_message_get_value");
		else
			return ISC_R_NOTFOUND;
	} else if (!omapi_ds_strcmp (name, "authid")) {
188
		return omapi_make_int_value (value, name, (int)m -> authid,
Ted Lemon's avatar
Ted Lemon committed
189 190
					     "omapi_message_get_value");
	} else if (!omapi_ds_strcmp (name, "op")) {
191
		return omapi_make_int_value (value, name, (int)m -> op,
Ted Lemon's avatar
Ted Lemon committed
192 193
					     "omapi_message_get_value");
	} else if (!omapi_ds_strcmp (name, "handle")) {
194
		return omapi_make_int_value (value, name, (int)m -> handle,
Ted Lemon's avatar
Ted Lemon committed
195 196
					     "omapi_message_get_value");
	} else if (!omapi_ds_strcmp (name, "id")) {
197
		return omapi_make_int_value (value, name, (int)m -> id, 
Ted Lemon's avatar
Ted Lemon committed
198 199
					     "omapi_message_get_value");
	} else if (!omapi_ds_strcmp (name, "rid")) {
200
		return omapi_make_int_value (value, name, (int)m -> rid,
Ted Lemon's avatar
Ted Lemon committed
201 202 203 204 205 206 207 208 209 210
					     "omapi_message_get_value");
	}

	/* See if there's an inner object that has the value. */
	if (h -> inner && h -> inner -> type -> get_value)
		return (*(h -> inner -> type -> get_value))
			(h -> inner, id, name, value);
	return ISC_R_NOTFOUND;
}

211
isc_result_t omapi_message_destroy (omapi_object_t *h, const char *name)
Ted Lemon's avatar
Ted Lemon committed
212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236
{
	int i;

	omapi_message_object_t *m;
	if (h -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	if (m -> authenticator) {
		omapi_typed_data_dereference (&m -> authenticator, name);
	}
	if (!m -> prev && omapi_registered_messages != m)
		omapi_message_unregister (h);
	if (m -> prev)
		omapi_object_dereference ((omapi_object_t **)&m -> prev, name);
	if (m -> next)
		omapi_object_dereference ((omapi_object_t **)&m -> next, name);
	if (m -> id_object)
		omapi_object_dereference ((omapi_object_t **)&m -> id_object,
					  name);
	if (m -> object)
		omapi_object_dereference ((omapi_object_t **)&m -> object,
					  name);
	return ISC_R_SUCCESS;
}

isc_result_t omapi_message_signal_handler (omapi_object_t *h,
237
					   const char *name, va_list ap)
Ted Lemon's avatar
Ted Lemon committed
238
{
Ted Lemon's avatar
Ted Lemon committed
239
	omapi_message_object_t *m;
Ted Lemon's avatar
Ted Lemon committed
240 241
	if (h -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
Ted Lemon's avatar
Ted Lemon committed
242
	m = (omapi_message_object_t *)h;
Ted Lemon's avatar
Ted Lemon committed
243
	
244 245 246 247 248 249 250 251
	if (!strcmp (name, "status") && 
	    (m -> object || m -> notify_object)) {
		if (m -> object)
			return ((m -> object -> type -> signal_handler))
				(m -> object, name, ap);
		else
			return ((m -> notify_object -> type -> signal_handler))
				(m -> notify_object, name, ap);
Ted Lemon's avatar
Ted Lemon committed
252
	}
Ted Lemon's avatar
Ted Lemon committed
253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360
	if (h -> inner && h -> inner -> type -> signal_handler)
		return (*(h -> inner -> type -> signal_handler)) (h -> inner,
								  name, ap);
	return ISC_R_NOTFOUND;
}

/* Write all the published values associated with the object through the
   specified connection. */

isc_result_t omapi_message_stuff_values (omapi_object_t *c,
					 omapi_object_t *id,
					 omapi_object_t *m)
{
	int i;

	if (m -> type != omapi_type_message)
		return ISC_R_INVALIDARG;

	if (m -> inner && m -> inner -> type -> stuff_values)
		return (*(m -> inner -> type -> stuff_values)) (c, id,
								m -> inner);
	return ISC_R_SUCCESS;
}

isc_result_t omapi_message_register (omapi_object_t *mo)
{
	omapi_message_object_t *m;

	if (mo -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	m = (omapi_message_object_t *)mo;
	
	/* Already registered? */
	if (m -> prev || m -> next || omapi_registered_messages == m)
		return ISC_R_INVALIDARG;

	if (omapi_registered_messages) {
		omapi_object_reference
			((omapi_object_t **)&m -> next,
			 (omapi_object_t *)omapi_registered_messages,
			 "omapi_message_register");
		omapi_object_reference
			((omapi_object_t **)&omapi_registered_messages -> prev,
			 (omapi_object_t *)m, "omapi_message_register");
		omapi_object_dereference
			((omapi_object_t **)&omapi_registered_messages,
			 "omapi_message_register");
	}
	omapi_object_reference
		((omapi_object_t **)&omapi_registered_messages,
		 (omapi_object_t *)m, "omapi_message_register");
	return ISC_R_SUCCESS;;
}

isc_result_t omapi_message_unregister (omapi_object_t *mo)
{
	omapi_message_object_t *m;
	omapi_message_object_t *n;

	if (mo -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	m = (omapi_message_object_t *)mo;
	
	/* Not registered? */
	if (!m -> prev && omapi_registered_messages != m)
		return ISC_R_INVALIDARG;

	n = (omapi_message_object_t *)0;
	if (m -> next) {
		omapi_object_reference ((omapi_object_t **)&n,
					(omapi_object_t *)m -> next,
					"omapi_message_unregister");
		omapi_object_dereference ((omapi_object_t **)&m -> next,
					  "omapi_message_unregister");
	}
	if (m -> prev) {
		omapi_message_object_t *tmp = (omapi_message_object_t *)0;
		omapi_object_reference ((omapi_object_t **)&tmp,
					(omapi_object_t *)m -> prev,
					"omapi_message_register");
		omapi_object_dereference ((omapi_object_t **)&m -> prev,
					  "omapi_message_unregister");
		if (tmp -> next)
			omapi_object_dereference
				((omapi_object_t **)&tmp -> next,
				 "omapi_message_unregister");
		if (n)
			omapi_object_reference
				((omapi_object_t **)&tmp -> next,
				 (omapi_object_t *)n,
				 "omapi_message_unregister");
		omapi_object_dereference ((omapi_object_t **)&tmp,
					  "omapi_message_unregister");
	} else {
		omapi_object_dereference
			((omapi_object_t **)&omapi_registered_messages,
			 "omapi_unregister_message");
		if (n)
			omapi_object_reference
				((omapi_object_t **)&omapi_registered_messages,
				 (omapi_object_t *)n,
				 "omapi_message_unregister");
	}
	if (n)
		omapi_object_dereference ((omapi_object_t **)&n,
					  "omapi_message_unregister");
	return ISC_R_SUCCESS;
}
361 362 363 364 365

isc_result_t omapi_message_process (omapi_object_t *mo, omapi_object_t *po)
{
	omapi_message_object_t *message, *m;
	omapi_object_t *object = (omapi_object_t *)0;
Ted Lemon's avatar
Ted Lemon committed
366
	omapi_value_t *tv = (omapi_value_t *)0;
367 368
	unsigned long create, update, exclusive;
	unsigned long wsi;
369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384
	isc_result_t status, waitstatus;
	omapi_object_type_t *type;

	if (mo -> type != omapi_type_message)
		return ISC_R_INVALIDARG;
	message = (omapi_message_object_t *)mo;

	if (message -> rid) {
		for (m = omapi_registered_messages; m; m = m -> next)
			if (m -> id == message -> rid)
				break;
		/* If we don't have a real message corresponding to
		   the message ID to which this message claims it is a
		   response, something's fishy. */
		if (!m)
			return ISC_R_NOTFOUND;
Ted Lemon's avatar
Ted Lemon committed
385 386
	} else
		m = (omapi_message_object_t *)0;
387 388 389 390

	switch (message -> op) {
	      case OMAPI_OP_OPEN:
		if (m) {
Ted Lemon's avatar
Ted Lemon committed
391 392 393
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0, ISC_R_INVALIDARG,
				 message -> id, "OPEN can't be a response");
394 395 396 397
		}

		/* Get the type of the requested object, if one was
		   specified. */
Ted Lemon's avatar
Ted Lemon committed
398
		status = omapi_get_value_str (mo, (omapi_object_t *)0,
399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414
					      "type", &tv);
		if (status == ISC_R_SUCCESS &&
		    (tv -> value -> type == omapi_datatype_data ||
		     tv -> value -> type == omapi_datatype_string)) {
			for (type = omapi_object_types;
			     type; type = type -> next)
				if (!omapi_td_strcmp (tv -> value,
						      type -> name))
					break;
		} else
			type = (omapi_object_type_t *)0;
		if (tv)
			omapi_value_dereference (&tv,
						 "omapi_message_process");

		/* Get the create flag. */
Ted Lemon's avatar
Ted Lemon committed
415
		status = omapi_get_value_str (mo,
416 417 418
					      (omapi_object_t *)0,
					      "create", &tv);
		if (status == ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
419
			status = omapi_get_int_value (&create, tv -> value);
420 421 422
			omapi_value_dereference (&tv,
						      "omapi_message_process");
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
423 424 425
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
426 427 428 429 430 431
					 "invalid create flag value");
			}
		} else
			create = 0;

		/* Get the update flag. */
Ted Lemon's avatar
Ted Lemon committed
432
		status = omapi_get_value_str (mo,
433 434 435
					      (omapi_object_t *)0,
					      "update", &tv);
		if (status == ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
436
			status = omapi_get_int_value (&update, tv -> value);
437 438 439
			omapi_value_dereference (&tv,
						      "omapi_message_process");
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
440 441 442
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
443 444 445 446 447 448
					 "invalid update flag value");
			}
		} else
			update = 0;

		/* Get the exclusive flag. */
Ted Lemon's avatar
Ted Lemon committed
449
		status = omapi_get_value_str (mo,
450 451 452
					      (omapi_object_t *)0,
					      "exclusive", &tv);
		if (status == ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
453
			status = omapi_get_int_value (&exclusive, tv -> value);
454 455 456
			omapi_value_dereference (&tv,
						 "omapi_message_process");
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
457 458 459
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
460 461 462 463 464 465 466 467 468
					 "invalid exclusive flag value");
			}
		} else
			exclusive = 0;

		/* If we weren't given a type, look the object up with
                   the handle. */
		if (!type) {
			if (create) {
Ted Lemon's avatar
Ted Lemon committed
469 470 471
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 ISC_R_INVALIDARG, message -> id,
472 473 474 475 476 477 478 479
					 "type required on create");
			}
			goto refresh;
		}

		/* If the type doesn't provide a lookup method, we can't
		   look up the object. */
		if (!type -> lookup) {
Ted Lemon's avatar
Ted Lemon committed
480 481 482
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTIMPLEMENTED, message -> id,
483 484
				 "unsearchable object type");
		}
485 486 487 488 489 490 491

		if (!message -> object) {
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTFOUND, message -> id,
				 "no lookup key specified");
		}
492 493 494
		status = (*(type -> lookup)) (&object, (omapi_object_t *)0,
					      message -> object);

495 496 497
		if (status != ISC_R_SUCCESS &&
		    status != ISC_R_NOTFOUND &&
		    status != ISC_R_NOKEYS) {
Ted Lemon's avatar
Ted Lemon committed
498 499 500
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 status, message -> id,
501 502 503 504 505 506
				 "object lookup failed");
		}

		/* If we didn't find the object and we aren't supposed to
		   create it, return an error. */
		if (status == ISC_R_NOTFOUND && !create) {
Ted Lemon's avatar
Ted Lemon committed
507 508 509
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTFOUND, message -> id,
510 511 512 513 514 515 516 517 518
				 "no object matches specification");
		}			

		/* If we found an object, we're supposed to be creating an
		   object, and we're not supposed to have found an object,
		   return an error. */
		if (status == ISC_R_SUCCESS && create && exclusive) {
			omapi_object_dereference
				(&object, "omapi_message_process");
Ted Lemon's avatar
Ted Lemon committed
519 520 521
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_EXISTS, message -> id,
522 523 524 525 526
				 "specified object already exists");
		}

		/* If we're creating the object, do it now. */
		if (!object) {
Ted Lemon's avatar
Ted Lemon committed
527 528 529
			status = omapi_object_create (&object,
						      (omapi_object_t *)0,
						      type);
530
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
531 532 533
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
534 535 536 537 538 539 540
					 "can't create new object");
			}
		}

		/* If we're updating it, do so now. */
		if (create || update) {
			status = omapi_object_update (object,
Ted Lemon's avatar
Ted Lemon committed
541
						      (omapi_object_t *)0,
542 543
						      message -> object,
						      message -> handle);
544 545 546
			if (status != ISC_R_SUCCESS) {
				omapi_object_dereference
					(&object, "omapi_message_process");
Ted Lemon's avatar
Ted Lemon committed
547 548 549
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
550 551 552 553 554 555 556 557 558 559 560 561 562
					 "can't update object");
			}
		}
		
		/* Now send the new contents of the object back in
		   response. */
		goto send;

	      case OMAPI_OP_REFRESH:
	      refresh:
		status = omapi_handle_lookup (&object,
					      message -> handle);
		if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
563 564 565
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 status, message -> id,
566 567 568
				 "no matching handle");
		}
	      send:		
Ted Lemon's avatar
Ted Lemon committed
569 570
		status = omapi_protocol_send_update (po, (omapi_object_t *)0,
						     message -> id, object);
571 572
		omapi_object_dereference (&object,
					  "omapi_message_process");
Ted Lemon's avatar
Ted Lemon committed
573
		return status;
574 575

	      case OMAPI_OP_UPDATE:
Ted Lemon's avatar
Ted Lemon committed
576
		if (m -> object) {
577 578 579 580 581 582
			omapi_object_reference (&object, m -> object,
						"omapi_message_process");
		} else {
			status = omapi_handle_lookup (&object,
						      message -> handle);
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
583 584 585
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
586 587 588 589
					 "no matching handle");
			}
		}

Ted Lemon's avatar
Ted Lemon committed
590
		status = omapi_object_update (object, (omapi_object_t *)0,
591 592
					      message -> object,
					      message -> handle);
593 594 595 596
		if (status != ISC_R_SUCCESS) {
			omapi_object_dereference
				(&object, "omapi_message_process");
			if (!message -> rid)
Ted Lemon's avatar
Ted Lemon committed
597 598 599
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
600 601 602
					 "can't update object");
			if (m)
				omapi_signal ((omapi_object_t *)m,
Ted Lemon's avatar
Ted Lemon committed
603 604
					      "status", status,
					      (omapi_typed_data_t *)0);
605 606 607
			return ISC_R_SUCCESS;
		}
		if (!message -> rid)
Ted Lemon's avatar
Ted Lemon committed
608 609 610
			status = omapi_protocol_send_status
				(po, (omapi_object_t *)0, ISC_R_SUCCESS,
				 message -> id, (char *)0);
611 612
		if (m)
			omapi_signal ((omapi_object_t *)m,
Ted Lemon's avatar
Ted Lemon committed
613 614 615
				      "status", ISC_R_SUCCESS,
				      (omapi_typed_data_t *)0);
		return status;
616 617

	      case OMAPI_OP_NOTIFY:
Ted Lemon's avatar
Ted Lemon committed
618 619 620
		return omapi_protocol_send_status
			(po, (omapi_object_t *)0, ISC_R_NOTIMPLEMENTED,
			 message -> id, "notify not implemented yet");
621

Ted Lemon's avatar
Ted Lemon committed
622 623
	      case OMAPI_OP_STATUS:
		/* The return status of a request. */
624 625 626 627
		if (!m)
			return ISC_R_UNEXPECTED;

		/* Get the wait status. */
Ted Lemon's avatar
Ted Lemon committed
628
		status = omapi_get_value_str (mo,
629 630 631
					      (omapi_object_t *)0,
					      "result", &tv);
		if (status == ISC_R_SUCCESS) {
632 633
			status = omapi_get_int_value (&wsi, tv -> value);
			waitstatus = wsi;
634 635 636 637 638 639 640
			omapi_value_dereference (&tv,
						 "omapi_message_process");
			if (status != ISC_R_SUCCESS)
				waitstatus = ISC_R_UNEXPECTED;
		} else
			waitstatus = ISC_R_UNEXPECTED;

Ted Lemon's avatar
Ted Lemon committed
641 642 643 644 645 646
		status = omapi_get_value_str (mo,
					      (omapi_object_t *)0,
					      "message", &tv);
		omapi_signal ((omapi_object_t *)m, "status", waitstatus, tv);
		if (status == ISC_R_SUCCESS)
			omapi_value_dereference (&tv, "omapi_message_process");
647
		return ISC_R_SUCCESS;
648 649 650 651 652 653 654 655 656 657 658

	      case OMAPI_OP_DELETE:
		status = omapi_handle_lookup (&object,
					      message -> handle);
		if (status != ISC_R_SUCCESS) {
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 status, message -> id,
				 "no matching handle");
		}

659
		if (!object -> type -> remove)
660 661 662
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTIMPLEMENTED, message -> id,
663
				 "no remove method for object");
664

665
		status = (*(object -> type -> remove)) (object,
666 667 668 669 670 671 672
							(omapi_object_t *)0);
		omapi_object_dereference (&object,
					  "omapi_message_process");

		return omapi_protocol_send_status (po, (omapi_object_t *)0,
						   status, message -> id,
						   (char *)0);
673 674 675
	}
	return ISC_R_NOTIMPLEMENTED;
}