Imported Upstream version 16.07-rc1
[deb_dpdk.git] / examples / ipsec-secgw / ipsec.c
1 /*-
2  *   BSD LICENSE
3  *
4  *   Copyright(c) 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 #include <sys/types.h>
34 #include <netinet/in.h>
35 #include <netinet/ip.h>
36
37 #include <rte_branch_prediction.h>
38 #include <rte_log.h>
39 #include <rte_crypto.h>
40 #include <rte_cryptodev.h>
41 #include <rte_mbuf.h>
42 #include <rte_hash.h>
43
44 #include "ipsec.h"
45 #include "esp.h"
46
47 static inline int
48 create_session(struct ipsec_ctx *ipsec_ctx __rte_unused, struct ipsec_sa *sa)
49 {
50         unsigned long cdev_id_qp = 0;
51         int32_t ret;
52         struct cdev_key key = { 0 };
53
54         key.lcore_id = (uint8_t)rte_lcore_id();
55
56         key.cipher_algo = (uint8_t)sa->cipher_algo;
57         key.auth_algo = (uint8_t)sa->auth_algo;
58
59         ret = rte_hash_lookup_data(ipsec_ctx->cdev_map, &key,
60                         (void **)&cdev_id_qp);
61         if (ret < 0) {
62                 RTE_LOG(ERR, IPSEC, "No cryptodev: core %u, cipher_algo %u, "
63                                 "auth_algo %u\n", key.lcore_id, key.cipher_algo,
64                                 key.auth_algo);
65                 return -1;
66         }
67
68         RTE_LOG(DEBUG, IPSEC, "Create session for SA spi %u on cryptodev "
69                         "%u qp %u\n", sa->spi,
70                         ipsec_ctx->tbl[cdev_id_qp].id,
71                         ipsec_ctx->tbl[cdev_id_qp].qp);
72
73         sa->crypto_session = rte_cryptodev_sym_session_create(
74                         ipsec_ctx->tbl[cdev_id_qp].id, sa->xforms);
75
76         sa->cdev_id_qp = cdev_id_qp;
77
78         return 0;
79 }
80
81 static inline void
82 enqueue_cop(struct cdev_qp *cqp, struct rte_crypto_op *cop)
83 {
84         int32_t ret, i;
85
86         cqp->buf[cqp->len++] = cop;
87
88         if (cqp->len == MAX_PKT_BURST) {
89                 ret = rte_cryptodev_enqueue_burst(cqp->id, cqp->qp,
90                                 cqp->buf, cqp->len);
91                 if (ret < cqp->len) {
92                         RTE_LOG(DEBUG, IPSEC, "Cryptodev %u queue %u:"
93                                         " enqueued %u crypto ops out of %u\n",
94                                          cqp->id, cqp->qp,
95                                          ret, cqp->len);
96                         for (i = ret; i < cqp->len; i++)
97                                 rte_pktmbuf_free(cqp->buf[i]->sym->m_src);
98                 }
99                 cqp->in_flight += ret;
100                 cqp->len = 0;
101         }
102 }
103
104 static inline void
105 ipsec_enqueue(ipsec_xform_fn xform_func, struct ipsec_ctx *ipsec_ctx,
106                 struct rte_mbuf *pkts[], struct ipsec_sa *sas[],
107                 uint16_t nb_pkts)
108 {
109         int32_t ret = 0, i;
110         struct ipsec_mbuf_metadata *priv;
111         struct ipsec_sa *sa;
112
113         for (i = 0; i < nb_pkts; i++) {
114                 if (unlikely(sas[i] == NULL)) {
115                         rte_pktmbuf_free(pkts[i]);
116                         continue;
117                 }
118
119                 rte_prefetch0(sas[i]);
120                 rte_prefetch0(pkts[i]);
121
122                 priv = get_priv(pkts[i]);
123                 sa = sas[i];
124                 priv->sa = sa;
125
126                 priv->cop.type = RTE_CRYPTO_OP_TYPE_SYMMETRIC;
127
128                 rte_prefetch0(&priv->sym_cop);
129                 priv->cop.sym = &priv->sym_cop;
130
131                 if ((unlikely(sa->crypto_session == NULL)) &&
132                                 create_session(ipsec_ctx, sa)) {
133                         rte_pktmbuf_free(pkts[i]);
134                         continue;
135                 }
136
137                 rte_crypto_op_attach_sym_session(&priv->cop,
138                                 sa->crypto_session);
139
140                 ret = xform_func(pkts[i], sa, &priv->cop);
141                 if (unlikely(ret)) {
142                         rte_pktmbuf_free(pkts[i]);
143                         continue;
144                 }
145
146                 RTE_ASSERT(sa->cdev_id_qp < ipsec_ctx->nb_qps);
147                 enqueue_cop(&ipsec_ctx->tbl[sa->cdev_id_qp], &priv->cop);
148         }
149 }
150
151 static inline int
152 ipsec_dequeue(ipsec_xform_fn xform_func, struct ipsec_ctx *ipsec_ctx,
153                 struct rte_mbuf *pkts[], uint16_t max_pkts)
154 {
155         int32_t nb_pkts = 0, ret = 0, i, j, nb_cops;
156         struct ipsec_mbuf_metadata *priv;
157         struct rte_crypto_op *cops[max_pkts];
158         struct ipsec_sa *sa;
159         struct rte_mbuf *pkt;
160
161         for (i = 0; i < ipsec_ctx->nb_qps && nb_pkts < max_pkts; i++) {
162                 struct cdev_qp *cqp;
163
164                 cqp = &ipsec_ctx->tbl[ipsec_ctx->last_qp++];
165                 if (ipsec_ctx->last_qp == ipsec_ctx->nb_qps)
166                         ipsec_ctx->last_qp %= ipsec_ctx->nb_qps;
167
168                 if (cqp->in_flight == 0)
169                         continue;
170
171                 nb_cops = rte_cryptodev_dequeue_burst(cqp->id, cqp->qp,
172                                 cops, max_pkts - nb_pkts);
173
174                 cqp->in_flight -= nb_cops;
175
176                 for (j = 0; j < nb_cops; j++) {
177                         pkt = cops[j]->sym->m_src;
178                         rte_prefetch0(pkt);
179
180                         priv = get_priv(pkt);
181                         sa = priv->sa;
182
183                         RTE_ASSERT(sa != NULL);
184
185                         ret = xform_func(pkt, sa, cops[j]);
186                         if (unlikely(ret))
187                                 rte_pktmbuf_free(pkt);
188                         else
189                                 pkts[nb_pkts++] = pkt;
190                 }
191         }
192
193         /* return packets */
194         return nb_pkts;
195 }
196
197 uint16_t
198 ipsec_inbound(struct ipsec_ctx *ctx, struct rte_mbuf *pkts[],
199                 uint16_t nb_pkts, uint16_t len)
200 {
201         struct ipsec_sa *sas[nb_pkts];
202
203         inbound_sa_lookup(ctx->sa_ctx, pkts, sas, nb_pkts);
204
205         ipsec_enqueue(esp_inbound, ctx, pkts, sas, nb_pkts);
206
207         return ipsec_dequeue(esp_inbound_post, ctx, pkts, len);
208 }
209
210 uint16_t
211 ipsec_outbound(struct ipsec_ctx *ctx, struct rte_mbuf *pkts[],
212                 uint32_t sa_idx[], uint16_t nb_pkts, uint16_t len)
213 {
214         struct ipsec_sa *sas[nb_pkts];
215
216         outbound_sa_lookup(ctx->sa_ctx, sa_idx, sas, nb_pkts);
217
218         ipsec_enqueue(esp_outbound, ctx, pkts, sas, nb_pkts);
219
220         return ipsec_dequeue(esp_outbound_post, ctx, pkts, len);
221 }