drivers/infiniband/sw/rxe/rxe_req.c

   1 // SPDX-License-Identifier: GPL-2.0 OR Linux-OpenIB
   2 /*
   3  * Copyright (c) 2016 Mellanox Technologies Ltd. All rights reserved.
   4  * Copyright (c) 2015 System Fabric Works, Inc. All rights reserved.
   5  */
   6
   7 #include <linux/skbuff.h>
   8 #include <crypto/hash.h>
   9
  10 #include "rxe.h"
  11 #include "rxe_loc.h"
  12 #include "rxe_queue.h"
  13
  14 static int next_opcode(struct rxe_qp *qp, struct rxe_send_wqe *wqe,
  15                        u32 opcode);
  16
  17 static inline void retry_first_write_send(struct rxe_qp *qp,
  18                                           struct rxe_send_wqe *wqe, int npsn)
  19 {
  20         int i;
  21
  22         for (i = 0; i < npsn; i++) {
  23                 int to_send = (wqe->dma.resid > qp->mtu) ?
  24                                 qp->mtu : wqe->dma.resid;
  25
  26                 qp->req.opcode = next_opcode(qp, wqe,
  27                                              wqe->wr.opcode);
  28
  29                 if (wqe->wr.send_flags & IB_SEND_INLINE) {
  30                         wqe->dma.resid -= to_send;
  31                         wqe->dma.sge_offset += to_send;
  32                 } else {
  33                         advance_dma_data(&wqe->dma, to_send);
  34                 }
  35         }
  36 }
  37
  38 static void req_retry(struct rxe_qp *qp)
  39 {
  40         struct rxe_send_wqe *wqe;
  41         unsigned int wqe_index;
  42         unsigned int mask;
  43         int npsn;
  44         int first = 1;
  45         struct rxe_queue *q = qp->sq.queue;
  46         unsigned int cons;
  47         unsigned int prod;
  48
  49         cons = queue_get_consumer(q, QUEUE_TYPE_FROM_CLIENT);
  50         prod = queue_get_producer(q, QUEUE_TYPE_FROM_CLIENT);
  51
  52         qp->req.wqe_index       = cons;
  53         qp->req.psn             = qp->comp.psn;
  54         qp->req.opcode          = -1;
  55
  56         for (wqe_index = cons; wqe_index != prod;
  57                         wqe_index = queue_next_index(q, wqe_index)) {
  58                 wqe = queue_addr_from_index(qp->sq.queue, wqe_index);
  59                 mask = wr_opcode_mask(wqe->wr.opcode, qp);
  60
  61                 if (wqe->state == wqe_state_posted)
  62                         break;
  63
  64                 if (wqe->state == wqe_state_done)
  65                         continue;
  66
  67                 wqe->iova = (mask & WR_ATOMIC_MASK) ?
  68                              wqe->wr.wr.atomic.remote_addr :
  69                              (mask & WR_READ_OR_WRITE_MASK) ?
  70                              wqe->wr.wr.rdma.remote_addr :
  71                              0;
  72
  73                 if (!first || (mask & WR_READ_MASK) == 0) {
  74                         wqe->dma.resid = wqe->dma.length;
  75                         wqe->dma.cur_sge = 0;
  76                         wqe->dma.sge_offset = 0;
  77                 }
  78
  79                 if (first) {
  80                         first = 0;
  81
  82                         if (mask & WR_WRITE_OR_SEND_MASK) {
  83                                 npsn = (qp->comp.psn - wqe->first_psn) &
  84                                         BTH_PSN_MASK;
  85                                 retry_first_write_send(qp, wqe, npsn);
  86                         }
  87
  88                         if (mask & WR_READ_MASK) {
  89                                 npsn = (wqe->dma.length - wqe->dma.resid) /
  90                                         qp->mtu;
  91                                 wqe->iova += npsn * qp->mtu;
  92                         }
  93                 }
  94
  95                 wqe->state = wqe_state_posted;
  96         }
  97 }
  98
  99 void rnr_nak_timer(struct timer_list *t)
 100 {
 101         struct rxe_qp *qp = from_timer(qp, t, rnr_nak_timer);
 102         unsigned long flags;
 103
 104         rxe_dbg_qp(qp, "nak timer fired\n");
 105
 106         spin_lock_irqsave(&qp->state_lock, flags);
 107         if (qp->valid) {
 108                 /* request a send queue retry */
 109                 qp->req.need_retry = 1;
 110                 qp->req.wait_for_rnr_timer = 0;
 111                 rxe_sched_task(&qp->req.task);
 112         }
 113         spin_unlock_irqrestore(&qp->state_lock, flags);
 114 }
 115
 116 static void req_check_sq_drain_done(struct rxe_qp *qp)
 117 {
 118         struct rxe_queue *q;
 119         unsigned int index;
 120         unsigned int cons;
 121         struct rxe_send_wqe *wqe;
 122         unsigned long flags;
 123
 124         spin_lock_irqsave(&qp->state_lock, flags);
 125         if (qp_state(qp) == IB_QPS_SQD) {
 126                 q = qp->sq.queue;
 127                 index = qp->req.wqe_index;
 128                 cons = queue_get_consumer(q, QUEUE_TYPE_FROM_CLIENT);
 129                 wqe = queue_addr_from_index(q, cons);
 130
 131                 /* check to see if we are drained;
 132                  * state_lock used by requester and completer
 133                  */
 134                 do {
 135                         if (!qp->attr.sq_draining)
 136                                 /* comp just finished */
 137                                 break;
 138
 139                         if (wqe && ((index != cons) ||
 140                                 (wqe->state != wqe_state_posted)))
 141                                 /* comp not done yet */
 142                                 break;
 143
 144                         qp->attr.sq_draining = 0;
 145                         spin_unlock_irqrestore(&qp->state_lock, flags);
 146
 147                         if (qp->ibqp.event_handler) {
 148                                 struct ib_event ev;
 149
 150                                 ev.device = qp->ibqp.device;
 151                                 ev.element.qp = &qp->ibqp;
 152                                 ev.event = IB_EVENT_SQ_DRAINED;
 153                                 qp->ibqp.event_handler(&ev,
 154                                         qp->ibqp.qp_context);
 155                         }
 156                         return;
 157                 } while (0);
 158         }
 159         spin_unlock_irqrestore(&qp->state_lock, flags);
 160 }
 161
 162 static struct rxe_send_wqe *__req_next_wqe(struct rxe_qp *qp)
 163 {
 164         struct rxe_queue *q = qp->sq.queue;
 165         unsigned int index = qp->req.wqe_index;
 166         unsigned int prod;
 167
 168         prod = queue_get_producer(q, QUEUE_TYPE_FROM_CLIENT);
 169         if (index == prod)
 170                 return NULL;
 171         else
 172                 return queue_addr_from_index(q, index);
 173 }
 174
 175 static struct rxe_send_wqe *req_next_wqe(struct rxe_qp *qp)
 176 {
 177         struct rxe_send_wqe *wqe;
 178         unsigned long flags;
 179
 180         req_check_sq_drain_done(qp);
 181
 182         wqe = __req_next_wqe(qp);
 183         if (wqe == NULL)
 184                 return NULL;
 185
 186         spin_lock_irqsave(&qp->state_lock, flags);
 187         if (unlikely((qp_state(qp) == IB_QPS_SQD) &&
 188                      (wqe->state != wqe_state_processing))) {
 189                 spin_unlock_irqrestore(&qp->state_lock, flags);
 190                 return NULL;
 191         }
 192         spin_unlock_irqrestore(&qp->state_lock, flags);
 193
 194         wqe->mask = wr_opcode_mask(wqe->wr.opcode, qp);
 195         return wqe;
 196 }
 197
 198 /**
 199  * rxe_wqe_is_fenced - check if next wqe is fenced
 200  * @qp: the queue pair
 201  * @wqe: the next wqe
 202  *
 203  * Returns: 1 if wqe needs to wait
 204  *          0 if wqe is ready to go
 205  */
 206 static int rxe_wqe_is_fenced(struct rxe_qp *qp, struct rxe_send_wqe *wqe)
 207 {
 208         /* Local invalidate fence (LIF) see IBA 10.6.5.1
 209          * Requires ALL previous operations on the send queue
 210          * are complete. Make mandatory for the rxe driver.
 211          */
 212         if (wqe->wr.opcode == IB_WR_LOCAL_INV)
 213                 return qp->req.wqe_index != queue_get_consumer(qp->sq.queue,
 214                                                 QUEUE_TYPE_FROM_CLIENT);
 215
 216         /* Fence see IBA 10.8.3.3
 217          * Requires that all previous read and atomic operations
 218          * are complete.
 219          */
 220         return (wqe->wr.send_flags & IB_SEND_FENCE) &&
 221                 atomic_read(&qp->req.rd_atomic) != qp->attr.max_rd_atomic;
 222 }
 223
 224 static int next_opcode_rc(struct rxe_qp *qp, u32 opcode, int fits)
 225 {
 226         switch (opcode) {
 227         case IB_WR_RDMA_WRITE:
 228                 if (qp->req.opcode == IB_OPCODE_RC_RDMA_WRITE_FIRST ||
 229                     qp->req.opcode == IB_OPCODE_RC_RDMA_WRITE_MIDDLE)
 230                         return fits ?
 231                                 IB_OPCODE_RC_RDMA_WRITE_LAST :
 232                                 IB_OPCODE_RC_RDMA_WRITE_MIDDLE;
 233                 else
 234                         return fits ?
 235                                 IB_OPCODE_RC_RDMA_WRITE_ONLY :
 236                                 IB_OPCODE_RC_RDMA_WRITE_FIRST;
 237
 238         case IB_WR_RDMA_WRITE_WITH_IMM:
 239                 if (qp->req.opcode == IB_OPCODE_RC_RDMA_WRITE_FIRST ||
 240                     qp->req.opcode == IB_OPCODE_RC_RDMA_WRITE_MIDDLE)
 241                         return fits ?
 242                                 IB_OPCODE_RC_RDMA_WRITE_LAST_WITH_IMMEDIATE :
 243                                 IB_OPCODE_RC_RDMA_WRITE_MIDDLE;
 244                 else
 245                         return fits ?
 246                                 IB_OPCODE_RC_RDMA_WRITE_ONLY_WITH_IMMEDIATE :
 247                                 IB_OPCODE_RC_RDMA_WRITE_FIRST;
 248
 249         case IB_WR_SEND:
 250                 if (qp->req.opcode == IB_OPCODE_RC_SEND_FIRST ||
 251                     qp->req.opcode == IB_OPCODE_RC_SEND_MIDDLE)
 252                         return fits ?
 253                                 IB_OPCODE_RC_SEND_LAST :
 254                                 IB_OPCODE_RC_SEND_MIDDLE;
 255                 else
 256                         return fits ?
 257                                 IB_OPCODE_RC_SEND_ONLY :
 258                                 IB_OPCODE_RC_SEND_FIRST;
 259
 260         case IB_WR_SEND_WITH_IMM:
 261                 if (qp->req.opcode == IB_OPCODE_RC_SEND_FIRST ||
 262                     qp->req.opcode == IB_OPCODE_RC_SEND_MIDDLE)
 263                         return fits ?
 264                                 IB_OPCODE_RC_SEND_LAST_WITH_IMMEDIATE :
 265                                 IB_OPCODE_RC_SEND_MIDDLE;
 266                 else
 267                         return fits ?
 268                                 IB_OPCODE_RC_SEND_ONLY_WITH_IMMEDIATE :
 269                                 IB_OPCODE_RC_SEND_FIRST;
 270
 271         case IB_WR_FLUSH:
 272                 return IB_OPCODE_RC_FLUSH;
 273
 274         case IB_WR_RDMA_READ:
 275                 return IB_OPCODE_RC_RDMA_READ_REQUEST;
 276
 277         case IB_WR_ATOMIC_CMP_AND_SWP:
 278                 return IB_OPCODE_RC_COMPARE_SWAP;
 279
 280         case IB_WR_ATOMIC_FETCH_AND_ADD:
 281                 return IB_OPCODE_RC_FETCH_ADD;
 282
 283         case IB_WR_SEND_WITH_INV:
 284                 if (qp->req.opcode == IB_OPCODE_RC_SEND_FIRST ||
 285                     qp->req.opcode == IB_OPCODE_RC_SEND_MIDDLE)
 286                         return fits ? IB_OPCODE_RC_SEND_LAST_WITH_INVALIDATE :
 287                                 IB_OPCODE_RC_SEND_MIDDLE;
 288                 else
 289                         return fits ? IB_OPCODE_RC_SEND_ONLY_WITH_INVALIDATE :
 290                                 IB_OPCODE_RC_SEND_FIRST;
 291
 292         case IB_WR_ATOMIC_WRITE:
 293                 return IB_OPCODE_RC_ATOMIC_WRITE;
 294
 295         case IB_WR_REG_MR:
 296         case IB_WR_LOCAL_INV:
 297                 return opcode;
 298         }
 299
 300         return -EINVAL;
 301 }
 302
 303 static int next_opcode_uc(struct rxe_qp *qp, u32 opcode, int fits)
 304 {
 305         switch (opcode) {
 306         case IB_WR_RDMA_WRITE:
 307                 if (qp->req.opcode == IB_OPCODE_UC_RDMA_WRITE_FIRST ||
 308                     qp->req.opcode == IB_OPCODE_UC_RDMA_WRITE_MIDDLE)
 309                         return fits ?
 310                                 IB_OPCODE_UC_RDMA_WRITE_LAST :
 311                                 IB_OPCODE_UC_RDMA_WRITE_MIDDLE;
 312                 else
 313                         return fits ?
 314                                 IB_OPCODE_UC_RDMA_WRITE_ONLY :
 315                                 IB_OPCODE_UC_RDMA_WRITE_FIRST;
 316
 317         case IB_WR_RDMA_WRITE_WITH_IMM:
 318                 if (qp->req.opcode == IB_OPCODE_UC_RDMA_WRITE_FIRST ||
 319                     qp->req.opcode == IB_OPCODE_UC_RDMA_WRITE_MIDDLE)
 320                         return fits ?
 321                                 IB_OPCODE_UC_RDMA_WRITE_LAST_WITH_IMMEDIATE :
 322                                 IB_OPCODE_UC_RDMA_WRITE_MIDDLE;
 323                 else
 324                         return fits ?
 325                                 IB_OPCODE_UC_RDMA_WRITE_ONLY_WITH_IMMEDIATE :
 326                                 IB_OPCODE_UC_RDMA_WRITE_FIRST;
 327
 328         case IB_WR_SEND:
 329                 if (qp->req.opcode == IB_OPCODE_UC_SEND_FIRST ||
 330                     qp->req.opcode == IB_OPCODE_UC_SEND_MIDDLE)
 331                         return fits ?
 332                                 IB_OPCODE_UC_SEND_LAST :
 333                                 IB_OPCODE_UC_SEND_MIDDLE;
 334                 else
 335                         return fits ?
 336                                 IB_OPCODE_UC_SEND_ONLY :
 337                                 IB_OPCODE_UC_SEND_FIRST;
 338
 339         case IB_WR_SEND_WITH_IMM:
 340                 if (qp->req.opcode == IB_OPCODE_UC_SEND_FIRST ||
 341                     qp->req.opcode == IB_OPCODE_UC_SEND_MIDDLE)
 342                         return fits ?
 343                                 IB_OPCODE_UC_SEND_LAST_WITH_IMMEDIATE :
 344                                 IB_OPCODE_UC_SEND_MIDDLE;
 345                 else
 346                         return fits ?
 347                                 IB_OPCODE_UC_SEND_ONLY_WITH_IMMEDIATE :
 348                                 IB_OPCODE_UC_SEND_FIRST;
 349         }
 350
 351         return -EINVAL;
 352 }
 353
 354 static int next_opcode(struct rxe_qp *qp, struct rxe_send_wqe *wqe,
 355                        u32 opcode)
 356 {
 357         int fits = (wqe->dma.resid <= qp->mtu);
 358
 359         switch (qp_type(qp)) {
 360         case IB_QPT_RC:
 361                 return next_opcode_rc(qp, opcode, fits);
 362
 363         case IB_QPT_UC:
 364                 return next_opcode_uc(qp, opcode, fits);
 365
 366         case IB_QPT_UD:
 367         case IB_QPT_GSI:
 368                 switch (opcode) {
 369                 case IB_WR_SEND:
 370                         return IB_OPCODE_UD_SEND_ONLY;
 371
 372                 case IB_WR_SEND_WITH_IMM:
 373                         return IB_OPCODE_UD_SEND_ONLY_WITH_IMMEDIATE;
 374                 }
 375                 break;
 376
 377         default:
 378                 break;
 379         }
 380
 381         return -EINVAL;
 382 }
 383
 384 static inline int check_init_depth(struct rxe_qp *qp, struct rxe_send_wqe *wqe)
 385 {
 386         int depth;
 387
 388         if (wqe->has_rd_atomic)
 389                 return 0;
 390
 391         qp->req.need_rd_atomic = 1;
 392         depth = atomic_dec_return(&qp->req.rd_atomic);
 393
 394         if (depth >= 0) {
 395                 qp->req.need_rd_atomic = 0;
 396                 wqe->has_rd_atomic = 1;
 397                 return 0;
 398         }
 399
 400         atomic_inc(&qp->req.rd_atomic);
 401         return -EAGAIN;
 402 }
 403
 404 static inline int get_mtu(struct rxe_qp *qp)
 405 {
 406         struct rxe_dev *rxe = to_rdev(qp->ibqp.device);
 407
 408         if ((qp_type(qp) == IB_QPT_RC) || (qp_type(qp) == IB_QPT_UC))
 409                 return qp->mtu;
 410
 411         return rxe->port.mtu_cap;
 412 }
 413
 414 static struct sk_buff *init_req_packet(struct rxe_qp *qp,
 415                                        struct rxe_av *av,
 416                                        struct rxe_send_wqe *wqe,
 417                                        int opcode, u32 payload,
 418                                        struct rxe_pkt_info *pkt)
 419 {
 420         struct rxe_dev          *rxe = to_rdev(qp->ibqp.device);
 421         struct sk_buff          *skb;
 422         struct rxe_send_wr      *ibwr = &wqe->wr;
 423         int                     pad = (-payload) & 0x3;
 424         int                     paylen;
 425         int                     solicited;
 426         u32                     qp_num;
 427         int                     ack_req;
 428
 429         /* length from start of bth to end of icrc */
 430         paylen = rxe_opcode[opcode].length + payload + pad + RXE_ICRC_SIZE;
 431         pkt->paylen = paylen;
 432
 433         /* init skb */
 434         skb = rxe_init_packet(rxe, av, paylen, pkt);
 435         if (unlikely(!skb))
 436                 return NULL;
 437
 438         /* init bth */
 439         solicited = (ibwr->send_flags & IB_SEND_SOLICITED) &&
 440                         (pkt->mask & RXE_END_MASK) &&
 441                         ((pkt->mask & (RXE_SEND_MASK)) ||
 442                         (pkt->mask & (RXE_WRITE_MASK | RXE_IMMDT_MASK)) ==
 443                         (RXE_WRITE_MASK | RXE_IMMDT_MASK));
 444
 445         qp_num = (pkt->mask & RXE_DETH_MASK) ? ibwr->wr.ud.remote_qpn :
 446                                          qp->attr.dest_qp_num;
 447
 448         ack_req = ((pkt->mask & RXE_END_MASK) ||
 449                 (qp->req.noack_pkts++ > RXE_MAX_PKT_PER_ACK));
 450         if (ack_req)
 451                 qp->req.noack_pkts = 0;
 452
 453         bth_init(pkt, pkt->opcode, solicited, 0, pad, IB_DEFAULT_PKEY_FULL, qp_num,
 454                  ack_req, pkt->psn);
 455
 456         /* init optional headers */
 457         if (pkt->mask & RXE_RETH_MASK) {
 458                 if (pkt->mask & RXE_FETH_MASK)
 459                         reth_set_rkey(pkt, ibwr->wr.flush.rkey);
 460                 else
 461                         reth_set_rkey(pkt, ibwr->wr.rdma.rkey);
 462                 reth_set_va(pkt, wqe->iova);
 463                 reth_set_len(pkt, wqe->dma.resid);
 464         }
 465
 466         /* Fill Flush Extension Transport Header */
 467         if (pkt->mask & RXE_FETH_MASK)
 468                 feth_init(pkt, ibwr->wr.flush.type, ibwr->wr.flush.level);
 469
 470         if (pkt->mask & RXE_IMMDT_MASK)
 471                 immdt_set_imm(pkt, ibwr->ex.imm_data);
 472
 473         if (pkt->mask & RXE_IETH_MASK)
 474                 ieth_set_rkey(pkt, ibwr->ex.invalidate_rkey);
 475
 476         if (pkt->mask & RXE_ATMETH_MASK) {
 477                 atmeth_set_va(pkt, wqe->iova);
 478                 if (opcode == IB_OPCODE_RC_COMPARE_SWAP) {
 479                         atmeth_set_swap_add(pkt, ibwr->wr.atomic.swap);
 480                         atmeth_set_comp(pkt, ibwr->wr.atomic.compare_add);
 481                 } else {
 482                         atmeth_set_swap_add(pkt, ibwr->wr.atomic.compare_add);
 483                 }
 484                 atmeth_set_rkey(pkt, ibwr->wr.atomic.rkey);
 485         }
 486
 487         if (pkt->mask & RXE_DETH_MASK) {
 488                 if (qp->ibqp.qp_num == 1)
 489                         deth_set_qkey(pkt, GSI_QKEY);
 490                 else
 491                         deth_set_qkey(pkt, ibwr->wr.ud.remote_qkey);
 492                 deth_set_sqp(pkt, qp->ibqp.qp_num);
 493         }
 494
 495         return skb;
 496 }
 497
 498 static int finish_packet(struct rxe_qp *qp, struct rxe_av *av,
 499                          struct rxe_send_wqe *wqe, struct rxe_pkt_info *pkt,
 500                          struct sk_buff *skb, u32 payload)
 501 {
 502         int err;
 503
 504         err = rxe_prepare(av, pkt, skb);
 505         if (err)
 506                 return err;
 507
 508         if (pkt->mask & RXE_WRITE_OR_SEND_MASK) {
 509                 if (wqe->wr.send_flags & IB_SEND_INLINE) {
 510                         u8 *tmp = &wqe->dma.inline_data[wqe->dma.sge_offset];
 511
 512                         memcpy(payload_addr(pkt), tmp, payload);
 513
 514                         wqe->dma.resid -= payload;
 515                         wqe->dma.sge_offset += payload;
 516                 } else {
 517                         err = copy_data(qp->pd, 0, &wqe->dma,
 518                                         payload_addr(pkt), payload,
 519                                         RXE_FROM_MR_OBJ);
 520                         if (err)
 521                                 return err;
 522                 }
 523                 if (bth_pad(pkt)) {
 524                         u8 *pad = payload_addr(pkt) + payload;
 525
 526                         memset(pad, 0, bth_pad(pkt));
 527                 }
 528         } else if (pkt->mask & RXE_FLUSH_MASK) {
 529                 /* oA19-2: shall have no payload. */
 530                 wqe->dma.resid = 0;
 531         }
 532
 533         if (pkt->mask & RXE_ATOMIC_WRITE_MASK) {
 534                 memcpy(payload_addr(pkt), wqe->dma.atomic_wr, payload);
 535                 wqe->dma.resid -= payload;
 536         }
 537
 538         return 0;
 539 }
 540
 541 static void update_wqe_state(struct rxe_qp *qp,
 542                 struct rxe_send_wqe *wqe,
 543                 struct rxe_pkt_info *pkt)
 544 {
 545         if (pkt->mask & RXE_END_MASK) {
 546                 if (qp_type(qp) == IB_QPT_RC)
 547                         wqe->state = wqe_state_pending;
 548         } else {
 549                 wqe->state = wqe_state_processing;
 550         }
 551 }
 552
 553 static void update_wqe_psn(struct rxe_qp *qp,
 554                            struct rxe_send_wqe *wqe,
 555                            struct rxe_pkt_info *pkt,
 556                            u32 payload)
 557 {
 558         /* number of packets left to send including current one */
 559         int num_pkt = (wqe->dma.resid + payload + qp->mtu - 1) / qp->mtu;
 560
 561         /* handle zero length packet case */
 562         if (num_pkt == 0)
 563                 num_pkt = 1;
 564
 565         if (pkt->mask & RXE_START_MASK) {
 566                 wqe->first_psn = qp->req.psn;
 567                 wqe->last_psn = (qp->req.psn + num_pkt - 1) & BTH_PSN_MASK;
 568         }
 569
 570         if (pkt->mask & RXE_READ_MASK)
 571                 qp->req.psn = (wqe->first_psn + num_pkt) & BTH_PSN_MASK;
 572         else
 573                 qp->req.psn = (qp->req.psn + 1) & BTH_PSN_MASK;
 574 }
 575
 576 static void save_state(struct rxe_send_wqe *wqe,
 577                        struct rxe_qp *qp,
 578                        struct rxe_send_wqe *rollback_wqe,
 579                        u32 *rollback_psn)
 580 {
 581         rollback_wqe->state = wqe->state;
 582         rollback_wqe->first_psn = wqe->first_psn;
 583         rollback_wqe->last_psn = wqe->last_psn;
 584         rollback_wqe->dma = wqe->dma;
 585         *rollback_psn = qp->req.psn;
 586 }
 587
 588 static void rollback_state(struct rxe_send_wqe *wqe,
 589                            struct rxe_qp *qp,
 590                            struct rxe_send_wqe *rollback_wqe,
 591                            u32 rollback_psn)
 592 {
 593         wqe->state = rollback_wqe->state;
 594         wqe->first_psn = rollback_wqe->first_psn;
 595         wqe->last_psn = rollback_wqe->last_psn;
 596         wqe->dma = rollback_wqe->dma;
 597         qp->req.psn = rollback_psn;
 598 }
 599
 600 static void update_state(struct rxe_qp *qp, struct rxe_pkt_info *pkt)
 601 {
 602         qp->req.opcode = pkt->opcode;
 603
 604         if (pkt->mask & RXE_END_MASK)
 605                 qp->req.wqe_index = queue_next_index(qp->sq.queue,
 606                                                      qp->req.wqe_index);
 607
 608         qp->need_req_skb = 0;
 609
 610         if (qp->qp_timeout_jiffies && !timer_pending(&qp->retrans_timer))
 611                 mod_timer(&qp->retrans_timer,
 612                           jiffies + qp->qp_timeout_jiffies);
 613 }
 614
 615 static int rxe_do_local_ops(struct rxe_qp *qp, struct rxe_send_wqe *wqe)
 616 {
 617         u8 opcode = wqe->wr.opcode;
 618         u32 rkey;
 619         int ret;
 620
 621         switch (opcode) {
 622         case IB_WR_LOCAL_INV:
 623                 rkey = wqe->wr.ex.invalidate_rkey;
 624                 if (rkey_is_mw(rkey))
 625                         ret = rxe_invalidate_mw(qp, rkey);
 626                 else
 627                         ret = rxe_invalidate_mr(qp, rkey);
 628
 629                 if (unlikely(ret)) {
 630                         wqe->status = IB_WC_LOC_QP_OP_ERR;
 631                         return ret;
 632                 }
 633                 break;
 634         case IB_WR_REG_MR:
 635                 ret = rxe_reg_fast_mr(qp, wqe);
 636                 if (unlikely(ret)) {
 637                         wqe->status = IB_WC_LOC_QP_OP_ERR;
 638                         return ret;
 639                 }
 640                 break;
 641         case IB_WR_BIND_MW:
 642                 ret = rxe_bind_mw(qp, wqe);
 643                 if (unlikely(ret)) {
 644                         wqe->status = IB_WC_MW_BIND_ERR;
 645                         return ret;
 646                 }
 647                 break;
 648         default:
 649                 rxe_dbg_qp(qp, "Unexpected send wqe opcode %d\n", opcode);
 650                 wqe->status = IB_WC_LOC_QP_OP_ERR;
 651                 return -EINVAL;
 652         }
 653
 654         wqe->state = wqe_state_done;
 655         wqe->status = IB_WC_SUCCESS;
 656         qp->req.wqe_index = queue_next_index(qp->sq.queue, qp->req.wqe_index);
 657
 658         /* There is no ack coming for local work requests
 659          * which can lead to a deadlock. So go ahead and complete
 660          * it now.
 661          */
 662         rxe_sched_task(&qp->comp.task);
 663
 664         return 0;
 665 }
 666
 667 int rxe_requester(struct rxe_qp *qp)
 668 {
 669         struct rxe_dev *rxe = to_rdev(qp->ibqp.device);
 670         struct rxe_pkt_info pkt;
 671         struct sk_buff *skb;
 672         struct rxe_send_wqe *wqe;
 673         enum rxe_hdr_mask mask;
 674         u32 payload;
 675         int mtu;
 676         int opcode;
 677         int err;
 678         int ret;
 679         struct rxe_send_wqe rollback_wqe;
 680         u32 rollback_psn;
 681         struct rxe_queue *q = qp->sq.queue;
 682         struct rxe_ah *ah;
 683         struct rxe_av *av;
 684         unsigned long flags;
 685
 686         spin_lock_irqsave(&qp->state_lock, flags);
 687         if (unlikely(!qp->valid)) {
 688                 spin_unlock_irqrestore(&qp->state_lock, flags);
 689                 goto exit;
 690         }
 691
 692         if (unlikely(qp_state(qp) == IB_QPS_ERR)) {
 693                 wqe = __req_next_wqe(qp);
 694                 spin_unlock_irqrestore(&qp->state_lock, flags);
 695                 if (wqe)
 696                         goto err;
 697                 else
 698                         goto exit;
 699         }
 700
 701         if (unlikely(qp_state(qp) == IB_QPS_RESET)) {
 702                 qp->req.wqe_index = queue_get_consumer(q,
 703                                                 QUEUE_TYPE_FROM_CLIENT);
 704                 qp->req.opcode = -1;
 705                 qp->req.need_rd_atomic = 0;
 706                 qp->req.wait_psn = 0;
 707                 qp->req.need_retry = 0;
 708                 qp->req.wait_for_rnr_timer = 0;
 709                 spin_unlock_irqrestore(&qp->state_lock, flags);
 710                 goto exit;
 711         }
 712         spin_unlock_irqrestore(&qp->state_lock, flags);
 713
 714         /* we come here if the retransmit timer has fired
 715          * or if the rnr timer has fired. If the retransmit
 716          * timer fires while we are processing an RNR NAK wait
 717          * until the rnr timer has fired before starting the
 718          * retry flow
 719          */
 720         if (unlikely(qp->req.need_retry && !qp->req.wait_for_rnr_timer)) {
 721                 req_retry(qp);
 722                 qp->req.need_retry = 0;
 723         }
 724
 725         wqe = req_next_wqe(qp);
 726         if (unlikely(!wqe))
 727                 goto exit;
 728
 729         if (rxe_wqe_is_fenced(qp, wqe)) {
 730                 qp->req.wait_fence = 1;
 731                 goto exit;
 732         }
 733
 734         if (wqe->mask & WR_LOCAL_OP_MASK) {
 735                 err = rxe_do_local_ops(qp, wqe);
 736                 if (unlikely(err))
 737                         goto err;
 738                 else
 739                         goto done;
 740         }
 741
 742         if (unlikely(qp_type(qp) == IB_QPT_RC &&
 743                 psn_compare(qp->req.psn, (qp->comp.psn +
 744                                 RXE_MAX_UNACKED_PSNS)) > 0)) {
 745                 qp->req.wait_psn = 1;
 746                 goto exit;
 747         }
 748
 749         /* Limit the number of inflight SKBs per QP */
 750         if (unlikely(atomic_read(&qp->skb_out) >
 751                      RXE_INFLIGHT_SKBS_PER_QP_HIGH)) {
 752                 qp->need_req_skb = 1;
 753                 goto exit;
 754         }
 755
 756         opcode = next_opcode(qp, wqe, wqe->wr.opcode);
 757         if (unlikely(opcode < 0)) {
 758                 wqe->status = IB_WC_LOC_QP_OP_ERR;
 759                 goto err;
 760         }
 761
 762         mask = rxe_opcode[opcode].mask;
 763         if (unlikely(mask & (RXE_READ_OR_ATOMIC_MASK |
 764                         RXE_ATOMIC_WRITE_MASK))) {
 765                 if (check_init_depth(qp, wqe))
 766                         goto exit;
 767         }
 768
 769         mtu = get_mtu(qp);
 770         payload = (mask & (RXE_WRITE_OR_SEND_MASK | RXE_ATOMIC_WRITE_MASK)) ?
 771                         wqe->dma.resid : 0;
 772         if (payload > mtu) {
 773                 if (qp_type(qp) == IB_QPT_UD) {
 774                         /* C10-93.1.1: If the total sum of all the buffer lengths specified for a
 775                          * UD message exceeds the MTU of the port as returned by QueryHCA, the CI
 776                          * shall not emit any packets for this message. Further, the CI shall not
 777                          * generate an error due to this condition.
 778                          */
 779
 780                         /* fake a successful UD send */
 781                         wqe->first_psn = qp->req.psn;
 782                         wqe->last_psn = qp->req.psn;
 783                         qp->req.psn = (qp->req.psn + 1) & BTH_PSN_MASK;
 784                         qp->req.opcode = IB_OPCODE_UD_SEND_ONLY;
 785                         qp->req.wqe_index = queue_next_index(qp->sq.queue,
 786                                                        qp->req.wqe_index);
 787                         wqe->state = wqe_state_done;
 788                         wqe->status = IB_WC_SUCCESS;
 789                         rxe_sched_task(&qp->comp.task);
 790                         goto done;
 791                 }
 792                 payload = mtu;
 793         }
 794
 795         pkt.rxe = rxe;
 796         pkt.opcode = opcode;
 797         pkt.qp = qp;
 798         pkt.psn = qp->req.psn;
 799         pkt.mask = rxe_opcode[opcode].mask;
 800         pkt.wqe = wqe;
 801
 802         /* save wqe state before we build and send packet */
 803         save_state(wqe, qp, &rollback_wqe, &rollback_psn);
 804
 805         av = rxe_get_av(&pkt, &ah);
 806         if (unlikely(!av)) {
 807                 rxe_dbg_qp(qp, "Failed no address vector\n");
 808                 wqe->status = IB_WC_LOC_QP_OP_ERR;
 809                 goto err;
 810         }
 811
 812         skb = init_req_packet(qp, av, wqe, opcode, payload, &pkt);
 813         if (unlikely(!skb)) {
 814                 rxe_dbg_qp(qp, "Failed allocating skb\n");
 815                 wqe->status = IB_WC_LOC_QP_OP_ERR;
 816                 if (ah)
 817                         rxe_put(ah);
 818                 goto err;
 819         }
 820
 821         err = finish_packet(qp, av, wqe, &pkt, skb, payload);
 822         if (unlikely(err)) {
 823                 rxe_dbg_qp(qp, "Error during finish packet\n");
 824                 if (err == -EFAULT)
 825                         wqe->status = IB_WC_LOC_PROT_ERR;
 826                 else
 827                         wqe->status = IB_WC_LOC_QP_OP_ERR;
 828                 kfree_skb(skb);
 829                 if (ah)
 830                         rxe_put(ah);
 831                 goto err;
 832         }
 833
 834         if (ah)
 835                 rxe_put(ah);
 836
 837         /* update wqe state as though we had sent it */
 838         update_wqe_state(qp, wqe, &pkt);
 839         update_wqe_psn(qp, wqe, &pkt, payload);
 840
 841         err = rxe_xmit_packet(qp, &pkt, skb);
 842         if (err) {
 843                 if (err != -EAGAIN) {
 844                         wqe->status = IB_WC_LOC_QP_OP_ERR;
 845                         goto err;
 846                 }
 847
 848                 /* the packet was dropped so reset wqe to the state
 849                  * before we sent it so we can try to resend
 850                  */
 851                 rollback_state(wqe, qp, &rollback_wqe, rollback_psn);
 852
 853                 /* force a delay until the dropped packet is freed and
 854                  * the send queue is drained below the low water mark
 855                  */
 856                 qp->need_req_skb = 1;
 857
 858                 rxe_sched_task(&qp->req.task);
 859                 goto exit;
 860         }
 861
 862         update_state(qp, &pkt);
 863
 864         /* A non-zero return value will cause rxe_do_task to
 865          * exit its loop and end the work item. A zero return
 866          * will continue looping and return to rxe_requester
 867          */
 868 done:
 869         ret = 0;
 870         goto out;
 871 err:
 872         /* update wqe_index for each wqe completion */
 873         qp->req.wqe_index = queue_next_index(qp->sq.queue, qp->req.wqe_index);
 874         wqe->state = wqe_state_error;
 875         rxe_qp_error(qp);
 876 exit:
 877         ret = -EAGAIN;
 878 out:
 879         return ret;
 880 }