Virgin import of tcpdump.org tcpdump v3.6.2

1 files changed, 238 insertions, 0 deletions

diff --git a/contrib/tcpdump/print-sll.c b/contrib/tcpdump/print-sll.c
new file mode 100644
index 0000000..8f2803a
--- /dev/null
+++ b/contrib/tcpdump/print-sll.c
@@ -0,0 +1,238 @@
+/*
+ * 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.
+ */
+#ifndef lint
+static const char rcsid[] =
+    "@(#) $Header: /tcpdump/master/tcpdump/print-sll.c,v 1.3 2000/12/23 20:49:34 guy Exp $ (LBL)";
+#endif
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <sys/param.h>
+#include <sys/time.h>
+#include <sys/socket.h>
+
+struct mbuf;
+struct rtentry;
+
+#include <netinet/in.h>
+
+#include <stdio.h>
+#include <string.h>
+#include <pcap.h>
+
+#include "interface.h"
+#include "addrtoname.h"
+#include "ethertype.h"
+
+#include "ether.h"
+#include "sll.h"
+
+const u_char *packetp;
+const u_char *snapend;
+
+static inline void
+sll_print(register const struct sll_header *sllp, u_int length)
+{
+	u_short halen;
+
+	switch (ntohs(sllp->sll_pkttype)) {
+
+	case LINUX_SLL_HOST:
+		(void)printf("< ");
+		break;
+
+	case LINUX_SLL_BROADCAST:
+		(void)printf("B ");
+		break;
+
+	case LINUX_SLL_MULTICAST:
+		(void)printf("M ");
+		break;
+
+	case LINUX_SLL_OTHERHOST:
+		(void)printf("P ");
+		break;
+
+	case LINUX_SLL_OUTGOING:
+		(void)printf("> ");
+		break;
+
+	default:
+		(void)printf("? ");
+		break;
+	}
+
+	/*
+	 * XXX - check the link-layer address type value?
+	 * For now, we just assume 6 means Ethernet.
+	 * XXX - print others as strings of hex?
+	 */
+	halen = ntohs(sllp->sll_halen);
+	if (halen == 6)
+		(void)printf("%s ", etheraddr_string(sllp->sll_addr));
+
+	if (!qflag)
+		(void)printf("%s ", etherproto_string(sllp->sll_protocol));
+	(void)printf("%d: ", length);
+}
+
+/*
+ * This is the top level routine of the printer.  'p' is the points
+ * to the ether header of the packet, 'h->tv' is the timestamp,
+ * 'h->length' is the length of the packet off the wire, and 'h->caplen'
+ * is the number of bytes actually captured.
+ */
+void
+sll_if_print(u_char *user, const struct pcap_pkthdr *h, const u_char *p)
+{
+	u_int caplen = h->caplen;
+	u_int length = h->len;
+	register const struct sll_header *sllp;
+	u_short pkttype;
+	struct ether_header ehdr;
+	u_short ether_type;
+	u_short extracted_ethertype;
+
+	ts_print(&h->ts);
+
+	if (caplen < SLL_HDR_LEN) {
+		/*
+		 * XXX - this "can't happen" because "pcap-linux.c" always
+		 * adds this many bytes of header to every packet in a
+		 * cooked socket capture.
+		 */
+		printf("[|sll]");
+		goto out;
+	}
+
+	sllp = (const struct sll_header *)p;
+
+	/*
+	 * Fake up an Ethernet header for the benefit of printers that
+	 * insist on "packetp" pointing to an Ethernet header.
+	 */
+	pkttype = ntohs(sllp->sll_pkttype);
+
+	/* The source address is in the packet header */
+	memcpy(ehdr.ether_shost, sllp->sll_addr, ETHER_ADDR_LEN);
+
+	if (pkttype != LINUX_SLL_OUTGOING) {
+		/*
+		 * We received this packet.
+		 *
+		 * We don't know the destination address, so
+		 * we fake it - all 0's except that the
+		 * bottommost bit of the bottommost octet
+		 * is set for a unicast packet, all 0's except
+		 * that the bottommost bit of the uppermost
+		 * octet is set for a multicast packet, all
+		 * 1's for a broadcast packet.
+		 */
+		if (pkttype == LINUX_SLL_BROADCAST)
+			memset(ehdr.ether_dhost, 0xFF, ETHER_ADDR_LEN);
+		else {
+			memset(ehdr.ether_dhost, 0, ETHER_ADDR_LEN);
+			if (pkttype == LINUX_SLL_MULTICAST)
+				ehdr.ether_dhost[0] = 1;
+			else
+				ehdr.ether_dhost[ETHER_ADDR_LEN-1] = 1;
+		}
+	} else {
+		/*
+		 * We sent this packet; we don't know whether it's
+		 * broadcast, multicast, or unicast, so just make
+		 * the destination address all 0's.
+		 */
+		memset(ehdr.ether_dhost, 0, ETHER_ADDR_LEN);
+	}
+
+	if (eflag)
+		sll_print(sllp, length);
+
+	/*
+	 * Some printers want to get back at the ethernet addresses,
+	 * and/or check that they're not walking off the end of the packet.
+	 * Rather than pass them all the way down, we set these globals.
+	 */
+	snapend = p + caplen;
+	/*
+	 * Actually, the only printers that use packetp are print-arp.c
+	 * and print-bootp.c, and they assume that packetp points to an
+	 * Ethernet header.  The right thing to do is to fix them to know
+	 * which link type is in use when they excavate. XXX
+	 */
+	packetp = (u_char *)&ehdr;
+
+	length -= SLL_HDR_LEN;
+	caplen -= SLL_HDR_LEN;
+	p += SLL_HDR_LEN;
+
+	ether_type = ntohs(sllp->sll_protocol);
+
+	/*
+	 * Is it (gag) an 802.3 encapsulation, or some non-Ethernet
+	 * packet type?
+	 */
+	extracted_ethertype = 0;
+	if (ether_type <= ETHERMTU) {
+		/*
+		 * Yes - what type is it?
+		 */
+		switch (ether_type) {
+
+		case LINUX_SLL_P_802_2:
+			/*
+			 * 802.2.
+			 * Try to print the LLC-layer header & higher layers.
+			 */
+			if (llc_print(p, length, caplen, ESRC(&ehdr),
+			    EDST(&ehdr), &extracted_ethertype) == 0)
+				goto unknown;	/* unknown LLC type */
+			break;
+
+		default:
+		unknown:
+			/* ether_type not known, print raw packet */
+			if (!eflag)
+				sll_print(sllp, length + SLL_HDR_LEN);
+			if (extracted_ethertype) {
+				printf("(LLC %s) ",
+			       etherproto_string(htons(extracted_ethertype)));
+			}
+			if (!xflag && !qflag)
+				default_print(p, caplen);
+			break;
+		}
+	} else if (ether_encap_print(ether_type, p, length, caplen,
+	    &extracted_ethertype) == 0) {
+		/* ether_type not known, print raw packet */
+		if (!eflag)
+			sll_print(sllp, length + SLL_HDR_LEN);
+		if (!xflag && !qflag)
+			default_print(p, caplen);
+	}
+	if (xflag)
+		default_print(p, caplen);
+ out:
+	putchar('\n');
+}