xref: /freebsd/contrib/tcpdump/print-telnet.c (revision ae83180158c4c937f170e31eff311b18c0286a93)
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[] =
54      "@(#) $Header: /tcpdump/master/tcpdump/print-telnet.c,v 1.18 2001/09/10 06:40:08 fenner Exp $";
55 #endif
56 
57 #include <sys/param.h>
58 #include <sys/time.h>
59 #include <sys/types.h>
60 #include <ctype.h>
61 
62 #include <netinet/in.h>
63 
64 #include <stdio.h>
65 #include <stdlib.h>
66 #include <unistd.h>
67 #include <string.h>
68 
69 #include "interface.h"
70 #include "addrtoname.h"
71 
72 #define TELCMDS
73 #define TELOPTS
74 #include "telnet.h"
75 
76 /* normal */
77 static const char *cmds[] = {
78 	"IS", "SEND", "INFO",
79 };
80 
81 /* 37: Authentication */
82 static const char *authcmd[] = {
83 	"IS", "SEND", "REPLY", "NAME",
84 };
85 static const char *authtype[] = {
86 	"NULL", "KERBEROS_V4", "KERBEROS_V5", "SPX", "MINK",
87 	"SRP", "RSA", "SSL", NULL, NULL,
88 	"LOKI", "SSA", "KEA_SJ", "KEA_SJ_INTEG", "DSS",
89 	"NTLM",
90 };
91 
92 /* 38: Encryption */
93 static const char *enccmd[] = {
94 	"IS", "SUPPORT", "REPLY", "START", "END",
95 	"REQUEST-START", "REQUEST-END", "END_KEYID", "DEC_KEYID",
96 };
97 static const char *enctype[] = {
98 	"NULL", "DES_CFB64", "DES_OFB64", "DES3_CFB64", "DES3_OFB64",
99 	NULL, "CAST5_40_CFB64", "CAST5_40_OFB64", "CAST128_CFB64", "CAST128_OFB64",
100 };
101 
102 #define STR_OR_ID(x, tab) \
103 	(((x) < sizeof(tab)/sizeof(tab[0]) && tab[(x)]) ? tab[(x)] : numstr(x))
104 
105 static char *
106 numstr(int x)
107 {
108 	static char buf[20];
109 
110 	snprintf(buf, sizeof(buf), "%#x", x);
111 	return buf;
112 }
113 
114 /* sp points to IAC byte */
115 static int
116 telnet_parse(const u_char *sp, u_int length, int print)
117 {
118 	int i, c, x;
119 	const u_char *osp, *p;
120 #define FETCH(c, sp, length) \
121 	do { \
122 		if (length < 1) \
123 			goto pktend; \
124 		TCHECK(*sp); \
125 		c = *sp++; \
126 		length--; \
127 	} while (0)
128 
129 	osp = sp;
130 
131 	FETCH(c, sp, length);
132 	if (c != IAC)
133 		goto pktend;
134 	FETCH(c, sp, length);
135 	if (c == IAC) {		/* <IAC><IAC>! */
136 		if (print)
137 			printf("IAC IAC");
138 		goto done;
139 	}
140 
141 	i = c - TELCMD_FIRST;
142 	if (i < 0 || i > IAC - TELCMD_FIRST)
143 		goto pktend;
144 
145 	switch (c) {
146 	case DONT:
147 	case DO:
148 	case WONT:
149 	case WILL:
150 	case SB:
151 		/* DONT/DO/WONT/WILL x */
152 		FETCH(x, sp, length);
153 		if (x >= 0 && x < NTELOPTS) {
154 			if (print)
155 				(void)printf("%s %s", telcmds[i], telopts[x]);
156 		} else {
157 			if (print)
158 				(void)printf("%s %#x", telcmds[i], x);
159 		}
160 		if (c != SB)
161 			break;
162 		/* IAC SB .... IAC SE */
163 		p = sp;
164 		while (length > p + 1 - sp) {
165 			if (p[0] == IAC && p[1] == SE)
166 				break;
167 			p++;
168 		}
169 		if (*p != IAC)
170 			goto pktend;
171 
172 		switch (x) {
173 		case TELOPT_AUTHENTICATION:
174 			if (p <= sp)
175 				break;
176 			FETCH(c, sp, length);
177 			if (print)
178 				(void)printf(" %s", STR_OR_ID(c, authcmd));
179 			if (p <= sp)
180 				break;
181 			FETCH(c, sp, length);
182 			if (print)
183 				(void)printf(" %s", STR_OR_ID(c, authtype));
184 			break;
185 		case TELOPT_ENCRYPT:
186 			if (p <= sp)
187 				break;
188 			FETCH(c, sp, length);
189 			if (print)
190 				(void)printf(" %s", STR_OR_ID(c, enccmd));
191 			if (p <= sp)
192 				break;
193 			FETCH(c, sp, length);
194 			if (print)
195 				(void)printf(" %s", STR_OR_ID(c, enctype));
196 			break;
197 		default:
198 			if (p <= sp)
199 				break;
200 			FETCH(c, sp, length);
201 			if (print)
202 				(void)printf(" %s", STR_OR_ID(c, cmds));
203 			break;
204 		}
205 		while (p > sp) {
206 			FETCH(x, sp, length);
207 			if (print)
208 				(void)printf(" %#x", x);
209 		}
210 		/* terminating IAC SE */
211 		if (print)
212 			(void)printf(" SE");
213 		sp += 2;
214 		length -= 2;
215 		break;
216 	default:
217 		if (print)
218 			(void)printf("%s", telcmds[i]);
219 		goto done;
220 	}
221 
222 done:
223 	return sp - osp;
224 
225 trunc:
226 	(void)printf("[|telnet]");
227 pktend:
228 	return -1;
229 #undef FETCH
230 }
231 
232 void
233 telnet_print(const u_char *sp, u_int length)
234 {
235 	int first = 1;
236 	const u_char *osp;
237 	int l;
238 
239 	osp = sp;
240 
241 	while (length > 0 && *sp == IAC) {
242 		l = telnet_parse(sp, length, 0);
243 		if (l < 0)
244 			break;
245 
246 		/*
247 		 * now print it
248 		 */
249 		if (Xflag && 2 < vflag) {
250 			if (first)
251 				printf("\nTelnet:");
252 			hex_print_with_offset(sp, l, sp - osp);
253 			if (l > 8)
254 				printf("\n\t\t\t\t");
255 			else
256 				printf("%*s\t", (8 - l) * 3, "");
257 		} else
258 			printf("%s", (first) ? " [telnet " : ", ");
259 
260 		(void)telnet_parse(sp, length, 1);
261 		first = 0;
262 
263 		sp += l;
264 		length -= l;
265 	}
266 	if (!first) {
267 		if (Xflag && 2 < vflag)
268 			printf("\n");
269 		else
270 			printf("]");
271 	}
272 }
273