]> The Tcpdump Group git mirrors - tcpdump/blob - print-decnet.c
Handle very large -f files by rejecting them.
[tcpdump] / print-decnet.c
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 struct mbuf;
31 struct 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
41 static const char tstr[] = "[|decnet]";
42
43 #ifndef _WIN32
44 typedef uint8_t byte[1]; /* single byte field */
45 #else
46 /*
47 * the keyword 'byte' generates conflicts in Windows
48 */
49 typedef unsigned char Byte[1]; /* single byte field */
50 #define byte Byte
51 #endif /* _WIN32 */
52 typedef uint8_t word[2]; /* 2 byte field */
53 typedef uint8_t longword[4]; /* 4 bytes field */
54
55 /*
56 * Definitions for DECNET Phase IV protocol headers
57 */
58 union 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
66 typedef 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 */
77 struct 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
85 struct 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
100 union 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 */
166 struct 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
178 struct 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
191 struct 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
198 struct 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
205 struct 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
212 struct 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
219 struct 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
234 struct 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
251 union 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 */
376 struct 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
383 struct 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
391 struct 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
399 struct lsmsg /* link service message (after hdr) */
400 {
401 byte ls_lsflags; /* link service flags */
402 byte ls_fcval; /* flow control value */
403 };
404
405 struct 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
413 struct 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
421 struct ciackmsg /* connect acknowledgement message */
422 {
423 byte ck_flags; /* message flags */
424 word ck_dst; /* destination link address */
425 };
426
427 struct 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
437 struct 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
448 struct 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
458 struct 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
467 struct 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 */
476 static int print_decnet_ctlmsg(netdissect_options *, const union routehdr *, u_int, u_int);
477 static void print_t_info(netdissect_options *, int);
478 static int print_l1_routes(netdissect_options *, const char *, u_int);
479 static int print_l2_routes(netdissect_options *, const char *, u_int);
480 static void print_i_info(netdissect_options *, int);
481 static int print_elist(const char *, u_int);
482 static int print_nsp(netdissect_options *, const u_char *, u_int);
483 static void print_reason(netdissect_options *, int);
484
485 void
486 decnet_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
593 trunc:
594 ND_PRINT((ndo, "%s", tstr));
595 return;
596 }
597
598 static int
599 print_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
730 trunc:
731 return (0);
732 }
733
734 static void
735 print_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
751 static int
752 print_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
778 trunc:
779 return (0);
780 }
781
782 static int
783 print_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
809 trunc:
810 return (0);
811 }
812
813 static void
814 print_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
832 static int
833 print_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
839 static int
840 print_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
1190 trunc:
1191 return (0);
1192 }
1193
1194 static 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
1220 static void
1221 print_reason(netdissect_options *ndo,
1222 register int reason)
1223 {
1224 ND_PRINT((ndo, "%s ", tok2str(reason2str, "reason-%d", reason)));
1225 }
1226
1227 const char *
1228 dnnum_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 }