xref: /dragonfly/contrib/tcpdump/print-rx.c (revision 9348a738)
1 /*
2  * Copyright: (c) 2000 United States Government as represented by the
3  *	Secretary of the Navy. All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  *   1. Redistributions of source code must retain the above copyright
10  *      notice, this list of conditions and the following disclaimer.
11  *   2. Redistributions in binary form must reproduce the above copyright
12  *      notice, this list of conditions and the following disclaimer in
13  *      the documentation and/or other materials provided with the
14  *      distribution.
15  *   3. The names of the authors may not be used to endorse or promote
16  *      products derived from this software without specific prior
17  *      written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
20  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
21  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
22  */
23 /*
24  * This code unmangles RX packets.  RX is the mutant form of RPC that AFS
25  * uses to communicate between clients and servers.
26  *
27  * In this code, I mainly concern myself with decoding the AFS calls, not
28  * with the guts of RX, per se.
29  *
30  * Bah.  If I never look at rx_packet.h again, it will be too soon.
31  *
32  * Ken Hornstein <kenh@cmf.nrl.navy.mil>
33  */
34 
35 #ifndef lint
36 static const char rcsid[] _U_ =
37     "@(#) $Header: /tcpdump/master/tcpdump/print-rx.c,v 1.42 2008-07-01 07:44:50 guy Exp $";
38 #endif
39 
40 #ifdef HAVE_CONFIG_H
41 #include "config.h"
42 #endif
43 
44 #include <stdio.h>
45 #include <stdlib.h>
46 #include <string.h>
47 #include <tcpdump-stdinc.h>
48 
49 #include "interface.h"
50 #include "addrtoname.h"
51 #include "extract.h"
52 
53 #include "rx.h"
54 
55 #include "ip.h"
56 
57 static struct tok rx_types[] = {
58 	{ RX_PACKET_TYPE_DATA,		"data" },
59 	{ RX_PACKET_TYPE_ACK,		"ack" },
60 	{ RX_PACKET_TYPE_BUSY,		"busy" },
61 	{ RX_PACKET_TYPE_ABORT,		"abort" },
62 	{ RX_PACKET_TYPE_ACKALL,	"ackall" },
63 	{ RX_PACKET_TYPE_CHALLENGE,	"challenge" },
64 	{ RX_PACKET_TYPE_RESPONSE,	"response" },
65 	{ RX_PACKET_TYPE_DEBUG,		"debug" },
66 	{ RX_PACKET_TYPE_PARAMS,	"params" },
67 	{ RX_PACKET_TYPE_VERSION,	"version" },
68 	{ 0,				NULL },
69 };
70 
71 static struct double_tok {
72 	int flag;		/* Rx flag */
73 	int packetType;		/* Packet type */
74 	const char *s;		/* Flag string */
75 } rx_flags[] = {
76 	{ RX_CLIENT_INITIATED,	0,			"client-init" },
77 	{ RX_REQUEST_ACK,	0,			"req-ack" },
78 	{ RX_LAST_PACKET,	0,			"last-pckt" },
79 	{ RX_MORE_PACKETS,	0,			"more-pckts" },
80 	{ RX_FREE_PACKET,	0,			"free-pckt" },
81 	{ RX_SLOW_START_OK,	RX_PACKET_TYPE_ACK,	"slow-start" },
82 	{ RX_JUMBO_PACKET,	RX_PACKET_TYPE_DATA,	"jumbogram" }
83 };
84 
85 static struct tok fs_req[] = {
86 	{ 130,		"fetch-data" },
87 	{ 131,		"fetch-acl" },
88 	{ 132,		"fetch-status" },
89 	{ 133,		"store-data" },
90 	{ 134,		"store-acl" },
91 	{ 135,		"store-status" },
92 	{ 136,		"remove-file" },
93 	{ 137,		"create-file" },
94 	{ 138,		"rename" },
95 	{ 139,		"symlink" },
96 	{ 140,		"link" },
97 	{ 141,		"makedir" },
98 	{ 142,		"rmdir" },
99 	{ 143,		"oldsetlock" },
100 	{ 144,		"oldextlock" },
101 	{ 145,		"oldrellock" },
102 	{ 146,		"get-stats" },
103 	{ 147,		"give-cbs" },
104 	{ 148,		"get-vlinfo" },
105 	{ 149,		"get-vlstats" },
106 	{ 150,		"set-vlstats" },
107 	{ 151,		"get-rootvl" },
108 	{ 152,		"check-token" },
109 	{ 153,		"get-time" },
110 	{ 154,		"nget-vlinfo" },
111 	{ 155,		"bulk-stat" },
112 	{ 156,		"setlock" },
113 	{ 157,		"extlock" },
114 	{ 158,		"rellock" },
115 	{ 159,		"xstat-ver" },
116 	{ 160,		"get-xstat" },
117 	{ 161,		"dfs-lookup" },
118 	{ 162,		"dfs-flushcps" },
119 	{ 163,		"dfs-symlink" },
120 	{ 220,		"residency" },
121 	{ 65536,        "inline-bulk-status" },
122 	{ 65537,        "fetch-data-64" },
123 	{ 65538,        "store-data-64" },
124 	{ 65539,        "give-up-all-cbs" },
125 	{ 65540,        "get-caps" },
126 	{ 65541,        "cb-rx-conn-addr" },
127 	{ 0,		NULL },
128 };
129 
130 static struct tok cb_req[] = {
131 	{ 204,		"callback" },
132 	{ 205,		"initcb" },
133 	{ 206,		"probe" },
134 	{ 207,		"getlock" },
135 	{ 208,		"getce" },
136 	{ 209,		"xstatver" },
137 	{ 210,		"getxstat" },
138 	{ 211,		"initcb2" },
139 	{ 212,		"whoareyou" },
140 	{ 213,		"initcb3" },
141 	{ 214,		"probeuuid" },
142 	{ 215,		"getsrvprefs" },
143 	{ 216,		"getcellservdb" },
144 	{ 217,		"getlocalcell" },
145 	{ 218,		"getcacheconf" },
146 	{ 65536,        "getce64" },
147 	{ 65537,        "getcellbynum" },
148 	{ 65538,        "tellmeaboutyourself" },
149 	{ 0,		NULL },
150 };
151 
152 static struct tok pt_req[] = {
153 	{ 500,		"new-user" },
154 	{ 501,		"where-is-it" },
155 	{ 502,		"dump-entry" },
156 	{ 503,		"add-to-group" },
157 	{ 504,		"name-to-id" },
158 	{ 505,		"id-to-name" },
159 	{ 506,		"delete" },
160 	{ 507,		"remove-from-group" },
161 	{ 508,		"get-cps" },
162 	{ 509,		"new-entry" },
163 	{ 510,		"list-max" },
164 	{ 511,		"set-max" },
165 	{ 512,		"list-entry" },
166 	{ 513,		"change-entry" },
167 	{ 514,		"list-elements" },
168 	{ 515,		"same-mbr-of" },
169 	{ 516,		"set-fld-sentry" },
170 	{ 517,		"list-owned" },
171 	{ 518,		"get-cps2" },
172 	{ 519,		"get-host-cps" },
173 	{ 520,		"update-entry" },
174 	{ 521,		"list-entries" },
175 	{ 530,		"list-super-groups" },
176 	{ 0,		NULL },
177 };
178 
179 static struct tok vldb_req[] = {
180 	{ 501,		"create-entry" },
181 	{ 502,		"delete-entry" },
182 	{ 503,		"get-entry-by-id" },
183 	{ 504,		"get-entry-by-name" },
184 	{ 505,		"get-new-volume-id" },
185 	{ 506,		"replace-entry" },
186 	{ 507,		"update-entry" },
187 	{ 508,		"setlock" },
188 	{ 509,		"releaselock" },
189 	{ 510,		"list-entry" },
190 	{ 511,		"list-attrib" },
191 	{ 512,		"linked-list" },
192 	{ 513,		"get-stats" },
193 	{ 514,		"probe" },
194 	{ 515,		"get-addrs" },
195 	{ 516,		"change-addr" },
196 	{ 517,		"create-entry-n" },
197 	{ 518,		"get-entry-by-id-n" },
198 	{ 519,		"get-entry-by-name-n" },
199 	{ 520,		"replace-entry-n" },
200 	{ 521,		"list-entry-n" },
201 	{ 522,		"list-attrib-n" },
202 	{ 523,		"linked-list-n" },
203 	{ 524,		"update-entry-by-name" },
204 	{ 525,		"create-entry-u" },
205 	{ 526,		"get-entry-by-id-u" },
206 	{ 527,		"get-entry-by-name-u" },
207 	{ 528,		"replace-entry-u" },
208 	{ 529,		"list-entry-u" },
209 	{ 530,		"list-attrib-u" },
210 	{ 531,		"linked-list-u" },
211 	{ 532,		"regaddr" },
212 	{ 533,		"get-addrs-u" },
213 	{ 534,		"list-attrib-n2" },
214 	{ 0,		NULL },
215 };
216 
217 static struct tok kauth_req[] = {
218 	{ 1,		"auth-old" },
219 	{ 21,		"authenticate" },
220 	{ 22,		"authenticate-v2" },
221 	{ 2,		"change-pw" },
222 	{ 3,		"get-ticket-old" },
223 	{ 23,		"get-ticket" },
224 	{ 4,		"set-pw" },
225 	{ 5,		"set-fields" },
226 	{ 6,		"create-user" },
227 	{ 7,		"delete-user" },
228 	{ 8,		"get-entry" },
229 	{ 9,		"list-entry" },
230 	{ 10,		"get-stats" },
231 	{ 11,		"debug" },
232 	{ 12,		"get-pw" },
233 	{ 13,		"get-random-key" },
234 	{ 14,		"unlock" },
235 	{ 15,		"lock-status" },
236 	{ 0,		NULL },
237 };
238 
239 static struct tok vol_req[] = {
240 	{ 100,		"create-volume" },
241 	{ 101,		"delete-volume" },
242 	{ 102,		"restore" },
243 	{ 103,		"forward" },
244 	{ 104,		"end-trans" },
245 	{ 105,		"clone" },
246 	{ 106,		"set-flags" },
247 	{ 107,		"get-flags" },
248 	{ 108,		"trans-create" },
249 	{ 109,		"dump" },
250 	{ 110,		"get-nth-volume" },
251 	{ 111,		"set-forwarding" },
252 	{ 112,		"get-name" },
253 	{ 113,		"get-status" },
254 	{ 114,		"sig-restore" },
255 	{ 115,		"list-partitions" },
256 	{ 116,		"list-volumes" },
257 	{ 117,		"set-id-types" },
258 	{ 118,		"monitor" },
259 	{ 119,		"partition-info" },
260 	{ 120,		"reclone" },
261 	{ 121,		"list-one-volume" },
262 	{ 122,		"nuke" },
263 	{ 123,		"set-date" },
264 	{ 124,		"x-list-volumes" },
265 	{ 125,		"x-list-one-volume" },
266 	{ 126,		"set-info" },
267 	{ 127,		"x-list-partitions" },
268 	{ 128,		"forward-multiple" },
269 	{ 65536,	"convert-ro" },
270 	{ 65537,	"get-size" },
271 	{ 65538,	"dump-v2" },
272 	{ 0,		NULL },
273 };
274 
275 static struct tok bos_req[] = {
276 	{ 80,		"create-bnode" },
277 	{ 81,		"delete-bnode" },
278 	{ 82,		"set-status" },
279 	{ 83,		"get-status" },
280 	{ 84,		"enumerate-instance" },
281 	{ 85,		"get-instance-info" },
282 	{ 86,		"get-instance-parm" },
283 	{ 87,		"add-superuser" },
284 	{ 88,		"delete-superuser" },
285 	{ 89,		"list-superusers" },
286 	{ 90,		"list-keys" },
287 	{ 91,		"add-key" },
288 	{ 92,		"delete-key" },
289 	{ 93,		"set-cell-name" },
290 	{ 94,		"get-cell-name" },
291 	{ 95,		"get-cell-host" },
292 	{ 96,		"add-cell-host" },
293 	{ 97,		"delete-cell-host" },
294 	{ 98,		"set-t-status" },
295 	{ 99,		"shutdown-all" },
296 	{ 100,		"restart-all" },
297 	{ 101,		"startup-all" },
298 	{ 102,		"set-noauth-flag" },
299 	{ 103,		"re-bozo" },
300 	{ 104,		"restart" },
301 	{ 105,		"start-bozo-install" },
302 	{ 106,		"uninstall" },
303 	{ 107,		"get-dates" },
304 	{ 108,		"exec" },
305 	{ 109,		"prune" },
306 	{ 110,		"set-restart-time" },
307 	{ 111,		"get-restart-time" },
308 	{ 112,		"start-bozo-log" },
309 	{ 113,		"wait-all" },
310 	{ 114,		"get-instance-strings" },
311 	{ 115,		"get-restricted" },
312 	{ 116,		"set-restricted" },
313 	{ 0,		NULL },
314 };
315 
316 static struct tok ubik_req[] = {
317 	{ 10000,	"vote-beacon" },
318 	{ 10001,	"vote-debug-old" },
319 	{ 10002,	"vote-sdebug-old" },
320 	{ 10003,	"vote-getsyncsite" },
321 	{ 10004,	"vote-debug" },
322 	{ 10005,	"vote-sdebug" },
323 	{ 10006,	"vote-xdebug" },
324 	{ 10007,	"vote-xsdebug" },
325 	{ 20000,	"disk-begin" },
326 	{ 20001,	"disk-commit" },
327 	{ 20002,	"disk-lock" },
328 	{ 20003,	"disk-write" },
329 	{ 20004,	"disk-getversion" },
330 	{ 20005,	"disk-getfile" },
331 	{ 20006,	"disk-sendfile" },
332 	{ 20007,	"disk-abort" },
333 	{ 20008,	"disk-releaselocks" },
334 	{ 20009,	"disk-truncate" },
335 	{ 20010,	"disk-probe" },
336 	{ 20011,	"disk-writev" },
337 	{ 20012,	"disk-interfaceaddr" },
338 	{ 20013,	"disk-setversion" },
339 	{ 0,		NULL },
340 };
341 
342 #define VOTE_LOW	10000
343 #define VOTE_HIGH	10007
344 #define DISK_LOW	20000
345 #define DISK_HIGH	20013
346 
347 static struct tok cb_types[] = {
348 	{ 1,		"exclusive" },
349 	{ 2,		"shared" },
350 	{ 3,		"dropped" },
351 	{ 0,		NULL },
352 };
353 
354 static struct tok ubik_lock_types[] = {
355 	{ 1,		"read" },
356 	{ 2,		"write" },
357 	{ 3,		"wait" },
358 	{ 0,		NULL },
359 };
360 
361 static const char *voltype[] = { "read-write", "read-only", "backup" };
362 
363 static struct tok afs_fs_errors[] = {
364 	{ 101,		"salvage volume" },
365 	{ 102, 		"no such vnode" },
366 	{ 103, 		"no such volume" },
367 	{ 104, 		"volume exist" },
368 	{ 105, 		"no service" },
369 	{ 106, 		"volume offline" },
370 	{ 107, 		"voline online" },
371 	{ 108, 		"diskfull" },
372 	{ 109, 		"diskquota exceeded" },
373 	{ 110, 		"volume busy" },
374 	{ 111, 		"volume moved" },
375 	{ 112, 		"AFS IO error" },
376 	{ -100,		"restarting fileserver" },
377 	{ 0,		NULL }
378 };
379 
380 /*
381  * Reasons for acknowledging a packet
382  */
383 
384 static struct tok rx_ack_reasons[] = {
385 	{ 1,		"ack requested" },
386 	{ 2,		"duplicate packet" },
387 	{ 3,		"out of sequence" },
388 	{ 4,		"exceeds window" },
389 	{ 5,		"no buffer space" },
390 	{ 6,		"ping" },
391 	{ 7,		"ping response" },
392 	{ 8,		"delay" },
393 	{ 9,		"idle" },
394 	{ 0,		NULL },
395 };
396 
397 /*
398  * Cache entries we keep around so we can figure out the RX opcode
399  * numbers for replies.  This allows us to make sense of RX reply packets.
400  */
401 
402 struct rx_cache_entry {
403 	u_int32_t	callnum;	/* Call number (net order) */
404 	struct in_addr	client;		/* client IP address (net order) */
405 	struct in_addr	server;		/* server IP address (net order) */
406 	int		dport;		/* server port (host order) */
407 	u_short		serviceId;	/* Service identifier (net order) */
408 	u_int32_t	opcode;		/* RX opcode (host order) */
409 };
410 
411 #define RX_CACHE_SIZE	64
412 
413 static struct rx_cache_entry	rx_cache[RX_CACHE_SIZE];
414 
415 static int	rx_cache_next = 0;
416 static int	rx_cache_hint = 0;
417 static void	rx_cache_insert(const u_char *, const struct ip *, int);
418 static int	rx_cache_find(const struct rx_header *, const struct ip *,
419 			      int, int32_t *);
420 
421 static void fs_print(const u_char *, int);
422 static void fs_reply_print(const u_char *, int, int32_t);
423 static void acl_print(u_char *, int, u_char *);
424 static void cb_print(const u_char *, int);
425 static void cb_reply_print(const u_char *, int, int32_t);
426 static void prot_print(const u_char *, int);
427 static void prot_reply_print(const u_char *, int, int32_t);
428 static void vldb_print(const u_char *, int);
429 static void vldb_reply_print(const u_char *, int, int32_t);
430 static void kauth_print(const u_char *, int);
431 static void kauth_reply_print(const u_char *, int, int32_t);
432 static void vol_print(const u_char *, int);
433 static void vol_reply_print(const u_char *, int, int32_t);
434 static void bos_print(const u_char *, int);
435 static void bos_reply_print(const u_char *, int, int32_t);
436 static void ubik_print(const u_char *);
437 static void ubik_reply_print(const u_char *, int, int32_t);
438 
439 static void rx_ack_print(const u_char *, int);
440 
441 static int is_ubik(u_int32_t);
442 
443 /*
444  * Handle the rx-level packet.  See if we know what port it's going to so
445  * we can peek at the afs call inside
446  */
447 
448 void
449 rx_print(register const u_char *bp, int length, int sport, int dport,
450 	 u_char *bp2)
451 {
452 	register struct rx_header *rxh;
453 	int i;
454 	int32_t opcode;
455 
456 	if (snapend - bp < (int)sizeof (struct rx_header)) {
457 		printf(" [|rx] (%d)", length);
458 		return;
459 	}
460 
461 	rxh = (struct rx_header *) bp;
462 
463 	printf(" rx %s", tok2str(rx_types, "type %d", rxh->type));
464 
465 	if (vflag) {
466 		int firstflag = 0;
467 
468 		if (vflag > 1)
469 			printf(" cid %08x call# %d",
470 			       (int) EXTRACT_32BITS(&rxh->cid),
471 			       (int) EXTRACT_32BITS(&rxh->callNumber));
472 
473 		printf(" seq %d ser %d",
474 		       (int) EXTRACT_32BITS(&rxh->seq),
475 		       (int) EXTRACT_32BITS(&rxh->serial));
476 
477 		if (vflag > 2)
478 			printf(" secindex %d serviceid %hu",
479 				(int) rxh->securityIndex,
480 				EXTRACT_16BITS(&rxh->serviceId));
481 
482 		if (vflag > 1)
483 			for (i = 0; i < NUM_RX_FLAGS; i++) {
484 				if (rxh->flags & rx_flags[i].flag &&
485 				    (!rx_flags[i].packetType ||
486 				     rxh->type == rx_flags[i].packetType)) {
487 					if (!firstflag) {
488 						firstflag = 1;
489 						printf(" ");
490 					} else {
491 						printf(",");
492 					}
493 					printf("<%s>", rx_flags[i].s);
494 				}
495 			}
496 	}
497 
498 	/*
499 	 * Try to handle AFS calls that we know about.  Check the destination
500 	 * port and make sure it's a data packet.  Also, make sure the
501 	 * seq number is 1 (because otherwise it's a continuation packet,
502 	 * and we can't interpret that).  Also, seems that reply packets
503 	 * do not have the client-init flag set, so we check for that
504 	 * as well.
505 	 */
506 
507 	if (rxh->type == RX_PACKET_TYPE_DATA &&
508 	    EXTRACT_32BITS(&rxh->seq) == 1 &&
509 	    rxh->flags & RX_CLIENT_INITIATED) {
510 
511 		/*
512 		 * Insert this call into the call cache table, so we
513 		 * have a chance to print out replies
514 		 */
515 
516 		rx_cache_insert(bp, (const struct ip *) bp2, dport);
517 
518 		switch (dport) {
519 			case FS_RX_PORT:	/* AFS file service */
520 				fs_print(bp, length);
521 				break;
522 			case CB_RX_PORT:	/* AFS callback service */
523 				cb_print(bp, length);
524 				break;
525 			case PROT_RX_PORT:	/* AFS protection service */
526 				prot_print(bp, length);
527 				break;
528 			case VLDB_RX_PORT:	/* AFS VLDB service */
529 				vldb_print(bp, length);
530 				break;
531 			case KAUTH_RX_PORT:	/* AFS Kerberos auth service */
532 				kauth_print(bp, length);
533 				break;
534 			case VOL_RX_PORT:	/* AFS Volume service */
535 				vol_print(bp, length);
536 				break;
537 			case BOS_RX_PORT:	/* AFS BOS service */
538 				bos_print(bp, length);
539 				break;
540 			default:
541 				;
542 		}
543 
544 	/*
545 	 * If it's a reply (client-init is _not_ set, but seq is one)
546 	 * then look it up in the cache.  If we find it, call the reply
547 	 * printing functions  Note that we handle abort packets here,
548 	 * because printing out the return code can be useful at times.
549 	 */
550 
551 	} else if (((rxh->type == RX_PACKET_TYPE_DATA &&
552 					EXTRACT_32BITS(&rxh->seq) == 1) ||
553 		    rxh->type == RX_PACKET_TYPE_ABORT) &&
554 		   (rxh->flags & RX_CLIENT_INITIATED) == 0 &&
555 		   rx_cache_find(rxh, (const struct ip *) bp2,
556 				 sport, &opcode)) {
557 
558 		switch (sport) {
559 			case FS_RX_PORT:	/* AFS file service */
560 				fs_reply_print(bp, length, opcode);
561 				break;
562 			case CB_RX_PORT:	/* AFS callback service */
563 				cb_reply_print(bp, length, opcode);
564 				break;
565 			case PROT_RX_PORT:	/* AFS PT service */
566 				prot_reply_print(bp, length, opcode);
567 				break;
568 			case VLDB_RX_PORT:	/* AFS VLDB service */
569 				vldb_reply_print(bp, length, opcode);
570 				break;
571 			case KAUTH_RX_PORT:	/* AFS Kerberos auth service */
572 				kauth_reply_print(bp, length, opcode);
573 				break;
574 			case VOL_RX_PORT:	/* AFS Volume service */
575 				vol_reply_print(bp, length, opcode);
576 				break;
577 			case BOS_RX_PORT:	/* AFS BOS service */
578 				bos_reply_print(bp, length, opcode);
579 				break;
580 			default:
581 				;
582 		}
583 
584 	/*
585 	 * If it's an RX ack packet, then use the appropriate ack decoding
586 	 * function (there isn't any service-specific information in the
587 	 * ack packet, so we can use one for all AFS services)
588 	 */
589 
590 	} else if (rxh->type == RX_PACKET_TYPE_ACK)
591 		rx_ack_print(bp, length);
592 
593 
594 	printf(" (%d)", length);
595 }
596 
597 /*
598  * Insert an entry into the cache.  Taken from print-nfs.c
599  */
600 
601 static void
602 rx_cache_insert(const u_char *bp, const struct ip *ip, int dport)
603 {
604 	struct rx_cache_entry *rxent;
605 	const struct rx_header *rxh = (const struct rx_header *) bp;
606 
607 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t)))
608 		return;
609 
610 	rxent = &rx_cache[rx_cache_next];
611 
612 	if (++rx_cache_next >= RX_CACHE_SIZE)
613 		rx_cache_next = 0;
614 
615 	rxent->callnum = rxh->callNumber;
616 	rxent->client = ip->ip_src;
617 	rxent->server = ip->ip_dst;
618 	rxent->dport = dport;
619 	rxent->serviceId = rxh->serviceId;
620 	rxent->opcode = EXTRACT_32BITS(bp + sizeof(struct rx_header));
621 }
622 
623 /*
624  * Lookup an entry in the cache.  Also taken from print-nfs.c
625  *
626  * Note that because this is a reply, we're looking at the _source_
627  * port.
628  */
629 
630 static int
631 rx_cache_find(const struct rx_header *rxh, const struct ip *ip, int sport,
632 	      int32_t *opcode)
633 {
634 	int i;
635 	struct rx_cache_entry *rxent;
636 	u_int32_t clip = ip->ip_dst.s_addr;
637 	u_int32_t sip = ip->ip_src.s_addr;
638 
639 	/* Start the search where we last left off */
640 
641 	i = rx_cache_hint;
642 	do {
643 		rxent = &rx_cache[i];
644 		if (rxent->callnum == rxh->callNumber &&
645 		    rxent->client.s_addr == clip &&
646 		    rxent->server.s_addr == sip &&
647 		    rxent->serviceId == rxh->serviceId &&
648 		    rxent->dport == sport) {
649 
650 			/* We got a match! */
651 
652 			rx_cache_hint = i;
653 			*opcode = rxent->opcode;
654 			return(1);
655 		}
656 		if (++i > RX_CACHE_SIZE)
657 			i = 0;
658 	} while (i != rx_cache_hint);
659 
660 	/* Our search failed */
661 	return(0);
662 }
663 
664 /*
665  * These extrememly grody macros handle the printing of various AFS stuff.
666  */
667 
668 #define FIDOUT() { unsigned long n1, n2, n3; \
669 			TCHECK2(bp[0], sizeof(int32_t) * 3); \
670 			n1 = EXTRACT_32BITS(bp); \
671 			bp += sizeof(int32_t); \
672 			n2 = EXTRACT_32BITS(bp); \
673 			bp += sizeof(int32_t); \
674 			n3 = EXTRACT_32BITS(bp); \
675 			bp += sizeof(int32_t); \
676 			printf(" fid %d/%d/%d", (int) n1, (int) n2, (int) n3); \
677 		}
678 
679 #define STROUT(MAX) { unsigned int i; \
680 			TCHECK2(bp[0], sizeof(int32_t)); \
681 			i = EXTRACT_32BITS(bp); \
682 			if (i > (MAX)) \
683 				goto trunc; \
684 			bp += sizeof(int32_t); \
685 			printf(" \""); \
686 			if (fn_printn(bp, i, snapend)) \
687 				goto trunc; \
688 			printf("\""); \
689 			bp += ((i + sizeof(int32_t) - 1) / sizeof(int32_t)) * sizeof(int32_t); \
690 		}
691 
692 #define INTOUT() { int i; \
693 			TCHECK2(bp[0], sizeof(int32_t)); \
694 			i = (int) EXTRACT_32BITS(bp); \
695 			bp += sizeof(int32_t); \
696 			printf(" %d", i); \
697 		}
698 
699 #define UINTOUT() { unsigned long i; \
700 			TCHECK2(bp[0], sizeof(int32_t)); \
701 			i = EXTRACT_32BITS(bp); \
702 			bp += sizeof(int32_t); \
703 			printf(" %lu", i); \
704 		}
705 
706 #define UINT64OUT() { u_int64_t i; \
707 			TCHECK2(bp[0], sizeof(u_int64_t)); \
708 			i = EXTRACT_64BITS(bp); \
709 			bp += sizeof(u_int64_t); \
710 			printf(" %" PRIu64, i); \
711 		}
712 
713 #define DATEOUT() { time_t t; struct tm *tm; char str[256]; \
714 			TCHECK2(bp[0], sizeof(int32_t)); \
715 			t = (time_t) EXTRACT_32BITS(bp); \
716 			bp += sizeof(int32_t); \
717 			tm = localtime(&t); \
718 			strftime(str, 256, "%Y/%m/%d %T", tm); \
719 			printf(" %s", str); \
720 		}
721 
722 #define STOREATTROUT() { unsigned long mask, i; \
723 			TCHECK2(bp[0], (sizeof(int32_t)*6)); \
724 			mask = EXTRACT_32BITS(bp); bp += sizeof(int32_t); \
725 			if (mask) printf (" StoreStatus"); \
726 		        if (mask & 1) { printf(" date"); DATEOUT(); } \
727 			else bp += sizeof(int32_t); \
728 			i = EXTRACT_32BITS(bp); bp += sizeof(int32_t); \
729 		        if (mask & 2) printf(" owner %lu", i);  \
730 			i = EXTRACT_32BITS(bp); bp += sizeof(int32_t); \
731 		        if (mask & 4) printf(" group %lu", i); \
732 			i = EXTRACT_32BITS(bp); bp += sizeof(int32_t); \
733 		        if (mask & 8) printf(" mode %lo", i & 07777); \
734 			i = EXTRACT_32BITS(bp); bp += sizeof(int32_t); \
735 		        if (mask & 16) printf(" segsize %lu", i); \
736 			/* undocumented in 3.3 docu */ \
737 		        if (mask & 1024) printf(" fsync");  \
738 		}
739 
740 #define UBIK_VERSIONOUT() {int32_t epoch; int32_t counter; \
741 			TCHECK2(bp[0], sizeof(int32_t) * 2); \
742 			epoch = EXTRACT_32BITS(bp); \
743 			bp += sizeof(int32_t); \
744 			counter = EXTRACT_32BITS(bp); \
745 			bp += sizeof(int32_t); \
746 			printf(" %d.%d", epoch, counter); \
747 		}
748 
749 #define AFSUUIDOUT() {u_int32_t temp; int i; \
750 			TCHECK2(bp[0], 11*sizeof(u_int32_t)); \
751 			temp = EXTRACT_32BITS(bp); \
752 			bp += sizeof(u_int32_t); \
753 			printf(" %08x", temp); \
754 			temp = EXTRACT_32BITS(bp); \
755 			bp += sizeof(u_int32_t); \
756 			printf("%04x", temp); \
757 			temp = EXTRACT_32BITS(bp); \
758 			bp += sizeof(u_int32_t); \
759 			printf("%04x", temp); \
760 			for (i = 0; i < 8; i++) { \
761 				temp = EXTRACT_32BITS(bp); \
762 				bp += sizeof(u_int32_t); \
763 				printf("%02x", (unsigned char) temp); \
764 			} \
765 		}
766 
767 /*
768  * This is the sickest one of all
769  */
770 
771 #define VECOUT(MAX) { u_char *sp; \
772 			u_char s[AFSNAMEMAX]; \
773 			int k; \
774 			if ((MAX) + 1 > sizeof(s)) \
775 				goto trunc; \
776 			TCHECK2(bp[0], (MAX) * sizeof(int32_t)); \
777 			sp = s; \
778 			for (k = 0; k < (MAX); k++) { \
779 				*sp++ = (u_char) EXTRACT_32BITS(bp); \
780 				bp += sizeof(int32_t); \
781 			} \
782 			s[(MAX)] = '\0'; \
783 			printf(" \""); \
784 			fn_print(s, NULL); \
785 			printf("\""); \
786 		}
787 
788 #define DESTSERVEROUT() { unsigned long n1, n2, n3; \
789 			TCHECK2(bp[0], sizeof(int32_t) * 3); \
790 			n1 = EXTRACT_32BITS(bp); \
791 			bp += sizeof(int32_t); \
792 			n2 = EXTRACT_32BITS(bp); \
793 			bp += sizeof(int32_t); \
794 			n3 = EXTRACT_32BITS(bp); \
795 			bp += sizeof(int32_t); \
796 			printf(" server %d:%d:%d", (int) n1, (int) n2, (int) n3); \
797 		}
798 
799 /*
800  * Handle calls to the AFS file service (fs)
801  */
802 
803 static void
804 fs_print(register const u_char *bp, int length)
805 {
806 	int fs_op;
807 	unsigned long i;
808 
809 	if (length <= (int)sizeof(struct rx_header))
810 		return;
811 
812 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
813 		goto trunc;
814 	}
815 
816 	/*
817 	 * Print out the afs call we're invoking.  The table used here was
818 	 * gleaned from fsint/afsint.xg
819 	 */
820 
821 	fs_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
822 
823 	printf(" fs call %s", tok2str(fs_req, "op#%d", fs_op));
824 
825 	/*
826 	 * Print out arguments to some of the AFS calls.  This stuff is
827 	 * all from afsint.xg
828 	 */
829 
830 	bp += sizeof(struct rx_header) + 4;
831 
832 	/*
833 	 * Sigh.  This is gross.  Ritchie forgive me.
834 	 */
835 
836 	switch (fs_op) {
837 		case 130:	/* Fetch data */
838 			FIDOUT();
839 			printf(" offset");
840 			UINTOUT();
841 			printf(" length");
842 			UINTOUT();
843 			break;
844 		case 131:	/* Fetch ACL */
845 		case 132:	/* Fetch Status */
846 		case 143:	/* Old set lock */
847 		case 144:	/* Old extend lock */
848 		case 145:	/* Old release lock */
849 		case 156:	/* Set lock */
850 		case 157:	/* Extend lock */
851 		case 158:	/* Release lock */
852 			FIDOUT();
853 			break;
854 		case 135:	/* Store status */
855 			FIDOUT();
856 			STOREATTROUT();
857 			break;
858 		case 133:	/* Store data */
859 			FIDOUT();
860 			STOREATTROUT();
861 			printf(" offset");
862 			UINTOUT();
863 			printf(" length");
864 			UINTOUT();
865 			printf(" flen");
866 			UINTOUT();
867 			break;
868 		case 134:	/* Store ACL */
869 		{
870 			char a[AFSOPAQUEMAX+1];
871 			FIDOUT();
872 			TCHECK2(bp[0], 4);
873 			i = EXTRACT_32BITS(bp);
874 			bp += sizeof(int32_t);
875 			TCHECK2(bp[0], i);
876 			i = min(AFSOPAQUEMAX, i);
877 			strncpy(a, (char *) bp, i);
878 			a[i] = '\0';
879 			acl_print((u_char *) a, sizeof(a), (u_char *) a + i);
880 			break;
881 		}
882 		case 137:	/* Create file */
883 		case 141:	/* MakeDir */
884 			FIDOUT();
885 			STROUT(AFSNAMEMAX);
886 			STOREATTROUT();
887 			break;
888 		case 136:	/* Remove file */
889 		case 142:	/* Remove directory */
890 			FIDOUT();
891 			STROUT(AFSNAMEMAX);
892 			break;
893 		case 138:	/* Rename file */
894 			printf(" old");
895 			FIDOUT();
896 			STROUT(AFSNAMEMAX);
897 			printf(" new");
898 			FIDOUT();
899 			STROUT(AFSNAMEMAX);
900 			break;
901 		case 139:	/* Symlink */
902 			FIDOUT();
903 			STROUT(AFSNAMEMAX);
904 			printf(" link to");
905 			STROUT(AFSNAMEMAX);
906 			break;
907 		case 140:	/* Link */
908 			FIDOUT();
909 			STROUT(AFSNAMEMAX);
910 			printf(" link to");
911 			FIDOUT();
912 			break;
913 		case 148:	/* Get volume info */
914 			STROUT(AFSNAMEMAX);
915 			break;
916 		case 149:	/* Get volume stats */
917 		case 150:	/* Set volume stats */
918 			printf(" volid");
919 			UINTOUT();
920 			break;
921 		case 154:	/* New get volume info */
922 			printf(" volname");
923 			STROUT(AFSNAMEMAX);
924 			break;
925 		case 155:	/* Bulk stat */
926 		case 65536:     /* Inline bulk stat */
927 		{
928 			unsigned long j;
929 			TCHECK2(bp[0], 4);
930 			j = EXTRACT_32BITS(bp);
931 			bp += sizeof(int32_t);
932 
933 			for (i = 0; i < j; i++) {
934 				FIDOUT();
935 				if (i != j - 1)
936 					printf(",");
937 			}
938 			if (j == 0)
939 				printf(" <none!>");
940 		}
941 		case 65537:	/* Fetch data 64 */
942 			FIDOUT();
943 			printf(" offset");
944 			UINT64OUT();
945 			printf(" length");
946 			UINT64OUT();
947 			break;
948 		case 65538:	/* Store data 64 */
949 			FIDOUT();
950 			STOREATTROUT();
951 			printf(" offset");
952 			UINT64OUT();
953 			printf(" length");
954 			UINT64OUT();
955 			printf(" flen");
956 			UINT64OUT();
957 			break;
958 		case 65541:    /* CallBack rx conn address */
959 			printf(" addr");
960 			UINTOUT();
961 		default:
962 			;
963 	}
964 
965 	return;
966 
967 trunc:
968 	printf(" [|fs]");
969 }
970 
971 /*
972  * Handle replies to the AFS file service
973  */
974 
975 static void
976 fs_reply_print(register const u_char *bp, int length, int32_t opcode)
977 {
978 	unsigned long i;
979 	struct rx_header *rxh;
980 
981 	if (length <= (int)sizeof(struct rx_header))
982 		return;
983 
984 	rxh = (struct rx_header *) bp;
985 
986 	/*
987 	 * Print out the afs call we're invoking.  The table used here was
988 	 * gleaned from fsint/afsint.xg
989 	 */
990 
991 	printf(" fs reply %s", tok2str(fs_req, "op#%d", opcode));
992 
993 	bp += sizeof(struct rx_header);
994 
995 	/*
996 	 * If it was a data packet, interpret the response
997 	 */
998 
999 	if (rxh->type == RX_PACKET_TYPE_DATA) {
1000 		switch (opcode) {
1001 		case 131:	/* Fetch ACL */
1002 		{
1003 			char a[AFSOPAQUEMAX+1];
1004 			TCHECK2(bp[0], 4);
1005 			i = EXTRACT_32BITS(bp);
1006 			bp += sizeof(int32_t);
1007 			TCHECK2(bp[0], i);
1008 			i = min(AFSOPAQUEMAX, i);
1009 			strncpy(a, (char *) bp, i);
1010 			a[i] = '\0';
1011 			acl_print((u_char *) a, sizeof(a), (u_char *) a + i);
1012 			break;
1013 		}
1014 		case 137:	/* Create file */
1015 		case 141:	/* MakeDir */
1016 			printf(" new");
1017 			FIDOUT();
1018 			break;
1019 		case 151:	/* Get root volume */
1020 			printf(" root volume");
1021 			STROUT(AFSNAMEMAX);
1022 			break;
1023 		case 153:	/* Get time */
1024 			DATEOUT();
1025 			break;
1026 		default:
1027 			;
1028 		}
1029 	} else if (rxh->type == RX_PACKET_TYPE_ABORT) {
1030 		int i;
1031 
1032 		/*
1033 		 * Otherwise, just print out the return code
1034 		 */
1035 		TCHECK2(bp[0], sizeof(int32_t));
1036 		i = (int) EXTRACT_32BITS(bp);
1037 		bp += sizeof(int32_t);
1038 
1039 		printf(" error %s", tok2str(afs_fs_errors, "#%d", i));
1040 	} else {
1041 		printf(" strange fs reply of type %d", rxh->type);
1042 	}
1043 
1044 	return;
1045 
1046 trunc:
1047 	printf(" [|fs]");
1048 }
1049 
1050 /*
1051  * Print out an AFS ACL string.  An AFS ACL is a string that has the
1052  * following format:
1053  *
1054  * <positive> <negative>
1055  * <uid1> <aclbits1>
1056  * ....
1057  *
1058  * "positive" and "negative" are integers which contain the number of
1059  * positive and negative ACL's in the string.  The uid/aclbits pair are
1060  * ASCII strings containing the UID/PTS record and and a ascii number
1061  * representing a logical OR of all the ACL permission bits
1062  */
1063 
1064 static void
1065 acl_print(u_char *s, int maxsize, u_char *end)
1066 {
1067 	int pos, neg, acl;
1068 	int n, i;
1069 	char *user;
1070 	char fmt[1024];
1071 
1072 	if ((user = (char *)malloc(maxsize)) == NULL)
1073 		return;
1074 
1075 	if (sscanf((char *) s, "%d %d\n%n", &pos, &neg, &n) != 2)
1076 		goto finish;
1077 
1078 	s += n;
1079 
1080 	if (s > end)
1081 		goto finish;
1082 
1083 	/*
1084 	 * This wacky order preserves the order used by the "fs" command
1085 	 */
1086 
1087 #define ACLOUT(acl) \
1088 	if (acl & PRSFS_READ) \
1089 		printf("r"); \
1090 	if (acl & PRSFS_LOOKUP) \
1091 		printf("l"); \
1092 	if (acl & PRSFS_INSERT) \
1093 		printf("i"); \
1094 	if (acl & PRSFS_DELETE) \
1095 		printf("d"); \
1096 	if (acl & PRSFS_WRITE) \
1097 		printf("w"); \
1098 	if (acl & PRSFS_LOCK) \
1099 		printf("k"); \
1100 	if (acl & PRSFS_ADMINISTER) \
1101 		printf("a");
1102 
1103 	for (i = 0; i < pos; i++) {
1104 		snprintf(fmt, sizeof(fmt), "%%%ds %%d\n%%n", maxsize - 1);
1105 		if (sscanf((char *) s, fmt, user, &acl, &n) != 2)
1106 			goto finish;
1107 		s += n;
1108 		printf(" +{");
1109 		fn_print((u_char *)user, NULL);
1110 		printf(" ");
1111 		ACLOUT(acl);
1112 		printf("}");
1113 		if (s > end)
1114 			goto finish;
1115 	}
1116 
1117 	for (i = 0; i < neg; i++) {
1118 		snprintf(fmt, sizeof(fmt), "%%%ds %%d\n%%n", maxsize - 1);
1119 		if (sscanf((char *) s, fmt, user, &acl, &n) != 2)
1120 			goto finish;
1121 		s += n;
1122 		printf(" -{");
1123 		fn_print((u_char *)user, NULL);
1124 		printf(" ");
1125 		ACLOUT(acl);
1126 		printf("}");
1127 		if (s > end)
1128 			goto finish;
1129 	}
1130 
1131 finish:
1132 	free(user);
1133 	return;
1134 }
1135 
1136 #undef ACLOUT
1137 
1138 /*
1139  * Handle calls to the AFS callback service
1140  */
1141 
1142 static void
1143 cb_print(register const u_char *bp, int length)
1144 {
1145 	int cb_op;
1146 	unsigned long i;
1147 
1148 	if (length <= (int)sizeof(struct rx_header))
1149 		return;
1150 
1151 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
1152 		goto trunc;
1153 	}
1154 
1155 	/*
1156 	 * Print out the afs call we're invoking.  The table used here was
1157 	 * gleaned from fsint/afscbint.xg
1158 	 */
1159 
1160 	cb_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
1161 
1162 	printf(" cb call %s", tok2str(cb_req, "op#%d", cb_op));
1163 
1164 	bp += sizeof(struct rx_header) + 4;
1165 
1166 	/*
1167 	 * Print out the afs call we're invoking.  The table used here was
1168 	 * gleaned from fsint/afscbint.xg
1169 	 */
1170 
1171 	switch (cb_op) {
1172 		case 204:		/* Callback */
1173 		{
1174 			unsigned long j, t;
1175 			TCHECK2(bp[0], 4);
1176 			j = EXTRACT_32BITS(bp);
1177 			bp += sizeof(int32_t);
1178 
1179 			for (i = 0; i < j; i++) {
1180 				FIDOUT();
1181 				if (i != j - 1)
1182 					printf(",");
1183 			}
1184 
1185 			if (j == 0)
1186 				printf(" <none!>");
1187 
1188 			j = EXTRACT_32BITS(bp);
1189 			bp += sizeof(int32_t);
1190 
1191 			if (j != 0)
1192 				printf(";");
1193 
1194 			for (i = 0; i < j; i++) {
1195 				printf(" ver");
1196 				INTOUT();
1197 				printf(" expires");
1198 				DATEOUT();
1199 				TCHECK2(bp[0], 4);
1200 				t = EXTRACT_32BITS(bp);
1201 				bp += sizeof(int32_t);
1202 				tok2str(cb_types, "type %d", t);
1203 			}
1204 		}
1205 		case 214: {
1206 			printf(" afsuuid");
1207 			AFSUUIDOUT();
1208 			break;
1209 		}
1210 		default:
1211 			;
1212 	}
1213 
1214 	return;
1215 
1216 trunc:
1217 	printf(" [|cb]");
1218 }
1219 
1220 /*
1221  * Handle replies to the AFS Callback Service
1222  */
1223 
1224 static void
1225 cb_reply_print(register const u_char *bp, int length, int32_t opcode)
1226 {
1227 	struct rx_header *rxh;
1228 
1229 	if (length <= (int)sizeof(struct rx_header))
1230 		return;
1231 
1232 	rxh = (struct rx_header *) bp;
1233 
1234 	/*
1235 	 * Print out the afs call we're invoking.  The table used here was
1236 	 * gleaned from fsint/afscbint.xg
1237 	 */
1238 
1239 	printf(" cb reply %s", tok2str(cb_req, "op#%d", opcode));
1240 
1241 	bp += sizeof(struct rx_header);
1242 
1243 	/*
1244 	 * If it was a data packet, interpret the response.
1245 	 */
1246 
1247 	if (rxh->type == RX_PACKET_TYPE_DATA)
1248 		switch (opcode) {
1249 		case 213:	/* InitCallBackState3 */
1250 			AFSUUIDOUT();
1251 			break;
1252 		default:
1253 		;
1254 		}
1255 	else {
1256 		/*
1257 		 * Otherwise, just print out the return code
1258 		 */
1259 		printf(" errcode");
1260 		INTOUT();
1261 	}
1262 
1263 	return;
1264 
1265 trunc:
1266 	printf(" [|cb]");
1267 }
1268 
1269 /*
1270  * Handle calls to the AFS protection database server
1271  */
1272 
1273 static void
1274 prot_print(register const u_char *bp, int length)
1275 {
1276 	unsigned long i;
1277 	int pt_op;
1278 
1279 	if (length <= (int)sizeof(struct rx_header))
1280 		return;
1281 
1282 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
1283 		goto trunc;
1284 	}
1285 
1286 	/*
1287 	 * Print out the afs call we're invoking.  The table used here was
1288 	 * gleaned from ptserver/ptint.xg
1289 	 */
1290 
1291 	pt_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
1292 
1293 	printf(" pt");
1294 
1295 	if (is_ubik(pt_op)) {
1296 		ubik_print(bp);
1297 		return;
1298 	}
1299 
1300 	printf(" call %s", tok2str(pt_req, "op#%d", pt_op));
1301 
1302 	/*
1303 	 * Decode some of the arguments to the PT calls
1304 	 */
1305 
1306 	bp += sizeof(struct rx_header) + 4;
1307 
1308 	switch (pt_op) {
1309 		case 500:	/* I New User */
1310 			STROUT(PRNAMEMAX);
1311 			printf(" id");
1312 			INTOUT();
1313 			printf(" oldid");
1314 			INTOUT();
1315 			break;
1316 		case 501:	/* Where is it */
1317 		case 506:	/* Delete */
1318 		case 508:	/* Get CPS */
1319 		case 512:	/* List entry */
1320 		case 514:	/* List elements */
1321 		case 517:	/* List owned */
1322 		case 518:	/* Get CPS2 */
1323 		case 519:	/* Get host CPS */
1324 		case 530:	/* List super groups */
1325 			printf(" id");
1326 			INTOUT();
1327 			break;
1328 		case 502:	/* Dump entry */
1329 			printf(" pos");
1330 			INTOUT();
1331 			break;
1332 		case 503:	/* Add to group */
1333 		case 507:	/* Remove from group */
1334 		case 515:	/* Is a member of? */
1335 			printf(" uid");
1336 			INTOUT();
1337 			printf(" gid");
1338 			INTOUT();
1339 			break;
1340 		case 504:	/* Name to ID */
1341 		{
1342 			unsigned long j;
1343 			TCHECK2(bp[0], 4);
1344 			j = EXTRACT_32BITS(bp);
1345 			bp += sizeof(int32_t);
1346 
1347 			/*
1348 			 * Who designed this chicken-shit protocol?
1349 			 *
1350 			 * Each character is stored as a 32-bit
1351 			 * integer!
1352 			 */
1353 
1354 			for (i = 0; i < j; i++) {
1355 				VECOUT(PRNAMEMAX);
1356 			}
1357 			if (j == 0)
1358 				printf(" <none!>");
1359 		}
1360 			break;
1361 		case 505:	/* Id to name */
1362 		{
1363 			unsigned long j;
1364 			printf(" ids:");
1365 			TCHECK2(bp[0], 4);
1366 			i = EXTRACT_32BITS(bp);
1367 			bp += sizeof(int32_t);
1368 			for (j = 0; j < i; j++)
1369 				INTOUT();
1370 			if (j == 0)
1371 				printf(" <none!>");
1372 		}
1373 			break;
1374 		case 509:	/* New entry */
1375 			STROUT(PRNAMEMAX);
1376 			printf(" flag");
1377 			INTOUT();
1378 			printf(" oid");
1379 			INTOUT();
1380 			break;
1381 		case 511:	/* Set max */
1382 			printf(" id");
1383 			INTOUT();
1384 			printf(" gflag");
1385 			INTOUT();
1386 			break;
1387 		case 513:	/* Change entry */
1388 			printf(" id");
1389 			INTOUT();
1390 			STROUT(PRNAMEMAX);
1391 			printf(" oldid");
1392 			INTOUT();
1393 			printf(" newid");
1394 			INTOUT();
1395 			break;
1396 		case 520:	/* Update entry */
1397 			printf(" id");
1398 			INTOUT();
1399 			STROUT(PRNAMEMAX);
1400 			break;
1401 		default:
1402 			;
1403 	}
1404 
1405 
1406 	return;
1407 
1408 trunc:
1409 	printf(" [|pt]");
1410 }
1411 
1412 /*
1413  * Handle replies to the AFS protection service
1414  */
1415 
1416 static void
1417 prot_reply_print(register const u_char *bp, int length, int32_t opcode)
1418 {
1419 	struct rx_header *rxh;
1420 	unsigned long i;
1421 
1422 	if (length < (int)sizeof(struct rx_header))
1423 		return;
1424 
1425 	rxh = (struct rx_header *) bp;
1426 
1427 	/*
1428 	 * Print out the afs call we're invoking.  The table used here was
1429 	 * gleaned from ptserver/ptint.xg.  Check to see if it's a
1430 	 * Ubik call, however.
1431 	 */
1432 
1433 	printf(" pt");
1434 
1435 	if (is_ubik(opcode)) {
1436 		ubik_reply_print(bp, length, opcode);
1437 		return;
1438 	}
1439 
1440 	printf(" reply %s", tok2str(pt_req, "op#%d", opcode));
1441 
1442 	bp += sizeof(struct rx_header);
1443 
1444 	/*
1445 	 * If it was a data packet, interpret the response
1446 	 */
1447 
1448 	if (rxh->type == RX_PACKET_TYPE_DATA)
1449 		switch (opcode) {
1450 		case 504:		/* Name to ID */
1451 		{
1452 			unsigned long j;
1453 			printf(" ids:");
1454 			TCHECK2(bp[0], 4);
1455 			i = EXTRACT_32BITS(bp);
1456 			bp += sizeof(int32_t);
1457 			for (j = 0; j < i; j++)
1458 				INTOUT();
1459 			if (j == 0)
1460 				printf(" <none!>");
1461 		}
1462 			break;
1463 		case 505:		/* ID to name */
1464 		{
1465 			unsigned long j;
1466 			TCHECK2(bp[0], 4);
1467 			j = EXTRACT_32BITS(bp);
1468 			bp += sizeof(int32_t);
1469 
1470 			/*
1471 			 * Who designed this chicken-shit protocol?
1472 			 *
1473 			 * Each character is stored as a 32-bit
1474 			 * integer!
1475 			 */
1476 
1477 			for (i = 0; i < j; i++) {
1478 				VECOUT(PRNAMEMAX);
1479 			}
1480 			if (j == 0)
1481 				printf(" <none!>");
1482 		}
1483 			break;
1484 		case 508:		/* Get CPS */
1485 		case 514:		/* List elements */
1486 		case 517:		/* List owned */
1487 		case 518:		/* Get CPS2 */
1488 		case 519:		/* Get host CPS */
1489 		{
1490 			unsigned long j;
1491 			TCHECK2(bp[0], 4);
1492 			j = EXTRACT_32BITS(bp);
1493 			bp += sizeof(int32_t);
1494 			for (i = 0; i < j; i++) {
1495 				INTOUT();
1496 			}
1497 			if (j == 0)
1498 				printf(" <none!>");
1499 		}
1500 			break;
1501 		case 510:		/* List max */
1502 			printf(" maxuid");
1503 			INTOUT();
1504 			printf(" maxgid");
1505 			INTOUT();
1506 			break;
1507 		default:
1508 			;
1509 		}
1510 	else {
1511 		/*
1512 		 * Otherwise, just print out the return code
1513 		 */
1514 		printf(" errcode");
1515 		INTOUT();
1516 	}
1517 
1518 	return;
1519 
1520 trunc:
1521 	printf(" [|pt]");
1522 }
1523 
1524 /*
1525  * Handle calls to the AFS volume location database service
1526  */
1527 
1528 static void
1529 vldb_print(register const u_char *bp, int length)
1530 {
1531 	int vldb_op;
1532 	unsigned long i;
1533 
1534 	if (length <= (int)sizeof(struct rx_header))
1535 		return;
1536 
1537 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
1538 		goto trunc;
1539 	}
1540 
1541 	/*
1542 	 * Print out the afs call we're invoking.  The table used here was
1543 	 * gleaned from vlserver/vldbint.xg
1544 	 */
1545 
1546 	vldb_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
1547 
1548 	printf(" vldb");
1549 
1550 	if (is_ubik(vldb_op)) {
1551 		ubik_print(bp);
1552 		return;
1553 	}
1554 	printf(" call %s", tok2str(vldb_req, "op#%d", vldb_op));
1555 
1556 	/*
1557 	 * Decode some of the arguments to the VLDB calls
1558 	 */
1559 
1560 	bp += sizeof(struct rx_header) + 4;
1561 
1562 	switch (vldb_op) {
1563 		case 501:	/* Create new volume */
1564 		case 517:	/* Create entry N */
1565 			VECOUT(VLNAMEMAX);
1566 			break;
1567 		case 502:	/* Delete entry */
1568 		case 503:	/* Get entry by ID */
1569 		case 507:	/* Update entry */
1570 		case 508:	/* Set lock */
1571 		case 509:	/* Release lock */
1572 		case 518:	/* Get entry by ID N */
1573 			printf(" volid");
1574 			INTOUT();
1575 			TCHECK2(bp[0], sizeof(int32_t));
1576 			i = EXTRACT_32BITS(bp);
1577 			bp += sizeof(int32_t);
1578 			if (i <= 2)
1579 				printf(" type %s", voltype[i]);
1580 			break;
1581 		case 504:	/* Get entry by name */
1582 		case 519:	/* Get entry by name N */
1583 		case 524:	/* Update entry by name */
1584 		case 527:	/* Get entry by name U */
1585 			STROUT(VLNAMEMAX);
1586 			break;
1587 		case 505:	/* Get new vol id */
1588 			printf(" bump");
1589 			INTOUT();
1590 			break;
1591 		case 506:	/* Replace entry */
1592 		case 520:	/* Replace entry N */
1593 			printf(" volid");
1594 			INTOUT();
1595 			TCHECK2(bp[0], sizeof(int32_t));
1596 			i = EXTRACT_32BITS(bp);
1597 			bp += sizeof(int32_t);
1598 			if (i <= 2)
1599 				printf(" type %s", voltype[i]);
1600 			VECOUT(VLNAMEMAX);
1601 			break;
1602 		case 510:	/* List entry */
1603 		case 521:	/* List entry N */
1604 			printf(" index");
1605 			INTOUT();
1606 			break;
1607 		default:
1608 			;
1609 	}
1610 
1611 	return;
1612 
1613 trunc:
1614 	printf(" [|vldb]");
1615 }
1616 
1617 /*
1618  * Handle replies to the AFS volume location database service
1619  */
1620 
1621 static void
1622 vldb_reply_print(register const u_char *bp, int length, int32_t opcode)
1623 {
1624 	struct rx_header *rxh;
1625 	unsigned long i;
1626 
1627 	if (length < (int)sizeof(struct rx_header))
1628 		return;
1629 
1630 	rxh = (struct rx_header *) bp;
1631 
1632 	/*
1633 	 * Print out the afs call we're invoking.  The table used here was
1634 	 * gleaned from vlserver/vldbint.xg.  Check to see if it's a
1635 	 * Ubik call, however.
1636 	 */
1637 
1638 	printf(" vldb");
1639 
1640 	if (is_ubik(opcode)) {
1641 		ubik_reply_print(bp, length, opcode);
1642 		return;
1643 	}
1644 
1645 	printf(" reply %s", tok2str(vldb_req, "op#%d", opcode));
1646 
1647 	bp += sizeof(struct rx_header);
1648 
1649 	/*
1650 	 * If it was a data packet, interpret the response
1651 	 */
1652 
1653 	if (rxh->type == RX_PACKET_TYPE_DATA)
1654 		switch (opcode) {
1655 		case 510:	/* List entry */
1656 			printf(" count");
1657 			INTOUT();
1658 			printf(" nextindex");
1659 			INTOUT();
1660 		case 503:	/* Get entry by id */
1661 		case 504:	/* Get entry by name */
1662 		{	unsigned long nservers, j;
1663 			VECOUT(VLNAMEMAX);
1664 			TCHECK2(bp[0], sizeof(int32_t));
1665 			bp += sizeof(int32_t);
1666 			printf(" numservers");
1667 			TCHECK2(bp[0], sizeof(int32_t));
1668 			nservers = EXTRACT_32BITS(bp);
1669 			bp += sizeof(int32_t);
1670 			printf(" %lu", nservers);
1671 			printf(" servers");
1672 			for (i = 0; i < 8; i++) {
1673 				TCHECK2(bp[0], sizeof(int32_t));
1674 				if (i < nservers)
1675 					printf(" %s",
1676 					   intoa(((struct in_addr *) bp)->s_addr));
1677 				bp += sizeof(int32_t);
1678 			}
1679 			printf(" partitions");
1680 			for (i = 0; i < 8; i++) {
1681 				TCHECK2(bp[0], sizeof(int32_t));
1682 				j = EXTRACT_32BITS(bp);
1683 				if (i < nservers && j <= 26)
1684 					printf(" %c", 'a' + (int)j);
1685 				else if (i < nservers)
1686 					printf(" %lu", j);
1687 				bp += sizeof(int32_t);
1688 			}
1689 			TCHECK2(bp[0], 8 * sizeof(int32_t));
1690 			bp += 8 * sizeof(int32_t);
1691 			printf(" rwvol");
1692 			UINTOUT();
1693 			printf(" rovol");
1694 			UINTOUT();
1695 			printf(" backup");
1696 			UINTOUT();
1697 		}
1698 			break;
1699 		case 505:	/* Get new volume ID */
1700 			printf(" newvol");
1701 			UINTOUT();
1702 			break;
1703 		case 521:	/* List entry */
1704 		case 529:	/* List entry U */
1705 			printf(" count");
1706 			INTOUT();
1707 			printf(" nextindex");
1708 			INTOUT();
1709 		case 518:	/* Get entry by ID N */
1710 		case 519:	/* Get entry by name N */
1711 		{	unsigned long nservers, j;
1712 			VECOUT(VLNAMEMAX);
1713 			printf(" numservers");
1714 			TCHECK2(bp[0], sizeof(int32_t));
1715 			nservers = EXTRACT_32BITS(bp);
1716 			bp += sizeof(int32_t);
1717 			printf(" %lu", nservers);
1718 			printf(" servers");
1719 			for (i = 0; i < 13; i++) {
1720 				TCHECK2(bp[0], sizeof(int32_t));
1721 				if (i < nservers)
1722 					printf(" %s",
1723 					   intoa(((struct in_addr *) bp)->s_addr));
1724 				bp += sizeof(int32_t);
1725 			}
1726 			printf(" partitions");
1727 			for (i = 0; i < 13; i++) {
1728 				TCHECK2(bp[0], sizeof(int32_t));
1729 				j = EXTRACT_32BITS(bp);
1730 				if (i < nservers && j <= 26)
1731 					printf(" %c", 'a' + (int)j);
1732 				else if (i < nservers)
1733 					printf(" %lu", j);
1734 				bp += sizeof(int32_t);
1735 			}
1736 			TCHECK2(bp[0], 13 * sizeof(int32_t));
1737 			bp += 13 * sizeof(int32_t);
1738 			printf(" rwvol");
1739 			UINTOUT();
1740 			printf(" rovol");
1741 			UINTOUT();
1742 			printf(" backup");
1743 			UINTOUT();
1744 		}
1745 			break;
1746 		case 526:	/* Get entry by ID U */
1747 		case 527:	/* Get entry by name U */
1748 		{	unsigned long nservers, j;
1749 			VECOUT(VLNAMEMAX);
1750 			printf(" numservers");
1751 			TCHECK2(bp[0], sizeof(int32_t));
1752 			nservers = EXTRACT_32BITS(bp);
1753 			bp += sizeof(int32_t);
1754 			printf(" %lu", nservers);
1755 			printf(" servers");
1756 			for (i = 0; i < 13; i++) {
1757 				if (i < nservers) {
1758 					printf(" afsuuid");
1759 					AFSUUIDOUT();
1760 				} else {
1761 					TCHECK2(bp[0], 44);
1762 					bp += 44;
1763 				}
1764 			}
1765 			TCHECK2(bp[0], 4 * 13);
1766 			bp += 4 * 13;
1767 			printf(" partitions");
1768 			for (i = 0; i < 13; i++) {
1769 				TCHECK2(bp[0], sizeof(int32_t));
1770 				j = EXTRACT_32BITS(bp);
1771 				if (i < nservers && j <= 26)
1772 					printf(" %c", 'a' + (int)j);
1773 				else if (i < nservers)
1774 					printf(" %lu", j);
1775 				bp += sizeof(int32_t);
1776 			}
1777 			TCHECK2(bp[0], 13 * sizeof(int32_t));
1778 			bp += 13 * sizeof(int32_t);
1779 			printf(" rwvol");
1780 			UINTOUT();
1781 			printf(" rovol");
1782 			UINTOUT();
1783 			printf(" backup");
1784 			UINTOUT();
1785 		}
1786 		default:
1787 			;
1788 		}
1789 
1790 	else {
1791 		/*
1792 		 * Otherwise, just print out the return code
1793 		 */
1794 		printf(" errcode");
1795 		INTOUT();
1796 	}
1797 
1798 	return;
1799 
1800 trunc:
1801 	printf(" [|vldb]");
1802 }
1803 
1804 /*
1805  * Handle calls to the AFS Kerberos Authentication service
1806  */
1807 
1808 static void
1809 kauth_print(register const u_char *bp, int length)
1810 {
1811 	int kauth_op;
1812 
1813 	if (length <= (int)sizeof(struct rx_header))
1814 		return;
1815 
1816 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
1817 		goto trunc;
1818 	}
1819 
1820 	/*
1821 	 * Print out the afs call we're invoking.  The table used here was
1822 	 * gleaned from kauth/kauth.rg
1823 	 */
1824 
1825 	kauth_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
1826 
1827 	printf(" kauth");
1828 
1829 	if (is_ubik(kauth_op)) {
1830 		ubik_print(bp);
1831 		return;
1832 	}
1833 
1834 
1835 	printf(" call %s", tok2str(kauth_req, "op#%d", kauth_op));
1836 
1837 	/*
1838 	 * Decode some of the arguments to the KA calls
1839 	 */
1840 
1841 	bp += sizeof(struct rx_header) + 4;
1842 
1843 	switch (kauth_op) {
1844 		case 1:		/* Authenticate old */;
1845 		case 21:	/* Authenticate */
1846 		case 22:	/* Authenticate-V2 */
1847 		case 2:		/* Change PW */
1848 		case 5:		/* Set fields */
1849 		case 6:		/* Create user */
1850 		case 7:		/* Delete user */
1851 		case 8:		/* Get entry */
1852 		case 14:	/* Unlock */
1853 		case 15:	/* Lock status */
1854 			printf(" principal");
1855 			STROUT(KANAMEMAX);
1856 			STROUT(KANAMEMAX);
1857 			break;
1858 		case 3:		/* GetTicket-old */
1859 		case 23:	/* GetTicket */
1860 		{
1861 			int i;
1862 			printf(" kvno");
1863 			INTOUT();
1864 			printf(" domain");
1865 			STROUT(KANAMEMAX);
1866 			TCHECK2(bp[0], sizeof(int32_t));
1867 			i = (int) EXTRACT_32BITS(bp);
1868 			bp += sizeof(int32_t);
1869 			TCHECK2(bp[0], i);
1870 			bp += i;
1871 			printf(" principal");
1872 			STROUT(KANAMEMAX);
1873 			STROUT(KANAMEMAX);
1874 			break;
1875 		}
1876 		case 4:		/* Set Password */
1877 			printf(" principal");
1878 			STROUT(KANAMEMAX);
1879 			STROUT(KANAMEMAX);
1880 			printf(" kvno");
1881 			INTOUT();
1882 			break;
1883 		case 12:	/* Get password */
1884 			printf(" name");
1885 			STROUT(KANAMEMAX);
1886 			break;
1887 		default:
1888 			;
1889 	}
1890 
1891 	return;
1892 
1893 trunc:
1894 	printf(" [|kauth]");
1895 }
1896 
1897 /*
1898  * Handle replies to the AFS Kerberos Authentication Service
1899  */
1900 
1901 static void
1902 kauth_reply_print(register const u_char *bp, int length, int32_t opcode)
1903 {
1904 	struct rx_header *rxh;
1905 
1906 	if (length <= (int)sizeof(struct rx_header))
1907 		return;
1908 
1909 	rxh = (struct rx_header *) bp;
1910 
1911 	/*
1912 	 * Print out the afs call we're invoking.  The table used here was
1913 	 * gleaned from kauth/kauth.rg
1914 	 */
1915 
1916 	printf(" kauth");
1917 
1918 	if (is_ubik(opcode)) {
1919 		ubik_reply_print(bp, length, opcode);
1920 		return;
1921 	}
1922 
1923 	printf(" reply %s", tok2str(kauth_req, "op#%d", opcode));
1924 
1925 	bp += sizeof(struct rx_header);
1926 
1927 	/*
1928 	 * If it was a data packet, interpret the response.
1929 	 */
1930 
1931 	if (rxh->type == RX_PACKET_TYPE_DATA)
1932 		/* Well, no, not really.  Leave this for later */
1933 		;
1934 	else {
1935 		/*
1936 		 * Otherwise, just print out the return code
1937 		 */
1938 		printf(" errcode");
1939 		INTOUT();
1940 	}
1941 
1942 	return;
1943 
1944 trunc:
1945 	printf(" [|kauth]");
1946 }
1947 
1948 /*
1949  * Handle calls to the AFS Volume location service
1950  */
1951 
1952 static void
1953 vol_print(register const u_char *bp, int length)
1954 {
1955 	int vol_op;
1956 
1957 	if (length <= (int)sizeof(struct rx_header))
1958 		return;
1959 
1960 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
1961 		goto trunc;
1962 	}
1963 
1964 	/*
1965 	 * Print out the afs call we're invoking.  The table used here was
1966 	 * gleaned from volser/volint.xg
1967 	 */
1968 
1969 	vol_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
1970 
1971 	printf(" vol call %s", tok2str(vol_req, "op#%d", vol_op));
1972 
1973 	bp += sizeof(struct rx_header) + 4;
1974 
1975 	switch (vol_op) {
1976 		case 100:	/* Create volume */
1977 			printf(" partition");
1978 			UINTOUT();
1979 			printf(" name");
1980 			STROUT(AFSNAMEMAX);
1981 			printf(" type");
1982 			UINTOUT();
1983 			printf(" parent");
1984 			UINTOUT();
1985 			break;
1986 		case 101:	/* Delete volume */
1987 		case 107:	/* Get flags */
1988 			printf(" trans");
1989 			UINTOUT();
1990 			break;
1991 		case 102:	/* Restore */
1992 			printf(" totrans");
1993 			UINTOUT();
1994 			printf(" flags");
1995 			UINTOUT();
1996 			break;
1997 		case 103:	/* Forward */
1998 			printf(" fromtrans");
1999 			UINTOUT();
2000 			printf(" fromdate");
2001 			DATEOUT();
2002 			DESTSERVEROUT();
2003 			printf(" desttrans");
2004 			INTOUT();
2005 			break;
2006 		case 104:	/* End trans */
2007 			printf(" trans");
2008 			UINTOUT();
2009 			break;
2010 		case 105:	/* Clone */
2011 			printf(" trans");
2012 			UINTOUT();
2013 			printf(" purgevol");
2014 			UINTOUT();
2015 			printf(" newtype");
2016 			UINTOUT();
2017 			printf(" newname");
2018 			STROUT(AFSNAMEMAX);
2019 			break;
2020 		case 106:	/* Set flags */
2021 			printf(" trans");
2022 			UINTOUT();
2023 			printf(" flags");
2024 			UINTOUT();
2025 			break;
2026 		case 108:	/* Trans create */
2027 			printf(" vol");
2028 			UINTOUT();
2029 			printf(" partition");
2030 			UINTOUT();
2031 			printf(" flags");
2032 			UINTOUT();
2033 			break;
2034 		case 109:	/* Dump */
2035 		case 655537:	/* Get size */
2036 			printf(" fromtrans");
2037 			UINTOUT();
2038 			printf(" fromdate");
2039 			DATEOUT();
2040 			break;
2041 		case 110:	/* Get n-th volume */
2042 			printf(" index");
2043 			UINTOUT();
2044 			break;
2045 		case 111:	/* Set forwarding */
2046 			printf(" tid");
2047 			UINTOUT();
2048 			printf(" newsite");
2049 			UINTOUT();
2050 			break;
2051 		case 112:	/* Get name */
2052 		case 113:	/* Get status */
2053 			printf(" tid");
2054 			break;
2055 		case 114:	/* Signal restore */
2056 			printf(" name");
2057 			STROUT(AFSNAMEMAX);
2058 			printf(" type");
2059 			UINTOUT();
2060 			printf(" pid");
2061 			UINTOUT();
2062 			printf(" cloneid");
2063 			UINTOUT();
2064 			break;
2065 		case 116:	/* List volumes */
2066 			printf(" partition");
2067 			UINTOUT();
2068 			printf(" flags");
2069 			UINTOUT();
2070 			break;
2071 		case 117:	/* Set id types */
2072 			printf(" tid");
2073 			UINTOUT();
2074 			printf(" name");
2075 			STROUT(AFSNAMEMAX);
2076 			printf(" type");
2077 			UINTOUT();
2078 			printf(" pid");
2079 			UINTOUT();
2080 			printf(" clone");
2081 			UINTOUT();
2082 			printf(" backup");
2083 			UINTOUT();
2084 			break;
2085 		case 119:	/* Partition info */
2086 			printf(" name");
2087 			STROUT(AFSNAMEMAX);
2088 			break;
2089 		case 120:	/* Reclone */
2090 			printf(" tid");
2091 			UINTOUT();
2092 			break;
2093 		case 121:	/* List one volume */
2094 		case 122:	/* Nuke volume */
2095 		case 124:	/* Extended List volumes */
2096 		case 125:	/* Extended List one volume */
2097 		case 65536:	/* Convert RO to RW volume */
2098 			printf(" partid");
2099 			UINTOUT();
2100 			printf(" volid");
2101 			UINTOUT();
2102 			break;
2103 		case 123:	/* Set date */
2104 			printf(" tid");
2105 			UINTOUT();
2106 			printf(" date");
2107 			DATEOUT();
2108 			break;
2109 		case 126:	/* Set info */
2110 			printf(" tid");
2111 			UINTOUT();
2112 			break;
2113 		case 128:	/* Forward multiple */
2114 			printf(" fromtrans");
2115 			UINTOUT();
2116 			printf(" fromdate");
2117 			DATEOUT();
2118 			{
2119 				unsigned long i, j;
2120 				TCHECK2(bp[0], 4);
2121 				j = EXTRACT_32BITS(bp);
2122 				bp += sizeof(int32_t);
2123 				for (i = 0; i < j; i++) {
2124 					DESTSERVEROUT();
2125 					if (i != j - 1)
2126 						printf(",");
2127 				}
2128 				if (j == 0)
2129 					printf(" <none!>");
2130 			}
2131 			break;
2132 		case 65538:	/* Dump version 2 */
2133 			printf(" fromtrans");
2134 			UINTOUT();
2135 			printf(" fromdate");
2136 			DATEOUT();
2137 			printf(" flags");
2138 			UINTOUT();
2139 			break;
2140 		default:
2141 			;
2142 	}
2143 	return;
2144 
2145 trunc:
2146 	printf(" [|vol]");
2147 }
2148 
2149 /*
2150  * Handle replies to the AFS Volume Service
2151  */
2152 
2153 static void
2154 vol_reply_print(register const u_char *bp, int length, int32_t opcode)
2155 {
2156 	struct rx_header *rxh;
2157 
2158 	if (length <= (int)sizeof(struct rx_header))
2159 		return;
2160 
2161 	rxh = (struct rx_header *) bp;
2162 
2163 	/*
2164 	 * Print out the afs call we're invoking.  The table used here was
2165 	 * gleaned from volser/volint.xg
2166 	 */
2167 
2168 	printf(" vol reply %s", tok2str(vol_req, "op#%d", opcode));
2169 
2170 	bp += sizeof(struct rx_header);
2171 
2172 	/*
2173 	 * If it was a data packet, interpret the response.
2174 	 */
2175 
2176 	if (rxh->type == RX_PACKET_TYPE_DATA) {
2177 		switch (opcode) {
2178 			case 100:	/* Create volume */
2179 				printf(" volid");
2180 				UINTOUT();
2181 				printf(" trans");
2182 				UINTOUT();
2183 				break;
2184 			case 104:	/* End transaction */
2185 				UINTOUT();
2186 				break;
2187 			case 105:	/* Clone */
2188 				printf(" newvol");
2189 				UINTOUT();
2190 				break;
2191 			case 107:	/* Get flags */
2192 				UINTOUT();
2193 				break;
2194 			case 108:	/* Transaction create */
2195 				printf(" trans");
2196 				UINTOUT();
2197 				break;
2198 			case 110:	/* Get n-th volume */
2199 				printf(" volume");
2200 				UINTOUT();
2201 				printf(" partition");
2202 				UINTOUT();
2203 				break;
2204 			case 112:	/* Get name */
2205 				STROUT(AFSNAMEMAX);
2206 				break;
2207 			case 113:	/* Get status */
2208 				printf(" volid");
2209 				UINTOUT();
2210 				printf(" nextuniq");
2211 				UINTOUT();
2212 				printf(" type");
2213 				UINTOUT();
2214 				printf(" parentid");
2215 				UINTOUT();
2216 				printf(" clone");
2217 				UINTOUT();
2218 				printf(" backup");
2219 				UINTOUT();
2220 				printf(" restore");
2221 				UINTOUT();
2222 				printf(" maxquota");
2223 				UINTOUT();
2224 				printf(" minquota");
2225 				UINTOUT();
2226 				printf(" owner");
2227 				UINTOUT();
2228 				printf(" create");
2229 				DATEOUT();
2230 				printf(" access");
2231 				DATEOUT();
2232 				printf(" update");
2233 				DATEOUT();
2234 				printf(" expire");
2235 				DATEOUT();
2236 				printf(" backup");
2237 				DATEOUT();
2238 				printf(" copy");
2239 				DATEOUT();
2240 				break;
2241 			case 115:	/* Old list partitions */
2242 				break;
2243 			case 116:	/* List volumes */
2244 			case 121:	/* List one volume */
2245 				{
2246 					unsigned long i, j;
2247 					TCHECK2(bp[0], 4);
2248 					j = EXTRACT_32BITS(bp);
2249 					bp += sizeof(int32_t);
2250 					for (i = 0; i < j; i++) {
2251 						printf(" name");
2252 						VECOUT(32);
2253 						printf(" volid");
2254 						UINTOUT();
2255 						printf(" type");
2256 						bp += sizeof(int32_t) * 21;
2257 						if (i != j - 1)
2258 							printf(",");
2259 					}
2260 					if (j == 0)
2261 						printf(" <none!>");
2262 				}
2263 				break;
2264 
2265 
2266 			default:
2267 				;
2268 		}
2269 	} else {
2270 		/*
2271 		 * Otherwise, just print out the return code
2272 		 */
2273 		printf(" errcode");
2274 		INTOUT();
2275 	}
2276 
2277 	return;
2278 
2279 trunc:
2280 	printf(" [|vol]");
2281 }
2282 
2283 /*
2284  * Handle calls to the AFS BOS service
2285  */
2286 
2287 static void
2288 bos_print(register const u_char *bp, int length)
2289 {
2290 	int bos_op;
2291 
2292 	if (length <= (int)sizeof(struct rx_header))
2293 		return;
2294 
2295 	if (snapend - bp + 1 <= (int)(sizeof(struct rx_header) + sizeof(int32_t))) {
2296 		goto trunc;
2297 	}
2298 
2299 	/*
2300 	 * Print out the afs call we're invoking.  The table used here was
2301 	 * gleaned from bozo/bosint.xg
2302 	 */
2303 
2304 	bos_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
2305 
2306 	printf(" bos call %s", tok2str(bos_req, "op#%d", bos_op));
2307 
2308 	/*
2309 	 * Decode some of the arguments to the BOS calls
2310 	 */
2311 
2312 	bp += sizeof(struct rx_header) + 4;
2313 
2314 	switch (bos_op) {
2315 		case 80:	/* Create B node */
2316 			printf(" type");
2317 			STROUT(BOSNAMEMAX);
2318 			printf(" instance");
2319 			STROUT(BOSNAMEMAX);
2320 			break;
2321 		case 81:	/* Delete B node */
2322 		case 83:	/* Get status */
2323 		case 85:	/* Get instance info */
2324 		case 87:	/* Add super user */
2325 		case 88:	/* Delete super user */
2326 		case 93:	/* Set cell name */
2327 		case 96:	/* Add cell host */
2328 		case 97:	/* Delete cell host */
2329 		case 104:	/* Restart */
2330 		case 106:	/* Uninstall */
2331 		case 108:	/* Exec */
2332 		case 112:	/* Getlog */
2333 		case 114:	/* Get instance strings */
2334 			STROUT(BOSNAMEMAX);
2335 			break;
2336 		case 82:	/* Set status */
2337 		case 98:	/* Set T status */
2338 			STROUT(BOSNAMEMAX);
2339 			printf(" status");
2340 			INTOUT();
2341 			break;
2342 		case 86:	/* Get instance parm */
2343 			STROUT(BOSNAMEMAX);
2344 			printf(" num");
2345 			INTOUT();
2346 			break;
2347 		case 84:	/* Enumerate instance */
2348 		case 89:	/* List super users */
2349 		case 90:	/* List keys */
2350 		case 91:	/* Add key */
2351 		case 92:	/* Delete key */
2352 		case 95:	/* Get cell host */
2353 			INTOUT();
2354 			break;
2355 		case 105:	/* Install */
2356 			STROUT(BOSNAMEMAX);
2357 			printf(" size");
2358 			INTOUT();
2359 			printf(" flags");
2360 			INTOUT();
2361 			printf(" date");
2362 			INTOUT();
2363 			break;
2364 		default:
2365 			;
2366 	}
2367 
2368 	return;
2369 
2370 trunc:
2371 	printf(" [|bos]");
2372 }
2373 
2374 /*
2375  * Handle replies to the AFS BOS Service
2376  */
2377 
2378 static void
2379 bos_reply_print(register const u_char *bp, int length, int32_t opcode)
2380 {
2381 	struct rx_header *rxh;
2382 
2383 	if (length <= (int)sizeof(struct rx_header))
2384 		return;
2385 
2386 	rxh = (struct rx_header *) bp;
2387 
2388 	/*
2389 	 * Print out the afs call we're invoking.  The table used here was
2390 	 * gleaned from volser/volint.xg
2391 	 */
2392 
2393 	printf(" bos reply %s", tok2str(bos_req, "op#%d", opcode));
2394 
2395 	bp += sizeof(struct rx_header);
2396 
2397 	/*
2398 	 * If it was a data packet, interpret the response.
2399 	 */
2400 
2401 	if (rxh->type == RX_PACKET_TYPE_DATA)
2402 		/* Well, no, not really.  Leave this for later */
2403 		;
2404 	else {
2405 		/*
2406 		 * Otherwise, just print out the return code
2407 		 */
2408 		printf(" errcode");
2409 		INTOUT();
2410 	}
2411 
2412 	return;
2413 
2414 trunc:
2415 	printf(" [|bos]");
2416 }
2417 
2418 /*
2419  * Check to see if this is a Ubik opcode.
2420  */
2421 
2422 static int
2423 is_ubik(u_int32_t opcode)
2424 {
2425 	if ((opcode >= VOTE_LOW && opcode <= VOTE_HIGH) ||
2426 	    (opcode >= DISK_LOW && opcode <= DISK_HIGH))
2427 		return(1);
2428 	else
2429 		return(0);
2430 }
2431 
2432 /*
2433  * Handle Ubik opcodes to any one of the replicated database services
2434  */
2435 
2436 static void
2437 ubik_print(register const u_char *bp)
2438 {
2439 	int ubik_op;
2440 	int32_t temp;
2441 
2442 	/*
2443 	 * Print out the afs call we're invoking.  The table used here was
2444 	 * gleaned from ubik/ubik_int.xg
2445 	 */
2446 
2447 	ubik_op = EXTRACT_32BITS(bp + sizeof(struct rx_header));
2448 
2449 	printf(" ubik call %s", tok2str(ubik_req, "op#%d", ubik_op));
2450 
2451 	/*
2452 	 * Decode some of the arguments to the Ubik calls
2453 	 */
2454 
2455 	bp += sizeof(struct rx_header) + 4;
2456 
2457 	switch (ubik_op) {
2458 		case 10000:		/* Beacon */
2459 			TCHECK2(bp[0], 4);
2460 			temp = EXTRACT_32BITS(bp);
2461 			bp += sizeof(int32_t);
2462 			printf(" syncsite %s", temp ? "yes" : "no");
2463 			printf(" votestart");
2464 			DATEOUT();
2465 			printf(" dbversion");
2466 			UBIK_VERSIONOUT();
2467 			printf(" tid");
2468 			UBIK_VERSIONOUT();
2469 			break;
2470 		case 10003:		/* Get sync site */
2471 			printf(" site");
2472 			UINTOUT();
2473 			break;
2474 		case 20000:		/* Begin */
2475 		case 20001:		/* Commit */
2476 		case 20007:		/* Abort */
2477 		case 20008:		/* Release locks */
2478 		case 20010:		/* Writev */
2479 			printf(" tid");
2480 			UBIK_VERSIONOUT();
2481 			break;
2482 		case 20002:		/* Lock */
2483 			printf(" tid");
2484 			UBIK_VERSIONOUT();
2485 			printf(" file");
2486 			INTOUT();
2487 			printf(" pos");
2488 			INTOUT();
2489 			printf(" length");
2490 			INTOUT();
2491 			temp = EXTRACT_32BITS(bp);
2492 			bp += sizeof(int32_t);
2493 			tok2str(ubik_lock_types, "type %d", temp);
2494 			break;
2495 		case 20003:		/* Write */
2496 			printf(" tid");
2497 			UBIK_VERSIONOUT();
2498 			printf(" file");
2499 			INTOUT();
2500 			printf(" pos");
2501 			INTOUT();
2502 			break;
2503 		case 20005:		/* Get file */
2504 			printf(" file");
2505 			INTOUT();
2506 			break;
2507 		case 20006:		/* Send file */
2508 			printf(" file");
2509 			INTOUT();
2510 			printf(" length");
2511 			INTOUT();
2512 			printf(" dbversion");
2513 			UBIK_VERSIONOUT();
2514 			break;
2515 		case 20009:		/* Truncate */
2516 			printf(" tid");
2517 			UBIK_VERSIONOUT();
2518 			printf(" file");
2519 			INTOUT();
2520 			printf(" length");
2521 			INTOUT();
2522 			break;
2523 		case 20012:		/* Set version */
2524 			printf(" tid");
2525 			UBIK_VERSIONOUT();
2526 			printf(" oldversion");
2527 			UBIK_VERSIONOUT();
2528 			printf(" newversion");
2529 			UBIK_VERSIONOUT();
2530 			break;
2531 		default:
2532 			;
2533 	}
2534 
2535 	return;
2536 
2537 trunc:
2538 	printf(" [|ubik]");
2539 }
2540 
2541 /*
2542  * Handle Ubik replies to any one of the replicated database services
2543  */
2544 
2545 static void
2546 ubik_reply_print(register const u_char *bp, int length, int32_t opcode)
2547 {
2548 	struct rx_header *rxh;
2549 
2550 	if (length < (int)sizeof(struct rx_header))
2551 		return;
2552 
2553 	rxh = (struct rx_header *) bp;
2554 
2555 	/*
2556 	 * Print out the ubik call we're invoking.  This table was gleaned
2557 	 * from ubik/ubik_int.xg
2558 	 */
2559 
2560 	printf(" ubik reply %s", tok2str(ubik_req, "op#%d", opcode));
2561 
2562 	bp += sizeof(struct rx_header);
2563 
2564 	/*
2565 	 * If it was a data packet, print out the arguments to the Ubik calls
2566 	 */
2567 
2568 	if (rxh->type == RX_PACKET_TYPE_DATA)
2569 		switch (opcode) {
2570 		case 10000:		/* Beacon */
2571 			printf(" vote no");
2572 			break;
2573 		case 20004:		/* Get version */
2574 			printf(" dbversion");
2575 			UBIK_VERSIONOUT();
2576 			break;
2577 		default:
2578 			;
2579 		}
2580 
2581 	/*
2582 	 * Otherwise, print out "yes" it it was a beacon packet (because
2583 	 * that's how yes votes are returned, go figure), otherwise
2584 	 * just print out the error code.
2585 	 */
2586 
2587 	else
2588 		switch (opcode) {
2589 		case 10000:		/* Beacon */
2590 			printf(" vote yes until");
2591 			DATEOUT();
2592 			break;
2593 		default:
2594 			printf(" errcode");
2595 			INTOUT();
2596 		}
2597 
2598 	return;
2599 
2600 trunc:
2601 	printf(" [|ubik]");
2602 }
2603 
2604 /*
2605  * Handle RX ACK packets.
2606  */
2607 
2608 static void
2609 rx_ack_print(register const u_char *bp, int length)
2610 {
2611 	struct rx_ackPacket *rxa;
2612 	int i, start, last;
2613 	u_int32_t firstPacket;
2614 
2615 	if (length < (int)sizeof(struct rx_header))
2616 		return;
2617 
2618 	bp += sizeof(struct rx_header);
2619 
2620 	/*
2621 	 * This may seem a little odd .... the rx_ackPacket structure
2622 	 * contains an array of individual packet acknowledgements
2623 	 * (used for selective ack/nack), but since it's variable in size,
2624 	 * we don't want to truncate based on the size of the whole
2625 	 * rx_ackPacket structure.
2626 	 */
2627 
2628 	TCHECK2(bp[0], sizeof(struct rx_ackPacket) - RX_MAXACKS);
2629 
2630 	rxa = (struct rx_ackPacket *) bp;
2631 	bp += (sizeof(struct rx_ackPacket) - RX_MAXACKS);
2632 
2633 	/*
2634 	 * Print out a few useful things from the ack packet structure
2635 	 */
2636 
2637 	if (vflag > 2)
2638 		printf(" bufspace %d maxskew %d",
2639 		       (int) EXTRACT_16BITS(&rxa->bufferSpace),
2640 		       (int) EXTRACT_16BITS(&rxa->maxSkew));
2641 
2642 	firstPacket = EXTRACT_32BITS(&rxa->firstPacket);
2643 	printf(" first %d serial %d reason %s",
2644 	       firstPacket, EXTRACT_32BITS(&rxa->serial),
2645 	       tok2str(rx_ack_reasons, "#%d", (int) rxa->reason));
2646 
2647 	/*
2648 	 * Okay, now we print out the ack array.  The way _this_ works
2649 	 * is that we start at "first", and step through the ack array.
2650 	 * If we have a contiguous range of acks/nacks, try to
2651 	 * collapse them into a range.
2652 	 *
2653 	 * If you're really clever, you might have noticed that this
2654 	 * doesn't seem quite correct.  Specifically, due to structure
2655 	 * padding, sizeof(struct rx_ackPacket) - RX_MAXACKS won't actually
2656 	 * yield the start of the ack array (because RX_MAXACKS is 255
2657 	 * and the structure will likely get padded to a 2 or 4 byte
2658 	 * boundary).  However, this is the way it's implemented inside
2659 	 * of AFS - the start of the extra fields are at
2660 	 * sizeof(struct rx_ackPacket) - RX_MAXACKS + nAcks, which _isn't_
2661 	 * the exact start of the ack array.  Sigh.  That's why we aren't
2662 	 * using bp, but instead use rxa->acks[].  But nAcks gets added
2663 	 * to bp after this, so bp ends up at the right spot.  Go figure.
2664 	 */
2665 
2666 	if (rxa->nAcks != 0) {
2667 
2668 		TCHECK2(bp[0], rxa->nAcks);
2669 
2670 		/*
2671 		 * Sigh, this is gross, but it seems to work to collapse
2672 		 * ranges correctly.
2673 		 */
2674 
2675 		for (i = 0, start = last = -2; i < rxa->nAcks; i++)
2676 			if (rxa->acks[i] == RX_ACK_TYPE_ACK) {
2677 
2678 				/*
2679 				 * I figured this deserved _some_ explanation.
2680 				 * First, print "acked" and the packet seq
2681 				 * number if this is the first time we've
2682 				 * seen an acked packet.
2683 				 */
2684 
2685 				if (last == -2) {
2686 					printf(" acked %d",
2687 					       firstPacket + i);
2688 					start = i;
2689 				}
2690 
2691 				/*
2692 				 * Otherwise, if the there is a skip in
2693 				 * the range (such as an nacked packet in
2694 				 * the middle of some acked packets),
2695 				 * then print the current packet number
2696 				 * seperated from the last number by
2697 				 * a comma.
2698 				 */
2699 
2700 				else if (last != i - 1) {
2701 					printf(",%d", firstPacket + i);
2702 					start = i;
2703 				}
2704 
2705 				/*
2706 				 * We always set last to the value of
2707 				 * the last ack we saw.  Conversely, start
2708 				 * is set to the value of the first ack
2709 				 * we saw in a range.
2710 				 */
2711 
2712 				last = i;
2713 
2714 				/*
2715 				 * Okay, this bit a code gets executed when
2716 				 * we hit a nack ... in _this_ case we
2717 				 * want to print out the range of packets
2718 				 * that were acked, so we need to print
2719 				 * the _previous_ packet number seperated
2720 				 * from the first by a dash (-).  Since we
2721 				 * already printed the first packet above,
2722 				 * just print the final packet.  Don't
2723 				 * do this if there will be a single-length
2724 				 * range.
2725 				 */
2726 			} else if (last == i - 1 && start != last)
2727 				printf("-%d", firstPacket + i - 1);
2728 
2729 		/*
2730 		 * So, what's going on here?  We ran off the end of the
2731 		 * ack list, and if we got a range we need to finish it up.
2732 		 * So we need to determine if the last packet in the list
2733 		 * was an ack (if so, then last will be set to it) and
2734 		 * we need to see if the last range didn't start with the
2735 		 * last packet (because if it _did_, then that would mean
2736 		 * that the packet number has already been printed and
2737 		 * we don't need to print it again).
2738 		 */
2739 
2740 		if (last == i - 1 && start != last)
2741 			printf("-%d", firstPacket + i - 1);
2742 
2743 		/*
2744 		 * Same as above, just without comments
2745 		 */
2746 
2747 		for (i = 0, start = last = -2; i < rxa->nAcks; i++)
2748 			if (rxa->acks[i] == RX_ACK_TYPE_NACK) {
2749 				if (last == -2) {
2750 					printf(" nacked %d",
2751 					       firstPacket + i);
2752 					start = i;
2753 				} else if (last != i - 1) {
2754 					printf(",%d", firstPacket + i);
2755 					start = i;
2756 				}
2757 				last = i;
2758 			} else if (last == i - 1 && start != last)
2759 				printf("-%d", firstPacket + i - 1);
2760 
2761 		if (last == i - 1 && start != last)
2762 			printf("-%d", firstPacket + i - 1);
2763 
2764 		bp += rxa->nAcks;
2765 	}
2766 
2767 
2768 	/*
2769 	 * These are optional fields; depending on your version of AFS,
2770 	 * you may or may not see them
2771 	 */
2772 
2773 #define TRUNCRET(n)	if (snapend - bp + 1 <= n) return;
2774 
2775 	if (vflag > 1) {
2776 		TRUNCRET(4);
2777 		printf(" ifmtu");
2778 		INTOUT();
2779 
2780 		TRUNCRET(4);
2781 		printf(" maxmtu");
2782 		INTOUT();
2783 
2784 		TRUNCRET(4);
2785 		printf(" rwind");
2786 		INTOUT();
2787 
2788 		TRUNCRET(4);
2789 		printf(" maxpackets");
2790 		INTOUT();
2791 	}
2792 
2793 	return;
2794 
2795 trunc:
2796 	printf(" [|ack]");
2797 }
2798 #undef TRUNCRET
2799