net/sunrpc/xprtrdma/svc_rdma_recvfrom.c

   1 // SPDX-License-Identifier: GPL-2.0 OR BSD-3-Clause
   2 /*
   3  * Copyright (c) 2016-2018 Oracle. All rights reserved.
   4  * Copyright (c) 2014 Open Grid Computing, Inc. All rights reserved.
   5  * Copyright (c) 2005-2006 Network Appliance, Inc. All rights reserved.
   6  *
   7  * This software is available to you under a choice of one of two
   8  * licenses.  You may choose to be licensed under the terms of the GNU
   9  * General Public License (GPL) Version 2, available from the file
  10  * COPYING in the main directory of this source tree, or the BSD-type
  11  * license below:
  12  *
  13  * Redistribution and use in source and binary forms, with or without
  14  * modification, are permitted provided that the following conditions
  15  * are met:
  16  *
  17  *      Redistributions of source code must retain the above copyright
  18  *      notice, this list of conditions and the following disclaimer.
  19  *
  20  *      Redistributions in binary form must reproduce the above
  21  *      copyright notice, this list of conditions and the following
  22  *      disclaimer in the documentation and/or other materials provided
  23  *      with the distribution.
  24  *
  25  *      Neither the name of the Network Appliance, Inc. nor the names of
  26  *      its contributors may be used to endorse or promote products
  27  *      derived from this software without specific prior written
  28  *      permission.
  29  *
  30  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  31  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  32  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  33  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  34  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  35  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  36  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  37  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  38  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  39  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  40  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  41  *
  42  * Author: Tom Tucker <tom@opengridcomputing.com>
  43  */
  44
  45 /* Operation
  46  *
  47  * The main entry point is svc_rdma_recvfrom. This is called from
  48  * svc_recv when the transport indicates there is incoming data to
  49  * be read. "Data Ready" is signaled when an RDMA Receive completes,
  50  * or when a set of RDMA Reads complete.
  51  *
  52  * An svc_rqst is passed in. This structure contains an array of
  53  * free pages (rq_pages) that will contain the incoming RPC message.
  54  *
  55  * Short messages are moved directly into svc_rqst::rq_arg, and
  56  * the RPC Call is ready to be processed by the Upper Layer.
  57  * svc_rdma_recvfrom returns the length of the RPC Call message,
  58  * completing the reception of the RPC Call.
  59  *
  60  * However, when an incoming message has Read chunks,
  61  * svc_rdma_recvfrom must post RDMA Reads to pull the RPC Call's
  62  * data payload from the client. svc_rdma_recvfrom sets up the
  63  * RDMA Reads using pages in svc_rqst::rq_pages, which are
  64  * transferred to an svc_rdma_recv_ctxt for the duration of the
  65  * I/O. svc_rdma_recvfrom then returns zero, since the RPC message
  66  * is still not yet ready.
  67  *
  68  * When the Read chunk payloads have become available on the
  69  * server, "Data Ready" is raised again, and svc_recv calls
  70  * svc_rdma_recvfrom again. This second call may use a different
  71  * svc_rqst than the first one, thus any information that needs
  72  * to be preserved across these two calls is kept in an
  73  * svc_rdma_recv_ctxt.
  74  *
  75  * The second call to svc_rdma_recvfrom performs final assembly
  76  * of the RPC Call message, using the RDMA Read sink pages kept in
  77  * the svc_rdma_recv_ctxt. The xdr_buf is copied from the
  78  * svc_rdma_recv_ctxt to the second svc_rqst. The second call returns
  79  * the length of the completed RPC Call message.
  80  *
  81  * Page Management
  82  *
  83  * Pages under I/O must be transferred from the first svc_rqst to an
  84  * svc_rdma_recv_ctxt before the first svc_rdma_recvfrom call returns.
  85  *
  86  * The first svc_rqst supplies pages for RDMA Reads. These are moved
  87  * from rqstp::rq_pages into ctxt::pages. The consumed elements of
  88  * the rq_pages array are set to NULL and refilled with the first
  89  * svc_rdma_recvfrom call returns.
  90  *
  91  * During the second svc_rdma_recvfrom call, RDMA Read sink pages
  92  * are transferred from the svc_rdma_recv_ctxt to the second svc_rqst
  93  * (see rdma_read_complete() below).
  94  */
  95
  96 #include <linux/spinlock.h>
  97 #include <asm/unaligned.h>
  98 #include <rdma/ib_verbs.h>
  99 #include <rdma/rdma_cm.h>
 100
 101 #include <linux/sunrpc/xdr.h>
 102 #include <linux/sunrpc/debug.h>
 103 #include <linux/sunrpc/rpc_rdma.h>
 104 #include <linux/sunrpc/svc_rdma.h>
 105
 106 #include "xprt_rdma.h"
 107 #include <trace/events/rpcrdma.h>
 108
 109 #define RPCDBG_FACILITY RPCDBG_SVCXPRT
 110
 111 static void svc_rdma_wc_receive(struct ib_cq *cq, struct ib_wc *wc);
 112
 113 static inline struct svc_rdma_recv_ctxt *
 114 svc_rdma_next_recv_ctxt(struct list_head *list)
 115 {
 116         return list_first_entry_or_null(list, struct svc_rdma_recv_ctxt,
 117                                         rc_list);
 118 }
 119
 120 static struct svc_rdma_recv_ctxt *
 121 svc_rdma_recv_ctxt_alloc(struct svcxprt_rdma *rdma)
 122 {
 123         struct svc_rdma_recv_ctxt *ctxt;
 124         dma_addr_t addr;
 125         void *buffer;
 126
 127         ctxt = kmalloc(sizeof(*ctxt), GFP_KERNEL);
 128         if (!ctxt)
 129                 goto fail0;
 130         buffer = kmalloc(rdma->sc_max_req_size, GFP_KERNEL);
 131         if (!buffer)
 132                 goto fail1;
 133         addr = ib_dma_map_single(rdma->sc_pd->device, buffer,
 134                                  rdma->sc_max_req_size, DMA_FROM_DEVICE);
 135         if (ib_dma_mapping_error(rdma->sc_pd->device, addr))
 136                 goto fail2;
 137
 138         ctxt->rc_recv_wr.next = NULL;
 139         ctxt->rc_recv_wr.wr_cqe = &ctxt->rc_cqe;
 140         ctxt->rc_recv_wr.sg_list = &ctxt->rc_recv_sge;
 141         ctxt->rc_recv_wr.num_sge = 1;
 142         ctxt->rc_cqe.done = svc_rdma_wc_receive;
 143         ctxt->rc_recv_sge.addr = addr;
 144         ctxt->rc_recv_sge.length = rdma->sc_max_req_size;
 145         ctxt->rc_recv_sge.lkey = rdma->sc_pd->local_dma_lkey;
 146         ctxt->rc_recv_buf = buffer;
 147         ctxt->rc_temp = false;
 148         return ctxt;
 149
 150 fail2:
 151         kfree(buffer);
 152 fail1:
 153         kfree(ctxt);
 154 fail0:
 155         return NULL;
 156 }
 157
 158 static void svc_rdma_recv_ctxt_destroy(struct svcxprt_rdma *rdma,
 159                                        struct svc_rdma_recv_ctxt *ctxt)
 160 {
 161         ib_dma_unmap_single(rdma->sc_pd->device, ctxt->rc_recv_sge.addr,
 162                             ctxt->rc_recv_sge.length, DMA_FROM_DEVICE);
 163         kfree(ctxt->rc_recv_buf);
 164         kfree(ctxt);
 165 }
 166
 167 /**
 168  * svc_rdma_recv_ctxts_destroy - Release all recv_ctxt's for an xprt
 169  * @rdma: svcxprt_rdma being torn down
 170  *
 171  */
 172 void svc_rdma_recv_ctxts_destroy(struct svcxprt_rdma *rdma)
 173 {
 174         struct svc_rdma_recv_ctxt *ctxt;
 175
 176         while ((ctxt = svc_rdma_next_recv_ctxt(&rdma->sc_recv_ctxts))) {
 177                 list_del(&ctxt->rc_list);
 178                 svc_rdma_recv_ctxt_destroy(rdma, ctxt);
 179         }
 180 }
 181
 182 static struct svc_rdma_recv_ctxt *
 183 svc_rdma_recv_ctxt_get(struct svcxprt_rdma *rdma)
 184 {
 185         struct svc_rdma_recv_ctxt *ctxt;
 186
 187         spin_lock(&rdma->sc_recv_lock);
 188         ctxt = svc_rdma_next_recv_ctxt(&rdma->sc_recv_ctxts);
 189         if (!ctxt)
 190                 goto out_empty;
 191         list_del(&ctxt->rc_list);
 192         spin_unlock(&rdma->sc_recv_lock);
 193
 194 out:
 195         ctxt->rc_page_count = 0;
 196         return ctxt;
 197
 198 out_empty:
 199         spin_unlock(&rdma->sc_recv_lock);
 200
 201         ctxt = svc_rdma_recv_ctxt_alloc(rdma);
 202         if (!ctxt)
 203                 return NULL;
 204         goto out;
 205 }
 206
 207 /**
 208  * svc_rdma_recv_ctxt_put - Return recv_ctxt to free list
 209  * @rdma: controlling svcxprt_rdma
 210  * @ctxt: object to return to the free list
 211  *
 212  */
 213 void svc_rdma_recv_ctxt_put(struct svcxprt_rdma *rdma,
 214                             struct svc_rdma_recv_ctxt *ctxt)
 215 {
 216         unsigned int i;
 217
 218         for (i = 0; i < ctxt->rc_page_count; i++)
 219                 put_page(ctxt->rc_pages[i]);
 220
 221         if (!ctxt->rc_temp) {
 222                 spin_lock(&rdma->sc_recv_lock);
 223                 list_add(&ctxt->rc_list, &rdma->sc_recv_ctxts);
 224                 spin_unlock(&rdma->sc_recv_lock);
 225         } else
 226                 svc_rdma_recv_ctxt_destroy(rdma, ctxt);
 227 }
 228
 229 /**
 230  * svc_rdma_release_rqst - Release transport-specific per-rqst resources
 231  * @rqstp: svc_rqst being released
 232  *
 233  * Ensure that the recv_ctxt is released whether or not a Reply
 234  * was sent. For example, the client could close the connection,
 235  * or svc_process could drop an RPC, before the Reply is sent.
 236  */
 237 void svc_rdma_release_rqst(struct svc_rqst *rqstp)
 238 {
 239         struct svc_rdma_recv_ctxt *ctxt = rqstp->rq_xprt_ctxt;
 240         struct svc_xprt *xprt = rqstp->rq_xprt;
 241         struct svcxprt_rdma *rdma =
 242                 container_of(xprt, struct svcxprt_rdma, sc_xprt);
 243
 244         rqstp->rq_xprt_ctxt = NULL;
 245         if (ctxt)
 246                 svc_rdma_recv_ctxt_put(rdma, ctxt);
 247 }
 248
 249 static int __svc_rdma_post_recv(struct svcxprt_rdma *rdma,
 250                                 struct svc_rdma_recv_ctxt *ctxt)
 251 {
 252         int ret;
 253
 254         svc_xprt_get(&rdma->sc_xprt);
 255         ret = ib_post_recv(rdma->sc_qp, &ctxt->rc_recv_wr, NULL);
 256         trace_svcrdma_post_recv(&ctxt->rc_recv_wr, ret);
 257         if (ret)
 258                 goto err_post;
 259         return 0;
 260
 261 err_post:
 262         svc_rdma_recv_ctxt_put(rdma, ctxt);
 263         svc_xprt_put(&rdma->sc_xprt);
 264         return ret;
 265 }
 266
 267 static int svc_rdma_post_recv(struct svcxprt_rdma *rdma)
 268 {
 269         struct svc_rdma_recv_ctxt *ctxt;
 270
 271         ctxt = svc_rdma_recv_ctxt_get(rdma);
 272         if (!ctxt)
 273                 return -ENOMEM;
 274         return __svc_rdma_post_recv(rdma, ctxt);
 275 }
 276
 277 /**
 278  * svc_rdma_post_recvs - Post initial set of Recv WRs
 279  * @rdma: fresh svcxprt_rdma
 280  *
 281  * Returns true if successful, otherwise false.
 282  */
 283 bool svc_rdma_post_recvs(struct svcxprt_rdma *rdma)
 284 {
 285         struct svc_rdma_recv_ctxt *ctxt;
 286         unsigned int i;
 287         int ret;
 288
 289         for (i = 0; i < rdma->sc_max_requests; i++) {
 290                 ctxt = svc_rdma_recv_ctxt_get(rdma);
 291                 if (!ctxt)
 292                         return false;
 293                 ctxt->rc_temp = true;
 294                 ret = __svc_rdma_post_recv(rdma, ctxt);
 295                 if (ret) {
 296                         pr_err("svcrdma: failure posting recv buffers: %d\n",
 297                                ret);
 298                         return false;
 299                 }
 300         }
 301         return true;
 302 }
 303
 304 /**
 305  * svc_rdma_wc_receive - Invoked by RDMA provider for each polled Receive WC
 306  * @cq: Completion Queue context
 307  * @wc: Work Completion object
 308  *
 309  * NB: The svc_xprt/svcxprt_rdma is pinned whenever it's possible that
 310  * the Receive completion handler could be running.
 311  */
 312 static void svc_rdma_wc_receive(struct ib_cq *cq, struct ib_wc *wc)
 313 {
 314         struct svcxprt_rdma *rdma = cq->cq_context;
 315         struct ib_cqe *cqe = wc->wr_cqe;
 316         struct svc_rdma_recv_ctxt *ctxt;
 317
 318         trace_svcrdma_wc_receive(wc);
 319
 320         /* WARNING: Only wc->wr_cqe and wc->status are reliable */
 321         ctxt = container_of(cqe, struct svc_rdma_recv_ctxt, rc_cqe);
 322
 323         if (wc->status != IB_WC_SUCCESS)
 324                 goto flushed;
 325
 326         if (svc_rdma_post_recv(rdma))
 327                 goto post_err;
 328
 329         /* All wc fields are now known to be valid */
 330         ctxt->rc_byte_len = wc->byte_len;
 331         ib_dma_sync_single_for_cpu(rdma->sc_pd->device,
 332                                    ctxt->rc_recv_sge.addr,
 333                                    wc->byte_len, DMA_FROM_DEVICE);
 334
 335         spin_lock(&rdma->sc_rq_dto_lock);
 336         list_add_tail(&ctxt->rc_list, &rdma->sc_rq_dto_q);
 337         spin_unlock(&rdma->sc_rq_dto_lock);
 338         set_bit(XPT_DATA, &rdma->sc_xprt.xpt_flags);
 339         if (!test_bit(RDMAXPRT_CONN_PENDING, &rdma->sc_flags))
 340                 svc_xprt_enqueue(&rdma->sc_xprt);
 341         goto out;
 342
 343 flushed:
 344         if (wc->status != IB_WC_WR_FLUSH_ERR)
 345                 pr_err("svcrdma: Recv: %s (%u/0x%x)\n",
 346                        ib_wc_status_msg(wc->status),
 347                        wc->status, wc->vendor_err);
 348 post_err:
 349         svc_rdma_recv_ctxt_put(rdma, ctxt);
 350         set_bit(XPT_CLOSE, &rdma->sc_xprt.xpt_flags);
 351         svc_xprt_enqueue(&rdma->sc_xprt);
 352 out:
 353         svc_xprt_put(&rdma->sc_xprt);
 354 }
 355
 356 /**
 357  * svc_rdma_flush_recv_queues - Drain pending Receive work
 358  * @rdma: svcxprt_rdma being shut down
 359  *
 360  */
 361 void svc_rdma_flush_recv_queues(struct svcxprt_rdma *rdma)
 362 {
 363         struct svc_rdma_recv_ctxt *ctxt;
 364
 365         while ((ctxt = svc_rdma_next_recv_ctxt(&rdma->sc_read_complete_q))) {
 366                 list_del(&ctxt->rc_list);
 367                 svc_rdma_recv_ctxt_put(rdma, ctxt);
 368         }
 369         while ((ctxt = svc_rdma_next_recv_ctxt(&rdma->sc_rq_dto_q))) {
 370                 list_del(&ctxt->rc_list);
 371                 svc_rdma_recv_ctxt_put(rdma, ctxt);
 372         }
 373 }
 374
 375 static void svc_rdma_build_arg_xdr(struct svc_rqst *rqstp,
 376                                    struct svc_rdma_recv_ctxt *ctxt)
 377 {
 378         struct xdr_buf *arg = &rqstp->rq_arg;
 379
 380         arg->head[0].iov_base = ctxt->rc_recv_buf;
 381         arg->head[0].iov_len = ctxt->rc_byte_len;
 382         arg->tail[0].iov_base = NULL;
 383         arg->tail[0].iov_len = 0;
 384         arg->page_len = 0;
 385         arg->page_base = 0;
 386         arg->buflen = ctxt->rc_byte_len;
 387         arg->len = ctxt->rc_byte_len;
 388 }
 389
 390 /* This accommodates the largest possible Write chunk,
 391  * in one segment.
 392  */
 393 #define MAX_BYTES_WRITE_SEG     ((u32)(RPCSVC_MAXPAGES << PAGE_SHIFT))
 394
 395 /* This accommodates the largest possible Position-Zero
 396  * Read chunk or Reply chunk, in one segment.
 397  */
 398 #define MAX_BYTES_SPECIAL_SEG   ((u32)((RPCSVC_MAXPAGES + 2) << PAGE_SHIFT))
 399
 400 /* Sanity check the Read list.
 401  *
 402  * Implementation limits:
 403  * - This implementation supports only one Read chunk.
 404  *
 405  * Sanity checks:
 406  * - Read list does not overflow buffer.
 407  * - Segment size limited by largest NFS data payload.
 408  *
 409  * The segment count is limited to how many segments can
 410  * fit in the transport header without overflowing the
 411  * buffer. That's about 40 Read segments for a 1KB inline
 412  * threshold.
 413  *
 414  * Returns pointer to the following Write list.
 415  */
 416 static __be32 *xdr_check_read_list(__be32 *p, const __be32 *end)
 417 {
 418         u32 position;
 419         bool first;
 420
 421         first = true;
 422         while (*p++ != xdr_zero) {
 423                 if (first) {
 424                         position = be32_to_cpup(p++);
 425                         first = false;
 426                 } else if (be32_to_cpup(p++) != position) {
 427                         return NULL;
 428                 }
 429                 p++;    /* handle */
 430                 if (be32_to_cpup(p++) > MAX_BYTES_SPECIAL_SEG)
 431                         return NULL;
 432                 p += 2; /* offset */
 433
 434                 if (p > end)
 435                         return NULL;
 436         }
 437         return p;
 438 }
 439
 440 /* The segment count is limited to how many segments can
 441  * fit in the transport header without overflowing the
 442  * buffer. That's about 60 Write segments for a 1KB inline
 443  * threshold.
 444  */
 445 static __be32 *xdr_check_write_chunk(__be32 *p, const __be32 *end,
 446                                      u32 maxlen)
 447 {
 448         u32 i, segcount;
 449
 450         segcount = be32_to_cpup(p++);
 451         for (i = 0; i < segcount; i++) {
 452                 p++;    /* handle */
 453                 if (be32_to_cpup(p++) > maxlen)
 454                         return NULL;
 455                 p += 2; /* offset */
 456
 457                 if (p > end)
 458                         return NULL;
 459         }
 460
 461         return p;
 462 }
 463
 464 /* Sanity check the Write list.
 465  *
 466  * Implementation limits:
 467  * - This implementation supports only one Write chunk.
 468  *
 469  * Sanity checks:
 470  * - Write list does not overflow buffer.
 471  * - Segment size limited by largest NFS data payload.
 472  *
 473  * Returns pointer to the following Reply chunk.
 474  */
 475 static __be32 *xdr_check_write_list(__be32 *p, const __be32 *end)
 476 {
 477         u32 chcount;
 478
 479         chcount = 0;
 480         while (*p++ != xdr_zero) {
 481                 p = xdr_check_write_chunk(p, end, MAX_BYTES_WRITE_SEG);
 482                 if (!p)
 483                         return NULL;
 484                 if (chcount++ > 1)
 485                         return NULL;
 486         }
 487         return p;
 488 }
 489
 490 /* Sanity check the Reply chunk.
 491  *
 492  * Sanity checks:
 493  * - Reply chunk does not overflow buffer.
 494  * - Segment size limited by largest NFS data payload.
 495  *
 496  * Returns pointer to the following RPC header.
 497  */
 498 static __be32 *xdr_check_reply_chunk(__be32 *p, const __be32 *end)
 499 {
 500         if (*p++ != xdr_zero) {
 501                 p = xdr_check_write_chunk(p, end, MAX_BYTES_SPECIAL_SEG);
 502                 if (!p)
 503                         return NULL;
 504         }
 505         return p;
 506 }
 507
 508 /* On entry, xdr->head[0].iov_base points to first byte in the
 509  * RPC-over-RDMA header.
 510  *
 511  * On successful exit, head[0] points to first byte past the
 512  * RPC-over-RDMA header. For RDMA_MSG, this is the RPC message.
 513  * The length of the RPC-over-RDMA header is returned.
 514  *
 515  * Assumptions:
 516  * - The transport header is entirely contained in the head iovec.
 517  */
 518 static int svc_rdma_xdr_decode_req(struct xdr_buf *rq_arg)
 519 {
 520         __be32 *p, *end, *rdma_argp;
 521         unsigned int hdr_len;
 522
 523         /* Verify that there's enough bytes for header + something */
 524         if (rq_arg->len <= RPCRDMA_HDRLEN_ERR)
 525                 goto out_short;
 526
 527         rdma_argp = rq_arg->head[0].iov_base;
 528         if (*(rdma_argp + 1) != rpcrdma_version)
 529                 goto out_version;
 530
 531         switch (*(rdma_argp + 3)) {
 532         case rdma_msg:
 533                 break;
 534         case rdma_nomsg:
 535                 break;
 536
 537         case rdma_done:
 538                 goto out_drop;
 539
 540         case rdma_error:
 541                 goto out_drop;
 542
 543         default:
 544                 goto out_proc;
 545         }
 546
 547         end = (__be32 *)((unsigned long)rdma_argp + rq_arg->len);
 548         p = xdr_check_read_list(rdma_argp + 4, end);
 549         if (!p)
 550                 goto out_inval;
 551         p = xdr_check_write_list(p, end);
 552         if (!p)
 553                 goto out_inval;
 554         p = xdr_check_reply_chunk(p, end);
 555         if (!p)
 556                 goto out_inval;
 557         if (p > end)
 558                 goto out_inval;
 559
 560         rq_arg->head[0].iov_base = p;
 561         hdr_len = (unsigned long)p - (unsigned long)rdma_argp;
 562         rq_arg->head[0].iov_len -= hdr_len;
 563         rq_arg->len -= hdr_len;
 564         trace_svcrdma_decode_rqst(rdma_argp, hdr_len);
 565         return hdr_len;
 566
 567 out_short:
 568         trace_svcrdma_decode_short(rq_arg->len);
 569         return -EINVAL;
 570
 571 out_version:
 572         trace_svcrdma_decode_badvers(rdma_argp);
 573         return -EPROTONOSUPPORT;
 574
 575 out_drop:
 576         trace_svcrdma_decode_drop(rdma_argp);
 577         return 0;
 578
 579 out_proc:
 580         trace_svcrdma_decode_badproc(rdma_argp);
 581         return -EINVAL;
 582
 583 out_inval:
 584         trace_svcrdma_decode_parse(rdma_argp);
 585         return -EINVAL;
 586 }
 587
 588 static void rdma_read_complete(struct svc_rqst *rqstp,
 589                                struct svc_rdma_recv_ctxt *head)
 590 {
 591         int page_no;
 592
 593         /* Move Read chunk pages to rqstp so that they will be released
 594          * when svc_process is done with them.
 595          */
 596         for (page_no = 0; page_no < head->rc_page_count; page_no++) {
 597                 put_page(rqstp->rq_pages[page_no]);
 598                 rqstp->rq_pages[page_no] = head->rc_pages[page_no];
 599         }
 600         head->rc_page_count = 0;
 601
 602         /* Point rq_arg.pages past header */
 603         rqstp->rq_arg.pages = &rqstp->rq_pages[head->rc_hdr_count];
 604         rqstp->rq_arg.page_len = head->rc_arg.page_len;
 605
 606         /* rq_respages starts after the last arg page */
 607         rqstp->rq_respages = &rqstp->rq_pages[page_no];
 608         rqstp->rq_next_page = rqstp->rq_respages + 1;
 609
 610         /* Rebuild rq_arg head and tail. */
 611         rqstp->rq_arg.head[0] = head->rc_arg.head[0];
 612         rqstp->rq_arg.tail[0] = head->rc_arg.tail[0];
 613         rqstp->rq_arg.len = head->rc_arg.len;
 614         rqstp->rq_arg.buflen = head->rc_arg.buflen;
 615 }
 616
 617 static void svc_rdma_send_error(struct svcxprt_rdma *xprt,
 618                                 __be32 *rdma_argp, int status)
 619 {
 620         struct svc_rdma_send_ctxt *ctxt;
 621         unsigned int length;
 622         __be32 *p;
 623         int ret;
 624
 625         ctxt = svc_rdma_send_ctxt_get(xprt);
 626         if (!ctxt)
 627                 return;
 628
 629         p = ctxt->sc_xprt_buf;
 630         *p++ = *rdma_argp;
 631         *p++ = *(rdma_argp + 1);
 632         *p++ = xprt->sc_fc_credits;
 633         *p++ = rdma_error;
 634         switch (status) {
 635         case -EPROTONOSUPPORT:
 636                 *p++ = err_vers;
 637                 *p++ = rpcrdma_version;
 638                 *p++ = rpcrdma_version;
 639                 trace_svcrdma_err_vers(*rdma_argp);
 640                 break;
 641         default:
 642                 *p++ = err_chunk;
 643                 trace_svcrdma_err_chunk(*rdma_argp);
 644         }
 645         length = (unsigned long)p - (unsigned long)ctxt->sc_xprt_buf;
 646         svc_rdma_sync_reply_hdr(xprt, ctxt, length);
 647
 648         ctxt->sc_send_wr.opcode = IB_WR_SEND;
 649         ret = svc_rdma_send(xprt, &ctxt->sc_send_wr);
 650         if (ret)
 651                 svc_rdma_send_ctxt_put(xprt, ctxt);
 652 }
 653
 654 /* By convention, backchannel calls arrive via rdma_msg type
 655  * messages, and never populate the chunk lists. This makes
 656  * the RPC/RDMA header small and fixed in size, so it is
 657  * straightforward to check the RPC header's direction field.
 658  */
 659 static bool svc_rdma_is_backchannel_reply(struct svc_xprt *xprt,
 660                                           __be32 *rdma_resp)
 661 {
 662         __be32 *p;
 663
 664         if (!xprt->xpt_bc_xprt)
 665                 return false;
 666
 667         p = rdma_resp + 3;
 668         if (*p++ != rdma_msg)
 669                 return false;
 670
 671         if (*p++ != xdr_zero)
 672                 return false;
 673         if (*p++ != xdr_zero)
 674                 return false;
 675         if (*p++ != xdr_zero)
 676                 return false;
 677
 678         /* XID sanity */
 679         if (*p++ != *rdma_resp)
 680                 return false;
 681         /* call direction */
 682         if (*p == cpu_to_be32(RPC_CALL))
 683                 return false;
 684
 685         return true;
 686 }
 687
 688 /**
 689  * svc_rdma_recvfrom - Receive an RPC call
 690  * @rqstp: request structure into which to receive an RPC Call
 691  *
 692  * Returns:
 693  *      The positive number of bytes in the RPC Call message,
 694  *      %0 if there were no Calls ready to return,
 695  *      %-EINVAL if the Read chunk data is too large,
 696  *      %-ENOMEM if rdma_rw context pool was exhausted,
 697  *      %-ENOTCONN if posting failed (connection is lost),
 698  *      %-EIO if rdma_rw initialization failed (DMA mapping, etc).
 699  *
 700  * Called in a loop when XPT_DATA is set. XPT_DATA is cleared only
 701  * when there are no remaining ctxt's to process.
 702  *
 703  * The next ctxt is removed from the "receive" lists.
 704  *
 705  * - If the ctxt completes a Read, then finish assembling the Call
 706  *   message and return the number of bytes in the message.
 707  *
 708  * - If the ctxt completes a Receive, then construct the Call
 709  *   message from the contents of the Receive buffer.
 710  *
 711  *   - If there are no Read chunks in this message, then finish
 712  *     assembling the Call message and return the number of bytes
 713  *     in the message.
 714  *
 715  *   - If there are Read chunks in this message, post Read WRs to
 716  *     pull that payload and return 0.
 717  */
 718 int svc_rdma_recvfrom(struct svc_rqst *rqstp)
 719 {
 720         struct svc_xprt *xprt = rqstp->rq_xprt;
 721         struct svcxprt_rdma *rdma_xprt =
 722                 container_of(xprt, struct svcxprt_rdma, sc_xprt);
 723         struct svc_rdma_recv_ctxt *ctxt;
 724         __be32 *p;
 725         int ret;
 726
 727         rqstp->rq_xprt_ctxt = NULL;
 728
 729         spin_lock(&rdma_xprt->sc_rq_dto_lock);
 730         ctxt = svc_rdma_next_recv_ctxt(&rdma_xprt->sc_read_complete_q);
 731         if (ctxt) {
 732                 list_del(&ctxt->rc_list);
 733                 spin_unlock(&rdma_xprt->sc_rq_dto_lock);
 734                 rdma_read_complete(rqstp, ctxt);
 735                 goto complete;
 736         }
 737         ctxt = svc_rdma_next_recv_ctxt(&rdma_xprt->sc_rq_dto_q);
 738         if (!ctxt) {
 739                 /* No new incoming requests, terminate the loop */
 740                 clear_bit(XPT_DATA, &xprt->xpt_flags);
 741                 spin_unlock(&rdma_xprt->sc_rq_dto_lock);
 742                 return 0;
 743         }
 744         list_del(&ctxt->rc_list);
 745         spin_unlock(&rdma_xprt->sc_rq_dto_lock);
 746
 747         atomic_inc(&rdma_stat_recv);
 748
 749         svc_rdma_build_arg_xdr(rqstp, ctxt);
 750
 751         /* Prevent svc_xprt_release from releasing pages in rq_pages
 752          * if we return 0 or an error.
 753          */
 754         rqstp->rq_respages = rqstp->rq_pages;
 755         rqstp->rq_next_page = rqstp->rq_respages;
 756
 757         p = (__be32 *)rqstp->rq_arg.head[0].iov_base;
 758         ret = svc_rdma_xdr_decode_req(&rqstp->rq_arg);
 759         if (ret < 0)
 760                 goto out_err;
 761         if (ret == 0)
 762                 goto out_drop;
 763         rqstp->rq_xprt_hlen = ret;
 764
 765         if (svc_rdma_is_backchannel_reply(xprt, p)) {
 766                 ret = svc_rdma_handle_bc_reply(xprt->xpt_bc_xprt, p,
 767                                                &rqstp->rq_arg);
 768                 svc_rdma_recv_ctxt_put(rdma_xprt, ctxt);
 769                 return ret;
 770         }
 771
 772         p += rpcrdma_fixed_maxsz;
 773         if (*p != xdr_zero)
 774                 goto out_readchunk;
 775
 776 complete:
 777         rqstp->rq_xprt_ctxt = ctxt;
 778         rqstp->rq_prot = IPPROTO_MAX;
 779         svc_xprt_copy_addrs(rqstp, xprt);
 780         return rqstp->rq_arg.len;
 781
 782 out_readchunk:
 783         ret = svc_rdma_recv_read_chunk(rdma_xprt, rqstp, ctxt, p);
 784         if (ret < 0)
 785                 goto out_postfail;
 786         return 0;
 787
 788 out_err:
 789         svc_rdma_send_error(rdma_xprt, p, ret);
 790         svc_rdma_recv_ctxt_put(rdma_xprt, ctxt);
 791         return 0;
 792
 793 out_postfail:
 794         if (ret == -EINVAL)
 795                 svc_rdma_send_error(rdma_xprt, p, ret);
 796         svc_rdma_recv_ctxt_put(rdma_xprt, ctxt);
 797         return ret;
 798
 799 out_drop:
 800         svc_rdma_recv_ctxt_put(rdma_xprt, ctxt);
 801         return 0;
 802 }