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
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
|
/*---------------------------------------------------------------------------
* Copyright (c) 2009-2014 Cisco and/or its affiliates.
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at:
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*---------------------------------------------------------------------------
*/
#include <stdbool.h>
#include <vppinfra/error.h>
#include <vnet/vnet.h>
#include <vnet/ip/ip.h>
int sixrd_create_domain(ip6_address_t *ip6_prefix, u8 ip6_prefix_len,
ip4_address_t *ip4_prefix, u8 ip4_prefix_len,
ip4_address_t *ip4_src, u32 *sixrd_domain_index, u16 mtu);
int sixrd_delete_domain(u32 sixrd_domain_index);
u8 *format_sixrd_trace(u8 *s, va_list *args);
typedef struct {
ip6_address_t ip6_prefix;
ip4_address_t ip4_prefix;
ip4_address_t ip4_src;
u8 ip6_prefix_len;
u8 ip4_prefix_len;
/* helpers */
u8 shift;
u16 mtu;
} sixrd_domain_t;
typedef struct {
/* pool of SIXRD domains */
sixrd_domain_t *domains;
/* convenience */
vlib_main_t *vlib_main;
vnet_main_t *vnet_main;
u32 ip4_lookup_next_index;
u32 ip6_lookup_next_index;
} sixrd_main_t;
#define foreach_sixrd_error \
/* Must be first. */ \
_(NONE, "valid SIXRD packets") \
_(BAD_PROTOCOL, "bad protocol") \
_(WRONG_ICMP_TYPE, "wrong icmp type") \
_(SEC_CHECK, "security check failed") \
_(ICMP, "unable to translate ICMP") \
_(UNKNOWN, "unknown") \
_(NO_DOMAIN, "no domain") \
_(ENCAPSULATED, "encapsulated") \
_(DECAPSULATED, "decapsulated") \
_(TRANSLATED_4TO6, "translated 4 to 6") \
_(TRANSLATED_6TO4, "translated 6 to 4") \
_(FRAGMENT, "fragment handling error") \
_(FRAGMENT_QUEUED, "dropped, missing first fragment") \
_(FRAGMENTED, "packets requiring fragmentation") \
_(FRAGMENT_PARTS, "fragment parts") \
_(MALFORMED, "malformed packet")
typedef enum {
#define _(sym,str) SIXRD_ERROR_##sym,
foreach_sixrd_error
#undef _
SIXRD_N_ERROR,
} sixrd_error_t;
typedef struct {
u32 sixrd_domain_index;
} sixrd_trace_t;
sixrd_main_t sixrd_main;
/*
* sixrd_get_addr
*/
static_always_inline u32
sixrd_get_addr (sixrd_domain_t *d, u64 dal)
{
/* 1:1 mode */
if (d->ip4_prefix_len == 32) return (d->ip4_prefix.as_u32);
/* Grab 32 - ip4_prefix_len bits out of IPv6 address from offset ip6_prefix_len */
return (d->ip4_prefix.as_u32 | (u32)(dal >> d->shift));
}
/*
* Get the SIXRD domain from an IPv6 lookup adjacency.
*/
static_always_inline sixrd_domain_t *
ip6_sixrd_get_domain (u32 adj_index, u32 *sixrd_domain_index)
{
sixrd_main_t *mm = &sixrd_main;
ip_lookup_main_t *lm = &ip6_main.lookup_main;
ip_adjacency_t *adj = ip_get_adjacency(lm, adj_index);
ASSERT(adj);
uword *p = (uword *)adj->rewrite_data;
ASSERT(p);
*sixrd_domain_index = p[0];
return pool_elt_at_index(mm->domains, p[0]);
}
/*
* Get the SIXRD domain from an IPv4 lookup adjacency.
* If the IPv4 address is not shared, no lookup is required.
* The IPv6 address is used otherwise.
*/
static_always_inline sixrd_domain_t *
ip4_sixrd_get_domain (u32 adj_index, ip6_address_t *addr,
u32 *sixrd_domain_index, u8 *error)
{
sixrd_main_t *mm = &sixrd_main;
ip6_main_t *im6 = &ip6_main;
ip_lookup_main_t *lm4 = &ip4_main.lookup_main;
ip_lookup_main_t *lm6 = &ip6_main.lookup_main;
ip_adjacency_t *adj = ip_get_adjacency(lm4, adj_index);
ASSERT(adj);
uword *p = (uword *)adj->rewrite_data;
ASSERT(p);
*sixrd_domain_index = p[0];
if (p[0] != ~0)
return pool_elt_at_index(mm->domains, p[0]);
u32 ai = ip6_fib_lookup_with_table(im6, 0, addr);
ip_adjacency_t *adj6 = ip_get_adjacency (lm6, ai);
if (PREDICT_TRUE(adj6->lookup_next_index == mm->ip6_lookup_next_index)) {
uword *p = (uword *)adj6->rewrite_data;
*sixrd_domain_index = p[0];
return pool_elt_at_index(mm->domains, *sixrd_domain_index);
}
*error = SIXRD_ERROR_NO_DOMAIN;
return NULL;
}
|
