sys/dev/cxgbe/tom/t4_cpl_io.c

   1 /*-
   2  * Copyright (c) 2012 Chelsio Communications, Inc.
   3  * All rights reserved.
   4  * Written by: Navdeep Parhar <np@FreeBSD.org>
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25  * SUCH DAMAGE.
  26  */
  27
  28 #include <sys/cdefs.h>
  29 __FBSDID("$FreeBSD$");
  30
  31 #include "opt_inet.h"
  32
  33 #ifdef TCP_OFFLOAD
  34 #include <sys/param.h>
  35 #include <sys/types.h>
  36 #include <sys/kernel.h>
  37 #include <sys/ktr.h>
  38 #include <sys/module.h>
  39 #include <sys/protosw.h>
  40 #include <sys/domain.h>
  41 #include <sys/socket.h>
  42 #include <sys/socketvar.h>
  43 #include <sys/sglist.h>
  44 #include <netinet/in.h>
  45 #include <netinet/in_pcb.h>
  46 #include <netinet/ip.h>
  47 #include <netinet/ip6.h>
  48 #include <netinet/tcp_var.h>
  49 #define TCPSTATES
  50 #include <netinet/tcp_fsm.h>
  51 #include <netinet/tcp_seq.h>
  52 #include <netinet/toecore.h>
  53
  54 #include "common/common.h"
  55 #include "common/t4_msg.h"
  56 #include "common/t4_regs.h"
  57 #include "common/t4_tcb.h"
  58 #include "tom/t4_tom_l2t.h"
  59 #include "tom/t4_tom.h"
  60
  61 VNET_DECLARE(int, tcp_do_autosndbuf);
  62 #define V_tcp_do_autosndbuf VNET(tcp_do_autosndbuf)
  63 VNET_DECLARE(int, tcp_autosndbuf_inc);
  64 #define V_tcp_autosndbuf_inc VNET(tcp_autosndbuf_inc)
  65 VNET_DECLARE(int, tcp_autosndbuf_max);
  66 #define V_tcp_autosndbuf_max VNET(tcp_autosndbuf_max)
  67 VNET_DECLARE(int, tcp_do_autorcvbuf);
  68 #define V_tcp_do_autorcvbuf VNET(tcp_do_autorcvbuf)
  69 VNET_DECLARE(int, tcp_autorcvbuf_inc);
  70 #define V_tcp_autorcvbuf_inc VNET(tcp_autorcvbuf_inc)
  71 VNET_DECLARE(int, tcp_autorcvbuf_max);
  72 #define V_tcp_autorcvbuf_max VNET(tcp_autorcvbuf_max)
  73
  74 /*
  75  * For ULP connections HW may add headers, e.g., for digests, that aren't part
  76  * of the messages sent by the host but that are part of the TCP payload and
  77  * therefore consume TCP sequence space.  Tx connection parameters that
  78  * operate in TCP sequence space are affected by the HW additions and need to
  79  * compensate for them to accurately track TCP sequence numbers. This array
  80  * contains the compensating extra lengths for ULP packets.  It is indexed by
  81  * a packet's ULP submode.
  82  */
  83 const unsigned int t4_ulp_extra_len[] = {0, 4, 4, 8};
  84
  85 /*
  86  * Return the length of any HW additions that will be made to a Tx packet.
  87  * Such additions can happen for some types of ULP packets.
  88  */
  89 static inline unsigned int
  90 ulp_extra_len(struct mbuf *m, int *ulp_mode)
  91 {
  92         struct m_tag    *mtag;
  93
  94         if ((mtag = m_tag_find(m, CXGBE_ISCSI_MBUF_TAG, NULL)) == NULL)
  95                 return (0);
  96         *ulp_mode = *((int *)(mtag + 1));
  97
  98         return (t4_ulp_extra_len[*ulp_mode & 3]);
  99 }
 100
 101 void
 102 send_flowc_wr(struct toepcb *toep, struct flowc_tx_params *ftxp)
 103 {
 104         struct wrqe *wr;
 105         struct fw_flowc_wr *flowc;
 106         unsigned int nparams = ftxp ? 8 : 6, flowclen;
 107         struct vi_info *vi = toep->vi;
 108         struct port_info *pi = vi->pi;
 109         struct adapter *sc = pi->adapter;
 110         unsigned int pfvf = G_FW_VIID_PFN(vi->viid) << S_FW_VIID_PFN;
 111         struct ofld_tx_sdesc *txsd = &toep->txsd[toep->txsd_pidx];
 112
 113         KASSERT(!(toep->flags & TPF_FLOWC_WR_SENT),
 114             ("%s: flowc for tid %u sent already", __func__, toep->tid));
 115
 116         flowclen = sizeof(*flowc) + nparams * sizeof(struct fw_flowc_mnemval);
 117
 118         wr = alloc_wrqe(roundup2(flowclen, 16), toep->ofld_txq);
 119         if (wr == NULL) {
 120                 /* XXX */
 121                 panic("%s: allocation failure.", __func__);
 122         }
 123         flowc = wrtod(wr);
 124         memset(flowc, 0, wr->wr_len);
 125
 126         flowc->op_to_nparams = htobe32(V_FW_WR_OP(FW_FLOWC_WR) |
 127             V_FW_FLOWC_WR_NPARAMS(nparams));
 128         flowc->flowid_len16 = htonl(V_FW_WR_LEN16(howmany(flowclen, 16)) |
 129             V_FW_WR_FLOWID(toep->tid));
 130
 131         flowc->mnemval[0].mnemonic = FW_FLOWC_MNEM_PFNVFN;
 132         flowc->mnemval[0].val = htobe32(pfvf);
 133         flowc->mnemval[1].mnemonic = FW_FLOWC_MNEM_CH;
 134         flowc->mnemval[1].val = htobe32(pi->tx_chan);
 135         flowc->mnemval[2].mnemonic = FW_FLOWC_MNEM_PORT;
 136         flowc->mnemval[2].val = htobe32(pi->tx_chan);
 137         flowc->mnemval[3].mnemonic = FW_FLOWC_MNEM_IQID;
 138         flowc->mnemval[3].val = htobe32(toep->ofld_rxq->iq.abs_id);
 139         if (ftxp) {
 140                 uint32_t sndbuf = min(ftxp->snd_space, sc->tt.sndbuf);
 141
 142                 flowc->mnemval[4].mnemonic = FW_FLOWC_MNEM_SNDNXT;
 143                 flowc->mnemval[4].val = htobe32(ftxp->snd_nxt);
 144                 flowc->mnemval[5].mnemonic = FW_FLOWC_MNEM_RCVNXT;
 145                 flowc->mnemval[5].val = htobe32(ftxp->rcv_nxt);
 146                 flowc->mnemval[6].mnemonic = FW_FLOWC_MNEM_SNDBUF;
 147                 flowc->mnemval[6].val = htobe32(sndbuf);
 148                 flowc->mnemval[7].mnemonic = FW_FLOWC_MNEM_MSS;
 149                 flowc->mnemval[7].val = htobe32(ftxp->mss);
 150
 151                 CTR6(KTR_CXGBE,
 152                     "%s: tid %u, mss %u, sndbuf %u, snd_nxt 0x%x, rcv_nxt 0x%x",
 153                     __func__, toep->tid, ftxp->mss, sndbuf, ftxp->snd_nxt,
 154                     ftxp->rcv_nxt);
 155         } else {
 156                 flowc->mnemval[4].mnemonic = FW_FLOWC_MNEM_SNDBUF;
 157                 flowc->mnemval[4].val = htobe32(512);
 158                 flowc->mnemval[5].mnemonic = FW_FLOWC_MNEM_MSS;
 159                 flowc->mnemval[5].val = htobe32(512);
 160
 161                 CTR2(KTR_CXGBE, "%s: tid %u", __func__, toep->tid);
 162         }
 163
 164         txsd->tx_credits = howmany(flowclen, 16);
 165         txsd->plen = 0;
 166         KASSERT(toep->tx_credits >= txsd->tx_credits && toep->txsd_avail > 0,
 167             ("%s: not enough credits (%d)", __func__, toep->tx_credits));
 168         toep->tx_credits -= txsd->tx_credits;
 169         if (__predict_false(++toep->txsd_pidx == toep->txsd_total))
 170                 toep->txsd_pidx = 0;
 171         toep->txsd_avail--;
 172
 173         toep->flags |= TPF_FLOWC_WR_SENT;
 174         t4_wrq_tx(sc, wr);
 175 }
 176
 177 void
 178 send_reset(struct adapter *sc, struct toepcb *toep, uint32_t snd_nxt)
 179 {
 180         struct wrqe *wr;
 181         struct cpl_abort_req *req;
 182         int tid = toep->tid;
 183         struct inpcb *inp = toep->inp;
 184         struct tcpcb *tp = intotcpcb(inp);      /* don't use if INP_DROPPED */
 185
 186         INP_WLOCK_ASSERT(inp);
 187
 188         CTR6(KTR_CXGBE, "%s: tid %d (%s), toep_flags 0x%x, inp_flags 0x%x%s",
 189             __func__, toep->tid,
 190             inp->inp_flags & INP_DROPPED ? "inp dropped" :
 191             tcpstates[tp->t_state],
 192             toep->flags, inp->inp_flags,
 193             toep->flags & TPF_ABORT_SHUTDOWN ?
 194             " (abort already in progress)" : "");
 195
 196         if (toep->flags & TPF_ABORT_SHUTDOWN)
 197                 return; /* abort already in progress */
 198
 199         toep->flags |= TPF_ABORT_SHUTDOWN;
 200
 201         KASSERT(toep->flags & TPF_FLOWC_WR_SENT,
 202             ("%s: flowc_wr not sent for tid %d.", __func__, tid));
 203
 204         wr = alloc_wrqe(sizeof(*req), toep->ofld_txq);
 205         if (wr == NULL) {
 206                 /* XXX */
 207                 panic("%s: allocation failure.", __func__);
 208         }
 209         req = wrtod(wr);
 210
 211         INIT_TP_WR_MIT_CPL(req, CPL_ABORT_REQ, tid);
 212         if (inp->inp_flags & INP_DROPPED)
 213                 req->rsvd0 = htobe32(snd_nxt);
 214         else
 215                 req->rsvd0 = htobe32(tp->snd_nxt);
 216         req->rsvd1 = !(toep->flags & TPF_TX_DATA_SENT);
 217         req->cmd = CPL_ABORT_SEND_RST;
 218
 219         /*
 220          * XXX: What's the correct way to tell that the inp hasn't been detached
 221          * from its socket?  Should I even be flushing the snd buffer here?
 222          */
 223         if ((inp->inp_flags & (INP_DROPPED | INP_TIMEWAIT)) == 0) {
 224                 struct socket *so = inp->inp_socket;
 225
 226                 if (so != NULL) /* because I'm not sure.  See comment above */
 227                         sbflush(&so->so_snd);
 228         }
 229
 230         t4_l2t_send(sc, wr, toep->l2te);
 231 }
 232
 233 /*
 234  * Called when a connection is established to translate the TCP options
 235  * reported by HW to FreeBSD's native format.
 236  */
 237 static void
 238 assign_rxopt(struct tcpcb *tp, unsigned int opt)
 239 {
 240         struct toepcb *toep = tp->t_toe;
 241         struct inpcb *inp = tp->t_inpcb;
 242         struct adapter *sc = td_adapter(toep->td);
 243         int n;
 244
 245         INP_LOCK_ASSERT(inp);
 246
 247         if (inp->inp_inc.inc_flags & INC_ISIPV6)
 248                 n = sizeof(struct ip6_hdr) + sizeof(struct tcphdr);
 249         else
 250                 n = sizeof(struct ip) + sizeof(struct tcphdr);
 251         tp->t_maxseg = tp->t_maxopd = sc->params.mtus[G_TCPOPT_MSS(opt)] - n;
 252
 253         CTR4(KTR_CXGBE, "%s: tid %d, mtu_idx %u (%u)", __func__, toep->tid,
 254             G_TCPOPT_MSS(opt), sc->params.mtus[G_TCPOPT_MSS(opt)]);
 255
 256         if (G_TCPOPT_TSTAMP(opt)) {
 257                 tp->t_flags |= TF_RCVD_TSTMP;   /* timestamps ok */
 258                 tp->ts_recent = 0;              /* hmmm */
 259                 tp->ts_recent_age = tcp_ts_getticks();
 260                 tp->t_maxseg -= TCPOLEN_TSTAMP_APPA;
 261         }
 262
 263         if (G_TCPOPT_SACK(opt))
 264                 tp->t_flags |= TF_SACK_PERMIT;  /* should already be set */
 265         else
 266                 tp->t_flags &= ~TF_SACK_PERMIT; /* sack disallowed by peer */
 267
 268         if (G_TCPOPT_WSCALE_OK(opt))
 269                 tp->t_flags |= TF_RCVD_SCALE;
 270
 271         /* Doing window scaling? */
 272         if ((tp->t_flags & (TF_RCVD_SCALE | TF_REQ_SCALE)) ==
 273             (TF_RCVD_SCALE | TF_REQ_SCALE)) {
 274                 tp->rcv_scale = tp->request_r_scale;
 275                 tp->snd_scale = G_TCPOPT_SND_WSCALE(opt);
 276         }
 277 }
 278
 279 /*
 280  * Completes some final bits of initialization for just established connections
 281  * and changes their state to TCPS_ESTABLISHED.
 282  *
 283  * The ISNs are from after the exchange of SYNs.  i.e., the true ISN + 1.
 284  */
 285 void
 286 make_established(struct toepcb *toep, uint32_t snd_isn, uint32_t rcv_isn,
 287     uint16_t opt)
 288 {
 289         struct inpcb *inp = toep->inp;
 290         struct socket *so = inp->inp_socket;
 291         struct tcpcb *tp = intotcpcb(inp);
 292         long bufsize;
 293         uint32_t iss = be32toh(snd_isn) - 1;    /* true ISS */
 294         uint32_t irs = be32toh(rcv_isn) - 1;    /* true IRS */
 295         uint16_t tcpopt = be16toh(opt);
 296         struct flowc_tx_params ftxp;
 297
 298         CURVNET_SET(so->so_vnet);
 299         INP_WLOCK_ASSERT(inp);
 300         KASSERT(tp->t_state == TCPS_SYN_SENT ||
 301             tp->t_state == TCPS_SYN_RECEIVED,
 302             ("%s: TCP state %s", __func__, tcpstates[tp->t_state]));
 303
 304         CTR4(KTR_CXGBE, "%s: tid %d, toep %p, inp %p",
 305             __func__, toep->tid, toep, inp);
 306
 307         tp->t_state = TCPS_ESTABLISHED;
 308         tp->t_starttime = ticks;
 309         TCPSTAT_INC(tcps_connects);
 310
 311         tp->irs = irs;
 312         tcp_rcvseqinit(tp);
 313         tp->rcv_wnd = toep->rx_credits << 10;
 314         tp->rcv_adv += tp->rcv_wnd;
 315         tp->last_ack_sent = tp->rcv_nxt;
 316
 317         /*
 318          * If we were unable to send all rx credits via opt0, save the remainder
 319          * in rx_credits so that they can be handed over with the next credit
 320          * update.
 321          */
 322         SOCKBUF_LOCK(&so->so_rcv);
 323         bufsize = select_rcv_wnd(so);
 324         SOCKBUF_UNLOCK(&so->so_rcv);
 325         toep->rx_credits = bufsize - tp->rcv_wnd;
 326
 327         tp->iss = iss;
 328         tcp_sendseqinit(tp);
 329         tp->snd_una = iss + 1;
 330         tp->snd_nxt = iss + 1;
 331         tp->snd_max = iss + 1;
 332
 333         assign_rxopt(tp, tcpopt);
 334
 335         SOCKBUF_LOCK(&so->so_snd);
 336         if (so->so_snd.sb_flags & SB_AUTOSIZE && V_tcp_do_autosndbuf)
 337                 bufsize = V_tcp_autosndbuf_max;
 338         else
 339                 bufsize = sbspace(&so->so_snd);
 340         SOCKBUF_UNLOCK(&so->so_snd);
 341
 342         ftxp.snd_nxt = tp->snd_nxt;
 343         ftxp.rcv_nxt = tp->rcv_nxt;
 344         ftxp.snd_space = bufsize;
 345         ftxp.mss = tp->t_maxseg;
 346         send_flowc_wr(toep, &ftxp);
 347
 348         soisconnected(so);
 349         CURVNET_RESTORE();
 350 }
 351
 352 static int
 353 send_rx_credits(struct adapter *sc, struct toepcb *toep, int credits)
 354 {
 355         struct wrqe *wr;
 356         struct cpl_rx_data_ack *req;
 357         uint32_t dack = F_RX_DACK_CHANGE | V_RX_DACK_MODE(1);
 358
 359         KASSERT(credits >= 0, ("%s: %d credits", __func__, credits));
 360
 361         wr = alloc_wrqe(sizeof(*req), toep->ctrlq);
 362         if (wr == NULL)
 363                 return (0);
 364         req = wrtod(wr);
 365
 366         INIT_TP_WR_MIT_CPL(req, CPL_RX_DATA_ACK, toep->tid);
 367         req->credit_dack = htobe32(dack | V_RX_CREDITS(credits));
 368
 369         t4_wrq_tx(sc, wr);
 370         return (credits);
 371 }
 372
 373 void
 374 t4_rcvd(struct toedev *tod, struct tcpcb *tp)
 375 {
 376         struct adapter *sc = tod->tod_softc;
 377         struct inpcb *inp = tp->t_inpcb;
 378         struct socket *so = inp->inp_socket;
 379         struct sockbuf *sb = &so->so_rcv;
 380         struct toepcb *toep = tp->t_toe;
 381         int credits;
 382
 383         INP_WLOCK_ASSERT(inp);
 384
 385         SOCKBUF_LOCK(sb);
 386         KASSERT(toep->sb_cc >= sb->sb_cc,
 387             ("%s: sb %p has more data (%d) than last time (%d).",
 388             __func__, sb, sb->sb_cc, toep->sb_cc));
 389         if (toep->ulp_mode == ULP_MODE_ISCSI) {
 390                 toep->rx_credits += toep->sb_cc;
 391                 toep->sb_cc = 0;
 392         } else {
 393                 toep->rx_credits += toep->sb_cc - sb->sb_cc;
 394                 toep->sb_cc = sb->sb_cc;
 395         }
 396         if (toep->rx_credits > 0 &&
 397             (tp->rcv_wnd <= 32 * 1024 || toep->rx_credits >= 64 * 1024 ||
 398             (toep->rx_credits >= 16 * 1024 && tp->rcv_wnd <= 128 * 1024) ||
 399             toep->sb_cc + tp->rcv_wnd < sb->sb_lowat)) {
 400
 401                 credits = send_rx_credits(sc, toep, toep->rx_credits);
 402                 toep->rx_credits -= credits;
 403                 tp->rcv_wnd += credits;
 404                 tp->rcv_adv += credits;
 405         }
 406         SOCKBUF_UNLOCK(sb);
 407 }
 408
 409 /*
 410  * Close a connection by sending a CPL_CLOSE_CON_REQ message.
 411  */
 412 static int
 413 close_conn(struct adapter *sc, struct toepcb *toep)
 414 {
 415         struct wrqe *wr;
 416         struct cpl_close_con_req *req;
 417         unsigned int tid = toep->tid;
 418
 419         CTR3(KTR_CXGBE, "%s: tid %u%s", __func__, toep->tid,
 420             toep->flags & TPF_FIN_SENT ? ", IGNORED" : "");
 421
 422         if (toep->flags & TPF_FIN_SENT)
 423                 return (0);
 424
 425         KASSERT(toep->flags & TPF_FLOWC_WR_SENT,
 426             ("%s: flowc_wr not sent for tid %u.", __func__, tid));
 427
 428         wr = alloc_wrqe(sizeof(*req), toep->ofld_txq);
 429         if (wr == NULL) {
 430                 /* XXX */
 431                 panic("%s: allocation failure.", __func__);
 432         }
 433         req = wrtod(wr);
 434
 435         req->wr.wr_hi = htonl(V_FW_WR_OP(FW_TP_WR) |
 436             V_FW_WR_IMMDLEN(sizeof(*req) - sizeof(req->wr)));
 437         req->wr.wr_mid = htonl(V_FW_WR_LEN16(howmany(sizeof(*req), 16)) |
 438             V_FW_WR_FLOWID(tid));
 439         req->wr.wr_lo = cpu_to_be64(0);
 440         OPCODE_TID(req) = htonl(MK_OPCODE_TID(CPL_CLOSE_CON_REQ, tid));
 441         req->rsvd = 0;
 442
 443         toep->flags |= TPF_FIN_SENT;
 444         toep->flags &= ~TPF_SEND_FIN;
 445         t4_l2t_send(sc, wr, toep->l2te);
 446
 447         return (0);
 448 }
 449
 450 #define MAX_OFLD_TX_CREDITS (SGE_MAX_WR_LEN / 16)
 451 #define MIN_OFLD_TX_CREDITS (howmany(sizeof(struct fw_ofld_tx_data_wr) + 1, 16))
 452
 453 /* Maximum amount of immediate data we could stuff in a WR */
 454 static inline int
 455 max_imm_payload(int tx_credits)
 456 {
 457         const int n = 2;        /* Use only up to 2 desc for imm. data WR */
 458
 459         KASSERT(tx_credits >= 0 &&
 460                 tx_credits <= MAX_OFLD_TX_CREDITS,
 461                 ("%s: %d credits", __func__, tx_credits));
 462
 463         if (tx_credits < MIN_OFLD_TX_CREDITS)
 464                 return (0);
 465
 466         if (tx_credits >= (n * EQ_ESIZE) / 16)
 467                 return ((n * EQ_ESIZE) - sizeof(struct fw_ofld_tx_data_wr));
 468         else
 469                 return (tx_credits * 16 - sizeof(struct fw_ofld_tx_data_wr));
 470 }
 471
 472 /* Maximum number of SGL entries we could stuff in a WR */
 473 static inline int
 474 max_dsgl_nsegs(int tx_credits)
 475 {
 476         int nseg = 1;   /* ulptx_sgl has room for 1, rest ulp_tx_sge_pair */
 477         int sge_pair_credits = tx_credits - MIN_OFLD_TX_CREDITS;
 478
 479         KASSERT(tx_credits >= 0 &&
 480                 tx_credits <= MAX_OFLD_TX_CREDITS,
 481                 ("%s: %d credits", __func__, tx_credits));
 482
 483         if (tx_credits < MIN_OFLD_TX_CREDITS)
 484                 return (0);
 485
 486         nseg += 2 * (sge_pair_credits * 16 / 24);
 487         if ((sge_pair_credits * 16) % 24 == 16)
 488                 nseg++;
 489
 490         return (nseg);
 491 }
 492
 493 static inline void
 494 write_tx_wr(void *dst, struct toepcb *toep, unsigned int immdlen,
 495     unsigned int plen, uint8_t credits, int shove, int ulp_mode, int txalign)
 496 {
 497         struct fw_ofld_tx_data_wr *txwr = dst;
 498         unsigned int wr_ulp_mode;
 499
 500         txwr->op_to_immdlen = htobe32(V_WR_OP(FW_OFLD_TX_DATA_WR) |
 501             V_FW_WR_IMMDLEN(immdlen));
 502         txwr->flowid_len16 = htobe32(V_FW_WR_FLOWID(toep->tid) |
 503             V_FW_WR_LEN16(credits));
 504
 505         /* for iscsi, the mode & submode setting is per-packet */
 506         if (toep->ulp_mode == ULP_MODE_ISCSI)
 507                 wr_ulp_mode = V_TX_ULP_MODE(ulp_mode >> 4) |
 508                     V_TX_ULP_SUBMODE(ulp_mode & 3);
 509         else
 510                 wr_ulp_mode = V_TX_ULP_MODE(toep->ulp_mode);
 511
 512         txwr->lsodisable_to_flags = htobe32(wr_ulp_mode | V_TX_URG(0) | /*XXX*/
 513             V_TX_SHOVE(shove));
 514         txwr->plen = htobe32(plen);
 515
 516         if (txalign > 0) {
 517                 struct tcpcb *tp = intotcpcb(toep->inp);
 518
 519                 if (plen < 2 * tp->t_maxseg || is_10G_port(toep->vi->pi))
 520                         txwr->lsodisable_to_flags |=
 521                             htobe32(F_FW_OFLD_TX_DATA_WR_LSODISABLE);
 522                 else
 523                         txwr->lsodisable_to_flags |=
 524                             htobe32(F_FW_OFLD_TX_DATA_WR_ALIGNPLD |
 525                                 (tp->t_flags & TF_NODELAY ? 0 :
 526                                 F_FW_OFLD_TX_DATA_WR_ALIGNPLDSHOVE));
 527         }
 528 }
 529
 530 /*
 531  * Generate a DSGL from a starting mbuf.  The total number of segments and the
 532  * maximum segments in any one mbuf are provided.
 533  */
 534 static void
 535 write_tx_sgl(void *dst, struct mbuf *start, struct mbuf *stop, int nsegs, int n)
 536 {
 537         struct mbuf *m;
 538         struct ulptx_sgl *usgl = dst;
 539         int i, j, rc;
 540         struct sglist sg;
 541         struct sglist_seg segs[n];
 542
 543         KASSERT(nsegs > 0, ("%s: nsegs 0", __func__));
 544
 545         sglist_init(&sg, n, segs);
 546         usgl->cmd_nsge = htobe32(V_ULPTX_CMD(ULP_TX_SC_DSGL) |
 547             V_ULPTX_NSGE(nsegs));
 548
 549         i = -1;
 550         for (m = start; m != stop; m = m->m_next) {
 551                 rc = sglist_append(&sg, mtod(m, void *), m->m_len);
 552                 if (__predict_false(rc != 0))
 553                         panic("%s: sglist_append %d", __func__, rc);
 554
 555                 for (j = 0; j < sg.sg_nseg; i++, j++) {
 556                         if (i < 0) {
 557                                 usgl->len0 = htobe32(segs[j].ss_len);
 558                                 usgl->addr0 = htobe64(segs[j].ss_paddr);
 559                         } else {
 560                                 usgl->sge[i / 2].len[i & 1] =
 561                                     htobe32(segs[j].ss_len);
 562                                 usgl->sge[i / 2].addr[i & 1] =
 563                                     htobe64(segs[j].ss_paddr);
 564                         }
 565 #ifdef INVARIANTS
 566                         nsegs--;
 567 #endif
 568                 }
 569                 sglist_reset(&sg);
 570         }
 571         if (i & 1)
 572                 usgl->sge[i / 2].len[1] = htobe32(0);
 573         KASSERT(nsegs == 0, ("%s: nsegs %d, start %p, stop %p",
 574             __func__, nsegs, start, stop));
 575 }
 576
 577 /*
 578  * Max number of SGL entries an offload tx work request can have.  This is 41
 579  * (1 + 40) for a full 512B work request.
 580  * fw_ofld_tx_data_wr(16B) + ulptx_sgl(16B, 1) + ulptx_sge_pair(480B, 40)
 581  */
 582 #define OFLD_SGL_LEN (41)
 583
 584 /*
 585  * Send data and/or a FIN to the peer.
 586  *
 587  * The socket's so_snd buffer consists of a stream of data starting with sb_mb
 588  * and linked together with m_next.  sb_sndptr, if set, is the last mbuf that
 589  * was transmitted.
 590  *
 591  * drop indicates the number of bytes that should be dropped from the head of
 592  * the send buffer.  It is an optimization that lets do_fw4_ack avoid creating
 593  * contention on the send buffer lock (before this change it used to do
 594  * sowwakeup and then t4_push_frames right after that when recovering from tx
 595  * stalls).  When drop is set this function MUST drop the bytes and wake up any
 596  * writers.
 597  */
 598 void
 599 t4_push_frames(struct adapter *sc, struct toepcb *toep, int drop)
 600 {
 601         struct mbuf *sndptr, *m, *sb_sndptr;
 602         struct fw_ofld_tx_data_wr *txwr;
 603         struct wrqe *wr;
 604         u_int plen, nsegs, credits, max_imm, max_nsegs, max_nsegs_1mbuf;
 605         struct inpcb *inp = toep->inp;
 606         struct tcpcb *tp = intotcpcb(inp);
 607         struct socket *so = inp->inp_socket;
 608         struct sockbuf *sb = &so->so_snd;
 609         int tx_credits, shove, compl, space, sowwakeup;
 610         struct ofld_tx_sdesc *txsd = &toep->txsd[toep->txsd_pidx];
 611
 612         INP_WLOCK_ASSERT(inp);
 613         KASSERT(toep->flags & TPF_FLOWC_WR_SENT,
 614             ("%s: flowc_wr not sent for tid %u.", __func__, toep->tid));
 615
 616         KASSERT(toep->ulp_mode == ULP_MODE_NONE ||
 617             toep->ulp_mode == ULP_MODE_TCPDDP ||
 618             toep->ulp_mode == ULP_MODE_RDMA,
 619             ("%s: ulp_mode %u for toep %p", __func__, toep->ulp_mode, toep));
 620
 621         /*
 622          * This function doesn't resume by itself.  Someone else must clear the
 623          * flag and call this function.
 624          */
 625         if (__predict_false(toep->flags & TPF_TX_SUSPENDED)) {
 626                 KASSERT(drop == 0,
 627                     ("%s: drop (%d) != 0 but tx is suspended", __func__, drop));
 628                 return;
 629         }
 630
 631         do {
 632                 tx_credits = min(toep->tx_credits, MAX_OFLD_TX_CREDITS);
 633                 max_imm = max_imm_payload(tx_credits);
 634                 max_nsegs = max_dsgl_nsegs(tx_credits);
 635
 636                 SOCKBUF_LOCK(sb);
 637                 sowwakeup = drop;
 638                 if (drop) {
 639                         sbdrop_locked(sb, drop);
 640                         drop = 0;
 641                 }
 642                 sb_sndptr = sb->sb_sndptr;
 643                 sndptr = sb_sndptr ? sb_sndptr->m_next : sb->sb_mb;
 644                 plen = 0;
 645                 nsegs = 0;
 646                 max_nsegs_1mbuf = 0; /* max # of SGL segments in any one mbuf */
 647                 for (m = sndptr; m != NULL; m = m->m_next) {
 648                         int n = sglist_count(mtod(m, void *), m->m_len);
 649
 650                         nsegs += n;
 651                         plen += m->m_len;
 652
 653                         /* This mbuf sent us _over_ the nsegs limit, back out */
 654                         if (plen > max_imm && nsegs > max_nsegs) {
 655                                 nsegs -= n;
 656                                 plen -= m->m_len;
 657                                 if (plen == 0) {
 658                                         /* Too few credits */
 659                                         toep->flags |= TPF_TX_SUSPENDED;
 660                                         if (sowwakeup)
 661                                                 sowwakeup_locked(so);
 662                                         else
 663                                                 SOCKBUF_UNLOCK(sb);
 664                                         SOCKBUF_UNLOCK_ASSERT(sb);
 665                                         return;
 666                                 }
 667                                 break;
 668                         }
 669
 670                         if (max_nsegs_1mbuf < n)
 671                                 max_nsegs_1mbuf = n;
 672                         sb_sndptr = m;  /* new sb->sb_sndptr if all goes well */
 673
 674                         /* This mbuf put us right at the max_nsegs limit */
 675                         if (plen > max_imm && nsegs == max_nsegs) {
 676                                 m = m->m_next;
 677                                 break;
 678                         }
 679                 }
 680
 681                 space = sbspace(sb);
 682
 683                 if (space <= sb->sb_hiwat * 3 / 8 &&
 684                     toep->plen_nocompl + plen >= sb->sb_hiwat / 4)
 685                         compl = 1;
 686                 else
 687                         compl = 0;
 688
 689                 if (sb->sb_flags & SB_AUTOSIZE &&
 690                     V_tcp_do_autosndbuf &&
 691                     sb->sb_hiwat < V_tcp_autosndbuf_max &&
 692                     space < sb->sb_hiwat / 8) {
 693                         int newsize = min(sb->sb_hiwat + V_tcp_autosndbuf_inc,
 694                             V_tcp_autosndbuf_max);
 695
 696                         if (!sbreserve_locked(sb, newsize, so, NULL))
 697                                 sb->sb_flags &= ~SB_AUTOSIZE;
 698                         else
 699                                 sowwakeup = 1;  /* room available */
 700                 }
 701                 if (sowwakeup)
 702                         sowwakeup_locked(so);
 703                 else
 704                         SOCKBUF_UNLOCK(sb);
 705                 SOCKBUF_UNLOCK_ASSERT(sb);
 706
 707                 /* nothing to send */
 708                 if (plen == 0) {
 709                         KASSERT(m == NULL,
 710                             ("%s: nothing to send, but m != NULL", __func__));
 711                         break;
 712                 }
 713
 714                 if (__predict_false(toep->flags & TPF_FIN_SENT))
 715                         panic("%s: excess tx.", __func__);
 716
 717                 shove = m == NULL && !(tp->t_flags & TF_MORETOCOME);
 718                 if (plen <= max_imm) {
 719
 720                         /* Immediate data tx */
 721
 722                         wr = alloc_wrqe(roundup2(sizeof(*txwr) + plen, 16),
 723                                         toep->ofld_txq);
 724                         if (wr == NULL) {
 725                                 /* XXX: how will we recover from this? */
 726                                 toep->flags |= TPF_TX_SUSPENDED;
 727                                 return;
 728                         }
 729                         txwr = wrtod(wr);
 730                         credits = howmany(wr->wr_len, 16);
 731                         write_tx_wr(txwr, toep, plen, plen, credits, shove, 0,
 732                             sc->tt.tx_align);
 733                         m_copydata(sndptr, 0, plen, (void *)(txwr + 1));
 734                         nsegs = 0;
 735                 } else {
 736                         int wr_len;
 737
 738                         /* DSGL tx */
 739
 740                         wr_len = sizeof(*txwr) + sizeof(struct ulptx_sgl) +
 741                             ((3 * (nsegs - 1)) / 2 + ((nsegs - 1) & 1)) * 8;
 742                         wr = alloc_wrqe(roundup2(wr_len, 16), toep->ofld_txq);
 743                         if (wr == NULL) {
 744                                 /* XXX: how will we recover from this? */
 745                                 toep->flags |= TPF_TX_SUSPENDED;
 746                                 return;
 747                         }
 748                         txwr = wrtod(wr);
 749                         credits = howmany(wr_len, 16);
 750                         write_tx_wr(txwr, toep, 0, plen, credits, shove, 0,
 751                             sc->tt.tx_align);
 752                         write_tx_sgl(txwr + 1, sndptr, m, nsegs,
 753                             max_nsegs_1mbuf);
 754                         if (wr_len & 0xf) {
 755                                 uint64_t *pad = (uint64_t *)
 756                                     ((uintptr_t)txwr + wr_len);
 757                                 *pad = 0;
 758                         }
 759                 }
 760
 761                 KASSERT(toep->tx_credits >= credits,
 762                         ("%s: not enough credits", __func__));
 763
 764                 toep->tx_credits -= credits;
 765                 toep->tx_nocompl += credits;
 766                 toep->plen_nocompl += plen;
 767                 if (toep->tx_credits <= toep->tx_total * 3 / 8 &&
 768                     toep->tx_nocompl >= toep->tx_total / 4)
 769                         compl = 1;
 770
 771                 if (compl || toep->ulp_mode == ULP_MODE_RDMA) {
 772                         txwr->op_to_immdlen |= htobe32(F_FW_WR_COMPL);
 773                         toep->tx_nocompl = 0;
 774                         toep->plen_nocompl = 0;
 775                 }
 776
 777                 tp->snd_nxt += plen;
 778                 tp->snd_max += plen;
 779
 780                 SOCKBUF_LOCK(sb);
 781                 KASSERT(sb_sndptr, ("%s: sb_sndptr is NULL", __func__));
 782                 sb->sb_sndptr = sb_sndptr;
 783                 SOCKBUF_UNLOCK(sb);
 784
 785                 toep->flags |= TPF_TX_DATA_SENT;
 786                 if (toep->tx_credits < MIN_OFLD_TX_CREDITS)
 787                         toep->flags |= TPF_TX_SUSPENDED;
 788
 789                 KASSERT(toep->txsd_avail > 0, ("%s: no txsd", __func__));
 790                 txsd->plen = plen;
 791                 txsd->tx_credits = credits;
 792                 txsd++;
 793                 if (__predict_false(++toep->txsd_pidx == toep->txsd_total)) {
 794                         toep->txsd_pidx = 0;
 795                         txsd = &toep->txsd[0];
 796                 }
 797                 toep->txsd_avail--;
 798
 799                 t4_l2t_send(sc, wr, toep->l2te);
 800         } while (m != NULL);
 801
 802         /* Send a FIN if requested, but only if there's no more data to send */
 803         if (m == NULL && toep->flags & TPF_SEND_FIN)
 804                 close_conn(sc, toep);
 805 }
 806
 807 /* Send ULP data over TOE using TX_DATA_WR. We send whole mbuf at once */
 808 void
 809 t4_ulp_push_frames(struct adapter *sc, struct toepcb *toep, int drop)
 810 {
 811         struct mbuf *sndptr, *m = NULL;
 812         struct fw_ofld_tx_data_wr *txwr;
 813         struct wrqe *wr;
 814         unsigned int plen, nsegs, credits, max_imm, max_nsegs, max_nsegs_1mbuf;
 815         struct inpcb *inp = toep->inp;
 816         struct tcpcb *tp;
 817         struct socket *so;
 818         struct sockbuf *sb;
 819         int tx_credits, ulp_len = 0, ulp_mode = 0, qlen = 0;
 820         int shove, compl;
 821         struct ofld_tx_sdesc *txsd;
 822
 823         INP_WLOCK_ASSERT(inp);
 824         if (toep->flags & TPF_ABORT_SHUTDOWN)
 825                 return;
 826
 827         tp = intotcpcb(inp);
 828         so = inp->inp_socket;
 829         sb = &so->so_snd;
 830         txsd = &toep->txsd[toep->txsd_pidx];
 831
 832         KASSERT(toep->flags & TPF_FLOWC_WR_SENT,
 833             ("%s: flowc_wr not sent for tid %u.", __func__, toep->tid));
 834
 835         /*
 836          * This function doesn't resume by itself.  Someone else must clear the
 837          * flag and call this function.
 838          */
 839         if (__predict_false(toep->flags & TPF_TX_SUSPENDED))
 840                 return;
 841
 842         sndptr = t4_queue_iscsi_callback(so, toep, 1, &qlen);
 843         if (!qlen)
 844                 return;
 845
 846         do {
 847                 tx_credits = min(toep->tx_credits, MAX_OFLD_TX_CREDITS);
 848                 max_imm = max_imm_payload(tx_credits);
 849                 max_nsegs = max_dsgl_nsegs(tx_credits);
 850
 851                 if (drop) {
 852                         t4_cpl_iscsi_callback(toep->td, toep, &drop,
 853                             CPL_FW4_ACK);
 854                         drop = 0;
 855                 }
 856
 857                 plen = 0;
 858                 nsegs = 0;
 859                 max_nsegs_1mbuf = 0; /* max # of SGL segments in any one mbuf */
 860                 for (m = sndptr; m != NULL; m = m->m_next) {
 861                         int n = sglist_count(mtod(m, void *), m->m_len);
 862
 863                         nsegs += n;
 864                         plen += m->m_len;
 865
 866                         /* This mbuf sent us _over_ the nsegs limit, return */
 867                         if (plen > max_imm && nsegs > max_nsegs) {
 868                                 toep->flags |= TPF_TX_SUSPENDED;
 869                                 return;
 870                         }
 871
 872                         if (max_nsegs_1mbuf < n)
 873                                 max_nsegs_1mbuf = n;
 874
 875                         /* This mbuf put us right at the max_nsegs limit */
 876                         if (plen > max_imm && nsegs == max_nsegs) {
 877                                 toep->flags |= TPF_TX_SUSPENDED;
 878                                 return;
 879                         }
 880                 }
 881
 882                 shove = m == NULL && !(tp->t_flags & TF_MORETOCOME);
 883                 /* nothing to send */
 884                 if (plen == 0) {
 885                         KASSERT(m == NULL,
 886                             ("%s: nothing to send, but m != NULL", __func__));
 887                         break;
 888                 }
 889
 890                 if (__predict_false(toep->flags & TPF_FIN_SENT))
 891                         panic("%s: excess tx.", __func__);
 892
 893                 ulp_len = plen + ulp_extra_len(sndptr, &ulp_mode);
 894                 if (plen <= max_imm) {
 895
 896                         /* Immediate data tx */
 897                         wr = alloc_wrqe(roundup(sizeof(*txwr) + plen, 16),
 898                                         toep->ofld_txq);
 899                         if (wr == NULL) {
 900                                 /* XXX: how will we recover from this? */
 901                                 toep->flags |= TPF_TX_SUSPENDED;
 902                                 return;
 903                         }
 904                         txwr = wrtod(wr);
 905                         credits = howmany(wr->wr_len, 16);
 906                         write_tx_wr(txwr, toep, plen, ulp_len, credits, shove,
 907                                                                 ulp_mode, 0);
 908                         m_copydata(sndptr, 0, plen, (void *)(txwr + 1));
 909                 } else {
 910                         int wr_len;
 911
 912                         /* DSGL tx */
 913                         wr_len = sizeof(*txwr) + sizeof(struct ulptx_sgl) +
 914                             ((3 * (nsegs - 1)) / 2 + ((nsegs - 1) & 1)) * 8;
 915                         wr = alloc_wrqe(roundup(wr_len, 16), toep->ofld_txq);
 916                         if (wr == NULL) {
 917                                 /* XXX: how will we recover from this? */
 918                                 toep->flags |= TPF_TX_SUSPENDED;
 919                                 return;
 920                         }
 921                         txwr = wrtod(wr);
 922                         credits = howmany(wr_len, 16);
 923                         write_tx_wr(txwr, toep, 0, ulp_len, credits, shove,
 924                                                                 ulp_mode, 0);
 925                         write_tx_sgl(txwr + 1, sndptr, m, nsegs,
 926                             max_nsegs_1mbuf);
 927                         if (wr_len & 0xf) {
 928                                 uint64_t *pad = (uint64_t *)
 929                                     ((uintptr_t)txwr + wr_len);
 930                                 *pad = 0;
 931                         }
 932                 }
 933
 934                 KASSERT(toep->tx_credits >= credits,
 935                         ("%s: not enough credits", __func__));
 936
 937                 toep->tx_credits -= credits;
 938                 toep->tx_nocompl += credits;
 939                 toep->plen_nocompl += plen;
 940                 if (toep->tx_credits <= toep->tx_total * 3 / 8 &&
 941                         toep->tx_nocompl >= toep->tx_total / 4)
 942                         compl = 1;
 943
 944                 if (compl) {
 945                         txwr->op_to_immdlen |= htobe32(F_FW_WR_COMPL);
 946                         toep->tx_nocompl = 0;
 947                         toep->plen_nocompl = 0;
 948                 }
 949                 tp->snd_nxt += ulp_len;
 950                 tp->snd_max += ulp_len;
 951
 952                 /* goto next mbuf */
 953                 sndptr = m = t4_queue_iscsi_callback(so, toep, 2, &qlen);
 954
 955                 toep->flags |= TPF_TX_DATA_SENT;
 956                 if (toep->tx_credits < MIN_OFLD_TX_CREDITS) {
 957                         toep->flags |= TPF_TX_SUSPENDED;
 958                 }
 959
 960                 KASSERT(toep->txsd_avail > 0, ("%s: no txsd", __func__));
 961                 txsd->plen = plen;
 962                 txsd->tx_credits = credits;
 963                 txsd++;
 964                 if (__predict_false(++toep->txsd_pidx == toep->txsd_total)) {
 965                         toep->txsd_pidx = 0;
 966                         txsd = &toep->txsd[0];
 967                 }
 968                 toep->txsd_avail--;
 969
 970                 t4_l2t_send(sc, wr, toep->l2te);
 971         } while (m != NULL);
 972
 973         /* Send a FIN if requested, but only if there's no more data to send */
 974         if (m == NULL && toep->flags & TPF_SEND_FIN)
 975                 close_conn(sc, toep);
 976 }
 977
 978 int
 979 t4_tod_output(struct toedev *tod, struct tcpcb *tp)
 980 {
 981         struct adapter *sc = tod->tod_softc;
 982 #ifdef INVARIANTS
 983         struct inpcb *inp = tp->t_inpcb;
 984 #endif
 985         struct toepcb *toep = tp->t_toe;
 986
 987         INP_WLOCK_ASSERT(inp);
 988         KASSERT((inp->inp_flags & INP_DROPPED) == 0,
 989             ("%s: inp %p dropped.", __func__, inp));
 990         KASSERT(toep != NULL, ("%s: toep is NULL", __func__));
 991
 992         t4_push_frames(sc, toep, 0);
 993
 994         return (0);
 995 }
 996
 997 int
 998 t4_send_fin(struct toedev *tod, struct tcpcb *tp)
 999 {
1000         struct adapter *sc = tod->tod_softc;
1001 #ifdef INVARIANTS
1002         struct inpcb *inp = tp->t_inpcb;
1003 #endif
1004         struct toepcb *toep = tp->t_toe;
1005
1006         INP_WLOCK_ASSERT(inp);
1007         KASSERT((inp->inp_flags & INP_DROPPED) == 0,
1008             ("%s: inp %p dropped.", __func__, inp));
1009         KASSERT(toep != NULL, ("%s: toep is NULL", __func__));
1010
1011         toep->flags |= TPF_SEND_FIN;
1012         if (tp->t_state >= TCPS_ESTABLISHED) {
1013                 if (toep->ulp_mode == ULP_MODE_ISCSI)
1014                         t4_ulp_push_frames(sc, toep, 0);
1015                 else
1016                         t4_push_frames(sc, toep, 0);
1017         }
1018
1019         return (0);
1020 }
1021
1022 int
1023 t4_send_rst(struct toedev *tod, struct tcpcb *tp)
1024 {
1025         struct adapter *sc = tod->tod_softc;
1026 #if defined(INVARIANTS)
1027         struct inpcb *inp = tp->t_inpcb;
1028 #endif
1029         struct toepcb *toep = tp->t_toe;
1030
1031         INP_WLOCK_ASSERT(inp);
1032         KASSERT((inp->inp_flags & INP_DROPPED) == 0,
1033             ("%s: inp %p dropped.", __func__, inp));
1034         KASSERT(toep != NULL, ("%s: toep is NULL", __func__));
1035
1036         /* hmmmm */
1037         KASSERT(toep->flags & TPF_FLOWC_WR_SENT,
1038             ("%s: flowc for tid %u [%s] not sent already",
1039             __func__, toep->tid, tcpstates[tp->t_state]));
1040
1041         send_reset(sc, toep, 0);
1042         return (0);
1043 }
1044
1045 /*
1046  * Peer has sent us a FIN.
1047  */
1048 static int
1049 do_peer_close(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1050 {
1051         struct adapter *sc = iq->adapter;
1052         const struct cpl_peer_close *cpl = (const void *)(rss + 1);
1053         unsigned int tid = GET_TID(cpl);
1054         struct toepcb *toep = lookup_tid(sc, tid);
1055         struct inpcb *inp = toep->inp;
1056         struct tcpcb *tp = NULL;
1057         struct socket *so;
1058         struct sockbuf *sb;
1059 #ifdef INVARIANTS
1060         unsigned int opcode = G_CPL_OPCODE(be32toh(OPCODE_TID(cpl)));
1061 #endif
1062
1063         KASSERT(opcode == CPL_PEER_CLOSE,
1064             ("%s: unexpected opcode 0x%x", __func__, opcode));
1065         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1066
1067         if (__predict_false(toep->flags & TPF_SYNQE)) {
1068 #ifdef INVARIANTS
1069                 struct synq_entry *synqe = (void *)toep;
1070
1071                 INP_WLOCK(synqe->lctx->inp);
1072                 if (synqe->flags & TPF_SYNQE_HAS_L2TE) {
1073                         KASSERT(synqe->flags & TPF_ABORT_SHUTDOWN,
1074                             ("%s: listen socket closed but tid %u not aborted.",
1075                             __func__, tid));
1076                 } else {
1077                         /*
1078                          * do_pass_accept_req is still running and will
1079                          * eventually take care of this tid.
1080                          */
1081                 }
1082                 INP_WUNLOCK(synqe->lctx->inp);
1083 #endif
1084                 CTR4(KTR_CXGBE, "%s: tid %u, synqe %p (0x%x)", __func__, tid,
1085                     toep, toep->flags);
1086                 return (0);
1087         }
1088
1089         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1090
1091         INP_INFO_WLOCK(&V_tcbinfo);
1092         INP_WLOCK(inp);
1093         tp = intotcpcb(inp);
1094
1095         CTR5(KTR_CXGBE, "%s: tid %u (%s), toep_flags 0x%x, inp %p", __func__,
1096             tid, tp ? tcpstates[tp->t_state] : "no tp", toep->flags, inp);
1097
1098         if (toep->flags & TPF_ABORT_SHUTDOWN)
1099                 goto done;
1100
1101         tp->rcv_nxt++;  /* FIN */
1102
1103         so = inp->inp_socket;
1104         sb = &so->so_rcv;
1105         SOCKBUF_LOCK(sb);
1106         if (__predict_false(toep->ddp_flags & (DDP_BUF0_ACTIVE | DDP_BUF1_ACTIVE))) {
1107                 handle_ddp_close(toep, tp, sb, cpl->rcv_nxt);
1108         }
1109         socantrcvmore_locked(so);       /* unlocks the sockbuf */
1110
1111         if (toep->ulp_mode != ULP_MODE_RDMA) {
1112                 KASSERT(tp->rcv_nxt == be32toh(cpl->rcv_nxt),
1113                         ("%s: rcv_nxt mismatch: %u %u", __func__, tp->rcv_nxt,
1114                         be32toh(cpl->rcv_nxt)));
1115         }
1116
1117         switch (tp->t_state) {
1118         case TCPS_SYN_RECEIVED:
1119                 tp->t_starttime = ticks;
1120                 /* FALLTHROUGH */
1121
1122         case TCPS_ESTABLISHED:
1123                 tp->t_state = TCPS_CLOSE_WAIT;
1124                 break;
1125
1126         case TCPS_FIN_WAIT_1:
1127                 tp->t_state = TCPS_CLOSING;
1128                 break;
1129
1130         case TCPS_FIN_WAIT_2:
1131                 tcp_twstart(tp);
1132                 INP_UNLOCK_ASSERT(inp);  /* safe, we have a ref on the inp */
1133                 INP_INFO_WUNLOCK(&V_tcbinfo);
1134
1135                 INP_WLOCK(inp);
1136                 final_cpl_received(toep);
1137                 return (0);
1138
1139         default:
1140                 log(LOG_ERR, "%s: TID %u received CPL_PEER_CLOSE in state %d\n",
1141                     __func__, tid, tp->t_state);
1142         }
1143 done:
1144         INP_WUNLOCK(inp);
1145         INP_INFO_WUNLOCK(&V_tcbinfo);
1146         return (0);
1147 }
1148
1149 /*
1150  * Peer has ACK'd our FIN.
1151  */
1152 static int
1153 do_close_con_rpl(struct sge_iq *iq, const struct rss_header *rss,
1154     struct mbuf *m)
1155 {
1156         struct adapter *sc = iq->adapter;
1157         const struct cpl_close_con_rpl *cpl = (const void *)(rss + 1);
1158         unsigned int tid = GET_TID(cpl);
1159         struct toepcb *toep = lookup_tid(sc, tid);
1160         struct inpcb *inp = toep->inp;
1161         struct tcpcb *tp = NULL;
1162         struct socket *so = NULL;
1163 #ifdef INVARIANTS
1164         unsigned int opcode = G_CPL_OPCODE(be32toh(OPCODE_TID(cpl)));
1165 #endif
1166
1167         KASSERT(opcode == CPL_CLOSE_CON_RPL,
1168             ("%s: unexpected opcode 0x%x", __func__, opcode));
1169         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1170         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1171
1172         INP_INFO_WLOCK(&V_tcbinfo);
1173         INP_WLOCK(inp);
1174         tp = intotcpcb(inp);
1175
1176         CTR4(KTR_CXGBE, "%s: tid %u (%s), toep_flags 0x%x",
1177             __func__, tid, tp ? tcpstates[tp->t_state] : "no tp", toep->flags);
1178
1179         if (toep->flags & TPF_ABORT_SHUTDOWN)
1180                 goto done;
1181
1182         so = inp->inp_socket;
1183         tp->snd_una = be32toh(cpl->snd_nxt) - 1;        /* exclude FIN */
1184
1185         switch (tp->t_state) {
1186         case TCPS_CLOSING:      /* see TCPS_FIN_WAIT_2 in do_peer_close too */
1187                 tcp_twstart(tp);
1188 release:
1189                 INP_UNLOCK_ASSERT(inp); /* safe, we have a ref on the  inp */
1190                 INP_INFO_WUNLOCK(&V_tcbinfo);
1191
1192                 INP_WLOCK(inp);
1193                 final_cpl_received(toep);       /* no more CPLs expected */
1194
1195                 return (0);
1196         case TCPS_LAST_ACK:
1197                 if (tcp_close(tp))
1198                         INP_WUNLOCK(inp);
1199                 goto release;
1200
1201         case TCPS_FIN_WAIT_1:
1202                 if (so->so_rcv.sb_state & SBS_CANTRCVMORE)
1203                         soisdisconnected(so);
1204                 tp->t_state = TCPS_FIN_WAIT_2;
1205                 break;
1206
1207         default:
1208                 log(LOG_ERR,
1209                     "%s: TID %u received CPL_CLOSE_CON_RPL in state %s\n",
1210                     __func__, tid, tcpstates[tp->t_state]);
1211         }
1212 done:
1213         INP_WUNLOCK(inp);
1214         INP_INFO_WUNLOCK(&V_tcbinfo);
1215         return (0);
1216 }
1217
1218 void
1219 send_abort_rpl(struct adapter *sc, struct sge_wrq *ofld_txq, int tid,
1220     int rst_status)
1221 {
1222         struct wrqe *wr;
1223         struct cpl_abort_rpl *cpl;
1224
1225         wr = alloc_wrqe(sizeof(*cpl), ofld_txq);
1226         if (wr == NULL) {
1227                 /* XXX */
1228                 panic("%s: allocation failure.", __func__);
1229         }
1230         cpl = wrtod(wr);
1231
1232         INIT_TP_WR_MIT_CPL(cpl, CPL_ABORT_RPL, tid);
1233         cpl->cmd = rst_status;
1234
1235         t4_wrq_tx(sc, wr);
1236 }
1237
1238 static int
1239 abort_status_to_errno(struct tcpcb *tp, unsigned int abort_reason)
1240 {
1241         switch (abort_reason) {
1242         case CPL_ERR_BAD_SYN:
1243         case CPL_ERR_CONN_RESET:
1244                 return (tp->t_state == TCPS_CLOSE_WAIT ? EPIPE : ECONNRESET);
1245         case CPL_ERR_XMIT_TIMEDOUT:
1246         case CPL_ERR_PERSIST_TIMEDOUT:
1247         case CPL_ERR_FINWAIT2_TIMEDOUT:
1248         case CPL_ERR_KEEPALIVE_TIMEDOUT:
1249                 return (ETIMEDOUT);
1250         default:
1251                 return (EIO);
1252         }
1253 }
1254
1255 int
1256 cpl_not_handled(struct sge_iq *, const struct rss_header *, struct mbuf *);
1257 /*
1258  * tom_cpl_iscsi_callback -
1259  * iscsi and tom would share the following cpl messages, so when any of these
1260  * message is received, after tom is done with processing it, the messages
1261  * needs to be forwarded to iscsi for further processing:
1262  * - CPL_SET_TCB_RPL
1263  * - CPL_RX_DATA_DDP
1264  */
1265 void (*tom_cpl_iscsi_callback)(struct tom_data *, struct socket *, void *,
1266     unsigned int);
1267
1268 struct mbuf *(*tom_queue_iscsi_callback)(struct socket *, unsigned int, int *);
1269 /*
1270  * Check if the handler function is set for a given CPL
1271  * return 0 if the function is NULL or cpl_not_handled, 1 otherwise.
1272  */
1273 int
1274 t4tom_cpl_handler_registered(struct adapter *sc, unsigned int opcode)
1275 {
1276
1277         MPASS(opcode < nitems(sc->cpl_handler));
1278
1279         return (sc->cpl_handler[opcode] &&
1280             sc->cpl_handler[opcode] != cpl_not_handled);
1281 }
1282
1283 /*
1284  * set the tom_cpl_iscsi_callback function, this function should be used
1285  * whenever both toe and iscsi need to process the same cpl msg.
1286  */
1287 void
1288 t4tom_register_cpl_iscsi_callback(void (*fp)(struct tom_data *, struct socket *,
1289     void *, unsigned int))
1290 {
1291
1292         tom_cpl_iscsi_callback = fp;
1293 }
1294
1295 void
1296 t4tom_register_queue_iscsi_callback(struct mbuf *(*fp)(struct socket *,
1297     unsigned int, int *qlen))
1298 {
1299
1300         tom_queue_iscsi_callback = fp;
1301 }
1302
1303 int
1304 t4_cpl_iscsi_callback(struct tom_data *td, struct toepcb *toep, void *m,
1305     unsigned int opcode)
1306 {
1307         struct socket *so;
1308
1309         if (opcode == CPL_FW4_ACK)
1310                 so = toep->inp->inp_socket;
1311         else {
1312                 INP_WLOCK(toep->inp);
1313                 so = toep->inp->inp_socket;
1314                 INP_WUNLOCK(toep->inp);
1315         }
1316
1317         if (tom_cpl_iscsi_callback && so) {
1318                 if (toep->ulp_mode == ULP_MODE_ISCSI) {
1319                         tom_cpl_iscsi_callback(td, so, m, opcode);
1320                         return (0);
1321                 }
1322         }
1323
1324         return (1);
1325 }
1326
1327 struct mbuf *
1328 t4_queue_iscsi_callback(struct socket *so, struct toepcb *toep,
1329     unsigned int cmd, int *qlen)
1330 {
1331
1332         if (tom_queue_iscsi_callback && so) {
1333                 if (toep->ulp_mode == ULP_MODE_ISCSI)
1334                         return (tom_queue_iscsi_callback(so, cmd, qlen));
1335         }
1336
1337         return (NULL);
1338 }
1339
1340 /*
1341  * TCP RST from the peer, timeout, or some other such critical error.
1342  */
1343 static int
1344 do_abort_req(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1345 {
1346         struct adapter *sc = iq->adapter;
1347         const struct cpl_abort_req_rss *cpl = (const void *)(rss + 1);
1348         unsigned int tid = GET_TID(cpl);
1349         struct toepcb *toep = lookup_tid(sc, tid);
1350         struct sge_wrq *ofld_txq = toep->ofld_txq;
1351         struct inpcb *inp;
1352         struct tcpcb *tp;
1353 #ifdef INVARIANTS
1354         unsigned int opcode = G_CPL_OPCODE(be32toh(OPCODE_TID(cpl)));
1355 #endif
1356
1357         KASSERT(opcode == CPL_ABORT_REQ_RSS,
1358             ("%s: unexpected opcode 0x%x", __func__, opcode));
1359         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1360
1361         if (toep->flags & TPF_SYNQE)
1362                 return (do_abort_req_synqe(iq, rss, m));
1363
1364         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1365
1366         if (negative_advice(cpl->status)) {
1367                 CTR4(KTR_CXGBE, "%s: negative advice %d for tid %d (0x%x)",
1368                     __func__, cpl->status, tid, toep->flags);
1369                 return (0);     /* Ignore negative advice */
1370         }
1371
1372         inp = toep->inp;
1373         INP_INFO_WLOCK(&V_tcbinfo);     /* for tcp_close */
1374         INP_WLOCK(inp);
1375
1376         tp = intotcpcb(inp);
1377
1378         CTR6(KTR_CXGBE,
1379             "%s: tid %d (%s), toep_flags 0x%x, inp_flags 0x%x, status %d",
1380             __func__, tid, tp ? tcpstates[tp->t_state] : "no tp", toep->flags,
1381             inp->inp_flags, cpl->status);
1382
1383         /*
1384          * If we'd initiated an abort earlier the reply to it is responsible for
1385          * cleaning up resources.  Otherwise we tear everything down right here
1386          * right now.  We owe the T4 a CPL_ABORT_RPL no matter what.
1387          */
1388         if (toep->flags & TPF_ABORT_SHUTDOWN) {
1389                 INP_WUNLOCK(inp);
1390                 goto done;
1391         }
1392         toep->flags |= TPF_ABORT_SHUTDOWN;
1393
1394         if ((inp->inp_flags & (INP_DROPPED | INP_TIMEWAIT)) == 0) {
1395                 struct socket *so = inp->inp_socket;
1396
1397                 if (so != NULL)
1398                         so_error_set(so, abort_status_to_errno(tp,
1399                             cpl->status));
1400                 tp = tcp_close(tp);
1401                 if (tp == NULL)
1402                         INP_WLOCK(inp); /* re-acquire */
1403         }
1404
1405         final_cpl_received(toep);
1406 done:
1407         INP_INFO_WUNLOCK(&V_tcbinfo);
1408         send_abort_rpl(sc, ofld_txq, tid, CPL_ABORT_NO_RST);
1409         return (0);
1410 }
1411
1412 /*
1413  * Reply to the CPL_ABORT_REQ (send_reset)
1414  */
1415 static int
1416 do_abort_rpl(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1417 {
1418         struct adapter *sc = iq->adapter;
1419         const struct cpl_abort_rpl_rss *cpl = (const void *)(rss + 1);
1420         unsigned int tid = GET_TID(cpl);
1421         struct toepcb *toep = lookup_tid(sc, tid);
1422         struct inpcb *inp = toep->inp;
1423 #ifdef INVARIANTS
1424         unsigned int opcode = G_CPL_OPCODE(be32toh(OPCODE_TID(cpl)));
1425 #endif
1426
1427         KASSERT(opcode == CPL_ABORT_RPL_RSS,
1428             ("%s: unexpected opcode 0x%x", __func__, opcode));
1429         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1430
1431         if (toep->flags & TPF_SYNQE)
1432                 return (do_abort_rpl_synqe(iq, rss, m));
1433
1434         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1435
1436         CTR5(KTR_CXGBE, "%s: tid %u, toep %p, inp %p, status %d",
1437             __func__, tid, toep, inp, cpl->status);
1438
1439         KASSERT(toep->flags & TPF_ABORT_SHUTDOWN,
1440             ("%s: wasn't expecting abort reply", __func__));
1441
1442         INP_WLOCK(inp);
1443         final_cpl_received(toep);
1444
1445         return (0);
1446 }
1447
1448 static int
1449 do_rx_data(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1450 {
1451         struct adapter *sc = iq->adapter;
1452         const struct cpl_rx_data *cpl = mtod(m, const void *);
1453         unsigned int tid = GET_TID(cpl);
1454         struct toepcb *toep = lookup_tid(sc, tid);
1455         struct inpcb *inp = toep->inp;
1456         struct tcpcb *tp;
1457         struct socket *so;
1458         struct sockbuf *sb;
1459         int len;
1460         uint32_t ddp_placed = 0;
1461
1462         if (__predict_false(toep->flags & TPF_SYNQE)) {
1463 #ifdef INVARIANTS
1464                 struct synq_entry *synqe = (void *)toep;
1465
1466                 INP_WLOCK(synqe->lctx->inp);
1467                 if (synqe->flags & TPF_SYNQE_HAS_L2TE) {
1468                         KASSERT(synqe->flags & TPF_ABORT_SHUTDOWN,
1469                             ("%s: listen socket closed but tid %u not aborted.",
1470                             __func__, tid));
1471                 } else {
1472                         /*
1473                          * do_pass_accept_req is still running and will
1474                          * eventually take care of this tid.
1475                          */
1476                 }
1477                 INP_WUNLOCK(synqe->lctx->inp);
1478 #endif
1479                 CTR4(KTR_CXGBE, "%s: tid %u, synqe %p (0x%x)", __func__, tid,
1480                     toep, toep->flags);
1481                 m_freem(m);
1482                 return (0);
1483         }
1484
1485         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1486
1487         /* strip off CPL header */
1488         m_adj(m, sizeof(*cpl));
1489         len = m->m_pkthdr.len;
1490
1491         INP_WLOCK(inp);
1492         if (inp->inp_flags & (INP_DROPPED | INP_TIMEWAIT)) {
1493                 CTR4(KTR_CXGBE, "%s: tid %u, rx (%d bytes), inp_flags 0x%x",
1494                     __func__, tid, len, inp->inp_flags);
1495                 INP_WUNLOCK(inp);
1496                 m_freem(m);
1497                 return (0);
1498         }
1499
1500         tp = intotcpcb(inp);
1501
1502         if (__predict_false(tp->rcv_nxt != be32toh(cpl->seq)))
1503                 ddp_placed = be32toh(cpl->seq) - tp->rcv_nxt;
1504
1505         tp->rcv_nxt += len;
1506         if (tp->rcv_wnd < len) {
1507                 KASSERT(toep->ulp_mode == ULP_MODE_RDMA,
1508                                 ("%s: negative window size", __func__));
1509         }
1510
1511         tp->rcv_wnd -= len;
1512         tp->t_rcvtime = ticks;
1513
1514         so = inp_inpcbtosocket(inp);
1515         sb = &so->so_rcv;
1516         SOCKBUF_LOCK(sb);
1517
1518         if (__predict_false(sb->sb_state & SBS_CANTRCVMORE)) {
1519                 CTR3(KTR_CXGBE, "%s: tid %u, excess rx (%d bytes)",
1520                     __func__, tid, len);
1521                 m_freem(m);
1522                 SOCKBUF_UNLOCK(sb);
1523                 INP_WUNLOCK(inp);
1524
1525                 INP_INFO_WLOCK(&V_tcbinfo);
1526                 INP_WLOCK(inp);
1527                 tp = tcp_drop(tp, ECONNRESET);
1528                 if (tp)
1529                         INP_WUNLOCK(inp);
1530                 INP_INFO_WUNLOCK(&V_tcbinfo);
1531
1532                 return (0);
1533         }
1534
1535         /* receive buffer autosize */
1536         CURVNET_SET(so->so_vnet);
1537         if (sb->sb_flags & SB_AUTOSIZE &&
1538             V_tcp_do_autorcvbuf &&
1539             sb->sb_hiwat < V_tcp_autorcvbuf_max &&
1540             len > (sbspace(sb) / 8 * 7)) {
1541                 unsigned int hiwat = sb->sb_hiwat;
1542                 unsigned int newsize = min(hiwat + V_tcp_autorcvbuf_inc,
1543                     V_tcp_autorcvbuf_max);
1544
1545                 if (!sbreserve_locked(sb, newsize, so, NULL))
1546                         sb->sb_flags &= ~SB_AUTOSIZE;
1547                 else
1548                         toep->rx_credits += newsize - hiwat;
1549         }
1550
1551         if (toep->ulp_mode == ULP_MODE_TCPDDP) {
1552                 int changed = !(toep->ddp_flags & DDP_ON) ^ cpl->ddp_off;
1553
1554                 if (changed) {
1555                         if (toep->ddp_flags & DDP_SC_REQ)
1556                                 toep->ddp_flags ^= DDP_ON | DDP_SC_REQ;
1557                         else {
1558                                 KASSERT(cpl->ddp_off == 1,
1559                                     ("%s: DDP switched on by itself.",
1560                                     __func__));
1561
1562                                 /* Fell out of DDP mode */
1563                                 toep->ddp_flags &= ~(DDP_ON | DDP_BUF0_ACTIVE |
1564                                     DDP_BUF1_ACTIVE);
1565
1566                                 if (ddp_placed)
1567                                         insert_ddp_data(toep, ddp_placed);
1568                         }
1569                 }
1570
1571                 if ((toep->ddp_flags & DDP_OK) == 0 &&
1572                     time_uptime >= toep->ddp_disabled + DDP_RETRY_WAIT) {
1573                         toep->ddp_score = DDP_LOW_SCORE;
1574                         toep->ddp_flags |= DDP_OK;
1575                         CTR3(KTR_CXGBE, "%s: tid %u DDP_OK @ %u",
1576                             __func__, tid, time_uptime);
1577                 }
1578
1579                 if (toep->ddp_flags & DDP_ON) {
1580
1581                         /*
1582                          * CPL_RX_DATA with DDP on can only be an indicate.  Ask
1583                          * soreceive to post a buffer or disable DDP.  The
1584                          * payload that arrived in this indicate is appended to
1585                          * the socket buffer as usual.
1586                          */
1587
1588 #if 0
1589                         CTR5(KTR_CXGBE,
1590                             "%s: tid %u (0x%x) DDP indicate (seq 0x%x, len %d)",
1591                             __func__, tid, toep->flags, be32toh(cpl->seq), len);
1592 #endif
1593                         sb->sb_flags |= SB_DDP_INDICATE;
1594                 } else if ((toep->ddp_flags & (DDP_OK|DDP_SC_REQ)) == DDP_OK &&
1595                     tp->rcv_wnd > DDP_RSVD_WIN && len >= sc->tt.ddp_thres) {
1596
1597                         /*
1598                          * DDP allowed but isn't on (and a request to switch it
1599                          * on isn't pending either), and conditions are ripe for
1600                          * it to work.  Switch it on.
1601                          */
1602
1603                         enable_ddp(sc, toep);
1604                 }
1605         }
1606
1607         KASSERT(toep->sb_cc >= sb->sb_cc,
1608             ("%s: sb %p has more data (%d) than last time (%d).",
1609             __func__, sb, sb->sb_cc, toep->sb_cc));
1610         toep->rx_credits += toep->sb_cc - sb->sb_cc;
1611         sbappendstream_locked(sb, m);
1612         toep->sb_cc = sb->sb_cc;
1613         if (toep->rx_credits > 0 && toep->sb_cc + tp->rcv_wnd < sb->sb_lowat) {
1614                 int credits;
1615
1616                 credits = send_rx_credits(sc, toep, toep->rx_credits);
1617                 toep->rx_credits -= credits;
1618                 tp->rcv_wnd += credits;
1619                 tp->rcv_adv += credits;
1620         }
1621         sorwakeup_locked(so);
1622         SOCKBUF_UNLOCK_ASSERT(sb);
1623
1624         INP_WUNLOCK(inp);
1625         CURVNET_RESTORE();
1626         return (0);
1627 }
1628
1629 #define S_CPL_FW4_ACK_OPCODE    24
1630 #define M_CPL_FW4_ACK_OPCODE    0xff
1631 #define V_CPL_FW4_ACK_OPCODE(x) ((x) << S_CPL_FW4_ACK_OPCODE)
1632 #define G_CPL_FW4_ACK_OPCODE(x) \
1633     (((x) >> S_CPL_FW4_ACK_OPCODE) & M_CPL_FW4_ACK_OPCODE)
1634
1635 #define S_CPL_FW4_ACK_FLOWID    0
1636 #define M_CPL_FW4_ACK_FLOWID    0xffffff
1637 #define V_CPL_FW4_ACK_FLOWID(x) ((x) << S_CPL_FW4_ACK_FLOWID)
1638 #define G_CPL_FW4_ACK_FLOWID(x) \
1639     (((x) >> S_CPL_FW4_ACK_FLOWID) & M_CPL_FW4_ACK_FLOWID)
1640
1641 #define S_CPL_FW4_ACK_CR        24
1642 #define M_CPL_FW4_ACK_CR        0xff
1643 #define V_CPL_FW4_ACK_CR(x)     ((x) << S_CPL_FW4_ACK_CR)
1644 #define G_CPL_FW4_ACK_CR(x)     (((x) >> S_CPL_FW4_ACK_CR) & M_CPL_FW4_ACK_CR)
1645
1646 #define S_CPL_FW4_ACK_SEQVAL    0
1647 #define M_CPL_FW4_ACK_SEQVAL    0x1
1648 #define V_CPL_FW4_ACK_SEQVAL(x) ((x) << S_CPL_FW4_ACK_SEQVAL)
1649 #define G_CPL_FW4_ACK_SEQVAL(x) \
1650     (((x) >> S_CPL_FW4_ACK_SEQVAL) & M_CPL_FW4_ACK_SEQVAL)
1651 #define F_CPL_FW4_ACK_SEQVAL    V_CPL_FW4_ACK_SEQVAL(1U)
1652
1653 static int
1654 do_fw4_ack(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1655 {
1656         struct adapter *sc = iq->adapter;
1657         const struct cpl_fw4_ack *cpl = (const void *)(rss + 1);
1658         unsigned int tid = G_CPL_FW4_ACK_FLOWID(be32toh(OPCODE_TID(cpl)));
1659         struct toepcb *toep = lookup_tid(sc, tid);
1660         struct inpcb *inp;
1661         struct tcpcb *tp;
1662         struct socket *so;
1663         uint8_t credits = cpl->credits;
1664         struct ofld_tx_sdesc *txsd;
1665         int plen;
1666 #ifdef INVARIANTS
1667         unsigned int opcode = G_CPL_FW4_ACK_OPCODE(be32toh(OPCODE_TID(cpl)));
1668 #endif
1669
1670         /*
1671          * Very unusual case: we'd sent a flowc + abort_req for a synq entry and
1672          * now this comes back carrying the credits for the flowc.
1673          */
1674         if (__predict_false(toep->flags & TPF_SYNQE)) {
1675                 KASSERT(toep->flags & TPF_ABORT_SHUTDOWN,
1676                     ("%s: credits for a synq entry %p", __func__, toep));
1677                 return (0);
1678         }
1679
1680         inp = toep->inp;
1681
1682         KASSERT(opcode == CPL_FW4_ACK,
1683             ("%s: unexpected opcode 0x%x", __func__, opcode));
1684         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1685         KASSERT(toep->tid == tid, ("%s: toep tid mismatch", __func__));
1686
1687         INP_WLOCK(inp);
1688
1689         if (__predict_false(toep->flags & TPF_ABORT_SHUTDOWN)) {
1690                 INP_WUNLOCK(inp);
1691                 return (0);
1692         }
1693
1694         KASSERT((inp->inp_flags & (INP_TIMEWAIT | INP_DROPPED)) == 0,
1695             ("%s: inp_flags 0x%x", __func__, inp->inp_flags));
1696
1697         tp = intotcpcb(inp);
1698
1699         if (cpl->flags & CPL_FW4_ACK_FLAGS_SEQVAL) {
1700                 tcp_seq snd_una = be32toh(cpl->snd_una);
1701
1702 #ifdef INVARIANTS
1703                 if (__predict_false(SEQ_LT(snd_una, tp->snd_una))) {
1704                         log(LOG_ERR,
1705                             "%s: unexpected seq# %x for TID %u, snd_una %x\n",
1706                             __func__, snd_una, toep->tid, tp->snd_una);
1707                 }
1708 #endif
1709
1710                 if (tp->snd_una != snd_una) {
1711                         tp->snd_una = snd_una;
1712                         tp->ts_recent_age = tcp_ts_getticks();
1713                 }
1714         }
1715
1716         so = inp->inp_socket;
1717         txsd = &toep->txsd[toep->txsd_cidx];
1718         plen = 0;
1719         while (credits) {
1720                 KASSERT(credits >= txsd->tx_credits,
1721                     ("%s: too many (or partial) credits", __func__));
1722                 credits -= txsd->tx_credits;
1723                 toep->tx_credits += txsd->tx_credits;
1724                 plen += txsd->plen;
1725                 txsd++;
1726                 toep->txsd_avail++;
1727                 KASSERT(toep->txsd_avail <= toep->txsd_total,
1728                     ("%s: txsd avail > total", __func__));
1729                 if (__predict_false(++toep->txsd_cidx == toep->txsd_total)) {
1730                         txsd = &toep->txsd[0];
1731                         toep->txsd_cidx = 0;
1732                 }
1733         }
1734
1735         if (toep->tx_credits == toep->tx_total) {
1736                 toep->tx_nocompl = 0;
1737                 toep->plen_nocompl = 0;
1738         }
1739
1740         if (toep->flags & TPF_TX_SUSPENDED &&
1741             toep->tx_credits >= toep->tx_total / 4) {
1742                 toep->flags &= ~TPF_TX_SUSPENDED;
1743                 if (toep->ulp_mode == ULP_MODE_ISCSI)
1744                         t4_ulp_push_frames(sc, toep, plen);
1745                 else
1746                         t4_push_frames(sc, toep, plen);
1747         } else if (plen > 0) {
1748                 struct sockbuf *sb = &so->so_snd;
1749
1750                 if (toep->ulp_mode == ULP_MODE_ISCSI)
1751                         t4_cpl_iscsi_callback(toep->td, toep, &plen,
1752                             CPL_FW4_ACK);
1753                 else {
1754                         SOCKBUF_LOCK(sb);
1755                         sbdrop_locked(sb, plen);
1756                         sowwakeup_locked(so);
1757                         SOCKBUF_UNLOCK_ASSERT(sb);
1758                 }
1759         }
1760
1761         INP_WUNLOCK(inp);
1762
1763         return (0);
1764 }
1765
1766 static int
1767 do_set_tcb_rpl(struct sge_iq *iq, const struct rss_header *rss, struct mbuf *m)
1768 {
1769         struct adapter *sc = iq->adapter;
1770         const struct cpl_set_tcb_rpl *cpl = (const void *)(rss + 1);
1771         unsigned int tid = GET_TID(cpl);
1772 #ifdef INVARIANTS
1773         unsigned int opcode = G_CPL_OPCODE(be32toh(OPCODE_TID(cpl)));
1774 #endif
1775
1776         KASSERT(opcode == CPL_SET_TCB_RPL,
1777             ("%s: unexpected opcode 0x%x", __func__, opcode));
1778         KASSERT(m == NULL, ("%s: wasn't expecting payload", __func__));
1779
1780         if (is_ftid(sc, tid))
1781                 return (t4_filter_rpl(iq, rss, m)); /* TCB is a filter */
1782         else {
1783                 struct toepcb *toep = lookup_tid(sc, tid);
1784
1785                 t4_cpl_iscsi_callback(toep->td, toep, m, CPL_SET_TCB_RPL);
1786                 return (0);
1787         }
1788
1789         CXGBE_UNIMPLEMENTED(__func__);
1790 }
1791
1792 void
1793 t4_set_tcb_field(struct adapter *sc, struct toepcb *toep, int ctrl,
1794     uint16_t word, uint64_t mask, uint64_t val)
1795 {
1796         struct wrqe *wr;
1797         struct cpl_set_tcb_field *req;
1798
1799         wr = alloc_wrqe(sizeof(*req), ctrl ? toep->ctrlq : toep->ofld_txq);
1800         if (wr == NULL) {
1801                 /* XXX */
1802                 panic("%s: allocation failure.", __func__);
1803         }
1804         req = wrtod(wr);
1805
1806         INIT_TP_WR_MIT_CPL(req, CPL_SET_TCB_FIELD, toep->tid);
1807         req->reply_ctrl = htobe16(V_NO_REPLY(1) |
1808             V_QUEUENO(toep->ofld_rxq->iq.abs_id));
1809         req->word_cookie = htobe16(V_WORD(word) | V_COOKIE(0));
1810         req->mask = htobe64(mask);
1811         req->val = htobe64(val);
1812
1813         t4_wrq_tx(sc, wr);
1814 }
1815
1816 void
1817 t4_init_cpl_io_handlers(struct adapter *sc)
1818 {
1819
1820         t4_register_cpl_handler(sc, CPL_PEER_CLOSE, do_peer_close);
1821         t4_register_cpl_handler(sc, CPL_CLOSE_CON_RPL, do_close_con_rpl);
1822         t4_register_cpl_handler(sc, CPL_ABORT_REQ_RSS, do_abort_req);
1823         t4_register_cpl_handler(sc, CPL_ABORT_RPL_RSS, do_abort_rpl);
1824         t4_register_cpl_handler(sc, CPL_RX_DATA, do_rx_data);
1825         t4_register_cpl_handler(sc, CPL_FW4_ACK, do_fw4_ack);
1826         t4_register_cpl_handler(sc, CPL_SET_TCB_RPL, do_set_tcb_rpl);
1827 }
1828
1829 void
1830 t4_uninit_cpl_io_handlers(struct adapter *sc)
1831 {
1832
1833         t4_register_cpl_handler(sc, CPL_SET_TCB_RPL, t4_filter_rpl);
1834 }
1835 #endif