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

/*
 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that: (1) source code distributions
 * retain the above copyright notice and this paragraph in its entirety, (2)
 * distributions including binary code include the above copyright notice and
 * this paragraph in its entirety in the documentation or other materials
 * provided with the distribution, and (3) all advertising materials mentioning
 * features or use of this software display the following acknowledgement:
 * ``This product includes software developed by the University of California,
 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
 * the University 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 ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 *
 * From: NetBSD: print-arcnet.c,v 1.2 2000/04/24 13:02:28 itojun Exp
 */
#ifndef lint
static const char rcsid[] _U_ =
    "@(#) $Header: /tcpdump/master/tcpdump/print-arcnet.c,v 1.20 2005/04/06 21:32:38 mcr Exp $ (LBL)";
#endif

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

#include <tcpdump-stdinc.h>

#include <stdio.h>
#include <pcap.h>

#include "interface.h"
#include "arcnet.h"

static int arcnet_encap_print(u_char arctype, const u_char *p,
    u_int length, u_int caplen);

struct tok arctypemap[] = {
	{ ARCTYPE_IP_OLD,	"oldip" },
	{ ARCTYPE_ARP_OLD,	"oldarp" },
	{ ARCTYPE_IP,		"ip" },
	{ ARCTYPE_ARP,		"arp" },
	{ ARCTYPE_REVARP,	"rarp" },
	{ ARCTYPE_ATALK,	"atalk" },
	{ ARCTYPE_BANIAN,	"banyan" },
	{ ARCTYPE_IPX,		"ipx" },
	{ ARCTYPE_INET6,	"ipv6" },
	{ ARCTYPE_DIAGNOSE,	"diag" },
	{ 0, 0 }
};

static inline void
arcnet_print(const u_char *bp, u_int length, int phds, int flag, u_int seqid)
{
	const struct arc_header *ap;
	const char *arctypename;


	ap = (const struct arc_header *)bp;


	if (qflag) {
		(void)printf("%02x %02x %d: ",
			     ap->arc_shost,
			     ap->arc_dhost,
			     length);
		return;
	}

	arctypename = tok2str(arctypemap, "%02x", ap->arc_type);

	if (!phds) {
		(void)printf("%02x %02x %s %d: ",
			     ap->arc_shost, ap->arc_dhost, arctypename,
			     length);
			     return;
	}

	if (flag == 0) {
		(void)printf("%02x %02x %s seqid %04x %d: ",
			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
			length);
			return;
	}

	if (flag & 1)
		(void)printf("%02x %02x %s seqid %04x "
			"(first of %d fragments) %d: ",
			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
			(flag + 3) / 2, length);
	else
		(void)printf("%02x %02x %s seqid %04x "
			"(fragment %d) %d: ",
			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
			flag/2 + 1, length);
}

/*
 * This is the top level routine of the printer.  'p' points
 * to the ARCNET header of the packet, 'h->ts' is the timestamp,
 * 'h->len' is the length of the packet off the wire, and 'h->caplen'
 * is the number of bytes actually captured.
 */
u_int
arcnet_if_print(const struct pcap_pkthdr *h, const u_char *p)
{
	u_int caplen = h->caplen;
	u_int length = h->len;
	const struct arc_header *ap;

	int phds, flag = 0, archdrlen = 0;
	u_int seqid = 0;
	u_char arc_type;

	if (caplen < ARC_HDRLEN) {
		printf("[|arcnet]");
		return (caplen);
	}

	ap = (const struct arc_header *)p;
	arc_type = ap->arc_type;

	switch (arc_type) {
	default:
		phds = 1;
		break;
	case ARCTYPE_IP_OLD:
	case ARCTYPE_ARP_OLD:
	case ARCTYPE_DIAGNOSE:
		phds = 0;
		archdrlen = ARC_HDRLEN;
		break;
	}

	if (phds) {
		if (caplen < ARC_HDRNEWLEN) {
			arcnet_print(p, length, 0, 0, 0);
			printf("[|phds]");
			return (caplen);
		}

		if (ap->arc_flag == 0xff) {
			if (caplen < ARC_HDRNEWLEN_EXC) {
				arcnet_print(p, length, 0, 0, 0);
				printf("[|phds extended]");
				return (caplen);
			}
			flag = ap->arc_flag2;
			seqid = ntohs(ap->arc_seqid2);
			archdrlen = ARC_HDRNEWLEN_EXC;
		} else {
			flag = ap->arc_flag;
			seqid = ntohs(ap->arc_seqid);
			archdrlen = ARC_HDRNEWLEN;
		}
	}


	if (eflag)
		arcnet_print(p, length, phds, flag, seqid);

	/*
	 * Go past the ARCNET header.
	 */
	length -= archdrlen;
	caplen -= archdrlen;
	p += archdrlen;

	if (phds && flag && (flag & 1) == 0) {
		/*
		 * This is a middle fragment.
		 */
		return (archdrlen);
	}

	if (!arcnet_encap_print(arc_type, p, length, caplen))
		default_print(p, caplen);

	return (archdrlen);
}

/*
 * This is the top level routine of the printer.  'p' points
 * to the ARCNET header of the packet, 'h->ts' is the timestamp,
 * 'h->len' is the length of the packet off the wire, and 'h->caplen'
 * is the number of bytes actually captured.  It is quite similar
 * to the non-Linux style printer except that Linux doesn't ever
 * supply packets that look like exception frames, it always supplies
 * reassembled packets rather than raw frames, and headers have an
 * extra "offset" field between the src/dest and packet type.
 */
u_int
arcnet_linux_if_print(const struct pcap_pkthdr *h, const u_char *p)
{
	u_int caplen = h->caplen;
	u_int length = h->len;
	const struct arc_linux_header *ap;

	int archdrlen = 0;
	u_char arc_type;

	if (caplen < ARC_LINUX_HDRLEN) {
		printf("[|arcnet]");
		return (caplen);
	}

	ap = (const struct arc_linux_header *)p;
	arc_type = ap->arc_type;

	switch (arc_type) {
	default:
		archdrlen = ARC_LINUX_HDRNEWLEN;
		if (caplen < ARC_LINUX_HDRNEWLEN) {
			printf("[|arcnet]");
			return (caplen);
		}
		break;
	case ARCTYPE_IP_OLD:
	case ARCTYPE_ARP_OLD:
	case ARCTYPE_DIAGNOSE:
		archdrlen = ARC_LINUX_HDRLEN;
		break;
	}

	if (eflag)
		arcnet_print(p, length, 0, 0, 0);

	/*
	 * Go past the ARCNET header.
	 */
	length -= archdrlen;
	caplen -= archdrlen;
	p += archdrlen;

	if (!arcnet_encap_print(arc_type, p, length, caplen))
		default_print(p, caplen);

	return (archdrlen);
}

/*
 * Prints the packet encapsulated in an ARCnet data field,
 * given the ARCnet system code.
 *
 * Returns non-zero if it can do so, zero if the system code is unknown.
 */


static int
arcnet_encap_print(u_char arctype, const u_char *p,
    u_int length, u_int caplen)
{
	switch (arctype) {

	case ARCTYPE_IP_OLD:
	case ARCTYPE_IP:
	        ip_print(gndo, p, length);
		return (1);

#ifdef INET6
	case ARCTYPE_INET6:
		ip6_print(p, length);
		return (1);
#endif /*INET6*/

	case ARCTYPE_ARP_OLD:
	case ARCTYPE_ARP:
	case ARCTYPE_REVARP:
	  arp_print(gndo, p, length, caplen);
		return (1);

	case ARCTYPE_ATALK:	/* XXX was this ever used? */
		if (vflag)
			fputs("et1 ", stdout);
		atalk_print(p, length);
		return (1);

	case ARCTYPE_IPX:
		ipx_print(p, length);
		return (1);

	default:
		return (0);
	}
}

/*
 * Local Variables:
 * c-style: bsd
 * End:
 */
Commit	Line	Data
c8cf0f94 PA	1	/*
	2	* Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
	3	* The Regents of the University of California. All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that: (1) source code distributions
	7	* retain the above copyright notice and this paragraph in its entirety, (2)
	8	* distributions including binary code include the above copyright notice and
	9	* this paragraph in its entirety in the documentation or other materials
	10	* provided with the distribution, and (3) all advertising materials mentioning
	11	* features or use of this software display the following acknowledgement:
	12	* ``This product includes software developed by the University of California,
	13	* Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
	14	* the University nor the names of its contributors may be used to endorse
	15	* or promote products derived from this software without specific prior
	16	* written permission.
	17	* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
	18	* WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
	19	* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
	20	*
	21	* From: NetBSD: print-arcnet.c,v 1.2 2000/04/24 13:02:28 itojun Exp
	22	*/
	23	#ifndef lint
	24	static const char rcsid[] _U_ =
	25	"@(#) $Header: /tcpdump/master/tcpdump/print-arcnet.c,v 1.20 2005/04/06 21:32:38 mcr Exp $ (LBL)";
	26	#endif
	27
	28	#ifdef HAVE_CONFIG_H
	29	#include "config.h"
	30	#endif
	31
	32	#include <tcpdump-stdinc.h>
	33
	34	#include <stdio.h>
	35	#include <pcap.h>
	36
	37	#include "interface.h"
	38	#include "arcnet.h"
	39
	40	static int arcnet_encap_print(u_char arctype, const u_char *p,
	41	u_int length, u_int caplen);
	42
	43	struct tok arctypemap[] = {
	44	{ ARCTYPE_IP_OLD, "oldip" },
	45	{ ARCTYPE_ARP_OLD, "oldarp" },
	46	{ ARCTYPE_IP, "ip" },
	47	{ ARCTYPE_ARP, "arp" },
	48	{ ARCTYPE_REVARP, "rarp" },
	49	{ ARCTYPE_ATALK, "atalk" },
	50	{ ARCTYPE_BANIAN, "banyan" },
	51	{ ARCTYPE_IPX, "ipx" },
	52	{ ARCTYPE_INET6, "ipv6" },
	53	{ ARCTYPE_DIAGNOSE, "diag" },
	54	{ 0, 0 }
	55	};
	56
	57	static inline void
	58	arcnet_print(const u_char *bp, u_int length, int phds, int flag, u_int seqid)
	59	{
	60	const struct arc_header *ap;
	61	const char *arctypename;
	62
	63
	64	ap = (const struct arc_header *)bp;
65
66
67	if (qflag) {
68	(void)printf("%02x %02x %d: ",
69	ap->arc_shost,
70	ap->arc_dhost,
71	length);
72	return;
73	}
74
75	arctypename = tok2str(arctypemap, "%02x", ap->arc_type);
76
77	if (!phds) {
78	(void)printf("%02x %02x %s %d: ",
79	ap->arc_shost, ap->arc_dhost, arctypename,
80	length);
81	return;
82	}
83
84	if (flag == 0) {
85	(void)printf("%02x %02x %s seqid %04x %d: ",
86	ap->arc_shost, ap->arc_dhost, arctypename, seqid,
87	length);
88	return;
89	}
90
91	if (flag & 1)
92	(void)printf("%02x %02x %s seqid %04x "
93	"(first of %d fragments) %d: ",
94	ap->arc_shost, ap->arc_dhost, arctypename, seqid,
95	(flag + 3) / 2, length);
96	else
97	(void)printf("%02x %02x %s seqid %04x "
98	"(fragment %d) %d: ",
99	ap->arc_shost, ap->arc_dhost, arctypename, seqid,
100	flag/2 + 1, length);
101	}
102
103	/*
104	* This is the top level routine of the printer. 'p' points
105	* to the ARCNET header of the packet, 'h->ts' is the timestamp,
106	* 'h->len' is the length of the packet off the wire, and 'h->caplen'
107	* is the number of bytes actually captured.
108	*/
109	u_int
110	arcnet_if_print(const struct pcap_pkthdr h, const u_char p)
111	{
112	u_int caplen = h->caplen;
113	u_int length = h->len;
114	const struct arc_header *ap;
115
116	int phds, flag = 0, archdrlen = 0;
117	u_int seqid = 0;
118	u_char arc_type;
119
120	if (caplen < ARC_HDRLEN) {
121	printf("[\|arcnet]");
122	return (caplen);
123	}
124
125	ap = (const struct arc_header *)p;
126	arc_type = ap->arc_type;
127
128	switch (arc_type) {
129	default:
130	phds = 1;
131	break;
132	case ARCTYPE_IP_OLD:
133	case ARCTYPE_ARP_OLD:
134	case ARCTYPE_DIAGNOSE:
135	phds = 0;
136	archdrlen = ARC_HDRLEN;
137	break;
138	}
139
140	if (phds) {
141	if (caplen < ARC_HDRNEWLEN) {
142	arcnet_print(p, length, 0, 0, 0);
143	printf("[\|phds]");
144	return (caplen);
145	}
146
147	if (ap->arc_flag == 0xff) {
148	if (caplen < ARC_HDRNEWLEN_EXC) {
149	arcnet_print(p, length, 0, 0, 0);
150	printf("[\|phds extended]");
151	return (caplen);
152	}
153	flag = ap->arc_flag2;
154	seqid = ntohs(ap->arc_seqid2);
155	archdrlen = ARC_HDRNEWLEN_EXC;
156	} else {
157	flag = ap->arc_flag;
158	seqid = ntohs(ap->arc_seqid);
159	archdrlen = ARC_HDRNEWLEN;
160	}
161	}
162
163
164	if (eflag)
165	arcnet_print(p, length, phds, flag, seqid);
166
167	/*
168	* Go past the ARCNET header.
169	*/
170	length -= archdrlen;
171	caplen -= archdrlen;
172	p += archdrlen;
173
174	if (phds && flag && (flag & 1) == 0) {
175	/*
176	* This is a middle fragment.
177	*/
178	return (archdrlen);
179	}
180
181	if (!arcnet_encap_print(arc_type, p, length, caplen))
182	default_print(p, caplen);
183
184	return (archdrlen);
185	}
186
187	/*
188	* This is the top level routine of the printer. 'p' points
189	* to the ARCNET header of the packet, 'h->ts' is the timestamp,
190	* 'h->len' is the length of the packet off the wire, and 'h->caplen'
191	* is the number of bytes actually captured. It is quite similar
192	* to the non-Linux style printer except that Linux doesn't ever
193	* supply packets that look like exception frames, it always supplies
194	* reassembled packets rather than raw frames, and headers have an
195	* extra "offset" field between the src/dest and packet type.
196	*/
197	u_int
198	arcnet_linux_if_print(const struct pcap_pkthdr h, const u_char p)
199	{
200	u_int caplen = h->caplen;
201	u_int length = h->len;
202	const struct arc_linux_header *ap;
203
204	int archdrlen = 0;
205	u_char arc_type;
206
207	if (caplen < ARC_LINUX_HDRLEN) {
208	printf("[\|arcnet]");
209	return (caplen);
210	}
211
212	ap = (const struct arc_linux_header *)p;
213	arc_type = ap->arc_type;
214
215	switch (arc_type) {
216	default:
217	archdrlen = ARC_LINUX_HDRNEWLEN;
218	if (caplen < ARC_LINUX_HDRNEWLEN) {
219	printf("[\|arcnet]");
220	return (caplen);
221	}
222	break;
223	case ARCTYPE_IP_OLD:
224	case ARCTYPE_ARP_OLD:
225	case ARCTYPE_DIAGNOSE:
226	archdrlen = ARC_LINUX_HDRLEN;
227	break;
228	}
229
230	if (eflag)
231	arcnet_print(p, length, 0, 0, 0);
232
233	/*
234	* Go past the ARCNET header.
235	*/
236	length -= archdrlen;
237	caplen -= archdrlen;
238	p += archdrlen;
239
240	if (!arcnet_encap_print(arc_type, p, length, caplen))
241	default_print(p, caplen);
242
243	return (archdrlen);
244	}
245
246	/*
247	* Prints the packet encapsulated in an ARCnet data field,
248	* given the ARCnet system code.
249	*
250	* Returns non-zero if it can do so, zero if the system code is unknown.
251	*/
252
253
254	static int
255	arcnet_encap_print(u_char arctype, const u_char *p,
256	u_int length, u_int caplen)
257	{
258	switch (arctype) {
259
260	case ARCTYPE_IP_OLD:
261	case ARCTYPE_IP:
262	ip_print(gndo, p, length);
263	return (1);
264
265	#ifdef INET6
266	case ARCTYPE_INET6:
267	ip6_print(p, length);
268	return (1);
269	#endif /INET6/
270
271	case ARCTYPE_ARP_OLD:
272	case ARCTYPE_ARP:
273	case ARCTYPE_REVARP:
274	arp_print(gndo, p, length, caplen);
275	return (1);
276
277	case ARCTYPE_ATALK: /* XXX was this ever used? */
278	if (vflag)
279	fputs("et1 ", stdout);
280	atalk_print(p, length);
281	return (1);
282
283	case ARCTYPE_IPX:
284	ipx_print(p, length);
285	return (1);
286
287	default:
288	return (0);
289	}
290	}
291
292	/*
293	* Local Variables:
294	* c-style: bsd
295	* End:
296	*/
297