src/plugins/cnat/cnat_node_vip.c

   1 /*
   2  * Copyright (c) 2020 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15
  16 #include <vlibmemory/api.h>
  17 #include <cnat/cnat_node.h>
  18 #include <cnat/cnat_translation.h>
  19
  20 #include <vnet/dpo/load_balance.h>
  21 #include <vnet/dpo/load_balance_map.h>
  22
  23 typedef struct cnat_translation_trace_t_
  24 {
  25   cnat_session_t session;
  26   cnat_translation_t tr;
  27   u32 found_session;
  28   u32 created_session;
  29   u32 has_tr;
  30 } cnat_translation_trace_t;
  31
  32 typedef enum cnat_translation_next_t_
  33 {
  34   CNAT_TRANSLATION_NEXT_DROP,
  35   CNAT_TRANSLATION_NEXT_LOOKUP,
  36   CNAT_TRANSLATION_N_NEXT,
  37 } cnat_translation_next_t;
  38
  39 vlib_node_registration_t cnat_vip_ip4_node;
  40 vlib_node_registration_t cnat_vip_ip6_node;
  41
  42 static u8 *
  43 format_cnat_translation_trace (u8 * s, va_list * args)
  44 {
  45   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
  46   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
  47   cnat_translation_trace_t *t =
  48     va_arg (*args, cnat_translation_trace_t *);
  49
  50   if (t->found_session)
  51     s = format (s, "found: %U", format_cnat_session, &t->session, 1);
  52   else if (t->created_session)
  53     s = format (s, "created: %U\n  tr: %U",
  54                 format_cnat_session, &t->session, 1,
  55                 format_cnat_translation,
  56                 &t->tr, 0);
  57   else if (t->has_tr)
  58     s = format (s, "tr pass: %U", format_cnat_translation,
  59         &t->tr, 0);
  60   else
  61     s = format (s, "not found");
  62   return s;
  63 }
  64
  65 /* CNat sub for NAT behind a fib entry (VIP or interposed real IP) */
  66 always_inline uword
  67 cnat_vip_inline (vlib_main_t * vm,
  68                    vlib_node_runtime_t * node,
  69                    vlib_buffer_t * b,
  70                    cnat_node_ctx_t * ctx, int rv, cnat_session_t * session)
  71 {
  72   vlib_combined_counter_main_t *cntm = &cnat_translation_counters;
  73   cnat_main_t *cm = &cnat_main;
  74   const cnat_translation_t *ct = NULL;
  75   ip4_header_t *ip4;
  76   ip_protocol_t iproto;
  77   ip6_header_t *ip6;
  78   udp_header_t *udp0;
  79   cnat_client_t *cc;
  80   u16 next0;
  81   index_t cti;
  82   int created_session = 0;
  83   if (AF_IP4 == ctx->af)
  84     {
  85       ip4 = vlib_buffer_get_current (b);
  86       iproto = ip4->protocol;
  87       udp0 = (udp_header_t *) (ip4 + 1);
  88     }
  89   else
  90     {
  91       ip6 = vlib_buffer_get_current (b);
  92       iproto = ip6->protocol;
  93       udp0 = (udp_header_t *) (ip6 + 1);
  94     }
  95
  96   cc = cnat_client_get (vnet_buffer (b)->ip.adj_index[VLIB_TX]);
  97
  98   if (iproto != IP_PROTOCOL_UDP && iproto != IP_PROTOCOL_TCP)
  99     {
 100       /* Dont translate & follow the fib programming */
 101       next0 = cc->cc_parent.dpoi_next_node;
 102       vnet_buffer (b)->ip.adj_index[VLIB_TX] = cc->cc_parent.dpoi_index;
 103       goto trace;
 104     }
 105
 106   ct = cnat_find_translation (cc->parent_cci,
 107                                 clib_host_to_net_u16 (udp0->dst_port),
 108                                 iproto);
 109
 110   if (!rv)
 111     {
 112       /* session table hit */
 113       cnat_timestamp_update (session->value.cs_ts_index, ctx->now);
 114
 115       if (NULL != ct)
 116         {
 117           /* Translate & follow the translation given LB */
 118           next0 = ct->ct_lb.dpoi_next_node;
 119           vnet_buffer (b)->ip.adj_index[VLIB_TX] = session->value.cs_lbi;
 120         }
 121       else if (session->value.flags & CNAT_SESSION_FLAG_HAS_SNAT)
 122         {
 123           /* The return needs DNAT, so we need an additionnal
 124            * lookup after translation */
 125           next0 = CNAT_TRANSLATION_NEXT_LOOKUP;
 126         }
 127       else
 128         {
 129           /* Translate & follow the fib programming */
 130           next0 = cc->cc_parent.dpoi_next_node;
 131           vnet_buffer (b)->ip.adj_index[VLIB_TX] = cc->cc_parent.dpoi_index;
 132         }
 133     }
 134   else
 135     {
 136       if (NULL == ct)
 137         {
 138           /* Dont translate & Follow the fib programming */
 139           vnet_buffer (b)->ip.adj_index[VLIB_TX] = cc->cc_parent.dpoi_index;
 140           next0 = cc->cc_parent.dpoi_next_node;
 141           goto trace;
 142         }
 143
 144       /* New flow, create the sessions */
 145       const load_balance_t *lb0;
 146       cnat_ep_trk_t *trk0;
 147       u32 hash_c0, bucket0;
 148       u32 rsession_flags = 0;
 149       const dpo_id_t *dpo0;
 150
 151       lb0 = load_balance_get (ct->ct_lb.dpoi_index);
 152       if (!lb0->lb_n_buckets)
 153         {
 154           /* Dont translate & Follow the fib programming */
 155           vnet_buffer (b)->ip.adj_index[VLIB_TX] = cc->cc_parent.dpoi_index;
 156           next0 = cc->cc_parent.dpoi_next_node;
 157           goto trace;
 158         }
 159
 160       /* session table miss */
 161       hash_c0 = (AF_IP4 == ctx->af ?
 162                  ip4_compute_flow_hash (ip4, lb0->lb_hash_config) :
 163                  ip6_compute_flow_hash (ip6, lb0->lb_hash_config));
 164       bucket0 = hash_c0 & lb0->lb_n_buckets_minus_1;
 165       dpo0 = load_balance_get_fwd_bucket (lb0, bucket0);
 166
 167       /* add the session */
 168       trk0 = &ct->ct_paths[bucket0];
 169
 170       ip46_address_copy (&session->value.cs_ip[VLIB_TX],
 171                          &trk0->ct_ep[VLIB_TX].ce_ip.ip);
 172       if (ip_address_is_zero (&trk0->ct_ep[VLIB_RX].ce_ip))
 173         {
 174           if (AF_IP4 == ctx->af)
 175             ip46_address_set_ip4 (&session->value.cs_ip[VLIB_RX],
 176                                   &ip4->src_address);
 177           else
 178             ip46_address_set_ip6 (&session->value.cs_ip[VLIB_RX],
 179                                   &ip6->src_address);
 180         }
 181       else
 182         {
 183           /* We source NAT with the translation */
 184           rsession_flags |= CNAT_SESSION_FLAG_HAS_SNAT;
 185           ip46_address_copy (&session->value.cs_ip[VLIB_RX],
 186                              &trk0->ct_ep[VLIB_RX].ce_ip.ip);
 187         }
 188       session->value.cs_port[VLIB_TX] =
 189         clib_host_to_net_u16 (trk0->ct_ep[VLIB_TX].ce_port);
 190       session->value.cs_port[VLIB_RX] =
 191         clib_host_to_net_u16 (trk0->ct_ep[VLIB_RX].ce_port);
 192
 193       session->value.flags = 0;
 194       if (!session->value.cs_port[VLIB_RX])
 195         {
 196           u16 sport;
 197           sport = udp0->src_port;
 198           /* Allocate a port only if asked and if we actually sNATed */
 199           if ((ct->flags & CNAT_TRANSLATION_FLAG_ALLOCATE_PORT)
 200                && (rsession_flags & CNAT_SESSION_FLAG_HAS_SNAT)) {
 201             sport = 0; /* force allocation */
 202             session->value.flags |= CNAT_SESSION_FLAG_ALLOC_PORT;
 203             rv = cnat_allocate_port (cm, &sport);
 204             if (rv)
 205               {
 206                 vlib_node_increment_counter (vm, cnat_vip_ip4_node.index,
 207                                             CNAT_ERROR_EXHAUSTED_PORTS, 1);
 208                 next0 = CNAT_TRANSLATION_NEXT_DROP;
 209                 goto trace;
 210               }
 211             }
 212
 213           session->value.cs_port[VLIB_RX] = sport;
 214         }
 215       session->value.cs_lbi = dpo0->dpoi_index;
 216
 217       cnat_client_cnt_session (cc);
 218       cnat_session_create (session, ctx, rsession_flags);
 219       created_session = 1;
 220
 221       next0 = ct->ct_lb.dpoi_next_node;
 222       vnet_buffer (b)->ip.adj_index[VLIB_TX] = session->value.cs_lbi;
 223     }
 224
 225
 226   if (AF_IP4 == ctx->af)
 227     cnat_translation_ip4 (session, ip4, udp0);
 228   else
 229     cnat_translation_ip6 (session, ip6, udp0);
 230
 231   if (NULL != ct)
 232     {
 233       cti = ct - cnat_translation_pool;
 234       vlib_increment_combined_counter (cntm, ctx->thread_index, cti, 1,
 235                                   vlib_buffer_length_in_chain (vm, b));
 236     }
 237
 238 trace:
 239   if (PREDICT_FALSE (ctx->do_trace))
 240     {
 241       cnat_translation_trace_t *t;
 242
 243       t = vlib_add_trace (vm, node, b, sizeof (*t));
 244
 245       t->found_session = !rv;
 246       t->created_session = created_session;
 247       if (t->found_session || t->created_session)
 248         clib_memcpy (&t->session, session, sizeof (t->session));
 249       t->has_tr = (NULL != ct);
 250       if (t->has_tr)
 251         clib_memcpy (&t->tr, ct, sizeof (cnat_translation_t));
 252     }
 253   return next0;
 254 }
 255
 256 VLIB_NODE_FN (cnat_vip_ip4_node) (vlib_main_t * vm,
 257                                     vlib_node_runtime_t * node,
 258                                     vlib_frame_t * frame)
 259 {
 260   if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)))
 261     return cnat_node_inline (vm, node, frame, cnat_vip_inline, AF_IP4,
 262                                1 /* do_trace */ );
 263   return cnat_node_inline (vm, node, frame, cnat_vip_inline, AF_IP4,
 264                              0 /* do_trace */ );
 265 }
 266
 267 VLIB_NODE_FN (cnat_vip_ip6_node) (vlib_main_t * vm,
 268                                     vlib_node_runtime_t * node,
 269                                     vlib_frame_t * frame)
 270 {
 271   if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)))
 272     return cnat_node_inline (vm, node, frame, cnat_vip_inline, AF_IP6,
 273                                1 /* do_trace */ );
 274   return cnat_node_inline (vm, node, frame, cnat_vip_inline, AF_IP6,
 275                              0 /* do_trace */ );
 276 }
 277
 278 /* *INDENT-OFF* */
 279 VLIB_REGISTER_NODE (cnat_vip_ip4_node) =
 280 {
 281   .name = "ip4-cnat-tx",
 282   .vector_size = sizeof (u32),
 283   .format_trace = format_cnat_translation_trace,
 284   .type = VLIB_NODE_TYPE_INTERNAL,
 285   .n_errors = 0,
 286   .n_next_nodes = CNAT_TRANSLATION_N_NEXT,
 287   .next_nodes =
 288   {
 289     [CNAT_TRANSLATION_NEXT_DROP] = "ip4-drop",
 290     [CNAT_TRANSLATION_NEXT_LOOKUP] = "ip4-lookup",
 291   }
 292 };
 293 VLIB_REGISTER_NODE (cnat_vip_ip6_node) =
 294 {
 295   .name = "ip6-cnat-tx",
 296   .vector_size = sizeof (u32),
 297   .format_trace = format_cnat_translation_trace,
 298   .type = VLIB_NODE_TYPE_INTERNAL,
 299   .n_errors = 0,
 300   .n_next_nodes = CNAT_TRANSLATION_N_NEXT,
 301   .next_nodes =
 302   {
 303     [CNAT_TRANSLATION_NEXT_DROP] = "ip6-drop",
 304     [CNAT_TRANSLATION_NEXT_LOOKUP] = "ip6-lookup",
 305   }
 306 };
 307 /* *INDENT-ON* */
 308