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