2 * IS-IS Rout(e)ing protocol - isis_adjacency.c
3 * handling of IS-IS adjacencies
5 * Copyright (C) 2001,2002 Sampo Saaristo
6 * Tampere University of Technology
7 * Institute of Communications Engineering
9 * This program is free software; you can redistribute it and/or modify it
10 * under the terms of the GNU General Public Licenseas published by the Free
11 * Software Foundation; either version 2 of the License, or (at your option)
14 * This program is distributed in the hope that it will be useful,but WITHOUT
15 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
16 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
19 * You should have received a copy of the GNU General Public License along
20 * with this program; see the file COPYING; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
35 #include "isisd/isis_constants.h"
36 #include "isisd/isis_common.h"
37 #include "isisd/isis_flags.h"
38 #include "isisd/isisd.h"
39 #include "isisd/isis_circuit.h"
40 #include "isisd/isis_adjacency.h"
41 #include "isisd/isis_misc.h"
42 #include "isisd/isis_dr.h"
43 #include "isisd/isis_dynhn.h"
44 #include "isisd/isis_pdu.h"
45 #include "isisd/isis_lsp.h"
46 #include "isisd/isis_spf.h"
47 #include "isisd/isis_events.h"
48 #include "isisd/isis_mt.h"
49 #include "isisd/isis_tlvs.h"
50 #include "isisd/fabricd.h"
52 extern struct isis
*isis
;
54 static struct isis_adjacency
*adj_alloc(const uint8_t *id
)
56 struct isis_adjacency
*adj
;
58 adj
= XCALLOC(MTYPE_ISIS_ADJACENCY
, sizeof(struct isis_adjacency
));
59 memcpy(adj
->sysid
, id
, ISIS_SYS_ID_LEN
);
64 struct isis_adjacency
*isis_new_adj(const uint8_t *id
, const uint8_t *snpa
,
65 int level
, struct isis_circuit
*circuit
)
67 struct isis_adjacency
*adj
;
70 adj
= adj_alloc(id
); /* P2P kludge */
73 memcpy(adj
->snpa
, snpa
, ETH_ALEN
);
75 memset(adj
->snpa
, ' ', ETH_ALEN
);
78 adj
->circuit
= circuit
;
81 adj
->last_flap
= time(NULL
);
82 adj
->threeway_state
= ISIS_THREEWAY_DOWN
;
83 if (circuit
->circ_type
== CIRCUIT_T_BROADCAST
) {
84 listnode_add(circuit
->u
.bc
.adjdb
[level
- 1], adj
);
85 adj
->dischanges
[level
- 1] = 0;
86 for (i
= 0; i
< DIS_RECORDS
;
87 i
++) /* clear N DIS state change records */
89 adj
->dis_record
[(i
* ISIS_LEVELS
) + level
- 1].dis
=
91 adj
->dis_record
[(i
* ISIS_LEVELS
) + level
- 1]
92 .last_dis_change
= time(NULL
);
99 struct isis_adjacency
*isis_adj_lookup(const uint8_t *sysid
, struct list
*adjdb
)
101 struct isis_adjacency
*adj
;
102 struct listnode
*node
;
104 for (ALL_LIST_ELEMENTS_RO(adjdb
, node
, adj
))
105 if (memcmp(adj
->sysid
, sysid
, ISIS_SYS_ID_LEN
) == 0)
111 struct isis_adjacency
*isis_adj_lookup_snpa(const uint8_t *ssnpa
,
114 struct listnode
*node
;
115 struct isis_adjacency
*adj
;
117 for (ALL_LIST_ELEMENTS_RO(adjdb
, node
, adj
))
118 if (memcmp(adj
->snpa
, ssnpa
, ETH_ALEN
) == 0)
124 DEFINE_HOOK(isis_adj_state_change_hook
, (struct isis_adjacency
*adj
), (adj
))
126 void isis_delete_adj(void *arg
)
128 struct isis_adjacency
*adj
= arg
;
133 THREAD_TIMER_OFF(adj
->t_expire
);
134 if (adj
->adj_state
!= ISIS_ADJ_DOWN
) {
135 adj
->adj_state
= ISIS_ADJ_DOWN
;
136 hook_call(isis_adj_state_change_hook
, adj
);
139 /* remove from SPF trees */
140 spftree_area_adj_del(adj
->circuit
->area
, adj
);
142 XFREE(MTYPE_ISIS_ADJACENCY_INFO
, adj
->area_addresses
);
143 XFREE(MTYPE_ISIS_ADJACENCY_INFO
, adj
->ipv4_addresses
);
144 XFREE(MTYPE_ISIS_ADJACENCY_INFO
, adj
->ipv6_addresses
);
148 XFREE(MTYPE_ISIS_ADJACENCY
, adj
);
152 static const char *adj_state2string(int state
)
156 case ISIS_ADJ_INITIALIZING
:
157 return "Initializing";
166 return NULL
; /* not reached */
169 void isis_adj_process_threeway(struct isis_adjacency
*adj
,
170 struct isis_threeway_adj
*tw_adj
,
171 enum isis_adj_usage adj_usage
)
173 enum isis_threeway_state next_tw_state
= ISIS_THREEWAY_DOWN
;
175 if (tw_adj
&& !adj
->circuit
->disable_threeway_adj
) {
176 if (tw_adj
->state
== ISIS_THREEWAY_DOWN
) {
177 next_tw_state
= ISIS_THREEWAY_INITIALIZING
;
178 } else if (tw_adj
->state
== ISIS_THREEWAY_INITIALIZING
) {
179 next_tw_state
= ISIS_THREEWAY_UP
;
180 } else if (tw_adj
->state
== ISIS_THREEWAY_UP
) {
181 if (adj
->threeway_state
== ISIS_THREEWAY_DOWN
)
182 next_tw_state
= ISIS_THREEWAY_DOWN
;
184 next_tw_state
= ISIS_THREEWAY_UP
;
187 next_tw_state
= ISIS_THREEWAY_UP
;
190 if (next_tw_state
!= adj
->threeway_state
) {
191 if (isis
->debugs
& DEBUG_ADJ_PACKETS
) {
192 zlog_info("ISIS-Adj (%s): Threeway state change %s to %s",
193 adj
->circuit
->area
->area_tag
,
194 isis_threeway_state_name(adj
->threeway_state
),
195 isis_threeway_state_name(next_tw_state
));
199 if (next_tw_state
!= ISIS_THREEWAY_DOWN
)
200 fabricd_initial_sync_hello(adj
->circuit
);
202 if (next_tw_state
== ISIS_THREEWAY_DOWN
) {
203 isis_adj_state_change(adj
, ISIS_ADJ_DOWN
, "Neighbor restarted");
207 if (next_tw_state
== ISIS_THREEWAY_UP
) {
208 if (adj
->adj_state
!= ISIS_ADJ_UP
) {
209 isis_adj_state_change(adj
, ISIS_ADJ_UP
, NULL
);
210 adj
->adj_usage
= adj_usage
;
214 if (adj
->threeway_state
!= next_tw_state
) {
215 send_hello_sched(adj
->circuit
, 0, TRIGGERED_IIH_DELAY
);
218 adj
->threeway_state
= next_tw_state
;
221 void isis_adj_state_change(struct isis_adjacency
*adj
,
222 enum isis_adj_state new_state
, const char *reason
)
224 enum isis_adj_state old_state
= adj
->adj_state
;
225 struct isis_circuit
*circuit
= adj
->circuit
;
228 adj
->adj_state
= new_state
;
229 if (new_state
!= old_state
) {
230 send_hello_sched(circuit
, adj
->level
, TRIGGERED_IIH_DELAY
);
233 if (isis
->debugs
& DEBUG_ADJ_PACKETS
) {
234 zlog_debug("ISIS-Adj (%s): Adjacency state change %d->%d: %s",
235 circuit
->area
->area_tag
, old_state
, new_state
,
236 reason
? reason
: "unspecified");
239 if (circuit
->area
->log_adj_changes
) {
240 const char *adj_name
;
241 struct isis_dynhn
*dyn
;
243 dyn
= dynhn_find_by_id(adj
->sysid
);
245 adj_name
= dyn
->hostname
;
247 adj_name
= sysid_print(adj
->sysid
);
250 "%%ADJCHANGE: Adjacency to %s (%s) changed from %s to %s, %s",
251 adj_name
, adj
->circuit
->interface
->name
,
252 adj_state2string(old_state
),
253 adj_state2string(new_state
),
254 reason
? reason
: "unspecified");
258 /* send northbound notification */
259 isis_notif_adj_state_change(adj
, new_state
, reason
);
260 #endif /* ifndef FABRICD */
262 if (circuit
->circ_type
== CIRCUIT_T_BROADCAST
) {
264 for (int level
= IS_LEVEL_1
; level
<= IS_LEVEL_2
; level
++) {
265 if ((adj
->level
& level
) == 0)
267 if (new_state
== ISIS_ADJ_UP
) {
268 circuit
->upadjcount
[level
- 1]++;
269 hook_call(isis_adj_state_change_hook
, adj
);
270 /* update counter & timers for debugging
272 adj
->last_flap
= time(NULL
);
274 } else if (new_state
== ISIS_ADJ_DOWN
) {
275 listnode_delete(circuit
->u
.bc
.adjdb
[level
- 1],
278 circuit
->upadjcount
[level
- 1]--;
279 if (circuit
->upadjcount
[level
- 1] == 0)
280 isis_tx_queue_clean(circuit
->tx_queue
);
282 hook_call(isis_adj_state_change_hook
, adj
);
286 if (circuit
->u
.bc
.lan_neighs
[level
- 1]) {
287 list_delete_all_node(
288 circuit
->u
.bc
.lan_neighs
[level
- 1]);
289 isis_adj_build_neigh_list(
290 circuit
->u
.bc
.adjdb
[level
- 1],
291 circuit
->u
.bc
.lan_neighs
[level
- 1]);
294 /* On adjacency state change send new pseudo LSP if we
296 if (circuit
->u
.bc
.is_dr
[level
- 1])
297 lsp_regenerate_schedule_pseudo(circuit
, level
);
301 isis_delete_adj(adj
);
303 } else if (circuit
->circ_type
== CIRCUIT_T_P2P
) {
305 for (int level
= IS_LEVEL_1
; level
<= IS_LEVEL_2
; level
++) {
306 if ((adj
->level
& level
) == 0)
308 if (new_state
== ISIS_ADJ_UP
) {
309 circuit
->upadjcount
[level
- 1]++;
310 hook_call(isis_adj_state_change_hook
, adj
);
312 /* update counter & timers for debugging
314 adj
->last_flap
= time(NULL
);
317 if (level
== IS_LEVEL_1
) {
318 thread_add_timer(master
, send_l1_csnp
,
320 &circuit
->t_send_csnp
[0]);
322 thread_add_timer(master
, send_l2_csnp
,
324 &circuit
->t_send_csnp
[1]);
326 } else if (new_state
== ISIS_ADJ_DOWN
) {
327 if (adj
->circuit
->u
.p2p
.neighbor
== adj
)
328 adj
->circuit
->u
.p2p
.neighbor
= NULL
;
329 circuit
->upadjcount
[level
- 1]--;
330 if (circuit
->upadjcount
[level
- 1] == 0)
331 isis_tx_queue_clean(circuit
->tx_queue
);
333 hook_call(isis_adj_state_change_hook
, adj
);
339 isis_delete_adj(adj
);
344 void isis_adj_print(struct isis_adjacency
*adj
)
346 struct isis_dynhn
*dyn
;
350 dyn
= dynhn_find_by_id(adj
->sysid
);
352 zlog_debug("%s", dyn
->hostname
);
354 zlog_debug("SystemId %20s SNPA %s, level %d\nHolding Time %d",
355 sysid_print(adj
->sysid
), snpa_print(adj
->snpa
), adj
->level
,
357 if (adj
->ipv4_address_count
) {
358 zlog_debug("IPv4 Address(es):");
359 for (unsigned int i
= 0; i
< adj
->ipv4_address_count
; i
++)
360 zlog_debug("%s", inet_ntoa(adj
->ipv4_addresses
[i
]));
363 if (adj
->ipv6_address_count
) {
364 zlog_debug("IPv6 Address(es):");
365 for (unsigned int i
= 0; i
< adj
->ipv6_address_count
; i
++) {
366 char buf
[INET6_ADDRSTRLEN
];
367 inet_ntop(AF_INET6
, &adj
->ipv6_addresses
[i
], buf
,
369 zlog_debug("%s", buf
);
372 zlog_debug("Speaks: %s", nlpid2string(&adj
->nlpids
));
377 int isis_adj_expire(struct thread
*thread
)
379 struct isis_adjacency
*adj
;
384 adj
= THREAD_ARG(thread
);
386 adj
->t_expire
= NULL
;
388 /* trigger the adj expire event */
389 isis_adj_state_change(adj
, ISIS_ADJ_DOWN
, "holding time expired");
395 * show isis neighbor [detail]
397 void isis_adj_print_vty(struct isis_adjacency
*adj
, struct vty
*vty
,
401 struct isis_dynhn
*dyn
;
404 dyn
= dynhn_find_by_id(adj
->sysid
);
406 vty_out(vty
, " %-20s", dyn
->hostname
);
408 vty_out(vty
, " %-20s", sysid_print(adj
->sysid
));
410 if (detail
== ISIS_UI_LEVEL_BRIEF
) {
412 vty_out(vty
, "%-12s", adj
->circuit
->interface
->name
);
414 vty_out(vty
, "NULL circuit!");
415 vty_out(vty
, "%-3u", adj
->level
); /* level */
416 vty_out(vty
, "%-13s", adj_state2string(adj
->adj_state
));
419 vty_out(vty
, "%-9llu",
420 (unsigned long long)adj
->last_upd
421 + adj
->hold_time
- now
);
424 vty_out(vty
, "%-10s", snpa_print(adj
->snpa
));
428 if (detail
== ISIS_UI_LEVEL_DETAIL
) {
432 vty_out(vty
, " Interface: %s",
433 adj
->circuit
->interface
->name
);
435 vty_out(vty
, " Interface: NULL circuit");
436 vty_out(vty
, ", Level: %u", adj
->level
); /* level */
437 vty_out(vty
, ", State: %s", adj_state2string(adj
->adj_state
));
440 vty_out(vty
, ", Expires in %s",
441 time2string(adj
->last_upd
+ adj
->hold_time
444 vty_out(vty
, ", Expires in %s",
445 time2string(adj
->hold_time
));
447 vty_out(vty
, " Adjacency flaps: %u", adj
->flaps
);
448 vty_out(vty
, ", Last: %s ago",
449 time2string(now
- adj
->last_flap
));
451 vty_out(vty
, " Circuit type: %s",
452 circuit_t2string(adj
->circuit_t
));
453 vty_out(vty
, ", Speaks: %s", nlpid2string(&adj
->nlpids
));
455 if (adj
->mt_count
!= 1
456 || adj
->mt_set
[0] != ISIS_MT_IPV4_UNICAST
) {
457 vty_out(vty
, " Topologies:\n");
458 for (unsigned int i
= 0; i
< adj
->mt_count
; i
++)
459 vty_out(vty
, " %s\n",
460 isis_mtid2str(adj
->mt_set
[i
]));
462 vty_out(vty
, " SNPA: %s", snpa_print(adj
->snpa
));
464 && (adj
->circuit
->circ_type
== CIRCUIT_T_BROADCAST
)) {
465 dyn
= dynhn_find_by_id(adj
->lanid
);
467 vty_out(vty
, ", LAN id: %s.%02x", dyn
->hostname
,
468 adj
->lanid
[ISIS_SYS_ID_LEN
]);
470 vty_out(vty
, ", LAN id: %s.%02x",
471 sysid_print(adj
->lanid
),
472 adj
->lanid
[ISIS_SYS_ID_LEN
]);
475 vty_out(vty
, " LAN Priority: %u",
476 adj
->prio
[adj
->level
- 1]);
478 vty_out(vty
, ", %s, DIS flaps: %u, Last: %s ago",
480 adj
->dis_record
[ISIS_LEVELS
+ level
- 1]
482 adj
->dischanges
[level
- 1],
483 time2string(now
- (adj
->dis_record
[ISIS_LEVELS
489 if (adj
->area_address_count
) {
490 vty_out(vty
, " Area Address(es):\n");
491 for (unsigned int i
= 0; i
< adj
->area_address_count
;
493 vty_out(vty
, " %s\n",
494 isonet_print(adj
->area_addresses
[i
]
496 adj
->area_addresses
[i
]
500 if (adj
->ipv4_address_count
) {
501 vty_out(vty
, " IPv4 Address(es):\n");
502 for (unsigned int i
= 0; i
< adj
->ipv4_address_count
;
504 vty_out(vty
, " %s\n",
505 inet_ntoa(adj
->ipv4_addresses
[i
]));
507 if (adj
->ipv6_address_count
) {
508 vty_out(vty
, " IPv6 Address(es):\n");
509 for (unsigned int i
= 0; i
< adj
->ipv6_address_count
;
511 char buf
[INET6_ADDRSTRLEN
];
512 inet_ntop(AF_INET6
, &adj
->ipv6_addresses
[i
],
514 vty_out(vty
, " %s\n", buf
);
522 void isis_adj_build_neigh_list(struct list
*adjdb
, struct list
*list
)
524 struct isis_adjacency
*adj
;
525 struct listnode
*node
;
528 zlog_warn("isis_adj_build_neigh_list(): NULL list");
532 for (ALL_LIST_ELEMENTS_RO(adjdb
, node
, adj
)) {
534 zlog_warn("isis_adj_build_neigh_list(): NULL adj");
538 if ((adj
->adj_state
== ISIS_ADJ_UP
539 || adj
->adj_state
== ISIS_ADJ_INITIALIZING
))
540 listnode_add(list
, adj
->snpa
);
545 void isis_adj_build_up_list(struct list
*adjdb
, struct list
*list
)
547 struct isis_adjacency
*adj
;
548 struct listnode
*node
;
551 zlog_warn("isis_adj_build_up_list(): adjacency DB is empty");
556 zlog_warn("isis_adj_build_up_list(): NULL list");
560 for (ALL_LIST_ELEMENTS_RO(adjdb
, node
, adj
)) {
562 zlog_warn("isis_adj_build_up_list(): NULL adj");
566 if (adj
->adj_state
== ISIS_ADJ_UP
)
567 listnode_add(list
, adj
);
573 int isis_adj_usage2levels(enum isis_adj_usage usage
)
576 case ISIS_ADJ_LEVEL1
:
578 case ISIS_ADJ_LEVEL2
:
580 case ISIS_ADJ_LEVEL1AND2
:
581 return IS_LEVEL_1
| IS_LEVEL_2
;