156893Sfenner/* 256893Sfenner * Decode and print Zephyr packets. 356893Sfenner * 456893Sfenner * http://web.mit.edu/zephyr/doc/protocol 5127668Sbms * 656893Sfenner * Copyright (c) 2001 Nickolai Zeldovich <kolya@MIT.EDU> 756893Sfenner * All rights reserved. 856893Sfenner * 9127668Sbms * Redistribution and use in source and binary forms, with or without 1056893Sfenner * modification, are permitted provided that: (1) source code 1156893Sfenner * distributions retain the above copyright notice and this paragraph 12127668Sbms * in its entirety, and (2) distributions including binary code include 1356893Sfenner * the above copyright notice and this paragraph in its entirety in 1456893Sfenner * the documentation or other materials provided with the distribution. 1556893Sfenner * The name of the author(s) may not be used to endorse or promote 16127668Sbms * products derived from this software without specific prior written 1756893Sfenner * permission. THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY 1856893Sfenner * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE 1956893Sfenner * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 2056893Sfenner * PURPOSE. 21127668Sbms */ 2256893Sfenner 2356893Sfenner#ifndef lint 2456893Sfennerstatic const char rcsid[] _U_ = 25127668Sbms "@(#) $Header: /tcpdump/master/tcpdump/print-zephyr.c,v 1.10 2007-08-09 18:47:27 hannes Exp $"; 2656893Sfenner#endif 2756893Sfenner 2856893Sfenner#ifdef HAVE_CONFIG_H 2956893Sfenner#include "config.h" 3056893Sfenner#endif 3156893Sfenner 3256893Sfenner#include <tcpdump-stdinc.h> 3356893Sfenner 3456893Sfenner#include <stdio.h> 3556893Sfenner#include <string.h> 3656893Sfenner#include <stdlib.h> 3756893Sfenner 3856893Sfenner#include "interface.h" 39190207Srpaulo 4056893Sfennerstruct z_packet { 4156893Sfenner char *version; 42127668Sbms int numfields; 43190207Srpaulo int kind; 4456893Sfenner char *uid; 4556893Sfenner int port; 46127668Sbms int auth; 4756893Sfenner int authlen; 4856893Sfenner char *authdata; 4956893Sfenner char *class; 5056893Sfenner char *inst; 5156893Sfenner char *opcode; 5256893Sfenner char *sender; 5356893Sfenner const char *recipient; 5456893Sfenner char *format; 5556893Sfenner int cksum; 5656893Sfenner int multi; 5756893Sfenner char *multi_uid; 5856893Sfenner /* Other fields follow here.. */ 5956893Sfenner}; 6056893Sfenner 61enum 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 73static 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 85char z_buf[256]; 86 87static char * 88parse_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 109static const char * 110z_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 119static const char * 120str_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 134void 135zephyr_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