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 (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 /* 22 * Copyright (c) 2000, 2010, Oracle and/or its affiliates. All rights reserved. 23 * Copyright (c) 2012 by Delphix. All rights reserved. 24 */ 25 26 #include <unistd.h> 27 #include <strings.h> 28 #include <libintl.h> 29 #include <sys/types.h> 30 #include <sys/inttypes.h> 31 #include <stdarg.h> 32 #include <note.h> 33 #include "libnvpair.h" 34 35 /* 36 * libnvpair - A tools library for manipulating <name, value> pairs. 37 * 38 * This library provides routines packing an unpacking nv pairs 39 * for transporting data across process boundaries, transporting 40 * between kernel and userland, and possibly saving onto disk files. 41 */ 42 43 /* 44 * Print control structure. 45 */ 46 47 #define DEFINEOP(opname, vtype) \ 48 struct { \ 49 int (*op)(struct nvlist_prtctl *, void *, nvlist_t *, \ 50 const char *, vtype); \ 51 void *arg; \ 52 } opname 53 54 #define DEFINEARROP(opname, vtype) \ 55 struct { \ 56 int (*op)(struct nvlist_prtctl *, void *, nvlist_t *, \ 57 const char *, vtype, uint_t); \ 58 void *arg; \ 59 } opname 60 61 struct nvlist_printops { 62 DEFINEOP(print_boolean, int); 63 DEFINEOP(print_boolean_value, boolean_t); 64 DEFINEOP(print_byte, uchar_t); 65 DEFINEOP(print_int8, int8_t); 66 DEFINEOP(print_uint8, uint8_t); 67 DEFINEOP(print_int16, int16_t); 68 DEFINEOP(print_uint16, uint16_t); 69 DEFINEOP(print_int32, int32_t); 70 DEFINEOP(print_uint32, uint32_t); 71 DEFINEOP(print_int64, int64_t); 72 DEFINEOP(print_uint64, uint64_t); 73 DEFINEOP(print_double, double); 74 DEFINEOP(print_string, char *); 75 DEFINEOP(print_hrtime, hrtime_t); 76 DEFINEOP(print_nvlist, nvlist_t *); 77 DEFINEARROP(print_boolean_array, boolean_t *); 78 DEFINEARROP(print_byte_array, uchar_t *); 79 DEFINEARROP(print_int8_array, int8_t *); 80 DEFINEARROP(print_uint8_array, uint8_t *); 81 DEFINEARROP(print_int16_array, int16_t *); 82 DEFINEARROP(print_uint16_array, uint16_t *); 83 DEFINEARROP(print_int32_array, int32_t *); 84 DEFINEARROP(print_uint32_array, uint32_t *); 85 DEFINEARROP(print_int64_array, int64_t *); 86 DEFINEARROP(print_uint64_array, uint64_t *); 87 DEFINEARROP(print_string_array, char **); 88 DEFINEARROP(print_nvlist_array, nvlist_t **); 89 }; 90 91 struct nvlist_prtctl { 92 FILE *nvprt_fp; /* output destination */ 93 enum nvlist_indent_mode nvprt_indent_mode; /* see above */ 94 int nvprt_indent; /* absolute indent, or tab depth */ 95 int nvprt_indentinc; /* indent or tab increment */ 96 const char *nvprt_nmfmt; /* member name format, max one %s */ 97 const char *nvprt_eomfmt; /* after member format, e.g. "\n" */ 98 const char *nvprt_btwnarrfmt; /* between array members */ 99 int nvprt_btwnarrfmt_nl; /* nvprt_eoamfmt includes newline? */ 100 struct nvlist_printops *nvprt_dfltops; 101 struct nvlist_printops *nvprt_custops; 102 }; 103 104 #define DFLTPRTOP(pctl, type) \ 105 ((pctl)->nvprt_dfltops->print_##type.op) 106 107 #define DFLTPRTOPARG(pctl, type) \ 108 ((pctl)->nvprt_dfltops->print_##type.arg) 109 110 #define CUSTPRTOP(pctl, type) \ 111 ((pctl)->nvprt_custops->print_##type.op) 112 113 #define CUSTPRTOPARG(pctl, type) \ 114 ((pctl)->nvprt_custops->print_##type.arg) 115 116 #define RENDER(pctl, type, nvl, name, val) \ 117 { \ 118 int done = 0; \ 119 if ((pctl)->nvprt_custops && CUSTPRTOP(pctl, type)) { \ 120 done = CUSTPRTOP(pctl, type)(pctl, \ 121 CUSTPRTOPARG(pctl, type), nvl, name, val); \ 122 } \ 123 if (!done) { \ 124 (void) DFLTPRTOP(pctl, type)(pctl, \ 125 DFLTPRTOPARG(pctl, type), nvl, name, val); \ 126 } \ 127 (void) fprintf(pctl->nvprt_fp, pctl->nvprt_eomfmt); \ 128 } 129 130 #define ARENDER(pctl, type, nvl, name, arrp, count) \ 131 { \ 132 int done = 0; \ 133 if ((pctl)->nvprt_custops && CUSTPRTOP(pctl, type)) { \ 134 done = CUSTPRTOP(pctl, type)(pctl, \ 135 CUSTPRTOPARG(pctl, type), nvl, name, arrp, count); \ 136 } \ 137 if (!done) { \ 138 (void) DFLTPRTOP(pctl, type)(pctl, \ 139 DFLTPRTOPARG(pctl, type), nvl, name, arrp, count); \ 140 } \ 141 (void) fprintf(pctl->nvprt_fp, pctl->nvprt_eomfmt); \ 142 } 143 144 static void nvlist_print_with_indent(nvlist_t *, nvlist_prtctl_t); 145 146 /* 147 * ====================================================================== 148 * | | 149 * | Indentation | 150 * | | 151 * ====================================================================== 152 */ 153 154 static void 155 indent(nvlist_prtctl_t pctl, int onemore) 156 { 157 int depth; 158 159 switch (pctl->nvprt_indent_mode) { 160 case NVLIST_INDENT_ABS: 161 (void) fprintf(pctl->nvprt_fp, "%*s", 162 pctl->nvprt_indent + onemore * pctl->nvprt_indentinc, ""); 163 break; 164 165 case NVLIST_INDENT_TABBED: 166 depth = pctl->nvprt_indent + onemore; 167 while (depth-- > 0) 168 (void) fprintf(pctl->nvprt_fp, "\t"); 169 } 170 } 171 172 /* 173 * ====================================================================== 174 * | | 175 * | Default nvlist member rendering functions. | 176 * | | 177 * ====================================================================== 178 */ 179 180 /* 181 * Generate functions to print single-valued nvlist members. 182 * 183 * type_and_variant - suffix to form function name 184 * vtype - C type for the member value 185 * ptype - C type to cast value to for printing 186 * vfmt - format string for pair value, e.g "%d" or "0x%llx" 187 */ 188 189 #define NVLIST_PRTFUNC(type_and_variant, vtype, ptype, vfmt) \ 190 static int \ 191 nvprint_##type_and_variant(nvlist_prtctl_t pctl, void *private, \ 192 nvlist_t *nvl, const char *name, vtype value) \ 193 { \ 194 FILE *fp = pctl->nvprt_fp; \ 195 NOTE(ARGUNUSED(private)) \ 196 NOTE(ARGUNUSED(nvl)) \ 197 indent(pctl, 1); \ 198 (void) fprintf(fp, pctl->nvprt_nmfmt, name); \ 199 (void) fprintf(fp, vfmt, (ptype)value); \ 200 return (1); \ 201 } 202 203 NVLIST_PRTFUNC(boolean, int, int, "%d") 204 NVLIST_PRTFUNC(boolean_value, boolean_t, int, "%d") 205 NVLIST_PRTFUNC(byte, uchar_t, uchar_t, "0x%2.2x") 206 NVLIST_PRTFUNC(int8, int8_t, int, "%d") 207 NVLIST_PRTFUNC(uint8, uint8_t, uint8_t, "0x%x") 208 NVLIST_PRTFUNC(int16, int16_t, int16_t, "%d") 209 NVLIST_PRTFUNC(uint16, uint16_t, uint16_t, "0x%x") 210 NVLIST_PRTFUNC(int32, int32_t, int32_t, "%d") 211 NVLIST_PRTFUNC(uint32, uint32_t, uint32_t, "0x%x") 212 NVLIST_PRTFUNC(int64, int64_t, longlong_t, "%lld") 213 NVLIST_PRTFUNC(uint64, uint64_t, u_longlong_t, "0x%llx") 214 NVLIST_PRTFUNC(double, double, double, "0x%llf") 215 NVLIST_PRTFUNC(string, char *, char *, "%s") 216 NVLIST_PRTFUNC(hrtime, hrtime_t, hrtime_t, "0x%llx") 217 218 /* 219 * Generate functions to print array-valued nvlist members. 220 */ 221 222 #define NVLIST_ARRPRTFUNC(type_and_variant, vtype, ptype, vfmt) \ 223 static int \ 224 nvaprint_##type_and_variant(nvlist_prtctl_t pctl, void *private, \ 225 nvlist_t *nvl, const char *name, vtype *valuep, uint_t count) \ 226 { \ 227 FILE *fp = pctl->nvprt_fp; \ 228 uint_t i; \ 229 NOTE(ARGUNUSED(private)) \ 230 NOTE(ARGUNUSED(nvl)) \ 231 for (i = 0; i < count; i++) { \ 232 if (i == 0 || pctl->nvprt_btwnarrfmt_nl) { \ 233 indent(pctl, 1); \ 234 (void) fprintf(fp, pctl->nvprt_nmfmt, name); \ 235 if (pctl->nvprt_btwnarrfmt_nl) \ 236 (void) fprintf(fp, "[%d]: ", i); \ 237 } \ 238 if (i != 0) \ 239 (void) fprintf(fp, pctl->nvprt_btwnarrfmt); \ 240 (void) fprintf(fp, vfmt, (ptype)valuep[i]); \ 241 } \ 242 return (1); \ 243 } 244 245 NVLIST_ARRPRTFUNC(boolean_array, boolean_t, boolean_t, "%d") 246 NVLIST_ARRPRTFUNC(byte_array, uchar_t, uchar_t, "0x%2.2x") 247 NVLIST_ARRPRTFUNC(int8_array, int8_t, int8_t, "%d") 248 NVLIST_ARRPRTFUNC(uint8_array, uint8_t, uint8_t, "0x%x") 249 NVLIST_ARRPRTFUNC(int16_array, int16_t, int16_t, "%d") 250 NVLIST_ARRPRTFUNC(uint16_array, uint16_t, uint16_t, "0x%x") 251 NVLIST_ARRPRTFUNC(int32_array, int32_t, int32_t, "%d") 252 NVLIST_ARRPRTFUNC(uint32_array, uint32_t, uint32_t, "0x%x") 253 NVLIST_ARRPRTFUNC(int64_array, int64_t, longlong_t, "%lld") 254 NVLIST_ARRPRTFUNC(uint64_array, uint64_t, u_longlong_t, "0x%llx") 255 NVLIST_ARRPRTFUNC(string_array, char *, char *, "%s") 256 257 /*ARGSUSED*/ 258 static int 259 nvprint_nvlist(nvlist_prtctl_t pctl, void *private, 260 nvlist_t *nvl, const char *name, nvlist_t *value) 261 { 262 FILE *fp = pctl->nvprt_fp; 263 264 indent(pctl, 1); 265 (void) fprintf(fp, "%s = (embedded nvlist)\n", name); 266 267 pctl->nvprt_indent += pctl->nvprt_indentinc; 268 nvlist_print_with_indent(value, pctl); 269 pctl->nvprt_indent -= pctl->nvprt_indentinc; 270 271 indent(pctl, 1); 272 (void) fprintf(fp, "(end %s)\n", name); 273 274 return (1); 275 } 276 277 /*ARGSUSED*/ 278 static int 279 nvaprint_nvlist_array(nvlist_prtctl_t pctl, void *private, 280 nvlist_t *nvl, const char *name, nvlist_t **valuep, uint_t count) 281 { 282 FILE *fp = pctl->nvprt_fp; 283 uint_t i; 284 285 indent(pctl, 1); 286 (void) fprintf(fp, "%s = (array of embedded nvlists)\n", name); 287 288 for (i = 0; i < count; i++) { 289 indent(pctl, 1); 290 (void) fprintf(fp, "(start %s[%d])\n", name, i); 291 292 pctl->nvprt_indent += pctl->nvprt_indentinc; 293 nvlist_print_with_indent(valuep[i], pctl); 294 pctl->nvprt_indent -= pctl->nvprt_indentinc; 295 296 indent(pctl, 1); 297 (void) fprintf(fp, "(end %s[%d])\n", name, i); 298 } 299 300 return (1); 301 } 302 303 /* 304 * ====================================================================== 305 * | | 306 * | Interfaces that allow control over formatting. | 307 * | | 308 * ====================================================================== 309 */ 310 311 void 312 nvlist_prtctl_setdest(nvlist_prtctl_t pctl, FILE *fp) 313 { 314 pctl->nvprt_fp = fp; 315 } 316 317 FILE * 318 nvlist_prtctl_getdest(nvlist_prtctl_t pctl) 319 { 320 return (pctl->nvprt_fp); 321 } 322 323 324 void 325 nvlist_prtctl_setindent(nvlist_prtctl_t pctl, enum nvlist_indent_mode mode, 326 int start, int inc) 327 { 328 if (mode < NVLIST_INDENT_ABS || mode > NVLIST_INDENT_TABBED) 329 mode = NVLIST_INDENT_TABBED; 330 331 if (start < 0) 332 start = 0; 333 334 if (inc < 0) 335 inc = 1; 336 337 pctl->nvprt_indent_mode = mode; 338 pctl->nvprt_indent = start; 339 pctl->nvprt_indentinc = inc; 340 } 341 342 void 343 nvlist_prtctl_doindent(nvlist_prtctl_t pctl, int onemore) 344 { 345 indent(pctl, onemore); 346 } 347 348 349 void 350 nvlist_prtctl_setfmt(nvlist_prtctl_t pctl, enum nvlist_prtctl_fmt which, 351 const char *fmt) 352 { 353 switch (which) { 354 case NVLIST_FMT_MEMBER_NAME: 355 if (fmt == NULL) 356 fmt = "%s = "; 357 pctl->nvprt_nmfmt = fmt; 358 break; 359 360 case NVLIST_FMT_MEMBER_POSTAMBLE: 361 if (fmt == NULL) 362 fmt = "\n"; 363 pctl->nvprt_eomfmt = fmt; 364 break; 365 366 case NVLIST_FMT_BTWN_ARRAY: 367 if (fmt == NULL) { 368 pctl->nvprt_btwnarrfmt = " "; 369 pctl->nvprt_btwnarrfmt_nl = 0; 370 } else { 371 pctl->nvprt_btwnarrfmt = fmt; 372 pctl->nvprt_btwnarrfmt_nl = (strstr(fmt, "\n") != NULL); 373 } 374 break; 375 376 default: 377 break; 378 } 379 } 380 381 382 void 383 nvlist_prtctl_dofmt(nvlist_prtctl_t pctl, enum nvlist_prtctl_fmt which, ...) 384 { 385 FILE *fp = pctl->nvprt_fp; 386 va_list ap; 387 char *name; 388 389 va_start(ap, which); 390 391 switch (which) { 392 case NVLIST_FMT_MEMBER_NAME: 393 name = va_arg(ap, char *); 394 (void) fprintf(fp, pctl->nvprt_nmfmt, name); 395 break; 396 397 case NVLIST_FMT_MEMBER_POSTAMBLE: 398 (void) fprintf(fp, pctl->nvprt_eomfmt); 399 break; 400 401 case NVLIST_FMT_BTWN_ARRAY: 402 (void) fprintf(fp, pctl->nvprt_btwnarrfmt); \ 403 break; 404 405 default: 406 break; 407 } 408 409 va_end(ap); 410 } 411 412 /* 413 * ====================================================================== 414 * | | 415 * | Interfaces to allow appointment of replacement rendering functions.| 416 * | | 417 * ====================================================================== 418 */ 419 420 #define NVLIST_PRINTCTL_REPLACE(type, vtype) \ 421 void \ 422 nvlist_prtctlop_##type(nvlist_prtctl_t pctl, \ 423 int (*func)(nvlist_prtctl_t, void *, nvlist_t *, const char *, vtype), \ 424 void *private) \ 425 { \ 426 CUSTPRTOP(pctl, type) = func; \ 427 CUSTPRTOPARG(pctl, type) = private; \ 428 } 429 430 NVLIST_PRINTCTL_REPLACE(boolean, int) 431 NVLIST_PRINTCTL_REPLACE(boolean_value, boolean_t) 432 NVLIST_PRINTCTL_REPLACE(byte, uchar_t) 433 NVLIST_PRINTCTL_REPLACE(int8, int8_t) 434 NVLIST_PRINTCTL_REPLACE(uint8, uint8_t) 435 NVLIST_PRINTCTL_REPLACE(int16, int16_t) 436 NVLIST_PRINTCTL_REPLACE(uint16, uint16_t) 437 NVLIST_PRINTCTL_REPLACE(int32, int32_t) 438 NVLIST_PRINTCTL_REPLACE(uint32, uint32_t) 439 NVLIST_PRINTCTL_REPLACE(int64, int64_t) 440 NVLIST_PRINTCTL_REPLACE(uint64, uint64_t) 441 NVLIST_PRINTCTL_REPLACE(double, double) 442 NVLIST_PRINTCTL_REPLACE(string, char *) 443 NVLIST_PRINTCTL_REPLACE(hrtime, hrtime_t) 444 NVLIST_PRINTCTL_REPLACE(nvlist, nvlist_t *) 445 446 #define NVLIST_PRINTCTL_AREPLACE(type, vtype) \ 447 void \ 448 nvlist_prtctlop_##type(nvlist_prtctl_t pctl, \ 449 int (*func)(nvlist_prtctl_t, void *, nvlist_t *, const char *, vtype, \ 450 uint_t), void *private) \ 451 { \ 452 CUSTPRTOP(pctl, type) = func; \ 453 CUSTPRTOPARG(pctl, type) = private; \ 454 } 455 456 NVLIST_PRINTCTL_AREPLACE(boolean_array, boolean_t *) 457 NVLIST_PRINTCTL_AREPLACE(byte_array, uchar_t *) 458 NVLIST_PRINTCTL_AREPLACE(int8_array, int8_t *) 459 NVLIST_PRINTCTL_AREPLACE(uint8_array, uint8_t *) 460 NVLIST_PRINTCTL_AREPLACE(int16_array, int16_t *) 461 NVLIST_PRINTCTL_AREPLACE(uint16_array, uint16_t *) 462 NVLIST_PRINTCTL_AREPLACE(int32_array, int32_t *) 463 NVLIST_PRINTCTL_AREPLACE(uint32_array, uint32_t *) 464 NVLIST_PRINTCTL_AREPLACE(int64_array, int64_t *) 465 NVLIST_PRINTCTL_AREPLACE(uint64_array, uint64_t *) 466 NVLIST_PRINTCTL_AREPLACE(string_array, char **) 467 NVLIST_PRINTCTL_AREPLACE(nvlist_array, nvlist_t **) 468 469 /* 470 * ====================================================================== 471 * | | 472 * | Interfaces to manage nvlist_prtctl_t cookies. | 473 * | | 474 * ====================================================================== 475 */ 476 477 478 static const struct nvlist_printops defprtops = { 479 { nvprint_boolean, NULL }, 480 { nvprint_boolean_value, NULL }, 481 { nvprint_byte, NULL }, 482 { nvprint_int8, NULL }, 483 { nvprint_uint8, NULL }, 484 { nvprint_int16, NULL }, 485 { nvprint_uint16, NULL }, 486 { nvprint_int32, NULL }, 487 { nvprint_uint32, NULL }, 488 { nvprint_int64, NULL }, 489 { nvprint_uint64, NULL }, 490 { nvprint_double, NULL }, 491 { nvprint_string, NULL }, 492 { nvprint_hrtime, NULL }, 493 { nvprint_nvlist, NULL }, 494 { nvaprint_boolean_array, NULL }, 495 { nvaprint_byte_array, NULL }, 496 { nvaprint_int8_array, NULL }, 497 { nvaprint_uint8_array, NULL }, 498 { nvaprint_int16_array, NULL }, 499 { nvaprint_uint16_array, NULL }, 500 { nvaprint_int32_array, NULL }, 501 { nvaprint_uint32_array, NULL }, 502 { nvaprint_int64_array, NULL }, 503 { nvaprint_uint64_array, NULL }, 504 { nvaprint_string_array, NULL }, 505 { nvaprint_nvlist_array, NULL }, 506 }; 507 508 static void 509 prtctl_defaults(FILE *fp, struct nvlist_prtctl *pctl, 510 struct nvlist_printops *ops) 511 { 512 pctl->nvprt_fp = fp; 513 pctl->nvprt_indent_mode = NVLIST_INDENT_TABBED; 514 pctl->nvprt_indent = 0; 515 pctl->nvprt_indentinc = 1; 516 pctl->nvprt_nmfmt = "%s = "; 517 pctl->nvprt_eomfmt = "\n"; 518 pctl->nvprt_btwnarrfmt = " "; 519 pctl->nvprt_btwnarrfmt_nl = 0; 520 521 pctl->nvprt_dfltops = (struct nvlist_printops *)&defprtops; 522 pctl->nvprt_custops = ops; 523 } 524 525 nvlist_prtctl_t 526 nvlist_prtctl_alloc(void) 527 { 528 struct nvlist_prtctl *pctl; 529 struct nvlist_printops *ops; 530 531 if ((pctl = malloc(sizeof (*pctl))) == NULL) 532 return (NULL); 533 534 if ((ops = calloc(1, sizeof (*ops))) == NULL) { 535 free(pctl); 536 return (NULL); 537 } 538 539 prtctl_defaults(stdout, pctl, ops); 540 541 return (pctl); 542 } 543 544 void 545 nvlist_prtctl_free(nvlist_prtctl_t pctl) 546 { 547 if (pctl != NULL) { 548 free(pctl->nvprt_custops); 549 free(pctl); 550 } 551 } 552 553 /* 554 * ====================================================================== 555 * | | 556 * | Top-level print request interfaces. | 557 * | | 558 * ====================================================================== 559 */ 560 561 /* 562 * nvlist_print - Prints elements in an event buffer 563 */ 564 static void 565 nvlist_print_with_indent(nvlist_t *nvl, nvlist_prtctl_t pctl) 566 { 567 FILE *fp = pctl->nvprt_fp; 568 char *name; 569 uint_t nelem; 570 nvpair_t *nvp; 571 572 if (nvl == NULL) 573 return; 574 575 indent(pctl, 0); 576 (void) fprintf(fp, "nvlist version: %d\n", NVL_VERSION(nvl)); 577 578 nvp = nvlist_next_nvpair(nvl, NULL); 579 580 while (nvp) { 581 data_type_t type = nvpair_type(nvp); 582 583 name = nvpair_name(nvp); 584 nelem = 0; 585 586 switch (type) { 587 case DATA_TYPE_BOOLEAN: { 588 RENDER(pctl, boolean, nvl, name, 1); 589 break; 590 } 591 case DATA_TYPE_BOOLEAN_VALUE: { 592 boolean_t val; 593 (void) nvpair_value_boolean_value(nvp, &val); 594 RENDER(pctl, boolean_value, nvl, name, val); 595 break; 596 } 597 case DATA_TYPE_BYTE: { 598 uchar_t val; 599 (void) nvpair_value_byte(nvp, &val); 600 RENDER(pctl, byte, nvl, name, val); 601 break; 602 } 603 case DATA_TYPE_INT8: { 604 int8_t val; 605 (void) nvpair_value_int8(nvp, &val); 606 RENDER(pctl, int8, nvl, name, val); 607 break; 608 } 609 case DATA_TYPE_UINT8: { 610 uint8_t val; 611 (void) nvpair_value_uint8(nvp, &val); 612 RENDER(pctl, uint8, nvl, name, val); 613 break; 614 } 615 case DATA_TYPE_INT16: { 616 int16_t val; 617 (void) nvpair_value_int16(nvp, &val); 618 RENDER(pctl, int16, nvl, name, val); 619 break; 620 } 621 case DATA_TYPE_UINT16: { 622 uint16_t val; 623 (void) nvpair_value_uint16(nvp, &val); 624 RENDER(pctl, uint16, nvl, name, val); 625 break; 626 } 627 case DATA_TYPE_INT32: { 628 int32_t val; 629 (void) nvpair_value_int32(nvp, &val); 630 RENDER(pctl, int32, nvl, name, val); 631 break; 632 } 633 case DATA_TYPE_UINT32: { 634 uint32_t val; 635 (void) nvpair_value_uint32(nvp, &val); 636 RENDER(pctl, uint32, nvl, name, val); 637 break; 638 } 639 case DATA_TYPE_INT64: { 640 int64_t val; 641 (void) nvpair_value_int64(nvp, &val); 642 RENDER(pctl, int64, nvl, name, val); 643 break; 644 } 645 case DATA_TYPE_UINT64: { 646 uint64_t val; 647 (void) nvpair_value_uint64(nvp, &val); 648 RENDER(pctl, uint64, nvl, name, val); 649 break; 650 } 651 case DATA_TYPE_DOUBLE: { 652 double val; 653 (void) nvpair_value_double(nvp, &val); 654 RENDER(pctl, double, nvl, name, val); 655 break; 656 } 657 case DATA_TYPE_STRING: { 658 char *val; 659 (void) nvpair_value_string(nvp, &val); 660 RENDER(pctl, string, nvl, name, val); 661 break; 662 } 663 case DATA_TYPE_BOOLEAN_ARRAY: { 664 boolean_t *val; 665 (void) nvpair_value_boolean_array(nvp, &val, &nelem); 666 ARENDER(pctl, boolean_array, nvl, name, val, nelem); 667 break; 668 } 669 case DATA_TYPE_BYTE_ARRAY: { 670 uchar_t *val; 671 (void) nvpair_value_byte_array(nvp, &val, &nelem); 672 ARENDER(pctl, byte_array, nvl, name, val, nelem); 673 break; 674 } 675 case DATA_TYPE_INT8_ARRAY: { 676 int8_t *val; 677 (void) nvpair_value_int8_array(nvp, &val, &nelem); 678 ARENDER(pctl, int8_array, nvl, name, val, nelem); 679 break; 680 } 681 case DATA_TYPE_UINT8_ARRAY: { 682 uint8_t *val; 683 (void) nvpair_value_uint8_array(nvp, &val, &nelem); 684 ARENDER(pctl, uint8_array, nvl, name, val, nelem); 685 break; 686 } 687 case DATA_TYPE_INT16_ARRAY: { 688 int16_t *val; 689 (void) nvpair_value_int16_array(nvp, &val, &nelem); 690 ARENDER(pctl, int16_array, nvl, name, val, nelem); 691 break; 692 } 693 case DATA_TYPE_UINT16_ARRAY: { 694 uint16_t *val; 695 (void) nvpair_value_uint16_array(nvp, &val, &nelem); 696 ARENDER(pctl, uint16_array, nvl, name, val, nelem); 697 break; 698 } 699 case DATA_TYPE_INT32_ARRAY: { 700 int32_t *val; 701 (void) nvpair_value_int32_array(nvp, &val, &nelem); 702 ARENDER(pctl, int32_array, nvl, name, val, nelem); 703 break; 704 } 705 case DATA_TYPE_UINT32_ARRAY: { 706 uint32_t *val; 707 (void) nvpair_value_uint32_array(nvp, &val, &nelem); 708 ARENDER(pctl, uint32_array, nvl, name, val, nelem); 709 break; 710 } 711 case DATA_TYPE_INT64_ARRAY: { 712 int64_t *val; 713 (void) nvpair_value_int64_array(nvp, &val, &nelem); 714 ARENDER(pctl, int64_array, nvl, name, val, nelem); 715 break; 716 } 717 case DATA_TYPE_UINT64_ARRAY: { 718 uint64_t *val; 719 (void) nvpair_value_uint64_array(nvp, &val, &nelem); 720 ARENDER(pctl, uint64_array, nvl, name, val, nelem); 721 break; 722 } 723 case DATA_TYPE_STRING_ARRAY: { 724 char **val; 725 (void) nvpair_value_string_array(nvp, &val, &nelem); 726 ARENDER(pctl, string_array, nvl, name, val, nelem); 727 break; 728 } 729 case DATA_TYPE_HRTIME: { 730 hrtime_t val; 731 (void) nvpair_value_hrtime(nvp, &val); 732 RENDER(pctl, hrtime, nvl, name, val); 733 break; 734 } 735 case DATA_TYPE_NVLIST: { 736 nvlist_t *val; 737 (void) nvpair_value_nvlist(nvp, &val); 738 RENDER(pctl, nvlist, nvl, name, val); 739 break; 740 } 741 case DATA_TYPE_NVLIST_ARRAY: { 742 nvlist_t **val; 743 (void) nvpair_value_nvlist_array(nvp, &val, &nelem); 744 ARENDER(pctl, nvlist_array, nvl, name, val, nelem); 745 break; 746 } 747 default: 748 (void) fprintf(fp, " unknown data type (%d)", type); 749 break; 750 } 751 nvp = nvlist_next_nvpair(nvl, nvp); 752 } 753 } 754 755 void 756 nvlist_print(FILE *fp, nvlist_t *nvl) 757 { 758 struct nvlist_prtctl pc; 759 760 prtctl_defaults(fp, &pc, NULL); 761 nvlist_print_with_indent(nvl, &pc); 762 } 763 764 void 765 nvlist_prt(nvlist_t *nvl, nvlist_prtctl_t pctl) 766 { 767 nvlist_print_with_indent(nvl, pctl); 768 } 769 770 #define NVP(elem, type, vtype, ptype, format) { \ 771 vtype value; \ 772 \ 773 (void) nvpair_value_##type(elem, &value); \ 774 (void) printf("%*s%s: " format "\n", indent, "", \ 775 nvpair_name(elem), (ptype)value); \ 776 } 777 778 #define NVPA(elem, type, vtype, ptype, format) { \ 779 uint_t i, count; \ 780 vtype *value; \ 781 \ 782 (void) nvpair_value_##type(elem, &value, &count); \ 783 for (i = 0; i < count; i++) { \ 784 (void) printf("%*s%s[%d]: " format "\n", indent, "", \ 785 nvpair_name(elem), i, (ptype)value[i]); \ 786 } \ 787 } 788 789 /* 790 * Similar to nvlist_print() but handles arrays slightly differently. 791 */ 792 void 793 dump_nvlist(nvlist_t *list, int indent) 794 { 795 nvpair_t *elem = NULL; 796 boolean_t bool_value; 797 nvlist_t *nvlist_value; 798 nvlist_t **nvlist_array_value; 799 uint_t i, count; 800 801 if (list == NULL) { 802 return; 803 } 804 805 while ((elem = nvlist_next_nvpair(list, elem)) != NULL) { 806 switch (nvpair_type(elem)) { 807 case DATA_TYPE_BOOLEAN: 808 (void) printf("%*s%s\n", indent, "", nvpair_name(elem)); 809 break; 810 811 case DATA_TYPE_BOOLEAN_VALUE: 812 (void) nvpair_value_boolean_value(elem, &bool_value); 813 (void) printf("%*s%s: %s\n", indent, "", 814 nvpair_name(elem), bool_value ? "true" : "false"); 815 break; 816 817 case DATA_TYPE_BYTE: 818 NVP(elem, byte, uchar_t, int, "%u"); 819 break; 820 821 case DATA_TYPE_INT8: 822 NVP(elem, int8, int8_t, int, "%d"); 823 break; 824 825 case DATA_TYPE_UINT8: 826 NVP(elem, uint8, uint8_t, int, "%u"); 827 break; 828 829 case DATA_TYPE_INT16: 830 NVP(elem, int16, int16_t, int, "%d"); 831 break; 832 833 case DATA_TYPE_UINT16: 834 NVP(elem, uint16, uint16_t, int, "%u"); 835 break; 836 837 case DATA_TYPE_INT32: 838 NVP(elem, int32, int32_t, long, "%ld"); 839 break; 840 841 case DATA_TYPE_UINT32: 842 NVP(elem, uint32, uint32_t, ulong_t, "%lu"); 843 break; 844 845 case DATA_TYPE_INT64: 846 NVP(elem, int64, int64_t, longlong_t, "%lld"); 847 break; 848 849 case DATA_TYPE_UINT64: 850 NVP(elem, uint64, uint64_t, u_longlong_t, "%llu"); 851 break; 852 853 case DATA_TYPE_STRING: 854 NVP(elem, string, char *, char *, "'%s'"); 855 break; 856 857 case DATA_TYPE_BYTE_ARRAY: 858 NVPA(elem, byte_array, uchar_t, int, "%u"); 859 break; 860 861 case DATA_TYPE_INT8_ARRAY: 862 NVPA(elem, int8_array, int8_t, int, "%d"); 863 break; 864 865 case DATA_TYPE_UINT8_ARRAY: 866 NVPA(elem, uint8_array, uint8_t, int, "%u"); 867 break; 868 869 case DATA_TYPE_INT16_ARRAY: 870 NVPA(elem, int16_array, int16_t, int, "%d"); 871 break; 872 873 case DATA_TYPE_UINT16_ARRAY: 874 NVPA(elem, uint16_array, uint16_t, int, "%u"); 875 break; 876 877 case DATA_TYPE_INT32_ARRAY: 878 NVPA(elem, int32_array, int32_t, long, "%ld"); 879 break; 880 881 case DATA_TYPE_UINT32_ARRAY: 882 NVPA(elem, uint32_array, uint32_t, ulong_t, "%lu"); 883 break; 884 885 case DATA_TYPE_INT64_ARRAY: 886 NVPA(elem, int64_array, int64_t, longlong_t, "%lld"); 887 break; 888 889 case DATA_TYPE_UINT64_ARRAY: 890 NVPA(elem, uint64_array, uint64_t, u_longlong_t, 891 "%llu"); 892 break; 893 894 case DATA_TYPE_STRING_ARRAY: 895 NVPA(elem, string_array, char *, char *, "'%s'"); 896 break; 897 898 case DATA_TYPE_NVLIST: 899 (void) nvpair_value_nvlist(elem, &nvlist_value); 900 (void) printf("%*s%s:\n", indent, "", 901 nvpair_name(elem)); 902 dump_nvlist(nvlist_value, indent + 4); 903 break; 904 905 case DATA_TYPE_NVLIST_ARRAY: 906 (void) nvpair_value_nvlist_array(elem, 907 &nvlist_array_value, &count); 908 for (i = 0; i < count; i++) { 909 (void) printf("%*s%s[%u]:\n", indent, "", 910 nvpair_name(elem), i); 911 dump_nvlist(nvlist_array_value[i], indent + 4); 912 } 913 break; 914 915 default: 916 (void) printf(dgettext(TEXT_DOMAIN, "bad config type " 917 "%d for %s\n"), nvpair_type(elem), 918 nvpair_name(elem)); 919 } 920 } 921 } 922 923 /* 924 * ====================================================================== 925 * | | 926 * | Misc private interface. | 927 * | | 928 * ====================================================================== 929 */ 930 931 /* 932 * Determine if string 'value' matches 'nvp' value. The 'value' string is 933 * converted, depending on the type of 'nvp', prior to match. For numeric 934 * types, a radix independent sscanf conversion of 'value' is used. If 'nvp' 935 * is an array type, 'ai' is the index into the array against which we are 936 * checking for match. If nvp is of DATA_TYPE_STRING*, the caller can pass 937 * in a regex_t compilation of value in 'value_regex' to trigger regular 938 * expression string match instead of simple strcmp(). 939 * 940 * Return 1 on match, 0 on no-match, and -1 on error. If the error is 941 * related to value syntax error and 'ep' is non-NULL, *ep will point into 942 * the 'value' string at the location where the error exists. 943 * 944 * NOTE: It may be possible to move the non-regex_t version of this into 945 * common code used by library/kernel/boot. 946 */ 947 int 948 nvpair_value_match_regex(nvpair_t *nvp, int ai, 949 char *value, regex_t *value_regex, char **ep) 950 { 951 char *evalue; 952 uint_t a_len; 953 int sr; 954 955 if (ep) 956 *ep = NULL; 957 958 if ((nvp == NULL) || (value == NULL)) 959 return (-1); /* error fail match - invalid args */ 960 961 /* make sure array and index combination make sense */ 962 if ((nvpair_type_is_array(nvp) && (ai < 0)) || 963 (!nvpair_type_is_array(nvp) && (ai >= 0))) 964 return (-1); /* error fail match - bad index */ 965 966 /* non-string values should be single 'chunk' */ 967 if ((nvpair_type(nvp) != DATA_TYPE_STRING) && 968 (nvpair_type(nvp) != DATA_TYPE_STRING_ARRAY)) { 969 value += strspn(value, " \t"); 970 evalue = value + strcspn(value, " \t"); 971 if (*evalue) { 972 if (ep) 973 *ep = evalue; 974 return (-1); /* error fail match - syntax */ 975 } 976 } 977 978 sr = EOF; 979 switch (nvpair_type(nvp)) { 980 case DATA_TYPE_STRING: { 981 char *val; 982 983 /* check string value for match */ 984 if (nvpair_value_string(nvp, &val) == 0) { 985 if (value_regex) { 986 if (regexec(value_regex, val, 987 (size_t)0, NULL, 0) == 0) 988 return (1); /* match */ 989 } else { 990 if (strcmp(value, val) == 0) 991 return (1); /* match */ 992 } 993 } 994 break; 995 } 996 case DATA_TYPE_STRING_ARRAY: { 997 char **val_array; 998 999 /* check indexed string value of array for match */ 1000 if ((nvpair_value_string_array(nvp, &val_array, &a_len) == 0) && 1001 (ai < a_len)) { 1002 if (value_regex) { 1003 if (regexec(value_regex, val_array[ai], 1004 (size_t)0, NULL, 0) == 0) 1005 return (1); 1006 } else { 1007 if (strcmp(value, val_array[ai]) == 0) 1008 return (1); 1009 } 1010 } 1011 break; 1012 } 1013 case DATA_TYPE_BYTE: { 1014 uchar_t val, val_arg; 1015 1016 /* scanf uchar_t from value and check for match */ 1017 sr = sscanf(value, "%c", &val_arg); 1018 if ((sr == 1) && (nvpair_value_byte(nvp, &val) == 0) && 1019 (val == val_arg)) 1020 return (1); 1021 break; 1022 } 1023 case DATA_TYPE_BYTE_ARRAY: { 1024 uchar_t *val_array, val_arg; 1025 1026 1027 /* check indexed value of array for match */ 1028 sr = sscanf(value, "%c", &val_arg); 1029 if ((sr == 1) && 1030 (nvpair_value_byte_array(nvp, &val_array, &a_len) == 0) && 1031 (ai < a_len) && 1032 (val_array[ai] == val_arg)) 1033 return (1); 1034 break; 1035 } 1036 case DATA_TYPE_INT8: { 1037 int8_t val, val_arg; 1038 1039 /* scanf int8_t from value and check for match */ 1040 sr = sscanf(value, "%"SCNi8, &val_arg); 1041 if ((sr == 1) && 1042 (nvpair_value_int8(nvp, &val) == 0) && 1043 (val == val_arg)) 1044 return (1); 1045 break; 1046 } 1047 case DATA_TYPE_INT8_ARRAY: { 1048 int8_t *val_array, val_arg; 1049 1050 /* check indexed value of array for match */ 1051 sr = sscanf(value, "%"SCNi8, &val_arg); 1052 if ((sr == 1) && 1053 (nvpair_value_int8_array(nvp, &val_array, &a_len) == 0) && 1054 (ai < a_len) && 1055 (val_array[ai] == val_arg)) 1056 return (1); 1057 break; 1058 } 1059 case DATA_TYPE_UINT8: { 1060 uint8_t val, val_arg; 1061 1062 /* scanf uint8_t from value and check for match */ 1063 sr = sscanf(value, "%"SCNi8, (int8_t *)&val_arg); 1064 if ((sr == 1) && 1065 (nvpair_value_uint8(nvp, &val) == 0) && 1066 (val == val_arg)) 1067 return (1); 1068 break; 1069 } 1070 case DATA_TYPE_UINT8_ARRAY: { 1071 uint8_t *val_array, val_arg; 1072 1073 /* check indexed value of array for match */ 1074 sr = sscanf(value, "%"SCNi8, (int8_t *)&val_arg); 1075 if ((sr == 1) && 1076 (nvpair_value_uint8_array(nvp, &val_array, &a_len) == 0) && 1077 (ai < a_len) && 1078 (val_array[ai] == val_arg)) 1079 return (1); 1080 break; 1081 } 1082 case DATA_TYPE_INT16: { 1083 int16_t val, val_arg; 1084 1085 /* scanf int16_t from value and check for match */ 1086 sr = sscanf(value, "%"SCNi16, &val_arg); 1087 if ((sr == 1) && 1088 (nvpair_value_int16(nvp, &val) == 0) && 1089 (val == val_arg)) 1090 return (1); 1091 break; 1092 } 1093 case DATA_TYPE_INT16_ARRAY: { 1094 int16_t *val_array, val_arg; 1095 1096 /* check indexed value of array for match */ 1097 sr = sscanf(value, "%"SCNi16, &val_arg); 1098 if ((sr == 1) && 1099 (nvpair_value_int16_array(nvp, &val_array, &a_len) == 0) && 1100 (ai < a_len) && 1101 (val_array[ai] == val_arg)) 1102 return (1); 1103 break; 1104 } 1105 case DATA_TYPE_UINT16: { 1106 uint16_t val, val_arg; 1107 1108 /* scanf uint16_t from value and check for match */ 1109 sr = sscanf(value, "%"SCNi16, (int16_t *)&val_arg); 1110 if ((sr == 1) && 1111 (nvpair_value_uint16(nvp, &val) == 0) && 1112 (val == val_arg)) 1113 return (1); 1114 break; 1115 } 1116 case DATA_TYPE_UINT16_ARRAY: { 1117 uint16_t *val_array, val_arg; 1118 1119 /* check indexed value of array for match */ 1120 sr = sscanf(value, "%"SCNi16, (int16_t *)&val_arg); 1121 if ((sr == 1) && 1122 (nvpair_value_uint16_array(nvp, &val_array, &a_len) == 0) && 1123 (ai < a_len) && 1124 (val_array[ai] == val_arg)) 1125 return (1); 1126 break; 1127 } 1128 case DATA_TYPE_INT32: { 1129 int32_t val, val_arg; 1130 1131 /* scanf int32_t from value and check for match */ 1132 sr = sscanf(value, "%"SCNi32, &val_arg); 1133 if ((sr == 1) && 1134 (nvpair_value_int32(nvp, &val) == 0) && 1135 (val == val_arg)) 1136 return (1); 1137 break; 1138 } 1139 case DATA_TYPE_INT32_ARRAY: { 1140 int32_t *val_array, val_arg; 1141 1142 /* check indexed value of array for match */ 1143 sr = sscanf(value, "%"SCNi32, &val_arg); 1144 if ((sr == 1) && 1145 (nvpair_value_int32_array(nvp, &val_array, &a_len) == 0) && 1146 (ai < a_len) && 1147 (val_array[ai] == val_arg)) 1148 return (1); 1149 break; 1150 } 1151 case DATA_TYPE_UINT32: { 1152 uint32_t val, val_arg; 1153 1154 /* scanf uint32_t from value and check for match */ 1155 sr = sscanf(value, "%"SCNi32, (int32_t *)&val_arg); 1156 if ((sr == 1) && 1157 (nvpair_value_uint32(nvp, &val) == 0) && 1158 (val == val_arg)) 1159 return (1); 1160 break; 1161 } 1162 case DATA_TYPE_UINT32_ARRAY: { 1163 uint32_t *val_array, val_arg; 1164 1165 /* check indexed value of array for match */ 1166 sr = sscanf(value, "%"SCNi32, (int32_t *)&val_arg); 1167 if ((sr == 1) && 1168 (nvpair_value_uint32_array(nvp, &val_array, &a_len) == 0) && 1169 (ai < a_len) && 1170 (val_array[ai] == val_arg)) 1171 return (1); 1172 break; 1173 } 1174 case DATA_TYPE_INT64: { 1175 int64_t val, val_arg; 1176 1177 /* scanf int64_t from value and check for match */ 1178 sr = sscanf(value, "%"SCNi64, &val_arg); 1179 if ((sr == 1) && 1180 (nvpair_value_int64(nvp, &val) == 0) && 1181 (val == val_arg)) 1182 return (1); 1183 break; 1184 } 1185 case DATA_TYPE_INT64_ARRAY: { 1186 int64_t *val_array, val_arg; 1187 1188 /* check indexed value of array for match */ 1189 sr = sscanf(value, "%"SCNi64, &val_arg); 1190 if ((sr == 1) && 1191 (nvpair_value_int64_array(nvp, &val_array, &a_len) == 0) && 1192 (ai < a_len) && 1193 (val_array[ai] == val_arg)) 1194 return (1); 1195 break; 1196 } 1197 case DATA_TYPE_UINT64: { 1198 uint64_t val_arg, val; 1199 1200 /* scanf uint64_t from value and check for match */ 1201 sr = sscanf(value, "%"SCNi64, (int64_t *)&val_arg); 1202 if ((sr == 1) && 1203 (nvpair_value_uint64(nvp, &val) == 0) && 1204 (val == val_arg)) 1205 return (1); 1206 break; 1207 } 1208 case DATA_TYPE_UINT64_ARRAY: { 1209 uint64_t *val_array, val_arg; 1210 1211 /* check indexed value of array for match */ 1212 sr = sscanf(value, "%"SCNi64, (int64_t *)&val_arg); 1213 if ((sr == 1) && 1214 (nvpair_value_uint64_array(nvp, &val_array, &a_len) == 0) && 1215 (ai < a_len) && 1216 (val_array[ai] == val_arg)) 1217 return (1); 1218 break; 1219 } 1220 case DATA_TYPE_BOOLEAN_VALUE: { 1221 boolean_t val, val_arg; 1222 1223 /* scanf boolean_t from value and check for match */ 1224 sr = sscanf(value, "%"SCNi32, &val_arg); 1225 if ((sr == 1) && 1226 (nvpair_value_boolean_value(nvp, &val) == 0) && 1227 (val == val_arg)) 1228 return (1); 1229 break; 1230 } 1231 case DATA_TYPE_BOOLEAN_ARRAY: { 1232 boolean_t *val_array, val_arg; 1233 1234 /* check indexed value of array for match */ 1235 sr = sscanf(value, "%"SCNi32, &val_arg); 1236 if ((sr == 1) && 1237 (nvpair_value_boolean_array(nvp, 1238 &val_array, &a_len) == 0) && 1239 (ai < a_len) && 1240 (val_array[ai] == val_arg)) 1241 return (1); 1242 break; 1243 } 1244 case DATA_TYPE_HRTIME: 1245 case DATA_TYPE_NVLIST: 1246 case DATA_TYPE_NVLIST_ARRAY: 1247 case DATA_TYPE_BOOLEAN: 1248 case DATA_TYPE_DOUBLE: 1249 case DATA_TYPE_UNKNOWN: 1250 default: 1251 /* 1252 * unknown/unsupported data type 1253 */ 1254 return (-1); /* error fail match */ 1255 } 1256 1257 /* 1258 * check to see if sscanf failed conversion, return approximate 1259 * pointer to problem 1260 */ 1261 if (sr != 1) { 1262 if (ep) 1263 *ep = value; 1264 return (-1); /* error fail match - syntax */ 1265 } 1266 1267 return (0); /* fail match */ 1268 } 1269 1270 int 1271 nvpair_value_match(nvpair_t *nvp, int ai, char *value, char **ep) 1272 { 1273 return (nvpair_value_match_regex(nvp, ai, value, NULL, ep)); 1274 } 1275