xref: /freebsd/sys/netgraph/ng_parse.c (revision d1ba25f456132eabc6f1244e4bbbf3d19e8f3a31)
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@freebsd.org>
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 	if (foff != NULL)
1218 		FREE(foff, M_NETGRAPH);
1219 	return (error);
1220 }
1221 
1222 /*
1223  * Convert an array or structure from binary to ASCII
1224  */
1225 static int
1226 ng_unparse_composite(const struct ng_parse_type *type, const u_char *data,
1227 	int *off, char *cbuf, int cbuflen, const enum comptype ctype)
1228 {
1229 	const int num = ng_get_composite_len(type, data, data + *off, ctype);
1230 	const int workSize = 20 * 1024;		/* XXX hard coded constant */
1231 	int nextIndex = 0, didOne = 0;
1232 	int error, index;
1233 	u_char *workBuf;
1234 
1235 	/* Get workspace for checking default values */
1236 	MALLOC(workBuf, u_char *, workSize, M_NETGRAPH, M_NOWAIT);
1237 	if (workBuf == NULL)
1238 		return (ENOMEM);
1239 
1240 	/* Opening brace/bracket */
1241 	NG_PARSE_APPEND("%c", (ctype == CT_STRUCT) ? '{' : '[');
1242 
1243 	/* Do each item */
1244 	for (index = 0; index < num; index++) {
1245 		const struct ng_parse_type *const
1246 		    etype = ng_get_composite_etype(type, index, ctype);
1247 
1248 		/* Skip any alignment pad bytes */
1249 		*off += ng_parse_get_elem_pad(type, index, ctype, *off);
1250 
1251 		/* See if element is equal to its default value; skip if so */
1252 		if (*off < workSize) {
1253 			int tempsize = workSize - *off;
1254 
1255 			bcopy(data, workBuf, *off);
1256 			if (ng_get_composite_elem_default(type, index, workBuf,
1257 			      workBuf + *off, &tempsize, ctype) == 0
1258 			    && bcmp(workBuf + *off,
1259 			      data + *off, tempsize) == 0) {
1260 				*off += tempsize;
1261 				continue;
1262 			}
1263 		}
1264 
1265 		/* Print name= */
1266 		NG_PARSE_APPEND(" ");
1267 		if (ctype != CT_STRUCT) {
1268 			if (index != nextIndex) {
1269 				nextIndex = index;
1270 				NG_PARSE_APPEND("%d=", index);
1271 			}
1272 			nextIndex++;
1273 		} else {
1274 			const struct ng_parse_struct_info *si = type->info;
1275 
1276 			NG_PARSE_APPEND("%s=", si->fields[index].name);
1277 		}
1278 
1279 		/* Print value */
1280 		if ((error = INVOKE(etype, unparse)
1281 		    (etype, data, off, cbuf, cbuflen)) != 0) {
1282 			FREE(workBuf, M_NETGRAPH);
1283 			return (error);
1284 		}
1285 		cbuflen -= strlen(cbuf);
1286 		cbuf += strlen(cbuf);
1287 		didOne = 1;
1288 	}
1289 	FREE(workBuf, M_NETGRAPH);
1290 
1291 	/* Closing brace/bracket */
1292 	NG_PARSE_APPEND("%s%c",
1293 	    didOne ? " " : "", (ctype == CT_STRUCT) ? '}' : ']');
1294 	return (0);
1295 }
1296 
1297 /*
1298  * Generate the default value for an element of an array or structure
1299  * Returns EOPNOTSUPP if default value is unspecified.
1300  */
1301 static int
1302 ng_get_composite_elem_default(const struct ng_parse_type *type,
1303 	int index, const u_char *const start, u_char *buf, int *buflen,
1304 	const enum comptype ctype)
1305 {
1306 	const struct ng_parse_type *etype;
1307 	ng_getDefault_t *func;
1308 
1309 	switch (ctype) {
1310 	case CT_STRUCT:
1311 		break;
1312 	case CT_ARRAY:
1313 	    {
1314 		const struct ng_parse_array_info *const ai = type->info;
1315 
1316 		if (ai->getDefault != NULL) {
1317 			return (*ai->getDefault)(type,
1318 			    index, start, buf, buflen);
1319 		}
1320 		break;
1321 	    }
1322 	case CT_FIXEDARRAY:
1323 	    {
1324 		const struct ng_parse_fixedarray_info *const fi = type->info;
1325 
1326 		if (*fi->getDefault != NULL) {
1327 			return (*fi->getDefault)(type,
1328 			    index, start, buf, buflen);
1329 		}
1330 		break;
1331 	    }
1332 	default:
1333 	    panic("%s", __FUNCTION__);
1334 	}
1335 
1336 	/* Default to element type default */
1337 	etype = ng_get_composite_etype(type, index, ctype);
1338 	func = METHOD(etype, getDefault);
1339 	if (func == NULL)
1340 		return (EOPNOTSUPP);
1341 	return (*func)(etype, start, buf, buflen);
1342 }
1343 
1344 /*
1345  * Get the number of elements in a struct, variable or fixed array.
1346  */
1347 static int
1348 ng_get_composite_len(const struct ng_parse_type *type,
1349 	const u_char *const start, const u_char *buf,
1350 	const enum comptype ctype)
1351 {
1352 	switch (ctype) {
1353 	case CT_STRUCT:
1354 	    {
1355 		const struct ng_parse_struct_info *const si = type->info;
1356 		int numFields = 0;
1357 
1358 		for (numFields = 0; ; numFields++) {
1359 			const struct ng_parse_struct_field *const
1360 				fi = &si->fields[numFields];
1361 
1362 			if (fi->name == NULL)
1363 				break;
1364 		}
1365 		return (numFields);
1366 	    }
1367 	case CT_ARRAY:
1368 	    {
1369 		const struct ng_parse_array_info *const ai = type->info;
1370 
1371 		return (*ai->getLength)(type, start, buf);
1372 	    }
1373 	case CT_FIXEDARRAY:
1374 	    {
1375 		const struct ng_parse_fixedarray_info *const fi = type->info;
1376 
1377 		return fi->length;
1378 	    }
1379 	default:
1380 	    panic("%s", __FUNCTION__);
1381 	}
1382 	return (0);
1383 }
1384 
1385 /*
1386  * Return the type of the index'th element of a composite structure
1387  */
1388 static const struct ng_parse_type *
1389 ng_get_composite_etype(const struct ng_parse_type *type,
1390 	int index, const enum comptype ctype)
1391 {
1392 	const struct ng_parse_type *etype = NULL;
1393 
1394 	switch (ctype) {
1395 	case CT_STRUCT:
1396 	    {
1397 		const struct ng_parse_struct_info *const si = type->info;
1398 
1399 		etype = si->fields[index].type;
1400 		break;
1401 	    }
1402 	case CT_ARRAY:
1403 	    {
1404 		const struct ng_parse_array_info *const ai = type->info;
1405 
1406 		etype = ai->elementType;
1407 		break;
1408 	    }
1409 	case CT_FIXEDARRAY:
1410 	    {
1411 		const struct ng_parse_fixedarray_info *const fi = type->info;
1412 
1413 		etype = fi->elementType;
1414 		break;
1415 	    }
1416 	default:
1417 	    panic("%s", __FUNCTION__);
1418 	}
1419 	return (etype);
1420 }
1421 
1422 /*
1423  * Get the number of bytes to skip to align for the next
1424  * element in a composite structure.
1425  */
1426 static int
1427 ng_parse_get_elem_pad(const struct ng_parse_type *type,
1428 	int index, enum comptype ctype, int posn)
1429 {
1430 	const struct ng_parse_type *const
1431 	    etype = ng_get_composite_etype(type, index, ctype);
1432 	int align;
1433 
1434 	/* Get element's alignment, and possibly override */
1435 	align = ALIGNMENT(etype);
1436 	if (ctype == CT_STRUCT) {
1437 		const struct ng_parse_struct_info *si = type->info;
1438 
1439 		if (si->fields[index].alignment != 0)
1440 			align = si->fields[index].alignment;
1441 	}
1442 
1443 	/* Return number of bytes to skip to align */
1444 	return (align ? (align - (posn % align)) % align : 0);
1445 }
1446 
1447 /************************************************************************
1448 			PARSING HELPER ROUTINES
1449  ************************************************************************/
1450 
1451 /*
1452  * Skip over a value
1453  */
1454 static int
1455 ng_parse_skip_value(const char *s, int off0, int *lenp)
1456 {
1457 	int len, nbracket, nbrace;
1458 	int off = off0;
1459 
1460 	len = nbracket = nbrace = 0;
1461 	do {
1462 		switch (ng_parse_get_token(s, &off, &len)) {
1463 		case T_LBRACKET:
1464 			nbracket++;
1465 			break;
1466 		case T_LBRACE:
1467 			nbrace++;
1468 			break;
1469 		case T_RBRACKET:
1470 			if (nbracket-- == 0)
1471 				return (EINVAL);
1472 			break;
1473 		case T_RBRACE:
1474 			if (nbrace-- == 0)
1475 				return (EINVAL);
1476 			break;
1477 		case T_EOF:
1478 			return (EINVAL);
1479 		default:
1480 			break;
1481 		}
1482 		off += len;
1483 	} while (nbracket > 0 || nbrace > 0);
1484 	*lenp = off - off0;
1485 	return (0);
1486 }
1487 
1488 /*
1489  * Find the next token in the string, starting at offset *startp.
1490  * Returns the token type, with *startp pointing to the first char
1491  * and *lenp the length.
1492  */
1493 enum ng_parse_token
1494 ng_parse_get_token(const char *s, int *startp, int *lenp)
1495 {
1496 	char *t;
1497 	int i;
1498 
1499 	while (isspace(s[*startp]))
1500 		(*startp)++;
1501 	switch (s[*startp]) {
1502 	case '\0':
1503 		*lenp = 0;
1504 		return T_EOF;
1505 	case '{':
1506 		*lenp = 1;
1507 		return T_LBRACE;
1508 	case '}':
1509 		*lenp = 1;
1510 		return T_RBRACE;
1511 	case '[':
1512 		*lenp = 1;
1513 		return T_LBRACKET;
1514 	case ']':
1515 		*lenp = 1;
1516 		return T_RBRACKET;
1517 	case '=':
1518 		*lenp = 1;
1519 		return T_EQUALS;
1520 	case '"':
1521 		if ((t = ng_get_string_token(s, startp, lenp)) == NULL)
1522 			return T_ERROR;
1523 		FREE(t, M_NETGRAPH);
1524 		return T_STRING;
1525 	default:
1526 		for (i = *startp + 1; s[i] != '\0' && !isspace(s[i])
1527 		    && s[i] != '{' && s[i] != '}' && s[i] != '['
1528 		    && s[i] != ']' && s[i] != '=' && s[i] != '"'; i++)
1529 			;
1530 		*lenp = i - *startp;
1531 		return T_WORD;
1532 	}
1533 }
1534 
1535 /*
1536  * Get a string token, which must be enclosed in double quotes.
1537  * The normal C backslash escapes are recognized.
1538  */
1539 char *
1540 ng_get_string_token(const char *s, int *startp, int *lenp)
1541 {
1542 	char *cbuf, *p;
1543 	int start, off;
1544 
1545 	while (isspace(s[*startp]))
1546 		(*startp)++;
1547 	start = *startp;
1548 	if (s[*startp] != '"')
1549 		return (NULL);
1550 	MALLOC(cbuf, char *, strlen(s + start), M_NETGRAPH, M_NOWAIT);
1551 	if (cbuf == NULL)
1552 		return (NULL);
1553 	strcpy(cbuf, s + start + 1);
1554 	for (off = 1, p = cbuf; *p != '\0'; off++, p++) {
1555 		if (*p == '"') {
1556 			*p = '\0';
1557 			*lenp = off + 1;
1558 			return (cbuf);
1559 		} else if (p[0] == '\\' && p[1] != '\0') {
1560 			int x, k;
1561 			char *v;
1562 
1563 			strcpy(p, p + 1);
1564 			v = p;
1565 			switch (*p) {
1566 			case 't':
1567 				*v = '\t';
1568 				off++;
1569 				continue;
1570 			case 'n':
1571 				*v = '\n';
1572 				off++;
1573 				continue;
1574 			case 'r':
1575 				*v = '\r';
1576 				off++;
1577 				continue;
1578 			case 'v':
1579 				*v =  '\v';
1580 				off++;
1581 				continue;
1582 			case 'f':
1583 				*v =  '\f';
1584 				off++;
1585 				continue;
1586 			case '"':
1587 				*v =  '"';
1588 				off++;
1589 				continue;
1590 			case '0': case '1': case '2': case '3':
1591 			case '4': case '5': case '6': case '7':
1592 				for (x = k = 0;
1593 				    k < 3 && *v >= '0' && *v <= '7'; v++) {
1594 					x = (x << 3) + (*v - '0');
1595 					off++;
1596 				}
1597 				*--v = (char)x;
1598 				break;
1599 			case 'x':
1600 				for (v++, x = k = 0;
1601 				    k < 2 && isxdigit(*v); v++) {
1602 					x = (x << 4) + (isdigit(*v) ?
1603 					      (*v - '0') :
1604 					      (tolower(*v) - 'a' + 10));
1605 					off++;
1606 				}
1607 				*--v = (char)x;
1608 				break;
1609 			default:
1610 				continue;
1611 			}
1612 			strcpy(p, v);
1613 		}
1614 	}
1615 	return (NULL);		/* no closing quote */
1616 }
1617 
1618 /*
1619  * Encode a string so it can be safely put in double quotes.
1620  * Caller must free the result.
1621  */
1622 char *
1623 ng_encode_string(const char *raw)
1624 {
1625 	char *cbuf;
1626 	int off = 0;
1627 
1628 	MALLOC(cbuf, char *, strlen(raw) * 4 + 3, M_NETGRAPH, M_NOWAIT);
1629 	if (cbuf == NULL)
1630 		return (NULL);
1631 	cbuf[off++] = '"';
1632 	for ( ; *raw != '\0'; raw++) {
1633 		switch (*raw) {
1634 		case '\t':
1635 			cbuf[off++] = '\\';
1636 			cbuf[off++] = 't';
1637 			break;
1638 		case '\f':
1639 			cbuf[off++] = '\\';
1640 			cbuf[off++] = 'f';
1641 			break;
1642 		case '\n':
1643 			cbuf[off++] = '\\';
1644 			cbuf[off++] = 'n';
1645 			break;
1646 		case '\r':
1647 			cbuf[off++] = '\\';
1648 			cbuf[off++] = 'r';
1649 			break;
1650 		case '\v':
1651 			cbuf[off++] = '\\';
1652 			cbuf[off++] = 'v';
1653 			break;
1654 		case '"':
1655 		case '\\':
1656 			cbuf[off++] = '\\';
1657 			cbuf[off++] = *raw;
1658 			break;
1659 		default:
1660 			if (*raw < 0x20 || *raw > 0x7e) {
1661 				off += sprintf(cbuf + off,
1662 				    "\\x%02x", (u_char)*raw);
1663 				break;
1664 			}
1665 			cbuf[off++] = *raw;
1666 			break;
1667 		}
1668 	}
1669 	cbuf[off++] = '"';
1670 	cbuf[off] = '\0';
1671 	return (cbuf);
1672 }
1673 
1674 /************************************************************************
1675 			VIRTUAL METHOD LOOKUP
1676  ************************************************************************/
1677 
1678 static ng_parse_t *
1679 ng_get_parse_method(const struct ng_parse_type *t)
1680 {
1681 	while (t != NULL && t->parse == NULL)
1682 		t = t->supertype;
1683 	return (t ? t->parse : NULL);
1684 }
1685 
1686 static ng_unparse_t *
1687 ng_get_unparse_method(const struct ng_parse_type *t)
1688 {
1689 	while (t != NULL && t->unparse == NULL)
1690 		t = t->supertype;
1691 	return (t ? t->unparse : NULL);
1692 }
1693 
1694 static ng_getDefault_t *
1695 ng_get_getDefault_method(const struct ng_parse_type *t)
1696 {
1697 	while (t != NULL && t->getDefault == NULL)
1698 		t = t->supertype;
1699 	return (t ? t->getDefault : NULL);
1700 }
1701 
1702 static ng_getAlign_t *
1703 ng_get_getAlign_method(const struct ng_parse_type *t)
1704 {
1705 	while (t != NULL && t->getAlign == NULL)
1706 		t = t->supertype;
1707 	return (t ? t->getAlign : NULL);
1708 }
1709 
1710