]>
Commit | Line | Data |
---|---|---|
718e3744 | 1 | /* Community attribute related functions. |
896014f4 DL |
2 | * Copyright (C) 1998, 2001 Kunihiro Ishiguro |
3 | * | |
4 | * This file is part of GNU Zebra. | |
5 | * | |
6 | * GNU Zebra is free software; you can redistribute it and/or modify it | |
7 | * under the terms of the GNU General Public License as published by the | |
8 | * Free Software Foundation; either version 2, or (at your option) any | |
9 | * later version. | |
10 | * | |
11 | * GNU Zebra is distributed in the hope that it will be useful, but | |
12 | * WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 | * General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU General Public License along | |
17 | * with this program; see the file COPYING; if not, write to the Free Software | |
18 | * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA | |
19 | */ | |
718e3744 | 20 | |
21 | #include <zebra.h> | |
22 | ||
4dcadbef | 23 | #include "command.h" |
718e3744 | 24 | #include "hash.h" |
25 | #include "memory.h" | |
3f65c5b1 | 26 | #include "jhash.h" |
0e8916e0 | 27 | #include "frrstr.h" |
718e3744 | 28 | |
4a1ab8e4 | 29 | #include "bgpd/bgp_memory.h" |
718e3744 | 30 | #include "bgpd/bgp_community.h" |
ed0e57e3 | 31 | #include "bgpd/bgp_community_alias.h" |
718e3744 | 32 | |
33 | /* Hash of community attribute. */ | |
730394d9 | 34 | static struct hash *comhash; |
718e3744 | 35 | |
36 | /* Allocate a new communities value. */ | |
d62a17ae | 37 | static struct community *community_new(void) |
718e3744 | 38 | { |
9f5dc319 | 39 | return XCALLOC(MTYPE_COMMUNITY, sizeof(struct community)); |
718e3744 | 40 | } |
41 | ||
42 | /* Free communities value. */ | |
3c1f53de | 43 | void community_free(struct community **com) |
718e3744 | 44 | { |
2c15754e JC |
45 | if (!(*com)) |
46 | return; | |
47 | ||
0a22ddfb QY |
48 | XFREE(MTYPE_COMMUNITY_VAL, (*com)->val); |
49 | XFREE(MTYPE_COMMUNITY_STR, (*com)->str); | |
3c1f53de SMS |
50 | |
51 | if ((*com)->json) { | |
52 | json_object_free((*com)->json); | |
53 | (*com)->json = NULL; | |
d62a17ae | 54 | } |
55 | ||
3c1f53de | 56 | XFREE(MTYPE_COMMUNITY, (*com)); |
718e3744 | 57 | } |
58 | ||
59 | /* Add one community value to the community. */ | |
2721dd61 | 60 | void community_add_val(struct community *com, uint32_t val) |
718e3744 | 61 | { |
d62a17ae | 62 | com->size++; |
0b04fa0e | 63 | com->val = XREALLOC(MTYPE_COMMUNITY_VAL, com->val, com_length(com)); |
d62a17ae | 64 | |
65 | val = htonl(val); | |
d7c0a89a | 66 | memcpy(com_lastval(com), &val, sizeof(uint32_t)); |
718e3744 | 67 | } |
68 | ||
69 | /* Delete one community. */ | |
d7c0a89a | 70 | void community_del_val(struct community *com, uint32_t *val) |
718e3744 | 71 | { |
d62a17ae | 72 | int i = 0; |
73 | int c = 0; | |
74 | ||
75 | if (!com->val) | |
76 | return; | |
77 | ||
78 | while (i < com->size) { | |
d7c0a89a | 79 | if (memcmp(com->val + i, val, sizeof(uint32_t)) == 0) { |
d62a17ae | 80 | c = com->size - i - 1; |
81 | ||
82 | if (c > 0) | |
83 | memmove(com->val + i, com->val + (i + 1), | |
84 | c * sizeof(*val)); | |
85 | ||
86 | com->size--; | |
87 | ||
88 | if (com->size > 0) | |
89 | com->val = XREALLOC(MTYPE_COMMUNITY_VAL, | |
90 | com->val, com_length(com)); | |
91 | else { | |
92 | XFREE(MTYPE_COMMUNITY_VAL, com->val); | |
d62a17ae | 93 | } |
94 | return; | |
95 | } | |
96 | i++; | |
718e3744 | 97 | } |
718e3744 | 98 | } |
99 | ||
100 | /* Delete all communities listed in com2 from com1 */ | |
d62a17ae | 101 | struct community *community_delete(struct community *com1, |
102 | struct community *com2) | |
718e3744 | 103 | { |
d62a17ae | 104 | int i = 0; |
718e3744 | 105 | |
d62a17ae | 106 | while (i < com2->size) { |
107 | community_del_val(com1, com2->val + i); | |
108 | i++; | |
109 | } | |
718e3744 | 110 | |
d62a17ae | 111 | return com1; |
718e3744 | 112 | } |
113 | ||
114 | /* Callback function from qsort(). */ | |
d62a17ae | 115 | static int community_compare(const void *a1, const void *a2) |
718e3744 | 116 | { |
d7c0a89a QY |
117 | uint32_t v1; |
118 | uint32_t v2; | |
d62a17ae | 119 | |
d7c0a89a QY |
120 | memcpy(&v1, a1, sizeof(uint32_t)); |
121 | memcpy(&v2, a2, sizeof(uint32_t)); | |
d62a17ae | 122 | v1 = ntohl(v1); |
123 | v2 = ntohl(v2); | |
124 | ||
125 | if (v1 < v2) | |
126 | return -1; | |
127 | if (v1 > v2) | |
128 | return 1; | |
129 | return 0; | |
718e3744 | 130 | } |
131 | ||
3dc339cd | 132 | bool community_include(struct community *com, uint32_t val) |
718e3744 | 133 | { |
d62a17ae | 134 | int i; |
718e3744 | 135 | |
d62a17ae | 136 | val = htonl(val); |
718e3744 | 137 | |
d62a17ae | 138 | for (i = 0; i < com->size; i++) |
d7c0a89a | 139 | if (memcmp(&val, com_nthval(com, i), sizeof(uint32_t)) == 0) |
3dc339cd DA |
140 | return true; |
141 | return false; | |
718e3744 | 142 | } |
143 | ||
d7c0a89a | 144 | uint32_t community_val_get(struct community *com, int i) |
718e3744 | 145 | { |
d7c0a89a QY |
146 | uint8_t *p; |
147 | uint32_t val; | |
718e3744 | 148 | |
d7c0a89a | 149 | p = (uint8_t *)com->val; |
11400e73 | 150 | p += (i * COMMUNITY_SIZE); |
718e3744 | 151 | |
d7c0a89a | 152 | memcpy(&val, p, sizeof(uint32_t)); |
718e3744 | 153 | |
d62a17ae | 154 | return ntohl(val); |
718e3744 | 155 | } |
156 | ||
157 | /* Sort and uniq given community. */ | |
d62a17ae | 158 | struct community *community_uniq_sort(struct community *com) |
718e3744 | 159 | { |
d62a17ae | 160 | int i; |
161 | struct community *new; | |
d7c0a89a | 162 | uint32_t val; |
d62a17ae | 163 | |
164 | if (!com) | |
165 | return NULL; | |
166 | ||
167 | new = community_new(); | |
d62a17ae | 168 | new->json = NULL; |
169 | ||
170 | for (i = 0; i < com->size; i++) { | |
171 | val = community_val_get(com, i); | |
172 | ||
173 | if (!community_include(new, val)) | |
174 | community_add_val(new, val); | |
175 | } | |
176 | ||
d7c0a89a | 177 | qsort(new->val, new->size, sizeof(uint32_t), community_compare); |
d62a17ae | 178 | |
179 | return new; | |
718e3744 | 180 | } |
181 | ||
182 | /* Convert communities attribute to string. | |
183 | ||
184 | For Well-known communities value, below keyword is used. | |
185 | ||
d62a17ae | 186 | 0x0 "internet" |
aa861c10 C |
187 | 0xFFFF0000 "graceful-shutdown" |
188 | 0xFFFF0001 "accept-own" | |
189 | 0xFFFF0002 "route-filter-translated-v4" | |
190 | 0xFFFF0003 "route-filter-v4" | |
191 | 0xFFFF0004 "route-filter-translated-v6" | |
192 | 0xFFFF0005 "route-filter-v6" | |
193 | 0xFFFF0006 "llgr-stale" | |
194 | 0xFFFF0007 "no-llgr" | |
195 | 0xFFFF0008 "accept-own-nexthop" | |
196 | 0xFFFF029A "blackhole" | |
718e3744 | 197 | 0xFFFFFF01 "no-export" |
198 | 0xFFFFFF02 "no-advertise" | |
199 | 0xFFFFFF03 "local-AS" | |
aa861c10 | 200 | 0xFFFFFF04 "no-peer" |
718e3744 | 201 | |
202 | For other values, "AS:VAL" format is used. */ | |
a69ea8ae | 203 | static void set_community_string(struct community *com, bool make_json) |
718e3744 | 204 | { |
d62a17ae | 205 | int i; |
206 | char *str; | |
d62a17ae | 207 | int len; |
208 | int first; | |
d7c0a89a QY |
209 | uint32_t comval; |
210 | uint16_t as; | |
211 | uint16_t val; | |
d62a17ae | 212 | json_object *json_community_list = NULL; |
213 | json_object *json_string = NULL; | |
214 | ||
215 | if (!com) | |
216 | return; | |
217 | ||
a69ea8ae DS |
218 | if (make_json) { |
219 | com->json = json_object_new_object(); | |
220 | json_community_list = json_object_new_array(); | |
221 | } | |
d62a17ae | 222 | |
223 | /* When communities attribute is empty. */ | |
224 | if (com->size == 0) { | |
225 | str = XMALLOC(MTYPE_COMMUNITY_STR, 1); | |
226 | str[0] = '\0'; | |
227 | ||
a69ea8ae DS |
228 | if (make_json) { |
229 | json_object_string_add(com->json, "string", ""); | |
996c9314 LB |
230 | json_object_object_add(com->json, "list", |
231 | json_community_list); | |
a69ea8ae | 232 | } |
d62a17ae | 233 | com->str = str; |
234 | return; | |
718e3744 | 235 | } |
d62a17ae | 236 | |
237 | /* Memory allocation is time consuming work. So we calculate | |
238 | required string length first. */ | |
239 | len = 0; | |
240 | ||
241 | for (i = 0; i < com->size; i++) { | |
d7c0a89a | 242 | memcpy(&comval, com_nthval(com, i), sizeof(uint32_t)); |
d62a17ae | 243 | comval = ntohl(comval); |
244 | ||
245 | switch (comval) { | |
246 | case COMMUNITY_INTERNET: | |
247 | len += strlen(" internet"); | |
248 | break; | |
aa861c10 C |
249 | case COMMUNITY_GSHUT: |
250 | len += strlen(" graceful-shutdown"); | |
251 | break; | |
252 | case COMMUNITY_ACCEPT_OWN: | |
253 | len += strlen(" accept-own"); | |
254 | break; | |
255 | case COMMUNITY_ROUTE_FILTER_TRANSLATED_v4: | |
256 | len += strlen(" route-filter-translated-v4"); | |
257 | break; | |
258 | case COMMUNITY_ROUTE_FILTER_v4: | |
259 | len += strlen(" route-filter-v4"); | |
260 | break; | |
261 | case COMMUNITY_ROUTE_FILTER_TRANSLATED_v6: | |
262 | len += strlen(" route-filter-translated-v6"); | |
263 | break; | |
264 | case COMMUNITY_ROUTE_FILTER_v6: | |
265 | len += strlen(" route-filter-v6"); | |
266 | break; | |
267 | case COMMUNITY_LLGR_STALE: | |
268 | len += strlen(" llgr-stale"); | |
269 | break; | |
270 | case COMMUNITY_NO_LLGR: | |
271 | len += strlen(" no-llgr"); | |
272 | break; | |
273 | case COMMUNITY_ACCEPT_OWN_NEXTHOP: | |
274 | len += strlen(" accept-own-nexthop"); | |
275 | break; | |
276 | case COMMUNITY_BLACKHOLE: | |
277 | len += strlen(" blackhole"); | |
278 | break; | |
d62a17ae | 279 | case COMMUNITY_NO_EXPORT: |
280 | len += strlen(" no-export"); | |
281 | break; | |
282 | case COMMUNITY_NO_ADVERTISE: | |
283 | len += strlen(" no-advertise"); | |
284 | break; | |
285 | case COMMUNITY_LOCAL_AS: | |
286 | len += strlen(" local-AS"); | |
287 | break; | |
aa861c10 C |
288 | case COMMUNITY_NO_PEER: |
289 | len += strlen(" no-peer"); | |
7f323236 | 290 | break; |
d62a17ae | 291 | default: |
ed0e57e3 | 292 | len = BUFSIZ; |
d62a17ae | 293 | break; |
294 | } | |
295 | } | |
296 | ||
297 | /* Allocate memory. */ | |
f9bff3be | 298 | str = XCALLOC(MTYPE_COMMUNITY_STR, len); |
d62a17ae | 299 | first = 1; |
300 | ||
301 | /* Fill in string. */ | |
302 | for (i = 0; i < com->size; i++) { | |
d7c0a89a | 303 | memcpy(&comval, com_nthval(com, i), sizeof(uint32_t)); |
d62a17ae | 304 | comval = ntohl(comval); |
305 | ||
306 | if (first) | |
307 | first = 0; | |
308 | else | |
552d6491 | 309 | strlcat(str, " ", len); |
d62a17ae | 310 | |
311 | switch (comval) { | |
312 | case COMMUNITY_INTERNET: | |
552d6491 | 313 | strlcat(str, "internet", len); |
a69ea8ae | 314 | if (make_json) { |
996c9314 LB |
315 | json_string = |
316 | json_object_new_string("internet"); | |
317 | json_object_array_add(json_community_list, | |
318 | json_string); | |
a69ea8ae | 319 | } |
d62a17ae | 320 | break; |
aa861c10 | 321 | case COMMUNITY_GSHUT: |
6e0b62b4 | 322 | strlcat(str, "graceful-shutdown", len); |
aa861c10 C |
323 | if (make_json) { |
324 | json_string = json_object_new_string( | |
325 | "gracefulShutdown"); | |
326 | json_object_array_add(json_community_list, | |
327 | json_string); | |
328 | } | |
329 | break; | |
330 | case COMMUNITY_ACCEPT_OWN: | |
6e0b62b4 | 331 | strlcat(str, "accept-own", len); |
aa861c10 C |
332 | if (make_json) { |
333 | json_string = json_object_new_string( | |
334 | "acceptown"); | |
335 | json_object_array_add(json_community_list, | |
336 | json_string); | |
337 | } | |
338 | break; | |
339 | case COMMUNITY_ROUTE_FILTER_TRANSLATED_v4: | |
6e0b62b4 | 340 | strlcat(str, "route-filter-translated-v4", len); |
aa861c10 C |
341 | if (make_json) { |
342 | json_string = json_object_new_string( | |
343 | "routeFilterTranslatedV4"); | |
344 | json_object_array_add(json_community_list, | |
345 | json_string); | |
346 | } | |
347 | break; | |
348 | case COMMUNITY_ROUTE_FILTER_v4: | |
6e0b62b4 | 349 | strlcat(str, "route-filter-v4", len); |
aa861c10 C |
350 | if (make_json) { |
351 | json_string = json_object_new_string( | |
352 | "routeFilterV4"); | |
353 | json_object_array_add(json_community_list, | |
354 | json_string); | |
355 | } | |
356 | break; | |
357 | case COMMUNITY_ROUTE_FILTER_TRANSLATED_v6: | |
6e0b62b4 | 358 | strlcat(str, "route-filter-translated-v6", len); |
aa861c10 C |
359 | if (make_json) { |
360 | json_string = json_object_new_string( | |
361 | "routeFilterTranslatedV6"); | |
362 | json_object_array_add(json_community_list, | |
363 | json_string); | |
364 | } | |
365 | break; | |
366 | case COMMUNITY_ROUTE_FILTER_v6: | |
6e0b62b4 | 367 | strlcat(str, "route-filter-v6", len); |
aa861c10 C |
368 | if (make_json) { |
369 | json_string = json_object_new_string( | |
370 | "routeFilterV6"); | |
371 | json_object_array_add(json_community_list, | |
372 | json_string); | |
373 | } | |
374 | break; | |
375 | case COMMUNITY_LLGR_STALE: | |
6e0b62b4 | 376 | strlcat(str, "llgr-stale", len); |
aa861c10 C |
377 | if (make_json) { |
378 | json_string = json_object_new_string( | |
379 | "llgrStale"); | |
380 | json_object_array_add(json_community_list, | |
381 | json_string); | |
382 | } | |
383 | break; | |
384 | case COMMUNITY_NO_LLGR: | |
6e0b62b4 | 385 | strlcat(str, "no-llgr", len); |
aa861c10 C |
386 | if (make_json) { |
387 | json_string = json_object_new_string( | |
388 | "noLlgr"); | |
389 | json_object_array_add(json_community_list, | |
390 | json_string); | |
391 | } | |
392 | break; | |
393 | case COMMUNITY_ACCEPT_OWN_NEXTHOP: | |
6e0b62b4 | 394 | strlcat(str, "accept-own-nexthop", len); |
aa861c10 C |
395 | if (make_json) { |
396 | json_string = json_object_new_string( | |
397 | "acceptownnexthop"); | |
398 | json_object_array_add(json_community_list, | |
399 | json_string); | |
400 | } | |
401 | break; | |
402 | case COMMUNITY_BLACKHOLE: | |
6e0b62b4 | 403 | strlcat(str, "blackhole", len); |
aa861c10 C |
404 | if (make_json) { |
405 | json_string = json_object_new_string( | |
406 | "blackhole"); | |
407 | json_object_array_add(json_community_list, | |
408 | json_string); | |
409 | } | |
410 | break; | |
d62a17ae | 411 | case COMMUNITY_NO_EXPORT: |
6e0b62b4 | 412 | strlcat(str, "no-export", len); |
a69ea8ae | 413 | if (make_json) { |
996c9314 LB |
414 | json_string = |
415 | json_object_new_string("noExport"); | |
416 | json_object_array_add(json_community_list, | |
417 | json_string); | |
a69ea8ae | 418 | } |
d62a17ae | 419 | break; |
420 | case COMMUNITY_NO_ADVERTISE: | |
6e0b62b4 | 421 | strlcat(str, "no-advertise", len); |
a69ea8ae | 422 | if (make_json) { |
996c9314 LB |
423 | json_string = |
424 | json_object_new_string("noAdvertise"); | |
425 | json_object_array_add(json_community_list, | |
426 | json_string); | |
a69ea8ae | 427 | } |
d62a17ae | 428 | break; |
429 | case COMMUNITY_LOCAL_AS: | |
6e0b62b4 | 430 | strlcat(str, "local-AS", len); |
a69ea8ae DS |
431 | if (make_json) { |
432 | json_string = json_object_new_string("localAs"); | |
996c9314 LB |
433 | json_object_array_add(json_community_list, |
434 | json_string); | |
a69ea8ae | 435 | } |
d62a17ae | 436 | break; |
aa861c10 | 437 | case COMMUNITY_NO_PEER: |
6e0b62b4 | 438 | strlcat(str, "no-peer", len); |
a69ea8ae | 439 | if (make_json) { |
aa861c10 | 440 | json_string = json_object_new_string("noPeer"); |
996c9314 LB |
441 | json_object_array_add(json_community_list, |
442 | json_string); | |
a69ea8ae | 443 | } |
7f323236 | 444 | break; |
d62a17ae | 445 | default: |
446 | as = (comval >> 16) & 0xFFFF; | |
447 | val = comval & 0xFFFF; | |
6e0b62b4 QY |
448 | char buf[32]; |
449 | snprintf(buf, sizeof(buf), "%u:%d", as, val); | |
d95a84e0 DA |
450 | const char *com2alias = bgp_community2alias(buf); |
451 | ||
452 | strlcat(str, com2alias, len); | |
a69ea8ae | 453 | if (make_json) { |
d95a84e0 | 454 | json_string = json_object_new_string(com2alias); |
996c9314 LB |
455 | json_object_array_add(json_community_list, |
456 | json_string); | |
a69ea8ae | 457 | } |
d62a17ae | 458 | break; |
459 | } | |
718e3744 | 460 | } |
718e3744 | 461 | |
a69ea8ae DS |
462 | if (make_json) { |
463 | json_object_string_add(com->json, "string", str); | |
464 | json_object_object_add(com->json, "list", json_community_list); | |
465 | } | |
d62a17ae | 466 | com->str = str; |
718e3744 | 467 | } |
468 | ||
469 | /* Intern communities attribute. */ | |
d62a17ae | 470 | struct community *community_intern(struct community *com) |
718e3744 | 471 | { |
d62a17ae | 472 | struct community *find; |
718e3744 | 473 | |
d62a17ae | 474 | /* Assert this community structure is not interned. */ |
475 | assert(com->refcnt == 0); | |
718e3744 | 476 | |
d62a17ae | 477 | /* Lookup community hash. */ |
478 | find = (struct community *)hash_get(comhash, com, hash_alloc_intern); | |
718e3744 | 479 | |
d62a17ae | 480 | /* Arguemnt com is allocated temporary. So when it is not used in |
481 | hash, it should be freed. */ | |
482 | if (find != com) | |
3c1f53de | 483 | community_free(&com); |
718e3744 | 484 | |
d62a17ae | 485 | /* Increment refrence counter. */ |
486 | find->refcnt++; | |
718e3744 | 487 | |
d62a17ae | 488 | /* Make string. */ |
489 | if (!find->str) | |
a69ea8ae | 490 | set_community_string(find, false); |
718e3744 | 491 | |
d62a17ae | 492 | return find; |
718e3744 | 493 | } |
494 | ||
495 | /* Free community attribute. */ | |
d62a17ae | 496 | void community_unintern(struct community **com) |
718e3744 | 497 | { |
d62a17ae | 498 | struct community *ret; |
718e3744 | 499 | |
d62a17ae | 500 | if ((*com)->refcnt) |
501 | (*com)->refcnt--; | |
718e3744 | 502 | |
d62a17ae | 503 | /* Pull off from hash. */ |
504 | if ((*com)->refcnt == 0) { | |
505 | /* Community value com must exist in hash. */ | |
506 | ret = (struct community *)hash_release(comhash, *com); | |
507 | assert(ret != NULL); | |
718e3744 | 508 | |
3c1f53de | 509 | community_free(com); |
d62a17ae | 510 | } |
718e3744 | 511 | } |
512 | ||
513 | /* Create new community attribute. */ | |
d7c0a89a | 514 | struct community *community_parse(uint32_t *pnt, unsigned short length) |
718e3744 | 515 | { |
d62a17ae | 516 | struct community tmp; |
517 | struct community *new; | |
718e3744 | 518 | |
d62a17ae | 519 | /* If length is malformed return NULL. */ |
11400e73 | 520 | if (length % COMMUNITY_SIZE) |
d62a17ae | 521 | return NULL; |
718e3744 | 522 | |
d62a17ae | 523 | /* Make temporary community for hash look up. */ |
11400e73 | 524 | tmp.size = length / COMMUNITY_SIZE; |
d62a17ae | 525 | tmp.val = pnt; |
718e3744 | 526 | |
d62a17ae | 527 | new = community_uniq_sort(&tmp); |
718e3744 | 528 | |
d62a17ae | 529 | return community_intern(new); |
718e3744 | 530 | } |
531 | ||
d62a17ae | 532 | struct community *community_dup(struct community *com) |
718e3744 | 533 | { |
d62a17ae | 534 | struct community *new; |
535 | ||
536 | new = XCALLOC(MTYPE_COMMUNITY, sizeof(struct community)); | |
537 | new->size = com->size; | |
538 | if (new->size) { | |
11400e73 DA |
539 | new->val = XMALLOC(MTYPE_COMMUNITY_VAL, |
540 | com->size * COMMUNITY_SIZE); | |
541 | memcpy(new->val, com->val, com->size * COMMUNITY_SIZE); | |
d62a17ae | 542 | } else |
543 | new->val = NULL; | |
544 | return new; | |
718e3744 | 545 | } |
546 | ||
639caccf | 547 | /* Return string representation of communities attribute. */ |
a69ea8ae | 548 | char *community_str(struct community *com, bool make_json) |
718e3744 | 549 | { |
d62a17ae | 550 | if (!com) |
551 | return NULL; | |
f1aa5d8a | 552 | |
a69ea8ae DS |
553 | if (make_json && !com->json && com->str) |
554 | XFREE(MTYPE_COMMUNITY_STR, com->str); | |
555 | ||
d62a17ae | 556 | if (!com->str) |
a69ea8ae | 557 | set_community_string(com, make_json); |
d62a17ae | 558 | return com->str; |
718e3744 | 559 | } |
560 | ||
561 | /* Make hash value of community attribute. This function is used by | |
562 | hash package.*/ | |
d8b87afe | 563 | unsigned int community_hash_make(const struct community *com) |
718e3744 | 564 | { |
c4efd0f4 | 565 | uint32_t *pnt = com->val; |
d62a17ae | 566 | |
3f65c5b1 | 567 | return jhash2(pnt, com->size, 0x43ea96c1); |
718e3744 | 568 | } |
569 | ||
3dc339cd | 570 | bool community_match(const struct community *com1, const struct community *com2) |
718e3744 | 571 | { |
d62a17ae | 572 | int i = 0; |
573 | int j = 0; | |
574 | ||
575 | if (com1 == NULL && com2 == NULL) | |
3dc339cd | 576 | return true; |
d62a17ae | 577 | |
578 | if (com1 == NULL || com2 == NULL) | |
3dc339cd | 579 | return false; |
d62a17ae | 580 | |
581 | if (com1->size < com2->size) | |
3dc339cd | 582 | return false; |
d62a17ae | 583 | |
584 | /* Every community on com2 needs to be on com1 for this to match */ | |
585 | while (i < com1->size && j < com2->size) { | |
d7c0a89a | 586 | if (memcmp(com1->val + i, com2->val + j, sizeof(uint32_t)) == 0) |
d62a17ae | 587 | j++; |
588 | i++; | |
589 | } | |
590 | ||
591 | if (j == com2->size) | |
3dc339cd | 592 | return true; |
d62a17ae | 593 | else |
3dc339cd | 594 | return false; |
718e3744 | 595 | } |
596 | ||
74df8d6d | 597 | bool community_cmp(const struct community *com1, const struct community *com2) |
718e3744 | 598 | { |
d62a17ae | 599 | if (com1 == NULL && com2 == NULL) |
74df8d6d | 600 | return true; |
d62a17ae | 601 | if (com1 == NULL || com2 == NULL) |
74df8d6d | 602 | return false; |
d62a17ae | 603 | |
604 | if (com1->size == com2->size) | |
11400e73 DA |
605 | if (memcmp(com1->val, com2->val, com1->size * COMMUNITY_SIZE) |
606 | == 0) | |
74df8d6d DS |
607 | return true; |
608 | return false; | |
718e3744 | 609 | } |
610 | ||
611 | /* Add com2 to the end of com1. */ | |
d62a17ae | 612 | struct community *community_merge(struct community *com1, |
613 | struct community *com2) | |
718e3744 | 614 | { |
0b04fa0e DS |
615 | com1->val = XREALLOC(MTYPE_COMMUNITY_VAL, com1->val, |
616 | (com1->size + com2->size) * COMMUNITY_SIZE); | |
718e3744 | 617 | |
11400e73 | 618 | memcpy(com1->val + com1->size, com2->val, com2->size * COMMUNITY_SIZE); |
d62a17ae | 619 | com1->size += com2->size; |
718e3744 | 620 | |
d62a17ae | 621 | return com1; |
718e3744 | 622 | } |
623 | ||
624 | /* Community token enum. */ | |
d62a17ae | 625 | enum community_token { |
626 | community_token_val, | |
aa861c10 C |
627 | community_token_gshut, |
628 | community_token_accept_own, | |
629 | community_token_route_filter_translated_v4, | |
630 | community_token_route_filter_v4, | |
631 | community_token_route_filter_translated_v6, | |
632 | community_token_route_filter_v6, | |
633 | community_token_llgr_stale, | |
634 | community_token_no_llgr, | |
635 | community_token_accept_own_nexthop, | |
636 | community_token_blackhole, | |
d62a17ae | 637 | community_token_no_export, |
638 | community_token_no_advertise, | |
639 | community_token_local_as, | |
aa861c10 | 640 | community_token_no_peer, |
d62a17ae | 641 | community_token_unknown |
718e3744 | 642 | }; |
643 | ||
0e8916e0 DA |
644 | /* Helper to check if a given community is valid */ |
645 | static bool community_valid(const char *community) | |
646 | { | |
647 | int octets = 0; | |
648 | char **splits; | |
649 | int num; | |
650 | int invalid = 0; | |
651 | ||
652 | frrstr_split(community, ":", &splits, &num); | |
653 | ||
654 | for (int i = 0; i < num; i++) { | |
655 | if (strtoul(splits[i], NULL, 10) > UINT16_MAX) | |
656 | invalid++; | |
657 | ||
658 | if (strlen(splits[i]) == 0) | |
659 | invalid++; | |
660 | ||
661 | octets++; | |
662 | XFREE(MTYPE_TMP, splits[i]); | |
663 | } | |
664 | XFREE(MTYPE_TMP, splits); | |
665 | ||
666 | return (octets < 2 || invalid) ? false : true; | |
667 | } | |
668 | ||
718e3744 | 669 | /* Get next community token from string. */ |
94f2b392 | 670 | static const char * |
d7c0a89a | 671 | community_gettoken(const char *buf, enum community_token *token, uint32_t *val) |
718e3744 | 672 | { |
d62a17ae | 673 | const char *p = buf; |
674 | ||
675 | /* Skip white space. */ | |
fefa5e0f | 676 | while (isspace((unsigned char)*p)) |
d62a17ae | 677 | p++; |
678 | ||
679 | /* Check the end of the line. */ | |
680 | if (*p == '\0') | |
681 | return NULL; | |
682 | ||
683 | /* Well known community string check. */ | |
fefa5e0f | 684 | if (isalpha((unsigned char)*p)) { |
d62a17ae | 685 | if (strncmp(p, "internet", strlen("internet")) == 0) { |
686 | *val = COMMUNITY_INTERNET; | |
687 | *token = community_token_no_export; | |
688 | p += strlen("internet"); | |
689 | return p; | |
690 | } | |
aa861c10 C |
691 | if (strncmp(p, "graceful-shutdown", strlen("graceful-shutdown")) |
692 | == 0) { | |
693 | *val = COMMUNITY_GSHUT; | |
694 | *token = community_token_gshut; | |
695 | p += strlen("graceful-shutdown"); | |
696 | return p; | |
697 | } | |
68f36a94 AJ |
698 | if (strncmp(p, "accept-own-nexthop", |
699 | strlen("accept-own-nexthop")) | |
700 | == 0) { | |
701 | *val = COMMUNITY_ACCEPT_OWN_NEXTHOP; | |
702 | *token = community_token_accept_own_nexthop; | |
703 | p += strlen("accept-own-nexthop"); | |
704 | return p; | |
705 | } | |
aa861c10 C |
706 | if (strncmp(p, "accept-own", strlen("accept-own")) |
707 | == 0) { | |
708 | *val = COMMUNITY_ACCEPT_OWN; | |
709 | *token = community_token_accept_own; | |
710 | p += strlen("accept-own"); | |
711 | return p; | |
712 | } | |
713 | if (strncmp(p, "route-filter-translated-v4", | |
714 | strlen("route-filter-translated-v4")) | |
715 | == 0) { | |
716 | *val = COMMUNITY_ROUTE_FILTER_TRANSLATED_v4; | |
717 | *token = community_token_route_filter_translated_v4; | |
718 | p += strlen("route-filter-translated-v4"); | |
719 | return p; | |
720 | } | |
721 | if (strncmp(p, "route-filter-v4", strlen("route-filter-v4")) | |
722 | == 0) { | |
723 | *val = COMMUNITY_ROUTE_FILTER_v4; | |
724 | *token = community_token_route_filter_v4; | |
725 | p += strlen("route-filter-v4"); | |
726 | return p; | |
727 | } | |
728 | if (strncmp(p, "route-filter-translated-v6", | |
729 | strlen("route-filter-translated-v6")) | |
730 | == 0) { | |
731 | *val = COMMUNITY_ROUTE_FILTER_TRANSLATED_v6; | |
732 | *token = community_token_route_filter_translated_v6; | |
733 | p += strlen("route-filter-translated-v6"); | |
734 | return p; | |
735 | } | |
736 | if (strncmp(p, "route-filter-v6", strlen("route-filter-v6")) | |
737 | == 0) { | |
738 | *val = COMMUNITY_ROUTE_FILTER_v6; | |
739 | *token = community_token_route_filter_v6; | |
740 | p += strlen("route-filter-v6"); | |
741 | return p; | |
742 | } | |
743 | if (strncmp(p, "llgr-stale", strlen("llgr-stale")) | |
744 | == 0) { | |
745 | *val = COMMUNITY_LLGR_STALE; | |
746 | *token = community_token_llgr_stale; | |
747 | p += strlen("llgr-stale"); | |
748 | return p; | |
749 | } | |
750 | if (strncmp(p, "no-llgr", strlen("no-llgr")) | |
751 | == 0) { | |
752 | *val = COMMUNITY_NO_LLGR; | |
753 | *token = community_token_no_llgr; | |
754 | p += strlen("no-llgr"); | |
755 | return p; | |
756 | } | |
aa861c10 C |
757 | if (strncmp(p, "blackhole", strlen("blackhole")) |
758 | == 0) { | |
759 | *val = COMMUNITY_BLACKHOLE; | |
760 | *token = community_token_blackhole; | |
761 | p += strlen("blackhole"); | |
762 | return p; | |
763 | } | |
d62a17ae | 764 | if (strncmp(p, "no-export", strlen("no-export")) == 0) { |
765 | *val = COMMUNITY_NO_EXPORT; | |
766 | *token = community_token_no_export; | |
767 | p += strlen("no-export"); | |
768 | return p; | |
769 | } | |
770 | if (strncmp(p, "no-advertise", strlen("no-advertise")) == 0) { | |
771 | *val = COMMUNITY_NO_ADVERTISE; | |
772 | *token = community_token_no_advertise; | |
773 | p += strlen("no-advertise"); | |
774 | return p; | |
775 | } | |
776 | if (strncmp(p, "local-AS", strlen("local-AS")) == 0) { | |
777 | *val = COMMUNITY_LOCAL_AS; | |
778 | *token = community_token_local_as; | |
779 | p += strlen("local-AS"); | |
780 | return p; | |
781 | } | |
aa861c10 C |
782 | if (strncmp(p, "no-peer", strlen("no-peer")) == 0) { |
783 | *val = COMMUNITY_NO_PEER; | |
784 | *token = community_token_no_peer; | |
785 | p += strlen("no-peer"); | |
7f323236 DW |
786 | return p; |
787 | } | |
d62a17ae | 788 | |
789 | /* Unknown string. */ | |
790 | *token = community_token_unknown; | |
791 | return NULL; | |
718e3744 | 792 | } |
793 | ||
d62a17ae | 794 | /* Community value. */ |
fefa5e0f | 795 | if (isdigit((unsigned char)*p)) { |
d62a17ae | 796 | int separator = 0; |
797 | int digit = 0; | |
d7c0a89a QY |
798 | uint32_t community_low = 0; |
799 | uint32_t community_high = 0; | |
d62a17ae | 800 | |
0e8916e0 DA |
801 | if (!community_valid(p)) { |
802 | *token = community_token_unknown; | |
803 | return NULL; | |
804 | } | |
805 | ||
fefa5e0f | 806 | while (isdigit((unsigned char)*p) || *p == ':') { |
d62a17ae | 807 | if (*p == ':') { |
808 | if (separator) { | |
809 | *token = community_token_unknown; | |
810 | return NULL; | |
811 | } else { | |
812 | separator = 1; | |
813 | digit = 0; | |
814 | ||
815 | if (community_low > UINT16_MAX) { | |
816 | *token = | |
817 | community_token_unknown; | |
818 | return NULL; | |
819 | } | |
820 | ||
821 | community_high = community_low << 16; | |
822 | community_low = 0; | |
823 | } | |
824 | } else { | |
825 | digit = 1; | |
826 | community_low *= 10; | |
827 | community_low += (*p - '0'); | |
828 | } | |
829 | p++; | |
718e3744 | 830 | } |
d62a17ae | 831 | if (!digit) { |
832 | *token = community_token_unknown; | |
833 | return NULL; | |
834 | } | |
835 | ||
d62a17ae | 836 | *val = community_high + community_low; |
837 | *token = community_token_val; | |
838 | return p; | |
839 | } | |
840 | *token = community_token_unknown; | |
841 | return NULL; | |
718e3744 | 842 | } |
843 | ||
844 | /* convert string to community structure */ | |
d62a17ae | 845 | struct community *community_str2com(const char *str) |
718e3744 | 846 | { |
d62a17ae | 847 | struct community *com = NULL; |
848 | struct community *com_sort = NULL; | |
d7c0a89a | 849 | uint32_t val = 0; |
d62a17ae | 850 | enum community_token token = community_token_unknown; |
851 | ||
852 | do { | |
853 | str = community_gettoken(str, &token, &val); | |
854 | ||
855 | switch (token) { | |
856 | case community_token_val: | |
aa861c10 C |
857 | case community_token_gshut: |
858 | case community_token_accept_own: | |
859 | case community_token_route_filter_translated_v4: | |
860 | case community_token_route_filter_v4: | |
861 | case community_token_route_filter_translated_v6: | |
862 | case community_token_route_filter_v6: | |
863 | case community_token_llgr_stale: | |
864 | case community_token_no_llgr: | |
865 | case community_token_accept_own_nexthop: | |
866 | case community_token_blackhole: | |
d62a17ae | 867 | case community_token_no_export: |
868 | case community_token_no_advertise: | |
869 | case community_token_local_as: | |
aa861c10 | 870 | case community_token_no_peer: |
d62a17ae | 871 | if (com == NULL) { |
872 | com = community_new(); | |
873 | com->json = NULL; | |
874 | } | |
875 | community_add_val(com, val); | |
876 | break; | |
877 | case community_token_unknown: | |
d62a17ae | 878 | if (com) |
3c1f53de | 879 | community_free(&com); |
d62a17ae | 880 | return NULL; |
881 | } | |
882 | } while (str); | |
883 | ||
d62a17ae | 884 | com_sort = community_uniq_sort(com); |
3c1f53de | 885 | community_free(&com); |
718e3744 | 886 | |
d62a17ae | 887 | return com_sort; |
718e3744 | 888 | } |
889 | ||
890 | /* Return communities hash entry count. */ | |
d62a17ae | 891 | unsigned long community_count(void) |
718e3744 | 892 | { |
d62a17ae | 893 | return comhash->count; |
718e3744 | 894 | } |
895 | ||
896 | /* Return communities hash. */ | |
d62a17ae | 897 | struct hash *community_hash(void) |
718e3744 | 898 | { |
d62a17ae | 899 | return comhash; |
718e3744 | 900 | } |
901 | ||
902 | /* Initialize comminity related hash. */ | |
d62a17ae | 903 | void community_init(void) |
718e3744 | 904 | { |
996c9314 | 905 | comhash = |
d8b87afe | 906 | hash_create((unsigned int (*)(const void *))community_hash_make, |
74df8d6d | 907 | (bool (*)(const void *, const void *))community_cmp, |
996c9314 | 908 | "BGP Community Hash"); |
718e3744 | 909 | } |
228da428 | 910 | |
d62a17ae | 911 | void community_finish(void) |
228da428 | 912 | { |
d62a17ae | 913 | hash_free(comhash); |
914 | comhash = NULL; | |
228da428 | 915 | } |
c0d7a6cc NT |
916 | |
917 | static struct community *bgp_aggr_community_lookup( | |
918 | struct bgp_aggregate *aggregate, | |
919 | struct community *community) | |
920 | { | |
921 | return hash_lookup(aggregate->community_hash, community); | |
922 | } | |
923 | ||
69a211cb | 924 | static void *bgp_aggr_community_hash_alloc(void *p) |
c0d7a6cc NT |
925 | { |
926 | struct community *ref = (struct community *)p; | |
927 | struct community *community = NULL; | |
928 | ||
929 | community = community_dup(ref); | |
930 | return community; | |
931 | } | |
932 | ||
7f5818fb | 933 | static void bgp_aggr_community_prepare(struct hash_bucket *hb, void *arg) |
c0d7a6cc | 934 | { |
c0d7a6cc NT |
935 | struct community *hb_community = hb->data; |
936 | struct community **aggr_community = arg; | |
937 | ||
21fec674 | 938 | if (*aggr_community) |
939 | *aggr_community = community_merge(*aggr_community, | |
940 | hb_community); | |
941 | else | |
c0d7a6cc NT |
942 | *aggr_community = community_dup(hb_community); |
943 | } | |
944 | ||
945 | void bgp_aggr_community_remove(void *arg) | |
946 | { | |
947 | struct community *community = arg; | |
948 | ||
949 | community_free(&community); | |
950 | } | |
951 | ||
952 | void bgp_compute_aggregate_community(struct bgp_aggregate *aggregate, | |
953 | struct community *community) | |
21fec674 | 954 | { |
955 | bgp_compute_aggregate_community_hash(aggregate, community); | |
956 | bgp_compute_aggregate_community_val(aggregate); | |
957 | } | |
958 | ||
959 | ||
960 | void bgp_compute_aggregate_community_hash(struct bgp_aggregate *aggregate, | |
961 | struct community *community) | |
c0d7a6cc NT |
962 | { |
963 | struct community *aggr_community = NULL; | |
964 | ||
965 | if ((aggregate == NULL) || (community == NULL)) | |
966 | return; | |
967 | ||
968 | /* Create hash if not already created. | |
969 | */ | |
970 | if (aggregate->community_hash == NULL) | |
971 | aggregate->community_hash = hash_create( | |
d8b87afe | 972 | (unsigned int (*)(const void *))community_hash_make, |
c0d7a6cc NT |
973 | (bool (*)(const void *, const void *))community_cmp, |
974 | "BGP Aggregator community hash"); | |
975 | ||
976 | aggr_community = bgp_aggr_community_lookup(aggregate, community); | |
977 | if (aggr_community == NULL) { | |
978 | /* Insert community into hash. | |
979 | */ | |
980 | aggr_community = hash_get(aggregate->community_hash, community, | |
69a211cb | 981 | bgp_aggr_community_hash_alloc); |
21fec674 | 982 | } |
c0d7a6cc | 983 | |
21fec674 | 984 | /* Increment reference counter. |
985 | */ | |
986 | aggr_community->refcnt++; | |
987 | } | |
c0d7a6cc | 988 | |
21fec674 | 989 | void bgp_compute_aggregate_community_val(struct bgp_aggregate *aggregate) |
990 | { | |
991 | struct community *commerge = NULL; | |
992 | ||
993 | if (aggregate == NULL) | |
994 | return; | |
995 | ||
996 | /* Re-compute aggregate's community. | |
997 | */ | |
998 | if (aggregate->community) | |
999 | community_free(&aggregate->community); | |
1000 | if (aggregate->community_hash && | |
1001 | aggregate->community_hash->count) { | |
c0d7a6cc NT |
1002 | hash_iterate(aggregate->community_hash, |
1003 | bgp_aggr_community_prepare, | |
1004 | &aggregate->community); | |
21fec674 | 1005 | commerge = aggregate->community; |
1006 | aggregate->community = community_uniq_sort(commerge); | |
1007 | if (commerge) | |
1008 | community_free(&commerge); | |
c0d7a6cc | 1009 | } |
c0d7a6cc NT |
1010 | } |
1011 | ||
21fec674 | 1012 | |
1013 | ||
c0d7a6cc NT |
1014 | void bgp_remove_community_from_aggregate(struct bgp_aggregate *aggregate, |
1015 | struct community *community) | |
1016 | { | |
1017 | struct community *aggr_community = NULL; | |
1018 | struct community *ret_comm = NULL; | |
1019 | ||
21fec674 | 1020 | if ((!aggregate) |
1021 | || (!aggregate->community_hash) | |
1022 | || (!community)) | |
c0d7a6cc NT |
1023 | return; |
1024 | ||
1025 | /* Look-up the community in the hash. | |
1026 | */ | |
1027 | aggr_community = bgp_aggr_community_lookup(aggregate, community); | |
1028 | if (aggr_community) { | |
1029 | aggr_community->refcnt--; | |
1030 | ||
1031 | if (aggr_community->refcnt == 0) { | |
1032 | ret_comm = hash_release(aggregate->community_hash, | |
1033 | aggr_community); | |
1034 | community_free(&ret_comm); | |
1035 | ||
21fec674 | 1036 | bgp_compute_aggregate_community_val(aggregate); |
1037 | } | |
1038 | } | |
1039 | } | |
1040 | ||
1041 | void bgp_remove_comm_from_aggregate_hash(struct bgp_aggregate *aggregate, | |
1042 | struct community *community) | |
1043 | { | |
1044 | ||
1045 | struct community *aggr_community = NULL; | |
1046 | struct community *ret_comm = NULL; | |
c0d7a6cc | 1047 | |
21fec674 | 1048 | if ((!aggregate) |
1049 | || (!aggregate->community_hash) | |
1050 | || (!community)) | |
1051 | return; | |
1052 | ||
1053 | /* Look-up the community in the hash. | |
1054 | */ | |
1055 | aggr_community = bgp_aggr_community_lookup(aggregate, community); | |
1056 | if (aggr_community) { | |
1057 | aggr_community->refcnt--; | |
1058 | ||
1059 | if (aggr_community->refcnt == 0) { | |
1060 | ret_comm = hash_release(aggregate->community_hash, | |
1061 | aggr_community); | |
1062 | community_free(&ret_comm); | |
c0d7a6cc NT |
1063 | } |
1064 | } | |
1065 | } |