2 * Copyright (C)2002 USAGI/WIDE Project
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 * Mitsuru KANDA @USAGI : IPv6 Support
21 * Kazunori MIYAZAWA @USAGI :
22 * Kunihiro Ishiguro <kunihiro@ipinfusion.com>
24 * This file is derived from net/ipv4/esp.c
27 #include <linux/err.h>
28 #include <linux/module.h>
32 #include <linux/scatterlist.h>
33 #include <linux/crypto.h>
34 #include <linux/kernel.h>
35 #include <linux/pfkeyv2.h>
36 #include <linux/random.h>
37 #include <linux/spinlock.h>
40 #include <net/protocol.h>
41 #include <linux/icmpv6.h>
43 static int esp6_output(struct xfrm_state
*x
, struct sk_buff
*skb
)
46 struct ip_esp_hdr
*esph
;
47 struct crypto_blkcipher
*tfm
;
48 struct blkcipher_desc desc
;
49 struct sk_buff
*trailer
;
55 struct esp_data
*esp
= x
->data
;
57 /* skb is pure payload to encrypt */
60 /* Round to block size */
63 alen
= esp
->auth
.icv_trunc_len
;
67 blksize
= ALIGN(crypto_blkcipher_blocksize(tfm
), 4);
68 clen
= ALIGN(clen
+ 2, blksize
);
70 clen
= ALIGN(clen
, esp
->conf
.padlen
);
72 if ((nfrags
= skb_cow_data(skb
, clen
-skb
->len
+alen
, &trailer
)) < 0) {
77 tail
= skb_tail_pointer(trailer
);
80 for (i
=0; i
<clen
-skb
->len
- 2; i
++)
83 tail
[clen
-skb
->len
- 2] = (clen
- skb
->len
) - 2;
84 pskb_put(skb
, trailer
, clen
- skb
->len
);
86 skb_push(skb
, -skb_network_offset(skb
));
87 esph
= ip_esp_hdr(skb
);
88 *(skb_tail_pointer(trailer
) - 1) = *skb_mac_header(skb
);
89 *skb_mac_header(skb
) = IPPROTO_ESP
;
91 esph
->spi
= x
->id
.spi
;
92 esph
->seq_no
= htonl(XFRM_SKB_CB(skb
)->seq
);
94 spin_lock_bh(&x
->lock
);
96 if (esp
->conf
.ivlen
) {
97 if (unlikely(!esp
->conf
.ivinitted
)) {
98 get_random_bytes(esp
->conf
.ivec
, esp
->conf
.ivlen
);
99 esp
->conf
.ivinitted
= 1;
101 crypto_blkcipher_set_iv(tfm
, esp
->conf
.ivec
, esp
->conf
.ivlen
);
105 struct scatterlist
*sg
= &esp
->sgbuf
[0];
107 if (unlikely(nfrags
> ESP_NUM_FAST_SG
)) {
108 sg
= kmalloc(sizeof(struct scatterlist
)*nfrags
, GFP_ATOMIC
);
112 sg_init_table(sg
, nfrags
);
113 skb_to_sgvec(skb
, sg
,
117 err
= crypto_blkcipher_encrypt(&desc
, sg
, sg
, clen
);
118 if (unlikely(sg
!= &esp
->sgbuf
[0]))
125 if (esp
->conf
.ivlen
) {
126 memcpy(esph
->enc_data
, esp
->conf
.ivec
, esp
->conf
.ivlen
);
127 crypto_blkcipher_get_iv(tfm
, esp
->conf
.ivec
, esp
->conf
.ivlen
);
130 if (esp
->auth
.icv_full_len
) {
131 err
= esp_mac_digest(esp
, skb
, (u8
*)esph
- skb
->data
,
132 sizeof(*esph
) + esp
->conf
.ivlen
+ clen
);
133 memcpy(pskb_put(skb
, trailer
, alen
), esp
->auth
.work_icv
, alen
);
137 spin_unlock_bh(&x
->lock
);
143 static int esp6_input(struct xfrm_state
*x
, struct sk_buff
*skb
)
146 struct ip_esp_hdr
*esph
;
147 struct esp_data
*esp
= x
->data
;
148 struct crypto_blkcipher
*tfm
= esp
->conf
.tfm
;
149 struct blkcipher_desc desc
= { .tfm
= tfm
};
150 struct sk_buff
*trailer
;
151 int blksize
= ALIGN(crypto_blkcipher_blocksize(tfm
), 4);
152 int alen
= esp
->auth
.icv_trunc_len
;
153 int elen
= skb
->len
- sizeof(*esph
) - esp
->conf
.ivlen
- alen
;
154 int hdr_len
= skb_network_header_len(skb
);
158 if (!pskb_may_pull(skb
, sizeof(*esph
))) {
163 if (elen
<= 0 || (elen
& (blksize
-1))) {
168 /* If integrity check is required, do this. */
169 if (esp
->auth
.icv_full_len
) {
172 ret
= esp_mac_digest(esp
, skb
, 0, skb
->len
- alen
);
176 if (skb_copy_bits(skb
, skb
->len
- alen
, sum
, alen
))
179 if (unlikely(memcmp(esp
->auth
.work_icv
, sum
, alen
))) {
180 x
->stats
.integrity_failed
++;
186 if ((nfrags
= skb_cow_data(skb
, 0, &trailer
)) < 0) {
191 skb
->ip_summed
= CHECKSUM_NONE
;
193 esph
= (struct ip_esp_hdr
*)skb
->data
;
196 /* Get ivec. This can be wrong, check against another impls. */
198 crypto_blkcipher_set_iv(tfm
, esph
->enc_data
, esp
->conf
.ivlen
);
202 struct scatterlist
*sg
= &esp
->sgbuf
[0];
205 if (unlikely(nfrags
> ESP_NUM_FAST_SG
)) {
206 sg
= kmalloc(sizeof(struct scatterlist
)*nfrags
, GFP_ATOMIC
);
212 sg_init_table(sg
, nfrags
);
213 skb_to_sgvec(skb
, sg
,
214 sizeof(*esph
) + esp
->conf
.ivlen
,
216 ret
= crypto_blkcipher_decrypt(&desc
, sg
, sg
, elen
);
217 if (unlikely(sg
!= &esp
->sgbuf
[0]))
222 if (skb_copy_bits(skb
, skb
->len
-alen
-2, nexthdr
, 2))
226 if (padlen
+2 >= elen
) {
227 LIMIT_NETDEBUG(KERN_WARNING
"ipsec esp packet is garbage padlen=%d, elen=%d\n", padlen
+2, elen
);
231 /* ... check padding bits here. Silly. :-) */
233 /* RFC4303: Drop dummy packets without any error */
234 if (nexthdr
[1] == IPPROTO_NONE
) {
239 pskb_trim(skb
, skb
->len
- alen
- padlen
- 2);
243 __skb_pull(skb
, sizeof(*esph
) + esp
->conf
.ivlen
);
244 skb_set_transport_header(skb
, -hdr_len
);
249 static u32
esp6_get_mtu(struct xfrm_state
*x
, int mtu
)
251 struct esp_data
*esp
= x
->data
;
252 u32 blksize
= ALIGN(crypto_blkcipher_blocksize(esp
->conf
.tfm
), 4);
253 u32 align
= max_t(u32
, blksize
, esp
->conf
.padlen
);
256 mtu
-= x
->props
.header_len
+ esp
->auth
.icv_trunc_len
;
257 rem
= mtu
& (align
- 1);
260 if (x
->props
.mode
!= XFRM_MODE_TUNNEL
) {
261 u32 padsize
= ((blksize
- 1) & 7) + 1;
262 mtu
-= blksize
- padsize
;
263 mtu
+= min_t(u32
, blksize
- padsize
, rem
);
269 static void esp6_err(struct sk_buff
*skb
, struct inet6_skb_parm
*opt
,
270 int type
, int code
, int offset
, __be32 info
)
272 struct ipv6hdr
*iph
= (struct ipv6hdr
*)skb
->data
;
273 struct ip_esp_hdr
*esph
= (struct ip_esp_hdr
*)(skb
->data
+ offset
);
274 struct xfrm_state
*x
;
276 if (type
!= ICMPV6_DEST_UNREACH
&&
277 type
!= ICMPV6_PKT_TOOBIG
)
280 x
= xfrm_state_lookup((xfrm_address_t
*)&iph
->daddr
, esph
->spi
, IPPROTO_ESP
, AF_INET6
);
283 printk(KERN_DEBUG
"pmtu discovery on SA ESP/%08x/" NIP6_FMT
"\n",
284 ntohl(esph
->spi
), NIP6(iph
->daddr
));
288 static void esp6_destroy(struct xfrm_state
*x
)
290 struct esp_data
*esp
= x
->data
;
295 crypto_free_blkcipher(esp
->conf
.tfm
);
296 esp
->conf
.tfm
= NULL
;
297 kfree(esp
->conf
.ivec
);
298 esp
->conf
.ivec
= NULL
;
299 crypto_free_hash(esp
->auth
.tfm
);
300 esp
->auth
.tfm
= NULL
;
301 kfree(esp
->auth
.work_icv
);
302 esp
->auth
.work_icv
= NULL
;
306 static int esp6_init_state(struct xfrm_state
*x
)
308 struct esp_data
*esp
= NULL
;
309 struct crypto_blkcipher
*tfm
;
317 esp
= kzalloc(sizeof(*esp
), GFP_KERNEL
);
322 struct xfrm_algo_desc
*aalg_desc
;
323 struct crypto_hash
*hash
;
325 hash
= crypto_alloc_hash(x
->aalg
->alg_name
, 0,
330 esp
->auth
.tfm
= hash
;
331 if (crypto_hash_setkey(hash
, x
->aalg
->alg_key
,
332 (x
->aalg
->alg_key_len
+ 7) / 8))
335 aalg_desc
= xfrm_aalg_get_byname(x
->aalg
->alg_name
, 0);
338 if (aalg_desc
->uinfo
.auth
.icv_fullbits
/8 !=
339 crypto_hash_digestsize(hash
)) {
340 NETDEBUG(KERN_INFO
"ESP: %s digestsize %u != %hu\n",
342 crypto_hash_digestsize(hash
),
343 aalg_desc
->uinfo
.auth
.icv_fullbits
/8);
347 esp
->auth
.icv_full_len
= aalg_desc
->uinfo
.auth
.icv_fullbits
/8;
348 esp
->auth
.icv_trunc_len
= aalg_desc
->uinfo
.auth
.icv_truncbits
/8;
350 esp
->auth
.work_icv
= kmalloc(esp
->auth
.icv_full_len
, GFP_KERNEL
);
351 if (!esp
->auth
.work_icv
)
354 tfm
= crypto_alloc_blkcipher(x
->ealg
->alg_name
, 0, CRYPTO_ALG_ASYNC
);
358 esp
->conf
.ivlen
= crypto_blkcipher_ivsize(tfm
);
359 esp
->conf
.padlen
= 0;
360 if (esp
->conf
.ivlen
) {
361 esp
->conf
.ivec
= kmalloc(esp
->conf
.ivlen
, GFP_KERNEL
);
362 if (unlikely(esp
->conf
.ivec
== NULL
))
364 esp
->conf
.ivinitted
= 0;
366 if (crypto_blkcipher_setkey(tfm
, x
->ealg
->alg_key
,
367 (x
->ealg
->alg_key_len
+ 7) / 8))
369 x
->props
.header_len
= sizeof(struct ip_esp_hdr
) + esp
->conf
.ivlen
;
370 switch (x
->props
.mode
) {
372 case XFRM_MODE_TRANSPORT
:
374 case XFRM_MODE_TUNNEL
:
375 x
->props
.header_len
+= sizeof(struct ipv6hdr
);
390 static struct xfrm_type esp6_type
=
392 .description
= "ESP6",
393 .owner
= THIS_MODULE
,
394 .proto
= IPPROTO_ESP
,
395 .flags
= XFRM_TYPE_REPLAY_PROT
,
396 .init_state
= esp6_init_state
,
397 .destructor
= esp6_destroy
,
398 .get_mtu
= esp6_get_mtu
,
400 .output
= esp6_output
,
401 .hdr_offset
= xfrm6_find_1stfragopt
,
404 static struct inet6_protocol esp6_protocol
= {
405 .handler
= xfrm6_rcv
,
406 .err_handler
= esp6_err
,
407 .flags
= INET6_PROTO_NOPOLICY
,
410 static int __init
esp6_init(void)
412 if (xfrm_register_type(&esp6_type
, AF_INET6
) < 0) {
413 printk(KERN_INFO
"ipv6 esp init: can't add xfrm type\n");
416 if (inet6_add_protocol(&esp6_protocol
, IPPROTO_ESP
) < 0) {
417 printk(KERN_INFO
"ipv6 esp init: can't add protocol\n");
418 xfrm_unregister_type(&esp6_type
, AF_INET6
);
425 static void __exit
esp6_fini(void)
427 if (inet6_del_protocol(&esp6_protocol
, IPPROTO_ESP
) < 0)
428 printk(KERN_INFO
"ipv6 esp close: can't remove protocol\n");
429 if (xfrm_unregister_type(&esp6_type
, AF_INET6
) < 0)
430 printk(KERN_INFO
"ipv6 esp close: can't remove xfrm type\n");
433 module_init(esp6_init
);
434 module_exit(esp6_fini
);
436 MODULE_LICENSE("GPL");
437 MODULE_ALIAS_XFRM_TYPE(AF_INET6
, XFRM_PROTO_ESP
);