src/plugins/dpdk/buffer.c

   1 /*
   2  * Copyright (c) 2017 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  * buffer.c: allocate/free network buffers.
  17  *
  18  * Copyright (c) 2008 Eliot Dresselhaus
  19  *
  20  * Permission is hereby granted, free of charge, to any person obtaining
  21  * a copy of this software and associated documentation files (the
  22  * "Software"), to deal in the Software without restriction, including
  23  * without limitation the rights to use, copy, modify, merge, publish,
  24  * distribute, sublicense, and/or sell copies of the Software, and to
  25  * permit persons to whom the Software is furnished to do so, subject to
  26  * the following conditions:
  27  *
  28  * The above copyright notice and this permission notice shall be
  29  * included in all copies or substantial portions of the Software.
  30  *
  31  *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  32  *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  33  *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  34  *  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  35  *  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  36  *  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  37  *  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  38  */
  39
  40 /**
  41  * @file
  42  *
  43  * Allocate/free network buffers.
  44  */
  45
  46 #include <rte_config.h>
  47
  48 #include <rte_common.h>
  49 #include <rte_log.h>
  50 #include <rte_memory.h>
  51 #include <rte_memzone.h>
  52 #include <rte_tailq.h>
  53 #include <rte_eal.h>
  54 #include <rte_per_lcore.h>
  55 #include <rte_launch.h>
  56 #include <rte_atomic.h>
  57 #include <rte_cycles.h>
  58 #include <rte_prefetch.h>
  59 #include <rte_lcore.h>
  60 #include <rte_per_lcore.h>
  61 #include <rte_branch_prediction.h>
  62 #include <rte_interrupts.h>
  63 #include <rte_pci.h>
  64 #include <rte_random.h>
  65 #include <rte_debug.h>
  66 #include <rte_ether.h>
  67 #include <rte_ethdev.h>
  68 #include <rte_ring.h>
  69 #include <rte_mempool.h>
  70 #include <rte_mbuf.h>
  71 #include <rte_version.h>
  72
  73 #include <vlib/vlib.h>
  74 #include <vnet/vnet.h>
  75 #include <dpdk/device/dpdk.h>
  76 #include <dpdk/device/dpdk_priv.h>
  77
  78
  79 STATIC_ASSERT (VLIB_BUFFER_PRE_DATA_SIZE == RTE_PKTMBUF_HEADROOM,
  80                "VLIB_BUFFER_PRE_DATA_SIZE must be equal to RTE_PKTMBUF_HEADROOM");
  81
  82 static struct rte_mbuf ***mbuf_pending_free_list = 0;
  83
  84 static_always_inline void
  85 dpdk_rte_pktmbuf_free (vlib_main_t * vm, vlib_buffer_t * b)
  86 {
  87   vlib_buffer_t *hb = b;
  88   struct rte_mbuf *mb;
  89   u32 next, flags;
  90   mb = rte_mbuf_from_vlib_buffer (hb);
  91   static struct rte_mempool *last_pool = 0;
  92   static u8 last_buffer_pool_index;
  93
  94 next:
  95   flags = b->flags;
  96   next = b->next_buffer;
  97   mb = rte_mbuf_from_vlib_buffer (b);
  98
  99   if (PREDICT_FALSE (b->n_add_refs))
 100     {
 101       rte_mbuf_refcnt_update (mb, b->n_add_refs);
 102       b->n_add_refs = 0;
 103     }
 104
 105   mb = rte_pktmbuf_prefree_seg (mb);
 106   if (mb)
 107     {
 108       if (mb->pool != last_pool)
 109         {
 110           last_pool = mb->pool;
 111           dpdk_mempool_private_t *privp = rte_mempool_get_priv (last_pool);
 112           last_buffer_pool_index = privp->buffer_pool_index;
 113           vec_validate_aligned (mbuf_pending_free_list,
 114                                 last_buffer_pool_index,
 115                                 CLIB_CACHE_LINE_BYTES);
 116         }
 117       vec_add1 (mbuf_pending_free_list[last_buffer_pool_index], mb);
 118     }
 119
 120   if (flags & VLIB_BUFFER_NEXT_PRESENT)
 121     {
 122       b = vlib_get_buffer (vm, next);
 123       goto next;
 124     }
 125 }
 126
 127 #ifndef CLIB_MULTIARCH_VARIANT
 128 static void
 129 del_free_list (vlib_main_t * vm, vlib_buffer_free_list_t * f)
 130 {
 131   u32 i;
 132   vlib_buffer_t *b;
 133
 134   for (i = 0; i < vec_len (f->buffers); i++)
 135     {
 136       b = vlib_get_buffer (vm, f->buffers[i]);
 137       dpdk_rte_pktmbuf_free (vm, b);
 138     }
 139
 140   vec_free (f->name);
 141   vec_free (f->buffers);
 142 }
 143
 144 /* Add buffer free list. */
 145 static void
 146 dpdk_buffer_delete_free_list (vlib_main_t * vm, u32 free_list_index)
 147 {
 148   vlib_buffer_main_t *bm = vm->buffer_main;
 149   vlib_buffer_free_list_t *f;
 150   u32 merge_index;
 151   int i;
 152
 153   ASSERT (vlib_get_thread_index () == 0);
 154
 155   f = vlib_buffer_get_free_list (vm, free_list_index);
 156
 157   merge_index = vlib_buffer_get_free_list_with_size (vm, f->n_data_bytes);
 158   if (merge_index != ~0 && merge_index != free_list_index)
 159     {
 160       vlib_buffer_merge_free_lists (pool_elt_at_index
 161                                     (bm->buffer_free_list_pool, merge_index),
 162                                     f);
 163     }
 164
 165   del_free_list (vm, f);
 166
 167   /* Poison it. */
 168   memset (f, 0xab, sizeof (f[0]));
 169
 170   pool_put (bm->buffer_free_list_pool, f);
 171
 172   for (i = 1; i < vec_len (vlib_mains); i++)
 173     {
 174       bm = vlib_mains[i]->buffer_main;
 175       f = vlib_buffer_get_free_list (vlib_mains[i], free_list_index);;
 176       memset (f, 0xab, sizeof (f[0]));
 177       pool_put (bm->buffer_free_list_pool, f);
 178     }
 179 }
 180 #endif
 181
 182 /* Make sure free list has at least given number of free buffers. */
 183 static uword
 184 fill_free_list (vlib_main_t * vm,
 185                 vlib_buffer_free_list_t * fl, uword min_free_buffers)
 186 {
 187   dpdk_main_t *dm = &dpdk_main;
 188   vlib_buffer_t *b0, *b1, *b2, *b3;
 189   int n, i;
 190   u32 bi0, bi1, bi2, bi3;
 191   unsigned socket_id = rte_socket_id ();
 192   struct rte_mempool *rmp = dm->pktmbuf_pools[socket_id];
 193   dpdk_mempool_private_t *privp = rte_mempool_get_priv (rmp);
 194   struct rte_mbuf *mb0, *mb1, *mb2, *mb3;
 195   vlib_buffer_t bt;
 196
 197   /* Too early? */
 198   if (PREDICT_FALSE (rmp == 0))
 199     return 0;
 200
 201   /* Already have enough free buffers on free list? */
 202   n = min_free_buffers - vec_len (fl->buffers);
 203   if (n <= 0)
 204     return min_free_buffers;
 205
 206   /* Always allocate round number of buffers. */
 207   n = round_pow2 (n, CLIB_CACHE_LINE_BYTES / sizeof (u32));
 208
 209   /* Always allocate new buffers in reasonably large sized chunks. */
 210   n = clib_max (n, fl->min_n_buffers_each_physmem_alloc);
 211
 212   vec_validate_aligned (vm->mbuf_alloc_list, n - 1, CLIB_CACHE_LINE_BYTES);
 213
 214   if (rte_mempool_get_bulk (rmp, vm->mbuf_alloc_list, n) < 0)
 215     return 0;
 216
 217   memset (&bt, 0, sizeof (vlib_buffer_t));
 218   vlib_buffer_init_for_free_list (&bt, fl);
 219   bt.buffer_pool_index = privp->buffer_pool_index;
 220
 221   _vec_len (vm->mbuf_alloc_list) = n;
 222
 223   i = 0;
 224   int f = vec_len (fl->buffers);
 225   vec_resize_aligned (fl->buffers, n, CLIB_CACHE_LINE_BYTES);
 226
 227   while (i < (n - 7))
 228     {
 229       vlib_prefetch_buffer_header (vlib_buffer_from_rte_mbuf
 230                                    (vm->mbuf_alloc_list[i + 4]), STORE);
 231       vlib_prefetch_buffer_header (vlib_buffer_from_rte_mbuf
 232                                    (vm->mbuf_alloc_list[i + 5]), STORE);
 233       vlib_prefetch_buffer_header (vlib_buffer_from_rte_mbuf
 234                                    (vm->mbuf_alloc_list[i + 6]), STORE);
 235       vlib_prefetch_buffer_header (vlib_buffer_from_rte_mbuf
 236                                    (vm->mbuf_alloc_list[i + 7]), STORE);
 237
 238       mb0 = vm->mbuf_alloc_list[i];
 239       mb1 = vm->mbuf_alloc_list[i + 1];
 240       mb2 = vm->mbuf_alloc_list[i + 2];
 241       mb3 = vm->mbuf_alloc_list[i + 3];
 242
 243       b0 = vlib_buffer_from_rte_mbuf (mb0);
 244       b1 = vlib_buffer_from_rte_mbuf (mb1);
 245       b2 = vlib_buffer_from_rte_mbuf (mb2);
 246       b3 = vlib_buffer_from_rte_mbuf (mb3);
 247
 248       bi0 = vlib_get_buffer_index (vm, b0);
 249       bi1 = vlib_get_buffer_index (vm, b1);
 250       bi2 = vlib_get_buffer_index (vm, b2);
 251       bi3 = vlib_get_buffer_index (vm, b3);
 252
 253       fl->buffers[f++] = bi0;
 254       fl->buffers[f++] = bi1;
 255       fl->buffers[f++] = bi2;
 256       fl->buffers[f++] = bi3;
 257
 258       clib_memcpy64_x4 (b0, b1, b2, b3, &bt);
 259
 260       if (fl->buffer_init_function)
 261         {
 262           fl->buffer_init_function (vm, fl, &bi0, 1);
 263           fl->buffer_init_function (vm, fl, &bi1, 1);
 264           fl->buffer_init_function (vm, fl, &bi2, 1);
 265           fl->buffer_init_function (vm, fl, &bi3, 1);
 266         }
 267       i += 4;
 268     }
 269
 270   while (i < n)
 271     {
 272       mb0 = vm->mbuf_alloc_list[i];
 273
 274       b0 = vlib_buffer_from_rte_mbuf (mb0);
 275       bi0 = vlib_get_buffer_index (vm, b0);
 276
 277       fl->buffers[f++] = bi0;
 278       clib_memcpy (b0, &bt, sizeof (vlib_buffer_t));
 279
 280       if (fl->buffer_init_function)
 281         fl->buffer_init_function (vm, fl, &bi0, 1);
 282       i++;
 283     }
 284
 285   fl->n_alloc += n;
 286
 287   return n;
 288 }
 289
 290 static u32
 291 alloc_from_free_list (vlib_main_t * vm,
 292                       vlib_buffer_free_list_t * free_list,
 293                       u32 * alloc_buffers, u32 n_alloc_buffers)
 294 {
 295   u32 *dst, *src;
 296   uword len, n_filled;
 297
 298   dst = alloc_buffers;
 299
 300   n_filled = fill_free_list (vm, free_list, n_alloc_buffers);
 301   if (n_filled == 0)
 302     return 0;
 303
 304   len = vec_len (free_list->buffers);
 305   ASSERT (len >= n_alloc_buffers);
 306
 307   src = free_list->buffers + len - n_alloc_buffers;
 308   clib_memcpy (dst, src, n_alloc_buffers * sizeof (u32));
 309
 310   _vec_len (free_list->buffers) -= n_alloc_buffers;
 311
 312   return n_alloc_buffers;
 313 }
 314
 315 /* Allocate a given number of buffers into given array.
 316    Returns number actually allocated which will be either zero or
 317    number requested. */
 318 u32
 319 CLIB_MULTIARCH_FN (dpdk_buffer_alloc) (vlib_main_t * vm, u32 * buffers,
 320                                        u32 n_buffers)
 321 {
 322   vlib_buffer_main_t *bm = vm->buffer_main;
 323
 324   return alloc_from_free_list
 325     (vm,
 326      pool_elt_at_index (bm->buffer_free_list_pool,
 327                         VLIB_BUFFER_DEFAULT_FREE_LIST_INDEX),
 328      buffers, n_buffers);
 329 }
 330
 331
 332 u32
 333 CLIB_MULTIARCH_FN (dpdk_buffer_alloc_from_free_list) (vlib_main_t * vm,
 334                                                       u32 * buffers,
 335                                                       u32 n_buffers,
 336                                                       u32 free_list_index)
 337 {
 338   vlib_buffer_main_t *bm = vm->buffer_main;
 339   vlib_buffer_free_list_t *f;
 340   f = pool_elt_at_index (bm->buffer_free_list_pool, free_list_index);
 341   return alloc_from_free_list (vm, f, buffers, n_buffers);
 342 }
 343
 344 static_always_inline void
 345 dpdk_prefetch_buffer_by_index (vlib_main_t * vm, u32 bi)
 346 {
 347   vlib_buffer_t *b;
 348   struct rte_mbuf *mb;
 349   b = vlib_get_buffer (vm, bi);
 350   mb = rte_mbuf_from_vlib_buffer (b);
 351   CLIB_PREFETCH (mb, CLIB_CACHE_LINE_BYTES, STORE);
 352   CLIB_PREFETCH (b, CLIB_CACHE_LINE_BYTES, LOAD);
 353 }
 354
 355 static_always_inline void
 356 recycle_or_free (vlib_main_t * vm, vlib_buffer_main_t * bm, u32 bi,
 357                  vlib_buffer_t * b)
 358 {
 359   vlib_buffer_free_list_t *fl;
 360   u32 fi;
 361   fl = vlib_buffer_get_buffer_free_list (vm, b, &fi);
 362
 363   /* The only current use of this callback: multicast recycle */
 364   if (PREDICT_FALSE (fl->buffers_added_to_freelist_function != 0))
 365     {
 366       int j;
 367
 368       vlib_buffer_add_to_free_list (vm, fl, bi,
 369                                     (b->flags & VLIB_BUFFER_RECYCLE) == 0);
 370
 371       for (j = 0; j < vec_len (bm->announce_list); j++)
 372         {
 373           if (fl == bm->announce_list[j])
 374             goto already_announced;
 375         }
 376       vec_add1 (bm->announce_list, fl);
 377     already_announced:
 378       ;
 379     }
 380   else
 381     {
 382       if (PREDICT_TRUE ((b->flags & VLIB_BUFFER_RECYCLE) == 0))
 383         dpdk_rte_pktmbuf_free (vm, b);
 384     }
 385 }
 386
 387 static_always_inline void
 388 vlib_buffer_free_inline (vlib_main_t * vm,
 389                          u32 * buffers, u32 n_buffers, u32 follow_buffer_next)
 390 {
 391   vlib_buffer_main_t *bm = vm->buffer_main;
 392   vlib_buffer_t *b0, *b1, *b2, *b3;
 393   int i = 0;
 394   u32 (*cb) (vlib_main_t * vm, u32 * buffers, u32 n_buffers,
 395              u32 follow_buffer_next);
 396
 397   cb = bm->buffer_free_callback;
 398
 399   if (PREDICT_FALSE (cb != 0))
 400     n_buffers = (*cb) (vm, buffers, n_buffers, follow_buffer_next);
 401
 402   if (!n_buffers)
 403     return;
 404
 405   while (i + 7 < n_buffers)
 406     {
 407       dpdk_prefetch_buffer_by_index (vm, buffers[i + 4]);
 408       dpdk_prefetch_buffer_by_index (vm, buffers[i + 5]);
 409       dpdk_prefetch_buffer_by_index (vm, buffers[i + 6]);
 410       dpdk_prefetch_buffer_by_index (vm, buffers[i + 7]);
 411
 412       b0 = vlib_get_buffer (vm, buffers[i]);
 413       b1 = vlib_get_buffer (vm, buffers[i + 1]);
 414       b2 = vlib_get_buffer (vm, buffers[i + 2]);
 415       b3 = vlib_get_buffer (vm, buffers[i + 3]);
 416
 417       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b0);
 418       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b1);
 419       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b2);
 420       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b3);
 421
 422       recycle_or_free (vm, bm, buffers[i], b0);
 423       recycle_or_free (vm, bm, buffers[i + 1], b1);
 424       recycle_or_free (vm, bm, buffers[i + 2], b2);
 425       recycle_or_free (vm, bm, buffers[i + 3], b3);
 426
 427       i += 4;
 428     }
 429   while (i < n_buffers)
 430     {
 431       b0 = vlib_get_buffer (vm, buffers[i]);
 432       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b);
 433       recycle_or_free (vm, bm, buffers[i], b0);
 434       i++;
 435     }
 436   if (vec_len (bm->announce_list))
 437     {
 438       vlib_buffer_free_list_t *fl;
 439       for (i = 0; i < vec_len (bm->announce_list); i++)
 440         {
 441           fl = bm->announce_list[i];
 442           fl->buffers_added_to_freelist_function (vm, fl);
 443         }
 444       _vec_len (bm->announce_list) = 0;
 445     }
 446
 447   vec_foreach_index (i, mbuf_pending_free_list)
 448   {
 449     int len = vec_len (mbuf_pending_free_list[i]);
 450     if (len)
 451       {
 452         rte_mempool_put_bulk (mbuf_pending_free_list[i][len - 1]->pool,
 453                               (void *) mbuf_pending_free_list[i], len);
 454         vec_reset_length (mbuf_pending_free_list[i]);
 455       }
 456   }
 457 }
 458
 459 void
 460 CLIB_MULTIARCH_FN (dpdk_buffer_free) (vlib_main_t * vm, u32 * buffers,
 461                                       u32 n_buffers)
 462 {
 463   vlib_buffer_free_inline (vm, buffers, n_buffers,      /* follow_buffer_next */
 464                            1);
 465 }
 466
 467 void
 468 CLIB_MULTIARCH_FN (dpdk_buffer_free_no_next) (vlib_main_t * vm, u32 * buffers,
 469                                               u32 n_buffers)
 470 {
 471   vlib_buffer_free_inline (vm, buffers, n_buffers,      /* follow_buffer_next */
 472                            0);
 473 }
 474
 475 #ifndef CLIB_MULTIARCH_VARIANT
 476 static void
 477 dpdk_packet_template_init (vlib_main_t * vm,
 478                            void *vt,
 479                            void *packet_data,
 480                            uword n_packet_data_bytes,
 481                            uword min_n_buffers_each_physmem_alloc, u8 * name)
 482 {
 483   vlib_packet_template_t *t = (vlib_packet_template_t *) vt;
 484
 485   vlib_worker_thread_barrier_sync (vm);
 486   memset (t, 0, sizeof (t[0]));
 487
 488   vec_add (t->packet_data, packet_data, n_packet_data_bytes);
 489
 490   vlib_worker_thread_barrier_release (vm);
 491 }
 492
 493 clib_error_t *
 494 dpdk_pool_create (vlib_main_t * vm, u8 * pool_name, u32 elt_size,
 495                   u32 num_elts, u32 pool_priv_size, u16 cache_size, u8 numa,
 496                   struct rte_mempool **_mp, vlib_physmem_region_index_t * pri)
 497 {
 498   struct rte_mempool *mp;
 499   vlib_physmem_region_t *pr;
 500   clib_error_t *error = 0;
 501   u32 size, obj_size;
 502   i32 ret;
 503
 504   obj_size = rte_mempool_calc_obj_size (elt_size, 0, 0);
 505   size = rte_mempool_xmem_size (num_elts, obj_size, 21);
 506
 507   error =
 508     vlib_physmem_region_alloc (vm, (i8 *) pool_name, size, numa, 0, pri);
 509   if (error)
 510     return error;
 511
 512   pr = vlib_physmem_get_region (vm, pri[0]);
 513
 514   mp =
 515     rte_mempool_create_empty ((i8 *) pool_name, num_elts, elt_size,
 516                               512, pool_priv_size, numa, 0);
 517   if (!mp)
 518     return clib_error_return (0, "failed to create %s", pool_name);
 519
 520   rte_mempool_set_ops_byname (mp, RTE_MBUF_DEFAULT_MEMPOOL_OPS, NULL);
 521
 522   ret =
 523     rte_mempool_populate_phys_tab (mp, pr->mem, pr->page_table, pr->n_pages,
 524                                    pr->log2_page_size, NULL, NULL);
 525   if (ret != (i32) mp->size)
 526     {
 527       rte_mempool_free (mp);
 528       return clib_error_return (0, "failed to populate %s", pool_name);
 529     }
 530
 531   _mp[0] = mp;
 532
 533   return 0;
 534 }
 535
 536 clib_error_t *
 537 dpdk_buffer_pool_create (vlib_main_t * vm, unsigned num_mbufs,
 538                          unsigned socket_id)
 539 {
 540   dpdk_main_t *dm = &dpdk_main;
 541   struct rte_mempool *rmp;
 542   dpdk_mempool_private_t priv;
 543   vlib_physmem_region_index_t pri;
 544   clib_error_t *error = 0;
 545   u8 *pool_name;
 546   u32 elt_size, i;
 547
 548   vec_validate_aligned (dm->pktmbuf_pools, socket_id, CLIB_CACHE_LINE_BYTES);
 549
 550   /* pool already exists, nothing to do */
 551   if (dm->pktmbuf_pools[socket_id])
 552     return 0;
 553
 554   pool_name = format (0, "dpdk_mbuf_pool_socket%u%c", socket_id, 0);
 555
 556   elt_size = sizeof (struct rte_mbuf) +
 557     VLIB_BUFFER_HDR_SIZE /* priv size */  +
 558     VLIB_BUFFER_PRE_DATA_SIZE + VLIB_BUFFER_DATA_SIZE;  /*data room size */
 559
 560   error =
 561     dpdk_pool_create (vm, pool_name, elt_size, num_mbufs,
 562                       sizeof (dpdk_mempool_private_t), 512, socket_id,
 563                       &rmp, &pri);
 564
 565   vec_free (pool_name);
 566
 567   if (!error)
 568     {
 569       priv.mbp_priv.mbuf_data_room_size = VLIB_BUFFER_PRE_DATA_SIZE +
 570         VLIB_BUFFER_DATA_SIZE;
 571       priv.mbp_priv.mbuf_priv_size = VLIB_BUFFER_HDR_SIZE;
 572
 573       /* call the mempool priv initializer */
 574       rte_pktmbuf_pool_init (rmp, &priv);
 575
 576       /* call the object initializers */
 577       rte_mempool_obj_iter (rmp, rte_pktmbuf_init, 0);
 578
 579       dpdk_mempool_private_t *privp = rte_mempool_get_priv (rmp);
 580       privp->buffer_pool_index = vlib_buffer_add_physmem_region (vm, pri);
 581
 582       dm->pktmbuf_pools[socket_id] = rmp;
 583
 584       return 0;
 585     }
 586
 587   clib_error_report (error);
 588
 589   /* no usable pool for this socket, try to use pool from another one */
 590   for (i = 0; i < vec_len (dm->pktmbuf_pools); i++)
 591     {
 592       if (dm->pktmbuf_pools[i])
 593         {
 594           clib_warning ("WARNING: Failed to allocate mempool for CPU socket "
 595                         "%u. Threads running on socket %u will use socket %u "
 596                         "mempool.", socket_id, socket_id, i);
 597           dm->pktmbuf_pools[socket_id] = dm->pktmbuf_pools[i];
 598           return 0;
 599         }
 600     }
 601
 602   return clib_error_return (0, "failed to allocate mempool on socket %u",
 603                             socket_id);
 604 }
 605
 606 #if CLIB_DEBUG > 0
 607
 608 u32 *vlib_buffer_state_validation_lock;
 609 uword *vlib_buffer_state_validation_hash;
 610 void *vlib_buffer_state_heap;
 611
 612 static clib_error_t *
 613 buffer_state_validation_init (vlib_main_t * vm)
 614 {
 615   void *oldheap;
 616
 617   vlib_buffer_state_heap = mheap_alloc (0, 10 << 20);
 618
 619   oldheap = clib_mem_set_heap (vlib_buffer_state_heap);
 620
 621   vlib_buffer_state_validation_hash = hash_create (0, sizeof (uword));
 622   vec_validate_aligned (vlib_buffer_state_validation_lock, 0,
 623                         CLIB_CACHE_LINE_BYTES);
 624   clib_mem_set_heap (oldheap);
 625   return 0;
 626 }
 627
 628 VLIB_INIT_FUNCTION (buffer_state_validation_init);
 629 #endif
 630
 631 #if CLI_DEBUG
 632 struct dpdk_validate_buf_result
 633 {
 634   u32 invalid;
 635   u32 uninitialized;
 636 };
 637
 638 #define DPDK_TRAJECTORY_POISON 31
 639
 640 static void
 641 dpdk_buffer_validate_trajectory (struct rte_mempool *mp, void *opaque,
 642                                  void *obj, unsigned obj_idx)
 643 {
 644   vlib_buffer_t *b;
 645   struct dpdk_validate_buf_result *counter = opaque;
 646   b = vlib_buffer_from_rte_mbuf ((struct rte_mbuf *) obj);
 647   if (b->pre_data[0] != 0)
 648     {
 649       if (b->pre_data[0] == DPDK_TRAJECTORY_POISON)
 650         counter->uninitialized++;
 651       else
 652         counter->invalid++;
 653     }
 654 }
 655
 656 int
 657 dpdk_buffer_validate_trajectory_all (u32 * uninitialized)
 658 {
 659   dpdk_main_t *dm = &dpdk_main;
 660   struct dpdk_validate_buf_result counter = { 0 };
 661   int i;
 662
 663   for (i = 0; i < vec_len (dm->pktmbuf_pools); i++)
 664     rte_mempool_obj_iter (dm->pktmbuf_pools[i],
 665                           dpdk_buffer_validate_trajectory, &counter);
 666   if (uninitialized)
 667     *uninitialized = counter.uninitialized;
 668   return counter.invalid;
 669 }
 670
 671 static void
 672 dpdk_buffer_poison_trajectory (struct rte_mempool *mp, void *opaque,
 673                                void *obj, unsigned obj_idx)
 674 {
 675   vlib_buffer_t *b;
 676   b = vlib_buffer_from_rte_mbuf ((struct rte_mbuf *) obj);
 677   b->pre_data[0] = DPDK_TRAJECTORY_POISON;
 678 }
 679
 680 void
 681 dpdk_buffer_poison_trajectory_all (void)
 682 {
 683   dpdk_main_t *dm = &dpdk_main;
 684   int i;
 685
 686   for (i = 0; i < vec_len (dm->pktmbuf_pools); i++)
 687     rte_mempool_obj_iter (dm->pktmbuf_pools[i], dpdk_buffer_poison_trajectory,
 688                           0);
 689 }
 690 #endif
 691
 692 /* *INDENT-OFF* */
 693 VLIB_BUFFER_REGISTER_CALLBACKS (dpdk, static) = {
 694   .vlib_buffer_alloc_cb = &dpdk_buffer_alloc,
 695   .vlib_buffer_alloc_from_free_list_cb = &dpdk_buffer_alloc_from_free_list,
 696   .vlib_buffer_free_cb = &dpdk_buffer_free,
 697   .vlib_buffer_free_no_next_cb = &dpdk_buffer_free_no_next,
 698   .vlib_packet_template_init_cb = &dpdk_packet_template_init,
 699   .vlib_buffer_delete_free_list_cb = &dpdk_buffer_delete_free_list,
 700 };
 701 /* *INDENT-ON* */
 702
 703 #if __x86_64__
 704 vlib_buffer_alloc_cb_t __clib_weak dpdk_buffer_alloc_avx512;
 705 vlib_buffer_alloc_cb_t __clib_weak dpdk_buffer_alloc_avx2;
 706 vlib_buffer_alloc_from_free_list_cb_t __clib_weak
 707   dpdk_buffer_alloc_from_free_list_avx512;
 708 vlib_buffer_alloc_from_free_list_cb_t __clib_weak
 709   dpdk_buffer_alloc_from_free_list_avx2;
 710 vlib_buffer_free_cb_t __clib_weak dpdk_buffer_free_avx512;
 711 vlib_buffer_free_cb_t __clib_weak dpdk_buffer_free_avx2;
 712 vlib_buffer_free_no_next_cb_t __clib_weak dpdk_buffer_free_no_next_avx512;
 713 vlib_buffer_free_no_next_cb_t __clib_weak dpdk_buffer_free_no_next_avx2;
 714
 715 static void __clib_constructor
 716 dpdk_input_multiarch_select (void)
 717 {
 718   vlib_buffer_callbacks_t *cb = &__dpdk_buffer_callbacks;
 719   if (dpdk_buffer_alloc_avx512 && clib_cpu_supports_avx512f ())
 720     {
 721       cb->vlib_buffer_alloc_cb = dpdk_buffer_alloc_avx512;
 722       cb->vlib_buffer_alloc_from_free_list_cb =
 723         dpdk_buffer_alloc_from_free_list_avx512;
 724       cb->vlib_buffer_free_cb = dpdk_buffer_free_avx512;
 725       cb->vlib_buffer_free_no_next_cb = dpdk_buffer_free_no_next_avx512;
 726     }
 727   else if (dpdk_buffer_alloc_avx2 && clib_cpu_supports_avx2 ())
 728     {
 729       cb->vlib_buffer_alloc_cb = dpdk_buffer_alloc_avx2;
 730       cb->vlib_buffer_alloc_from_free_list_cb =
 731         dpdk_buffer_alloc_from_free_list_avx2;
 732       cb->vlib_buffer_free_cb = dpdk_buffer_free_avx2;
 733       cb->vlib_buffer_free_no_next_cb = dpdk_buffer_free_no_next_avx2;
 734     }
 735 }
 736 #endif
 737 #endif
 738
 739 /** @endcond */
 740 /*
 741  * fd.io coding-style-patch-verification: ON
 742  *
 743  * Local Variables:
 744  * eval: (c-set-style "gnu")
 745  * End:
 746  */