diff options
Diffstat (limited to 'contrib/tcpdump/print-juniper.c')
-rw-r--r-- | contrib/tcpdump/print-juniper.c | 1032 |
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: - */ |