summaryrefslogtreecommitdiff
path: root/proto_mpls_unicast.c
blob: e01672a2bf12234c8775e4ac715d4423b111bf1d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
/*
 * netsniff-ng - the packet sniffing beast
 * Copyright 2012 Markus Amend <markus@netsniff-ng.org>, Deutsche Flugsicherung GmbH
 * Subject to the GPL, version 2.
 *
 * http://tools.ietf.org/html/rfc3032
 */

#include <stdio.h>
#include <stdint.h>
#include <netinet/in.h>    /* for ntohs() */
#include <errno.h>

#include "proto.h"
#include "dissector_eth.h"
#include "built_in.h"
#include "pkt_buff.h"

struct mpls_uchdr {
	uint32_t mpls_uc_hdr;
} __packed;

static int mpls_uc_next_proto(struct pkt_buff *pkt)
{
	uint8_t proto;
	uint16_t key = 0;

	if (pkt_len(pkt))
		proto = *(pkt->data);
	else
		return -EIO;

	/* FIXME: Right now only test for IP Version field */
	switch (proto >> 4) {
	case 4:
		key = 0x0800; /* IPv4*/
		break;
	case 6:
		key = 0x86DD; /* IPv6*/
		break;
	default:
		/* Nothing detected ... */
		return -ENOENT;
	}

	return key;
}

static void mpls_uc_full(struct pkt_buff *pkt)
{
	int next;
	uint32_t mpls_uc_data;
	struct mpls_uchdr *mpls_uc;
	uint8_t s = 0;

	do {
		mpls_uc = (struct mpls_uchdr *) pkt_pull(pkt, sizeof(*mpls_uc));
		if (mpls_uc == NULL)
			return;

		mpls_uc_data = ntohl(mpls_uc->mpls_uc_hdr);
		s = (mpls_uc_data >> 8) & 0x1;

		tprintf(" [ MPLS ");
		tprintf("Label (%u), ", mpls_uc_data >> 12);
		tprintf("Exp (%u), ", (mpls_uc_data >> 9) & 0x7);
		tprintf("S (%u), ", s);
		tprintf("TTL (%u)", (mpls_uc_data & 0xFF));
		tprintf(" ]\n");
	} while (!s);

	next = mpls_uc_next_proto(pkt);
	if (next < 0)
		return;

	pkt_set_proto(pkt, &eth_lay2, (uint16_t) next);
}

static void mpls_uc_less(struct pkt_buff *pkt)
{
	int next;
	uint32_t mpls_uc_data;
	struct mpls_uchdr *mpls_uc;
	uint8_t s = 0;

	do {
		mpls_uc = (struct mpls_uchdr *) pkt_pull(pkt, sizeof(*mpls_uc));
		if (mpls_uc == NULL)
			return;

		mpls_uc_data = ntohl(mpls_uc->mpls_uc_hdr);
		s = (mpls_uc_data >> 8) & 0x1;

		tprintf(" MPLS/%u", mpls_uc_data >> 12);
	} while (!s);

	next = mpls_uc_next_proto(pkt);
	if (next < 0)
		return;

	pkt_set_proto(pkt, &eth_lay2, (uint16_t) next);
}

struct protocol mpls_uc_ops = {
	.key = 0x8847,
	.print_full = mpls_uc_full,
	.print_less = mpls_uc_less,
};