drivers/staging/batman-adv/vis.c

   1 /*
   2  * Copyright (C) 2008-2010 B.A.T.M.A.N. contributors:
   3  *
   4  * Simon Wunderlich
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of version 2 of the GNU General Public
   8  * License as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  13  * General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  18  * 02110-1301, USA
  19  *
  20  */
  21
  22 #include "main.h"
  23 #include "send.h"
  24 #include "translation-table.h"
  25 #include "vis.h"
  26 #include "soft-interface.h"
  27 #include "hard-interface.h"
  28 #include "hash.h"
  29
  30 /* Returns the smallest signed integer in two's complement with the sizeof x */
  31 #define smallest_signed_int(x) (1u << (7u + 8u * (sizeof(x) - 1u)))
  32
  33 /* Checks if a sequence number x is a predecessor/successor of y.
  34    they handle overflows/underflows and can correctly check for a
  35    predecessor/successor unless the variable sequence number has grown by
  36    more then 2**(bitwidth(x)-1)-1.
  37    This means that for a uint8_t with the maximum value 255, it would think:
  38     * when adding nothing - it is neither a predecessor nor a successor
  39     * before adding more than 127 to the starting value - it is a predecessor,
  40     * when adding 128 - it is neither a predecessor nor a successor,
  41     * after adding more than 127 to the starting value - it is a successor */
  42 #define seq_before(x, y) ({typeof(x) _dummy = (x - y); \
  43                         _dummy > smallest_signed_int(_dummy); })
  44 #define seq_after(x, y) seq_before(y, x)
  45
  46 static struct hashtable_t *vis_hash;
  47 static DEFINE_SPINLOCK(vis_hash_lock);
  48 static DEFINE_SPINLOCK(recv_list_lock);
  49 static struct vis_info *my_vis_info;
  50 static struct list_head send_list;      /* always locked with vis_hash_lock */
  51
  52 static void start_vis_timer(void);
  53
  54 /* free the info */
  55 static void free_info(struct kref *ref)
  56 {
  57         struct vis_info *info = container_of(ref, struct vis_info, refcount);
  58         struct recvlist_node *entry, *tmp;
  59         unsigned long flags;
  60
  61         list_del_init(&info->send_list);
  62         spin_lock_irqsave(&recv_list_lock, flags);
  63         list_for_each_entry_safe(entry, tmp, &info->recv_list, list) {
  64                 list_del(&entry->list);
  65                 kfree(entry);
  66         }
  67         spin_unlock_irqrestore(&recv_list_lock, flags);
  68         kfree(info);
  69 }
  70
  71 /* Compare two vis packets, used by the hashing algorithm */
  72 static int vis_info_cmp(void *data1, void *data2)
  73 {
  74         struct vis_info *d1, *d2;
  75         d1 = data1;
  76         d2 = data2;
  77         return compare_orig(d1->packet.vis_orig, d2->packet.vis_orig);
  78 }
  79
  80 /* hash function to choose an entry in a hash table of given size */
  81 /* hash algorithm from http://en.wikipedia.org/wiki/Hash_table */
  82 static int vis_info_choose(void *data, int size)
  83 {
  84         struct vis_info *vis_info = data;
  85         unsigned char *key;
  86         uint32_t hash = 0;
  87         size_t i;
  88
  89         key = vis_info->packet.vis_orig;
  90         for (i = 0; i < ETH_ALEN; i++) {
  91                 hash += key[i];
  92                 hash += (hash << 10);
  93                 hash ^= (hash >> 6);
  94         }
  95
  96         hash += (hash << 3);
  97         hash ^= (hash >> 11);
  98         hash += (hash << 15);
  99
 100         return hash % size;
 101 }
 102
 103 /* insert interface to the list of interfaces of one originator, if it
 104  * does not already exist in the list */
 105 static void vis_data_insert_interface(const uint8_t *interface,
 106                                       struct hlist_head *if_list,
 107                                       bool primary)
 108 {
 109         struct if_list_entry *entry;
 110         struct hlist_node *pos;
 111
 112         hlist_for_each_entry(entry, pos, if_list, list) {
 113                 if (compare_orig(entry->addr, (void *)interface))
 114                         return;
 115         }
 116
 117         /* its a new address, add it to the list */
 118         entry = kmalloc(sizeof(*entry), GFP_ATOMIC);
 119         if (!entry)
 120                 return;
 121         memcpy(entry->addr, interface, ETH_ALEN);
 122         entry->primary = primary;
 123         hlist_add_head(&entry->list, if_list);
 124 }
 125
 126 static ssize_t vis_data_read_prim_sec(char *buff, struct hlist_head *if_list)
 127 {
 128         struct if_list_entry *entry;
 129         struct hlist_node *pos;
 130         char tmp_addr_str[ETH_STR_LEN];
 131         size_t len = 0;
 132
 133         hlist_for_each_entry(entry, pos, if_list, list) {
 134                 if (entry->primary)
 135                         len += sprintf(buff + len, "PRIMARY, ");
 136                 else {
 137                         addr_to_string(tmp_addr_str, entry->addr);
 138                         len += sprintf(buff + len,  "SEC %s, ", tmp_addr_str);
 139                 }
 140         }
 141
 142         return len;
 143 }
 144
 145 static size_t vis_data_count_prim_sec(struct hlist_head *if_list)
 146 {
 147         struct if_list_entry *entry;
 148         struct hlist_node *pos;
 149         size_t count = 0;
 150
 151         hlist_for_each_entry(entry, pos, if_list, list) {
 152                 if (entry->primary)
 153                         count += 9;
 154                 else
 155                         count += 23;
 156         }
 157
 158         return count;
 159 }
 160
 161 /* read an entry  */
 162 static ssize_t vis_data_read_entry(char *buff, struct vis_info_entry *entry,
 163                                    uint8_t *src, bool primary)
 164 {
 165         char to[18];
 166
 167         /* maximal length: max(4+17+2, 3+17+1+3+2) == 26 */
 168         addr_to_string(to, entry->dest);
 169         if (primary && entry->quality == 0)
 170                 return sprintf(buff, "HNA %s, ", to);
 171         else if (compare_orig(entry->src, src))
 172                 return sprintf(buff, "TQ %s %d, ", to, entry->quality);
 173
 174         return 0;
 175 }
 176
 177 int vis_seq_print_text(struct seq_file *seq, void *offset)
 178 {
 179         HASHIT(hashit);
 180         HASHIT(hashit_count);
 181         struct vis_info *info;
 182         struct vis_info_entry *entries;
 183         struct net_device *net_dev = (struct net_device *)seq->private;
 184         struct bat_priv *bat_priv = netdev_priv(net_dev);
 185         HLIST_HEAD(vis_if_list);
 186         struct if_list_entry *entry;
 187         struct hlist_node *pos, *n;
 188         int i;
 189         char tmp_addr_str[ETH_STR_LEN];
 190         unsigned long flags;
 191         int vis_server = atomic_read(&bat_priv->vis_mode);
 192         size_t buff_pos, buf_size;
 193         char *buff;
 194
 195         if ((!bat_priv->primary_if) ||
 196             (vis_server == VIS_TYPE_CLIENT_UPDATE))
 197                 return 0;
 198
 199         buf_size = 1;
 200         /* Estimate length */
 201         spin_lock_irqsave(&vis_hash_lock, flags);
 202         while (hash_iterate(vis_hash, &hashit_count)) {
 203                 info = hashit_count.bucket->data;
 204                 entries = (struct vis_info_entry *)
 205                         ((char *)info + sizeof(struct vis_info));
 206
 207                 for (i = 0; i < info->packet.entries; i++) {
 208                         if (entries[i].quality == 0)
 209                                 continue;
 210                         vis_data_insert_interface(entries[i].src, &vis_if_list,
 211                                 compare_orig(entries[i].src,
 212                                                 info->packet.vis_orig));
 213                 }
 214
 215                 hlist_for_each_entry(entry, pos, &vis_if_list, list) {
 216                         buf_size += 18 + 26 * info->packet.entries;
 217
 218                         /* add primary/secondary records */
 219                         if (compare_orig(entry->addr, info->packet.vis_orig))
 220                                 buf_size +=
 221                                         vis_data_count_prim_sec(&vis_if_list);
 222
 223                         buf_size += 1;
 224                 }
 225
 226                 hlist_for_each_entry_safe(entry, pos, n, &vis_if_list, list) {
 227                         hlist_del(&entry->list);
 228                         kfree(entry);
 229                 }
 230         }
 231
 232         buff = kmalloc(buf_size, GFP_ATOMIC);
 233         if (!buff) {
 234                 spin_unlock_irqrestore(&vis_hash_lock, flags);
 235                 return -ENOMEM;
 236         }
 237         buff[0] = '\0';
 238         buff_pos = 0;
 239
 240         while (hash_iterate(vis_hash, &hashit)) {
 241                 info = hashit.bucket->data;
 242                 entries = (struct vis_info_entry *)
 243                         ((char *)info + sizeof(struct vis_info));
 244
 245                 for (i = 0; i < info->packet.entries; i++) {
 246                         if (entries[i].quality == 0)
 247                                 continue;
 248                         vis_data_insert_interface(entries[i].src, &vis_if_list,
 249                                 compare_orig(entries[i].src,
 250                                                 info->packet.vis_orig));
 251                 }
 252
 253                 hlist_for_each_entry(entry, pos, &vis_if_list, list) {
 254                         addr_to_string(tmp_addr_str, entry->addr);
 255                         buff_pos += sprintf(buff + buff_pos, "%s,",
 256                                             tmp_addr_str);
 257
 258                         for (i = 0; i < info->packet.entries; i++)
 259                                 buff_pos += vis_data_read_entry(buff + buff_pos,
 260                                                                 &entries[i],
 261                                                                 entry->addr,
 262                                                                 entry->primary);
 263
 264                         /* add primary/secondary records */
 265                         if (compare_orig(entry->addr, info->packet.vis_orig))
 266                                 buff_pos +=
 267                                         vis_data_read_prim_sec(buff + buff_pos,
 268                                                                &vis_if_list);
 269
 270                         buff_pos += sprintf(buff + buff_pos, "\n");
 271                 }
 272
 273                 hlist_for_each_entry_safe(entry, pos, n, &vis_if_list, list) {
 274                         hlist_del(&entry->list);
 275                         kfree(entry);
 276                 }
 277         }
 278
 279         spin_unlock_irqrestore(&vis_hash_lock, flags);
 280
 281         seq_printf(seq, "%s", buff);
 282         kfree(buff);
 283
 284         return 0;
 285 }
 286
 287 /* add the info packet to the send list, if it was not
 288  * already linked in. */
 289 static void send_list_add(struct vis_info *info)
 290 {
 291         if (list_empty(&info->send_list)) {
 292                 kref_get(&info->refcount);
 293                 list_add_tail(&info->send_list, &send_list);
 294         }
 295 }
 296
 297 /* delete the info packet from the send list, if it was
 298  * linked in. */
 299 static void send_list_del(struct vis_info *info)
 300 {
 301         if (!list_empty(&info->send_list)) {
 302                 list_del_init(&info->send_list);
 303                 kref_put(&info->refcount, free_info);
 304         }
 305 }
 306
 307 /* tries to add one entry to the receive list. */
 308 static void recv_list_add(struct list_head *recv_list, char *mac)
 309 {
 310         struct recvlist_node *entry;
 311         unsigned long flags;
 312
 313         entry = kmalloc(sizeof(struct recvlist_node), GFP_ATOMIC);
 314         if (!entry)
 315                 return;
 316
 317         memcpy(entry->mac, mac, ETH_ALEN);
 318         spin_lock_irqsave(&recv_list_lock, flags);
 319         list_add_tail(&entry->list, recv_list);
 320         spin_unlock_irqrestore(&recv_list_lock, flags);
 321 }
 322
 323 /* returns 1 if this mac is in the recv_list */
 324 static int recv_list_is_in(struct list_head *recv_list, char *mac)
 325 {
 326         struct recvlist_node *entry;
 327         unsigned long flags;
 328
 329         spin_lock_irqsave(&recv_list_lock, flags);
 330         list_for_each_entry(entry, recv_list, list) {
 331                 if (memcmp(entry->mac, mac, ETH_ALEN) == 0) {
 332                         spin_unlock_irqrestore(&recv_list_lock, flags);
 333                         return 1;
 334                 }
 335         }
 336         spin_unlock_irqrestore(&recv_list_lock, flags);
 337         return 0;
 338 }
 339
 340 /* try to add the packet to the vis_hash. return NULL if invalid (e.g. too old,
 341  * broken.. ).  vis hash must be locked outside.  is_new is set when the packet
 342  * is newer than old entries in the hash. */
 343 static struct vis_info *add_packet(struct vis_packet *vis_packet,
 344                                    int vis_info_len, int *is_new,
 345                                    int make_broadcast)
 346 {
 347         struct vis_info *info, *old_info;
 348         struct vis_info search_elem;
 349
 350         *is_new = 0;
 351         /* sanity check */
 352         if (vis_hash == NULL)
 353                 return NULL;
 354
 355         /* see if the packet is already in vis_hash */
 356         memcpy(search_elem.packet.vis_orig, vis_packet->vis_orig, ETH_ALEN);
 357         old_info = hash_find(vis_hash, &search_elem);
 358
 359         if (old_info != NULL) {
 360                 if (!seq_after(vis_packet->seqno, old_info->packet.seqno)) {
 361                         if (old_info->packet.seqno == vis_packet->seqno) {
 362                                 recv_list_add(&old_info->recv_list,
 363                                               vis_packet->sender_orig);
 364                                 return old_info;
 365                         } else {
 366                                 /* newer packet is already in hash. */
 367                                 return NULL;
 368                         }
 369                 }
 370                 /* remove old entry */
 371                 hash_remove(vis_hash, old_info);
 372                 send_list_del(old_info);
 373                 kref_put(&old_info->refcount, free_info);
 374         }
 375
 376         info = kmalloc(sizeof(struct vis_info) + vis_info_len, GFP_ATOMIC);
 377         if (info == NULL)
 378                 return NULL;
 379
 380         kref_init(&info->refcount);
 381         INIT_LIST_HEAD(&info->send_list);
 382         INIT_LIST_HEAD(&info->recv_list);
 383         info->first_seen = jiffies;
 384         memcpy(&info->packet, vis_packet,
 385                sizeof(struct vis_packet) + vis_info_len);
 386
 387         /* initialize and add new packet. */
 388         *is_new = 1;
 389
 390         /* Make it a broadcast packet, if required */
 391         if (make_broadcast)
 392                 memcpy(info->packet.target_orig, broadcastAddr, ETH_ALEN);
 393
 394         /* repair if entries is longer than packet. */
 395         if (info->packet.entries * sizeof(struct vis_info_entry) > vis_info_len)
 396                 info->packet.entries = vis_info_len /
 397                         sizeof(struct vis_info_entry);
 398
 399         recv_list_add(&info->recv_list, info->packet.sender_orig);
 400
 401         /* try to add it */
 402         if (hash_add(vis_hash, info) < 0) {
 403                 /* did not work (for some reason) */
 404                 kref_put(&old_info->refcount, free_info);
 405                 info = NULL;
 406         }
 407
 408         return info;
 409 }
 410
 411 /* handle the server sync packet, forward if needed. */
 412 void receive_server_sync_packet(struct bat_priv *bat_priv,
 413                                 struct vis_packet *vis_packet,
 414                                 int vis_info_len)
 415 {
 416         struct vis_info *info;
 417         int is_new, make_broadcast;
 418         unsigned long flags;
 419         int vis_server = atomic_read(&bat_priv->vis_mode);
 420
 421         make_broadcast = (vis_server == VIS_TYPE_SERVER_SYNC);
 422
 423         spin_lock_irqsave(&vis_hash_lock, flags);
 424         info = add_packet(vis_packet, vis_info_len, &is_new, make_broadcast);
 425         if (info == NULL)
 426                 goto end;
 427
 428         /* only if we are server ourselves and packet is newer than the one in
 429          * hash.*/
 430         if (vis_server == VIS_TYPE_SERVER_SYNC && is_new)
 431                 send_list_add(info);
 432 end:
 433         spin_unlock_irqrestore(&vis_hash_lock, flags);
 434 }
 435
 436 /* handle an incoming client update packet and schedule forward if needed. */
 437 void receive_client_update_packet(struct bat_priv *bat_priv,
 438                                   struct vis_packet *vis_packet,
 439                                   int vis_info_len)
 440 {
 441         struct vis_info *info;
 442         int is_new;
 443         unsigned long flags;
 444         int vis_server = atomic_read(&bat_priv->vis_mode);
 445         int are_target = 0;
 446
 447         /* clients shall not broadcast. */
 448         if (is_bcast(vis_packet->target_orig))
 449                 return;
 450
 451         /* Are we the target for this VIS packet? */
 452         if (vis_server == VIS_TYPE_SERVER_SYNC  &&
 453             is_my_mac(vis_packet->target_orig))
 454                 are_target = 1;
 455
 456         spin_lock_irqsave(&vis_hash_lock, flags);
 457         info = add_packet(vis_packet, vis_info_len, &is_new, are_target);
 458         if (info == NULL)
 459                 goto end;
 460         /* note that outdated packets will be dropped at this point. */
 461
 462
 463         /* send only if we're the target server or ... */
 464         if (are_target && is_new) {
 465                 info->packet.vis_type = VIS_TYPE_SERVER_SYNC;   /* upgrade! */
 466                 send_list_add(info);
 467
 468                 /* ... we're not the recipient (and thus need to forward). */
 469         } else if (!is_my_mac(info->packet.target_orig)) {
 470                 send_list_add(info);
 471         }
 472 end:
 473         spin_unlock_irqrestore(&vis_hash_lock, flags);
 474 }
 475
 476 /* Walk the originators and find the VIS server with the best tq. Set the packet
 477  * address to its address and return the best_tq.
 478  *
 479  * Must be called with the originator hash locked */
 480 static int find_best_vis_server(struct vis_info *info)
 481 {
 482         HASHIT(hashit);
 483         struct orig_node *orig_node;
 484         int best_tq = -1;
 485
 486         while (hash_iterate(orig_hash, &hashit)) {
 487                 orig_node = hashit.bucket->data;
 488                 if ((orig_node != NULL) &&
 489                     (orig_node->router != NULL) &&
 490                     (orig_node->flags & VIS_SERVER) &&
 491                     (orig_node->router->tq_avg > best_tq)) {
 492                         best_tq = orig_node->router->tq_avg;
 493                         memcpy(info->packet.target_orig, orig_node->orig,
 494                                ETH_ALEN);
 495                 }
 496         }
 497         return best_tq;
 498 }
 499
 500 /* Return true if the vis packet is full. */
 501 static bool vis_packet_full(struct vis_info *info)
 502 {
 503         if (info->packet.entries + 1 >
 504             (1000 - sizeof(struct vis_info)) / sizeof(struct vis_info_entry))
 505                 return true;
 506         return false;
 507 }
 508
 509 /* generates a packet of own vis data,
 510  * returns 0 on success, -1 if no packet could be generated */
 511 static int generate_vis_packet(struct bat_priv *bat_priv)
 512 {
 513         HASHIT(hashit_local);
 514         HASHIT(hashit_global);
 515         struct orig_node *orig_node;
 516         struct vis_info *info = (struct vis_info *)my_vis_info;
 517         struct vis_info_entry *entry, *entry_array;
 518         struct hna_local_entry *hna_local_entry;
 519         int best_tq = -1;
 520         unsigned long flags;
 521
 522         info->first_seen = jiffies;
 523         info->packet.vis_type = atomic_read(&bat_priv->vis_mode);
 524
 525         spin_lock_irqsave(&orig_hash_lock, flags);
 526         memcpy(info->packet.target_orig, broadcastAddr, ETH_ALEN);
 527         info->packet.ttl = TTL;
 528         info->packet.seqno++;
 529         info->packet.entries = 0;
 530
 531         if (info->packet.vis_type == VIS_TYPE_CLIENT_UPDATE) {
 532                 best_tq = find_best_vis_server(info);
 533                 if (best_tq < 0) {
 534                         spin_unlock_irqrestore(&orig_hash_lock, flags);
 535                         return -1;
 536                 }
 537         }
 538
 539         entry_array = (struct vis_info_entry *)
 540                 ((char *)info + sizeof(struct vis_info));
 541
 542         while (hash_iterate(orig_hash, &hashit_global)) {
 543                 orig_node = hashit_global.bucket->data;
 544                 if (orig_node->router != NULL
 545                         && compare_orig(orig_node->router->addr,
 546                                         orig_node->orig)
 547                         && (orig_node->router->if_incoming->if_status ==
 548                                                                 IF_ACTIVE)
 549                     && orig_node->router->tq_avg > 0) {
 550
 551                         /* fill one entry into buffer. */
 552                         entry = &entry_array[info->packet.entries];
 553                         memcpy(entry->src,
 554                              orig_node->router->if_incoming->net_dev->dev_addr,
 555                                ETH_ALEN);
 556                         memcpy(entry->dest, orig_node->orig, ETH_ALEN);
 557                         entry->quality = orig_node->router->tq_avg;
 558                         info->packet.entries++;
 559
 560                         if (vis_packet_full(info)) {
 561                                 spin_unlock_irqrestore(&orig_hash_lock, flags);
 562                                 return 0;
 563                         }
 564                 }
 565         }
 566
 567         spin_unlock_irqrestore(&orig_hash_lock, flags);
 568
 569         spin_lock_irqsave(&hna_local_hash_lock, flags);
 570         while (hash_iterate(hna_local_hash, &hashit_local)) {
 571                 hna_local_entry = hashit_local.bucket->data;
 572                 entry = &entry_array[info->packet.entries];
 573                 memset(entry->src, 0, ETH_ALEN);
 574                 memcpy(entry->dest, hna_local_entry->addr, ETH_ALEN);
 575                 entry->quality = 0; /* 0 means HNA */
 576                 info->packet.entries++;
 577
 578                 if (vis_packet_full(info)) {
 579                         spin_unlock_irqrestore(&hna_local_hash_lock, flags);
 580                         return 0;
 581                 }
 582         }
 583         spin_unlock_irqrestore(&hna_local_hash_lock, flags);
 584         return 0;
 585 }
 586
 587 /* free old vis packets. Must be called with this vis_hash_lock
 588  * held */
 589 static void purge_vis_packets(void)
 590 {
 591         HASHIT(hashit);
 592         struct vis_info *info;
 593
 594         while (hash_iterate(vis_hash, &hashit)) {
 595                 info = hashit.bucket->data;
 596                 if (info == my_vis_info)        /* never purge own data. */
 597                         continue;
 598                 if (time_after(jiffies,
 599                                info->first_seen + (VIS_TIMEOUT*HZ)/1000)) {
 600                         hash_remove_bucket(vis_hash, &hashit);
 601                         send_list_del(info);
 602                         kref_put(&info->refcount, free_info);
 603                 }
 604         }
 605 }
 606
 607 static void broadcast_vis_packet(struct vis_info *info, int packet_length)
 608 {
 609         HASHIT(hashit);
 610         struct orig_node *orig_node;
 611         unsigned long flags;
 612         struct batman_if *batman_if;
 613         uint8_t dstaddr[ETH_ALEN];
 614
 615         spin_lock_irqsave(&orig_hash_lock, flags);
 616
 617         /* send to all routers in range. */
 618         while (hash_iterate(orig_hash, &hashit)) {
 619                 orig_node = hashit.bucket->data;
 620
 621                 /* if it's a vis server and reachable, send it. */
 622                 if ((!orig_node) || (!orig_node->router))
 623                         continue;
 624                 if (!(orig_node->flags & VIS_SERVER))
 625                         continue;
 626                 /* don't send it if we already received the packet from
 627                  * this node. */
 628                 if (recv_list_is_in(&info->recv_list, orig_node->orig))
 629                         continue;
 630
 631                 memcpy(info->packet.target_orig, orig_node->orig, ETH_ALEN);
 632                 batman_if = orig_node->router->if_incoming;
 633                 memcpy(dstaddr, orig_node->router->addr, ETH_ALEN);
 634                 spin_unlock_irqrestore(&orig_hash_lock, flags);
 635
 636                 send_raw_packet((unsigned char *)&info->packet,
 637                                 packet_length, batman_if, dstaddr);
 638
 639                 spin_lock_irqsave(&orig_hash_lock, flags);
 640
 641         }
 642         spin_unlock_irqrestore(&orig_hash_lock, flags);
 643         memcpy(info->packet.target_orig, broadcastAddr, ETH_ALEN);
 644 }
 645
 646 static void unicast_vis_packet(struct vis_info *info, int packet_length)
 647 {
 648         struct orig_node *orig_node;
 649         unsigned long flags;
 650         struct batman_if *batman_if;
 651         uint8_t dstaddr[ETH_ALEN];
 652
 653         spin_lock_irqsave(&orig_hash_lock, flags);
 654         orig_node = ((struct orig_node *)
 655                      hash_find(orig_hash, info->packet.target_orig));
 656
 657         if ((!orig_node) || (!orig_node->router))
 658                 goto out;
 659
 660         /* don't lock while sending the packets ... we therefore
 661          * copy the required data before sending */
 662         batman_if = orig_node->router->if_incoming;
 663         memcpy(dstaddr, orig_node->router->addr, ETH_ALEN);
 664         spin_unlock_irqrestore(&orig_hash_lock, flags);
 665
 666         send_raw_packet((unsigned char *)&info->packet,
 667                         packet_length, batman_if, dstaddr);
 668         return;
 669
 670 out:
 671         spin_unlock_irqrestore(&orig_hash_lock, flags);
 672 }
 673
 674 /* only send one vis packet. called from send_vis_packets() */
 675 static void send_vis_packet(struct vis_info *info)
 676 {
 677         int packet_length;
 678
 679         if (info->packet.ttl < 2) {
 680                 printk(KERN_WARNING "batman-adv: Error - can't send vis packet: ttl exceeded\n");
 681                 return;
 682         }
 683
 684         memcpy(info->packet.sender_orig, mainIfAddr, ETH_ALEN);
 685         info->packet.ttl--;
 686
 687         packet_length = sizeof(struct vis_packet) +
 688                 info->packet.entries * sizeof(struct vis_info_entry);
 689
 690         if (is_bcast(info->packet.target_orig))
 691                 broadcast_vis_packet(info, packet_length);
 692         else
 693                 unicast_vis_packet(info, packet_length);
 694         info->packet.ttl++; /* restore TTL */
 695 }
 696
 697 /* called from timer; send (and maybe generate) vis packet. */
 698 static void send_vis_packets(struct work_struct *work)
 699 {
 700         struct vis_info *info, *temp;
 701         unsigned long flags;
 702         /* FIXME: each batman_if will be attached to a softif */
 703         struct bat_priv *bat_priv = netdev_priv(soft_device);
 704
 705         spin_lock_irqsave(&vis_hash_lock, flags);
 706
 707         purge_vis_packets();
 708
 709         if (generate_vis_packet(bat_priv) == 0) {
 710                 /* schedule if generation was successful */
 711                 send_list_add(my_vis_info);
 712         }
 713
 714         list_for_each_entry_safe(info, temp, &send_list, send_list) {
 715
 716                 kref_get(&info->refcount);
 717                 spin_unlock_irqrestore(&vis_hash_lock, flags);
 718
 719                 send_vis_packet(info);
 720
 721                 spin_lock_irqsave(&vis_hash_lock, flags);
 722                 send_list_del(info);
 723                 kref_put(&info->refcount, free_info);
 724         }
 725         spin_unlock_irqrestore(&vis_hash_lock, flags);
 726         start_vis_timer();
 727 }
 728 static DECLARE_DELAYED_WORK(vis_timer_wq, send_vis_packets);
 729
 730 /* init the vis server. this may only be called when if_list is already
 731  * initialized (e.g. bat0 is initialized, interfaces have been added) */
 732 int vis_init(void)
 733 {
 734         unsigned long flags;
 735         if (vis_hash)
 736                 return 1;
 737
 738         spin_lock_irqsave(&vis_hash_lock, flags);
 739
 740         vis_hash = hash_new(256, vis_info_cmp, vis_info_choose);
 741         if (!vis_hash) {
 742                 printk(KERN_ERR "batman-adv:Can't initialize vis_hash\n");
 743                 goto err;
 744         }
 745
 746         my_vis_info = kmalloc(1000, GFP_ATOMIC);
 747         if (!my_vis_info) {
 748                 printk(KERN_ERR "batman-adv:Can't initialize vis packet\n");
 749                 goto err;
 750         }
 751
 752         /* prefill the vis info */
 753         my_vis_info->first_seen = jiffies - msecs_to_jiffies(VIS_INTERVAL);
 754         INIT_LIST_HEAD(&my_vis_info->recv_list);
 755         INIT_LIST_HEAD(&my_vis_info->send_list);
 756         kref_init(&my_vis_info->refcount);
 757         my_vis_info->packet.version = COMPAT_VERSION;
 758         my_vis_info->packet.packet_type = BAT_VIS;
 759         my_vis_info->packet.ttl = TTL;
 760         my_vis_info->packet.seqno = 0;
 761         my_vis_info->packet.entries = 0;
 762
 763         INIT_LIST_HEAD(&send_list);
 764
 765         memcpy(my_vis_info->packet.vis_orig, mainIfAddr, ETH_ALEN);
 766         memcpy(my_vis_info->packet.sender_orig, mainIfAddr, ETH_ALEN);
 767
 768         if (hash_add(vis_hash, my_vis_info) < 0) {
 769                 printk(KERN_ERR
 770                        "batman-adv:Can't add own vis packet into hash\n");
 771                 /* not in hash, need to remove it manually. */
 772                 kref_put(&my_vis_info->refcount, free_info);
 773                 goto err;
 774         }
 775
 776         spin_unlock_irqrestore(&vis_hash_lock, flags);
 777         start_vis_timer();
 778         return 1;
 779
 780 err:
 781         spin_unlock_irqrestore(&vis_hash_lock, flags);
 782         vis_quit();
 783         return 0;
 784 }
 785
 786 /* Decrease the reference count on a hash item info */
 787 static void free_info_ref(void *data)
 788 {
 789         struct vis_info *info = data;
 790
 791         send_list_del(info);
 792         kref_put(&info->refcount, free_info);
 793 }
 794
 795 /* shutdown vis-server */
 796 void vis_quit(void)
 797 {
 798         unsigned long flags;
 799         if (!vis_hash)
 800                 return;
 801
 802         cancel_delayed_work_sync(&vis_timer_wq);
 803
 804         spin_lock_irqsave(&vis_hash_lock, flags);
 805         /* properly remove, kill timers ... */
 806         hash_delete(vis_hash, free_info_ref);
 807         vis_hash = NULL;
 808         my_vis_info = NULL;
 809         spin_unlock_irqrestore(&vis_hash_lock, flags);
 810 }
 811
 812 /* schedule packets for (re)transmission */
 813 static void start_vis_timer(void)
 814 {
 815         queue_delayed_work(bat_event_workqueue, &vis_timer_wq,
 816                            (VIS_INTERVAL * HZ) / 1000);
 817 }