Merge remote-tracking branch 'origin/master' into ovn
[cascardo/ovs.git] / lib / ovs-lldp.c
1 /*
2  * Copyright (c) 2015 Nicira, Inc.
3  * Copyright (c) 2014 WindRiver, Inc.
4  * Copyright (c) 2015 Avaya, Inc.
5  *
6  * Licensed under the Apache License, Version 2.0 (the "License");
7  * you may not use this file except in compliance with the License.
8  * You may obtain a copy of the License at:
9  *
10  *     http://www.apache.org/licenses/LICENSE-2.0
11  *
12  * Unless required by applicable law or agreed to in writing, software
13  * distributed under the License is distributed on an "AS IS" BASIS,
14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15  * See the License for the specific language governing permissions and
16  * limitations under the License.
17  */
18
19 /* Implementation of Auto Attach.
20  * Based on sample implementation in 802.1ab.  Above copyright and license
21  * applies to all modifications.
22  * Limitations:
23  * - No support for multiple bridge.
24  * - Auto Attach state machine not implemented.
25  * - Auto Attach and LLDP code are bundled together.  The plan is to decoupled
26  *   them.
27  */
28
29 #include <config.h>
30 #include "ovs-lldp.h"
31 #include <arpa/inet.h>
32 #include <inttypes.h>
33 #include <netinet/in.h>
34 #include <stdbool.h>
35 #include <stdlib.h>
36 #include <sys/types.h>
37 #include "dynamic-string.h"
38 #include "flow.h"
39 #include "list.h"
40 #include "lldp/lldpd.h"
41 #include "lldp/lldpd-structs.h"
42 #include "netdev.h"
43 #include "openvswitch/types.h"
44 #include "packets.h"
45 #include "poll-loop.h"
46 #include "smap.h"
47 #include "unixctl.h"
48 #include "util.h"
49 #include "openvswitch/vlog.h"
50
51 VLOG_DEFINE_THIS_MODULE(ovs_lldp);
52
53 #define LLDP_PROTOCOL_ID        0x0000
54 #define LLDP_PROTOCOL_VERSION   0x00
55 #define LLDP_TYPE_CONFIG        0x00
56 #define LLDP_CHASSIS_TTL        120
57 #define ETH_TYPE_LLDP           0x88cc
58 #define MINIMUM_ETH_PACKET_SIZE 68
59
60 #define AA_STATUS_MULTIPLE \
61     AA_STATUS(ACTIVE,2,Active) \
62     AA_STATUS(REJECT_GENERIC,3,Reject (Generic)) \
63     AA_STATUS(REJECT_AA_RES_NOTAVAIL,4,Reject (AA resources unavailable)) \
64     AA_STATUS(REJECT_INVALID,6,Reject (Invalid)) \
65     AA_STATUS(REJECT_VLAN_RES_UNAVAIL,8,Reject (VLAN resources unavailable)) \
66     AA_STATUS(REJECT_VLAN_APP_ISSUE,9,Reject (Application interaction issue)) \
67     AA_STATUS(PENDING,255,Pending)
68
69 enum aa_status {
70 #define AA_STATUS(NAME, VALUE, STR) AA_STATUS_##NAME = VALUE,
71     AA_STATUS_MULTIPLE
72 #undef AA_STATUS
73     AA_STATUS_N_MULTIPLE
74 };
75
76 /* Internal structure for an Auto Attach mapping.
77  */
78 struct aa_mapping_internal {
79     struct hmap_node hmap_node_isid;
80     struct hmap_node hmap_node_aux;
81     uint32_t         isid;
82     uint16_t         vlan;
83     void             *aux;
84     enum aa_status   status;
85 };
86
87 static struct ovs_mutex mutex = OVS_MUTEX_INITIALIZER;
88
89 /* Hash map of all LLDP instances keyed by name (port at the moment).
90  */
91 static struct hmap all_lldps__ = HMAP_INITIALIZER(&all_lldps__);
92 static struct hmap *const all_lldps OVS_GUARDED_BY(mutex) = &all_lldps__;
93
94 /* Hash map of all the Auto Attach mappings.  Global at the moment (but will
95  * be per bridge).  Used when adding a new port to a bridge so that we can
96  * properly install all the configured mapping on the port and export them
97  * To the Auto Attach server via LLDP.
98  */
99 static struct hmap all_mappings__ = HMAP_INITIALIZER(&all_mappings__);
100 static struct hmap *const all_mappings OVS_GUARDED_BY(mutex) = &all_mappings__;
101
102 static struct lldp_aa_element_system_id system_id_null;
103
104 /* Convert an LLDP chassis ID to a string.
105  */
106 static void
107 chassisid_to_string(uint8_t *array, size_t len, char **str)
108 {
109     unsigned int i;
110
111     *str = xmalloc(len * 3);
112
113     for (i = 0; i < len; i++) {
114         snprintf(&(*str)[i * 3], 4, "%02x:", array[i]);
115     }
116     (*str)[(i * 3) - 1] = '\0';
117 }
118
119 /* Find an Auto Attach mapping keyed by I-SID.
120  */
121 static struct aa_mapping_internal *
122 mapping_find_by_isid(struct lldp *lldp, uint32_t isid)
123     OVS_REQUIRES(mutex)
124 {
125     struct aa_mapping_internal *m;
126
127     HMAP_FOR_EACH_IN_BUCKET (m, hmap_node_isid, hash_int(isid, 0),
128                              &lldp->mappings_by_isid) {
129         if (isid == m->isid) {
130             return m;
131         }
132     }
133
134     return NULL;
135 }
136
137 /* Find an Auto Attach mapping keyed by aux.  aux is an opaque pointer created
138  * by the bridge that refers to an OVSDB mapping record.
139  */
140 static struct aa_mapping_internal *
141 mapping_find_by_aux(struct lldp *lldp, const void *aux) OVS_REQUIRES(mutex)
142 {
143     struct aa_mapping_internal *m;
144
145     HMAP_FOR_EACH_IN_BUCKET (m, hmap_node_aux, hash_pointer(aux, 0),
146                              &lldp->mappings_by_aux) {
147         if (aux == m->aux) {
148             return m;
149         }
150     }
151
152     return NULL;
153 }
154
155 /* Convert an Auto Attach request status to a string.
156  */
157 static char *
158 aa_status_to_str(uint8_t status)
159 {
160     switch (status) {
161 #define AA_STATUS(NAME, VALUE, STR) case AA_STATUS_##NAME: return #STR;
162         AA_STATUS_MULTIPLE
163 #undef AA_STATUS
164         default: return "Undefined";
165     }
166 }
167
168 /* Display LLDP and Auto Attach statistics.
169  */
170 static void
171 aa_print_lldp_and_aa_stats(struct ds *ds, struct lldp *lldp)
172     OVS_REQUIRES(mutex)
173 {
174     struct lldpd_hardware *hw;
175
176     ds_put_format(ds, "Statistics: %s\n", lldp->name);
177
178     if (!lldp->lldpd) {
179         return;
180     }
181
182     LIST_FOR_EACH (hw, h_entries, &lldp->lldpd->g_hardware) {
183         ds_put_format(ds, "\ttx cnt: %"PRIu64"\n", hw->h_tx_cnt);
184         ds_put_format(ds, "\trx cnt: %"PRIu64"\n", hw->h_rx_cnt);
185         ds_put_format(ds, "\trx discarded cnt: %"PRIu64"\n",
186                       hw->h_rx_discarded_cnt);
187         ds_put_format(ds, "\trx unrecognized cnt: %"PRIu64"\n",
188                       hw->h_rx_unrecognized_cnt);
189         ds_put_format(ds, "\tageout cnt: %"PRIu64"\n", hw->h_ageout_cnt);
190         ds_put_format(ds, "\tinsert cnt: %"PRIu64"\n", hw->h_insert_cnt);
191         ds_put_format(ds, "\tdelete cnt: %"PRIu64"\n", hw->h_delete_cnt);
192         ds_put_format(ds, "\tdrop cnt: %"PRIu64"\n", hw->h_drop_cnt);
193     }
194 }
195
196 static void
197 aa_print_element_status_port(struct ds *ds, struct lldpd_hardware *hw)
198 {
199     struct lldpd_port *port;
200
201     LIST_FOR_EACH (port, p_entries, &hw->h_rports) {
202         if (memcmp(&port->p_element.system_id,
203                    &system_id_null,
204                    sizeof port->p_element.system_id)) {
205             static char *none_str = "<None>";
206             char *id = none_str, *descr = none_str, *system = none_str;
207
208             if (port->p_chassis) {
209                 if (port->p_chassis->c_id_len > 0) {
210                     chassisid_to_string(port->p_chassis->c_id,
211                                         port->p_chassis->c_id_len, &id);
212                 }
213
214                 descr = port->p_chassis->c_descr
215                     ? port->p_chassis->c_descr : none_str;
216             }
217
218             chassisid_to_string((uint8_t *) &port->p_element.system_id,
219                 sizeof port->p_element.system_id, &system);
220
221             ds_put_format(ds, "\tAuto Attach Primary Server Id: %s\n", id);
222             ds_put_format(ds, "\tAuto Attach Primary Server Descr: %s\n",
223                           descr);
224             ds_put_format(ds, "\tAuto Attach Primary Server System Id: %s\n",
225                           system);
226
227             free(id);
228             free(system);
229         }
230     }
231 }
232
233 /* Auto Attach server broadcast an LLDP message periodically.  Display
234  * the discovered server.
235  */
236 static void
237 aa_print_element_status(struct ds *ds, struct lldp *lldp) OVS_REQUIRES(mutex)
238 {
239     struct lldpd_hardware *hw;
240
241     ds_put_format(ds, "LLDP: %s\n", lldp->name);
242
243     if (!lldp->lldpd) {
244         return;
245     }
246
247     LIST_FOR_EACH (hw, h_entries, &lldp->lldpd->g_hardware) {
248         aa_print_element_status_port(ds, hw);
249     }
250 }
251
252 static void
253 aa_print_isid_status_port_isid(struct lldp *lldp, struct lldpd_port *port)
254     OVS_REQUIRES(mutex)
255 {
256     struct lldpd_aa_isid_vlan_maps_tlv *mapping;
257
258     if (list_is_empty(&port->p_isid_vlan_maps)) {
259         return;
260     }
261
262     LIST_FOR_EACH (mapping, m_entries, &port->p_isid_vlan_maps) {
263         uint32_t isid = mapping->isid_vlan_data.isid;
264         struct aa_mapping_internal *m = mapping_find_by_isid(lldp, isid);
265
266         VLOG_INFO("h_rport: isid=%u, vlan=%u, status=%d",
267                   isid,
268                   mapping->isid_vlan_data.vlan,
269                   mapping->isid_vlan_data.status);
270
271         /* Update the status of our internal state for the mapping. */
272         if (m) {
273             VLOG_INFO("Setting status for ISID=%"PRIu32" to %"PRIu16,
274                       isid, mapping->isid_vlan_data.status);
275             m->status = mapping->isid_vlan_data.status;
276         } else {
277             VLOG_WARN("Couldn't find mapping for I-SID=%"PRIu32, isid);
278         }
279     }
280 }
281
282 static void
283 aa_print_isid_status_port(struct lldp *lldp, struct lldpd_hardware *hw)
284     OVS_REQUIRES(mutex)
285 {
286     struct lldpd_port *port;
287
288     LIST_FOR_EACH (port, p_entries, &hw->h_rports) {
289         aa_print_isid_status_port_isid(lldp, port);
290     }
291 }
292
293 /* The Auto Attach server will broadcast the status of the configured mappings
294  * via LLDP.  Display the status.
295  */
296 static void
297 aa_print_isid_status(struct ds *ds, struct lldp *lldp) OVS_REQUIRES(mutex)
298 {
299     struct lldpd_hardware *hw;
300     struct aa_mapping_internal *m;
301
302     if (!lldp->lldpd) {
303         return;
304     }
305
306     ds_put_format(ds, "LLDP: %s\n", lldp->name);
307
308     LIST_FOR_EACH (hw, h_entries, &lldp->lldpd->g_hardware) {
309         aa_print_isid_status_port(lldp, hw);
310     }
311
312     ds_put_format(ds, "%-8s %-4s %-11s %-8s\n",
313                       "I-SID",
314                       "VLAN",
315                       "Source",
316                       "Status");
317     ds_put_format(ds, "-------- ---- ----------- --------\n");
318
319     HMAP_FOR_EACH (m, hmap_node_isid, &lldp->mappings_by_isid) {
320         ds_put_format(ds, "%-8"PRIu32" %-4"PRIu16" %-11s %-11s\n",
321                       m->isid, m->vlan, "Switch", aa_status_to_str(m->status));
322     }
323 }
324
325 static void
326 aa_unixctl_status(struct unixctl_conn *conn, int argc OVS_UNUSED,
327                   const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
328     OVS_EXCLUDED(mutex)
329 {
330     struct lldp *lldp;
331     struct ds ds = DS_EMPTY_INITIALIZER;
332
333     ovs_mutex_lock(&mutex);
334
335     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
336         aa_print_element_status(&ds, lldp);
337     }
338     unixctl_command_reply(conn, ds_cstr(&ds));
339     ds_destroy(&ds);
340
341     ovs_mutex_unlock(&mutex);
342 }
343
344 static void
345 aa_unixctl_show_isid(struct unixctl_conn *conn, int argc OVS_UNUSED,
346                      const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
347     OVS_EXCLUDED(mutex)
348 {
349     struct lldp *lldp;
350     struct ds ds = DS_EMPTY_INITIALIZER;
351
352     ovs_mutex_lock(&mutex);
353
354     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
355         aa_print_isid_status(&ds, lldp);
356     }
357     unixctl_command_reply(conn, ds_cstr(&ds));
358     ds_destroy(&ds);
359
360     ovs_mutex_unlock(&mutex);
361 }
362
363 static void
364 aa_unixctl_statistics(struct unixctl_conn *conn, int argc OVS_UNUSED,
365                       const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
366     OVS_EXCLUDED(mutex)
367 {
368     struct ds ds = DS_EMPTY_INITIALIZER;
369     struct lldp *lldp;
370
371     ovs_mutex_lock(&mutex);
372
373     /* Cycle through all ports and dump the stats for each one */
374     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
375         aa_print_lldp_and_aa_stats(&ds, lldp);
376     }
377
378     ovs_mutex_unlock(&mutex);
379
380     unixctl_command_reply(conn, ds_cstr(&ds));
381 }
382
383 /* An Auto Attach mapping was configured.  Populate the corresponding
384  * structures in the LLDP hardware.
385  */
386 static void
387 update_mapping_on_lldp(struct lldp *lldp, struct lldpd_hardware *hardware,
388                        struct aa_mapping_internal *m)
389 {
390     struct lldpd_aa_isid_vlan_maps_tlv *lm = xzalloc(sizeof *lm);
391
392     if (hardware->h_ifname) {
393         VLOG_INFO("\t\t hardware->h_ifname=%s", hardware->h_ifname);
394     }
395
396     lm->isid_vlan_data.isid = m->isid;
397     lm->isid_vlan_data.vlan = m->vlan;
398
399     list_push_back(&hardware->h_lport.p_isid_vlan_maps, &lm->m_entries);
400
401     /* TODO Should be done in the Auto Attach state machine when a mapping goes
402      * from "pending" to "active".
403      */
404     struct bridge_aa_vlan *node = xmalloc(sizeof *node);
405
406     node->port_name = xstrdup(hardware->h_ifname);
407     node->vlan = m->vlan;
408     node->oper = BRIDGE_AA_VLAN_OPER_ADD;
409
410     list_push_back(&lldp->active_mapping_queue, &node->list_node);
411 }
412
413 /* Bridge will poll the list of VLAN that needs to be auto configure based on
414  * the Auto Attach mappings that have been exchanged with the server.
415  */
416 int
417 aa_get_vlan_queued(struct ovs_list *list)
418 {
419     struct lldp *lldp;
420
421     ovs_mutex_lock(&mutex);
422
423     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
424         struct bridge_aa_vlan *node;
425
426         LIST_FOR_EACH_POP (node, list_node, &lldp->active_mapping_queue) {
427             struct bridge_aa_vlan *copy;
428
429             copy = xmalloc(sizeof *copy);
430             copy->port_name = xstrdup(node->port_name);
431             copy->vlan = node->vlan;
432             copy->oper = node->oper;
433
434             list_push_back(list, &copy->list_node);
435
436             /* Cleanup */
437             free(node->port_name);
438             free(node);
439         }
440     }
441
442     ovs_mutex_unlock(&mutex);
443
444     return 0;
445 }
446
447 /* Bridge will poll whether or not VLAN have been auto-configured.
448  */
449 unsigned int
450 aa_get_vlan_queue_size(void)
451 {
452     struct lldp *lldp;
453     unsigned int size = 0;
454
455     ovs_mutex_lock(&mutex);
456
457     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
458         size += list_size(&lldp->active_mapping_queue);
459     }
460
461     ovs_mutex_unlock(&mutex);
462
463     return size;
464 }
465
466 /* Configure Auto Attach.
467  */
468 int
469 aa_configure(const struct aa_settings *s)
470 {
471     struct lldp *lldp;
472
473     ovs_mutex_lock(&mutex);
474
475     /* TODO Change all instances for now */
476     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
477         struct lldpd_chassis *chassis;
478
479         LIST_FOR_EACH (chassis, list, &lldp->lldpd->g_chassis) {
480             /* System Description */
481             free(chassis->c_descr);
482             chassis->c_descr = s && s->system_description[0] ?
483                 xstrdup(s->system_description) : xstrdup(PACKAGE_STRING);
484
485             /* System Name */
486             if (s) {
487                 free(chassis->c_name);
488                 chassis->c_name = xstrdup(s->system_name);
489             }
490         }
491     }
492
493     ovs_mutex_unlock(&mutex);
494
495     return 0;
496 }
497
498 /* Add a new Auto Attach mapping.
499  */
500 int
501 aa_mapping_register(void *aux, const struct aa_mapping_settings *s)
502 {
503     struct aa_mapping_internal *bridge_m;
504     struct lldp *lldp;
505
506     VLOG_INFO("Adding mapping ISID=%"PRIu32", VLAN=%"PRIu16", aux=%p",
507               s->isid, s->vlan, aux);
508
509     ovs_mutex_lock(&mutex);
510
511     /* TODO These mappings should be stores per bridge.  This is used
512      * When a port is added.  Auto Attach mappings need to be added on this
513      * port.
514      */
515     bridge_m = xzalloc(sizeof *bridge_m);
516     bridge_m->isid = s->isid;
517     bridge_m->vlan = s->vlan;
518     bridge_m->aux = aux;
519     bridge_m->status = AA_STATUS_PENDING;
520     hmap_insert(all_mappings, &bridge_m->hmap_node_isid,
521                 hash_int(bridge_m->isid, 0));
522
523
524     /* Update mapping on the all the LLDP instances. */
525     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
526         struct lldpd_hardware *hw;
527         struct aa_mapping_internal *m;
528
529         VLOG_INFO("\t lldp->name=%s", lldp->name);
530
531         if (mapping_find_by_isid(lldp, s->isid)) {
532             continue;
533         }
534
535         m = xzalloc(sizeof *m);
536         m->isid = s->isid;
537         m->vlan = s->vlan;
538         m->status = AA_STATUS_PENDING;
539         m->aux = aux;
540         hmap_insert(&lldp->mappings_by_isid, &m->hmap_node_isid,
541                     hash_int(m->isid, 0));
542         hmap_insert(&lldp->mappings_by_aux,
543                     &m->hmap_node_aux,
544                     hash_pointer(m->aux, 0));
545
546         /* Configure the mapping on each port of the LLDP stack. */
547         LIST_FOR_EACH (hw, h_entries, &lldp->lldpd->g_hardware) {
548             update_mapping_on_lldp(lldp, hw, m);
549         }
550     }
551
552     ovs_mutex_unlock(&mutex);
553
554     return 0;
555 }
556
557 static void
558 aa_mapping_unregister_mapping(struct lldp *lldp,
559                               struct lldpd_hardware *hw,
560                               struct aa_mapping_internal *m)
561 {
562     struct lldpd_aa_isid_vlan_maps_tlv *lm, *lm_next;
563
564     LIST_FOR_EACH_SAFE (lm, lm_next, m_entries,
565                         &hw->h_lport.p_isid_vlan_maps) {
566         uint32_t isid = lm->isid_vlan_data.isid;
567
568         if (isid == m->isid) {
569             VLOG_INFO("\t\t Removing lport, isid=%u, vlan=%u",
570                       isid,
571                       lm->isid_vlan_data.vlan);
572
573             list_remove(&lm->m_entries);
574
575             /* TODO Should be done in the AA SM when a mapping goes
576              * from "pending" to "active".
577              */
578             struct bridge_aa_vlan *node = xmalloc(sizeof *node);
579
580             node->port_name = xstrdup(hw->h_ifname);
581             node->vlan = m->vlan;
582             node->oper = BRIDGE_AA_VLAN_OPER_REMOVE;
583
584             list_push_back(&lldp->active_mapping_queue, &node->list_node);
585
586             break;
587         }
588     }
589 }
590
591 /* Remove an existing Auto Attach mapping.
592  */
593 int
594 aa_mapping_unregister(void *aux)
595 {
596     struct lldp *lldp;
597
598     VLOG_INFO("Removing mapping aux=%p", aux);
599
600     ovs_mutex_lock(&mutex);
601
602     HMAP_FOR_EACH (lldp, hmap_node, all_lldps) {
603         struct lldpd_hardware *hw;
604         struct aa_mapping_internal *m = mapping_find_by_aux(lldp, aux);
605
606         /* Remove from internal hash tables. */
607         if (m) {
608             uint32_t isid = m->isid;
609             uint16_t vlan = m->vlan;
610             struct aa_mapping_internal *p = mapping_find_by_isid(lldp, isid);
611
612             VLOG_INFO("\t Removing mapping ISID=%"PRIu32", VLAN=%"PRIu16
613                       " (lldp->name=%s)", isid, vlan, lldp->name);
614
615             if (p) {
616                 hmap_remove(&lldp->mappings_by_isid, &p->hmap_node_isid);
617             }
618
619             hmap_remove(&lldp->mappings_by_aux, &m->hmap_node_aux);
620             free(m);
621
622             /* Remove from all the lldp instances */
623             LIST_FOR_EACH (hw, h_entries, &lldp->lldpd->g_hardware) {
624                 if (hw->h_ifname) {
625                     VLOG_INFO("\t\t hardware->h_ifname=%s", hw->h_ifname);
626                 }
627
628                 aa_mapping_unregister_mapping(lldp, hw, m);
629             }
630
631             /* Remove from the all_mappings */
632             HMAP_FOR_EACH (m, hmap_node_isid, all_mappings) {
633                 if (m && isid == m->isid && vlan == m->vlan) {
634                     hmap_remove(all_mappings, &m->hmap_node_isid);
635                     break;
636                 }
637             }
638         }
639     }
640
641     ovs_mutex_unlock(&mutex);
642
643     return 0;
644 }
645
646 void
647 lldp_init(void)
648 {
649     unixctl_command_register("autoattach/status", "[bridge]", 0, 1,
650                              aa_unixctl_status, NULL);
651     unixctl_command_register("autoattach/show-isid", "[bridge]", 0, 1,
652                              aa_unixctl_show_isid, NULL);
653     unixctl_command_register("autoattach/statistics", "[bridge]", 0, 1,
654                              aa_unixctl_statistics, NULL);
655 }
656
657 /* Returns true if 'lldp' should process packets from 'flow'.  Sets
658  * fields in 'wc' that were used to make the determination.
659  */
660 bool
661 lldp_should_process_flow(const struct flow *flow)
662 {
663     return (flow->dl_type == htons(ETH_TYPE_LLDP));
664 }
665
666
667 /* Process an LLDP packet that was received on a bridge port.
668  */
669 void
670 lldp_process_packet(struct lldp *lldp, const struct dp_packet *p)
671 {
672     if (lldp) {
673         lldpd_recv(lldp->lldpd, lldpd_first_hardware(lldp->lldpd),
674                    (char *) dp_packet_data(p), dp_packet_size(p));
675     }
676 }
677
678 /* This code is called periodically to check if the LLDP module has an LLDP
679  * message it wishes to send.  It is called several times every second.
680  */
681 bool
682 lldp_should_send_packet(struct lldp *cfg) OVS_EXCLUDED(mutex)
683 {
684     bool ret;
685
686     ovs_mutex_lock(&mutex);
687     ret = timer_expired(&cfg->tx_timer);
688     ovs_mutex_unlock(&mutex);
689
690     return ret;
691 }
692
693 /* Returns the next wake up time.
694  */
695 long long int
696 lldp_wake_time(const struct lldp *lldp) OVS_EXCLUDED(mutex)
697 {
698     long long int retval;
699
700     if (!lldp) {
701         return LLONG_MAX;
702     }
703
704     ovs_mutex_lock(&mutex);
705     retval = lldp->tx_timer.t;
706     ovs_mutex_unlock(&mutex);
707
708     return retval;
709 }
710
711 /* Put the monitor thread to sleep until it's next wake time.
712  */
713 long long int
714 lldp_wait(struct lldp *lldp) OVS_EXCLUDED(mutex)
715 {
716     long long int wake_time = lldp_wake_time(lldp);
717     poll_timer_wait_until(wake_time);
718     return wake_time;
719 }
720
721 /* Prepare the LLDP packet to be sent on a bridge port.
722  */
723 void
724 lldp_put_packet(struct lldp *lldp, struct dp_packet *packet,
725                 uint8_t eth_src[ETH_ADDR_LEN]) OVS_EXCLUDED(mutex)
726 {
727     struct lldpd *mylldpd = lldp->lldpd;
728     struct lldpd_hardware *hw = lldpd_first_hardware(mylldpd);
729     uint32_t lldp_size = 0;
730     static const uint8_t eth_addr_lldp[6] =
731         {0x01, 0x80, 0xC2, 0x00, 0x00, 0x0e};
732
733     ovs_mutex_lock(&mutex);
734
735     eth_compose(packet, eth_addr_lldp, eth_src, ETH_TYPE_LLDP, 0);
736
737     lldp_size = lldpd_send(hw, packet);
738     if (lldp_size + ETH_HEADER_LEN < MINIMUM_ETH_PACKET_SIZE) {
739         lldp_size = MINIMUM_ETH_PACKET_SIZE;
740     }
741
742     timer_set_duration(&lldp->tx_timer, lldp->lldpd->g_config.c_tx_interval);
743     ovs_mutex_unlock(&mutex);
744 }
745
746 /* Configures the LLDP stack.
747  */
748 bool
749 lldp_configure(struct lldp *lldp) OVS_EXCLUDED(mutex)
750 {
751     if (lldp) {
752         ovs_mutex_lock(&mutex);
753         timer_set_expired(&lldp->tx_timer);
754         timer_set_duration(&lldp->tx_timer, LLDP_DEFAULT_TRANSMIT_INTERVAL_MS);
755         lldp->lldpd->g_config.c_tx_interval =
756             LLDP_DEFAULT_TRANSMIT_INTERVAL_MS;
757         ovs_mutex_unlock(&mutex);
758     }
759
760     return true;
761 }
762
763 /* Create an LLDP stack instance.  At the moment there is one per bridge port.
764  */
765 struct lldp *
766 lldp_create(const struct netdev *netdev,
767             const uint32_t mtu,
768             const struct smap *cfg) OVS_EXCLUDED(mutex)
769 {
770     struct lldp *lldp;
771     struct lldpd_chassis *lchassis;
772     struct lldpd_hardware *hw;
773     struct aa_mapping_internal *m;
774
775     if (!cfg || !smap_get_bool(cfg, "enable", false)) {
776         return NULL;
777     }
778
779     lldp = xzalloc(sizeof *lldp);
780     lldp->name = xstrdup(netdev_get_name(netdev));
781     lldp->lldpd = xzalloc(sizeof *lldp->lldpd);
782
783     hmap_init(&lldp->mappings_by_isid);
784     hmap_init(&lldp->mappings_by_aux);
785     list_init(&lldp->active_mapping_queue);
786
787     lchassis = xzalloc(sizeof *lchassis);
788     lchassis->c_cap_available = LLDP_CAP_BRIDGE;
789     lchassis->c_cap_enabled = LLDP_CAP_BRIDGE;
790     lchassis->c_id_subtype = LLDP_CHASSISID_SUBTYPE_LLADDR;
791     lchassis->c_id_len = ETH_ADDR_LEN;
792     lchassis->c_id = xmalloc(ETH_ADDR_LEN);
793     netdev_get_etheraddr(netdev, lchassis->c_id);
794
795     list_init(&lchassis->c_mgmt);
796     lchassis->c_ttl = lldp->lldpd->g_config.c_tx_interval *
797                       lldp->lldpd->g_config.c_tx_hold;
798     lchassis->c_ttl = LLDP_CHASSIS_TTL;
799     lldpd_assign_cfg_to_protocols(lldp->lldpd);
800     list_init(&lldp->lldpd->g_chassis);
801     list_push_back(&lldp->lldpd->g_chassis, &lchassis->list);
802
803     if ((hw = lldpd_alloc_hardware(lldp->lldpd,
804                                    (char *) netdev_get_name(netdev),
805                                    0)) == NULL) {
806         VLOG_WARN("Unable to allocate space for %s",
807                   (char *) netdev_get_name(netdev));
808         out_of_memory();
809     }
810
811     ovs_refcount_init(&lldp->ref_cnt);
812 #ifndef _WIN32
813     hw->h_flags |= IFF_RUNNING;
814 #endif
815     hw->h_mtu = mtu;
816     hw->h_lport.p_id_subtype = LLDP_PORTID_SUBTYPE_IFNAME;
817     hw->h_lport.p_id = xstrdup(netdev_get_name(netdev));
818
819     /* p_id is not necessarily a null terminated string. */
820     hw->h_lport.p_id_len = strlen(netdev_get_name(netdev));
821
822     /* Auto Attach element tlv */
823     hw->h_lport.p_element.type = LLDP_TLV_AA_ELEM_TYPE_CLIENT_VIRTUAL_SWITCH;
824     hw->h_lport.p_element.mgmt_vlan = 0;
825     memcpy(&hw->h_lport.p_element.system_id.system_mac,
826            lchassis->c_id, lchassis->c_id_len);
827     hw->h_lport.p_element.system_id.conn_type =
828         LLDP_TLV_AA_ELEM_CONN_TYPE_SINGLE;
829     hw->h_lport.p_element.system_id.rsvd = 0;
830     hw->h_lport.p_element.system_id.rsvd2[0] = 0;
831     hw->h_lport.p_element.system_id.rsvd2[1] = 0;
832
833     list_init(&hw->h_lport.p_isid_vlan_maps);
834     list_init(&lldp->lldpd->g_hardware);
835     list_push_back(&lldp->lldpd->g_hardware, &hw->h_entries);
836
837     ovs_mutex_lock(&mutex);
838
839     /* Update port with Auto Attach mappings configured. */
840     HMAP_FOR_EACH (m, hmap_node_isid, all_mappings) {
841         struct aa_mapping_internal *p;
842
843         if (mapping_find_by_isid(lldp, m->isid)) {
844             continue;
845         }
846
847         p = xmemdup(m, sizeof *p);
848         hmap_insert(&lldp->mappings_by_isid, &p->hmap_node_isid,
849                     hash_int(p->isid, 0));
850         hmap_insert(&lldp->mappings_by_aux,
851                     &p->hmap_node_aux,
852                     hash_pointer(p->aux, 0));
853
854         update_mapping_on_lldp(lldp, hw, p);
855     }
856
857     hmap_insert(all_lldps, &lldp->hmap_node,
858                 hash_string(netdev_get_name(netdev), 0));
859
860     ovs_mutex_unlock(&mutex);
861
862     return lldp;
863 }
864
865
866 struct lldp *
867 lldp_create_dummy(void)
868 {
869     struct lldp *lldp;
870     struct lldpd_chassis *lchassis;
871     struct lldpd_hardware *hw;
872
873     lldp = xzalloc(sizeof *lldp);
874     lldp->name = "dummy-lldp";
875     lldp->lldpd = xzalloc(sizeof *lldp->lldpd);
876
877     hmap_init(&lldp->mappings_by_isid);
878     hmap_init(&lldp->mappings_by_aux);
879     list_init(&lldp->active_mapping_queue);
880
881     lchassis = xzalloc(sizeof *lchassis);
882     lchassis->c_cap_available = LLDP_CAP_BRIDGE;
883     lchassis->c_cap_enabled = LLDP_CAP_BRIDGE;
884     lchassis->c_id_subtype = LLDP_CHASSISID_SUBTYPE_LLADDR;
885     lchassis->c_id_len = ETH_ADDR_LEN;
886     lchassis->c_id = xmalloc(ETH_ADDR_LEN);
887
888     list_init(&lchassis->c_mgmt);
889     lchassis->c_ttl = LLDP_CHASSIS_TTL;
890     lldpd_assign_cfg_to_protocols(lldp->lldpd);
891     list_init(&lldp->lldpd->g_chassis);
892     list_push_back(&lldp->lldpd->g_chassis, &lchassis->list);
893
894     hw = lldpd_alloc_hardware(lldp->lldpd, "dummy-hw", 0);
895
896     ovs_refcount_init(&lldp->ref_cnt);
897 #ifndef _WIN32
898     hw->h_flags |= IFF_RUNNING;
899 #endif
900     hw->h_mtu = 1500;
901     hw->h_lport.p_id_subtype = LLDP_PORTID_SUBTYPE_IFNAME;
902     hw->h_lport.p_id = "dummy-port";
903
904     /* p_id is not necessarily a null terminated string. */
905     hw->h_lport.p_id_len = strlen(hw->h_lport.p_id);
906
907     /* Auto Attach element tlv */
908     hw->h_lport.p_element.type = LLDP_TLV_AA_ELEM_TYPE_CLIENT_VIRTUAL_SWITCH;
909     hw->h_lport.p_element.mgmt_vlan = 0;
910     memcpy(&hw->h_lport.p_element.system_id.system_mac,
911            lchassis->c_id, lchassis->c_id_len);
912     hw->h_lport.p_element.system_id.conn_type =
913         LLDP_TLV_AA_ELEM_CONN_TYPE_SINGLE;
914     hw->h_lport.p_element.system_id.rsvd = 0;
915     hw->h_lport.p_element.system_id.rsvd2[0] = 0;
916     hw->h_lport.p_element.system_id.rsvd2[1] = 0;
917
918     list_init(&hw->h_lport.p_isid_vlan_maps);
919     list_init(&lldp->lldpd->g_hardware);
920     list_push_back(&lldp->lldpd->g_hardware, &hw->h_entries);
921
922     return lldp;
923 }
924
925 /* Unreference a specific LLDP instance.
926  */
927 void
928 lldp_unref(struct lldp *lldp)
929 {
930     if (!lldp) {
931         return;
932     }
933
934     ovs_mutex_lock(&mutex);
935     if (ovs_refcount_unref_relaxed(&lldp->ref_cnt) != 1) {
936         ovs_mutex_unlock(&mutex);
937         return;
938     }
939
940     hmap_remove(all_lldps, &lldp->hmap_node);
941     ovs_mutex_unlock(&mutex);
942
943     lldpd_cleanup(lldp->lldpd);
944     free(lldp->lldpd);
945     free(lldp->name);
946     free(lldp);
947 }
948
949 /* Unreference a specific LLDP instance.
950  */
951 struct lldp *
952 lldp_ref(const struct lldp *lldp_)
953 {
954     struct lldp *lldp = CONST_CAST(struct lldp *, lldp_);
955     if (lldp) {
956         ovs_refcount_ref(&lldp->ref_cnt);
957     }
958     return lldp;
959 }