9f3e41b40f973e4fa827259301c792649b3940ce
[olsrd.git] / src / link_set.c
1
2 /*
3  * The olsr.org Optimized Link-State Routing daemon(olsrd)
4  * Copyright (c) 2004-2009, the olsr.org team - see HISTORY file
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * * Redistributions of source code must retain the above copyright
12  *   notice, this list of conditions and the following disclaimer.
13  * * Redistributions in binary form must reproduce the above copyright
14  *   notice, this list of conditions and the following disclaimer in
15  *   the documentation and/or other materials provided with the
16  *   distribution.
17  * * Neither the name of olsr.org, olsrd nor the names of its
18  *   contributors may be used to endorse or promote products derived
19  *   from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
25  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
29  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
31  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32  * POSSIBILITY OF SUCH DAMAGE.
33  *
34  * Visit http://www.olsr.org for more information.
35  *
36  * If you find this software useful feel free to make a donation
37  * to the project. For more information see the website or contact
38  * the copyright holders.
39  *
40  */
41
42 /*
43  * Link sensing database for the OLSR routing daemon
44  */
45
46 #include "defs.h"
47 #include "link_set.h"
48 #include "mid_set.h"
49 #include "neighbor_table.h"
50 #include "olsr.h"
51 #include "scheduler.h"
52 #include "olsr_spf.h"
53 #include "net_olsr.h"
54 #include "ipcalc.h"
55 #include "lq_plugin.h"
56 #include "common/string.h"
57 #include "olsr_logging.h"
58
59 #include <assert.h>
60
61 static void olsr_expire_link_entry(void *context);
62 static void olsr_expire_link_loss_timer(void *context);
63 static void olsr_expire_link_sym_timer(void *context);
64
65 /* head node for all link sets */
66 struct list_entity link_entry_head;
67
68 static struct olsr_timer_info *link_dead_timer_info = NULL;
69 static struct olsr_timer_info *link_loss_timer_info = NULL;
70 static struct olsr_timer_info *link_sym_timer_info = NULL;
71
72 bool link_changes;                     /* is set if changes occur in MPRS set */
73
74 void
75 signal_link_changes(bool val)
76 {                               /* XXX ugly */
77   link_changes = val;
78 }
79
80 /* Prototypes. */
81 static int check_link_status(const struct lq_hello_message *message, const struct interface *in_if);
82 static struct link_entry *add_link_entry(const union olsr_ip_addr *,
83                                          const union olsr_ip_addr *,
84                                          union olsr_ip_addr *, uint32_t, uint32_t, struct interface *);
85
86 void
87 olsr_init_link_set(void)
88 {
89   OLSR_INFO(LOG_LINKS, "Initialize linkset...\n");
90
91   /* Init list head */
92   list_init_head(&link_entry_head);
93
94   link_dead_timer_info = olsr_alloc_timerinfo("Link dead", &olsr_expire_link_entry, false);
95   link_loss_timer_info = olsr_alloc_timerinfo("Link loss", &olsr_expire_link_loss_timer, true);
96   link_sym_timer_info = olsr_alloc_timerinfo("Link SYM", &olsr_expire_link_sym_timer, false);
97
98 }
99
100
101 /**
102  * Get the status of a link. The status is based upon different
103  * timeouts in the link entry.
104  *
105  * @param remote address of the remote interface
106  * @return the link status of the link
107  */
108 int
109 lookup_link_status(const struct link_entry *entry)
110 {
111   if (entry == NULL || list_is_empty(&link_entry_head)) {
112     return UNSPEC_LINK;
113   }
114
115   if (entry->link_sym_timer) {
116     return SYM_LINK;
117   }
118
119   if (!TIMED_OUT(entry->ASYM_time)) {
120     return ASYM_LINK;
121   }
122
123   return LOST_LINK;
124 }
125
126 /**
127  * Find best link to a neighbor
128  */
129 struct link_entry *
130 get_best_link_to_neighbor_ip(const union olsr_ip_addr *remote)
131 {
132   struct nbr_entry *nbr;
133
134   nbr = olsr_lookup_nbr_entry(remote, true);
135   return get_best_link_to_neighbor(nbr);
136 }
137
138 /**
139  * Find best link to a neighbor
140  */
141 struct link_entry *
142 get_best_link_to_neighbor(struct nbr_entry *nbr)
143 {
144   struct link_entry *walker, *good_link;
145   struct list_iterator iterator;
146   olsr_linkcost curr_lcost = LINK_COST_BROKEN;
147
148   /* we haven't selected any links, yet */
149   good_link = NULL;
150
151   /* loop through all links that we have */
152   OLSR_FOR_ALL_LINK_ENTRIES(walker, iterator) {
153     /* if this is not a link to the neighour in question, skip */
154     if (walker->neighbor != nbr || lookup_link_status(walker) != SYM_LINK)
155       continue;
156
157     /*
158      * is this link better than anything we had before ?
159      */
160     if (walker->linkcost < curr_lcost) {
161       /* memorize the link quality */
162       curr_lcost = walker->linkcost;
163       good_link = walker;
164     }
165   }
166
167   /*
168    * if we haven't found any symmetric links, try to return an asymmetric link.
169    */
170   return good_link;
171 }
172
173 static void
174 set_loss_link_multiplier(struct link_entry *entry)
175 {
176   struct interface *inter;
177   struct olsr_if_config *cfg_inter;
178   struct olsr_lq_mult *mult;
179   uint32_t val = 0;
180
181   /* find the interface for the link */
182   inter = if_ifwithaddr(&entry->local_iface_addr);
183
184   /* find the interface configuration for the interface */
185   for (cfg_inter = olsr_cnf->if_configs; cfg_inter; cfg_inter = cfg_inter->next) {
186     if (cfg_inter->interf == inter) {
187       break;
188     }
189   }
190
191   /* loop through the multiplier entries */
192   for (mult = cfg_inter->cnf->lq_mult; mult != NULL; mult = mult->next) {
193     /*
194      * use the default multiplier only if there isn't any entry that
195      * has a matching IP address.
196      */
197     if ((val == 0 && olsr_ipcmp(&mult->addr, &all_zero) == 0) || olsr_ipcmp(&mult->addr, &entry->neighbor_iface_addr) == 0) {
198       val = mult->value;
199     }
200   }
201
202   /* if we have not found an entry, then use the default multiplier */
203   if (val == 0) {
204     val = LINK_LOSS_MULTIPLIER;
205   }
206
207   /* store the multiplier */
208   entry->loss_link_multiplier = val;
209 }
210
211 /*
212  * Delete, unlink and free a link entry.
213  */
214 static void
215 olsr_delete_link_entry(struct link_entry *link)
216 {
217   /*
218    * Delete the rt_path for the link-end.
219    */
220   olsr_delete_routing_table(&link->neighbor_iface_addr, 8 * olsr_cnf->ipsize,
221                             &link->neighbor->nbr_addr, OLSR_RT_ORIGIN_LINK);
222
223   /* update neighbor statistics */
224   link->neighbor->linkcount--;
225   if (link->is_mprs) {
226     link->neighbor->mprs_count --;
227   }
228
229   /* Delete neighbor entry if no links left */
230   if (link->neighbor->linkcount == 0) {
231     olsr_delete_nbr_entry(link->neighbor);
232   }
233
234   /* Kill running timers */
235   olsr_stop_timer(link->link_timer);
236   link->link_timer = NULL;
237
238   olsr_stop_timer(link->link_sym_timer);
239   link->link_sym_timer = NULL;
240
241   olsr_stop_timer(link->link_loss_timer);
242   link->link_loss_timer = NULL;
243
244   list_remove(&link->link_list);
245
246   /* Unlink Interfaces */
247   unlock_interface(link->inter);
248   link->inter = NULL;
249
250   free(link->if_name);
251   olsr_free_link_entry(link);
252
253   changes_neighborhood = true;
254 }
255
256 /**
257  * Delete all link entries matching a given interface id
258  */
259 void
260 olsr_delete_link_entry_by_if(const struct interface *ifp)
261 {
262   struct link_entry *link;
263   struct list_iterator iterator;
264 #if !defined REMOVE_LOG_DEBUG
265   struct ipaddr_str buf;
266 #endif
267
268   OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
269     if (ifp == link->inter) {
270       OLSR_DEBUG(LOG_LINKS, "Removing link %s of interface %s\n",
271           olsr_ip_to_string(&buf, &link->neighbor_iface_addr), ifp->int_name);
272       olsr_delete_link_entry(link);
273     }
274   }
275 }
276
277 /**
278  * Callback for the link loss timer.
279  */
280 static void
281 olsr_expire_link_loss_timer(void *context)
282 {
283   struct link_entry *link;
284
285   link = (struct link_entry *)context;
286
287   /* count the lost packet */
288   olsr_lq_hello_handler(link, true);
289
290   /* next timeout in 1.0 x htime */
291   olsr_change_timer(link->link_loss_timer, link->loss_helloint, OLSR_LINK_LOSS_JITTER);
292 }
293
294 /**
295  * Callback for the link SYM timer.
296  */
297 static void
298 olsr_expire_link_sym_timer(void *context)
299 {
300   struct link_entry *link;
301
302   link = (struct link_entry *)context;
303   link->link_sym_timer = NULL;  /* be pedandic */
304
305   if (link->status != SYM_LINK) {
306     return;
307   }
308
309   link->status = lookup_link_status(link);
310   olsr_update_nbr_status(link->neighbor);
311   changes_neighborhood = true;
312 }
313
314 /**
315  * Callback for the link_hello timer.
316  */
317 void
318 olsr_expire_link_hello_timer(void *context)
319 {
320   struct link_entry *link;
321
322   link = (struct link_entry *)context;
323
324   /* update neighbor status */
325   olsr_update_nbr_status(link->neighbor);
326 }
327
328 /**
329  * Callback for the link timer.
330  */
331 static void
332 olsr_expire_link_entry(void *context)
333 {
334   struct link_entry *link;
335
336   link = (struct link_entry *)context;
337   link->link_timer = NULL;      /* be pedandic */
338
339   olsr_delete_link_entry(link);
340 }
341
342 /**
343  * Set the link expiration timer.
344  */
345 static void
346 olsr_set_link_timer(struct link_entry *link, unsigned int rel_timer)
347 {
348   olsr_set_timer(&link->link_timer, rel_timer, OLSR_LINK_JITTER,
349                  link, link_dead_timer_info);
350 }
351
352 /**
353  * Nothing mysterious here.
354  * Adding a new link entry to the link set.
355  *
356  * @param local the local IP address
357  * @param remote the remote IP address
358  * @param remote_main the remote nodes main address
359  * @param vtime the validity time of the entry
360  * @param htime the HELLO interval of the remote node
361  * @param local_if the local interface
362  * @return the new (or already existing) link_entry
363  */
364 static struct link_entry *
365 add_link_entry(const union olsr_ip_addr *local,
366                const union olsr_ip_addr *remote,
367                union olsr_ip_addr *remote_main, uint32_t vtime, uint32_t htime, struct interface *local_if)
368 {
369   struct link_entry *link;
370   struct nbr_entry *neighbor;
371 #if !defined  REMOVE_LOG_DEBUG
372   struct ipaddr_str localbuf, rembuf;
373 #endif
374
375   link = lookup_link_entry(remote, remote_main, local_if);
376   if (link) {
377     return link;
378   }
379
380   /*
381    * if there exists no link tuple with
382    * L_neighbor_iface_addr == Source Address
383    */
384
385   OLSR_DEBUG(LOG_LINKS, "Adding %s=>%s to link set\n", olsr_ip_to_string(&localbuf, local), olsr_ip_to_string(&rembuf, remote));
386
387   /* a new tuple is created with... */
388   link = olsr_malloc_link_entry();
389
390   /* copy if_name, if it is defined */
391   if (local_if->int_name) {
392     link->if_name = strdup(local_if->int_name);
393   } else {
394     link->if_name = NULL;
395   }
396   /* shortcut to interface. */
397   link->inter = local_if;
398   lock_interface(local_if);
399
400   /*
401    * L_local_iface_addr = Address of the interface
402    * which received the HELLO message
403    */
404   link->local_iface_addr = *local;
405
406   /* L_neighbor_iface_addr = Source Address */
407   link->neighbor_iface_addr = *remote;
408
409   /* L_time = current time + validity time */
410   olsr_set_link_timer(link, vtime);
411
412   link->status = ASYM_LINK;
413
414   link->loss_helloint = htime;
415
416   olsr_set_timer(&link->link_loss_timer, htime + htime / 2,
417                  OLSR_LINK_LOSS_JITTER, link, link_loss_timer_info);
418
419   set_loss_link_multiplier(link);
420
421   link->linkcost = LINK_COST_BROKEN;
422
423   link->is_mprs = false;
424
425   /* Add to queue */
426   list_add_before(&link_entry_head, &link->link_list);
427
428
429   /*
430    * Create the neighbor entry
431    */
432
433   /* Neighbor MUST exist! */
434   neighbor = olsr_lookup_nbr_entry(remote_main, true);
435   if (!neighbor) {
436     OLSR_DEBUG(LOG_LINKS, "ADDING NEW NEIGHBOR ENTRY %s FROM LINK SET\n", olsr_ip_to_string(&rembuf, remote_main));
437     neighbor = olsr_add_nbr_entry(remote_main);
438   }
439
440   assert(neighbor->tc_edge);
441
442   neighbor->linkcount++;
443   link->neighbor = neighbor;
444
445   /*
446    * Add the rt_path for the link-end. This is an optimization
447    * that lets us install > 1 hop routes prior to receiving
448    * the MID entry for the 1 hop neighbor.
449    */
450   olsr_insert_routing_table(remote, 8 * olsr_cnf->ipsize, remote_main, OLSR_RT_ORIGIN_LINK);
451
452   changes_neighborhood = true;
453   return link;
454 }
455
456
457 /**
458  * Lookup the status of a link.
459  *
460  * @param int_addr address of the remote interface
461  * @return 1 of the link is symmertic 0 if not
462  */
463 int
464 check_neighbor_link(const union olsr_ip_addr *int_addr)
465 {
466   struct link_entry *link;
467   struct list_iterator iterator;
468
469   OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
470     if (olsr_ipcmp(int_addr, &link->neighbor_iface_addr) == 0) {
471       return lookup_link_status(link);
472     }
473   }
474
475   return UNSPEC_LINK;
476 }
477
478 /**
479  * Lookup a link entry
480  *
481  * @param remote the remote interface address
482  * @param remote_main the remote nodes main address
483  * @param local the local interface address
484  * @return the link entry if found, NULL if not
485  */
486 struct link_entry *
487 lookup_link_entry(const union olsr_ip_addr *remote, const union olsr_ip_addr *remote_main, const struct interface *local)
488 {
489   struct link_entry *link;
490   struct list_iterator iterator;
491
492   OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
493     if (olsr_ipcmp(remote, &link->neighbor_iface_addr) == 0 && (link->if_name ? !strcmp(link->if_name, local->int_name)
494                                                                 : olsr_ipcmp(&local->ip_addr, &link->local_iface_addr) == 0)) {
495       /* check the remote-main address only if there is one given */
496       if (NULL != remote_main && olsr_ipcmp(remote_main, &link->neighbor->nbr_addr) != 0) {
497         /* Neighbor has changed it's main_addr, update */
498 #if !defined REMOVE_LOG_DEBUG
499         struct ipaddr_str oldbuf, newbuf;
500 #endif
501         OLSR_DEBUG(LOG_LINKS, "Neighbor changed main_ip, updating %s -> %s\n",
502                    olsr_ip_to_string(&oldbuf, &link->neighbor->nbr_addr), olsr_ip_to_string(&newbuf, remote_main));
503         link->neighbor->nbr_addr = *remote_main;
504       }
505       return link;
506     }
507   }
508
509   return NULL;
510 }
511
512 /**
513  * Update a link entry. This is the "main entrypoint" in
514  * the link-sensing. This function is called from the HELLO
515  * parser function. It makes sure a entry is updated or created.
516  *
517  * @param local the local IP address
518  * @param remote the remote IP address
519  * @param message the HELLO message
520  * @param in_if the interface on which this HELLO was received
521  * @return the link_entry struct describing this link entry
522  */
523 struct link_entry *
524 update_link_entry(const union olsr_ip_addr *local,
525                   const union olsr_ip_addr *remote, struct lq_hello_message *message, struct interface *in_if)
526 {
527   struct link_entry *entry;
528
529   /* Add if not registered */
530   entry = add_link_entry(local, remote, &message->comm->originator, message->comm->vtime, message->htime, in_if);
531
532   /* Update ASYM_time */
533   entry->vtime = message->comm->vtime;
534   entry->ASYM_time = GET_TIMESTAMP(message->comm->vtime);
535
536   entry->status = check_link_status(message, in_if);
537
538   switch (entry->status) {
539   case (LOST_LINK):
540     olsr_stop_timer(entry->link_sym_timer);
541     entry->link_sym_timer = NULL;
542     break;
543   case (SYM_LINK):
544   case (ASYM_LINK):
545
546     /* L_SYM_time = current time + validity time */
547     olsr_set_timer(&entry->link_sym_timer, message->comm->vtime,
548                    OLSR_LINK_SYM_JITTER, entry, link_sym_timer_info);
549
550     /* L_time = L_SYM_time + NEIGHB_HOLD_TIME */
551     olsr_set_link_timer(entry, message->comm->vtime + NEIGHB_HOLD_TIME);
552     break;
553   default:;
554   }
555
556   /* L_time = max(L_time, L_ASYM_time) */
557   if (entry->link_timer && (entry->link_timer->timer_clock < entry->ASYM_time)) {
558     olsr_set_link_timer(entry, TIME_DUE(entry->ASYM_time));
559   }
560
561   /* Update neighbor */
562   olsr_update_nbr_status(entry->neighbor);
563
564   return entry;
565 }
566
567
568 /**
569  * Function that updates all registered pointers to
570  * one neighbor entry with another pointer
571  * Used by MID updates.
572  *
573  * @old the pointer to replace
574  * @new the pointer to use instead of "old"
575  * @return the number of entries updated
576  */
577 int
578 replace_neighbor_link_set(const struct nbr_entry *old, struct nbr_entry *new)
579 {
580   struct link_entry *link;
581   struct list_iterator iterator;
582   int retval = 0;
583
584   if (list_is_empty(&link_entry_head)) {
585     return retval;
586   }
587
588   OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
589     if (link->neighbor == old) {
590       link->neighbor = new;
591       retval++;
592     }
593   }
594
595   return retval;
596 }
597
598
599 /**
600  *Checks the link status to a neighbor by
601  *looking in a received HELLO message.
602  *
603  *@param message the HELLO message to check
604  *
605  *@return the link status
606  */
607 static int
608 check_link_status(const struct lq_hello_message *message, const struct interface *in_if)
609 {
610   int ret = UNSPEC_LINK;
611   struct lq_hello_neighbor *neighbors;
612
613   neighbors = message->neigh;
614   while (neighbors) {
615
616     /*
617      * Note: If a neigh has 2 cards we can reach, the neigh
618      * will send a Hello with the same IP mentined twice
619      */
620     if (olsr_ipcmp(&neighbors->addr, &in_if->ip_addr) == 0
621         && neighbors->link_type != UNSPEC_LINK) {
622       ret = neighbors->link_type;
623       if (SYM_LINK == ret) {
624         break;
625       }
626     }
627     neighbors = neighbors->next;
628   }
629
630   return ret;
631 }
632
633 void
634 olsr_print_link_set(void)
635 {
636 #if !defined REMOVE_LOG_INFO
637   /* The whole function makes no sense without it. */
638   struct link_entry *walker;
639   struct list_iterator iterator;
640   char totaltxt[256] = { 0 };
641   const char *txt;
642   int addrsize;
643   size_t i, j, length, max, totaltxt_len;
644   addrsize = olsr_cnf->ip_version == AF_INET ? INET_ADDRSTRLEN : INET6_ADDRSTRLEN;
645
646   /* generate LQ headline */
647   totaltxt[0] = 0;
648   totaltxt_len = 0;
649   for (i=1; i<olsr_get_linklabel_count(); i++) {
650     txt = olsr_get_linklabel(i);
651     max = olsr_get_linklabel_maxlength(i);
652
653     length = strlen(txt);
654
655     /* add seperator */
656     if (i != 1) {
657       totaltxt[totaltxt_len++] = '/';
658     }
659
660     /* reserve space for label */
661     if (max > length) {
662       for (j=0; j<max; j++) {
663         totaltxt[totaltxt_len + j] = '-';
664       }
665     }
666
667     /* copy label */
668     strncpy(&totaltxt[totaltxt_len + max/2 - length/2], txt, length);
669     totaltxt_len += max;
670   }
671   totaltxt[totaltxt_len] = 0;
672
673   OLSR_INFO(LOG_LINKS, "\n--- %s ---------------------------------------------------- LINKS\n\n", olsr_wallclock_string());
674   OLSR_INFO_NH(LOG_LINKS, "%-*s  %-6s %s %s\n", addrsize, "IP address", "hyst", totaltxt , olsr_get_linklabel(0));
675
676   OLSR_FOR_ALL_LINK_ENTRIES(walker, iterator) {
677     struct ipaddr_str buf;
678     char lqbuffer[LQTEXT_MAXLENGTH];
679
680     /* generate LQ headline */
681     totaltxt[0] = 0;
682     totaltxt_len = 0;
683     for (i=1; i<olsr_get_linklabel_count(); i++) {
684       txt = olsr_get_linkdata_text(walker, i, lqbuffer, sizeof(lqbuffer));
685       max = olsr_get_linklabel_maxlength(i);
686
687       length = strlen(txt);
688
689       /* add seperator */
690       if (i != 1) {
691         totaltxt[totaltxt_len++] = '/';
692       }
693
694       /* reserve space for label */
695       if (max > length) {
696         for (j=0; j<max; j++) {
697           totaltxt[totaltxt_len + j] = ' ';
698         }
699       }
700
701       /* copy label */
702       strncpy(&totaltxt[totaltxt_len + max/2 - length/2], txt, length);
703       totaltxt_len += max;
704     }
705     totaltxt[totaltxt_len] = 0;
706     OLSR_INFO_NH(LOG_LINKS, "%-*s %s %s\n",
707                  addrsize, olsr_ip_to_string(&buf, &walker->neighbor_iface_addr),
708                  totaltxt, olsr_get_linkcost_text(walker->linkcost, false, lqbuffer, sizeof(lqbuffer)));
709   }
710 #endif
711 }
712
713 /*
714  * called for every LQ HELLO message.
715  * update the timeout with the htime value from the message
716  */
717 void
718 olsr_update_packet_loss_hello_int(struct link_entry *entry, uint32_t loss_hello_int)
719 {
720   entry->loss_helloint = loss_hello_int;
721 }
722
723 void
724 olsr_update_packet_loss(struct link_entry *entry)
725 {
726   olsr_lq_hello_handler(entry, false);
727
728   /* timeout for the first lost packet is 1.5 x htime */
729   olsr_set_timer(&entry->link_loss_timer, entry->loss_helloint + entry->loss_helloint / 2,
730                  OLSR_LINK_LOSS_JITTER, entry, link_loss_timer_info);
731 }
732
733 void
734 generate_hello(void *p) {
735   struct interface *ifp = p;
736   uint8_t msg_buffer[MAXMESSAGESIZE - OLSR_HEADERSIZE] __attribute__ ((aligned));
737   struct olsr_message msg;
738   uint8_t *curr = msg_buffer;
739   uint8_t *length_field, *last;
740   struct link_entry *link;
741   struct list_iterator iterator;
742   uint8_t writeLinkType, writeNeighType;
743   OLSR_INFO(LOG_PACKET_CREATION, "Building Hello for %s\n-------------------\n", ifp->int_name);
744
745   msg.type = olsr_get_Hello_MessageId();
746   msg.vtime = ifp->hello_validity;
747   msg.size = 0; /* fill in later */
748   msg.originator = olsr_cnf->router_id;
749   msg.ttl = 1;
750   msg.hopcnt = 0;
751   msg.seqno = get_msg_seqno();
752
753   length_field = olsr_put_msg_hdr(&curr, &msg);
754
755   pkt_put_u16(&curr, 0);
756   pkt_put_reltime(&curr, ifp->hello_interval);
757   pkt_put_u8(&curr, olsr_cnf->willingness);
758
759   last = msg_buffer + sizeof(msg_buffer) - olsr_cnf->ipsize;
760
761   /* first calculate local link status */
762   OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
763     if (olsr_ipcmp(&link->local_iface_addr, &ifp->ip_addr) != 0) {
764       link->iflocal_link_status = UNSPEC_LINK;
765     }
766     else {
767       link->iflocal_link_status = lookup_link_status(link);
768     }
769
770     if (link->neighbor->is_mpr) {
771       link->iflocal_neigh_status = MPR_NEIGH;
772     }
773     else if (link->neighbor->is_sym) {
774       link->iflocal_neigh_status = SYM_NEIGH;
775     }
776     else {
777       link->iflocal_neigh_status = NOT_NEIGH;
778     }
779   }
780
781   for (writeNeighType = 0; writeNeighType < COUNT_NEIGH_TYPES; writeNeighType++) {
782     for (writeLinkType = 0; writeLinkType < COUNT_LINK_TYPES; writeLinkType++) {
783       bool first = true;
784       uint8_t *linkstart = NULL;
785
786       OLSR_FOR_ALL_LINK_ENTRIES(link, iterator) {
787         if (link->iflocal_link_status != writeLinkType
788             || link->iflocal_neigh_status != writeNeighType) {
789           continue;
790         }
791
792         if (first) {
793           pkt_put_u8(&curr, CREATE_LINK_CODE(writeNeighType, writeLinkType));
794           pkt_put_u8(&curr, 0);
795           first = false;
796
797           /* put in dummy length */
798           linkstart = curr;
799           pkt_put_u16(&curr, 0);
800         }
801
802         pkt_put_ipaddress(&curr, &link->neighbor_iface_addr);
803         olsr_serialize_hello_lq_pair(&curr, link);
804       }
805
806       /* fix length field of hello block */
807       if (linkstart != NULL) {
808         pkt_put_u16(&linkstart, (uint16_t)(curr + 2 - linkstart));
809       }
810     }
811   }
812
813   /* fix length field of message */
814   pkt_put_u16(&length_field, curr - msg_buffer);
815
816   /* send hello immediately */
817   if (net_outbuffer_bytes_left(ifp) < curr - msg_buffer) {
818     net_output(ifp);
819   }
820   net_outbuffer_push(ifp, msg_buffer, curr - msg_buffer);
821   net_output(ifp);
822 }
823 /*
824  * Local Variables:
825  * c-basic-offset: 2
826  * indent-tabs-mode: nil
827  * End:
828  */