1 /* OSPF version 2 daemon program.
2 * Copyright (C) 1999, 2000 Toshiaki Takada
4 * This file is part of GNU Zebra.
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
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.
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
33 #include "sockunion.h" /* for inet_aton () */
41 #include "lib_errors.h"
43 #include "ospfd/ospfd.h"
44 #include "ospfd/ospf_network.h"
45 #include "ospfd/ospf_interface.h"
46 #include "ospfd/ospf_ism.h"
47 #include "ospfd/ospf_asbr.h"
48 #include "ospfd/ospf_lsa.h"
49 #include "ospfd/ospf_lsdb.h"
50 #include "ospfd/ospf_neighbor.h"
51 #include "ospfd/ospf_nsm.h"
52 #include "ospfd/ospf_spf.h"
53 #include "ospfd/ospf_packet.h"
54 #include "ospfd/ospf_dump.h"
55 #include "ospfd/ospf_route.h"
56 #include "ospfd/ospf_zebra.h"
57 #include "ospfd/ospf_abr.h"
58 #include "ospfd/ospf_flood.h"
59 #include "ospfd/ospf_ase.h"
62 DEFINE_QOBJ_TYPE(ospf
)
64 /* OSPF process wide configuration. */
65 static struct ospf_master ospf_master
;
67 /* OSPF process wide configuration pointer to export. */
68 struct ospf_master
*om
;
70 extern struct zclient
*zclient
;
73 static void ospf_remove_vls_through_area(struct ospf
*, struct ospf_area
*);
74 static void ospf_network_free(struct ospf
*, struct ospf_network
*);
75 static void ospf_area_free(struct ospf_area
*);
76 static void ospf_network_run(struct prefix
*, struct ospf_area
*);
77 static void ospf_network_run_interface(struct ospf
*, struct interface
*,
78 struct prefix
*, struct ospf_area
*);
79 static void ospf_network_run_subnet(struct ospf
*, struct connected
*,
80 struct prefix
*, struct ospf_area
*);
81 static int ospf_network_match_iface(const struct connected
*,
82 const struct prefix
*);
83 static void ospf_finish_final(struct ospf
*);
85 #define OSPF_EXTERNAL_LSA_ORIGINATE_DELAY 1
87 void ospf_router_id_update(struct ospf
*ospf
)
89 struct vrf
*vrf
= vrf_lookup_by_id(ospf
->vrf_id
);
90 struct in_addr router_id
, router_id_old
;
91 struct ospf_interface
*oi
;
92 struct interface
*ifp
;
93 struct listnode
*node
;
96 if (!ospf
->oi_running
) {
97 if (IS_DEBUG_OSPF_EVENT
)
99 "Router ospf not configured -- Router-ID update postponed");
103 if (IS_DEBUG_OSPF_EVENT
)
104 zlog_debug("Router-ID[OLD:%s]: Update",
105 inet_ntoa(ospf
->router_id
));
107 router_id_old
= ospf
->router_id
;
109 /* Select the router ID based on these priorities:
110 1. Statically assigned router ID is always the first choice.
111 2. If there is no statically assigned router ID, then try to stick
112 with the most recent value, since changing router ID's is very
114 3. Last choice: just go with whatever the zebra daemon recommends.
116 if (ospf
->router_id_static
.s_addr
!= 0)
117 router_id
= ospf
->router_id_static
;
118 else if (ospf
->router_id
.s_addr
!= 0)
119 router_id
= ospf
->router_id
;
121 router_id
= ospf
->router_id_zebra
;
123 if (IS_DEBUG_OSPF_EVENT
)
124 zlog_debug("Router-ID[OLD:%s]: Update to %s",
125 inet_ntoa(ospf
->router_id
), inet_ntoa(router_id
));
127 if (!IPV4_ADDR_SAME(&router_id_old
, &router_id
)) {
129 for (ALL_LIST_ELEMENTS_RO(ospf
->oiflist
, node
, oi
)) {
130 /* Some nbrs are identified by router_id, these needs
131 * to be rebuilt. Possible optimization would be to do
132 * oi->nbr_self->router_id = router_id for
133 * !(virtual | ptop) links
135 ospf_nbr_self_reset(oi
, router_id
);
138 /* If AS-external-LSA is queued, then flush those LSAs. */
139 if (router_id_old
.s_addr
== 0 && ospf
->external_origin
) {
140 /* Originate each redistributed external route. */
141 for (type
= 0; type
< ZEBRA_ROUTE_MAX
; type
++)
142 if (ospf
->external_origin
& (1 << type
))
145 ospf_external_lsa_originate_timer
,
147 /* Originate Deafult. */
148 if (ospf
->external_origin
& (1 << ZEBRA_ROUTE_MAX
))
149 thread_add_event(master
,
150 ospf_default_originate_timer
,
153 ospf
->external_origin
= 0;
156 /* Flush (inline) all external LSAs based on the OSPF_LSA_SELF
159 struct route_node
*rn
;
160 struct ospf_lsa
*lsa
;
162 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
)
163 if (IS_LSA_SELF(lsa
))
164 ospf_lsa_flush_schedule(ospf
, lsa
);
167 ospf
->router_id
= router_id
;
168 if (IS_DEBUG_OSPF_EVENT
)
169 zlog_debug("Router-ID[NEW:%s]: Update",
170 inet_ntoa(ospf
->router_id
));
172 /* Flush (inline) all external LSAs which now match the new
174 need to adjust the OSPF_LSA_SELF flag, so the flush doesnt
176 asserts in ospf_refresher_unregister_lsa(). This step is
178 because the current quagga code does look-up for
180 based on the self router-id alone but expects OSPF_LSA_SELF
184 struct route_node
*rn
;
185 struct ospf_lsa
*lsa
;
187 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
) {
188 /* AdvRouter and Router ID is the same. */
189 if (IPV4_ADDR_SAME(&lsa
->data
->adv_router
,
192 OSPF_LSA_SELF_CHECKED
);
193 SET_FLAG(lsa
->flags
, OSPF_LSA_SELF
);
194 ospf_lsa_flush_schedule(ospf
, lsa
);
199 /* Originate each redistributed external route. */
200 for (type
= 0; type
< ZEBRA_ROUTE_MAX
; type
++)
201 thread_add_event(master
,
202 ospf_external_lsa_originate_timer
,
204 thread_add_event(master
, ospf_default_originate_timer
, ospf
, 0,
207 /* update router-lsa's for each area */
208 ospf_router_lsa_update(ospf
);
210 /* update ospf_interface's */
211 FOR_ALL_INTERFACES (vrf
, ifp
)
212 ospf_if_update(ospf
, ifp
);
216 /* For OSPF area sort by area id. */
217 static int ospf_area_id_cmp(struct ospf_area
*a1
, struct ospf_area
*a2
)
219 if (ntohl(a1
->area_id
.s_addr
) > ntohl(a2
->area_id
.s_addr
))
221 if (ntohl(a1
->area_id
.s_addr
) < ntohl(a2
->area_id
.s_addr
))
226 /* Allocate new ospf structure. */
227 static struct ospf
*ospf_new(unsigned short instance
, const char *name
)
230 struct vrf
*vrf
= NULL
;
232 struct ospf
*new = XCALLOC(MTYPE_OSPF_TOP
, sizeof(struct ospf
));
234 new->instance
= instance
;
235 new->router_id
.s_addr
= htonl(0);
236 new->router_id_static
.s_addr
= htonl(0);
237 if (name
&& !strmatch(name
, VRF_DEFAULT_NAME
)) {
238 new->vrf_id
= VRF_UNKNOWN
;
239 /* Freed in ospf_finish_final */
240 new->name
= XSTRDUP(MTYPE_OSPF_TOP
, name
);
241 if (IS_DEBUG_OSPF_EVENT
)
243 "%s: Create new ospf instance with vrf_name %s vrf_id %u",
244 __PRETTY_FUNCTION__
, name
, new->vrf_id
);
246 new->vrf_id
= VRF_DEFAULT
;
247 vrf
= vrf_lookup_by_id(VRF_DEFAULT
);
251 ospf_vrf_link(new, vrf
);
253 ospf_zebra_vrf_register(new);
255 new->abr_type
= OSPF_ABR_DEFAULT
;
256 new->oiflist
= list_new();
257 new->vlinks
= list_new();
258 new->areas
= list_new();
259 new->areas
->cmp
= (int (*)(void *, void *))ospf_area_id_cmp
;
260 new->networks
= route_table_init();
261 new->nbr_nbma
= route_table_init();
263 new->lsdb
= ospf_lsdb_new();
265 new->default_originate
= DEFAULT_ORIGINATE_NONE
;
267 new->passive_interface_default
= OSPF_IF_ACTIVE
;
269 new->new_external_route
= route_table_init();
270 new->old_external_route
= route_table_init();
271 new->external_lsas
= route_table_init();
273 new->stub_router_startup_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
274 new->stub_router_shutdown_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
275 new->stub_router_admin_set
= OSPF_STUB_ROUTER_ADMINISTRATIVE_UNSET
;
277 /* Distribute parameter init. */
278 for (i
= 0; i
<= ZEBRA_ROUTE_MAX
; i
++) {
281 new->default_metric
= -1;
282 new->ref_bandwidth
= OSPF_DEFAULT_REF_BANDWIDTH
;
285 new->min_ls_interval
= OSPF_MIN_LS_INTERVAL
;
286 new->min_ls_arrival
= OSPF_MIN_LS_ARRIVAL
;
288 /* SPF timer value init. */
289 new->spf_delay
= OSPF_SPF_DELAY_DEFAULT
;
290 new->spf_holdtime
= OSPF_SPF_HOLDTIME_DEFAULT
;
291 new->spf_max_holdtime
= OSPF_SPF_MAX_HOLDTIME_DEFAULT
;
292 new->spf_hold_multiplier
= 1;
295 new->maxage_delay
= OSPF_LSA_MAXAGE_REMOVE_DELAY_DEFAULT
;
296 new->maxage_lsa
= route_table_init();
297 new->t_maxage_walker
= NULL
;
298 thread_add_timer(master
, ospf_lsa_maxage_walker
, new,
299 OSPF_LSA_MAXAGE_CHECK_INTERVAL
, &new->t_maxage_walker
);
301 /* Distance table init. */
302 new->distance_table
= route_table_init();
304 new->lsa_refresh_queue
.index
= 0;
305 new->lsa_refresh_interval
= OSPF_LSA_REFRESH_INTERVAL_DEFAULT
;
306 new->t_lsa_refresher
= NULL
;
307 thread_add_timer(master
, ospf_lsa_refresh_walker
, new,
308 new->lsa_refresh_interval
, &new->t_lsa_refresher
);
309 new->lsa_refresher_started
= monotime(NULL
);
311 new->ibuf
= stream_new(OSPF_MAX_PACKET_SIZE
+ 1);
314 new->oi_write_q
= list_new();
315 new->write_oi_count
= OSPF_WRITE_INTERFACE_COUNT_DEFAULT
;
317 /* Enable "log-adjacency-changes" */
318 #if DFLT_OSPF_LOG_ADJACENCY_CHANGES
319 SET_FLAG(new->config
, OSPF_LOG_ADJACENCY_CHANGES
);
325 if ((ospf_sock_init(new)) < 0) {
326 if (new->vrf_id
!= VRF_UNKNOWN
)
329 "%s: ospf_sock_init is unable to open a socket",
333 thread_add_read(master
, ospf_read
, new, new->fd
, &new->t_read
);
338 struct ospf
*ospf_lookup_instance(unsigned short instance
)
341 struct listnode
*node
, *nnode
;
343 if (listcount(om
->ospf
) == 0)
346 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
347 if ((ospf
->instance
== 0 && instance
== 0)
348 || (ospf
->instance
&& instance
349 && ospf
->instance
== instance
))
355 static int ospf_is_ready(struct ospf
*ospf
)
357 /* OSPF must be on and Router-ID must be configured. */
358 if (!ospf
|| ospf
->router_id
.s_addr
== 0)
364 static void ospf_add(struct ospf
*ospf
)
366 listnode_add(om
->ospf
, ospf
);
369 static void ospf_delete(struct ospf
*ospf
)
371 listnode_delete(om
->ospf
, ospf
);
374 struct ospf
*ospf_lookup_by_inst_name(unsigned short instance
, const char *name
)
376 struct ospf
*ospf
= NULL
;
377 struct listnode
*node
, *nnode
;
379 if (name
== NULL
|| strmatch(name
, VRF_DEFAULT_NAME
))
380 return ospf_lookup_by_vrf_id(VRF_DEFAULT
);
382 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
)) {
383 if ((ospf
->instance
== instance
)
384 && ((ospf
->name
== NULL
&& name
== NULL
)
385 || (ospf
->name
&& name
386 && strcmp(ospf
->name
, name
) == 0)))
392 struct ospf
*ospf_get(unsigned short instance
, const char *name
)
396 /* vrf name provided call inst and name based api
397 * in case of no name pass default ospf instance */
399 ospf
= ospf_lookup_by_inst_name(instance
, name
);
401 ospf
= ospf_lookup_by_vrf_id(VRF_DEFAULT
);
404 ospf
= ospf_new(instance
, name
);
407 if (ospf
->router_id_static
.s_addr
== 0)
408 ospf_router_id_update(ospf
);
410 ospf_opaque_type11_lsa_init(ospf
);
416 struct ospf
*ospf_get_instance(unsigned short instance
)
420 ospf
= ospf_lookup_instance(instance
);
422 ospf
= ospf_new(instance
, NULL
/* VRF_DEFAULT*/);
425 if (ospf
->router_id_static
.s_addr
== 0) {
426 if (vrf_lookup_by_id(ospf
->vrf_id
))
427 ospf_router_id_update(ospf
);
429 if (IS_DEBUG_OSPF_EVENT
)
431 "%s: ospf VRF (id %d) is not active yet, skip router id update",
435 ospf_router_id_update(ospf
);
438 ospf_opaque_type11_lsa_init(ospf
);
444 struct ospf
*ospf_lookup_by_vrf_id(vrf_id_t vrf_id
)
446 struct vrf
*vrf
= NULL
;
448 vrf
= vrf_lookup_by_id(vrf_id
);
451 return (vrf
->info
) ? (struct ospf
*)vrf
->info
: NULL
;
454 /* It should only be used when processing incoming info update from zebra.
455 * Other situations, it is not sufficient to lookup the ospf instance by
456 * vrf_name only without using the instance number.
458 static struct ospf
*ospf_lookup_by_name(const char *vrf_name
)
460 struct ospf
*ospf
= NULL
;
461 struct listnode
*node
, *nnode
;
463 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
464 if ((ospf
->name
== NULL
&& vrf_name
== NULL
)
465 || (ospf
->name
&& vrf_name
466 && strcmp(ospf
->name
, vrf_name
) == 0))
471 /* Handle the second half of deferred shutdown. This is called either
472 * from the deferred-shutdown timer thread, or directly through
473 * ospf_deferred_shutdown_check.
475 * Function is to cleanup G-R state, if required then call ospf_finish_final
476 * to complete shutdown of this ospf instance. Possibly exit if the
477 * whole process is being shutdown and this was the last OSPF instance.
479 static void ospf_deferred_shutdown_finish(struct ospf
*ospf
)
481 ospf
->stub_router_shutdown_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
482 OSPF_TIMER_OFF(ospf
->t_deferred_shutdown
);
484 ospf_finish_final(ospf
);
486 /* *ospf is now invalid */
488 /* ospfd being shut-down? If so, was this the last ospf instance? */
489 if (CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
)
490 && (listcount(om
->ospf
) == 0)) {
497 /* Timer thread for G-R */
498 static int ospf_deferred_shutdown_timer(struct thread
*t
)
500 struct ospf
*ospf
= THREAD_ARG(t
);
502 ospf_deferred_shutdown_finish(ospf
);
507 /* Check whether deferred-shutdown must be scheduled, otherwise call
508 * down directly into second-half of instance shutdown.
510 static void ospf_deferred_shutdown_check(struct ospf
*ospf
)
512 unsigned long timeout
;
514 struct ospf_area
*area
;
516 /* deferred shutdown already running? */
517 if (ospf
->t_deferred_shutdown
)
520 /* Should we try push out max-metric LSAs? */
521 if (ospf
->stub_router_shutdown_time
!= OSPF_STUB_ROUTER_UNCONFIGURED
) {
522 for (ALL_LIST_ELEMENTS_RO(ospf
->areas
, ln
, area
)) {
523 SET_FLAG(area
->stub_router_state
,
524 OSPF_AREA_ADMIN_STUB_ROUTED
);
526 if (!CHECK_FLAG(area
->stub_router_state
,
527 OSPF_AREA_IS_STUB_ROUTED
))
528 ospf_router_lsa_update_area(area
);
530 timeout
= ospf
->stub_router_shutdown_time
;
532 /* No timer needed */
533 ospf_deferred_shutdown_finish(ospf
);
537 OSPF_TIMER_ON(ospf
->t_deferred_shutdown
, ospf_deferred_shutdown_timer
,
542 /* Shut down the entire process */
543 void ospf_terminate(void)
546 struct listnode
*node
, *nnode
;
548 /* shutdown already in progress */
549 if (CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
552 SET_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
);
554 /* exit immediately if OSPF not actually running */
555 if (listcount(om
->ospf
) == 0)
559 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
562 /* Cleanup route maps */
565 /* reverse prefix_list_init */
566 prefix_list_add_hook(NULL
);
567 prefix_list_delete_hook(NULL
);
570 /* Cleanup vrf info */
571 ospf_vrf_terminate();
573 /* Deliberately go back up, hopefully to thread scheduler, as
574 * One or more ospf_finish()'s may have deferred shutdown to a timer
577 zclient_stop(zclient
);
578 zclient_free(zclient
);
583 void ospf_finish(struct ospf
*ospf
)
585 /* let deferred shutdown decide */
586 ospf_deferred_shutdown_check(ospf
);
588 /* if ospf_deferred_shutdown returns, then ospf_finish_final is
589 * deferred to expiry of G-S timer thread. Return back up, hopefully
590 * to thread scheduler.
595 /* Final cleanup of ospf instance */
596 static void ospf_finish_final(struct ospf
*ospf
)
598 struct vrf
*vrf
= vrf_lookup_by_id(ospf
->vrf_id
);
599 struct route_node
*rn
;
600 struct ospf_nbr_nbma
*nbr_nbma
;
601 struct ospf_lsa
*lsa
;
602 struct interface
*ifp
;
603 struct ospf_interface
*oi
;
604 struct ospf_area
*area
;
605 struct ospf_vl_data
*vl_data
;
606 struct listnode
*node
, *nnode
;
608 unsigned short instance
= 0;
612 ospf_opaque_type11_lsa_term(ospf
);
614 ospf_opaque_finish();
616 ospf_flush_self_originated_lsas_now(ospf
);
618 /* Unregister redistribution */
619 for (i
= 0; i
< ZEBRA_ROUTE_MAX
; i
++) {
620 struct list
*red_list
;
621 struct ospf_redist
*red
;
623 red_list
= ospf
->redist
[i
];
627 for (ALL_LIST_ELEMENTS(red_list
, node
, nnode
, red
))
628 ospf_redistribute_unset(ospf
, i
, red
->instance
);
630 ospf_redistribute_default_unset(ospf
);
632 for (ALL_LIST_ELEMENTS(ospf
->areas
, node
, nnode
, area
))
633 ospf_remove_vls_through_area(ospf
, area
);
635 for (ALL_LIST_ELEMENTS(ospf
->vlinks
, node
, nnode
, vl_data
))
636 ospf_vl_delete(ospf
, vl_data
);
638 list_delete_and_null(&ospf
->vlinks
);
640 /* Remove any ospf interface config params */
641 FOR_ALL_INTERFACES (vrf
, ifp
) {
642 struct ospf_if_params
*params
;
644 params
= IF_DEF_PARAMS(ifp
);
645 if (OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
646 UNSET_IF_PARAM(params
, if_area
);
649 /* Reset interface. */
650 for (ALL_LIST_ELEMENTS(ospf
->oiflist
, node
, nnode
, oi
))
652 list_delete_and_null(&ospf
->oiflist
);
654 /* De-Register VRF */
655 ospf_zebra_vrf_deregister(ospf
);
657 /* Clear static neighbors */
658 for (rn
= route_top(ospf
->nbr_nbma
); rn
; rn
= route_next(rn
))
659 if ((nbr_nbma
= rn
->info
)) {
660 OSPF_POLL_TIMER_OFF(nbr_nbma
->t_poll
);
663 nbr_nbma
->nbr
->nbr_nbma
= NULL
;
664 nbr_nbma
->nbr
= NULL
;
668 listnode_delete(nbr_nbma
->oi
->nbr_nbma
,
673 XFREE(MTYPE_OSPF_NEIGHBOR_STATIC
, nbr_nbma
);
676 route_table_finish(ospf
->nbr_nbma
);
678 /* Clear networks and Areas. */
679 for (rn
= route_top(ospf
->networks
); rn
; rn
= route_next(rn
)) {
680 struct ospf_network
*network
;
682 if ((network
= rn
->info
) != NULL
) {
683 ospf_network_free(ospf
, network
);
685 route_unlock_node(rn
);
688 route_table_finish(ospf
->networks
);
690 for (ALL_LIST_ELEMENTS(ospf
->areas
, node
, nnode
, area
)) {
691 listnode_delete(ospf
->areas
, area
);
692 ospf_area_free(area
);
695 /* Cancel all timers. */
696 OSPF_TIMER_OFF(ospf
->t_external_lsa
);
697 OSPF_TIMER_OFF(ospf
->t_spf_calc
);
698 OSPF_TIMER_OFF(ospf
->t_ase_calc
);
699 OSPF_TIMER_OFF(ospf
->t_maxage
);
700 OSPF_TIMER_OFF(ospf
->t_maxage_walker
);
701 OSPF_TIMER_OFF(ospf
->t_abr_task
);
702 OSPF_TIMER_OFF(ospf
->t_asbr_check
);
703 OSPF_TIMER_OFF(ospf
->t_distribute_update
);
704 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
705 OSPF_TIMER_OFF(ospf
->t_read
);
706 OSPF_TIMER_OFF(ospf
->t_write
);
707 OSPF_TIMER_OFF(ospf
->t_opaque_lsa_self
);
708 OSPF_TIMER_OFF(ospf
->t_sr_update
);
711 stream_free(ospf
->ibuf
);
713 LSDB_LOOP (OPAQUE_AS_LSDB(ospf
), rn
, lsa
)
714 ospf_discard_from_db(ospf
, ospf
->lsdb
, lsa
);
715 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
)
716 ospf_discard_from_db(ospf
, ospf
->lsdb
, lsa
);
718 ospf_lsdb_delete_all(ospf
->lsdb
);
719 ospf_lsdb_free(ospf
->lsdb
);
721 for (rn
= route_top(ospf
->maxage_lsa
); rn
; rn
= route_next(rn
)) {
722 struct ospf_lsa
*lsa
;
724 if ((lsa
= rn
->info
) != NULL
) {
725 ospf_lsa_unlock(&lsa
);
728 route_unlock_node(rn
);
730 route_table_finish(ospf
->maxage_lsa
);
733 ospf_route_table_free(ospf
->old_table
);
734 if (ospf
->new_table
) {
735 ospf_route_delete(ospf
, ospf
->new_table
);
736 ospf_route_table_free(ospf
->new_table
);
739 ospf_rtrs_free(ospf
->old_rtrs
);
741 ospf_rtrs_free(ospf
->new_rtrs
);
742 if (ospf
->new_external_route
) {
743 ospf_route_delete(ospf
, ospf
->new_external_route
);
744 ospf_route_table_free(ospf
->new_external_route
);
746 if (ospf
->old_external_route
) {
747 ospf_route_delete(ospf
, ospf
->old_external_route
);
748 ospf_route_table_free(ospf
->old_external_route
);
750 if (ospf
->external_lsas
) {
751 ospf_ase_external_lsas_finish(ospf
->external_lsas
);
754 list_delete_and_null(&ospf
->areas
);
755 list_delete_and_null(&ospf
->oi_write_q
);
757 for (i
= ZEBRA_ROUTE_SYSTEM
; i
<= ZEBRA_ROUTE_MAX
; i
++) {
758 struct list
*ext_list
;
759 struct listnode
*node
;
760 struct ospf_external
*ext
;
762 ext_list
= ospf
->external
[i
];
766 for (ALL_LIST_ELEMENTS_RO(ext_list
, node
, ext
)) {
767 if (ext
->external_info
)
768 for (rn
= route_top(ext
->external_info
); rn
;
769 rn
= route_next(rn
)) {
770 if (rn
->info
== NULL
)
773 XFREE(MTYPE_OSPF_EXTERNAL_INFO
,
776 route_unlock_node(rn
);
781 ospf_distance_reset(ospf
);
782 route_table_finish(ospf
->distance_table
);
784 if (!CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
785 instance
= ospf
->instance
;
790 vrf
= vrf_lookup_by_name(ospf
->name
);
792 ospf_vrf_unlink(ospf
, vrf
);
793 XFREE(MTYPE_OSPF_TOP
, ospf
->name
);
795 vrf
= vrf_lookup_by_id(VRF_DEFAULT
);
797 ospf_vrf_unlink(ospf
, vrf
);
800 XFREE(MTYPE_OSPF_TOP
, ospf
);
802 if (!CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
803 ospf_get_instance(instance
);
807 /* allocate new OSPF Area object */
808 static struct ospf_area
*ospf_area_new(struct ospf
*ospf
,
809 struct in_addr area_id
)
811 struct ospf_area
*new;
813 /* Allocate new config_network. */
814 new = XCALLOC(MTYPE_OSPF_AREA
, sizeof(struct ospf_area
));
818 new->area_id
= area_id
;
819 new->area_id_fmt
= OSPF_AREA_ID_FMT_DOTTEDQUAD
;
821 new->external_routing
= OSPF_AREA_DEFAULT
;
822 new->default_cost
= 1;
823 new->auth_type
= OSPF_AUTH_NULL
;
826 new->lsdb
= ospf_lsdb_new();
828 /* Self-originated LSAs initialize. */
829 new->router_lsa_self
= NULL
;
831 ospf_opaque_type10_lsa_init(new);
833 new->oiflist
= list_new();
834 new->ranges
= route_table_init();
836 if (area_id
.s_addr
== OSPF_AREA_BACKBONE
)
837 ospf
->backbone
= new;
842 static void ospf_area_free(struct ospf_area
*area
)
844 struct route_node
*rn
;
845 struct ospf_lsa
*lsa
;
847 ospf_opaque_type10_lsa_term(area
);
850 LSDB_LOOP (ROUTER_LSDB(area
), rn
, lsa
)
851 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
852 LSDB_LOOP (NETWORK_LSDB(area
), rn
, lsa
)
853 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
854 LSDB_LOOP (SUMMARY_LSDB(area
), rn
, lsa
)
855 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
856 LSDB_LOOP (ASBR_SUMMARY_LSDB(area
), rn
, lsa
)
857 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
859 LSDB_LOOP (NSSA_LSDB(area
), rn
, lsa
)
860 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
861 LSDB_LOOP (OPAQUE_AREA_LSDB(area
), rn
, lsa
)
862 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
863 LSDB_LOOP (OPAQUE_LINK_LSDB(area
), rn
, lsa
)
864 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
866 ospf_lsdb_delete_all(area
->lsdb
);
867 ospf_lsdb_free(area
->lsdb
);
869 ospf_lsa_unlock(&area
->router_lsa_self
);
871 route_table_finish(area
->ranges
);
872 list_delete_and_null(&area
->oiflist
);
874 if (EXPORT_NAME(area
))
875 free(EXPORT_NAME(area
));
877 if (IMPORT_NAME(area
))
878 free(IMPORT_NAME(area
));
881 OSPF_TIMER_OFF(area
->t_stub_router
);
882 OSPF_TIMER_OFF(area
->t_opaque_lsa_self
);
884 if (OSPF_IS_AREA_BACKBONE(area
))
885 area
->ospf
->backbone
= NULL
;
887 XFREE(MTYPE_OSPF_AREA
, area
);
890 void ospf_area_check_free(struct ospf
*ospf
, struct in_addr area_id
)
892 struct ospf_area
*area
;
894 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
895 if (area
&& listcount(area
->oiflist
) == 0 && area
->ranges
->top
== NULL
896 && area
->shortcut_configured
== OSPF_SHORTCUT_DEFAULT
897 && area
->external_routing
== OSPF_AREA_DEFAULT
898 && area
->no_summary
== 0 && area
->default_cost
== 1
899 && EXPORT_NAME(area
) == NULL
&& IMPORT_NAME(area
) == NULL
900 && area
->auth_type
== OSPF_AUTH_NULL
) {
901 listnode_delete(ospf
->areas
, area
);
902 ospf_area_free(area
);
906 struct ospf_area
*ospf_area_get(struct ospf
*ospf
, struct in_addr area_id
)
908 struct ospf_area
*area
;
910 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
912 area
= ospf_area_new(ospf
, area_id
);
913 listnode_add_sort(ospf
->areas
, area
);
914 ospf_check_abr_status(ospf
);
915 if (ospf
->stub_router_admin_set
916 == OSPF_STUB_ROUTER_ADMINISTRATIVE_SET
) {
917 SET_FLAG(area
->stub_router_state
,
918 OSPF_AREA_ADMIN_STUB_ROUTED
);
925 struct ospf_area
*ospf_area_lookup_by_area_id(struct ospf
*ospf
,
926 struct in_addr area_id
)
928 struct ospf_area
*area
;
929 struct listnode
*node
;
931 for (ALL_LIST_ELEMENTS_RO(ospf
->areas
, node
, area
))
932 if (IPV4_ADDR_SAME(&area
->area_id
, &area_id
))
938 void ospf_area_add_if(struct ospf_area
*area
, struct ospf_interface
*oi
)
940 listnode_add(area
->oiflist
, oi
);
943 void ospf_area_del_if(struct ospf_area
*area
, struct ospf_interface
*oi
)
945 listnode_delete(area
->oiflist
, oi
);
949 static void add_ospf_interface(struct connected
*co
, struct ospf_area
*area
)
951 struct ospf_interface
*oi
;
953 oi
= ospf_if_new(area
->ospf
, co
->ifp
, co
->address
);
958 oi
->params
= ospf_lookup_if_params(co
->ifp
, oi
->address
->u
.prefix4
);
959 oi
->output_cost
= ospf_if_get_output_cost(oi
);
961 /* Relate ospf interface to ospf instance. */
962 oi
->ospf
= area
->ospf
;
964 /* update network type as interface flag */
965 /* If network type is specified previously,
966 skip network type setting. */
967 oi
->type
= IF_DEF_PARAMS(co
->ifp
)->type
;
969 /* Add pseudo neighbor. */
970 ospf_nbr_self_reset(oi
, oi
->ospf
->router_id
);
972 ospf_area_add_if(oi
->area
, oi
);
975 * if router_id is not configured, dont bring up
977 * ospf_router_id_update() will call ospf_if_update
978 * whenever r-id is configured instead.
980 if ((area
->ospf
->router_id
.s_addr
!= 0) && if_is_operative(co
->ifp
))
984 static void update_redistributed(struct ospf
*ospf
, int add_to_ospf
)
986 struct route_node
*rn
;
987 struct external_info
*ei
;
988 struct ospf_external
*ext
;
990 if (ospf_is_type_redistributed(ospf
, ZEBRA_ROUTE_CONNECT
, 0)) {
991 ext
= ospf_external_lookup(ospf
, ZEBRA_ROUTE_CONNECT
, 0);
992 if ((ext
) && EXTERNAL_INFO(ext
)) {
993 for (rn
= route_top(EXTERNAL_INFO(ext
)); rn
;
994 rn
= route_next(rn
)) {
1000 if (ospf_external_info_find_lsa(ospf
,
1002 if (!ospf_distribute_check_connected(
1004 ospf_external_lsa_flush(
1007 ei
->ifindex
/*, ei->nexthop */);
1009 if (!ospf_external_info_find_lsa(
1011 if (ospf_distribute_check_connected(
1013 ospf_external_lsa_originate(
1021 /* Config network statement related functions. */
1022 static struct ospf_network
*ospf_network_new(struct in_addr area_id
)
1024 struct ospf_network
*new;
1025 new = XCALLOC(MTYPE_OSPF_NETWORK
, sizeof(struct ospf_network
));
1027 new->area_id
= area_id
;
1028 new->area_id_fmt
= OSPF_AREA_ID_FMT_DOTTEDQUAD
;
1033 static void ospf_network_free(struct ospf
*ospf
, struct ospf_network
*network
)
1035 ospf_area_check_free(ospf
, network
->area_id
);
1036 ospf_schedule_abr_task(ospf
);
1037 XFREE(MTYPE_OSPF_NETWORK
, network
);
1040 int ospf_network_set(struct ospf
*ospf
, struct prefix_ipv4
*p
,
1041 struct in_addr area_id
, int df
)
1043 struct ospf_network
*network
;
1044 struct ospf_area
*area
;
1045 struct route_node
*rn
;
1047 rn
= route_node_get(ospf
->networks
, (struct prefix
*)p
);
1050 route_unlock_node(rn
);
1052 if (IPV4_ADDR_SAME(&area_id
, &network
->area_id
)) {
1055 /* There is already same network statement. */
1060 rn
->info
= network
= ospf_network_new(area_id
);
1061 network
->area_id_fmt
= df
;
1062 area
= ospf_area_get(ospf
, area_id
);
1063 ospf_area_display_format_set(ospf
, area
, df
);
1065 /* Run network config now. */
1066 ospf_network_run((struct prefix
*)p
, area
);
1068 /* Update connected redistribute. */
1069 update_redistributed(ospf
, 1); /* interfaces possibly added */
1071 ospf_area_check_free(ospf
, area_id
);
1076 int ospf_network_unset(struct ospf
*ospf
, struct prefix_ipv4
*p
,
1077 struct in_addr area_id
)
1079 struct route_node
*rn
;
1080 struct ospf_network
*network
;
1081 struct listnode
*node
, *nnode
;
1082 struct ospf_interface
*oi
;
1084 rn
= route_node_lookup(ospf
->networks
, (struct prefix
*)p
);
1089 route_unlock_node(rn
);
1090 if (!IPV4_ADDR_SAME(&area_id
, &network
->area_id
))
1093 ospf_network_free(ospf
, rn
->info
);
1095 route_unlock_node(rn
); /* initial reference */
1097 /* Find interfaces that are not configured already. */
1098 for (ALL_LIST_ELEMENTS(ospf
->oiflist
, node
, nnode
, oi
)) {
1100 if (oi
->type
== OSPF_IFTYPE_VIRTUALLINK
)
1103 ospf_network_run_subnet(ospf
, oi
->connected
, NULL
, NULL
);
1106 /* Update connected redistribute. */
1107 update_redistributed(ospf
, 0); /* interfaces possibly removed */
1108 ospf_area_check_free(ospf
, area_id
);
1113 /* Ensure there's an OSPF instance, as "ip ospf area" enabled OSPF means
1114 * there might not be any 'router ospf' config.
1116 * Otherwise, doesn't do anything different to ospf_if_update for now
1118 void ospf_interface_area_set(struct ospf
*ospf
, struct interface
*ifp
)
1123 ospf_if_update(ospf
, ifp
);
1124 /* if_update does a update_redistributed */
1129 void ospf_interface_area_unset(struct ospf
*ospf
, struct interface
*ifp
)
1131 struct route_node
*rn_oi
;
1134 return; /* Ospf not ready yet */
1136 /* Find interfaces that may need to be removed. */
1137 for (rn_oi
= route_top(IF_OIFS(ifp
)); rn_oi
;
1138 rn_oi
= route_next(rn_oi
)) {
1139 struct ospf_interface
*oi
= NULL
;
1141 if ((oi
= rn_oi
->info
) == NULL
)
1144 if (oi
->type
== OSPF_IFTYPE_VIRTUALLINK
)
1147 ospf_network_run_subnet(ospf
, oi
->connected
, NULL
, NULL
);
1150 /* Update connected redistribute. */
1151 update_redistributed(ospf
, 0); /* interfaces possibly removed */
1154 /* Check whether interface matches given network
1155 * returns: 1, true. 0, false
1157 static int ospf_network_match_iface(const struct connected
*co
,
1158 const struct prefix
*net
)
1160 /* new approach: more elegant and conceptually clean */
1161 return prefix_match_network_statement(net
, CONNECTED_PREFIX(co
));
1164 static void ospf_update_interface_area(struct connected
*co
,
1165 struct ospf_area
*area
)
1167 struct ospf_interface
*oi
= ospf_if_table_lookup(co
->ifp
, co
->address
);
1169 /* nothing to be done case */
1170 if (oi
&& oi
->area
== area
) {
1177 add_ospf_interface(co
, area
);
1180 /* Run OSPF for the given subnet, taking into account the following
1181 * possible sources of area configuration, in the given order of preference:
1183 * - Whether there is interface+address specific area configuration
1184 * - Whether there is a default area for the interface
1185 * - Whether there is an area given as a parameter.
1186 * - If no specific network prefix/area is supplied, whether there's
1187 * a matching network configured.
1189 static void ospf_network_run_subnet(struct ospf
*ospf
, struct connected
*co
,
1191 struct ospf_area
*given_area
)
1193 struct ospf_interface
*oi
;
1194 struct ospf_if_params
*params
;
1195 struct ospf_area
*area
= NULL
;
1196 struct route_node
*rn
;
1199 if (CHECK_FLAG(co
->flags
, ZEBRA_IFA_SECONDARY
))
1202 if (co
->address
->family
!= AF_INET
)
1205 /* Try determine the appropriate area for this interface + address
1206 * Start by checking interface config
1208 params
= ospf_lookup_if_params(co
->ifp
, co
->address
->u
.prefix4
);
1209 if (params
&& OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
1210 area
= ospf_area_get(ospf
, params
->if_area
);
1212 params
= IF_DEF_PARAMS(co
->ifp
);
1213 if (OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
1214 area
= ospf_area_get(ospf
, params
->if_area
);
1217 /* If we've found an interface and/or addr specific area, then we're
1221 ospf_update_interface_area(co
, area
);
1225 /* Otherwise, only remaining possibility is a matching network statement
1228 assert(given_area
!= NULL
);
1230 /* Which either was supplied as a parameter.. (e.g. cause a new
1231 * network/area was just added)..
1233 if (p
->family
== co
->address
->family
1234 && ospf_network_match_iface(co
, p
))
1235 ospf_update_interface_area(co
, given_area
);
1240 /* Else we have to search the existing network/area config to see
1243 for (rn
= route_top(ospf
->networks
); rn
; rn
= route_next(rn
))
1244 if (rn
->info
!= NULL
&& ospf_network_match_iface(co
, &rn
->p
)) {
1245 struct ospf_network
*network
=
1246 (struct ospf_network
*)rn
->info
;
1247 area
= ospf_area_get(ospf
, network
->area_id
);
1248 ospf_update_interface_area(co
, area
);
1252 /* If the subnet isn't in any area, deconfigure */
1253 if (!configed
&& (oi
= ospf_if_table_lookup(co
->ifp
, co
->address
)))
1257 static void ospf_network_run_interface(struct ospf
*ospf
, struct interface
*ifp
,
1259 struct ospf_area
*given_area
)
1261 struct listnode
*cnode
;
1262 struct connected
*co
;
1264 if (memcmp(ifp
->name
, "VLINK", 5) == 0)
1267 /* Network prefix without area is nonsensical */
1269 assert(given_area
!= NULL
);
1271 /* if interface prefix is match specified prefix,
1272 then create socket and join multicast group. */
1273 for (ALL_LIST_ELEMENTS_RO(ifp
->connected
, cnode
, co
))
1274 ospf_network_run_subnet(ospf
, co
, p
, given_area
);
1277 static void ospf_network_run(struct prefix
*p
, struct ospf_area
*area
)
1279 struct vrf
*vrf
= vrf_lookup_by_id(area
->ospf
->vrf_id
);
1280 struct interface
*ifp
;
1282 /* Schedule Router ID Update. */
1283 if (area
->ospf
->router_id
.s_addr
== 0)
1284 ospf_router_id_update(area
->ospf
);
1286 /* Get target interface. */
1287 FOR_ALL_INTERFACES (vrf
, ifp
)
1288 ospf_network_run_interface(area
->ospf
, ifp
, p
, area
);
1291 void ospf_ls_upd_queue_empty(struct ospf_interface
*oi
)
1293 struct route_node
*rn
;
1294 struct listnode
*node
, *nnode
;
1296 struct ospf_lsa
*lsa
;
1298 /* empty ls update queue */
1299 for (rn
= route_top(oi
->ls_upd_queue
); rn
; rn
= route_next(rn
))
1300 if ((lst
= (struct list
*)rn
->info
)) {
1301 for (ALL_LIST_ELEMENTS(lst
, node
, nnode
, lsa
))
1302 ospf_lsa_unlock(&lsa
); /* oi->ls_upd_queue */
1303 list_delete_and_null(&lst
);
1307 /* remove update event */
1308 if (oi
->t_ls_upd_event
) {
1309 thread_cancel(oi
->t_ls_upd_event
);
1310 oi
->t_ls_upd_event
= NULL
;
1314 void ospf_if_update(struct ospf
*ospf
, struct interface
*ifp
)
1320 if (IS_DEBUG_OSPF_EVENT
)
1322 "%s: interface %s ifp->vrf_id %u ospf vrf %s vrf_id %u router_id %s",
1323 __PRETTY_FUNCTION__
, ifp
->name
, ifp
->vrf_id
,
1324 ospf_vrf_id_to_name(ospf
->vrf_id
), ospf
->vrf_id
,
1325 inet_ntoa(ospf
->router_id
));
1327 /* OSPF must be ready. */
1328 if (!ospf_is_ready(ospf
))
1331 ospf_network_run_interface(ospf
, ifp
, NULL
, NULL
);
1333 /* Update connected redistribute. */
1334 update_redistributed(ospf
, 1);
1337 void ospf_remove_vls_through_area(struct ospf
*ospf
, struct ospf_area
*area
)
1339 struct listnode
*node
, *nnode
;
1340 struct ospf_vl_data
*vl_data
;
1342 for (ALL_LIST_ELEMENTS(ospf
->vlinks
, node
, nnode
, vl_data
))
1343 if (IPV4_ADDR_SAME(&vl_data
->vl_area_id
, &area
->area_id
))
1344 ospf_vl_delete(ospf
, vl_data
);
1348 static const struct message ospf_area_type_msg
[] = {
1349 {OSPF_AREA_DEFAULT
, "Default"},
1350 {OSPF_AREA_STUB
, "Stub"},
1351 {OSPF_AREA_NSSA
, "NSSA"},
1354 static void ospf_area_type_set(struct ospf_area
*area
, int type
)
1356 struct listnode
*node
;
1357 struct ospf_interface
*oi
;
1359 if (area
->external_routing
== type
) {
1360 if (IS_DEBUG_OSPF_EVENT
)
1361 zlog_debug("Area[%s]: Types are the same, ignored.",
1362 inet_ntoa(area
->area_id
));
1366 area
->external_routing
= type
;
1368 if (IS_DEBUG_OSPF_EVENT
)
1369 zlog_debug("Area[%s]: Configured as %s",
1370 inet_ntoa(area
->area_id
),
1371 lookup_msg(ospf_area_type_msg
, type
, NULL
));
1373 switch (area
->external_routing
) {
1374 case OSPF_AREA_DEFAULT
:
1375 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1376 if (oi
->nbr_self
!= NULL
) {
1377 UNSET_FLAG(oi
->nbr_self
->options
,
1379 SET_FLAG(oi
->nbr_self
->options
, OSPF_OPTION_E
);
1382 case OSPF_AREA_STUB
:
1383 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1384 if (oi
->nbr_self
!= NULL
) {
1385 if (IS_DEBUG_OSPF_EVENT
)
1387 "setting options on %s accordingly",
1389 UNSET_FLAG(oi
->nbr_self
->options
,
1391 UNSET_FLAG(oi
->nbr_self
->options
,
1393 if (IS_DEBUG_OSPF_EVENT
)
1394 zlog_debug("options set on %s: %x",
1395 IF_NAME(oi
), OPTIONS(oi
));
1398 case OSPF_AREA_NSSA
:
1399 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1400 if (oi
->nbr_self
!= NULL
) {
1402 "setting nssa options on %s accordingly",
1404 UNSET_FLAG(oi
->nbr_self
->options
,
1406 SET_FLAG(oi
->nbr_self
->options
, OSPF_OPTION_NP
);
1407 zlog_debug("options set on %s: %x", IF_NAME(oi
),
1415 ospf_router_lsa_update_area(area
);
1416 ospf_schedule_abr_task(area
->ospf
);
1419 int ospf_area_shortcut_set(struct ospf
*ospf
, struct ospf_area
*area
, int mode
)
1421 if (area
->shortcut_configured
== mode
)
1424 area
->shortcut_configured
= mode
;
1425 ospf_router_lsa_update_area(area
);
1426 ospf_schedule_abr_task(ospf
);
1428 ospf_area_check_free(ospf
, area
->area_id
);
1433 int ospf_area_shortcut_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1435 area
->shortcut_configured
= OSPF_SHORTCUT_DEFAULT
;
1436 ospf_router_lsa_update_area(area
);
1437 ospf_area_check_free(ospf
, area
->area_id
);
1438 ospf_schedule_abr_task(ospf
);
1443 static int ospf_area_vlink_count(struct ospf
*ospf
, struct ospf_area
*area
)
1445 struct ospf_vl_data
*vl
;
1446 struct listnode
*node
;
1449 for (ALL_LIST_ELEMENTS_RO(ospf
->vlinks
, node
, vl
))
1450 if (IPV4_ADDR_SAME(&vl
->vl_area_id
, &area
->area_id
))
1456 int ospf_area_display_format_set(struct ospf
*ospf
, struct ospf_area
*area
,
1459 area
->area_id_fmt
= df
;
1464 int ospf_area_stub_set(struct ospf
*ospf
, struct in_addr area_id
)
1466 struct ospf_area
*area
;
1468 area
= ospf_area_get(ospf
, area_id
);
1469 if (ospf_area_vlink_count(ospf
, area
))
1472 if (area
->external_routing
!= OSPF_AREA_STUB
)
1473 ospf_area_type_set(area
, OSPF_AREA_STUB
);
1478 int ospf_area_stub_unset(struct ospf
*ospf
, struct in_addr area_id
)
1480 struct ospf_area
*area
;
1482 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1486 if (area
->external_routing
== OSPF_AREA_STUB
)
1487 ospf_area_type_set(area
, OSPF_AREA_DEFAULT
);
1489 ospf_area_check_free(ospf
, area_id
);
1494 int ospf_area_no_summary_set(struct ospf
*ospf
, struct in_addr area_id
)
1496 struct ospf_area
*area
;
1498 area
= ospf_area_get(ospf
, area_id
);
1499 area
->no_summary
= 1;
1504 int ospf_area_no_summary_unset(struct ospf
*ospf
, struct in_addr area_id
)
1506 struct ospf_area
*area
;
1508 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1512 area
->no_summary
= 0;
1513 ospf_area_check_free(ospf
, area_id
);
1518 int ospf_area_nssa_no_summary_set(struct ospf
*ospf
, struct in_addr area_id
)
1520 struct ospf_area
*area
;
1522 area
= ospf_area_get(ospf
, area_id
);
1523 if (ospf_area_vlink_count(ospf
, area
))
1526 if (area
->external_routing
!= OSPF_AREA_NSSA
) {
1527 ospf_area_type_set(area
, OSPF_AREA_NSSA
);
1529 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1532 ospf_area_no_summary_set(ospf
, area_id
);
1537 int ospf_area_nssa_set(struct ospf
*ospf
, struct in_addr area_id
)
1539 struct ospf_area
*area
;
1541 area
= ospf_area_get(ospf
, area_id
);
1542 if (ospf_area_vlink_count(ospf
, area
))
1545 if (area
->external_routing
!= OSPF_AREA_NSSA
) {
1546 ospf_area_type_set(area
, OSPF_AREA_NSSA
);
1549 /* set NSSA area defaults */
1550 area
->no_summary
= 0;
1551 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1552 area
->NSSATranslatorState
= OSPF_NSSA_TRANSLATE_DISABLED
;
1553 area
->NSSATranslatorStabilityInterval
=
1554 OSPF_NSSA_TRANS_STABLE_DEFAULT
;
1559 int ospf_area_nssa_unset(struct ospf
*ospf
, struct in_addr area_id
, int argc
)
1561 struct ospf_area
*area
;
1563 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1567 /* argc < 5 -> 'no area x nssa' */
1568 if (argc
< 5 && area
->external_routing
== OSPF_AREA_NSSA
) {
1570 /* set NSSA area defaults */
1571 area
->no_summary
= 0;
1572 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1573 area
->NSSATranslatorState
= OSPF_NSSA_TRANSLATE_DISABLED
;
1574 area
->NSSATranslatorStabilityInterval
=
1575 OSPF_NSSA_TRANS_STABLE_DEFAULT
;
1576 ospf_area_type_set(area
, OSPF_AREA_DEFAULT
);
1578 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1581 ospf_area_check_free(ospf
, area_id
);
1586 int ospf_area_nssa_translator_role_set(struct ospf
*ospf
,
1587 struct in_addr area_id
, int role
)
1589 struct ospf_area
*area
;
1591 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1595 area
->NSSATranslatorRole
= role
;
1601 /* XXX: unused? Leave for symmetry? */
1603 ospf_area_nssa_translator_role_unset (struct ospf
*ospf
,
1604 struct in_addr area_id
)
1606 struct ospf_area
*area
;
1608 area
= ospf_area_lookup_by_area_id (ospf
, area_id
);
1612 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1614 ospf_area_check_free (ospf
, area_id
);
1620 int ospf_area_export_list_set(struct ospf
*ospf
, struct ospf_area
*area
,
1621 const char *list_name
)
1623 struct access_list
*list
;
1624 list
= access_list_lookup(AFI_IP
, list_name
);
1626 EXPORT_LIST(area
) = list
;
1628 if (EXPORT_NAME(area
))
1629 free(EXPORT_NAME(area
));
1631 EXPORT_NAME(area
) = strdup(list_name
);
1632 ospf_schedule_abr_task(ospf
);
1637 int ospf_area_export_list_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1640 EXPORT_LIST(area
) = 0;
1642 if (EXPORT_NAME(area
))
1643 free(EXPORT_NAME(area
));
1645 EXPORT_NAME(area
) = NULL
;
1647 ospf_area_check_free(ospf
, area
->area_id
);
1649 ospf_schedule_abr_task(ospf
);
1654 int ospf_area_import_list_set(struct ospf
*ospf
, struct ospf_area
*area
,
1657 struct access_list
*list
;
1658 list
= access_list_lookup(AFI_IP
, name
);
1660 IMPORT_LIST(area
) = list
;
1662 if (IMPORT_NAME(area
))
1663 free(IMPORT_NAME(area
));
1665 IMPORT_NAME(area
) = strdup(name
);
1666 ospf_schedule_abr_task(ospf
);
1671 int ospf_area_import_list_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1673 IMPORT_LIST(area
) = 0;
1675 if (IMPORT_NAME(area
))
1676 free(IMPORT_NAME(area
));
1678 IMPORT_NAME(area
) = NULL
;
1679 ospf_area_check_free(ospf
, area
->area_id
);
1681 ospf_schedule_abr_task(ospf
);
1686 int ospf_timers_refresh_set(struct ospf
*ospf
, int interval
)
1690 if (ospf
->lsa_refresh_interval
== interval
)
1693 time_left
= ospf
->lsa_refresh_interval
1694 - (monotime(NULL
) - ospf
->lsa_refresher_started
);
1696 if (time_left
> interval
) {
1697 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
1698 thread_add_timer(master
, ospf_lsa_refresh_walker
, ospf
,
1699 interval
, &ospf
->t_lsa_refresher
);
1701 ospf
->lsa_refresh_interval
= interval
;
1706 int ospf_timers_refresh_unset(struct ospf
*ospf
)
1710 time_left
= ospf
->lsa_refresh_interval
1711 - (monotime(NULL
) - ospf
->lsa_refresher_started
);
1713 if (time_left
> OSPF_LSA_REFRESH_INTERVAL_DEFAULT
) {
1714 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
1715 ospf
->t_lsa_refresher
= NULL
;
1716 thread_add_timer(master
, ospf_lsa_refresh_walker
, ospf
,
1717 OSPF_LSA_REFRESH_INTERVAL_DEFAULT
,
1718 &ospf
->t_lsa_refresher
);
1721 ospf
->lsa_refresh_interval
= OSPF_LSA_REFRESH_INTERVAL_DEFAULT
;
1727 static struct ospf_nbr_nbma
*ospf_nbr_nbma_new(void)
1729 struct ospf_nbr_nbma
*nbr_nbma
;
1731 nbr_nbma
= XCALLOC(MTYPE_OSPF_NEIGHBOR_STATIC
,
1732 sizeof(struct ospf_nbr_nbma
));
1734 nbr_nbma
->priority
= OSPF_NEIGHBOR_PRIORITY_DEFAULT
;
1735 nbr_nbma
->v_poll
= OSPF_POLL_INTERVAL_DEFAULT
;
1740 static void ospf_nbr_nbma_free(struct ospf_nbr_nbma
*nbr_nbma
)
1742 XFREE(MTYPE_OSPF_NEIGHBOR_STATIC
, nbr_nbma
);
1745 static void ospf_nbr_nbma_delete(struct ospf
*ospf
,
1746 struct ospf_nbr_nbma
*nbr_nbma
)
1748 struct route_node
*rn
;
1749 struct prefix_ipv4 p
;
1752 p
.prefix
= nbr_nbma
->addr
;
1753 p
.prefixlen
= IPV4_MAX_BITLEN
;
1755 rn
= route_node_lookup(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1757 ospf_nbr_nbma_free(rn
->info
);
1759 route_unlock_node(rn
);
1760 route_unlock_node(rn
);
1764 static void ospf_nbr_nbma_down(struct ospf_nbr_nbma
*nbr_nbma
)
1766 OSPF_TIMER_OFF(nbr_nbma
->t_poll
);
1768 if (nbr_nbma
->nbr
) {
1769 nbr_nbma
->nbr
->nbr_nbma
= NULL
;
1770 OSPF_NSM_EVENT_EXECUTE(nbr_nbma
->nbr
, NSM_KillNbr
);
1774 listnode_delete(nbr_nbma
->oi
->nbr_nbma
, nbr_nbma
);
1777 static void ospf_nbr_nbma_add(struct ospf_nbr_nbma
*nbr_nbma
,
1778 struct ospf_interface
*oi
)
1780 struct ospf_neighbor
*nbr
;
1781 struct route_node
*rn
;
1784 if (oi
->type
!= OSPF_IFTYPE_NBMA
)
1787 if (nbr_nbma
->nbr
!= NULL
)
1790 if (IPV4_ADDR_SAME(&oi
->nbr_self
->address
.u
.prefix4
, &nbr_nbma
->addr
))
1794 listnode_add(oi
->nbr_nbma
, nbr_nbma
);
1796 /* Get neighbor information from table. */
1798 p
.prefixlen
= IPV4_MAX_BITLEN
;
1799 p
.u
.prefix4
= nbr_nbma
->addr
;
1801 rn
= route_node_get(oi
->nbrs
, (struct prefix
*)&p
);
1804 nbr
->nbr_nbma
= nbr_nbma
;
1805 nbr_nbma
->nbr
= nbr
;
1807 route_unlock_node(rn
);
1809 nbr
= rn
->info
= ospf_nbr_new(oi
);
1810 nbr
->state
= NSM_Down
;
1811 nbr
->src
= nbr_nbma
->addr
;
1812 nbr
->nbr_nbma
= nbr_nbma
;
1813 nbr
->priority
= nbr_nbma
->priority
;
1816 nbr_nbma
->nbr
= nbr
;
1818 OSPF_NSM_EVENT_EXECUTE(nbr
, NSM_Start
);
1822 void ospf_nbr_nbma_if_update(struct ospf
*ospf
, struct ospf_interface
*oi
)
1824 struct ospf_nbr_nbma
*nbr_nbma
;
1825 struct route_node
*rn
;
1826 struct prefix_ipv4 p
;
1828 if (oi
->type
!= OSPF_IFTYPE_NBMA
)
1831 for (rn
= route_top(ospf
->nbr_nbma
); rn
; rn
= route_next(rn
))
1832 if ((nbr_nbma
= rn
->info
))
1833 if (nbr_nbma
->oi
== NULL
&& nbr_nbma
->nbr
== NULL
) {
1835 p
.prefix
= nbr_nbma
->addr
;
1836 p
.prefixlen
= IPV4_MAX_BITLEN
;
1838 if (prefix_match(oi
->address
,
1839 (struct prefix
*)&p
))
1840 ospf_nbr_nbma_add(nbr_nbma
, oi
);
1844 struct ospf_nbr_nbma
*ospf_nbr_nbma_lookup(struct ospf
*ospf
,
1845 struct in_addr nbr_addr
)
1847 struct route_node
*rn
;
1848 struct prefix_ipv4 p
;
1851 p
.prefix
= nbr_addr
;
1852 p
.prefixlen
= IPV4_MAX_BITLEN
;
1854 rn
= route_node_lookup(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1856 route_unlock_node(rn
);
1862 struct ospf_nbr_nbma
*ospf_nbr_nbma_lookup_next(struct ospf
*ospf
,
1863 struct in_addr
*addr
, int first
)
1866 struct ospf_nbr_nbma
*nbr_nbma
;
1867 struct listnode
*node
;
1874 for (ALL_LIST_ELEMENTS_RO (ospf
->nbr_nbma
, node
, nbr_nbma
))
1878 *addr
= nbr_nbma
->addr
;
1881 else if (ntohl (nbr_nbma
->addr
.s_addr
) > ntohl (addr
->s_addr
))
1883 *addr
= nbr_nbma
->addr
;
1891 int ospf_nbr_nbma_set(struct ospf
*ospf
, struct in_addr nbr_addr
)
1893 struct ospf_nbr_nbma
*nbr_nbma
;
1894 struct ospf_interface
*oi
;
1895 struct prefix_ipv4 p
;
1896 struct route_node
*rn
;
1897 struct listnode
*node
;
1899 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1903 nbr_nbma
= ospf_nbr_nbma_new();
1904 nbr_nbma
->addr
= nbr_addr
;
1907 p
.prefix
= nbr_addr
;
1908 p
.prefixlen
= IPV4_MAX_BITLEN
;
1910 rn
= route_node_get(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1912 route_unlock_node(rn
);
1913 rn
->info
= nbr_nbma
;
1915 for (ALL_LIST_ELEMENTS_RO(ospf
->oiflist
, node
, oi
)) {
1916 if (oi
->type
== OSPF_IFTYPE_NBMA
)
1917 if (prefix_match(oi
->address
, (struct prefix
*)&p
)) {
1918 ospf_nbr_nbma_add(nbr_nbma
, oi
);
1926 int ospf_nbr_nbma_unset(struct ospf
*ospf
, struct in_addr nbr_addr
)
1928 struct ospf_nbr_nbma
*nbr_nbma
;
1930 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1931 if (nbr_nbma
== NULL
)
1934 ospf_nbr_nbma_down(nbr_nbma
);
1935 ospf_nbr_nbma_delete(ospf
, nbr_nbma
);
1940 int ospf_nbr_nbma_priority_set(struct ospf
*ospf
, struct in_addr nbr_addr
,
1943 struct ospf_nbr_nbma
*nbr_nbma
;
1945 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1946 if (nbr_nbma
== NULL
)
1949 if (nbr_nbma
->priority
!= priority
)
1950 nbr_nbma
->priority
= priority
;
1955 int ospf_nbr_nbma_priority_unset(struct ospf
*ospf
, struct in_addr nbr_addr
)
1957 struct ospf_nbr_nbma
*nbr_nbma
;
1959 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1960 if (nbr_nbma
== NULL
)
1963 if (nbr_nbma
!= OSPF_NEIGHBOR_PRIORITY_DEFAULT
)
1964 nbr_nbma
->priority
= OSPF_NEIGHBOR_PRIORITY_DEFAULT
;
1969 int ospf_nbr_nbma_poll_interval_set(struct ospf
*ospf
, struct in_addr nbr_addr
,
1970 unsigned int interval
)
1972 struct ospf_nbr_nbma
*nbr_nbma
;
1974 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1975 if (nbr_nbma
== NULL
)
1978 if (nbr_nbma
->v_poll
!= interval
) {
1979 nbr_nbma
->v_poll
= interval
;
1980 if (nbr_nbma
->oi
&& ospf_if_is_up(nbr_nbma
->oi
)) {
1981 OSPF_TIMER_OFF(nbr_nbma
->t_poll
);
1982 OSPF_POLL_TIMER_ON(nbr_nbma
->t_poll
, ospf_poll_timer
,
1990 int ospf_nbr_nbma_poll_interval_unset(struct ospf
*ospf
, struct in_addr addr
)
1992 struct ospf_nbr_nbma
*nbr_nbma
;
1994 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, addr
);
1995 if (nbr_nbma
== NULL
)
1998 if (nbr_nbma
->v_poll
!= OSPF_POLL_INTERVAL_DEFAULT
)
1999 nbr_nbma
->v_poll
= OSPF_POLL_INTERVAL_DEFAULT
;
2004 void ospf_master_init(struct thread_master
*master
)
2006 memset(&ospf_master
, 0, sizeof(struct ospf_master
));
2009 om
->ospf
= list_new();
2010 om
->master
= master
;
2013 /* Link OSPF instance to VRF. */
2014 void ospf_vrf_link(struct ospf
*ospf
, struct vrf
*vrf
)
2016 ospf
->vrf_id
= vrf
->vrf_id
;
2017 if (vrf
->info
!= (void *)ospf
)
2018 vrf
->info
= (void *)ospf
;
2021 /* Unlink OSPF instance from VRF. */
2022 void ospf_vrf_unlink(struct ospf
*ospf
, struct vrf
*vrf
)
2024 if (vrf
->info
== (void *)ospf
)
2026 ospf
->vrf_id
= VRF_UNKNOWN
;
2029 /* This is hook function for vrf create called as part of vrf_init */
2030 static int ospf_vrf_new(struct vrf
*vrf
)
2032 if (IS_DEBUG_OSPF_EVENT
)
2033 zlog_debug("%s: VRF Created: %s(%u)", __PRETTY_FUNCTION__
,
2034 vrf
->name
, vrf
->vrf_id
);
2039 /* This is hook function for vrf delete call as part of vrf_init */
2040 static int ospf_vrf_delete(struct vrf
*vrf
)
2042 if (IS_DEBUG_OSPF_EVENT
)
2043 zlog_debug("%s: VRF Deletion: %s(%u)", __PRETTY_FUNCTION__
,
2044 vrf
->name
, vrf
->vrf_id
);
2049 static void ospf_set_redist_vrf_bitmaps(struct ospf
*ospf
)
2052 struct list
*red_list
;
2054 for (type
= 0; type
< ZEBRA_ROUTE_MAX
; type
++) {
2055 red_list
= ospf
->redist
[type
];
2058 if (IS_DEBUG_OSPF_EVENT
)
2060 "%s: setting redist vrf %d bitmap for type %d",
2061 __func__
, ospf
->vrf_id
, type
);
2062 vrf_bitmap_set(zclient
->redist
[AFI_IP
][type
], ospf
->vrf_id
);
2066 /* Enable OSPF VRF instance */
2067 static int ospf_vrf_enable(struct vrf
*vrf
)
2069 struct ospf
*ospf
= NULL
;
2070 vrf_id_t old_vrf_id
;
2073 if (IS_DEBUG_OSPF_EVENT
)
2074 zlog_debug("%s: VRF %s id %u enabled", __PRETTY_FUNCTION__
,
2075 vrf
->name
, vrf
->vrf_id
);
2077 ospf
= ospf_lookup_by_name(vrf
->name
);
2079 if (ospf
->name
&& strmatch(vrf
->name
, VRF_DEFAULT_NAME
)) {
2080 XFREE(MTYPE_OSPF_TOP
, ospf
->name
);
2083 old_vrf_id
= ospf
->vrf_id
;
2084 /* We have instance configured, link to VRF and make it "up". */
2085 ospf_vrf_link(ospf
, vrf
);
2086 if (IS_DEBUG_OSPF_EVENT
)
2088 "%s: ospf linked to vrf %s vrf_id %u (old id %u)",
2089 __PRETTY_FUNCTION__
, vrf
->name
, ospf
->vrf_id
,
2092 if (old_vrf_id
!= ospf
->vrf_id
) {
2093 frr_elevate_privs(&ospfd_privs
) {
2094 /* stop zebra redist to us for old vrf */
2095 zclient_send_dereg_requests(zclient
,
2098 ospf_set_redist_vrf_bitmaps(ospf
);
2100 /* start zebra redist to us for new vrf */
2101 ospf_zebra_vrf_register(ospf
);
2103 ret
= ospf_sock_init(ospf
);
2105 if (ret
< 0 || ospf
->fd
<= 0)
2107 thread_add_read(master
, ospf_read
, ospf
, ospf
->fd
,
2109 ospf
->oi_running
= 1;
2110 ospf_router_id_update(ospf
);
2117 /* Disable OSPF VRF instance */
2118 static int ospf_vrf_disable(struct vrf
*vrf
)
2120 struct ospf
*ospf
= NULL
;
2121 vrf_id_t old_vrf_id
= VRF_UNKNOWN
;
2123 if (vrf
->vrf_id
== VRF_DEFAULT
)
2126 if (IS_DEBUG_OSPF_EVENT
)
2127 zlog_debug("%s: VRF %s id %d disabled.", __PRETTY_FUNCTION__
,
2128 vrf
->name
, vrf
->vrf_id
);
2130 ospf
= ospf_lookup_by_name(vrf
->name
);
2132 old_vrf_id
= ospf
->vrf_id
;
2134 /* We have instance configured, unlink
2135 * from VRF and make it "down".
2137 ospf_vrf_unlink(ospf
, vrf
);
2138 ospf
->oi_running
= 0;
2139 if (IS_DEBUG_OSPF_EVENT
)
2140 zlog_debug("%s: ospf old_vrf_id %d unlinked",
2141 __PRETTY_FUNCTION__
, old_vrf_id
);
2142 thread_cancel(ospf
->t_read
);
2147 /* Note: This is a callback, the VRF will be deleted by the caller. */
2151 void ospf_vrf_init(void)
2153 vrf_init(ospf_vrf_new
, ospf_vrf_enable
, ospf_vrf_disable
,
2154 ospf_vrf_delete
, NULL
);
2157 void ospf_vrf_terminate(void)
2162 const char *ospf_vrf_id_to_name(vrf_id_t vrf_id
)
2164 struct vrf
*vrf
= vrf_lookup_by_id(vrf_id
);
2166 return vrf
? vrf
->name
: "NIL";