examples/l2fwd-crypto/main.c

   1 /*-
   2  *   BSD LICENSE
   3  *
   4  *   Copyright(c) 2015-2016 Intel Corporation. All rights reserved.
   5  *   All rights reserved.
   6  *
   7  *   Redistribution and use in source and binary forms, with or without
   8  *   modification, are permitted provided that the following conditions
   9  *   are met:
  10  *
  11  *     * Redistributions of source code must retain the above copyright
  12  *       notice, this list of conditions and the following disclaimer.
  13  *     * Redistributions in binary form must reproduce the above copyright
  14  *       notice, this list of conditions and the following disclaimer in
  15  *       the documentation and/or other materials provided with the
  16  *       distribution.
  17  *     * Neither the name of Intel Corporation nor the names of its
  18  *       contributors may be used to endorse or promote products derived
  19  *       from this software without specific prior written permission.
  20  *
  21  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  22  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  23  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  24  *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  25  *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  26  *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  27  *   LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  28  *   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  29  *   THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30  *   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  31  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include <time.h>
  35 #include <stdio.h>
  36 #include <stdlib.h>
  37 #include <string.h>
  38 #include <stdint.h>
  39 #include <inttypes.h>
  40 #include <sys/types.h>
  41 #include <sys/queue.h>
  42 #include <netinet/in.h>
  43 #include <setjmp.h>
  44 #include <stdarg.h>
  45 #include <ctype.h>
  46 #include <errno.h>
  47 #include <getopt.h>
  48
  49 #include <rte_atomic.h>
  50 #include <rte_branch_prediction.h>
  51 #include <rte_common.h>
  52 #include <rte_cryptodev.h>
  53 #include <rte_cycles.h>
  54 #include <rte_debug.h>
  55 #include <rte_eal.h>
  56 #include <rte_ether.h>
  57 #include <rte_ethdev.h>
  58 #include <rte_interrupts.h>
  59 #include <rte_ip.h>
  60 #include <rte_launch.h>
  61 #include <rte_lcore.h>
  62 #include <rte_log.h>
  63 #include <rte_malloc.h>
  64 #include <rte_mbuf.h>
  65 #include <rte_memcpy.h>
  66 #include <rte_memory.h>
  67 #include <rte_mempool.h>
  68 #include <rte_memzone.h>
  69 #include <rte_pci.h>
  70 #include <rte_per_lcore.h>
  71 #include <rte_prefetch.h>
  72 #include <rte_random.h>
  73 #include <rte_ring.h>
  74
  75 enum cdev_type {
  76         CDEV_TYPE_ANY,
  77         CDEV_TYPE_HW,
  78         CDEV_TYPE_SW
  79 };
  80
  81 #define RTE_LOGTYPE_L2FWD RTE_LOGTYPE_USER1
  82
  83 #define NB_MBUF   8192
  84
  85 #define MAX_STR_LEN 32
  86 #define MAX_KEY_SIZE 128
  87 #define MAX_PKT_BURST 32
  88 #define BURST_TX_DRAIN_US 100 /* TX drain every ~100us */
  89
  90 /*
  91  * Configurable number of RX/TX ring descriptors
  92  */
  93 #define RTE_TEST_RX_DESC_DEFAULT 128
  94 #define RTE_TEST_TX_DESC_DEFAULT 512
  95
  96 static uint16_t nb_rxd = RTE_TEST_RX_DESC_DEFAULT;
  97 static uint16_t nb_txd = RTE_TEST_TX_DESC_DEFAULT;
  98
  99 /* ethernet addresses of ports */
 100 static struct ether_addr l2fwd_ports_eth_addr[RTE_MAX_ETHPORTS];
 101
 102 /* mask of enabled ports */
 103 static uint64_t l2fwd_enabled_port_mask;
 104 static uint64_t l2fwd_enabled_crypto_mask;
 105
 106 /* list of enabled ports */
 107 static uint32_t l2fwd_dst_ports[RTE_MAX_ETHPORTS];
 108
 109
 110 struct pkt_buffer {
 111         unsigned len;
 112         struct rte_mbuf *buffer[MAX_PKT_BURST];
 113 };
 114
 115 struct op_buffer {
 116         unsigned len;
 117         struct rte_crypto_op *buffer[MAX_PKT_BURST];
 118 };
 119
 120 #define MAX_RX_QUEUE_PER_LCORE 16
 121 #define MAX_TX_QUEUE_PER_PORT 16
 122
 123 enum l2fwd_crypto_xform_chain {
 124         L2FWD_CRYPTO_CIPHER_HASH,
 125         L2FWD_CRYPTO_HASH_CIPHER,
 126         L2FWD_CRYPTO_CIPHER_ONLY,
 127         L2FWD_CRYPTO_HASH_ONLY
 128 };
 129
 130 struct l2fwd_key {
 131         uint8_t *data;
 132         uint32_t length;
 133         phys_addr_t phys_addr;
 134 };
 135
 136 /** l2fwd crypto application command line options */
 137 struct l2fwd_crypto_options {
 138         unsigned portmask;
 139         unsigned nb_ports_per_lcore;
 140         unsigned refresh_period;
 141         unsigned single_lcore:1;
 142
 143         enum cdev_type type;
 144         unsigned sessionless:1;
 145
 146         enum l2fwd_crypto_xform_chain xform_chain;
 147
 148         struct rte_crypto_sym_xform cipher_xform;
 149         unsigned ckey_param;
 150
 151         struct l2fwd_key iv;
 152         unsigned iv_param;
 153
 154         struct rte_crypto_sym_xform auth_xform;
 155         uint8_t akey_param;
 156
 157         struct l2fwd_key aad;
 158         unsigned aad_param;
 159
 160         uint16_t block_size;
 161         char string_auth_algo[MAX_STR_LEN];
 162         char string_cipher_algo[MAX_STR_LEN];
 163         char string_type[MAX_STR_LEN];
 164 };
 165
 166 /** l2fwd crypto lcore params */
 167 struct l2fwd_crypto_params {
 168         uint8_t dev_id;
 169         uint8_t qp_id;
 170
 171         unsigned digest_length;
 172         unsigned block_size;
 173
 174         struct l2fwd_key iv;
 175         struct l2fwd_key aad;
 176         struct rte_cryptodev_sym_session *session;
 177
 178         uint8_t do_cipher;
 179         uint8_t do_hash;
 180         uint8_t hash_verify;
 181
 182         enum rte_crypto_cipher_algorithm cipher_algo;
 183         enum rte_crypto_auth_algorithm auth_algo;
 184 };
 185
 186 /** lcore configuration */
 187 struct lcore_queue_conf {
 188         unsigned nb_rx_ports;
 189         unsigned rx_port_list[MAX_RX_QUEUE_PER_LCORE];
 190
 191         unsigned nb_crypto_devs;
 192         unsigned cryptodev_list[MAX_RX_QUEUE_PER_LCORE];
 193
 194         struct op_buffer op_buf[RTE_MAX_ETHPORTS];
 195         struct pkt_buffer pkt_buf[RTE_MAX_ETHPORTS];
 196 } __rte_cache_aligned;
 197
 198 struct lcore_queue_conf lcore_queue_conf[RTE_MAX_LCORE];
 199
 200 static const struct rte_eth_conf port_conf = {
 201         .rxmode = {
 202                 .mq_mode = ETH_MQ_RX_NONE,
 203                 .max_rx_pkt_len = ETHER_MAX_LEN,
 204                 .split_hdr_size = 0,
 205                 .header_split   = 0, /**< Header Split disabled */
 206                 .hw_ip_checksum = 0, /**< IP checksum offload disabled */
 207                 .hw_vlan_filter = 0, /**< VLAN filtering disabled */
 208                 .jumbo_frame    = 0, /**< Jumbo Frame Support disabled */
 209                 .hw_strip_crc   = 0, /**< CRC stripped by hardware */
 210         },
 211         .txmode = {
 212                 .mq_mode = ETH_MQ_TX_NONE,
 213         },
 214 };
 215
 216 struct rte_mempool *l2fwd_pktmbuf_pool;
 217 struct rte_mempool *l2fwd_crypto_op_pool;
 218
 219 /* Per-port statistics struct */
 220 struct l2fwd_port_statistics {
 221         uint64_t tx;
 222         uint64_t rx;
 223
 224         uint64_t crypto_enqueued;
 225         uint64_t crypto_dequeued;
 226
 227         uint64_t dropped;
 228 } __rte_cache_aligned;
 229
 230 struct l2fwd_crypto_statistics {
 231         uint64_t enqueued;
 232         uint64_t dequeued;
 233
 234         uint64_t errors;
 235 } __rte_cache_aligned;
 236
 237 struct l2fwd_port_statistics port_statistics[RTE_MAX_ETHPORTS];
 238 struct l2fwd_crypto_statistics crypto_statistics[RTE_MAX_ETHPORTS];
 239
 240 /* A tsc-based timer responsible for triggering statistics printout */
 241 #define TIMER_MILLISECOND 2000000ULL /* around 1ms at 2 Ghz */
 242 #define MAX_TIMER_PERIOD 86400UL /* 1 day max */
 243
 244 /* default period is 10 seconds */
 245 static int64_t timer_period = 10 * TIMER_MILLISECOND * 1000;
 246
 247 /* Print out statistics on packets dropped */
 248 static void
 249 print_stats(void)
 250 {
 251         uint64_t total_packets_dropped, total_packets_tx, total_packets_rx;
 252         uint64_t total_packets_enqueued, total_packets_dequeued,
 253                 total_packets_errors;
 254         unsigned portid;
 255         uint64_t cdevid;
 256
 257         total_packets_dropped = 0;
 258         total_packets_tx = 0;
 259         total_packets_rx = 0;
 260         total_packets_enqueued = 0;
 261         total_packets_dequeued = 0;
 262         total_packets_errors = 0;
 263
 264         const char clr[] = { 27, '[', '2', 'J', '\0' };
 265         const char topLeft[] = { 27, '[', '1', ';', '1', 'H', '\0' };
 266
 267                 /* Clear screen and move to top left */
 268         printf("%s%s", clr, topLeft);
 269
 270         printf("\nPort statistics ====================================");
 271
 272         for (portid = 0; portid < RTE_MAX_ETHPORTS; portid++) {
 273                 /* skip disabled ports */
 274                 if ((l2fwd_enabled_port_mask & (1 << portid)) == 0)
 275                         continue;
 276                 printf("\nStatistics for port %u ------------------------------"
 277                            "\nPackets sent: %32"PRIu64
 278                            "\nPackets received: %28"PRIu64
 279                            "\nPackets dropped: %29"PRIu64,
 280                            portid,
 281                            port_statistics[portid].tx,
 282                            port_statistics[portid].rx,
 283                            port_statistics[portid].dropped);
 284
 285                 total_packets_dropped += port_statistics[portid].dropped;
 286                 total_packets_tx += port_statistics[portid].tx;
 287                 total_packets_rx += port_statistics[portid].rx;
 288         }
 289         printf("\nCrypto statistics ==================================");
 290
 291         for (cdevid = 0; cdevid < RTE_CRYPTO_MAX_DEVS; cdevid++) {
 292                 /* skip disabled ports */
 293                 if ((l2fwd_enabled_crypto_mask & (1lu << cdevid)) == 0)
 294                         continue;
 295                 printf("\nStatistics for cryptodev %"PRIu64
 296                                 " -------------------------"
 297                            "\nPackets enqueued: %28"PRIu64
 298                            "\nPackets dequeued: %28"PRIu64
 299                            "\nPackets errors: %30"PRIu64,
 300                            cdevid,
 301                            crypto_statistics[cdevid].enqueued,
 302                            crypto_statistics[cdevid].dequeued,
 303                            crypto_statistics[cdevid].errors);
 304
 305                 total_packets_enqueued += crypto_statistics[cdevid].enqueued;
 306                 total_packets_dequeued += crypto_statistics[cdevid].dequeued;
 307                 total_packets_errors += crypto_statistics[cdevid].errors;
 308         }
 309         printf("\nAggregate statistics ==============================="
 310                    "\nTotal packets received: %22"PRIu64
 311                    "\nTotal packets enqueued: %22"PRIu64
 312                    "\nTotal packets dequeued: %22"PRIu64
 313                    "\nTotal packets sent: %26"PRIu64
 314                    "\nTotal packets dropped: %23"PRIu64
 315                    "\nTotal packets crypto errors: %17"PRIu64,
 316                    total_packets_rx,
 317                    total_packets_enqueued,
 318                    total_packets_dequeued,
 319                    total_packets_tx,
 320                    total_packets_dropped,
 321                    total_packets_errors);
 322         printf("\n====================================================\n");
 323 }
 324
 325
 326
 327 static int
 328 l2fwd_crypto_send_burst(struct lcore_queue_conf *qconf, unsigned n,
 329                 struct l2fwd_crypto_params *cparams)
 330 {
 331         struct rte_crypto_op **op_buffer;
 332         unsigned ret;
 333
 334         op_buffer = (struct rte_crypto_op **)
 335                         qconf->op_buf[cparams->dev_id].buffer;
 336
 337         ret = rte_cryptodev_enqueue_burst(cparams->dev_id,
 338                         cparams->qp_id, op_buffer, (uint16_t) n);
 339
 340         crypto_statistics[cparams->dev_id].enqueued += ret;
 341         if (unlikely(ret < n)) {
 342                 crypto_statistics[cparams->dev_id].errors += (n - ret);
 343                 do {
 344                         rte_pktmbuf_free(op_buffer[ret]->sym->m_src);
 345                         rte_crypto_op_free(op_buffer[ret]);
 346                 } while (++ret < n);
 347         }
 348
 349         return 0;
 350 }
 351
 352 static int
 353 l2fwd_crypto_enqueue(struct rte_crypto_op *op,
 354                 struct l2fwd_crypto_params *cparams)
 355 {
 356         unsigned lcore_id, len;
 357         struct lcore_queue_conf *qconf;
 358
 359         lcore_id = rte_lcore_id();
 360
 361         qconf = &lcore_queue_conf[lcore_id];
 362         len = qconf->op_buf[cparams->dev_id].len;
 363         qconf->op_buf[cparams->dev_id].buffer[len] = op;
 364         len++;
 365
 366         /* enough ops to be sent */
 367         if (len == MAX_PKT_BURST) {
 368                 l2fwd_crypto_send_burst(qconf, MAX_PKT_BURST, cparams);
 369                 len = 0;
 370         }
 371
 372         qconf->op_buf[cparams->dev_id].len = len;
 373         return 0;
 374 }
 375
 376 static int
 377 l2fwd_simple_crypto_enqueue(struct rte_mbuf *m,
 378                 struct rte_crypto_op *op,
 379                 struct l2fwd_crypto_params *cparams)
 380 {
 381         struct ether_hdr *eth_hdr;
 382         struct ipv4_hdr *ip_hdr;
 383
 384         unsigned ipdata_offset, pad_len, data_len;
 385         char *padding;
 386
 387         eth_hdr = rte_pktmbuf_mtod(m, struct ether_hdr *);
 388
 389         if (eth_hdr->ether_type != rte_cpu_to_be_16(ETHER_TYPE_IPv4))
 390                 return -1;
 391
 392         ipdata_offset = sizeof(struct ether_hdr);
 393
 394         ip_hdr = (struct ipv4_hdr *)(rte_pktmbuf_mtod(m, char *) +
 395                         ipdata_offset);
 396
 397         ipdata_offset += (ip_hdr->version_ihl & IPV4_HDR_IHL_MASK)
 398                         * IPV4_IHL_MULTIPLIER;
 399
 400
 401         /* Zero pad data to be crypto'd so it is block aligned */
 402         data_len  = rte_pktmbuf_data_len(m) - ipdata_offset;
 403         pad_len = data_len % cparams->block_size ? cparams->block_size -
 404                         (data_len % cparams->block_size) : 0;
 405
 406         if (pad_len) {
 407                 padding = rte_pktmbuf_append(m, pad_len);
 408                 if (unlikely(!padding))
 409                         return -1;
 410
 411                 data_len += pad_len;
 412                 memset(padding, 0, pad_len);
 413         }
 414
 415         /* Set crypto operation data parameters */
 416         rte_crypto_op_attach_sym_session(op, cparams->session);
 417
 418         if (cparams->do_hash) {
 419                 if (!cparams->hash_verify) {
 420                         /* Append space for digest to end of packet */
 421                         op->sym->auth.digest.data = (uint8_t *)rte_pktmbuf_append(m,
 422                                 cparams->digest_length);
 423                 } else {
 424                         op->sym->auth.digest.data = (uint8_t *)rte_pktmbuf_append(m,
 425                                 cparams->digest_length);
 426                 }
 427
 428                 op->sym->auth.digest.phys_addr = rte_pktmbuf_mtophys_offset(m,
 429                                 rte_pktmbuf_pkt_len(m) - cparams->digest_length);
 430                 op->sym->auth.digest.length = cparams->digest_length;
 431
 432                 /* For SNOW3G algorithms, offset/length must be in bits */
 433                 if (cparams->auth_algo == RTE_CRYPTO_AUTH_SNOW3G_UIA2) {
 434                         op->sym->auth.data.offset = ipdata_offset << 3;
 435                         op->sym->auth.data.length = data_len << 3;
 436                 } else {
 437                         op->sym->auth.data.offset = ipdata_offset;
 438                         op->sym->auth.data.length = data_len;
 439                 }
 440
 441                 if (cparams->aad.length) {
 442                         op->sym->auth.aad.data = cparams->aad.data;
 443                         op->sym->auth.aad.phys_addr = cparams->aad.phys_addr;
 444                         op->sym->auth.aad.length = cparams->aad.length;
 445                 }
 446         }
 447
 448         if (cparams->do_cipher) {
 449                 op->sym->cipher.iv.data = cparams->iv.data;
 450                 op->sym->cipher.iv.phys_addr = cparams->iv.phys_addr;
 451                 op->sym->cipher.iv.length = cparams->iv.length;
 452
 453                 /* For SNOW3G algorithms, offset/length must be in bits */
 454                 if (cparams->cipher_algo == RTE_CRYPTO_CIPHER_SNOW3G_UEA2) {
 455                         op->sym->cipher.data.offset = ipdata_offset << 3;
 456                         if (cparams->do_hash && cparams->hash_verify)
 457                                 /* Do not cipher the hash tag */
 458                                 op->sym->cipher.data.length = (data_len -
 459                                         cparams->digest_length) << 3;
 460                         else
 461                                 op->sym->cipher.data.length = data_len << 3;
 462
 463                 } else {
 464                         op->sym->cipher.data.offset = ipdata_offset;
 465                         if (cparams->do_hash && cparams->hash_verify)
 466                                 /* Do not cipher the hash tag */
 467                                 op->sym->cipher.data.length = data_len -
 468                                         cparams->digest_length;
 469                         else
 470                                 op->sym->cipher.data.length = data_len;
 471                 }
 472         }
 473
 474         op->sym->m_src = m;
 475
 476         return l2fwd_crypto_enqueue(op, cparams);
 477 }
 478
 479
 480 /* Send the burst of packets on an output interface */
 481 static int
 482 l2fwd_send_burst(struct lcore_queue_conf *qconf, unsigned n,
 483                 uint8_t port)
 484 {
 485         struct rte_mbuf **pkt_buffer;
 486         unsigned ret;
 487
 488         pkt_buffer = (struct rte_mbuf **)qconf->pkt_buf[port].buffer;
 489
 490         ret = rte_eth_tx_burst(port, 0, pkt_buffer, (uint16_t)n);
 491         port_statistics[port].tx += ret;
 492         if (unlikely(ret < n)) {
 493                 port_statistics[port].dropped += (n - ret);
 494                 do {
 495                         rte_pktmbuf_free(pkt_buffer[ret]);
 496                 } while (++ret < n);
 497         }
 498
 499         return 0;
 500 }
 501
 502 /* Enqueue packets for TX and prepare them to be sent */
 503 static int
 504 l2fwd_send_packet(struct rte_mbuf *m, uint8_t port)
 505 {
 506         unsigned lcore_id, len;
 507         struct lcore_queue_conf *qconf;
 508
 509         lcore_id = rte_lcore_id();
 510
 511         qconf = &lcore_queue_conf[lcore_id];
 512         len = qconf->pkt_buf[port].len;
 513         qconf->pkt_buf[port].buffer[len] = m;
 514         len++;
 515
 516         /* enough pkts to be sent */
 517         if (unlikely(len == MAX_PKT_BURST)) {
 518                 l2fwd_send_burst(qconf, MAX_PKT_BURST, port);
 519                 len = 0;
 520         }
 521
 522         qconf->pkt_buf[port].len = len;
 523         return 0;
 524 }
 525
 526 static void
 527 l2fwd_simple_forward(struct rte_mbuf *m, unsigned portid)
 528 {
 529         struct ether_hdr *eth;
 530         void *tmp;
 531         unsigned dst_port;
 532
 533         dst_port = l2fwd_dst_ports[portid];
 534         eth = rte_pktmbuf_mtod(m, struct ether_hdr *);
 535
 536         /* 02:00:00:00:00:xx */
 537         tmp = &eth->d_addr.addr_bytes[0];
 538         *((uint64_t *)tmp) = 0x000000000002 + ((uint64_t)dst_port << 40);
 539
 540         /* src addr */
 541         ether_addr_copy(&l2fwd_ports_eth_addr[dst_port], &eth->s_addr);
 542
 543         l2fwd_send_packet(m, (uint8_t) dst_port);
 544 }
 545
 546 /** Generate random key */
 547 static void
 548 generate_random_key(uint8_t *key, unsigned length)
 549 {
 550         unsigned i;
 551
 552         for (i = 0; i < length; i++)
 553                 key[i] = rand() % 0xff;
 554 }
 555
 556 static struct rte_cryptodev_sym_session *
 557 initialize_crypto_session(struct l2fwd_crypto_options *options,
 558                 uint8_t cdev_id)
 559 {
 560         struct rte_crypto_sym_xform *first_xform;
 561
 562         if (options->xform_chain == L2FWD_CRYPTO_CIPHER_HASH) {
 563                 first_xform = &options->cipher_xform;
 564                 first_xform->next = &options->auth_xform;
 565         } else if (options->xform_chain == L2FWD_CRYPTO_HASH_CIPHER) {
 566                 first_xform = &options->auth_xform;
 567                 first_xform->next = &options->cipher_xform;
 568         } else if (options->xform_chain == L2FWD_CRYPTO_CIPHER_ONLY) {
 569                 first_xform = &options->cipher_xform;
 570         } else {
 571                 first_xform = &options->auth_xform;
 572         }
 573
 574         /* Setup Cipher Parameters */
 575         return rte_cryptodev_sym_session_create(cdev_id, first_xform);
 576 }
 577
 578 static void
 579 l2fwd_crypto_options_print(struct l2fwd_crypto_options *options);
 580
 581 /* main processing loop */
 582 static void
 583 l2fwd_main_loop(struct l2fwd_crypto_options *options)
 584 {
 585         struct rte_mbuf *m, *pkts_burst[MAX_PKT_BURST];
 586         struct rte_crypto_op *ops_burst[MAX_PKT_BURST];
 587
 588         unsigned lcore_id = rte_lcore_id();
 589         uint64_t prev_tsc = 0, diff_tsc, cur_tsc, timer_tsc = 0;
 590         unsigned i, j, portid, nb_rx;
 591         struct lcore_queue_conf *qconf = &lcore_queue_conf[lcore_id];
 592         const uint64_t drain_tsc = (rte_get_tsc_hz() + US_PER_S - 1) /
 593                         US_PER_S * BURST_TX_DRAIN_US;
 594         struct l2fwd_crypto_params *cparams;
 595         struct l2fwd_crypto_params port_cparams[qconf->nb_crypto_devs];
 596
 597         if (qconf->nb_rx_ports == 0) {
 598                 RTE_LOG(INFO, L2FWD, "lcore %u has nothing to do\n", lcore_id);
 599                 return;
 600         }
 601
 602         RTE_LOG(INFO, L2FWD, "entering main loop on lcore %u\n", lcore_id);
 603
 604         l2fwd_crypto_options_print(options);
 605
 606         for (i = 0; i < qconf->nb_rx_ports; i++) {
 607
 608                 portid = qconf->rx_port_list[i];
 609                 RTE_LOG(INFO, L2FWD, " -- lcoreid=%u portid=%u\n", lcore_id,
 610                         portid);
 611         }
 612
 613         for (i = 0; i < qconf->nb_crypto_devs; i++) {
 614                 port_cparams[i].do_cipher = 0;
 615                 port_cparams[i].do_hash = 0;
 616
 617                 switch (options->xform_chain) {
 618                 case L2FWD_CRYPTO_CIPHER_HASH:
 619                 case L2FWD_CRYPTO_HASH_CIPHER:
 620                         port_cparams[i].do_cipher = 1;
 621                         port_cparams[i].do_hash = 1;
 622                         break;
 623                 case L2FWD_CRYPTO_HASH_ONLY:
 624                         port_cparams[i].do_hash = 1;
 625                         break;
 626                 case L2FWD_CRYPTO_CIPHER_ONLY:
 627                         port_cparams[i].do_cipher = 1;
 628                         break;
 629                 }
 630
 631                 port_cparams[i].dev_id = qconf->cryptodev_list[i];
 632                 port_cparams[i].qp_id = 0;
 633
 634                 port_cparams[i].block_size = options->block_size;
 635
 636                 if (port_cparams[i].do_hash) {
 637                         port_cparams[i].digest_length =
 638                                         options->auth_xform.auth.digest_length;
 639                         if (options->auth_xform.auth.add_auth_data_length) {
 640                                 port_cparams[i].aad.data = options->aad.data;
 641                                 port_cparams[i].aad.length =
 642                                         options->auth_xform.auth.add_auth_data_length;
 643                                 port_cparams[i].aad.phys_addr = options->aad.phys_addr;
 644                                 if (!options->aad_param)
 645                                         generate_random_key(port_cparams[i].aad.data,
 646                                                 sizeof(port_cparams[i].aad.length));
 647
 648                         }
 649
 650                         if (options->auth_xform.auth.op == RTE_CRYPTO_AUTH_OP_VERIFY)
 651                                 port_cparams[i].hash_verify = 1;
 652                         else
 653                                 port_cparams[i].hash_verify = 0;
 654
 655                         port_cparams[i].auth_algo = options->auth_xform.auth.algo;
 656                 }
 657
 658                 if (port_cparams[i].do_cipher) {
 659                         port_cparams[i].iv.data = options->iv.data;
 660                         port_cparams[i].iv.length = options->iv.length;
 661                         port_cparams[i].iv.phys_addr = options->iv.phys_addr;
 662                         if (!options->iv_param)
 663                                 generate_random_key(port_cparams[i].iv.data,
 664                                                 sizeof(port_cparams[i].iv.length));
 665
 666                         port_cparams[i].cipher_algo = options->cipher_xform.cipher.algo;
 667                 }
 668
 669                 port_cparams[i].session = initialize_crypto_session(options,
 670                                 port_cparams[i].dev_id);
 671
 672                 if (port_cparams[i].session == NULL)
 673                         return;
 674                 RTE_LOG(INFO, L2FWD, " -- lcoreid=%u cryptoid=%u\n", lcore_id,
 675                                 port_cparams[i].dev_id);
 676         }
 677
 678         while (1) {
 679
 680                 cur_tsc = rte_rdtsc();
 681
 682                 /*
 683                  * TX burst queue drain
 684                  */
 685                 diff_tsc = cur_tsc - prev_tsc;
 686                 if (unlikely(diff_tsc > drain_tsc)) {
 687                         for (portid = 0; portid < RTE_MAX_ETHPORTS; portid++) {
 688                                 if (qconf->pkt_buf[portid].len == 0)
 689                                         continue;
 690                                 l2fwd_send_burst(&lcore_queue_conf[lcore_id],
 691                                                  qconf->pkt_buf[portid].len,
 692                                                  (uint8_t) portid);
 693                                 qconf->pkt_buf[portid].len = 0;
 694                         }
 695
 696                         /* if timer is enabled */
 697                         if (timer_period > 0) {
 698
 699                                 /* advance the timer */
 700                                 timer_tsc += diff_tsc;
 701
 702                                 /* if timer has reached its timeout */
 703                                 if (unlikely(timer_tsc >=
 704                                                 (uint64_t)timer_period)) {
 705
 706                                         /* do this only on master core */
 707                                         if (lcore_id == rte_get_master_lcore()
 708                                                 && options->refresh_period) {
 709                                                 print_stats();
 710                                                 timer_tsc = 0;
 711                                         }
 712                                 }
 713                         }
 714
 715                         prev_tsc = cur_tsc;
 716                 }
 717
 718                 /*
 719                  * Read packet from RX queues
 720                  */
 721                 for (i = 0; i < qconf->nb_rx_ports; i++) {
 722                         portid = qconf->rx_port_list[i];
 723
 724                         cparams = &port_cparams[i];
 725
 726                         nb_rx = rte_eth_rx_burst((uint8_t) portid, 0,
 727                                                  pkts_burst, MAX_PKT_BURST);
 728
 729                         port_statistics[portid].rx += nb_rx;
 730
 731                         if (nb_rx) {
 732                                 /*
 733                                  * If we can't allocate a crypto_ops, then drop
 734                                  * the rest of the burst and dequeue and
 735                                  * process the packets to free offload structs
 736                                  */
 737                                 if (rte_crypto_op_bulk_alloc(
 738                                                 l2fwd_crypto_op_pool,
 739                                                 RTE_CRYPTO_OP_TYPE_SYMMETRIC,
 740                                                 ops_burst, nb_rx) !=
 741                                                                 nb_rx) {
 742                                         for (j = 0; j < nb_rx; j++)
 743                                                 rte_pktmbuf_free(pkts_burst[i]);
 744
 745                                         nb_rx = 0;
 746                                 }
 747
 748                                 /* Enqueue packets from Crypto device*/
 749                                 for (j = 0; j < nb_rx; j++) {
 750                                         m = pkts_burst[j];
 751
 752                                         l2fwd_simple_crypto_enqueue(m,
 753                                                         ops_burst[j], cparams);
 754                                 }
 755                         }
 756
 757                         /* Dequeue packets from Crypto device */
 758                         do {
 759                                 nb_rx = rte_cryptodev_dequeue_burst(
 760                                                 cparams->dev_id, cparams->qp_id,
 761                                                 ops_burst, MAX_PKT_BURST);
 762
 763                                 crypto_statistics[cparams->dev_id].dequeued +=
 764                                                 nb_rx;
 765
 766                                 /* Forward crypto'd packets */
 767                                 for (j = 0; j < nb_rx; j++) {
 768                                         m = ops_burst[j]->sym->m_src;
 769
 770                                         rte_crypto_op_free(ops_burst[j]);
 771                                         l2fwd_simple_forward(m, portid);
 772                                 }
 773                         } while (nb_rx == MAX_PKT_BURST);
 774                 }
 775         }
 776 }
 777
 778 static int
 779 l2fwd_launch_one_lcore(void *arg)
 780 {
 781         l2fwd_main_loop((struct l2fwd_crypto_options *)arg);
 782         return 0;
 783 }
 784
 785 /* Display command line arguments usage */
 786 static void
 787 l2fwd_crypto_usage(const char *prgname)
 788 {
 789         printf("%s [EAL options] --\n"
 790                 "  -p PORTMASK: hexadecimal bitmask of ports to configure\n"
 791                 "  -q NQ: number of queue (=ports) per lcore (default is 1)\n"
 792                 "  -s manage all ports from single lcore\n"
 793                 "  -T PERIOD: statistics will be refreshed each PERIOD seconds"
 794                 " (0 to disable, 10 default, 86400 maximum)\n"
 795
 796                 "  --cdev_type HW / SW / ANY\n"
 797                 "  --chain HASH_CIPHER / CIPHER_HASH\n"
 798
 799                 "  --cipher_algo ALGO\n"
 800                 "  --cipher_op ENCRYPT / DECRYPT\n"
 801                 "  --cipher_key KEY\n"
 802                 "  --iv IV\n"
 803
 804                 "  --auth_algo ALGO\n"
 805                 "  --auth_op GENERATE / VERIFY\n"
 806                 "  --auth_key KEY\n"
 807                 "  --aad AAD\n"
 808
 809                 "  --sessionless\n",
 810                prgname);
 811 }
 812
 813 /** Parse crypto device type command line argument */
 814 static int
 815 parse_cryptodev_type(enum cdev_type *type, char *optarg)
 816 {
 817         if (strcmp("HW", optarg) == 0) {
 818                 *type = CDEV_TYPE_HW;
 819                 return 0;
 820         } else if (strcmp("SW", optarg) == 0) {
 821                 *type = CDEV_TYPE_SW;
 822                 return 0;
 823         } else if (strcmp("ANY", optarg) == 0) {
 824                 *type = CDEV_TYPE_ANY;
 825                 return 0;
 826         }
 827
 828         return -1;
 829 }
 830
 831 /** Parse crypto chain xform command line argument */
 832 static int
 833 parse_crypto_opt_chain(struct l2fwd_crypto_options *options, char *optarg)
 834 {
 835         if (strcmp("CIPHER_HASH", optarg) == 0) {
 836                 options->xform_chain = L2FWD_CRYPTO_CIPHER_HASH;
 837                 return 0;
 838         } else if (strcmp("HASH_CIPHER", optarg) == 0) {
 839                 options->xform_chain = L2FWD_CRYPTO_HASH_CIPHER;
 840                 return 0;
 841         } else if (strcmp("CIPHER_ONLY", optarg) == 0) {
 842                 options->xform_chain = L2FWD_CRYPTO_CIPHER_ONLY;
 843                 return 0;
 844         } else if (strcmp("HASH_ONLY", optarg) == 0) {
 845                 options->xform_chain = L2FWD_CRYPTO_HASH_ONLY;
 846                 return 0;
 847         }
 848
 849         return -1;
 850 }
 851
 852 /** Parse crypto cipher algo option command line argument */
 853 static int
 854 parse_cipher_algo(enum rte_crypto_cipher_algorithm *algo, char *optarg)
 855 {
 856         if (strcmp("AES_CBC", optarg) == 0) {
 857                 *algo = RTE_CRYPTO_CIPHER_AES_CBC;
 858                 return 0;
 859         } else if (strcmp("AES_GCM", optarg) == 0) {
 860                 *algo = RTE_CRYPTO_CIPHER_AES_GCM;
 861                 return 0;
 862         } else if (strcmp("NULL", optarg) == 0) {
 863                 *algo = RTE_CRYPTO_CIPHER_NULL;
 864                 return 0;
 865         } else if (strcmp("SNOW3G_UEA2", optarg) == 0) {
 866                 *algo = RTE_CRYPTO_CIPHER_SNOW3G_UEA2;
 867                 return 0;
 868         }
 869
 870         printf("Cipher algorithm  not supported!\n");
 871         return -1;
 872 }
 873
 874 /** Parse crypto cipher operation command line argument */
 875 static int
 876 parse_cipher_op(enum rte_crypto_cipher_operation *op, char *optarg)
 877 {
 878         if (strcmp("ENCRYPT", optarg) == 0) {
 879                 *op = RTE_CRYPTO_CIPHER_OP_ENCRYPT;
 880                 return 0;
 881         } else if (strcmp("DECRYPT", optarg) == 0) {
 882                 *op = RTE_CRYPTO_CIPHER_OP_DECRYPT;
 883                 return 0;
 884         }
 885
 886         printf("Cipher operation not supported!\n");
 887         return -1;
 888 }
 889
 890 /** Parse crypto key command line argument */
 891 static int
 892 parse_key(uint8_t *data, char *input_arg)
 893 {
 894         unsigned byte_count;
 895         char *token;
 896
 897         for (byte_count = 0, token = strtok(input_arg, ":");
 898                         (byte_count < MAX_KEY_SIZE) && (token != NULL);
 899                         token = strtok(NULL, ":")) {
 900
 901                 int number = (int)strtol(token, NULL, 16);
 902
 903                 if (errno == EINVAL || errno == ERANGE || number > 0xFF)
 904                         return -1;
 905
 906                 data[byte_count++] = (uint8_t)number;
 907         }
 908
 909         return 0;
 910 }
 911
 912 /** Parse crypto cipher operation command line argument */
 913 static int
 914 parse_auth_algo(enum rte_crypto_auth_algorithm *algo, char *optarg)
 915 {
 916         if (strcmp("AES_GCM", optarg) == 0) {
 917                 *algo = RTE_CRYPTO_AUTH_AES_GCM;
 918                 return 0;
 919         } else if (strcmp("MD5_HMAC", optarg) == 0) {
 920                 *algo = RTE_CRYPTO_AUTH_MD5_HMAC;
 921                 return 0;
 922         } else if (strcmp("NULL", optarg) == 0) {
 923                 *algo = RTE_CRYPTO_AUTH_NULL;
 924                 return 0;
 925         } else if (strcmp("SHA1_HMAC", optarg) == 0) {
 926                 *algo = RTE_CRYPTO_AUTH_SHA1_HMAC;
 927                 return 0;
 928         } else if (strcmp("SHA224_HMAC", optarg) == 0) {
 929                 *algo = RTE_CRYPTO_AUTH_SHA224_HMAC;
 930                 return 0;
 931         } else if (strcmp("SHA256_HMAC", optarg) == 0) {
 932                 *algo = RTE_CRYPTO_AUTH_SHA256_HMAC;
 933                 return 0;
 934         }  else if (strcmp("SHA384_HMAC", optarg) == 0) {
 935                 *algo = RTE_CRYPTO_AUTH_SHA384_HMAC;
 936                 return 0;
 937         } else if (strcmp("SHA512_HMAC", optarg) == 0) {
 938                 *algo = RTE_CRYPTO_AUTH_SHA512_HMAC;
 939                 return 0;
 940         } else if (strcmp("SNOW3G_UIA2", optarg) == 0) {
 941                 *algo = RTE_CRYPTO_AUTH_SNOW3G_UIA2;
 942                 return 0;
 943         }
 944
 945         printf("Authentication algorithm specified not supported!\n");
 946         return -1;
 947 }
 948
 949 static int
 950 parse_auth_op(enum rte_crypto_auth_operation *op, char *optarg)
 951 {
 952         if (strcmp("VERIFY", optarg) == 0) {
 953                 *op = RTE_CRYPTO_AUTH_OP_VERIFY;
 954                 return 0;
 955         } else if (strcmp("GENERATE", optarg) == 0) {
 956                 *op = RTE_CRYPTO_AUTH_OP_GENERATE;
 957                 return 0;
 958         }
 959
 960         printf("Authentication operation specified not supported!\n");
 961         return -1;
 962 }
 963
 964 /** Parse long options */
 965 static int
 966 l2fwd_crypto_parse_args_long_options(struct l2fwd_crypto_options *options,
 967                 struct option *lgopts, int option_index)
 968 {
 969         int retval;
 970
 971         if (strcmp(lgopts[option_index].name, "cdev_type") == 0) {
 972                 retval = parse_cryptodev_type(&options->type, optarg);
 973                 if (retval == 0)
 974                         strcpy(options->string_type, optarg);
 975                 return retval;
 976         }
 977
 978         else if (strcmp(lgopts[option_index].name, "chain") == 0)
 979                 return parse_crypto_opt_chain(options, optarg);
 980
 981         /* Cipher options */
 982         else if (strcmp(lgopts[option_index].name, "cipher_algo") == 0) {
 983                 retval = parse_cipher_algo(&options->cipher_xform.cipher.algo,
 984                                 optarg);
 985                 if (retval == 0)
 986                         strcpy(options->string_cipher_algo, optarg);
 987                 return retval;
 988         }
 989
 990         else if (strcmp(lgopts[option_index].name, "cipher_op") == 0)
 991                 return parse_cipher_op(&options->cipher_xform.cipher.op,
 992                                 optarg);
 993
 994         else if (strcmp(lgopts[option_index].name, "cipher_key") == 0) {
 995                 options->ckey_param = 1;
 996                 return parse_key(options->cipher_xform.cipher.key.data, optarg);
 997         }
 998
 999         else if (strcmp(lgopts[option_index].name, "iv") == 0) {
1000                 options->iv_param = 1;
1001                 return parse_key(options->iv.data, optarg);
1002         }
1003
1004         /* Authentication options */
1005         else if (strcmp(lgopts[option_index].name, "auth_algo") == 0) {
1006                 retval = parse_auth_algo(&options->auth_xform.auth.algo,
1007                                 optarg);
1008                 if (retval == 0)
1009                         strcpy(options->string_auth_algo, optarg);
1010                 return retval;
1011         }
1012
1013         else if (strcmp(lgopts[option_index].name, "auth_op") == 0)
1014                 return parse_auth_op(&options->auth_xform.auth.op,
1015                                 optarg);
1016
1017         else if (strcmp(lgopts[option_index].name, "auth_key") == 0) {
1018                 options->akey_param = 1;
1019                 return parse_key(options->auth_xform.auth.key.data, optarg);
1020         }
1021
1022         else if (strcmp(lgopts[option_index].name, "aad") == 0) {
1023                 options->aad_param = 1;
1024                 return parse_key(options->aad.data, optarg);
1025         }
1026
1027         else if (strcmp(lgopts[option_index].name, "sessionless") == 0) {
1028                 options->sessionless = 1;
1029                 return 0;
1030         }
1031
1032         return -1;
1033 }
1034
1035 /** Parse port mask */
1036 static int
1037 l2fwd_crypto_parse_portmask(struct l2fwd_crypto_options *options,
1038                 const char *q_arg)
1039 {
1040         char *end = NULL;
1041         unsigned long pm;
1042
1043         /* parse hexadecimal string */
1044         pm = strtoul(q_arg, &end, 16);
1045         if ((pm == '\0') || (end == NULL) || (*end != '\0'))
1046                 pm = 0;
1047
1048         options->portmask = pm;
1049         if (options->portmask == 0) {
1050                 printf("invalid portmask specified\n");
1051                 return -1;
1052         }
1053
1054         return pm;
1055 }
1056
1057 /** Parse number of queues */
1058 static int
1059 l2fwd_crypto_parse_nqueue(struct l2fwd_crypto_options *options,
1060                 const char *q_arg)
1061 {
1062         char *end = NULL;
1063         unsigned long n;
1064
1065         /* parse hexadecimal string */
1066         n = strtoul(q_arg, &end, 10);
1067         if ((q_arg[0] == '\0') || (end == NULL) || (*end != '\0'))
1068                 n = 0;
1069         else if (n >= MAX_RX_QUEUE_PER_LCORE)
1070                 n = 0;
1071
1072         options->nb_ports_per_lcore = n;
1073         if (options->nb_ports_per_lcore == 0) {
1074                 printf("invalid number of ports selected\n");
1075                 return -1;
1076         }
1077
1078         return 0;
1079 }
1080
1081 /** Parse timer period */
1082 static int
1083 l2fwd_crypto_parse_timer_period(struct l2fwd_crypto_options *options,
1084                 const char *q_arg)
1085 {
1086         char *end = NULL;
1087         unsigned long n;
1088
1089         /* parse number string */
1090         n = (unsigned)strtol(q_arg, &end, 10);
1091         if ((q_arg[0] == '\0') || (end == NULL) || (*end != '\0'))
1092                 n = 0;
1093
1094         if (n >= MAX_TIMER_PERIOD) {
1095                 printf("Warning refresh period specified %lu is greater than "
1096                                 "max value %lu! using max value",
1097                                 n, MAX_TIMER_PERIOD);
1098                 n = MAX_TIMER_PERIOD;
1099         }
1100
1101         options->refresh_period = n * 1000 * TIMER_MILLISECOND;
1102
1103         return 0;
1104 }
1105
1106 /** Generate default options for application */
1107 static void
1108 l2fwd_crypto_default_options(struct l2fwd_crypto_options *options)
1109 {
1110         srand(time(NULL));
1111
1112         options->portmask = 0xffffffff;
1113         options->nb_ports_per_lcore = 1;
1114         options->refresh_period = 10000;
1115         options->single_lcore = 0;
1116         options->sessionless = 0;
1117
1118         options->xform_chain = L2FWD_CRYPTO_CIPHER_HASH;
1119
1120         /* Cipher Data */
1121         options->cipher_xform.type = RTE_CRYPTO_SYM_XFORM_CIPHER;
1122         options->cipher_xform.next = NULL;
1123         options->ckey_param = 0;
1124         options->iv_param = 0;
1125
1126         options->cipher_xform.cipher.algo = RTE_CRYPTO_CIPHER_AES_CBC;
1127         options->cipher_xform.cipher.op = RTE_CRYPTO_CIPHER_OP_ENCRYPT;
1128
1129         /* Authentication Data */
1130         options->auth_xform.type = RTE_CRYPTO_SYM_XFORM_AUTH;
1131         options->auth_xform.next = NULL;
1132         options->akey_param = 0;
1133         options->aad_param = 0;
1134
1135         options->auth_xform.auth.algo = RTE_CRYPTO_AUTH_SHA1_HMAC;
1136         options->auth_xform.auth.op = RTE_CRYPTO_AUTH_OP_GENERATE;
1137
1138         options->type = CDEV_TYPE_ANY;
1139 }
1140
1141 static void
1142 l2fwd_crypto_options_print(struct l2fwd_crypto_options *options)
1143 {
1144         printf("Options:-\nn");
1145         printf("portmask: %x\n", options->portmask);
1146         printf("ports per lcore: %u\n", options->nb_ports_per_lcore);
1147         printf("refresh period : %u\n", options->refresh_period);
1148         printf("single lcore mode: %s\n",
1149                         options->single_lcore ? "enabled" : "disabled");
1150         printf("stats_printing: %s\n",
1151                         options->refresh_period == 0 ? "disabled" : "enabled");
1152
1153         printf("sessionless crypto: %s\n",
1154                         options->sessionless ? "enabled" : "disabled");
1155 }
1156
1157 /* Parse the argument given in the command line of the application */
1158 static int
1159 l2fwd_crypto_parse_args(struct l2fwd_crypto_options *options,
1160                 int argc, char **argv)
1161 {
1162         int opt, retval, option_index;
1163         char **argvopt = argv, *prgname = argv[0];
1164
1165         static struct option lgopts[] = {
1166                         { "sessionless", no_argument, 0, 0 },
1167
1168                         { "cdev_type", required_argument, 0, 0 },
1169                         { "chain", required_argument, 0, 0 },
1170
1171                         { "cipher_algo", required_argument, 0, 0 },
1172                         { "cipher_op", required_argument, 0, 0 },
1173                         { "cipher_key", required_argument, 0, 0 },
1174
1175                         { "auth_algo", required_argument, 0, 0 },
1176                         { "auth_op", required_argument, 0, 0 },
1177                         { "auth_key", required_argument, 0, 0 },
1178
1179                         { "iv", required_argument, 0, 0 },
1180                         { "aad", required_argument, 0, 0 },
1181
1182                         { "sessionless", no_argument, 0, 0 },
1183
1184                         { NULL, 0, 0, 0 }
1185         };
1186
1187         l2fwd_crypto_default_options(options);
1188
1189         while ((opt = getopt_long(argc, argvopt, "p:q:st:", lgopts,
1190                         &option_index)) != EOF) {
1191                 switch (opt) {
1192                 /* long options */
1193                 case 0:
1194                         retval = l2fwd_crypto_parse_args_long_options(options,
1195                                         lgopts, option_index);
1196                         if (retval < 0) {
1197                                 l2fwd_crypto_usage(prgname);
1198                                 return -1;
1199                         }
1200                         break;
1201
1202                 /* portmask */
1203                 case 'p':
1204                         retval = l2fwd_crypto_parse_portmask(options, optarg);
1205                         if (retval < 0) {
1206                                 l2fwd_crypto_usage(prgname);
1207                                 return -1;
1208                         }
1209                         break;
1210
1211                 /* nqueue */
1212                 case 'q':
1213                         retval = l2fwd_crypto_parse_nqueue(options, optarg);
1214                         if (retval < 0) {
1215                                 l2fwd_crypto_usage(prgname);
1216                                 return -1;
1217                         }
1218                         break;
1219
1220                 /* single  */
1221                 case 's':
1222                         options->single_lcore = 1;
1223
1224                         break;
1225
1226                 /* timer period */
1227                 case 'T':
1228                         retval = l2fwd_crypto_parse_timer_period(options,
1229                                         optarg);
1230                         if (retval < 0) {
1231                                 l2fwd_crypto_usage(prgname);
1232                                 return -1;
1233                         }
1234                         break;
1235
1236                 default:
1237                         l2fwd_crypto_usage(prgname);
1238                         return -1;
1239                 }
1240         }
1241
1242
1243         if (optind >= 0)
1244                 argv[optind-1] = prgname;
1245
1246         retval = optind-1;
1247         optind = 0; /* reset getopt lib */
1248
1249         return retval;
1250 }
1251
1252 /* Check the link status of all ports in up to 9s, and print them finally */
1253 static void
1254 check_all_ports_link_status(uint8_t port_num, uint32_t port_mask)
1255 {
1256 #define CHECK_INTERVAL 100 /* 100ms */
1257 #define MAX_CHECK_TIME 90 /* 9s (90 * 100ms) in total */
1258         uint8_t portid, count, all_ports_up, print_flag = 0;
1259         struct rte_eth_link link;
1260
1261         printf("\nChecking link status");
1262         fflush(stdout);
1263         for (count = 0; count <= MAX_CHECK_TIME; count++) {
1264                 all_ports_up = 1;
1265                 for (portid = 0; portid < port_num; portid++) {
1266                         if ((port_mask & (1 << portid)) == 0)
1267                                 continue;
1268                         memset(&link, 0, sizeof(link));
1269                         rte_eth_link_get_nowait(portid, &link);
1270                         /* print link status if flag set */
1271                         if (print_flag == 1) {
1272                                 if (link.link_status)
1273                                         printf("Port %d Link Up - speed %u "
1274                                                 "Mbps - %s\n", (uint8_t)portid,
1275                                                 (unsigned)link.link_speed,
1276                                 (link.link_duplex == ETH_LINK_FULL_DUPLEX) ?
1277                                         ("full-duplex") : ("half-duplex\n"));
1278                                 else
1279                                         printf("Port %d Link Down\n",
1280                                                 (uint8_t)portid);
1281                                 continue;
1282                         }
1283                         /* clear all_ports_up flag if any link down */
1284                         if (link.link_status == 0) {
1285                                 all_ports_up = 0;
1286                                 break;
1287                         }
1288                 }
1289                 /* after finally printing all link status, get out */
1290                 if (print_flag == 1)
1291                         break;
1292
1293                 if (all_ports_up == 0) {
1294                         printf(".");
1295                         fflush(stdout);
1296                         rte_delay_ms(CHECK_INTERVAL);
1297                 }
1298
1299                 /* set the print_flag if all ports up or timeout */
1300                 if (all_ports_up == 1 || count == (MAX_CHECK_TIME - 1)) {
1301                         print_flag = 1;
1302                         printf("done\n");
1303                 }
1304         }
1305 }
1306
1307 /* Check if device has to be HW/SW or any */
1308 static int
1309 check_type(struct l2fwd_crypto_options *options, struct rte_cryptodev_info *dev_info)
1310 {
1311         if (options->type == CDEV_TYPE_HW &&
1312                         (dev_info->feature_flags & RTE_CRYPTODEV_FF_HW_ACCELERATED))
1313                 return 0;
1314         if (options->type == CDEV_TYPE_SW &&
1315                         !(dev_info->feature_flags & RTE_CRYPTODEV_FF_HW_ACCELERATED))
1316                 return 0;
1317         if (options->type == CDEV_TYPE_ANY)
1318                 return 0;
1319
1320         return -1;
1321 }
1322
1323 static int
1324 initialize_cryptodevs(struct l2fwd_crypto_options *options, unsigned nb_ports,
1325                 uint8_t *enabled_cdevs)
1326 {
1327         unsigned i, cdev_id, cdev_count, enabled_cdev_count = 0;
1328         const struct rte_cryptodev_capabilities *cap;
1329         enum rte_crypto_auth_algorithm cap_auth_algo;
1330         enum rte_crypto_auth_algorithm opt_auth_algo;
1331         enum rte_crypto_cipher_algorithm cap_cipher_algo;
1332         enum rte_crypto_cipher_algorithm opt_cipher_algo;
1333         int retval;
1334
1335         cdev_count = rte_cryptodev_count();
1336         if (cdev_count == 0) {
1337                 printf("No crypto devices available\n");
1338                 return -1;
1339         }
1340
1341         for (cdev_id = 0; cdev_id < cdev_count && enabled_cdev_count < nb_ports;
1342                         cdev_id++) {
1343                 struct rte_cryptodev_qp_conf qp_conf;
1344                 struct rte_cryptodev_info dev_info;
1345
1346                 struct rte_cryptodev_config conf = {
1347                         .nb_queue_pairs = 1,
1348                         .socket_id = SOCKET_ID_ANY,
1349                         .session_mp = {
1350                                 .nb_objs = 2048,
1351                                 .cache_size = 64
1352                         }
1353                 };
1354
1355                 rte_cryptodev_info_get(cdev_id, &dev_info);
1356
1357                 /* Set cipher parameters */
1358                 if (options->xform_chain == L2FWD_CRYPTO_CIPHER_HASH ||
1359                                 options->xform_chain == L2FWD_CRYPTO_HASH_CIPHER ||
1360                                 options->xform_chain == L2FWD_CRYPTO_CIPHER_ONLY) {
1361                         /* Check if device supports cipher algo */
1362                         i = 0;
1363                         opt_cipher_algo = options->cipher_xform.cipher.algo;
1364                         cap = &dev_info.capabilities[i];
1365                         while (cap->op != RTE_CRYPTO_OP_TYPE_UNDEFINED) {
1366                                 cap_cipher_algo = cap->sym.cipher.algo;
1367                                 if (cap->sym.xform_type ==
1368                                                 RTE_CRYPTO_SYM_XFORM_CIPHER) {
1369                                         if (cap_cipher_algo == opt_cipher_algo) {
1370                                                 if (check_type(options, &dev_info) == 0)
1371                                                         break;
1372                                         }
1373                                 }
1374                                 cap = &dev_info.capabilities[++i];
1375                         }
1376
1377                         if (cap->op == RTE_CRYPTO_OP_TYPE_UNDEFINED) {
1378                                 printf("Algorithm %s not supported by cryptodev %u"
1379                                         " or device not of preferred type (%s)\n",
1380                                         options->string_cipher_algo, cdev_id,
1381                                         options->string_type);
1382                                 continue;
1383                         }
1384
1385                         options->block_size = cap->sym.cipher.block_size;
1386                         options->iv.length = cap->sym.cipher.iv_size.min;
1387                         options->cipher_xform.cipher.key.length =
1388                                                 cap->sym.cipher.key_size.min;
1389                         if (!options->ckey_param)
1390                                 generate_random_key(
1391                                         options->cipher_xform.cipher.key.data,
1392                                         options->cipher_xform.cipher.key.length);
1393
1394                 }
1395
1396                 /* Set auth parameters */
1397                 if (options->xform_chain == L2FWD_CRYPTO_CIPHER_HASH ||
1398                                 options->xform_chain == L2FWD_CRYPTO_HASH_CIPHER ||
1399                                 options->xform_chain == L2FWD_CRYPTO_HASH_ONLY) {
1400                         /* Check if device supports auth algo */
1401                         i = 0;
1402                         opt_auth_algo = options->auth_xform.auth.algo;
1403                         cap = &dev_info.capabilities[i];
1404                         while (cap->op != RTE_CRYPTO_OP_TYPE_UNDEFINED) {
1405                                 cap_auth_algo = cap->sym.auth.algo;
1406                                 if ((cap->sym.xform_type == RTE_CRYPTO_SYM_XFORM_AUTH) &&
1407                                                 (cap_auth_algo == opt_auth_algo) &&
1408                                                 (check_type(options, &dev_info) == 0)) {
1409                                         break;
1410                                 }
1411                                 cap = &dev_info.capabilities[++i];
1412                         }
1413
1414                         if (cap->op == RTE_CRYPTO_OP_TYPE_UNDEFINED) {
1415                                 printf("Algorithm %s not supported by cryptodev %u"
1416                                         " or device not of preferred type (%s)\n",
1417                                         options->string_auth_algo, cdev_id,
1418                                         options->string_type);
1419                                 continue;
1420                         }
1421
1422                         options->block_size = cap->sym.auth.block_size;
1423                         options->auth_xform.auth.add_auth_data_length =
1424                                                 cap->sym.auth.aad_size.min;
1425                         options->auth_xform.auth.digest_length =
1426                                                 cap->sym.auth.digest_size.min;
1427                         options->auth_xform.auth.key.length =
1428                                                 cap->sym.auth.key_size.min;
1429
1430                         if (!options->akey_param)
1431                                 generate_random_key(
1432                                         options->auth_xform.auth.key.data,
1433                                         options->auth_xform.auth.key.length);
1434                 }
1435
1436                 retval = rte_cryptodev_configure(cdev_id, &conf);
1437                 if (retval < 0) {
1438                         printf("Failed to configure cryptodev %u", cdev_id);
1439                         return -1;
1440                 }
1441
1442                 qp_conf.nb_descriptors = 2048;
1443
1444                 retval = rte_cryptodev_queue_pair_setup(cdev_id, 0, &qp_conf,
1445                                 SOCKET_ID_ANY);
1446                 if (retval < 0) {
1447                         printf("Failed to setup queue pair %u on cryptodev %u",
1448                                         0, cdev_id);
1449                         return -1;
1450                 }
1451
1452                 l2fwd_enabled_crypto_mask |= (1 << cdev_id);
1453
1454                 enabled_cdevs[cdev_id] = 1;
1455                 enabled_cdev_count++;
1456         }
1457
1458         return enabled_cdev_count;
1459 }
1460
1461 static int
1462 initialize_ports(struct l2fwd_crypto_options *options)
1463 {
1464         uint8_t last_portid, portid;
1465         unsigned enabled_portcount = 0;
1466         unsigned nb_ports = rte_eth_dev_count();
1467
1468         if (nb_ports == 0) {
1469                 printf("No Ethernet ports - bye\n");
1470                 return -1;
1471         }
1472
1473         if (nb_ports > RTE_MAX_ETHPORTS)
1474                 nb_ports = RTE_MAX_ETHPORTS;
1475
1476         /* Reset l2fwd_dst_ports */
1477         for (portid = 0; portid < RTE_MAX_ETHPORTS; portid++)
1478                 l2fwd_dst_ports[portid] = 0;
1479
1480         for (last_portid = 0, portid = 0; portid < nb_ports; portid++) {
1481                 int retval;
1482
1483                 /* Skip ports that are not enabled */
1484                 if ((options->portmask & (1 << portid)) == 0)
1485                         continue;
1486
1487                 /* init port */
1488                 printf("Initializing port %u... ", (unsigned) portid);
1489                 fflush(stdout);
1490                 retval = rte_eth_dev_configure(portid, 1, 1, &port_conf);
1491                 if (retval < 0) {
1492                         printf("Cannot configure device: err=%d, port=%u\n",
1493                                   retval, (unsigned) portid);
1494                         return -1;
1495                 }
1496
1497                 /* init one RX queue */
1498                 fflush(stdout);
1499                 retval = rte_eth_rx_queue_setup(portid, 0, nb_rxd,
1500                                              rte_eth_dev_socket_id(portid),
1501                                              NULL, l2fwd_pktmbuf_pool);
1502                 if (retval < 0) {
1503                         printf("rte_eth_rx_queue_setup:err=%d, port=%u\n",
1504                                         retval, (unsigned) portid);
1505                         return -1;
1506                 }
1507
1508                 /* init one TX queue on each port */
1509                 fflush(stdout);
1510                 retval = rte_eth_tx_queue_setup(portid, 0, nb_txd,
1511                                 rte_eth_dev_socket_id(portid),
1512                                 NULL);
1513                 if (retval < 0) {
1514                         printf("rte_eth_tx_queue_setup:err=%d, port=%u\n",
1515                                 retval, (unsigned) portid);
1516
1517                         return -1;
1518                 }
1519
1520                 /* Start device */
1521                 retval = rte_eth_dev_start(portid);
1522                 if (retval < 0) {
1523                         printf("rte_eth_dev_start:err=%d, port=%u\n",
1524                                         retval, (unsigned) portid);
1525                         return -1;
1526                 }
1527
1528                 rte_eth_promiscuous_enable(portid);
1529
1530                 rte_eth_macaddr_get(portid, &l2fwd_ports_eth_addr[portid]);
1531
1532                 printf("Port %u, MAC address: %02X:%02X:%02X:%02X:%02X:%02X\n\n",
1533                                 (unsigned) portid,
1534                                 l2fwd_ports_eth_addr[portid].addr_bytes[0],
1535                                 l2fwd_ports_eth_addr[portid].addr_bytes[1],
1536                                 l2fwd_ports_eth_addr[portid].addr_bytes[2],
1537                                 l2fwd_ports_eth_addr[portid].addr_bytes[3],
1538                                 l2fwd_ports_eth_addr[portid].addr_bytes[4],
1539                                 l2fwd_ports_eth_addr[portid].addr_bytes[5]);
1540
1541                 /* initialize port stats */
1542                 memset(&port_statistics, 0, sizeof(port_statistics));
1543
1544                 /* Setup port forwarding table */
1545                 if (enabled_portcount % 2) {
1546                         l2fwd_dst_ports[portid] = last_portid;
1547                         l2fwd_dst_ports[last_portid] = portid;
1548                 } else {
1549                         last_portid = portid;
1550                 }
1551
1552                 l2fwd_enabled_port_mask |= (1 << portid);
1553                 enabled_portcount++;
1554         }
1555
1556         if (enabled_portcount == 1) {
1557                 l2fwd_dst_ports[last_portid] = last_portid;
1558         } else if (enabled_portcount % 2) {
1559                 printf("odd number of ports in portmask- bye\n");
1560                 return -1;
1561         }
1562
1563         check_all_ports_link_status(nb_ports, l2fwd_enabled_port_mask);
1564
1565         return enabled_portcount;
1566 }
1567
1568 static void
1569 reserve_key_memory(struct l2fwd_crypto_options *options)
1570 {
1571         options->cipher_xform.cipher.key.data = rte_malloc("crypto key",
1572                                                 MAX_KEY_SIZE, 0);
1573         if (options->cipher_xform.cipher.key.data == NULL)
1574                 rte_exit(EXIT_FAILURE, "Failed to allocate memory for cipher key");
1575
1576
1577         options->auth_xform.auth.key.data = rte_malloc("auth key",
1578                                                 MAX_KEY_SIZE, 0);
1579         if (options->auth_xform.auth.key.data == NULL)
1580                 rte_exit(EXIT_FAILURE, "Failed to allocate memory for auth key");
1581
1582         options->iv.data = rte_malloc("iv", MAX_KEY_SIZE, 0);
1583         if (options->iv.data == NULL)
1584                 rte_exit(EXIT_FAILURE, "Failed to allocate memory for IV");
1585         options->iv.phys_addr = rte_malloc_virt2phy(options->iv.data);
1586
1587         options->aad.data = rte_malloc("aad", MAX_KEY_SIZE, 0);
1588         if (options->aad.data == NULL)
1589                 rte_exit(EXIT_FAILURE, "Failed to allocate memory for AAD");
1590         options->aad.phys_addr = rte_malloc_virt2phy(options->aad.data);
1591 }
1592
1593 int
1594 main(int argc, char **argv)
1595 {
1596         struct lcore_queue_conf *qconf;
1597         struct l2fwd_crypto_options options;
1598
1599         uint8_t nb_ports, nb_cryptodevs, portid, cdev_id;
1600         unsigned lcore_id, rx_lcore_id;
1601         int ret, enabled_cdevcount, enabled_portcount;
1602         uint8_t enabled_cdevs[RTE_CRYPTO_MAX_DEVS] = {0};
1603
1604         /* init EAL */
1605         ret = rte_eal_init(argc, argv);
1606         if (ret < 0)
1607                 rte_exit(EXIT_FAILURE, "Invalid EAL arguments\n");
1608         argc -= ret;
1609         argv += ret;
1610
1611         /* reserve memory for Cipher/Auth key and IV */
1612         reserve_key_memory(&options);
1613
1614         /* parse application arguments (after the EAL ones) */
1615         ret = l2fwd_crypto_parse_args(&options, argc, argv);
1616         if (ret < 0)
1617                 rte_exit(EXIT_FAILURE, "Invalid L2FWD-CRYPTO arguments\n");
1618
1619         /* create the mbuf pool */
1620         l2fwd_pktmbuf_pool = rte_pktmbuf_pool_create("mbuf_pool", NB_MBUF, 512,
1621                         sizeof(struct rte_crypto_op),
1622                         RTE_MBUF_DEFAULT_BUF_SIZE, rte_socket_id());
1623         if (l2fwd_pktmbuf_pool == NULL)
1624                 rte_exit(EXIT_FAILURE, "Cannot create mbuf pool\n");
1625
1626         /* create crypto op pool */
1627         l2fwd_crypto_op_pool = rte_crypto_op_pool_create("crypto_op_pool",
1628                         RTE_CRYPTO_OP_TYPE_SYMMETRIC, NB_MBUF, 128, 0,
1629                         rte_socket_id());
1630         if (l2fwd_crypto_op_pool == NULL)
1631                 rte_exit(EXIT_FAILURE, "Cannot create crypto op pool\n");
1632
1633         /* Enable Ethernet ports */
1634         enabled_portcount = initialize_ports(&options);
1635         if (enabled_portcount < 1)
1636                 rte_exit(EXIT_FAILURE, "Failed to initial Ethernet ports\n");
1637
1638         nb_ports = rte_eth_dev_count();
1639         /* Initialize the port/queue configuration of each logical core */
1640         for (rx_lcore_id = 0, qconf = NULL, portid = 0;
1641                         portid < nb_ports; portid++) {
1642
1643                 /* skip ports that are not enabled */
1644                 if ((options.portmask & (1 << portid)) == 0)
1645                         continue;
1646
1647                 if (options.single_lcore && qconf == NULL) {
1648                         while (rte_lcore_is_enabled(rx_lcore_id) == 0) {
1649                                 rx_lcore_id++;
1650                                 if (rx_lcore_id >= RTE_MAX_LCORE)
1651                                         rte_exit(EXIT_FAILURE,
1652                                                         "Not enough cores\n");
1653                         }
1654                 } else if (!options.single_lcore) {
1655                         /* get the lcore_id for this port */
1656                         while (rte_lcore_is_enabled(rx_lcore_id) == 0 ||
1657                                lcore_queue_conf[rx_lcore_id].nb_rx_ports ==
1658                                options.nb_ports_per_lcore) {
1659                                 rx_lcore_id++;
1660                                 if (rx_lcore_id >= RTE_MAX_LCORE)
1661                                         rte_exit(EXIT_FAILURE,
1662                                                         "Not enough cores\n");
1663                         }
1664                 }
1665
1666                 /* Assigned a new logical core in the loop above. */
1667                 if (qconf != &lcore_queue_conf[rx_lcore_id])
1668                         qconf = &lcore_queue_conf[rx_lcore_id];
1669
1670                 qconf->rx_port_list[qconf->nb_rx_ports] = portid;
1671                 qconf->nb_rx_ports++;
1672
1673                 printf("Lcore %u: RX port %u\n", rx_lcore_id, (unsigned)portid);
1674         }
1675
1676         /* Enable Crypto devices */
1677         enabled_cdevcount = initialize_cryptodevs(&options, enabled_portcount,
1678                         enabled_cdevs);
1679         if (enabled_cdevcount < 0)
1680                 rte_exit(EXIT_FAILURE, "Failed to initialize crypto devices\n");
1681
1682         if (enabled_cdevcount < enabled_portcount)
1683                 rte_exit(EXIT_FAILURE, "Number of capable crypto devices (%d) "
1684                                 "has to be more or equal to number of ports (%d)\n",
1685                                 enabled_cdevcount, enabled_portcount);
1686
1687         nb_cryptodevs = rte_cryptodev_count();
1688
1689         /* Initialize the port/cryptodev configuration of each logical core */
1690         for (rx_lcore_id = 0, qconf = NULL, cdev_id = 0;
1691                         cdev_id < nb_cryptodevs && enabled_cdevcount;
1692                         cdev_id++) {
1693                 /* Crypto op not supported by crypto device */
1694                 if (!enabled_cdevs[cdev_id])
1695                         continue;
1696
1697                 if (options.single_lcore && qconf == NULL) {
1698                         while (rte_lcore_is_enabled(rx_lcore_id) == 0) {
1699                                 rx_lcore_id++;
1700                                 if (rx_lcore_id >= RTE_MAX_LCORE)
1701                                         rte_exit(EXIT_FAILURE,
1702                                                         "Not enough cores\n");
1703                         }
1704                 } else if (!options.single_lcore) {
1705                         /* get the lcore_id for this port */
1706                         while (rte_lcore_is_enabled(rx_lcore_id) == 0 ||
1707                                lcore_queue_conf[rx_lcore_id].nb_crypto_devs ==
1708                                options.nb_ports_per_lcore) {
1709                                 rx_lcore_id++;
1710                                 if (rx_lcore_id >= RTE_MAX_LCORE)
1711                                         rte_exit(EXIT_FAILURE,
1712                                                         "Not enough cores\n");
1713                         }
1714                 }
1715
1716                 /* Assigned a new logical core in the loop above. */
1717                 if (qconf != &lcore_queue_conf[rx_lcore_id])
1718                         qconf = &lcore_queue_conf[rx_lcore_id];
1719
1720                 qconf->cryptodev_list[qconf->nb_crypto_devs] = cdev_id;
1721                 qconf->nb_crypto_devs++;
1722
1723                 enabled_cdevcount--;
1724
1725                 printf("Lcore %u: cryptodev %u\n", rx_lcore_id,
1726                                 (unsigned)cdev_id);
1727         }
1728
1729         /* launch per-lcore init on every lcore */
1730         rte_eal_mp_remote_launch(l2fwd_launch_one_lcore, (void *)&options,
1731                         CALL_MASTER);
1732         RTE_LCORE_FOREACH_SLAVE(lcore_id) {
1733                 if (rte_eal_wait_lcore(lcore_id) < 0)
1734                         return -1;
1735         }
1736
1737         return 0;
1738 }