Line data Source code
1 : /*
2 : * Copyright (c) 2015 Cisco and/or its affiliates.
3 : * Licensed under the Apache License, Version 2.0 (the "License");
4 : * you may not use this file except in compliance with the License.
5 : * You may obtain a copy of the License at:
6 : *
7 : * http://www.apache.org/licenses/LICENSE-2.0
8 : *
9 : * Unless required by applicable law or agreed to in writing, software
10 : * distributed under the License is distributed on an "AS IS" BASIS,
11 : * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 : * See the License for the specific language governing permissions and
13 : * limitations under the License.
14 : */
15 : /*
16 : * hdlc.c: hdlc
17 : *
18 : * Copyright (c) 2010 Eliot Dresselhaus
19 : *
20 : * Permission is hereby granted, free of charge, to any person obtaining
21 : * a copy of this software and associated documentation files (the
22 : * "Software"), to deal in the Software without restriction, including
23 : * without limitation the rights to use, copy, modify, merge, publish,
24 : * distribute, sublicense, and/or sell copies of the Software, and to
25 : * permit persons to whom the Software is furnished to do so, subject to
26 : * the following conditions:
27 : *
28 : * The above copyright notice and this permission notice shall be
29 : * included in all copies or substantial portions of the Software.
30 : *
31 : * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
32 : * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
33 : * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
34 : * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
35 : * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
36 : * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
37 : * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
38 : */
39 :
40 : #include <vnet/vnet.h>
41 : #include <vnet/hdlc/hdlc.h>
42 :
43 : /* Global main structure. */
44 : hdlc_main_t hdlc_main;
45 :
46 : u8 *
47 0 : format_hdlc_protocol (u8 * s, va_list * args)
48 : {
49 0 : hdlc_protocol_t p = va_arg (*args, u32);
50 0 : hdlc_main_t *pm = &hdlc_main;
51 0 : hdlc_protocol_info_t *pi = hdlc_get_protocol_info (pm, p);
52 :
53 0 : if (pi)
54 0 : s = format (s, "%s", pi->name);
55 : else
56 0 : s = format (s, "0x%04x", p);
57 :
58 0 : return s;
59 : }
60 :
61 : u8 *
62 0 : format_hdlc_header_with_length (u8 * s, va_list * args)
63 : {
64 0 : hdlc_main_t *pm = &hdlc_main;
65 0 : hdlc_header_t *h = va_arg (*args, hdlc_header_t *);
66 0 : u32 max_header_bytes = va_arg (*args, u32);
67 0 : hdlc_protocol_t p = clib_net_to_host_u16 (h->protocol);
68 : u32 indent, header_bytes;
69 :
70 0 : header_bytes = sizeof (h[0]);
71 0 : if (max_header_bytes != 0 && header_bytes > max_header_bytes)
72 0 : return format (s, "hdlc header truncated");
73 :
74 0 : indent = format_get_indent (s);
75 :
76 0 : s = format (s, "HDLC %U", format_hdlc_protocol, p);
77 :
78 0 : if (h->address != 0xff)
79 0 : s = format (s, ", address 0x%02x", h->address);
80 0 : if (h->control != 0x03)
81 0 : s = format (s, ", control 0x%02x", h->control);
82 :
83 0 : if (max_header_bytes != 0 && header_bytes > max_header_bytes)
84 : {
85 0 : hdlc_protocol_info_t *pi = hdlc_get_protocol_info (pm, p);
86 0 : vlib_node_t *node = vlib_get_node (pm->vlib_main, pi->node_index);
87 0 : if (node->format_buffer)
88 0 : s = format (s, "\n%U%U",
89 : format_white_space, indent,
90 0 : node->format_buffer, (void *) (h + 1),
91 : max_header_bytes - header_bytes);
92 : }
93 :
94 0 : return s;
95 : }
96 :
97 : u8 *
98 0 : format_hdlc_header (u8 * s, va_list * args)
99 : {
100 0 : hdlc_header_t *h = va_arg (*args, hdlc_header_t *);
101 0 : return format (s, "%U", format_hdlc_header_with_length, h, 0);
102 : }
103 :
104 : /* Returns hdlc protocol as an int in host byte order. */
105 : uword
106 0 : unformat_hdlc_protocol_host_byte_order (unformat_input_t * input,
107 : va_list * args)
108 : {
109 0 : u16 *result = va_arg (*args, u16 *);
110 0 : hdlc_main_t *pm = &hdlc_main;
111 : int p, i;
112 :
113 : /* Numeric type. */
114 0 : if (unformat (input, "0x%x", &p) || unformat (input, "%d", &p))
115 : {
116 0 : if (p >= (1 << 16))
117 0 : return 0;
118 0 : *result = p;
119 0 : return 1;
120 : }
121 :
122 : /* Named type. */
123 0 : if (unformat_user (input, unformat_vlib_number_by_name,
124 : pm->protocol_info_by_name, &i))
125 : {
126 0 : hdlc_protocol_info_t *pi = vec_elt_at_index (pm->protocol_infos, i);
127 0 : *result = pi->protocol;
128 0 : return 1;
129 : }
130 :
131 0 : return 0;
132 : }
133 :
134 : uword
135 0 : unformat_hdlc_protocol_net_byte_order (unformat_input_t * input,
136 : va_list * args)
137 : {
138 0 : u16 *result = va_arg (*args, u16 *);
139 0 : if (!unformat_user (input, unformat_hdlc_protocol_host_byte_order, result))
140 0 : return 0;
141 0 : *result = clib_host_to_net_u16 ((u16) * result);
142 0 : return 1;
143 : }
144 :
145 : uword
146 0 : unformat_hdlc_header (unformat_input_t * input, va_list * args)
147 : {
148 0 : u8 **result = va_arg (*args, u8 **);
149 0 : hdlc_header_t _h, *h = &_h;
150 : u16 p;
151 :
152 0 : if (!unformat (input, "%U", unformat_hdlc_protocol_host_byte_order, &p))
153 0 : return 0;
154 :
155 0 : h->address = 0xff;
156 0 : h->control = 0x03;
157 0 : h->protocol = clib_host_to_net_u16 (p);
158 :
159 : /* Add header to result. */
160 : {
161 : void *p;
162 0 : u32 n_bytes = sizeof (h[0]);
163 :
164 0 : vec_add2 (*result, p, n_bytes);
165 0 : clib_memcpy (p, h, n_bytes);
166 : }
167 :
168 0 : return 1;
169 : }
170 :
171 : static u8 *
172 0 : hdlc_build_rewrite (vnet_main_t * vnm,
173 : u32 sw_if_index,
174 : vnet_link_t link_type, const void *dst_address)
175 : {
176 : hdlc_header_t *h;
177 0 : u8 *rewrite = NULL;
178 : hdlc_protocol_t protocol;
179 :
180 0 : switch (link_type)
181 : {
182 : #define _(a,b) case VNET_LINK_##a: protocol = HDLC_PROTOCOL_##b; break
183 0 : _(IP4, ip4);
184 0 : _(IP6, ip6);
185 0 : _(MPLS, mpls_unicast);
186 : #undef _
187 0 : default:
188 0 : return (NULL);
189 : }
190 :
191 0 : vec_validate (rewrite, sizeof (*h) - 1);
192 0 : h = (hdlc_header_t *) rewrite;
193 0 : h->address = 0x0f;
194 0 : h->control = 0x00;
195 0 : h->protocol = clib_host_to_net_u16 (protocol);
196 :
197 0 : return (rewrite);
198 : }
199 :
200 : /* *INDENT-OFF* */
201 7279 : VNET_HW_INTERFACE_CLASS (hdlc_hw_interface_class) = {
202 : .name = "HDLC",
203 : .format_header = format_hdlc_header_with_length,
204 : .unformat_header = unformat_hdlc_header,
205 : .build_rewrite = hdlc_build_rewrite,
206 : .flags = VNET_HW_INTERFACE_CLASS_FLAG_P2P,
207 : };
208 : /* *INDENT-ON* */
209 :
210 : static void
211 3913 : add_protocol (hdlc_main_t * pm, hdlc_protocol_t protocol, char *protocol_name)
212 : {
213 : hdlc_protocol_info_t *pi;
214 : u32 i;
215 :
216 3913 : vec_add2 (pm->protocol_infos, pi, 1);
217 3913 : i = pi - pm->protocol_infos;
218 :
219 3913 : pi->name = protocol_name;
220 3913 : pi->protocol = protocol;
221 3913 : pi->next_index = pi->node_index = ~0;
222 :
223 3913 : hash_set (pm->protocol_info_by_protocol, protocol, i);
224 7826 : hash_set_mem (pm->protocol_info_by_name, pi->name, i);
225 3913 : }
226 :
227 : static clib_error_t *
228 559 : hdlc_init (vlib_main_t * vm)
229 : {
230 559 : hdlc_main_t *pm = &hdlc_main;
231 :
232 559 : clib_memset (pm, 0, sizeof (pm[0]));
233 559 : pm->vlib_main = vm;
234 :
235 559 : pm->protocol_info_by_name = hash_create_string (0, sizeof (uword));
236 559 : pm->protocol_info_by_protocol = hash_create (0, sizeof (uword));
237 :
238 : #define _(n,s) add_protocol (pm, HDLC_PROTOCOL_##s, #s);
239 559 : foreach_hdlc_protocol
240 : #undef _
241 559 : return vlib_call_init_function (vm, hdlc_input_init);
242 : }
243 :
244 27999 : VLIB_INIT_FUNCTION (hdlc_init);
245 :
246 : /*
247 : * fd.io coding-style-patch-verification: ON
248 : *
249 : * Local Variables:
250 : * eval: (c-set-style "gnu")
251 : * End:
252 : */
|
