summaryrefslogtreecommitdiffstats
path: root/src/vppinfra/dlist.h
blob: e445b39f336aeecb12954f867a713b4033eb8c02 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
/*
 * Copyright (c) 2016 Cisco and/or its affiliates.
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 *
 * You may obtain a copy of the License at:
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
*/

#ifndef included_dlist_h
#define included_dlist_h

#include <stdarg.h>
#include <vppinfra/clib.h>
#include <vppinfra/vec.h>
#include <vppinfra/pool.h>
#include <vppinfra/error.h>
#include <vppinfra/format.h>
#include <vppinfra/cache.h>

typedef struct
{
  u32 next;
  u32 prev;
  u32 value;
} dlist_elt_t;

static inline void
clib_dlist_init (dlist_elt_t * pool, u32 index)
{
  dlist_elt_t *head = pool_elt_at_index (pool, index);
  memset (head, 0xFF, sizeof (*head));
}

static inline void
clib_dlist_addtail (dlist_elt_t * pool, u32 head_index, u32 new_index)
{
  dlist_elt_t *head = pool_elt_at_index (pool, head_index);
  u32 old_last_index;
  dlist_elt_t *old_last;
  dlist_elt_t *new;

  ASSERT (head->value == ~0);

  new = pool_elt_at_index (pool, new_index);

  if (PREDICT_FALSE (head->next == ~0))
    {
      head->next = head->prev = new_index;
      new->next = new->prev = head_index;
      return;
    }

  old_last_index = head->prev;
  old_last = pool_elt_at_index (pool, old_last_index);

  new->next = old_last->next;
  new->prev = old_last_index;
  old_last->next = new_index;
  head->prev = new_index;
}

static inline void
clib_dlist_addhead (dlist_elt_t * pool, u32 head_index, u32 new_index)
{
  dlist_elt_t *head = pool_elt_at_index (pool, head_index);
  dlist_elt_t *old_first;
  u32 old_first_index;
  dlist_elt_t *new;

  ASSERT (head->value == ~0);

  new = pool_elt_at_index (pool, new_index);

  if (PREDICT_FALSE (head->next == ~0))
    {
      head->next = head->prev = new_index;
      new->next = new->prev = head_index;
      return;
    }

  old_first_index = head->next;
  old_first = pool_elt_at_index (pool, old_first_index);

  new->next = old_first_index;
  new->prev = old_first->prev;
  old_first->prev = new_index;
  head->next = new_index;
}

static inline void
clib_dlist_remove (dlist_elt_t * pool, u32 index)
{
  dlist_elt_t *elt = pool_elt_at_index (pool, index);
  dlist_elt_t *next_elt, *prev_elt;

  /* listhead, not so much */
  ASSERT (elt->value != ~0);

  next_elt = pool_elt_at_index (pool, elt->next);
  prev_elt = pool_elt_at_index (pool, elt->prev);

  next_elt->prev = elt->prev;
  prev_elt->next = elt->next;

  elt->prev = elt->next = ~0;
}

static inline u32
clib_dlist_remove_head (dlist_elt_t * pool, u32 head_index)
{
  dlist_elt_t *head = pool_elt_at_index (pool, head_index);
  u32 rv;

  ASSERT (head->value == ~0);

  if (head->next == ~0 || (head->next == head_index))
    return ~0;

  rv = head->next;
  clib_dlist_remove (pool, rv);
  return rv;
}

static inline u32
clib_dlist_remove_tail (dlist_elt_t * pool, u32 head_index)
{
  dlist_elt_t *head = pool_elt_at_index (pool, head_index);
  u32 rv;

  ASSERT (head->value == ~0);

  if (head->prev == ~0)
    return ~0;

  rv = head->prev;
  clib_dlist_remove (pool, rv);
  return rv;
}

#endif /* included_dlist_h */

/*
 * fd.io coding-style-patch-verification: ON
 *
 * Local Variables:
 * eval: (c-set-style "gnu")
 * End:
 */
l_noop_handler /* instantiate all the print functions we know about */ #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__) #define vl_printfun #include <vnet/vnet_all_api_h.h> #undef vl_printfun #include <vlibapi/api_helper_macros.h> #define foreach_vpe_api_msg \ _(L2_XCONNECT_DUMP, l2_xconnect_dump) \ _(L2_FIB_CLEAR_TABLE, l2_fib_clear_table) \ _(L2_FIB_TABLE_DUMP, l2_fib_table_dump) \ _(L2FIB_FLUSH_ALL, l2fib_flush_all) \ _(L2FIB_FLUSH_INT, l2fib_flush_int) \ _(L2FIB_FLUSH_BD, l2fib_flush_bd) \ _(L2FIB_ADD_DEL, l2fib_add_del) \ _(L2_FLAGS, l2_flags) \ _(BRIDGE_DOMAIN_ADD_DEL, bridge_domain_add_del) \ _(BRIDGE_DOMAIN_DUMP, bridge_domain_dump) \ _(BRIDGE_FLAGS, bridge_flags) \ _(L2_INTERFACE_VLAN_TAG_REWRITE, l2_interface_vlan_tag_rewrite) \ _(L2_INTERFACE_PBB_TAG_REWRITE, l2_interface_pbb_tag_rewrite) \ _(BRIDGE_DOMAIN_SET_MAC_AGE, bridge_domain_set_mac_age) static void send_l2_xconnect_details (unix_shared_memory_queue_t * q, u32 context, u32 rx_sw_if_index, u32 tx_sw_if_index) { vl_api_l2_xconnect_details_t *mp; mp = vl_msg_api_alloc (sizeof (*mp)); memset (mp, 0, sizeof (*mp)); mp->_vl_msg_id = ntohs (VL_API_L2_XCONNECT_DETAILS); mp->context = context; mp->rx_sw_if_index = htonl (rx_sw_if_index); mp->tx_sw_if_index = htonl (tx_sw_if_index); vl_msg_api_send_shmem (q, (u8 *) & mp); } static void vl_api_l2_xconnect_dump_t_handler (vl_api_l2_xconnect_dump_t * mp) { unix_shared_memory_queue_t *q; vnet_main_t *vnm = vnet_get_main (); vnet_interface_main_t *im = &vnm->interface_main; l2input_main_t *l2im = &l2input_main; vnet_sw_interface_t *swif; l2_input_config_t *config; q = vl_api_client_index_to_input_queue (mp->client_index); if (q == 0) return; /* *INDENT-OFF* */ pool_foreach (swif, im->sw_interfaces, ({ config = vec_elt_at_index (l2im->configs, swif->sw_if_index); if (config->xconnect) send_l2_xconnect_details (q, mp->context, swif->sw_if_index, config->output_sw_if_index); })); /* *INDENT-ON* */ } static void vl_api_l2_fib_clear_table_t_handler (vl_api_l2_fib_clear_table_t * mp) { int rv = 0; vl_api_l2_fib_clear_table_reply_t *rmp; /* Clear all MACs including static MACs */ l2fib_clear_table (); REPLY_MACRO (VL_API_L2_FIB_CLEAR_TABLE_REPLY); } static void send_l2fib_table_entry (vpe_api_main_t * am, unix_shared_memory_queue_t * q, l2fib_entry_key_t * l2fe_key, l2fib_entry_result_t * l2fe_res, u32 context) { vl_api_l2_fib_table_details_t *mp; mp = vl_msg_api_alloc (sizeof (*mp)); memset (mp, 0, sizeof (*mp)); mp->_vl_msg_id = ntohs (VL_API_L2_FIB_TABLE_DETAILS); mp->bd_id = ntohl (l2input_main.bd_configs[l2fe_key->fields.bd_index].bd_id); mp->mac = l2fib_make_key (l2fe_key->fields.mac, 0); mp->sw_if_index = ntohl (l2fe_res->fields.sw_if_index); mp->static_mac = l2fe_res->fields.static_mac; mp->filter_mac = l2fe_res->fields.filter; mp->bvi_mac = l2fe_res->fields.bvi; mp->context = context; vl_msg_api_send_shmem (q, (u8 *) & mp); } static void vl_api_l2_fib_table_dump_t_handler (vl_api_l2_fib_table_dump_t * mp) { vpe_api_main_t *am = &vpe_api_main; bd_main_t *bdm = &bd_main; l2fib_entry_key_t *l2fe_key = NULL; l2fib_entry_result_t *l2fe_res = NULL; u32 ni, bd_id = ntohl (mp->bd_id); u32 bd_index; unix_shared_memory_queue_t *q; uword *p; q = vl_api_client_index_to_input_queue (mp->client_index); if (q == 0) return; /* see l2fib_table_dump: ~0 means "any" */ if (bd_id == ~0) bd_index = ~0; else { p = hash_get (bdm->bd_index_by_bd_id, bd_id); if (p == 0) return; bd_index = p[0]; } l2fib_table_dump (bd_index, &l2fe_key, &l2fe_res); vec_foreach_index (ni, l2fe_key) { send_l2fib_table_entry (am, q, vec_elt_at_index (l2fe_key, ni), vec_elt_at_index (l2fe_res, ni), mp->context); } vec_free (l2fe_key); vec_free (l2fe_res); } static void vl_api_l2fib_add_del_t_handler (vl_api_l2fib_add_del_t * mp) { bd_main_t *bdm = &bd_main; l2input_main_t *l2im = &l2input_main; vl_api_l2fib_add_del_reply_t *rmp; int rv = 0; u64 mac = 0; u32 sw_if_index = ntohl (mp->sw_if_index); u32 bd_id = ntohl (mp->bd_id); u32 bd_index; u32 static_mac; u32 filter_mac; u32 bvi_mac; uword *p; mac = mp->mac; p = hash_get (bdm->bd_index_by_bd_id, bd_id); if (!p) { rv = VNET_API_ERROR_NO_SUCH_ENTRY; goto bad_sw_if_index; } bd_index = p[0]; if (mp->is_add) { filter_mac = mp->filter_mac ? 1 : 0; if (filter_mac == 0) { VALIDATE_SW_IF_INDEX (mp); if (vec_len (l2im->configs) <= sw_if_index) { rv = VNET_API_ERROR_INVALID_SW_IF_INDEX; goto bad_sw_if_index; } else { l2_input_config_t *config; config = vec_elt_at_index (l2im->configs, sw_if_index); if (config->bridge == 0) { rv = VNET_API_ERROR_INVALID_SW_IF_INDEX; goto bad_sw_if_index; } } } static_mac = mp->static_mac ? 1 : 0; bvi_mac = mp->bvi_mac ? 1 : 0; l2fib_add_entry (mac, bd_index, sw_if_index, static_mac, filter_mac, bvi_mac); } else { l2fib_del_entry (mac, bd_index); } BAD_SW_IF_INDEX_LABEL; REPLY_MACRO (VL_API_L2FIB_ADD_DEL_REPLY); } static void vl_api_l2fib_flush_int_t_handler (vl_api_l2fib_flush_int_t * mp) { int rv = 0; vlib_main_t *vm = vlib_get_main (); vl_api_l2fib_flush_int_reply_t *rmp; VALIDATE_SW_IF_INDEX (mp); u32 sw_if_index = ntohl (mp->sw_if_index); l2fib_flush_int_mac (vm, sw_if_index); BAD_SW_IF_INDEX_LABEL; REPLY_MACRO (VL_API_L2FIB_FLUSH_INT_REPLY); } static void vl_api_l2fib_flush_all_t_handler (vl_api_l2fib_flush_all_t * mp) { int rv = 0; vl_api_l2fib_flush_all_reply_t *rmp; l2fib_flush_all_mac (vlib_get_main ()); REPLY_MACRO (VL_API_L2FIB_FLUSH_ALL_REPLY); } static void vl_api_l2fib_flush_bd_t_handler (vl_api_l2fib_flush_bd_t * mp) { int rv = 0; vlib_main_t *vm = vlib_get_main (); bd_main_t *bdm = &bd_main; vl_api_l2fib_flush_bd_reply_t *rmp; u32 bd_id = ntohl (mp->bd_id); uword *p = hash_get (bdm->bd_index_by_bd_id, bd_id); if (p == 0) { rv = VNET_API_ERROR_NO_SUCH_ENTRY; goto out; } l2fib_flush_bd_mac (vm, *p); out: REPLY_MACRO (VL_API_L2FIB_FLUSH_BD_REPLY); } static void vl_api_l2_flags_t_handler (vl_api_l2_flags_t * mp) { vl_api_l2_flags_reply_t *rmp; int rv = 0; u32 rbm = 0; VALIDATE_SW_IF_INDEX (mp); u32 sw_if_index = ntohl (mp->sw_if_index); u32 flags = ntohl (mp->feature_bitmap) & L2INPUT_VALID_MASK; rbm = l2input_intf_bitmap_enable (sw_if_index, flags, mp->is_set); BAD_SW_IF_INDEX_LABEL; /* *INDENT-OFF* */ REPLY_MACRO2(VL_API_L2_FLAGS_REPLY, ({ rmp->resulting_feature_bitmap = ntohl(rbm); })); /* *INDENT-ON* */ } static void vl_api_bridge_domain_set_mac_age_t_handler (vl_api_bridge_domain_set_mac_age_t * mp) { vlib_main_t *vm = vlib_get_main (); bd_main_t *bdm = &bd_main; vl_api_bridge_domain_set_mac_age_reply_t *rmp; int rv = 0; u32 bd_id = ntohl (mp->bd_id); uword *p; if (bd_id == 0) { rv = VNET_API_ERROR_BD_NOT_MODIFIABLE; goto out; } p = hash_get (bdm->bd_index_by_bd_id, bd_id); if (p == 0) { rv = VNET_API_ERROR_NO_SUCH_ENTRY; goto out; } bd_set_mac_age (vm, *p, mp->mac_age); out: REPLY_MACRO (VL_API_BRIDGE_DOMAIN_SET_MAC_AGE_REPLY); } static void vl_api_bridge_domain_add_del_t_handler (vl_api_bridge_domain_add_del_t * mp) { l2_bridge_domain_add_del_args_t a = { .is_add = mp->is_add, .flood = mp->flood, .uu_flood = mp->uu_flood, .forward = mp->forward, .learn = mp->learn, .arp_term = mp->arp_term, .mac_age = mp->mac_age, .bd_id = ntohl (mp->bd_id), }; int rv = bd_add_del (&a); vl_api_bridge_domain_add_del_reply_t *rmp; REPLY_MACRO (VL_API_BRIDGE_DOMAIN_ADD_DEL_REPLY); } static void send_bridge_domain_details (l2input_main_t * l2im, unix_shared_memory_queue_t * q, l2_bridge_domain_t * bd_config, u32 n_sw_ifs, u32 context) { vl_api_bridge_domain_details_t *mp; l2_flood_member_t *m; vl_api_bridge_domain_sw_if_t *sw_ifs; l2_input_config_t *input_cfg; mp = vl_msg_api_alloc (sizeof (*mp) + (n_sw_ifs * sizeof (vl_api_bridge_domain_sw_if_t))); memset (mp, 0, sizeof (*mp)); mp->_vl_msg_id = ntohs (VL_API_BRIDGE_DOMAIN_DETAILS); mp->bd_id = ntohl (bd_config->bd_id); mp->flood = bd_feature_flood (bd_config); mp->uu_flood = bd_feature_uu_flood (bd_config); mp->forward = bd_feature_forward (bd_config); mp->learn = bd_feature_learn (bd_config); mp->arp_term = bd_feature_arp_term (bd_config); mp->bvi_sw_if_index = ntohl (bd_config->bvi_sw_if_index); mp->mac_age = bd_config->mac_age; mp->context = context; sw_ifs = (vl_api_bridge_domain_sw_if_t *) mp->sw_if_details; vec_foreach (m, bd_config->members) { sw_ifs->sw_if_index = ntohl (m->sw_if_index); input_cfg = vec_elt_at_index (l2im->configs, m->sw_if_index); sw_ifs->shg = input_cfg->shg; sw_ifs++; mp->n_sw_ifs++; } mp->n_sw_ifs = htonl (mp->n_sw_ifs); vl_msg_api_send_shmem (q, (u8 *) & mp); } static void vl_api_bridge_domain_dump_t_handler (vl_api_bridge_domain_dump_t * mp) { bd_main_t *bdm = &bd_main; l2input_main_t *l2im = &l2input_main; unix_shared_memory_queue_t *q = vl_api_client_index_to_input_queue (mp->client_index); if (q == 0) return; u32 bd_id = ntohl (mp->bd_id); if (bd_id == 0) return; u32 bd_index, end; if (bd_id == ~0) bd_index = 0, end = vec_len (l2im->bd_configs); else { bd_index = bd_find_index (bdm, bd_id); if (bd_index == ~0) return; end = bd_index + 1; } for (; bd_index < end; bd_index++) { l2_bridge_domain_t *bd_config = l2input_bd_config_from_index (l2im, bd_index); /* skip dummy bd_id 0 */ if (bd_config && (bd_config->bd_id > 0)) send_bridge_domain_details (l2im, q, bd_config, vec_len (bd_config->members), mp->context); } } static void vl_api_bridge_flags_t_handler (vl_api_bridge_flags_t * mp) { vlib_main_t *vm = vlib_get_main (); bd_main_t *bdm = &bd_main; vl_api_bridge_flags_reply_t *rmp; int rv = 0; u32 flags = ntohl (mp->feature_bitmap); u32 bd_id = ntohl (mp->bd_id); if (bd_id == 0) { rv = VNET_API_ERROR_BD_NOT_MODIFIABLE; goto out; } u32 bd_index = bd_find_index (bdm, bd_id); if (bd_index == ~0) { rv = VNET_API_ERROR_NO_SUCH_ENTRY; goto out; } bd_set_flags (vm, bd_index, flags, mp->is_set); out: /* *INDENT-OFF* */ REPLY_MACRO2(VL_API_BRIDGE_FLAGS_REPLY, ({ rmp->resulting_feature_bitmap = ntohl(flags); })); /* *INDENT-ON* */ } static void vl_api_l2_interface_vlan_tag_rewrite_t_handler (vl_api_l2_interface_vlan_tag_rewrite_t * mp) { int rv = 0; vl_api_l2_interface_vlan_tag_rewrite_reply_t *rmp; vnet_main_t *vnm = vnet_get_main (); vlib_main_t *vm = vlib_get_main (); u32 vtr_op; VALIDATE_SW_IF_INDEX (mp); vtr_op = ntohl (mp->vtr_op); /* The L2 code is unsuspicious */ switch (vtr_op) { case L2_VTR_DISABLED: case L2_VTR_PUSH_1: case L2_VTR_PUSH_2: case L2_VTR_POP_1: case L2_VTR_POP_2: case L2_VTR_TRANSLATE_1_1: case L2_VTR_TRANSLATE_1_2: case L2_VTR_TRANSLATE_2_1: case L2_VTR_TRANSLATE_2_2: break; default: rv = VNET_API_ERROR_INVALID_VALUE; goto bad_sw_if_index; } rv = l2vtr_configure (vm, vnm, ntohl (mp->sw_if_index), vtr_op, ntohl (mp->push_dot1q), ntohl (mp->tag1), ntohl (mp->tag2)); BAD_SW_IF_INDEX_LABEL; REPLY_MACRO (VL_API_L2_INTERFACE_VLAN_TAG_REWRITE_REPLY); } static void vl_api_l2_interface_pbb_tag_rewrite_t_handler (vl_api_l2_interface_pbb_tag_rewrite_t * mp) { vl_api_l2_interface_pbb_tag_rewrite_reply_t *rmp; vnet_main_t *vnm = vnet_get_main (); vlib_main_t *vm = vlib_get_main (); u32 vtr_op; int rv = 0; VALIDATE_SW_IF_INDEX (mp); vtr_op = ntohl (mp->vtr_op); switch (vtr_op) { case L2_VTR_DISABLED: case L2_VTR_PUSH_2: case L2_VTR_POP_2: case L2_VTR_TRANSLATE_2_1: break; default: rv = VNET_API_ERROR_INVALID_VALUE; goto bad_sw_if_index; } rv = l2pbb_configure (vm, vnm, ntohl (mp->sw_if_index), vtr_op, mp->b_dmac, mp->b_smac, ntohs (mp->b_vlanid), ntohl (mp->i_sid), ntohs (mp->outer_tag)); BAD_SW_IF_INDEX_LABEL; REPLY_MACRO (VL_API_L2_INTERFACE_PBB_TAG_REWRITE_REPLY); } /* * l2_api_hookup * Add vpe's API message handlers to the table. * vlib has alread mapped shared memory and * added the client registration handlers. * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process() */ #define vl_msg_name_crc_list #include <vnet/vnet_all_api_h.h> #undef vl_msg_name_crc_list static void setup_message_id_table (api_main_t * am) { #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id); foreach_vl_msg_name_crc_l2; #undef _ } static clib_error_t * l2_api_hookup (vlib_main_t * vm) { api_main_t *am = &api_main; #define _(N,n) \ vl_msg_api_set_handlers(VL_API_##N, #n, \ vl_api_##n##_t_handler, \ vl_noop_handler, \ vl_api_##n##_t_endian, \ vl_api_##n##_t_print, \ sizeof(vl_api_##n##_t), 1); foreach_vpe_api_msg; #undef _ /* * Set up the (msg_name, crc, message-id) table */ setup_message_id_table (am); return 0; } VLIB_API_INIT_FUNCTION (l2_api_hookup); /* * fd.io coding-style-patch-verification: ON * * Local Variables: * eval: (c-set-style "gnu") * End: */