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
;
95 if (!ospf
->oi_running
) {
96 if (IS_DEBUG_OSPF_EVENT
)
98 "Router ospf not configured -- Router-ID update postponed");
102 if (IS_DEBUG_OSPF_EVENT
)
103 zlog_debug("Router-ID[OLD:%s]: Update",
104 inet_ntoa(ospf
->router_id
));
106 router_id_old
= ospf
->router_id
;
108 /* Select the router ID based on these priorities:
109 1. Statically assigned router ID is always the first choice.
110 2. If there is no statically assigned router ID, then try to stick
111 with the most recent value, since changing router ID's is very
113 3. Last choice: just go with whatever the zebra daemon recommends.
115 if (ospf
->router_id_static
.s_addr
!= 0)
116 router_id
= ospf
->router_id_static
;
117 else if (ospf
->router_id
.s_addr
!= 0)
118 router_id
= ospf
->router_id
;
120 router_id
= ospf
->router_id_zebra
;
122 if (IS_DEBUG_OSPF_EVENT
)
123 zlog_debug("Router-ID[OLD:%s]: Update to %s",
124 inet_ntoa(ospf
->router_id
), inet_ntoa(router_id
));
126 if (!IPV4_ADDR_SAME(&router_id_old
, &router_id
)) {
128 for (ALL_LIST_ELEMENTS_RO(ospf
->oiflist
, node
, oi
)) {
129 /* Some nbrs are identified by router_id, these needs
130 * to be rebuilt. Possible optimization would be to do
131 * oi->nbr_self->router_id = router_id for
132 * !(virtual | ptop) links
134 ospf_nbr_self_reset(oi
, router_id
);
137 /* Flush (inline) all external LSAs based on the OSPF_LSA_SELF
140 struct route_node
*rn
;
141 struct ospf_lsa
*lsa
;
143 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
)
144 if (IS_LSA_SELF(lsa
))
145 ospf_lsa_flush_schedule(ospf
, lsa
);
148 ospf
->router_id
= router_id
;
149 if (IS_DEBUG_OSPF_EVENT
)
150 zlog_debug("Router-ID[NEW:%s]: Update",
151 inet_ntoa(ospf
->router_id
));
153 /* Flush (inline) all external LSAs which now match the new
155 need to adjust the OSPF_LSA_SELF flag, so the flush doesn't
157 asserts in ospf_refresher_unregister_lsa(). This step is
159 because the current quagga code does look-up for
161 based on the self router-id alone but expects OSPF_LSA_SELF
165 struct route_node
*rn
;
166 struct ospf_lsa
*lsa
;
168 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
) {
169 /* AdvRouter and Router ID is the same. */
170 if (IPV4_ADDR_SAME(&lsa
->data
->adv_router
,
173 OSPF_LSA_SELF_CHECKED
);
174 SET_FLAG(lsa
->flags
, OSPF_LSA_SELF
);
175 ospf_lsa_flush_schedule(ospf
, lsa
);
180 /* update router-lsa's for each area */
181 ospf_router_lsa_update(ospf
);
183 /* update ospf_interface's */
184 FOR_ALL_INTERFACES (vrf
, ifp
)
185 ospf_if_update(ospf
, ifp
);
187 ospf_external_lsa_rid_change(ospf
);
191 /* For OSPF area sort by area id. */
192 static int ospf_area_id_cmp(struct ospf_area
*a1
, struct ospf_area
*a2
)
194 if (ntohl(a1
->area_id
.s_addr
) > ntohl(a2
->area_id
.s_addr
))
196 if (ntohl(a1
->area_id
.s_addr
) < ntohl(a2
->area_id
.s_addr
))
201 /* Allocate new ospf structure. */
202 static struct ospf
*ospf_new(unsigned short instance
, const char *name
)
205 struct vrf
*vrf
= NULL
;
207 struct ospf
*new = XCALLOC(MTYPE_OSPF_TOP
, sizeof(struct ospf
));
209 new->instance
= instance
;
210 new->router_id
.s_addr
= htonl(0);
211 new->router_id_static
.s_addr
= htonl(0);
213 vrf
= vrf_lookup_by_name(name
);
215 new->vrf_id
= vrf
->vrf_id
;
217 new->vrf_id
= VRF_UNKNOWN
;
218 /* Freed in ospf_finish_final */
219 new->name
= XSTRDUP(MTYPE_OSPF_TOP
, name
);
220 if (IS_DEBUG_OSPF_EVENT
)
222 "%s: Create new ospf instance with vrf_name %s vrf_id %u",
223 __PRETTY_FUNCTION__
, name
, new->vrf_id
);
225 new->vrf_id
= VRF_DEFAULT
;
226 vrf
= vrf_lookup_by_id(VRF_DEFAULT
);
230 ospf_vrf_link(new, vrf
);
232 ospf_zebra_vrf_register(new);
234 new->abr_type
= OSPF_ABR_DEFAULT
;
235 new->oiflist
= list_new();
236 new->vlinks
= list_new();
237 new->areas
= list_new();
238 new->areas
->cmp
= (int (*)(void *, void *))ospf_area_id_cmp
;
239 new->networks
= route_table_init();
240 new->nbr_nbma
= route_table_init();
242 new->lsdb
= ospf_lsdb_new();
244 new->default_originate
= DEFAULT_ORIGINATE_NONE
;
246 new->passive_interface_default
= OSPF_IF_ACTIVE
;
248 new->new_external_route
= route_table_init();
249 new->old_external_route
= route_table_init();
250 new->external_lsas
= route_table_init();
252 new->stub_router_startup_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
253 new->stub_router_shutdown_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
254 new->stub_router_admin_set
= OSPF_STUB_ROUTER_ADMINISTRATIVE_UNSET
;
256 /* Distribute parameter init. */
257 for (i
= 0; i
<= ZEBRA_ROUTE_MAX
; i
++) {
260 new->default_metric
= -1;
261 new->ref_bandwidth
= OSPF_DEFAULT_REF_BANDWIDTH
;
264 new->min_ls_interval
= OSPF_MIN_LS_INTERVAL
;
265 new->min_ls_arrival
= OSPF_MIN_LS_ARRIVAL
;
267 /* SPF timer value init. */
268 new->spf_delay
= OSPF_SPF_DELAY_DEFAULT
;
269 new->spf_holdtime
= OSPF_SPF_HOLDTIME_DEFAULT
;
270 new->spf_max_holdtime
= OSPF_SPF_MAX_HOLDTIME_DEFAULT
;
271 new->spf_hold_multiplier
= 1;
274 new->maxage_delay
= OSPF_LSA_MAXAGE_REMOVE_DELAY_DEFAULT
;
275 new->maxage_lsa
= route_table_init();
276 new->t_maxage_walker
= NULL
;
277 thread_add_timer(master
, ospf_lsa_maxage_walker
, new,
278 OSPF_LSA_MAXAGE_CHECK_INTERVAL
, &new->t_maxage_walker
);
280 /* Distance table init. */
281 new->distance_table
= route_table_init();
283 new->lsa_refresh_queue
.index
= 0;
284 new->lsa_refresh_interval
= OSPF_LSA_REFRESH_INTERVAL_DEFAULT
;
285 new->t_lsa_refresher
= NULL
;
286 thread_add_timer(master
, ospf_lsa_refresh_walker
, new,
287 new->lsa_refresh_interval
, &new->t_lsa_refresher
);
288 new->lsa_refresher_started
= monotime(NULL
);
290 new->ibuf
= stream_new(OSPF_MAX_PACKET_SIZE
+ 1);
293 new->oi_write_q
= list_new();
294 new->write_oi_count
= OSPF_WRITE_INTERFACE_COUNT_DEFAULT
;
296 /* Enable "log-adjacency-changes" */
297 #if DFLT_OSPF_LOG_ADJACENCY_CHANGES
298 SET_FLAG(new->config
, OSPF_LOG_ADJACENCY_CHANGES
);
304 if ((ospf_sock_init(new)) < 0) {
305 if (new->vrf_id
!= VRF_UNKNOWN
)
308 "%s: ospf_sock_init is unable to open a socket",
312 thread_add_read(master
, ospf_read
, new, new->fd
, &new->t_read
);
317 struct ospf
*ospf_lookup_instance(unsigned short instance
)
320 struct listnode
*node
, *nnode
;
322 if (listcount(om
->ospf
) == 0)
325 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
326 if ((ospf
->instance
== 0 && instance
== 0)
327 || (ospf
->instance
&& instance
328 && ospf
->instance
== instance
))
334 static int ospf_is_ready(struct ospf
*ospf
)
336 /* OSPF must be on and Router-ID must be configured. */
337 if (!ospf
|| ospf
->router_id
.s_addr
== 0)
343 static void ospf_add(struct ospf
*ospf
)
345 listnode_add(om
->ospf
, ospf
);
348 static void ospf_delete(struct ospf
*ospf
)
350 listnode_delete(om
->ospf
, ospf
);
353 struct ospf
*ospf_lookup_by_inst_name(unsigned short instance
, const char *name
)
355 struct ospf
*ospf
= NULL
;
356 struct listnode
*node
, *nnode
;
358 if (name
== NULL
|| strmatch(name
, VRF_DEFAULT_NAME
))
359 return ospf_lookup_by_vrf_id(VRF_DEFAULT
);
361 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
)) {
362 if ((ospf
->instance
== instance
)
363 && ((ospf
->name
== NULL
&& name
== NULL
)
364 || (ospf
->name
&& name
365 && strcmp(ospf
->name
, name
) == 0)))
371 struct ospf
*ospf_get(unsigned short instance
, const char *name
)
375 /* vrf name provided call inst and name based api
376 * in case of no name pass default ospf instance */
378 ospf
= ospf_lookup_by_inst_name(instance
, name
);
380 ospf
= ospf_lookup_by_vrf_id(VRF_DEFAULT
);
383 ospf
= ospf_new(instance
, name
);
386 if (ospf
->router_id_static
.s_addr
== 0)
387 ospf_router_id_update(ospf
);
389 ospf_opaque_type11_lsa_init(ospf
);
395 struct ospf
*ospf_get_instance(unsigned short instance
)
399 ospf
= ospf_lookup_instance(instance
);
401 ospf
= ospf_new(instance
, NULL
/* VRF_DEFAULT*/);
404 if (ospf
->router_id_static
.s_addr
== 0)
405 ospf_router_id_update(ospf
);
407 ospf_opaque_type11_lsa_init(ospf
);
413 struct ospf
*ospf_lookup_by_vrf_id(vrf_id_t vrf_id
)
415 struct vrf
*vrf
= NULL
;
417 vrf
= vrf_lookup_by_id(vrf_id
);
420 return (vrf
->info
) ? (struct ospf
*)vrf
->info
: NULL
;
423 /* It should only be used when processing incoming info update from zebra.
424 * Other situations, it is not sufficient to lookup the ospf instance by
425 * vrf_name only without using the instance number.
427 static struct ospf
*ospf_lookup_by_name(const char *vrf_name
)
429 struct ospf
*ospf
= NULL
;
430 struct listnode
*node
, *nnode
;
432 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
433 if ((ospf
->name
== NULL
&& vrf_name
== NULL
)
434 || (ospf
->name
&& vrf_name
435 && strcmp(ospf
->name
, vrf_name
) == 0))
440 /* Handle the second half of deferred shutdown. This is called either
441 * from the deferred-shutdown timer thread, or directly through
442 * ospf_deferred_shutdown_check.
444 * Function is to cleanup G-R state, if required then call ospf_finish_final
445 * to complete shutdown of this ospf instance. Possibly exit if the
446 * whole process is being shutdown and this was the last OSPF instance.
448 static void ospf_deferred_shutdown_finish(struct ospf
*ospf
)
450 ospf
->stub_router_shutdown_time
= OSPF_STUB_ROUTER_UNCONFIGURED
;
451 OSPF_TIMER_OFF(ospf
->t_deferred_shutdown
);
453 ospf_finish_final(ospf
);
455 /* *ospf is now invalid */
457 /* ospfd being shut-down? If so, was this the last ospf instance? */
458 if (CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
)
459 && (listcount(om
->ospf
) == 0)) {
466 /* Timer thread for G-R */
467 static int ospf_deferred_shutdown_timer(struct thread
*t
)
469 struct ospf
*ospf
= THREAD_ARG(t
);
471 ospf_deferred_shutdown_finish(ospf
);
476 /* Check whether deferred-shutdown must be scheduled, otherwise call
477 * down directly into second-half of instance shutdown.
479 static void ospf_deferred_shutdown_check(struct ospf
*ospf
)
481 unsigned long timeout
;
483 struct ospf_area
*area
;
485 /* deferred shutdown already running? */
486 if (ospf
->t_deferred_shutdown
)
489 /* Should we try push out max-metric LSAs? */
490 if (ospf
->stub_router_shutdown_time
!= OSPF_STUB_ROUTER_UNCONFIGURED
) {
491 for (ALL_LIST_ELEMENTS_RO(ospf
->areas
, ln
, area
)) {
492 SET_FLAG(area
->stub_router_state
,
493 OSPF_AREA_ADMIN_STUB_ROUTED
);
495 if (!CHECK_FLAG(area
->stub_router_state
,
496 OSPF_AREA_IS_STUB_ROUTED
))
497 ospf_router_lsa_update_area(area
);
499 timeout
= ospf
->stub_router_shutdown_time
;
501 /* No timer needed */
502 ospf_deferred_shutdown_finish(ospf
);
506 OSPF_TIMER_ON(ospf
->t_deferred_shutdown
, ospf_deferred_shutdown_timer
,
511 /* Shut down the entire process */
512 void ospf_terminate(void)
515 struct listnode
*node
, *nnode
;
517 /* shutdown already in progress */
518 if (CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
521 SET_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
);
523 /* exit immediately if OSPF not actually running */
524 if (listcount(om
->ospf
) == 0)
528 for (ALL_LIST_ELEMENTS(om
->ospf
, node
, nnode
, ospf
))
531 /* Cleanup route maps */
534 /* reverse prefix_list_init */
535 prefix_list_add_hook(NULL
);
536 prefix_list_delete_hook(NULL
);
539 /* Cleanup vrf info */
540 ospf_vrf_terminate();
542 /* Deliberately go back up, hopefully to thread scheduler, as
543 * One or more ospf_finish()'s may have deferred shutdown to a timer
546 zclient_stop(zclient
);
547 zclient_free(zclient
);
552 void ospf_finish(struct ospf
*ospf
)
554 /* let deferred shutdown decide */
555 ospf_deferred_shutdown_check(ospf
);
557 /* if ospf_deferred_shutdown returns, then ospf_finish_final is
558 * deferred to expiry of G-S timer thread. Return back up, hopefully
559 * to thread scheduler.
564 /* Final cleanup of ospf instance */
565 static void ospf_finish_final(struct ospf
*ospf
)
567 struct vrf
*vrf
= vrf_lookup_by_id(ospf
->vrf_id
);
568 struct route_node
*rn
;
569 struct ospf_nbr_nbma
*nbr_nbma
;
570 struct ospf_lsa
*lsa
;
571 struct interface
*ifp
;
572 struct ospf_interface
*oi
;
573 struct ospf_area
*area
;
574 struct ospf_vl_data
*vl_data
;
575 struct listnode
*node
, *nnode
;
577 unsigned short instance
= 0;
581 ospf_opaque_type11_lsa_term(ospf
);
583 ospf_opaque_finish();
585 ospf_flush_self_originated_lsas_now(ospf
);
587 /* Unregister redistribution */
588 for (i
= 0; i
< ZEBRA_ROUTE_MAX
; i
++) {
589 struct list
*red_list
;
590 struct ospf_redist
*red
;
592 red_list
= ospf
->redist
[i
];
596 for (ALL_LIST_ELEMENTS(red_list
, node
, nnode
, red
)) {
597 ospf_redistribute_unset(ospf
, i
, red
->instance
);
598 ospf_redist_del(ospf
, i
, red
->instance
);
601 ospf_redistribute_default_set(ospf
, DEFAULT_ORIGINATE_NONE
, 0, 0);
603 for (ALL_LIST_ELEMENTS(ospf
->areas
, node
, nnode
, area
))
604 ospf_remove_vls_through_area(ospf
, area
);
606 for (ALL_LIST_ELEMENTS(ospf
->vlinks
, node
, nnode
, vl_data
))
607 ospf_vl_delete(ospf
, vl_data
);
609 list_delete(&ospf
->vlinks
);
611 /* Remove any ospf interface config params */
612 FOR_ALL_INTERFACES (vrf
, ifp
) {
613 struct ospf_if_params
*params
;
615 params
= IF_DEF_PARAMS(ifp
);
616 if (OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
617 UNSET_IF_PARAM(params
, if_area
);
620 /* Reset interface. */
621 for (ALL_LIST_ELEMENTS(ospf
->oiflist
, node
, nnode
, oi
))
623 list_delete(&ospf
->oiflist
);
624 ospf
->oi_running
= 0;
626 /* De-Register VRF */
627 ospf_zebra_vrf_deregister(ospf
);
629 /* Clear static neighbors */
630 for (rn
= route_top(ospf
->nbr_nbma
); rn
; rn
= route_next(rn
))
631 if ((nbr_nbma
= rn
->info
)) {
632 OSPF_POLL_TIMER_OFF(nbr_nbma
->t_poll
);
635 nbr_nbma
->nbr
->nbr_nbma
= NULL
;
636 nbr_nbma
->nbr
= NULL
;
640 listnode_delete(nbr_nbma
->oi
->nbr_nbma
,
645 XFREE(MTYPE_OSPF_NEIGHBOR_STATIC
, nbr_nbma
);
648 route_table_finish(ospf
->nbr_nbma
);
650 /* Clear networks and Areas. */
651 for (rn
= route_top(ospf
->networks
); rn
; rn
= route_next(rn
)) {
652 struct ospf_network
*network
;
654 if ((network
= rn
->info
) != NULL
) {
655 ospf_network_free(ospf
, network
);
657 route_unlock_node(rn
);
660 route_table_finish(ospf
->networks
);
662 for (ALL_LIST_ELEMENTS(ospf
->areas
, node
, nnode
, area
)) {
663 listnode_delete(ospf
->areas
, area
);
664 ospf_area_free(area
);
667 /* Cancel all timers. */
668 OSPF_TIMER_OFF(ospf
->t_read
);
669 OSPF_TIMER_OFF(ospf
->t_write
);
670 OSPF_TIMER_OFF(ospf
->t_spf_calc
);
671 OSPF_TIMER_OFF(ospf
->t_ase_calc
);
672 OSPF_TIMER_OFF(ospf
->t_maxage
);
673 OSPF_TIMER_OFF(ospf
->t_maxage_walker
);
674 OSPF_TIMER_OFF(ospf
->t_abr_task
);
675 OSPF_TIMER_OFF(ospf
->t_asbr_check
);
676 OSPF_TIMER_OFF(ospf
->t_distribute_update
);
677 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
678 OSPF_TIMER_OFF(ospf
->t_opaque_lsa_self
);
679 OSPF_TIMER_OFF(ospf
->t_sr_update
);
681 LSDB_LOOP (OPAQUE_AS_LSDB(ospf
), rn
, lsa
)
682 ospf_discard_from_db(ospf
, ospf
->lsdb
, lsa
);
683 LSDB_LOOP (EXTERNAL_LSDB(ospf
), rn
, lsa
)
684 ospf_discard_from_db(ospf
, ospf
->lsdb
, lsa
);
686 ospf_lsdb_delete_all(ospf
->lsdb
);
687 ospf_lsdb_free(ospf
->lsdb
);
689 for (rn
= route_top(ospf
->maxage_lsa
); rn
; rn
= route_next(rn
)) {
690 if ((lsa
= rn
->info
) != NULL
) {
691 ospf_lsa_unlock(&lsa
);
694 route_unlock_node(rn
);
696 route_table_finish(ospf
->maxage_lsa
);
699 ospf_route_table_free(ospf
->old_table
);
700 if (ospf
->new_table
) {
701 ospf_route_delete(ospf
, ospf
->new_table
);
702 ospf_route_table_free(ospf
->new_table
);
705 ospf_rtrs_free(ospf
->old_rtrs
);
707 ospf_rtrs_free(ospf
->new_rtrs
);
708 if (ospf
->new_external_route
) {
709 ospf_route_delete(ospf
, ospf
->new_external_route
);
710 ospf_route_table_free(ospf
->new_external_route
);
712 if (ospf
->old_external_route
) {
713 ospf_route_delete(ospf
, ospf
->old_external_route
);
714 ospf_route_table_free(ospf
->old_external_route
);
716 if (ospf
->external_lsas
) {
717 ospf_ase_external_lsas_finish(ospf
->external_lsas
);
720 for (i
= ZEBRA_ROUTE_SYSTEM
; i
<= ZEBRA_ROUTE_MAX
; i
++) {
721 struct list
*ext_list
;
722 struct ospf_external
*ext
;
724 ext_list
= ospf
->external
[i
];
728 for (ALL_LIST_ELEMENTS(ext_list
, node
, nnode
, ext
)) {
729 if (ext
->external_info
)
730 for (rn
= route_top(ext
->external_info
); rn
;
731 rn
= route_next(rn
)) {
732 if (rn
->info
== NULL
)
735 XFREE(MTYPE_OSPF_EXTERNAL_INFO
,
738 route_unlock_node(rn
);
741 ospf_external_del(ospf
, i
, ext
->instance
);
745 ospf_distance_reset(ospf
);
746 route_table_finish(ospf
->distance_table
);
748 if (!CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
749 instance
= ospf
->instance
;
751 list_delete(&ospf
->areas
);
752 list_delete(&ospf
->oi_write_q
);
755 stream_free(ospf
->ibuf
);
760 vrf
= vrf_lookup_by_name(ospf
->name
);
762 ospf_vrf_unlink(ospf
, vrf
);
763 XFREE(MTYPE_OSPF_TOP
, ospf
->name
);
765 vrf
= vrf_lookup_by_id(VRF_DEFAULT
);
767 ospf_vrf_unlink(ospf
, vrf
);
770 XFREE(MTYPE_OSPF_TOP
, ospf
);
772 if (!CHECK_FLAG(om
->options
, OSPF_MASTER_SHUTDOWN
))
773 ospf_get_instance(instance
);
777 /* allocate new OSPF Area object */
778 static struct ospf_area
*ospf_area_new(struct ospf
*ospf
,
779 struct in_addr area_id
)
781 struct ospf_area
*new;
783 /* Allocate new config_network. */
784 new = XCALLOC(MTYPE_OSPF_AREA
, sizeof(struct ospf_area
));
788 new->area_id
= area_id
;
789 new->area_id_fmt
= OSPF_AREA_ID_FMT_DOTTEDQUAD
;
791 new->external_routing
= OSPF_AREA_DEFAULT
;
792 new->default_cost
= 1;
793 new->auth_type
= OSPF_AUTH_NULL
;
796 new->lsdb
= ospf_lsdb_new();
798 /* Self-originated LSAs initialize. */
799 new->router_lsa_self
= NULL
;
801 ospf_opaque_type10_lsa_init(new);
803 new->oiflist
= list_new();
804 new->ranges
= route_table_init();
806 if (area_id
.s_addr
== OSPF_AREA_BACKBONE
)
807 ospf
->backbone
= new;
812 static void ospf_area_free(struct ospf_area
*area
)
814 struct route_node
*rn
;
815 struct ospf_lsa
*lsa
;
817 ospf_opaque_type10_lsa_term(area
);
820 LSDB_LOOP (ROUTER_LSDB(area
), rn
, lsa
)
821 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
822 LSDB_LOOP (NETWORK_LSDB(area
), rn
, lsa
)
823 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
824 LSDB_LOOP (SUMMARY_LSDB(area
), rn
, lsa
)
825 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
826 LSDB_LOOP (ASBR_SUMMARY_LSDB(area
), rn
, lsa
)
827 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
829 LSDB_LOOP (NSSA_LSDB(area
), rn
, lsa
)
830 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
831 LSDB_LOOP (OPAQUE_AREA_LSDB(area
), rn
, lsa
)
832 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
833 LSDB_LOOP (OPAQUE_LINK_LSDB(area
), rn
, lsa
)
834 ospf_discard_from_db(area
->ospf
, area
->lsdb
, lsa
);
836 ospf_lsdb_delete_all(area
->lsdb
);
837 ospf_lsdb_free(area
->lsdb
);
839 ospf_lsa_unlock(&area
->router_lsa_self
);
841 route_table_finish(area
->ranges
);
842 list_delete(&area
->oiflist
);
844 if (EXPORT_NAME(area
))
845 free(EXPORT_NAME(area
));
847 if (IMPORT_NAME(area
))
848 free(IMPORT_NAME(area
));
851 OSPF_TIMER_OFF(area
->t_stub_router
);
852 OSPF_TIMER_OFF(area
->t_opaque_lsa_self
);
854 if (OSPF_IS_AREA_BACKBONE(area
))
855 area
->ospf
->backbone
= NULL
;
857 XFREE(MTYPE_OSPF_AREA
, area
);
860 void ospf_area_check_free(struct ospf
*ospf
, struct in_addr area_id
)
862 struct ospf_area
*area
;
864 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
865 if (area
&& listcount(area
->oiflist
) == 0 && area
->ranges
->top
== NULL
866 && !ospf_vl_count(ospf
, area
)
867 && area
->shortcut_configured
== OSPF_SHORTCUT_DEFAULT
868 && area
->external_routing
== OSPF_AREA_DEFAULT
869 && area
->no_summary
== 0 && area
->default_cost
== 1
870 && EXPORT_NAME(area
) == NULL
&& IMPORT_NAME(area
) == NULL
871 && area
->auth_type
== OSPF_AUTH_NULL
) {
872 listnode_delete(ospf
->areas
, area
);
873 ospf_area_free(area
);
877 struct ospf_area
*ospf_area_get(struct ospf
*ospf
, struct in_addr area_id
)
879 struct ospf_area
*area
;
881 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
883 area
= ospf_area_new(ospf
, area_id
);
884 listnode_add_sort(ospf
->areas
, area
);
885 ospf_check_abr_status(ospf
);
886 if (ospf
->stub_router_admin_set
887 == OSPF_STUB_ROUTER_ADMINISTRATIVE_SET
) {
888 SET_FLAG(area
->stub_router_state
,
889 OSPF_AREA_ADMIN_STUB_ROUTED
);
896 struct ospf_area
*ospf_area_lookup_by_area_id(struct ospf
*ospf
,
897 struct in_addr area_id
)
899 struct ospf_area
*area
;
900 struct listnode
*node
;
902 for (ALL_LIST_ELEMENTS_RO(ospf
->areas
, node
, area
))
903 if (IPV4_ADDR_SAME(&area
->area_id
, &area_id
))
909 void ospf_area_add_if(struct ospf_area
*area
, struct ospf_interface
*oi
)
911 listnode_add(area
->oiflist
, oi
);
914 void ospf_area_del_if(struct ospf_area
*area
, struct ospf_interface
*oi
)
916 listnode_delete(area
->oiflist
, oi
);
920 static void add_ospf_interface(struct connected
*co
, struct ospf_area
*area
)
922 struct ospf_interface
*oi
;
924 oi
= ospf_if_new(area
->ospf
, co
->ifp
, co
->address
);
929 oi
->params
= ospf_lookup_if_params(co
->ifp
, oi
->address
->u
.prefix4
);
930 oi
->output_cost
= ospf_if_get_output_cost(oi
);
932 /* Relate ospf interface to ospf instance. */
933 oi
->ospf
= area
->ospf
;
935 /* update network type as interface flag */
936 /* If network type is specified previously,
937 skip network type setting. */
938 oi
->type
= IF_DEF_PARAMS(co
->ifp
)->type
;
940 /* Add pseudo neighbor. */
941 ospf_nbr_self_reset(oi
, oi
->ospf
->router_id
);
943 ospf_area_add_if(oi
->area
, oi
);
946 * if router_id is not configured, dont bring up
948 * ospf_router_id_update() will call ospf_if_update
949 * whenever r-id is configured instead.
951 if ((area
->ospf
->router_id
.s_addr
!= 0) && if_is_operative(co
->ifp
))
955 static void update_redistributed(struct ospf
*ospf
, int add_to_ospf
)
957 struct route_node
*rn
;
958 struct external_info
*ei
;
959 struct ospf_external
*ext
;
961 if (ospf_is_type_redistributed(ospf
, ZEBRA_ROUTE_CONNECT
, 0)) {
962 ext
= ospf_external_lookup(ospf
, ZEBRA_ROUTE_CONNECT
, 0);
963 if ((ext
) && EXTERNAL_INFO(ext
)) {
964 for (rn
= route_top(EXTERNAL_INFO(ext
)); rn
;
965 rn
= route_next(rn
)) {
971 if (ospf_external_info_find_lsa(ospf
,
973 if (!ospf_distribute_check_connected(
975 ospf_external_lsa_flush(
978 ei
->ifindex
/*, ei->nexthop */);
980 if (!ospf_external_info_find_lsa(
982 if (ospf_distribute_check_connected(
984 ospf_external_lsa_originate(
992 /* Config network statement related functions. */
993 static struct ospf_network
*ospf_network_new(struct in_addr area_id
)
995 struct ospf_network
*new;
996 new = XCALLOC(MTYPE_OSPF_NETWORK
, sizeof(struct ospf_network
));
998 new->area_id
= area_id
;
999 new->area_id_fmt
= OSPF_AREA_ID_FMT_DOTTEDQUAD
;
1004 static void ospf_network_free(struct ospf
*ospf
, struct ospf_network
*network
)
1006 ospf_area_check_free(ospf
, network
->area_id
);
1007 ospf_schedule_abr_task(ospf
);
1008 XFREE(MTYPE_OSPF_NETWORK
, network
);
1011 int ospf_network_set(struct ospf
*ospf
, struct prefix_ipv4
*p
,
1012 struct in_addr area_id
, int df
)
1014 struct ospf_network
*network
;
1015 struct ospf_area
*area
;
1016 struct route_node
*rn
;
1018 rn
= route_node_get(ospf
->networks
, (struct prefix
*)p
);
1021 route_unlock_node(rn
);
1023 if (IPV4_ADDR_SAME(&area_id
, &network
->area_id
)) {
1026 /* There is already same network statement. */
1031 rn
->info
= network
= ospf_network_new(area_id
);
1032 network
->area_id_fmt
= df
;
1033 area
= ospf_area_get(ospf
, area_id
);
1034 ospf_area_display_format_set(ospf
, area
, df
);
1036 /* Run network config now. */
1037 ospf_network_run((struct prefix
*)p
, area
);
1039 /* Update connected redistribute. */
1040 update_redistributed(ospf
, 1); /* interfaces possibly added */
1042 ospf_area_check_free(ospf
, area_id
);
1047 int ospf_network_unset(struct ospf
*ospf
, struct prefix_ipv4
*p
,
1048 struct in_addr area_id
)
1050 struct route_node
*rn
;
1051 struct ospf_network
*network
;
1052 struct listnode
*node
, *nnode
;
1053 struct ospf_interface
*oi
;
1055 rn
= route_node_lookup(ospf
->networks
, (struct prefix
*)p
);
1060 route_unlock_node(rn
);
1061 if (!IPV4_ADDR_SAME(&area_id
, &network
->area_id
))
1064 ospf_network_free(ospf
, rn
->info
);
1066 route_unlock_node(rn
); /* initial reference */
1068 /* Find interfaces that are not configured already. */
1069 for (ALL_LIST_ELEMENTS(ospf
->oiflist
, node
, nnode
, oi
)) {
1071 if (oi
->type
== OSPF_IFTYPE_VIRTUALLINK
)
1074 ospf_network_run_subnet(ospf
, oi
->connected
, NULL
, NULL
);
1077 /* Update connected redistribute. */
1078 update_redistributed(ospf
, 0); /* interfaces possibly removed */
1079 ospf_area_check_free(ospf
, area_id
);
1084 /* Ensure there's an OSPF instance, as "ip ospf area" enabled OSPF means
1085 * there might not be any 'router ospf' config.
1087 * Otherwise, doesn't do anything different to ospf_if_update for now
1089 void ospf_interface_area_set(struct ospf
*ospf
, struct interface
*ifp
)
1094 ospf_if_update(ospf
, ifp
);
1095 /* if_update does a update_redistributed */
1100 void ospf_interface_area_unset(struct ospf
*ospf
, struct interface
*ifp
)
1102 struct route_node
*rn_oi
;
1105 return; /* Ospf not ready yet */
1107 /* Find interfaces that may need to be removed. */
1108 for (rn_oi
= route_top(IF_OIFS(ifp
)); rn_oi
;
1109 rn_oi
= route_next(rn_oi
)) {
1110 struct ospf_interface
*oi
= NULL
;
1112 if ((oi
= rn_oi
->info
) == NULL
)
1115 if (oi
->type
== OSPF_IFTYPE_VIRTUALLINK
)
1118 ospf_network_run_subnet(ospf
, oi
->connected
, NULL
, NULL
);
1121 /* Update connected redistribute. */
1122 update_redistributed(ospf
, 0); /* interfaces possibly removed */
1125 bool ospf_interface_area_is_already_set(struct ospf
*ospf
,
1126 struct interface
*ifp
)
1128 struct route_node
*rn_oi
;
1131 return false; /* Ospf not ready yet */
1133 /* Find interfaces that may need to be removed. */
1134 for (rn_oi
= route_top(IF_OIFS(ifp
)); rn_oi
;
1135 rn_oi
= route_next(rn_oi
)) {
1136 struct ospf_interface
*oi
= rn_oi
->info
;
1141 if (oi
->type
== OSPF_IFTYPE_VIRTUALLINK
)
1143 /* at least one route covered by interface
1144 * that implies already done
1151 /* Check whether interface matches given network
1152 * returns: 1, true. 0, false
1154 static int ospf_network_match_iface(const struct connected
*co
,
1155 const struct prefix
*net
)
1157 /* new approach: more elegant and conceptually clean */
1158 return prefix_match_network_statement(net
, CONNECTED_PREFIX(co
));
1161 static void ospf_update_interface_area(struct connected
*co
,
1162 struct ospf_area
*area
)
1164 struct ospf_interface
*oi
= ospf_if_table_lookup(co
->ifp
, co
->address
);
1166 /* nothing to be done case */
1167 if (oi
&& oi
->area
== area
) {
1174 add_ospf_interface(co
, area
);
1177 /* Run OSPF for the given subnet, taking into account the following
1178 * possible sources of area configuration, in the given order of preference:
1180 * - Whether there is interface+address specific area configuration
1181 * - Whether there is a default area for the interface
1182 * - Whether there is an area given as a parameter.
1183 * - If no specific network prefix/area is supplied, whether there's
1184 * a matching network configured.
1186 static void ospf_network_run_subnet(struct ospf
*ospf
, struct connected
*co
,
1188 struct ospf_area
*given_area
)
1190 struct ospf_interface
*oi
;
1191 struct ospf_if_params
*params
;
1192 struct ospf_area
*area
= NULL
;
1193 struct route_node
*rn
;
1196 if (CHECK_FLAG(co
->flags
, ZEBRA_IFA_SECONDARY
))
1199 if (co
->address
->family
!= AF_INET
)
1202 /* Try determine the appropriate area for this interface + address
1203 * Start by checking interface config
1205 params
= ospf_lookup_if_params(co
->ifp
, co
->address
->u
.prefix4
);
1206 if (params
&& OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
1207 area
= ospf_area_get(ospf
, params
->if_area
);
1209 params
= IF_DEF_PARAMS(co
->ifp
);
1210 if (OSPF_IF_PARAM_CONFIGURED(params
, if_area
))
1211 area
= ospf_area_get(ospf
, params
->if_area
);
1214 /* If we've found an interface and/or addr specific area, then we're
1218 ospf_update_interface_area(co
, area
);
1222 /* Otherwise, only remaining possibility is a matching network statement
1225 assert(given_area
!= NULL
);
1227 /* Which either was supplied as a parameter.. (e.g. cause a new
1228 * network/area was just added)..
1230 if (p
->family
== co
->address
->family
1231 && ospf_network_match_iface(co
, p
))
1232 ospf_update_interface_area(co
, given_area
);
1237 /* Else we have to search the existing network/area config to see
1240 for (rn
= route_top(ospf
->networks
); rn
; rn
= route_next(rn
))
1241 if (rn
->info
!= NULL
&& ospf_network_match_iface(co
, &rn
->p
)) {
1242 struct ospf_network
*network
=
1243 (struct ospf_network
*)rn
->info
;
1244 area
= ospf_area_get(ospf
, network
->area_id
);
1245 ospf_update_interface_area(co
, area
);
1249 /* If the subnet isn't in any area, deconfigure */
1250 if (!configed
&& (oi
= ospf_if_table_lookup(co
->ifp
, co
->address
)))
1254 static void ospf_network_run_interface(struct ospf
*ospf
, struct interface
*ifp
,
1256 struct ospf_area
*given_area
)
1258 struct listnode
*cnode
;
1259 struct connected
*co
;
1261 if (memcmp(ifp
->name
, "VLINK", 5) == 0)
1264 /* Network prefix without area is nonsensical */
1266 assert(given_area
!= NULL
);
1268 /* if interface prefix is match specified prefix,
1269 then create socket and join multicast group. */
1270 for (ALL_LIST_ELEMENTS_RO(ifp
->connected
, cnode
, co
))
1271 ospf_network_run_subnet(ospf
, co
, p
, given_area
);
1274 static void ospf_network_run(struct prefix
*p
, struct ospf_area
*area
)
1276 struct vrf
*vrf
= vrf_lookup_by_id(area
->ospf
->vrf_id
);
1277 struct interface
*ifp
;
1279 /* Schedule Router ID Update. */
1280 if (area
->ospf
->router_id
.s_addr
== 0)
1281 ospf_router_id_update(area
->ospf
);
1283 /* Get target interface. */
1284 FOR_ALL_INTERFACES (vrf
, ifp
)
1285 ospf_network_run_interface(area
->ospf
, ifp
, p
, area
);
1288 void ospf_ls_upd_queue_empty(struct ospf_interface
*oi
)
1290 struct route_node
*rn
;
1291 struct listnode
*node
, *nnode
;
1293 struct ospf_lsa
*lsa
;
1295 /* empty ls update queue */
1296 for (rn
= route_top(oi
->ls_upd_queue
); rn
; rn
= route_next(rn
))
1297 if ((lst
= (struct list
*)rn
->info
)) {
1298 for (ALL_LIST_ELEMENTS(lst
, node
, nnode
, lsa
))
1299 ospf_lsa_unlock(&lsa
); /* oi->ls_upd_queue */
1304 /* remove update event */
1305 if (oi
->t_ls_upd_event
) {
1306 thread_cancel(oi
->t_ls_upd_event
);
1307 oi
->t_ls_upd_event
= NULL
;
1311 void ospf_if_update(struct ospf
*ospf
, struct interface
*ifp
)
1317 if (IS_DEBUG_OSPF_EVENT
)
1319 "%s: interface %s ifp->vrf_id %u ospf vrf %s vrf_id %u router_id %s",
1320 __PRETTY_FUNCTION__
, ifp
->name
, ifp
->vrf_id
,
1321 ospf_vrf_id_to_name(ospf
->vrf_id
), ospf
->vrf_id
,
1322 inet_ntoa(ospf
->router_id
));
1324 /* OSPF must be ready. */
1325 if (!ospf_is_ready(ospf
))
1328 ospf_network_run_interface(ospf
, ifp
, NULL
, NULL
);
1330 /* Update connected redistribute. */
1331 update_redistributed(ospf
, 1);
1335 void ospf_remove_vls_through_area(struct ospf
*ospf
, struct ospf_area
*area
)
1337 struct listnode
*node
, *nnode
;
1338 struct ospf_vl_data
*vl_data
;
1340 for (ALL_LIST_ELEMENTS(ospf
->vlinks
, node
, nnode
, vl_data
))
1341 if (IPV4_ADDR_SAME(&vl_data
->vl_area_id
, &area
->area_id
))
1342 ospf_vl_delete(ospf
, vl_data
);
1346 static const struct message ospf_area_type_msg
[] = {
1347 {OSPF_AREA_DEFAULT
, "Default"},
1348 {OSPF_AREA_STUB
, "Stub"},
1349 {OSPF_AREA_NSSA
, "NSSA"},
1352 static void ospf_area_type_set(struct ospf_area
*area
, int type
)
1354 struct listnode
*node
;
1355 struct ospf_interface
*oi
;
1357 if (area
->external_routing
== type
) {
1358 if (IS_DEBUG_OSPF_EVENT
)
1359 zlog_debug("Area[%s]: Types are the same, ignored.",
1360 inet_ntoa(area
->area_id
));
1364 area
->external_routing
= type
;
1366 if (IS_DEBUG_OSPF_EVENT
)
1367 zlog_debug("Area[%s]: Configured as %s",
1368 inet_ntoa(area
->area_id
),
1369 lookup_msg(ospf_area_type_msg
, type
, NULL
));
1371 switch (area
->external_routing
) {
1372 case OSPF_AREA_DEFAULT
:
1373 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1374 if (oi
->nbr_self
!= NULL
) {
1375 UNSET_FLAG(oi
->nbr_self
->options
,
1377 SET_FLAG(oi
->nbr_self
->options
, OSPF_OPTION_E
);
1380 case OSPF_AREA_STUB
:
1381 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1382 if (oi
->nbr_self
!= NULL
) {
1383 if (IS_DEBUG_OSPF_EVENT
)
1385 "setting options on %s accordingly",
1387 UNSET_FLAG(oi
->nbr_self
->options
,
1389 UNSET_FLAG(oi
->nbr_self
->options
,
1391 if (IS_DEBUG_OSPF_EVENT
)
1392 zlog_debug("options set on %s: %x",
1393 IF_NAME(oi
), OPTIONS(oi
));
1396 case OSPF_AREA_NSSA
:
1397 for (ALL_LIST_ELEMENTS_RO(area
->oiflist
, node
, oi
))
1398 if (oi
->nbr_self
!= NULL
) {
1400 "setting nssa options on %s accordingly",
1402 UNSET_FLAG(oi
->nbr_self
->options
,
1404 SET_FLAG(oi
->nbr_self
->options
, OSPF_OPTION_NP
);
1405 zlog_debug("options set on %s: %x", IF_NAME(oi
),
1413 ospf_router_lsa_update_area(area
);
1414 ospf_schedule_abr_task(area
->ospf
);
1417 int ospf_area_shortcut_set(struct ospf
*ospf
, struct ospf_area
*area
, int mode
)
1419 if (area
->shortcut_configured
== mode
)
1422 area
->shortcut_configured
= mode
;
1423 ospf_router_lsa_update_area(area
);
1424 ospf_schedule_abr_task(ospf
);
1426 ospf_area_check_free(ospf
, area
->area_id
);
1431 int ospf_area_shortcut_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1433 area
->shortcut_configured
= OSPF_SHORTCUT_DEFAULT
;
1434 ospf_router_lsa_update_area(area
);
1435 ospf_area_check_free(ospf
, area
->area_id
);
1436 ospf_schedule_abr_task(ospf
);
1441 static int ospf_area_vlink_count(struct ospf
*ospf
, struct ospf_area
*area
)
1443 struct ospf_vl_data
*vl
;
1444 struct listnode
*node
;
1447 for (ALL_LIST_ELEMENTS_RO(ospf
->vlinks
, node
, vl
))
1448 if (IPV4_ADDR_SAME(&vl
->vl_area_id
, &area
->area_id
))
1454 int ospf_area_display_format_set(struct ospf
*ospf
, struct ospf_area
*area
,
1457 area
->area_id_fmt
= df
;
1462 int ospf_area_stub_set(struct ospf
*ospf
, struct in_addr area_id
)
1464 struct ospf_area
*area
;
1466 area
= ospf_area_get(ospf
, area_id
);
1467 if (ospf_area_vlink_count(ospf
, area
))
1470 if (area
->external_routing
!= OSPF_AREA_STUB
)
1471 ospf_area_type_set(area
, OSPF_AREA_STUB
);
1476 int ospf_area_stub_unset(struct ospf
*ospf
, struct in_addr area_id
)
1478 struct ospf_area
*area
;
1480 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1484 if (area
->external_routing
== OSPF_AREA_STUB
)
1485 ospf_area_type_set(area
, OSPF_AREA_DEFAULT
);
1487 ospf_area_check_free(ospf
, area_id
);
1492 int ospf_area_no_summary_set(struct ospf
*ospf
, struct in_addr area_id
)
1494 struct ospf_area
*area
;
1496 area
= ospf_area_get(ospf
, area_id
);
1497 area
->no_summary
= 1;
1502 int ospf_area_no_summary_unset(struct ospf
*ospf
, struct in_addr area_id
)
1504 struct ospf_area
*area
;
1506 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1510 area
->no_summary
= 0;
1511 ospf_area_check_free(ospf
, area_id
);
1516 int ospf_area_nssa_no_summary_set(struct ospf
*ospf
, struct in_addr area_id
)
1518 struct ospf_area
*area
;
1520 area
= ospf_area_get(ospf
, area_id
);
1521 if (ospf_area_vlink_count(ospf
, area
))
1524 if (area
->external_routing
!= OSPF_AREA_NSSA
) {
1525 ospf_area_type_set(area
, OSPF_AREA_NSSA
);
1527 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1530 ospf_area_no_summary_set(ospf
, area_id
);
1535 int ospf_area_nssa_set(struct ospf
*ospf
, struct in_addr area_id
)
1537 struct ospf_area
*area
;
1539 area
= ospf_area_get(ospf
, area_id
);
1540 if (ospf_area_vlink_count(ospf
, area
))
1543 if (area
->external_routing
!= OSPF_AREA_NSSA
) {
1544 ospf_area_type_set(area
, OSPF_AREA_NSSA
);
1547 /* set NSSA area defaults */
1548 area
->no_summary
= 0;
1549 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1550 area
->NSSATranslatorState
= OSPF_NSSA_TRANSLATE_DISABLED
;
1551 area
->NSSATranslatorStabilityInterval
=
1552 OSPF_NSSA_TRANS_STABLE_DEFAULT
;
1557 int ospf_area_nssa_unset(struct ospf
*ospf
, struct in_addr area_id
, int argc
)
1559 struct ospf_area
*area
;
1561 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1565 /* argc < 5 -> 'no area x nssa' */
1566 if (argc
< 5 && area
->external_routing
== OSPF_AREA_NSSA
) {
1568 /* set NSSA area defaults */
1569 area
->no_summary
= 0;
1570 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1571 area
->NSSATranslatorState
= OSPF_NSSA_TRANSLATE_DISABLED
;
1572 area
->NSSATranslatorStabilityInterval
=
1573 OSPF_NSSA_TRANS_STABLE_DEFAULT
;
1574 ospf_area_type_set(area
, OSPF_AREA_DEFAULT
);
1576 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1579 ospf_area_check_free(ospf
, area_id
);
1584 int ospf_area_nssa_translator_role_set(struct ospf
*ospf
,
1585 struct in_addr area_id
, int role
)
1587 struct ospf_area
*area
;
1589 area
= ospf_area_lookup_by_area_id(ospf
, area_id
);
1593 area
->NSSATranslatorRole
= role
;
1599 /* XXX: unused? Leave for symmetry? */
1601 ospf_area_nssa_translator_role_unset (struct ospf
*ospf
,
1602 struct in_addr area_id
)
1604 struct ospf_area
*area
;
1606 area
= ospf_area_lookup_by_area_id (ospf
, area_id
);
1610 area
->NSSATranslatorRole
= OSPF_NSSA_ROLE_CANDIDATE
;
1612 ospf_area_check_free (ospf
, area_id
);
1618 int ospf_area_export_list_set(struct ospf
*ospf
, struct ospf_area
*area
,
1619 const char *list_name
)
1621 struct access_list
*list
;
1622 list
= access_list_lookup(AFI_IP
, list_name
);
1624 EXPORT_LIST(area
) = list
;
1626 if (EXPORT_NAME(area
))
1627 free(EXPORT_NAME(area
));
1629 EXPORT_NAME(area
) = strdup(list_name
);
1630 ospf_schedule_abr_task(ospf
);
1635 int ospf_area_export_list_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1638 EXPORT_LIST(area
) = 0;
1640 if (EXPORT_NAME(area
))
1641 free(EXPORT_NAME(area
));
1643 EXPORT_NAME(area
) = NULL
;
1645 ospf_area_check_free(ospf
, area
->area_id
);
1647 ospf_schedule_abr_task(ospf
);
1652 int ospf_area_import_list_set(struct ospf
*ospf
, struct ospf_area
*area
,
1655 struct access_list
*list
;
1656 list
= access_list_lookup(AFI_IP
, name
);
1658 IMPORT_LIST(area
) = list
;
1660 if (IMPORT_NAME(area
))
1661 free(IMPORT_NAME(area
));
1663 IMPORT_NAME(area
) = strdup(name
);
1664 ospf_schedule_abr_task(ospf
);
1669 int ospf_area_import_list_unset(struct ospf
*ospf
, struct ospf_area
*area
)
1671 IMPORT_LIST(area
) = 0;
1673 if (IMPORT_NAME(area
))
1674 free(IMPORT_NAME(area
));
1676 IMPORT_NAME(area
) = NULL
;
1677 ospf_area_check_free(ospf
, area
->area_id
);
1679 ospf_schedule_abr_task(ospf
);
1684 int ospf_timers_refresh_set(struct ospf
*ospf
, int interval
)
1688 if (ospf
->lsa_refresh_interval
== interval
)
1691 time_left
= ospf
->lsa_refresh_interval
1692 - (monotime(NULL
) - ospf
->lsa_refresher_started
);
1694 if (time_left
> interval
) {
1695 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
1696 thread_add_timer(master
, ospf_lsa_refresh_walker
, ospf
,
1697 interval
, &ospf
->t_lsa_refresher
);
1699 ospf
->lsa_refresh_interval
= interval
;
1704 int ospf_timers_refresh_unset(struct ospf
*ospf
)
1708 time_left
= ospf
->lsa_refresh_interval
1709 - (monotime(NULL
) - ospf
->lsa_refresher_started
);
1711 if (time_left
> OSPF_LSA_REFRESH_INTERVAL_DEFAULT
) {
1712 OSPF_TIMER_OFF(ospf
->t_lsa_refresher
);
1713 ospf
->t_lsa_refresher
= NULL
;
1714 thread_add_timer(master
, ospf_lsa_refresh_walker
, ospf
,
1715 OSPF_LSA_REFRESH_INTERVAL_DEFAULT
,
1716 &ospf
->t_lsa_refresher
);
1719 ospf
->lsa_refresh_interval
= OSPF_LSA_REFRESH_INTERVAL_DEFAULT
;
1725 static struct ospf_nbr_nbma
*ospf_nbr_nbma_new(void)
1727 struct ospf_nbr_nbma
*nbr_nbma
;
1729 nbr_nbma
= XCALLOC(MTYPE_OSPF_NEIGHBOR_STATIC
,
1730 sizeof(struct ospf_nbr_nbma
));
1732 nbr_nbma
->priority
= OSPF_NEIGHBOR_PRIORITY_DEFAULT
;
1733 nbr_nbma
->v_poll
= OSPF_POLL_INTERVAL_DEFAULT
;
1738 static void ospf_nbr_nbma_free(struct ospf_nbr_nbma
*nbr_nbma
)
1740 XFREE(MTYPE_OSPF_NEIGHBOR_STATIC
, nbr_nbma
);
1743 static void ospf_nbr_nbma_delete(struct ospf
*ospf
,
1744 struct ospf_nbr_nbma
*nbr_nbma
)
1746 struct route_node
*rn
;
1747 struct prefix_ipv4 p
;
1750 p
.prefix
= nbr_nbma
->addr
;
1751 p
.prefixlen
= IPV4_MAX_BITLEN
;
1753 rn
= route_node_lookup(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1755 ospf_nbr_nbma_free(rn
->info
);
1757 route_unlock_node(rn
);
1758 route_unlock_node(rn
);
1762 static void ospf_nbr_nbma_down(struct ospf_nbr_nbma
*nbr_nbma
)
1764 OSPF_TIMER_OFF(nbr_nbma
->t_poll
);
1766 if (nbr_nbma
->nbr
) {
1767 nbr_nbma
->nbr
->nbr_nbma
= NULL
;
1768 OSPF_NSM_EVENT_EXECUTE(nbr_nbma
->nbr
, NSM_KillNbr
);
1772 listnode_delete(nbr_nbma
->oi
->nbr_nbma
, nbr_nbma
);
1775 static void ospf_nbr_nbma_add(struct ospf_nbr_nbma
*nbr_nbma
,
1776 struct ospf_interface
*oi
)
1778 struct ospf_neighbor
*nbr
;
1779 struct route_node
*rn
;
1782 if (oi
->type
!= OSPF_IFTYPE_NBMA
)
1785 if (nbr_nbma
->nbr
!= NULL
)
1788 if (IPV4_ADDR_SAME(&oi
->nbr_self
->address
.u
.prefix4
, &nbr_nbma
->addr
))
1792 listnode_add(oi
->nbr_nbma
, nbr_nbma
);
1794 /* Get neighbor information from table. */
1796 p
.prefixlen
= IPV4_MAX_BITLEN
;
1797 p
.u
.prefix4
= nbr_nbma
->addr
;
1799 rn
= route_node_get(oi
->nbrs
, (struct prefix
*)&p
);
1802 nbr
->nbr_nbma
= nbr_nbma
;
1803 nbr_nbma
->nbr
= nbr
;
1805 route_unlock_node(rn
);
1807 nbr
= rn
->info
= ospf_nbr_new(oi
);
1808 nbr
->state
= NSM_Down
;
1809 nbr
->src
= nbr_nbma
->addr
;
1810 nbr
->nbr_nbma
= nbr_nbma
;
1811 nbr
->priority
= nbr_nbma
->priority
;
1814 nbr_nbma
->nbr
= nbr
;
1816 OSPF_NSM_EVENT_EXECUTE(nbr
, NSM_Start
);
1820 void ospf_nbr_nbma_if_update(struct ospf
*ospf
, struct ospf_interface
*oi
)
1822 struct ospf_nbr_nbma
*nbr_nbma
;
1823 struct route_node
*rn
;
1824 struct prefix_ipv4 p
;
1826 if (oi
->type
!= OSPF_IFTYPE_NBMA
)
1829 for (rn
= route_top(ospf
->nbr_nbma
); rn
; rn
= route_next(rn
))
1830 if ((nbr_nbma
= rn
->info
))
1831 if (nbr_nbma
->oi
== NULL
&& nbr_nbma
->nbr
== NULL
) {
1833 p
.prefix
= nbr_nbma
->addr
;
1834 p
.prefixlen
= IPV4_MAX_BITLEN
;
1836 if (prefix_match(oi
->address
,
1837 (struct prefix
*)&p
))
1838 ospf_nbr_nbma_add(nbr_nbma
, oi
);
1842 struct ospf_nbr_nbma
*ospf_nbr_nbma_lookup(struct ospf
*ospf
,
1843 struct in_addr nbr_addr
)
1845 struct route_node
*rn
;
1846 struct prefix_ipv4 p
;
1849 p
.prefix
= nbr_addr
;
1850 p
.prefixlen
= IPV4_MAX_BITLEN
;
1852 rn
= route_node_lookup(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1854 route_unlock_node(rn
);
1860 struct ospf_nbr_nbma
*ospf_nbr_nbma_lookup_next(struct ospf
*ospf
,
1861 struct in_addr
*addr
, int first
)
1864 struct ospf_nbr_nbma
*nbr_nbma
;
1865 struct listnode
*node
;
1872 for (ALL_LIST_ELEMENTS_RO (ospf
->nbr_nbma
, node
, nbr_nbma
))
1876 *addr
= nbr_nbma
->addr
;
1879 else if (ntohl (nbr_nbma
->addr
.s_addr
) > ntohl (addr
->s_addr
))
1881 *addr
= nbr_nbma
->addr
;
1889 int ospf_nbr_nbma_set(struct ospf
*ospf
, struct in_addr nbr_addr
)
1891 struct ospf_nbr_nbma
*nbr_nbma
;
1892 struct ospf_interface
*oi
;
1893 struct prefix_ipv4 p
;
1894 struct route_node
*rn
;
1895 struct listnode
*node
;
1897 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1901 nbr_nbma
= ospf_nbr_nbma_new();
1902 nbr_nbma
->addr
= nbr_addr
;
1905 p
.prefix
= nbr_addr
;
1906 p
.prefixlen
= IPV4_MAX_BITLEN
;
1908 rn
= route_node_get(ospf
->nbr_nbma
, (struct prefix
*)&p
);
1910 route_unlock_node(rn
);
1911 rn
->info
= nbr_nbma
;
1913 for (ALL_LIST_ELEMENTS_RO(ospf
->oiflist
, node
, oi
)) {
1914 if (oi
->type
== OSPF_IFTYPE_NBMA
)
1915 if (prefix_match(oi
->address
, (struct prefix
*)&p
)) {
1916 ospf_nbr_nbma_add(nbr_nbma
, oi
);
1924 int ospf_nbr_nbma_unset(struct ospf
*ospf
, struct in_addr nbr_addr
)
1926 struct ospf_nbr_nbma
*nbr_nbma
;
1928 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1929 if (nbr_nbma
== NULL
)
1932 ospf_nbr_nbma_down(nbr_nbma
);
1933 ospf_nbr_nbma_delete(ospf
, nbr_nbma
);
1938 int ospf_nbr_nbma_priority_set(struct ospf
*ospf
, struct in_addr nbr_addr
,
1941 struct ospf_nbr_nbma
*nbr_nbma
;
1943 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1944 if (nbr_nbma
== NULL
)
1947 if (nbr_nbma
->priority
!= priority
)
1948 nbr_nbma
->priority
= priority
;
1953 int ospf_nbr_nbma_priority_unset(struct ospf
*ospf
, struct in_addr nbr_addr
)
1955 struct ospf_nbr_nbma
*nbr_nbma
;
1957 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1958 if (nbr_nbma
== NULL
)
1961 if (nbr_nbma
!= OSPF_NEIGHBOR_PRIORITY_DEFAULT
)
1962 nbr_nbma
->priority
= OSPF_NEIGHBOR_PRIORITY_DEFAULT
;
1967 int ospf_nbr_nbma_poll_interval_set(struct ospf
*ospf
, struct in_addr nbr_addr
,
1968 unsigned int interval
)
1970 struct ospf_nbr_nbma
*nbr_nbma
;
1972 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, nbr_addr
);
1973 if (nbr_nbma
== NULL
)
1976 if (nbr_nbma
->v_poll
!= interval
) {
1977 nbr_nbma
->v_poll
= interval
;
1978 if (nbr_nbma
->oi
&& ospf_if_is_up(nbr_nbma
->oi
)) {
1979 OSPF_TIMER_OFF(nbr_nbma
->t_poll
);
1980 OSPF_POLL_TIMER_ON(nbr_nbma
->t_poll
, ospf_poll_timer
,
1988 int ospf_nbr_nbma_poll_interval_unset(struct ospf
*ospf
, struct in_addr addr
)
1990 struct ospf_nbr_nbma
*nbr_nbma
;
1992 nbr_nbma
= ospf_nbr_nbma_lookup(ospf
, addr
);
1993 if (nbr_nbma
== NULL
)
1996 if (nbr_nbma
->v_poll
!= OSPF_POLL_INTERVAL_DEFAULT
)
1997 nbr_nbma
->v_poll
= OSPF_POLL_INTERVAL_DEFAULT
;
2002 void ospf_master_init(struct thread_master
*master
)
2004 memset(&ospf_master
, 0, sizeof(struct ospf_master
));
2007 om
->ospf
= list_new();
2008 om
->master
= master
;
2011 /* Link OSPF instance to VRF. */
2012 void ospf_vrf_link(struct ospf
*ospf
, struct vrf
*vrf
)
2014 ospf
->vrf_id
= vrf
->vrf_id
;
2015 if (vrf
->info
!= (void *)ospf
)
2016 vrf
->info
= (void *)ospf
;
2019 /* Unlink OSPF instance from VRF. */
2020 void ospf_vrf_unlink(struct ospf
*ospf
, struct vrf
*vrf
)
2022 if (vrf
->info
== (void *)ospf
)
2024 ospf
->vrf_id
= VRF_UNKNOWN
;
2027 /* This is hook function for vrf create called as part of vrf_init */
2028 static int ospf_vrf_new(struct vrf
*vrf
)
2030 if (IS_DEBUG_OSPF_EVENT
)
2031 zlog_debug("%s: VRF Created: %s(%u)", __PRETTY_FUNCTION__
,
2032 vrf
->name
, vrf
->vrf_id
);
2037 /* This is hook function for vrf delete call as part of vrf_init */
2038 static int ospf_vrf_delete(struct vrf
*vrf
)
2040 if (IS_DEBUG_OSPF_EVENT
)
2041 zlog_debug("%s: VRF Deletion: %s(%u)", __PRETTY_FUNCTION__
,
2042 vrf
->name
, vrf
->vrf_id
);
2047 static void ospf_set_redist_vrf_bitmaps(struct ospf
*ospf
)
2050 struct list
*red_list
;
2052 for (type
= 0; type
< ZEBRA_ROUTE_MAX
; type
++) {
2053 red_list
= ospf
->redist
[type
];
2056 if (IS_DEBUG_OSPF_EVENT
)
2058 "%s: setting redist vrf %d bitmap for type %d",
2059 __func__
, ospf
->vrf_id
, type
);
2060 vrf_bitmap_set(zclient
->redist
[AFI_IP
][type
], ospf
->vrf_id
);
2064 /* Enable OSPF VRF instance */
2065 static int ospf_vrf_enable(struct vrf
*vrf
)
2067 struct ospf
*ospf
= NULL
;
2068 vrf_id_t old_vrf_id
;
2071 if (IS_DEBUG_OSPF_EVENT
)
2072 zlog_debug("%s: VRF %s id %u enabled", __PRETTY_FUNCTION__
,
2073 vrf
->name
, vrf
->vrf_id
);
2075 ospf
= ospf_lookup_by_name(vrf
->name
);
2077 if (ospf
->name
&& strmatch(vrf
->name
, VRF_DEFAULT_NAME
)) {
2078 XFREE(MTYPE_OSPF_TOP
, ospf
->name
);
2081 old_vrf_id
= ospf
->vrf_id
;
2082 /* We have instance configured, link to VRF and make it "up". */
2083 ospf_vrf_link(ospf
, vrf
);
2084 if (IS_DEBUG_OSPF_EVENT
)
2086 "%s: ospf linked to vrf %s vrf_id %u (old id %u)",
2087 __PRETTY_FUNCTION__
, vrf
->name
, ospf
->vrf_id
,
2090 if (old_vrf_id
!= ospf
->vrf_id
) {
2091 frr_with_privs(&ospfd_privs
) {
2092 /* stop zebra redist to us for old vrf */
2093 zclient_send_dereg_requests(zclient
,
2096 ospf_set_redist_vrf_bitmaps(ospf
);
2098 /* start zebra redist to us for new vrf */
2099 ospf_zebra_vrf_register(ospf
);
2101 ret
= ospf_sock_init(ospf
);
2103 if (ret
< 0 || ospf
->fd
<= 0)
2105 thread_add_read(master
, ospf_read
, ospf
, ospf
->fd
,
2107 ospf
->oi_running
= 1;
2108 ospf_router_id_update(ospf
);
2115 /* Disable OSPF VRF instance */
2116 static int ospf_vrf_disable(struct vrf
*vrf
)
2118 struct ospf
*ospf
= NULL
;
2119 vrf_id_t old_vrf_id
= VRF_UNKNOWN
;
2121 if (vrf
->vrf_id
== VRF_DEFAULT
)
2124 if (IS_DEBUG_OSPF_EVENT
)
2125 zlog_debug("%s: VRF %s id %d disabled.", __PRETTY_FUNCTION__
,
2126 vrf
->name
, vrf
->vrf_id
);
2128 ospf
= ospf_lookup_by_name(vrf
->name
);
2130 old_vrf_id
= ospf
->vrf_id
;
2132 /* We have instance configured, unlink
2133 * from VRF and make it "down".
2135 ospf_vrf_unlink(ospf
, vrf
);
2136 ospf
->oi_running
= 0;
2137 if (IS_DEBUG_OSPF_EVENT
)
2138 zlog_debug("%s: ospf old_vrf_id %d unlinked",
2139 __PRETTY_FUNCTION__
, old_vrf_id
);
2140 thread_cancel(ospf
->t_read
);
2145 /* Note: This is a callback, the VRF will be deleted by the caller. */
2149 void ospf_vrf_init(void)
2151 vrf_init(ospf_vrf_new
, ospf_vrf_enable
, ospf_vrf_disable
,
2152 ospf_vrf_delete
, ospf_vrf_enable
);
2155 void ospf_vrf_terminate(void)
2160 const char *ospf_vrf_id_to_name(vrf_id_t vrf_id
)
2162 struct vrf
*vrf
= vrf_lookup_by_id(vrf_id
);
2164 return vrf
? vrf
->name
: "NIL";
2167 const char *ospf_get_name(const struct ospf
*ospf
)
2172 return VRF_DEFAULT_NAME
;