]> git.saurik.com Git - apple/xnu.git/blobdiff - bsd/netinet/tcp_cache.c
xnu-7195.50.7.100.1.tar.gz
[apple/xnu.git] / bsd / netinet / tcp_cache.c
index b872c7d321c0854a58ca46487ec9bf7769057551..8095d924c534ef236b6c1fe03a4d613554beb1a3 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * Copyright (c) 2015 Apple Inc. All rights reserved.
+ * Copyright (c) 2015-2017 Apple Inc. All rights reserved.
  *
  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  *
@@ -30,7 +30,9 @@
 
 #include <net/flowhash.h>
 #include <net/route.h>
+#include <net/necp.h>
 #include <netinet/in_pcb.h>
+#include <netinet/mptcp_var.h>
 #include <netinet/tcp_cache.h>
 #include <netinet/tcp_seq.h>
 #include <netinet/tcp_var.h>
 #include <sys/queue.h>
 #include <dev/random/randomdev.h>
 
+typedef union {
+       struct in_addr addr;
+       struct in6_addr addr6;
+} in_4_6_addr;
+
 struct tcp_heuristic_key {
        union {
                uint8_t thk_net_signature[IFNET_SIGNATURELEN];
-               union {
-                       struct in_addr addr;
-                       struct in6_addr addr6;
-               } thk_ip;
+               in_4_6_addr thk_ip;
        };
-       sa_family_t     thk_family;
+       sa_family_t     thk_family;
 };
 
 struct tcp_heuristic {
        SLIST_ENTRY(tcp_heuristic) list;
 
-       u_int32_t       th_last_access;
-
-       struct tcp_heuristic_key        th_key;
-
-       char            th_val_start[0]; /* Marker for memsetting to 0 */
-
-       u_int8_t        th_tfo_cookie_loss; /* The number of times a SYN+cookie has been lost */
-       u_int8_t        th_ecn_loss; /* The number of times a SYN+ecn has been lost */
-       u_int8_t        th_ecn_aggressive; /* The number of times we did an aggressive fallback */
-       u_int32_t       th_tfo_fallback_trials; /* Number of times we did not try out TFO due to SYN-loss */
-       u_int32_t       th_tfo_cookie_backoff; /* Time until when we should not try out TFO */
-       u_int32_t       th_ecn_backoff; /* Time until when we should not try out ECN */
-
-       u_int8_t        th_tfo_in_backoff:1, /* Are we avoiding TFO due to the backoff timer? */
-                       th_tfo_aggressive_fallback:1, /* Aggressive fallback due to nasty middlebox */
-                       th_tfo_snd_middlebox_supp:1, /* We are sure that the network supports TFO in upstream direction */
-                       th_tfo_rcv_middlebox_supp:1; /* We are sure that the network supports TFO in downstream direction*/
-
-       char            th_val_end[0]; /* Marker for memsetting to 0 */
+       uint32_t        th_last_access;
+
+       struct tcp_heuristic_key        th_key;
+
+       char            th_val_start[0]; /* Marker for memsetting to 0 */
+
+       uint8_t         th_tfo_data_loss; /* The number of times a SYN+data has been lost */
+       uint8_t         th_tfo_req_loss; /* The number of times a SYN+cookie-req has been lost */
+       uint8_t         th_tfo_data_rst; /* The number of times a SYN+data has received a RST */
+       uint8_t         th_tfo_req_rst; /* The number of times a SYN+cookie-req has received a RST */
+       uint8_t         th_mptcp_loss; /* The number of times a SYN+MP_CAPABLE has been lost */
+       uint8_t         th_mptcp_success; /* The number of times MPTCP-negotiation has been successful */
+       uint8_t         th_ecn_loss; /* The number of times a SYN+ecn has been lost */
+       uint8_t         th_ecn_aggressive; /* The number of times we did an aggressive fallback */
+       uint8_t         th_ecn_droprst; /* The number of times ECN connections received a RST after first data pkt */
+       uint8_t         th_ecn_droprxmt; /* The number of times ECN connection is dropped after multiple retransmits */
+       uint8_t         th_ecn_synrst;  /* number of times RST was received in response to an ECN enabled SYN */
+       uint32_t        th_tfo_enabled_time; /* The moment when we reenabled TFO after backing off */
+       uint32_t        th_tfo_backoff_until; /* Time until when we should not try out TFO */
+       uint32_t        th_tfo_backoff; /* Current backoff timer */
+       uint32_t        th_mptcp_backoff; /* Time until when we should not try out MPTCP */
+       uint32_t        th_ecn_backoff; /* Time until when we should not try out ECN */
+
+       uint8_t         th_tfo_in_backoff:1, /* Are we avoiding TFO due to the backoff timer? */
+           th_mptcp_in_backoff:1,             /* Are we avoiding MPTCP due to the backoff timer? */
+           th_mptcp_heuristic_disabled:1;             /* Are heuristics disabled? */
+
+       char            th_val_end[0]; /* Marker for memsetting to 0 */
 };
 
 struct tcp_heuristics_head {
        SLIST_HEAD(tcp_heur_bucket, tcp_heuristic) tcp_heuristics;
 
        /* Per-hashbucket lock to avoid lock-contention */
-       lck_mtx_t       thh_mtx;
+       lck_mtx_t       thh_mtx;
 };
 
 struct tcp_cache_key {
-       sa_family_t     tck_family;
+       sa_family_t     tck_family;
 
        struct tcp_heuristic_key tck_src;
-       union {
-               struct in_addr addr;
-               struct in6_addr addr6;
-       } tck_dst;
+       in_4_6_addr tck_dst;
 };
 
 struct tcp_cache {
        SLIST_ENTRY(tcp_cache) list;
 
-       u_int32_t       tc_last_access;
+       uint32_t       tc_last_access;
 
        struct tcp_cache_key tc_key;
 
-       u_int8_t        tc_tfo_cookie[TFO_COOKIE_LEN_MAX];
-       u_int8_t        tc_tfo_cookie_len;
+       uint8_t        tc_tfo_cookie[TFO_COOKIE_LEN_MAX];
+       uint8_t        tc_tfo_cookie_len;
 };
 
 struct tcp_cache_head {
        SLIST_HEAD(tcp_cache_bucket, tcp_cache) tcp_caches;
 
        /* Per-hashbucket lock to avoid lock-contention */
-       lck_mtx_t       tch_mtx;
+       lck_mtx_t       tch_mtx;
+};
+
+struct tcp_cache_key_src {
+       struct ifnet *ifp;
+       in_4_6_addr laddr;
+       in_4_6_addr faddr;
+       int af;
 };
 
-static u_int32_t tcp_cache_hash_seed;
+static uint32_t tcp_cache_hash_seed;
 
 size_t tcp_cache_size;
 
@@ -116,27 +133,87 @@ size_t tcp_cache_size;
  * The maximum depth of the hash-bucket. This way we limit the tcp_cache to
  * TCP_CACHE_BUCKET_SIZE * tcp_cache_size and have "natural" garbage collection
  */
-#define        TCP_CACHE_BUCKET_SIZE 5
+#define TCP_CACHE_BUCKET_SIZE 5
 
 static struct tcp_cache_head *tcp_cache;
 
 decl_lck_mtx_data(, tcp_cache_mtx);
 
-static lck_attr_t      *tcp_cache_mtx_attr;
-static lck_grp_t       *tcp_cache_mtx_grp;
-static lck_grp_attr_t  *tcp_cache_mtx_grp_attr;
+static lck_attr_t       *tcp_cache_mtx_attr;
+static lck_grp_t        *tcp_cache_mtx_grp;
+static lck_grp_attr_t   *tcp_cache_mtx_grp_attr;
 
 static struct tcp_heuristics_head *tcp_heuristics;
 
 decl_lck_mtx_data(, tcp_heuristics_mtx);
 
-static lck_attr_t      *tcp_heuristic_mtx_attr;
-static lck_grp_t       *tcp_heuristic_mtx_grp;
-static lck_grp_attr_t  *tcp_heuristic_mtx_grp_attr;
+static lck_attr_t       *tcp_heuristic_mtx_attr;
+static lck_grp_t        *tcp_heuristic_mtx_grp;
+static lck_grp_attr_t   *tcp_heuristic_mtx_grp_attr;
+
+static uint32_t tcp_backoff_maximum = 65536;
+
+SYSCTL_UINT(_net_inet_tcp, OID_AUTO, backoff_maximum, CTLFLAG_RW | CTLFLAG_LOCKED,
+    &tcp_backoff_maximum, 0, "Maximum time for which we won't try TFO");
 
-int    tcp_ecn_timeout = 60;
-SYSCTL_INT(_net_inet_tcp, OID_AUTO, ecn_timeout, CTLFLAG_RW | CTLFLAG_LOCKED,
-    &tcp_ecn_timeout, 0, "Initial minutes to wait before re-trying ECN");
+static uint32_t tcp_ecn_timeout = 60;
+
+SYSCTL_UINT(_net_inet_tcp, OID_AUTO, ecn_timeout, CTLFLAG_RW | CTLFLAG_LOCKED,
+    &tcp_ecn_timeout, 60, "Initial minutes to wait before re-trying ECN");
+
+static int disable_tcp_heuristics = 0;
+SYSCTL_INT(_net_inet_tcp, OID_AUTO, disable_tcp_heuristics, CTLFLAG_RW | CTLFLAG_LOCKED,
+    &disable_tcp_heuristics, 0, "Set to 1, to disable all TCP heuristics (TFO, ECN, MPTCP)");
+
+static uint32_t
+tcp_min_to_hz(uint32_t minutes)
+{
+       if (minutes > 65536) {
+               return (uint32_t)65536 * 60 * TCP_RETRANSHZ;
+       }
+
+       return minutes * 60 * TCP_RETRANSHZ;
+}
+
+/*
+ * This number is coupled with tcp_ecn_timeout, because we want to prevent
+ * integer overflow. Need to find an unexpensive way to prevent integer overflow
+ * while still allowing a dynamic sysctl.
+ */
+#define TCP_CACHE_OVERFLOW_PROTECT      9
+
+/* Number of SYN-losses we accept */
+#define TFO_MAX_COOKIE_LOSS     2
+#define ECN_MAX_SYN_LOSS        2
+#define MPTCP_MAX_SYN_LOSS      2
+#define MPTCP_SUCCESS_TRIGGER   10
+#define ECN_MAX_DROPRST         1
+#define ECN_MAX_DROPRXMT        4
+#define ECN_MAX_SYNRST          4
+
+/* Flags for setting/unsetting loss-heuristics, limited to 4 bytes */
+#define TCPCACHE_F_TFO_REQ      0x01
+#define TCPCACHE_F_TFO_DATA     0x02
+#define TCPCACHE_F_ECN          0x04
+#define TCPCACHE_F_MPTCP        0x08
+#define TCPCACHE_F_ECN_DROPRST  0x10
+#define TCPCACHE_F_ECN_DROPRXMT 0x20
+#define TCPCACHE_F_TFO_REQ_RST  0x40
+#define TCPCACHE_F_TFO_DATA_RST 0x80
+#define TCPCACHE_F_ECN_SYNRST   0x100
+
+/* Always retry ECN after backing off to this level for some heuristics */
+#define ECN_RETRY_LIMIT 9
+
+#define TCP_CACHE_INC_IFNET_STAT(_ifp_, _af_, _stat_) { \
+       if ((_ifp_) != NULL) { \
+               if ((_af_) == AF_INET6) { \
+                       (_ifp_)->if_ipv6_stat->_stat_++;\
+               } else { \
+                       (_ifp_)->if_ipv4_stat->_stat_++;\
+               }\
+       }\
+}
 
 /*
  * Round up to next higher power-of 2.  See "Bit Twiddling Hacks".
@@ -144,7 +221,8 @@ SYSCTL_INT(_net_inet_tcp, OID_AUTO, ecn_timeout, CTLFLAG_RW | CTLFLAG_LOCKED,
  * Might be worth moving this to a library so that others
  * (e.g., scale_to_powerof2()) can use this as well instead of a while-loop.
  */
-static u_int32_t tcp_cache_roundup2(u_int32_t a)
+static uint32_t
+tcp_cache_roundup2(uint32_t a)
 {
        a--;
        a |= a >> 1;
@@ -157,17 +235,18 @@ static u_int32_t tcp_cache_roundup2(u_int32_t a)
        return a;
 }
 
-static void tcp_cache_hash_src(struct inpcb *inp, struct tcp_heuristic_key *key)
+static void
+tcp_cache_hash_src(struct tcp_cache_key_src *tcks, struct tcp_heuristic_key *key)
 {
-       struct ifnet *ifn = inp->inp_last_outifp;
+       struct ifnet *ifp = tcks->ifp;
        uint8_t len = sizeof(key->thk_net_signature);
        uint16_t flags;
 
-       if (inp->inp_vflag & INP_IPV6) {
+       if (tcks->af == AF_INET6) {
                int ret;
 
                key->thk_family = AF_INET6;
-               ret = ifnet_get_netsignature(ifn, AF_INET6, &len, &flags,
+               ret = ifnet_get_netsignature(ifp, AF_INET6, &len, &flags,
                    key->thk_net_signature);
 
                /*
@@ -175,13 +254,14 @@ static void tcp_cache_hash_src(struct inpcb *inp, struct tcp_heuristic_key *key)
                 * (we made sure that in the other cases it does not). So,
                 * in this case we should take the connection's address.
                 */
-               if (ret == ENOENT || ret == EINVAL)
-                       memcpy(&key->thk_ip.addr6, &inp->in6p_laddr, sizeof(struct in6_addr));
+               if (ret == ENOENT || ret == EINVAL) {
+                       memcpy(&key->thk_ip.addr6, &tcks->laddr.addr6, sizeof(struct in6_addr));
+               }
        } else {
                int ret;
 
                key->thk_family = AF_INET;
-               ret = ifnet_get_netsignature(ifn, AF_INET, &len, &flags,
+               ret = ifnet_get_netsignature(ifp, AF_INET, &len, &flags,
                    key->thk_net_signature);
 
                /*
@@ -189,36 +269,39 @@ static void tcp_cache_hash_src(struct inpcb *inp, struct tcp_heuristic_key *key)
                 * (we made sure that in the other cases it does not). So,
                 * in this case we should take the connection's address.
                 */
-               if (ret == ENOENT || ret == EINVAL)
-                       memcpy(&key->thk_ip.addr, &inp->inp_laddr, sizeof(struct in_addr));
+               if (ret == ENOENT || ret == EINVAL) {
+                       memcpy(&key->thk_ip.addr, &tcks->laddr.addr, sizeof(struct in_addr));
+               }
        }
 }
 
-static u_int16_t tcp_cache_hash(struct inpcb *inp, struct tcp_cache_key *key)
+static uint16_t
+tcp_cache_hash(struct tcp_cache_key_src *tcks, struct tcp_cache_key *key)
 {
-       u_int32_t hash;
+       uint32_t hash;
 
        bzero(key, sizeof(struct tcp_cache_key));
 
-       tcp_cache_hash_src(inp, &key->tck_src);
+       tcp_cache_hash_src(tcks, &key->tck_src);
 
-       if (inp->inp_vflag & INP_IPV6) {
+       if (tcks->af == AF_INET6) {
                key->tck_family = AF_INET6;
-               memcpy(&key->tck_dst.addr6, &inp->in6p_faddr,
+               memcpy(&key->tck_dst.addr6, &tcks->faddr.addr6,
                    sizeof(struct in6_addr));
        } else {
                key->tck_family = AF_INET;
-               memcpy(&key->tck_dst.addr, &inp->inp_faddr,
+               memcpy(&key->tck_dst.addr, &tcks->faddr.addr,
                    sizeof(struct in_addr));
        }
 
        hash = net_flowhash(key, sizeof(struct tcp_cache_key),
            tcp_cache_hash_seed);
 
-       return (hash & (tcp_cache_size - 1));
+       return (uint16_t)(hash & (tcp_cache_size - 1));
 }
 
-static void tcp_cache_unlock(struct tcp_cache_head *head)
+static void
+tcp_cache_unlock(struct tcp_cache_head *head)
 {
        lck_mtx_unlock(&head->tch_mtx);
 }
@@ -233,25 +316,26 @@ static void tcp_cache_unlock(struct tcp_cache_head *head)
  * That's why we provide the head as a "return"-pointer so that the caller
  * can give it back to use for tcp_cache_unlock().
  */
-static struct tcp_cache *tcp_getcache_with_lock(struct tcpcb *tp, int create,
-    struct tcp_cache_head **headarg)
+static struct tcp_cache *
+tcp_getcache_with_lock(struct tcp_cache_key_src *tcks,
+    int create, struct tcp_cache_head **headarg)
 {
-       struct inpcb *inp = tp->t_inpcb;
        struct tcp_cache *tpcache = NULL;
        struct tcp_cache_head *head;
        struct tcp_cache_key key;
-       u_int16_t hash;
+       uint16_t hash;
        int i = 0;
 
-       hash = tcp_cache_hash(inp, &key);
+       hash = tcp_cache_hash(tcks, &key);
        head = &tcp_cache[hash];
 
        lck_mtx_lock(&head->tch_mtx);
 
        /*** First step: Look for the tcp_cache in our bucket ***/
        SLIST_FOREACH(tpcache, &head->tcp_caches, list) {
-               if (memcmp(&tpcache->tc_key, &key, sizeof(key)) == 0)
+               if (memcmp(&tpcache->tc_key, &key, sizeof(key)) == 0) {
                        break;
+               }
 
                i++;
        }
@@ -260,11 +344,11 @@ static struct tcp_cache *tcp_getcache_with_lock(struct tcpcb *tp, int create,
        if ((tpcache == NULL) && create) {
                if (i >= TCP_CACHE_BUCKET_SIZE) {
                        struct tcp_cache *oldest_cache = NULL;
-                       u_int32_t max_age = 0;
+                       uint32_t max_age = 0;
 
                        /* Look for the oldest tcp_cache in the bucket */
                        SLIST_FOREACH(tpcache, &head->tcp_caches, list) {
-                               u_int32_t age = tcp_now - tpcache->tc_last_access;
+                               uint32_t age = tcp_now - tpcache->tc_last_access;
                                if (age > max_age) {
                                        max_age = age;
                                        oldest_cache = tpcache;
@@ -280,8 +364,10 @@ static struct tcp_cache *tcp_getcache_with_lock(struct tcpcb *tp, int create,
                        /* Create a new cache and add it to the list */
                        tpcache = _MALLOC(sizeof(struct tcp_cache), M_TEMP,
                            M_NOWAIT | M_ZERO);
-                       if (tpcache == NULL)
+                       if (tpcache == NULL) {
+                               os_log_error(OS_LOG_DEFAULT, "%s could not allocate cache", __func__);
                                goto out_null;
+                       }
 
                        SLIST_INSERT_HEAD(&head->tcp_caches, tpcache, list);
                }
@@ -289,57 +375,85 @@ static struct tcp_cache *tcp_getcache_with_lock(struct tcpcb *tp, int create,
                memcpy(&tpcache->tc_key, &key, sizeof(key));
        }
 
-       if (tpcache == NULL)
+       if (tpcache == NULL) {
                goto out_null;
+       }
 
        /* Update timestamp for garbage collection purposes */
        tpcache->tc_last_access = tcp_now;
        *headarg = head;
 
-       return (tpcache);
+       return tpcache;
 
 out_null:
        tcp_cache_unlock(head);
-       return (NULL);
+       return NULL;
 }
 
-void tcp_cache_set_cookie(struct tcpcb *tp, u_char *cookie, u_int8_t len)
+static void
+tcp_cache_key_src_create(struct tcpcb *tp, struct tcp_cache_key_src *tcks)
+{
+       struct inpcb *inp = tp->t_inpcb;
+       memset(tcks, 0, sizeof(*tcks));
+
+       tcks->ifp = inp->inp_last_outifp;
+
+       if (inp->inp_vflag & INP_IPV6) {
+               memcpy(&tcks->laddr.addr6, &inp->in6p_laddr, sizeof(struct in6_addr));
+               memcpy(&tcks->faddr.addr6, &inp->in6p_faddr, sizeof(struct in6_addr));
+               tcks->af = AF_INET6;
+       } else {
+               memcpy(&tcks->laddr.addr, &inp->inp_laddr, sizeof(struct in_addr));
+               memcpy(&tcks->faddr.addr, &inp->inp_faddr, sizeof(struct in_addr));
+               tcks->af = AF_INET;
+       }
+
+       return;
+}
+
+static void
+tcp_cache_set_cookie_common(struct tcp_cache_key_src *tcks, u_char *cookie, uint8_t len)
 {
        struct tcp_cache_head *head;
        struct tcp_cache *tpcache;
 
        /* Call lookup/create function */
-       tpcache = tcp_getcache_with_lock(tp, 1, &head);
-       if (tpcache == NULL)
+       tpcache = tcp_getcache_with_lock(tcks, 1, &head);
+       if (tpcache == NULL) {
                return;
+       }
 
-       tpcache->tc_tfo_cookie_len = len;
-       memcpy(tpcache->tc_tfo_cookie, cookie, len);
+       tpcache->tc_tfo_cookie_len = len > TFO_COOKIE_LEN_MAX ?
+           TFO_COOKIE_LEN_MAX : len;
+       memcpy(tpcache->tc_tfo_cookie, cookie, tpcache->tc_tfo_cookie_len);
 
        tcp_cache_unlock(head);
 }
 
-/*
- * Get the cookie related to 'tp', and copy it into 'cookie', provided that len
- * is big enough (len designates the available memory.
- * Upon return, 'len' is set to the cookie's length.
- *
- * Returns 0 if we should request a cookie.
- * Returns 1 if the cookie has been found and written.
- */
-int tcp_cache_get_cookie(struct tcpcb *tp, u_char *cookie, u_int8_t *len)
+void
+tcp_cache_set_cookie(struct tcpcb *tp, u_char *cookie, uint8_t len)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       tcp_cache_set_cookie_common(&tcks, cookie, len);
+}
+
+static int
+tcp_cache_get_cookie_common(struct tcp_cache_key_src *tcks, u_char *cookie, uint8_t *len)
 {
        struct tcp_cache_head *head;
        struct tcp_cache *tpcache;
 
        /* Call lookup/create function */
-       tpcache = tcp_getcache_with_lock(tp, 1, &head);
-       if (tpcache == NULL)
-               return (0);
+       tpcache = tcp_getcache_with_lock(tcks, 1, &head);
+       if (tpcache == NULL) {
+               return 0;
+       }
 
        if (tpcache->tc_tfo_cookie_len == 0) {
                tcp_cache_unlock(head);
-               return (0);
+               return 0;
        }
 
        /*
@@ -353,19 +467,38 @@ int tcp_cache_get_cookie(struct tcpcb *tp, u_char *cookie, u_int8_t *len)
 
        tcp_cache_unlock(head);
 
-       return (1);
+       return 1;
+}
+
+/*
+ * Get the cookie related to 'tp', and copy it into 'cookie', provided that len
+ * is big enough (len designates the available memory.
+ * Upon return, 'len' is set to the cookie's length.
+ *
+ * Returns 0 if we should request a cookie.
+ * Returns 1 if the cookie has been found and written.
+ */
+int
+tcp_cache_get_cookie(struct tcpcb *tp, u_char *cookie, uint8_t *len)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       return tcp_cache_get_cookie_common(&tcks, cookie, len);
 }
 
-unsigned int tcp_cache_get_cookie_len(struct tcpcb *tp)
+static unsigned int
+tcp_cache_get_cookie_len_common(struct tcp_cache_key_src *tcks)
 {
        struct tcp_cache_head *head;
        struct tcp_cache *tpcache;
        unsigned int cookie_len;
 
        /* Call lookup/create function */
-       tpcache = tcp_getcache_with_lock(tp, 1, &head);
-       if (tpcache == NULL)
-               return (0);
+       tpcache = tcp_getcache_with_lock(tcks, 1, &head);
+       if (tpcache == NULL) {
+               return 0;
+       }
 
        cookie_len = tpcache->tc_tfo_cookie_len;
 
@@ -374,22 +507,32 @@ unsigned int tcp_cache_get_cookie_len(struct tcpcb *tp)
        return cookie_len;
 }
 
-static u_int16_t tcp_heuristics_hash(struct inpcb *inp,
-                                    struct tcp_heuristic_key *key)
+unsigned int
+tcp_cache_get_cookie_len(struct tcpcb *tp)
 {
-       u_int32_t hash;
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       return tcp_cache_get_cookie_len_common(&tcks);
+}
+
+static uint16_t
+tcp_heuristics_hash(struct tcp_cache_key_src *tcks, struct tcp_heuristic_key *key)
+{
+       uint32_t hash;
 
        bzero(key, sizeof(struct tcp_heuristic_key));
 
-       tcp_cache_hash_src(inp, key);
+       tcp_cache_hash_src(tcks, key);
 
        hash = net_flowhash(key, sizeof(struct tcp_heuristic_key),
            tcp_cache_hash_seed);
 
-       return (hash & (tcp_cache_size - 1));
+       return (uint16_t)(hash & (tcp_cache_size - 1));
 }
 
-static void tcp_heuristic_unlock(struct tcp_heuristics_head *head)
+static void
+tcp_heuristic_unlock(struct tcp_heuristics_head *head)
 {
        lck_mtx_unlock(&head->thh_mtx);
 }
@@ -408,25 +551,26 @@ static void tcp_heuristic_unlock(struct tcp_heuristics_head *head)
  * ToDo - way too much code-duplication. We should create an interface to handle
  * bucketized hashtables with recycling of the oldest element.
  */
-static struct tcp_heuristic *tcp_getheuristic_with_lock(struct tcpcb *tp,
+static struct tcp_heuristic *
+tcp_getheuristic_with_lock(struct tcp_cache_key_src *tcks,
     int create, struct tcp_heuristics_head **headarg)
 {
-       struct inpcb *inp = tp->t_inpcb;
        struct tcp_heuristic *tpheur = NULL;
        struct tcp_heuristics_head *head;
        struct tcp_heuristic_key key;
-       u_int16_t hash;
+       uint16_t hash;
        int i = 0;
 
-       hash = tcp_heuristics_hash(inp, &key);
+       hash = tcp_heuristics_hash(tcks, &key);
        head = &tcp_heuristics[hash];
 
        lck_mtx_lock(&head->thh_mtx);
 
        /*** First step: Look for the tcp_heur in our bucket ***/
        SLIST_FOREACH(tpheur, &head->tcp_heuristics, list) {
-               if (memcmp(&tpheur->th_key, &key, sizeof(key)) == 0)
+               if (memcmp(&tpheur->th_key, &key, sizeof(key)) == 0) {
                        break;
+               }
 
                i++;
        }
@@ -435,11 +579,11 @@ static struct tcp_heuristic *tcp_getheuristic_with_lock(struct tcpcb *tp,
        if ((tpheur == NULL) && create) {
                if (i >= TCP_CACHE_BUCKET_SIZE) {
                        struct tcp_heuristic *oldest_heur = NULL;
-                       u_int32_t max_age = 0;
+                       uint32_t max_age = 0;
 
                        /* Look for the oldest tcp_heur in the bucket */
                        SLIST_FOREACH(tpheur, &head->tcp_heuristics, list) {
-                               u_int32_t age = tcp_now - tpheur->th_last_access;
+                               uint32_t age = tcp_now - tpheur->th_last_access;
                                if (age > max_age) {
                                        max_age = age;
                                        oldest_heur = tpheur;
@@ -451,13 +595,15 @@ static struct tcp_heuristic *tcp_getheuristic_with_lock(struct tcpcb *tp,
 
                        /* We recycle - set everything to 0 */
                        bzero(tpheur->th_val_start,
-                             tpheur->th_val_end - tpheur->th_val_start);
+                           tpheur->th_val_end - tpheur->th_val_start);
                } else {
                        /* Create a new heuristic and add it to the list */
                        tpheur = _MALLOC(sizeof(struct tcp_heuristic), M_TEMP,
                            M_NOWAIT | M_ZERO);
-                       if (tpheur == NULL)
+                       if (tpheur == NULL) {
+                               os_log_error(OS_LOG_DEFAULT, "%s could not allocate cache", __func__);
                                goto out_null;
+                       }
 
                        SLIST_INSERT_HEAD(&head->tcp_heuristics, tpheur, list);
                }
@@ -467,237 +613,789 @@ static struct tcp_heuristic *tcp_getheuristic_with_lock(struct tcpcb *tp,
                 * near future.
                 */
                tpheur->th_ecn_backoff = tcp_now;
-               tpheur->th_tfo_cookie_backoff = tcp_now;
+               tpheur->th_tfo_backoff_until = tcp_now;
+               tpheur->th_mptcp_backoff = tcp_now;
+               tpheur->th_tfo_backoff = tcp_min_to_hz(tcp_ecn_timeout);
 
                memcpy(&tpheur->th_key, &key, sizeof(key));
        }
 
-       if (tpheur == NULL)
+       if (tpheur == NULL) {
                goto out_null;
+       }
 
        /* Update timestamp for garbage collection purposes */
        tpheur->th_last_access = tcp_now;
        *headarg = head;
 
-       return (tpheur);
+       return tpheur;
 
 out_null:
        tcp_heuristic_unlock(head);
-       return (NULL);
+       return NULL;
 }
 
-void tcp_heuristic_tfo_success(struct tcpcb *tp)
+static void
+tcp_heuristic_reset_counters(struct tcp_cache_key_src *tcks, uint8_t flags)
 {
        struct tcp_heuristics_head *head;
+       struct tcp_heuristic *tpheur;
 
-       struct tcp_heuristic *tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+       /*
+        * Always create heuristics here because MPTCP needs to write success
+        * into it. Thus, we always end up creating them.
+        */
+       tpheur = tcp_getheuristic_with_lock(tcks, 1, &head);
+       if (tpheur == NULL) {
                return;
+       }
+
+       if (flags & TCPCACHE_F_TFO_DATA) {
+               if (tpheur->th_tfo_data_loss >= TFO_MAX_COOKIE_LOSS) {
+                       os_log(OS_LOG_DEFAULT, "%s: Resetting TFO-data loss to 0 from %u on heur %lx\n",
+                           __func__, tpheur->th_tfo_data_loss, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+               tpheur->th_tfo_data_loss = 0;
+       }
 
-       tpheur->th_tfo_cookie_loss = 0;
+       if (flags & TCPCACHE_F_TFO_REQ) {
+               if (tpheur->th_tfo_req_loss >= TFO_MAX_COOKIE_LOSS) {
+                       os_log(OS_LOG_DEFAULT, "%s: Resetting TFO-req loss to 0 from %u on heur %lx\n",
+                           __func__, tpheur->th_tfo_req_loss, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+               tpheur->th_tfo_req_loss = 0;
+       }
+
+       if (flags & TCPCACHE_F_TFO_DATA_RST) {
+               if (tpheur->th_tfo_data_rst >= TFO_MAX_COOKIE_LOSS) {
+                       os_log(OS_LOG_DEFAULT, "%s: Resetting TFO-data RST to 0 from %u on heur %lx\n",
+                           __func__, tpheur->th_tfo_data_rst, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+               tpheur->th_tfo_data_rst = 0;
+       }
+
+       if (flags & TCPCACHE_F_TFO_REQ_RST) {
+               if (tpheur->th_tfo_req_rst >= TFO_MAX_COOKIE_LOSS) {
+                       os_log(OS_LOG_DEFAULT, "%s: Resetting TFO-req RST to 0 from %u on heur %lx\n",
+                           __func__, tpheur->th_tfo_req_rst, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+               tpheur->th_tfo_req_rst = 0;
+       }
+
+       if (flags & TCPCACHE_F_ECN) {
+               if (tpheur->th_ecn_loss >= ECN_MAX_SYN_LOSS || tpheur->th_ecn_synrst >= ECN_MAX_SYNRST) {
+                       os_log(OS_LOG_DEFAULT, "%s: Resetting ECN-loss to 0 from %u and synrst from %u on heur %lx\n",
+                           __func__, tpheur->th_ecn_loss, tpheur->th_ecn_synrst, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+               tpheur->th_ecn_loss = 0;
+               tpheur->th_ecn_synrst = 0;
+       }
+
+       if (flags & TCPCACHE_F_MPTCP) {
+               tpheur->th_mptcp_loss = 0;
+               if (tpheur->th_mptcp_success < MPTCP_SUCCESS_TRIGGER) {
+                       tpheur->th_mptcp_success++;
+
+                       if (tpheur->th_mptcp_success == MPTCP_SUCCESS_TRIGGER) {
+                               os_log(mptcp_log_handle, "%s disabling heuristics for 12 hours", __func__);
+                               tpheur->th_mptcp_heuristic_disabled = 1;
+                               /* Disable heuristics for 12 hours */
+                               tpheur->th_mptcp_backoff = tcp_now + tcp_min_to_hz(tcp_ecn_timeout * 12);
+                       }
+               }
+       }
 
        tcp_heuristic_unlock(head);
 }
 
-void tcp_heuristic_tfo_rcv_good(struct tcpcb *tp)
+void
+tcp_heuristic_tfo_success(struct tcpcb *tp)
 {
-       struct tcp_heuristics_head *head;
+       struct tcp_cache_key_src tcks;
+       uint8_t flag = 0;
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       if (tp->t_tfo_stats & TFO_S_SYN_DATA_SENT) {
+               flag = (TCPCACHE_F_TFO_DATA | TCPCACHE_F_TFO_REQ |
+                   TCPCACHE_F_TFO_DATA_RST | TCPCACHE_F_TFO_REQ_RST);
+       }
+       if (tp->t_tfo_stats & TFO_S_COOKIE_REQ) {
+               flag = (TCPCACHE_F_TFO_REQ | TCPCACHE_F_TFO_REQ_RST);
+       }
+
+       tcp_heuristic_reset_counters(&tcks, flag);
+}
 
-       struct tcp_heuristic *tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+void
+tcp_heuristic_mptcp_success(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       tcp_heuristic_reset_counters(&tcks, TCPCACHE_F_MPTCP);
+}
+
+void
+tcp_heuristic_ecn_success(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       tcp_heuristic_reset_counters(&tcks, TCPCACHE_F_ECN);
+}
+
+static void
+__tcp_heuristic_tfo_middlebox_common(struct tcp_heuristic *tpheur)
+{
+       if (tpheur->th_tfo_in_backoff) {
                return;
+       }
 
-       tpheur->th_tfo_rcv_middlebox_supp = 1;
+       tpheur->th_tfo_in_backoff = 1;
 
-       tcp_heuristic_unlock(head);
+       if (tpheur->th_tfo_enabled_time) {
+               uint32_t old_backoff = tpheur->th_tfo_backoff;
 
-       tp->t_tfo_flags |= TFO_F_NO_RCVPROBING;
+               tpheur->th_tfo_backoff -= (tcp_now - tpheur->th_tfo_enabled_time);
+               if (tpheur->th_tfo_backoff > old_backoff) {
+                       tpheur->th_tfo_backoff = tcp_min_to_hz(tcp_ecn_timeout);
+               }
+       }
+
+       tpheur->th_tfo_backoff_until = tcp_now + tpheur->th_tfo_backoff;
+
+       /* Then, increase the backoff time */
+       tpheur->th_tfo_backoff *= 2;
+
+       if (tpheur->th_tfo_backoff > tcp_min_to_hz(tcp_backoff_maximum)) {
+               tpheur->th_tfo_backoff = tcp_min_to_hz(tcp_ecn_timeout);
+       }
+
+       os_log(OS_LOG_DEFAULT, "%s disable TFO until %u now %u on %lx\n", __func__,
+           tpheur->th_tfo_backoff_until, tcp_now, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
 }
 
-void tcp_heuristic_tfo_snd_good(struct tcpcb *tp)
+static void
+tcp_heuristic_tfo_middlebox_common(struct tcp_cache_key_src *tcks)
 {
        struct tcp_heuristics_head *head;
+       struct tcp_heuristic *tpheur;
 
-       struct tcp_heuristic *tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+       tpheur = tcp_getheuristic_with_lock(tcks, 1, &head);
+       if (tpheur == NULL) {
                return;
+       }
 
-       tpheur->th_tfo_snd_middlebox_supp = 1;
+       __tcp_heuristic_tfo_middlebox_common(tpheur);
 
        tcp_heuristic_unlock(head);
-
-       tp->t_tfo_flags |= TFO_F_NO_SNDPROBING;
 }
 
-void tcp_heuristic_inc_loss(struct tcpcb *tp, int tfo, int ecn)
+static void
+tcp_heuristic_inc_counters(struct tcp_cache_key_src *tcks,
+    uint32_t flags)
 {
        struct tcp_heuristics_head *head;
        struct tcp_heuristic *tpheur;
 
-       tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+       tpheur = tcp_getheuristic_with_lock(tcks, 1, &head);
+       if (tpheur == NULL) {
                return;
+       }
+
+       /* Limit to prevent integer-overflow during exponential backoff */
+       if ((flags & TCPCACHE_F_TFO_DATA) && tpheur->th_tfo_data_loss < TCP_CACHE_OVERFLOW_PROTECT) {
+               tpheur->th_tfo_data_loss++;
+
+               if (tpheur->th_tfo_data_loss >= TFO_MAX_COOKIE_LOSS) {
+                       __tcp_heuristic_tfo_middlebox_common(tpheur);
+               }
+       }
 
-       /* Limit to 9 to prevent integer-overflow during exponential backoff */
-       if (tfo && tpheur->th_tfo_cookie_loss < 9)
-               tpheur->th_tfo_cookie_loss++;
+       if ((flags & TCPCACHE_F_TFO_REQ) && tpheur->th_tfo_req_loss < TCP_CACHE_OVERFLOW_PROTECT) {
+               tpheur->th_tfo_req_loss++;
 
-       if (ecn && tpheur->th_ecn_loss < 9) {
+               if (tpheur->th_tfo_req_loss >= TFO_MAX_COOKIE_LOSS) {
+                       __tcp_heuristic_tfo_middlebox_common(tpheur);
+               }
+       }
+
+       if ((flags & TCPCACHE_F_TFO_DATA_RST) && tpheur->th_tfo_data_rst < TCP_CACHE_OVERFLOW_PROTECT) {
+               tpheur->th_tfo_data_rst++;
+
+               if (tpheur->th_tfo_data_rst >= TFO_MAX_COOKIE_LOSS) {
+                       __tcp_heuristic_tfo_middlebox_common(tpheur);
+               }
+       }
+
+       if ((flags & TCPCACHE_F_TFO_REQ_RST) && tpheur->th_tfo_req_rst < TCP_CACHE_OVERFLOW_PROTECT) {
+               tpheur->th_tfo_req_rst++;
+
+               if (tpheur->th_tfo_req_rst >= TFO_MAX_COOKIE_LOSS) {
+                       __tcp_heuristic_tfo_middlebox_common(tpheur);
+               }
+       }
+
+       if ((flags & TCPCACHE_F_ECN) &&
+           tpheur->th_ecn_loss < TCP_CACHE_OVERFLOW_PROTECT &&
+           TSTMP_LEQ(tpheur->th_ecn_backoff, tcp_now)) {
                tpheur->th_ecn_loss++;
                if (tpheur->th_ecn_loss >= ECN_MAX_SYN_LOSS) {
                        tcpstat.tcps_ecn_fallback_synloss++;
-                       INP_INC_IFNET_STAT(tp->t_inpcb, ecn_fallback_synloss);
+                       TCP_CACHE_INC_IFNET_STAT(tcks->ifp, tcks->af, ecn_fallback_synloss);
+                       tpheur->th_ecn_backoff = tcp_now +
+                           (tcp_min_to_hz(tcp_ecn_timeout) <<
+                           (tpheur->th_ecn_loss - ECN_MAX_SYN_LOSS));
+
+                       os_log(OS_LOG_DEFAULT, "%s disable ECN until %u now %u on %lx for SYN-loss\n",
+                           __func__, tpheur->th_ecn_backoff, tcp_now,
+                           (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+       }
+
+       if ((flags & TCPCACHE_F_MPTCP) &&
+           tpheur->th_mptcp_loss < TCP_CACHE_OVERFLOW_PROTECT &&
+           tpheur->th_mptcp_heuristic_disabled == 0) {
+               tpheur->th_mptcp_loss++;
+               if (tpheur->th_mptcp_loss >= MPTCP_MAX_SYN_LOSS) {
+                       /*
+                        * Yes, we take tcp_ecn_timeout, to avoid adding yet
+                        * another sysctl that is just used for testing.
+                        */
+                       tpheur->th_mptcp_backoff = tcp_now +
+                           (tcp_min_to_hz(tcp_ecn_timeout) <<
+                           (tpheur->th_mptcp_loss - MPTCP_MAX_SYN_LOSS));
+                       tpheur->th_mptcp_in_backoff = 1;
+
+                       os_log(OS_LOG_DEFAULT, "%s disable MPTCP until %u now %u on %lx\n",
+                           __func__, tpheur->th_mptcp_backoff, tcp_now,
+                           (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+       }
+
+       if ((flags & TCPCACHE_F_ECN_DROPRST) &&
+           tpheur->th_ecn_droprst < TCP_CACHE_OVERFLOW_PROTECT &&
+           TSTMP_LEQ(tpheur->th_ecn_backoff, tcp_now)) {
+               tpheur->th_ecn_droprst++;
+               if (tpheur->th_ecn_droprst >= ECN_MAX_DROPRST) {
+                       tcpstat.tcps_ecn_fallback_droprst++;
+                       TCP_CACHE_INC_IFNET_STAT(tcks->ifp, tcks->af,
+                           ecn_fallback_droprst);
                        tpheur->th_ecn_backoff = tcp_now +
-                           ((tcp_ecn_timeout * 60 * TCP_RETRANSHZ)
-                           << (tpheur->th_ecn_loss - ECN_MAX_SYN_LOSS));
+                           (tcp_min_to_hz(tcp_ecn_timeout) <<
+                           (tpheur->th_ecn_droprst - ECN_MAX_DROPRST));
+
+                       os_log(OS_LOG_DEFAULT, "%s disable ECN until %u now %u on %lx for drop-RST\n",
+                           __func__, tpheur->th_ecn_backoff, tcp_now,
+                           (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
                }
        }
 
+       if ((flags & TCPCACHE_F_ECN_DROPRXMT) &&
+           tpheur->th_ecn_droprxmt < TCP_CACHE_OVERFLOW_PROTECT &&
+           TSTMP_LEQ(tpheur->th_ecn_backoff, tcp_now)) {
+               tpheur->th_ecn_droprxmt++;
+               if (tpheur->th_ecn_droprxmt >= ECN_MAX_DROPRXMT) {
+                       tcpstat.tcps_ecn_fallback_droprxmt++;
+                       TCP_CACHE_INC_IFNET_STAT(tcks->ifp, tcks->af,
+                           ecn_fallback_droprxmt);
+                       tpheur->th_ecn_backoff = tcp_now +
+                           (tcp_min_to_hz(tcp_ecn_timeout) <<
+                           (tpheur->th_ecn_droprxmt - ECN_MAX_DROPRXMT));
+
+                       os_log(OS_LOG_DEFAULT, "%s disable ECN until %u now %u on %lx for drop-Rxmit\n",
+                           __func__, tpheur->th_ecn_backoff, tcp_now,
+                           (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+       }
+       if ((flags & TCPCACHE_F_ECN_SYNRST) &&
+           tpheur->th_ecn_synrst < TCP_CACHE_OVERFLOW_PROTECT) {
+               tpheur->th_ecn_synrst++;
+               if (tpheur->th_ecn_synrst >= ECN_MAX_SYNRST) {
+                       tcpstat.tcps_ecn_fallback_synrst++;
+                       TCP_CACHE_INC_IFNET_STAT(tcks->ifp, tcks->af,
+                           ecn_fallback_synrst);
+                       tpheur->th_ecn_backoff = tcp_now +
+                           (tcp_min_to_hz(tcp_ecn_timeout) <<
+                           (tpheur->th_ecn_synrst - ECN_MAX_SYNRST));
+
+                       os_log(OS_LOG_DEFAULT, "%s disable ECN until %u now %u on %lx for SYN-RST\n",
+                           __func__, tpheur->th_ecn_backoff, tcp_now,
+                           (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+               }
+       }
        tcp_heuristic_unlock(head);
 }
 
-void tcp_heuristic_tfo_middlebox(struct tcpcb *tp)
+void
+tcp_heuristic_tfo_loss(struct tcpcb *tp)
 {
-       struct tcp_heuristics_head *head;
-       struct tcp_heuristic *tpheur;
+       struct tcp_cache_key_src tcks;
+       uint32_t flag = 0;
 
-       tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+       if (symptoms_is_wifi_lossy() &&
+           IFNET_IS_WIFI(tp->t_inpcb->inp_last_outifp)) {
                return;
+       }
 
-       tpheur->th_tfo_aggressive_fallback = 1;
+       tcp_cache_key_src_create(tp, &tcks);
 
-       tcp_heuristic_unlock(head);
+       if (tp->t_tfo_stats & TFO_S_SYN_DATA_SENT) {
+               flag = (TCPCACHE_F_TFO_DATA | TCPCACHE_F_TFO_REQ);
+       }
+       if (tp->t_tfo_stats & TFO_S_COOKIE_REQ) {
+               flag = TCPCACHE_F_TFO_REQ;
+       }
+
+       tcp_heuristic_inc_counters(&tcks, flag);
 }
 
-void tcp_heuristic_ecn_aggressive(struct tcpcb *tp)
+void
+tcp_heuristic_tfo_rst(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+       uint32_t flag = 0;
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       if (tp->t_tfo_stats & TFO_S_SYN_DATA_SENT) {
+               flag = (TCPCACHE_F_TFO_DATA_RST | TCPCACHE_F_TFO_REQ_RST);
+       }
+       if (tp->t_tfo_stats & TFO_S_COOKIE_REQ) {
+               flag = TCPCACHE_F_TFO_REQ_RST;
+       }
+
+       tcp_heuristic_inc_counters(&tcks, flag);
+}
+
+void
+tcp_heuristic_mptcp_loss(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       if (symptoms_is_wifi_lossy() &&
+           IFNET_IS_WIFI(tp->t_inpcb->inp_last_outifp)) {
+               return;
+       }
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_MPTCP);
+}
+
+void
+tcp_heuristic_ecn_loss(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       if (symptoms_is_wifi_lossy() &&
+           IFNET_IS_WIFI(tp->t_inpcb->inp_last_outifp)) {
+               return;
+       }
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN);
+}
+
+void
+tcp_heuristic_ecn_droprst(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_DROPRST);
+}
+
+void
+tcp_heuristic_ecn_droprxmt(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_DROPRXMT);
+}
+
+void
+tcp_heuristic_ecn_synrst(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+
+       tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_SYNRST);
+}
+
+void
+tcp_heuristic_tfo_middlebox(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tp->t_tfo_flags |= TFO_F_HEURISTIC_DONE;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       tcp_heuristic_tfo_middlebox_common(&tcks);
+}
+
+static void
+tcp_heuristic_ecn_aggressive_common(struct tcp_cache_key_src *tcks)
 {
        struct tcp_heuristics_head *head;
        struct tcp_heuristic *tpheur;
 
-       tpheur = tcp_getheuristic_with_lock(tp, 1, &head);
-       if (tpheur == NULL)
+       tpheur = tcp_getheuristic_with_lock(tcks, 1, &head);
+       if (tpheur == NULL) {
                return;
+       }
+
+       if (TSTMP_GT(tpheur->th_ecn_backoff, tcp_now)) {
+               /* We are already in aggressive mode */
+               tcp_heuristic_unlock(head);
+               return;
+       }
 
        /* Must be done before, otherwise we will start off with expo-backoff */
        tpheur->th_ecn_backoff = tcp_now +
-           ((tcp_ecn_timeout * 60 * TCP_RETRANSHZ) << (tpheur->th_ecn_aggressive));
+           (tcp_min_to_hz(tcp_ecn_timeout) << (tpheur->th_ecn_aggressive));
 
        /*
-        * Ugly way to prevent integer overflow... limit to 9 to prevent in
+        * Ugly way to prevent integer overflow... limit to prevent in
         * overflow during exp. backoff.
         */
-       if (tpheur->th_ecn_aggressive < 9)
+       if (tpheur->th_ecn_aggressive < TCP_CACHE_OVERFLOW_PROTECT) {
                tpheur->th_ecn_aggressive++;
+       }
 
        tcp_heuristic_unlock(head);
+
+       os_log(OS_LOG_DEFAULT, "%s disable ECN until %u now %u on %lx\n", __func__,
+           tpheur->th_ecn_backoff, tcp_now, (unsigned long)VM_KERNEL_ADDRPERM(tpheur));
+}
+
+void
+tcp_heuristic_ecn_aggressive(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       tcp_heuristic_ecn_aggressive_common(&tcks);
 }
 
-void tcp_heuristic_reset_loss(struct tcpcb *tp, int tfo, int ecn)
+static boolean_t
+tcp_heuristic_do_tfo_common(struct tcp_cache_key_src *tcks)
 {
        struct tcp_heuristics_head *head;
        struct tcp_heuristic *tpheur;
 
-       /*
-        * Don't attempt to create it! Keep the heuristics clean if the
-        * server does not support TFO. This reduces the lookup-cost on
-        * our side.
-        */
-       tpheur = tcp_getheuristic_with_lock(tp, 0, &head);
-       if (tpheur == NULL)
-               return;
+       if (disable_tcp_heuristics) {
+               return TRUE;
+       }
+
+       /* Get the tcp-heuristic. */
+       tpheur = tcp_getheuristic_with_lock(tcks, 0, &head);
+       if (tpheur == NULL) {
+               return TRUE;
+       }
 
-       if (tfo)
-               tpheur->th_tfo_cookie_loss = 0;
+       if (tpheur->th_tfo_in_backoff == 0) {
+               goto tfo_ok;
+       }
 
-       if (ecn)
-               tpheur->th_ecn_loss = 0;
+       if (TSTMP_GT(tcp_now, tpheur->th_tfo_backoff_until)) {
+               tpheur->th_tfo_in_backoff = 0;
+               tpheur->th_tfo_enabled_time = tcp_now;
+
+               goto tfo_ok;
+       }
+
+       tcp_heuristic_unlock(head);
+       return FALSE;
 
+tfo_ok:
        tcp_heuristic_unlock(head);
+       return TRUE;
 }
 
-boolean_t tcp_heuristic_do_tfo(struct tcpcb *tp)
+boolean_t
+tcp_heuristic_do_tfo(struct tcpcb *tp)
 {
-       struct tcp_heuristics_head *head;
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       if (tcp_heuristic_do_tfo_common(&tcks)) {
+               return TRUE;
+       }
+
+       return FALSE;
+}
+/*
+ * @return:
+ *         0   Enable MPTCP (we are still discovering middleboxes)
+ *         -1  Enable MPTCP (heuristics have been temporarily disabled)
+ *         1   Disable MPTCP
+ */
+int
+tcp_heuristic_do_mptcp(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+       struct tcp_heuristics_head *head = NULL;
        struct tcp_heuristic *tpheur;
+       int ret = 0;
 
-       /* Get the tcp-heuristic. */
-       tpheur = tcp_getheuristic_with_lock(tp, 0, &head);
-       if (tpheur == NULL)
-               return (true);
+       if (disable_tcp_heuristics ||
+           (tptomptp(tp)->mpt_mpte->mpte_flags & MPTE_FORCE_ENABLE)) {
+               return 0;
+       }
 
-       if (tpheur->th_tfo_aggressive_fallback) {
-               /* Aggressive fallback - don't do TFO anymore... :'( */
-               tcp_heuristic_unlock(head);
-               return (false);
+       tcp_cache_key_src_create(tp, &tcks);
+
+       /* Get the tcp-heuristic. */
+       tpheur = tcp_getheuristic_with_lock(&tcks, 0, &head);
+       if (tpheur == NULL) {
+               return 0;
        }
 
-       if (tpheur->th_tfo_cookie_loss >= TFO_MAX_COOKIE_LOSS &&
-           (tpheur->th_tfo_fallback_trials < tcp_tfo_fallback_min ||
-            TSTMP_GT(tpheur->th_tfo_cookie_backoff, tcp_now))) {
-               /*
-                * So, when we are in SYN-loss mode we try to stop using TFO
-                * for the next 'tcp_tfo_fallback_min' connections. That way,
-                * we are sure that never more than 1 out of tcp_tfo_fallback_min
-                * connections will suffer from our nice little middelbox.
-                *
-                * After that we first wait for 2 minutes. If we fail again,
-                * we wait for yet another 60 minutes.
-                */
-               tpheur->th_tfo_fallback_trials++;
-               if (tpheur->th_tfo_fallback_trials >= tcp_tfo_fallback_min &&
-                   !tpheur->th_tfo_in_backoff) {
-                       if (tpheur->th_tfo_cookie_loss == TFO_MAX_COOKIE_LOSS)
-                               /* Backoff for 2 minutes */
-                               tpheur->th_tfo_cookie_backoff = tcp_now + (60 * 2 * TCP_RETRANSHZ);
-                       else
-                               /* Backoff for 60 minutes */
-                               tpheur->th_tfo_cookie_backoff = tcp_now + (60 * 60 * TCP_RETRANSHZ);
-
-                       tpheur->th_tfo_in_backoff = 1;
-               }
+       if (tpheur->th_mptcp_in_backoff == 0 ||
+           tpheur->th_mptcp_heuristic_disabled == 1) {
+               goto mptcp_ok;
+       }
 
-               tcp_heuristic_unlock(head);
-               return (false);
+       if (TSTMP_GT(tpheur->th_mptcp_backoff, tcp_now)) {
+               goto fallback;
        }
 
-       /*
-        * We give it a new shot, set trials back to 0. This allows to
-        * start counting again from zero in case we get yet another SYN-loss
-        */
-       tpheur->th_tfo_fallback_trials = 0;
-       tpheur->th_tfo_in_backoff = 0;
+       tpheur->th_mptcp_in_backoff = 0;
+
+mptcp_ok:
+       if (tpheur->th_mptcp_heuristic_disabled) {
+               ret = -1;
 
-       if (tpheur->th_tfo_rcv_middlebox_supp)
-               tp->t_tfo_flags |= TFO_F_NO_RCVPROBING;
-       if (tpheur->th_tfo_snd_middlebox_supp)
-               tp->t_tfo_flags |= TFO_F_NO_SNDPROBING;
+               if (TSTMP_GT(tcp_now, tpheur->th_mptcp_backoff)) {
+                       tpheur->th_mptcp_heuristic_disabled = 0;
+                       tpheur->th_mptcp_success = 0;
+               }
+       }
 
        tcp_heuristic_unlock(head);
+       return ret;
+
+fallback:
+       if (head) {
+               tcp_heuristic_unlock(head);
+       }
+
+       if (tptomptp(tp)->mpt_mpte->mpte_flags & MPTE_FIRSTPARTY) {
+               tcpstat.tcps_mptcp_fp_heuristic_fallback++;
+       } else {
+               tcpstat.tcps_mptcp_heuristic_fallback++;
+       }
 
-       return (true);
+       return 1;
 }
 
-boolean_t tcp_heuristic_do_ecn(struct tcpcb *tp)
+static boolean_t
+tcp_heuristic_do_ecn_common(struct tcp_cache_key_src *tcks)
 {
        struct tcp_heuristics_head *head;
        struct tcp_heuristic *tpheur;
-       boolean_t ret = true;
+       boolean_t ret = TRUE;
+
+       if (disable_tcp_heuristics) {
+               return TRUE;
+       }
 
        /* Get the tcp-heuristic. */
-       tpheur = tcp_getheuristic_with_lock(tp, 0, &head);
-       if (tpheur == NULL)
+       tpheur = tcp_getheuristic_with_lock(tcks, 0, &head);
+       if (tpheur == NULL) {
                return ret;
+       }
+
+       if (TSTMP_GT(tpheur->th_ecn_backoff, tcp_now)) {
+               ret = FALSE;
+       } else {
+               /* Reset the following counters to start re-evaluating */
+               if (tpheur->th_ecn_droprst >= ECN_RETRY_LIMIT) {
+                       tpheur->th_ecn_droprst = 0;
+               }
+               if (tpheur->th_ecn_droprxmt >= ECN_RETRY_LIMIT) {
+                       tpheur->th_ecn_droprxmt = 0;
+               }
+               if (tpheur->th_ecn_synrst >= ECN_RETRY_LIMIT) {
+                       tpheur->th_ecn_synrst = 0;
+               }
 
-       if (TSTMP_GT(tpheur->th_ecn_backoff, tcp_now))
-               ret = false;
+               /* Make sure it follows along */
+               tpheur->th_ecn_backoff = tcp_now;
+       }
 
        tcp_heuristic_unlock(head);
 
-       return (ret);
+       return ret;
+}
+
+boolean_t
+tcp_heuristic_do_ecn(struct tcpcb *tp)
+{
+       struct tcp_cache_key_src tcks;
+
+       tcp_cache_key_src_create(tp, &tcks);
+       return tcp_heuristic_do_ecn_common(&tcks);
+}
+
+boolean_t
+tcp_heuristic_do_ecn_with_address(struct ifnet *ifp,
+    union sockaddr_in_4_6 *local_address)
+{
+       struct tcp_cache_key_src tcks;
+
+       memset(&tcks, 0, sizeof(tcks));
+       tcks.ifp = ifp;
+
+       calculate_tcp_clock();
+
+       if (local_address->sa.sa_family == AF_INET6) {
+               memcpy(&tcks.laddr.addr6, &local_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               tcks.af = AF_INET6;
+       } else if (local_address->sa.sa_family == AF_INET) {
+               memcpy(&tcks.laddr.addr, &local_address->sin.sin_addr, sizeof(struct in_addr));
+               tcks.af = AF_INET;
+       }
+
+       return tcp_heuristic_do_ecn_common(&tcks);
+}
+
+void
+tcp_heuristics_ecn_update(struct necp_tcp_ecn_cache *necp_buffer,
+    struct ifnet *ifp, union sockaddr_in_4_6 *local_address)
+{
+       struct tcp_cache_key_src tcks;
+
+       memset(&tcks, 0, sizeof(tcks));
+       tcks.ifp = ifp;
+
+       calculate_tcp_clock();
+
+       if (local_address->sa.sa_family == AF_INET6) {
+               memcpy(&tcks.laddr.addr6, &local_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               tcks.af = AF_INET6;
+       } else if (local_address->sa.sa_family == AF_INET) {
+               memcpy(&tcks.laddr.addr, &local_address->sin.sin_addr, sizeof(struct in_addr));
+               tcks.af = AF_INET;
+       }
+
+       if (necp_buffer->necp_tcp_ecn_heuristics_success) {
+               tcp_heuristic_reset_counters(&tcks, TCPCACHE_F_ECN);
+       } else if (necp_buffer->necp_tcp_ecn_heuristics_loss) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN);
+       } else if (necp_buffer->necp_tcp_ecn_heuristics_drop_rst) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_DROPRST);
+       } else if (necp_buffer->necp_tcp_ecn_heuristics_drop_rxmt) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_DROPRXMT);
+       } else if (necp_buffer->necp_tcp_ecn_heuristics_syn_rst) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_ECN_SYNRST);
+       } else if (necp_buffer->necp_tcp_ecn_heuristics_aggressive) {
+               tcp_heuristic_ecn_aggressive_common(&tcks);
+       }
+
+       return;
+}
+
+boolean_t
+tcp_heuristic_do_tfo_with_address(struct ifnet *ifp,
+    union sockaddr_in_4_6 *local_address, union sockaddr_in_4_6 *remote_address,
+    uint8_t *cookie, uint8_t *cookie_len)
+{
+       struct tcp_cache_key_src tcks;
+
+       memset(&tcks, 0, sizeof(tcks));
+       tcks.ifp = ifp;
+
+       calculate_tcp_clock();
+
+       if (remote_address->sa.sa_family == AF_INET6) {
+               memcpy(&tcks.laddr.addr6, &local_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               memcpy(&tcks.faddr.addr6, &remote_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               tcks.af = AF_INET6;
+       } else if (remote_address->sa.sa_family == AF_INET) {
+               memcpy(&tcks.laddr.addr, &local_address->sin.sin_addr, sizeof(struct in_addr));
+               memcpy(&tcks.faddr.addr, &remote_address->sin.sin_addr, sizeof(struct in_addr));
+               tcks.af = AF_INET;
+       }
+
+       if (tcp_heuristic_do_tfo_common(&tcks)) {
+               if (!tcp_cache_get_cookie_common(&tcks, cookie, cookie_len)) {
+                       *cookie_len = 0;
+               }
+               return TRUE;
+       }
+
+       return FALSE;
+}
+
+void
+tcp_heuristics_tfo_update(struct necp_tcp_tfo_cache *necp_buffer,
+    struct ifnet *ifp, union sockaddr_in_4_6 *local_address,
+    union sockaddr_in_4_6 *remote_address)
+{
+       struct tcp_cache_key_src tcks;
+
+       memset(&tcks, 0, sizeof(tcks));
+       tcks.ifp = ifp;
+
+       calculate_tcp_clock();
+
+       if (remote_address->sa.sa_family == AF_INET6) {
+               memcpy(&tcks.laddr.addr6, &local_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               memcpy(&tcks.faddr.addr6, &remote_address->sin6.sin6_addr, sizeof(struct in6_addr));
+               tcks.af = AF_INET6;
+       } else if (remote_address->sa.sa_family == AF_INET) {
+               memcpy(&tcks.laddr.addr, &local_address->sin.sin_addr, sizeof(struct in_addr));
+               memcpy(&tcks.faddr.addr, &remote_address->sin.sin_addr, sizeof(struct in_addr));
+               tcks.af = AF_INET;
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_success) {
+               tcp_heuristic_reset_counters(&tcks, TCPCACHE_F_TFO_REQ | TCPCACHE_F_TFO_DATA |
+                   TCPCACHE_F_TFO_REQ_RST | TCPCACHE_F_TFO_DATA_RST);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_success_req) {
+               tcp_heuristic_reset_counters(&tcks, TCPCACHE_F_TFO_REQ | TCPCACHE_F_TFO_REQ_RST);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_loss) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_TFO_REQ | TCPCACHE_F_TFO_DATA);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_loss_req) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_TFO_REQ);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_rst_data) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_TFO_REQ_RST | TCPCACHE_F_TFO_DATA_RST);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_rst_req) {
+               tcp_heuristic_inc_counters(&tcks, TCPCACHE_F_TFO_REQ_RST);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_heuristics_middlebox) {
+               tcp_heuristic_tfo_middlebox_common(&tcks);
+       }
+
+       if (necp_buffer->necp_tcp_tfo_cookie_len != 0) {
+               tcp_cache_set_cookie_common(&tcks,
+                   necp_buffer->necp_tcp_tfo_cookie, necp_buffer->necp_tcp_tfo_cookie_len);
+       }
+
+       return;
 }
 
-static void sysctl_cleartfocache(void)
+static void
+sysctl_cleartfocache(void)
 {
        int i;
 
@@ -733,8 +1431,12 @@ static int sysctl_cleartfo SYSCTL_HANDLER_ARGS
 
        val = oldval;
        error = sysctl_handle_int(oidp, &val, 0, req);
-       if (error || !req->newptr)
-               return (error);
+       if (error || !req->newptr) {
+               if (error) {
+                       os_log_error(OS_LOG_DEFAULT, "%s could not parse int: %d", __func__, error);
+               }
+               return error;
+       }
 
        /*
         * The actual value does not matter. If the value is set, it triggers
@@ -742,19 +1444,21 @@ static int sysctl_cleartfo SYSCTL_HANDLER_ARGS
         * use the route entry to hold the TFO cache, replace the route sysctl.
         */
 
-       if (val != oldval)
+       if (val != oldval) {
                sysctl_cleartfocache();
+       }
 
        tcpcleartfo = val;
 
-       return (error);
+       return error;
 }
 
 SYSCTL_PROC(_net_inet_tcp, OID_AUTO, clear_tfocache, CTLTYPE_INT | CTLFLAG_RW |
-       CTLFLAG_LOCKED, &tcpcleartfo, 0, &sysctl_cleartfo, "I",
-       "Toggle to clear the TFO destination based heuristic cache");
+    CTLFLAG_LOCKED, &tcpcleartfo, 0, &sysctl_cleartfo, "I",
+    "Toggle to clear the TFO destination based heuristic cache");
 
-void tcp_cache_init(void)
+void
+tcp_cache_init(void)
 {
        uint64_t sane_size_meg = sane_size / 1024 / 1024;
        int i;
@@ -765,19 +1469,21 @@ void tcp_cache_init(void)
         * On machines with > 4GB of memory, we have a cache-size of 1024 entries,
         * thus about 327KB.
         *
-        * Side-note: we convert to u_int32_t. If sane_size is more than
+        * Side-note: we convert to uint32_t. If sane_size is more than
         * 16000 TB, we loose precision. But, who cares? :)
         */
-       tcp_cache_size = tcp_cache_roundup2((u_int32_t)(sane_size_meg >> 2));
-       if (tcp_cache_size < 32)
+       tcp_cache_size = tcp_cache_roundup2((uint32_t)(sane_size_meg >> 2));
+       if (tcp_cache_size < 32) {
                tcp_cache_size = 32;
-       else if (tcp_cache_size > 1024)
+       } else if (tcp_cache_size > 1024) {
                tcp_cache_size = 1024;
+       }
 
        tcp_cache = _MALLOC(sizeof(struct tcp_cache_head) * tcp_cache_size,
            M_TEMP, M_ZERO);
-       if (tcp_cache == NULL)
+       if (tcp_cache == NULL) {
                panic("Allocating tcp_cache failed at boot-time!");
+       }
 
        tcp_cache_mtx_grp_attr = lck_grp_attr_alloc_init();
        tcp_cache_mtx_grp = lck_grp_alloc_init("tcpcache", tcp_cache_mtx_grp_attr);
@@ -785,8 +1491,9 @@ void tcp_cache_init(void)
 
        tcp_heuristics = _MALLOC(sizeof(struct tcp_heuristics_head) * tcp_cache_size,
            M_TEMP, M_ZERO);
-       if (tcp_heuristics == NULL)
+       if (tcp_heuristics == NULL) {
                panic("Allocating tcp_heuristic failed at boot-time!");
+       }
 
        tcp_heuristic_mtx_grp_attr = lck_grp_attr_alloc_init();
        tcp_heuristic_mtx_grp = lck_grp_alloc_init("tcpheuristic", tcp_heuristic_mtx_grp_attr);