xref: /f-stack/dpdk/examples/l3fwd-acl/main.c (revision 031be553)
1 /*-
2  *   BSD LICENSE
3  *
4  *   Copyright(c) 2010-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 <stdio.h>
35 #include <stdlib.h>
36 #include <stdint.h>
37 #include <inttypes.h>
38 #include <sys/types.h>
39 #include <string.h>
40 #include <sys/queue.h>
41 #include <stdarg.h>
42 #include <errno.h>
43 #include <getopt.h>
44 
45 #include <rte_common.h>
46 #include <rte_byteorder.h>
47 #include <rte_log.h>
48 #include <rte_memory.h>
49 #include <rte_memcpy.h>
50 #include <rte_eal.h>
51 #include <rte_launch.h>
52 #include <rte_atomic.h>
53 #include <rte_cycles.h>
54 #include <rte_prefetch.h>
55 #include <rte_lcore.h>
56 #include <rte_per_lcore.h>
57 #include <rte_branch_prediction.h>
58 #include <rte_interrupts.h>
59 #include <rte_random.h>
60 #include <rte_debug.h>
61 #include <rte_ether.h>
62 #include <rte_ethdev.h>
63 #include <rte_mempool.h>
64 #include <rte_mbuf.h>
65 #include <rte_ip.h>
66 #include <rte_tcp.h>
67 #include <rte_udp.h>
68 #include <rte_string_fns.h>
69 #include <rte_acl.h>
70 
71 #if RTE_LOG_LEVEL >= RTE_LOG_DEBUG
72 #define L3FWDACL_DEBUG
73 #endif
74 #define DO_RFC_1812_CHECKS
75 
76 #define RTE_LOGTYPE_L3FWD RTE_LOGTYPE_USER1
77 
78 #define MAX_JUMBO_PKT_LEN  9600
79 
80 #define MEMPOOL_CACHE_SIZE 256
81 
82 /*
83  * This expression is used to calculate the number of mbufs needed
84  * depending on user input, taking into account memory for rx and tx hardware
85  * rings, cache per lcore and mtable per port per lcore.
86  * RTE_MAX is used to ensure that NB_MBUF never goes below a
87  * minimum value of 8192
88  */
89 
90 #define NB_MBUF	RTE_MAX(\
91 	(nb_ports * nb_rx_queue * nb_rxd +	\
92 	nb_ports * nb_lcores * MAX_PKT_BURST +	\
93 	nb_ports * n_tx_queue * nb_txd +	\
94 	nb_lcores * MEMPOOL_CACHE_SIZE),	\
95 	(unsigned)8192)
96 
97 #define MAX_PKT_BURST 32
98 #define BURST_TX_DRAIN_US 100 /* TX drain every ~100us */
99 
100 #define NB_SOCKETS 8
101 
102 /* Configure how many packets ahead to prefetch, when reading packets */
103 #define PREFETCH_OFFSET	3
104 
105 /*
106  * Configurable number of RX/TX ring descriptors
107  */
108 #define RTE_TEST_RX_DESC_DEFAULT 128
109 #define RTE_TEST_TX_DESC_DEFAULT 512
110 static uint16_t nb_rxd = RTE_TEST_RX_DESC_DEFAULT;
111 static uint16_t nb_txd = RTE_TEST_TX_DESC_DEFAULT;
112 
113 /* ethernet addresses of ports */
114 static struct ether_addr ports_eth_addr[RTE_MAX_ETHPORTS];
115 
116 /* mask of enabled ports */
117 static uint32_t enabled_port_mask;
118 static int promiscuous_on; /**< Ports set in promiscuous mode off by default. */
119 static int numa_on = 1; /**< NUMA is enabled by default. */
120 
121 struct lcore_rx_queue {
122 	uint16_t port_id;
123 	uint8_t queue_id;
124 } __rte_cache_aligned;
125 
126 #define MAX_RX_QUEUE_PER_LCORE 16
127 #define MAX_TX_QUEUE_PER_PORT RTE_MAX_ETHPORTS
128 #define MAX_RX_QUEUE_PER_PORT 128
129 
130 #define MAX_LCORE_PARAMS 1024
131 struct lcore_params {
132 	uint16_t port_id;
133 	uint8_t queue_id;
134 	uint8_t lcore_id;
135 } __rte_cache_aligned;
136 
137 static struct lcore_params lcore_params_array[MAX_LCORE_PARAMS];
138 static struct lcore_params lcore_params_array_default[] = {
139 	{0, 0, 2},
140 	{0, 1, 2},
141 	{0, 2, 2},
142 	{1, 0, 2},
143 	{1, 1, 2},
144 	{1, 2, 2},
145 	{2, 0, 2},
146 	{3, 0, 3},
147 	{3, 1, 3},
148 };
149 
150 static struct lcore_params *lcore_params = lcore_params_array_default;
151 static uint16_t nb_lcore_params = sizeof(lcore_params_array_default) /
152 				sizeof(lcore_params_array_default[0]);
153 
154 static struct rte_eth_conf port_conf = {
155 	.rxmode = {
156 		.mq_mode	= ETH_MQ_RX_RSS,
157 		.max_rx_pkt_len = ETHER_MAX_LEN,
158 		.split_hdr_size = 0,
159 		.header_split   = 0, /**< Header Split disabled */
160 		.hw_ip_checksum = 1, /**< IP checksum offload enabled */
161 		.hw_vlan_filter = 0, /**< VLAN filtering disabled */
162 		.jumbo_frame    = 0, /**< Jumbo Frame Support disabled */
163 		.hw_strip_crc   = 1, /**< CRC stripped by hardware */
164 	},
165 	.rx_adv_conf = {
166 		.rss_conf = {
167 			.rss_key = NULL,
168 			.rss_hf = ETH_RSS_IP | ETH_RSS_UDP |
169 				ETH_RSS_TCP | ETH_RSS_SCTP,
170 		},
171 	},
172 	.txmode = {
173 		.mq_mode = ETH_MQ_TX_NONE,
174 	},
175 };
176 
177 static struct rte_mempool *pktmbuf_pool[NB_SOCKETS];
178 
179 /***********************start of ACL part******************************/
180 #ifdef DO_RFC_1812_CHECKS
181 static inline int
182 is_valid_ipv4_pkt(struct ipv4_hdr *pkt, uint32_t link_len);
183 #endif
184 static inline void
185 send_single_packet(struct rte_mbuf *m, uint16_t port);
186 
187 #define MAX_ACL_RULE_NUM	100000
188 #define DEFAULT_MAX_CATEGORIES	1
189 #define L3FWD_ACL_IPV4_NAME	"l3fwd-acl-ipv4"
190 #define L3FWD_ACL_IPV6_NAME	"l3fwd-acl-ipv6"
191 #define ACL_LEAD_CHAR		('@')
192 #define ROUTE_LEAD_CHAR		('R')
193 #define COMMENT_LEAD_CHAR	('#')
194 #define OPTION_CONFIG		"config"
195 #define OPTION_NONUMA		"no-numa"
196 #define OPTION_ENBJMO		"enable-jumbo"
197 #define OPTION_RULE_IPV4	"rule_ipv4"
198 #define OPTION_RULE_IPV6	"rule_ipv6"
199 #define OPTION_SCALAR		"scalar"
200 #define ACL_DENY_SIGNATURE	0xf0000000
201 #define RTE_LOGTYPE_L3FWDACL	RTE_LOGTYPE_USER3
202 #define acl_log(format, ...)	RTE_LOG(ERR, L3FWDACL, format, ##__VA_ARGS__)
203 #define uint32_t_to_char(ip, a, b, c, d) do {\
204 		*a = (unsigned char)(ip >> 24 & 0xff);\
205 		*b = (unsigned char)(ip >> 16 & 0xff);\
206 		*c = (unsigned char)(ip >> 8 & 0xff);\
207 		*d = (unsigned char)(ip & 0xff);\
208 	} while (0)
209 #define OFF_ETHHEAD	(sizeof(struct ether_hdr))
210 #define OFF_IPV42PROTO (offsetof(struct ipv4_hdr, next_proto_id))
211 #define OFF_IPV62PROTO (offsetof(struct ipv6_hdr, proto))
212 #define MBUF_IPV4_2PROTO(m)	\
213 	rte_pktmbuf_mtod_offset((m), uint8_t *, OFF_ETHHEAD + OFF_IPV42PROTO)
214 #define MBUF_IPV6_2PROTO(m)	\
215 	rte_pktmbuf_mtod_offset((m), uint8_t *, OFF_ETHHEAD + OFF_IPV62PROTO)
216 
217 #define GET_CB_FIELD(in, fd, base, lim, dlm)	do {            \
218 	unsigned long val;                                      \
219 	char *end;                                              \
220 	errno = 0;                                              \
221 	val = strtoul((in), &end, (base));                      \
222 	if (errno != 0 || end[0] != (dlm) || val > (lim))       \
223 		return -EINVAL;                               \
224 	(fd) = (typeof(fd))val;                                 \
225 	(in) = end + 1;                                         \
226 } while (0)
227 
228 /*
229   * ACL rules should have higher priorities than route ones to ensure ACL rule
230   * always be found when input packets have multi-matches in the database.
231   * A exception case is performance measure, which can define route rules with
232   * higher priority and route rules will always be returned in each lookup.
233   * Reserve range from ACL_RULE_PRIORITY_MAX + 1 to
234   * RTE_ACL_MAX_PRIORITY for route entries in performance measure
235   */
236 #define ACL_RULE_PRIORITY_MAX 0x10000000
237 
238 /*
239   * Forward port info save in ACL lib starts from 1
240   * since ACL assume 0 is invalid.
241   * So, need add 1 when saving and minus 1 when forwarding packets.
242   */
243 #define FWD_PORT_SHIFT 1
244 
245 /*
246  * Rule and trace formats definitions.
247  */
248 
249 enum {
250 	PROTO_FIELD_IPV4,
251 	SRC_FIELD_IPV4,
252 	DST_FIELD_IPV4,
253 	SRCP_FIELD_IPV4,
254 	DSTP_FIELD_IPV4,
255 	NUM_FIELDS_IPV4
256 };
257 
258 /*
259  * That effectively defines order of IPV4VLAN classifications:
260  *  - PROTO
261  *  - VLAN (TAG and DOMAIN)
262  *  - SRC IP ADDRESS
263  *  - DST IP ADDRESS
264  *  - PORTS (SRC and DST)
265  */
266 enum {
267 	RTE_ACL_IPV4VLAN_PROTO,
268 	RTE_ACL_IPV4VLAN_VLAN,
269 	RTE_ACL_IPV4VLAN_SRC,
270 	RTE_ACL_IPV4VLAN_DST,
271 	RTE_ACL_IPV4VLAN_PORTS,
272 	RTE_ACL_IPV4VLAN_NUM
273 };
274 
275 struct rte_acl_field_def ipv4_defs[NUM_FIELDS_IPV4] = {
276 	{
277 		.type = RTE_ACL_FIELD_TYPE_BITMASK,
278 		.size = sizeof(uint8_t),
279 		.field_index = PROTO_FIELD_IPV4,
280 		.input_index = RTE_ACL_IPV4VLAN_PROTO,
281 		.offset = 0,
282 	},
283 	{
284 		.type = RTE_ACL_FIELD_TYPE_MASK,
285 		.size = sizeof(uint32_t),
286 		.field_index = SRC_FIELD_IPV4,
287 		.input_index = RTE_ACL_IPV4VLAN_SRC,
288 		.offset = offsetof(struct ipv4_hdr, src_addr) -
289 			offsetof(struct ipv4_hdr, next_proto_id),
290 	},
291 	{
292 		.type = RTE_ACL_FIELD_TYPE_MASK,
293 		.size = sizeof(uint32_t),
294 		.field_index = DST_FIELD_IPV4,
295 		.input_index = RTE_ACL_IPV4VLAN_DST,
296 		.offset = offsetof(struct ipv4_hdr, dst_addr) -
297 			offsetof(struct ipv4_hdr, next_proto_id),
298 	},
299 	{
300 		.type = RTE_ACL_FIELD_TYPE_RANGE,
301 		.size = sizeof(uint16_t),
302 		.field_index = SRCP_FIELD_IPV4,
303 		.input_index = RTE_ACL_IPV4VLAN_PORTS,
304 		.offset = sizeof(struct ipv4_hdr) -
305 			offsetof(struct ipv4_hdr, next_proto_id),
306 	},
307 	{
308 		.type = RTE_ACL_FIELD_TYPE_RANGE,
309 		.size = sizeof(uint16_t),
310 		.field_index = DSTP_FIELD_IPV4,
311 		.input_index = RTE_ACL_IPV4VLAN_PORTS,
312 		.offset = sizeof(struct ipv4_hdr) -
313 			offsetof(struct ipv4_hdr, next_proto_id) +
314 			sizeof(uint16_t),
315 	},
316 };
317 
318 #define	IPV6_ADDR_LEN	16
319 #define	IPV6_ADDR_U16	(IPV6_ADDR_LEN / sizeof(uint16_t))
320 #define	IPV6_ADDR_U32	(IPV6_ADDR_LEN / sizeof(uint32_t))
321 
322 enum {
323 	PROTO_FIELD_IPV6,
324 	SRC1_FIELD_IPV6,
325 	SRC2_FIELD_IPV6,
326 	SRC3_FIELD_IPV6,
327 	SRC4_FIELD_IPV6,
328 	DST1_FIELD_IPV6,
329 	DST2_FIELD_IPV6,
330 	DST3_FIELD_IPV6,
331 	DST4_FIELD_IPV6,
332 	SRCP_FIELD_IPV6,
333 	DSTP_FIELD_IPV6,
334 	NUM_FIELDS_IPV6
335 };
336 
337 struct rte_acl_field_def ipv6_defs[NUM_FIELDS_IPV6] = {
338 	{
339 		.type = RTE_ACL_FIELD_TYPE_BITMASK,
340 		.size = sizeof(uint8_t),
341 		.field_index = PROTO_FIELD_IPV6,
342 		.input_index = PROTO_FIELD_IPV6,
343 		.offset = 0,
344 	},
345 	{
346 		.type = RTE_ACL_FIELD_TYPE_MASK,
347 		.size = sizeof(uint32_t),
348 		.field_index = SRC1_FIELD_IPV6,
349 		.input_index = SRC1_FIELD_IPV6,
350 		.offset = offsetof(struct ipv6_hdr, src_addr) -
351 			offsetof(struct ipv6_hdr, proto),
352 	},
353 	{
354 		.type = RTE_ACL_FIELD_TYPE_MASK,
355 		.size = sizeof(uint32_t),
356 		.field_index = SRC2_FIELD_IPV6,
357 		.input_index = SRC2_FIELD_IPV6,
358 		.offset = offsetof(struct ipv6_hdr, src_addr) -
359 			offsetof(struct ipv6_hdr, proto) + sizeof(uint32_t),
360 	},
361 	{
362 		.type = RTE_ACL_FIELD_TYPE_MASK,
363 		.size = sizeof(uint32_t),
364 		.field_index = SRC3_FIELD_IPV6,
365 		.input_index = SRC3_FIELD_IPV6,
366 		.offset = offsetof(struct ipv6_hdr, src_addr) -
367 			offsetof(struct ipv6_hdr, proto) + 2 * sizeof(uint32_t),
368 	},
369 	{
370 		.type = RTE_ACL_FIELD_TYPE_MASK,
371 		.size = sizeof(uint32_t),
372 		.field_index = SRC4_FIELD_IPV6,
373 		.input_index = SRC4_FIELD_IPV6,
374 		.offset = offsetof(struct ipv6_hdr, src_addr) -
375 			offsetof(struct ipv6_hdr, proto) + 3 * sizeof(uint32_t),
376 	},
377 	{
378 		.type = RTE_ACL_FIELD_TYPE_MASK,
379 		.size = sizeof(uint32_t),
380 		.field_index = DST1_FIELD_IPV6,
381 		.input_index = DST1_FIELD_IPV6,
382 		.offset = offsetof(struct ipv6_hdr, dst_addr)
383 				- offsetof(struct ipv6_hdr, proto),
384 	},
385 	{
386 		.type = RTE_ACL_FIELD_TYPE_MASK,
387 		.size = sizeof(uint32_t),
388 		.field_index = DST2_FIELD_IPV6,
389 		.input_index = DST2_FIELD_IPV6,
390 		.offset = offsetof(struct ipv6_hdr, dst_addr) -
391 			offsetof(struct ipv6_hdr, proto) + sizeof(uint32_t),
392 	},
393 	{
394 		.type = RTE_ACL_FIELD_TYPE_MASK,
395 		.size = sizeof(uint32_t),
396 		.field_index = DST3_FIELD_IPV6,
397 		.input_index = DST3_FIELD_IPV6,
398 		.offset = offsetof(struct ipv6_hdr, dst_addr) -
399 			offsetof(struct ipv6_hdr, proto) + 2 * sizeof(uint32_t),
400 	},
401 	{
402 		.type = RTE_ACL_FIELD_TYPE_MASK,
403 		.size = sizeof(uint32_t),
404 		.field_index = DST4_FIELD_IPV6,
405 		.input_index = DST4_FIELD_IPV6,
406 		.offset = offsetof(struct ipv6_hdr, dst_addr) -
407 			offsetof(struct ipv6_hdr, proto) + 3 * sizeof(uint32_t),
408 	},
409 	{
410 		.type = RTE_ACL_FIELD_TYPE_RANGE,
411 		.size = sizeof(uint16_t),
412 		.field_index = SRCP_FIELD_IPV6,
413 		.input_index = SRCP_FIELD_IPV6,
414 		.offset = sizeof(struct ipv6_hdr) -
415 			offsetof(struct ipv6_hdr, proto),
416 	},
417 	{
418 		.type = RTE_ACL_FIELD_TYPE_RANGE,
419 		.size = sizeof(uint16_t),
420 		.field_index = DSTP_FIELD_IPV6,
421 		.input_index = SRCP_FIELD_IPV6,
422 		.offset = sizeof(struct ipv6_hdr) -
423 			offsetof(struct ipv6_hdr, proto) + sizeof(uint16_t),
424 	},
425 };
426 
427 enum {
428 	CB_FLD_SRC_ADDR,
429 	CB_FLD_DST_ADDR,
430 	CB_FLD_SRC_PORT_LOW,
431 	CB_FLD_SRC_PORT_DLM,
432 	CB_FLD_SRC_PORT_HIGH,
433 	CB_FLD_DST_PORT_LOW,
434 	CB_FLD_DST_PORT_DLM,
435 	CB_FLD_DST_PORT_HIGH,
436 	CB_FLD_PROTO,
437 	CB_FLD_USERDATA,
438 	CB_FLD_NUM,
439 };
440 
441 RTE_ACL_RULE_DEF(acl4_rule, RTE_DIM(ipv4_defs));
442 RTE_ACL_RULE_DEF(acl6_rule, RTE_DIM(ipv6_defs));
443 
444 struct acl_search_t {
445 	const uint8_t *data_ipv4[MAX_PKT_BURST];
446 	struct rte_mbuf *m_ipv4[MAX_PKT_BURST];
447 	uint32_t res_ipv4[MAX_PKT_BURST];
448 	int num_ipv4;
449 
450 	const uint8_t *data_ipv6[MAX_PKT_BURST];
451 	struct rte_mbuf *m_ipv6[MAX_PKT_BURST];
452 	uint32_t res_ipv6[MAX_PKT_BURST];
453 	int num_ipv6;
454 };
455 
456 static struct {
457 	char mapped[NB_SOCKETS];
458 	struct rte_acl_ctx *acx_ipv4[NB_SOCKETS];
459 	struct rte_acl_ctx *acx_ipv6[NB_SOCKETS];
460 #ifdef L3FWDACL_DEBUG
461 	struct acl4_rule *rule_ipv4;
462 	struct acl6_rule *rule_ipv6;
463 #endif
464 } acl_config;
465 
466 static struct{
467 	const char *rule_ipv4_name;
468 	const char *rule_ipv6_name;
469 	int scalar;
470 } parm_config;
471 
472 const char cb_port_delim[] = ":";
473 
474 static inline void
475 print_one_ipv4_rule(struct acl4_rule *rule, int extra)
476 {
477 	unsigned char a, b, c, d;
478 
479 	uint32_t_to_char(rule->field[SRC_FIELD_IPV4].value.u32,
480 			&a, &b, &c, &d);
481 	printf("%hhu.%hhu.%hhu.%hhu/%u ", a, b, c, d,
482 			rule->field[SRC_FIELD_IPV4].mask_range.u32);
483 	uint32_t_to_char(rule->field[DST_FIELD_IPV4].value.u32,
484 			&a, &b, &c, &d);
485 	printf("%hhu.%hhu.%hhu.%hhu/%u ", a, b, c, d,
486 			rule->field[DST_FIELD_IPV4].mask_range.u32);
487 	printf("%hu : %hu %hu : %hu 0x%hhx/0x%hhx ",
488 		rule->field[SRCP_FIELD_IPV4].value.u16,
489 		rule->field[SRCP_FIELD_IPV4].mask_range.u16,
490 		rule->field[DSTP_FIELD_IPV4].value.u16,
491 		rule->field[DSTP_FIELD_IPV4].mask_range.u16,
492 		rule->field[PROTO_FIELD_IPV4].value.u8,
493 		rule->field[PROTO_FIELD_IPV4].mask_range.u8);
494 	if (extra)
495 		printf("0x%x-0x%x-0x%x ",
496 			rule->data.category_mask,
497 			rule->data.priority,
498 			rule->data.userdata);
499 }
500 
501 static inline void
502 print_one_ipv6_rule(struct acl6_rule *rule, int extra)
503 {
504 	unsigned char a, b, c, d;
505 
506 	uint32_t_to_char(rule->field[SRC1_FIELD_IPV6].value.u32,
507 		&a, &b, &c, &d);
508 	printf("%.2x%.2x:%.2x%.2x", a, b, c, d);
509 	uint32_t_to_char(rule->field[SRC2_FIELD_IPV6].value.u32,
510 		&a, &b, &c, &d);
511 	printf(":%.2x%.2x:%.2x%.2x", a, b, c, d);
512 	uint32_t_to_char(rule->field[SRC3_FIELD_IPV6].value.u32,
513 		&a, &b, &c, &d);
514 	printf(":%.2x%.2x:%.2x%.2x", a, b, c, d);
515 	uint32_t_to_char(rule->field[SRC4_FIELD_IPV6].value.u32,
516 		&a, &b, &c, &d);
517 	printf(":%.2x%.2x:%.2x%.2x/%u ", a, b, c, d,
518 			rule->field[SRC1_FIELD_IPV6].mask_range.u32
519 			+ rule->field[SRC2_FIELD_IPV6].mask_range.u32
520 			+ rule->field[SRC3_FIELD_IPV6].mask_range.u32
521 			+ rule->field[SRC4_FIELD_IPV6].mask_range.u32);
522 
523 	uint32_t_to_char(rule->field[DST1_FIELD_IPV6].value.u32,
524 		&a, &b, &c, &d);
525 	printf("%.2x%.2x:%.2x%.2x", a, b, c, d);
526 	uint32_t_to_char(rule->field[DST2_FIELD_IPV6].value.u32,
527 		&a, &b, &c, &d);
528 	printf(":%.2x%.2x:%.2x%.2x", a, b, c, d);
529 	uint32_t_to_char(rule->field[DST3_FIELD_IPV6].value.u32,
530 		&a, &b, &c, &d);
531 	printf(":%.2x%.2x:%.2x%.2x", a, b, c, d);
532 	uint32_t_to_char(rule->field[DST4_FIELD_IPV6].value.u32,
533 		&a, &b, &c, &d);
534 	printf(":%.2x%.2x:%.2x%.2x/%u ", a, b, c, d,
535 			rule->field[DST1_FIELD_IPV6].mask_range.u32
536 			+ rule->field[DST2_FIELD_IPV6].mask_range.u32
537 			+ rule->field[DST3_FIELD_IPV6].mask_range.u32
538 			+ rule->field[DST4_FIELD_IPV6].mask_range.u32);
539 
540 	printf("%hu : %hu %hu : %hu 0x%hhx/0x%hhx ",
541 		rule->field[SRCP_FIELD_IPV6].value.u16,
542 		rule->field[SRCP_FIELD_IPV6].mask_range.u16,
543 		rule->field[DSTP_FIELD_IPV6].value.u16,
544 		rule->field[DSTP_FIELD_IPV6].mask_range.u16,
545 		rule->field[PROTO_FIELD_IPV6].value.u8,
546 		rule->field[PROTO_FIELD_IPV6].mask_range.u8);
547 	if (extra)
548 		printf("0x%x-0x%x-0x%x ",
549 			rule->data.category_mask,
550 			rule->data.priority,
551 			rule->data.userdata);
552 }
553 
554 /* Bypass comment and empty lines */
555 static inline int
556 is_bypass_line(char *buff)
557 {
558 	int i = 0;
559 
560 	/* comment line */
561 	if (buff[0] == COMMENT_LEAD_CHAR)
562 		return 1;
563 	/* empty line */
564 	while (buff[i] != '\0') {
565 		if (!isspace(buff[i]))
566 			return 0;
567 		i++;
568 	}
569 	return 1;
570 }
571 
572 #ifdef L3FWDACL_DEBUG
573 static inline void
574 dump_acl4_rule(struct rte_mbuf *m, uint32_t sig)
575 {
576 	uint32_t offset = sig & ~ACL_DENY_SIGNATURE;
577 	unsigned char a, b, c, d;
578 	struct ipv4_hdr *ipv4_hdr = rte_pktmbuf_mtod_offset(m,
579 							    struct ipv4_hdr *,
580 							    sizeof(struct ether_hdr));
581 
582 	uint32_t_to_char(rte_bswap32(ipv4_hdr->src_addr), &a, &b, &c, &d);
583 	printf("Packet Src:%hhu.%hhu.%hhu.%hhu ", a, b, c, d);
584 	uint32_t_to_char(rte_bswap32(ipv4_hdr->dst_addr), &a, &b, &c, &d);
585 	printf("Dst:%hhu.%hhu.%hhu.%hhu ", a, b, c, d);
586 
587 	printf("Src port:%hu,Dst port:%hu ",
588 			rte_bswap16(*(uint16_t *)(ipv4_hdr + 1)),
589 			rte_bswap16(*((uint16_t *)(ipv4_hdr + 1) + 1)));
590 	printf("hit ACL %d - ", offset);
591 
592 	print_one_ipv4_rule(acl_config.rule_ipv4 + offset, 1);
593 
594 	printf("\n\n");
595 }
596 
597 static inline void
598 dump_acl6_rule(struct rte_mbuf *m, uint32_t sig)
599 {
600 	unsigned i;
601 	uint32_t offset = sig & ~ACL_DENY_SIGNATURE;
602 	struct ipv6_hdr *ipv6_hdr = rte_pktmbuf_mtod_offset(m,
603 							    struct ipv6_hdr *,
604 							    sizeof(struct ether_hdr));
605 
606 	printf("Packet Src");
607 	for (i = 0; i < RTE_DIM(ipv6_hdr->src_addr); i += sizeof(uint16_t))
608 		printf(":%.2x%.2x",
609 			ipv6_hdr->src_addr[i], ipv6_hdr->src_addr[i + 1]);
610 
611 	printf("\nDst");
612 	for (i = 0; i < RTE_DIM(ipv6_hdr->dst_addr); i += sizeof(uint16_t))
613 		printf(":%.2x%.2x",
614 			ipv6_hdr->dst_addr[i], ipv6_hdr->dst_addr[i + 1]);
615 
616 	printf("\nSrc port:%hu,Dst port:%hu ",
617 			rte_bswap16(*(uint16_t *)(ipv6_hdr + 1)),
618 			rte_bswap16(*((uint16_t *)(ipv6_hdr + 1) + 1)));
619 	printf("hit ACL %d - ", offset);
620 
621 	print_one_ipv6_rule(acl_config.rule_ipv6 + offset, 1);
622 
623 	printf("\n\n");
624 }
625 #endif /* L3FWDACL_DEBUG */
626 
627 static inline void
628 dump_ipv4_rules(struct acl4_rule *rule, int num, int extra)
629 {
630 	int i;
631 
632 	for (i = 0; i < num; i++, rule++) {
633 		printf("\t%d:", i + 1);
634 		print_one_ipv4_rule(rule, extra);
635 		printf("\n");
636 	}
637 }
638 
639 static inline void
640 dump_ipv6_rules(struct acl6_rule *rule, int num, int extra)
641 {
642 	int i;
643 
644 	for (i = 0; i < num; i++, rule++) {
645 		printf("\t%d:", i + 1);
646 		print_one_ipv6_rule(rule, extra);
647 		printf("\n");
648 	}
649 }
650 
651 #ifdef DO_RFC_1812_CHECKS
652 static inline void
653 prepare_one_packet(struct rte_mbuf **pkts_in, struct acl_search_t *acl,
654 	int index)
655 {
656 	struct ipv4_hdr *ipv4_hdr;
657 	struct rte_mbuf *pkt = pkts_in[index];
658 
659 	if (RTE_ETH_IS_IPV4_HDR(pkt->packet_type)) {
660 		ipv4_hdr = rte_pktmbuf_mtod_offset(pkt, struct ipv4_hdr *,
661 						   sizeof(struct ether_hdr));
662 
663 		/* Check to make sure the packet is valid (RFC1812) */
664 		if (is_valid_ipv4_pkt(ipv4_hdr, pkt->pkt_len) >= 0) {
665 
666 			/* Update time to live and header checksum */
667 			--(ipv4_hdr->time_to_live);
668 			++(ipv4_hdr->hdr_checksum);
669 
670 			/* Fill acl structure */
671 			acl->data_ipv4[acl->num_ipv4] = MBUF_IPV4_2PROTO(pkt);
672 			acl->m_ipv4[(acl->num_ipv4)++] = pkt;
673 
674 		} else {
675 			/* Not a valid IPv4 packet */
676 			rte_pktmbuf_free(pkt);
677 		}
678 	} else if (RTE_ETH_IS_IPV6_HDR(pkt->packet_type)) {
679 		/* Fill acl structure */
680 		acl->data_ipv6[acl->num_ipv6] = MBUF_IPV6_2PROTO(pkt);
681 		acl->m_ipv6[(acl->num_ipv6)++] = pkt;
682 
683 	} else {
684 		/* Unknown type, drop the packet */
685 		rte_pktmbuf_free(pkt);
686 	}
687 }
688 
689 #else
690 static inline void
691 prepare_one_packet(struct rte_mbuf **pkts_in, struct acl_search_t *acl,
692 	int index)
693 {
694 	struct rte_mbuf *pkt = pkts_in[index];
695 
696 	if (RTE_ETH_IS_IPV4_HDR(pkt->packet_type)) {
697 		/* Fill acl structure */
698 		acl->data_ipv4[acl->num_ipv4] = MBUF_IPV4_2PROTO(pkt);
699 		acl->m_ipv4[(acl->num_ipv4)++] = pkt;
700 
701 	} else if (RTE_ETH_IS_IPV6_HDR(pkt->packet_type)) {
702 		/* Fill acl structure */
703 		acl->data_ipv6[acl->num_ipv6] = MBUF_IPV6_2PROTO(pkt);
704 		acl->m_ipv6[(acl->num_ipv6)++] = pkt;
705 	} else {
706 		/* Unknown type, drop the packet */
707 		rte_pktmbuf_free(pkt);
708 	}
709 }
710 #endif /* DO_RFC_1812_CHECKS */
711 
712 static inline void
713 prepare_acl_parameter(struct rte_mbuf **pkts_in, struct acl_search_t *acl,
714 	int nb_rx)
715 {
716 	int i;
717 
718 	acl->num_ipv4 = 0;
719 	acl->num_ipv6 = 0;
720 
721 	/* Prefetch first packets */
722 	for (i = 0; i < PREFETCH_OFFSET && i < nb_rx; i++) {
723 		rte_prefetch0(rte_pktmbuf_mtod(
724 				pkts_in[i], void *));
725 	}
726 
727 	for (i = 0; i < (nb_rx - PREFETCH_OFFSET); i++) {
728 		rte_prefetch0(rte_pktmbuf_mtod(pkts_in[
729 				i + PREFETCH_OFFSET], void *));
730 		prepare_one_packet(pkts_in, acl, i);
731 	}
732 
733 	/* Process left packets */
734 	for (; i < nb_rx; i++)
735 		prepare_one_packet(pkts_in, acl, i);
736 }
737 
738 static inline void
739 send_one_packet(struct rte_mbuf *m, uint32_t res)
740 {
741 	if (likely((res & ACL_DENY_SIGNATURE) == 0 && res != 0)) {
742 		/* forward packets */
743 		send_single_packet(m,
744 			(uint8_t)(res - FWD_PORT_SHIFT));
745 	} else{
746 		/* in the ACL list, drop it */
747 #ifdef L3FWDACL_DEBUG
748 		if ((res & ACL_DENY_SIGNATURE) != 0) {
749 			if (RTE_ETH_IS_IPV4_HDR(m->packet_type))
750 				dump_acl4_rule(m, res);
751 			else if (RTE_ETH_IS_IPV6_HDR(m->packet_type))
752 				dump_acl6_rule(m, res);
753 		}
754 #endif
755 		rte_pktmbuf_free(m);
756 	}
757 }
758 
759 
760 
761 static inline void
762 send_packets(struct rte_mbuf **m, uint32_t *res, int num)
763 {
764 	int i;
765 
766 	/* Prefetch first packets */
767 	for (i = 0; i < PREFETCH_OFFSET && i < num; i++) {
768 		rte_prefetch0(rte_pktmbuf_mtod(
769 				m[i], void *));
770 	}
771 
772 	for (i = 0; i < (num - PREFETCH_OFFSET); i++) {
773 		rte_prefetch0(rte_pktmbuf_mtod(m[
774 				i + PREFETCH_OFFSET], void *));
775 		send_one_packet(m[i], res[i]);
776 	}
777 
778 	/* Process left packets */
779 	for (; i < num; i++)
780 		send_one_packet(m[i], res[i]);
781 }
782 
783 /*
784  * Parses IPV6 address, exepcts the following format:
785  * XXXX:XXXX:XXXX:XXXX:XXXX:XXXX:XXXX:XXXX (where X - is a hexedecimal digit).
786  */
787 static int
788 parse_ipv6_addr(const char *in, const char **end, uint32_t v[IPV6_ADDR_U32],
789 	char dlm)
790 {
791 	uint32_t addr[IPV6_ADDR_U16];
792 
793 	GET_CB_FIELD(in, addr[0], 16, UINT16_MAX, ':');
794 	GET_CB_FIELD(in, addr[1], 16, UINT16_MAX, ':');
795 	GET_CB_FIELD(in, addr[2], 16, UINT16_MAX, ':');
796 	GET_CB_FIELD(in, addr[3], 16, UINT16_MAX, ':');
797 	GET_CB_FIELD(in, addr[4], 16, UINT16_MAX, ':');
798 	GET_CB_FIELD(in, addr[5], 16, UINT16_MAX, ':');
799 	GET_CB_FIELD(in, addr[6], 16, UINT16_MAX, ':');
800 	GET_CB_FIELD(in, addr[7], 16, UINT16_MAX, dlm);
801 
802 	*end = in;
803 
804 	v[0] = (addr[0] << 16) + addr[1];
805 	v[1] = (addr[2] << 16) + addr[3];
806 	v[2] = (addr[4] << 16) + addr[5];
807 	v[3] = (addr[6] << 16) + addr[7];
808 
809 	return 0;
810 }
811 
812 static int
813 parse_ipv6_net(const char *in, struct rte_acl_field field[4])
814 {
815 	int32_t rc;
816 	const char *mp;
817 	uint32_t i, m, v[4];
818 	const uint32_t nbu32 = sizeof(uint32_t) * CHAR_BIT;
819 
820 	/* get address. */
821 	rc = parse_ipv6_addr(in, &mp, v, '/');
822 	if (rc != 0)
823 		return rc;
824 
825 	/* get mask. */
826 	GET_CB_FIELD(mp, m, 0, CHAR_BIT * sizeof(v), 0);
827 
828 	/* put all together. */
829 	for (i = 0; i != RTE_DIM(v); i++) {
830 		if (m >= (i + 1) * nbu32)
831 			field[i].mask_range.u32 = nbu32;
832 		else
833 			field[i].mask_range.u32 = m > (i * nbu32) ?
834 				m - (i * 32) : 0;
835 
836 		field[i].value.u32 = v[i];
837 	}
838 
839 	return 0;
840 }
841 
842 static int
843 parse_cb_ipv6_rule(char *str, struct rte_acl_rule *v, int has_userdata)
844 {
845 	int i, rc;
846 	char *s, *sp, *in[CB_FLD_NUM];
847 	static const char *dlm = " \t\n";
848 	int dim = has_userdata ? CB_FLD_NUM : CB_FLD_USERDATA;
849 	s = str;
850 
851 	for (i = 0; i != dim; i++, s = NULL) {
852 		in[i] = strtok_r(s, dlm, &sp);
853 		if (in[i] == NULL)
854 			return -EINVAL;
855 	}
856 
857 	rc = parse_ipv6_net(in[CB_FLD_SRC_ADDR], v->field + SRC1_FIELD_IPV6);
858 	if (rc != 0) {
859 		acl_log("failed to read source address/mask: %s\n",
860 			in[CB_FLD_SRC_ADDR]);
861 		return rc;
862 	}
863 
864 	rc = parse_ipv6_net(in[CB_FLD_DST_ADDR], v->field + DST1_FIELD_IPV6);
865 	if (rc != 0) {
866 		acl_log("failed to read destination address/mask: %s\n",
867 			in[CB_FLD_DST_ADDR]);
868 		return rc;
869 	}
870 
871 	/* source port. */
872 	GET_CB_FIELD(in[CB_FLD_SRC_PORT_LOW],
873 		v->field[SRCP_FIELD_IPV6].value.u16,
874 		0, UINT16_MAX, 0);
875 	GET_CB_FIELD(in[CB_FLD_SRC_PORT_HIGH],
876 		v->field[SRCP_FIELD_IPV6].mask_range.u16,
877 		0, UINT16_MAX, 0);
878 
879 	if (strncmp(in[CB_FLD_SRC_PORT_DLM], cb_port_delim,
880 			sizeof(cb_port_delim)) != 0)
881 		return -EINVAL;
882 
883 	/* destination port. */
884 	GET_CB_FIELD(in[CB_FLD_DST_PORT_LOW],
885 		v->field[DSTP_FIELD_IPV6].value.u16,
886 		0, UINT16_MAX, 0);
887 	GET_CB_FIELD(in[CB_FLD_DST_PORT_HIGH],
888 		v->field[DSTP_FIELD_IPV6].mask_range.u16,
889 		0, UINT16_MAX, 0);
890 
891 	if (strncmp(in[CB_FLD_DST_PORT_DLM], cb_port_delim,
892 			sizeof(cb_port_delim)) != 0)
893 		return -EINVAL;
894 
895 	if (v->field[SRCP_FIELD_IPV6].mask_range.u16
896 			< v->field[SRCP_FIELD_IPV6].value.u16
897 			|| v->field[DSTP_FIELD_IPV6].mask_range.u16
898 			< v->field[DSTP_FIELD_IPV6].value.u16)
899 		return -EINVAL;
900 
901 	GET_CB_FIELD(in[CB_FLD_PROTO], v->field[PROTO_FIELD_IPV6].value.u8,
902 		0, UINT8_MAX, '/');
903 	GET_CB_FIELD(in[CB_FLD_PROTO], v->field[PROTO_FIELD_IPV6].mask_range.u8,
904 		0, UINT8_MAX, 0);
905 
906 	if (has_userdata)
907 		GET_CB_FIELD(in[CB_FLD_USERDATA], v->data.userdata,
908 			0, UINT32_MAX, 0);
909 
910 	return 0;
911 }
912 
913 /*
914  * Parse ClassBench rules file.
915  * Expected format:
916  * '@'<src_ipv4_addr>'/'<masklen> <space> \
917  * <dst_ipv4_addr>'/'<masklen> <space> \
918  * <src_port_low> <space> ":" <src_port_high> <space> \
919  * <dst_port_low> <space> ":" <dst_port_high> <space> \
920  * <proto>'/'<mask>
921  */
922 static int
923 parse_ipv4_net(const char *in, uint32_t *addr, uint32_t *mask_len)
924 {
925 	uint8_t a, b, c, d, m;
926 
927 	GET_CB_FIELD(in, a, 0, UINT8_MAX, '.');
928 	GET_CB_FIELD(in, b, 0, UINT8_MAX, '.');
929 	GET_CB_FIELD(in, c, 0, UINT8_MAX, '.');
930 	GET_CB_FIELD(in, d, 0, UINT8_MAX, '/');
931 	GET_CB_FIELD(in, m, 0, sizeof(uint32_t) * CHAR_BIT, 0);
932 
933 	addr[0] = IPv4(a, b, c, d);
934 	mask_len[0] = m;
935 
936 	return 0;
937 }
938 
939 static int
940 parse_cb_ipv4vlan_rule(char *str, struct rte_acl_rule *v, int has_userdata)
941 {
942 	int i, rc;
943 	char *s, *sp, *in[CB_FLD_NUM];
944 	static const char *dlm = " \t\n";
945 	int dim = has_userdata ? CB_FLD_NUM : CB_FLD_USERDATA;
946 	s = str;
947 
948 	for (i = 0; i != dim; i++, s = NULL) {
949 		in[i] = strtok_r(s, dlm, &sp);
950 		if (in[i] == NULL)
951 			return -EINVAL;
952 	}
953 
954 	rc = parse_ipv4_net(in[CB_FLD_SRC_ADDR],
955 			&v->field[SRC_FIELD_IPV4].value.u32,
956 			&v->field[SRC_FIELD_IPV4].mask_range.u32);
957 	if (rc != 0) {
958 			acl_log("failed to read source address/mask: %s\n",
959 			in[CB_FLD_SRC_ADDR]);
960 		return rc;
961 	}
962 
963 	rc = parse_ipv4_net(in[CB_FLD_DST_ADDR],
964 			&v->field[DST_FIELD_IPV4].value.u32,
965 			&v->field[DST_FIELD_IPV4].mask_range.u32);
966 	if (rc != 0) {
967 		acl_log("failed to read destination address/mask: %s\n",
968 			in[CB_FLD_DST_ADDR]);
969 		return rc;
970 	}
971 
972 	GET_CB_FIELD(in[CB_FLD_SRC_PORT_LOW],
973 		v->field[SRCP_FIELD_IPV4].value.u16,
974 		0, UINT16_MAX, 0);
975 	GET_CB_FIELD(in[CB_FLD_SRC_PORT_HIGH],
976 		v->field[SRCP_FIELD_IPV4].mask_range.u16,
977 		0, UINT16_MAX, 0);
978 
979 	if (strncmp(in[CB_FLD_SRC_PORT_DLM], cb_port_delim,
980 			sizeof(cb_port_delim)) != 0)
981 		return -EINVAL;
982 
983 	GET_CB_FIELD(in[CB_FLD_DST_PORT_LOW],
984 		v->field[DSTP_FIELD_IPV4].value.u16,
985 		0, UINT16_MAX, 0);
986 	GET_CB_FIELD(in[CB_FLD_DST_PORT_HIGH],
987 		v->field[DSTP_FIELD_IPV4].mask_range.u16,
988 		0, UINT16_MAX, 0);
989 
990 	if (strncmp(in[CB_FLD_DST_PORT_DLM], cb_port_delim,
991 			sizeof(cb_port_delim)) != 0)
992 		return -EINVAL;
993 
994 	if (v->field[SRCP_FIELD_IPV4].mask_range.u16
995 			< v->field[SRCP_FIELD_IPV4].value.u16
996 			|| v->field[DSTP_FIELD_IPV4].mask_range.u16
997 			< v->field[DSTP_FIELD_IPV4].value.u16)
998 		return -EINVAL;
999 
1000 	GET_CB_FIELD(in[CB_FLD_PROTO], v->field[PROTO_FIELD_IPV4].value.u8,
1001 		0, UINT8_MAX, '/');
1002 	GET_CB_FIELD(in[CB_FLD_PROTO], v->field[PROTO_FIELD_IPV4].mask_range.u8,
1003 		0, UINT8_MAX, 0);
1004 
1005 	if (has_userdata)
1006 		GET_CB_FIELD(in[CB_FLD_USERDATA], v->data.userdata, 0,
1007 			UINT32_MAX, 0);
1008 
1009 	return 0;
1010 }
1011 
1012 static int
1013 add_rules(const char *rule_path,
1014 		struct rte_acl_rule **proute_base,
1015 		unsigned int *proute_num,
1016 		struct rte_acl_rule **pacl_base,
1017 		unsigned int *pacl_num, uint32_t rule_size,
1018 		int (*parser)(char *, struct rte_acl_rule*, int))
1019 {
1020 	uint8_t *acl_rules, *route_rules;
1021 	struct rte_acl_rule *next;
1022 	unsigned int acl_num = 0, route_num = 0, total_num = 0;
1023 	unsigned int acl_cnt = 0, route_cnt = 0;
1024 	char buff[LINE_MAX];
1025 	FILE *fh = fopen(rule_path, "rb");
1026 	unsigned int i = 0;
1027 	int val;
1028 
1029 	if (fh == NULL)
1030 		rte_exit(EXIT_FAILURE, "%s: Open %s failed\n", __func__,
1031 			rule_path);
1032 
1033 	while ((fgets(buff, LINE_MAX, fh) != NULL)) {
1034 		if (buff[0] == ROUTE_LEAD_CHAR)
1035 			route_num++;
1036 		else if (buff[0] == ACL_LEAD_CHAR)
1037 			acl_num++;
1038 	}
1039 
1040 	if (0 == route_num)
1041 		rte_exit(EXIT_FAILURE, "Not find any route entries in %s!\n",
1042 				rule_path);
1043 
1044 	val = fseek(fh, 0, SEEK_SET);
1045 	if (val < 0) {
1046 		rte_exit(EXIT_FAILURE, "%s: File seek operation failed\n",
1047 			__func__);
1048 	}
1049 
1050 	acl_rules = calloc(acl_num, rule_size);
1051 
1052 	if (NULL == acl_rules)
1053 		rte_exit(EXIT_FAILURE, "%s: failed to malloc memory\n",
1054 			__func__);
1055 
1056 	route_rules = calloc(route_num, rule_size);
1057 
1058 	if (NULL == route_rules)
1059 		rte_exit(EXIT_FAILURE, "%s: failed to malloc memory\n",
1060 			__func__);
1061 
1062 	i = 0;
1063 	while (fgets(buff, LINE_MAX, fh) != NULL) {
1064 		i++;
1065 
1066 		if (is_bypass_line(buff))
1067 			continue;
1068 
1069 		char s = buff[0];
1070 
1071 		/* Route entry */
1072 		if (s == ROUTE_LEAD_CHAR)
1073 			next = (struct rte_acl_rule *)(route_rules +
1074 				route_cnt * rule_size);
1075 
1076 		/* ACL entry */
1077 		else if (s == ACL_LEAD_CHAR)
1078 			next = (struct rte_acl_rule *)(acl_rules +
1079 				acl_cnt * rule_size);
1080 
1081 		/* Illegal line */
1082 		else
1083 			rte_exit(EXIT_FAILURE,
1084 				"%s Line %u: should start with leading "
1085 				"char %c or %c\n",
1086 				rule_path, i, ROUTE_LEAD_CHAR, ACL_LEAD_CHAR);
1087 
1088 		if (parser(buff + 1, next, s == ROUTE_LEAD_CHAR) != 0)
1089 			rte_exit(EXIT_FAILURE,
1090 				"%s Line %u: parse rules error\n",
1091 				rule_path, i);
1092 
1093 		if (s == ROUTE_LEAD_CHAR) {
1094 			/* Check the forwarding port number */
1095 			if ((enabled_port_mask & (1 << next->data.userdata)) ==
1096 					0)
1097 				rte_exit(EXIT_FAILURE,
1098 					"%s Line %u: fwd number illegal:%u\n",
1099 					rule_path, i, next->data.userdata);
1100 			next->data.userdata += FWD_PORT_SHIFT;
1101 			route_cnt++;
1102 		} else {
1103 			next->data.userdata = ACL_DENY_SIGNATURE + acl_cnt;
1104 			acl_cnt++;
1105 		}
1106 
1107 		next->data.priority = RTE_ACL_MAX_PRIORITY - total_num;
1108 		next->data.category_mask = -1;
1109 		total_num++;
1110 	}
1111 
1112 	fclose(fh);
1113 
1114 	*pacl_base = (struct rte_acl_rule *)acl_rules;
1115 	*pacl_num = acl_num;
1116 	*proute_base = (struct rte_acl_rule *)route_rules;
1117 	*proute_num = route_cnt;
1118 
1119 	return 0;
1120 }
1121 
1122 static void
1123 dump_acl_config(void)
1124 {
1125 	printf("ACL option are:\n");
1126 	printf(OPTION_RULE_IPV4": %s\n", parm_config.rule_ipv4_name);
1127 	printf(OPTION_RULE_IPV6": %s\n", parm_config.rule_ipv6_name);
1128 	printf(OPTION_SCALAR": %d\n", parm_config.scalar);
1129 }
1130 
1131 static int
1132 check_acl_config(void)
1133 {
1134 	if (parm_config.rule_ipv4_name == NULL) {
1135 		acl_log("ACL IPv4 rule file not specified\n");
1136 		return -1;
1137 	} else if (parm_config.rule_ipv6_name == NULL) {
1138 		acl_log("ACL IPv6 rule file not specified\n");
1139 		return -1;
1140 	}
1141 
1142 	return 0;
1143 }
1144 
1145 static struct rte_acl_ctx*
1146 setup_acl(struct rte_acl_rule *route_base,
1147 		struct rte_acl_rule *acl_base, unsigned int route_num,
1148 		unsigned int acl_num, int ipv6, int socketid)
1149 {
1150 	char name[PATH_MAX];
1151 	struct rte_acl_param acl_param;
1152 	struct rte_acl_config acl_build_param;
1153 	struct rte_acl_ctx *context;
1154 	int dim = ipv6 ? RTE_DIM(ipv6_defs) : RTE_DIM(ipv4_defs);
1155 
1156 	/* Create ACL contexts */
1157 	snprintf(name, sizeof(name), "%s%d",
1158 			ipv6 ? L3FWD_ACL_IPV6_NAME : L3FWD_ACL_IPV4_NAME,
1159 			socketid);
1160 
1161 	acl_param.name = name;
1162 	acl_param.socket_id = socketid;
1163 	acl_param.rule_size = RTE_ACL_RULE_SZ(dim);
1164 	acl_param.max_rule_num = MAX_ACL_RULE_NUM;
1165 
1166 	if ((context = rte_acl_create(&acl_param)) == NULL)
1167 		rte_exit(EXIT_FAILURE, "Failed to create ACL context\n");
1168 
1169 	if (parm_config.scalar && rte_acl_set_ctx_classify(context,
1170 			RTE_ACL_CLASSIFY_SCALAR) != 0)
1171 		rte_exit(EXIT_FAILURE,
1172 			"Failed to setup classify method for  ACL context\n");
1173 
1174 	if (rte_acl_add_rules(context, route_base, route_num) < 0)
1175 			rte_exit(EXIT_FAILURE, "add rules failed\n");
1176 
1177 	if (rte_acl_add_rules(context, acl_base, acl_num) < 0)
1178 			rte_exit(EXIT_FAILURE, "add rules failed\n");
1179 
1180 	/* Perform builds */
1181 	memset(&acl_build_param, 0, sizeof(acl_build_param));
1182 
1183 	acl_build_param.num_categories = DEFAULT_MAX_CATEGORIES;
1184 	acl_build_param.num_fields = dim;
1185 	memcpy(&acl_build_param.defs, ipv6 ? ipv6_defs : ipv4_defs,
1186 		ipv6 ? sizeof(ipv6_defs) : sizeof(ipv4_defs));
1187 
1188 	if (rte_acl_build(context, &acl_build_param) != 0)
1189 		rte_exit(EXIT_FAILURE, "Failed to build ACL trie\n");
1190 
1191 	rte_acl_dump(context);
1192 
1193 	return context;
1194 }
1195 
1196 static int
1197 app_acl_init(void)
1198 {
1199 	unsigned lcore_id;
1200 	unsigned int i;
1201 	int socketid;
1202 	struct rte_acl_rule *acl_base_ipv4, *route_base_ipv4,
1203 		*acl_base_ipv6, *route_base_ipv6;
1204 	unsigned int acl_num_ipv4 = 0, route_num_ipv4 = 0,
1205 		acl_num_ipv6 = 0, route_num_ipv6 = 0;
1206 
1207 	if (check_acl_config() != 0)
1208 		rte_exit(EXIT_FAILURE, "Failed to get valid ACL options\n");
1209 
1210 	dump_acl_config();
1211 
1212 	/* Load  rules from the input file */
1213 	if (add_rules(parm_config.rule_ipv4_name, &route_base_ipv4,
1214 			&route_num_ipv4, &acl_base_ipv4, &acl_num_ipv4,
1215 			sizeof(struct acl4_rule), &parse_cb_ipv4vlan_rule) < 0)
1216 		rte_exit(EXIT_FAILURE, "Failed to add rules\n");
1217 
1218 	acl_log("IPv4 Route entries %u:\n", route_num_ipv4);
1219 	dump_ipv4_rules((struct acl4_rule *)route_base_ipv4, route_num_ipv4, 1);
1220 
1221 	acl_log("IPv4 ACL entries %u:\n", acl_num_ipv4);
1222 	dump_ipv4_rules((struct acl4_rule *)acl_base_ipv4, acl_num_ipv4, 1);
1223 
1224 	if (add_rules(parm_config.rule_ipv6_name, &route_base_ipv6,
1225 			&route_num_ipv6,
1226 			&acl_base_ipv6, &acl_num_ipv6,
1227 			sizeof(struct acl6_rule), &parse_cb_ipv6_rule) < 0)
1228 		rte_exit(EXIT_FAILURE, "Failed to add rules\n");
1229 
1230 	acl_log("IPv6 Route entries %u:\n", route_num_ipv6);
1231 	dump_ipv6_rules((struct acl6_rule *)route_base_ipv6, route_num_ipv6, 1);
1232 
1233 	acl_log("IPv6 ACL entries %u:\n", acl_num_ipv6);
1234 	dump_ipv6_rules((struct acl6_rule *)acl_base_ipv6, acl_num_ipv6, 1);
1235 
1236 	memset(&acl_config, 0, sizeof(acl_config));
1237 
1238 	/* Check sockets a context should be created on */
1239 	if (!numa_on)
1240 		acl_config.mapped[0] = 1;
1241 	else {
1242 		for (lcore_id = 0; lcore_id < RTE_MAX_LCORE; lcore_id++) {
1243 			if (rte_lcore_is_enabled(lcore_id) == 0)
1244 				continue;
1245 
1246 			socketid = rte_lcore_to_socket_id(lcore_id);
1247 			if (socketid >= NB_SOCKETS) {
1248 				acl_log("Socket %d of lcore %u is out "
1249 					"of range %d\n",
1250 					socketid, lcore_id, NB_SOCKETS);
1251 				free(route_base_ipv4);
1252 				free(route_base_ipv6);
1253 				free(acl_base_ipv4);
1254 				free(acl_base_ipv6);
1255 				return -1;
1256 			}
1257 
1258 			acl_config.mapped[socketid] = 1;
1259 		}
1260 	}
1261 
1262 	for (i = 0; i < NB_SOCKETS; i++) {
1263 		if (acl_config.mapped[i]) {
1264 			acl_config.acx_ipv4[i] = setup_acl(route_base_ipv4,
1265 				acl_base_ipv4, route_num_ipv4, acl_num_ipv4,
1266 				0, i);
1267 
1268 			acl_config.acx_ipv6[i] = setup_acl(route_base_ipv6,
1269 				acl_base_ipv6, route_num_ipv6, acl_num_ipv6,
1270 				1, i);
1271 		}
1272 	}
1273 
1274 	free(route_base_ipv4);
1275 	free(route_base_ipv6);
1276 
1277 #ifdef L3FWDACL_DEBUG
1278 	acl_config.rule_ipv4 = (struct acl4_rule *)acl_base_ipv4;
1279 	acl_config.rule_ipv6 = (struct acl6_rule *)acl_base_ipv6;
1280 #else
1281 	free(acl_base_ipv4);
1282 	free(acl_base_ipv6);
1283 #endif
1284 
1285 	return 0;
1286 }
1287 
1288 /***********************end of ACL part******************************/
1289 
1290 struct lcore_conf {
1291 	uint16_t n_rx_queue;
1292 	struct lcore_rx_queue rx_queue_list[MAX_RX_QUEUE_PER_LCORE];
1293 	uint16_t n_tx_port;
1294 	uint16_t tx_port_id[RTE_MAX_ETHPORTS];
1295 	uint16_t tx_queue_id[RTE_MAX_ETHPORTS];
1296 	struct rte_eth_dev_tx_buffer *tx_buffer[RTE_MAX_ETHPORTS];
1297 } __rte_cache_aligned;
1298 
1299 static struct lcore_conf lcore_conf[RTE_MAX_LCORE];
1300 
1301 /* Enqueue a single packet, and send burst if queue is filled */
1302 static inline void
1303 send_single_packet(struct rte_mbuf *m, uint16_t port)
1304 {
1305 	uint32_t lcore_id;
1306 	struct lcore_conf *qconf;
1307 
1308 	lcore_id = rte_lcore_id();
1309 
1310 	qconf = &lcore_conf[lcore_id];
1311 	rte_eth_tx_buffer(port, qconf->tx_queue_id[port],
1312 			qconf->tx_buffer[port], m);
1313 }
1314 
1315 #ifdef DO_RFC_1812_CHECKS
1316 static inline int
1317 is_valid_ipv4_pkt(struct ipv4_hdr *pkt, uint32_t link_len)
1318 {
1319 	/* From http://www.rfc-editor.org/rfc/rfc1812.txt section 5.2.2 */
1320 	/*
1321 	 * 1. The packet length reported by the Link Layer must be large
1322 	 * enough to hold the minimum length legal IP datagram (20 bytes).
1323 	 */
1324 	if (link_len < sizeof(struct ipv4_hdr))
1325 		return -1;
1326 
1327 	/* 2. The IP checksum must be correct. */
1328 	/* this is checked in H/W */
1329 
1330 	/*
1331 	 * 3. The IP version number must be 4. If the version number is not 4
1332 	 * then the packet may be another version of IP, such as IPng or
1333 	 * ST-II.
1334 	 */
1335 	if (((pkt->version_ihl) >> 4) != 4)
1336 		return -3;
1337 	/*
1338 	 * 4. The IP header length field must be large enough to hold the
1339 	 * minimum length legal IP datagram (20 bytes = 5 words).
1340 	 */
1341 	if ((pkt->version_ihl & 0xf) < 5)
1342 		return -4;
1343 
1344 	/*
1345 	 * 5. The IP total length field must be large enough to hold the IP
1346 	 * datagram header, whose length is specified in the IP header length
1347 	 * field.
1348 	 */
1349 	if (rte_cpu_to_be_16(pkt->total_length) < sizeof(struct ipv4_hdr))
1350 		return -5;
1351 
1352 	return 0;
1353 }
1354 #endif
1355 
1356 /* main processing loop */
1357 static int
1358 main_loop(__attribute__((unused)) void *dummy)
1359 {
1360 	struct rte_mbuf *pkts_burst[MAX_PKT_BURST];
1361 	unsigned lcore_id;
1362 	uint64_t prev_tsc, diff_tsc, cur_tsc;
1363 	int i, nb_rx;
1364 	uint16_t portid;
1365 	uint8_t queueid;
1366 	struct lcore_conf *qconf;
1367 	int socketid;
1368 	const uint64_t drain_tsc = (rte_get_tsc_hz() + US_PER_S - 1)
1369 			/ US_PER_S * BURST_TX_DRAIN_US;
1370 
1371 	prev_tsc = 0;
1372 	lcore_id = rte_lcore_id();
1373 	qconf = &lcore_conf[lcore_id];
1374 	socketid = rte_lcore_to_socket_id(lcore_id);
1375 
1376 	if (qconf->n_rx_queue == 0) {
1377 		RTE_LOG(INFO, L3FWD, "lcore %u has nothing to do\n", lcore_id);
1378 		return 0;
1379 	}
1380 
1381 	RTE_LOG(INFO, L3FWD, "entering main loop on lcore %u\n", lcore_id);
1382 
1383 	for (i = 0; i < qconf->n_rx_queue; i++) {
1384 
1385 		portid = qconf->rx_queue_list[i].port_id;
1386 		queueid = qconf->rx_queue_list[i].queue_id;
1387 		RTE_LOG(INFO, L3FWD,
1388 			" -- lcoreid=%u portid=%u rxqueueid=%hhu\n",
1389 			lcore_id, portid, queueid);
1390 	}
1391 
1392 	while (1) {
1393 
1394 		cur_tsc = rte_rdtsc();
1395 
1396 		/*
1397 		 * TX burst queue drain
1398 		 */
1399 		diff_tsc = cur_tsc - prev_tsc;
1400 		if (unlikely(diff_tsc > drain_tsc)) {
1401 			for (i = 0; i < qconf->n_tx_port; ++i) {
1402 				portid = qconf->tx_port_id[i];
1403 				rte_eth_tx_buffer_flush(portid,
1404 						qconf->tx_queue_id[portid],
1405 						qconf->tx_buffer[portid]);
1406 			}
1407 			prev_tsc = cur_tsc;
1408 		}
1409 
1410 		/*
1411 		 * Read packet from RX queues
1412 		 */
1413 		for (i = 0; i < qconf->n_rx_queue; ++i) {
1414 
1415 			portid = qconf->rx_queue_list[i].port_id;
1416 			queueid = qconf->rx_queue_list[i].queue_id;
1417 			nb_rx = rte_eth_rx_burst(portid, queueid,
1418 				pkts_burst, MAX_PKT_BURST);
1419 
1420 			if (nb_rx > 0) {
1421 				struct acl_search_t acl_search;
1422 
1423 				prepare_acl_parameter(pkts_burst, &acl_search,
1424 					nb_rx);
1425 
1426 				if (acl_search.num_ipv4) {
1427 					rte_acl_classify(
1428 						acl_config.acx_ipv4[socketid],
1429 						acl_search.data_ipv4,
1430 						acl_search.res_ipv4,
1431 						acl_search.num_ipv4,
1432 						DEFAULT_MAX_CATEGORIES);
1433 
1434 					send_packets(acl_search.m_ipv4,
1435 						acl_search.res_ipv4,
1436 						acl_search.num_ipv4);
1437 				}
1438 
1439 				if (acl_search.num_ipv6) {
1440 					rte_acl_classify(
1441 						acl_config.acx_ipv6[socketid],
1442 						acl_search.data_ipv6,
1443 						acl_search.res_ipv6,
1444 						acl_search.num_ipv6,
1445 						DEFAULT_MAX_CATEGORIES);
1446 
1447 					send_packets(acl_search.m_ipv6,
1448 						acl_search.res_ipv6,
1449 						acl_search.num_ipv6);
1450 				}
1451 			}
1452 		}
1453 	}
1454 }
1455 
1456 static int
1457 check_lcore_params(void)
1458 {
1459 	uint8_t queue, lcore;
1460 	uint16_t i;
1461 	int socketid;
1462 
1463 	for (i = 0; i < nb_lcore_params; ++i) {
1464 		queue = lcore_params[i].queue_id;
1465 		if (queue >= MAX_RX_QUEUE_PER_PORT) {
1466 			printf("invalid queue number: %hhu\n", queue);
1467 			return -1;
1468 		}
1469 		lcore = lcore_params[i].lcore_id;
1470 		if (!rte_lcore_is_enabled(lcore)) {
1471 			printf("error: lcore %hhu is not enabled in "
1472 				"lcore mask\n", lcore);
1473 			return -1;
1474 		}
1475 		socketid = rte_lcore_to_socket_id(lcore);
1476 		if (socketid != 0 && numa_on == 0) {
1477 			printf("warning: lcore %hhu is on socket %d "
1478 				"with numa off\n",
1479 				lcore, socketid);
1480 		}
1481 	}
1482 	return 0;
1483 }
1484 
1485 static int
1486 check_port_config(const unsigned nb_ports)
1487 {
1488 	unsigned portid;
1489 	uint16_t i;
1490 
1491 	for (i = 0; i < nb_lcore_params; ++i) {
1492 		portid = lcore_params[i].port_id;
1493 
1494 		if ((enabled_port_mask & (1 << portid)) == 0) {
1495 			printf("port %u is not enabled in port mask\n", portid);
1496 			return -1;
1497 		}
1498 		if (portid >= nb_ports) {
1499 			printf("port %u is not present on the board\n", portid);
1500 			return -1;
1501 		}
1502 	}
1503 	return 0;
1504 }
1505 
1506 static uint8_t
1507 get_port_n_rx_queues(const uint16_t port)
1508 {
1509 	int queue = -1;
1510 	uint16_t i;
1511 
1512 	for (i = 0; i < nb_lcore_params; ++i) {
1513 		if (lcore_params[i].port_id == port &&
1514 				lcore_params[i].queue_id > queue)
1515 			queue = lcore_params[i].queue_id;
1516 	}
1517 	return (uint8_t)(++queue);
1518 }
1519 
1520 static int
1521 init_lcore_rx_queues(void)
1522 {
1523 	uint16_t i, nb_rx_queue;
1524 	uint8_t lcore;
1525 
1526 	for (i = 0; i < nb_lcore_params; ++i) {
1527 		lcore = lcore_params[i].lcore_id;
1528 		nb_rx_queue = lcore_conf[lcore].n_rx_queue;
1529 		if (nb_rx_queue >= MAX_RX_QUEUE_PER_LCORE) {
1530 			printf("error: too many queues (%u) for lcore: %u\n",
1531 				(unsigned)nb_rx_queue + 1, (unsigned)lcore);
1532 			return -1;
1533 		} else {
1534 			lcore_conf[lcore].rx_queue_list[nb_rx_queue].port_id =
1535 				lcore_params[i].port_id;
1536 			lcore_conf[lcore].rx_queue_list[nb_rx_queue].queue_id =
1537 				lcore_params[i].queue_id;
1538 			lcore_conf[lcore].n_rx_queue++;
1539 		}
1540 	}
1541 	return 0;
1542 }
1543 
1544 /* display usage */
1545 static void
1546 print_usage(const char *prgname)
1547 {
1548 	printf("%s [EAL options] -- -p PORTMASK -P"
1549 		"--"OPTION_RULE_IPV4"=FILE"
1550 		"--"OPTION_RULE_IPV6"=FILE"
1551 		"  [--"OPTION_CONFIG" (port,queue,lcore)[,(port,queue,lcore]]"
1552 		"  [--"OPTION_ENBJMO" [--max-pkt-len PKTLEN]]\n"
1553 		"  -p PORTMASK: hexadecimal bitmask of ports to configure\n"
1554 		"  -P : enable promiscuous mode\n"
1555 		"  --"OPTION_CONFIG": (port,queue,lcore): "
1556 		"rx queues configuration\n"
1557 		"  --"OPTION_NONUMA": optional, disable numa awareness\n"
1558 		"  --"OPTION_ENBJMO": enable jumbo frame"
1559 		" which max packet len is PKTLEN in decimal (64-9600)\n"
1560 		"  --"OPTION_RULE_IPV4"=FILE: specify the ipv4 rules entries "
1561 		"file. "
1562 		"Each rule occupy one line. "
1563 		"2 kinds of rules are supported. "
1564 		"One is ACL entry at while line leads with character '%c', "
1565 		"another is route entry at while line leads with "
1566 		"character '%c'.\n"
1567 		"  --"OPTION_RULE_IPV6"=FILE: specify the ipv6 rules "
1568 		"entries file.\n"
1569 		"  --"OPTION_SCALAR": Use scalar function to do lookup\n",
1570 		prgname, ACL_LEAD_CHAR, ROUTE_LEAD_CHAR);
1571 }
1572 
1573 static int
1574 parse_max_pkt_len(const char *pktlen)
1575 {
1576 	char *end = NULL;
1577 	unsigned long len;
1578 
1579 	/* parse decimal string */
1580 	len = strtoul(pktlen, &end, 10);
1581 	if ((pktlen[0] == '\0') || (end == NULL) || (*end != '\0'))
1582 		return -1;
1583 
1584 	if (len == 0)
1585 		return -1;
1586 
1587 	return len;
1588 }
1589 
1590 static int
1591 parse_portmask(const char *portmask)
1592 {
1593 	char *end = NULL;
1594 	unsigned long pm;
1595 
1596 	/* parse hexadecimal string */
1597 	pm = strtoul(portmask, &end, 16);
1598 	if ((portmask[0] == '\0') || (end == NULL) || (*end != '\0'))
1599 		return -1;
1600 
1601 	if (pm == 0)
1602 		return -1;
1603 
1604 	return pm;
1605 }
1606 
1607 static int
1608 parse_config(const char *q_arg)
1609 {
1610 	char s[256];
1611 	const char *p, *p0 = q_arg;
1612 	char *end;
1613 	enum fieldnames {
1614 		FLD_PORT = 0,
1615 		FLD_QUEUE,
1616 		FLD_LCORE,
1617 		_NUM_FLD
1618 	};
1619 	unsigned long int_fld[_NUM_FLD];
1620 	char *str_fld[_NUM_FLD];
1621 	int i;
1622 	unsigned size;
1623 
1624 	nb_lcore_params = 0;
1625 
1626 	while ((p = strchr(p0, '(')) != NULL) {
1627 		++p;
1628 		if ((p0 = strchr(p, ')')) == NULL)
1629 			return -1;
1630 
1631 		size = p0 - p;
1632 		if (size >= sizeof(s))
1633 			return -1;
1634 
1635 		snprintf(s, sizeof(s), "%.*s", size, p);
1636 		if (rte_strsplit(s, sizeof(s), str_fld, _NUM_FLD, ',') !=
1637 				_NUM_FLD)
1638 			return -1;
1639 		for (i = 0; i < _NUM_FLD; i++) {
1640 			errno = 0;
1641 			int_fld[i] = strtoul(str_fld[i], &end, 0);
1642 			if (errno != 0 || end == str_fld[i] || int_fld[i] > 255)
1643 				return -1;
1644 		}
1645 		if (nb_lcore_params >= MAX_LCORE_PARAMS) {
1646 			printf("exceeded max number of lcore params: %hu\n",
1647 				nb_lcore_params);
1648 			return -1;
1649 		}
1650 		lcore_params_array[nb_lcore_params].port_id =
1651 			(uint8_t)int_fld[FLD_PORT];
1652 		lcore_params_array[nb_lcore_params].queue_id =
1653 			(uint8_t)int_fld[FLD_QUEUE];
1654 		lcore_params_array[nb_lcore_params].lcore_id =
1655 			(uint8_t)int_fld[FLD_LCORE];
1656 		++nb_lcore_params;
1657 	}
1658 	lcore_params = lcore_params_array;
1659 	return 0;
1660 }
1661 
1662 /* Parse the argument given in the command line of the application */
1663 static int
1664 parse_args(int argc, char **argv)
1665 {
1666 	int opt, ret;
1667 	char **argvopt;
1668 	int option_index;
1669 	char *prgname = argv[0];
1670 	static struct option lgopts[] = {
1671 		{OPTION_CONFIG, 1, 0, 0},
1672 		{OPTION_NONUMA, 0, 0, 0},
1673 		{OPTION_ENBJMO, 0, 0, 0},
1674 		{OPTION_RULE_IPV4, 1, 0, 0},
1675 		{OPTION_RULE_IPV6, 1, 0, 0},
1676 		{OPTION_SCALAR, 0, 0, 0},
1677 		{NULL, 0, 0, 0}
1678 	};
1679 
1680 	argvopt = argv;
1681 
1682 	while ((opt = getopt_long(argc, argvopt, "p:P",
1683 				lgopts, &option_index)) != EOF) {
1684 
1685 		switch (opt) {
1686 		/* portmask */
1687 		case 'p':
1688 			enabled_port_mask = parse_portmask(optarg);
1689 			if (enabled_port_mask == 0) {
1690 				printf("invalid portmask\n");
1691 				print_usage(prgname);
1692 				return -1;
1693 			}
1694 			break;
1695 		case 'P':
1696 			printf("Promiscuous mode selected\n");
1697 			promiscuous_on = 1;
1698 			break;
1699 
1700 		/* long options */
1701 		case 0:
1702 			if (!strncmp(lgopts[option_index].name,
1703 					OPTION_CONFIG,
1704 					sizeof(OPTION_CONFIG))) {
1705 				ret = parse_config(optarg);
1706 				if (ret) {
1707 					printf("invalid config\n");
1708 					print_usage(prgname);
1709 					return -1;
1710 				}
1711 			}
1712 
1713 			if (!strncmp(lgopts[option_index].name,
1714 					OPTION_NONUMA,
1715 					sizeof(OPTION_NONUMA))) {
1716 				printf("numa is disabled\n");
1717 				numa_on = 0;
1718 			}
1719 
1720 			if (!strncmp(lgopts[option_index].name,
1721 					OPTION_ENBJMO, sizeof(OPTION_ENBJMO))) {
1722 				struct option lenopts = {
1723 					"max-pkt-len",
1724 					required_argument,
1725 					0,
1726 					0
1727 				};
1728 
1729 				printf("jumbo frame is enabled\n");
1730 				port_conf.rxmode.jumbo_frame = 1;
1731 
1732 				/*
1733 				 * if no max-pkt-len set, then use the
1734 				 * default value ETHER_MAX_LEN
1735 				 */
1736 				if (0 == getopt_long(argc, argvopt, "",
1737 						&lenopts, &option_index)) {
1738 					ret = parse_max_pkt_len(optarg);
1739 					if ((ret < 64) ||
1740 						(ret > MAX_JUMBO_PKT_LEN)) {
1741 						printf("invalid packet "
1742 							"length\n");
1743 						print_usage(prgname);
1744 						return -1;
1745 					}
1746 					port_conf.rxmode.max_rx_pkt_len = ret;
1747 				}
1748 				printf("set jumbo frame max packet length "
1749 					"to %u\n",
1750 					(unsigned int)
1751 					port_conf.rxmode.max_rx_pkt_len);
1752 			}
1753 
1754 			if (!strncmp(lgopts[option_index].name,
1755 					OPTION_RULE_IPV4,
1756 					sizeof(OPTION_RULE_IPV4)))
1757 				parm_config.rule_ipv4_name = optarg;
1758 
1759 			if (!strncmp(lgopts[option_index].name,
1760 					OPTION_RULE_IPV6,
1761 					sizeof(OPTION_RULE_IPV6))) {
1762 				parm_config.rule_ipv6_name = optarg;
1763 			}
1764 
1765 			if (!strncmp(lgopts[option_index].name,
1766 					OPTION_SCALAR, sizeof(OPTION_SCALAR)))
1767 				parm_config.scalar = 1;
1768 
1769 
1770 			break;
1771 
1772 		default:
1773 			print_usage(prgname);
1774 			return -1;
1775 		}
1776 	}
1777 
1778 	if (optind >= 0)
1779 		argv[optind-1] = prgname;
1780 
1781 	ret = optind-1;
1782 	optind = 1; /* reset getopt lib */
1783 	return ret;
1784 }
1785 
1786 static void
1787 print_ethaddr(const char *name, const struct ether_addr *eth_addr)
1788 {
1789 	char buf[ETHER_ADDR_FMT_SIZE];
1790 	ether_format_addr(buf, ETHER_ADDR_FMT_SIZE, eth_addr);
1791 	printf("%s%s", name, buf);
1792 }
1793 
1794 static int
1795 init_mem(unsigned nb_mbuf)
1796 {
1797 	int socketid;
1798 	unsigned lcore_id;
1799 	char s[64];
1800 
1801 	for (lcore_id = 0; lcore_id < RTE_MAX_LCORE; lcore_id++) {
1802 		if (rte_lcore_is_enabled(lcore_id) == 0)
1803 			continue;
1804 
1805 		if (numa_on)
1806 			socketid = rte_lcore_to_socket_id(lcore_id);
1807 		else
1808 			socketid = 0;
1809 
1810 		if (socketid >= NB_SOCKETS) {
1811 			rte_exit(EXIT_FAILURE,
1812 				"Socket %d of lcore %u is out of range %d\n",
1813 				socketid, lcore_id, NB_SOCKETS);
1814 		}
1815 		if (pktmbuf_pool[socketid] == NULL) {
1816 			snprintf(s, sizeof(s), "mbuf_pool_%d", socketid);
1817 			pktmbuf_pool[socketid] =
1818 				rte_pktmbuf_pool_create(s, nb_mbuf,
1819 					MEMPOOL_CACHE_SIZE, 0,
1820 					RTE_MBUF_DEFAULT_BUF_SIZE,
1821 					socketid);
1822 			if (pktmbuf_pool[socketid] == NULL)
1823 				rte_exit(EXIT_FAILURE,
1824 					"Cannot init mbuf pool on socket %d\n",
1825 					socketid);
1826 			else
1827 				printf("Allocated mbuf pool on socket %d\n",
1828 					socketid);
1829 		}
1830 	}
1831 	return 0;
1832 }
1833 
1834 /* Check the link status of all ports in up to 9s, and print them finally */
1835 static void
1836 check_all_ports_link_status(uint16_t port_num, uint32_t port_mask)
1837 {
1838 #define CHECK_INTERVAL 100 /* 100ms */
1839 #define MAX_CHECK_TIME 90 /* 9s (90 * 100ms) in total */
1840 	uint16_t portid;
1841 	uint8_t count, all_ports_up, print_flag = 0;
1842 	struct rte_eth_link link;
1843 
1844 	printf("\nChecking link status");
1845 	fflush(stdout);
1846 	for (count = 0; count <= MAX_CHECK_TIME; count++) {
1847 		all_ports_up = 1;
1848 		for (portid = 0; portid < port_num; portid++) {
1849 			if ((port_mask & (1 << portid)) == 0)
1850 				continue;
1851 			memset(&link, 0, sizeof(link));
1852 			rte_eth_link_get_nowait(portid, &link);
1853 			/* print link status if flag set */
1854 			if (print_flag == 1) {
1855 				if (link.link_status)
1856 					printf(
1857 					"Port%d Link Up. Speed %u Mbps %s\n",
1858 						portid, link.link_speed,
1859 				(link.link_duplex == ETH_LINK_FULL_DUPLEX) ?
1860 					("full-duplex") : ("half-duplex\n"));
1861 				else
1862 					printf("Port %d Link Down\n", portid);
1863 				continue;
1864 			}
1865 			/* clear all_ports_up flag if any link down */
1866 			if (link.link_status == ETH_LINK_DOWN) {
1867 				all_ports_up = 0;
1868 				break;
1869 			}
1870 		}
1871 		/* after finally printing all link status, get out */
1872 		if (print_flag == 1)
1873 			break;
1874 
1875 		if (all_ports_up == 0) {
1876 			printf(".");
1877 			fflush(stdout);
1878 			rte_delay_ms(CHECK_INTERVAL);
1879 		}
1880 
1881 		/* set the print_flag if all ports up or timeout */
1882 		if (all_ports_up == 1 || count == (MAX_CHECK_TIME - 1)) {
1883 			print_flag = 1;
1884 			printf("done\n");
1885 		}
1886 	}
1887 }
1888 
1889 int
1890 main(int argc, char **argv)
1891 {
1892 	struct lcore_conf *qconf;
1893 	struct rte_eth_dev_info dev_info;
1894 	struct rte_eth_txconf *txconf;
1895 	int ret;
1896 	unsigned nb_ports;
1897 	uint16_t queueid;
1898 	unsigned lcore_id;
1899 	uint32_t n_tx_queue, nb_lcores;
1900 	uint16_t portid;
1901 	uint8_t nb_rx_queue, queue, socketid;
1902 
1903 	/* init EAL */
1904 	ret = rte_eal_init(argc, argv);
1905 	if (ret < 0)
1906 		rte_exit(EXIT_FAILURE, "Invalid EAL parameters\n");
1907 	argc -= ret;
1908 	argv += ret;
1909 
1910 	/* parse application arguments (after the EAL ones) */
1911 	ret = parse_args(argc, argv);
1912 	if (ret < 0)
1913 		rte_exit(EXIT_FAILURE, "Invalid L3FWD parameters\n");
1914 
1915 	if (check_lcore_params() < 0)
1916 		rte_exit(EXIT_FAILURE, "check_lcore_params failed\n");
1917 
1918 	ret = init_lcore_rx_queues();
1919 	if (ret < 0)
1920 		rte_exit(EXIT_FAILURE, "init_lcore_rx_queues failed\n");
1921 
1922 	nb_ports = rte_eth_dev_count();
1923 
1924 	if (check_port_config(nb_ports) < 0)
1925 		rte_exit(EXIT_FAILURE, "check_port_config failed\n");
1926 
1927 	/* Add ACL rules and route entries, build trie */
1928 	if (app_acl_init() < 0)
1929 		rte_exit(EXIT_FAILURE, "app_acl_init failed\n");
1930 
1931 	nb_lcores = rte_lcore_count();
1932 
1933 	/* initialize all ports */
1934 	for (portid = 0; portid < nb_ports; portid++) {
1935 		/* skip ports that are not enabled */
1936 		if ((enabled_port_mask & (1 << portid)) == 0) {
1937 			printf("\nSkipping disabled port %d\n", portid);
1938 			continue;
1939 		}
1940 
1941 		/* init port */
1942 		printf("Initializing port %d ... ", portid);
1943 		fflush(stdout);
1944 
1945 		nb_rx_queue = get_port_n_rx_queues(portid);
1946 		n_tx_queue = nb_lcores;
1947 		if (n_tx_queue > MAX_TX_QUEUE_PER_PORT)
1948 			n_tx_queue = MAX_TX_QUEUE_PER_PORT;
1949 		printf("Creating queues: nb_rxq=%d nb_txq=%u... ",
1950 			nb_rx_queue, (unsigned)n_tx_queue);
1951 		ret = rte_eth_dev_configure(portid, nb_rx_queue,
1952 					(uint16_t)n_tx_queue, &port_conf);
1953 		if (ret < 0)
1954 			rte_exit(EXIT_FAILURE,
1955 				"Cannot configure device: err=%d, port=%d\n",
1956 				ret, portid);
1957 
1958 		ret = rte_eth_dev_adjust_nb_rx_tx_desc(portid, &nb_rxd,
1959 						       &nb_txd);
1960 		if (ret < 0)
1961 			rte_exit(EXIT_FAILURE,
1962 				"rte_eth_dev_adjust_nb_rx_tx_desc: err=%d, port=%d\n",
1963 				ret, portid);
1964 
1965 		rte_eth_macaddr_get(portid, &ports_eth_addr[portid]);
1966 		print_ethaddr(" Address:", &ports_eth_addr[portid]);
1967 		printf(", ");
1968 
1969 		/* init memory */
1970 		ret = init_mem(NB_MBUF);
1971 		if (ret < 0)
1972 			rte_exit(EXIT_FAILURE, "init_mem failed\n");
1973 
1974 		for (lcore_id = 0; lcore_id < RTE_MAX_LCORE; lcore_id++) {
1975 			if (rte_lcore_is_enabled(lcore_id) == 0)
1976 				continue;
1977 
1978 			/* Initialize TX buffers */
1979 			qconf = &lcore_conf[lcore_id];
1980 			qconf->tx_buffer[portid] = rte_zmalloc_socket("tx_buffer",
1981 					RTE_ETH_TX_BUFFER_SIZE(MAX_PKT_BURST), 0,
1982 					rte_eth_dev_socket_id(portid));
1983 			if (qconf->tx_buffer[portid] == NULL)
1984 				rte_exit(EXIT_FAILURE, "Can't allocate tx buffer for port %u\n",
1985 						(unsigned) portid);
1986 
1987 			rte_eth_tx_buffer_init(qconf->tx_buffer[portid], MAX_PKT_BURST);
1988 		}
1989 
1990 		/* init one TX queue per couple (lcore,port) */
1991 		queueid = 0;
1992 		for (lcore_id = 0; lcore_id < RTE_MAX_LCORE; lcore_id++) {
1993 			if (rte_lcore_is_enabled(lcore_id) == 0)
1994 				continue;
1995 
1996 			if (numa_on)
1997 				socketid = (uint8_t)
1998 					rte_lcore_to_socket_id(lcore_id);
1999 			else
2000 				socketid = 0;
2001 
2002 			printf("txq=%u,%d,%d ", lcore_id, queueid, socketid);
2003 			fflush(stdout);
2004 
2005 			rte_eth_dev_info_get(portid, &dev_info);
2006 			txconf = &dev_info.default_txconf;
2007 			if (port_conf.rxmode.jumbo_frame)
2008 				txconf->txq_flags = 0;
2009 			ret = rte_eth_tx_queue_setup(portid, queueid, nb_txd,
2010 						     socketid, txconf);
2011 			if (ret < 0)
2012 				rte_exit(EXIT_FAILURE,
2013 					"rte_eth_tx_queue_setup: err=%d, "
2014 					"port=%d\n", ret, portid);
2015 
2016 			qconf = &lcore_conf[lcore_id];
2017 			qconf->tx_queue_id[portid] = queueid;
2018 			queueid++;
2019 
2020 			qconf->tx_port_id[qconf->n_tx_port] = portid;
2021 			qconf->n_tx_port++;
2022 		}
2023 		printf("\n");
2024 	}
2025 
2026 	for (lcore_id = 0; lcore_id < RTE_MAX_LCORE; lcore_id++) {
2027 		if (rte_lcore_is_enabled(lcore_id) == 0)
2028 			continue;
2029 		qconf = &lcore_conf[lcore_id];
2030 		printf("\nInitializing rx queues on lcore %u ... ", lcore_id);
2031 		fflush(stdout);
2032 		/* init RX queues */
2033 		for (queue = 0; queue < qconf->n_rx_queue; ++queue) {
2034 			portid = qconf->rx_queue_list[queue].port_id;
2035 			queueid = qconf->rx_queue_list[queue].queue_id;
2036 
2037 			if (numa_on)
2038 				socketid = (uint8_t)
2039 					rte_lcore_to_socket_id(lcore_id);
2040 			else
2041 				socketid = 0;
2042 
2043 			printf("rxq=%d,%d,%d ", portid, queueid, socketid);
2044 			fflush(stdout);
2045 
2046 			ret = rte_eth_rx_queue_setup(portid, queueid, nb_rxd,
2047 					socketid, NULL,
2048 					pktmbuf_pool[socketid]);
2049 			if (ret < 0)
2050 				rte_exit(EXIT_FAILURE,
2051 					"rte_eth_rx_queue_setup: err=%d,"
2052 					"port=%d\n", ret, portid);
2053 		}
2054 	}
2055 
2056 	printf("\n");
2057 
2058 	/* start ports */
2059 	for (portid = 0; portid < nb_ports; portid++) {
2060 		if ((enabled_port_mask & (1 << portid)) == 0)
2061 			continue;
2062 
2063 		/* Start device */
2064 		ret = rte_eth_dev_start(portid);
2065 		if (ret < 0)
2066 			rte_exit(EXIT_FAILURE,
2067 				"rte_eth_dev_start: err=%d, port=%d\n",
2068 				ret, portid);
2069 
2070 		/*
2071 		 * If enabled, put device in promiscuous mode.
2072 		 * This allows IO forwarding mode to forward packets
2073 		 * to itself through 2 cross-connected  ports of the
2074 		 * target machine.
2075 		 */
2076 		if (promiscuous_on)
2077 			rte_eth_promiscuous_enable(portid);
2078 	}
2079 
2080 	check_all_ports_link_status((uint8_t)nb_ports, enabled_port_mask);
2081 
2082 	/* launch per-lcore init on every lcore */
2083 	rte_eal_mp_remote_launch(main_loop, NULL, CALL_MASTER);
2084 	RTE_LCORE_FOREACH_SLAVE(lcore_id) {
2085 		if (rte_eal_wait_lcore(lcore_id) < 0)
2086 			return -1;
2087 	}
2088 
2089 	return 0;
2090 }
2091