]> git.proxmox.com Git - mirror_frr.git/blob - lib/prefix.c
babd4304d13f29a47ef9e6778266be63b328ea66
[mirror_frr.git] / lib / prefix.c
1 /*
2 * Prefix related functions.
3 * Copyright (C) 1997, 98, 99 Kunihiro Ishiguro
4 *
5 * This file is part of GNU Zebra.
6 *
7 * GNU Zebra is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU General Public License as published by the
9 * Free Software Foundation; either version 2, or (at your option) any
10 * later version.
11 *
12 * GNU Zebra is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; see the file COPYING; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20 */
21
22 #include <zebra.h>
23
24 #include "prefix.h"
25 #include "vty.h"
26 #include "sockunion.h"
27 #include "memory.h"
28 #include "log.h"
29 #include "jhash.h"
30 #include "lib_errors.h"
31
32 DEFINE_MTYPE_STATIC(LIB, PREFIX, "Prefix")
33 DEFINE_MTYPE_STATIC(LIB, PREFIX_FLOWSPEC, "Prefix Flowspec")
34
35 /* Maskbit. */
36 static const uint8_t maskbit[] = {0x00, 0x80, 0xc0, 0xe0, 0xf0,
37 0xf8, 0xfc, 0xfe, 0xff};
38
39 static const struct in6_addr maskbytes6[] = {
40 /* /0 */ {{{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
41 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}}},
42 /* /1 */
43 {{{0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
44 0x00, 0x00, 0x00, 0x00, 0x00}}},
45 /* /2 */
46 {{{0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
47 0x00, 0x00, 0x00, 0x00, 0x00}}},
48 /* /3 */
49 {{{0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
50 0x00, 0x00, 0x00, 0x00, 0x00}}},
51 /* /4 */
52 {{{0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
53 0x00, 0x00, 0x00, 0x00, 0x00}}},
54 /* /5 */
55 {{{0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
56 0x00, 0x00, 0x00, 0x00, 0x00}}},
57 /* /6 */
58 {{{0xfc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
59 0x00, 0x00, 0x00, 0x00, 0x00}}},
60 /* /7 */
61 {{{0xfe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
62 0x00, 0x00, 0x00, 0x00, 0x00}}},
63 /* /8 */
64 {{{0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
65 0x00, 0x00, 0x00, 0x00, 0x00}}},
66 /* /9 */
67 {{{0xff, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
68 0x00, 0x00, 0x00, 0x00, 0x00}}},
69 /* /10 */
70 {{{0xff, 0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
71 0x00, 0x00, 0x00, 0x00, 0x00}}},
72 /* /11 */
73 {{{0xff, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
74 0x00, 0x00, 0x00, 0x00, 0x00}}},
75 /* /12 */
76 {{{0xff, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
77 0x00, 0x00, 0x00, 0x00, 0x00}}},
78 /* /13 */
79 {{{0xff, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
80 0x00, 0x00, 0x00, 0x00, 0x00}}},
81 /* /14 */
82 {{{0xff, 0xfc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
83 0x00, 0x00, 0x00, 0x00, 0x00}}},
84 /* /15 */
85 {{{0xff, 0xfe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
86 0x00, 0x00, 0x00, 0x00, 0x00}}},
87 /* /16 */
88 {{{0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
89 0x00, 0x00, 0x00, 0x00, 0x00}}},
90 /* /17 */
91 {{{0xff, 0xff, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
92 0x00, 0x00, 0x00, 0x00, 0x00}}},
93 /* /18 */
94 {{{0xff, 0xff, 0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
95 0x00, 0x00, 0x00, 0x00, 0x00}}},
96 /* /19 */
97 {{{0xff, 0xff, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
98 0x00, 0x00, 0x00, 0x00, 0x00}}},
99 /* /20 */
100 {{{0xff, 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
101 0x00, 0x00, 0x00, 0x00, 0x00}}},
102 /* /21 */
103 {{{0xff, 0xff, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
104 0x00, 0x00, 0x00, 0x00, 0x00}}},
105 /* /22 */
106 {{{0xff, 0xff, 0xfc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
107 0x00, 0x00, 0x00, 0x00, 0x00}}},
108 /* /23 */
109 {{{0xff, 0xff, 0xfe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
110 0x00, 0x00, 0x00, 0x00, 0x00}}},
111 /* /24 */
112 {{{0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
113 0x00, 0x00, 0x00, 0x00, 0x00}}},
114 /* /25 */
115 {{{0xff, 0xff, 0xff, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
116 0x00, 0x00, 0x00, 0x00, 0x00}}},
117 /* /26 */
118 {{{0xff, 0xff, 0xff, 0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
119 0x00, 0x00, 0x00, 0x00, 0x00}}},
120 /* /27 */
121 {{{0xff, 0xff, 0xff, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
122 0x00, 0x00, 0x00, 0x00, 0x00}}},
123 /* /28 */
124 {{{0xff, 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
125 0x00, 0x00, 0x00, 0x00, 0x00}}},
126 /* /29 */
127 {{{0xff, 0xff, 0xff, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
128 0x00, 0x00, 0x00, 0x00, 0x00}}},
129 /* /30 */
130 {{{0xff, 0xff, 0xff, 0xfc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
131 0x00, 0x00, 0x00, 0x00, 0x00}}},
132 /* /31 */
133 {{{0xff, 0xff, 0xff, 0xfe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
134 0x00, 0x00, 0x00, 0x00, 0x00}}},
135 /* /32 */
136 {{{0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
137 0x00, 0x00, 0x00, 0x00, 0x00}}},
138 /* /33 */
139 {{{0xff, 0xff, 0xff, 0xff, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
140 0x00, 0x00, 0x00, 0x00, 0x00}}},
141 /* /34 */
142 {{{0xff, 0xff, 0xff, 0xff, 0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
143 0x00, 0x00, 0x00, 0x00, 0x00}}},
144 /* /35 */
145 {{{0xff, 0xff, 0xff, 0xff, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
146 0x00, 0x00, 0x00, 0x00, 0x00}}},
147 /* /36 */
148 {{{0xff, 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
149 0x00, 0x00, 0x00, 0x00, 0x00}}},
150 /* /37 */
151 {{{0xff, 0xff, 0xff, 0xff, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
152 0x00, 0x00, 0x00, 0x00, 0x00}}},
153 /* /38 */
154 {{{0xff, 0xff, 0xff, 0xff, 0xfc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
155 0x00, 0x00, 0x00, 0x00, 0x00}}},
156 /* /39 */
157 {{{0xff, 0xff, 0xff, 0xff, 0xfe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
158 0x00, 0x00, 0x00, 0x00, 0x00}}},
159 /* /40 */
160 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
161 0x00, 0x00, 0x00, 0x00, 0x00}}},
162 /* /41 */
163 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00,
164 0x00, 0x00, 0x00, 0x00, 0x00}}},
165 /* /42 */
166 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xc0, 0x00, 0x00, 0x00, 0x00, 0x00,
167 0x00, 0x00, 0x00, 0x00, 0x00}}},
168 /* /43 */
169 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00,
170 0x00, 0x00, 0x00, 0x00, 0x00}}},
171 /* /44 */
172 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00,
173 0x00, 0x00, 0x00, 0x00, 0x00}}},
174 /* /45 */
175 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00,
176 0x00, 0x00, 0x00, 0x00, 0x00}}},
177 /* /46 */
178 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xfc, 0x00, 0x00, 0x00, 0x00, 0x00,
179 0x00, 0x00, 0x00, 0x00, 0x00}}},
180 /* /47 */
181 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xfe, 0x00, 0x00, 0x00, 0x00, 0x00,
182 0x00, 0x00, 0x00, 0x00, 0x00}}},
183 /* /48 */
184 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00,
185 0x00, 0x00, 0x00, 0x00, 0x00}}},
186 /* /49 */
187 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x80, 0x00, 0x00, 0x00, 0x00,
188 0x00, 0x00, 0x00, 0x00, 0x00}}},
189 /* /50 */
190 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc0, 0x00, 0x00, 0x00, 0x00,
191 0x00, 0x00, 0x00, 0x00, 0x00}}},
192 /* /51 */
193 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xe0, 0x00, 0x00, 0x00, 0x00,
194 0x00, 0x00, 0x00, 0x00, 0x00}}},
195 /* /52 */
196 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00,
197 0x00, 0x00, 0x00, 0x00, 0x00}}},
198 /* /53 */
199 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf8, 0x00, 0x00, 0x00, 0x00,
200 0x00, 0x00, 0x00, 0x00, 0x00}}},
201 /* /54 */
202 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfc, 0x00, 0x00, 0x00, 0x00,
203 0x00, 0x00, 0x00, 0x00, 0x00}}},
204 /* /55 */
205 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfe, 0x00, 0x00, 0x00, 0x00,
206 0x00, 0x00, 0x00, 0x00, 0x00}}},
207 /* /56 */
208 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00,
209 0x00, 0x00, 0x00, 0x00, 0x00}}},
210 /* /57 */
211 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x80, 0x00, 0x00, 0x00,
212 0x00, 0x00, 0x00, 0x00, 0x00}}},
213 /* /58 */
214 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc0, 0x00, 0x00, 0x00,
215 0x00, 0x00, 0x00, 0x00, 0x00}}},
216 /* /59 */
217 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xe0, 0x00, 0x00, 0x00,
218 0x00, 0x00, 0x00, 0x00, 0x00}}},
219 /* /60 */
220 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00,
221 0x00, 0x00, 0x00, 0x00, 0x00}}},
222 /* /61 */
223 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf8, 0x00, 0x00, 0x00,
224 0x00, 0x00, 0x00, 0x00, 0x00}}},
225 /* /62 */
226 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfc, 0x00, 0x00, 0x00,
227 0x00, 0x00, 0x00, 0x00, 0x00}}},
228 /* /63 */
229 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfe, 0x00, 0x00, 0x00,
230 0x00, 0x00, 0x00, 0x00, 0x00}}},
231 /* /64 */
232 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00,
233 0x00, 0x00, 0x00, 0x00, 0x00}}},
234 /* /65 */
235 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x80, 0x00, 0x00,
236 0x00, 0x00, 0x00, 0x00, 0x00}}},
237 /* /66 */
238 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc0, 0x00, 0x00,
239 0x00, 0x00, 0x00, 0x00, 0x00}}},
240 /* /67 */
241 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xe0, 0x00, 0x00,
242 0x00, 0x00, 0x00, 0x00, 0x00}}},
243 /* /68 */
244 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00,
245 0x00, 0x00, 0x00, 0x00, 0x00}}},
246 /* /69 */
247 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf8, 0x00, 0x00,
248 0x00, 0x00, 0x00, 0x00, 0x00}}},
249 /* /70 */
250 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfc, 0x00, 0x00,
251 0x00, 0x00, 0x00, 0x00, 0x00}}},
252 /* /71 */
253 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfe, 0x00, 0x00,
254 0x00, 0x00, 0x00, 0x00, 0x00}}},
255 /* /72 */
256 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00,
257 0x00, 0x00, 0x00, 0x00, 0x00}}},
258 /* /73 */
259 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x80, 0x00,
260 0x00, 0x00, 0x00, 0x00, 0x00}}},
261 /* /74 */
262 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc0, 0x00,
263 0x00, 0x00, 0x00, 0x00, 0x00}}},
264 /* /75 */
265 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xe0, 0x00,
266 0x00, 0x00, 0x00, 0x00, 0x00}}},
267 /* /76 */
268 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf0, 0x00,
269 0x00, 0x00, 0x00, 0x00, 0x00}}},
270 /* /77 */
271 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf8, 0x00,
272 0x00, 0x00, 0x00, 0x00, 0x00}}},
273 /* /78 */
274 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfc, 0x00,
275 0x00, 0x00, 0x00, 0x00, 0x00}}},
276 /* /79 */
277 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfe, 0x00,
278 0x00, 0x00, 0x00, 0x00, 0x00}}},
279 /* /80 */
280 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00,
281 0x00, 0x00, 0x00, 0x00, 0x00}}},
282 /* /81 */
283 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x80,
284 0x00, 0x00, 0x00, 0x00, 0x00}}},
285 /* /82 */
286 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc0,
287 0x00, 0x00, 0x00, 0x00, 0x00}}},
288 /* /83 */
289 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xe0,
290 0x00, 0x00, 0x00, 0x00, 0x00}}},
291 /* /84 */
292 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf0,
293 0x00, 0x00, 0x00, 0x00, 0x00}}},
294 /* /85 */
295 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xf8,
296 0x00, 0x00, 0x00, 0x00, 0x00}}},
297 /* /86 */
298 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfc,
299 0x00, 0x00, 0x00, 0x00, 0x00}}},
300 /* /87 */
301 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xfe,
302 0x00, 0x00, 0x00, 0x00, 0x00}}},
303 /* /88 */
304 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
305 0x00, 0x00, 0x00, 0x00, 0x00}}},
306 /* /89 */
307 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
308 0x80, 0x00, 0x00, 0x00, 0x00}}},
309 /* /90 */
310 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
311 0xc0, 0x00, 0x00, 0x00, 0x00}}},
312 /* /91 */
313 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
314 0xe0, 0x00, 0x00, 0x00, 0x00}}},
315 /* /92 */
316 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
317 0xf0, 0x00, 0x00, 0x00, 0x00}}},
318 /* /93 */
319 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
320 0xf8, 0x00, 0x00, 0x00, 0x00}}},
321 /* /94 */
322 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
323 0xfc, 0x00, 0x00, 0x00, 0x00}}},
324 /* /95 */
325 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
326 0xfe, 0x00, 0x00, 0x00, 0x00}}},
327 /* /96 */
328 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
329 0xff, 0x00, 0x00, 0x00, 0x00}}},
330 /* /97 */
331 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
332 0xff, 0x80, 0x00, 0x00, 0x00}}},
333 /* /98 */
334 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
335 0xff, 0xc0, 0x00, 0x00, 0x00}}},
336 /* /99 */
337 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
338 0xff, 0xe0, 0x00, 0x00, 0x00}}},
339 /* /100 */
340 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
341 0xff, 0xf0, 0x00, 0x00, 0x00}}},
342 /* /101 */
343 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
344 0xff, 0xf8, 0x00, 0x00, 0x00}}},
345 /* /102 */
346 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
347 0xff, 0xfc, 0x00, 0x00, 0x00}}},
348 /* /103 */
349 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
350 0xff, 0xfe, 0x00, 0x00, 0x00}}},
351 /* /104 */
352 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
353 0xff, 0xff, 0x00, 0x00, 0x00}}},
354 /* /105 */
355 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
356 0xff, 0xff, 0x80, 0x00, 0x00}}},
357 /* /106 */
358 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
359 0xff, 0xff, 0xc0, 0x00, 0x00}}},
360 /* /107 */
361 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
362 0xff, 0xff, 0xe0, 0x00, 0x00}}},
363 /* /108 */
364 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
365 0xff, 0xff, 0xf0, 0x00, 0x00}}},
366 /* /109 */
367 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
368 0xff, 0xff, 0xf8, 0x00, 0x00}}},
369 /* /110 */
370 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
371 0xff, 0xff, 0xfc, 0x00, 0x00}}},
372 /* /111 */
373 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
374 0xff, 0xff, 0xfe, 0x00, 0x00}}},
375 /* /112 */
376 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
377 0xff, 0xff, 0xff, 0x00, 0x00}}},
378 /* /113 */
379 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
380 0xff, 0xff, 0xff, 0x80, 0x00}}},
381 /* /114 */
382 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
383 0xff, 0xff, 0xff, 0xc0, 0x00}}},
384 /* /115 */
385 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
386 0xff, 0xff, 0xff, 0xe0, 0x00}}},
387 /* /116 */
388 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
389 0xff, 0xff, 0xff, 0xf0, 0x00}}},
390 /* /117 */
391 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
392 0xff, 0xff, 0xff, 0xf8, 0x00}}},
393 /* /118 */
394 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
395 0xff, 0xff, 0xff, 0xfc, 0x00}}},
396 /* /119 */
397 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
398 0xff, 0xff, 0xff, 0xfe, 0x00}}},
399 /* /120 */
400 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
401 0xff, 0xff, 0xff, 0xff, 0x00}}},
402 /* /121 */
403 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
404 0xff, 0xff, 0xff, 0xff, 0x80}}},
405 /* /122 */
406 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
407 0xff, 0xff, 0xff, 0xff, 0xc0}}},
408 /* /123 */
409 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
410 0xff, 0xff, 0xff, 0xff, 0xe0}}},
411 /* /124 */
412 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
413 0xff, 0xff, 0xff, 0xff, 0xf0}}},
414 /* /125 */
415 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
416 0xff, 0xff, 0xff, 0xff, 0xf8}}},
417 /* /126 */
418 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
419 0xff, 0xff, 0xff, 0xff, 0xfc}}},
420 /* /127 */
421 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
422 0xff, 0xff, 0xff, 0xff, 0xfe}}},
423 /* /128 */
424 {{{0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
425 0xff, 0xff, 0xff, 0xff, 0xff}}}};
426
427 /* Number of bits in prefix type. */
428 #ifndef PNBBY
429 #define PNBBY 8
430 #endif /* PNBBY */
431
432 #define MASKBIT(offset) ((0xff << (PNBBY - (offset))) & 0xff)
433
434 void prefix_hexdump(const struct prefix *p)
435 {
436 char buf[PREFIX_STRLEN];
437
438 zlog_debug("prefix: %s",
439 prefix2str(p, buf, sizeof(buf)));
440 zlog_hexdump(p, sizeof(struct prefix));
441 }
442
443 int is_zero_mac(struct ethaddr *mac)
444 {
445 int i = 0;
446
447 for (i = 0; i < ETH_ALEN; i++) {
448 if (mac->octet[i])
449 return 0;
450 }
451
452 return 1;
453 }
454
455 unsigned int prefix_bit(const uint8_t *prefix, const uint16_t prefixlen)
456 {
457 unsigned int offset = prefixlen / 8;
458 unsigned int shift = 7 - (prefixlen % 8);
459
460 return (prefix[offset] >> shift) & 1;
461 }
462
463 unsigned int prefix6_bit(const struct in6_addr *prefix, const uint16_t prefixlen)
464 {
465 return prefix_bit((const uint8_t *)&prefix->s6_addr, prefixlen);
466 }
467
468 int str2family(const char *string)
469 {
470 if (!strcmp("ipv4", string))
471 return AF_INET;
472 else if (!strcmp("ipv6", string))
473 return AF_INET6;
474 else if (!strcmp("ethernet", string))
475 return AF_ETHERNET;
476 else if (!strcmp("evpn", string))
477 return AF_EVPN;
478 return -1;
479 }
480
481 const char *family2str(int family)
482 {
483 switch (family) {
484 case AF_INET:
485 return "IPv4";
486 case AF_INET6:
487 return "IPv6";
488 case AF_ETHERNET:
489 return "Ethernet";
490 case AF_EVPN:
491 return "Evpn";
492 }
493 return "?";
494 }
495
496 /* Address Famiy Identifier to Address Family converter. */
497 int afi2family(afi_t afi)
498 {
499 if (afi == AFI_IP)
500 return AF_INET;
501 else if (afi == AFI_IP6)
502 return AF_INET6;
503 else if (afi == AFI_L2VPN)
504 return AF_ETHERNET;
505 /* NOTE: EVPN code should NOT use this interface. */
506 return 0;
507 }
508
509 afi_t family2afi(int family)
510 {
511 if (family == AF_INET)
512 return AFI_IP;
513 else if (family == AF_INET6)
514 return AFI_IP6;
515 else if (family == AF_ETHERNET || family == AF_EVPN)
516 return AFI_L2VPN;
517 return 0;
518 }
519
520 const char *afi2str(afi_t afi)
521 {
522 switch (afi) {
523 case AFI_IP:
524 return "IPv4";
525 case AFI_IP6:
526 return "IPv6";
527 case AFI_L2VPN:
528 return "l2vpn";
529 case AFI_MAX:
530 return "bad-value";
531 default:
532 break;
533 }
534 return NULL;
535 }
536
537 const char *safi2str(safi_t safi)
538 {
539 switch (safi) {
540 case SAFI_UNICAST:
541 return "unicast";
542 case SAFI_MULTICAST:
543 return "multicast";
544 case SAFI_MPLS_VPN:
545 return "vpn";
546 case SAFI_ENCAP:
547 return "encap";
548 case SAFI_EVPN:
549 return "evpn";
550 case SAFI_LABELED_UNICAST:
551 return "labeled-unicast";
552 case SAFI_FLOWSPEC:
553 return "flowspec";
554 default:
555 return "unknown";
556 }
557 }
558
559 /* If n includes p prefix then return 1 else return 0. */
560 int prefix_match(const struct prefix *n, const struct prefix *p)
561 {
562 int offset;
563 int shift;
564 const uint8_t *np, *pp;
565
566 /* If n's prefix is longer than p's one return 0. */
567 if (n->prefixlen > p->prefixlen)
568 return 0;
569
570 if (n->family == AF_FLOWSPEC) {
571 /* prefixlen is unused. look at fs prefix len */
572 if (n->u.prefix_flowspec.prefixlen >
573 p->u.prefix_flowspec.prefixlen)
574 return 0;
575
576 /* Set both prefix's head pointer. */
577 np = (const uint8_t *)&n->u.prefix_flowspec.ptr;
578 pp = (const uint8_t *)&p->u.prefix_flowspec.ptr;
579
580 offset = n->u.prefix_flowspec.prefixlen;
581
582 while (offset--)
583 if (np[offset] != pp[offset])
584 return 0;
585 return 1;
586 }
587
588 /* Set both prefix's head pointer. */
589 np = n->u.val;
590 pp = p->u.val;
591
592 offset = n->prefixlen / PNBBY;
593 shift = n->prefixlen % PNBBY;
594
595 if (shift)
596 if (maskbit[shift] & (np[offset] ^ pp[offset]))
597 return 0;
598
599 while (offset--)
600 if (np[offset] != pp[offset])
601 return 0;
602 return 1;
603 }
604
605 /* If n includes p then return 1 else return 0. Prefix mask is not considered */
606 int prefix_match_network_statement(const struct prefix *n,
607 const struct prefix *p)
608 {
609 int offset;
610 int shift;
611 const uint8_t *np, *pp;
612
613 /* Set both prefix's head pointer. */
614 np = n->u.val;
615 pp = p->u.val;
616
617 offset = n->prefixlen / PNBBY;
618 shift = n->prefixlen % PNBBY;
619
620 if (shift)
621 if (maskbit[shift] & (np[offset] ^ pp[offset]))
622 return 0;
623
624 while (offset--)
625 if (np[offset] != pp[offset])
626 return 0;
627 return 1;
628 }
629
630 void prefix_copy(struct prefix *dest, const struct prefix *src)
631 {
632 dest->family = src->family;
633 dest->prefixlen = src->prefixlen;
634
635 if (src->family == AF_INET)
636 dest->u.prefix4 = src->u.prefix4;
637 else if (src->family == AF_INET6)
638 dest->u.prefix6 = src->u.prefix6;
639 else if (src->family == AF_ETHERNET) {
640 memcpy(&dest->u.prefix_eth, &src->u.prefix_eth,
641 sizeof(struct ethaddr));
642 } else if (src->family == AF_EVPN) {
643 memcpy(&dest->u.prefix_evpn, &src->u.prefix_evpn,
644 sizeof(struct evpn_addr));
645 } else if (src->family == AF_UNSPEC) {
646 dest->u.lp.id = src->u.lp.id;
647 dest->u.lp.adv_router = src->u.lp.adv_router;
648 } else if (src->family == AF_FLOWSPEC) {
649 void *temp;
650 int len;
651
652 len = src->u.prefix_flowspec.prefixlen;
653 dest->u.prefix_flowspec.prefixlen =
654 src->u.prefix_flowspec.prefixlen;
655 dest->family = src->family;
656 temp = XCALLOC(MTYPE_PREFIX_FLOWSPEC, len);
657 dest->u.prefix_flowspec.ptr = (uintptr_t)temp;
658 memcpy((void *)dest->u.prefix_flowspec.ptr,
659 (void *)src->u.prefix_flowspec.ptr, len);
660 } else {
661 flog_err(EC_LIB_DEVELOPMENT,
662 "prefix_copy(): Unknown address family %d",
663 src->family);
664 assert(0);
665 }
666 }
667
668 /*
669 * Return 1 if the address/netmask contained in the prefix structure
670 * is the same, and else return 0. For this routine, 'same' requires
671 * that not only the prefix length and the network part be the same,
672 * but also the host part. Thus, 10.0.0.1/8 and 10.0.0.2/8 are not
673 * the same. Note that this routine has the same return value sense
674 * as '==' (which is different from prefix_cmp).
675 */
676 int prefix_same(const struct prefix *p1, const struct prefix *p2)
677 {
678 if ((p1 && !p2) || (!p1 && p2))
679 return 0;
680
681 if (!p1 && !p2)
682 return 1;
683
684 if (p1->family == p2->family && p1->prefixlen == p2->prefixlen) {
685 if (p1->family == AF_INET)
686 if (IPV4_ADDR_SAME(&p1->u.prefix4, &p2->u.prefix4))
687 return 1;
688 if (p1->family == AF_INET6)
689 if (IPV6_ADDR_SAME(&p1->u.prefix6.s6_addr,
690 &p2->u.prefix6.s6_addr))
691 return 1;
692 if (p1->family == AF_ETHERNET)
693 if (!memcmp(&p1->u.prefix_eth, &p2->u.prefix_eth,
694 sizeof(struct ethaddr)))
695 return 1;
696 if (p1->family == AF_EVPN)
697 if (!memcmp(&p1->u.prefix_evpn, &p2->u.prefix_evpn,
698 sizeof(struct evpn_addr)))
699 return 1;
700 if (p1->family == AF_FLOWSPEC) {
701 if (p1->u.prefix_flowspec.prefixlen !=
702 p2->u.prefix_flowspec.prefixlen)
703 return 0;
704 if (!memcmp(&p1->u.prefix_flowspec.ptr,
705 &p2->u.prefix_flowspec.ptr,
706 p2->u.prefix_flowspec.prefixlen))
707 return 1;
708 }
709 }
710 return 0;
711 }
712
713 /*
714 * Return 0 if the network prefixes represented by the struct prefix
715 * arguments are the same prefix, and 1 otherwise. Network prefixes
716 * are considered the same if the prefix lengths are equal and the
717 * network parts are the same. Host bits (which are considered masked
718 * by the prefix length) are not significant. Thus, 10.0.0.1/8 and
719 * 10.0.0.2/8 are considered equivalent by this routine. Note that
720 * this routine has the same return sense as strcmp (which is different
721 * from prefix_same).
722 */
723 int prefix_cmp(const struct prefix *p1, const struct prefix *p2)
724 {
725 int offset;
726 int shift;
727
728 /* Set both prefix's head pointer. */
729 const uint8_t *pp1;
730 const uint8_t *pp2;
731
732 if (p1->family != p2->family)
733 return 1;
734 if (p1->family == AF_FLOWSPEC) {
735 pp1 = (const uint8_t *)p1->u.prefix_flowspec.ptr;
736 pp2 = (const uint8_t *)p2->u.prefix_flowspec.ptr;
737
738 if (p1->u.prefix_flowspec.prefixlen !=
739 p2->u.prefix_flowspec.prefixlen)
740 return 1;
741
742 offset = p1->u.prefix_flowspec.prefixlen;
743 while (offset--)
744 if (pp1[offset] != pp2[offset])
745 return 1;
746 return 0;
747 }
748 pp1 = p1->u.val;
749 pp2 = p2->u.val;
750
751 if (p1->prefixlen != p2->prefixlen)
752 return 1;
753 offset = p1->prefixlen / PNBBY;
754 shift = p1->prefixlen % PNBBY;
755
756 if (shift)
757 if (maskbit[shift] & (pp1[offset] ^ pp2[offset]))
758 return 1;
759
760 while (offset--)
761 if (pp1[offset] != pp2[offset])
762 return 1;
763
764 return 0;
765 }
766
767 /*
768 * Count the number of common bits in 2 prefixes. The prefix length is
769 * ignored for this function; the whole prefix is compared. If the prefix
770 * address families don't match, return -1; otherwise the return value is
771 * in range 0 ... maximum prefix length for the address family.
772 */
773 int prefix_common_bits(const struct prefix *p1, const struct prefix *p2)
774 {
775 int pos, bit;
776 int length = 0;
777 uint8_t xor ;
778
779 /* Set both prefix's head pointer. */
780 const uint8_t *pp1 = p1->u.val;
781 const uint8_t *pp2 = p2->u.val;
782
783 if (p1->family == AF_INET)
784 length = IPV4_MAX_BYTELEN;
785 if (p1->family == AF_INET6)
786 length = IPV6_MAX_BYTELEN;
787 if (p1->family == AF_ETHERNET)
788 length = ETH_ALEN;
789 if (p1->family == AF_EVPN)
790 length = 8 * sizeof(struct evpn_addr);
791
792 if (p1->family != p2->family || !length)
793 return -1;
794
795 for (pos = 0; pos < length; pos++)
796 if (pp1[pos] != pp2[pos])
797 break;
798 if (pos == length)
799 return pos * 8;
800
801 xor = pp1[pos] ^ pp2[pos];
802 for (bit = 0; bit < 8; bit++)
803 if (xor&(1 << (7 - bit)))
804 break;
805
806 return pos * 8 + bit;
807 }
808
809 /* Return prefix family type string. */
810 const char *prefix_family_str(const struct prefix *p)
811 {
812 if (p->family == AF_INET)
813 return "inet";
814 if (p->family == AF_INET6)
815 return "inet6";
816 if (p->family == AF_ETHERNET)
817 return "ether";
818 if (p->family == AF_EVPN)
819 return "evpn";
820 return "unspec";
821 }
822
823 /* Allocate new prefix_ipv4 structure. */
824 struct prefix_ipv4 *prefix_ipv4_new(void)
825 {
826 struct prefix_ipv4 *p;
827
828 /* Call prefix_new to allocate a full-size struct prefix to avoid
829 problems
830 where the struct prefix_ipv4 is cast to struct prefix and unallocated
831 bytes were being referenced (e.g. in structure assignments). */
832 p = (struct prefix_ipv4 *)prefix_new();
833 p->family = AF_INET;
834 return p;
835 }
836
837 /* Free prefix_ipv4 structure. */
838 void prefix_ipv4_free(struct prefix_ipv4 *p)
839 {
840 prefix_free((struct prefix *)p);
841 }
842
843 /* When string format is invalid return 0. */
844 int str2prefix_ipv4(const char *str, struct prefix_ipv4 *p)
845 {
846 int ret;
847 int plen;
848 char *pnt;
849 char *cp;
850
851 /* Find slash inside string. */
852 pnt = strchr(str, '/');
853
854 /* String doesn't contail slash. */
855 if (pnt == NULL) {
856 /* Convert string to prefix. */
857 ret = inet_pton(AF_INET, str, &p->prefix);
858 if (ret == 0)
859 return 0;
860
861 /* If address doesn't contain slash we assume it host address.
862 */
863 p->family = AF_INET;
864 p->prefixlen = IPV4_MAX_BITLEN;
865
866 return ret;
867 } else {
868 cp = XMALLOC(MTYPE_TMP, (pnt - str) + 1);
869 strncpy(cp, str, pnt - str);
870 *(cp + (pnt - str)) = '\0';
871 ret = inet_aton(cp, &p->prefix);
872 XFREE(MTYPE_TMP, cp);
873
874 /* Get prefix length. */
875 plen = (uint8_t)atoi(++pnt);
876 if (plen > IPV4_MAX_PREFIXLEN)
877 return 0;
878
879 p->family = AF_INET;
880 p->prefixlen = plen;
881 }
882
883 return ret;
884 }
885
886 /* When string format is invalid return 0. */
887 int str2prefix_eth(const char *str, struct prefix_eth *p)
888 {
889 int ret = 0;
890 int plen = 48;
891 char *pnt;
892 char *cp = NULL;
893 const char *str_addr = str;
894 unsigned int a[6];
895 int i;
896 bool slash = false;
897
898 if (!strcmp(str, "any")) {
899 memset(p, 0, sizeof(*p));
900 p->family = AF_ETHERNET;
901 return 1;
902 }
903
904 /* Find slash inside string. */
905 pnt = strchr(str, '/');
906
907 if (pnt) {
908 /* Get prefix length. */
909 plen = (uint8_t)atoi(++pnt);
910 if (plen > 48) {
911 ret = 0;
912 goto done;
913 }
914
915 cp = XMALLOC(MTYPE_TMP, (pnt - str) + 1);
916 strncpy(cp, str, pnt - str);
917 *(cp + (pnt - str)) = '\0';
918
919 str_addr = cp;
920 slash = true;
921 }
922
923 /* Convert string to prefix. */
924 if (sscanf(str_addr, "%2x:%2x:%2x:%2x:%2x:%2x", a + 0, a + 1, a + 2,
925 a + 3, a + 4, a + 5)
926 != 6) {
927 ret = 0;
928 goto done;
929 }
930 for (i = 0; i < 6; ++i) {
931 p->eth_addr.octet[i] = a[i] & 0xff;
932 }
933 p->prefixlen = plen;
934 p->family = AF_ETHERNET;
935
936 /*
937 * special case to allow old configurations to work
938 * Since all zero's is implicitly meant to allow
939 * a comparison to zero, let's assume
940 */
941 if (!slash && is_zero_mac(&(p->eth_addr)))
942 p->prefixlen = 0;
943
944 ret = 1;
945
946 done:
947 if (cp)
948 XFREE(MTYPE_TMP, cp);
949
950 return ret;
951 }
952
953 /* Convert masklen into IP address's netmask (network byte order). */
954 void masklen2ip(const int masklen, struct in_addr *netmask)
955 {
956 assert(masklen >= 0 && masklen <= IPV4_MAX_BITLEN);
957
958 /* left shift is only defined for less than the size of the type.
959 * we unconditionally use long long in case the target platform
960 * has defined behaviour for << 32 (or has a 64-bit left shift) */
961
962 if (sizeof(unsigned long long) > 4)
963 netmask->s_addr = htonl(0xffffffffULL << (32 - masklen));
964 else
965 netmask->s_addr =
966 htonl(masklen ? 0xffffffffU << (32 - masklen) : 0);
967 }
968
969 /* Convert IP address's netmask into integer. We assume netmask is
970 * sequential one. Argument netmask should be network byte order. */
971 uint8_t ip_masklen(struct in_addr netmask)
972 {
973 uint32_t tmp = ~ntohl(netmask.s_addr);
974
975 /*
976 * clz: count leading zeroes. sadly, the behaviour of this builtin is
977 * undefined for a 0 argument, even though most CPUs give 32
978 */
979 return tmp ? __builtin_clz(tmp) : 32;
980 }
981
982 /* Apply mask to IPv4 prefix (network byte order). */
983 void apply_mask_ipv4(struct prefix_ipv4 *p)
984 {
985 struct in_addr mask;
986 masklen2ip(p->prefixlen, &mask);
987 p->prefix.s_addr &= mask.s_addr;
988 }
989
990 /* If prefix is 0.0.0.0/0 then return 1 else return 0. */
991 int prefix_ipv4_any(const struct prefix_ipv4 *p)
992 {
993 return (p->prefix.s_addr == 0 && p->prefixlen == 0);
994 }
995
996 /* Allocate a new ip version 6 route */
997 struct prefix_ipv6 *prefix_ipv6_new(void)
998 {
999 struct prefix_ipv6 *p;
1000
1001 /* Allocate a full-size struct prefix to avoid problems with structure
1002 size mismatches. */
1003 p = (struct prefix_ipv6 *)prefix_new();
1004 p->family = AF_INET6;
1005 return p;
1006 }
1007
1008 /* Free prefix for IPv6. */
1009 void prefix_ipv6_free(struct prefix_ipv6 *p)
1010 {
1011 prefix_free((struct prefix *)p);
1012 }
1013
1014 /* If given string is valid return pin6 else return NULL */
1015 int str2prefix_ipv6(const char *str, struct prefix_ipv6 *p)
1016 {
1017 char *pnt;
1018 char *cp;
1019 int ret;
1020
1021 pnt = strchr(str, '/');
1022
1023 /* If string doesn't contain `/' treat it as host route. */
1024 if (pnt == NULL) {
1025 ret = inet_pton(AF_INET6, str, &p->prefix);
1026 if (ret == 0)
1027 return 0;
1028 p->prefixlen = IPV6_MAX_BITLEN;
1029 } else {
1030 int plen;
1031
1032 cp = XMALLOC(MTYPE_TMP, (pnt - str) + 1);
1033 strncpy(cp, str, pnt - str);
1034 *(cp + (pnt - str)) = '\0';
1035 ret = inet_pton(AF_INET6, cp, &p->prefix);
1036 XFREE(MTYPE_TMP, cp);
1037 if (ret == 0)
1038 return 0;
1039 plen = (uint8_t)atoi(++pnt);
1040 if (plen > IPV6_MAX_BITLEN)
1041 return 0;
1042 p->prefixlen = plen;
1043 }
1044 p->family = AF_INET6;
1045
1046 return ret;
1047 }
1048
1049 /* Convert struct in6_addr netmask into integer.
1050 * FIXME return uint8_t as ip_maskleni() does. */
1051 int ip6_masklen(struct in6_addr netmask)
1052 {
1053 int len = 0;
1054 unsigned char val;
1055 unsigned char *pnt;
1056
1057 pnt = (unsigned char *)&netmask;
1058
1059 while ((*pnt == 0xff) && len < IPV6_MAX_BITLEN) {
1060 len += 8;
1061 pnt++;
1062 }
1063
1064 if (len < IPV6_MAX_BITLEN) {
1065 val = *pnt;
1066 while (val) {
1067 len++;
1068 val <<= 1;
1069 }
1070 }
1071 return len;
1072 }
1073
1074 void masklen2ip6(const int masklen, struct in6_addr *netmask)
1075 {
1076 assert(masklen >= 0 && masklen <= IPV6_MAX_BITLEN);
1077 memcpy(netmask, maskbytes6 + masklen, sizeof(struct in6_addr));
1078 }
1079
1080 void apply_mask_ipv6(struct prefix_ipv6 *p)
1081 {
1082 uint8_t *pnt;
1083 int index;
1084 int offset;
1085
1086 index = p->prefixlen / 8;
1087
1088 if (index < 16) {
1089 pnt = (uint8_t *)&p->prefix;
1090 offset = p->prefixlen % 8;
1091
1092 pnt[index] &= maskbit[offset];
1093 index++;
1094
1095 while (index < 16)
1096 pnt[index++] = 0;
1097 }
1098 }
1099
1100 void apply_mask(struct prefix *p)
1101 {
1102 switch (p->family) {
1103 case AF_INET:
1104 apply_mask_ipv4((struct prefix_ipv4 *)p);
1105 break;
1106 case AF_INET6:
1107 apply_mask_ipv6((struct prefix_ipv6 *)p);
1108 break;
1109 default:
1110 break;
1111 }
1112 return;
1113 }
1114
1115 /* Utility function of convert between struct prefix <=> union sockunion.
1116 * FIXME This function isn't used anywhere. */
1117 struct prefix *sockunion2prefix(const union sockunion *dest,
1118 const union sockunion *mask)
1119 {
1120 if (dest->sa.sa_family == AF_INET) {
1121 struct prefix_ipv4 *p;
1122
1123 p = prefix_ipv4_new();
1124 p->family = AF_INET;
1125 p->prefix = dest->sin.sin_addr;
1126 p->prefixlen = ip_masklen(mask->sin.sin_addr);
1127 return (struct prefix *)p;
1128 }
1129 if (dest->sa.sa_family == AF_INET6) {
1130 struct prefix_ipv6 *p;
1131
1132 p = prefix_ipv6_new();
1133 p->family = AF_INET6;
1134 p->prefixlen = ip6_masklen(mask->sin6.sin6_addr);
1135 memcpy(&p->prefix, &dest->sin6.sin6_addr,
1136 sizeof(struct in6_addr));
1137 return (struct prefix *)p;
1138 }
1139 return NULL;
1140 }
1141
1142 /* Utility function of convert between struct prefix <=> union sockunion. */
1143 struct prefix *sockunion2hostprefix(const union sockunion *su,
1144 struct prefix *prefix)
1145 {
1146 if (su->sa.sa_family == AF_INET) {
1147 struct prefix_ipv4 *p;
1148
1149 p = prefix ? (struct prefix_ipv4 *)prefix : prefix_ipv4_new();
1150 p->family = AF_INET;
1151 p->prefix = su->sin.sin_addr;
1152 p->prefixlen = IPV4_MAX_BITLEN;
1153 return (struct prefix *)p;
1154 }
1155 if (su->sa.sa_family == AF_INET6) {
1156 struct prefix_ipv6 *p;
1157
1158 p = prefix ? (struct prefix_ipv6 *)prefix : prefix_ipv6_new();
1159 p->family = AF_INET6;
1160 p->prefixlen = IPV6_MAX_BITLEN;
1161 memcpy(&p->prefix, &su->sin6.sin6_addr,
1162 sizeof(struct in6_addr));
1163 return (struct prefix *)p;
1164 }
1165 return NULL;
1166 }
1167
1168 void prefix2sockunion(const struct prefix *p, union sockunion *su)
1169 {
1170 memset(su, 0, sizeof(*su));
1171
1172 su->sa.sa_family = p->family;
1173 if (p->family == AF_INET)
1174 su->sin.sin_addr = p->u.prefix4;
1175 if (p->family == AF_INET6)
1176 memcpy(&su->sin6.sin6_addr, &p->u.prefix6,
1177 sizeof(struct in6_addr));
1178 }
1179
1180 int prefix_blen(const struct prefix *p)
1181 {
1182 switch (p->family) {
1183 case AF_INET:
1184 return IPV4_MAX_BYTELEN;
1185 break;
1186 case AF_INET6:
1187 return IPV6_MAX_BYTELEN;
1188 break;
1189 case AF_ETHERNET:
1190 return ETH_ALEN;
1191 break;
1192 }
1193 return 0;
1194 }
1195
1196 /* Generic function for conversion string to struct prefix. */
1197 int str2prefix(const char *str, struct prefix *p)
1198 {
1199 int ret;
1200
1201 if (!str || !p)
1202 return 0;
1203
1204 /* First we try to convert string to struct prefix_ipv4. */
1205 ret = str2prefix_ipv4(str, (struct prefix_ipv4 *)p);
1206 if (ret)
1207 return ret;
1208
1209 /* Next we try to convert string to struct prefix_ipv6. */
1210 ret = str2prefix_ipv6(str, (struct prefix_ipv6 *)p);
1211 if (ret)
1212 return ret;
1213
1214 /* Next we try to convert string to struct prefix_eth. */
1215 ret = str2prefix_eth(str, (struct prefix_eth *)p);
1216 if (ret)
1217 return ret;
1218
1219 return 0;
1220 }
1221
1222 static const char *prefixevpn_ead2str(const struct prefix_evpn *p, char *str,
1223 int size)
1224 {
1225 snprintf(str, size, "Unsupported EVPN prefix");
1226 return str;
1227 }
1228
1229 static const char *prefixevpn_macip2str(const struct prefix_evpn *p, char *str,
1230 int size)
1231 {
1232 uint8_t family;
1233 char buf[PREFIX2STR_BUFFER];
1234 char buf2[ETHER_ADDR_STRLEN];
1235
1236 if (is_evpn_prefix_ipaddr_none(p))
1237 snprintf(str, size, "[%d]:[%s]/%d",
1238 p->prefix.route_type,
1239 prefix_mac2str(&p->prefix.macip_addr.mac,
1240 buf2, sizeof(buf2)),
1241 p->prefixlen);
1242 else {
1243 family = is_evpn_prefix_ipaddr_v4(p)
1244 ? AF_INET
1245 : AF_INET6;
1246 snprintf(str, size, "[%d]:[%s]:[%s]/%d",
1247 p->prefix.route_type,
1248 prefix_mac2str(&p->prefix.macip_addr.mac,
1249 buf2, sizeof(buf2)),
1250 inet_ntop(family,
1251 &p->prefix.macip_addr.ip.ip.addr,
1252 buf, PREFIX2STR_BUFFER),
1253 p->prefixlen);
1254 }
1255 return str;
1256 }
1257
1258 static const char *prefixevpn_imet2str(const struct prefix_evpn *p, char *str,
1259 int size)
1260 {
1261 uint8_t family;
1262 char buf[PREFIX2STR_BUFFER];
1263
1264 family = is_evpn_prefix_ipaddr_v4(p)
1265 ? AF_INET
1266 : AF_INET6;
1267 snprintf(str, size, "[%d]:[%s]/%d", p->prefix.route_type,
1268 inet_ntop(family,
1269 &p->prefix.imet_addr.ip.ip.addr, buf,
1270 PREFIX2STR_BUFFER),
1271 p->prefixlen);
1272 return str;
1273 }
1274
1275 static const char *prefixevpn_es2str(const struct prefix_evpn *p, char *str,
1276 int size)
1277 {
1278 char buf[ESI_STR_LEN];
1279
1280 snprintf(str, size, "[%d]:[%s]:[%s]/%d", p->prefix.route_type,
1281 esi_to_str(&p->prefix.es_addr.esi, buf, sizeof(buf)),
1282 inet_ntoa(p->prefix.es_addr.ip.ipaddr_v4),
1283 p->prefixlen);
1284 return str;
1285 }
1286
1287 static const char *prefixevpn_prefix2str(const struct prefix_evpn *p, char *str,
1288 int size)
1289 {
1290 uint8_t family;
1291 char buf[PREFIX2STR_BUFFER];
1292
1293 family = is_evpn_prefix_ipaddr_v4(p)
1294 ? AF_INET
1295 : AF_INET6;
1296 snprintf(str, size, "[%d]:[%u][%s/%d]/%d",
1297 p->prefix.route_type,
1298 p->prefix.prefix_addr.eth_tag,
1299 inet_ntop(family,
1300 &p->prefix.prefix_addr.ip.ip.addr, buf,
1301 PREFIX2STR_BUFFER),
1302 p->prefix.prefix_addr.ip_prefix_length,
1303 p->prefixlen);
1304 return str;
1305 }
1306
1307 static const char *prefixevpn2str(const struct prefix_evpn *p, char *str,
1308 int size)
1309 {
1310 switch (p->prefix.route_type) {
1311 case 1:
1312 return prefixevpn_ead2str(p, str, size);
1313 case 2:
1314 return prefixevpn_macip2str(p, str, size);
1315 case 3:
1316 return prefixevpn_imet2str(p, str, size);
1317 case 4:
1318 return prefixevpn_es2str(p, str, size);
1319 case 5:
1320 return prefixevpn_prefix2str(p, str, size);
1321 default:
1322 snprintf(str, size, "Unsupported EVPN prefix");
1323 break;
1324 }
1325 return str;
1326 }
1327
1328 const char *prefix2str(union prefixconstptr pu, char *str, int size)
1329 {
1330 const struct prefix *p = pu.p;
1331 char buf[PREFIX2STR_BUFFER];
1332
1333 switch (p->family) {
1334 case AF_INET:
1335 case AF_INET6:
1336 snprintf(str, size, "%s/%d", inet_ntop(p->family, &p->u.prefix,
1337 buf, PREFIX2STR_BUFFER),
1338 p->prefixlen);
1339 break;
1340
1341 case AF_ETHERNET:
1342 snprintf(str, size, "%s/%d",
1343 prefix_mac2str(&p->u.prefix_eth, buf, sizeof(buf)),
1344 p->prefixlen);
1345 break;
1346
1347 case AF_EVPN:
1348 prefixevpn2str((const struct prefix_evpn *)p, str, size);
1349 break;
1350
1351 case AF_FLOWSPEC:
1352 sprintf(str, "FS prefix");
1353 break;
1354
1355 default:
1356 sprintf(str, "UNK prefix");
1357 break;
1358 }
1359
1360 return str;
1361 }
1362
1363 struct prefix *prefix_new(void)
1364 {
1365 struct prefix *p;
1366
1367 p = XCALLOC(MTYPE_PREFIX, sizeof *p);
1368 return p;
1369 }
1370
1371 /* Free prefix structure. */
1372 void prefix_free(struct prefix *p)
1373 {
1374 XFREE(MTYPE_PREFIX, p);
1375 }
1376
1377 /* Utility function to convert ipv4 prefixes to Classful prefixes */
1378 void apply_classful_mask_ipv4(struct prefix_ipv4 *p)
1379 {
1380
1381 uint32_t destination;
1382
1383 destination = ntohl(p->prefix.s_addr);
1384
1385 if (p->prefixlen == IPV4_MAX_PREFIXLEN)
1386 ;
1387 /* do nothing for host routes */
1388 else if (IN_CLASSC(destination)) {
1389 p->prefixlen = 24;
1390 apply_mask_ipv4(p);
1391 } else if (IN_CLASSB(destination)) {
1392 p->prefixlen = 16;
1393 apply_mask_ipv4(p);
1394 } else {
1395 p->prefixlen = 8;
1396 apply_mask_ipv4(p);
1397 }
1398 }
1399
1400 in_addr_t ipv4_network_addr(in_addr_t hostaddr, int masklen)
1401 {
1402 struct in_addr mask;
1403
1404 masklen2ip(masklen, &mask);
1405 return hostaddr & mask.s_addr;
1406 }
1407
1408 in_addr_t ipv4_broadcast_addr(in_addr_t hostaddr, int masklen)
1409 {
1410 struct in_addr mask;
1411
1412 masklen2ip(masklen, &mask);
1413 return (masklen != IPV4_MAX_PREFIXLEN - 1) ?
1414 /* normal case */
1415 (hostaddr | ~mask.s_addr)
1416 :
1417 /* special case for /31 */
1418 (hostaddr ^ ~mask.s_addr);
1419 }
1420
1421 /* Utility function to convert ipv4 netmask to prefixes
1422 ex.) "1.1.0.0" "255.255.0.0" => "1.1.0.0/16"
1423 ex.) "1.0.0.0" NULL => "1.0.0.0/8" */
1424 int netmask_str2prefix_str(const char *net_str, const char *mask_str,
1425 char *prefix_str)
1426 {
1427 struct in_addr network;
1428 struct in_addr mask;
1429 uint8_t prefixlen;
1430 uint32_t destination;
1431 int ret;
1432
1433 ret = inet_aton(net_str, &network);
1434 if (!ret)
1435 return 0;
1436
1437 if (mask_str) {
1438 ret = inet_aton(mask_str, &mask);
1439 if (!ret)
1440 return 0;
1441
1442 prefixlen = ip_masklen(mask);
1443 } else {
1444 destination = ntohl(network.s_addr);
1445
1446 if (network.s_addr == 0)
1447 prefixlen = 0;
1448 else if (IN_CLASSC(destination))
1449 prefixlen = 24;
1450 else if (IN_CLASSB(destination))
1451 prefixlen = 16;
1452 else if (IN_CLASSA(destination))
1453 prefixlen = 8;
1454 else
1455 return 0;
1456 }
1457
1458 sprintf(prefix_str, "%s/%d", net_str, prefixlen);
1459
1460 return 1;
1461 }
1462
1463 /* Utility function for making IPv6 address string. */
1464 const char *inet6_ntoa(struct in6_addr addr)
1465 {
1466 static char buf[INET6_ADDRSTRLEN];
1467
1468 inet_ntop(AF_INET6, &addr, buf, INET6_ADDRSTRLEN);
1469 return buf;
1470 }
1471
1472 /* converts to internal representation of mac address
1473 * returns 1 on success, 0 otherwise
1474 * format accepted: AA:BB:CC:DD:EE:FF
1475 * if mac parameter is null, then check only
1476 */
1477 int prefix_str2mac(const char *str, struct ethaddr *mac)
1478 {
1479 unsigned int a[6];
1480 int i;
1481
1482 if (!str)
1483 return 0;
1484
1485 if (sscanf(str, "%2x:%2x:%2x:%2x:%2x:%2x", a + 0, a + 1, a + 2, a + 3,
1486 a + 4, a + 5)
1487 != 6) {
1488 /* error in incoming str length */
1489 return 0;
1490 }
1491 /* valid mac address */
1492 if (!mac)
1493 return 1;
1494 for (i = 0; i < 6; ++i)
1495 mac->octet[i] = a[i] & 0xff;
1496 return 1;
1497 }
1498
1499 char *prefix_mac2str(const struct ethaddr *mac, char *buf, int size)
1500 {
1501 char *ptr;
1502
1503 if (!mac)
1504 return NULL;
1505 if (!buf)
1506 ptr = (char *)XMALLOC(MTYPE_TMP,
1507 ETHER_ADDR_STRLEN * sizeof(char));
1508 else {
1509 assert(size >= ETHER_ADDR_STRLEN);
1510 ptr = buf;
1511 }
1512 snprintf(ptr, (ETHER_ADDR_STRLEN), "%02x:%02x:%02x:%02x:%02x:%02x",
1513 (uint8_t)mac->octet[0], (uint8_t)mac->octet[1],
1514 (uint8_t)mac->octet[2], (uint8_t)mac->octet[3],
1515 (uint8_t)mac->octet[4], (uint8_t)mac->octet[5]);
1516 return ptr;
1517 }
1518
1519 unsigned prefix_hash_key(void *pp)
1520 {
1521 struct prefix copy;
1522
1523 if (((struct prefix *)pp)->family == AF_FLOWSPEC) {
1524 uint32_t len;
1525 void *temp;
1526
1527 /* make sure *all* unused bits are zero,
1528 * particularly including alignment /
1529 * padding and unused prefix bytes.
1530 */
1531 memset(&copy, 0, sizeof(copy));
1532 prefix_copy(&copy, (struct prefix *)pp);
1533 len = jhash((void *)copy.u.prefix_flowspec.ptr,
1534 copy.u.prefix_flowspec.prefixlen,
1535 0x55aa5a5a);
1536 temp = (void *)copy.u.prefix_flowspec.ptr;
1537 XFREE(MTYPE_PREFIX_FLOWSPEC, temp);
1538 copy.u.prefix_flowspec.ptr = (uintptr_t)NULL;
1539 return len;
1540 }
1541 /* make sure *all* unused bits are zero, particularly including
1542 * alignment /
1543 * padding and unused prefix bytes. */
1544 memset(&copy, 0, sizeof(copy));
1545 prefix_copy(&copy, (struct prefix *)pp);
1546 return jhash(&copy,
1547 offsetof(struct prefix, u.prefix) + PSIZE(copy.prefixlen),
1548 0x55aa5a5a);
1549 }
1550
1551 /* converts to internal representation of esi
1552 * returns 1 on success, 0 otherwise
1553 * format accepted: aa:aa:aa:aa:aa:aa:aa:aa:aa:aa
1554 * if esi parameter is null, then check only
1555 */
1556 int str_to_esi(const char *str, esi_t *esi)
1557 {
1558 int i;
1559 unsigned int a[ESI_BYTES];
1560
1561 if (!str)
1562 return 0;
1563
1564 if (sscanf(str, "%2x:%2x:%2x:%2x:%2x:%2x:%2x:%2x:%2x:%2x",
1565 a + 0, a + 1, a + 2, a + 3,
1566 a + 4, a + 5, a + 6, a + 7,
1567 a + 8, a + 9)
1568 != ESI_BYTES) {
1569 /* error in incoming str length */
1570 return 0;
1571 }
1572
1573 /* valid ESI */
1574 if (!esi)
1575 return 1;
1576 for (i = 0; i < ESI_BYTES; ++i)
1577 esi->val[i] = a[i] & 0xff;
1578 return 1;
1579 }
1580
1581 char *esi_to_str(const esi_t *esi, char *buf, int size)
1582 {
1583 char *ptr;
1584
1585 if (!esi)
1586 return NULL;
1587 if (!buf)
1588 ptr = (char *)XMALLOC(MTYPE_TMP,
1589 ESI_STR_LEN * sizeof(char));
1590 else {
1591 assert(size >= ESI_STR_LEN);
1592 ptr = buf;
1593 }
1594
1595 snprintf(ptr, ESI_STR_LEN,
1596 "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
1597 esi->val[0], esi->val[1], esi->val[2],
1598 esi->val[3], esi->val[4], esi->val[5],
1599 esi->val[6], esi->val[7], esi->val[8],
1600 esi->val[9]);
1601 return ptr;
1602 }