net/ipv4/xfrm4_input.c

   1 /*
   2  * xfrm4_input.c
   3  *
   4  * Changes:
   5  *      YOSHIFUJI Hideaki @USAGI
   6  *              Split up af-specific portion
   7  *      Derek Atkins <derek@ihtfp.com>
   8  *              Add Encapsulation support
   9  *
  10  */
  11
  12 #include <linux/module.h>
  13 #include <linux/string.h>
  14 #include <linux/netfilter.h>
  15 #include <linux/netfilter_ipv4.h>
  16 #include <net/ip.h>
  17 #include <net/xfrm.h>
  18
  19 int xfrm4_extract_input(struct xfrm_state *x, struct sk_buff *skb)
  20 {
  21         return xfrm4_extract_header(skb);
  22 }
  23
  24 #ifdef CONFIG_NETFILTER
  25 static inline int xfrm4_rcv_encap_finish(struct sk_buff *skb)
  26 {
  27         if (skb->dst == NULL) {
  28                 const struct iphdr *iph = ip_hdr(skb);
  29
  30                 if (ip_route_input(skb, iph->daddr, iph->saddr, iph->tos,
  31                                    skb->dev))
  32                         goto drop;
  33         }
  34         return dst_input(skb);
  35 drop:
  36         kfree_skb(skb);
  37         return NET_RX_DROP;
  38 }
  39 #endif
  40
  41 int xfrm4_rcv_encap(struct sk_buff *skb, int nexthdr, __be32 spi,
  42                     int encap_type)
  43 {
  44         int err;
  45         __be32 seq;
  46         struct xfrm_state *xfrm_vec[XFRM_MAX_DEPTH];
  47         struct xfrm_state *x;
  48         int xfrm_nr = 0;
  49         int decaps = 0;
  50         unsigned int nhoff = offsetof(struct iphdr, protocol);
  51
  52         seq = 0;
  53         if (!spi && (err = xfrm_parse_spi(skb, nexthdr, &spi, &seq)) != 0)
  54                 goto drop;
  55
  56         do {
  57                 const struct iphdr *iph = ip_hdr(skb);
  58
  59                 if (xfrm_nr == XFRM_MAX_DEPTH)
  60                         goto drop;
  61
  62                 x = xfrm_state_lookup((xfrm_address_t *)&iph->daddr, spi,
  63                                       nexthdr, AF_INET);
  64                 if (x == NULL)
  65                         goto drop;
  66
  67                 spin_lock(&x->lock);
  68                 if (unlikely(x->km.state != XFRM_STATE_VALID))
  69                         goto drop_unlock;
  70
  71                 if ((x->encap ? x->encap->encap_type : 0) != encap_type)
  72                         goto drop_unlock;
  73
  74                 if (x->props.replay_window && xfrm_replay_check(x, seq))
  75                         goto drop_unlock;
  76
  77                 if (xfrm_state_check_expire(x))
  78                         goto drop_unlock;
  79
  80                 nexthdr = x->type->input(x, skb);
  81                 if (nexthdr <= 0)
  82                         goto drop_unlock;
  83
  84                 skb_network_header(skb)[nhoff] = nexthdr;
  85
  86                 /* only the first xfrm gets the encap type */
  87                 encap_type = 0;
  88
  89                 if (x->props.replay_window)
  90                         xfrm_replay_advance(x, seq);
  91
  92                 x->curlft.bytes += skb->len;
  93                 x->curlft.packets++;
  94
  95                 spin_unlock(&x->lock);
  96
  97                 xfrm_vec[xfrm_nr++] = x;
  98
  99                 if (x->inner_mode->input(x, skb))
 100                         goto drop;
 101
 102                 if (x->outer_mode->flags & XFRM_MODE_FLAG_TUNNEL) {
 103                         decaps = 1;
 104                         break;
 105                 }
 106
 107                 err = xfrm_parse_spi(skb, nexthdr, &spi, &seq);
 108                 if (err < 0)
 109                         goto drop;
 110         } while (!err);
 111
 112         /* Allocate new secpath or COW existing one. */
 113
 114         if (!skb->sp || atomic_read(&skb->sp->refcnt) != 1) {
 115                 struct sec_path *sp;
 116                 sp = secpath_dup(skb->sp);
 117                 if (!sp)
 118                         goto drop;
 119                 if (skb->sp)
 120                         secpath_put(skb->sp);
 121                 skb->sp = sp;
 122         }
 123         if (xfrm_nr + skb->sp->len > XFRM_MAX_DEPTH)
 124                 goto drop;
 125
 126         memcpy(skb->sp->xvec + skb->sp->len, xfrm_vec,
 127                xfrm_nr * sizeof(xfrm_vec[0]));
 128         skb->sp->len += xfrm_nr;
 129
 130         nf_reset(skb);
 131
 132         if (decaps) {
 133                 dst_release(skb->dst);
 134                 skb->dst = NULL;
 135                 netif_rx(skb);
 136                 return 0;
 137         } else {
 138 #ifdef CONFIG_NETFILTER
 139                 __skb_push(skb, skb->data - skb_network_header(skb));
 140                 ip_hdr(skb)->tot_len = htons(skb->len);
 141                 ip_send_check(ip_hdr(skb));
 142
 143                 NF_HOOK(PF_INET, NF_IP_PRE_ROUTING, skb, skb->dev, NULL,
 144                         xfrm4_rcv_encap_finish);
 145                 return 0;
 146 #else
 147                 return -ip_hdr(skb)->protocol;
 148 #endif
 149         }
 150
 151 drop_unlock:
 152         spin_unlock(&x->lock);
 153         xfrm_state_put(x);
 154 drop:
 155         while (--xfrm_nr >= 0)
 156                 xfrm_state_put(xfrm_vec[xfrm_nr]);
 157
 158         kfree_skb(skb);
 159         return 0;
 160 }
 161 EXPORT_SYMBOL(xfrm4_rcv_encap);
 162
 163 /* If it's a keepalive packet, then just eat it.
 164  * If it's an encapsulated packet, then pass it to the
 165  * IPsec xfrm input.
 166  * Returns 0 if skb passed to xfrm or was dropped.
 167  * Returns >0 if skb should be passed to UDP.
 168  * Returns <0 if skb should be resubmitted (-ret is protocol)
 169  */
 170 int xfrm4_udp_encap_rcv(struct sock *sk, struct sk_buff *skb)
 171 {
 172         struct udp_sock *up = udp_sk(sk);
 173         struct udphdr *uh;
 174         struct iphdr *iph;
 175         int iphlen, len;
 176         int ret;
 177
 178         __u8 *udpdata;
 179         __be32 *udpdata32;
 180         __u16 encap_type = up->encap_type;
 181
 182         /* if this is not encapsulated socket, then just return now */
 183         if (!encap_type)
 184                 return 1;
 185
 186         /* If this is a paged skb, make sure we pull up
 187          * whatever data we need to look at. */
 188         len = skb->len - sizeof(struct udphdr);
 189         if (!pskb_may_pull(skb, sizeof(struct udphdr) + min(len, 8)))
 190                 return 1;
 191
 192         /* Now we can get the pointers */
 193         uh = udp_hdr(skb);
 194         udpdata = (__u8 *)uh + sizeof(struct udphdr);
 195         udpdata32 = (__be32 *)udpdata;
 196
 197         switch (encap_type) {
 198         default:
 199         case UDP_ENCAP_ESPINUDP:
 200                 /* Check if this is a keepalive packet.  If so, eat it. */
 201                 if (len == 1 && udpdata[0] == 0xff) {
 202                         goto drop;
 203                 } else if (len > sizeof(struct ip_esp_hdr) && udpdata32[0] != 0) {
 204                         /* ESP Packet without Non-ESP header */
 205                         len = sizeof(struct udphdr);
 206                 } else
 207                         /* Must be an IKE packet.. pass it through */
 208                         return 1;
 209                 break;
 210         case UDP_ENCAP_ESPINUDP_NON_IKE:
 211                 /* Check if this is a keepalive packet.  If so, eat it. */
 212                 if (len == 1 && udpdata[0] == 0xff) {
 213                         goto drop;
 214                 } else if (len > 2 * sizeof(u32) + sizeof(struct ip_esp_hdr) &&
 215                            udpdata32[0] == 0 && udpdata32[1] == 0) {
 216
 217                         /* ESP Packet with Non-IKE marker */
 218                         len = sizeof(struct udphdr) + 2 * sizeof(u32);
 219                 } else
 220                         /* Must be an IKE packet.. pass it through */
 221                         return 1;
 222                 break;
 223         }
 224
 225         /* At this point we are sure that this is an ESPinUDP packet,
 226          * so we need to remove 'len' bytes from the packet (the UDP
 227          * header and optional ESP marker bytes) and then modify the
 228          * protocol to ESP, and then call into the transform receiver.
 229          */
 230         if (skb_cloned(skb) && pskb_expand_head(skb, 0, 0, GFP_ATOMIC))
 231                 goto drop;
 232
 233         /* Now we can update and verify the packet length... */
 234         iph = ip_hdr(skb);
 235         iphlen = iph->ihl << 2;
 236         iph->tot_len = htons(ntohs(iph->tot_len) - len);
 237         if (skb->len < iphlen + len) {
 238                 /* packet is too small!?! */
 239                 goto drop;
 240         }
 241
 242         /* pull the data buffer up to the ESP header and set the
 243          * transport header to point to ESP.  Keep UDP on the stack
 244          * for later.
 245          */
 246         __skb_pull(skb, len);
 247         skb_reset_transport_header(skb);
 248
 249         /* process ESP */
 250         ret = xfrm4_rcv_encap(skb, IPPROTO_ESP, 0, encap_type);
 251         return ret;
 252
 253 drop:
 254         kfree_skb(skb);
 255         return 0;
 256 }
 257
 258 int xfrm4_rcv(struct sk_buff *skb)
 259 {
 260         return xfrm4_rcv_spi(skb, ip_hdr(skb)->protocol, 0);
 261 }
 262
 263 EXPORT_SYMBOL(xfrm4_rcv);