Home | History | Annotate | Line # | Download | only in netinet6
ip6_flow.c revision 1.31
      1  1.31  knakahar /*	$NetBSD: ip6_flow.c,v 1.31 2016/08/23 09:59:20 knakahara Exp $	*/
      2   1.1  liamjfoy 
      3   1.1  liamjfoy /*-
      4   1.1  liamjfoy  * Copyright (c) 2007 The NetBSD Foundation, Inc.
      5   1.1  liamjfoy  * All rights reserved.
      6   1.1  liamjfoy  *
      7   1.1  liamjfoy  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1  liamjfoy  * by the 3am Software Foundry ("3am").  It was developed by Liam J. Foy
      9   1.1  liamjfoy  * <liamjfoy (at) netbsd.org> and Matt Thomas <matt (at) netbsd.org>.
     10   1.1  liamjfoy  *
     11   1.1  liamjfoy  * Redistribution and use in source and binary forms, with or without
     12   1.1  liamjfoy  * modification, are permitted provided that the following conditions
     13   1.1  liamjfoy  * are met:
     14   1.1  liamjfoy  * 1. Redistributions of source code must retain the above copyright
     15   1.1  liamjfoy  *    notice, this list of conditions and the following disclaimer.
     16   1.1  liamjfoy  * 2. Redistributions in binary form must reproduce the above copyright
     17   1.1  liamjfoy  *    notice, this list of conditions and the following disclaimer in the
     18   1.1  liamjfoy  *    documentation and/or other materials provided with the distribution.
     19   1.1  liamjfoy  *
     20   1.1  liamjfoy  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21   1.1  liamjfoy  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22   1.1  liamjfoy  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23   1.1  liamjfoy  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24   1.1  liamjfoy  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25   1.1  liamjfoy  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26   1.1  liamjfoy  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27   1.1  liamjfoy  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28   1.1  liamjfoy  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29   1.1  liamjfoy  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30   1.1  liamjfoy  * POSSIBILITY OF SUCH DAMAGE.
     31   1.1  liamjfoy  *
     32   1.1  liamjfoy  * IPv6 version was developed by Liam J. Foy. Original source existed in IPv4
     33   1.1  liamjfoy  * format developed by Matt Thomas. Thanks to Joerg Sonnenberger, Matt
     34   1.1  liamjfoy  * Thomas and Christos Zoulas.
     35   1.1  liamjfoy  *
     36   1.1  liamjfoy  * Thanks to Liverpool John Moores University, especially Dr. David Llewellyn-Jones
     37   1.1  liamjfoy  * for providing resources (to test) and Professor Madjid Merabti.
     38   1.1  liamjfoy  */
     39   1.1  liamjfoy 
     40   1.1  liamjfoy #include <sys/cdefs.h>
     41  1.31  knakahar __KERNEL_RCSID(0, "$NetBSD: ip6_flow.c,v 1.31 2016/08/23 09:59:20 knakahara Exp $");
     42   1.1  liamjfoy 
     43   1.1  liamjfoy #include <sys/param.h>
     44   1.1  liamjfoy #include <sys/systm.h>
     45   1.1  liamjfoy #include <sys/malloc.h>
     46   1.1  liamjfoy #include <sys/mbuf.h>
     47   1.1  liamjfoy #include <sys/domain.h>
     48   1.1  liamjfoy #include <sys/protosw.h>
     49   1.1  liamjfoy #include <sys/socket.h>
     50   1.1  liamjfoy #include <sys/socketvar.h>
     51   1.1  liamjfoy #include <sys/time.h>
     52   1.1  liamjfoy #include <sys/kernel.h>
     53   1.1  liamjfoy #include <sys/pool.h>
     54   1.1  liamjfoy #include <sys/sysctl.h>
     55  1.28     ozaki #include <sys/workqueue.h>
     56  1.29     ozaki #include <sys/atomic.h>
     57   1.1  liamjfoy 
     58   1.1  liamjfoy #include <net/if.h>
     59   1.1  liamjfoy #include <net/if_dl.h>
     60   1.1  liamjfoy #include <net/route.h>
     61   1.1  liamjfoy #include <net/pfil.h>
     62   1.1  liamjfoy 
     63   1.1  liamjfoy #include <netinet/in.h>
     64   1.1  liamjfoy #include <netinet6/in6_var.h>
     65   1.1  liamjfoy #include <netinet/in_systm.h>
     66   1.1  liamjfoy #include <netinet/ip6.h>
     67   1.1  liamjfoy #include <netinet6/ip6_var.h>
     68  1.15   thorpej #include <netinet6/ip6_private.h>
     69   1.1  liamjfoy 
     70   1.1  liamjfoy /*
     71   1.1  liamjfoy  * IPv6 Fast Forward caches/hashes flows from one source to destination.
     72   1.1  liamjfoy  *
     73   1.1  liamjfoy  * Upon a successful forward IPv6FF caches and hashes details such as the
     74   1.1  liamjfoy  * route, source and destination. Once another packet is received matching
     75   1.1  liamjfoy  * the source and destination the packet is forwarded straight onto if_output
     76   1.1  liamjfoy  * using the cached details.
     77   1.1  liamjfoy  *
     78   1.1  liamjfoy  * Example:
     79  1.20  christos  * ether/fddi_input -> ip6flow_fastforward -> if_output
     80   1.1  liamjfoy  */
     81   1.1  liamjfoy 
     82  1.18  liamjfoy static struct pool ip6flow_pool;
     83   1.1  liamjfoy 
     84  1.31  knakahar TAILQ_HEAD(ip6flowhead, ip6flow);
     85   1.1  liamjfoy 
     86   1.1  liamjfoy /*
     87   1.1  liamjfoy  * We could use IPv4 defines (IPFLOW_HASHBITS) but we'll
     88   1.1  liamjfoy  * use our own (possibly for future expansion).
     89   1.1  liamjfoy  */
     90   1.1  liamjfoy #define	IP6FLOW_TIMER		(5 * PR_SLOWHZ)
     91   1.4  liamjfoy #define	IP6FLOW_DEFAULT_HASHSIZE	(1 << IP6FLOW_HASHBITS)
     92   1.1  liamjfoy 
     93  1.25  knakahar /*
     94  1.25  knakahar  * ip6_flow.c internal lock.
     95  1.25  knakahar  * If we use softnet_lock, it would cause recursive lock.
     96  1.25  knakahar  *
     97  1.25  knakahar  * This is a tentative workaround.
     98  1.25  knakahar  * We should make it scalable somehow in the future.
     99  1.25  knakahar  */
    100  1.25  knakahar static kmutex_t ip6flow_lock;
    101   1.4  liamjfoy static struct ip6flowhead *ip6flowtable = NULL;
    102   1.1  liamjfoy static struct ip6flowhead ip6flowlist;
    103   1.1  liamjfoy static int ip6flow_inuse;
    104   1.1  liamjfoy 
    105  1.28     ozaki static void ip6flow_slowtimo_work(struct work *, void *);
    106  1.28     ozaki static struct workqueue	*ip6flow_slowtimo_wq;
    107  1.28     ozaki static struct work	ip6flow_slowtimo_wk;
    108  1.28     ozaki 
    109  1.30  knakahar static int sysctl_net_inet6_ip6_hashsize(SYSCTLFN_PROTO);
    110  1.30  knakahar static int sysctl_net_inet6_ip6_maxflows(SYSCTLFN_PROTO);
    111  1.30  knakahar static void ip6flow_sysctl_init(struct sysctllog **);
    112  1.30  knakahar 
    113   1.1  liamjfoy /*
    114   1.1  liamjfoy  * Insert an ip6flow into the list.
    115   1.1  liamjfoy  */
    116  1.31  knakahar #define	IP6FLOW_INSERT(hashidx, ip6f) \
    117   1.1  liamjfoy do { \
    118  1.31  knakahar 	(ip6f)->ip6f_hashidx = (hashidx); \
    119  1.31  knakahar 	TAILQ_INSERT_HEAD(&ip6flowtable[(hashidx)], (ip6f), ip6f_hash); \
    120  1.31  knakahar 	TAILQ_INSERT_HEAD(&ip6flowlist, (ip6f), ip6f_list); \
    121   1.1  liamjfoy } while (/*CONSTCOND*/ 0)
    122   1.1  liamjfoy 
    123   1.1  liamjfoy /*
    124   1.1  liamjfoy  * Remove an ip6flow from the list.
    125   1.1  liamjfoy  */
    126  1.31  knakahar #define	IP6FLOW_REMOVE(hashidx, ip6f) \
    127   1.1  liamjfoy do { \
    128  1.31  knakahar 	TAILQ_REMOVE(&ip6flowtable[(hashidx)], (ip6f), ip6f_hash); \
    129  1.31  knakahar 	TAILQ_REMOVE(&ip6flowlist, (ip6f), ip6f_list); \
    130   1.1  liamjfoy } while (/*CONSTCOND*/ 0)
    131   1.1  liamjfoy 
    132   1.1  liamjfoy #ifndef IP6FLOW_DEFAULT
    133   1.1  liamjfoy #define	IP6FLOW_DEFAULT		256
    134   1.1  liamjfoy #endif
    135   1.1  liamjfoy 
    136   1.1  liamjfoy int ip6_maxflows = IP6FLOW_DEFAULT;
    137   1.4  liamjfoy int ip6_hashsize = IP6FLOW_DEFAULT_HASHSIZE;
    138   1.1  liamjfoy 
    139   1.1  liamjfoy /*
    140   1.1  liamjfoy  * Calculate hash table position.
    141   1.1  liamjfoy  */
    142   1.1  liamjfoy static size_t
    143  1.13    dyoung ip6flow_hash(const struct ip6_hdr *ip6)
    144   1.1  liamjfoy {
    145   1.1  liamjfoy 	size_t hash;
    146   1.1  liamjfoy 	uint32_t dst_sum, src_sum;
    147   1.6  liamjfoy 	size_t idx;
    148   1.1  liamjfoy 
    149   1.1  liamjfoy 	src_sum = ip6->ip6_src.s6_addr32[0] + ip6->ip6_src.s6_addr32[1]
    150   1.1  liamjfoy 	    + ip6->ip6_src.s6_addr32[2] + ip6->ip6_src.s6_addr32[3];
    151   1.1  liamjfoy 	dst_sum = ip6->ip6_dst.s6_addr32[0] + ip6->ip6_dst.s6_addr32[1]
    152   1.1  liamjfoy 	    + ip6->ip6_dst.s6_addr32[2] + ip6->ip6_dst.s6_addr32[3];
    153   1.1  liamjfoy 
    154   1.1  liamjfoy 	hash = ip6->ip6_flow;
    155   1.1  liamjfoy 
    156   1.1  liamjfoy 	for (idx = 0; idx < 32; idx += IP6FLOW_HASHBITS)
    157   1.1  liamjfoy 		hash += (dst_sum >> (32 - idx)) + (src_sum >> idx);
    158   1.1  liamjfoy 
    159   1.4  liamjfoy 	return hash & (ip6_hashsize-1);
    160   1.1  liamjfoy }
    161   1.1  liamjfoy 
    162   1.1  liamjfoy /*
    163   1.1  liamjfoy  * Check to see if a flow already exists - if so return it.
    164   1.1  liamjfoy  */
    165   1.1  liamjfoy static struct ip6flow *
    166  1.13    dyoung ip6flow_lookup(const struct ip6_hdr *ip6)
    167   1.1  liamjfoy {
    168   1.1  liamjfoy 	size_t hash;
    169   1.1  liamjfoy 	struct ip6flow *ip6f;
    170   1.1  liamjfoy 
    171  1.25  knakahar 	KASSERT(mutex_owned(&ip6flow_lock));
    172  1.25  knakahar 
    173   1.1  liamjfoy 	hash = ip6flow_hash(ip6);
    174   1.1  liamjfoy 
    175  1.31  knakahar 	TAILQ_FOREACH(ip6f, &ip6flowtable[hash], ip6f_hash) {
    176   1.1  liamjfoy 		if (IN6_ARE_ADDR_EQUAL(&ip6->ip6_dst, &ip6f->ip6f_dst)
    177   1.1  liamjfoy 		    && IN6_ARE_ADDR_EQUAL(&ip6->ip6_src, &ip6f->ip6f_src)
    178   1.1  liamjfoy 		    && ip6f->ip6f_flow == ip6->ip6_flow) {
    179   1.1  liamjfoy 		    	/* A cached flow has been found. */
    180   1.1  liamjfoy 			return ip6f;
    181   1.1  liamjfoy 		}
    182   1.1  liamjfoy 	}
    183   1.1  liamjfoy 
    184   1.1  liamjfoy 	return NULL;
    185   1.1  liamjfoy }
    186   1.1  liamjfoy 
    187  1.18  liamjfoy void
    188  1.18  liamjfoy ip6flow_poolinit(void)
    189  1.18  liamjfoy {
    190  1.18  liamjfoy 
    191  1.18  liamjfoy 	pool_init(&ip6flow_pool, sizeof(struct ip6flow), 0, 0, 0, "ip6flowpl",
    192  1.18  liamjfoy 			NULL, IPL_NET);
    193  1.18  liamjfoy }
    194  1.18  liamjfoy 
    195   1.1  liamjfoy /*
    196   1.4  liamjfoy  * Allocate memory and initialise lists. This function is called
    197   1.4  liamjfoy  * from ip6_init and called there after to resize the hash table.
    198   1.4  liamjfoy  * If a newly sized table cannot be malloc'ed we just continue
    199   1.4  liamjfoy  * to use the old one.
    200   1.1  liamjfoy  */
    201  1.25  knakahar static int
    202  1.25  knakahar ip6flow_init_locked(int table_size)
    203   1.1  liamjfoy {
    204   1.4  liamjfoy 	struct ip6flowhead *new_table;
    205   1.1  liamjfoy 	size_t i;
    206   1.1  liamjfoy 
    207  1.25  knakahar 	KASSERT(mutex_owned(&ip6flow_lock));
    208  1.25  knakahar 
    209   1.4  liamjfoy 	new_table = (struct ip6flowhead *)malloc(sizeof(struct ip6flowhead) *
    210   1.4  liamjfoy 	    table_size, M_RTABLE, M_NOWAIT);
    211   1.4  liamjfoy 
    212   1.4  liamjfoy 	if (new_table == NULL)
    213   1.4  liamjfoy 		return 1;
    214   1.4  liamjfoy 
    215   1.4  liamjfoy 	if (ip6flowtable != NULL)
    216   1.4  liamjfoy 		free(ip6flowtable, M_RTABLE);
    217   1.4  liamjfoy 
    218   1.4  liamjfoy 	ip6flowtable = new_table;
    219   1.4  liamjfoy 	ip6_hashsize = table_size;
    220   1.4  liamjfoy 
    221  1.31  knakahar 	TAILQ_INIT(&ip6flowlist);
    222   1.4  liamjfoy 	for (i = 0; i < ip6_hashsize; i++)
    223  1.31  knakahar 		TAILQ_INIT(&ip6flowtable[i]);
    224   1.4  liamjfoy 
    225   1.4  liamjfoy 	return 0;
    226   1.1  liamjfoy }
    227   1.1  liamjfoy 
    228  1.25  knakahar int
    229  1.25  knakahar ip6flow_init(int table_size)
    230  1.25  knakahar {
    231  1.28     ozaki 	int ret, error;
    232  1.28     ozaki 
    233  1.28     ozaki 	error = workqueue_create(&ip6flow_slowtimo_wq, "ip6flow_slowtimo",
    234  1.28     ozaki 	    ip6flow_slowtimo_work, NULL, PRI_SOFTNET, IPL_SOFTNET, WQ_MPSAFE);
    235  1.28     ozaki 	if (error != 0)
    236  1.28     ozaki 		panic("%s: workqueue_create failed (%d)\n", __func__, error);
    237  1.25  knakahar 
    238  1.25  knakahar 	mutex_init(&ip6flow_lock, MUTEX_DEFAULT, IPL_NONE);
    239  1.25  knakahar 
    240  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    241  1.25  knakahar 	ret = ip6flow_init_locked(table_size);
    242  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    243  1.30  knakahar 	ip6flow_sysctl_init(NULL);
    244  1.25  knakahar 
    245  1.25  knakahar 	return ret;
    246  1.25  knakahar }
    247  1.25  knakahar 
    248   1.1  liamjfoy /*
    249   1.1  liamjfoy  * IPv6 Fast Forward routine. Attempt to forward the packet -
    250   1.1  liamjfoy  * if any problems are found return to the main IPv6 input
    251   1.1  liamjfoy  * routine to deal with.
    252   1.1  liamjfoy  */
    253   1.1  liamjfoy int
    254  1.20  christos ip6flow_fastforward(struct mbuf **mp)
    255   1.1  liamjfoy {
    256   1.1  liamjfoy 	struct ip6flow *ip6f;
    257   1.1  liamjfoy 	struct ip6_hdr *ip6;
    258   1.1  liamjfoy 	struct rtentry *rt;
    259  1.20  christos 	struct mbuf *m;
    260   1.7    dyoung 	const struct sockaddr *dst;
    261   1.1  liamjfoy 	int error;
    262  1.25  knakahar 	int ret = 0;
    263  1.25  knakahar 
    264  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    265   1.1  liamjfoy 
    266   1.1  liamjfoy 	/*
    267   1.1  liamjfoy 	 * Are we forwarding packets and have flows?
    268   1.1  liamjfoy 	 */
    269   1.1  liamjfoy 	if (!ip6_forwarding || ip6flow_inuse == 0)
    270  1.25  knakahar 		goto out;
    271   1.1  liamjfoy 
    272  1.20  christos 	m = *mp;
    273   1.1  liamjfoy 	/*
    274   1.1  liamjfoy 	 * At least size of IPv6 Header?
    275   1.1  liamjfoy 	 */
    276   1.1  liamjfoy 	if (m->m_len < sizeof(struct ip6_hdr))
    277  1.25  knakahar 		goto out;
    278   1.1  liamjfoy 	/*
    279   1.1  liamjfoy 	 * Was packet received as a link-level multicast or broadcast?
    280   1.1  liamjfoy 	 * If so, don't try to fast forward.
    281   1.1  liamjfoy 	 */
    282   1.1  liamjfoy 	if ((m->m_flags & (M_BCAST|M_MCAST)) != 0)
    283  1.25  knakahar 		goto out;
    284   1.1  liamjfoy 
    285  1.13    dyoung 	if (IP6_HDR_ALIGNED_P(mtod(m, const void *)) == 0) {
    286   1.1  liamjfoy 		if ((m = m_copyup(m, sizeof(struct ip6_hdr),
    287   1.1  liamjfoy 				(max_linkhdr + 3) & ~3)) == NULL) {
    288  1.25  knakahar 			goto out;
    289   1.1  liamjfoy 		}
    290  1.20  christos 		*mp = m;
    291   1.1  liamjfoy 	} else if (__predict_false(m->m_len < sizeof(struct ip6_hdr))) {
    292   1.1  liamjfoy 		if ((m = m_pullup(m, sizeof(struct ip6_hdr))) == NULL) {
    293  1.25  knakahar 			goto out;
    294   1.1  liamjfoy 		}
    295  1.20  christos 		*mp = m;
    296   1.1  liamjfoy 	}
    297   1.1  liamjfoy 
    298   1.1  liamjfoy 	ip6 = mtod(m, struct ip6_hdr *);
    299   1.1  liamjfoy 
    300   1.1  liamjfoy 	if ((ip6->ip6_vfc & IPV6_VERSION_MASK) != IPV6_VERSION) {
    301   1.1  liamjfoy 		/* Bad version. */
    302  1.25  knakahar 		goto out;
    303   1.1  liamjfoy 	}
    304   1.1  liamjfoy 
    305   1.1  liamjfoy 	/*
    306   1.1  liamjfoy 	 * If we have a hop-by-hop extension we must process it.
    307   1.1  liamjfoy 	 * We just leave this up to ip6_input to deal with.
    308   1.1  liamjfoy 	 */
    309   1.1  liamjfoy 	if (ip6->ip6_nxt == IPPROTO_HOPOPTS)
    310  1.25  knakahar 		goto out;
    311   1.1  liamjfoy 
    312   1.1  liamjfoy 	/*
    313   1.1  liamjfoy 	 * Attempt to find a flow.
    314   1.1  liamjfoy 	 */
    315   1.1  liamjfoy 	if ((ip6f = ip6flow_lookup(ip6)) == NULL) {
    316   1.1  liamjfoy 		/* No flow found. */
    317  1.25  knakahar 		goto out;
    318   1.1  liamjfoy 	}
    319   1.1  liamjfoy 
    320   1.1  liamjfoy 	/*
    321   1.1  liamjfoy 	 * Route and interface still up?
    322   1.1  liamjfoy 	 */
    323  1.12    dyoung 	if ((rt = rtcache_validate(&ip6f->ip6f_ro)) == NULL ||
    324  1.24       roy 	    (rt->rt_ifp->if_flags & IFF_UP) == 0 ||
    325  1.24       roy 	    (rt->rt_flags & RTF_BLACKHOLE) != 0)
    326  1.25  knakahar 		goto out;
    327   1.1  liamjfoy 
    328   1.1  liamjfoy 	/*
    329   1.1  liamjfoy 	 * Packet size greater than MTU?
    330   1.1  liamjfoy 	 */
    331   1.1  liamjfoy 	if (m->m_pkthdr.len > rt->rt_ifp->if_mtu) {
    332   1.1  liamjfoy 		/* Return to main IPv6 input function. */
    333  1.25  knakahar 		goto out;
    334   1.1  liamjfoy 	}
    335   1.1  liamjfoy 
    336  1.21   msaitoh 	/*
    337  1.21   msaitoh 	 * Clear any in-bound checksum flags for this packet.
    338  1.21   msaitoh 	 */
    339  1.21   msaitoh 	m->m_pkthdr.csum_flags = 0;
    340  1.21   msaitoh 
    341   1.1  liamjfoy 	if (ip6->ip6_hlim <= IPV6_HLIMDEC)
    342  1.25  knakahar 		goto out;
    343   1.1  liamjfoy 
    344   1.1  liamjfoy 	/* Decrement hop limit (same as TTL) */
    345   1.1  liamjfoy 	ip6->ip6_hlim -= IPV6_HLIMDEC;
    346   1.1  liamjfoy 
    347   1.1  liamjfoy 	if (rt->rt_flags & RTF_GATEWAY)
    348   1.7    dyoung 		dst = rt->rt_gateway;
    349   1.1  liamjfoy 	else
    350   1.7    dyoung 		dst = rtcache_getdst(&ip6f->ip6f_ro);
    351   1.1  liamjfoy 
    352   1.1  liamjfoy 	PRT_SLOW_ARM(ip6f->ip6f_timer, IP6FLOW_TIMER);
    353   1.1  liamjfoy 
    354   1.1  liamjfoy 	ip6f->ip6f_uses++;
    355   1.1  liamjfoy 
    356  1.31  knakahar #if 0
    357  1.31  knakahar 	/*
    358  1.31  knakahar 	 * We use FIFO cache replacement instead of LRU the same ip_flow.c.
    359  1.31  knakahar 	 */
    360  1.31  knakahar 	/* move to head (LRU) for ip6flowlist. ip6flowtable does not care LRU. */
    361  1.31  knakahar 	TAILQ_REMOVE(&ip6flowlist, ip6f, ip6f_list);
    362  1.31  knakahar 	TAILQ_INSERT_HEAD(&ip6flowlist, ip6f, ip6f_list);
    363  1.31  knakahar #endif
    364  1.31  knakahar 
    365   1.1  liamjfoy 	/* Send on its way - straight to the interface output routine. */
    366  1.27  knakahar 	if ((error = if_output_lock(rt->rt_ifp, rt->rt_ifp, m, dst, rt)) != 0) {
    367   1.1  liamjfoy 		ip6f->ip6f_dropped++;
    368   1.1  liamjfoy 	} else {
    369   1.1  liamjfoy 		ip6f->ip6f_forwarded++;
    370   1.1  liamjfoy 	}
    371  1.25  knakahar 	ret = 1;
    372  1.25  knakahar  out:
    373  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    374  1.25  knakahar 	return ret;
    375   1.1  liamjfoy }
    376   1.1  liamjfoy 
    377   1.1  liamjfoy /*
    378   1.1  liamjfoy  * Add the IPv6 flow statistics to the main IPv6 statistics.
    379   1.1  liamjfoy  */
    380   1.1  liamjfoy static void
    381  1.13    dyoung ip6flow_addstats(const struct ip6flow *ip6f)
    382   1.1  liamjfoy {
    383  1.11    dyoung 	struct rtentry *rt;
    384  1.15   thorpej 	uint64_t *ip6s;
    385  1.11    dyoung 
    386  1.12    dyoung 	if ((rt = rtcache_validate(&ip6f->ip6f_ro)) != NULL)
    387  1.11    dyoung 		rt->rt_use += ip6f->ip6f_uses;
    388  1.15   thorpej 	ip6s = IP6_STAT_GETREF();
    389  1.15   thorpej 	ip6s[IP6_STAT_FASTFORWARDFLOWS] = ip6flow_inuse;
    390  1.15   thorpej 	ip6s[IP6_STAT_CANTFORWARD] += ip6f->ip6f_dropped;
    391  1.15   thorpej 	ip6s[IP6_STAT_ODROPPED] += ip6f->ip6f_dropped;
    392  1.15   thorpej 	ip6s[IP6_STAT_TOTAL] += ip6f->ip6f_uses;
    393  1.15   thorpej 	ip6s[IP6_STAT_FORWARD] += ip6f->ip6f_forwarded;
    394  1.15   thorpej 	ip6s[IP6_STAT_FASTFORWARD] += ip6f->ip6f_forwarded;
    395  1.15   thorpej 	IP6_STAT_PUTREF();
    396   1.1  liamjfoy }
    397   1.1  liamjfoy 
    398   1.1  liamjfoy /*
    399   1.1  liamjfoy  * Add statistics and free the flow.
    400   1.1  liamjfoy  */
    401   1.1  liamjfoy static void
    402   1.1  liamjfoy ip6flow_free(struct ip6flow *ip6f)
    403   1.1  liamjfoy {
    404   1.1  liamjfoy 
    405  1.25  knakahar 	KASSERT(mutex_owned(&ip6flow_lock));
    406  1.25  knakahar 
    407   1.1  liamjfoy 	/*
    408   1.1  liamjfoy 	 * Remove the flow from the hash table (at elevated IPL).
    409   1.1  liamjfoy 	 * Once it's off the list, we can deal with it at normal
    410   1.1  liamjfoy 	 * network IPL.
    411   1.1  liamjfoy 	 */
    412  1.31  knakahar 	IP6FLOW_REMOVE(ip6f->ip6f_hashidx, ip6f);
    413  1.26  knakahar 
    414   1.1  liamjfoy 	ip6flow_inuse--;
    415   1.1  liamjfoy 	ip6flow_addstats(ip6f);
    416   1.7    dyoung 	rtcache_free(&ip6f->ip6f_ro);
    417   1.1  liamjfoy 	pool_put(&ip6flow_pool, ip6f);
    418   1.1  liamjfoy }
    419   1.1  liamjfoy 
    420  1.25  knakahar static struct ip6flow *
    421  1.25  knakahar ip6flow_reap_locked(int just_one)
    422   1.1  liamjfoy {
    423  1.31  knakahar 	struct ip6flow *ip6f;
    424  1.25  knakahar 
    425  1.25  knakahar 	KASSERT(mutex_owned(&ip6flow_lock));
    426  1.25  knakahar 
    427  1.31  knakahar 	/*
    428  1.31  knakahar 	 * This case must remove one ip6flow. Furthermore, this case is used in
    429  1.31  knakahar 	 * fast path(packet processing path). So, simply remove TAILQ_LAST one.
    430  1.31  knakahar 	 */
    431  1.31  knakahar 	if (just_one) {
    432  1.31  knakahar 		ip6f = TAILQ_LAST(&ip6flowlist, ip6flowhead);
    433  1.31  knakahar 		KASSERT(ip6f != NULL);
    434  1.31  knakahar 
    435  1.31  knakahar 		IP6FLOW_REMOVE(ip6f->ip6f_hashidx, ip6f);
    436  1.31  knakahar 
    437  1.31  knakahar 		ip6flow_addstats(ip6f);
    438  1.31  knakahar 		rtcache_free(&ip6f->ip6f_ro);
    439  1.31  knakahar 		return ip6f;
    440  1.31  knakahar 	}
    441   1.1  liamjfoy 
    442  1.31  knakahar 	/*
    443  1.31  knakahar 	 * This case is used in slow path(sysctl).
    444  1.31  knakahar 	 * At first, remove invalid rtcache ip6flow, and then remove TAILQ_LAST
    445  1.31  knakahar 	 * ip6flow if it is ensured least recently used by comparing last_uses.
    446  1.31  knakahar 	 */
    447  1.31  knakahar 	while (ip6flow_inuse > ip6_maxflows) {
    448  1.31  knakahar 		struct ip6flow *maybe_ip6f = TAILQ_LAST(&ip6flowlist, ip6flowhead);
    449  1.31  knakahar 
    450  1.31  knakahar 		TAILQ_FOREACH(ip6f, &ip6flowlist, ip6f_list) {
    451   1.1  liamjfoy 			/*
    452   1.1  liamjfoy 			 * If this no longer points to a valid route -
    453   1.1  liamjfoy 			 * reclaim it.
    454   1.1  liamjfoy 			 */
    455  1.12    dyoung 			if (rtcache_validate(&ip6f->ip6f_ro) == NULL)
    456   1.1  liamjfoy 				goto done;
    457   1.1  liamjfoy 			/*
    458   1.1  liamjfoy 			 * choose the one that's been least recently
    459   1.1  liamjfoy 			 * used or has had the least uses in the
    460   1.1  liamjfoy 			 * last 1.5 intervals.
    461   1.1  liamjfoy 			 */
    462  1.31  knakahar 			if (ip6f->ip6f_timer < maybe_ip6f->ip6f_timer
    463  1.31  knakahar 			    || ((ip6f->ip6f_timer == maybe_ip6f->ip6f_timer)
    464  1.31  knakahar 				&& (ip6f->ip6f_last_uses + ip6f->ip6f_uses
    465  1.31  knakahar 				    < maybe_ip6f->ip6f_last_uses + maybe_ip6f->ip6f_uses)))
    466   1.1  liamjfoy 				maybe_ip6f = ip6f;
    467   1.1  liamjfoy 		}
    468   1.1  liamjfoy 		ip6f = maybe_ip6f;
    469   1.1  liamjfoy 	    done:
    470   1.1  liamjfoy 		/*
    471   1.1  liamjfoy 		 * Remove the entry from the flow table
    472   1.1  liamjfoy 		 */
    473  1.31  knakahar 		IP6FLOW_REMOVE(ip6f->ip6f_hashidx, ip6f);
    474  1.26  knakahar 
    475   1.7    dyoung 		rtcache_free(&ip6f->ip6f_ro);
    476   1.1  liamjfoy 		ip6flow_inuse--;
    477   1.1  liamjfoy 		ip6flow_addstats(ip6f);
    478   1.1  liamjfoy 		pool_put(&ip6flow_pool, ip6f);
    479   1.1  liamjfoy 	}
    480   1.1  liamjfoy 	return NULL;
    481   1.1  liamjfoy }
    482   1.1  liamjfoy 
    483  1.25  knakahar /*
    484  1.25  knakahar  * Reap one or more flows - ip6flow_reap may remove
    485  1.25  knakahar  * multiple flows if net.inet6.ip6.maxflows is reduced.
    486  1.25  knakahar  */
    487  1.25  knakahar struct ip6flow *
    488  1.25  knakahar ip6flow_reap(int just_one)
    489  1.25  knakahar {
    490  1.25  knakahar 	struct ip6flow *ip6f;
    491  1.25  knakahar 
    492  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    493  1.25  knakahar 	ip6f = ip6flow_reap_locked(just_one);
    494  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    495  1.25  knakahar 	return ip6f;
    496  1.25  knakahar }
    497  1.25  knakahar 
    498  1.29     ozaki static unsigned int ip6flow_work_enqueued = 0;
    499  1.28     ozaki 
    500   1.1  liamjfoy void
    501  1.28     ozaki ip6flow_slowtimo_work(struct work *wk, void *arg)
    502   1.1  liamjfoy {
    503   1.1  liamjfoy 	struct ip6flow *ip6f, *next_ip6f;
    504   1.1  liamjfoy 
    505  1.29     ozaki 	/* We can allow enqueuing another work at this point */
    506  1.29     ozaki 	atomic_swap_uint(&ip6flow_work_enqueued, 0);
    507  1.29     ozaki 
    508  1.16        ad 	mutex_enter(softnet_lock);
    509  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    510  1.16        ad 	KERNEL_LOCK(1, NULL);
    511  1.16        ad 
    512  1.31  knakahar 	for (ip6f = TAILQ_FIRST(&ip6flowlist); ip6f != NULL; ip6f = next_ip6f) {
    513  1.31  knakahar 		next_ip6f = TAILQ_NEXT(ip6f, ip6f_list);
    514   1.1  liamjfoy 		if (PRT_SLOW_ISEXPIRED(ip6f->ip6f_timer) ||
    515  1.12    dyoung 		    rtcache_validate(&ip6f->ip6f_ro) == NULL) {
    516   1.1  liamjfoy 			ip6flow_free(ip6f);
    517   1.1  liamjfoy 		} else {
    518   1.1  liamjfoy 			ip6f->ip6f_last_uses = ip6f->ip6f_uses;
    519   1.1  liamjfoy 			ip6flow_addstats(ip6f);
    520   1.1  liamjfoy 			ip6f->ip6f_uses = 0;
    521   1.1  liamjfoy 			ip6f->ip6f_dropped = 0;
    522   1.1  liamjfoy 			ip6f->ip6f_forwarded = 0;
    523   1.1  liamjfoy 		}
    524   1.1  liamjfoy 	}
    525  1.16        ad 
    526  1.16        ad 	KERNEL_UNLOCK_ONE(NULL);
    527  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    528  1.16        ad 	mutex_exit(softnet_lock);
    529   1.1  liamjfoy }
    530   1.1  liamjfoy 
    531  1.28     ozaki void
    532  1.28     ozaki ip6flow_slowtimo(void)
    533  1.28     ozaki {
    534  1.28     ozaki 
    535  1.28     ozaki 	/* Avoid enqueuing another work when one is already enqueued */
    536  1.29     ozaki 	if (atomic_swap_uint(&ip6flow_work_enqueued, 1) == 1)
    537  1.28     ozaki 		return;
    538  1.28     ozaki 
    539  1.28     ozaki 	workqueue_enqueue(ip6flow_slowtimo_wq, &ip6flow_slowtimo_wk, NULL);
    540  1.28     ozaki }
    541  1.28     ozaki 
    542   1.1  liamjfoy /*
    543   1.1  liamjfoy  * We have successfully forwarded a packet using the normal
    544   1.1  liamjfoy  * IPv6 stack. Now create/update a flow.
    545   1.1  liamjfoy  */
    546   1.1  liamjfoy void
    547   1.7    dyoung ip6flow_create(const struct route *ro, struct mbuf *m)
    548   1.1  liamjfoy {
    549  1.13    dyoung 	const struct ip6_hdr *ip6;
    550   1.1  liamjfoy 	struct ip6flow *ip6f;
    551   1.1  liamjfoy 	size_t hash;
    552   1.1  liamjfoy 
    553  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    554  1.25  knakahar 
    555  1.13    dyoung 	ip6 = mtod(m, const struct ip6_hdr *);
    556   1.1  liamjfoy 
    557   1.1  liamjfoy 	/*
    558   1.1  liamjfoy 	 * If IPv6 Fast Forward is disabled, don't create a flow.
    559   1.1  liamjfoy 	 * It can be disabled by setting net.inet6.ip6.maxflows to 0.
    560   1.1  liamjfoy 	 *
    561   1.1  liamjfoy 	 * Don't create a flow for ICMPv6 messages.
    562   1.1  liamjfoy 	 */
    563  1.25  knakahar 	if (ip6_maxflows == 0 || ip6->ip6_nxt == IPPROTO_IPV6_ICMP) {
    564  1.25  knakahar 		mutex_exit(&ip6flow_lock);
    565   1.1  liamjfoy 		return;
    566  1.25  knakahar 	}
    567   1.1  liamjfoy 
    568  1.22     pooka 	KERNEL_LOCK(1, NULL);
    569  1.22     pooka 
    570   1.1  liamjfoy 	/*
    571   1.1  liamjfoy 	 * See if an existing flow exists.  If so:
    572   1.1  liamjfoy 	 *	- Remove the flow
    573   1.1  liamjfoy 	 *	- Add flow statistics
    574   1.1  liamjfoy 	 *	- Free the route
    575   1.1  liamjfoy 	 *	- Reset statistics
    576   1.1  liamjfoy 	 *
    577   1.1  liamjfoy 	 * If a flow doesn't exist allocate a new one if
    578   1.1  liamjfoy 	 * ip6_maxflows hasn't reached its limit. If it has
    579   1.1  liamjfoy 	 * been reached, reap some flows.
    580   1.1  liamjfoy 	 */
    581   1.1  liamjfoy 	ip6f = ip6flow_lookup(ip6);
    582   1.1  liamjfoy 	if (ip6f == NULL) {
    583   1.1  liamjfoy 		if (ip6flow_inuse >= ip6_maxflows) {
    584  1.25  knakahar 			ip6f = ip6flow_reap_locked(1);
    585   1.1  liamjfoy 		} else {
    586   1.1  liamjfoy 			ip6f = pool_get(&ip6flow_pool, PR_NOWAIT);
    587   1.1  liamjfoy 			if (ip6f == NULL)
    588  1.22     pooka 				goto out;
    589   1.1  liamjfoy 			ip6flow_inuse++;
    590   1.1  liamjfoy 		}
    591   1.1  liamjfoy 		memset(ip6f, 0, sizeof(*ip6f));
    592   1.1  liamjfoy 	} else {
    593  1.31  knakahar 		IP6FLOW_REMOVE(ip6f->ip6f_hashidx, ip6f);
    594  1.26  knakahar 
    595   1.1  liamjfoy 		ip6flow_addstats(ip6f);
    596   1.7    dyoung 		rtcache_free(&ip6f->ip6f_ro);
    597   1.1  liamjfoy 		ip6f->ip6f_uses = 0;
    598   1.1  liamjfoy 		ip6f->ip6f_last_uses = 0;
    599   1.1  liamjfoy 		ip6f->ip6f_dropped = 0;
    600   1.1  liamjfoy 		ip6f->ip6f_forwarded = 0;
    601   1.1  liamjfoy 	}
    602   1.1  liamjfoy 
    603   1.1  liamjfoy 	/*
    604   1.1  liamjfoy 	 * Fill in the updated/new details.
    605   1.1  liamjfoy 	 */
    606   1.7    dyoung 	rtcache_copy(&ip6f->ip6f_ro, ro);
    607   1.1  liamjfoy 	ip6f->ip6f_dst = ip6->ip6_dst;
    608   1.1  liamjfoy 	ip6f->ip6f_src = ip6->ip6_src;
    609   1.1  liamjfoy 	ip6f->ip6f_flow = ip6->ip6_flow;
    610   1.1  liamjfoy 	PRT_SLOW_ARM(ip6f->ip6f_timer, IP6FLOW_TIMER);
    611   1.1  liamjfoy 
    612   1.1  liamjfoy 	/*
    613   1.1  liamjfoy 	 * Insert into the approriate bucket of the flow table.
    614   1.1  liamjfoy 	 */
    615   1.1  liamjfoy 	hash = ip6flow_hash(ip6);
    616  1.31  knakahar 	IP6FLOW_INSERT(hash, ip6f);
    617  1.22     pooka 
    618  1.22     pooka  out:
    619  1.22     pooka 	KERNEL_UNLOCK_ONE(NULL);
    620  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    621   1.1  liamjfoy }
    622   1.1  liamjfoy 
    623   1.1  liamjfoy /*
    624   1.4  liamjfoy  * Invalidate/remove all flows - if new_size is positive we
    625   1.4  liamjfoy  * resize the hash table.
    626   1.1  liamjfoy  */
    627   1.4  liamjfoy int
    628   1.4  liamjfoy ip6flow_invalidate_all(int new_size)
    629   1.1  liamjfoy {
    630   1.1  liamjfoy 	struct ip6flow *ip6f, *next_ip6f;
    631  1.26  knakahar 	int error;
    632   1.1  liamjfoy 
    633   1.4  liamjfoy 	error = 0;
    634  1.25  knakahar 
    635  1.25  knakahar 	mutex_enter(&ip6flow_lock);
    636  1.25  knakahar 
    637  1.31  knakahar 	for (ip6f = TAILQ_FIRST(&ip6flowlist); ip6f != NULL; ip6f = next_ip6f) {
    638  1.31  knakahar 		next_ip6f = TAILQ_NEXT(ip6f, ip6f_list);
    639   1.1  liamjfoy 		ip6flow_free(ip6f);
    640   1.1  liamjfoy 	}
    641   1.4  liamjfoy 
    642   1.4  liamjfoy 	if (new_size)
    643  1.25  knakahar 		error = ip6flow_init_locked(new_size);
    644   1.4  liamjfoy 
    645  1.25  knakahar 	mutex_exit(&ip6flow_lock);
    646  1.25  knakahar 
    647   1.4  liamjfoy 	return error;
    648   1.1  liamjfoy }
    649  1.30  knakahar 
    650  1.30  knakahar /*
    651  1.30  knakahar  * sysctl helper routine for net.inet.ip6.maxflows. Since
    652  1.30  knakahar  * we could reduce this value, call ip6flow_reap();
    653  1.30  knakahar  */
    654  1.30  knakahar static int
    655  1.30  knakahar sysctl_net_inet6_ip6_maxflows(SYSCTLFN_ARGS)
    656  1.30  knakahar {
    657  1.30  knakahar 	int error;
    658  1.30  knakahar 
    659  1.30  knakahar 	error = sysctl_lookup(SYSCTLFN_CALL(rnode));
    660  1.30  knakahar 	if (error || newp == NULL)
    661  1.30  knakahar 		return (error);
    662  1.30  knakahar 
    663  1.30  knakahar 	mutex_enter(softnet_lock);
    664  1.30  knakahar 	KERNEL_LOCK(1, NULL);
    665  1.30  knakahar 
    666  1.30  knakahar 	ip6flow_reap(0);
    667  1.30  knakahar 
    668  1.30  knakahar 	KERNEL_UNLOCK_ONE(NULL);
    669  1.30  knakahar 	mutex_exit(softnet_lock);
    670  1.30  knakahar 
    671  1.30  knakahar 	return (0);
    672  1.30  knakahar }
    673  1.30  knakahar 
    674  1.30  knakahar static int
    675  1.30  knakahar sysctl_net_inet6_ip6_hashsize(SYSCTLFN_ARGS)
    676  1.30  knakahar {
    677  1.30  knakahar 	int error, tmp;
    678  1.30  knakahar 	struct sysctlnode node;
    679  1.30  knakahar 
    680  1.30  knakahar 	node = *rnode;
    681  1.30  knakahar 	tmp = ip6_hashsize;
    682  1.30  knakahar 	node.sysctl_data = &tmp;
    683  1.30  knakahar 	error = sysctl_lookup(SYSCTLFN_CALL(&node));
    684  1.30  knakahar 	if (error || newp == NULL)
    685  1.30  knakahar 		return (error);
    686  1.30  knakahar 
    687  1.30  knakahar 	if ((tmp & (tmp - 1)) == 0 && tmp != 0) {
    688  1.30  knakahar 		/*
    689  1.30  knakahar 		 * Can only fail due to malloc()
    690  1.30  knakahar 		 */
    691  1.30  knakahar 		mutex_enter(softnet_lock);
    692  1.30  knakahar 		KERNEL_LOCK(1, NULL);
    693  1.30  knakahar 
    694  1.30  knakahar 		error = ip6flow_invalidate_all(tmp);
    695  1.30  knakahar 
    696  1.30  knakahar 		KERNEL_UNLOCK_ONE(NULL);
    697  1.30  knakahar 		mutex_exit(softnet_lock);
    698  1.30  knakahar 	} else {
    699  1.30  knakahar 		/*
    700  1.30  knakahar 		 * EINVAL if not a power of 2
    701  1.30  knakahar 		 */
    702  1.30  knakahar 		error = EINVAL;
    703  1.30  knakahar 	}
    704  1.30  knakahar 
    705  1.30  knakahar 	return error;
    706  1.30  knakahar }
    707  1.30  knakahar 
    708  1.30  knakahar static void
    709  1.30  knakahar ip6flow_sysctl_init(struct sysctllog **clog)
    710  1.30  knakahar {
    711  1.30  knakahar 
    712  1.30  knakahar 	sysctl_createv(clog, 0, NULL, NULL,
    713  1.30  knakahar 		       CTLFLAG_PERMANENT,
    714  1.30  knakahar 		       CTLTYPE_NODE, "inet6",
    715  1.30  knakahar 		       SYSCTL_DESCR("PF_INET6 related settings"),
    716  1.30  knakahar 		       NULL, 0, NULL, 0,
    717  1.30  knakahar 		       CTL_NET, PF_INET6, CTL_EOL);
    718  1.30  knakahar 	sysctl_createv(clog, 0, NULL, NULL,
    719  1.30  knakahar 		       CTLFLAG_PERMANENT,
    720  1.30  knakahar 		       CTLTYPE_NODE, "ip6",
    721  1.30  knakahar 		       SYSCTL_DESCR("IPv6 related settings"),
    722  1.30  knakahar 		       NULL, 0, NULL, 0,
    723  1.30  knakahar 		       CTL_NET, PF_INET6, IPPROTO_IPV6, CTL_EOL);
    724  1.30  knakahar 
    725  1.30  knakahar 	sysctl_createv(clog, 0, NULL, NULL,
    726  1.30  knakahar 			CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    727  1.30  knakahar 			CTLTYPE_INT, "maxflows",
    728  1.30  knakahar 			SYSCTL_DESCR("Number of flows for fast forwarding (IPv6)"),
    729  1.30  knakahar 			sysctl_net_inet6_ip6_maxflows, 0, &ip6_maxflows, 0,
    730  1.30  knakahar 			CTL_NET, PF_INET6, IPPROTO_IPV6,
    731  1.30  knakahar 			CTL_CREATE, CTL_EOL);
    732  1.30  knakahar 	sysctl_createv(clog, 0, NULL, NULL,
    733  1.30  knakahar 			CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    734  1.30  knakahar 			CTLTYPE_INT, "hashsize",
    735  1.30  knakahar 			SYSCTL_DESCR("Size of hash table for fast forwarding (IPv6)"),
    736  1.30  knakahar 			sysctl_net_inet6_ip6_hashsize, 0, &ip6_hashsize, 0,
    737  1.30  knakahar 			CTL_NET, PF_INET6, IPPROTO_IPV6,
    738  1.30  knakahar 			CTL_CREATE, CTL_EOL);
    739  1.30  knakahar }
    740