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