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 398
			return ISC_R_SUCCESS;
		}

		/* Get the type of the requested object, if one was
		   specified. */
Ted Lemon's avatar
Ted Lemon committed
399
		status = omapi_get_value_str (mo, (omapi_object_t *)0,
400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415
					      "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
416
		status = omapi_get_value_str (mo,
417 418 419
					      (omapi_object_t *)0,
					      "create", &tv);
		if (status == ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
420
			status = omapi_get_int_value (&create, tv -> value);
421 422 423
			omapi_value_dereference (&tv,
						      "omapi_message_process");
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
424 425 426
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
427 428 429 430 431 432
					 "invalid create flag value");
			}
		} else
			create = 0;

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

		/* Get the exclusive flag. */
Ted Lemon's avatar
Ted Lemon committed
450
		status = omapi_get_value_str (mo,
451 452 453
					      (omapi_object_t *)0,
					      "exclusive", &tv);
		if (status == ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
454
			status = omapi_get_int_value (&exclusive, tv -> value);
455 456 457
			omapi_value_dereference (&tv,
						 "omapi_message_process");
			if (status != ISC_R_SUCCESS) {
Ted Lemon's avatar
Ted Lemon committed
458 459 460
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
461 462 463 464 465 466 467 468 469
					 "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
470 471 472
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 ISC_R_INVALIDARG, message -> id,
473 474 475 476 477 478 479 480
					 "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
481 482 483
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTIMPLEMENTED, message -> id,
484 485 486 487 488
				 "unsearchable object type");
		}
		status = (*(type -> lookup)) (&object, (omapi_object_t *)0,
					      message -> object);

489 490 491
		if (status != ISC_R_SUCCESS &&
		    status != ISC_R_NOTFOUND &&
		    status != ISC_R_NOKEYS) {
Ted Lemon's avatar
Ted Lemon committed
492 493 494
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 status, message -> id,
495 496 497 498 499 500
				 "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
501 502 503
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_NOTFOUND, message -> id,
504 505 506 507 508 509 510 511 512
				 "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
513 514 515
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 ISC_R_EXISTS, message -> id,
516 517 518 519 520 521
				 "specified object already exists");
			return ISC_R_SUCCESS;
		}

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

		/* If we're updating it, do so now. */
		if (create || update) {
			status = omapi_object_update (object,
Ted Lemon's avatar
Ted Lemon committed
537
						      (omapi_object_t *)0,
538 539
						      message -> object,
						      message -> handle);
540 541 542
			if (status != ISC_R_SUCCESS) {
				omapi_object_dereference
					(&object, "omapi_message_process");
Ted Lemon's avatar
Ted Lemon committed
543 544 545
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
546 547 548 549 550 551 552 553 554 555 556 557 558
					 "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
559 560 561
			return omapi_protocol_send_status
				(po, (omapi_object_t *)0,
				 status, message -> id,
562 563 564 565
				 "no matching handle");
			return ISC_R_SUCCESS;
		}
	      send:		
Ted Lemon's avatar
Ted Lemon committed
566 567
		status = omapi_protocol_send_update (po, (omapi_object_t *)0,
						     message -> id, object);
568 569
		omapi_object_dereference (&object,
					  "omapi_message_process");
Ted Lemon's avatar
Ted Lemon committed
570
		return status;
571 572

	      case OMAPI_OP_UPDATE:
Ted Lemon's avatar
Ted Lemon committed
573
		if (m -> object) {
574 575 576 577 578 579
			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
580 581 582
				return omapi_protocol_send_status
					(po, (omapi_object_t *)0,
					 status, message -> id,
583 584 585 586
					 "no matching handle");
			}
		}

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

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

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

		/* Get the wait status. */
Ted Lemon's avatar
Ted Lemon committed
625
		status = omapi_get_value_str (mo,
626 627 628
					      (omapi_object_t *)0,
					      "result", &tv);
		if (status == ISC_R_SUCCESS) {
629 630
			status = omapi_get_int_value (&wsi, tv -> value);
			waitstatus = wsi;
631 632 633 634 635 636 637
			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
638 639 640 641 642 643
		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");
644
		return ISC_R_SUCCESS;
645 646 647 648 649 650 651 652 653 654 655

	      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");
		}

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

662
		status = (*(object -> type -> remove)) (object,
663 664 665 666 667 668 669
							(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);
670 671 672
	}
	return ISC_R_NOTIMPLEMENTED;
}