1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright (c) 2001 by Sun Microsystems, Inc.
24 * All rights reserved.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 #include <string.h>
30 #include <sys/syslog.h>
31 #include <sys/types.h>
32 #include <rpc/types.h>
33 #include <rpc/xdr.h>
34 #include <rpcsvc/nis.h>
35
36 #include "db_mindex_c.h"
37
38 #include "ldap_xdr.h"
39 #include "ldap_util.h"
40
41 extern bool_t xdr_nis_object();
42
43 /*
44 * In order not to change the on-disk NIS+ DB format, we need make sure
45 * that XDR does nothing for the new structures added to various C++
46 * classes.
47 */
48
49 bool_t
xdr___nis_table_mapping_t(XDR * xdrs,void * t)50 xdr___nis_table_mapping_t(XDR *xdrs, void *t) {
51 return (TRUE);
52 }
53
54 bool_t
xdr___nisdb_ptr_t(XDR * xdrs,void * ptr)55 xdr___nisdb_ptr_t(XDR *xdrs, void *ptr) {
56 return (TRUE);
57 }
58
59 bool_t
xdr___nisdb_dictionary_defer_t(XDR * xdrs,void * defer)60 xdr___nisdb_dictionary_defer_t(XDR *xdrs, void *defer) {
61 return (TRUE);
62 }
63
64 bool_t
xdr___nisdb_rwlock_t(XDR * xdrs,void * rw)65 xdr___nisdb_rwlock_t(XDR *xdrs, void *rw) {
66 return (TRUE);
67 }
68
69 bool_t
xdr___nisdb_flag_t(XDR * xdrs,void * flag)70 xdr___nisdb_flag_t(XDR *xdrs, void *flag) {
71 return (TRUE);
72 }
73
74 /*
75 * Imported from rpc.nisd/nis_db.c
76 *
77 * Special abbreviated XDR string which knows that the namep parameter (mainly
78 * owner and group) has a trailing end which matches the last 'n' characters
79 * in the domainname part. It makes use of those common characters to
80 * encode/decode this information. We append an integer string to the
81 * name to be encoded which denotes the place in the domainname from where the
82 * common string starts. For example, if the name was "foo.my.domain." and the
83 * domainname was "my.domain.", the name would be encoded as "foo.10" because
84 * the length of the common part "my.domain." is 10.
85 */
86 bool_t
xdr_nis_name_abbrev(XDR * xdrs,nis_name * namep,nis_name domainname)87 xdr_nis_name_abbrev(
88 XDR *xdrs,
89 nis_name *namep,
90 nis_name domainname) /* domainname field from the table */
91 {
92 size_t name_len, dom_len, min_len;
93 char buf[NIS_MAXNAMELEN];
94 char *name;
95 char *lenstr, *tmp;
96 int i;
97
98 switch (xdrs->x_op) {
99 case XDR_ENCODE:
100 /* Get the start of the common part */
101 name = *namep;
102 name_len = strlen(name);
103 if (name_len == 0)
104 return (xdr_nis_name(xdrs, namep));
105 dom_len = strlen(domainname);
106 min_len = (name_len < dom_len) ? name_len : dom_len;
107 for (i = 1; i <= min_len; i++) {
108 if (name[name_len - i] != domainname[dom_len - i])
109 break;
110 }
111 i--;
112 memcpy(buf, name, name_len - i);
113 sprintf(buf + name_len - i, ".%d", dom_len - i);
114 tmp = buf;
115 return (xdr_nis_name(xdrs, &tmp));
116
117 case XDR_DECODE:
118 tmp = buf;
119 if (!xdr_nis_name(xdrs, &tmp))
120 return (FALSE);
121 if ((buf[0] == NULL) || buf[strlen(buf) - 1] == '.') {
122 /* It is either a FQN or a NULL string */
123 if (*namep) {
124 strcpy(*namep, buf);
125 return (TRUE);
126 } else {
127 if ((*namep = strdup(buf)) == NULL)
128 return (FALSE);
129 else
130 return (TRUE);
131 }
132 }
133 /* Now concoct the new name */
134 if ((lenstr = strrchr(buf, '.')) == NULL) {
135 /* something went wrong here */
136 syslog(LOG_ERR,
137 "xdr_nis_name_abbrev: no dot found in %s", buf);
138 return (FALSE);
139 }
140 i = atoi(lenstr + 1);
141 strcpy(lenstr, domainname + i);
142 if (*namep) {
143 strcpy(*namep, buf);
144 } else {
145 if ((*namep = strdup(buf)) == NULL)
146 return (FALSE);
147 }
148 return (TRUE);
149
150 default:
151 return (xdr_nis_name(xdrs, namep));
152 }
153 }
154
155 /*
156 * Imported from rpc.nisd/nis_db.c
157 *
158 * special XDR for fetus object. We create the actual object from the
159 * "forming" object plus the table object. We create this special object to
160 * save the following components of the nis_object:
161 * zo_name and zo_domain: replaced by just the length field of 0. We had
162 * to keep the length field for backward compatibility. If we
163 * ever change the object format, we should fix this.
164 * zo_owner and zo_group: we condensed it by abbreviating the common part
165 * shared between the table object and the entry object
166 * en_type: Avoided altogether
167 * zo_type and other en_data: Avoided altogether.
168 *
169 * XXX: If the definition of nis_object ever changes, this should be changed.
170 */
171 bool_t
xdr_nis_fetus_object(XDR * xdrs,nis_object * objp,nis_object * tobj)172 xdr_nis_fetus_object(
173 XDR *xdrs,
174 nis_object *objp, /* Entry object */
175 nis_object *tobj) /* Table object */
176 {
177 uint_t size;
178
179 if (xdrs->x_op == XDR_FREE)
180 return (xdr_nis_object(xdrs, objp));
181 if (!xdr_nis_oid(xdrs, &objp->zo_oid))
182 return (FALSE);
183
184 /*
185 * While encoding of zo_name, we put 0 in the length field, while for
186 * decoding, we get the name from the table object.
187 */
188 if (xdrs->x_op == XDR_ENCODE) {
189 size = 0;
190 if (!xdr_u_int(xdrs, &size))
191 return (FALSE);
192 } else {
193 if (!xdr_u_int(xdrs, &size))
194 return (FALSE);
195 if (size == 0) { /* shrinked format */
196 /* get the name from the table object */
197 if ((objp->zo_name = strdup(tobj->zo_name)) == NULL)
198 return (FALSE);
199 } else {
200 /*
201 * We are opening up the xdr_string implementation here
202 * because we called xdr_u_int() earlier.
203 */
204 if ((objp->zo_name = (char *)malloc(size + 1)) == NULL)
205 return (FALSE);
206 if (!xdr_opaque(xdrs, objp->zo_name, size))
207 return (FALSE);
208 }
209 }
210
211 /*
212 * We use the xdr_nis_name_abbrev() function for both owner
213 * and group which constructs the name from the domain name.
214 */
215 if (!xdr_nis_name_abbrev(xdrs, &objp->zo_owner, tobj->zo_domain))
216 return (FALSE);
217 if (!xdr_nis_name_abbrev(xdrs, &objp->zo_group, tobj->zo_domain))
218 return (FALSE);
219
220 /*
221 * While encoding of zo_domain, we put 0 in the length field, while for
222 * decoding, we get the name from the table object. Same as above for
223 * the name. Could have used a function instead.
224 */
225 if (xdrs->x_op == XDR_ENCODE) {
226 size = 0;
227 if (!xdr_u_int(xdrs, &size))
228 return (FALSE);
229 } else {
230 if (!xdr_u_int(xdrs, &size))
231 return (FALSE);
232 if (size == 0) { /* shrinked format */
233 /* get the name from the table object */
234 if ((objp->zo_domain = strdup(tobj->zo_domain)) == NULL)
235 return (FALSE);
236 } else {
237 /*
238 * We are opening up the xdr_string implementation here
239 * because we called xdr_u_int() earlier.
240 */
241 if ((objp->zo_domain = (char *)malloc(size + 1))
242 == NULL)
243 return (FALSE);
244 if (!xdr_opaque(xdrs, objp->zo_domain, size))
245 return (FALSE);
246 }
247 }
248
249 if (!xdr_u_int(xdrs, &objp->zo_access))
250 return (FALSE);
251 if (!xdr_u_int(xdrs, &objp->zo_ttl))
252 return (FALSE);
253
254 /*
255 * We know that this is an entry object, so we'll save all the entry_obj
256 * space because we can recreate it later.
257 */
258 if (xdrs->x_op == XDR_ENCODE)
259 return (TRUE);
260 /* Now for the DECODE case, just handcraft the entries and ignore XDR */
261 objp->zo_data.zo_type = NIS_ENTRY_OBJ;
262 if ((objp->zo_data.objdata_u.en_data.en_type =
263 strdup(tobj->zo_data.objdata_u.ta_data.ta_type)) == NULL)
264 return (FALSE);
265 objp->zo_data.objdata_u.en_data.en_cols.en_cols_val = NULL;
266 objp->zo_data.objdata_u.en_data.en_cols.en_cols_len = 0;
267 return (TRUE);
268 }
269
270 static const char *in_directory = "IN_DIRECTORY";
271
272 /*
273 * Given an input NIS+ object, create the kind
274 * of pseudo-entry_obj (with an XDR-encoded nis_object in the
275 * first column) that's stored in the DB. Note that:
276 *
277 * If the input object is an entry, it's assumed to have the
278 * columns moved up one step (col 0 in en_cols.en_cols_val[1],
279 * etc.). en_cols.en_cols_val[0] will be overwritten. The
280 * input object will be changed (some pointers set to zero,
281 * etc.) on exit.
282 *
283 * 'eo' is assumed to be a pointer to an empty entry_obj (or,
284 * at least, one that can be overwritten). It must not be a
285 * pointer to the entry_obj in 'obj'. If the input object is
286 * of a type other than entry, the 'eo' pointer must have
287 * en_cols.en_cols_val appropriately initialized to an array of
288 * (at least) length one.
289 *
290 * 'tobj' is a pointer to the table object for the table for
291 * which the entry_obj is destined. It's needed for entry objects,
292 * but unused for other object types.
293 */
294 entry_obj *
makePseudoEntryObj(nis_object * obj,entry_obj * eo,nis_object * tobj)295 makePseudoEntryObj(nis_object *obj, entry_obj *eo, nis_object *tobj) {
296 int bufsize;
297 char *buf;
298 XDR xdrs;
299 bool_t xret;
300 uint_t ecl;
301 entry_col *ecv;
302 char *myself = "makePseudoEntryObj";
303
304 if (obj == 0 || eo == 0)
305 return (0);
306
307 if (obj->zo_data.zo_type == NIS_ENTRY_OBJ) {
308 *eo = obj->zo_data.objdata_u.en_data;
309 eo->en_type = 0;
310
311 /*
312 * To prevent the XDR function from making a copy of
313 * the entry columns, we set the columns structure to
314 * 0 (ie no column data)
315 */
316 ecl = obj->EN_data.en_cols.en_cols_len;
317 ecv = obj->EN_data.en_cols.en_cols_val;
318 obj->EN_data.en_cols.en_cols_len = 0;
319 obj->EN_data.en_cols.en_cols_val = 0;
320 } else {
321 eo->en_type = (char *)in_directory;
322 }
323
324 bufsize = xdr_sizeof(xdr_nis_object, obj);
325 buf = am(myself, bufsize);
326 if (buf == 0) {
327 if (obj->zo_data.zo_type == NIS_ENTRY_OBJ) {
328 obj->EN_data.en_cols.en_cols_len = ecl;
329 obj->EN_data.en_cols.en_cols_val = ecv;
330 }
331 return (0);
332 }
333
334 xdrmem_create(&xdrs, (char *)buf, bufsize, XDR_ENCODE);
335
336 if (obj->zo_data.zo_type == NIS_ENTRY_OBJ) {
337 xret = xdr_nis_fetus_object(&xdrs, obj, tobj);
338 } else {
339 xret = xdr_nis_object(&xdrs, obj);
340 }
341
342 /* Restore the 'obj' */
343 if (obj->zo_data.zo_type == NIS_ENTRY_OBJ) {
344 obj->EN_data.en_cols.en_cols_len = ecl;
345 obj->EN_data.en_cols.en_cols_val = ecv;
346 }
347
348 if (!xret) {
349 logmsg(MSG_NOTIMECHECK, LOG_ERR,
350 "%s: XDR encode failure", myself);
351 sfree(buf);
352 return (0);
353 }
354
355 eo->en_cols.en_cols_val[0].ec_value.ec_value_val = buf;
356 eo->en_cols.en_cols_val[0].ec_value.ec_value_len = xdr_getpos(&xdrs);
357 eo->en_cols.en_cols_val[0].ec_flags = EN_BINARY+EN_XDR;
358
359 return (eo);
360 }
361
362 nis_object *
unmakePseudoEntryObj(entry_obj * e,nis_object * tobj)363 unmakePseudoEntryObj(entry_obj *e, nis_object *tobj) {
364 nis_object *o;
365 XDR xdrs;
366 bool_t stat;
367 char *myself = "unmakePseudoEntryObj";
368
369 if (e == 0 || e->en_cols.en_cols_val == 0 ||
370 e->en_cols.en_cols_len == 0)
371 return (0);
372
373 o = am(myself, sizeof (*o));
374 if (o == 0)
375 return (0);
376
377 xdrmem_create(&xdrs, e->en_cols.en_cols_val[0].ec_value.ec_value_val,
378 e->en_cols.en_cols_val[0].ec_value.ec_value_len,
379 XDR_DECODE);
380
381 if (tobj != 0 && (e->en_type == 0 || e->en_type[0] == '\0')) {
382 stat = xdr_nis_fetus_object(&xdrs, o, tobj);
383 } else {
384 stat = xdr_nis_object(&xdrs, o);
385 }
386
387 if (!stat) {
388 sfree(o);
389 o = 0;
390 }
391
392 /*
393 * If it's an entry object, construct the column information.
394 * We make this a copy, so that 'o' can be freed using
395 * nis_destroy_object().
396 */
397 if (o != 0 && o->zo_data.zo_type == NIS_ENTRY_OBJ &&
398 o->zo_data.objdata_u.en_data.en_cols.en_cols_val == 0 &&
399 e->en_cols.en_cols_len > 1) {
400 entry_col *ec, *oec;
401 uint_t i, *ocl;
402
403 ec = am(myself, (e->en_cols.en_cols_len - 1) * sizeof (ec[0]));
404 if (ec == 0) {
405 nis_destroy_object(o);
406 return (0);
407 }
408
409 o->zo_data.objdata_u.en_data.en_cols.en_cols_val = ec;
410 o->zo_data.objdata_u.en_data.en_cols.en_cols_len = 0;
411 ocl = &o->zo_data.objdata_u.en_data.en_cols.en_cols_len;
412 oec = e->en_cols.en_cols_val;
413
414 for (i = 1; i < e->en_cols.en_cols_len; i++) {
415 uint_t len;
416
417 if (oec[i].ec_value.ec_value_val != 0) {
418 len = oec[i].ec_value.ec_value_len;
419 if (len == 0)
420 len++;
421 ec[i-1].ec_value.ec_value_val = am(myself, len);
422 if (ec[i-1].ec_value.ec_value_val == 0) {
423 nis_destroy_object(o);
424 return (0);
425 }
426 (void) memcpy(ec[i-1].ec_value.ec_value_val,
427 oec[i].ec_value.ec_value_val,
428 oec[i].ec_value.ec_value_len);
429 ec[i-1].ec_value.ec_value_len =
430 oec[i].ec_value.ec_value_len;
431 } else {
432 ec[i-1].ec_value.ec_value_val = 0;
433 ec[i-1].ec_value.ec_value_len = 0;
434 }
435 *ocl += 1;
436 }
437 }
438
439 /*
440 * If it's an entry, and we have the table object, make sure
441 * zo_name and en_type either already are set, or get them
442 * from the table.
443 */
444 if (o != 0 && o->zo_data.zo_type == NIS_ENTRY_OBJ && tobj != 0) {
445 if (o->zo_name == 0)
446 o->zo_name = sdup(myself, T, tobj->zo_name);
447 if (o->zo_data.objdata_u.en_data.en_type == 0)
448 o->zo_data.objdata_u.en_data.en_type = sdup(myself, T,
449 tobj->zo_data.objdata_u.ta_data.ta_type);
450 }
451
452 return (o);
453 }
454
455 /*
456 * Input: A (nis_object *), and (optionally) an (entry_obj *) array.
457 * Output: Pointer to an XDR:ed version of an (xdr_nis_object_t).
458 */
459 void *
xdrNisObject(nis_object * obj,entry_obj ** ea,int numEa,int * xdrLenP)460 xdrNisObject(nis_object *obj, entry_obj **ea, int numEa, int *xdrLenP) {
461 xdr_nis_object_t xno;
462 void *buf;
463 int xdrLen;
464 XDR xdrs;
465 bool_t xret;
466 char *myself = "xdrNisObject";
467
468 if (obj == 0)
469 return (0);
470
471 /*
472 * The version tells us what the XDR:ed buffer contains.
473 * Should be incremented whenever xdr_nis_object_t changes
474 * incompatibly.
475 */
476 xno.xversion = 1;
477
478 xno.obj = obj;
479
480 if (obj->zo_data.zo_type == NIS_DIRECTORY_OBJ &&
481 ea != 0 && numEa > 0) {
482 int i;
483
484 /*
485 * The ea[] array is expected to contain the kind of
486 * pseudo-entry object stored in the nisdb incarnation
487 * of a NIS+ directory. Column zero contains the XDR:ed
488 * directory entry object (which we ignore), while column
489 * one contains the name of said entry. It's the latter
490 * that we borrow for use in the dirEntry[] list of the
491 * xdr_nis_object_t.
492 */
493
494 xno.dirEntry.dirEntry_len = 0;
495 xno.dirEntry.dirEntry_val = am(myself, numEa *
496 sizeof (xno.dirEntry.dirEntry_val[0]));
497 if (xno.dirEntry.dirEntry_val == 0)
498 return (0);
499
500 for (i = 0; i < numEa; i++) {
501 if (ea[i] == 0 || ea[i]->en_cols.en_cols_val == 0 ||
502 ea[i]->en_cols.en_cols_len != 2 ||
503 ea[i]->en_cols.en_cols_val[1].
504 ec_value.ec_value_len == 0)
505 continue;
506 /*
507 * Yes, there's a NUL at the end of the dir entry
508 * name.
509 */
510 xno.dirEntry.dirEntry_val[xno.dirEntry.dirEntry_len] =
511 ea[i]->en_cols.en_cols_val[1].
512 ec_value.ec_value_val;
513 xno.dirEntry.dirEntry_len++;
514 }
515 } else {
516 /* No directory entries */
517 xno.dirEntry.dirEntry_len = 0;
518 xno.dirEntry.dirEntry_val = 0;
519 }
520
521 xdrLen = xdr_sizeof(xdr_xdr_nis_object_t, &xno);
522 buf = am(myself, xdrLen);
523 if (buf == 0)
524 return (0);
525
526 xdrmem_create(&xdrs, (char *)buf, xdrLen, XDR_ENCODE);
527
528 xret = xdr_xdr_nis_object_t(&xdrs, &xno);
529
530 sfree(xno.dirEntry.dirEntry_val);
531
532 if (!xret) {
533 sfree(buf);
534 return (0);
535 }
536
537 if (xdrLenP != 0)
538 *xdrLenP = xdrLen;
539
540 return (buf);
541 }
542
543 /*
544 * Input: Pointer to an XDR:ed version of an (xdr_nis_object_t).
545 * Output: Pointer to a (nis_object *) and (if the object is a
546 * directory) a pointer to an array of (entry_obj *).
547 */
548 nis_object *
unXdrNisObject(void * buf,int bufLen,entry_obj *** eaP,int * numEaP)549 unXdrNisObject(void *buf, int bufLen, entry_obj ***eaP, int *numEaP) {
550 xdr_nis_object_t *xno;
551 XDR xdrs;
552 bool_t xret;
553 entry_obj **ea;
554 int numEa;
555 nis_object *o;
556 char *myself = "unXdrNisObject";
557
558 if (buf == 0 || bufLen <= 0)
559 return (0);
560
561 xno = am(myself, sizeof (*xno));
562 if (xno == 0)
563 return (0);
564
565 xdrmem_create(&xdrs, buf, bufLen, XDR_DECODE);
566 xret = xdr_xdr_nis_object_t(&xdrs, xno);
567
568 if (!xret) {
569 sfree(xno);
570 return (0);
571 }
572
573 switch (xno->xversion) {
574 case 1:
575 break;
576 default:
577 xdr_free(xdr_xdr_nis_object_t, (char *)xno);
578 sfree(xno);
579 logmsg(MSG_NOTIMECHECK, LOG_WARNING,
580 "%s: Unknown xdr_nis_object_t version %d",
581 myself, xno->xversion);
582 return (0);
583 }
584
585 if (eaP != 0 && numEaP != 0 && xno->dirEntry.dirEntry_len > 0 &&
586 xno->dirEntry.dirEntry_val != 0) {
587 ea = am(myself, xno->dirEntry.dirEntry_len * sizeof (ea[0]));
588 if (ea == 0) {
589 xdr_free(xdr_xdr_nis_object_t, (char *)xno);
590 sfree(xno);
591 return (0);
592 }
593 for (numEa = 0; numEa < xno->dirEntry.dirEntry_len; numEa++) {
594 ea[numEa] = am(myself, sizeof (*ea[numEa]));
595 if (ea[numEa] != 0) {
596 ea[numEa]->en_cols.en_cols_len = 2;
597 ea[numEa]->en_cols.en_cols_val = am(myself,
598 ea[numEa]->en_cols.en_cols_len *
599 sizeof (ea[numEa]->en_cols.en_cols_val[0]));
600 }
601 if (ea[numEa] == 0 ||
602 ea[numEa]->en_cols.en_cols_val == 0) {
603 int i;
604 for (i = 0; i < numEa; i++) {
605 sfree(ea[i]->en_cols.en_cols_val);
606 sfree(ea[i]);
607 }
608 sfree(ea);
609 xdr_free(xdr_xdr_nis_object_t, (char *)xno);
610 sfree(xno);
611 return (0);
612 }
613 /* Leave column 0 (XDR:ed object) empty */
614 ea[numEa]->en_cols.en_cols_val[0].
615 ec_value.ec_value_len = 0;
616 ea[numEa]->en_cols.en_cols_val[0].
617 ec_value.ec_value_val = 0;
618 /*
619 * Fill in name of dir entry. The DB counts the NUL
620 * as part of the dir entry name; hence, add one
621 * to the string length.
622 */
623 ea[numEa]->en_cols.en_cols_val[1].
624 ec_value.ec_value_len = slen(xno->dirEntry.
625 dirEntry_val[numEa]) + 1;
626 ea[numEa]->en_cols.en_cols_val[1].
627 ec_value.ec_value_val =
628 xno->dirEntry.dirEntry_val[numEa];
629 }
630 *eaP = ea;
631 *numEaP = numEa;
632 /*
633 * The xno->dirEntry.dirEntry_val[] pointers are duplicated
634 * in 'ea'. Set the xno pointers to zero, so that the xdr_free
635 * doesn't free the 'ea' data.
636 */
637 if (numEa > 0) {
638 int i;
639 for (i = 0; i < numEa; i++) {
640 xno->dirEntry.dirEntry_val[i] = 0;
641 }
642 }
643 } else {
644 if (eaP != 0)
645 *eaP = 0;
646 if (numEaP != 0)
647 *numEaP = 0;
648 }
649
650 o = xno->obj;
651 xno->obj = 0;
652 xdr_free(xdr_xdr_nis_object_t, (char *)xno);
653 sfree(xno);
654
655 return (o);
656 }
657
658 void
freeEntryObjArray(entry_obj ** ea,int numEa)659 freeEntryObjArray(entry_obj **ea, int numEa) {
660 int i;
661
662 if (ea == 0)
663 return;
664
665 for (i = 0; i < numEa; i++) {
666 int j;
667
668 for (j = 0; j < ea[i]->en_cols.en_cols_len; j++) {
669 sfree(ea[i]->en_cols.en_cols_val[j].
670 ec_value.ec_value_val);
671 }
672
673 sfree(ea[i]->en_cols.en_cols_val);
674 }
675
676 sfree(ea);
677 }
678
679 /*
680 * Return TRUE if 'o1' and 'o2' are the same, FALSE otherwise.
681 * We perform the comparison by XDR encoding the objects, and then
682 * checking the XDR buffers for equality. However, we don't want to
683 * include the zo_oid (i.e., ctime and mtime) in the comparison.
684 */
685 bool_t
sameNisPlusObj(nis_object * o1,nis_object * o2)686 sameNisPlusObj(nis_object *o1, nis_object *o2) {
687 XDR x1, x2;
688 void *b1, *b2;
689 int l1, l2;
690 bool_t ret;
691 nis_object obj1, obj2;
692 char *myself = "sameNisPlusObj";
693
694 if (o1 == o2)
695 return (TRUE);
696 else if (o1 == 0 || o2 == 0)
697 return (FALSE);
698
699 /*
700 * We want to exclude the zo_oid from the comparison. In order
701 * not to modify the objects (even very briefly), we do this by
702 * making copies (nis_object itself only, not the underlying
703 * structures accessed through pointers), and setting the zo_oid
704 * to zero in the copies.
705 */
706 obj1 = *o1;
707 obj2 = *o2;
708 obj1.zo_oid.ctime = obj1.zo_oid.mtime = 0;
709 obj2.zo_oid.ctime = obj2.zo_oid.mtime = 0;
710
711 l1 = xdr_sizeof(xdr_nis_object, &obj1);
712 l2 = xdr_sizeof(xdr_nis_object, &obj2);
713 if (l1 != l2)
714 return (FALSE);
715
716 b1 = am(myself, l1);
717 b2 = am(myself, l2);
718 if (b1 == 0 || b2 == 0) {
719 sfree(b1);
720 sfree(b2);
721 return (FALSE);
722 }
723
724 xdrmem_create(&x1, (char *)b1, l1, XDR_ENCODE);
725 xdrmem_create(&x2, (char *)b2, l2, XDR_ENCODE);
726
727 if (xdr_nis_object(&x1, &obj1) && xdr_nis_object(&x2, &obj2)) {
728 ret = (memcmp(b1, b2, l1) == 0);
729 } else {
730 logmsg(MSG_NOTIMECHECK, LOG_WARNING,
731 "%s: xdr_nis_object() error",
732 myself);
733 ret = FALSE;
734 }
735
736 sfree(b1);
737 sfree(b2);
738
739 return (ret);
740 }
741
742 /*
743 * A wrapper/convenience function for sameNisPlusObj() that extracts
744 * the object in column zero of 'e2'.
745 */
746 bool_t
sameNisPlusPseudoObj(nis_object * o1,entry_obj * e2)747 sameNisPlusPseudoObj(nis_object *o1, entry_obj *e2) {
748 nis_object *o2;
749 bool_t res;
750
751 if (o1 == 0 && e2 == 0)
752 return (TRUE);
753 else if (e2 == 0)
754 return (FALSE);
755
756 o2 = unmakePseudoEntryObj(e2, 0);
757 if (o2 == 0)
758 return ((o1 == 0) ? TRUE : FALSE);
759
760 res = sameNisPlusObj(o1, o2);
761
762 nis_destroy_object(o2);
763
764 return (res);
765 }
766