ldp/ldp_hello.c

   1
   2 /*
   3  *  Copyright (C) James R. Leu 2000
   4  *  jleu@mindspring.com
   5  *
   6  *  This software is covered under the LGPL, for more
   7  *  info check out http://www.gnu.org/copyleft/lgpl.html
   8  */
   9
  10 #include <stdio.h>
  11 #include <sys/socket.h>
  12
  13 #include "ldp_struct.h"
  14 #include "ldp_hello.h"
  15 #include "ldp_mesg.h"
  16 #include "ldp_buf.h"
  17 #include "ldp_adj.h"
  18 #include "ldp_hello.h"
  19 #include "ldp_entity.h"
  20 #include "ldp_session.h"
  21 #include "ldp_inet_addr.h"
  22 #include "ldp_pdu_setup.h"
  23
  24 #include "mpls_assert.h"
  25 #include "mpls_socket_impl.h"
  26 #include "mpls_timer_impl.h"
  27 #include "mpls_lock_impl.h"
  28 #include "mpls_trace_impl.h"
  29
  30 void ldp_hello_timeout_callback(mpls_timer_handle timer, void *extra,
  31   mpls_cfg_handle handle)
  32 {
  33   ldp_adj *a = (ldp_adj *) extra;
  34   ldp_global *g = (ldp_global*)handle;
  35
  36   LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_TIMER,
  37     "Hello Timout fired: adj(%d)\n", a->index);
  38
  39   mpls_lock_get(g->global_lock);
  40
  41   if (a->session) {
  42     a->session->shutdown_notif = LDP_NOTIF_HOLD_TIMER_EXPIRED;
  43     a->session->shutdown_fatal = MPLS_BOOL_FALSE;
  44   }
  45   ldp_adj_shutdown(g, a);
  46   /* timer is deleted inside of ldp_adj_shutdown */
  47   /* the refcount release for the time is done in ldp_adj_shutdown as well */
  48
  49   mpls_lock_release(g->global_lock);
  50 }
  51
  52 void ldp_hello_send_callback(mpls_timer_handle timer, void *extra,
  53   mpls_cfg_handle handle)
  54 {
  55   ldp_entity *e = (ldp_entity*)extra;
  56   ldp_global *g = (ldp_global*)handle;
  57
  58   LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_TIMER,
  59     "Hello Send fired: entity(%d)\n", e->index);
  60
  61   mpls_lock_get(g->global_lock);
  62
  63   ldp_hello_send(g, e);
  64
  65   mpls_lock_release(g->global_lock);
  66 }
  67
  68 mpls_return_enum ldp_hello_send(ldp_global * g, ldp_entity * e)
  69 {
  70   ldp_mesg **hello = NULL;
  71   mpls_timer_handle *timer;
  72   int *oper_duration = 0;
  73   int targeted = 0;
  74   int duration = 0;
  75   int request = 0;
  76
  77   MPLS_ASSERT(g != NULL && e != NULL);
  78
  79   switch (e->entity_type) {
  80     case LDP_DIRECT:
  81       MPLS_ASSERT(e->p.iff != NULL);
  82       hello = &e->p.iff->hello;
  83       oper_duration = &e->p.iff->hellotime_send_timer_duration;
  84       timer = &e->p.iff->hellotime_send_timer;
  85       targeted = 0;
  86       request = 0;
  87       break;
  88     case LDP_INDIRECT:
  89       MPLS_ASSERT(e->p.peer != NULL);
  90       hello = &e->p.peer->hello;
  91       oper_duration = &e->p.peer->hellotime_send_timer_duration;
  92       timer = &e->p.peer->hellotime_send_timer;
  93       targeted = 1;
  94       if (e->p.peer->target_role == LDP_ACTIVE) {
  95         request = 1;
  96       } else {
  97         request = 0;
  98       }
  99       break;
 100     default:
 101       MPLS_ASSERT(0);
 102   }
 103   if (!*hello) {
 104     *hello = ldp_hello_create(g->message_identifier++,
 105       e->hellotime_timer, &e->transport_address,
 106       g->configuration_sequence_number, targeted, request);
 107   }
 108
 109   duration = e->hellotime_interval;
 110
 111   if (mpls_timer_handle_verify(g->timer_handle, *timer) == MPLS_BOOL_FALSE) {
 112     MPLS_REFCNT_HOLD(e);
 113     *timer = mpls_timer_create(g->timer_handle, MPLS_UNIT_SEC,
 114       duration, (void *)e, g, ldp_hello_send_callback);
 115     if (mpls_timer_handle_verify(g->timer_handle, *timer) == MPLS_BOOL_FALSE) {
 116       *oper_duration = 0;
 117       MPLS_REFCNT_RELEASE(e, ldp_entity_delete);
 118       return MPLS_FAILURE;
 119     }
 120     *oper_duration = duration;
 121     mpls_timer_start(g->timer_handle, *timer, MPLS_TIMER_REOCCURRING);
 122   } else {
 123     if ((*oper_duration) != duration) {
 124       mpls_timer_stop(g->timer_handle, *timer);
 125       *oper_duration = duration;
 126       mpls_timer_modify(g->timer_handle, *timer, duration);
 127       mpls_timer_start(g->timer_handle, *timer, MPLS_TIMER_REOCCURRING);
 128     }
 129   }
 130
 131   LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_SEND, LDP_TRACE_FLAG_PERIODIC,
 132     "Hello Send: entity(%d)\n", e->index);
 133
 134   return ldp_mesg_send_udp(g, e, *hello);
 135 }
 136
 137 ldp_mesg *ldp_hello_create(uint32_t msgid, int holdtime, mpls_inet_addr * traddr,
 138   uint32_t confnum, int targeted, int request)
 139 {
 140   mplsLdpHelloMsg_t *hello = NULL;
 141   ldp_mesg *msg = NULL;
 142
 143   msg = ldp_mesg_create();
 144   ldp_mesg_prepare(msg, MPLS_HELLO_MSGTYPE, msgid);
 145   if (msg != NULL) {
 146     hello = &msg->u.hello;
 147
 148     hello->trAdrTlvExists = 0;
 149     hello->csnTlvExists = 0;
 150
 151     hello->chpTlvExists = 1;
 152
 153     /* this assumes we always want to receive updates for targeted hellos */
 154     hello->baseMsg.msgLength += setupChpTlv(&(hello->chp), targeted,
 155       request, 0, holdtime);
 156
 157     if (traddr && traddr->type == MPLS_FAMILY_IPV4 && traddr->u.ipv4 > 0) {
 158       hello->trAdrTlvExists = 1;
 159       hello->baseMsg.msgLength +=
 160         setupTrAddrTlv(&(hello->trAdr), traddr->u.ipv4);
 161     }
 162
 163     if (confnum > 0) {
 164       hello->csnTlvExists = 1;
 165       hello->baseMsg.msgLength += setupCsnTlv(&(hello->csn), confnum);
 166     }
 167   }
 168   return msg;
 169 }
 170
 171 mpls_return_enum ldp_hello_process(ldp_global * g, ldp_adj * a, ldp_entity *e,
 172   int hellotime, uint32_t csn, mpls_inet_addr * traddr, int targeted,
 173   int request)
 174 {
 175   mpls_inet_addr *local = NULL, *remote = NULL;
 176
 177   MPLS_ASSERT(a && e);
 178
 179   LDP_ENTER(g->user_data, "ldp_hello_process: a = %p, e = %p", a, e);
 180
 181   LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_PERIODIC,
 182     "Hello Recv: entity(%d)\n", e->index);
 183
 184   switch (e->entity_type) {
 185     case LDP_DIRECT:
 186       /* ldp-11 3.5.2. Hello Message */
 187       if (hellotime == 0) {
 188         hellotime = 15;
 189       }
 190
 191       local = &e->p.iff->local_source_address;
 192
 193       break;
 194     case LDP_INDIRECT:
 195       /* ldp-11 3.5.2. Hello Message */
 196       if (hellotime == 0) {
 197         hellotime = 45;
 198       }
 199
 200       local = &e->p.peer->local_source_address;
 201       break;
 202     default:
 203       MPLS_ASSERT(0);
 204   }
 205
 206   if (hellotime < e->hellotime_timer) {
 207     LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_NORMAL,
 208       "ldp_hello_process: adjusting hellotime_timer to match adj\n");
 209     e->hellotime_timer = hellotime;
 210   }
 211
 212   if (traddr != NULL) {
 213     memcpy(&a->remote_transport_address, traddr, sizeof(struct mpls_inet_addr));
 214   }
 215
 216   if (csn != a->remote_csn) {
 217     /* the remote csn changes all we can do is clear the backoff time */
 218     /* this will only enable a lsr in the active role to try again */
 219     a->remote_csn = csn;
 220     if (a->session && mpls_timer_handle_verify(g->timer_handle,
 221       a->session->backoff_timer) == MPLS_BOOL_TRUE) {
 222       ldp_session_backoff_stop(g, a->session);
 223     }
 224   }
 225
 226   /* JLEU should verify that the hello hasn't changed */
 227
 228   if (a->session) {
 229     /*  && a->session->state == LDP_STATE_OPERATIONAL) */
 230     /* all that matters is that we have a session in progress */
 231     /* we already have an established session */
 232     LDP_EXIT(g->user_data, "ldp_hello_process");
 233     return MPLS_SUCCESS;
 234   }
 235
 236   if (e->transport_address.type != MPLS_FAMILY_NONE) {
 237     local = &e->transport_address;
 238   }
 239
 240   if (a->remote_transport_address.type != MPLS_FAMILY_NONE) {
 241     remote = &a->remote_transport_address;
 242   } else {
 243     remote = &a->remote_source_address;
 244   }
 245
 246   switch (mpls_inet_addr_compare(local, remote)) {
 247     case 1:
 248       /* if at one point we through WE were passive */
 249       if (a->role == LDP_PASSIVE && a->session) {
 250         ldp_session_shutdown(g, a->session, MPLS_BOOL_TRUE);
 251       }
 252       a->role = LDP_ACTIVE;
 253
 254       LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_STATE,
 255         "ldp_hello_process: ACTIVE(%d)\n", a->index);
 256
 257       if (ldp_session_create_active(g, a) != MPLS_SUCCESS) {
 258         LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_NORMAL,
 259           "ldp_hello_process: creating an active session failed(%d)\n",
 260           a->index);
 261         /* return FAILURE so we don't try to continue with the new adj */
 262         return MPLS_FAILURE;
 263       }
 264       break;
 265     case -1:
 266       /* if at one point we through WE were active */
 267       if (a->role == LDP_ACTIVE && a->session) {
 268         ldp_session_shutdown(g, a->session, MPLS_BOOL_TRUE);
 269       }
 270       a->role = LDP_PASSIVE;
 271
 272       LDP_TRACE_LOG(g->user_data, MPLS_TRACE_STATE_ALL, LDP_TRACE_FLAG_STATE,
 273         "ldp_hello_process: PASSIVE(%d)\n", a->index);
 274
 275       break;
 276     default:
 277       LDP_PRINT(g->user_data,
 278         "ldp_hello_process: exit(%d) configuration error\n", a->index);
 279
 280       if (a->session) {
 281         ldp_session_shutdown(g, a->session, MPLS_BOOL_TRUE);
 282       }
 283       a->role = LDP_NONE;
 284       MPLS_ASSERT(a->session == NULL);
 285
 286       /* return FAILURE so we don't try to continue with the new adj */
 287       LDP_EXIT(g->user_data, "ldp_hello_process: FAILURE");
 288       return MPLS_FAILURE;
 289   }
 290   LDP_EXIT(g->user_data, "ldp_hello_process");
 291
 292   return MPLS_SUCCESS;
 293 }