net/core/flow_dissector.c

   1 #include <linux/skbuff.h>
   2 #include <linux/export.h>
   3 #include <linux/ip.h>
   4 #include <linux/ipv6.h>
   5 #include <linux/if_vlan.h>
   6 #include <net/ip.h>
   7 #include <net/ipv6.h>
   8 #include <linux/igmp.h>
   9 #include <linux/icmp.h>
  10 #include <linux/sctp.h>
  11 #include <linux/dccp.h>
  12 #include <linux/if_tunnel.h>
  13 #include <linux/if_pppox.h>
  14 #include <linux/ppp_defs.h>
  15 #include <net/flow_keys.h>
  16
  17 /* copy saddr & daddr, possibly using 64bit load/store
  18  * Equivalent to :      flow->src = iph->saddr;
  19  *                      flow->dst = iph->daddr;
  20  */
  21 static void iph_to_flow_copy_addrs(struct flow_keys *flow, const struct iphdr *iph)
  22 {
  23         BUILD_BUG_ON(offsetof(typeof(*flow), dst) !=
  24                      offsetof(typeof(*flow), src) + sizeof(flow->src));
  25         memcpy(&flow->src, &iph->saddr, sizeof(flow->src) + sizeof(flow->dst));
  26 }
  27
  28 /**
  29  * skb_flow_get_ports - extract the upper layer ports and return them
  30  * @skb: buffer to extract the ports from
  31  * @thoff: transport header offset
  32  * @ip_proto: protocol for which to get port offset
  33  *
  34  * The function will try to retrieve the ports at offset thoff + poff where poff
  35  * is the protocol port offset returned from proto_ports_offset
  36  */
  37 __be32 skb_flow_get_ports(const struct sk_buff *skb, int thoff, u8 ip_proto)
  38 {
  39         int poff = proto_ports_offset(ip_proto);
  40
  41         if (poff >= 0) {
  42                 __be32 *ports, _ports;
  43
  44                 ports = skb_header_pointer(skb, thoff + poff,
  45                                            sizeof(_ports), &_ports);
  46                 if (ports)
  47                         return *ports;
  48         }
  49
  50         return 0;
  51 }
  52 EXPORT_SYMBOL(skb_flow_get_ports);
  53
  54 bool skb_flow_dissect(const struct sk_buff *skb, struct flow_keys *flow)
  55 {
  56         int nhoff = skb_network_offset(skb);
  57         u8 ip_proto;
  58         __be16 proto = skb->protocol;
  59
  60         memset(flow, 0, sizeof(*flow));
  61
  62 again:
  63         switch (proto) {
  64         case htons(ETH_P_IP): {
  65                 const struct iphdr *iph;
  66                 struct iphdr _iph;
  67 ip:
  68                 iph = skb_header_pointer(skb, nhoff, sizeof(_iph), &_iph);
  69                 if (!iph || iph->ihl < 5)
  70                         return false;
  71                 nhoff += iph->ihl * 4;
  72
  73                 ip_proto = iph->protocol;
  74                 if (ip_is_fragment(iph))
  75                         ip_proto = 0;
  76
  77                 iph_to_flow_copy_addrs(flow, iph);
  78                 break;
  79         }
  80         case htons(ETH_P_IPV6): {
  81                 const struct ipv6hdr *iph;
  82                 struct ipv6hdr _iph;
  83 ipv6:
  84                 iph = skb_header_pointer(skb, nhoff, sizeof(_iph), &_iph);
  85                 if (!iph)
  86                         return false;
  87
  88                 ip_proto = iph->nexthdr;
  89                 flow->src = (__force __be32)ipv6_addr_hash(&iph->saddr);
  90                 flow->dst = (__force __be32)ipv6_addr_hash(&iph->daddr);
  91                 nhoff += sizeof(struct ipv6hdr);
  92                 break;
  93         }
  94         case htons(ETH_P_8021AD):
  95         case htons(ETH_P_8021Q): {
  96                 const struct vlan_hdr *vlan;
  97                 struct vlan_hdr _vlan;
  98
  99                 vlan = skb_header_pointer(skb, nhoff, sizeof(_vlan), &_vlan);
 100                 if (!vlan)
 101                         return false;
 102
 103                 proto = vlan->h_vlan_encapsulated_proto;
 104                 nhoff += sizeof(*vlan);
 105                 goto again;
 106         }
 107         case htons(ETH_P_PPP_SES): {
 108                 struct {
 109                         struct pppoe_hdr hdr;
 110                         __be16 proto;
 111                 } *hdr, _hdr;
 112                 hdr = skb_header_pointer(skb, nhoff, sizeof(_hdr), &_hdr);
 113                 if (!hdr)
 114                         return false;
 115                 proto = hdr->proto;
 116                 nhoff += PPPOE_SES_HLEN;
 117                 switch (proto) {
 118                 case htons(PPP_IP):
 119                         goto ip;
 120                 case htons(PPP_IPV6):
 121                         goto ipv6;
 122                 default:
 123                         return false;
 124                 }
 125         }
 126         default:
 127                 return false;
 128         }
 129
 130         switch (ip_proto) {
 131         case IPPROTO_GRE: {
 132                 struct gre_hdr {
 133                         __be16 flags;
 134                         __be16 proto;
 135                 } *hdr, _hdr;
 136
 137                 hdr = skb_header_pointer(skb, nhoff, sizeof(_hdr), &_hdr);
 138                 if (!hdr)
 139                         return false;
 140                 /*
 141                  * Only look inside GRE if version zero and no
 142                  * routing
 143                  */
 144                 if (!(hdr->flags & (GRE_VERSION|GRE_ROUTING))) {
 145                         proto = hdr->proto;
 146                         nhoff += 4;
 147                         if (hdr->flags & GRE_CSUM)
 148                                 nhoff += 4;
 149                         if (hdr->flags & GRE_KEY)
 150                                 nhoff += 4;
 151                         if (hdr->flags & GRE_SEQ)
 152                                 nhoff += 4;
 153                         if (proto == htons(ETH_P_TEB)) {
 154                                 const struct ethhdr *eth;
 155                                 struct ethhdr _eth;
 156
 157                                 eth = skb_header_pointer(skb, nhoff,
 158                                                          sizeof(_eth), &_eth);
 159                                 if (!eth)
 160                                         return false;
 161                                 proto = eth->h_proto;
 162                                 nhoff += sizeof(*eth);
 163                         }
 164                         goto again;
 165                 }
 166                 break;
 167         }
 168         case IPPROTO_IPIP:
 169                 proto = htons(ETH_P_IP);
 170                 goto ip;
 171         case IPPROTO_IPV6:
 172                 proto = htons(ETH_P_IPV6);
 173                 goto ipv6;
 174         default:
 175                 break;
 176         }
 177
 178         flow->n_proto = proto;
 179         flow->ip_proto = ip_proto;
 180         flow->ports = skb_flow_get_ports(skb, nhoff, ip_proto);
 181         flow->thoff = (u16) nhoff;
 182
 183         return true;
 184 }
 185 EXPORT_SYMBOL(skb_flow_dissect);
 186
 187 static u32 hashrnd __read_mostly;
 188 static __always_inline void __flow_hash_secret_init(void)
 189 {
 190         net_get_random_once(&hashrnd, sizeof(hashrnd));
 191 }
 192
 193 static __always_inline u32 __flow_hash_3words(u32 a, u32 b, u32 c)
 194 {
 195         __flow_hash_secret_init();
 196         return jhash_3words(a, b, c, hashrnd);
 197 }
 198
 199 static __always_inline u32 __flow_hash_1word(u32 a)
 200 {
 201         __flow_hash_secret_init();
 202         return jhash_1word(a, hashrnd);
 203 }
 204
 205 static inline u32 __flow_hash_from_keys(struct flow_keys *keys)
 206 {
 207         u32 hash;
 208
 209         /* get a consistent hash (same value on both flow directions) */
 210         if (((__force u32)keys->dst < (__force u32)keys->src) ||
 211             (((__force u32)keys->dst == (__force u32)keys->src) &&
 212              ((__force u16)keys->port16[1] < (__force u16)keys->port16[0]))) {
 213                 swap(keys->dst, keys->src);
 214                 swap(keys->port16[0], keys->port16[1]);
 215         }
 216
 217         hash = __flow_hash_3words((__force u32)keys->dst,
 218                                   (__force u32)keys->src,
 219                                   (__force u32)keys->ports);
 220         if (!hash)
 221                 hash = 1;
 222
 223         return hash;
 224 }
 225
 226 u32 flow_hash_from_keys(struct flow_keys *keys)
 227 {
 228         return __flow_hash_from_keys(keys);
 229 }
 230 EXPORT_SYMBOL(flow_hash_from_keys);
 231
 232 /*
 233  * __skb_get_hash: calculate a flow hash based on src/dst addresses
 234  * and src/dst port numbers.  Sets hash in skb to non-zero hash value
 235  * on success, zero indicates no valid hash.  Also, sets l4_hash in skb
 236  * if hash is a canonical 4-tuple hash over transport ports.
 237  */
 238 void __skb_get_hash(struct sk_buff *skb)
 239 {
 240         struct flow_keys keys;
 241
 242         if (!skb_flow_dissect(skb, &keys))
 243                 return;
 244
 245         if (keys.ports)
 246                 skb->l4_hash = 1;
 247
 248         skb->hash = __flow_hash_from_keys(&keys);
 249 }
 250 EXPORT_SYMBOL(__skb_get_hash);
 251
 252 /*
 253  * Returns a Tx hash based on the given packet descriptor a Tx queues' number
 254  * to be used as a distribution range.
 255  */
 256 u16 __skb_tx_hash(const struct net_device *dev, const struct sk_buff *skb,
 257                   unsigned int num_tx_queues)
 258 {
 259         u32 hash;
 260         u16 qoffset = 0;
 261         u16 qcount = num_tx_queues;
 262
 263         if (skb_rx_queue_recorded(skb)) {
 264                 hash = skb_get_rx_queue(skb);
 265                 while (unlikely(hash >= num_tx_queues))
 266                         hash -= num_tx_queues;
 267                 return hash;
 268         }
 269
 270         if (dev->num_tc) {
 271                 u8 tc = netdev_get_prio_tc_map(dev, skb->priority);
 272                 qoffset = dev->tc_to_txq[tc].offset;
 273                 qcount = dev->tc_to_txq[tc].count;
 274         }
 275
 276         if (skb->sk && skb->sk->sk_hash)
 277                 hash = skb->sk->sk_hash;
 278         else
 279                 hash = (__force u16) skb->protocol;
 280         hash = __flow_hash_1word(hash);
 281
 282         return (u16) (((u64) hash * qcount) >> 32) + qoffset;
 283 }
 284 EXPORT_SYMBOL(__skb_tx_hash);
 285
 286 /* __skb_get_poff() returns the offset to the payload as far as it could
 287  * be dissected. The main user is currently BPF, so that we can dynamically
 288  * truncate packets without needing to push actual payload to the user
 289  * space and can analyze headers only, instead.
 290  */
 291 u32 __skb_get_poff(const struct sk_buff *skb)
 292 {
 293         struct flow_keys keys;
 294         u32 poff = 0;
 295
 296         if (!skb_flow_dissect(skb, &keys))
 297                 return 0;
 298
 299         poff += keys.thoff;
 300         switch (keys.ip_proto) {
 301         case IPPROTO_TCP: {
 302                 const struct tcphdr *tcph;
 303                 struct tcphdr _tcph;
 304
 305                 tcph = skb_header_pointer(skb, poff, sizeof(_tcph), &_tcph);
 306                 if (!tcph)
 307                         return poff;
 308
 309                 poff += max_t(u32, sizeof(struct tcphdr), tcph->doff * 4);
 310                 break;
 311         }
 312         case IPPROTO_UDP:
 313         case IPPROTO_UDPLITE:
 314                 poff += sizeof(struct udphdr);
 315                 break;
 316         /* For the rest, we do not really care about header
 317          * extensions at this point for now.
 318          */
 319         case IPPROTO_ICMP:
 320                 poff += sizeof(struct icmphdr);
 321                 break;
 322         case IPPROTO_ICMPV6:
 323                 poff += sizeof(struct icmp6hdr);
 324                 break;
 325         case IPPROTO_IGMP:
 326                 poff += sizeof(struct igmphdr);
 327                 break;
 328         case IPPROTO_DCCP:
 329                 poff += sizeof(struct dccp_hdr);
 330                 break;
 331         case IPPROTO_SCTP:
 332                 poff += sizeof(struct sctphdr);
 333                 break;
 334         }
 335
 336         return poff;
 337 }
 338
 339 static inline int get_xps_queue(struct net_device *dev, struct sk_buff *skb)
 340 {
 341 #ifdef CONFIG_XPS
 342         struct xps_dev_maps *dev_maps;
 343         struct xps_map *map;
 344         int queue_index = -1;
 345
 346         rcu_read_lock();
 347         dev_maps = rcu_dereference(dev->xps_maps);
 348         if (dev_maps) {
 349                 map = rcu_dereference(
 350                     dev_maps->cpu_map[raw_smp_processor_id()]);
 351                 if (map) {
 352                         if (map->len == 1)
 353                                 queue_index = map->queues[0];
 354                         else {
 355                                 u32 hash;
 356                                 if (skb->sk && skb->sk->sk_hash)
 357                                         hash = skb->sk->sk_hash;
 358                                 else
 359                                         hash = (__force u16) skb->protocol ^
 360                                             skb->hash;
 361                                 hash = __flow_hash_1word(hash);
 362                                 queue_index = map->queues[
 363                                     ((u64)hash * map->len) >> 32];
 364                         }
 365                         if (unlikely(queue_index >= dev->real_num_tx_queues))
 366                                 queue_index = -1;
 367                 }
 368         }
 369         rcu_read_unlock();
 370
 371         return queue_index;
 372 #else
 373         return -1;
 374 #endif
 375 }
 376
 377 static u16 __netdev_pick_tx(struct net_device *dev, struct sk_buff *skb)
 378 {
 379         struct sock *sk = skb->sk;
 380         int queue_index = sk_tx_queue_get(sk);
 381
 382         if (queue_index < 0 || skb->ooo_okay ||
 383             queue_index >= dev->real_num_tx_queues) {
 384                 int new_index = get_xps_queue(dev, skb);
 385                 if (new_index < 0)
 386                         new_index = skb_tx_hash(dev, skb);
 387
 388                 if (queue_index != new_index && sk &&
 389                     rcu_access_pointer(sk->sk_dst_cache))
 390                         sk_tx_queue_set(sk, new_index);
 391
 392                 queue_index = new_index;
 393         }
 394
 395         return queue_index;
 396 }
 397
 398 struct netdev_queue *netdev_pick_tx(struct net_device *dev,
 399                                     struct sk_buff *skb,
 400                                     void *accel_priv)
 401 {
 402         int queue_index = 0;
 403
 404         if (dev->real_num_tx_queues != 1) {
 405                 const struct net_device_ops *ops = dev->netdev_ops;
 406                 if (ops->ndo_select_queue)
 407                         queue_index = ops->ndo_select_queue(dev, skb, accel_priv,
 408                                                             __netdev_pick_tx);
 409                 else
 410                         queue_index = __netdev_pick_tx(dev, skb);
 411
 412                 if (!accel_priv)
 413                         queue_index = netdev_cap_txqueue(dev, queue_index);
 414         }
 415
 416         skb_set_queue_mapping(skb, queue_index);
 417         return netdev_get_tx_queue(dev, queue_index);
 418 }