1 /*
2 * Decode and print Zephyr packets.
3 *
4 * http://web.mit.edu/zephyr/doc/protocol
5 *
6 * Copyright (c) 2001 Nickolai Zeldovich <kolya@MIT.EDU>
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that: (1) source code
11 * distributions retain the above copyright notice and this paragraph
12 * in its entirety, and (2) distributions including binary code include
13 * the above copyright notice and this paragraph in its entirety in
14 * the documentation or other materials provided with the distribution.
15 * The name of the author(s) may not be used to endorse or promote
16 * products derived from this software without specific prior written
17 * permission. THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY
18 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
20 * PURPOSE.
21 */
22
23 #ifndef lint
24 static const char rcsid[] _U_ =
25 "@(#) $Header: /tcpdump/master/tcpdump/print-zephyr.c,v 1.10 2007-08-09 18:47:27 hannes Exp $";
26 #endif
27
28 #ifdef HAVE_CONFIG_H
29 #include "config.h"
30 #endif
31
32 #include <tcpdump-stdinc.h>
33
34 #include <stdio.h>
35 #include <string.h>
36 #include <stdlib.h>
37
38 #include "interface.h"
39
40 struct z_packet {
41 char *version;
42 int numfields;
43 int kind;
44 char *uid;
45 int port;
46 int auth;
47 int authlen;
48 char *authdata;
49 char *class;
50 char *inst;
51 char *opcode;
52 char *sender;
53 const char *recipient;
54 char *format;
55 int cksum;
56 int multi;
57 char *multi_uid;
58 /* Other fields follow here.. */
59 };
60
61 enum z_packet_type {
62 Z_PACKET_UNSAFE = 0,
63 Z_PACKET_UNACKED,
64 Z_PACKET_ACKED,
65 Z_PACKET_HMACK,
66 Z_PACKET_HMCTL,
67 Z_PACKET_SERVACK,
68 Z_PACKET_SERVNAK,
69 Z_PACKET_CLIENTACK,
70 Z_PACKET_STAT
71 };
72
73 static const struct tok z_types[] = {
74 { Z_PACKET_UNSAFE, "unsafe" },
75 { Z_PACKET_UNACKED, "unacked" },
76 { Z_PACKET_ACKED, "acked" },
77 { Z_PACKET_HMACK, "hm-ack" },
78 { Z_PACKET_HMCTL, "hm-ctl" },
79 { Z_PACKET_SERVACK, "serv-ack" },
80 { Z_PACKET_SERVNAK, "serv-nak" },
81 { Z_PACKET_CLIENTACK, "client-ack" },
82 { Z_PACKET_STAT, "stat" }
83 };
84
85 char z_buf[256];
86
87 static char *
parse_field(char ** pptr,int * len)88 parse_field(char **pptr, int *len)
89 {
90 char *s;
91
92 if (*len <= 0 || !pptr || !*pptr)
93 return NULL;
94 if (*pptr > (char *) snapend)
95 return NULL;
96
97 s = *pptr;
98 while (*pptr <= (char *) snapend && *len >= 0 && **pptr) {
99 (*pptr)++;
100 (*len)--;
101 }
102 (*pptr)++;
103 (*len)--;
104 if (*len < 0 || *pptr > (char *) snapend)
105 return NULL;
106 return s;
107 }
108
109 static const char *
z_triple(char * class,char * inst,const char * recipient)110 z_triple(char *class, char *inst, const char *recipient)
111 {
112 if (!*recipient)
113 recipient = "*";
114 snprintf(z_buf, sizeof(z_buf), "<%s,%s,%s>", class, inst, recipient);
115 z_buf[sizeof(z_buf)-1] = '\0';
116 return z_buf;
117 }
118
119 static const char *
str_to_lower(char * string)120 str_to_lower(char *string)
121 {
122 strncpy(z_buf, string, sizeof(z_buf));
123 z_buf[sizeof(z_buf)-1] = '\0';
124
125 string = z_buf;
126 while (*string) {
127 *string = tolower((unsigned char)(*string));
128 string++;
129 }
130
131 return z_buf;
132 }
133
134 void
zephyr_print(const u_char * cp,int length)135 zephyr_print(const u_char *cp, int length)
136 {
137 struct z_packet z;
138 char *parse = (char *) cp;
139 int parselen = length;
140 char *s;
141 int lose = 0;
142
143 /* squelch compiler warnings */
144
145 z.kind = 0;
146 z.class = 0;
147 z.inst = 0;
148 z.opcode = 0;
149 z.sender = 0;
150 z.recipient = 0;
151
152 #define PARSE_STRING \
153 s = parse_field(&parse, &parselen); \
154 if (!s) lose = 1;
155
156 #define PARSE_FIELD_INT(field) \
157 PARSE_STRING \
158 if (!lose) field = strtol(s, 0, 16);
159
160 #define PARSE_FIELD_STR(field) \
161 PARSE_STRING \
162 if (!lose) field = s;
163
164 PARSE_FIELD_STR(z.version);
165 if (lose) return;
166 if (strncmp(z.version, "ZEPH", 4))
167 return;
168
169 PARSE_FIELD_INT(z.numfields);
170 PARSE_FIELD_INT(z.kind);
171 PARSE_FIELD_STR(z.uid);
172 PARSE_FIELD_INT(z.port);
173 PARSE_FIELD_INT(z.auth);
174 PARSE_FIELD_INT(z.authlen);
175 PARSE_FIELD_STR(z.authdata);
176 PARSE_FIELD_STR(z.class);
177 PARSE_FIELD_STR(z.inst);
178 PARSE_FIELD_STR(z.opcode);
179 PARSE_FIELD_STR(z.sender);
180 PARSE_FIELD_STR(z.recipient);
181 PARSE_FIELD_STR(z.format);
182 PARSE_FIELD_INT(z.cksum);
183 PARSE_FIELD_INT(z.multi);
184 PARSE_FIELD_STR(z.multi_uid);
185
186 if (lose) {
187 printf(" [|zephyr] (%d)", length);
188 return;
189 }
190
191 printf(" zephyr");
192 if (strncmp(z.version+4, "0.2", 3)) {
193 printf(" v%s", z.version+4);
194 return;
195 }
196
197 printf(" %s", tok2str(z_types, "type %d", z.kind));
198 if (z.kind == Z_PACKET_SERVACK) {
199 /* Initialization to silence warnings */
200 char *ackdata = NULL;
201 PARSE_FIELD_STR(ackdata);
202 if (!lose && strcmp(ackdata, "SENT"))
203 printf("/%s", str_to_lower(ackdata));
204 }
205 if (*z.sender) printf(" %s", z.sender);
206
207 if (!strcmp(z.class, "USER_LOCATE")) {
208 if (!strcmp(z.opcode, "USER_HIDE"))
209 printf(" hide");
210 else if (!strcmp(z.opcode, "USER_UNHIDE"))
211 printf(" unhide");
212 else
213 printf(" locate %s", z.inst);
214 return;
215 }
216
217 if (!strcmp(z.class, "ZEPHYR_ADMIN")) {
218 printf(" zephyr-admin %s", str_to_lower(z.opcode));
219 return;
220 }
221
222 if (!strcmp(z.class, "ZEPHYR_CTL")) {
223 if (!strcmp(z.inst, "CLIENT")) {
224 if (!strcmp(z.opcode, "SUBSCRIBE") ||
225 !strcmp(z.opcode, "SUBSCRIBE_NODEFS") ||
226 !strcmp(z.opcode, "UNSUBSCRIBE")) {
227
228 printf(" %ssub%s", strcmp(z.opcode, "SUBSCRIBE") ? "un" : "",
229 strcmp(z.opcode, "SUBSCRIBE_NODEFS") ? "" :
230 "-nodefs");
231 if (z.kind != Z_PACKET_SERVACK) {
232 /* Initialization to silence warnings */
233 char *c = NULL, *i = NULL, *r = NULL;
234 PARSE_FIELD_STR(c);
235 PARSE_FIELD_STR(i);
236 PARSE_FIELD_STR(r);
237 if (!lose) printf(" %s", z_triple(c, i, r));
238 }
239 return;
240 }
241
242 if (!strcmp(z.opcode, "GIMME")) {
243 printf(" ret");
244 return;
245 }
246
247 if (!strcmp(z.opcode, "GIMMEDEFS")) {
248 printf(" gimme-defs");
249 return;
250 }
251
252 if (!strcmp(z.opcode, "CLEARSUB")) {
253 printf(" clear-subs");
254 return;
255 }
256
257 printf(" %s", str_to_lower(z.opcode));
258 return;
259 }
260
261 if (!strcmp(z.inst, "HM")) {
262 printf(" %s", str_to_lower(z.opcode));
263 return;
264 }
265
266 if (!strcmp(z.inst, "REALM")) {
267 if (!strcmp(z.opcode, "ADD_SUBSCRIBE"))
268 printf(" realm add-subs");
269 if (!strcmp(z.opcode, "REQ_SUBSCRIBE"))
270 printf(" realm req-subs");
271 if (!strcmp(z.opcode, "RLM_SUBSCRIBE"))
272 printf(" realm rlm-sub");
273 if (!strcmp(z.opcode, "RLM_UNSUBSCRIBE"))
274 printf(" realm rlm-unsub");
275 return;
276 }
277 }
278
279 if (!strcmp(z.class, "HM_CTL")) {
280 printf(" hm_ctl %s", str_to_lower(z.inst));
281 printf(" %s", str_to_lower(z.opcode));
282 return;
283 }
284
285 if (!strcmp(z.class, "HM_STAT")) {
286 if (!strcmp(z.inst, "HMST_CLIENT") && !strcmp(z.opcode, "GIMMESTATS")) {
287 printf(" get-client-stats");
288 return;
289 }
290 }
291
292 if (!strcmp(z.class, "WG_CTL")) {
293 printf(" wg_ctl %s", str_to_lower(z.inst));
294 printf(" %s", str_to_lower(z.opcode));
295 return;
296 }
297
298 if (!strcmp(z.class, "LOGIN")) {
299 if (!strcmp(z.opcode, "USER_FLUSH")) {
300 printf(" flush_locs");
301 return;
302 }
303
304 if (!strcmp(z.opcode, "NONE") ||
305 !strcmp(z.opcode, "OPSTAFF") ||
306 !strcmp(z.opcode, "REALM-VISIBLE") ||
307 !strcmp(z.opcode, "REALM-ANNOUNCED") ||
308 !strcmp(z.opcode, "NET-VISIBLE") ||
309 !strcmp(z.opcode, "NET-ANNOUNCED")) {
310 printf(" set-exposure %s", str_to_lower(z.opcode));
311 return;
312 }
313 }
314
315 if (!*z.recipient)
316 z.recipient = "*";
317
318 printf(" to %s", z_triple(z.class, z.inst, z.recipient));
319 if (*z.opcode)
320 printf(" op %s", z.opcode);
321 return;
322 }
323