]>
The Tcpdump Group git mirrors - tcpdump/blob - print-decnet.c
2 * Copyright (c) 1992, 1993, 1994, 1995, 1996, 1997
3 * The Regents of the University of California. All rights reserved.
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
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.
22 /* \summary: DECnet printer */
28 #include <netdissect-stdinc.h>
33 #ifdef HAVE_NETDNET_DNETDB_H
34 #include <netdnet/dnetdb.h>
42 #include "netdissect.h"
43 #include "addrtoname.h"
45 static const char tstr
[] = "[|decnet]";
48 typedef uint8_t byte
[1]; /* single byte field */
51 * the keyword 'byte' generates conflicts in Windows
53 typedef unsigned char Byte
[1]; /* single byte field */
56 typedef uint8_t word
[2]; /* 2 byte field */
57 typedef uint8_t longword
[4]; /* 4 bytes field */
60 * Definitions for DECNET Phase IV protocol headers
63 uint8_t dne_addr
[6]; /* full ethernet address */
65 uint8_t dne_hiord
[4]; /* DECnet HIORD prefix */
66 uint8_t dne_nodeaddr
[2]; /* DECnet node address */
70 typedef union etheraddress etheraddr
; /* Ethernet address */
72 #define HIORD 0x000400aa /* high 32-bits of address (swapped) */
74 #define AREAMASK 0176000 /* mask for area field */
75 #define AREASHIFT 10 /* bit-offset for area field */
76 #define NODEMASK 01777 /* mask for node address field */
78 #define DN_MAXADDL 20 /* max size of DECnet address */
80 uint16_t a_len
; /* length of address */
81 uint8_t a_addr
[DN_MAXADDL
]; /* address as bytes */
85 * Define long and short header formats.
89 byte sh_flags
; /* route flags */
90 word sh_dst
; /* destination node address */
91 word sh_src
; /* source node address */
92 byte sh_visits
; /* visit count */
97 byte lg_flags
; /* route flags */
98 byte lg_darea
; /* destination area (reserved) */
99 byte lg_dsarea
; /* destination subarea (reserved) */
100 etheraddr lg_dst
; /* destination id */
101 byte lg_sarea
; /* source area (reserved) */
102 byte lg_ssarea
; /* source subarea (reserved) */
103 etheraddr lg_src
; /* source id */
104 byte lg_nextl2
; /* next level 2 router (reserved) */
105 byte lg_visits
; /* visit count */
106 byte lg_service
; /* service class (reserved) */
107 byte lg_pt
; /* protocol type (reserved) */
112 struct shorthdr rh_short
; /* short route header */
113 struct longhdr rh_long
; /* long route header */
117 * Define the values of various fields in the protocol messages.
119 * 1. Data packet formats.
121 #define RMF_MASK 7 /* mask for message type */
122 #define RMF_SHORT 2 /* short message format */
123 #define RMF_LONG 6 /* long message format */
125 #define RMF_RQR 010 /* request return to sender */
126 #define RMF_RTS 020 /* returning to sender */
127 #define RMF_IE 040 /* intra-ethernet packet */
129 #define RMF_FVER 0100 /* future version flag */
130 #define RMF_PAD 0200 /* pad field */
131 #define RMF_PADMASK 0177 /* pad field mask */
133 #define VIS_MASK 077 /* visit field mask */
136 * 2. Control packet formats.
138 #define RMF_CTLMASK 017 /* mask for message type */
139 #define RMF_CTLMSG 01 /* control message indicator */
140 #define RMF_INIT 01 /* initialization message */
141 #define RMF_VER 03 /* verification message */
142 #define RMF_TEST 05 /* hello and test message */
143 #define RMF_L1ROUT 07 /* level 1 routing message */
144 #define RMF_L2ROUT 011 /* level 2 routing message */
145 #define RMF_RHELLO 013 /* router hello message */
146 #define RMF_EHELLO 015 /* endnode hello message */
148 #define TI_L2ROUT 01 /* level 2 router */
149 #define TI_L1ROUT 02 /* level 1 router */
150 #define TI_ENDNODE 03 /* endnode */
151 #define TI_VERIF 04 /* verification required */
152 #define TI_BLOCK 010 /* blocking requested */
154 #define VE_VERS 2 /* version number (2) */
155 #define VE_ECO 0 /* ECO number */
156 #define VE_UECO 0 /* user ECO number (0) */
158 #define P3_VERS 1 /* phase III version number (1) */
159 #define P3_ECO 3 /* ECO number (3) */
160 #define P3_UECO 0 /* user ECO number (0) */
162 #define II_L2ROUT 01 /* level 2 router */
163 #define II_L1ROUT 02 /* level 1 router */
164 #define II_ENDNODE 03 /* endnode */
165 #define II_VERIF 04 /* verification required */
166 #define II_NOMCAST 040 /* no multicast traffic accepted */
167 #define II_BLOCK 0100 /* blocking requested */
168 #define II_TYPEMASK 03 /* mask for node type */
170 #define TESTDATA 0252 /* test data bytes */
171 #define TESTLEN 1 /* length of transmitted test data */
174 * Define control message formats.
176 struct initmsgIII
/* phase III initialization message */
178 byte inIII_flags
; /* route flags */
179 word inIII_src
; /* source node address */
180 byte inIII_info
; /* routing layer information */
181 word inIII_blksize
; /* maximum data link block size */
182 byte inIII_vers
; /* version number */
183 byte inIII_eco
; /* ECO number */
184 byte inIII_ueco
; /* user ECO number */
185 byte inIII_rsvd
; /* reserved image field */
188 struct initmsg
/* initialization message */
190 byte in_flags
; /* route flags */
191 word in_src
; /* source node address */
192 byte in_info
; /* routing layer information */
193 word in_blksize
; /* maximum data link block size */
194 byte in_vers
; /* version number */
195 byte in_eco
; /* ECO number */
196 byte in_ueco
; /* user ECO number */
197 word in_hello
; /* hello timer */
198 byte in_rsvd
; /* reserved image field */
201 struct verifmsg
/* verification message */
203 byte ve_flags
; /* route flags */
204 word ve_src
; /* source node address */
205 byte ve_fcnval
; /* function value image field */
208 struct testmsg
/* hello and test message */
210 byte te_flags
; /* route flags */
211 word te_src
; /* source node address */
212 byte te_data
; /* test data image field */
215 struct l1rout
/* level 1 routing message */
217 byte r1_flags
; /* route flags */
218 word r1_src
; /* source node address */
219 byte r1_rsvd
; /* reserved field */
222 struct l2rout
/* level 2 routing message */
224 byte r2_flags
; /* route flags */
225 word r2_src
; /* source node address */
226 byte r2_rsvd
; /* reserved field */
229 struct rhellomsg
/* router hello message */
231 byte rh_flags
; /* route flags */
232 byte rh_vers
; /* version number */
233 byte rh_eco
; /* ECO number */
234 byte rh_ueco
; /* user ECO number */
235 etheraddr rh_src
; /* source id */
236 byte rh_info
; /* routing layer information */
237 word rh_blksize
; /* maximum data link block size */
238 byte rh_priority
; /* router's priority */
239 byte rh_area
; /* reserved */
240 word rh_hello
; /* hello timer */
241 byte rh_mpd
; /* reserved */
244 struct ehellomsg
/* endnode hello message */
246 byte eh_flags
; /* route flags */
247 byte eh_vers
; /* version number */
248 byte eh_eco
; /* ECO number */
249 byte eh_ueco
; /* user ECO number */
250 etheraddr eh_src
; /* source id */
251 byte eh_info
; /* routing layer information */
252 word eh_blksize
; /* maximum data link block size */
253 byte eh_area
; /* area (reserved) */
254 byte eh_seed
[8]; /* verification seed */
255 etheraddr eh_router
; /* designated router */
256 word eh_hello
; /* hello timer */
257 byte eh_mpd
; /* (reserved) */
258 byte eh_data
; /* test data image field */
263 struct initmsg cm_init
; /* initialization message */
264 struct verifmsg cm_ver
; /* verification message */
265 struct testmsg cm_test
; /* hello and test message */
266 struct l1rout cm_l1rou
; /* level 1 routing message */
267 struct l2rout cm_l2rout
; /* level 2 routing message */
268 struct rhellomsg cm_rhello
; /* router hello message */
269 struct ehellomsg cm_ehello
; /* endnode hello message */
272 /* Macros for decoding routing-info fields */
273 #define RI_COST(x) ((x)&0777)
274 #define RI_HOPS(x) (((x)>>10)&037)
277 * NSP protocol fields and values.
280 #define NSP_TYPEMASK 014 /* mask to isolate type code */
281 #define NSP_SUBMASK 0160 /* mask to isolate subtype code */
282 #define NSP_SUBSHFT 4 /* shift to move subtype code */
284 #define MFT_DATA 0 /* data message */
285 #define MFT_ACK 04 /* acknowledgement message */
286 #define MFT_CTL 010 /* control message */
288 #define MFS_ILS 020 /* data or I/LS indicator */
289 #define MFS_BOM 040 /* beginning of message (data) */
290 #define MFS_MOM 0 /* middle of message (data) */
291 #define MFS_EOM 0100 /* end of message (data) */
292 #define MFS_INT 040 /* interrupt message */
294 #define MFS_DACK 0 /* data acknowledgement */
295 #define MFS_IACK 020 /* I/LS acknowledgement */
296 #define MFS_CACK 040 /* connect acknowledgement */
298 #define MFS_NOP 0 /* no operation */
299 #define MFS_CI 020 /* connect initiate */
300 #define MFS_CC 040 /* connect confirm */
301 #define MFS_DI 060 /* disconnect initiate */
302 #define MFS_DC 0100 /* disconnect confirm */
303 #define MFS_RCI 0140 /* retransmitted connect initiate */
305 #define SGQ_ACK 0100000 /* ack */
306 #define SGQ_NAK 0110000 /* negative ack */
307 #define SGQ_OACK 0120000 /* other channel ack */
308 #define SGQ_ONAK 0130000 /* other channel negative ack */
309 #define SGQ_MASK 07777 /* mask to isolate seq # */
310 #define SGQ_OTHER 020000 /* other channel qualifier */
311 #define SGQ_DELAY 010000 /* ack delay flag */
313 #define SGQ_EOM 0100000 /* pseudo flag for end-of-message */
315 #define LSM_MASK 03 /* mask for modifier field */
316 #define LSM_NOCHANGE 0 /* no change */
317 #define LSM_DONOTSEND 1 /* do not send data */
318 #define LSM_SEND 2 /* send data */
320 #define LSI_MASK 014 /* mask for interpretation field */
321 #define LSI_DATA 0 /* data segment or message count */
322 #define LSI_INTR 4 /* interrupt request count */
323 #define LSI_INTM 0377 /* funny marker for int. message */
325 #define COS_MASK 014 /* mask for flow control field */
326 #define COS_NONE 0 /* no flow control */
327 #define COS_SEGMENT 04 /* segment flow control */
328 #define COS_MESSAGE 010 /* message flow control */
329 #define COS_DEFAULT 1 /* default value for field */
331 #define COI_MASK 3 /* mask for version field */
332 #define COI_32 0 /* version 3.2 */
333 #define COI_31 1 /* version 3.1 */
334 #define COI_40 2 /* version 4.0 */
335 #define COI_41 3 /* version 4.1 */
337 #define MNU_MASK 140 /* mask for session control version */
338 #define MNU_10 000 /* session V1.0 */
339 #define MNU_20 040 /* session V2.0 */
340 #define MNU_ACCESS 1 /* access control present */
341 #define MNU_USRDATA 2 /* user data field present */
342 #define MNU_INVKPROXY 4 /* invoke proxy field present */
343 #define MNU_UICPROXY 8 /* use uic-based proxy */
345 #define DC_NORESOURCES 1 /* no resource reason code */
346 #define DC_NOLINK 41 /* no link terminate reason code */
347 #define DC_COMPLETE 42 /* disconnect complete reason code */
349 #define DI_NOERROR 0 /* user disconnect */
350 #define DI_SHUT 3 /* node is shutting down */
351 #define DI_NOUSER 4 /* destination end user does not exist */
352 #define DI_INVDEST 5 /* invalid end user destination */
353 #define DI_REMRESRC 6 /* insufficient remote resources */
354 #define DI_TPA 8 /* third party abort */
355 #define DI_PROTOCOL 7 /* protocol error discovered */
356 #define DI_ABORT 9 /* user abort */
357 #define DI_LOCALRESRC 32 /* insufficient local resources */
358 #define DI_REMUSERRESRC 33 /* insufficient remote user resources */
359 #define DI_BADACCESS 34 /* bad access control information */
360 #define DI_BADACCNT 36 /* bad ACCOUNT information */
361 #define DI_CONNECTABORT 38 /* connect request cancelled */
362 #define DI_TIMEDOUT 38 /* remote node or user crashed */
363 #define DI_UNREACHABLE 39 /* local timers expired due to ... */
364 #define DI_BADIMAGE 43 /* bad image data in connect */
365 #define DI_SERVMISMATCH 54 /* cryptographic service mismatch */
367 #define UC_OBJREJECT 0 /* object rejected connect */
368 #define UC_USERDISCONNECT 0 /* user disconnect */
369 #define UC_RESOURCES 1 /* insufficient resources (local or remote) */
370 #define UC_NOSUCHNODE 2 /* unrecognized node name */
371 #define UC_REMOTESHUT 3 /* remote node shutting down */
372 #define UC_NOSUCHOBJ 4 /* unrecognized object */
373 #define UC_INVOBJFORMAT 5 /* invalid object name format */
374 #define UC_OBJTOOBUSY 6 /* object too busy */
375 #define UC_NETWORKABORT 8 /* network abort */
376 #define UC_USERABORT 9 /* user abort */
377 #define UC_INVNODEFORMAT 10 /* invalid node name format */
378 #define UC_LOCALSHUT 11 /* local node shutting down */
379 #define UC_ACCESSREJECT 34 /* invalid access control information */
380 #define UC_NORESPONSE 38 /* no response from object */
381 #define UC_UNREACHABLE 39 /* node unreachable */
384 * NSP message formats.
386 struct nsphdr
/* general nsp header */
388 byte nh_flags
; /* message flags */
389 word nh_dst
; /* destination link address */
390 word nh_src
; /* source link address */
393 struct seghdr
/* data segment header */
395 byte sh_flags
; /* message flags */
396 word sh_dst
; /* destination link address */
397 word sh_src
; /* source link address */
398 word sh_seq
[3]; /* sequence numbers */
401 struct minseghdr
/* minimum data segment header */
403 byte ms_flags
; /* message flags */
404 word ms_dst
; /* destination link address */
405 word ms_src
; /* source link address */
406 word ms_seq
; /* sequence number */
409 struct lsmsg
/* link service message (after hdr) */
411 byte ls_lsflags
; /* link service flags */
412 byte ls_fcval
; /* flow control value */
415 struct ackmsg
/* acknowledgement message */
417 byte ak_flags
; /* message flags */
418 word ak_dst
; /* destination link address */
419 word ak_src
; /* source link address */
420 word ak_acknum
[2]; /* acknowledgement numbers */
423 struct minackmsg
/* minimum acknowledgement message */
425 byte mk_flags
; /* message flags */
426 word mk_dst
; /* destination link address */
427 word mk_src
; /* source link address */
428 word mk_acknum
; /* acknowledgement number */
431 struct ciackmsg
/* connect acknowledgement message */
433 byte ck_flags
; /* message flags */
434 word ck_dst
; /* destination link address */
437 struct cimsg
/* connect initiate message */
439 byte ci_flags
; /* message flags */
440 word ci_dst
; /* destination link address (0) */
441 word ci_src
; /* source link address */
442 byte ci_services
; /* requested services */
443 byte ci_info
; /* information */
444 word ci_segsize
; /* maximum segment size */
447 struct ccmsg
/* connect confirm message */
449 byte cc_flags
; /* message flags */
450 word cc_dst
; /* destination link address */
451 word cc_src
; /* source link address */
452 byte cc_services
; /* requested services */
453 byte cc_info
; /* information */
454 word cc_segsize
; /* maximum segment size */
455 byte cc_optlen
; /* optional data length */
458 struct cnmsg
/* generic connect message */
460 byte cn_flags
; /* message flags */
461 word cn_dst
; /* destination link address */
462 word cn_src
; /* source link address */
463 byte cn_services
; /* requested services */
464 byte cn_info
; /* information */
465 word cn_segsize
; /* maximum segment size */
468 struct dimsg
/* disconnect initiate message */
470 byte di_flags
; /* message flags */
471 word di_dst
; /* destination link address */
472 word di_src
; /* source link address */
473 word di_reason
; /* reason code */
474 byte di_optlen
; /* optional data length */
477 struct dcmsg
/* disconnect confirm message */
479 byte dc_flags
; /* message flags */
480 word dc_dst
; /* destination link address */
481 word dc_src
; /* source link address */
482 word dc_reason
; /* reason code */
486 static int print_decnet_ctlmsg(netdissect_options
*, const union routehdr
*, u_int
, u_int
);
487 static void print_t_info(netdissect_options
*, int);
488 static int print_l1_routes(netdissect_options
*, const char *, u_int
);
489 static int print_l2_routes(netdissect_options
*, const char *, u_int
);
490 static void print_i_info(netdissect_options
*, int);
491 static int print_elist(const char *, u_int
);
492 static int print_nsp(netdissect_options
*, const u_char
*, u_int
);
493 static void print_reason(netdissect_options
*, int);
495 #ifndef HAVE_NETDNET_DNETDB_H_DNET_HTOA
496 extern char *dnet_htoa(struct dn_naddr
*);
500 decnet_print(netdissect_options
*ndo
,
501 register const u_char
*ap
, register u_int length
,
502 register u_int caplen
)
504 register const union routehdr
*rhp
;
507 u_int nsplen
, pktlen
;
510 if (length
< sizeof(struct shorthdr
)) {
511 ND_PRINT((ndo
, "%s", tstr
));
515 ND_TCHECK2(*ap
, sizeof(short));
516 pktlen
= EXTRACT_LE_16BITS(ap
);
517 if (pktlen
< sizeof(struct shorthdr
)) {
518 ND_PRINT((ndo
, "%s", tstr
));
521 if (pktlen
> length
) {
522 ND_PRINT((ndo
, "%s", tstr
));
527 rhp
= (const union routehdr
*)&(ap
[sizeof(short)]);
528 ND_TCHECK(rhp
->rh_short
.sh_flags
);
529 mflags
= EXTRACT_LE_8BITS(rhp
->rh_short
.sh_flags
);
531 if (mflags
& RMF_PAD
) {
532 /* pad bytes of some sort in front of message */
533 u_int padlen
= mflags
& RMF_PADMASK
;
535 ND_PRINT((ndo
, "[pad:%d] ", padlen
));
536 if (length
< padlen
+ 2) {
537 ND_PRINT((ndo
, "%s", tstr
));
540 ND_TCHECK2(ap
[sizeof(short)], padlen
);
544 rhp
= (const union routehdr
*)&(ap
[sizeof(short)]);
545 mflags
= EXTRACT_LE_8BITS(rhp
->rh_short
.sh_flags
);
548 if (mflags
& RMF_FVER
) {
549 ND_PRINT((ndo
, "future-version-decnet"));
550 ND_DEFAULTPRINT(ap
, min(length
, caplen
));
554 /* is it a control message? */
555 if (mflags
& RMF_CTLMSG
) {
556 if (!print_decnet_ctlmsg(ndo
, rhp
, length
, caplen
))
561 switch (mflags
& RMF_MASK
) {
563 if (length
< sizeof(struct longhdr
)) {
564 ND_PRINT((ndo
, "%s", tstr
));
567 ND_TCHECK(rhp
->rh_long
);
569 EXTRACT_LE_16BITS(rhp
->rh_long
.lg_dst
.dne_remote
.dne_nodeaddr
);
571 EXTRACT_LE_16BITS(rhp
->rh_long
.lg_src
.dne_remote
.dne_nodeaddr
);
572 hops
= EXTRACT_LE_8BITS(rhp
->rh_long
.lg_visits
);
573 nspp
= &(ap
[sizeof(short) + sizeof(struct longhdr
)]);
574 nsplen
= length
- sizeof(struct longhdr
);
577 ND_TCHECK(rhp
->rh_short
);
578 dst
= EXTRACT_LE_16BITS(rhp
->rh_short
.sh_dst
);
579 src
= EXTRACT_LE_16BITS(rhp
->rh_short
.sh_src
);
580 hops
= (EXTRACT_LE_8BITS(rhp
->rh_short
.sh_visits
) & VIS_MASK
)+1;
581 nspp
= &(ap
[sizeof(short) + sizeof(struct shorthdr
)]);
582 nsplen
= length
- sizeof(struct shorthdr
);
585 ND_PRINT((ndo
, "unknown message flags under mask"));
586 ND_DEFAULTPRINT((const u_char
*)ap
, min(length
, caplen
));
590 ND_PRINT((ndo
, "%s > %s %d ",
591 dnaddr_string(ndo
, src
), dnaddr_string(ndo
, dst
), pktlen
));
592 if (ndo
->ndo_vflag
) {
593 if (mflags
& RMF_RQR
)
594 ND_PRINT((ndo
, "RQR "));
595 if (mflags
& RMF_RTS
)
596 ND_PRINT((ndo
, "RTS "));
598 ND_PRINT((ndo
, "IE "));
599 ND_PRINT((ndo
, "%d hops ", hops
));
602 if (!print_nsp(ndo
, nspp
, nsplen
))
607 ND_PRINT((ndo
, "%s", tstr
));
612 print_decnet_ctlmsg(netdissect_options
*ndo
,
613 register const union routehdr
*rhp
, u_int length
,
616 int mflags
= EXTRACT_LE_8BITS(rhp
->rh_short
.sh_flags
);
617 register const union controlmsg
*cmp
= (const union controlmsg
*)rhp
;
618 int src
, dst
, info
, blksize
, eco
, ueco
, hello
, other
, vers
;
619 etheraddr srcea
, rtea
;
621 const char *rhpx
= (const char *)rhp
;
624 switch (mflags
& RMF_CTLMASK
) {
626 ND_PRINT((ndo
, "init "));
627 if (length
< sizeof(struct initmsg
))
629 ND_TCHECK(cmp
->cm_init
);
630 src
= EXTRACT_LE_16BITS(cmp
->cm_init
.in_src
);
631 info
= EXTRACT_LE_8BITS(cmp
->cm_init
.in_info
);
632 blksize
= EXTRACT_LE_16BITS(cmp
->cm_init
.in_blksize
);
633 vers
= EXTRACT_LE_8BITS(cmp
->cm_init
.in_vers
);
634 eco
= EXTRACT_LE_8BITS(cmp
->cm_init
.in_eco
);
635 ueco
= EXTRACT_LE_8BITS(cmp
->cm_init
.in_ueco
);
636 hello
= EXTRACT_LE_16BITS(cmp
->cm_init
.in_hello
);
637 print_t_info(ndo
, info
);
639 "src %sblksize %d vers %d eco %d ueco %d hello %d",
640 dnaddr_string(ndo
, src
), blksize
, vers
, eco
, ueco
,
645 ND_PRINT((ndo
, "verification "));
646 if (length
< sizeof(struct verifmsg
))
648 ND_TCHECK(cmp
->cm_ver
);
649 src
= EXTRACT_LE_16BITS(cmp
->cm_ver
.ve_src
);
650 other
= EXTRACT_LE_8BITS(cmp
->cm_ver
.ve_fcnval
);
651 ND_PRINT((ndo
, "src %s fcnval %o", dnaddr_string(ndo
, src
), other
));
655 ND_PRINT((ndo
, "test "));
656 if (length
< sizeof(struct testmsg
))
658 ND_TCHECK(cmp
->cm_test
);
659 src
= EXTRACT_LE_16BITS(cmp
->cm_test
.te_src
);
660 other
= EXTRACT_LE_8BITS(cmp
->cm_test
.te_data
);
661 ND_PRINT((ndo
, "src %s data %o", dnaddr_string(ndo
, src
), other
));
665 ND_PRINT((ndo
, "lev-1-routing "));
666 if (length
< sizeof(struct l1rout
))
668 ND_TCHECK(cmp
->cm_l1rou
);
669 src
= EXTRACT_LE_16BITS(cmp
->cm_l1rou
.r1_src
);
670 ND_PRINT((ndo
, "src %s ", dnaddr_string(ndo
, src
)));
671 ret
= print_l1_routes(ndo
, &(rhpx
[sizeof(struct l1rout
)]),
672 length
- sizeof(struct l1rout
));
675 ND_PRINT((ndo
, "lev-2-routing "));
676 if (length
< sizeof(struct l2rout
))
678 ND_TCHECK(cmp
->cm_l2rout
);
679 src
= EXTRACT_LE_16BITS(cmp
->cm_l2rout
.r2_src
);
680 ND_PRINT((ndo
, "src %s ", dnaddr_string(ndo
, src
)));
681 ret
= print_l2_routes(ndo
, &(rhpx
[sizeof(struct l2rout
)]),
682 length
- sizeof(struct l2rout
));
685 ND_PRINT((ndo
, "router-hello "));
686 if (length
< sizeof(struct rhellomsg
))
688 ND_TCHECK(cmp
->cm_rhello
);
689 vers
= EXTRACT_LE_8BITS(cmp
->cm_rhello
.rh_vers
);
690 eco
= EXTRACT_LE_8BITS(cmp
->cm_rhello
.rh_eco
);
691 ueco
= EXTRACT_LE_8BITS(cmp
->cm_rhello
.rh_ueco
);
692 memcpy((char *)&srcea
, (const char *)&(cmp
->cm_rhello
.rh_src
),
694 src
= EXTRACT_LE_16BITS(srcea
.dne_remote
.dne_nodeaddr
);
695 info
= EXTRACT_LE_8BITS(cmp
->cm_rhello
.rh_info
);
696 blksize
= EXTRACT_LE_16BITS(cmp
->cm_rhello
.rh_blksize
);
697 priority
= EXTRACT_LE_8BITS(cmp
->cm_rhello
.rh_priority
);
698 hello
= EXTRACT_LE_16BITS(cmp
->cm_rhello
.rh_hello
);
699 print_i_info(ndo
, info
);
701 "vers %d eco %d ueco %d src %s blksize %d pri %d hello %d",
702 vers
, eco
, ueco
, dnaddr_string(ndo
, src
),
703 blksize
, priority
, hello
));
704 ret
= print_elist(&(rhpx
[sizeof(struct rhellomsg
)]),
705 length
- sizeof(struct rhellomsg
));
708 ND_PRINT((ndo
, "endnode-hello "));
709 if (length
< sizeof(struct ehellomsg
))
711 ND_TCHECK(cmp
->cm_ehello
);
712 vers
= EXTRACT_LE_8BITS(cmp
->cm_ehello
.eh_vers
);
713 eco
= EXTRACT_LE_8BITS(cmp
->cm_ehello
.eh_eco
);
714 ueco
= EXTRACT_LE_8BITS(cmp
->cm_ehello
.eh_ueco
);
715 memcpy((char *)&srcea
, (const char *)&(cmp
->cm_ehello
.eh_src
),
717 src
= EXTRACT_LE_16BITS(srcea
.dne_remote
.dne_nodeaddr
);
718 info
= EXTRACT_LE_8BITS(cmp
->cm_ehello
.eh_info
);
719 blksize
= EXTRACT_LE_16BITS(cmp
->cm_ehello
.eh_blksize
);
721 memcpy((char *)&rtea
, (const char *)&(cmp
->cm_ehello
.eh_router
),
723 dst
= EXTRACT_LE_16BITS(rtea
.dne_remote
.dne_nodeaddr
);
724 hello
= EXTRACT_LE_16BITS(cmp
->cm_ehello
.eh_hello
);
725 other
= EXTRACT_LE_8BITS(cmp
->cm_ehello
.eh_data
);
726 print_i_info(ndo
, info
);
728 "vers %d eco %d ueco %d src %s blksize %d rtr %s hello %d data %o",
729 vers
, eco
, ueco
, dnaddr_string(ndo
, src
),
730 blksize
, dnaddr_string(ndo
, dst
), hello
, other
));
735 ND_PRINT((ndo
, "unknown control message"));
736 ND_DEFAULTPRINT((const u_char
*)rhp
, min(length
, caplen
));
747 print_t_info(netdissect_options
*ndo
,
750 int ntype
= info
& 3;
752 case 0: ND_PRINT((ndo
, "reserved-ntype? ")); break;
753 case TI_L2ROUT
: ND_PRINT((ndo
, "l2rout ")); break;
754 case TI_L1ROUT
: ND_PRINT((ndo
, "l1rout ")); break;
755 case TI_ENDNODE
: ND_PRINT((ndo
, "endnode ")); break;
758 ND_PRINT((ndo
, "verif "));
760 ND_PRINT((ndo
, "blo "));
764 print_l1_routes(netdissect_options
*ndo
,
765 const char *rp
, u_int len
)
771 /* The last short is a checksum */
772 while (len
> (3 * sizeof(short))) {
773 ND_TCHECK2(*rp
, 3 * sizeof(short));
774 count
= EXTRACT_LE_16BITS(rp
);
776 return (1); /* seems to be bogus from here on */
778 len
-= sizeof(short);
779 id
= EXTRACT_LE_16BITS(rp
);
781 len
-= sizeof(short);
782 info
= EXTRACT_LE_16BITS(rp
);
784 len
-= sizeof(short);
785 ND_PRINT((ndo
, "{ids %d-%d cost %d hops %d} ", id
, id
+ count
,
786 RI_COST(info
), RI_HOPS(info
)));
795 print_l2_routes(netdissect_options
*ndo
,
796 const char *rp
, u_int len
)
802 /* The last short is a checksum */
803 while (len
> (3 * sizeof(short))) {
804 ND_TCHECK2(*rp
, 3 * sizeof(short));
805 count
= EXTRACT_LE_16BITS(rp
);
807 return (1); /* seems to be bogus from here on */
809 len
-= sizeof(short);
810 area
= EXTRACT_LE_16BITS(rp
);
812 len
-= sizeof(short);
813 info
= EXTRACT_LE_16BITS(rp
);
815 len
-= sizeof(short);
816 ND_PRINT((ndo
, "{areas %d-%d cost %d hops %d} ", area
, area
+ count
,
817 RI_COST(info
), RI_HOPS(info
)));
826 print_i_info(netdissect_options
*ndo
,
829 int ntype
= info
& II_TYPEMASK
;
831 case 0: ND_PRINT((ndo
, "reserved-ntype? ")); break;
832 case II_L2ROUT
: ND_PRINT((ndo
, "l2rout ")); break;
833 case II_L1ROUT
: ND_PRINT((ndo
, "l1rout ")); break;
834 case II_ENDNODE
: ND_PRINT((ndo
, "endnode ")); break;
837 ND_PRINT((ndo
, "verif "));
838 if (info
& II_NOMCAST
)
839 ND_PRINT((ndo
, "nomcast "));
841 ND_PRINT((ndo
, "blo "));
845 print_elist(const char *elp _U_
, u_int len _U_
)
847 /* Not enough examples available for me to debug this */
852 print_nsp(netdissect_options
*ndo
,
853 const u_char
*nspp
, u_int nsplen
)
855 const struct nsphdr
*nsphp
= (const struct nsphdr
*)nspp
;
858 if (nsplen
< sizeof(struct nsphdr
))
861 flags
= EXTRACT_LE_8BITS(nsphp
->nh_flags
);
862 dst
= EXTRACT_LE_16BITS(nsphp
->nh_dst
);
863 src
= EXTRACT_LE_16BITS(nsphp
->nh_src
);
865 switch (flags
& NSP_TYPEMASK
) {
867 switch (flags
& NSP_SUBMASK
) {
871 case MFS_BOM
+MFS_EOM
:
872 ND_PRINT((ndo
, "data %d>%d ", src
, dst
));
874 const struct seghdr
*shp
= (const struct seghdr
*)nspp
;
876 u_int data_off
= sizeof(struct minseghdr
);
878 if (nsplen
< data_off
)
880 ND_TCHECK(shp
->sh_seq
[0]);
881 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[0]);
882 if (ack
& SGQ_ACK
) { /* acknum field */
883 if ((ack
& SGQ_NAK
) == SGQ_NAK
)
884 ND_PRINT((ndo
, "nak %d ", ack
& SGQ_MASK
));
886 ND_PRINT((ndo
, "ack %d ", ack
& SGQ_MASK
));
887 data_off
+= sizeof(short);
888 if (nsplen
< data_off
)
890 ND_TCHECK(shp
->sh_seq
[1]);
891 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[1]);
892 if (ack
& SGQ_OACK
) { /* ackoth field */
893 if ((ack
& SGQ_ONAK
) == SGQ_ONAK
)
894 ND_PRINT((ndo
, "onak %d ", ack
& SGQ_MASK
));
896 ND_PRINT((ndo
, "oack %d ", ack
& SGQ_MASK
));
897 data_off
+= sizeof(short);
898 if (nsplen
< data_off
)
900 ND_TCHECK(shp
->sh_seq
[2]);
901 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[2]);
904 ND_PRINT((ndo
, "seg %d ", ack
& SGQ_MASK
));
907 case MFS_ILS
+MFS_INT
:
908 ND_PRINT((ndo
, "intr "));
910 const struct seghdr
*shp
= (const struct seghdr
*)nspp
;
912 u_int data_off
= sizeof(struct minseghdr
);
914 if (nsplen
< data_off
)
916 ND_TCHECK(shp
->sh_seq
[0]);
917 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[0]);
918 if (ack
& SGQ_ACK
) { /* acknum field */
919 if ((ack
& SGQ_NAK
) == SGQ_NAK
)
920 ND_PRINT((ndo
, "nak %d ", ack
& SGQ_MASK
));
922 ND_PRINT((ndo
, "ack %d ", ack
& SGQ_MASK
));
923 data_off
+= sizeof(short);
924 if (nsplen
< data_off
)
926 ND_TCHECK(shp
->sh_seq
[1]);
927 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[1]);
928 if (ack
& SGQ_OACK
) { /* ackdat field */
929 if ((ack
& SGQ_ONAK
) == SGQ_ONAK
)
930 ND_PRINT((ndo
, "nakdat %d ", ack
& SGQ_MASK
));
932 ND_PRINT((ndo
, "ackdat %d ", ack
& SGQ_MASK
));
933 data_off
+= sizeof(short);
934 if (nsplen
< data_off
)
936 ND_TCHECK(shp
->sh_seq
[2]);
937 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[2]);
940 ND_PRINT((ndo
, "seg %d ", ack
& SGQ_MASK
));
944 ND_PRINT((ndo
, "link-service %d>%d ", src
, dst
));
946 const struct seghdr
*shp
= (const struct seghdr
*)nspp
;
947 const struct lsmsg
*lsmp
=
948 (const struct lsmsg
*)&(nspp
[sizeof(struct seghdr
)]);
952 if (nsplen
< sizeof(struct seghdr
) + sizeof(struct lsmsg
))
954 ND_TCHECK(shp
->sh_seq
[0]);
955 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[0]);
956 if (ack
& SGQ_ACK
) { /* acknum field */
957 if ((ack
& SGQ_NAK
) == SGQ_NAK
)
958 ND_PRINT((ndo
, "nak %d ", ack
& SGQ_MASK
));
960 ND_PRINT((ndo
, "ack %d ", ack
& SGQ_MASK
));
961 ND_TCHECK(shp
->sh_seq
[1]);
962 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[1]);
963 if (ack
& SGQ_OACK
) { /* ackdat field */
964 if ((ack
& SGQ_ONAK
) == SGQ_ONAK
)
965 ND_PRINT((ndo
, "nakdat %d ", ack
& SGQ_MASK
));
967 ND_PRINT((ndo
, "ackdat %d ", ack
& SGQ_MASK
));
968 ND_TCHECK(shp
->sh_seq
[2]);
969 ack
= EXTRACT_LE_16BITS(shp
->sh_seq
[2]);
972 ND_PRINT((ndo
, "seg %d ", ack
& SGQ_MASK
));
974 lsflags
= EXTRACT_LE_8BITS(lsmp
->ls_lsflags
);
975 fcval
= EXTRACT_LE_8BITS(lsmp
->ls_fcval
);
976 switch (lsflags
& LSI_MASK
) {
978 ND_PRINT((ndo
, "dat seg count %d ", fcval
));
979 switch (lsflags
& LSM_MASK
) {
983 ND_PRINT((ndo
, "donotsend-data "));
986 ND_PRINT((ndo
, "send-data "));
989 ND_PRINT((ndo
, "reserved-fcmod? %x", lsflags
));
994 ND_PRINT((ndo
, "intr req count %d ", fcval
));
997 ND_PRINT((ndo
, "reserved-fcval-int? %x", lsflags
));
1003 ND_PRINT((ndo
, "reserved-subtype? %x %d > %d", flags
, src
, dst
));
1008 switch (flags
& NSP_SUBMASK
) {
1010 ND_PRINT((ndo
, "data-ack %d>%d ", src
, dst
));
1012 const struct ackmsg
*amp
= (const struct ackmsg
*)nspp
;
1015 if (nsplen
< sizeof(struct ackmsg
))
1018 ack
= EXTRACT_LE_16BITS(amp
->ak_acknum
[0]);
1019 if (ack
& SGQ_ACK
) { /* acknum field */
1020 if ((ack
& SGQ_NAK
) == SGQ_NAK
)
1021 ND_PRINT((ndo
, "nak %d ", ack
& SGQ_MASK
));
1023 ND_PRINT((ndo
, "ack %d ", ack
& SGQ_MASK
));
1024 ack
= EXTRACT_LE_16BITS(amp
->ak_acknum
[1]);
1025 if (ack
& SGQ_OACK
) { /* ackoth field */
1026 if ((ack
& SGQ_ONAK
) == SGQ_ONAK
)
1027 ND_PRINT((ndo
, "onak %d ", ack
& SGQ_MASK
));
1029 ND_PRINT((ndo
, "oack %d ", ack
& SGQ_MASK
));
1035 ND_PRINT((ndo
, "ils-ack %d>%d ", src
, dst
));
1037 const struct ackmsg
*amp
= (const struct ackmsg
*)nspp
;
1040 if (nsplen
< sizeof(struct ackmsg
))
1043 ack
= EXTRACT_LE_16BITS(amp
->ak_acknum
[0]);
1044 if (ack
& SGQ_ACK
) { /* acknum field */
1045 if ((ack
& SGQ_NAK
) == SGQ_NAK
)
1046 ND_PRINT((ndo
, "nak %d ", ack
& SGQ_MASK
));
1048 ND_PRINT((ndo
, "ack %d ", ack
& SGQ_MASK
));
1049 ND_TCHECK(amp
->ak_acknum
[1]);
1050 ack
= EXTRACT_LE_16BITS(amp
->ak_acknum
[1]);
1051 if (ack
& SGQ_OACK
) { /* ackdat field */
1052 if ((ack
& SGQ_ONAK
) == SGQ_ONAK
)
1053 ND_PRINT((ndo
, "nakdat %d ", ack
& SGQ_MASK
));
1055 ND_PRINT((ndo
, "ackdat %d ", ack
& SGQ_MASK
));
1061 ND_PRINT((ndo
, "conn-ack %d", dst
));
1064 ND_PRINT((ndo
, "reserved-acktype? %x %d > %d", flags
, src
, dst
));
1069 switch (flags
& NSP_SUBMASK
) {
1072 if ((flags
& NSP_SUBMASK
) == MFS_CI
)
1073 ND_PRINT((ndo
, "conn-initiate "));
1075 ND_PRINT((ndo
, "retrans-conn-initiate "));
1076 ND_PRINT((ndo
, "%d>%d ", src
, dst
));
1078 const struct cimsg
*cimp
= (const struct cimsg
*)nspp
;
1079 int services
, info
, segsize
;
1081 if (nsplen
< sizeof(struct cimsg
))
1084 services
= EXTRACT_LE_8BITS(cimp
->ci_services
);
1085 info
= EXTRACT_LE_8BITS(cimp
->ci_info
);
1086 segsize
= EXTRACT_LE_16BITS(cimp
->ci_segsize
);
1088 switch (services
& COS_MASK
) {
1092 ND_PRINT((ndo
, "seg "));
1095 ND_PRINT((ndo
, "msg "));
1098 switch (info
& COI_MASK
) {
1100 ND_PRINT((ndo
, "ver 3.2 "));
1103 ND_PRINT((ndo
, "ver 3.1 "));
1106 ND_PRINT((ndo
, "ver 4.0 "));
1109 ND_PRINT((ndo
, "ver 4.1 "));
1112 ND_PRINT((ndo
, "segsize %d ", segsize
));
1116 ND_PRINT((ndo
, "conn-confirm %d>%d ", src
, dst
));
1118 const struct ccmsg
*ccmp
= (const struct ccmsg
*)nspp
;
1120 u_int segsize
, optlen
;
1122 if (nsplen
< sizeof(struct ccmsg
))
1125 services
= EXTRACT_LE_8BITS(ccmp
->cc_services
);
1126 info
= EXTRACT_LE_8BITS(ccmp
->cc_info
);
1127 segsize
= EXTRACT_LE_16BITS(ccmp
->cc_segsize
);
1128 optlen
= EXTRACT_LE_8BITS(ccmp
->cc_optlen
);
1130 switch (services
& COS_MASK
) {
1134 ND_PRINT((ndo
, "seg "));
1137 ND_PRINT((ndo
, "msg "));
1140 switch (info
& COI_MASK
) {
1142 ND_PRINT((ndo
, "ver 3.2 "));
1145 ND_PRINT((ndo
, "ver 3.1 "));
1148 ND_PRINT((ndo
, "ver 4.0 "));
1151 ND_PRINT((ndo
, "ver 4.1 "));
1154 ND_PRINT((ndo
, "segsize %d ", segsize
));
1156 ND_PRINT((ndo
, "optlen %d ", optlen
));
1161 ND_PRINT((ndo
, "disconn-initiate %d>%d ", src
, dst
));
1163 const struct dimsg
*dimp
= (const struct dimsg
*)nspp
;
1167 if (nsplen
< sizeof(struct dimsg
))
1170 reason
= EXTRACT_LE_16BITS(dimp
->di_reason
);
1171 optlen
= EXTRACT_LE_8BITS(dimp
->di_optlen
);
1173 print_reason(ndo
, reason
);
1175 ND_PRINT((ndo
, "optlen %d ", optlen
));
1180 ND_PRINT((ndo
, "disconn-confirm %d>%d ", src
, dst
));
1182 const struct dcmsg
*dcmp
= (const struct dcmsg
*)nspp
;
1186 reason
= EXTRACT_LE_16BITS(dcmp
->dc_reason
);
1188 print_reason(ndo
, reason
);
1192 ND_PRINT((ndo
, "reserved-ctltype? %x %d > %d", flags
, src
, dst
));
1197 ND_PRINT((ndo
, "reserved-type? %x %d > %d", flags
, src
, dst
));
1206 static const struct tok reason2str
[] = {
1207 { UC_OBJREJECT
, "object rejected connect" },
1208 { UC_RESOURCES
, "insufficient resources" },
1209 { UC_NOSUCHNODE
, "unrecognized node name" },
1210 { DI_SHUT
, "node is shutting down" },
1211 { UC_NOSUCHOBJ
, "unrecognized object" },
1212 { UC_INVOBJFORMAT
, "invalid object name format" },
1213 { UC_OBJTOOBUSY
, "object too busy" },
1214 { DI_PROTOCOL
, "protocol error discovered" },
1215 { DI_TPA
, "third party abort" },
1216 { UC_USERABORT
, "user abort" },
1217 { UC_INVNODEFORMAT
, "invalid node name format" },
1218 { UC_LOCALSHUT
, "local node shutting down" },
1219 { DI_LOCALRESRC
, "insufficient local resources" },
1220 { DI_REMUSERRESRC
, "insufficient remote user resources" },
1221 { UC_ACCESSREJECT
, "invalid access control information" },
1222 { DI_BADACCNT
, "bad ACCOUNT information" },
1223 { UC_NORESPONSE
, "no response from object" },
1224 { UC_UNREACHABLE
, "node unreachable" },
1225 { DC_NOLINK
, "no link terminate" },
1226 { DC_COMPLETE
, "disconnect complete" },
1227 { DI_BADIMAGE
, "bad image data in connect" },
1228 { DI_SERVMISMATCH
, "cryptographic service mismatch" },
1233 print_reason(netdissect_options
*ndo
,
1234 register int reason
)
1236 ND_PRINT((ndo
, "%s ", tok2str(reason2str
, "reason-%d", reason
)));
1240 dnnum_string(netdissect_options
*ndo
, u_short dnaddr
)
1244 int area
= (u_short
)(dnaddr
& AREAMASK
) >> AREASHIFT
;
1245 int node
= dnaddr
& NODEMASK
;
1247 str
= (char *)malloc(siz
= sizeof("00.0000"));
1249 (*ndo
->ndo_error
)(ndo
, "dnnum_string: malloc");
1250 snprintf(str
, siz
, "%d.%d", area
, node
);
1255 dnname_string(netdissect_options
*ndo
, u_short dnaddr
)
1257 #ifdef HAVE_DNET_HTOA
1258 struct dn_naddr dna
;
1261 dna
.a_len
= sizeof(short);
1262 memcpy((char *)dna
.a_addr
, (char *)&dnaddr
, sizeof(short));
1263 dnname
= dnet_htoa(&dna
);
1265 return (strdup(dnname
));
1267 return(dnnum_string(ndo
, dnaddr
));
1269 return(dnnum_string(ndo
, dnaddr
)); /* punt */