xref: /dragonfly/contrib/tcpdump/print-decnet.c (revision ed775ee7)
1 /*
2  * Copyright (c) 1992, 1993, 1994, 1995, 1996, 1997
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that: (1) source code distributions
7  * retain the above copyright notice and this paragraph in its entirety, (2)
8  * distributions including binary code include the above copyright notice and
9  * this paragraph in its entirety in the documentation or other materials
10  * provided with the distribution, and (3) all advertising materials mentioning
11  * features or use of this software display the following acknowledgement:
12  * ``This product includes software developed by the University of California,
13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14  * the University nor the names of its contributors may be used to endorse
15  * or promote products derived from this software without specific prior
16  * written permission.
17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20  */
21 
22 /* \summary: DECnet printer */
23 
24 #ifdef HAVE_CONFIG_H
25 #include <config.h>
26 #endif
27 
28 #include "netdissect-stdinc.h"
29 
30 #include <stdio.h>
31 #include <stdlib.h>
32 
33 #define ND_LONGJMP_FROM_TCHECK
34 #include "netdissect.h"
35 #include "extract.h"
36 #include "addrtoname.h"
37 
38 
39 #ifndef _WIN32
40 typedef nd_uint8_t byte;		/* single byte field */
41 #else
42 /*
43  * the keyword 'byte' generates conflicts in Windows
44  */
45 typedef nd_uint8_t Byte;		/* single byte field */
46 #define byte Byte
47 #endif /* _WIN32 */
48 typedef nd_uint16_t word;		/* 2 byte field */
49 typedef nd_uint32_t longword;		/* 4 bytes field */
50 
51 /*
52  * Definitions for DECNET Phase IV protocol headers
53  */
54 typedef union {
55 	nd_mac_addr dne_addr;	/* full Ethernet address */
56 	struct {
57 		nd_byte dne_hiord[4];	/* DECnet HIORD prefix */
58 		nd_byte dne_nodeaddr[2]; /* DECnet node address */
59 	} dne_remote;
60 } etheraddr;	/* Ethernet address */
61 
62 #define HIORD 0x000400aa		/* high 32-bits of address (swapped) */
63 
64 #define AREAMASK	0176000		/* mask for area field */
65 #define	AREASHIFT	10		/* bit-offset for area field */
66 #define NODEMASK	01777		/* mask for node address field */
67 
68 /*
69  * Define long and short header formats.
70  */
71 struct shorthdr
72   {
73     byte	sh_flags;		/* route flags */
74     word	sh_dst;			/* destination node address */
75     word	sh_src;			/* source node address */
76     byte	sh_visits;		/* visit count */
77   };
78 
79 struct longhdr
80   {
81     byte	lg_flags;		/* route flags */
82     byte	lg_darea;		/* destination area (reserved) */
83     byte	lg_dsarea;		/* destination subarea (reserved) */
84     etheraddr	lg_dst;			/* destination id */
85     byte	lg_sarea;		/* source area (reserved) */
86     byte	lg_ssarea;		/* source subarea (reserved) */
87     etheraddr	lg_src;			/* source id */
88     byte	lg_nextl2;		/* next level 2 router (reserved) */
89     byte	lg_visits;		/* visit count */
90     byte	lg_service;		/* service class (reserved) */
91     byte	lg_pt;			/* protocol type (reserved) */
92   };
93 
94 union routehdr
95   {
96     struct shorthdr rh_short;		/* short route header */
97     struct longhdr rh_long;		/* long route header */
98   };
99 
100 /*
101  * Define the values of various fields in the protocol messages.
102  *
103  * 1. Data packet formats.
104  */
105 #define RMF_MASK	7		/* mask for message type */
106 #define RMF_SHORT	2		/* short message format */
107 #define RMF_LONG	6		/* long message format */
108 #ifndef RMF_RQR
109 #define RMF_RQR		010		/* request return to sender */
110 #define RMF_RTS		020		/* returning to sender */
111 #define RMF_IE		040		/* intra-ethernet packet */
112 #endif /* RMR_RQR */
113 #define RMF_FVER	0100		/* future version flag */
114 #define RMF_PAD		0200		/* pad field */
115 #define RMF_PADMASK	0177		/* pad field mask */
116 
117 #define VIS_MASK	077		/* visit field mask */
118 
119 /*
120  * 2. Control packet formats.
121  */
122 #define RMF_CTLMASK	017		/* mask for message type */
123 #define RMF_CTLMSG	01		/* control message indicator */
124 #define RMF_INIT	01		/* initialization message */
125 #define RMF_VER		03		/* verification message */
126 #define RMF_TEST	05		/* hello and test message */
127 #define RMF_L1ROUT	07		/* level 1 routing message */
128 #define RMF_L2ROUT	011		/* level 2 routing message */
129 #define RMF_RHELLO	013		/* router hello message */
130 #define RMF_EHELLO	015		/* endnode hello message */
131 
132 #define TI_L2ROUT	01		/* level 2 router */
133 #define TI_L1ROUT	02		/* level 1 router */
134 #define TI_ENDNODE	03		/* endnode */
135 #define TI_VERIF	04		/* verification required */
136 #define TI_BLOCK	010		/* blocking requested */
137 
138 #define VE_VERS		2		/* version number (2) */
139 #define VE_ECO		0		/* ECO number */
140 #define VE_UECO		0		/* user ECO number (0) */
141 
142 #define P3_VERS		1		/* phase III version number (1) */
143 #define P3_ECO		3		/* ECO number (3) */
144 #define P3_UECO		0		/* user ECO number (0) */
145 
146 #define II_L2ROUT	01		/* level 2 router */
147 #define II_L1ROUT	02		/* level 1 router */
148 #define II_ENDNODE	03		/* endnode */
149 #define II_VERIF	04		/* verification required */
150 #define II_NOMCAST	040		/* no multicast traffic accepted */
151 #define II_BLOCK	0100		/* blocking requested */
152 #define II_TYPEMASK	03		/* mask for node type */
153 
154 #define TESTDATA	0252		/* test data bytes */
155 #define TESTLEN		1		/* length of transmitted test data */
156 
157 /*
158  * Define control message formats.
159  */
160 struct initmsg				/* initialization message */
161   {
162     byte	in_flags;		/* route flags */
163     word	in_src;			/* source node address */
164     byte	in_info;		/* routing layer information */
165     word	in_blksize;		/* maximum data link block size */
166     byte	in_vers;		/* version number */
167     byte	in_eco;			/* ECO number */
168     byte	in_ueco;		/* user ECO number */
169     word	in_hello;		/* hello timer */
170     byte	in_rsvd;		/* reserved image field */
171   };
172 
173 struct verifmsg				/* verification message */
174   {
175     byte	ve_flags;		/* route flags */
176     word	ve_src;			/* source node address */
177     byte	ve_fcnval;		/* function value image field */
178   };
179 
180 struct testmsg				/* hello and test message */
181   {
182     byte	te_flags;		/* route flags */
183     word	te_src;			/* source node address */
184     byte	te_data;		/* test data image field */
185   };
186 
187 struct l1rout				/* level 1 routing message */
188   {
189     byte	r1_flags;		/* route flags */
190     word	r1_src;			/* source node address */
191     byte	r1_rsvd;		/* reserved field */
192   };
193 
194 struct l2rout				/* level 2 routing message */
195   {
196     byte	r2_flags;		/* route flags */
197     word	r2_src;			/* source node address */
198     byte	r2_rsvd;		/* reserved field */
199   };
200 
201 struct rhellomsg			/* router hello message */
202   {
203     byte	rh_flags;		/* route flags */
204     byte	rh_vers;		/* version number */
205     byte	rh_eco;			/* ECO number */
206     byte	rh_ueco;		/* user ECO number */
207     etheraddr	rh_src;			/* source id */
208     byte	rh_info;		/* routing layer information */
209     word	rh_blksize;		/* maximum data link block size */
210     byte	rh_priority;		/* router's priority */
211     byte	rh_area;		/* reserved */
212     word	rh_hello;		/* hello timer */
213     byte	rh_mpd;			/* reserved */
214   };
215 
216 struct ehellomsg			/* endnode hello message */
217   {
218     byte	eh_flags;		/* route flags */
219     byte	eh_vers;		/* version number */
220     byte	eh_eco;			/* ECO number */
221     byte	eh_ueco;		/* user ECO number */
222     etheraddr	eh_src;			/* source id */
223     byte	eh_info;		/* routing layer information */
224     word	eh_blksize;		/* maximum data link block size */
225     byte	eh_area;		/* area (reserved) */
226     byte	eh_seed[8];		/* verification seed */
227     etheraddr	eh_router;		/* designated router */
228     word	eh_hello;		/* hello timer */
229     byte	eh_mpd;			/* (reserved) */
230     byte	eh_data;		/* test data image field */
231   };
232 
233 union controlmsg
234   {
235     struct initmsg	cm_init;	/* initialization message */
236     struct verifmsg	cm_ver;		/* verification message */
237     struct testmsg	cm_test;	/* hello and test message */
238     struct l1rout	cm_l1rou;	/* level 1 routing message */
239     struct l2rout	cm_l2rout;	/* level 2 routing message */
240     struct rhellomsg	cm_rhello;	/* router hello message */
241     struct ehellomsg	cm_ehello;	/* endnode hello message */
242   };
243 
244 /* Macros for decoding routing-info fields */
245 #define	RI_COST(x)	((x)&0777)
246 #define	RI_HOPS(x)	(((x)>>10)&037)
247 
248 /*
249  * NSP protocol fields and values.
250  */
251 
252 #define NSP_TYPEMASK 014		/* mask to isolate type code */
253 #define NSP_SUBMASK 0160		/* mask to isolate subtype code */
254 #define NSP_SUBSHFT 4			/* shift to move subtype code */
255 
256 #define MFT_DATA 0			/* data message */
257 #define MFT_ACK  04			/* acknowledgement message */
258 #define MFT_CTL  010			/* control message */
259 
260 #define MFS_ILS  020			/* data or I/LS indicator */
261 #define MFS_BOM  040			/* beginning of message (data) */
262 #define MFS_MOM  0			/* middle of message (data) */
263 #define MFS_EOM  0100			/* end of message (data) */
264 #define MFS_INT  040			/* interrupt message */
265 
266 #define MFS_DACK 0			/* data acknowledgement */
267 #define MFS_IACK 020			/* I/LS acknowledgement */
268 #define MFS_CACK 040			/* connect acknowledgement */
269 
270 #define MFS_NOP  0			/* no operation */
271 #define MFS_CI   020			/* connect initiate */
272 #define MFS_CC   040			/* connect confirm */
273 #define MFS_DI   060			/* disconnect initiate */
274 #define MFS_DC   0100			/* disconnect confirm */
275 #define MFS_RCI  0140			/* retransmitted connect initiate */
276 
277 #define SGQ_ACK  0100000		/* ack */
278 #define SGQ_NAK  0110000		/* negative ack */
279 #define SGQ_OACK 0120000		/* other channel ack */
280 #define SGQ_ONAK 0130000		/* other channel negative ack */
281 #define SGQ_MASK 07777			/* mask to isolate seq # */
282 #define SGQ_OTHER 020000		/* other channel qualifier */
283 #define SGQ_DELAY 010000		/* ack delay flag */
284 
285 #define SGQ_EOM  0100000		/* pseudo flag for end-of-message */
286 
287 #define LSM_MASK 03			/* mask for modifier field */
288 #define LSM_NOCHANGE 0			/* no change */
289 #define LSM_DONOTSEND 1			/* do not send data */
290 #define LSM_SEND 2			/* send data */
291 
292 #define LSI_MASK 014			/* mask for interpretation field */
293 #define LSI_DATA 0			/* data segment or message count */
294 #define LSI_INTR 4			/* interrupt request count */
295 #define LSI_INTM 0377			/* funny marker for int. message */
296 
297 #define COS_MASK 014			/* mask for flow control field */
298 #define COS_NONE 0			/* no flow control */
299 #define COS_SEGMENT 04			/* segment flow control */
300 #define COS_MESSAGE 010			/* message flow control */
301 #define COS_DEFAULT 1			/* default value for field */
302 
303 #define COI_MASK 3			/* mask for version field */
304 #define COI_32 0			/* version 3.2 */
305 #define COI_31 1			/* version 3.1 */
306 #define COI_40 2			/* version 4.0 */
307 #define COI_41 3			/* version 4.1 */
308 
309 #define MNU_MASK 140			/* mask for session control version */
310 #define MNU_10 000				/* session V1.0 */
311 #define MNU_20 040				/* session V2.0 */
312 #define MNU_ACCESS 1			/* access control present */
313 #define MNU_USRDATA 2			/* user data field present */
314 #define MNU_INVKPROXY 4			/* invoke proxy field present */
315 #define MNU_UICPROXY 8			/* use uic-based proxy */
316 
317 #define DC_NORESOURCES 1		/* no resource reason code */
318 #define DC_NOLINK 41			/* no link terminate reason code */
319 #define DC_COMPLETE 42			/* disconnect complete reason code */
320 
321 #define DI_NOERROR 0			/* user disconnect */
322 #define DI_SHUT 3			/* node is shutting down */
323 #define DI_NOUSER 4			/* destination end user does not exist */
324 #define DI_INVDEST 5			/* invalid end user destination */
325 #define DI_REMRESRC 6			/* insufficient remote resources */
326 #define DI_TPA 8			/* third party abort */
327 #define DI_PROTOCOL 7			/* protocol error discovered */
328 #define DI_ABORT 9			/* user abort */
329 #define DI_LOCALRESRC 32		/* insufficient local resources */
330 #define DI_REMUSERRESRC 33		/* insufficient remote user resources */
331 #define DI_BADACCESS 34			/* bad access control information */
332 #define DI_BADACCNT 36			/* bad ACCOUNT information */
333 #define DI_CONNECTABORT 38		/* connect request cancelled */
334 #define DI_TIMEDOUT 38			/* remote node or user crashed */
335 #define DI_UNREACHABLE 39		/* local timers expired due to ... */
336 #define DI_BADIMAGE 43			/* bad image data in connect */
337 #define DI_SERVMISMATCH 54		/* cryptographic service mismatch */
338 
339 #define UC_OBJREJECT 0			/* object rejected connect */
340 #define UC_USERDISCONNECT 0		/* user disconnect */
341 #define UC_RESOURCES 1			/* insufficient resources (local or remote) */
342 #define UC_NOSUCHNODE 2			/* unrecognized node name */
343 #define UC_REMOTESHUT 3			/* remote node shutting down */
344 #define UC_NOSUCHOBJ 4			/* unrecognized object */
345 #define UC_INVOBJFORMAT 5		/* invalid object name format */
346 #define UC_OBJTOOBUSY 6			/* object too busy */
347 #define UC_NETWORKABORT 8		/* network abort */
348 #define UC_USERABORT 9			/* user abort */
349 #define UC_INVNODEFORMAT 10		/* invalid node name format */
350 #define UC_LOCALSHUT 11			/* local node shutting down */
351 #define UC_ACCESSREJECT 34		/* invalid access control information */
352 #define UC_NORESPONSE 38		/* no response from object */
353 #define UC_UNREACHABLE 39		/* node unreachable */
354 
355 /*
356  * NSP message formats.
357  */
358 struct nsphdr				/* general nsp header */
359   {
360     byte	nh_flags;		/* message flags */
361     word	nh_dst;			/* destination link address */
362     word	nh_src;			/* source link address */
363   };
364 
365 struct seghdr				/* data segment header */
366   {
367     byte	sh_flags;		/* message flags */
368     word	sh_dst;			/* destination link address */
369     word	sh_src;			/* source link address */
370     word	sh_seq[3];		/* sequence numbers */
371   };
372 
373 struct minseghdr			/* minimum data segment header */
374   {
375     byte	ms_flags;		/* message flags */
376     word	ms_dst;			/* destination link address */
377     word	ms_src;			/* source link address */
378     word	ms_seq;			/* sequence number */
379   };
380 
381 struct lsmsg				/* link service message (after hdr) */
382   {
383     byte	ls_lsflags;		/* link service flags */
384     byte	ls_fcval;		/* flow control value */
385   };
386 
387 struct ackmsg				/* acknowledgement message */
388   {
389     byte	ak_flags;		/* message flags */
390     word	ak_dst;			/* destination link address */
391     word	ak_src;			/* source link address */
392     word	ak_acknum[2];		/* acknowledgement numbers */
393   };
394 
395 struct minackmsg			/* minimum acknowledgement message */
396   {
397     byte	mk_flags;		/* message flags */
398     word	mk_dst;			/* destination link address */
399     word	mk_src;			/* source link address */
400     word	mk_acknum;		/* acknowledgement number */
401   };
402 
403 struct ciackmsg				/* connect acknowledgement message */
404   {
405     byte	ck_flags;		/* message flags */
406     word	ck_dst;			/* destination link address */
407   };
408 
409 struct cimsg				/* connect initiate message */
410   {
411     byte	ci_flags;		/* message flags */
412     word	ci_dst;			/* destination link address (0) */
413     word	ci_src;			/* source link address */
414     byte	ci_services;		/* requested services */
415     byte	ci_info;		/* information */
416     word	ci_segsize;		/* maximum segment size */
417   };
418 
419 struct ccmsg				/* connect confirm message */
420   {
421     byte	cc_flags;		/* message flags */
422     word	cc_dst;			/* destination link address */
423     word	cc_src;			/* source link address */
424     byte	cc_services;		/* requested services */
425     byte	cc_info;		/* information */
426     word	cc_segsize;		/* maximum segment size */
427     byte	cc_optlen;		/* optional data length */
428   };
429 
430 struct cnmsg				/* generic connect message */
431   {
432     byte	cn_flags;		/* message flags */
433     word	cn_dst;			/* destination link address */
434     word	cn_src;			/* source link address */
435     byte	cn_services;		/* requested services */
436     byte	cn_info;		/* information */
437     word	cn_segsize;		/* maximum segment size */
438   };
439 
440 struct dimsg				/* disconnect initiate message */
441   {
442     byte	di_flags;		/* message flags */
443     word	di_dst;			/* destination link address */
444     word	di_src;			/* source link address */
445     word	di_reason;		/* reason code */
446     byte	di_optlen;		/* optional data length */
447   };
448 
449 struct dcmsg				/* disconnect confirm message */
450   {
451     byte	dc_flags;		/* message flags */
452     word	dc_dst;			/* destination link address */
453     word	dc_src;			/* source link address */
454     word	dc_reason;		/* reason code */
455   };
456 
457 /* Forwards */
458 static int print_decnet_ctlmsg(netdissect_options *, const union routehdr *, u_int, u_int);
459 static void print_t_info(netdissect_options *, u_int);
460 static void print_l1_routes(netdissect_options *, const u_char *, u_int);
461 static void print_l2_routes(netdissect_options *, const u_char *, u_int);
462 static void print_i_info(netdissect_options *, u_int);
463 static void print_elist(const u_char *, u_int);
464 static int print_nsp(netdissect_options *, const u_char *, u_int);
465 static void print_reason(netdissect_options *, u_int);
466 
467 void
decnet_print(netdissect_options * ndo,const u_char * ap,u_int length,u_int caplen)468 decnet_print(netdissect_options *ndo,
469              const u_char *ap, u_int length,
470              u_int caplen)
471 {
472 	const union routehdr *rhp;
473 	u_int mflags;
474 	uint16_t dst, src;
475 	u_int hops;
476 	u_int nsplen, pktlen;
477 	const u_char *nspp;
478 
479 	ndo->ndo_protocol = "decnet";
480 	if (length < sizeof(struct shorthdr)) {
481 		ND_PRINT(" (length %u < %zu)", length, sizeof(struct shorthdr));
482 		goto invalid;
483 	}
484 
485 	pktlen = GET_LE_U_2(ap);
486 	if (pktlen < sizeof(struct shorthdr)) {
487 		ND_PRINT(" (pktlen %u < %zu)", pktlen, sizeof(struct shorthdr));
488 		goto invalid;
489 	}
490 	if (pktlen > length) {
491 		ND_PRINT(" (pktlen %u > %u)", pktlen, length);
492 		goto invalid;
493 	}
494 	length = pktlen;
495 
496 	rhp = (const union routehdr *)(ap + sizeof(short));
497 	mflags = GET_U_1(rhp->rh_short.sh_flags);
498 
499 	if (mflags & RMF_PAD) {
500 	    /* pad bytes of some sort in front of message */
501 	    u_int padlen = mflags & RMF_PADMASK;
502 	    if (ndo->ndo_vflag)
503 		ND_PRINT("[pad:%u] ", padlen);
504 	    if (length < padlen + 2) {
505 		ND_PRINT(" (length %u < %u)", length, padlen + 2);
506 		goto invalid;
507 	    }
508 	    ND_TCHECK_LEN(ap + sizeof(short), padlen);
509 	    ap += padlen;
510 	    length -= padlen;
511 	    caplen -= padlen;
512 	    rhp = (const union routehdr *)(ap + sizeof(short));
513 	    mflags = GET_U_1(rhp->rh_short.sh_flags);
514 	}
515 
516 	if (mflags & RMF_FVER) {
517 		ND_PRINT("future-version-decnet");
518 		ND_DEFAULTPRINT(ap, ND_MIN(length, caplen));
519 		return;
520 	}
521 
522 	/* is it a control message? */
523 	if (mflags & RMF_CTLMSG) {
524 		if (!print_decnet_ctlmsg(ndo, rhp, length, caplen))
525 			goto invalid;
526 		return;
527 	}
528 
529 	switch (mflags & RMF_MASK) {
530 	case RMF_LONG:
531 	    if (length < sizeof(struct longhdr)) {
532 		ND_PRINT(" (length %u < %zu)", length, sizeof(struct longhdr));
533 		goto invalid;
534 	    }
535 	    ND_TCHECK_SIZE(&rhp->rh_long);
536 	    dst =
537 		GET_LE_U_2(rhp->rh_long.lg_dst.dne_remote.dne_nodeaddr);
538 	    src =
539 		GET_LE_U_2(rhp->rh_long.lg_src.dne_remote.dne_nodeaddr);
540 	    hops = GET_U_1(rhp->rh_long.lg_visits);
541 	    nspp = ap + sizeof(short) + sizeof(struct longhdr);
542 	    nsplen = length - sizeof(struct longhdr);
543 	    break;
544 	case RMF_SHORT:
545 	    dst = GET_LE_U_2(rhp->rh_short.sh_dst);
546 	    src = GET_LE_U_2(rhp->rh_short.sh_src);
547 	    hops = (GET_U_1(rhp->rh_short.sh_visits) & VIS_MASK)+1;
548 	    nspp = ap + sizeof(short) + sizeof(struct shorthdr);
549 	    nsplen = length - sizeof(struct shorthdr);
550 	    break;
551 	default:
552 	    ND_PRINT("unknown message flags under mask");
553 	    ND_DEFAULTPRINT((const u_char *)ap, ND_MIN(length, caplen));
554 	    return;
555 	}
556 
557 	ND_PRINT("%s > %s %u ",
558 			dnaddr_string(ndo, src), dnaddr_string(ndo, dst), pktlen);
559 	if (ndo->ndo_vflag) {
560 	    if (mflags & RMF_RQR)
561 		ND_PRINT("RQR ");
562 	    if (mflags & RMF_RTS)
563 		ND_PRINT("RTS ");
564 	    if (mflags & RMF_IE)
565 		ND_PRINT("IE ");
566 	    ND_PRINT("%u hops ", hops);
567 	}
568 
569 	if (!print_nsp(ndo, nspp, nsplen))
570 		goto invalid;
571 	return;
572 
573 invalid:
574 	nd_print_invalid(ndo);
575 }
576 
577 static int
print_decnet_ctlmsg(netdissect_options * ndo,const union routehdr * rhp,u_int length,u_int caplen)578 print_decnet_ctlmsg(netdissect_options *ndo,
579                     const union routehdr *rhp, u_int length,
580                     u_int caplen)
581 {
582 	/* Our caller has already checked for mflags */
583 	u_int mflags = GET_U_1(rhp->rh_short.sh_flags);
584 	const union controlmsg *cmp = (const union controlmsg *)rhp;
585 	uint16_t src, dst;
586 	u_int info, blksize, eco, ueco, hello, other, vers;
587 	u_int priority;
588 	const u_char *rhpx = (const u_char *)rhp;
589 
590 	switch (mflags & RMF_CTLMASK) {
591 	case RMF_INIT:
592 	    ND_PRINT("init ");
593 	    if (length < sizeof(struct initmsg))
594 		goto invalid;
595 	    ND_TCHECK_SIZE(&cmp->cm_init);
596 	    src = GET_LE_U_2(cmp->cm_init.in_src);
597 	    info = GET_U_1(cmp->cm_init.in_info);
598 	    blksize = GET_LE_U_2(cmp->cm_init.in_blksize);
599 	    vers = GET_U_1(cmp->cm_init.in_vers);
600 	    eco = GET_U_1(cmp->cm_init.in_eco);
601 	    ueco = GET_U_1(cmp->cm_init.in_ueco);
602 	    hello = GET_LE_U_2(cmp->cm_init.in_hello);
603 	    print_t_info(ndo, info);
604 	    ND_PRINT("src %sblksize %u vers %u eco %u ueco %u hello %u",
605 			dnaddr_string(ndo, src), blksize, vers, eco, ueco,
606 			hello);
607 	    break;
608 	case RMF_VER:
609 	    ND_PRINT("verification ");
610 	    if (length < sizeof(struct verifmsg))
611 		goto invalid;
612 	    src = GET_LE_U_2(cmp->cm_ver.ve_src);
613 	    other = GET_U_1(cmp->cm_ver.ve_fcnval);
614 	    ND_PRINT("src %s fcnval %o", dnaddr_string(ndo, src), other);
615 	    break;
616 	case RMF_TEST:
617 	    ND_PRINT("test ");
618 	    if (length < sizeof(struct testmsg))
619 		goto invalid;
620 	    src = GET_LE_U_2(cmp->cm_test.te_src);
621 	    other = GET_U_1(cmp->cm_test.te_data);
622 	    ND_PRINT("src %s data %o", dnaddr_string(ndo, src), other);
623 	    break;
624 	case RMF_L1ROUT:
625 	    ND_PRINT("lev-1-routing ");
626 	    if (length < sizeof(struct l1rout))
627 		goto invalid;
628 	    ND_TCHECK_SIZE(&cmp->cm_l1rou);
629 	    src = GET_LE_U_2(cmp->cm_l1rou.r1_src);
630 	    ND_PRINT("src %s ", dnaddr_string(ndo, src));
631 	    print_l1_routes(ndo, &(rhpx[sizeof(struct l1rout)]),
632 				length - sizeof(struct l1rout));
633 	    break;
634 	case RMF_L2ROUT:
635 	    ND_PRINT("lev-2-routing ");
636 	    if (length < sizeof(struct l2rout))
637 		goto invalid;
638 	    ND_TCHECK_SIZE(&cmp->cm_l2rout);
639 	    src = GET_LE_U_2(cmp->cm_l2rout.r2_src);
640 	    ND_PRINT("src %s ", dnaddr_string(ndo, src));
641 	    print_l2_routes(ndo, &(rhpx[sizeof(struct l2rout)]),
642 				length - sizeof(struct l2rout));
643 	    break;
644 	case RMF_RHELLO:
645 	    ND_PRINT("router-hello ");
646 	    if (length < sizeof(struct rhellomsg))
647 		goto invalid;
648 	    ND_TCHECK_SIZE(&cmp->cm_rhello);
649 	    vers = GET_U_1(cmp->cm_rhello.rh_vers);
650 	    eco = GET_U_1(cmp->cm_rhello.rh_eco);
651 	    ueco = GET_U_1(cmp->cm_rhello.rh_ueco);
652 	    src =
653 		GET_LE_U_2(cmp->cm_rhello.rh_src.dne_remote.dne_nodeaddr);
654 	    info = GET_U_1(cmp->cm_rhello.rh_info);
655 	    blksize = GET_LE_U_2(cmp->cm_rhello.rh_blksize);
656 	    priority = GET_U_1(cmp->cm_rhello.rh_priority);
657 	    hello = GET_LE_U_2(cmp->cm_rhello.rh_hello);
658 	    print_i_info(ndo, info);
659 	    ND_PRINT("vers %u eco %u ueco %u src %s blksize %u pri %u hello %u",
660 			vers, eco, ueco, dnaddr_string(ndo, src),
661 			blksize, priority, hello);
662 	    print_elist(&(rhpx[sizeof(struct rhellomsg)]),
663 				length - sizeof(struct rhellomsg));
664 	    break;
665 	case RMF_EHELLO:
666 	    ND_PRINT("endnode-hello ");
667 	    if (length < sizeof(struct ehellomsg))
668 		goto invalid;
669 	    vers = GET_U_1(cmp->cm_ehello.eh_vers);
670 	    eco = GET_U_1(cmp->cm_ehello.eh_eco);
671 	    ueco = GET_U_1(cmp->cm_ehello.eh_ueco);
672 	    src =
673 		GET_LE_U_2(cmp->cm_ehello.eh_src.dne_remote.dne_nodeaddr);
674 	    info = GET_U_1(cmp->cm_ehello.eh_info);
675 	    blksize = GET_LE_U_2(cmp->cm_ehello.eh_blksize);
676 	    /*seed*/
677 	    dst =
678 		GET_LE_U_2(cmp->cm_ehello.eh_router.dne_remote.dne_nodeaddr);
679 	    hello = GET_LE_U_2(cmp->cm_ehello.eh_hello);
680 	    other = GET_U_1(cmp->cm_ehello.eh_data);
681 	    print_i_info(ndo, info);
682 	    ND_PRINT("vers %u eco %u ueco %u src %s blksize %u rtr %s hello %u data %o",
683 			vers, eco, ueco, dnaddr_string(ndo, src),
684 			blksize, dnaddr_string(ndo, dst), hello, other);
685 	    break;
686 
687 	default:
688 	    ND_PRINT("unknown control message");
689 	    ND_DEFAULTPRINT((const u_char *)rhp, ND_MIN(length, caplen));
690 	    break;
691 	}
692 	return (1);
693 
694 invalid:
695 	return (0);
696 }
697 
698 static void
print_t_info(netdissect_options * ndo,u_int info)699 print_t_info(netdissect_options *ndo,
700              u_int info)
701 {
702 	u_int ntype = info & 3;
703 	switch (ntype) {
704 	case 0: ND_PRINT("reserved-ntype? "); break;
705 	case TI_L2ROUT: ND_PRINT("l2rout "); break;
706 	case TI_L1ROUT: ND_PRINT("l1rout "); break;
707 	case TI_ENDNODE: ND_PRINT("endnode "); break;
708 	}
709 	if (info & TI_VERIF)
710 	    ND_PRINT("verif ");
711 	if (info & TI_BLOCK)
712 	    ND_PRINT("blo ");
713 }
714 
715 static void
print_l1_routes(netdissect_options * ndo,const u_char * rp,u_int len)716 print_l1_routes(netdissect_options *ndo,
717                 const u_char *rp, u_int len)
718 {
719 	u_int count;
720 	u_int id;
721 	u_int info;
722 
723 	/* The last short is a checksum */
724 	while (len > (3 * sizeof(short))) {
725 	    ND_TCHECK_LEN(rp, 3 * sizeof(short));
726 	    count = GET_LE_U_2(rp);
727 	    if (count > 1024)
728 		return;	/* seems to be bogus from here on */
729 	    rp += sizeof(short);
730 	    len -= sizeof(short);
731 	    id = GET_LE_U_2(rp);
732 	    rp += sizeof(short);
733 	    len -= sizeof(short);
734 	    info = GET_LE_U_2(rp);
735 	    rp += sizeof(short);
736 	    len -= sizeof(short);
737 	    ND_PRINT("{ids %u-%u cost %u hops %u} ", id, id + count,
738 			    RI_COST(info), RI_HOPS(info));
739 	}
740 }
741 
742 static void
print_l2_routes(netdissect_options * ndo,const u_char * rp,u_int len)743 print_l2_routes(netdissect_options *ndo,
744                 const u_char *rp, u_int len)
745 {
746 	u_int count;
747 	u_int area;
748 	u_int info;
749 
750 	/* The last short is a checksum */
751 	while (len > (3 * sizeof(short))) {
752 	    ND_TCHECK_LEN(rp, 3 * sizeof(short));
753 	    count = GET_LE_U_2(rp);
754 	    if (count > 1024)
755 		return;	/* seems to be bogus from here on */
756 	    rp += sizeof(short);
757 	    len -= sizeof(short);
758 	    area = GET_LE_U_2(rp);
759 	    rp += sizeof(short);
760 	    len -= sizeof(short);
761 	    info = GET_LE_U_2(rp);
762 	    rp += sizeof(short);
763 	    len -= sizeof(short);
764 	    ND_PRINT("{areas %u-%u cost %u hops %u} ", area, area + count,
765 			    RI_COST(info), RI_HOPS(info));
766 	}
767 }
768 
769 static void
print_i_info(netdissect_options * ndo,u_int info)770 print_i_info(netdissect_options *ndo,
771              u_int info)
772 {
773 	u_int ntype = info & II_TYPEMASK;
774 	switch (ntype) {
775 	case 0: ND_PRINT("reserved-ntype? "); break;
776 	case II_L2ROUT: ND_PRINT("l2rout "); break;
777 	case II_L1ROUT: ND_PRINT("l1rout "); break;
778 	case II_ENDNODE: ND_PRINT("endnode "); break;
779 	}
780 	if (info & II_VERIF)
781 	    ND_PRINT("verif ");
782 	if (info & II_NOMCAST)
783 	    ND_PRINT("nomcast ");
784 	if (info & II_BLOCK)
785 	    ND_PRINT("blo ");
786 }
787 
788 static void
print_elist(const u_char * elp _U_,u_int len _U_)789 print_elist(const u_char *elp _U_, u_int len _U_)
790 {
791 	/* Not enough examples available for me to debug this */
792 }
793 
794 static int
print_nsp(netdissect_options * ndo,const u_char * nspp,u_int nsplen)795 print_nsp(netdissect_options *ndo,
796           const u_char *nspp, u_int nsplen)
797 {
798 	const struct nsphdr *nsphp = (const struct nsphdr *)nspp;
799 	u_int dst, src, flags;
800 
801 	if (nsplen < sizeof(struct nsphdr)) {
802 		ND_PRINT(" (nsplen %u < %zu)", nsplen, sizeof(struct nsphdr));
803 		goto invalid;
804 	}
805 	flags = GET_U_1(nsphp->nh_flags);
806 	dst = GET_LE_U_2(nsphp->nh_dst);
807 	src = GET_LE_U_2(nsphp->nh_src);
808 
809 	switch (flags & NSP_TYPEMASK) {
810 	case MFT_DATA:
811 	    switch (flags & NSP_SUBMASK) {
812 	    case MFS_BOM:
813 	    case MFS_MOM:
814 	    case MFS_EOM:
815 	    case MFS_BOM+MFS_EOM:
816 		ND_PRINT("data %u>%u ", src, dst);
817 		{
818 		    const struct seghdr *shp = (const struct seghdr *)nspp;
819 		    u_int ack;
820 		    u_int data_off = sizeof(struct minseghdr);
821 
822 		    if (nsplen < data_off)
823 			goto invalid;
824 		    ack = GET_LE_U_2(shp->sh_seq[0]);
825 		    if (ack & SGQ_ACK) {	/* acknum field */
826 			if ((ack & SGQ_NAK) == SGQ_NAK)
827 			    ND_PRINT("nak %u ", ack & SGQ_MASK);
828 			else
829 			    ND_PRINT("ack %u ", ack & SGQ_MASK);
830 			data_off += sizeof(short);
831 			if (nsplen < data_off)
832 			    goto invalid;
833 		        ack = GET_LE_U_2(shp->sh_seq[1]);
834 			if (ack & SGQ_OACK) {	/* ackoth field */
835 			    if ((ack & SGQ_ONAK) == SGQ_ONAK)
836 				ND_PRINT("onak %u ", ack & SGQ_MASK);
837 			    else
838 				ND_PRINT("oack %u ", ack & SGQ_MASK);
839 			    data_off += sizeof(short);
840 			    if (nsplen < data_off)
841 				goto invalid;
842 			    ack = GET_LE_U_2(shp->sh_seq[2]);
843 			}
844 		    }
845 		    ND_PRINT("seg %u ", ack & SGQ_MASK);
846 		}
847 		break;
848 	    case MFS_ILS+MFS_INT:
849 		ND_PRINT("intr ");
850 		{
851 		    const struct seghdr *shp = (const struct seghdr *)nspp;
852 		    u_int ack;
853 		    u_int data_off = sizeof(struct minseghdr);
854 
855 		    if (nsplen < data_off)
856 			goto invalid;
857 		    ack = GET_LE_U_2(shp->sh_seq[0]);
858 		    if (ack & SGQ_ACK) {	/* acknum field */
859 			if ((ack & SGQ_NAK) == SGQ_NAK)
860 			    ND_PRINT("nak %u ", ack & SGQ_MASK);
861 			else
862 			    ND_PRINT("ack %u ", ack & SGQ_MASK);
863 			data_off += sizeof(short);
864 			if (nsplen < data_off)
865 			    goto invalid;
866 		        ack = GET_LE_U_2(shp->sh_seq[1]);
867 			if (ack & SGQ_OACK) {	/* ackdat field */
868 			    if ((ack & SGQ_ONAK) == SGQ_ONAK)
869 				ND_PRINT("nakdat %u ", ack & SGQ_MASK);
870 			    else
871 				ND_PRINT("ackdat %u ", ack & SGQ_MASK);
872 			    data_off += sizeof(short);
873 			    if (nsplen < data_off)
874 				goto invalid;
875 			    ack = GET_LE_U_2(shp->sh_seq[2]);
876 			}
877 		    }
878 		    ND_PRINT("seg %u ", ack & SGQ_MASK);
879 		}
880 		break;
881 	    case MFS_ILS:
882 		ND_PRINT("link-service %u>%u ", src, dst);
883 		{
884 		    const struct seghdr *shp = (const struct seghdr *)nspp;
885 		    const struct lsmsg *lsmp =
886 			(const struct lsmsg *)(nspp + sizeof(struct seghdr));
887 		    u_int ack;
888 		    u_int lsflags, fcval;
889 
890 		    if (nsplen < sizeof(struct seghdr) + sizeof(struct lsmsg))
891 			goto invalid;
892 		    ack = GET_LE_U_2(shp->sh_seq[0]);
893 		    if (ack & SGQ_ACK) {	/* acknum field */
894 			if ((ack & SGQ_NAK) == SGQ_NAK)
895 			    ND_PRINT("nak %u ", ack & SGQ_MASK);
896 			else
897 			    ND_PRINT("ack %u ", ack & SGQ_MASK);
898 		        ack = GET_LE_U_2(shp->sh_seq[1]);
899 			if (ack & SGQ_OACK) {	/* ackdat field */
900 			    if ((ack & SGQ_ONAK) == SGQ_ONAK)
901 				ND_PRINT("nakdat %u ", ack & SGQ_MASK);
902 			    else
903 				ND_PRINT("ackdat %u ", ack & SGQ_MASK);
904 			    ack = GET_LE_U_2(shp->sh_seq[2]);
905 			}
906 		    }
907 		    ND_PRINT("seg %u ", ack & SGQ_MASK);
908 		    lsflags = GET_U_1(lsmp->ls_lsflags);
909 		    fcval = GET_U_1(lsmp->ls_fcval);
910 		    switch (lsflags & LSI_MASK) {
911 		    case LSI_DATA:
912 			ND_PRINT("dat seg count %u ", fcval);
913 			switch (lsflags & LSM_MASK) {
914 			case LSM_NOCHANGE:
915 			    break;
916 			case LSM_DONOTSEND:
917 			    ND_PRINT("donotsend-data ");
918 			    break;
919 			case LSM_SEND:
920 			    ND_PRINT("send-data ");
921 			    break;
922 			default:
923 			    ND_PRINT("reserved-fcmod? %x", lsflags);
924 			    break;
925 			}
926 			break;
927 		    case LSI_INTR:
928 			ND_PRINT("intr req count %u ", fcval);
929 			break;
930 		    default:
931 			ND_PRINT("reserved-fcval-int? %x", lsflags);
932 			break;
933 		    }
934 		}
935 		break;
936 	    default:
937 		ND_PRINT("reserved-subtype? %x %u > %u", flags, src, dst);
938 		break;
939 	    }
940 	    break;
941 	case MFT_ACK:
942 	    switch (flags & NSP_SUBMASK) {
943 	    case MFS_DACK:
944 		ND_PRINT("data-ack %u>%u ", src, dst);
945 		{
946 		    const struct ackmsg *amp = (const struct ackmsg *)nspp;
947 		    u_int ack;
948 
949 		    if (nsplen < sizeof(struct ackmsg))
950 			goto invalid;
951 		    ND_TCHECK_SIZE(amp);
952 		    ack = GET_LE_U_2(amp->ak_acknum[0]);
953 		    if (ack & SGQ_ACK) {	/* acknum field */
954 			if ((ack & SGQ_NAK) == SGQ_NAK)
955 			    ND_PRINT("nak %u ", ack & SGQ_MASK);
956 			else
957 			    ND_PRINT("ack %u ", ack & SGQ_MASK);
958 		        ack = GET_LE_U_2(amp->ak_acknum[1]);
959 			if (ack & SGQ_OACK) {	/* ackoth field */
960 			    if ((ack & SGQ_ONAK) == SGQ_ONAK)
961 				ND_PRINT("onak %u ", ack & SGQ_MASK);
962 			    else
963 				ND_PRINT("oack %u ", ack & SGQ_MASK);
964 			}
965 		    }
966 		}
967 		break;
968 	    case MFS_IACK:
969 		ND_PRINT("ils-ack %u>%u ", src, dst);
970 		{
971 		    const struct ackmsg *amp = (const struct ackmsg *)nspp;
972 		    u_int ack;
973 
974 		    if (nsplen < sizeof(struct ackmsg))
975 			goto invalid;
976 		    ND_TCHECK_SIZE(amp);
977 		    ack = GET_LE_U_2(amp->ak_acknum[0]);
978 		    if (ack & SGQ_ACK) {	/* acknum field */
979 			if ((ack & SGQ_NAK) == SGQ_NAK)
980 			    ND_PRINT("nak %u ", ack & SGQ_MASK);
981 			else
982 			    ND_PRINT("ack %u ", ack & SGQ_MASK);
983 		        ack = GET_LE_U_2(amp->ak_acknum[1]);
984 			if (ack & SGQ_OACK) {	/* ackdat field */
985 			    if ((ack & SGQ_ONAK) == SGQ_ONAK)
986 				ND_PRINT("nakdat %u ", ack & SGQ_MASK);
987 			    else
988 				ND_PRINT("ackdat %u ", ack & SGQ_MASK);
989 			}
990 		    }
991 		}
992 		break;
993 	    case MFS_CACK:
994 		ND_PRINT("conn-ack %u", dst);
995 		break;
996 	    default:
997 		ND_PRINT("reserved-acktype? %x %u > %u", flags, src, dst);
998 		break;
999 	    }
1000 	    break;
1001 	case MFT_CTL:
1002 	    switch (flags & NSP_SUBMASK) {
1003 	    case MFS_CI:
1004 	    case MFS_RCI:
1005 		if ((flags & NSP_SUBMASK) == MFS_CI)
1006 		    ND_PRINT("conn-initiate ");
1007 		else
1008 		    ND_PRINT("retrans-conn-initiate ");
1009 		ND_PRINT("%u>%u ", src, dst);
1010 		{
1011 		    const struct cimsg *cimp = (const struct cimsg *)nspp;
1012 		    u_int services, info, segsize;
1013 
1014 		    if (nsplen < sizeof(struct cimsg))
1015 			goto invalid;
1016 		    services = GET_U_1(cimp->ci_services);
1017 		    info = GET_U_1(cimp->ci_info);
1018 		    segsize = GET_LE_U_2(cimp->ci_segsize);
1019 
1020 		    switch (services & COS_MASK) {
1021 		    case COS_NONE:
1022 			break;
1023 		    case COS_SEGMENT:
1024 			ND_PRINT("seg ");
1025 			break;
1026 		    case COS_MESSAGE:
1027 			ND_PRINT("msg ");
1028 			break;
1029 		    }
1030 		    switch (info & COI_MASK) {
1031 		    case COI_32:
1032 			ND_PRINT("ver 3.2 ");
1033 			break;
1034 		    case COI_31:
1035 			ND_PRINT("ver 3.1 ");
1036 			break;
1037 		    case COI_40:
1038 			ND_PRINT("ver 4.0 ");
1039 			break;
1040 		    case COI_41:
1041 			ND_PRINT("ver 4.1 ");
1042 			break;
1043 		    }
1044 		    ND_PRINT("segsize %u ", segsize);
1045 		}
1046 		break;
1047 	    case MFS_CC:
1048 		ND_PRINT("conn-confirm %u>%u ", src, dst);
1049 		{
1050 		    const struct ccmsg *ccmp = (const struct ccmsg *)nspp;
1051 		    u_int services, info;
1052 		    u_int segsize, optlen;
1053 
1054 		    if (nsplen < sizeof(struct ccmsg))
1055 			goto invalid;
1056 		    services = GET_U_1(ccmp->cc_services);
1057 		    info = GET_U_1(ccmp->cc_info);
1058 		    segsize = GET_LE_U_2(ccmp->cc_segsize);
1059 		    optlen = GET_U_1(ccmp->cc_optlen);
1060 
1061 		    switch (services & COS_MASK) {
1062 		    case COS_NONE:
1063 			break;
1064 		    case COS_SEGMENT:
1065 			ND_PRINT("seg ");
1066 			break;
1067 		    case COS_MESSAGE:
1068 			ND_PRINT("msg ");
1069 			break;
1070 		    }
1071 		    switch (info & COI_MASK) {
1072 		    case COI_32:
1073 			ND_PRINT("ver 3.2 ");
1074 			break;
1075 		    case COI_31:
1076 			ND_PRINT("ver 3.1 ");
1077 			break;
1078 		    case COI_40:
1079 			ND_PRINT("ver 4.0 ");
1080 			break;
1081 		    case COI_41:
1082 			ND_PRINT("ver 4.1 ");
1083 			break;
1084 		    }
1085 		    ND_PRINT("segsize %u ", segsize);
1086 		    if (optlen) {
1087 			ND_PRINT("optlen %u ", optlen);
1088 		    }
1089 		}
1090 		break;
1091 	    case MFS_DI:
1092 		ND_PRINT("disconn-initiate %u>%u ", src, dst);
1093 		{
1094 		    const struct dimsg *dimp = (const struct dimsg *)nspp;
1095 		    u_int reason;
1096 		    u_int optlen;
1097 
1098 		    if (nsplen < sizeof(struct dimsg))
1099 			goto invalid;
1100 		    reason = GET_LE_U_2(dimp->di_reason);
1101 		    optlen = GET_U_1(dimp->di_optlen);
1102 
1103 		    print_reason(ndo, reason);
1104 		    if (optlen) {
1105 			ND_PRINT("optlen %u ", optlen);
1106 		    }
1107 		}
1108 		break;
1109 	    case MFS_DC:
1110 		ND_PRINT("disconn-confirm %u>%u ", src, dst);
1111 		{
1112 		    const struct dcmsg *dcmp = (const struct dcmsg *)nspp;
1113 		    u_int reason;
1114 
1115 		    reason = GET_LE_U_2(dcmp->dc_reason);
1116 
1117 		    print_reason(ndo, reason);
1118 		}
1119 		break;
1120 	    default:
1121 		ND_PRINT("reserved-ctltype? %x %u > %u", flags, src, dst);
1122 		break;
1123 	    }
1124 	    break;
1125 	default:
1126 	    ND_PRINT("reserved-type? %x %u > %u", flags, src, dst);
1127 	    break;
1128 	}
1129 	return (1);
1130 
1131 invalid:
1132 	return (0);
1133 }
1134 
1135 static const struct tok reason2str[] = {
1136 	{ UC_OBJREJECT,		"object rejected connect" },
1137 	{ UC_RESOURCES,		"insufficient resources" },
1138 	{ UC_NOSUCHNODE,	"unrecognized node name" },
1139 	{ DI_SHUT,		"node is shutting down" },
1140 	{ UC_NOSUCHOBJ,		"unrecognized object" },
1141 	{ UC_INVOBJFORMAT,	"invalid object name format" },
1142 	{ UC_OBJTOOBUSY,	"object too busy" },
1143 	{ DI_PROTOCOL,		"protocol error discovered" },
1144 	{ DI_TPA,		"third party abort" },
1145 	{ UC_USERABORT,		"user abort" },
1146 	{ UC_INVNODEFORMAT,	"invalid node name format" },
1147 	{ UC_LOCALSHUT,		"local node shutting down" },
1148 	{ DI_LOCALRESRC,	"insufficient local resources" },
1149 	{ DI_REMUSERRESRC,	"insufficient remote user resources" },
1150 	{ UC_ACCESSREJECT,	"invalid access control information" },
1151 	{ DI_BADACCNT,		"bad ACCOUNT information" },
1152 	{ UC_NORESPONSE,	"no response from object" },
1153 	{ UC_UNREACHABLE,	"node unreachable" },
1154 	{ DC_NOLINK,		"no link terminate" },
1155 	{ DC_COMPLETE,		"disconnect complete" },
1156 	{ DI_BADIMAGE,		"bad image data in connect" },
1157 	{ DI_SERVMISMATCH,	"cryptographic service mismatch" },
1158 	{ 0,			NULL }
1159 };
1160 
1161 static void
print_reason(netdissect_options * ndo,u_int reason)1162 print_reason(netdissect_options *ndo,
1163              u_int reason)
1164 {
1165 	ND_PRINT("%s ", tok2str(reason2str, "reason-%u", reason));
1166 }
1167 
1168 const char *
dnnum_string(netdissect_options * ndo,u_short dnaddr)1169 dnnum_string(netdissect_options *ndo, u_short dnaddr)
1170 {
1171 	char *str;
1172 	size_t siz;
1173 	u_int area = (u_short)(dnaddr & AREAMASK) >> AREASHIFT;
1174 	u_int node = dnaddr & NODEMASK;
1175 
1176 	/* malloc() return used by the 'dnaddrtable' hash table: do not free() */
1177 	str = (char *)malloc(siz = sizeof("00.0000"));
1178 	if (str == NULL)
1179 		(*ndo->ndo_error)(ndo, S_ERR_ND_MEM_ALLOC, "%s: malloc", __func__);
1180 	snprintf(str, siz, "%u.%u", area, node);
1181 	return(str);
1182 }
1183