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