locate(1): Bring in some updates/fixes from FreeBSD
[dragonfly.git] / contrib / tcpdump / print-telnet.c
blob4911e5caf2385375daae78d32a592216342f8c7c
1 /* $NetBSD: print-telnet.c,v 1.2 1999/10/11 12:40:12 sjg Exp $ */
3 /*-
4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Simon J. Gerraty.
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.
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.
39 * @(#)Copyright (c) 1994, Simon J. Gerraty.
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.
48 #ifdef HAVE_CONFIG_H
49 #include "config.h"
50 #endif
52 #ifndef lint
53 static const char rcsid[] _U_ =
54 "@(#) $Header: /tcpdump/master/tcpdump/print-telnet.c,v 1.24 2003-12-29 11:05:10 hannes Exp $";
55 #endif
57 #include <tcpdump-stdinc.h>
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
63 #include "interface.h"
64 #include "addrtoname.h"
66 #define TELCMDS
67 #define TELOPTS
68 #include "telnet.h"
70 /* normal */
71 static const char *cmds[] = {
72 "IS", "SEND", "INFO",
75 /* 37: Authentication */
76 static const char *authcmd[] = {
77 "IS", "SEND", "REPLY", "NAME",
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",
86 /* 38: Encryption */
87 static const char *enccmd[] = {
88 "IS", "SUPPORT", "REPLY", "START", "END",
89 "REQUEST-START", "REQUEST-END", "END_KEYID", "DEC_KEYID",
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",
96 #define STR_OR_ID(x, tab) \
97 (((x) < sizeof(tab)/sizeof(tab[0]) && tab[(x)]) ? tab[(x)] : numstr(x))
99 static char *
100 numstr(int x)
102 static char buf[20];
104 snprintf(buf, sizeof(buf), "%#x", x);
105 return buf;
108 /* sp points to IAC byte */
109 static int
110 telnet_parse(const u_char *sp, u_int length, int print)
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)
124 osp = sp;
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;
136 i = c - TELCMD_FIRST;
137 if (i < 0 || i > IAC - TELCMD_FIRST)
138 goto pktend;
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);
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++;
164 if (*p != IAC)
165 goto pktend;
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;
200 while (p > sp) {
201 FETCH(x, sp, length);
202 if (print)
203 (void)printf(" %#x", x);
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;
217 done:
218 return sp - osp;
220 trunc:
221 (void)printf("[|telnet]");
222 pktend:
223 return -1;
224 #undef FETCH
227 void
228 telnet_print(const u_char *sp, u_int length)
230 int first = 1;
231 const u_char *osp;
232 int l;
234 osp = sp;
236 while (length > 0 && *sp == IAC) {
237 l = telnet_parse(sp, length, 0);
238 if (l < 0)
239 break;
242 * now print it
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 " : ", ");
255 (void)telnet_parse(sp, length, 1);
256 first = 0;
258 sp += l;
259 length -= l;
261 if (!first) {
262 if (Xflag && 2 < vflag)
263 printf("\n");
264 else
265 printf("]");