contrib/tcpdump-3.8.3/print-telnet.c

   1 /*      $NetBSD: print-telnet.c,v 1.2 1999/10/11 12:40:12 sjg Exp $     */
   2
   3 /*-
   4  * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Simon J. Gerraty.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  * 3. All advertising materials mentioning features or use of this software
  19  *    must display the following acknowledgement:
  20  *        This product includes software developed by the NetBSD
  21  *        Foundation, Inc. and its contributors.
  22  * 4. Neither the name of The NetBSD Foundation nor the names of its
  23  *    contributors may be used to endorse or promote products derived
  24  *    from this software without specific prior written permission.
  25  *
  26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  36  * POSSIBILITY OF SUCH DAMAGE.
  37  */
  38 /*
  39  *      @(#)Copyright (c) 1994, Simon J. Gerraty.
  40  *
  41  *      This is free software.  It comes with NO WARRANTY.
  42  *      Permission to use, modify and distribute this source code
  43  *      is granted subject to the following conditions.
  44  *      1/ that the above copyright notice and this notice
  45  *      are preserved in all copies.
  46  */
  47
  48 #ifdef HAVE_CONFIG_H
  49 #include "config.h"
  50 #endif
  51
  52 #ifndef lint
  53 static const char rcsid[] _U_ =
  54      "@(#) $Header: /tcpdump/master/tcpdump/print-telnet.c,v 1.21.2.3 2003/12/29 22:42:23 hannes Exp $";
  55 #endif
  56
  57 #include <tcpdump-stdinc.h>
  58
  59 #include <stdio.h>
  60 #include <stdlib.h>
  61 #include <string.h>
  62
  63 #include "interface.h"
  64 #include "addrtoname.h"
  65
  66 #define TELCMDS
  67 #define TELOPTS
  68 #include "telnet.h"
  69
  70 /* normal */
  71 static const char *cmds[] = {
  72         "IS", "SEND", "INFO",
  73 };
  74
  75 /* 37: Authentication */
  76 static const char *authcmd[] = {
  77         "IS", "SEND", "REPLY", "NAME",
  78 };
  79 static const char *authtype[] = {
  80         "NULL", "KERBEROS_V4", "KERBEROS_V5", "SPX", "MINK",
  81         "SRP", "RSA", "SSL", NULL, NULL,
  82         "LOKI", "SSA", "KEA_SJ", "KEA_SJ_INTEG", "DSS",
  83         "NTLM",
  84 };
  85
  86 /* 38: Encryption */
  87 static const char *enccmd[] = {
  88         "IS", "SUPPORT", "REPLY", "START", "END",
  89         "REQUEST-START", "REQUEST-END", "END_KEYID", "DEC_KEYID",
  90 };
  91 static const char *enctype[] = {
  92         "NULL", "DES_CFB64", "DES_OFB64", "DES3_CFB64", "DES3_OFB64",
  93         NULL, "CAST5_40_CFB64", "CAST5_40_OFB64", "CAST128_CFB64", "CAST128_OFB64",
  94 };
  95
  96 #define STR_OR_ID(x, tab) \
  97         (((x) < sizeof(tab)/sizeof(tab[0]) && tab[(x)]) ? tab[(x)] : numstr(x))
  98
  99 static char *
 100 numstr(int x)
 101 {
 102         static char buf[20];
 103
 104         snprintf(buf, sizeof(buf), "%#x", x);
 105         return buf;
 106 }
 107
 108 /* sp points to IAC byte */
 109 static int
 110 telnet_parse(const u_char *sp, u_int length, int print)
 111 {
 112         int i, x;
 113         u_int c;
 114         const u_char *osp, *p;
 115 #define FETCH(c, sp, length) \
 116         do { \
 117                 if (length < 1) \
 118                         goto pktend; \
 119                 TCHECK(*sp); \
 120                 c = *sp++; \
 121                 length--; \
 122         } while (0)
 123
 124         osp = sp;
 125
 126         FETCH(c, sp, length);
 127         if (c != IAC)
 128                 goto pktend;
 129         FETCH(c, sp, length);
 130         if (c == IAC) {         /* <IAC><IAC>! */
 131                 if (print)
 132                         printf("IAC IAC");
 133                 goto done;
 134         }
 135
 136         i = c - TELCMD_FIRST;
 137         if (i < 0 || i > IAC - TELCMD_FIRST)
 138                 goto pktend;
 139
 140         switch (c) {
 141         case DONT:
 142         case DO:
 143         case WONT:
 144         case WILL:
 145         case SB:
 146                 /* DONT/DO/WONT/WILL x */
 147                 FETCH(x, sp, length);
 148                 if (x >= 0 && x < NTELOPTS) {
 149                         if (print)
 150                                 (void)printf("%s %s", telcmds[i], telopts[x]);
 151                 } else {
 152                         if (print)
 153                                 (void)printf("%s %#x", telcmds[i], x);
 154                 }
 155                 if (c != SB)
 156                         break;
 157                 /* IAC SB .... IAC SE */
 158                 p = sp;
 159                 while (length > (u_int)(p + 1 - sp)) {
 160                         if (p[0] == IAC && p[1] == SE)
 161                                 break;
 162                         p++;
 163                 }
 164                 if (*p != IAC)
 165                         goto pktend;
 166
 167                 switch (x) {
 168                 case TELOPT_AUTHENTICATION:
 169                         if (p <= sp)
 170                                 break;
 171                         FETCH(c, sp, length);
 172                         if (print)
 173                                 (void)printf(" %s", STR_OR_ID(c, authcmd));
 174                         if (p <= sp)
 175                                 break;
 176                         FETCH(c, sp, length);
 177                         if (print)
 178                                 (void)printf(" %s", STR_OR_ID(c, authtype));
 179                         break;
 180                 case TELOPT_ENCRYPT:
 181                         if (p <= sp)
 182                                 break;
 183                         FETCH(c, sp, length);
 184                         if (print)
 185                                 (void)printf(" %s", STR_OR_ID(c, enccmd));
 186                         if (p <= sp)
 187                                 break;
 188                         FETCH(c, sp, length);
 189                         if (print)
 190                                 (void)printf(" %s", STR_OR_ID(c, enctype));
 191                         break;
 192                 default:
 193                         if (p <= sp)
 194                                 break;
 195                         FETCH(c, sp, length);
 196                         if (print)
 197                                 (void)printf(" %s", STR_OR_ID(c, cmds));
 198                         break;
 199                 }
 200                 while (p > sp) {
 201                         FETCH(x, sp, length);
 202                         if (print)
 203                                 (void)printf(" %#x", x);
 204                 }
 205                 /* terminating IAC SE */
 206                 if (print)
 207                         (void)printf(" SE");
 208                 sp += 2;
 209                 length -= 2;
 210                 break;
 211         default:
 212                 if (print)
 213                         (void)printf("%s", telcmds[i]);
 214                 goto done;
 215         }
 216
 217 done:
 218         return sp - osp;
 219
 220 trunc:
 221         (void)printf("[|telnet]");
 222 pktend:
 223         return -1;
 224 #undef FETCH
 225 }
 226
 227 void
 228 telnet_print(const u_char *sp, u_int length)
 229 {
 230         int first = 1;
 231         const u_char *osp;
 232         int l;
 233
 234         osp = sp;
 235
 236         while (length > 0 && *sp == IAC) {
 237                 l = telnet_parse(sp, length, 0);
 238                 if (l < 0)
 239                         break;
 240
 241                 /*
 242                  * now print it
 243                  */
 244                 if (Xflag && 2 < vflag) {
 245                         if (first)
 246                                 printf("\nTelnet:");
 247                         hex_print_with_offset("\n", sp, l, sp - osp);
 248                         if (l > 8)
 249                                 printf("\n\t\t\t\t");
 250                         else
 251                                 printf("%*s\t", (8 - l) * 3, "");
 252                 } else
 253                         printf("%s", (first) ? " [telnet " : ", ");
 254
 255                 (void)telnet_parse(sp, length, 1);
 256                 first = 0;
 257
 258                 sp += l;
 259                 length -= l;
 260         }
 261         if (!first) {
 262                 if (Xflag && 2 < vflag)
 263                         printf("\n");
 264                 else
 265                         printf("]");
 266         }
 267 }