ospfd/ospf_interface.c

   1 /*
   2  * OSPF Interface functions.
   3  * Copyright (C) 1999, 2000 Toshiaki Takada
   4  *
   5  * This file is part of GNU Zebra.
   6  *
   7  * GNU Zebra is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published
   9  * by the Free Software Foundation; either version 2, or (at your
  10  * option) any later version.
  11  *
  12  * GNU Zebra is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with GNU Zebra; see the file COPYING.  If not, write to the
  19  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  20  * Boston, MA 02111-1307, USA.
  21  */
  22
  23 #include <zebra.h>
  24
  25 #include "thread.h"
  26 #include "linklist.h"
  27 #include "prefix.h"
  28 #include "if.h"
  29 #include "table.h"
  30 #include "memory.h"
  31 #include "command.h"
  32 #include "stream.h"
  33 #include "log.h"
  34
  35 #include "ospfd/ospfd.h"
  36 #include "ospfd/ospf_spf.h"
  37 #include "ospfd/ospf_interface.h"
  38 #include "ospfd/ospf_ism.h"
  39 #include "ospfd/ospf_asbr.h"
  40 #include "ospfd/ospf_lsa.h"
  41 #include "ospfd/ospf_lsdb.h"
  42 #include "ospfd/ospf_neighbor.h"
  43 #include "ospfd/ospf_nsm.h"
  44 #include "ospfd/ospf_packet.h"
  45 #include "ospfd/ospf_abr.h"
  46 #include "ospfd/ospf_network.h"
  47 #include "ospfd/ospf_dump.h"
  48 #ifdef HAVE_SNMP
  49 #include "ospfd/ospf_snmp.h"
  50 #endif /* HAVE_SNMP */
  51
  52 \f
  53 int
  54 ospf_if_get_output_cost (struct ospf_interface *oi)
  55 {
  56   /* If all else fails, use default OSPF cost */
  57   u_int32_t cost;
  58   u_int32_t bw, refbw;
  59
  60   bw = oi->ifp->bandwidth ? oi->ifp->bandwidth : OSPF_DEFAULT_BANDWIDTH;
  61   refbw = oi->ospf->ref_bandwidth;
  62
  63   /* A specifed ip ospf cost overrides a calculated one. */
  64   if (OSPF_IF_PARAM_CONFIGURED (IF_DEF_PARAMS (oi->ifp), output_cost_cmd) ||
  65       OSPF_IF_PARAM_CONFIGURED (oi->params, output_cost_cmd))
  66     cost = OSPF_IF_PARAM (oi, output_cost_cmd);
  67   /* See if a cost can be calculated from the zebra processes
  68      interface bandwidth field. */
  69   else
  70     {
  71       cost = (u_int32_t) ((double)refbw / (double)bw + (double)0.5);
  72       if (cost < 1)
  73         cost = 1;
  74       else if (cost > 65535)
  75         cost = 65535;
  76     }
  77
  78   return cost;
  79 }
  80
  81 void
  82 ospf_if_recalculate_output_cost (struct interface *ifp)
  83 {
  84   u_int32_t newcost;
  85   struct route_node *rn;
  86
  87   for (rn = route_top (IF_OIFS (ifp)); rn; rn = route_next (rn))
  88     {
  89       struct ospf_interface *oi;
  90
  91       if ( (oi = rn->info) == NULL)
  92         continue;
  93
  94       newcost = ospf_if_get_output_cost (oi);
  95
  96       /* Is actual output cost changed? */
  97       if (oi->output_cost != newcost)
  98         {
  99           oi->output_cost = newcost;
 100           ospf_router_lsa_timer_add (oi->area);
 101         }
 102     }
 103 }
 104
 105 void
 106 ospf_if_reset_variables (struct ospf_interface *oi)
 107 {
 108   /* Set default values. */
 109   /* don't clear this flag.  oi->flag = OSPF_IF_DISABLE; */
 110
 111   if (oi->vl_data)
 112     oi->type = OSPF_IFTYPE_VIRTUALLINK;
 113   else
 114   /* preserve network-type */
 115   if (oi->type != OSPF_IFTYPE_NBMA)
 116     oi->type = OSPF_IFTYPE_BROADCAST;
 117
 118   oi->state = ISM_Down;
 119
 120   oi->crypt_seqnum = 0;
 121
 122   /* This must be short, (less than RxmtInterval)
 123      - RFC 2328 Section 13.5 para 3.  Set to 1 second to avoid Acks being
 124        held back for too long - MAG */
 125   oi->v_ls_ack = 1;
 126 }
 127
 128 void
 129 ospf_add_to_if (struct interface *ifp, struct ospf_interface *oi)
 130 {
 131   struct route_node *rn;
 132   struct prefix p;
 133
 134   p = *oi->address;
 135   p.prefixlen = IPV4_MAX_PREFIXLEN;
 136
 137   rn = route_node_get (IF_OIFS (ifp), &p);
 138   /* rn->info should either be NULL or equal to this oi
 139    * as route_node_get may return an existing node
 140    */
 141   assert (! rn->info || rn->info == oi);
 142   rn->info = oi;
 143 }
 144
 145 void
 146 ospf_delete_from_if (struct interface *ifp, struct ospf_interface *oi)
 147 {
 148   struct route_node *rn;
 149   struct prefix p;
 150
 151   p = *oi->address;
 152   p.prefixlen = IPV4_MAX_PREFIXLEN;
 153
 154   rn = route_node_lookup (IF_OIFS (oi->ifp), &p);
 155   assert (rn);
 156   assert (rn->info);
 157   rn->info = NULL;
 158   route_unlock_node (rn);
 159   route_unlock_node (rn);
 160 }
 161
 162 struct ospf_interface *
 163 ospf_if_new (struct ospf *ospf, struct interface *ifp, struct prefix *p)
 164 {
 165   struct ospf_interface *oi;
 166
 167   oi = XCALLOC (MTYPE_OSPF_IF, sizeof (struct ospf_interface));
 168   memset (oi, 0, sizeof (struct ospf_interface));
 169
 170   /* Set zebra interface pointer. */
 171   oi->ifp = ifp;
 172   oi->address = p;
 173
 174   ospf_add_to_if (ifp, oi);
 175   listnode_add (ospf->oiflist, oi);
 176
 177   /* Clear self-originated network-LSA. */
 178   oi->network_lsa_self = NULL;
 179
 180   /* Initialize neighbor list. */
 181   oi->nbrs = route_table_init ();
 182
 183   /* Initialize static neighbor list. */
 184   oi->nbr_nbma = list_new ();
 185
 186   /* Initialize Link State Acknowledgment list. */
 187   oi->ls_ack = list_new ();
 188   oi->ls_ack_direct.ls_ack = list_new ();
 189
 190   /* Set default values. */
 191   ospf_if_reset_variables (oi);
 192
 193   /* Add pseudo neighbor. */
 194   oi->nbr_self = ospf_nbr_new (oi);
 195   oi->nbr_self->state = NSM_TwoWay;
 196   oi->nbr_self->priority = OSPF_IF_PARAM (oi, priority);
 197   oi->nbr_self->options = OSPF_OPTION_E;
 198
 199   oi->ls_upd_queue = route_table_init ();
 200   oi->t_ls_upd_event = NULL;
 201   oi->t_ls_ack_direct = NULL;
 202
 203   oi->crypt_seqnum = time (NULL);
 204
 205 #ifdef HAVE_OPAQUE_LSA
 206   ospf_opaque_type9_lsa_init (oi);
 207 #endif /* HAVE_OPAQUE_LSA */
 208
 209   oi->ospf = ospf;
 210
 211   return oi;
 212 }
 213
 214 /* Restore an interface to its pre UP state
 215    Used from ism_interface_down only */
 216 void
 217 ospf_if_cleanup (struct ospf_interface *oi)
 218 {
 219   struct route_node *rn;
 220   listnode node;
 221   struct ospf_neighbor *nbr;
 222
 223   /* oi->nbrs and oi->nbr_nbma should be deletete on InterafceDown event */
 224   /* delete all static neighbors attached to this interface */
 225   for (node = listhead (oi->nbr_nbma); node; )
 226     {
 227       struct ospf_nbr_nbma *nbr_nbma = getdata (node);
 228       nextnode (node);
 229
 230       OSPF_POLL_TIMER_OFF (nbr_nbma->t_poll);
 231
 232       if (nbr_nbma->nbr)
 233         {
 234           nbr_nbma->nbr->nbr_nbma = NULL;
 235           nbr_nbma->nbr = NULL;
 236         }
 237
 238       nbr_nbma->oi = NULL;
 239
 240       listnode_delete (oi->nbr_nbma, nbr_nbma);
 241     }
 242
 243   /* send Neighbor event KillNbr to all associated neighbors. */
 244   for (rn = route_top (oi->nbrs); rn; rn = route_next (rn))
 245     if ((nbr = rn->info) != NULL)
 246       if (nbr != oi->nbr_self)
 247         OSPF_NSM_EVENT_EXECUTE (nbr, NSM_KillNbr);
 248
 249   /* Cleanup Link State Acknowlegdment list. */
 250   for (node = listhead (oi->ls_ack); node; nextnode (node))
 251     ospf_lsa_unlock (node->data);
 252   list_delete_all_node (oi->ls_ack);
 253
 254   oi->crypt_seqnum = 0;
 255
 256   /* Empty link state update queue */
 257   ospf_ls_upd_queue_empty (oi);
 258
 259  /* Handle pseudo neighbor. */
 260   ospf_nbr_delete (oi->nbr_self);
 261   oi->nbr_self = ospf_nbr_new (oi);
 262   oi->nbr_self->state = NSM_TwoWay;
 263   oi->nbr_self->priority = OSPF_IF_PARAM (oi, priority);
 264
 265   switch (oi->area->external_routing)
 266     {
 267     case OSPF_AREA_DEFAULT:
 268       SET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
 269       break;
 270     case OSPF_AREA_STUB:
 271       UNSET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
 272       break;
 273 #ifdef HAVE_NSSA
 274     case OSPF_AREA_NSSA:
 275       UNSET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
 276       SET_FLAG (oi->nbr_self->options, OSPF_OPTION_NP);
 277       break;
 278 #endif /* HAVE_NSSA */
 279     }
 280
 281   ospf_lsa_unlock (oi->network_lsa_self);
 282   oi->network_lsa_self = NULL;
 283   OSPF_TIMER_OFF (oi->t_network_lsa_self);
 284 }
 285
 286 void
 287 ospf_if_free (struct ospf_interface *oi)
 288 {
 289   ospf_if_down (oi);
 290
 291   assert (oi->state == ISM_Down);
 292
 293 #ifdef HAVE_OPAQUE_LSA
 294   ospf_opaque_type9_lsa_term (oi);
 295 #endif /* HAVE_OPAQUE_LSA */
 296
 297   /* Free Pseudo Neighbour */
 298   ospf_nbr_delete (oi->nbr_self);
 299
 300   route_table_finish (oi->nbrs);
 301   route_table_finish (oi->ls_upd_queue);
 302
 303   /* Free any lists that should be freed */
 304   list_free (oi->nbr_nbma);
 305
 306   list_free (oi->ls_ack);
 307   list_free (oi->ls_ack_direct.ls_ack);
 308
 309   ospf_delete_from_if (oi->ifp, oi);
 310
 311   listnode_delete (oi->ospf->oiflist, oi);
 312   listnode_delete (oi->area->oiflist, oi);
 313
 314   memset (oi, 0, sizeof (*oi));
 315   XFREE (MTYPE_OSPF_IF, oi);
 316 }
 317
 318 \f
 319 /*
 320 *  check if interface with given address is configured and
 321 *  return it if yes.
 322 */
 323 struct ospf_interface *
 324 ospf_if_is_configured (struct ospf *ospf, struct in_addr *address)
 325 {
 326   listnode node;
 327   struct ospf_interface *oi;
 328   struct prefix *addr;
 329
 330   for (node = listhead (ospf->oiflist); node; nextnode (node))
 331     if ((oi = getdata (node)) != NULL && oi->type != OSPF_IFTYPE_VIRTUALLINK)
 332       {
 333         if (oi->type == OSPF_IFTYPE_POINTOPOINT)
 334           addr = oi->connected->destination;
 335         else
 336           addr = oi->address;
 337
 338         if (IPV4_ADDR_SAME (address, &addr->u.prefix4))
 339           return oi;
 340       }
 341
 342   return NULL;
 343 }
 344
 345 int
 346 ospf_if_is_up (struct ospf_interface *oi)
 347 {
 348   return if_is_up (oi->ifp);
 349 }
 350
 351 struct ospf_interface *
 352 ospf_if_lookup_by_local_addr (struct ospf *ospf,
 353                               struct interface *ifp, struct in_addr address)
 354 {
 355   listnode node;
 356   struct ospf_interface *oi;
 357
 358   for (node = listhead (ospf->oiflist); node; nextnode (node))
 359     if ((oi = getdata (node)) != NULL && oi->type != OSPF_IFTYPE_VIRTUALLINK)
 360       {
 361         if (ifp && oi->ifp != ifp)
 362           continue;
 363
 364         if (IPV4_ADDR_SAME (&address, &oi->address->u.prefix4))
 365           return oi;
 366       }
 367
 368   return NULL;
 369 }
 370
 371 struct ospf_interface *
 372 ospf_if_lookup_by_prefix (struct ospf *ospf, struct prefix_ipv4 *p)
 373 {
 374   listnode node;
 375   struct ospf_interface *oi;
 376   struct prefix ptmp;
 377
 378   /* Check each Interface. */
 379   for (node = listhead (ospf->oiflist); node; nextnode (node))
 380     {
 381       if ((oi = getdata (node)) != NULL && oi->type != OSPF_IFTYPE_VIRTUALLINK)
 382         {
 383           if (oi->type == OSPF_IFTYPE_POINTOPOINT)
 384             {
 385               prefix_copy (&ptmp, oi->connected->destination);
 386               ptmp.prefixlen = IPV4_MAX_BITLEN;
 387             }
 388           else
 389             prefix_copy (&ptmp, oi->address);
 390
 391           apply_mask (&ptmp);
 392           if (prefix_same (&ptmp, (struct prefix *) p))
 393             return oi;
 394         }
 395     }
 396   return NULL;
 397 }
 398
 399 /* determine receiving interface by source of packet */
 400 struct ospf_interface *
 401 ospf_if_lookup_recv_if (struct ospf *ospf, struct in_addr src)
 402 {
 403   listnode node;
 404   struct prefix_ipv4 addr;
 405   struct ospf_interface *oi, *match;
 406
 407   addr.family = AF_INET;
 408   addr.prefix = src;
 409   addr.prefixlen = IPV4_MAX_BITLEN;
 410
 411   match = NULL;
 412
 413   for (node = listhead (ospf->oiflist); node; nextnode (node))
 414     {
 415       oi = getdata (node);
 416
 417       if (oi->type == OSPF_IFTYPE_VIRTUALLINK)
 418         continue;
 419
 420       if (oi->type == OSPF_IFTYPE_POINTOPOINT)
 421         {
 422           if (IPV4_ADDR_SAME (&oi->connected->destination->u.prefix4, &src))
 423             return oi;
 424         }
 425       else
 426         {
 427           if (prefix_match (oi->address, (struct prefix *) &addr))
 428             match = oi;
 429         }
 430     }
 431
 432   return match;
 433 }
 434 \f
 435 void
 436 ospf_if_stream_set (struct ospf_interface *oi)
 437 {
 438   /* set output fifo queue. */
 439   if (oi->obuf == NULL)
 440     oi->obuf = ospf_fifo_new ();
 441 }
 442
 443 void
 444 ospf_if_stream_unset (struct ospf_interface *oi)
 445 {
 446   struct ospf *ospf = oi->ospf;
 447
 448   if (oi->obuf)
 449     {
 450      ospf_fifo_free (oi->obuf);
 451      oi->obuf = NULL;
 452
 453      if (oi->on_write_q)
 454        {
 455          listnode_delete (ospf->oi_write_q, oi);
 456          if (list_isempty(ospf->oi_write_q))
 457            OSPF_TIMER_OFF (ospf->t_write);
 458          oi->on_write_q = 0;
 459        }
 460     }
 461 }
 462
 463 \f
 464 struct ospf_if_params *
 465 ospf_new_if_params ()
 466 {
 467   struct ospf_if_params *oip;
 468
 469   oip = XMALLOC (MTYPE_OSPF_IF_PARAMS, sizeof (struct ospf_if_params));
 470   memset (oip, 0, sizeof (struct ospf_if_params));
 471
 472   if (!oip)
 473     return NULL;
 474
 475   memset (oip, 0, sizeof (struct ospf_if_params));
 476
 477   UNSET_IF_PARAM (oip, output_cost_cmd);
 478   UNSET_IF_PARAM (oip, transmit_delay);
 479   UNSET_IF_PARAM (oip, retransmit_interval);
 480   UNSET_IF_PARAM (oip, passive_interface);
 481   UNSET_IF_PARAM (oip, v_hello);
 482   UNSET_IF_PARAM (oip, v_wait);
 483   UNSET_IF_PARAM (oip, priority);
 484   UNSET_IF_PARAM (oip, type);
 485   UNSET_IF_PARAM (oip, auth_simple);
 486   UNSET_IF_PARAM (oip, auth_crypt);
 487   UNSET_IF_PARAM (oip, auth_type);
 488
 489   oip->auth_crypt = list_new ();
 490
 491   return oip;
 492 }
 493
 494 void
 495 ospf_del_if_params (struct ospf_if_params *oip)
 496 {
 497   list_delete (oip->auth_crypt);
 498   XFREE (MTYPE_OSPF_IF_PARAMS, oip);
 499 }
 500
 501 void
 502 ospf_free_if_params (struct interface *ifp, struct in_addr addr)
 503 {
 504   struct ospf_if_params *oip;
 505   struct prefix_ipv4 p;
 506   struct route_node *rn;
 507   p.prefixlen = IPV4_MAX_PREFIXLEN;
 508   p.prefix = addr;
 509   rn = route_node_lookup (IF_OIFS_PARAMS (ifp), (struct prefix*)&p);
 510   if (!rn || !rn->info)
 511     return;
 512
 513   oip = rn->info;
 514   route_unlock_node (rn);
 515
 516   if (!OSPF_IF_PARAM_CONFIGURED (oip, output_cost_cmd) &&
 517       !OSPF_IF_PARAM_CONFIGURED (oip, transmit_delay) &&
 518       !OSPF_IF_PARAM_CONFIGURED (oip, retransmit_interval) &&
 519       !OSPF_IF_PARAM_CONFIGURED (oip, passive_interface) &&
 520       !OSPF_IF_PARAM_CONFIGURED (oip, v_hello) &&
 521       !OSPF_IF_PARAM_CONFIGURED (oip, v_wait) &&
 522       !OSPF_IF_PARAM_CONFIGURED (oip, priority) &&
 523       !OSPF_IF_PARAM_CONFIGURED (oip, type) &&
 524       !OSPF_IF_PARAM_CONFIGURED (oip, auth_simple) &&
 525       !OSPF_IF_PARAM_CONFIGURED (oip, auth_type) &&
 526       listcount (oip->auth_crypt) == 0)
 527     {
 528       ospf_del_if_params (oip);
 529       rn->info = NULL;
 530       route_unlock_node (rn);
 531     }
 532 }
 533
 534 struct ospf_if_params *
 535 ospf_lookup_if_params (struct interface *ifp, struct in_addr addr)
 536 {
 537   struct prefix_ipv4 p;
 538   struct route_node *rn;
 539
 540   p.prefixlen = IPV4_MAX_PREFIXLEN;
 541   p.prefix = addr;
 542
 543   rn = route_node_lookup (IF_OIFS_PARAMS (ifp), (struct prefix*)&p);
 544
 545   if (rn)
 546     {
 547       route_unlock_node (rn);
 548       return rn->info;
 549     }
 550
 551   return NULL;
 552 }
 553
 554 struct ospf_if_params *
 555 ospf_get_if_params (struct interface *ifp, struct in_addr addr)
 556 {
 557   struct prefix_ipv4 p;
 558   struct route_node *rn;
 559
 560   p.family = AF_INET;
 561   p.prefixlen = IPV4_MAX_PREFIXLEN;
 562   p.prefix = addr;
 563
 564   rn = route_node_get (IF_OIFS_PARAMS (ifp), (struct prefix*)&p);
 565
 566   if (rn->info == NULL)
 567     rn->info = ospf_new_if_params ();
 568   else
 569     route_unlock_node (rn);
 570
 571   return rn->info;
 572 }
 573
 574 void
 575 ospf_if_update_params (struct interface *ifp, struct in_addr addr)
 576 {
 577   struct route_node *rn;
 578   struct ospf_interface *oi;
 579
 580   for (rn = route_top (IF_OIFS (ifp)); rn; rn = route_next (rn))
 581     {
 582       if ((oi = rn->info) == NULL)
 583         continue;
 584
 585       if (IPV4_ADDR_SAME (&oi->address->u.prefix4, &addr))
 586         oi->params = ospf_lookup_if_params (ifp, oi->address->u.prefix4);
 587     }
 588 }
 589
 590 int
 591 ospf_if_new_hook (struct interface *ifp)
 592 {
 593   int rc = 0;
 594
 595   ifp->info = XMALLOC (MTYPE_OSPF_IF_INFO, sizeof (struct ospf_if_info));
 596   memset (ifp->info, 0, sizeof (struct ospf_if_info));
 597
 598   IF_OIFS (ifp) = route_table_init ();
 599   IF_OIFS_PARAMS (ifp) = route_table_init ();
 600
 601   IF_DEF_PARAMS (ifp) = ospf_new_if_params ();
 602
 603   SET_IF_PARAM (IF_DEF_PARAMS (ifp), transmit_delay);
 604   IF_DEF_PARAMS (ifp)->transmit_delay = OSPF_TRANSMIT_DELAY_DEFAULT;
 605
 606   SET_IF_PARAM (IF_DEF_PARAMS (ifp), retransmit_interval);
 607   IF_DEF_PARAMS (ifp)->retransmit_interval = OSPF_RETRANSMIT_INTERVAL_DEFAULT;
 608
 609   SET_IF_PARAM (IF_DEF_PARAMS (ifp), priority);
 610   IF_DEF_PARAMS (ifp)->priority = OSPF_ROUTER_PRIORITY_DEFAULT;
 611
 612   SET_IF_PARAM (IF_DEF_PARAMS (ifp), passive_interface);
 613   IF_DEF_PARAMS (ifp)->passive_interface = OSPF_IF_ACTIVE;
 614
 615   SET_IF_PARAM (IF_DEF_PARAMS (ifp), v_hello);
 616   IF_DEF_PARAMS (ifp)->v_hello = OSPF_HELLO_INTERVAL_DEFAULT;
 617
 618   SET_IF_PARAM (IF_DEF_PARAMS (ifp), v_wait);
 619   IF_DEF_PARAMS (ifp)->v_wait = OSPF_ROUTER_DEAD_INTERVAL_DEFAULT;
 620
 621   SET_IF_PARAM (IF_DEF_PARAMS (ifp), auth_simple);
 622   memset (IF_DEF_PARAMS (ifp)->auth_simple, 0, OSPF_AUTH_SIMPLE_SIZE);
 623
 624   SET_IF_PARAM (IF_DEF_PARAMS (ifp), auth_crypt);
 625   IF_DEF_PARAMS (ifp)->auth_crypt = list_new ();
 626
 627   SET_IF_PARAM (IF_DEF_PARAMS (ifp), auth_type);
 628   IF_DEF_PARAMS (ifp)->auth_type = OSPF_AUTH_NOTSET;
 629
 630 #ifdef HAVE_OPAQUE_LSA
 631   rc = ospf_opaque_new_if (ifp);
 632 #endif /* HAVE_OPAQUE_LSA */
 633   return rc;
 634 }
 635
 636 int
 637 ospf_if_delete_hook (struct interface *ifp)
 638 {
 639   int rc = 0;
 640 #ifdef HAVE_OPAQUE_LSA
 641   rc = ospf_opaque_del_if (ifp);
 642 #endif /* HAVE_OPAQUE_LSA */
 643   route_table_finish (IF_OIFS (ifp));
 644   route_table_finish (IF_OIFS_PARAMS (ifp));
 645   XFREE (MTYPE_OSPF_IF_INFO, ifp->info);
 646   ifp->info = NULL;
 647
 648   return rc;
 649 }
 650
 651 int
 652 ospf_if_is_enable (struct ospf_interface *oi)
 653 {
 654   if (!if_is_loopback (oi->ifp))
 655     if (if_is_up (oi->ifp))
 656         return 1;
 657
 658   return 0;
 659 }
 660
 661 int
 662 ospf_if_up (struct ospf_interface *oi)
 663 {
 664   if (oi == NULL)
 665     return 0;
 666
 667   if (oi->type == OSPF_IFTYPE_LOOPBACK)
 668     OSPF_ISM_EVENT_SCHEDULE (oi, ISM_LoopInd);
 669   else
 670     {
 671       if (oi->type != OSPF_IFTYPE_VIRTUALLINK)
 672         ospf_if_add_allspfrouters (oi->ospf, oi->address, oi->ifp->ifindex);
 673       ospf_if_stream_set (oi);
 674       OSPF_ISM_EVENT_SCHEDULE (oi, ISM_InterfaceUp);
 675     }
 676
 677   return 1;
 678 }
 679
 680 int
 681 ospf_if_down (struct ospf_interface *oi)
 682 {
 683   if (oi == NULL)
 684     return 0;
 685
 686   OSPF_ISM_EVENT_EXECUTE (oi, ISM_InterfaceDown);
 687   /* Shutdown packet reception and sending */
 688   ospf_if_stream_unset (oi);
 689   if (oi->type != OSPF_IFTYPE_VIRTUALLINK)
 690     ospf_if_drop_allspfrouters (oi->ospf, oi->address, oi->ifp->ifindex);
 691
 692
 693   return 1;
 694 }
 695
 696 \f
 697 /* Virtual Link related functions. */
 698
 699 struct ospf_vl_data *
 700 ospf_vl_data_new (struct ospf_area *area, struct in_addr vl_peer)
 701 {
 702   struct ospf_vl_data *vl_data;
 703
 704   vl_data = XMALLOC (MTYPE_OSPF_VL_DATA, sizeof (struct ospf_vl_data));
 705   memset (vl_data, 0, sizeof (struct ospf_vl_data));
 706
 707   vl_data->vl_peer.s_addr = vl_peer.s_addr;
 708   vl_data->vl_area_id = area->area_id;
 709   vl_data->format = area->format;
 710
 711   return vl_data;
 712 }
 713
 714 void
 715 ospf_vl_data_free (struct ospf_vl_data *vl_data)
 716 {
 717   XFREE (MTYPE_OSPF_VL_DATA, vl_data);
 718 }
 719
 720 u_int vlink_count = 0;
 721
 722 struct ospf_interface *
 723 ospf_vl_new (struct ospf *ospf, struct ospf_vl_data *vl_data)
 724 {
 725   struct ospf_interface * voi;
 726   struct interface * vi;
 727   char   ifname[INTERFACE_NAMSIZ + 1];
 728   struct ospf_area *area;
 729   struct in_addr area_id;
 730   struct connected *co;
 731   struct prefix_ipv4 *p;
 732
 733   if (IS_DEBUG_OSPF_EVENT)
 734     zlog_info ("ospf_vl_new(): Start");
 735   if (vlink_count == OSPF_VL_MAX_COUNT)
 736     {
 737       if (IS_DEBUG_OSPF_EVENT)
 738         zlog_info ("ospf_vl_new(): Alarm: "
 739                    "cannot create more than OSPF_MAX_VL_COUNT virtual links");
 740       return NULL;
 741     }
 742
 743   if (IS_DEBUG_OSPF_EVENT)
 744     zlog_info ("ospf_vl_new(): creating pseudo zebra interface");
 745
 746   vi = if_create ();
 747   co = connected_new ();
 748   co->ifp = vi;
 749   listnode_add (vi->connected, co);
 750
 751   p = prefix_ipv4_new ();
 752   p->family = AF_INET;
 753   p->prefix.s_addr = 0;
 754   p->prefixlen = 0;
 755
 756   co->address = (struct prefix *)p;
 757
 758   voi = ospf_if_new (ospf, vi, co->address);
 759   if (voi == NULL)
 760     {
 761       if (IS_DEBUG_OSPF_EVENT)
 762         zlog_info ("ospf_vl_new(): Alarm: OSPF int structure is not created");
 763       return NULL;
 764     }
 765   voi->connected = co;
 766   voi->vl_data = vl_data;
 767   voi->ifp->mtu = OSPF_VL_MTU;
 768   voi->type = OSPF_IFTYPE_VIRTUALLINK;
 769
 770   sprintf (ifname, "VLINK%d", vlink_count++);
 771   if (IS_DEBUG_OSPF_EVENT)
 772     zlog_info ("ospf_vl_new(): Created name: %s", ifname);
 773   strncpy (vi->name, ifname, IFNAMSIZ);
 774   if (IS_DEBUG_OSPF_EVENT)
 775     zlog_info ("ospf_vl_new(): set if->name to %s", vi->name);
 776
 777   area_id.s_addr = 0;
 778   area = ospf_area_get (ospf, area_id, OSPF_AREA_ID_FORMAT_ADDRESS);
 779   voi->area = area;
 780
 781   if (IS_DEBUG_OSPF_EVENT)
 782     zlog_info ("ospf_vl_new(): set associated area to the backbone");
 783
 784   ospf_area_add_if (voi->area, voi);
 785
 786   ospf_if_stream_set (voi);
 787
 788   if (IS_DEBUG_OSPF_EVENT)
 789     zlog_info ("ospf_vl_new(): Stop");
 790   return voi;
 791 }
 792
 793 void
 794 ospf_vl_if_delete (struct ospf_vl_data *vl_data)
 795 {
 796   struct interface *ifp = vl_data->vl_oi->ifp;
 797   vl_data->vl_oi->address->u.prefix4.s_addr = 0;
 798   vl_data->vl_oi->address->prefixlen = 0;
 799   ospf_if_free (vl_data->vl_oi);
 800   if_delete (ifp);
 801   vlink_count--;
 802 }
 803
 804 struct ospf_vl_data *
 805 ospf_vl_lookup (struct ospf_area *area, struct in_addr vl_peer)
 806 {
 807   struct ospf_vl_data *vl_data;
 808   listnode node;
 809
 810   for (node = listhead (area->ospf->vlinks); node; nextnode (node))
 811     if ((vl_data = getdata (node)) != NULL)
 812       if (vl_data->vl_peer.s_addr == vl_peer.s_addr &&
 813           IPV4_ADDR_SAME (&vl_data->vl_area_id, &area->area_id))
 814         return vl_data;
 815
 816   return NULL;
 817 }
 818
 819 void
 820 ospf_vl_shutdown (struct ospf_vl_data *vl_data)
 821 {
 822   struct ospf_interface *oi;
 823
 824   if ((oi = vl_data->vl_oi) == NULL)
 825     return;
 826
 827   oi->address->u.prefix4.s_addr = 0;
 828   oi->address->prefixlen = 0;
 829
 830   UNSET_FLAG (oi->ifp->flags, IFF_UP);
 831   /* OSPF_ISM_EVENT_SCHEDULE (oi, ISM_InterfaceDown); */
 832   OSPF_ISM_EVENT_EXECUTE (oi, ISM_InterfaceDown);
 833 }
 834
 835 void
 836 ospf_vl_add (struct ospf *ospf, struct ospf_vl_data *vl_data)
 837 {
 838   listnode_add (ospf->vlinks, vl_data);
 839 #ifdef HAVE_SNMP
 840   ospf_snmp_vl_add (vl_data);
 841 #endif /* HAVE_SNMP */
 842 }
 843
 844 void
 845 ospf_vl_delete (struct ospf *ospf, struct ospf_vl_data *vl_data)
 846 {
 847   ospf_vl_shutdown (vl_data);
 848   ospf_vl_if_delete (vl_data);
 849
 850 #ifdef HAVE_SNMP
 851   ospf_snmp_vl_delete (vl_data);
 852 #endif /* HAVE_SNMP */
 853   listnode_delete (ospf->vlinks, vl_data);
 854
 855   ospf_vl_data_free (vl_data);
 856 }
 857
 858 void
 859 ospf_vl_set_params (struct ospf_vl_data *vl_data, struct vertex *v)
 860 {
 861   int changed = 0;
 862   struct ospf_interface *voi;
 863   listnode node;
 864   struct vertex_nexthop *nh;
 865   int i;
 866   struct router_lsa *rl;
 867
 868   voi = vl_data->vl_oi;
 869
 870   if (voi->output_cost != v->distance)
 871     {
 872       voi->output_cost = v->distance;
 873       changed = 1;
 874     }
 875
 876   for (node = listhead (v->nexthop); node; nextnode (node))
 877     if ((nh = getdata (node)) != NULL)
 878       {
 879         vl_data->out_oi = (struct ospf_interface *) nh->oi;
 880
 881         voi->address->u.prefix4 = vl_data->out_oi->address->u.prefix4;
 882         voi->address->prefixlen = vl_data->out_oi->address->prefixlen;
 883
 884         break; /* We take the first interface. */
 885       }
 886
 887   rl = (struct router_lsa *)v->lsa;
 888
 889   for (i = 0; i < ntohs (rl->links); i++)
 890     {
 891       switch (rl->link[i].type)
 892         {
 893         case LSA_LINK_TYPE_VIRTUALLINK:
 894           if (IS_DEBUG_OSPF_EVENT)
 895             zlog_info ("found back link through VL");
 896         case LSA_LINK_TYPE_TRANSIT:
 897         case LSA_LINK_TYPE_POINTOPOINT:
 898           vl_data->peer_addr = rl->link[i].link_data;
 899           if (IS_DEBUG_OSPF_EVENT)
 900             zlog_info ("%s peer address is %s\n",
 901                        vl_data->vl_oi->ifp->name, inet_ntoa(vl_data->peer_addr));
 902           return;
 903         }
 904     }
 905 }
 906
 907
 908 void
 909 ospf_vl_up_check (struct ospf_area *area, struct in_addr rid,
 910                   struct vertex *v)
 911 {
 912   struct ospf *ospf = area->ospf;
 913   listnode node;
 914   struct ospf_vl_data *vl_data;
 915   struct ospf_interface *oi;
 916
 917   if (IS_DEBUG_OSPF_EVENT)
 918     {
 919       zlog_info ("ospf_vl_up_check(): Start");
 920       zlog_info ("ospf_vl_up_check(): Router ID is %s", inet_ntoa (rid));
 921       zlog_info ("ospf_vl_up_check(): Area is %s", inet_ntoa (area->area_id));
 922     }
 923
 924   for (node = listhead (ospf->vlinks); node; nextnode (node))
 925     {
 926       if ((vl_data = getdata (node)) == NULL)
 927         continue;
 928
 929       if (IS_DEBUG_OSPF_EVENT)
 930         {
 931           zlog_info ("ospf_vl_up_check(): considering VL, name: %s",
 932                      vl_data->vl_oi->ifp->name);
 933           zlog_info ("ospf_vl_up_check(): VL area: %s, peer ID: %s",
 934                      inet_ntoa (vl_data->vl_area_id),
 935                      inet_ntoa (vl_data->vl_peer));
 936         }
 937
 938       if (IPV4_ADDR_SAME (&vl_data->vl_peer, &rid) &&
 939           IPV4_ADDR_SAME (&vl_data->vl_area_id, &area->area_id))
 940         {
 941           oi = vl_data->vl_oi;
 942           SET_FLAG (vl_data->flags, OSPF_VL_FLAG_APPROVED);
 943
 944           if (IS_DEBUG_OSPF_EVENT)
 945             zlog_info ("ospf_vl_up_check(): this VL matched");
 946
 947           if (oi->state == ISM_Down)
 948             {
 949               if (IS_DEBUG_OSPF_EVENT)
 950                 zlog_info ("ospf_vl_up_check(): VL is down, waking it up");
 951               SET_FLAG (oi->ifp->flags, IFF_UP);
 952               OSPF_ISM_EVENT_SCHEDULE (oi, ISM_InterfaceUp);
 953             }
 954
 955           ospf_vl_set_params (vl_data, v);
 956         }
 957     }
 958 }
 959
 960 void
 961 ospf_vl_unapprove (struct ospf *ospf)
 962 {
 963   listnode node;
 964   struct ospf_vl_data *vl_data;
 965
 966   for (node = listhead (ospf->vlinks); node; nextnode (node))
 967     if ((vl_data = getdata (node)) != NULL)
 968       UNSET_FLAG (vl_data->flags, OSPF_VL_FLAG_APPROVED);
 969 }
 970
 971 void
 972 ospf_vl_shut_unapproved (struct ospf *ospf)
 973 {
 974   listnode node;
 975   struct ospf_vl_data *vl_data;
 976
 977   for (node = listhead (ospf->vlinks); node; nextnode (node))
 978     if ((vl_data = getdata (node)) != NULL)
 979       if (!CHECK_FLAG (vl_data->flags, OSPF_VL_FLAG_APPROVED))
 980         ospf_vl_shutdown (vl_data);
 981 }
 982
 983 int
 984 ospf_full_virtual_nbrs (struct ospf_area *area)
 985 {
 986   if (IS_DEBUG_OSPF_EVENT)
 987     {
 988       zlog_info ("counting fully adjacent virtual neighbors in area %s",
 989                  inet_ntoa (area->area_id));
 990       zlog_info ("there are %d of them", area->full_vls);
 991     }
 992
 993   return area->full_vls;
 994 }
 995
 996 int
 997 ospf_vls_in_area (struct ospf_area *area)
 998 {
 999   listnode node;
1000   struct ospf_vl_data *vl_data;
1001   int c = 0;
1002
1003   for (node = listhead (area->ospf->vlinks); node; nextnode (node))
1004     if ((vl_data = getdata (node)) != NULL)
1005       if (IPV4_ADDR_SAME (&vl_data->vl_area_id, &area->area_id))
1006         c++;
1007
1008   return c;
1009 }
1010
1011 \f
1012 struct crypt_key *
1013 ospf_crypt_key_new ()
1014 {
1015   struct crypt_key *ck;
1016
1017   ck = XMALLOC (MTYPE_OSPF_CRYPT_KEY, sizeof (struct crypt_key));
1018   memset (ck, 0, sizeof (struct crypt_key));
1019
1020   return ck;
1021 }
1022
1023 void
1024 ospf_crypt_key_add (list crypt, struct crypt_key *ck)
1025 {
1026   listnode_add (crypt, ck);
1027 }
1028
1029 struct crypt_key *
1030 ospf_crypt_key_lookup (list auth_crypt, u_char key_id)
1031 {
1032   listnode node;
1033   struct crypt_key *ck;
1034
1035   for (node = listhead (auth_crypt); node; nextnode (node))
1036     {
1037       ck = getdata (node);
1038       if (ck->key_id == key_id)
1039         return ck;
1040     }
1041
1042   return NULL;
1043 }
1044
1045 int
1046 ospf_crypt_key_delete (list auth_crypt, u_char key_id)
1047 {
1048   listnode node;
1049   struct crypt_key *ck;
1050
1051   for (node = listhead (auth_crypt); node; nextnode (node))
1052     {
1053       ck = getdata (node);
1054       if (ck->key_id == key_id)
1055         {
1056           listnode_delete (auth_crypt, ck);
1057           return 1;
1058         }
1059     }
1060
1061   return 0;
1062 }
1063
1064 void
1065 ospf_if_init ()
1066 {
1067   /* Initialize Zebra interface data structure. */
1068   if_init ();
1069   if_add_hook (IF_NEW_HOOK, ospf_if_new_hook);
1070   if_add_hook (IF_DELETE_HOOK, ospf_if_delete_hook);
1071 }