Flatten vendor/tcpdump and remove keyword expansion.

1 files changed, 0 insertions, 1032 deletions

diff --git a/contrib/tcpdump/print-juniper.c b/contrib/tcpdump/print-juniper.c
deleted file mode 100644
index b5837e3..0000000
--- a/contrib/tcpdump/print-juniper.c
+++ /dev/null
@@ -1,1032 +0,0 @@
-/* 
- * 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, and (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.
- * 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.
- *
- * Original code by Hannes Gredler (hannes@juniper.net)
- */
-
-#ifndef lint
-static const char rcsid[] _U_ =
-    "@(#) $Header: /tcpdump/master/tcpdump/print-juniper.c,v 1.8.2.22 2006/05/10 22:42:46 guy Exp $ (LBL)";
-#endif
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include <tcpdump-stdinc.h>
-
-#include <pcap.h>
-#include <stdio.h>
-
-#include "interface.h"
-#include "addrtoname.h"
-#include "extract.h"
-#include "ppp.h"
-#include "llc.h"
-#include "nlpid.h"
-#include "ethertype.h"
-#include "atm.h"
-
-#define JUNIPER_BPF_OUT           0       /* Outgoing packet */
-#define JUNIPER_BPF_IN            1       /* Incoming packet */
-#define JUNIPER_BPF_PKT_IN        0x1     /* Incoming packet */
-#define JUNIPER_BPF_NO_L2         0x2     /* L2 header stripped */
-#define JUNIPER_BPF_EXT           0x80    /* extensions present */
-#define JUNIPER_MGC_NUMBER        0x4d4743 /* = "MGC" */
-
-#define JUNIPER_LSQ_COOKIE_RE         (1 << 3)
-#define JUNIPER_LSQ_COOKIE_DIR        (1 << 2)
-#define JUNIPER_LSQ_L3_PROTO_SHIFT     4
-#define JUNIPER_LSQ_L3_PROTO_MASK     (0x17 << JUNIPER_LSQ_L3_PROTO_SHIFT)
-#define JUNIPER_LSQ_L3_PROTO_IPV4     (0 << JUNIPER_LSQ_L3_PROTO_SHIFT)
-#define JUNIPER_LSQ_L3_PROTO_IPV6     (1 << JUNIPER_LSQ_L3_PROTO_SHIFT)
-#define JUNIPER_LSQ_L3_PROTO_MPLS     (2 << JUNIPER_LSQ_L3_PROTO_SHIFT)
-#define JUNIPER_LSQ_L3_PROTO_ISO      (3 << JUNIPER_LSQ_L3_PROTO_SHIFT)
-#define AS_PIC_COOKIE_LEN 8
-
-#define JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE 1
-#define JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE 2
-#define JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE 3
-#define JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE 4
-#define JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE 5
-
-static struct tok juniper_ipsec_type_values[] = {
-    { JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE, "ESP ENCR-AUTH" },
-    { JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE, "ESP ENCR-AH AUTH" },
-    { JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE, "ESP AUTH" },
-    { JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE, "AH AUTH" },
-    { JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE, "ESP ENCR" },
-    { 0, NULL}
-};
-
-static struct tok juniper_direction_values[] = {
-    { JUNIPER_BPF_IN,  "In"},
-    { JUNIPER_BPF_OUT, "Out"},
-    { 0, NULL}
-};
-
-struct juniper_cookie_table_t {
-    u_int32_t pictype;		/* pic type */
-    u_int8_t  cookie_len;       /* cookie len */
-    const char *s;		/* pic name */
-};
-
-static struct juniper_cookie_table_t juniper_cookie_table[] = {
-#ifdef DLT_JUNIPER_ATM1
-    { DLT_JUNIPER_ATM1,  4, "ATM1"},
-#endif
-#ifdef DLT_JUNIPER_ATM2
-    { DLT_JUNIPER_ATM2,  8, "ATM2"},
-#endif
-#ifdef DLT_JUNIPER_MLPPP
-    { DLT_JUNIPER_MLPPP, 2, "MLPPP"},
-#endif
-#ifdef DLT_JUNIPER_MLFR
-    { DLT_JUNIPER_MLFR,  2, "MLFR"},
-#endif
-#ifdef DLT_JUNIPER_MFR
-    { DLT_JUNIPER_MFR,   4, "MFR"},
-#endif
-#ifdef DLT_JUNIPER_PPPOE
-    { DLT_JUNIPER_PPPOE, 0, "PPPoE"},
-#endif
-#ifdef DLT_JUNIPER_PPPOE_ATM
-    { DLT_JUNIPER_PPPOE_ATM, 0, "PPPoE ATM"},
-#endif
-#ifdef DLT_JUNIPER_GGSN
-    { DLT_JUNIPER_GGSN, 8, "GGSN"},
-#endif
-#ifdef DLT_JUNIPER_MONITOR
-    { DLT_JUNIPER_MONITOR, 8, "MONITOR"},
-#endif
-#ifdef DLT_JUNIPER_SERVICES
-    { DLT_JUNIPER_SERVICES, 8, "AS"},
-#endif
-#ifdef DLT_JUNIPER_ES
-    { DLT_JUNIPER_ES, 0, "ES"},
-#endif
-    { 0, 0, NULL }
-};
-
-struct juniper_l2info_t {
-    u_int32_t length;
-    u_int32_t caplen;
-    u_int32_t pictype;
-    u_int8_t direction;
-    u_int8_t header_len;
-    u_int8_t cookie_len;
-    u_int8_t cookie_type;
-    u_int8_t cookie[8];
-    u_int8_t bundle;
-    u_int16_t proto;
-};
-
-#define LS_COOKIE_ID            0x54
-#define AS_COOKIE_ID            0x47
-#define LS_MLFR_COOKIE_LEN	4
-#define ML_MLFR_COOKIE_LEN	2
-#define LS_MFR_COOKIE_LEN	6
-#define ATM1_COOKIE_LEN         4
-#define ATM2_COOKIE_LEN         8
-
-#define ATM2_PKT_TYPE_MASK  0x70
-#define ATM2_GAP_COUNT_MASK 0x3F
-
-#define JUNIPER_PROTO_NULL          1
-#define JUNIPER_PROTO_IPV4          2
-#define JUNIPER_PROTO_IPV6          6
-
-#define MFR_BE_MASK 0xc0
-
-static struct tok juniper_protocol_values[] = {
-    { JUNIPER_PROTO_NULL, "Null" },
-    { JUNIPER_PROTO_IPV4, "IPv4" },
-    { JUNIPER_PROTO_IPV6, "IPv6" },
-    { 0, NULL}
-};
-
-int ip_heuristic_guess(register const u_char *, u_int);
-int juniper_ppp_heuristic_guess(register const u_char *, u_int);
-static int juniper_parse_header (const u_char *, const struct pcap_pkthdr *, struct juniper_l2info_t *);
-
-#ifdef DLT_JUNIPER_GGSN
-u_int
-juniper_ggsn_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-        struct juniper_ggsn_header {
-            u_int8_t svc_id;
-            u_int8_t flags_len;
-            u_int8_t proto;
-            u_int8_t flags;
-            u_int8_t vlan_id[2];
-            u_int8_t res[2];
-        };
-        const struct juniper_ggsn_header *gh;
-
-        l2info.pictype = DLT_JUNIPER_GGSN;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        gh = (struct juniper_ggsn_header *)p;
-
-        if (eflag)
-            printf("proto %s (%u), vlan %u: ",
-                   tok2str(juniper_protocol_values,"Unknown",gh->proto),
-                   gh->proto,
-                   EXTRACT_16BITS(&gh->vlan_id[0]));
-
-        switch (gh->proto) {
-        case JUNIPER_PROTO_IPV4:
-            ip_print(gndo, p, l2info.length);
-            break;
-#ifdef INET6
-        case JUNIPER_PROTO_IPV6:
-            ip6_print(p, l2info.length);
-            break;
-#endif /* INET6 */
-        default:
-            if (!eflag)
-                printf("unknown GGSN proto (%u)", gh->proto);
-        }
-
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_ES
-u_int
-juniper_es_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-        struct juniper_ipsec_header {
-            u_int8_t sa_index[2];
-            u_int8_t ttl;
-            u_int8_t type;
-            u_int8_t spi[4];
-            u_int8_t src_ip[4];
-            u_int8_t dst_ip[4];
-        };
-        u_int rewrite_len,es_type_bundle;
-        const struct juniper_ipsec_header *ih;
-
-        l2info.pictype = DLT_JUNIPER_ES;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        ih = (struct juniper_ipsec_header *)p;
-
-        switch (ih->type) {
-        case JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE:
-        case JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE:
-            rewrite_len = 0;
-            es_type_bundle = 1;
-            break;
-        case JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE:
-        case JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE:
-        case JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE:
-            rewrite_len = 16;
-            es_type_bundle = 0;
-        default:
-            printf("ES Invalid type %u, length %u",
-                   ih->type,
-                   l2info.length);
-            return l2info.header_len;
-        }
-
-        l2info.length-=rewrite_len;
-        p+=rewrite_len;
-
-        if (eflag) {
-            if (!es_type_bundle) {
-                printf("ES SA, index %u, ttl %u type %s (%u), spi %u, Tunnel %s > %s, length %u\n", 
-                       EXTRACT_16BITS(&ih->sa_index),
-                       ih->ttl, 
-                       tok2str(juniper_ipsec_type_values,"Unknown",ih->type),
-                       ih->type,
-                       EXTRACT_32BITS(&ih->spi),
-                       ipaddr_string(EXTRACT_32BITS(&ih->src_ip)),
-                       ipaddr_string(EXTRACT_32BITS(&ih->dst_ip)),
-                       l2info.length);
-            } else {
-                printf("ES SA, index %u, ttl %u type %s (%u), length %u\n", 
-                       EXTRACT_16BITS(&ih->sa_index),
-                       ih->ttl, 
-                       tok2str(juniper_ipsec_type_values,"Unknown",ih->type),
-                       ih->type,
-                       l2info.length);
-            }
-        }
-
-        ip_print(gndo, p, l2info.length);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_MONITOR
-u_int
-juniper_monitor_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-        struct juniper_monitor_header {
-            u_int8_t pkt_type;
-            u_int8_t padding;
-            u_int8_t iif[2];
-            u_int8_t service_id[4];
-        };
-        const struct juniper_monitor_header *mh;
-
-        l2info.pictype = DLT_JUNIPER_MONITOR;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        mh = (struct juniper_monitor_header *)p;
-
-        if (eflag)
-            printf("service-id %u, iif %u, pkt-type %u: ",
-                   EXTRACT_32BITS(&mh->service_id),
-                   EXTRACT_16BITS(&mh->iif),
-                   mh->pkt_type);
-
-        /* no proto field - lets guess by first byte of IP header*/
-        ip_heuristic_guess(p, l2info.length);
-
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_SERVICES
-u_int
-juniper_services_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-        struct juniper_services_header {
-            u_int8_t svc_id;
-            u_int8_t flags_len;
-            u_int8_t svc_set_id[2];
-            u_int8_t dir_iif[4];
-        };
-        const struct juniper_services_header *sh;
-
-        l2info.pictype = DLT_JUNIPER_SERVICES;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        sh = (struct juniper_services_header *)p;
-
-        if (eflag)
-            printf("service-id %u flags 0x%02x service-set-id 0x%04x iif %u: ",
-                   sh->svc_id,
-                   sh->flags_len,
-                   EXTRACT_16BITS(&sh->svc_set_id),
-                   EXTRACT_24BITS(&sh->dir_iif[1]));
-
-        /* no proto field - lets guess by first byte of IP header*/
-        ip_heuristic_guess(p, l2info.length);
-
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_PPPOE
-u_int
-juniper_pppoe_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_PPPOE;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        /* this DLT contains nothing but raw ethernet frames */
-        ether_print(p, l2info.length, l2info.caplen);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_ETHER
-u_int
-juniper_ether_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_ETHER;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        /* this DLT contains nothing but raw Ethernet frames */
-        ether_print(p, l2info.length, l2info.caplen);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_PPP
-u_int
-juniper_ppp_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_PPP;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        /* this DLT contains nothing but raw ppp frames */
-        ppp_print(p, l2info.length);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_FRELAY
-u_int
-juniper_frelay_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_FRELAY;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        /* this DLT contains nothing but raw frame-relay frames */
-        fr_print(p, l2info.length);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_CHDLC
-u_int
-juniper_chdlc_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_CHDLC;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-        /* this DLT contains nothing but raw c-hdlc frames */
-        chdlc_print(p, l2info.length);
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_PPPOE_ATM
-u_int
-juniper_pppoe_atm_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-	u_int16_t extracted_ethertype;
-
-        l2info.pictype = DLT_JUNIPER_PPPOE_ATM;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-
-        extracted_ethertype = EXTRACT_16BITS(p);
-        /* this DLT contains nothing but raw PPPoE frames,
-         * prepended with a type field*/
-        if (ether_encap_print(extracted_ethertype,
-                              p+ETHERTYPE_LEN,
-                              l2info.length-ETHERTYPE_LEN,
-                              l2info.caplen-ETHERTYPE_LEN,
-                              &extracted_ethertype) == 0)
-            /* ether_type not known, probably it wasn't one */
-            printf("unknown ethertype 0x%04x", extracted_ethertype);
-        
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_MLPPP
-u_int
-juniper_mlppp_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_MLPPP;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        /* suppress Bundle-ID if frame was captured on a child-link
-         * best indicator if the cookie looks like a proto */
-        if (eflag &&
-            EXTRACT_16BITS(&l2info.cookie) != PPP_OSI &&
-            EXTRACT_16BITS(&l2info.cookie) !=  (PPP_ADDRESS << 8 | PPP_CONTROL))
-            printf("Bundle-ID %u: ",l2info.bundle);
-
-        p+=l2info.header_len;
-
-        /* first try the LSQ protos */
-        switch(l2info.proto) {
-        case JUNIPER_LSQ_L3_PROTO_IPV4:
-            /* IP traffic going to the RE would not have a cookie
-             * -> this must be incoming IS-IS over PPP
-             */
-            if (l2info.cookie[4] == (JUNIPER_LSQ_COOKIE_RE|JUNIPER_LSQ_COOKIE_DIR))
-                ppp_print(p, l2info.length);
-            else
-                ip_print(gndo, p, l2info.length);
-            return l2info.header_len;
-#ifdef INET6
-        case JUNIPER_LSQ_L3_PROTO_IPV6:
-            ip6_print(p,l2info.length);
-            return l2info.header_len;
-#endif
-        case JUNIPER_LSQ_L3_PROTO_MPLS:
-            mpls_print(p,l2info.length);
-            return l2info.header_len;
-        case JUNIPER_LSQ_L3_PROTO_ISO:
-            isoclns_print(p,l2info.length,l2info.caplen);
-            return l2info.header_len;
-        default:
-            break;
-        }
-
-        /* zero length cookie ? */
-        switch (EXTRACT_16BITS(&l2info.cookie)) {
-        case PPP_OSI:
-            ppp_print(p-2,l2info.length+2);
-            break;
-        case (PPP_ADDRESS << 8 | PPP_CONTROL): /* fall through */
-        default:
-            ppp_print(p,l2info.length);
-            break;
-        }
-
-        return l2info.header_len;
-}
-#endif
-
-
-#ifdef DLT_JUNIPER_MFR
-u_int
-juniper_mfr_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_MFR;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-        
-        p+=l2info.header_len;
-
-        /* child-link ? */
-        if (l2info.cookie_len == 0) {
-            mfr_print(p,l2info.length);
-            return l2info.header_len;
-        }
-
-        /* first try the LSQ protos */
-        if (l2info.cookie_len == AS_PIC_COOKIE_LEN) {
-            switch(l2info.proto) {
-            case JUNIPER_LSQ_L3_PROTO_IPV4:
-                ip_print(gndo, p, l2info.length);
-                return l2info.header_len;
-#ifdef INET6
-            case JUNIPER_LSQ_L3_PROTO_IPV6:
-                ip6_print(p,l2info.length);
-                return l2info.header_len;
-#endif
-            case JUNIPER_LSQ_L3_PROTO_MPLS:
-                mpls_print(p,l2info.length);
-                return l2info.header_len;
-            case JUNIPER_LSQ_L3_PROTO_ISO:
-                isoclns_print(p,l2info.length,l2info.caplen);
-                return l2info.header_len;
-            default:
-                break;
-            }
-            return l2info.header_len;
-        }
-
-        /* suppress Bundle-ID if frame was captured on a child-link */
-        if (eflag && EXTRACT_32BITS(l2info.cookie) != 1) printf("Bundle-ID %u, ",l2info.bundle);
-        switch (l2info.proto) {
-        case (LLCSAP_ISONS<<8 | LLCSAP_ISONS):
-            isoclns_print(p+1, l2info.length-1, l2info.caplen-1);
-            break;
-        case (LLC_UI<<8 | NLPID_Q933):
-        case (LLC_UI<<8 | NLPID_IP):
-        case (LLC_UI<<8 | NLPID_IP6):
-            /* pass IP{4,6} to the OSI layer for proper link-layer printing */
-            isoclns_print(p-1, l2info.length+1, l2info.caplen+1); 
-            break;
-        default:
-            printf("unknown protocol 0x%04x, length %u",l2info.proto, l2info.length);
-        }
-
-        return l2info.header_len;
-}
-#endif
-
-#ifdef DLT_JUNIPER_MLFR
-u_int
-juniper_mlfr_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_MLFR;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-
-        /* suppress Bundle-ID if frame was captured on a child-link */
-        if (eflag && EXTRACT_32BITS(l2info.cookie) != 1) printf("Bundle-ID %u, ",l2info.bundle);
-        switch (l2info.proto) {
-        case (LLC_UI):
-        case (LLC_UI<<8):
-            isoclns_print(p, l2info.length, l2info.caplen);
-            break;
-        case (LLC_UI<<8 | NLPID_Q933):
-        case (LLC_UI<<8 | NLPID_IP):
-        case (LLC_UI<<8 | NLPID_IP6):
-            /* pass IP{4,6} to the OSI layer for proper link-layer printing */
-            isoclns_print(p-1, l2info.length+1, l2info.caplen+1);
-            break;
-        default:
-            printf("unknown protocol 0x%04x, length %u",l2info.proto, l2info.length);
-        }
-
-        return l2info.header_len;
-}
-#endif
-
-/*
- *     ATM1 PIC cookie format
- *
- *     +-----+-------------------------+-------------------------------+
- *     |fmtid|     vc index            |  channel  ID                  |
- *     +-----+-------------------------+-------------------------------+
- */
-
-#ifdef DLT_JUNIPER_ATM1
-u_int
-juniper_atm1_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        u_int16_t extracted_ethertype;
-
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_ATM1;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-
-        if (l2info.cookie[0] == 0x80) { /* OAM cell ? */
-            oam_print(p,l2info.length,ATM_OAM_NOHEC);
-            return l2info.header_len;
-        }
-
-        if (EXTRACT_24BITS(p) == 0xfefe03 || /* NLPID encaps ? */
-            EXTRACT_24BITS(p) == 0xaaaa03) { /* SNAP encaps ? */
-
-            if (llc_print(p, l2info.length, l2info.caplen, NULL, NULL,
-                          &extracted_ethertype) != 0)
-                return l2info.header_len;
-        }
-
-        if (p[0] == 0x03) { /* Cisco style NLPID encaps ? */
-            isoclns_print(p + 1, l2info.length - 1, l2info.caplen - 1);
-            /* FIXME check if frame was recognized */
-            return l2info.header_len;
-        }
-
-        if(ip_heuristic_guess(p, l2info.length) != 0) /* last try - vcmux encaps ? */
-            return l2info.header_len;
-
-	return l2info.header_len;
-}
-#endif
-
-/*
- *     ATM2 PIC cookie format
- *
- *     +-------------------------------+---------+---+-----+-----------+
- *     |     channel ID                |  reserv |AAL| CCRQ| gap cnt   |
- *     +-------------------------------+---------+---+-----+-----------+
- */
-
-#ifdef DLT_JUNIPER_ATM2
-u_int
-juniper_atm2_print(const struct pcap_pkthdr *h, register const u_char *p)
-{
-        u_int16_t extracted_ethertype;
-
-        struct juniper_l2info_t l2info;
-
-        l2info.pictype = DLT_JUNIPER_ATM2;
-        if(juniper_parse_header(p, h, &l2info) == 0)
-            return l2info.header_len;
-
-        p+=l2info.header_len;
-
-        if (l2info.cookie[7] & ATM2_PKT_TYPE_MASK) { /* OAM cell ? */
-            oam_print(p,l2info.length,ATM_OAM_NOHEC);
-            return l2info.header_len;
-        }
-
-        if (EXTRACT_24BITS(p) == 0xfefe03 || /* NLPID encaps ? */
-            EXTRACT_24BITS(p) == 0xaaaa03) { /* SNAP encaps ? */
-
-            if (llc_print(p, l2info.length, l2info.caplen, NULL, NULL,
-                          &extracted_ethertype) != 0)
-                return l2info.header_len;
-        }
-
-        if (l2info.direction != JUNIPER_BPF_PKT_IN && /* ether-over-1483 encaps ? */
-            (EXTRACT_32BITS(l2info.cookie) & ATM2_GAP_COUNT_MASK)) {
-            ether_print(p, l2info.length, l2info.caplen);
-            return l2info.header_len;
-        }
-
-        if (p[0] == 0x03) { /* Cisco style NLPID encaps ? */
-            isoclns_print(p + 1, l2info.length - 1, l2info.caplen - 1);
-            /* FIXME check if frame was recognized */
-            return l2info.header_len;
-        }
-
-        if(juniper_ppp_heuristic_guess(p, l2info.length) != 0) /* PPPoA vcmux encaps ? */
-            return l2info.header_len;
-
-        if(ip_heuristic_guess(p, l2info.length) != 0) /* last try - vcmux encaps ? */
-            return l2info.header_len;
-
-	return l2info.header_len;
-}
-#endif
-
-
-/* try to guess, based on all PPP protos that are supported in
- * a juniper router if the payload data is encapsulated using PPP */
-int
-juniper_ppp_heuristic_guess(register const u_char *p, u_int length) {
-
-    switch(EXTRACT_16BITS(p)) {
-    case PPP_IP :
-    case PPP_OSI :
-    case PPP_MPLS_UCAST :
-    case PPP_MPLS_MCAST :
-    case PPP_IPCP :
-    case PPP_OSICP :
-    case PPP_MPLSCP :
-    case PPP_LCP :
-    case PPP_PAP :
-    case PPP_CHAP :
-    case PPP_ML :
-#ifdef INET6
-    case PPP_IPV6 :
-    case PPP_IPV6CP :
-#endif
-        ppp_print(p, length);
-        break;
-
-    default:
-        return 0; /* did not find a ppp header */
-        break;
-    }
-    return 1; /* we printed a ppp packet */
-}
-
-int
-ip_heuristic_guess(register const u_char *p, u_int length) {
-
-    switch(p[0]) {
-    case 0x45:
-    case 0x46:
-    case 0x47:
-    case 0x48:
-    case 0x49:
-    case 0x4a:
-    case 0x4b:
-    case 0x4c:
-    case 0x4d:
-    case 0x4e:
-    case 0x4f:
-	    ip_print(gndo, p, length);
-	    break;
-#ifdef INET6
-    case 0x60:
-    case 0x61:
-    case 0x62:
-    case 0x63:
-    case 0x64:
-    case 0x65:
-    case 0x66:
-    case 0x67:
-    case 0x68:
-    case 0x69:
-    case 0x6a:
-    case 0x6b:
-    case 0x6c:
-    case 0x6d:
-    case 0x6e:
-    case 0x6f:
-        ip6_print(p, length);
-        break;
-#endif
-    default:
-        return 0; /* did not find a ip header */
-        break;
-    }
-    return 1; /* we printed an v4/v6 packet */
-}
-
-static int
-juniper_parse_header (const u_char *p, const struct pcap_pkthdr *h, struct juniper_l2info_t *l2info) {
-
-    struct juniper_cookie_table_t *lp = juniper_cookie_table;
-    u_int idx, offset;
-#ifdef DLT_JUNIPER_ATM2
-    u_int32_t control_word;
-#endif
-
-    l2info->header_len = 0;
-    l2info->cookie_len = 0;
-    l2info->proto = 0;
-
-
-    l2info->length = h->len;
-    l2info->caplen = h->caplen;
-    l2info->direction = p[3]&JUNIPER_BPF_PKT_IN;
-    
-    TCHECK2(p[0],4);
-    if (EXTRACT_24BITS(p) != JUNIPER_MGC_NUMBER) { /* magic number found ? */
-        printf("no magic-number found!");
-        return 0;
-    } 
-
-    if (eflag) /* print direction */
-        printf("%3s ",tok2str(juniper_direction_values,"---",l2info->direction));
-
-    /* extensions present ?  - calculate how much bytes to skip */
-    if ((p[3] & JUNIPER_BPF_EXT ) == JUNIPER_BPF_EXT ) {
-        offset = 6 + EXTRACT_16BITS(p+4);
-        if (eflag>1)
-            printf("ext-len %u, ",EXTRACT_16BITS(p+4));
-    } else
-        offset = 4;
-
-    if ((p[3] & JUNIPER_BPF_NO_L2 ) == JUNIPER_BPF_NO_L2 ) {            
-        if (eflag)
-            printf("no-L2-hdr, ");
-
-        /* there is no link-layer present -
-         * perform the v4/v6 heuristics
-         * to figure out what it is
-         */
-        TCHECK2(p[offset+4],1);
-        if(ip_heuristic_guess(p+offset+4,l2info->length-(offset+4)) == 0)
-            printf("no IP-hdr found!");
-
-        l2info->header_len=offset+4;
-        return 0; /* stop parsing the output further */
-        
-    }
-    l2info->header_len = offset;
-    p+=l2info->header_len;
-    l2info->length -= l2info->header_len;
-    l2info->caplen -= l2info->header_len;
-
-    /* search through the cookie table and copy values matching for our PIC type */
-    while (lp->s != NULL) {
-        if (lp->pictype == l2info->pictype) {
-
-            l2info->cookie_len += lp->cookie_len;
-
-            switch (p[0]) {
-            case LS_COOKIE_ID:
-                l2info->cookie_type = LS_COOKIE_ID;
-                l2info->cookie_len += 2;
-                break;
-            case AS_COOKIE_ID:
-                l2info->cookie_type = AS_COOKIE_ID;
-                l2info->cookie_len = 8;
-                break;
-            
-            default:
-                l2info->bundle = l2info->cookie[0];
-                break;
-            }
-
-
-#ifdef DLT_JUNIPER_MFR
-            /* MFR child links don't carry cookies */
-            if (l2info->pictype == DLT_JUNIPER_MFR &&
-                (p[0] & MFR_BE_MASK) == MFR_BE_MASK) {
-                l2info->cookie_len = 0;
-            }
-#endif
-
-            l2info->header_len += l2info->cookie_len;
-            l2info->length -= l2info->cookie_len;
-            l2info->caplen -= l2info->cookie_len;
-
-            if (eflag)
-                printf("%s-PIC, cookie-len %u",
-                       lp->s,
-                       l2info->cookie_len);
-
-            if (l2info->cookie_len > 0) {
-                TCHECK2(p[0],l2info->cookie_len);
-                if (eflag)
-                    printf(", cookie 0x");
-                for (idx = 0; idx < l2info->cookie_len; idx++) {
-                    l2info->cookie[idx] = p[idx]; /* copy cookie data */
-                    if (eflag) printf("%02x",p[idx]);
-                }
-            }
-
-            if (eflag) printf(": "); /* print demarc b/w L2/L3*/
-            
-
-            l2info->proto = EXTRACT_16BITS(p+l2info->cookie_len); 
-            break;
-        }
-        ++lp;
-    }
-    p+=l2info->cookie_len;
-
-    /* DLT_ specific parsing */
-    switch(l2info->pictype) {
-#ifdef DLT_JUNIPER_MLPPP
-    case DLT_JUNIPER_MLPPP:
-        switch (l2info->cookie_type) {
-        case LS_COOKIE_ID:
-            l2info->bundle = l2info->cookie[1];
-            break;
-        case AS_COOKIE_ID:
-            l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
-            l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;            
-            break;
-        default:
-            l2info->bundle = l2info->cookie[0];
-            break;
-        }
-        break;
-#endif
-#ifdef DLT_JUNIPER_MLFR
-    case DLT_JUNIPER_MLFR:
-        switch (l2info->cookie_type) {
-        case LS_COOKIE_ID:
-            l2info->bundle = l2info->cookie[1];
-            l2info->proto = EXTRACT_16BITS(p);        
-            l2info->header_len += 2;
-            l2info->length -= 2;
-            l2info->caplen -= 2;
-            break;
-        case AS_COOKIE_ID:
-            l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
-            l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;
-            break;
-        default:
-            l2info->bundle = l2info->cookie[0];
-            l2info->header_len += 2;
-            l2info->length -= 2;
-            l2info->caplen -= 2;
-            break;
-        }
-        break;
-#endif
-#ifdef DLT_JUNIPER_MFR
-    case DLT_JUNIPER_MFR:
-        switch (l2info->cookie_type) {
-        case LS_COOKIE_ID:
-            l2info->bundle = l2info->cookie[1];
-            l2info->proto = EXTRACT_16BITS(p);        
-            l2info->header_len += 2;
-            l2info->length -= 2;
-            l2info->caplen -= 2;
-            break;
-        case AS_COOKIE_ID:
-            l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
-            l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;
-            break;
-        default:
-            l2info->bundle = l2info->cookie[0];
-            break;
-        }
-        break;
-#endif
-#ifdef DLT_JUNIPER_ATM2
-    case DLT_JUNIPER_ATM2:
-        TCHECK2(p[0],4);
-        /* ATM cell relay control word present ? */
-        if (l2info->cookie[7] & ATM2_PKT_TYPE_MASK) {
-            control_word = EXTRACT_32BITS(p);
-            /* some control word heuristics */
-            switch(control_word) {
-            case 0: /* zero control word */
-            case 0x08000000: /* < JUNOS 7.4 control-word */
-            case 0x08380000: /* cntl word plus cell length (56) >= JUNOS 7.4*/
-                l2info->header_len += 4;
-                break;
-            default:
-                break;
-            }
-            
-            if (eflag)
-                printf("control-word 0x%08x ", control_word);
-        }
-        break;
-#endif
-#ifdef DLT_JUNIPER_ATM1
-    case DLT_JUNIPER_ATM1:
-        break;
-#endif
-#ifdef DLT_JUNIPER_PPP
-    case DLT_JUNIPER_PPP:
-        break;
-#endif
-#ifdef DLT_JUNIPER_CHDLC
-    case DLT_JUNIPER_CHDLC:
-        break;
-#endif
-#ifdef DLT_JUNIPER_ETHER
-    case DLT_JUNIPER_ETHER:
-        break;
-#endif
-#ifdef DLT_JUNIPER_FRELAY
-    case DLT_JUNIPER_FRELAY:
-        break;
-#endif
-
-    default:
-        printf("Unknown Juniper DLT_ type %u: ", l2info->pictype);
-        break;
-    }
-    
-    if (eflag > 1)
-        printf("hlen %u, proto 0x%04x, ",l2info->header_len,l2info->proto);
-
-    return 1; /* everything went ok so far. continue parsing */
- trunc:
-    printf("[|juniper_hdr], length %u",h->len);
-    return 0;
-}
-
-
-/*
- * Local Variables:
- * c-style: whitesmith
- * c-basic-offset: 4
- * End:
- */