]>
Commit | Line | Data |
---|---|---|
718e3744 | 1 | /* BGP community-list and extcommunity-list. |
2 | Copyright (C) 1999 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 | |
17 | along with GNU Zebra; see the file COPYING. If not, write to the Free | |
18 | Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA | |
19 | 02111-1307, USA. */ | |
20 | ||
21 | #include <zebra.h> | |
22 | ||
23 | #include "command.h" | |
24 | #include "prefix.h" | |
25 | #include "memory.h" | |
26 | ||
27 | #include "bgpd/bgpd.h" | |
28 | #include "bgpd/bgp_community.h" | |
29 | #include "bgpd/bgp_ecommunity.h" | |
30 | #include "bgpd/bgp_aspath.h" | |
31 | #include "bgpd/bgp_regex.h" | |
32 | #include "bgpd/bgp_clist.h" | |
33 | \f | |
34 | /* Lookup master structure for community-list or | |
35 | extcommunity-list. */ | |
36 | struct community_list_master * | |
fee6e4e4 | 37 | community_list_master_lookup (struct community_list_handler *ch, int master) |
718e3744 | 38 | { |
39 | if (ch) | |
fee6e4e4 | 40 | switch (master) |
718e3744 | 41 | { |
fee6e4e4 | 42 | case COMMUNITY_LIST_MASTER: |
43 | return &ch->community_list; | |
fee6e4e4 | 44 | case EXTCOMMUNITY_LIST_MASTER: |
45 | return &ch->extcommunity_list; | |
718e3744 | 46 | } |
47 | return NULL; | |
48 | } | |
49 | ||
50 | /* Allocate a new community list entry. */ | |
94f2b392 | 51 | static struct community_entry * |
718e3744 | 52 | community_entry_new () |
53 | { | |
393deb9b | 54 | return XCALLOC (MTYPE_COMMUNITY_LIST_ENTRY, sizeof (struct community_entry)); |
718e3744 | 55 | } |
56 | ||
57 | /* Free community list entry. */ | |
94f2b392 | 58 | static void |
718e3744 | 59 | community_entry_free (struct community_entry *entry) |
60 | { | |
61 | switch (entry->style) | |
62 | { | |
63 | case COMMUNITY_LIST_STANDARD: | |
64 | if (entry->u.com) | |
8708b74f | 65 | community_free (entry->u.com); |
718e3744 | 66 | break; |
67 | case EXTCOMMUNITY_LIST_STANDARD: | |
68 | /* In case of standard extcommunity-list, configuration string | |
8708b74f | 69 | is made by ecommunity_ecom2str(). */ |
718e3744 | 70 | if (entry->config) |
8708b74f | 71 | XFREE (MTYPE_ECOMMUNITY_STR, entry->config); |
718e3744 | 72 | if (entry->u.ecom) |
8708b74f | 73 | ecommunity_free (entry->u.ecom); |
718e3744 | 74 | break; |
75 | case COMMUNITY_LIST_EXPANDED: | |
76 | case EXTCOMMUNITY_LIST_EXPANDED: | |
77 | if (entry->config) | |
8708b74f | 78 | XFREE (MTYPE_COMMUNITY_LIST_CONFIG, entry->config); |
718e3744 | 79 | if (entry->reg) |
8708b74f | 80 | bgp_regex_free (entry->reg); |
718e3744 | 81 | default: |
82 | break; | |
83 | } | |
84 | XFREE (MTYPE_COMMUNITY_LIST_ENTRY, entry); | |
85 | } | |
86 | ||
87 | /* Allocate a new community-list. */ | |
94f2b392 | 88 | static struct community_list * |
718e3744 | 89 | community_list_new () |
90 | { | |
393deb9b | 91 | return XCALLOC (MTYPE_COMMUNITY_LIST, sizeof (struct community_list)); |
718e3744 | 92 | } |
93 | ||
94 | /* Free community-list. */ | |
94f2b392 | 95 | static void |
718e3744 | 96 | community_list_free (struct community_list *list) |
97 | { | |
98 | if (list->name) | |
99 | XFREE (MTYPE_COMMUNITY_LIST_NAME, list->name); | |
100 | XFREE (MTYPE_COMMUNITY_LIST, list); | |
101 | } | |
102 | ||
94f2b392 | 103 | static struct community_list * |
718e3744 | 104 | community_list_insert (struct community_list_handler *ch, |
fee6e4e4 | 105 | const char *name, int master) |
718e3744 | 106 | { |
fd79ac91 | 107 | size_t i; |
718e3744 | 108 | long number; |
109 | struct community_list *new; | |
110 | struct community_list *point; | |
111 | struct community_list_list *list; | |
112 | struct community_list_master *cm; | |
113 | ||
114 | /* Lookup community-list master. */ | |
fee6e4e4 | 115 | cm = community_list_master_lookup (ch, master); |
8708b74f | 116 | if (!cm) |
718e3744 | 117 | return NULL; |
118 | ||
119 | /* Allocate new community_list and copy given name. */ | |
120 | new = community_list_new (); | |
121 | new->name = XSTRDUP (MTYPE_COMMUNITY_LIST_NAME, name); | |
122 | ||
123 | /* If name is made by all digit character. We treat it as | |
124 | number. */ | |
125 | for (number = 0, i = 0; i < strlen (name); i++) | |
126 | { | |
127 | if (isdigit ((int) name[i])) | |
8708b74f | 128 | number = (number * 10) + (name[i] - '0'); |
718e3744 | 129 | else |
8708b74f | 130 | break; |
718e3744 | 131 | } |
132 | ||
133 | /* In case of name is all digit character */ | |
134 | if (i == strlen (name)) | |
135 | { | |
136 | new->sort = COMMUNITY_LIST_NUMBER; | |
137 | ||
138 | /* Set access_list to number list. */ | |
139 | list = &cm->num; | |
140 | ||
141 | for (point = list->head; point; point = point->next) | |
8708b74f | 142 | if (atol (point->name) >= number) |
143 | break; | |
718e3744 | 144 | } |
145 | else | |
146 | { | |
147 | new->sort = COMMUNITY_LIST_STRING; | |
148 | ||
149 | /* Set access_list to string list. */ | |
150 | list = &cm->str; | |
8708b74f | 151 | |
718e3744 | 152 | /* Set point to insertion point. */ |
153 | for (point = list->head; point; point = point->next) | |
8708b74f | 154 | if (strcmp (point->name, name) >= 0) |
155 | break; | |
718e3744 | 156 | } |
157 | ||
158 | /* Link to upper list. */ | |
159 | new->parent = list; | |
160 | ||
161 | /* In case of this is the first element of master. */ | |
162 | if (list->head == NULL) | |
163 | { | |
164 | list->head = list->tail = new; | |
165 | return new; | |
166 | } | |
167 | ||
168 | /* In case of insertion is made at the tail of access_list. */ | |
169 | if (point == NULL) | |
170 | { | |
171 | new->prev = list->tail; | |
172 | list->tail->next = new; | |
173 | list->tail = new; | |
174 | return new; | |
175 | } | |
176 | ||
177 | /* In case of insertion is made at the head of access_list. */ | |
178 | if (point == list->head) | |
179 | { | |
180 | new->next = list->head; | |
181 | list->head->prev = new; | |
182 | list->head = new; | |
183 | return new; | |
184 | } | |
185 | ||
186 | /* Insertion is made at middle of the access_list. */ | |
187 | new->next = point; | |
188 | new->prev = point->prev; | |
189 | ||
190 | if (point->prev) | |
191 | point->prev->next = new; | |
192 | point->prev = new; | |
193 | ||
194 | return new; | |
195 | } | |
196 | ||
197 | struct community_list * | |
198 | community_list_lookup (struct community_list_handler *ch, | |
fee6e4e4 | 199 | const char *name, int master) |
718e3744 | 200 | { |
201 | struct community_list *list; | |
202 | struct community_list_master *cm; | |
203 | ||
8708b74f | 204 | if (!name) |
718e3744 | 205 | return NULL; |
206 | ||
fee6e4e4 | 207 | cm = community_list_master_lookup (ch, master); |
8708b74f | 208 | if (!cm) |
718e3744 | 209 | return NULL; |
210 | ||
211 | for (list = cm->num.head; list; list = list->next) | |
212 | if (strcmp (list->name, name) == 0) | |
213 | return list; | |
214 | for (list = cm->str.head; list; list = list->next) | |
215 | if (strcmp (list->name, name) == 0) | |
216 | return list; | |
217 | ||
218 | return NULL; | |
219 | } | |
220 | ||
94f2b392 | 221 | static struct community_list * |
fee6e4e4 | 222 | community_list_get (struct community_list_handler *ch, |
223 | const char *name, int master) | |
718e3744 | 224 | { |
225 | struct community_list *list; | |
226 | ||
fee6e4e4 | 227 | list = community_list_lookup (ch, name, master); |
8708b74f | 228 | if (!list) |
fee6e4e4 | 229 | list = community_list_insert (ch, name, master); |
718e3744 | 230 | return list; |
231 | } | |
232 | ||
94f2b392 | 233 | static void |
718e3744 | 234 | community_list_delete (struct community_list *list) |
235 | { | |
236 | struct community_list_list *clist; | |
237 | struct community_entry *entry, *next; | |
238 | ||
239 | for (entry = list->head; entry; entry = next) | |
240 | { | |
241 | next = entry->next; | |
242 | community_entry_free (entry); | |
243 | } | |
244 | ||
245 | clist = list->parent; | |
246 | ||
247 | if (list->next) | |
248 | list->next->prev = list->prev; | |
249 | else | |
250 | clist->tail = list->prev; | |
251 | ||
252 | if (list->prev) | |
253 | list->prev->next = list->next; | |
254 | else | |
255 | clist->head = list->next; | |
256 | ||
257 | community_list_free (list); | |
258 | } | |
259 | ||
94f2b392 | 260 | static int |
718e3744 | 261 | community_list_empty_p (struct community_list *list) |
262 | { | |
263 | return (list->head == NULL && list->tail == NULL) ? 1 : 0; | |
264 | } | |
265 | \f | |
266 | /* Add community-list entry to the list. */ | |
267 | static void | |
8708b74f | 268 | community_list_entry_add (struct community_list *list, |
269 | struct community_entry *entry) | |
718e3744 | 270 | { |
271 | entry->next = NULL; | |
272 | entry->prev = list->tail; | |
273 | ||
274 | if (list->tail) | |
275 | list->tail->next = entry; | |
276 | else | |
277 | list->head = entry; | |
278 | list->tail = entry; | |
279 | } | |
280 | ||
281 | /* Delete community-list entry from the list. */ | |
282 | static void | |
283 | community_list_entry_delete (struct community_list *list, | |
8708b74f | 284 | struct community_entry *entry, int style) |
718e3744 | 285 | { |
286 | if (entry->next) | |
287 | entry->next->prev = entry->prev; | |
288 | else | |
289 | list->tail = entry->prev; | |
290 | ||
291 | if (entry->prev) | |
292 | entry->prev->next = entry->next; | |
293 | else | |
294 | list->head = entry->next; | |
295 | ||
296 | community_entry_free (entry); | |
297 | ||
298 | if (community_list_empty_p (list)) | |
299 | community_list_delete (list); | |
300 | } | |
301 | ||
302 | /* Lookup community-list entry from the list. */ | |
303 | static struct community_entry * | |
fd79ac91 | 304 | community_list_entry_lookup (struct community_list *list, const void *arg, |
8708b74f | 305 | int direct) |
718e3744 | 306 | { |
307 | struct community_entry *entry; | |
308 | ||
309 | for (entry = list->head; entry; entry = entry->next) | |
310 | { | |
311 | switch (entry->style) | |
8708b74f | 312 | { |
313 | case COMMUNITY_LIST_STANDARD: | |
314 | if (community_cmp (entry->u.com, arg)) | |
315 | return entry; | |
316 | break; | |
317 | case EXTCOMMUNITY_LIST_STANDARD: | |
318 | if (ecommunity_cmp (entry->u.ecom, arg)) | |
319 | return entry; | |
320 | break; | |
321 | case COMMUNITY_LIST_EXPANDED: | |
322 | case EXTCOMMUNITY_LIST_EXPANDED: | |
323 | if (strcmp (entry->config, arg) == 0) | |
324 | return entry; | |
325 | break; | |
326 | default: | |
327 | break; | |
328 | } | |
718e3744 | 329 | } |
330 | return NULL; | |
331 | } | |
332 | \f | |
333 | /* Internal function to perform regular expression match for community | |
334 | attribute. */ | |
335 | static int | |
8708b74f | 336 | community_regexp_match (struct community *com, regex_t * reg) |
718e3744 | 337 | { |
fd79ac91 | 338 | const char *str; |
718e3744 | 339 | |
340 | /* When there is no communities attribute it is treated as empty | |
341 | string. */ | |
342 | if (com == NULL || com->size == 0) | |
343 | str = ""; | |
344 | else | |
345 | str = community_str (com); | |
346 | ||
347 | /* Regular expression match. */ | |
348 | if (regexec (reg, str, 0, NULL, 0) == 0) | |
349 | return 1; | |
350 | ||
351 | /* No match. */ | |
352 | return 0; | |
353 | } | |
354 | ||
8708b74f | 355 | static int |
356 | ecommunity_regexp_match (struct ecommunity *ecom, regex_t * reg) | |
357 | { | |
fd79ac91 | 358 | const char *str; |
8708b74f | 359 | |
360 | /* When there is no communities attribute it is treated as empty | |
361 | string. */ | |
362 | if (ecom == NULL || ecom->size == 0) | |
363 | str = ""; | |
364 | else | |
365 | str = ecommunity_str (ecom); | |
366 | ||
367 | /* Regular expression match. */ | |
368 | if (regexec (reg, str, 0, NULL, 0) == 0) | |
369 | return 1; | |
370 | ||
371 | /* No match. */ | |
372 | return 0; | |
373 | } | |
374 | ||
718e3744 | 375 | /* Delete community attribute using regular expression match. Return |
376 | modified communites attribute. */ | |
377 | static struct community * | |
8708b74f | 378 | community_regexp_delete (struct community *com, regex_t * reg) |
718e3744 | 379 | { |
380 | int i; | |
381 | u_int32_t comval; | |
382 | /* Maximum is "65535:65535" + '\0'. */ | |
383 | char c[12]; | |
fd79ac91 | 384 | const char *str; |
718e3744 | 385 | |
8708b74f | 386 | if (!com) |
718e3744 | 387 | return NULL; |
388 | ||
389 | i = 0; | |
390 | while (i < com->size) | |
391 | { | |
392 | memcpy (&comval, com_nthval (com, i), sizeof (u_int32_t)); | |
393 | comval = ntohl (comval); | |
394 | ||
395 | switch (comval) | |
8708b74f | 396 | { |
397 | case COMMUNITY_INTERNET: | |
398 | str = "internet"; | |
399 | break; | |
400 | case COMMUNITY_NO_EXPORT: | |
401 | str = "no-export"; | |
402 | break; | |
403 | case COMMUNITY_NO_ADVERTISE: | |
404 | str = "no-advertise"; | |
405 | break; | |
406 | case COMMUNITY_LOCAL_AS: | |
407 | str = "local-AS"; | |
408 | break; | |
409 | default: | |
410 | sprintf (c, "%d:%d", (comval >> 16) & 0xFFFF, comval & 0xFFFF); | |
411 | str = c; | |
412 | break; | |
413 | } | |
718e3744 | 414 | |
415 | if (regexec (reg, str, 0, NULL, 0) == 0) | |
8708b74f | 416 | community_del_val (com, com_nthval (com, i)); |
718e3744 | 417 | else |
8708b74f | 418 | i++; |
718e3744 | 419 | } |
420 | return com; | |
421 | } | |
422 | ||
423 | /* When given community attribute matches to the community-list return | |
424 | 1 else return 0. */ | |
425 | int | |
426 | community_list_match (struct community *com, struct community_list *list) | |
427 | { | |
428 | struct community_entry *entry; | |
429 | ||
430 | for (entry = list->head; entry; entry = entry->next) | |
431 | { | |
432 | if (entry->any) | |
8708b74f | 433 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; |
718e3744 | 434 | |
435 | if (entry->style == COMMUNITY_LIST_STANDARD) | |
8708b74f | 436 | { |
437 | if (community_include (entry->u.com, COMMUNITY_INTERNET)) | |
438 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
718e3744 | 439 | |
8708b74f | 440 | if (community_match (com, entry->u.com)) |
441 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
442 | } | |
718e3744 | 443 | else if (entry->style == COMMUNITY_LIST_EXPANDED) |
8708b74f | 444 | { |
445 | if (community_regexp_match (com, entry->reg)) | |
446 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
447 | } | |
448 | } | |
449 | return 0; | |
450 | } | |
451 | ||
452 | int | |
453 | ecommunity_list_match (struct ecommunity *ecom, struct community_list *list) | |
454 | { | |
455 | struct community_entry *entry; | |
456 | ||
457 | for (entry = list->head; entry; entry = entry->next) | |
458 | { | |
459 | if (entry->any) | |
460 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
461 | ||
462 | if (entry->style == EXTCOMMUNITY_LIST_STANDARD) | |
463 | { | |
464 | if (ecommunity_match (ecom, entry->u.ecom)) | |
465 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
466 | } | |
467 | else if (entry->style == EXTCOMMUNITY_LIST_EXPANDED) | |
468 | { | |
469 | if (ecommunity_regexp_match (ecom, entry->reg)) | |
470 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
471 | } | |
718e3744 | 472 | } |
473 | return 0; | |
474 | } | |
475 | ||
476 | /* Perform exact matching. In case of expanded community-list, do | |
477 | same thing as community_list_match(). */ | |
478 | int | |
8708b74f | 479 | community_list_exact_match (struct community *com, |
480 | struct community_list *list) | |
718e3744 | 481 | { |
482 | struct community_entry *entry; | |
483 | ||
484 | for (entry = list->head; entry; entry = entry->next) | |
485 | { | |
486 | if (entry->any) | |
8708b74f | 487 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; |
718e3744 | 488 | |
489 | if (entry->style == COMMUNITY_LIST_STANDARD) | |
8708b74f | 490 | { |
491 | if (community_include (entry->u.com, COMMUNITY_INTERNET)) | |
492 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
718e3744 | 493 | |
8708b74f | 494 | if (community_cmp (com, entry->u.com)) |
495 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
496 | } | |
718e3744 | 497 | else if (entry->style == COMMUNITY_LIST_EXPANDED) |
8708b74f | 498 | { |
499 | if (community_regexp_match (com, entry->reg)) | |
500 | return entry->direct == COMMUNITY_PERMIT ? 1 : 0; | |
501 | } | |
718e3744 | 502 | } |
503 | return 0; | |
504 | } | |
505 | ||
8708b74f | 506 | /* Delete all permitted communities in the list from com. */ |
718e3744 | 507 | struct community * |
508 | community_list_match_delete (struct community *com, | |
8708b74f | 509 | struct community_list *list) |
718e3744 | 510 | { |
511 | struct community_entry *entry; | |
512 | ||
513 | for (entry = list->head; entry; entry = entry->next) | |
514 | { | |
847375b9 | 515 | if (entry->any) |
8708b74f | 516 | { |
847375b9 | 517 | if (entry->direct == COMMUNITY_PERMIT) |
518 | { | |
519 | /* This is a tricky part. Currently only | |
520 | * route_set_community_delete() uses this function. In the | |
521 | * function com->size is zero, it free the community | |
522 | * structure. | |
523 | */ | |
524 | com->size = 0; | |
525 | } | |
8708b74f | 526 | return com; |
527 | } | |
718e3744 | 528 | |
847375b9 | 529 | if ((entry->style == COMMUNITY_LIST_STANDARD) |
530 | && (community_include (entry->u.com, COMMUNITY_INTERNET) | |
531 | || community_match (com, entry->u.com) )) | |
8708b74f | 532 | { |
847375b9 | 533 | if (entry->direct == COMMUNITY_PERMIT) |
534 | community_delete (com, entry->u.com); | |
535 | else | |
536 | break; | |
8708b74f | 537 | } |
847375b9 | 538 | else if ((entry->style == COMMUNITY_LIST_EXPANDED) |
539 | && community_regexp_match (com, entry->reg)) | |
8708b74f | 540 | { |
541 | if (entry->direct == COMMUNITY_PERMIT) | |
542 | community_regexp_delete (com, entry->reg); | |
847375b9 | 543 | else |
544 | break; | |
8708b74f | 545 | } |
718e3744 | 546 | } |
547 | return com; | |
548 | } | |
549 | ||
550 | /* To avoid duplicated entry in the community-list, this function | |
551 | compares specified entry to existing entry. */ | |
94f2b392 | 552 | static int |
8708b74f | 553 | community_list_dup_check (struct community_list *list, |
554 | struct community_entry *new) | |
718e3744 | 555 | { |
556 | struct community_entry *entry; | |
8708b74f | 557 | |
718e3744 | 558 | for (entry = list->head; entry; entry = entry->next) |
559 | { | |
560 | if (entry->style != new->style) | |
8708b74f | 561 | continue; |
718e3744 | 562 | |
563 | if (entry->direct != new->direct) | |
8708b74f | 564 | continue; |
718e3744 | 565 | |
566 | if (entry->any != new->any) | |
8708b74f | 567 | continue; |
718e3744 | 568 | |
569 | if (entry->any) | |
8708b74f | 570 | return 1; |
718e3744 | 571 | |
572 | switch (entry->style) | |
8708b74f | 573 | { |
574 | case COMMUNITY_LIST_STANDARD: | |
575 | if (community_cmp (entry->u.com, new->u.com)) | |
576 | return 1; | |
577 | break; | |
578 | case EXTCOMMUNITY_LIST_STANDARD: | |
579 | if (ecommunity_cmp (entry->u.ecom, new->u.ecom)) | |
580 | return 1; | |
581 | break; | |
582 | case COMMUNITY_LIST_EXPANDED: | |
583 | case EXTCOMMUNITY_LIST_EXPANDED: | |
584 | if (strcmp (entry->config, new->config) == 0) | |
585 | return 1; | |
586 | break; | |
587 | default: | |
588 | break; | |
589 | } | |
718e3744 | 590 | } |
591 | return 0; | |
592 | } | |
593 | \f | |
594 | /* Set community-list. */ | |
595 | int | |
596 | community_list_set (struct community_list_handler *ch, | |
fd79ac91 | 597 | const char *name, const char *str, int direct, int style) |
718e3744 | 598 | { |
fee6e4e4 | 599 | struct community_entry *entry = NULL; |
718e3744 | 600 | struct community_list *list; |
fee6e4e4 | 601 | struct community *com = NULL; |
602 | regex_t *regex = NULL; | |
718e3744 | 603 | |
604 | /* Get community list. */ | |
fee6e4e4 | 605 | list = community_list_get (ch, name, COMMUNITY_LIST_MASTER); |
718e3744 | 606 | |
607 | /* When community-list already has entry, new entry should have same | |
608 | style. If you want to have mixed style community-list, you can | |
609 | comment out this check. */ | |
8708b74f | 610 | if (!community_list_empty_p (list)) |
718e3744 | 611 | { |
612 | struct community_entry *first; | |
613 | ||
614 | first = list->head; | |
615 | ||
fee6e4e4 | 616 | if (style != first->style) |
617 | { | |
618 | return (first->style == COMMUNITY_LIST_STANDARD | |
619 | ? COMMUNITY_LIST_ERR_STANDARD_CONFLICT | |
620 | : COMMUNITY_LIST_ERR_EXPANDED_CONFLICT); | |
621 | } | |
718e3744 | 622 | } |
623 | ||
fee6e4e4 | 624 | if (str) |
718e3744 | 625 | { |
fee6e4e4 | 626 | if (style == COMMUNITY_LIST_STANDARD) |
627 | com = community_str2com (str); | |
718e3744 | 628 | else |
fee6e4e4 | 629 | regex = bgp_regcomp (str); |
8708b74f | 630 | |
fee6e4e4 | 631 | if (! com && ! regex) |
632 | return COMMUNITY_LIST_ERR_MALFORMED_VAL; | |
718e3744 | 633 | } |
634 | ||
fee6e4e4 | 635 | entry = community_entry_new (); |
636 | entry->direct = direct; | |
637 | entry->style = style; | |
638 | entry->any = (str ? 0 : 1); | |
639 | entry->u.com = com; | |
640 | entry->reg = regex; | |
641 | entry->config = (regex ? XSTRDUP (MTYPE_COMMUNITY_LIST_CONFIG, str) : NULL); | |
642 | ||
718e3744 | 643 | /* Do not put duplicated community entry. */ |
644 | if (community_list_dup_check (list, entry)) | |
645 | community_entry_free (entry); | |
646 | else | |
647 | community_list_entry_add (list, entry); | |
648 | ||
649 | return 0; | |
650 | } | |
651 | ||
652 | /* Unset community-list. When str is NULL, delete all of | |
653 | community-list entry belongs to the specified name. */ | |
654 | int | |
655 | community_list_unset (struct community_list_handler *ch, | |
fd79ac91 | 656 | const char *name, const char *str, |
657 | int direct, int style) | |
718e3744 | 658 | { |
fee6e4e4 | 659 | struct community_entry *entry = NULL; |
718e3744 | 660 | struct community_list *list; |
fee6e4e4 | 661 | struct community *com = NULL; |
662 | regex_t *regex = NULL; | |
718e3744 | 663 | |
664 | /* Lookup community list. */ | |
fee6e4e4 | 665 | list = community_list_lookup (ch, name, COMMUNITY_LIST_MASTER); |
718e3744 | 666 | if (list == NULL) |
667 | return COMMUNITY_LIST_ERR_CANT_FIND_LIST; | |
668 | ||
669 | /* Delete all of entry belongs to this community-list. */ | |
8708b74f | 670 | if (!str) |
718e3744 | 671 | { |
672 | community_list_delete (list); | |
673 | return 0; | |
674 | } | |
675 | ||
fee6e4e4 | 676 | if (style == COMMUNITY_LIST_STANDARD) |
677 | com = community_str2com (str); | |
678 | else | |
679 | regex = bgp_regcomp (str); | |
718e3744 | 680 | |
fee6e4e4 | 681 | if (! com && ! regex) |
682 | return COMMUNITY_LIST_ERR_MALFORMED_VAL; | |
718e3744 | 683 | |
fee6e4e4 | 684 | if (com) |
685 | entry = community_list_entry_lookup (list, com, direct); | |
686 | else | |
687 | entry = community_list_entry_lookup (list, str, direct); | |
688 | ||
689 | if (com) | |
690 | community_free (com); | |
691 | if (regex) | |
692 | bgp_regex_free (regex); | |
718e3744 | 693 | |
8708b74f | 694 | if (!entry) |
718e3744 | 695 | return COMMUNITY_LIST_ERR_CANT_FIND_LIST; |
696 | ||
697 | community_list_entry_delete (list, entry, style); | |
698 | ||
699 | return 0; | |
700 | } | |
701 | ||
702 | /* Set extcommunity-list. */ | |
703 | int | |
704 | extcommunity_list_set (struct community_list_handler *ch, | |
fd79ac91 | 705 | const char *name, const char *str, |
706 | int direct, int style) | |
718e3744 | 707 | { |
fee6e4e4 | 708 | struct community_entry *entry = NULL; |
718e3744 | 709 | struct community_list *list; |
fee6e4e4 | 710 | struct ecommunity *ecom = NULL; |
711 | regex_t *regex = NULL; | |
718e3744 | 712 | |
713 | entry = NULL; | |
714 | ||
715 | /* Get community list. */ | |
fee6e4e4 | 716 | list = community_list_get (ch, name, EXTCOMMUNITY_LIST_MASTER); |
718e3744 | 717 | |
718 | /* When community-list already has entry, new entry should have same | |
719 | style. If you want to have mixed style community-list, you can | |
720 | comment out this check. */ | |
8708b74f | 721 | if (!community_list_empty_p (list)) |
718e3744 | 722 | { |
723 | struct community_entry *first; | |
724 | ||
725 | first = list->head; | |
726 | ||
fee6e4e4 | 727 | if (style != first->style) |
728 | { | |
729 | return (first->style == EXTCOMMUNITY_LIST_STANDARD | |
730 | ? COMMUNITY_LIST_ERR_STANDARD_CONFLICT | |
731 | : COMMUNITY_LIST_ERR_EXPANDED_CONFLICT); | |
732 | } | |
718e3744 | 733 | } |
734 | ||
fee6e4e4 | 735 | if (str) |
718e3744 | 736 | { |
fee6e4e4 | 737 | if (style == EXTCOMMUNITY_LIST_STANDARD) |
738 | ecom = ecommunity_str2com (str, 0, 1); | |
718e3744 | 739 | else |
fee6e4e4 | 740 | regex = bgp_regcomp (str); |
8708b74f | 741 | |
fee6e4e4 | 742 | if (! ecom && ! regex) |
743 | return COMMUNITY_LIST_ERR_MALFORMED_VAL; | |
718e3744 | 744 | } |
745 | ||
fee6e4e4 | 746 | if (ecom) |
747 | ecom->str = ecommunity_ecom2str (ecom, ECOMMUNITY_FORMAT_DISPLAY); | |
748 | ||
749 | entry = community_entry_new (); | |
750 | entry->direct = direct; | |
751 | entry->style = style; | |
752 | entry->any = (str ? 0 : 1); | |
753 | if (ecom) | |
754 | entry->config = ecommunity_ecom2str (ecom, ECOMMUNITY_FORMAT_COMMUNITY_LIST); | |
755 | else if (regex) | |
756 | entry->config = XSTRDUP (MTYPE_COMMUNITY_LIST_CONFIG, str); | |
757 | else | |
758 | entry->config = NULL; | |
759 | entry->u.ecom = ecom; | |
760 | entry->reg = regex; | |
761 | ||
718e3744 | 762 | /* Do not put duplicated community entry. */ |
763 | if (community_list_dup_check (list, entry)) | |
764 | community_entry_free (entry); | |
765 | else | |
766 | community_list_entry_add (list, entry); | |
767 | ||
768 | return 0; | |
769 | } | |
770 | ||
771 | /* Unset extcommunity-list. When str is NULL, delete all of | |
772 | extcommunity-list entry belongs to the specified name. */ | |
773 | int | |
774 | extcommunity_list_unset (struct community_list_handler *ch, | |
fd79ac91 | 775 | const char *name, const char *str, |
776 | int direct, int style) | |
718e3744 | 777 | { |
fee6e4e4 | 778 | struct community_entry *entry = NULL; |
718e3744 | 779 | struct community_list *list; |
780 | struct ecommunity *ecom = NULL; | |
fee6e4e4 | 781 | regex_t *regex = NULL; |
718e3744 | 782 | |
783 | /* Lookup extcommunity list. */ | |
fee6e4e4 | 784 | list = community_list_lookup (ch, name, EXTCOMMUNITY_LIST_MASTER); |
718e3744 | 785 | if (list == NULL) |
786 | return COMMUNITY_LIST_ERR_CANT_FIND_LIST; | |
787 | ||
788 | /* Delete all of entry belongs to this extcommunity-list. */ | |
8708b74f | 789 | if (!str) |
718e3744 | 790 | { |
791 | community_list_delete (list); | |
792 | return 0; | |
793 | } | |
794 | ||
fee6e4e4 | 795 | if (style == EXTCOMMUNITY_LIST_STANDARD) |
796 | ecom = ecommunity_str2com (str, 0, 1); | |
797 | else | |
798 | regex = bgp_regcomp (str); | |
718e3744 | 799 | |
fee6e4e4 | 800 | if (! ecom && ! regex) |
801 | return COMMUNITY_LIST_ERR_MALFORMED_VAL; | |
718e3744 | 802 | |
fee6e4e4 | 803 | if (ecom) |
804 | entry = community_list_entry_lookup (list, ecom, direct); | |
805 | else | |
806 | entry = community_list_entry_lookup (list, str, direct); | |
807 | ||
808 | if (ecom) | |
809 | ecommunity_free (ecom); | |
810 | if (regex) | |
811 | bgp_regex_free (regex); | |
718e3744 | 812 | |
8708b74f | 813 | if (!entry) |
718e3744 | 814 | return COMMUNITY_LIST_ERR_CANT_FIND_LIST; |
815 | ||
816 | community_list_entry_delete (list, entry, style); | |
817 | ||
818 | return 0; | |
819 | } | |
820 | ||
821 | /* Initializa community-list. Return community-list handler. */ | |
822 | struct community_list_handler * | |
94f2b392 | 823 | community_list_init (void) |
718e3744 | 824 | { |
825 | struct community_list_handler *ch; | |
826 | ch = XCALLOC (MTYPE_COMMUNITY_LIST_HANDLER, | |
8708b74f | 827 | sizeof (struct community_list_handler)); |
718e3744 | 828 | return ch; |
829 | } | |
830 | ||
831 | /* Terminate community-list. */ | |
94f2b392 | 832 | static void |
718e3744 | 833 | community_list_terminate (struct community_list_handler *ch) |
834 | { | |
835 | struct community_list_master *cm; | |
836 | struct community_list *list; | |
837 | ||
838 | cm = &ch->community_list; | |
839 | while ((list = cm->num.head) != NULL) | |
840 | community_list_delete (list); | |
841 | while ((list = cm->str.head) != NULL) | |
842 | community_list_delete (list); | |
843 | ||
844 | cm = &ch->extcommunity_list; | |
845 | while ((list = cm->num.head) != NULL) | |
846 | community_list_delete (list); | |
847 | while ((list = cm->str.head) != NULL) | |
848 | community_list_delete (list); | |
849 | ||
850 | XFREE (MTYPE_COMMUNITY_LIST_HANDLER, ch); | |
851 | } |