Merge branch 'for-next' of git://git.kernel.org/pub/scm/linux/kernel/git/nab/target...
[cascardo/linux.git] / net / batman-adv / vis.c
1 /* Copyright (C) 2008-2013 B.A.T.M.A.N. contributors:
2  *
3  * Simon Wunderlich
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of version 2 of the GNU General Public
7  * License as published by the Free Software Foundation.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12  * General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
17  * 02110-1301, USA
18  */
19
20 #include "main.h"
21 #include "send.h"
22 #include "translation-table.h"
23 #include "vis.h"
24 #include "soft-interface.h"
25 #include "hard-interface.h"
26 #include "hash.h"
27 #include "originator.h"
28
29 #define BATADV_MAX_VIS_PACKET_SIZE 1000
30
31 /* hash class keys */
32 static struct lock_class_key batadv_vis_hash_lock_class_key;
33
34 /* free the info */
35 static void batadv_free_info(struct kref *ref)
36 {
37         struct batadv_vis_info *info;
38         struct batadv_priv *bat_priv;
39         struct batadv_vis_recvlist_node *entry, *tmp;
40
41         info = container_of(ref, struct batadv_vis_info, refcount);
42         bat_priv = info->bat_priv;
43
44         list_del_init(&info->send_list);
45         spin_lock_bh(&bat_priv->vis.list_lock);
46         list_for_each_entry_safe(entry, tmp, &info->recv_list, list) {
47                 list_del(&entry->list);
48                 kfree(entry);
49         }
50
51         spin_unlock_bh(&bat_priv->vis.list_lock);
52         kfree_skb(info->skb_packet);
53         kfree(info);
54 }
55
56 /* Compare two vis packets, used by the hashing algorithm */
57 static int batadv_vis_info_cmp(const struct hlist_node *node, const void *data2)
58 {
59         const struct batadv_vis_info *d1, *d2;
60         const struct batadv_vis_packet *p1, *p2;
61
62         d1 = container_of(node, struct batadv_vis_info, hash_entry);
63         d2 = data2;
64         p1 = (struct batadv_vis_packet *)d1->skb_packet->data;
65         p2 = (struct batadv_vis_packet *)d2->skb_packet->data;
66         return batadv_compare_eth(p1->vis_orig, p2->vis_orig);
67 }
68
69 /* hash function to choose an entry in a hash table of given size
70  * hash algorithm from http://en.wikipedia.org/wiki/Hash_table
71  */
72 static uint32_t batadv_vis_info_choose(const void *data, uint32_t size)
73 {
74         const struct batadv_vis_info *vis_info = data;
75         const struct batadv_vis_packet *packet;
76         const unsigned char *key;
77         uint32_t hash = 0;
78         size_t i;
79
80         packet = (struct batadv_vis_packet *)vis_info->skb_packet->data;
81         key = packet->vis_orig;
82         for (i = 0; i < ETH_ALEN; i++) {
83                 hash += key[i];
84                 hash += (hash << 10);
85                 hash ^= (hash >> 6);
86         }
87
88         hash += (hash << 3);
89         hash ^= (hash >> 11);
90         hash += (hash << 15);
91
92         return hash % size;
93 }
94
95 static struct batadv_vis_info *
96 batadv_vis_hash_find(struct batadv_priv *bat_priv, const void *data)
97 {
98         struct batadv_hashtable *hash = bat_priv->vis.hash;
99         struct hlist_head *head;
100         struct batadv_vis_info *vis_info, *vis_info_tmp = NULL;
101         uint32_t index;
102
103         if (!hash)
104                 return NULL;
105
106         index = batadv_vis_info_choose(data, hash->size);
107         head = &hash->table[index];
108
109         rcu_read_lock();
110         hlist_for_each_entry_rcu(vis_info, head, hash_entry) {
111                 if (!batadv_vis_info_cmp(&vis_info->hash_entry, data))
112                         continue;
113
114                 vis_info_tmp = vis_info;
115                 break;
116         }
117         rcu_read_unlock();
118
119         return vis_info_tmp;
120 }
121
122 /* insert interface to the list of interfaces of one originator, if it
123  * does not already exist in the list
124  */
125 static void batadv_vis_data_insert_interface(const uint8_t *interface,
126                                              struct hlist_head *if_list,
127                                              bool primary)
128 {
129         struct batadv_vis_if_list_entry *entry;
130
131         hlist_for_each_entry(entry, if_list, list) {
132                 if (batadv_compare_eth(entry->addr, interface))
133                         return;
134         }
135
136         /* it's a new address, add it to the list */
137         entry = kmalloc(sizeof(*entry), GFP_ATOMIC);
138         if (!entry)
139                 return;
140         memcpy(entry->addr, interface, ETH_ALEN);
141         entry->primary = primary;
142         hlist_add_head(&entry->list, if_list);
143 }
144
145 static void batadv_vis_data_read_prim_sec(struct seq_file *seq,
146                                           const struct hlist_head *if_list)
147 {
148         struct batadv_vis_if_list_entry *entry;
149
150         hlist_for_each_entry(entry, if_list, list) {
151                 if (entry->primary)
152                         seq_printf(seq, "PRIMARY, ");
153                 else
154                         seq_printf(seq,  "SEC %pM, ", entry->addr);
155         }
156 }
157
158 /* read an entry  */
159 static ssize_t
160 batadv_vis_data_read_entry(struct seq_file *seq,
161                            const struct batadv_vis_info_entry *entry,
162                            const uint8_t *src, bool primary)
163 {
164         if (primary && entry->quality == 0)
165                 return seq_printf(seq, "TT %pM, ", entry->dest);
166         else if (batadv_compare_eth(entry->src, src))
167                 return seq_printf(seq, "TQ %pM %d, ", entry->dest,
168                                   entry->quality);
169
170         return 0;
171 }
172
173 static void
174 batadv_vis_data_insert_interfaces(struct hlist_head *list,
175                                   struct batadv_vis_packet *packet,
176                                   struct batadv_vis_info_entry *entries)
177 {
178         int i;
179
180         for (i = 0; i < packet->entries; i++) {
181                 if (entries[i].quality == 0)
182                         continue;
183
184                 if (batadv_compare_eth(entries[i].src, packet->vis_orig))
185                         continue;
186
187                 batadv_vis_data_insert_interface(entries[i].src, list, false);
188         }
189 }
190
191 static void batadv_vis_data_read_entries(struct seq_file *seq,
192                                          struct hlist_head *list,
193                                          struct batadv_vis_packet *packet,
194                                          struct batadv_vis_info_entry *entries)
195 {
196         int i;
197         struct batadv_vis_if_list_entry *entry;
198
199         hlist_for_each_entry(entry, list, list) {
200                 seq_printf(seq, "%pM,", entry->addr);
201
202                 for (i = 0; i < packet->entries; i++)
203                         batadv_vis_data_read_entry(seq, &entries[i],
204                                                    entry->addr, entry->primary);
205
206                 /* add primary/secondary records */
207                 if (batadv_compare_eth(entry->addr, packet->vis_orig))
208                         batadv_vis_data_read_prim_sec(seq, list);
209
210                 seq_printf(seq, "\n");
211         }
212 }
213
214 static void batadv_vis_seq_print_text_bucket(struct seq_file *seq,
215                                              const struct hlist_head *head)
216 {
217         struct batadv_vis_info *info;
218         struct batadv_vis_packet *packet;
219         uint8_t *entries_pos;
220         struct batadv_vis_info_entry *entries;
221         struct batadv_vis_if_list_entry *entry;
222         struct hlist_node *n;
223
224         HLIST_HEAD(vis_if_list);
225
226         hlist_for_each_entry_rcu(info, head, hash_entry) {
227                 packet = (struct batadv_vis_packet *)info->skb_packet->data;
228                 entries_pos = (uint8_t *)packet + sizeof(*packet);
229                 entries = (struct batadv_vis_info_entry *)entries_pos;
230
231                 batadv_vis_data_insert_interface(packet->vis_orig, &vis_if_list,
232                                                  true);
233                 batadv_vis_data_insert_interfaces(&vis_if_list, packet,
234                                                   entries);
235                 batadv_vis_data_read_entries(seq, &vis_if_list, packet,
236                                              entries);
237
238                 hlist_for_each_entry_safe(entry, n, &vis_if_list, list) {
239                         hlist_del(&entry->list);
240                         kfree(entry);
241                 }
242         }
243 }
244
245 int batadv_vis_seq_print_text(struct seq_file *seq, void *offset)
246 {
247         struct batadv_hard_iface *primary_if;
248         struct hlist_head *head;
249         struct net_device *net_dev = (struct net_device *)seq->private;
250         struct batadv_priv *bat_priv = netdev_priv(net_dev);
251         struct batadv_hashtable *hash = bat_priv->vis.hash;
252         uint32_t i;
253         int ret = 0;
254         int vis_server = atomic_read(&bat_priv->vis_mode);
255
256         primary_if = batadv_primary_if_get_selected(bat_priv);
257         if (!primary_if)
258                 goto out;
259
260         if (vis_server == BATADV_VIS_TYPE_CLIENT_UPDATE)
261                 goto out;
262
263         spin_lock_bh(&bat_priv->vis.hash_lock);
264         for (i = 0; i < hash->size; i++) {
265                 head = &hash->table[i];
266                 batadv_vis_seq_print_text_bucket(seq, head);
267         }
268         spin_unlock_bh(&bat_priv->vis.hash_lock);
269
270 out:
271         if (primary_if)
272                 batadv_hardif_free_ref(primary_if);
273         return ret;
274 }
275
276 /* add the info packet to the send list, if it was not
277  * already linked in.
278  */
279 static void batadv_send_list_add(struct batadv_priv *bat_priv,
280                                  struct batadv_vis_info *info)
281 {
282         if (list_empty(&info->send_list)) {
283                 kref_get(&info->refcount);
284                 list_add_tail(&info->send_list, &bat_priv->vis.send_list);
285         }
286 }
287
288 /* delete the info packet from the send list, if it was
289  * linked in.
290  */
291 static void batadv_send_list_del(struct batadv_vis_info *info)
292 {
293         if (!list_empty(&info->send_list)) {
294                 list_del_init(&info->send_list);
295                 kref_put(&info->refcount, batadv_free_info);
296         }
297 }
298
299 /* tries to add one entry to the receive list. */
300 static void batadv_recv_list_add(struct batadv_priv *bat_priv,
301                                  struct list_head *recv_list, const char *mac)
302 {
303         struct batadv_vis_recvlist_node *entry;
304
305         entry = kmalloc(sizeof(*entry), GFP_ATOMIC);
306         if (!entry)
307                 return;
308
309         memcpy(entry->mac, mac, ETH_ALEN);
310         spin_lock_bh(&bat_priv->vis.list_lock);
311         list_add_tail(&entry->list, recv_list);
312         spin_unlock_bh(&bat_priv->vis.list_lock);
313 }
314
315 /* returns 1 if this mac is in the recv_list */
316 static int batadv_recv_list_is_in(struct batadv_priv *bat_priv,
317                                   const struct list_head *recv_list,
318                                   const char *mac)
319 {
320         const struct batadv_vis_recvlist_node *entry;
321
322         spin_lock_bh(&bat_priv->vis.list_lock);
323         list_for_each_entry(entry, recv_list, list) {
324                 if (batadv_compare_eth(entry->mac, mac)) {
325                         spin_unlock_bh(&bat_priv->vis.list_lock);
326                         return 1;
327                 }
328         }
329         spin_unlock_bh(&bat_priv->vis.list_lock);
330         return 0;
331 }
332
333 /* try to add the packet to the vis_hash. return NULL if invalid (e.g. too old,
334  * broken.. ).  vis hash must be locked outside.  is_new is set when the packet
335  * is newer than old entries in the hash.
336  */
337 static struct batadv_vis_info *
338 batadv_add_packet(struct batadv_priv *bat_priv,
339                   struct batadv_vis_packet *vis_packet, int vis_info_len,
340                   int *is_new, int make_broadcast)
341 {
342         struct batadv_vis_info *info, *old_info;
343         struct batadv_vis_packet *search_packet, *old_packet;
344         struct batadv_vis_info search_elem;
345         struct batadv_vis_packet *packet;
346         struct sk_buff *tmp_skb;
347         int hash_added;
348         size_t len;
349         size_t max_entries;
350
351         *is_new = 0;
352         /* sanity check */
353         if (!bat_priv->vis.hash)
354                 return NULL;
355
356         /* see if the packet is already in vis_hash */
357         search_elem.skb_packet = dev_alloc_skb(sizeof(*search_packet));
358         if (!search_elem.skb_packet)
359                 return NULL;
360         len = sizeof(*search_packet);
361         tmp_skb = search_elem.skb_packet;
362         search_packet = (struct batadv_vis_packet *)skb_put(tmp_skb, len);
363
364         memcpy(search_packet->vis_orig, vis_packet->vis_orig, ETH_ALEN);
365         old_info = batadv_vis_hash_find(bat_priv, &search_elem);
366         kfree_skb(search_elem.skb_packet);
367
368         if (old_info) {
369                 tmp_skb = old_info->skb_packet;
370                 old_packet = (struct batadv_vis_packet *)tmp_skb->data;
371                 if (!batadv_seq_after(ntohl(vis_packet->seqno),
372                                       ntohl(old_packet->seqno))) {
373                         if (old_packet->seqno == vis_packet->seqno) {
374                                 batadv_recv_list_add(bat_priv,
375                                                      &old_info->recv_list,
376                                                      vis_packet->sender_orig);
377                                 return old_info;
378                         } else {
379                                 /* newer packet is already in hash. */
380                                 return NULL;
381                         }
382                 }
383                 /* remove old entry */
384                 batadv_hash_remove(bat_priv->vis.hash, batadv_vis_info_cmp,
385                                    batadv_vis_info_choose, old_info);
386                 batadv_send_list_del(old_info);
387                 kref_put(&old_info->refcount, batadv_free_info);
388         }
389
390         info = kmalloc(sizeof(*info), GFP_ATOMIC);
391         if (!info)
392                 return NULL;
393
394         len = sizeof(*packet) + vis_info_len;
395         info->skb_packet = dev_alloc_skb(len + ETH_HLEN + NET_IP_ALIGN);
396         if (!info->skb_packet) {
397                 kfree(info);
398                 return NULL;
399         }
400         skb_reserve(info->skb_packet, ETH_HLEN + NET_IP_ALIGN);
401         packet = (struct batadv_vis_packet *)skb_put(info->skb_packet, len);
402
403         kref_init(&info->refcount);
404         INIT_LIST_HEAD(&info->send_list);
405         INIT_LIST_HEAD(&info->recv_list);
406         info->first_seen = jiffies;
407         info->bat_priv = bat_priv;
408         memcpy(packet, vis_packet, len);
409
410         /* initialize and add new packet. */
411         *is_new = 1;
412
413         /* Make it a broadcast packet, if required */
414         if (make_broadcast)
415                 memcpy(packet->target_orig, batadv_broadcast_addr, ETH_ALEN);
416
417         /* repair if entries is longer than packet. */
418         max_entries = vis_info_len / sizeof(struct batadv_vis_info_entry);
419         if (packet->entries > max_entries)
420                 packet->entries = max_entries;
421
422         batadv_recv_list_add(bat_priv, &info->recv_list, packet->sender_orig);
423
424         /* try to add it */
425         hash_added = batadv_hash_add(bat_priv->vis.hash, batadv_vis_info_cmp,
426                                      batadv_vis_info_choose, info,
427                                      &info->hash_entry);
428         if (hash_added != 0) {
429                 /* did not work (for some reason) */
430                 kref_put(&info->refcount, batadv_free_info);
431                 info = NULL;
432         }
433
434         return info;
435 }
436
437 /* handle the server sync packet, forward if needed. */
438 void batadv_receive_server_sync_packet(struct batadv_priv *bat_priv,
439                                        struct batadv_vis_packet *vis_packet,
440                                        int vis_info_len)
441 {
442         struct batadv_vis_info *info;
443         int is_new, make_broadcast;
444         int vis_server = atomic_read(&bat_priv->vis_mode);
445
446         make_broadcast = (vis_server == BATADV_VIS_TYPE_SERVER_SYNC);
447
448         spin_lock_bh(&bat_priv->vis.hash_lock);
449         info = batadv_add_packet(bat_priv, vis_packet, vis_info_len,
450                                  &is_new, make_broadcast);
451         if (!info)
452                 goto end;
453
454         /* only if we are server ourselves and packet is newer than the one in
455          * hash.
456          */
457         if (vis_server == BATADV_VIS_TYPE_SERVER_SYNC && is_new)
458                 batadv_send_list_add(bat_priv, info);
459 end:
460         spin_unlock_bh(&bat_priv->vis.hash_lock);
461 }
462
463 /* handle an incoming client update packet and schedule forward if needed. */
464 void batadv_receive_client_update_packet(struct batadv_priv *bat_priv,
465                                          struct batadv_vis_packet *vis_packet,
466                                          int vis_info_len)
467 {
468         struct batadv_vis_info *info;
469         struct batadv_vis_packet *packet;
470         int is_new;
471         int vis_server = atomic_read(&bat_priv->vis_mode);
472         int are_target = 0;
473
474         /* clients shall not broadcast. */
475         if (is_broadcast_ether_addr(vis_packet->target_orig))
476                 return;
477
478         /* Are we the target for this VIS packet? */
479         if (vis_server == BATADV_VIS_TYPE_SERVER_SYNC   &&
480             batadv_is_my_mac(vis_packet->target_orig))
481                 are_target = 1;
482
483         spin_lock_bh(&bat_priv->vis.hash_lock);
484         info = batadv_add_packet(bat_priv, vis_packet, vis_info_len,
485                                  &is_new, are_target);
486
487         if (!info)
488                 goto end;
489         /* note that outdated packets will be dropped at this point. */
490
491         packet = (struct batadv_vis_packet *)info->skb_packet->data;
492
493         /* send only if we're the target server or ... */
494         if (are_target && is_new) {
495                 packet->vis_type = BATADV_VIS_TYPE_SERVER_SYNC; /* upgrade! */
496                 batadv_send_list_add(bat_priv, info);
497
498                 /* ... we're not the recipient (and thus need to forward). */
499         } else if (!batadv_is_my_mac(packet->target_orig)) {
500                 batadv_send_list_add(bat_priv, info);
501         }
502
503 end:
504         spin_unlock_bh(&bat_priv->vis.hash_lock);
505 }
506
507 /* Walk the originators and find the VIS server with the best tq. Set the packet
508  * address to its address and return the best_tq.
509  *
510  * Must be called with the originator hash locked
511  */
512 static int batadv_find_best_vis_server(struct batadv_priv *bat_priv,
513                                        struct batadv_vis_info *info)
514 {
515         struct batadv_hashtable *hash = bat_priv->orig_hash;
516         struct batadv_neigh_node *router;
517         struct hlist_head *head;
518         struct batadv_orig_node *orig_node;
519         struct batadv_vis_packet *packet;
520         int best_tq = -1;
521         uint32_t i;
522
523         packet = (struct batadv_vis_packet *)info->skb_packet->data;
524
525         for (i = 0; i < hash->size; i++) {
526                 head = &hash->table[i];
527
528                 rcu_read_lock();
529                 hlist_for_each_entry_rcu(orig_node, head, hash_entry) {
530                         router = batadv_orig_node_get_router(orig_node);
531                         if (!router)
532                                 continue;
533
534                         if ((orig_node->flags & BATADV_VIS_SERVER) &&
535                             (router->tq_avg > best_tq)) {
536                                 best_tq = router->tq_avg;
537                                 memcpy(packet->target_orig, orig_node->orig,
538                                        ETH_ALEN);
539                         }
540                         batadv_neigh_node_free_ref(router);
541                 }
542                 rcu_read_unlock();
543         }
544
545         return best_tq;
546 }
547
548 /* Return true if the vis packet is full. */
549 static bool batadv_vis_packet_full(const struct batadv_vis_info *info)
550 {
551         const struct batadv_vis_packet *packet;
552         size_t num;
553
554         packet = (struct batadv_vis_packet *)info->skb_packet->data;
555         num = BATADV_MAX_VIS_PACKET_SIZE / sizeof(struct batadv_vis_info_entry);
556
557         if (num < packet->entries + 1)
558                 return true;
559         return false;
560 }
561
562 /* generates a packet of own vis data,
563  * returns 0 on success, -1 if no packet could be generated
564  */
565 static int batadv_generate_vis_packet(struct batadv_priv *bat_priv)
566 {
567         struct batadv_hashtable *hash = bat_priv->orig_hash;
568         struct hlist_head *head;
569         struct batadv_orig_node *orig_node;
570         struct batadv_neigh_node *router;
571         struct batadv_vis_info *info = bat_priv->vis.my_info;
572         struct batadv_vis_packet *packet;
573         struct batadv_vis_info_entry *entry;
574         struct batadv_tt_common_entry *tt_common_entry;
575         uint8_t *packet_pos;
576         int best_tq = -1;
577         uint32_t i;
578
579         info->first_seen = jiffies;
580         packet = (struct batadv_vis_packet *)info->skb_packet->data;
581         packet->vis_type = atomic_read(&bat_priv->vis_mode);
582
583         memcpy(packet->target_orig, batadv_broadcast_addr, ETH_ALEN);
584         packet->header.ttl = BATADV_TTL;
585         packet->seqno = htonl(ntohl(packet->seqno) + 1);
586         packet->entries = 0;
587         packet->reserved = 0;
588         skb_trim(info->skb_packet, sizeof(*packet));
589
590         if (packet->vis_type == BATADV_VIS_TYPE_CLIENT_UPDATE) {
591                 best_tq = batadv_find_best_vis_server(bat_priv, info);
592
593                 if (best_tq < 0)
594                         return best_tq;
595         }
596
597         for (i = 0; i < hash->size; i++) {
598                 head = &hash->table[i];
599
600                 rcu_read_lock();
601                 hlist_for_each_entry_rcu(orig_node, head, hash_entry) {
602                         router = batadv_orig_node_get_router(orig_node);
603                         if (!router)
604                                 continue;
605
606                         if (!batadv_compare_eth(router->addr, orig_node->orig))
607                                 goto next;
608
609                         if (router->if_incoming->if_status != BATADV_IF_ACTIVE)
610                                 goto next;
611
612                         if (router->tq_avg < 1)
613                                 goto next;
614
615                         /* fill one entry into buffer. */
616                         packet_pos = skb_put(info->skb_packet, sizeof(*entry));
617                         entry = (struct batadv_vis_info_entry *)packet_pos;
618                         memcpy(entry->src,
619                                router->if_incoming->net_dev->dev_addr,
620                                ETH_ALEN);
621                         memcpy(entry->dest, orig_node->orig, ETH_ALEN);
622                         entry->quality = router->tq_avg;
623                         packet->entries++;
624
625 next:
626                         batadv_neigh_node_free_ref(router);
627
628                         if (batadv_vis_packet_full(info))
629                                 goto unlock;
630                 }
631                 rcu_read_unlock();
632         }
633
634         hash = bat_priv->tt.local_hash;
635
636         for (i = 0; i < hash->size; i++) {
637                 head = &hash->table[i];
638
639                 rcu_read_lock();
640                 hlist_for_each_entry_rcu(tt_common_entry, head,
641                                          hash_entry) {
642                         packet_pos = skb_put(info->skb_packet, sizeof(*entry));
643                         entry = (struct batadv_vis_info_entry *)packet_pos;
644                         memset(entry->src, 0, ETH_ALEN);
645                         memcpy(entry->dest, tt_common_entry->addr, ETH_ALEN);
646                         entry->quality = 0; /* 0 means TT */
647                         packet->entries++;
648
649                         if (batadv_vis_packet_full(info))
650                                 goto unlock;
651                 }
652                 rcu_read_unlock();
653         }
654
655         return 0;
656
657 unlock:
658         rcu_read_unlock();
659         return 0;
660 }
661
662 /* free old vis packets. Must be called with this vis_hash_lock
663  * held
664  */
665 static void batadv_purge_vis_packets(struct batadv_priv *bat_priv)
666 {
667         uint32_t i;
668         struct batadv_hashtable *hash = bat_priv->vis.hash;
669         struct hlist_node *node_tmp;
670         struct hlist_head *head;
671         struct batadv_vis_info *info;
672
673         for (i = 0; i < hash->size; i++) {
674                 head = &hash->table[i];
675
676                 hlist_for_each_entry_safe(info, node_tmp,
677                                           head, hash_entry) {
678                         /* never purge own data. */
679                         if (info == bat_priv->vis.my_info)
680                                 continue;
681
682                         if (batadv_has_timed_out(info->first_seen,
683                                                  BATADV_VIS_TIMEOUT)) {
684                                 hlist_del(&info->hash_entry);
685                                 batadv_send_list_del(info);
686                                 kref_put(&info->refcount, batadv_free_info);
687                         }
688                 }
689         }
690 }
691
692 static void batadv_broadcast_vis_packet(struct batadv_priv *bat_priv,
693                                         struct batadv_vis_info *info)
694 {
695         struct batadv_hashtable *hash = bat_priv->orig_hash;
696         struct hlist_head *head;
697         struct batadv_orig_node *orig_node;
698         struct batadv_vis_packet *packet;
699         struct sk_buff *skb;
700         uint32_t i;
701
702
703         packet = (struct batadv_vis_packet *)info->skb_packet->data;
704
705         /* send to all routers in range. */
706         for (i = 0; i < hash->size; i++) {
707                 head = &hash->table[i];
708
709                 rcu_read_lock();
710                 hlist_for_each_entry_rcu(orig_node, head, hash_entry) {
711                         /* if it's a vis server and reachable, send it. */
712                         if (!(orig_node->flags & BATADV_VIS_SERVER))
713                                 continue;
714
715                         /* don't send it if we already received the packet from
716                          * this node.
717                          */
718                         if (batadv_recv_list_is_in(bat_priv, &info->recv_list,
719                                                    orig_node->orig))
720                                 continue;
721
722                         memcpy(packet->target_orig, orig_node->orig, ETH_ALEN);
723                         skb = skb_clone(info->skb_packet, GFP_ATOMIC);
724                         if (!skb)
725                                 continue;
726
727                         if (!batadv_send_skb_to_orig(skb, orig_node, NULL))
728                                 kfree_skb(skb);
729                 }
730                 rcu_read_unlock();
731         }
732 }
733
734 static void batadv_unicast_vis_packet(struct batadv_priv *bat_priv,
735                                       struct batadv_vis_info *info)
736 {
737         struct batadv_orig_node *orig_node;
738         struct sk_buff *skb;
739         struct batadv_vis_packet *packet;
740
741         packet = (struct batadv_vis_packet *)info->skb_packet->data;
742
743         orig_node = batadv_orig_hash_find(bat_priv, packet->target_orig);
744         if (!orig_node)
745                 goto out;
746
747         skb = skb_clone(info->skb_packet, GFP_ATOMIC);
748         if (!skb)
749                 goto out;
750
751         if (!batadv_send_skb_to_orig(skb, orig_node, NULL))
752                 kfree_skb(skb);
753
754 out:
755         if (orig_node)
756                 batadv_orig_node_free_ref(orig_node);
757 }
758
759 /* only send one vis packet. called from batadv_send_vis_packets() */
760 static void batadv_send_vis_packet(struct batadv_priv *bat_priv,
761                                    struct batadv_vis_info *info)
762 {
763         struct batadv_hard_iface *primary_if;
764         struct batadv_vis_packet *packet;
765
766         primary_if = batadv_primary_if_get_selected(bat_priv);
767         if (!primary_if)
768                 goto out;
769
770         packet = (struct batadv_vis_packet *)info->skb_packet->data;
771         if (packet->header.ttl < 2) {
772                 pr_debug("Error - can't send vis packet: ttl exceeded\n");
773                 goto out;
774         }
775
776         memcpy(packet->sender_orig, primary_if->net_dev->dev_addr, ETH_ALEN);
777         packet->header.ttl--;
778
779         if (is_broadcast_ether_addr(packet->target_orig))
780                 batadv_broadcast_vis_packet(bat_priv, info);
781         else
782                 batadv_unicast_vis_packet(bat_priv, info);
783         packet->header.ttl++; /* restore TTL */
784
785 out:
786         if (primary_if)
787                 batadv_hardif_free_ref(primary_if);
788 }
789
790 /* called from timer; send (and maybe generate) vis packet. */
791 static void batadv_send_vis_packets(struct work_struct *work)
792 {
793         struct delayed_work *delayed_work;
794         struct batadv_priv *bat_priv;
795         struct batadv_priv_vis *priv_vis;
796         struct batadv_vis_info *info;
797
798         delayed_work = container_of(work, struct delayed_work, work);
799         priv_vis = container_of(delayed_work, struct batadv_priv_vis, work);
800         bat_priv = container_of(priv_vis, struct batadv_priv, vis);
801         spin_lock_bh(&bat_priv->vis.hash_lock);
802         batadv_purge_vis_packets(bat_priv);
803
804         if (batadv_generate_vis_packet(bat_priv) == 0) {
805                 /* schedule if generation was successful */
806                 batadv_send_list_add(bat_priv, bat_priv->vis.my_info);
807         }
808
809         while (!list_empty(&bat_priv->vis.send_list)) {
810                 info = list_first_entry(&bat_priv->vis.send_list,
811                                         typeof(*info), send_list);
812
813                 kref_get(&info->refcount);
814                 spin_unlock_bh(&bat_priv->vis.hash_lock);
815
816                 batadv_send_vis_packet(bat_priv, info);
817
818                 spin_lock_bh(&bat_priv->vis.hash_lock);
819                 batadv_send_list_del(info);
820                 kref_put(&info->refcount, batadv_free_info);
821         }
822         spin_unlock_bh(&bat_priv->vis.hash_lock);
823
824         queue_delayed_work(batadv_event_workqueue, &bat_priv->vis.work,
825                            msecs_to_jiffies(BATADV_VIS_INTERVAL));
826 }
827
828 /* init the vis server. this may only be called when if_list is already
829  * initialized (e.g. bat0 is initialized, interfaces have been added)
830  */
831 int batadv_vis_init(struct batadv_priv *bat_priv)
832 {
833         struct batadv_vis_packet *packet;
834         int hash_added;
835         unsigned int len;
836         unsigned long first_seen;
837         struct sk_buff *tmp_skb;
838
839         if (bat_priv->vis.hash)
840                 return 0;
841
842         spin_lock_bh(&bat_priv->vis.hash_lock);
843
844         bat_priv->vis.hash = batadv_hash_new(256);
845         if (!bat_priv->vis.hash) {
846                 pr_err("Can't initialize vis_hash\n");
847                 goto err;
848         }
849
850         batadv_hash_set_lock_class(bat_priv->vis.hash,
851                                    &batadv_vis_hash_lock_class_key);
852
853         bat_priv->vis.my_info = kmalloc(BATADV_MAX_VIS_PACKET_SIZE, GFP_ATOMIC);
854         if (!bat_priv->vis.my_info)
855                 goto err;
856
857         len = sizeof(*packet) + BATADV_MAX_VIS_PACKET_SIZE;
858         len += ETH_HLEN + NET_IP_ALIGN;
859         bat_priv->vis.my_info->skb_packet = dev_alloc_skb(len);
860         if (!bat_priv->vis.my_info->skb_packet)
861                 goto free_info;
862
863         skb_reserve(bat_priv->vis.my_info->skb_packet, ETH_HLEN + NET_IP_ALIGN);
864         tmp_skb = bat_priv->vis.my_info->skb_packet;
865         packet = (struct batadv_vis_packet *)skb_put(tmp_skb, sizeof(*packet));
866
867         /* prefill the vis info */
868         first_seen = jiffies - msecs_to_jiffies(BATADV_VIS_INTERVAL);
869         bat_priv->vis.my_info->first_seen = first_seen;
870         INIT_LIST_HEAD(&bat_priv->vis.my_info->recv_list);
871         INIT_LIST_HEAD(&bat_priv->vis.my_info->send_list);
872         kref_init(&bat_priv->vis.my_info->refcount);
873         bat_priv->vis.my_info->bat_priv = bat_priv;
874         packet->header.version = BATADV_COMPAT_VERSION;
875         packet->header.packet_type = BATADV_VIS;
876         packet->header.ttl = BATADV_TTL;
877         packet->seqno = 0;
878         packet->reserved = 0;
879         packet->entries = 0;
880
881         INIT_LIST_HEAD(&bat_priv->vis.send_list);
882
883         hash_added = batadv_hash_add(bat_priv->vis.hash, batadv_vis_info_cmp,
884                                      batadv_vis_info_choose,
885                                      bat_priv->vis.my_info,
886                                      &bat_priv->vis.my_info->hash_entry);
887         if (hash_added != 0) {
888                 pr_err("Can't add own vis packet into hash\n");
889                 /* not in hash, need to remove it manually. */
890                 kref_put(&bat_priv->vis.my_info->refcount, batadv_free_info);
891                 goto err;
892         }
893
894         spin_unlock_bh(&bat_priv->vis.hash_lock);
895
896         INIT_DELAYED_WORK(&bat_priv->vis.work, batadv_send_vis_packets);
897         queue_delayed_work(batadv_event_workqueue, &bat_priv->vis.work,
898                            msecs_to_jiffies(BATADV_VIS_INTERVAL));
899
900         return 0;
901
902 free_info:
903         kfree(bat_priv->vis.my_info);
904         bat_priv->vis.my_info = NULL;
905 err:
906         spin_unlock_bh(&bat_priv->vis.hash_lock);
907         batadv_vis_quit(bat_priv);
908         return -ENOMEM;
909 }
910
911 /* Decrease the reference count on a hash item info */
912 static void batadv_free_info_ref(struct hlist_node *node, void *arg)
913 {
914         struct batadv_vis_info *info;
915
916         info = container_of(node, struct batadv_vis_info, hash_entry);
917         batadv_send_list_del(info);
918         kref_put(&info->refcount, batadv_free_info);
919 }
920
921 /* shutdown vis-server */
922 void batadv_vis_quit(struct batadv_priv *bat_priv)
923 {
924         if (!bat_priv->vis.hash)
925                 return;
926
927         cancel_delayed_work_sync(&bat_priv->vis.work);
928
929         spin_lock_bh(&bat_priv->vis.hash_lock);
930         /* properly remove, kill timers ... */
931         batadv_hash_delete(bat_priv->vis.hash, batadv_free_info_ref, NULL);
932         bat_priv->vis.hash = NULL;
933         bat_priv->vis.my_info = NULL;
934         spin_unlock_bh(&bat_priv->vis.hash_lock);
935 }