[dragonfly.git] / contrib / tcpdump / print-telnet.c

/*	$NetBSD: print-telnet.c,v 1.2 1999/10/11 12:40:12 sjg Exp $ 	*/

/*-
 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Simon J. Gerraty.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *        This product includes software developed by the NetBSD
 *        Foundation, Inc. and its contributors.
 * 4. Neither the name of The NetBSD Foundation nor the names of its
 *    contributors may be used to endorse or promote products derived
 *    from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */
/*
 *      @(#)Copyright (c) 1994, Simon J. Gerraty.
 *
 *      This is free software.  It comes with NO WARRANTY.
 *      Permission to use, modify and distribute this source code
 *      is granted subject to the following conditions.
 *      1/ that the above copyright notice and this notice
 *      are preserved in all copies.
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#ifndef lint
static const char rcsid[] _U_ =
     "@(#) $Header: /tcpdump/master/tcpdump/print-telnet.c,v 1.24 2003/12/29 11:05:10 hannes Exp $";
#endif

#include <tcpdump-stdinc.h>

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "interface.h"
#include "addrtoname.h"

#define TELCMDS
#define TELOPTS
#include "telnet.h"

/* normal */
static const char *cmds[] = {
	"IS", "SEND", "INFO",
};

/* 37: Authentication */
static const char *authcmd[] = {
	"IS", "SEND", "REPLY", "NAME",
};
static const char *authtype[] = {
	"NULL", "KERBEROS_V4", "KERBEROS_V5", "SPX", "MINK",
	"SRP", "RSA", "SSL", NULL, NULL,
	"LOKI", "SSA", "KEA_SJ", "KEA_SJ_INTEG", "DSS",
	"NTLM",
};

/* 38: Encryption */
static const char *enccmd[] = {
	"IS", "SUPPORT", "REPLY", "START", "END",
	"REQUEST-START", "REQUEST-END", "END_KEYID", "DEC_KEYID",
};
static const char *enctype[] = {
	"NULL", "DES_CFB64", "DES_OFB64", "DES3_CFB64", "DES3_OFB64",
	NULL, "CAST5_40_CFB64", "CAST5_40_OFB64", "CAST128_CFB64", "CAST128_OFB64",
};

#define STR_OR_ID(x, tab) \
	(((x) < sizeof(tab)/sizeof(tab[0]) && tab[(x)]) ? tab[(x)] : numstr(x))

static char *
numstr(int x)
{
	static char buf[20];

	snprintf(buf, sizeof(buf), "%#x", x);
	return buf;
}

/* sp points to IAC byte */
static int
telnet_parse(const u_char *sp, u_int length, int print)
{
	int i, x;
	u_int c;
	const u_char *osp, *p;
#define FETCH(c, sp, length) \
	do { \
		if (length < 1) \
			goto pktend; \
		TCHECK(*sp); \
		c = *sp++; \
		length--; \
	} while (0)

	osp = sp;

	FETCH(c, sp, length);
	if (c != IAC)
		goto pktend;
	FETCH(c, sp, length);
	if (c == IAC) {		/* <IAC><IAC>! */
		if (print)
			printf("IAC IAC");
		goto done;
	}

	i = c - TELCMD_FIRST;
	if (i < 0 || i > IAC - TELCMD_FIRST)
		goto pktend;

	switch (c) {
	case DONT:
	case DO:
	case WONT:
	case WILL:
	case SB:
		/* DONT/DO/WONT/WILL x */
		FETCH(x, sp, length);
		if (x >= 0 && x < NTELOPTS) {
			if (print)
				(void)printf("%s %s", telcmds[i], telopts[x]);
		} else {
			if (print)
				(void)printf("%s %#x", telcmds[i], x);
		}
		if (c != SB)
			break;
		/* IAC SB .... IAC SE */
		p = sp;
		while (length > (u_int)(p + 1 - sp)) {
			if (p[0] == IAC && p[1] == SE)
				break;
			p++;
		}
		if (*p != IAC)
			goto pktend;

		switch (x) {
		case TELOPT_AUTHENTICATION:
			if (p <= sp)
				break;
			FETCH(c, sp, length);
			if (print)
				(void)printf(" %s", STR_OR_ID(c, authcmd));
			if (p <= sp)
				break;
			FETCH(c, sp, length);
			if (print)
				(void)printf(" %s", STR_OR_ID(c, authtype));
			break;
		case TELOPT_ENCRYPT:
			if (p <= sp)
				break;
			FETCH(c, sp, length);
			if (print)
				(void)printf(" %s", STR_OR_ID(c, enccmd));
			if (p <= sp)
				break;
			FETCH(c, sp, length);
			if (print)
				(void)printf(" %s", STR_OR_ID(c, enctype));
			break;
		default:
			if (p <= sp)
				break;
			FETCH(c, sp, length);
			if (print)
				(void)printf(" %s", STR_OR_ID(c, cmds));
			break;
		}
		while (p > sp) {
			FETCH(x, sp, length);
			if (print)
				(void)printf(" %#x", x);
		}
		/* terminating IAC SE */
		if (print)
			(void)printf(" SE");
		sp += 2;
		length -= 2;
		break;
	default:
		if (print)
			(void)printf("%s", telcmds[i]);
		goto done;
	}

done:
	return sp - osp;

trunc:
	(void)printf("[|telnet]");
pktend:
	return -1;
#undef FETCH
}

void
telnet_print(const u_char *sp, u_int length)
{
	int first = 1;
	const u_char *osp;
	int l;

	osp = sp;

	while (length > 0 && *sp == IAC) {
		l = telnet_parse(sp, length, 0);
		if (l < 0)
			break;

		/*
		 * now print it
		 */
		if (Xflag && 2 < vflag) {
			if (first)
				printf("\nTelnet:");
			hex_print_with_offset("\n", sp, l, sp - osp);
			if (l > 8)
				printf("\n\t\t\t\t");
			else
				printf("%*s\t", (8 - l) * 3, "");
		} else
			printf("%s", (first) ? " [telnet " : ", ");

		(void)telnet_parse(sp, length, 1);
		first = 0;

		sp += l;
		length -= l;
	}
	if (!first) {
		if (Xflag && 2 < vflag)
			printf("\n");
		else
			printf("]");
	}
}
Commit	Line	Data
c8cf0f94 PA	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.24 2003/12/29 11:05:10 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	}