| /* |
| * 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: |
| */ |
