1 /* 2 * ng_parse.c 3 */ 4 5 /*- 6 * Copyright (c) 1999 Whistle Communications, Inc. 7 * All rights reserved. 8 * 9 * Subject to the following obligations and disclaimer of warranty, use and 10 * redistribution of this software, in source or object code forms, with or 11 * without modifications are expressly permitted by Whistle Communications; 12 * provided, however, that: 13 * 1. Any and all reproductions of the source or object code must include the 14 * copyright notice above and the following disclaimer of warranties; and 15 * 2. No rights are granted, in any manner or form, to use Whistle 16 * Communications, Inc. trademarks, including the mark "WHISTLE 17 * COMMUNICATIONS" on advertising, endorsements, or otherwise except as 18 * such appears in the above copyright notice or in the software. 19 * 20 * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND 21 * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO 22 * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE, 23 * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF 24 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT. 25 * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY 26 * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS 27 * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE. 28 * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES 29 * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING 30 * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 31 * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR 32 * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY 33 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 34 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 35 * THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY 36 * OF SUCH DAMAGE. 37 * 38 * Author: Archie Cobbs <archie@freebsd.org> 39 * 40 * $Whistle: ng_parse.c,v 1.3 1999/11/29 01:43:48 archie Exp $ 41 * $FreeBSD$ 42 */ 43 44 #include <sys/types.h> 45 #include <sys/param.h> 46 #include <sys/systm.h> 47 #include <sys/kernel.h> 48 #include <sys/errno.h> 49 #include <sys/malloc.h> 50 #include <sys/mbuf.h> 51 #include <sys/ctype.h> 52 53 #include <machine/stdarg.h> 54 55 #include <net/ethernet.h> 56 57 #include <netinet/in.h> 58 59 #include <netgraph/ng_message.h> 60 #include <netgraph/netgraph.h> 61 #include <netgraph/ng_parse.h> 62 63 #ifdef NG_SEPARATE_MALLOC 64 MALLOC_DEFINE(M_NETGRAPH_PARSE, "netgraph_parse", "netgraph parse info"); 65 #else 66 #define M_NETGRAPH_PARSE M_NETGRAPH 67 #endif 68 69 /* Compute alignment for primitive integral types */ 70 struct int16_temp { 71 char x; 72 int16_t y; 73 }; 74 75 struct int32_temp { 76 char x; 77 int32_t y; 78 }; 79 80 struct int64_temp { 81 char x; 82 int64_t y; 83 }; 84 85 #define INT8_ALIGNMENT 1 86 #define INT16_ALIGNMENT ((int)&((struct int16_temp *)0)->y) 87 #define INT32_ALIGNMENT ((int)&((struct int32_temp *)0)->y) 88 #define INT64_ALIGNMENT ((int)&((struct int64_temp *)0)->y) 89 90 /* Output format for integral types */ 91 #define INT_UNSIGNED 0 92 #define INT_SIGNED 1 93 #define INT_HEX 2 94 95 /* Type of composite object: struct, array, or fixedarray */ 96 enum comptype { 97 CT_STRUCT, 98 CT_ARRAY, 99 CT_FIXEDARRAY, 100 }; 101 102 /* Composite types helper functions */ 103 static int ng_parse_composite(const struct ng_parse_type *type, 104 const char *s, int *off, const u_char *start, 105 u_char *const buf, int *buflen, enum comptype ctype); 106 static int ng_unparse_composite(const struct ng_parse_type *type, 107 const u_char *data, int *off, char *cbuf, int cbuflen, 108 enum comptype ctype); 109 static int ng_get_composite_elem_default(const struct ng_parse_type *type, 110 int index, const u_char *start, u_char *buf, 111 int *buflen, enum comptype ctype); 112 static int ng_get_composite_len(const struct ng_parse_type *type, 113 const u_char *start, const u_char *buf, 114 enum comptype ctype); 115 static const struct ng_parse_type *ng_get_composite_etype(const struct 116 ng_parse_type *type, int index, enum comptype ctype); 117 static int ng_parse_get_elem_pad(const struct ng_parse_type *type, 118 int index, enum comptype ctype, int posn); 119 120 /* Parsing helper functions */ 121 static int ng_parse_skip_value(const char *s, int off, int *lenp); 122 static int ng_parse_append(char **cbufp, int *cbuflenp, 123 const char *fmt, ...); 124 125 /* Poor man's virtual method calls */ 126 #define METHOD(t,m) (ng_get_ ## m ## _method(t)) 127 #define INVOKE(t,m) (*METHOD(t,m)) 128 129 static ng_parse_t *ng_get_parse_method(const struct ng_parse_type *t); 130 static ng_unparse_t *ng_get_unparse_method(const struct ng_parse_type *t); 131 static ng_getDefault_t *ng_get_getDefault_method(const 132 struct ng_parse_type *t); 133 static ng_getAlign_t *ng_get_getAlign_method(const struct ng_parse_type *t); 134 135 #define ALIGNMENT(t) (METHOD(t, getAlign) == NULL ? \ 136 0 : INVOKE(t, getAlign)(t)) 137 138 /************************************************************************ 139 PUBLIC FUNCTIONS 140 ************************************************************************/ 141 142 /* 143 * Convert an ASCII string to binary according to the supplied type descriptor 144 */ 145 int 146 ng_parse(const struct ng_parse_type *type, 147 const char *string, int *off, u_char *buf, int *buflen) 148 { 149 return INVOKE(type, parse)(type, string, off, buf, buf, buflen); 150 } 151 152 /* 153 * Convert binary to an ASCII string according to the supplied type descriptor 154 */ 155 int 156 ng_unparse(const struct ng_parse_type *type, 157 const u_char *data, char *cbuf, int cbuflen) 158 { 159 int off = 0; 160 161 return INVOKE(type, unparse)(type, data, &off, cbuf, cbuflen); 162 } 163 164 /* 165 * Fill in the default value according to the supplied type descriptor 166 */ 167 int 168 ng_parse_getDefault(const struct ng_parse_type *type, u_char *buf, int *buflen) 169 { 170 ng_getDefault_t *const func = METHOD(type, getDefault); 171 172 if (func == NULL) 173 return (EOPNOTSUPP); 174 return (*func)(type, buf, buf, buflen); 175 } 176 177 178 /************************************************************************ 179 STRUCTURE TYPE 180 ************************************************************************/ 181 182 static int 183 ng_struct_parse(const struct ng_parse_type *type, 184 const char *s, int *off, const u_char *const start, 185 u_char *const buf, int *buflen) 186 { 187 return ng_parse_composite(type, s, off, start, buf, buflen, CT_STRUCT); 188 } 189 190 static int 191 ng_struct_unparse(const struct ng_parse_type *type, 192 const u_char *data, int *off, char *cbuf, int cbuflen) 193 { 194 return ng_unparse_composite(type, data, off, cbuf, cbuflen, CT_STRUCT); 195 } 196 197 static int 198 ng_struct_getDefault(const struct ng_parse_type *type, 199 const u_char *const start, u_char *buf, int *buflen) 200 { 201 int off = 0; 202 203 return ng_parse_composite(type, 204 "{}", &off, start, buf, buflen, CT_STRUCT); 205 } 206 207 static int 208 ng_struct_getAlign(const struct ng_parse_type *type) 209 { 210 const struct ng_parse_struct_field *field; 211 int align = 0; 212 213 for (field = type->info; field->name != NULL; field++) { 214 int falign = ALIGNMENT(field->type); 215 216 if (falign > align) 217 align = falign; 218 } 219 return align; 220 } 221 222 const struct ng_parse_type ng_parse_struct_type = { 223 NULL, 224 NULL, 225 NULL, 226 ng_struct_parse, 227 ng_struct_unparse, 228 ng_struct_getDefault, 229 ng_struct_getAlign 230 }; 231 232 /************************************************************************ 233 FIXED LENGTH ARRAY TYPE 234 ************************************************************************/ 235 236 static int 237 ng_fixedarray_parse(const struct ng_parse_type *type, 238 const char *s, int *off, const u_char *const start, 239 u_char *const buf, int *buflen) 240 { 241 return ng_parse_composite(type, 242 s, off, start, buf, buflen, CT_FIXEDARRAY); 243 } 244 245 static int 246 ng_fixedarray_unparse(const struct ng_parse_type *type, 247 const u_char *data, int *off, char *cbuf, int cbuflen) 248 { 249 return ng_unparse_composite(type, 250 data, off, cbuf, cbuflen, CT_FIXEDARRAY); 251 } 252 253 static int 254 ng_fixedarray_getDefault(const struct ng_parse_type *type, 255 const u_char *const start, u_char *buf, int *buflen) 256 { 257 int off = 0; 258 259 return ng_parse_composite(type, 260 "[]", &off, start, buf, buflen, CT_FIXEDARRAY); 261 } 262 263 static int 264 ng_fixedarray_getAlign(const struct ng_parse_type *type) 265 { 266 const struct ng_parse_fixedarray_info *fi = type->info; 267 268 return ALIGNMENT(fi->elementType); 269 } 270 271 const struct ng_parse_type ng_parse_fixedarray_type = { 272 NULL, 273 NULL, 274 NULL, 275 ng_fixedarray_parse, 276 ng_fixedarray_unparse, 277 ng_fixedarray_getDefault, 278 ng_fixedarray_getAlign 279 }; 280 281 /************************************************************************ 282 VARIABLE LENGTH ARRAY TYPE 283 ************************************************************************/ 284 285 static int 286 ng_array_parse(const struct ng_parse_type *type, 287 const char *s, int *off, const u_char *const start, 288 u_char *const buf, int *buflen) 289 { 290 return ng_parse_composite(type, s, off, start, buf, buflen, CT_ARRAY); 291 } 292 293 static int 294 ng_array_unparse(const struct ng_parse_type *type, 295 const u_char *data, int *off, char *cbuf, int cbuflen) 296 { 297 return ng_unparse_composite(type, data, off, cbuf, cbuflen, CT_ARRAY); 298 } 299 300 static int 301 ng_array_getDefault(const struct ng_parse_type *type, 302 const u_char *const start, u_char *buf, int *buflen) 303 { 304 int off = 0; 305 306 return ng_parse_composite(type, 307 "[]", &off, start, buf, buflen, CT_ARRAY); 308 } 309 310 static int 311 ng_array_getAlign(const struct ng_parse_type *type) 312 { 313 const struct ng_parse_array_info *ai = type->info; 314 315 return ALIGNMENT(ai->elementType); 316 } 317 318 const struct ng_parse_type ng_parse_array_type = { 319 NULL, 320 NULL, 321 NULL, 322 ng_array_parse, 323 ng_array_unparse, 324 ng_array_getDefault, 325 ng_array_getAlign 326 }; 327 328 /************************************************************************ 329 INT8 TYPE 330 ************************************************************************/ 331 332 static int 333 ng_int8_parse(const struct ng_parse_type *type, 334 const char *s, int *off, const u_char *const start, 335 u_char *const buf, int *buflen) 336 { 337 long val; 338 int8_t val8; 339 char *eptr; 340 341 val = strtol(s + *off, &eptr, 0); 342 if (val < (int8_t)0x80 || val > (u_int8_t)0xff || eptr == s + *off) 343 return (EINVAL); 344 *off = eptr - s; 345 val8 = (int8_t)val; 346 bcopy(&val8, buf, sizeof(int8_t)); 347 *buflen = sizeof(int8_t); 348 return (0); 349 } 350 351 static int 352 ng_int8_unparse(const struct ng_parse_type *type, 353 const u_char *data, int *off, char *cbuf, int cbuflen) 354 { 355 const char *fmt; 356 int fval; 357 int error; 358 int8_t val; 359 360 bcopy(data + *off, &val, sizeof(int8_t)); 361 switch ((intptr_t)type->info) { 362 case INT_SIGNED: 363 fmt = "%d"; 364 fval = val; 365 break; 366 case INT_UNSIGNED: 367 fmt = "%u"; 368 fval = (u_int8_t)val; 369 break; 370 case INT_HEX: 371 fmt = "0x%x"; 372 fval = (u_int8_t)val; 373 break; 374 default: 375 panic("%s: unknown type", __func__); 376 #ifdef RESTARTABLE_PANICS 377 return(0); 378 #endif 379 } 380 if ((error = ng_parse_append(&cbuf, &cbuflen, fmt, fval)) != 0) 381 return (error); 382 *off += sizeof(int8_t); 383 return (0); 384 } 385 386 static int 387 ng_int8_getDefault(const struct ng_parse_type *type, 388 const u_char *const start, u_char *buf, int *buflen) 389 { 390 int8_t val; 391 392 if (*buflen < sizeof(int8_t)) 393 return (ERANGE); 394 val = 0; 395 bcopy(&val, buf, sizeof(int8_t)); 396 *buflen = sizeof(int8_t); 397 return (0); 398 } 399 400 static int 401 ng_int8_getAlign(const struct ng_parse_type *type) 402 { 403 return INT8_ALIGNMENT; 404 } 405 406 const struct ng_parse_type ng_parse_int8_type = { 407 NULL, 408 (void *)INT_SIGNED, 409 NULL, 410 ng_int8_parse, 411 ng_int8_unparse, 412 ng_int8_getDefault, 413 ng_int8_getAlign 414 }; 415 416 const struct ng_parse_type ng_parse_uint8_type = { 417 &ng_parse_int8_type, 418 (void *)INT_UNSIGNED 419 }; 420 421 const struct ng_parse_type ng_parse_hint8_type = { 422 &ng_parse_int8_type, 423 (void *)INT_HEX 424 }; 425 426 /************************************************************************ 427 INT16 TYPE 428 ************************************************************************/ 429 430 static int 431 ng_int16_parse(const struct ng_parse_type *type, 432 const char *s, int *off, const u_char *const start, 433 u_char *const buf, int *buflen) 434 { 435 long val; 436 int16_t val16; 437 char *eptr; 438 439 val = strtol(s + *off, &eptr, 0); 440 if (val < (int16_t)0x8000 441 || val > (u_int16_t)0xffff || eptr == s + *off) 442 return (EINVAL); 443 *off = eptr - s; 444 val16 = (int16_t)val; 445 bcopy(&val16, buf, sizeof(int16_t)); 446 *buflen = sizeof(int16_t); 447 return (0); 448 } 449 450 static int 451 ng_int16_unparse(const struct ng_parse_type *type, 452 const u_char *data, int *off, char *cbuf, int cbuflen) 453 { 454 const char *fmt; 455 int fval; 456 int error; 457 int16_t val; 458 459 bcopy(data + *off, &val, sizeof(int16_t)); 460 switch ((intptr_t)type->info) { 461 case INT_SIGNED: 462 fmt = "%d"; 463 fval = val; 464 break; 465 case INT_UNSIGNED: 466 fmt = "%u"; 467 fval = (u_int16_t)val; 468 break; 469 case INT_HEX: 470 fmt = "0x%x"; 471 fval = (u_int16_t)val; 472 break; 473 default: 474 panic("%s: unknown type", __func__); 475 #ifdef RESTARTABLE_PANICS 476 return(0); 477 #endif 478 } 479 if ((error = ng_parse_append(&cbuf, &cbuflen, fmt, fval)) != 0) 480 return (error); 481 *off += sizeof(int16_t); 482 return (0); 483 } 484 485 static int 486 ng_int16_getDefault(const struct ng_parse_type *type, 487 const u_char *const start, u_char *buf, int *buflen) 488 { 489 int16_t val; 490 491 if (*buflen < sizeof(int16_t)) 492 return (ERANGE); 493 val = 0; 494 bcopy(&val, buf, sizeof(int16_t)); 495 *buflen = sizeof(int16_t); 496 return (0); 497 } 498 499 static int 500 ng_int16_getAlign(const struct ng_parse_type *type) 501 { 502 return INT16_ALIGNMENT; 503 } 504 505 const struct ng_parse_type ng_parse_int16_type = { 506 NULL, 507 (void *)INT_SIGNED, 508 NULL, 509 ng_int16_parse, 510 ng_int16_unparse, 511 ng_int16_getDefault, 512 ng_int16_getAlign 513 }; 514 515 const struct ng_parse_type ng_parse_uint16_type = { 516 &ng_parse_int16_type, 517 (void *)INT_UNSIGNED 518 }; 519 520 const struct ng_parse_type ng_parse_hint16_type = { 521 &ng_parse_int16_type, 522 (void *)INT_HEX 523 }; 524 525 /************************************************************************ 526 INT32 TYPE 527 ************************************************************************/ 528 529 static int 530 ng_int32_parse(const struct ng_parse_type *type, 531 const char *s, int *off, const u_char *const start, 532 u_char *const buf, int *buflen) 533 { 534 long val; /* assumes long is at least 32 bits */ 535 int32_t val32; 536 char *eptr; 537 538 if ((intptr_t)type->info == INT_SIGNED) 539 val = strtol(s + *off, &eptr, 0); 540 else 541 val = strtoul(s + *off, &eptr, 0); 542 if (val < (int32_t)0x80000000 543 || val > (u_int32_t)0xffffffff || eptr == s + *off) 544 return (EINVAL); 545 *off = eptr - s; 546 val32 = (int32_t)val; 547 bcopy(&val32, buf, sizeof(int32_t)); 548 *buflen = sizeof(int32_t); 549 return (0); 550 } 551 552 static int 553 ng_int32_unparse(const struct ng_parse_type *type, 554 const u_char *data, int *off, char *cbuf, int cbuflen) 555 { 556 const char *fmt; 557 long fval; 558 int error; 559 int32_t val; 560 561 bcopy(data + *off, &val, sizeof(int32_t)); 562 switch ((intptr_t)type->info) { 563 case INT_SIGNED: 564 fmt = "%ld"; 565 fval = val; 566 break; 567 case INT_UNSIGNED: 568 fmt = "%lu"; 569 fval = (u_int32_t)val; 570 break; 571 case INT_HEX: 572 fmt = "0x%lx"; 573 fval = (u_int32_t)val; 574 break; 575 default: 576 panic("%s: unknown type", __func__); 577 #ifdef RESTARTABLE_PANICS 578 return(0); 579 #endif 580 } 581 if ((error = ng_parse_append(&cbuf, &cbuflen, fmt, fval)) != 0) 582 return (error); 583 *off += sizeof(int32_t); 584 return (0); 585 } 586 587 static int 588 ng_int32_getDefault(const struct ng_parse_type *type, 589 const u_char *const start, u_char *buf, int *buflen) 590 { 591 int32_t val; 592 593 if (*buflen < sizeof(int32_t)) 594 return (ERANGE); 595 val = 0; 596 bcopy(&val, buf, sizeof(int32_t)); 597 *buflen = sizeof(int32_t); 598 return (0); 599 } 600 601 static int 602 ng_int32_getAlign(const struct ng_parse_type *type) 603 { 604 return INT32_ALIGNMENT; 605 } 606 607 const struct ng_parse_type ng_parse_int32_type = { 608 NULL, 609 (void *)INT_SIGNED, 610 NULL, 611 ng_int32_parse, 612 ng_int32_unparse, 613 ng_int32_getDefault, 614 ng_int32_getAlign 615 }; 616 617 const struct ng_parse_type ng_parse_uint32_type = { 618 &ng_parse_int32_type, 619 (void *)INT_UNSIGNED 620 }; 621 622 const struct ng_parse_type ng_parse_hint32_type = { 623 &ng_parse_int32_type, 624 (void *)INT_HEX 625 }; 626 627 /************************************************************************ 628 INT64 TYPE 629 ************************************************************************/ 630 631 static int 632 ng_int64_parse(const struct ng_parse_type *type, 633 const char *s, int *off, const u_char *const start, 634 u_char *const buf, int *buflen) 635 { 636 quad_t val; 637 int64_t val64; 638 char *eptr; 639 640 val = strtoq(s + *off, &eptr, 0); 641 if (eptr == s + *off) 642 return (EINVAL); 643 *off = eptr - s; 644 val64 = (int64_t)val; 645 bcopy(&val64, buf, sizeof(int64_t)); 646 *buflen = sizeof(int64_t); 647 return (0); 648 } 649 650 static int 651 ng_int64_unparse(const struct ng_parse_type *type, 652 const u_char *data, int *off, char *cbuf, int cbuflen) 653 { 654 const char *fmt; 655 long long fval; 656 int64_t val; 657 int error; 658 659 bcopy(data + *off, &val, sizeof(int64_t)); 660 switch ((intptr_t)type->info) { 661 case INT_SIGNED: 662 fmt = "%lld"; 663 fval = val; 664 break; 665 case INT_UNSIGNED: 666 fmt = "%llu"; 667 fval = (u_int64_t)val; 668 break; 669 case INT_HEX: 670 fmt = "0x%llx"; 671 fval = (u_int64_t)val; 672 break; 673 default: 674 panic("%s: unknown type", __func__); 675 #ifdef RESTARTABLE_PANICS 676 return(0); 677 #endif 678 } 679 if ((error = ng_parse_append(&cbuf, &cbuflen, fmt, fval)) != 0) 680 return (error); 681 *off += sizeof(int64_t); 682 return (0); 683 } 684 685 static int 686 ng_int64_getDefault(const struct ng_parse_type *type, 687 const u_char *const start, u_char *buf, int *buflen) 688 { 689 int64_t val; 690 691 if (*buflen < sizeof(int64_t)) 692 return (ERANGE); 693 val = 0; 694 bcopy(&val, buf, sizeof(int64_t)); 695 *buflen = sizeof(int64_t); 696 return (0); 697 } 698 699 static int 700 ng_int64_getAlign(const struct ng_parse_type *type) 701 { 702 return INT64_ALIGNMENT; 703 } 704 705 const struct ng_parse_type ng_parse_int64_type = { 706 NULL, 707 (void *)INT_SIGNED, 708 NULL, 709 ng_int64_parse, 710 ng_int64_unparse, 711 ng_int64_getDefault, 712 ng_int64_getAlign 713 }; 714 715 const struct ng_parse_type ng_parse_uint64_type = { 716 &ng_parse_int64_type, 717 (void *)INT_UNSIGNED 718 }; 719 720 const struct ng_parse_type ng_parse_hint64_type = { 721 &ng_parse_int64_type, 722 (void *)INT_HEX 723 }; 724 725 /************************************************************************ 726 STRING TYPE 727 ************************************************************************/ 728 729 static int 730 ng_string_parse(const struct ng_parse_type *type, 731 const char *s, int *off, const u_char *const start, 732 u_char *const buf, int *buflen) 733 { 734 char *sval; 735 int len; 736 int slen; 737 738 if ((sval = ng_get_string_token(s, off, &len, &slen)) == NULL) 739 return (EINVAL); 740 *off += len; 741 bcopy(sval, buf, slen + 1); 742 FREE(sval, M_NETGRAPH_PARSE); 743 *buflen = slen + 1; 744 return (0); 745 } 746 747 static int 748 ng_string_unparse(const struct ng_parse_type *type, 749 const u_char *data, int *off, char *cbuf, int cbuflen) 750 { 751 const char *const raw = (const char *)data + *off; 752 char *const s = ng_encode_string(raw, strlen(raw)); 753 int error; 754 755 if (s == NULL) 756 return (ENOMEM); 757 if ((error = ng_parse_append(&cbuf, &cbuflen, "%s", s)) != 0) { 758 FREE(s, M_NETGRAPH_PARSE); 759 return (error); 760 } 761 *off += strlen(raw) + 1; 762 FREE(s, M_NETGRAPH_PARSE); 763 return (0); 764 } 765 766 static int 767 ng_string_getDefault(const struct ng_parse_type *type, 768 const u_char *const start, u_char *buf, int *buflen) 769 { 770 771 if (*buflen < 1) 772 return (ERANGE); 773 buf[0] = (u_char)'\0'; 774 *buflen = 1; 775 return (0); 776 } 777 778 const struct ng_parse_type ng_parse_string_type = { 779 NULL, 780 NULL, 781 NULL, 782 ng_string_parse, 783 ng_string_unparse, 784 ng_string_getDefault, 785 NULL 786 }; 787 788 /************************************************************************ 789 FIXED BUFFER STRING TYPE 790 ************************************************************************/ 791 792 static int 793 ng_fixedstring_parse(const struct ng_parse_type *type, 794 const char *s, int *off, const u_char *const start, 795 u_char *const buf, int *buflen) 796 { 797 const struct ng_parse_fixedstring_info *const fi = type->info; 798 char *sval; 799 int len; 800 int slen; 801 802 if ((sval = ng_get_string_token(s, off, &len, &slen)) == NULL) 803 return (EINVAL); 804 if (slen + 1 > fi->bufSize) 805 return (E2BIG); 806 *off += len; 807 bcopy(sval, buf, slen); 808 FREE(sval, M_NETGRAPH_PARSE); 809 bzero(buf + slen, fi->bufSize - slen); 810 *buflen = fi->bufSize; 811 return (0); 812 } 813 814 static int 815 ng_fixedstring_unparse(const struct ng_parse_type *type, 816 const u_char *data, int *off, char *cbuf, int cbuflen) 817 { 818 const struct ng_parse_fixedstring_info *const fi = type->info; 819 int error, temp = *off; 820 821 if ((error = ng_string_unparse(type, data, &temp, cbuf, cbuflen)) != 0) 822 return (error); 823 *off += fi->bufSize; 824 return (0); 825 } 826 827 static int 828 ng_fixedstring_getDefault(const struct ng_parse_type *type, 829 const u_char *const start, u_char *buf, int *buflen) 830 { 831 const struct ng_parse_fixedstring_info *const fi = type->info; 832 833 if (*buflen < fi->bufSize) 834 return (ERANGE); 835 bzero(buf, fi->bufSize); 836 *buflen = fi->bufSize; 837 return (0); 838 } 839 840 const struct ng_parse_type ng_parse_fixedstring_type = { 841 NULL, 842 NULL, 843 NULL, 844 ng_fixedstring_parse, 845 ng_fixedstring_unparse, 846 ng_fixedstring_getDefault, 847 NULL 848 }; 849 850 const struct ng_parse_fixedstring_info ng_parse_nodebuf_info = { 851 NG_NODESIZ 852 }; 853 const struct ng_parse_type ng_parse_nodebuf_type = { 854 &ng_parse_fixedstring_type, 855 &ng_parse_nodebuf_info 856 }; 857 858 const struct ng_parse_fixedstring_info ng_parse_hookbuf_info = { 859 NG_HOOKSIZ 860 }; 861 const struct ng_parse_type ng_parse_hookbuf_type = { 862 &ng_parse_fixedstring_type, 863 &ng_parse_hookbuf_info 864 }; 865 866 const struct ng_parse_fixedstring_info ng_parse_pathbuf_info = { 867 NG_PATHSIZ 868 }; 869 const struct ng_parse_type ng_parse_pathbuf_type = { 870 &ng_parse_fixedstring_type, 871 &ng_parse_pathbuf_info 872 }; 873 874 const struct ng_parse_fixedstring_info ng_parse_typebuf_info = { 875 NG_TYPESIZ 876 }; 877 const struct ng_parse_type ng_parse_typebuf_type = { 878 &ng_parse_fixedstring_type, 879 &ng_parse_typebuf_info 880 }; 881 882 const struct ng_parse_fixedstring_info ng_parse_cmdbuf_info = { 883 NG_CMDSTRSIZ 884 }; 885 const struct ng_parse_type ng_parse_cmdbuf_type = { 886 &ng_parse_fixedstring_type, 887 &ng_parse_cmdbuf_info 888 }; 889 890 /************************************************************************ 891 EXPLICITLY SIZED STRING TYPE 892 ************************************************************************/ 893 894 static int 895 ng_sizedstring_parse(const struct ng_parse_type *type, 896 const char *s, int *off, const u_char *const start, 897 u_char *const buf, int *buflen) 898 { 899 char *sval; 900 int len; 901 int slen; 902 903 if ((sval = ng_get_string_token(s, off, &len, &slen)) == NULL) 904 return (EINVAL); 905 if (slen > 0xffff) 906 return (EINVAL); 907 *off += len; 908 *((u_int16_t *)buf) = (u_int16_t)slen; 909 bcopy(sval, buf + 2, slen); 910 FREE(sval, M_NETGRAPH_PARSE); 911 *buflen = 2 + slen; 912 return (0); 913 } 914 915 static int 916 ng_sizedstring_unparse(const struct ng_parse_type *type, 917 const u_char *data, int *off, char *cbuf, int cbuflen) 918 { 919 const char *const raw = (const char *)data + *off + 2; 920 const int slen = *((const u_int16_t *)(data + *off)); 921 char *const s = ng_encode_string(raw, slen); 922 int error; 923 924 if (s == NULL) 925 return (ENOMEM); 926 if ((error = ng_parse_append(&cbuf, &cbuflen, "%s", s)) != 0) { 927 FREE(s, M_NETGRAPH_PARSE); 928 return (error); 929 } 930 FREE(s, M_NETGRAPH_PARSE); 931 *off += slen + 2; 932 return (0); 933 } 934 935 static int 936 ng_sizedstring_getDefault(const struct ng_parse_type *type, 937 const u_char *const start, u_char *buf, int *buflen) 938 { 939 if (*buflen < 2) 940 return (ERANGE); 941 bzero(buf, 2); 942 *buflen = 2; 943 return (0); 944 } 945 946 const struct ng_parse_type ng_parse_sizedstring_type = { 947 NULL, 948 NULL, 949 NULL, 950 ng_sizedstring_parse, 951 ng_sizedstring_unparse, 952 ng_sizedstring_getDefault, 953 NULL 954 }; 955 956 /************************************************************************ 957 IP ADDRESS TYPE 958 ************************************************************************/ 959 960 static int 961 ng_ipaddr_parse(const struct ng_parse_type *type, 962 const char *s, int *off, const u_char *const start, 963 u_char *const buf, int *buflen) 964 { 965 int i, error; 966 967 for (i = 0; i < 4; i++) { 968 if ((error = ng_int8_parse(&ng_parse_int8_type, 969 s, off, start, buf + i, buflen)) != 0) 970 return (error); 971 if (i < 3 && s[*off] != '.') 972 return (EINVAL); 973 (*off)++; 974 } 975 *buflen = 4; 976 return (0); 977 } 978 979 static int 980 ng_ipaddr_unparse(const struct ng_parse_type *type, 981 const u_char *data, int *off, char *cbuf, int cbuflen) 982 { 983 struct in_addr ip; 984 int error; 985 986 bcopy(data + *off, &ip, sizeof(ip)); 987 if ((error = ng_parse_append(&cbuf, &cbuflen, "%d.%d.%d.%d", 988 ((u_char *)&ip)[0], ((u_char *)&ip)[1], 989 ((u_char *)&ip)[2], ((u_char *)&ip)[3])) != 0) 990 return (error); 991 *off += sizeof(ip); 992 return (0); 993 } 994 995 static int 996 ng_ipaddr_getDefault(const struct ng_parse_type *type, 997 const u_char *const start, u_char *buf, int *buflen) 998 { 999 struct in_addr ip = { 0 }; 1000 1001 if (*buflen < sizeof(ip)) 1002 return (ERANGE); 1003 bcopy(&ip, buf, sizeof(ip)); 1004 *buflen = sizeof(ip); 1005 return (0); 1006 } 1007 1008 const struct ng_parse_type ng_parse_ipaddr_type = { 1009 NULL, 1010 NULL, 1011 NULL, 1012 ng_ipaddr_parse, 1013 ng_ipaddr_unparse, 1014 ng_ipaddr_getDefault, 1015 ng_int32_getAlign 1016 }; 1017 1018 /************************************************************************ 1019 ETHERNET ADDRESS TYPE 1020 ************************************************************************/ 1021 1022 static int 1023 ng_enaddr_parse(const struct ng_parse_type *type, 1024 const char *s, int *const off, const u_char *const start, 1025 u_char *const buf, int *const buflen) 1026 { 1027 char *eptr; 1028 u_long val; 1029 int i; 1030 1031 if (*buflen < ETHER_ADDR_LEN) 1032 return (ERANGE); 1033 for (i = 0; i < ETHER_ADDR_LEN; i++) { 1034 val = strtoul(s + *off, &eptr, 16); 1035 if (val > 0xff || eptr == s + *off) 1036 return (EINVAL); 1037 buf[i] = (u_char)val; 1038 *off = (eptr - s); 1039 if (i < ETHER_ADDR_LEN - 1) { 1040 if (*eptr != ':') 1041 return (EINVAL); 1042 (*off)++; 1043 } 1044 } 1045 *buflen = ETHER_ADDR_LEN; 1046 return (0); 1047 } 1048 1049 static int 1050 ng_enaddr_unparse(const struct ng_parse_type *type, 1051 const u_char *data, int *off, char *cbuf, int cbuflen) 1052 { 1053 int len; 1054 1055 len = snprintf(cbuf, cbuflen, "%02x:%02x:%02x:%02x:%02x:%02x", 1056 data[*off], data[*off + 1], data[*off + 2], 1057 data[*off + 3], data[*off + 4], data[*off + 5]); 1058 if (len >= cbuflen) 1059 return (ERANGE); 1060 *off += ETHER_ADDR_LEN; 1061 return (0); 1062 } 1063 1064 const struct ng_parse_type ng_parse_enaddr_type = { 1065 NULL, 1066 NULL, 1067 NULL, 1068 ng_enaddr_parse, 1069 ng_enaddr_unparse, 1070 NULL, 1071 0 1072 }; 1073 1074 /************************************************************************ 1075 BYTE ARRAY TYPE 1076 ************************************************************************/ 1077 1078 /* Get the length of a byte array */ 1079 static int 1080 ng_parse_bytearray_subtype_getLength(const struct ng_parse_type *type, 1081 const u_char *start, const u_char *buf) 1082 { 1083 ng_parse_array_getLength_t *const getLength = type->private; 1084 1085 return (*getLength)(type, start, buf); 1086 } 1087 1088 /* Byte array element type is hex int8 */ 1089 static const struct ng_parse_array_info ng_parse_bytearray_subtype_info = { 1090 &ng_parse_hint8_type, 1091 &ng_parse_bytearray_subtype_getLength, 1092 NULL 1093 }; 1094 static const struct ng_parse_type ng_parse_bytearray_subtype = { 1095 &ng_parse_array_type, 1096 &ng_parse_bytearray_subtype_info 1097 }; 1098 1099 static int 1100 ng_bytearray_parse(const struct ng_parse_type *type, 1101 const char *s, int *off, const u_char *const start, 1102 u_char *const buf, int *buflen) 1103 { 1104 char *str; 1105 int toklen; 1106 int slen; 1107 1108 /* We accept either an array of bytes or a string constant */ 1109 if ((str = ng_get_string_token(s, off, &toklen, &slen)) != NULL) { 1110 ng_parse_array_getLength_t *const getLength = type->info; 1111 int arraylen; 1112 1113 arraylen = (*getLength)(type, start, buf); 1114 if (arraylen > *buflen) { 1115 FREE(str, M_NETGRAPH_PARSE); 1116 return (ERANGE); 1117 } 1118 if (slen > arraylen) { 1119 FREE(str, M_NETGRAPH_PARSE); 1120 return (E2BIG); 1121 } 1122 bcopy(str, buf, slen); 1123 bzero(buf + slen, arraylen - slen); 1124 FREE(str, M_NETGRAPH_PARSE); 1125 *off += toklen; 1126 *buflen = arraylen; 1127 return (0); 1128 } else { 1129 struct ng_parse_type subtype; 1130 1131 subtype = ng_parse_bytearray_subtype; 1132 *(const void **)&subtype.private = type->info; 1133 return ng_array_parse(&subtype, s, off, start, buf, buflen); 1134 } 1135 } 1136 1137 static int 1138 ng_bytearray_unparse(const struct ng_parse_type *type, 1139 const u_char *data, int *off, char *cbuf, int cbuflen) 1140 { 1141 struct ng_parse_type subtype; 1142 1143 subtype = ng_parse_bytearray_subtype; 1144 *(const void **)&subtype.private = type->info; 1145 return ng_array_unparse(&subtype, data, off, cbuf, cbuflen); 1146 } 1147 1148 static int 1149 ng_bytearray_getDefault(const struct ng_parse_type *type, 1150 const u_char *const start, u_char *buf, int *buflen) 1151 { 1152 struct ng_parse_type subtype; 1153 1154 subtype = ng_parse_bytearray_subtype; 1155 *(const void **)&subtype.private = type->info; 1156 return ng_array_getDefault(&subtype, start, buf, buflen); 1157 } 1158 1159 const struct ng_parse_type ng_parse_bytearray_type = { 1160 NULL, 1161 NULL, 1162 NULL, 1163 ng_bytearray_parse, 1164 ng_bytearray_unparse, 1165 ng_bytearray_getDefault, 1166 NULL 1167 }; 1168 1169 /************************************************************************ 1170 STRUCT NG_MESG TYPE 1171 ************************************************************************/ 1172 1173 /* Get msg->header.arglen when "buf" is pointing to msg->data */ 1174 static int 1175 ng_parse_ng_mesg_getLength(const struct ng_parse_type *type, 1176 const u_char *start, const u_char *buf) 1177 { 1178 const struct ng_mesg *msg; 1179 1180 msg = (const struct ng_mesg *)(buf - sizeof(*msg)); 1181 return msg->header.arglen; 1182 } 1183 1184 /* Type for the variable length data portion of a struct ng_mesg */ 1185 static const struct ng_parse_type ng_msg_data_type = { 1186 &ng_parse_bytearray_type, 1187 &ng_parse_ng_mesg_getLength 1188 }; 1189 1190 /* Type for the entire struct ng_mesg header with data section */ 1191 static const struct ng_parse_struct_field ng_parse_ng_mesg_type_fields[] 1192 = NG_GENERIC_NG_MESG_INFO(&ng_msg_data_type); 1193 const struct ng_parse_type ng_parse_ng_mesg_type = { 1194 &ng_parse_struct_type, 1195 &ng_parse_ng_mesg_type_fields, 1196 }; 1197 1198 /************************************************************************ 1199 COMPOSITE HELPER ROUTINES 1200 ************************************************************************/ 1201 1202 /* 1203 * Convert a structure or array from ASCII to binary 1204 */ 1205 static int 1206 ng_parse_composite(const struct ng_parse_type *type, const char *s, 1207 int *off, const u_char *const start, u_char *const buf, int *buflen, 1208 const enum comptype ctype) 1209 { 1210 const int num = ng_get_composite_len(type, start, buf, ctype); 1211 int nextIndex = 0; /* next implicit array index */ 1212 u_int index; /* field or element index */ 1213 int *foff; /* field value offsets in string */ 1214 int align, len, blen, error = 0; 1215 1216 /* Initialize */ 1217 MALLOC(foff, int *, num * sizeof(*foff), M_NETGRAPH_PARSE, M_NOWAIT | M_ZERO); 1218 if (foff == NULL) { 1219 error = ENOMEM; 1220 goto done; 1221 } 1222 1223 /* Get opening brace/bracket */ 1224 if (ng_parse_get_token(s, off, &len) 1225 != (ctype == CT_STRUCT ? T_LBRACE : T_LBRACKET)) { 1226 error = EINVAL; 1227 goto done; 1228 } 1229 *off += len; 1230 1231 /* Get individual element value positions in the string */ 1232 for (;;) { 1233 enum ng_parse_token tok; 1234 1235 /* Check for closing brace/bracket */ 1236 tok = ng_parse_get_token(s, off, &len); 1237 if (tok == (ctype == CT_STRUCT ? T_RBRACE : T_RBRACKET)) { 1238 *off += len; 1239 break; 1240 } 1241 1242 /* For arrays, the 'name' (ie, index) is optional, so 1243 distinguish name from values by seeing if the next 1244 token is an equals sign */ 1245 if (ctype != CT_STRUCT) { 1246 int len2, off2; 1247 char *eptr; 1248 1249 /* If an opening brace/bracket, index is implied */ 1250 if (tok == T_LBRACE || tok == T_LBRACKET) { 1251 index = nextIndex++; 1252 goto gotIndex; 1253 } 1254 1255 /* Might be an index, might be a value, either way... */ 1256 if (tok != T_WORD) { 1257 error = EINVAL; 1258 goto done; 1259 } 1260 1261 /* If no equals sign follows, index is implied */ 1262 off2 = *off + len; 1263 if (ng_parse_get_token(s, &off2, &len2) != T_EQUALS) { 1264 index = nextIndex++; 1265 goto gotIndex; 1266 } 1267 1268 /* Index was specified explicitly; parse it */ 1269 index = (u_int)strtoul(s + *off, &eptr, 0); 1270 if (index < 0 || eptr - (s + *off) != len) { 1271 error = EINVAL; 1272 goto done; 1273 } 1274 nextIndex = index + 1; 1275 *off += len + len2; 1276 } else { /* a structure field */ 1277 const struct ng_parse_struct_field *const 1278 fields = type->info; 1279 1280 /* Find the field by name (required) in field list */ 1281 if (tok != T_WORD) { 1282 error = EINVAL; 1283 goto done; 1284 } 1285 for (index = 0; index < num; index++) { 1286 const struct ng_parse_struct_field *const 1287 field = &fields[index]; 1288 1289 if (strncmp(&s[*off], field->name, len) == 0 1290 && field->name[len] == '\0') 1291 break; 1292 } 1293 if (index == num) { 1294 error = ENOENT; 1295 goto done; 1296 } 1297 *off += len; 1298 1299 /* Get equals sign */ 1300 if (ng_parse_get_token(s, off, &len) != T_EQUALS) { 1301 error = EINVAL; 1302 goto done; 1303 } 1304 *off += len; 1305 } 1306 gotIndex: 1307 1308 /* Check array index */ 1309 if (index >= num) { 1310 error = E2BIG; 1311 goto done; 1312 } 1313 1314 /* Save value's position and skip over it for now */ 1315 if (foff[index] != 0) { 1316 error = EALREADY; /* duplicate */ 1317 goto done; 1318 } 1319 while (isspace(s[*off])) 1320 (*off)++; 1321 foff[index] = *off; 1322 if ((error = ng_parse_skip_value(s, *off, &len)) != 0) 1323 goto done; 1324 *off += len; 1325 } 1326 1327 /* Now build binary structure from supplied values and defaults */ 1328 for (blen = index = 0; index < num; index++) { 1329 const struct ng_parse_type *const 1330 etype = ng_get_composite_etype(type, index, ctype); 1331 int k, pad, vlen; 1332 1333 /* Zero-pad any alignment bytes */ 1334 pad = ng_parse_get_elem_pad(type, index, ctype, blen); 1335 for (k = 0; k < pad; k++) { 1336 if (blen >= *buflen) { 1337 error = ERANGE; 1338 goto done; 1339 } 1340 buf[blen++] = 0; 1341 } 1342 1343 /* Get value */ 1344 vlen = *buflen - blen; 1345 if (foff[index] == 0) { /* use default value */ 1346 error = ng_get_composite_elem_default(type, index, 1347 start, buf + blen, &vlen, ctype); 1348 } else { /* parse given value */ 1349 *off = foff[index]; 1350 error = INVOKE(etype, parse)(etype, 1351 s, off, start, buf + blen, &vlen); 1352 } 1353 if (error != 0) 1354 goto done; 1355 blen += vlen; 1356 } 1357 1358 /* Make total composite structure size a multiple of its alignment */ 1359 if ((align = ALIGNMENT(type)) != 0) { 1360 while (blen % align != 0) { 1361 if (blen >= *buflen) { 1362 error = ERANGE; 1363 goto done; 1364 } 1365 buf[blen++] = 0; 1366 } 1367 } 1368 1369 /* Done */ 1370 *buflen = blen; 1371 done: 1372 if (foff != NULL) 1373 FREE(foff, M_NETGRAPH_PARSE); 1374 return (error); 1375 } 1376 1377 /* 1378 * Convert an array or structure from binary to ASCII 1379 */ 1380 static int 1381 ng_unparse_composite(const struct ng_parse_type *type, const u_char *data, 1382 int *off, char *cbuf, int cbuflen, const enum comptype ctype) 1383 { 1384 const struct ng_mesg *const hdr 1385 = (const struct ng_mesg *)(data - sizeof(*hdr)); 1386 const int num = ng_get_composite_len(type, data, data + *off, ctype); 1387 const int workSize = 20 * 1024; /* XXX hard coded constant */ 1388 int nextIndex = 0, didOne = 0; 1389 int error, index; 1390 u_char *workBuf; 1391 1392 /* Get workspace for checking default values */ 1393 MALLOC(workBuf, u_char *, workSize, M_NETGRAPH_PARSE, M_NOWAIT); 1394 if (workBuf == NULL) 1395 return (ENOMEM); 1396 1397 /* Opening brace/bracket */ 1398 if ((error = ng_parse_append(&cbuf, &cbuflen, "%c", 1399 (ctype == CT_STRUCT) ? '{' : '[')) != 0) 1400 goto fail; 1401 1402 /* Do each item */ 1403 for (index = 0; index < num; index++) { 1404 const struct ng_parse_type *const 1405 etype = ng_get_composite_etype(type, index, ctype); 1406 1407 /* Skip any alignment pad bytes */ 1408 *off += ng_parse_get_elem_pad(type, index, ctype, *off); 1409 1410 /* 1411 * See if element is equal to its default value; skip if so. 1412 * Copy struct ng_mesg header for types that peek into it. 1413 */ 1414 if (sizeof(*hdr) + *off < workSize) { 1415 int tempsize = workSize - sizeof(*hdr) - *off; 1416 1417 bcopy(hdr, workBuf, sizeof(*hdr) + *off); 1418 if (ng_get_composite_elem_default(type, index, workBuf 1419 + sizeof(*hdr), workBuf + sizeof(*hdr) + *off, 1420 &tempsize, ctype) == 0 1421 && bcmp(workBuf + sizeof(*hdr) + *off, 1422 data + *off, tempsize) == 0) { 1423 *off += tempsize; 1424 continue; 1425 } 1426 } 1427 1428 /* Print name= */ 1429 if ((error = ng_parse_append(&cbuf, &cbuflen, " ")) != 0) 1430 goto fail; 1431 if (ctype != CT_STRUCT) { 1432 if (index != nextIndex) { 1433 nextIndex = index; 1434 if ((error = ng_parse_append(&cbuf, 1435 &cbuflen, "%d=", index)) != 0) 1436 goto fail; 1437 } 1438 nextIndex++; 1439 } else { 1440 const struct ng_parse_struct_field *const 1441 fields = type->info; 1442 1443 if ((error = ng_parse_append(&cbuf, 1444 &cbuflen, "%s=", fields[index].name)) != 0) 1445 goto fail; 1446 } 1447 1448 /* Print value */ 1449 if ((error = INVOKE(etype, unparse) 1450 (etype, data, off, cbuf, cbuflen)) != 0) { 1451 FREE(workBuf, M_NETGRAPH_PARSE); 1452 return (error); 1453 } 1454 cbuflen -= strlen(cbuf); 1455 cbuf += strlen(cbuf); 1456 didOne = 1; 1457 } 1458 FREE(workBuf, M_NETGRAPH_PARSE); 1459 1460 /* Closing brace/bracket */ 1461 if ((error = ng_parse_append(&cbuf, &cbuflen, "%s%c", 1462 didOne ? " " : "", (ctype == CT_STRUCT) ? '}' : ']')) != 0) 1463 goto fail; 1464 return (0); 1465 1466 fail: 1467 /* Clean up after failure */ 1468 FREE(workBuf, M_NETGRAPH_PARSE); 1469 return (error); 1470 } 1471 1472 /* 1473 * Generate the default value for an element of an array or structure 1474 * Returns EOPNOTSUPP if default value is unspecified. 1475 */ 1476 static int 1477 ng_get_composite_elem_default(const struct ng_parse_type *type, 1478 int index, const u_char *const start, u_char *buf, int *buflen, 1479 const enum comptype ctype) 1480 { 1481 const struct ng_parse_type *etype; 1482 ng_getDefault_t *func; 1483 1484 switch (ctype) { 1485 case CT_STRUCT: 1486 break; 1487 case CT_ARRAY: 1488 { 1489 const struct ng_parse_array_info *const ai = type->info; 1490 1491 if (ai->getDefault != NULL) { 1492 return (*ai->getDefault)(type, 1493 index, start, buf, buflen); 1494 } 1495 break; 1496 } 1497 case CT_FIXEDARRAY: 1498 { 1499 const struct ng_parse_fixedarray_info *const fi = type->info; 1500 1501 if (*fi->getDefault != NULL) { 1502 return (*fi->getDefault)(type, 1503 index, start, buf, buflen); 1504 } 1505 break; 1506 } 1507 default: 1508 panic("%s", __func__); 1509 } 1510 1511 /* Default to element type default */ 1512 etype = ng_get_composite_etype(type, index, ctype); 1513 func = METHOD(etype, getDefault); 1514 if (func == NULL) 1515 return (EOPNOTSUPP); 1516 return (*func)(etype, start, buf, buflen); 1517 } 1518 1519 /* 1520 * Get the number of elements in a struct, variable or fixed array. 1521 */ 1522 static int 1523 ng_get_composite_len(const struct ng_parse_type *type, 1524 const u_char *const start, const u_char *buf, 1525 const enum comptype ctype) 1526 { 1527 switch (ctype) { 1528 case CT_STRUCT: 1529 { 1530 const struct ng_parse_struct_field *const fields = type->info; 1531 int numFields = 0; 1532 1533 for (numFields = 0; ; numFields++) { 1534 const struct ng_parse_struct_field *const 1535 fi = &fields[numFields]; 1536 1537 if (fi->name == NULL) 1538 break; 1539 } 1540 return (numFields); 1541 } 1542 case CT_ARRAY: 1543 { 1544 const struct ng_parse_array_info *const ai = type->info; 1545 1546 return (*ai->getLength)(type, start, buf); 1547 } 1548 case CT_FIXEDARRAY: 1549 { 1550 const struct ng_parse_fixedarray_info *const fi = type->info; 1551 1552 return fi->length; 1553 } 1554 default: 1555 panic("%s", __func__); 1556 } 1557 return (0); 1558 } 1559 1560 /* 1561 * Return the type of the index'th element of a composite structure 1562 */ 1563 static const struct ng_parse_type * 1564 ng_get_composite_etype(const struct ng_parse_type *type, 1565 int index, const enum comptype ctype) 1566 { 1567 const struct ng_parse_type *etype = NULL; 1568 1569 switch (ctype) { 1570 case CT_STRUCT: 1571 { 1572 const struct ng_parse_struct_field *const fields = type->info; 1573 1574 etype = fields[index].type; 1575 break; 1576 } 1577 case CT_ARRAY: 1578 { 1579 const struct ng_parse_array_info *const ai = type->info; 1580 1581 etype = ai->elementType; 1582 break; 1583 } 1584 case CT_FIXEDARRAY: 1585 { 1586 const struct ng_parse_fixedarray_info *const fi = type->info; 1587 1588 etype = fi->elementType; 1589 break; 1590 } 1591 default: 1592 panic("%s", __func__); 1593 } 1594 return (etype); 1595 } 1596 1597 /* 1598 * Get the number of bytes to skip to align for the next 1599 * element in a composite structure. 1600 */ 1601 static int 1602 ng_parse_get_elem_pad(const struct ng_parse_type *type, 1603 int index, enum comptype ctype, int posn) 1604 { 1605 const struct ng_parse_type *const 1606 etype = ng_get_composite_etype(type, index, ctype); 1607 int align; 1608 1609 /* Get element's alignment, and possibly override */ 1610 align = ALIGNMENT(etype); 1611 if (ctype == CT_STRUCT) { 1612 const struct ng_parse_struct_field *const fields = type->info; 1613 1614 if (fields[index].alignment != 0) 1615 align = fields[index].alignment; 1616 } 1617 1618 /* Return number of bytes to skip to align */ 1619 return (align ? (align - (posn % align)) % align : 0); 1620 } 1621 1622 /************************************************************************ 1623 PARSING HELPER ROUTINES 1624 ************************************************************************/ 1625 1626 /* 1627 * Append to a fixed length string buffer. 1628 */ 1629 static int 1630 ng_parse_append(char **cbufp, int *cbuflenp, const char *fmt, ...) 1631 { 1632 va_list args; 1633 int len; 1634 1635 va_start(args, fmt); 1636 len = vsnprintf(*cbufp, *cbuflenp, fmt, args); 1637 va_end(args); 1638 if (len >= *cbuflenp) 1639 return ERANGE; 1640 *cbufp += len; 1641 *cbuflenp -= len; 1642 1643 return (0); 1644 } 1645 1646 /* 1647 * Skip over a value 1648 */ 1649 static int 1650 ng_parse_skip_value(const char *s, int off0, int *lenp) 1651 { 1652 int len, nbracket, nbrace; 1653 int off = off0; 1654 1655 len = nbracket = nbrace = 0; 1656 do { 1657 switch (ng_parse_get_token(s, &off, &len)) { 1658 case T_LBRACKET: 1659 nbracket++; 1660 break; 1661 case T_LBRACE: 1662 nbrace++; 1663 break; 1664 case T_RBRACKET: 1665 if (nbracket-- == 0) 1666 return (EINVAL); 1667 break; 1668 case T_RBRACE: 1669 if (nbrace-- == 0) 1670 return (EINVAL); 1671 break; 1672 case T_EOF: 1673 return (EINVAL); 1674 default: 1675 break; 1676 } 1677 off += len; 1678 } while (nbracket > 0 || nbrace > 0); 1679 *lenp = off - off0; 1680 return (0); 1681 } 1682 1683 /* 1684 * Find the next token in the string, starting at offset *startp. 1685 * Returns the token type, with *startp pointing to the first char 1686 * and *lenp the length. 1687 */ 1688 enum ng_parse_token 1689 ng_parse_get_token(const char *s, int *startp, int *lenp) 1690 { 1691 char *t; 1692 int i; 1693 1694 while (isspace(s[*startp])) 1695 (*startp)++; 1696 switch (s[*startp]) { 1697 case '\0': 1698 *lenp = 0; 1699 return T_EOF; 1700 case '{': 1701 *lenp = 1; 1702 return T_LBRACE; 1703 case '}': 1704 *lenp = 1; 1705 return T_RBRACE; 1706 case '[': 1707 *lenp = 1; 1708 return T_LBRACKET; 1709 case ']': 1710 *lenp = 1; 1711 return T_RBRACKET; 1712 case '=': 1713 *lenp = 1; 1714 return T_EQUALS; 1715 case '"': 1716 if ((t = ng_get_string_token(s, startp, lenp, NULL)) == NULL) 1717 return T_ERROR; 1718 FREE(t, M_NETGRAPH_PARSE); 1719 return T_STRING; 1720 default: 1721 for (i = *startp + 1; s[i] != '\0' && !isspace(s[i]) 1722 && s[i] != '{' && s[i] != '}' && s[i] != '[' 1723 && s[i] != ']' && s[i] != '=' && s[i] != '"'; i++) 1724 ; 1725 *lenp = i - *startp; 1726 return T_WORD; 1727 } 1728 } 1729 1730 /* 1731 * Get a string token, which must be enclosed in double quotes. 1732 * The normal C backslash escapes are recognized. 1733 */ 1734 char * 1735 ng_get_string_token(const char *s, int *startp, int *lenp, int *slenp) 1736 { 1737 char *cbuf, *p; 1738 int start, off; 1739 int slen; 1740 1741 while (isspace(s[*startp])) 1742 (*startp)++; 1743 start = *startp; 1744 if (s[*startp] != '"') 1745 return (NULL); 1746 MALLOC(cbuf, char *, strlen(s + start), M_NETGRAPH_PARSE, M_NOWAIT); 1747 if (cbuf == NULL) 1748 return (NULL); 1749 strcpy(cbuf, s + start + 1); 1750 for (slen = 0, off = 1, p = cbuf; *p != '\0'; slen++, off++, p++) { 1751 if (*p == '"') { 1752 *p = '\0'; 1753 *lenp = off + 1; 1754 if (slenp != NULL) 1755 *slenp = slen; 1756 return (cbuf); 1757 } else if (p[0] == '\\' && p[1] != '\0') { 1758 int x, k; 1759 char *v; 1760 1761 strcpy(p, p + 1); 1762 v = p; 1763 switch (*p) { 1764 case 't': 1765 *v = '\t'; 1766 off++; 1767 continue; 1768 case 'n': 1769 *v = '\n'; 1770 off++; 1771 continue; 1772 case 'r': 1773 *v = '\r'; 1774 off++; 1775 continue; 1776 case 'v': 1777 *v = '\v'; 1778 off++; 1779 continue; 1780 case 'f': 1781 *v = '\f'; 1782 off++; 1783 continue; 1784 case '"': 1785 *v = '"'; 1786 off++; 1787 continue; 1788 case '0': case '1': case '2': case '3': 1789 case '4': case '5': case '6': case '7': 1790 for (x = k = 0; 1791 k < 3 && *v >= '0' && *v <= '7'; v++) { 1792 x = (x << 3) + (*v - '0'); 1793 off++; 1794 } 1795 *--v = (char)x; 1796 break; 1797 case 'x': 1798 for (v++, x = k = 0; 1799 k < 2 && isxdigit(*v); v++) { 1800 x = (x << 4) + (isdigit(*v) ? 1801 (*v - '0') : 1802 (tolower(*v) - 'a' + 10)); 1803 off++; 1804 } 1805 *--v = (char)x; 1806 break; 1807 default: 1808 continue; 1809 } 1810 strcpy(p, v); 1811 } 1812 } 1813 FREE(cbuf, M_NETGRAPH_PARSE); 1814 return (NULL); /* no closing quote */ 1815 } 1816 1817 /* 1818 * Encode a string so it can be safely put in double quotes. 1819 * Caller must free the result. Exactly "slen" characters 1820 * are encoded. 1821 */ 1822 char * 1823 ng_encode_string(const char *raw, int slen) 1824 { 1825 char *cbuf; 1826 int off = 0; 1827 int i; 1828 1829 MALLOC(cbuf, char *, strlen(raw) * 4 + 3, M_NETGRAPH_PARSE, M_NOWAIT); 1830 if (cbuf == NULL) 1831 return (NULL); 1832 cbuf[off++] = '"'; 1833 for (i = 0; i < slen; i++, raw++) { 1834 switch (*raw) { 1835 case '\t': 1836 cbuf[off++] = '\\'; 1837 cbuf[off++] = 't'; 1838 break; 1839 case '\f': 1840 cbuf[off++] = '\\'; 1841 cbuf[off++] = 'f'; 1842 break; 1843 case '\n': 1844 cbuf[off++] = '\\'; 1845 cbuf[off++] = 'n'; 1846 break; 1847 case '\r': 1848 cbuf[off++] = '\\'; 1849 cbuf[off++] = 'r'; 1850 break; 1851 case '\v': 1852 cbuf[off++] = '\\'; 1853 cbuf[off++] = 'v'; 1854 break; 1855 case '"': 1856 case '\\': 1857 cbuf[off++] = '\\'; 1858 cbuf[off++] = *raw; 1859 break; 1860 default: 1861 if (*raw < 0x20 || *raw > 0x7e) { 1862 off += sprintf(cbuf + off, 1863 "\\x%02x", (u_char)*raw); 1864 break; 1865 } 1866 cbuf[off++] = *raw; 1867 break; 1868 } 1869 } 1870 cbuf[off++] = '"'; 1871 cbuf[off] = '\0'; 1872 return (cbuf); 1873 } 1874 1875 /************************************************************************ 1876 VIRTUAL METHOD LOOKUP 1877 ************************************************************************/ 1878 1879 static ng_parse_t * 1880 ng_get_parse_method(const struct ng_parse_type *t) 1881 { 1882 while (t != NULL && t->parse == NULL) 1883 t = t->supertype; 1884 return (t ? t->parse : NULL); 1885 } 1886 1887 static ng_unparse_t * 1888 ng_get_unparse_method(const struct ng_parse_type *t) 1889 { 1890 while (t != NULL && t->unparse == NULL) 1891 t = t->supertype; 1892 return (t ? t->unparse : NULL); 1893 } 1894 1895 static ng_getDefault_t * 1896 ng_get_getDefault_method(const struct ng_parse_type *t) 1897 { 1898 while (t != NULL && t->getDefault == NULL) 1899 t = t->supertype; 1900 return (t ? t->getDefault : NULL); 1901 } 1902 1903 static ng_getAlign_t * 1904 ng_get_getAlign_method(const struct ng_parse_type *t) 1905 { 1906 while (t != NULL && t->getAlign == NULL) 1907 t = t->supertype; 1908 return (t ? t->getAlign : NULL); 1909 } 1910 1911