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