fs/cifs/smbdirect.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  *   Copyright (C) 2017, Microsoft Corporation.
   4  *
   5  *   Author(s): Long Li <longli@microsoft.com>
   6  */
   7 #include <linux/module.h>
   8 #include <linux/highmem.h>
   9 #include "smbdirect.h"
  10 #include "cifs_debug.h"
  11 #include "cifsproto.h"
  12 #include "smb2proto.h"
  13
  14 static struct smbd_response *get_empty_queue_buffer(
  15                 struct smbd_connection *info);
  16 static struct smbd_response *get_receive_buffer(
  17                 struct smbd_connection *info);
  18 static void put_receive_buffer(
  19                 struct smbd_connection *info,
  20                 struct smbd_response *response);
  21 static int allocate_receive_buffers(struct smbd_connection *info, int num_buf);
  22 static void destroy_receive_buffers(struct smbd_connection *info);
  23
  24 static void put_empty_packet(
  25                 struct smbd_connection *info, struct smbd_response *response);
  26 static void enqueue_reassembly(
  27                 struct smbd_connection *info,
  28                 struct smbd_response *response, int data_length);
  29 static struct smbd_response *_get_first_reassembly(
  30                 struct smbd_connection *info);
  31
  32 static int smbd_post_recv(
  33                 struct smbd_connection *info,
  34                 struct smbd_response *response);
  35
  36 static int smbd_post_send_empty(struct smbd_connection *info);
  37 static int smbd_post_send_data(
  38                 struct smbd_connection *info,
  39                 struct kvec *iov, int n_vec, int remaining_data_length);
  40 static int smbd_post_send_page(struct smbd_connection *info,
  41                 struct page *page, unsigned long offset,
  42                 size_t size, int remaining_data_length);
  43
  44 static void destroy_mr_list(struct smbd_connection *info);
  45 static int allocate_mr_list(struct smbd_connection *info);
  46
  47 /* SMBD version number */
  48 #define SMBD_V1 0x0100
  49
  50 /* Port numbers for SMBD transport */
  51 #define SMB_PORT        445
  52 #define SMBD_PORT       5445
  53
  54 /* Address lookup and resolve timeout in ms */
  55 #define RDMA_RESOLVE_TIMEOUT    5000
  56
  57 /* SMBD negotiation timeout in seconds */
  58 #define SMBD_NEGOTIATE_TIMEOUT  120
  59
  60 /* SMBD minimum receive size and fragmented sized defined in [MS-SMBD] */
  61 #define SMBD_MIN_RECEIVE_SIZE           128
  62 #define SMBD_MIN_FRAGMENTED_SIZE        131072
  63
  64 /*
  65  * Default maximum number of RDMA read/write outstanding on this connection
  66  * This value is possibly decreased during QP creation on hardware limit
  67  */
  68 #define SMBD_CM_RESPONDER_RESOURCES     32
  69
  70 /* Maximum number of retries on data transfer operations */
  71 #define SMBD_CM_RETRY                   6
  72 /* No need to retry on Receiver Not Ready since SMBD manages credits */
  73 #define SMBD_CM_RNR_RETRY               0
  74
  75 /*
  76  * User configurable initial values per SMBD transport connection
  77  * as defined in [MS-SMBD] 3.1.1.1
  78  * Those may change after a SMBD negotiation
  79  */
  80 /* The local peer's maximum number of credits to grant to the peer */
  81 int smbd_receive_credit_max = 255;
  82
  83 /* The remote peer's credit request of local peer */
  84 int smbd_send_credit_target = 255;
  85
  86 /* The maximum single message size can be sent to remote peer */
  87 int smbd_max_send_size = 1364;
  88
  89 /*  The maximum fragmented upper-layer payload receive size supported */
  90 int smbd_max_fragmented_recv_size = 1024 * 1024;
  91
  92 /*  The maximum single-message size which can be received */
  93 int smbd_max_receive_size = 8192;
  94
  95 /* The timeout to initiate send of a keepalive message on idle */
  96 int smbd_keep_alive_interval = 120;
  97
  98 /*
  99  * User configurable initial values for RDMA transport
 100  * The actual values used may be lower and are limited to hardware capabilities
 101  */
 102 /* Default maximum number of SGEs in a RDMA write/read */
 103 int smbd_max_frmr_depth = 2048;
 104
 105 /* If payload is less than this byte, use RDMA send/recv not read/write */
 106 int rdma_readwrite_threshold = 4096;
 107
 108 /* Transport logging functions
 109  * Logging are defined as classes. They can be OR'ed to define the actual
 110  * logging level via module parameter smbd_logging_class
 111  * e.g. cifs.smbd_logging_class=0xa0 will log all log_rdma_recv() and
 112  * log_rdma_event()
 113  */
 114 #define LOG_OUTGOING                    0x1
 115 #define LOG_INCOMING                    0x2
 116 #define LOG_READ                        0x4
 117 #define LOG_WRITE                       0x8
 118 #define LOG_RDMA_SEND                   0x10
 119 #define LOG_RDMA_RECV                   0x20
 120 #define LOG_KEEP_ALIVE                  0x40
 121 #define LOG_RDMA_EVENT                  0x80
 122 #define LOG_RDMA_MR                     0x100
 123 static unsigned int smbd_logging_class;
 124 module_param(smbd_logging_class, uint, 0644);
 125 MODULE_PARM_DESC(smbd_logging_class,
 126         "Logging class for SMBD transport 0x0 to 0x100");
 127
 128 #define ERR             0x0
 129 #define INFO            0x1
 130 static unsigned int smbd_logging_level = ERR;
 131 module_param(smbd_logging_level, uint, 0644);
 132 MODULE_PARM_DESC(smbd_logging_level,
 133         "Logging level for SMBD transport, 0 (default): error, 1: info");
 134
 135 #define log_rdma(level, class, fmt, args...)                            \
 136 do {                                                                    \
 137         if (level <= smbd_logging_level || class & smbd_logging_class)  \
 138                 cifs_dbg(VFS, "%s:%d " fmt, __func__, __LINE__, ##args);\
 139 } while (0)
 140
 141 #define log_outgoing(level, fmt, args...) \
 142                 log_rdma(level, LOG_OUTGOING, fmt, ##args)
 143 #define log_incoming(level, fmt, args...) \
 144                 log_rdma(level, LOG_INCOMING, fmt, ##args)
 145 #define log_read(level, fmt, args...)   log_rdma(level, LOG_READ, fmt, ##args)
 146 #define log_write(level, fmt, args...)  log_rdma(level, LOG_WRITE, fmt, ##args)
 147 #define log_rdma_send(level, fmt, args...) \
 148                 log_rdma(level, LOG_RDMA_SEND, fmt, ##args)
 149 #define log_rdma_recv(level, fmt, args...) \
 150                 log_rdma(level, LOG_RDMA_RECV, fmt, ##args)
 151 #define log_keep_alive(level, fmt, args...) \
 152                 log_rdma(level, LOG_KEEP_ALIVE, fmt, ##args)
 153 #define log_rdma_event(level, fmt, args...) \
 154                 log_rdma(level, LOG_RDMA_EVENT, fmt, ##args)
 155 #define log_rdma_mr(level, fmt, args...) \
 156                 log_rdma(level, LOG_RDMA_MR, fmt, ##args)
 157
 158 static void smbd_disconnect_rdma_work(struct work_struct *work)
 159 {
 160         struct smbd_connection *info =
 161                 container_of(work, struct smbd_connection, disconnect_work);
 162
 163         if (info->transport_status == SMBD_CONNECTED) {
 164                 info->transport_status = SMBD_DISCONNECTING;
 165                 rdma_disconnect(info->id);
 166         }
 167 }
 168
 169 static void smbd_disconnect_rdma_connection(struct smbd_connection *info)
 170 {
 171         queue_work(info->workqueue, &info->disconnect_work);
 172 }
 173
 174 /* Upcall from RDMA CM */
 175 static int smbd_conn_upcall(
 176                 struct rdma_cm_id *id, struct rdma_cm_event *event)
 177 {
 178         struct smbd_connection *info = id->context;
 179
 180         log_rdma_event(INFO, "event=%d status=%d\n",
 181                 event->event, event->status);
 182
 183         switch (event->event) {
 184         case RDMA_CM_EVENT_ADDR_RESOLVED:
 185         case RDMA_CM_EVENT_ROUTE_RESOLVED:
 186                 info->ri_rc = 0;
 187                 complete(&info->ri_done);
 188                 break;
 189
 190         case RDMA_CM_EVENT_ADDR_ERROR:
 191                 info->ri_rc = -EHOSTUNREACH;
 192                 complete(&info->ri_done);
 193                 break;
 194
 195         case RDMA_CM_EVENT_ROUTE_ERROR:
 196                 info->ri_rc = -ENETUNREACH;
 197                 complete(&info->ri_done);
 198                 break;
 199
 200         case RDMA_CM_EVENT_ESTABLISHED:
 201                 log_rdma_event(INFO, "connected event=%d\n", event->event);
 202                 info->transport_status = SMBD_CONNECTED;
 203                 wake_up_interruptible(&info->conn_wait);
 204                 break;
 205
 206         case RDMA_CM_EVENT_CONNECT_ERROR:
 207         case RDMA_CM_EVENT_UNREACHABLE:
 208         case RDMA_CM_EVENT_REJECTED:
 209                 log_rdma_event(INFO, "connecting failed event=%d\n", event->event);
 210                 info->transport_status = SMBD_DISCONNECTED;
 211                 wake_up_interruptible(&info->conn_wait);
 212                 break;
 213
 214         case RDMA_CM_EVENT_DEVICE_REMOVAL:
 215         case RDMA_CM_EVENT_DISCONNECTED:
 216                 /* This happenes when we fail the negotiation */
 217                 if (info->transport_status == SMBD_NEGOTIATE_FAILED) {
 218                         info->transport_status = SMBD_DISCONNECTED;
 219                         wake_up(&info->conn_wait);
 220                         break;
 221                 }
 222
 223                 info->transport_status = SMBD_DISCONNECTED;
 224                 wake_up_interruptible(&info->disconn_wait);
 225                 wake_up_interruptible(&info->wait_reassembly_queue);
 226                 wake_up_interruptible_all(&info->wait_send_queue);
 227                 break;
 228
 229         default:
 230                 break;
 231         }
 232
 233         return 0;
 234 }
 235
 236 /* Upcall from RDMA QP */
 237 static void
 238 smbd_qp_async_error_upcall(struct ib_event *event, void *context)
 239 {
 240         struct smbd_connection *info = context;
 241
 242         log_rdma_event(ERR, "%s on device %s info %p\n",
 243                 ib_event_msg(event->event), event->device->name, info);
 244
 245         switch (event->event) {
 246         case IB_EVENT_CQ_ERR:
 247         case IB_EVENT_QP_FATAL:
 248                 smbd_disconnect_rdma_connection(info);
 249
 250         default:
 251                 break;
 252         }
 253 }
 254
 255 static inline void *smbd_request_payload(struct smbd_request *request)
 256 {
 257         return (void *)request->packet;
 258 }
 259
 260 static inline void *smbd_response_payload(struct smbd_response *response)
 261 {
 262         return (void *)response->packet;
 263 }
 264
 265 /* Called when a RDMA send is done */
 266 static void send_done(struct ib_cq *cq, struct ib_wc *wc)
 267 {
 268         int i;
 269         struct smbd_request *request =
 270                 container_of(wc->wr_cqe, struct smbd_request, cqe);
 271
 272         log_rdma_send(INFO, "smbd_request %p completed wc->status=%d\n",
 273                 request, wc->status);
 274
 275         if (wc->status != IB_WC_SUCCESS || wc->opcode != IB_WC_SEND) {
 276                 log_rdma_send(ERR, "wc->status=%d wc->opcode=%d\n",
 277                         wc->status, wc->opcode);
 278                 smbd_disconnect_rdma_connection(request->info);
 279         }
 280
 281         for (i = 0; i < request->num_sge; i++)
 282                 ib_dma_unmap_single(request->info->id->device,
 283                         request->sge[i].addr,
 284                         request->sge[i].length,
 285                         DMA_TO_DEVICE);
 286
 287         if (request->has_payload) {
 288                 if (atomic_dec_and_test(&request->info->send_payload_pending))
 289                         wake_up(&request->info->wait_send_payload_pending);
 290         } else {
 291                 if (atomic_dec_and_test(&request->info->send_pending))
 292                         wake_up(&request->info->wait_send_pending);
 293         }
 294
 295         mempool_free(request, request->info->request_mempool);
 296 }
 297
 298 static void dump_smbd_negotiate_resp(struct smbd_negotiate_resp *resp)
 299 {
 300         log_rdma_event(INFO, "resp message min_version %u max_version %u "
 301                 "negotiated_version %u credits_requested %u "
 302                 "credits_granted %u status %u max_readwrite_size %u "
 303                 "preferred_send_size %u max_receive_size %u "
 304                 "max_fragmented_size %u\n",
 305                 resp->min_version, resp->max_version, resp->negotiated_version,
 306                 resp->credits_requested, resp->credits_granted, resp->status,
 307                 resp->max_readwrite_size, resp->preferred_send_size,
 308                 resp->max_receive_size, resp->max_fragmented_size);
 309 }
 310
 311 /*
 312  * Process a negotiation response message, according to [MS-SMBD]3.1.5.7
 313  * response, packet_length: the negotiation response message
 314  * return value: true if negotiation is a success, false if failed
 315  */
 316 static bool process_negotiation_response(
 317                 struct smbd_response *response, int packet_length)
 318 {
 319         struct smbd_connection *info = response->info;
 320         struct smbd_negotiate_resp *packet = smbd_response_payload(response);
 321
 322         if (packet_length < sizeof(struct smbd_negotiate_resp)) {
 323                 log_rdma_event(ERR,
 324                         "error: packet_length=%d\n", packet_length);
 325                 return false;
 326         }
 327
 328         if (le16_to_cpu(packet->negotiated_version) != SMBD_V1) {
 329                 log_rdma_event(ERR, "error: negotiated_version=%x\n",
 330                         le16_to_cpu(packet->negotiated_version));
 331                 return false;
 332         }
 333         info->protocol = le16_to_cpu(packet->negotiated_version);
 334
 335         if (packet->credits_requested == 0) {
 336                 log_rdma_event(ERR, "error: credits_requested==0\n");
 337                 return false;
 338         }
 339         info->receive_credit_target = le16_to_cpu(packet->credits_requested);
 340
 341         if (packet->credits_granted == 0) {
 342                 log_rdma_event(ERR, "error: credits_granted==0\n");
 343                 return false;
 344         }
 345         atomic_set(&info->send_credits, le16_to_cpu(packet->credits_granted));
 346
 347         atomic_set(&info->receive_credits, 0);
 348
 349         if (le32_to_cpu(packet->preferred_send_size) > info->max_receive_size) {
 350                 log_rdma_event(ERR, "error: preferred_send_size=%d\n",
 351                         le32_to_cpu(packet->preferred_send_size));
 352                 return false;
 353         }
 354         info->max_receive_size = le32_to_cpu(packet->preferred_send_size);
 355
 356         if (le32_to_cpu(packet->max_receive_size) < SMBD_MIN_RECEIVE_SIZE) {
 357                 log_rdma_event(ERR, "error: max_receive_size=%d\n",
 358                         le32_to_cpu(packet->max_receive_size));
 359                 return false;
 360         }
 361         info->max_send_size = min_t(int, info->max_send_size,
 362                                         le32_to_cpu(packet->max_receive_size));
 363
 364         if (le32_to_cpu(packet->max_fragmented_size) <
 365                         SMBD_MIN_FRAGMENTED_SIZE) {
 366                 log_rdma_event(ERR, "error: max_fragmented_size=%d\n",
 367                         le32_to_cpu(packet->max_fragmented_size));
 368                 return false;
 369         }
 370         info->max_fragmented_send_size =
 371                 le32_to_cpu(packet->max_fragmented_size);
 372         info->rdma_readwrite_threshold =
 373                 rdma_readwrite_threshold > info->max_fragmented_send_size ?
 374                 info->max_fragmented_send_size :
 375                 rdma_readwrite_threshold;
 376
 377
 378         info->max_readwrite_size = min_t(u32,
 379                         le32_to_cpu(packet->max_readwrite_size),
 380                         info->max_frmr_depth * PAGE_SIZE);
 381         info->max_frmr_depth = info->max_readwrite_size / PAGE_SIZE;
 382
 383         return true;
 384 }
 385
 386 /*
 387  * Check and schedule to send an immediate packet
 388  * This is used to extend credtis to remote peer to keep the transport busy
 389  */
 390 static void check_and_send_immediate(struct smbd_connection *info)
 391 {
 392         if (info->transport_status != SMBD_CONNECTED)
 393                 return;
 394
 395         info->send_immediate = true;
 396
 397         /*
 398          * Promptly send a packet if our peer is running low on receive
 399          * credits
 400          */
 401         if (atomic_read(&info->receive_credits) <
 402                 info->receive_credit_target - 1)
 403                 queue_delayed_work(
 404                         info->workqueue, &info->send_immediate_work, 0);
 405 }
 406
 407 static void smbd_post_send_credits(struct work_struct *work)
 408 {
 409         int ret = 0;
 410         int use_receive_queue = 1;
 411         int rc;
 412         struct smbd_response *response;
 413         struct smbd_connection *info =
 414                 container_of(work, struct smbd_connection,
 415                         post_send_credits_work);
 416
 417         if (info->transport_status != SMBD_CONNECTED) {
 418                 wake_up(&info->wait_receive_queues);
 419                 return;
 420         }
 421
 422         if (info->receive_credit_target >
 423                 atomic_read(&info->receive_credits)) {
 424                 while (true) {
 425                         if (use_receive_queue)
 426                                 response = get_receive_buffer(info);
 427                         else
 428                                 response = get_empty_queue_buffer(info);
 429                         if (!response) {
 430                                 /* now switch to emtpy packet queue */
 431                                 if (use_receive_queue) {
 432                                         use_receive_queue = 0;
 433                                         continue;
 434                                 } else
 435                                         break;
 436                         }
 437
 438                         response->type = SMBD_TRANSFER_DATA;
 439                         response->first_segment = false;
 440                         rc = smbd_post_recv(info, response);
 441                         if (rc) {
 442                                 log_rdma_recv(ERR,
 443                                         "post_recv failed rc=%d\n", rc);
 444                                 put_receive_buffer(info, response);
 445                                 break;
 446                         }
 447
 448                         ret++;
 449                 }
 450         }
 451
 452         spin_lock(&info->lock_new_credits_offered);
 453         info->new_credits_offered += ret;
 454         spin_unlock(&info->lock_new_credits_offered);
 455
 456         atomic_add(ret, &info->receive_credits);
 457
 458         /* Check if we can post new receive and grant credits to peer */
 459         check_and_send_immediate(info);
 460 }
 461
 462 static void smbd_recv_done_work(struct work_struct *work)
 463 {
 464         struct smbd_connection *info =
 465                 container_of(work, struct smbd_connection, recv_done_work);
 466
 467         /*
 468          * We may have new send credits granted from remote peer
 469          * If any sender is blcoked on lack of credets, unblock it
 470          */
 471         if (atomic_read(&info->send_credits))
 472                 wake_up_interruptible(&info->wait_send_queue);
 473
 474         /*
 475          * Check if we need to send something to remote peer to
 476          * grant more credits or respond to KEEP_ALIVE packet
 477          */
 478         check_and_send_immediate(info);
 479 }
 480
 481 /* Called from softirq, when recv is done */
 482 static void recv_done(struct ib_cq *cq, struct ib_wc *wc)
 483 {
 484         struct smbd_data_transfer *data_transfer;
 485         struct smbd_response *response =
 486                 container_of(wc->wr_cqe, struct smbd_response, cqe);
 487         struct smbd_connection *info = response->info;
 488         int data_length = 0;
 489
 490         log_rdma_recv(INFO, "response=%p type=%d wc status=%d wc opcode %d "
 491                       "byte_len=%d pkey_index=%x\n",
 492                 response, response->type, wc->status, wc->opcode,
 493                 wc->byte_len, wc->pkey_index);
 494
 495         if (wc->status != IB_WC_SUCCESS || wc->opcode != IB_WC_RECV) {
 496                 log_rdma_recv(INFO, "wc->status=%d opcode=%d\n",
 497                         wc->status, wc->opcode);
 498                 smbd_disconnect_rdma_connection(info);
 499                 goto error;
 500         }
 501
 502         ib_dma_sync_single_for_cpu(
 503                 wc->qp->device,
 504                 response->sge.addr,
 505                 response->sge.length,
 506                 DMA_FROM_DEVICE);
 507
 508         switch (response->type) {
 509         /* SMBD negotiation response */
 510         case SMBD_NEGOTIATE_RESP:
 511                 dump_smbd_negotiate_resp(smbd_response_payload(response));
 512                 info->full_packet_received = true;
 513                 info->negotiate_done =
 514                         process_negotiation_response(response, wc->byte_len);
 515                 complete(&info->negotiate_completion);
 516                 break;
 517
 518         /* SMBD data transfer packet */
 519         case SMBD_TRANSFER_DATA:
 520                 data_transfer = smbd_response_payload(response);
 521                 data_length = le32_to_cpu(data_transfer->data_length);
 522
 523                 /*
 524                  * If this is a packet with data playload place the data in
 525                  * reassembly queue and wake up the reading thread
 526                  */
 527                 if (data_length) {
 528                         if (info->full_packet_received)
 529                                 response->first_segment = true;
 530
 531                         if (le32_to_cpu(data_transfer->remaining_data_length))
 532                                 info->full_packet_received = false;
 533                         else
 534                                 info->full_packet_received = true;
 535
 536                         enqueue_reassembly(
 537                                 info,
 538                                 response,
 539                                 data_length);
 540                 } else
 541                         put_empty_packet(info, response);
 542
 543                 if (data_length)
 544                         wake_up_interruptible(&info->wait_reassembly_queue);
 545
 546                 atomic_dec(&info->receive_credits);
 547                 info->receive_credit_target =
 548                         le16_to_cpu(data_transfer->credits_requested);
 549                 atomic_add(le16_to_cpu(data_transfer->credits_granted),
 550                         &info->send_credits);
 551
 552                 log_incoming(INFO, "data flags %d data_offset %d "
 553                         "data_length %d remaining_data_length %d\n",
 554                         le16_to_cpu(data_transfer->flags),
 555                         le32_to_cpu(data_transfer->data_offset),
 556                         le32_to_cpu(data_transfer->data_length),
 557                         le32_to_cpu(data_transfer->remaining_data_length));
 558
 559                 /* Send a KEEP_ALIVE response right away if requested */
 560                 info->keep_alive_requested = KEEP_ALIVE_NONE;
 561                 if (le16_to_cpu(data_transfer->flags) &
 562                                 SMB_DIRECT_RESPONSE_REQUESTED) {
 563                         info->keep_alive_requested = KEEP_ALIVE_PENDING;
 564                 }
 565
 566                 queue_work(info->workqueue, &info->recv_done_work);
 567                 return;
 568
 569         default:
 570                 log_rdma_recv(ERR,
 571                         "unexpected response type=%d\n", response->type);
 572         }
 573
 574 error:
 575         put_receive_buffer(info, response);
 576 }
 577
 578 static struct rdma_cm_id *smbd_create_id(
 579                 struct smbd_connection *info,
 580                 struct sockaddr *dstaddr, int port)
 581 {
 582         struct rdma_cm_id *id;
 583         int rc;
 584         __be16 *sport;
 585
 586         id = rdma_create_id(&init_net, smbd_conn_upcall, info,
 587                 RDMA_PS_TCP, IB_QPT_RC);
 588         if (IS_ERR(id)) {
 589                 rc = PTR_ERR(id);
 590                 log_rdma_event(ERR, "rdma_create_id() failed %i\n", rc);
 591                 return id;
 592         }
 593
 594         if (dstaddr->sa_family == AF_INET6)
 595                 sport = &((struct sockaddr_in6 *)dstaddr)->sin6_port;
 596         else
 597                 sport = &((struct sockaddr_in *)dstaddr)->sin_port;
 598
 599         *sport = htons(port);
 600
 601         init_completion(&info->ri_done);
 602         info->ri_rc = -ETIMEDOUT;
 603
 604         rc = rdma_resolve_addr(id, NULL, (struct sockaddr *)dstaddr,
 605                 RDMA_RESOLVE_TIMEOUT);
 606         if (rc) {
 607                 log_rdma_event(ERR, "rdma_resolve_addr() failed %i\n", rc);
 608                 goto out;
 609         }
 610         wait_for_completion_interruptible_timeout(
 611                 &info->ri_done, msecs_to_jiffies(RDMA_RESOLVE_TIMEOUT));
 612         rc = info->ri_rc;
 613         if (rc) {
 614                 log_rdma_event(ERR, "rdma_resolve_addr() completed %i\n", rc);
 615                 goto out;
 616         }
 617
 618         info->ri_rc = -ETIMEDOUT;
 619         rc = rdma_resolve_route(id, RDMA_RESOLVE_TIMEOUT);
 620         if (rc) {
 621                 log_rdma_event(ERR, "rdma_resolve_route() failed %i\n", rc);
 622                 goto out;
 623         }
 624         wait_for_completion_interruptible_timeout(
 625                 &info->ri_done, msecs_to_jiffies(RDMA_RESOLVE_TIMEOUT));
 626         rc = info->ri_rc;
 627         if (rc) {
 628                 log_rdma_event(ERR, "rdma_resolve_route() completed %i\n", rc);
 629                 goto out;
 630         }
 631
 632         return id;
 633
 634 out:
 635         rdma_destroy_id(id);
 636         return ERR_PTR(rc);
 637 }
 638
 639 /*
 640  * Test if FRWR (Fast Registration Work Requests) is supported on the device
 641  * This implementation requries FRWR on RDMA read/write
 642  * return value: true if it is supported
 643  */
 644 static bool frwr_is_supported(struct ib_device_attr *attrs)
 645 {
 646         if (!(attrs->device_cap_flags & IB_DEVICE_MEM_MGT_EXTENSIONS))
 647                 return false;
 648         if (attrs->max_fast_reg_page_list_len == 0)
 649                 return false;
 650         return true;
 651 }
 652
 653 static int smbd_ia_open(
 654                 struct smbd_connection *info,
 655                 struct sockaddr *dstaddr, int port)
 656 {
 657         int rc;
 658
 659         info->id = smbd_create_id(info, dstaddr, port);
 660         if (IS_ERR(info->id)) {
 661                 rc = PTR_ERR(info->id);
 662                 goto out1;
 663         }
 664
 665         if (!frwr_is_supported(&info->id->device->attrs)) {
 666                 log_rdma_event(ERR,
 667                         "Fast Registration Work Requests "
 668                         "(FRWR) is not supported\n");
 669                 log_rdma_event(ERR,
 670                         "Device capability flags = %llx "
 671                         "max_fast_reg_page_list_len = %u\n",
 672                         info->id->device->attrs.device_cap_flags,
 673                         info->id->device->attrs.max_fast_reg_page_list_len);
 674                 rc = -EPROTONOSUPPORT;
 675                 goto out2;
 676         }
 677         info->max_frmr_depth = min_t(int,
 678                 smbd_max_frmr_depth,
 679                 info->id->device->attrs.max_fast_reg_page_list_len);
 680         info->mr_type = IB_MR_TYPE_MEM_REG;
 681         if (info->id->device->attrs.device_cap_flags & IB_DEVICE_SG_GAPS_REG)
 682                 info->mr_type = IB_MR_TYPE_SG_GAPS;
 683
 684         info->pd = ib_alloc_pd(info->id->device, 0);
 685         if (IS_ERR(info->pd)) {
 686                 rc = PTR_ERR(info->pd);
 687                 log_rdma_event(ERR, "ib_alloc_pd() returned %d\n", rc);
 688                 goto out2;
 689         }
 690
 691         return 0;
 692
 693 out2:
 694         rdma_destroy_id(info->id);
 695         info->id = NULL;
 696
 697 out1:
 698         return rc;
 699 }
 700
 701 /*
 702  * Send a negotiation request message to the peer
 703  * The negotiation procedure is in [MS-SMBD] 3.1.5.2 and 3.1.5.3
 704  * After negotiation, the transport is connected and ready for
 705  * carrying upper layer SMB payload
 706  */
 707 static int smbd_post_send_negotiate_req(struct smbd_connection *info)
 708 {
 709         struct ib_send_wr send_wr;
 710         int rc = -ENOMEM;
 711         struct smbd_request *request;
 712         struct smbd_negotiate_req *packet;
 713
 714         request = mempool_alloc(info->request_mempool, GFP_KERNEL);
 715         if (!request)
 716                 return rc;
 717
 718         request->info = info;
 719
 720         packet = smbd_request_payload(request);
 721         packet->min_version = cpu_to_le16(SMBD_V1);
 722         packet->max_version = cpu_to_le16(SMBD_V1);
 723         packet->reserved = 0;
 724         packet->credits_requested = cpu_to_le16(info->send_credit_target);
 725         packet->preferred_send_size = cpu_to_le32(info->max_send_size);
 726         packet->max_receive_size = cpu_to_le32(info->max_receive_size);
 727         packet->max_fragmented_size =
 728                 cpu_to_le32(info->max_fragmented_recv_size);
 729
 730         request->num_sge = 1;
 731         request->sge[0].addr = ib_dma_map_single(
 732                                 info->id->device, (void *)packet,
 733                                 sizeof(*packet), DMA_TO_DEVICE);
 734         if (ib_dma_mapping_error(info->id->device, request->sge[0].addr)) {
 735                 rc = -EIO;
 736                 goto dma_mapping_failed;
 737         }
 738
 739         request->sge[0].length = sizeof(*packet);
 740         request->sge[0].lkey = info->pd->local_dma_lkey;
 741
 742         ib_dma_sync_single_for_device(
 743                 info->id->device, request->sge[0].addr,
 744                 request->sge[0].length, DMA_TO_DEVICE);
 745
 746         request->cqe.done = send_done;
 747
 748         send_wr.next = NULL;
 749         send_wr.wr_cqe = &request->cqe;
 750         send_wr.sg_list = request->sge;
 751         send_wr.num_sge = request->num_sge;
 752         send_wr.opcode = IB_WR_SEND;
 753         send_wr.send_flags = IB_SEND_SIGNALED;
 754
 755         log_rdma_send(INFO, "sge addr=%llx length=%x lkey=%x\n",
 756                 request->sge[0].addr,
 757                 request->sge[0].length, request->sge[0].lkey);
 758
 759         request->has_payload = false;
 760         atomic_inc(&info->send_pending);
 761         rc = ib_post_send(info->id->qp, &send_wr, NULL);
 762         if (!rc)
 763                 return 0;
 764
 765         /* if we reach here, post send failed */
 766         log_rdma_send(ERR, "ib_post_send failed rc=%d\n", rc);
 767         atomic_dec(&info->send_pending);
 768         ib_dma_unmap_single(info->id->device, request->sge[0].addr,
 769                 request->sge[0].length, DMA_TO_DEVICE);
 770
 771         smbd_disconnect_rdma_connection(info);
 772
 773 dma_mapping_failed:
 774         mempool_free(request, info->request_mempool);
 775         return rc;
 776 }
 777
 778 /*
 779  * Extend the credits to remote peer
 780  * This implements [MS-SMBD] 3.1.5.9
 781  * The idea is that we should extend credits to remote peer as quickly as
 782  * it's allowed, to maintain data flow. We allocate as much receive
 783  * buffer as possible, and extend the receive credits to remote peer
 784  * return value: the new credtis being granted.
 785  */
 786 static int manage_credits_prior_sending(struct smbd_connection *info)
 787 {
 788         int new_credits;
 789
 790         spin_lock(&info->lock_new_credits_offered);
 791         new_credits = info->new_credits_offered;
 792         info->new_credits_offered = 0;
 793         spin_unlock(&info->lock_new_credits_offered);
 794
 795         return new_credits;
 796 }
 797
 798 /*
 799  * Check if we need to send a KEEP_ALIVE message
 800  * The idle connection timer triggers a KEEP_ALIVE message when expires
 801  * SMB_DIRECT_RESPONSE_REQUESTED is set in the message flag to have peer send
 802  * back a response.
 803  * return value:
 804  * 1 if SMB_DIRECT_RESPONSE_REQUESTED needs to be set
 805  * 0: otherwise
 806  */
 807 static int manage_keep_alive_before_sending(struct smbd_connection *info)
 808 {
 809         if (info->keep_alive_requested == KEEP_ALIVE_PENDING) {
 810                 info->keep_alive_requested = KEEP_ALIVE_SENT;
 811                 return 1;
 812         }
 813         return 0;
 814 }
 815
 816 /*
 817  * Build and prepare the SMBD packet header
 818  * This function waits for avaialbe send credits and build a SMBD packet
 819  * header. The caller then optional append payload to the packet after
 820  * the header
 821  * intput values
 822  * size: the size of the payload
 823  * remaining_data_length: remaining data to send if this is part of a
 824  * fragmented packet
 825  * output values
 826  * request_out: the request allocated from this function
 827  * return values: 0 on success, otherwise actual error code returned
 828  */
 829 static int smbd_create_header(struct smbd_connection *info,
 830                 int size, int remaining_data_length,
 831                 struct smbd_request **request_out)
 832 {
 833         struct smbd_request *request;
 834         struct smbd_data_transfer *packet;
 835         int header_length;
 836         int rc;
 837
 838         /* Wait for send credits. A SMBD packet needs one credit */
 839         rc = wait_event_interruptible(info->wait_send_queue,
 840                 atomic_read(&info->send_credits) > 0 ||
 841                 info->transport_status != SMBD_CONNECTED);
 842         if (rc)
 843                 return rc;
 844
 845         if (info->transport_status != SMBD_CONNECTED) {
 846                 log_outgoing(ERR, "disconnected not sending\n");
 847                 return -EAGAIN;
 848         }
 849         atomic_dec(&info->send_credits);
 850
 851         request = mempool_alloc(info->request_mempool, GFP_KERNEL);
 852         if (!request) {
 853                 rc = -ENOMEM;
 854                 goto err;
 855         }
 856
 857         request->info = info;
 858
 859         /* Fill in the packet header */
 860         packet = smbd_request_payload(request);
 861         packet->credits_requested = cpu_to_le16(info->send_credit_target);
 862         packet->credits_granted =
 863                 cpu_to_le16(manage_credits_prior_sending(info));
 864         info->send_immediate = false;
 865
 866         packet->flags = 0;
 867         if (manage_keep_alive_before_sending(info))
 868                 packet->flags |= cpu_to_le16(SMB_DIRECT_RESPONSE_REQUESTED);
 869
 870         packet->reserved = 0;
 871         if (!size)
 872                 packet->data_offset = 0;
 873         else
 874                 packet->data_offset = cpu_to_le32(24);
 875         packet->data_length = cpu_to_le32(size);
 876         packet->remaining_data_length = cpu_to_le32(remaining_data_length);
 877         packet->padding = 0;
 878
 879         log_outgoing(INFO, "credits_requested=%d credits_granted=%d "
 880                 "data_offset=%d data_length=%d remaining_data_length=%d\n",
 881                 le16_to_cpu(packet->credits_requested),
 882                 le16_to_cpu(packet->credits_granted),
 883                 le32_to_cpu(packet->data_offset),
 884                 le32_to_cpu(packet->data_length),
 885                 le32_to_cpu(packet->remaining_data_length));
 886
 887         /* Map the packet to DMA */
 888         header_length = sizeof(struct smbd_data_transfer);
 889         /* If this is a packet without payload, don't send padding */
 890         if (!size)
 891                 header_length = offsetof(struct smbd_data_transfer, padding);
 892
 893         request->num_sge = 1;
 894         request->sge[0].addr = ib_dma_map_single(info->id->device,
 895                                                  (void *)packet,
 896                                                  header_length,
 897                                                  DMA_TO_DEVICE);
 898         if (ib_dma_mapping_error(info->id->device, request->sge[0].addr)) {
 899                 mempool_free(request, info->request_mempool);
 900                 rc = -EIO;
 901                 goto err;
 902         }
 903
 904         request->sge[0].length = header_length;
 905         request->sge[0].lkey = info->pd->local_dma_lkey;
 906
 907         *request_out = request;
 908         return 0;
 909
 910 err:
 911         atomic_inc(&info->send_credits);
 912         return rc;
 913 }
 914
 915 static void smbd_destroy_header(struct smbd_connection *info,
 916                 struct smbd_request *request)
 917 {
 918
 919         ib_dma_unmap_single(info->id->device,
 920                             request->sge[0].addr,
 921                             request->sge[0].length,
 922                             DMA_TO_DEVICE);
 923         mempool_free(request, info->request_mempool);
 924         atomic_inc(&info->send_credits);
 925 }
 926
 927 /* Post the send request */
 928 static int smbd_post_send(struct smbd_connection *info,
 929                 struct smbd_request *request, bool has_payload)
 930 {
 931         struct ib_send_wr send_wr;
 932         int rc, i;
 933
 934         for (i = 0; i < request->num_sge; i++) {
 935                 log_rdma_send(INFO,
 936                         "rdma_request sge[%d] addr=%llu length=%u\n",
 937                         i, request->sge[i].addr, request->sge[i].length);
 938                 ib_dma_sync_single_for_device(
 939                         info->id->device,
 940                         request->sge[i].addr,
 941                         request->sge[i].length,
 942                         DMA_TO_DEVICE);
 943         }
 944
 945         request->cqe.done = send_done;
 946
 947         send_wr.next = NULL;
 948         send_wr.wr_cqe = &request->cqe;
 949         send_wr.sg_list = request->sge;
 950         send_wr.num_sge = request->num_sge;
 951         send_wr.opcode = IB_WR_SEND;
 952         send_wr.send_flags = IB_SEND_SIGNALED;
 953
 954         if (has_payload) {
 955                 request->has_payload = true;
 956                 atomic_inc(&info->send_payload_pending);
 957         } else {
 958                 request->has_payload = false;
 959                 atomic_inc(&info->send_pending);
 960         }
 961
 962         rc = ib_post_send(info->id->qp, &send_wr, NULL);
 963         if (rc) {
 964                 log_rdma_send(ERR, "ib_post_send failed rc=%d\n", rc);
 965                 if (has_payload) {
 966                         if (atomic_dec_and_test(&info->send_payload_pending))
 967                                 wake_up(&info->wait_send_payload_pending);
 968                 } else {
 969                         if (atomic_dec_and_test(&info->send_pending))
 970                                 wake_up(&info->wait_send_pending);
 971                 }
 972                 smbd_disconnect_rdma_connection(info);
 973                 rc = -EAGAIN;
 974         } else
 975                 /* Reset timer for idle connection after packet is sent */
 976                 mod_delayed_work(info->workqueue, &info->idle_timer_work,
 977                         info->keep_alive_interval*HZ);
 978
 979         return rc;
 980 }
 981
 982 static int smbd_post_send_sgl(struct smbd_connection *info,
 983         struct scatterlist *sgl, int data_length, int remaining_data_length)
 984 {
 985         int num_sgs;
 986         int i, rc;
 987         struct smbd_request *request;
 988         struct scatterlist *sg;
 989
 990         rc = smbd_create_header(
 991                 info, data_length, remaining_data_length, &request);
 992         if (rc)
 993                 return rc;
 994
 995         num_sgs = sgl ? sg_nents(sgl) : 0;
 996         for_each_sg(sgl, sg, num_sgs, i) {
 997                 request->sge[i+1].addr =
 998                         ib_dma_map_page(info->id->device, sg_page(sg),
 999                                sg->offset, sg->length, DMA_TO_DEVICE);
1000                 if (ib_dma_mapping_error(
1001                                 info->id->device, request->sge[i+1].addr)) {
1002                         rc = -EIO;
1003                         request->sge[i+1].addr = 0;
1004                         goto dma_mapping_failure;
1005                 }
1006                 request->sge[i+1].length = sg->length;
1007                 request->sge[i+1].lkey = info->pd->local_dma_lkey;
1008                 request->num_sge++;
1009         }
1010
1011         rc = smbd_post_send(info, request, data_length);
1012         if (!rc)
1013                 return 0;
1014
1015 dma_mapping_failure:
1016         for (i = 1; i < request->num_sge; i++)
1017                 if (request->sge[i].addr)
1018                         ib_dma_unmap_single(info->id->device,
1019                                             request->sge[i].addr,
1020                                             request->sge[i].length,
1021                                             DMA_TO_DEVICE);
1022         smbd_destroy_header(info, request);
1023         return rc;
1024 }
1025
1026 /*
1027  * Send a page
1028  * page: the page to send
1029  * offset: offset in the page to send
1030  * size: length in the page to send
1031  * remaining_data_length: remaining data to send in this payload
1032  */
1033 static int smbd_post_send_page(struct smbd_connection *info, struct page *page,
1034                 unsigned long offset, size_t size, int remaining_data_length)
1035 {
1036         struct scatterlist sgl;
1037
1038         sg_init_table(&sgl, 1);
1039         sg_set_page(&sgl, page, size, offset);
1040
1041         return smbd_post_send_sgl(info, &sgl, size, remaining_data_length);
1042 }
1043
1044 /*
1045  * Send an empty message
1046  * Empty message is used to extend credits to peer to for keep live
1047  * while there is no upper layer payload to send at the time
1048  */
1049 static int smbd_post_send_empty(struct smbd_connection *info)
1050 {
1051         info->count_send_empty++;
1052         return smbd_post_send_sgl(info, NULL, 0, 0);
1053 }
1054
1055 /*
1056  * Send a data buffer
1057  * iov: the iov array describing the data buffers
1058  * n_vec: number of iov array
1059  * remaining_data_length: remaining data to send following this packet
1060  * in segmented SMBD packet
1061  */
1062 static int smbd_post_send_data(
1063         struct smbd_connection *info, struct kvec *iov, int n_vec,
1064         int remaining_data_length)
1065 {
1066         int i;
1067         u32 data_length = 0;
1068         struct scatterlist sgl[SMBDIRECT_MAX_SGE];
1069
1070         if (n_vec > SMBDIRECT_MAX_SGE) {
1071                 cifs_dbg(VFS, "Can't fit data to SGL, n_vec=%d\n", n_vec);
1072                 return -EINVAL;
1073         }
1074
1075         sg_init_table(sgl, n_vec);
1076         for (i = 0; i < n_vec; i++) {
1077                 data_length += iov[i].iov_len;
1078                 sg_set_buf(&sgl[i], iov[i].iov_base, iov[i].iov_len);
1079         }
1080
1081         return smbd_post_send_sgl(info, sgl, data_length, remaining_data_length);
1082 }
1083
1084 /*
1085  * Post a receive request to the transport
1086  * The remote peer can only send data when a receive request is posted
1087  * The interaction is controlled by send/receive credit system
1088  */
1089 static int smbd_post_recv(
1090                 struct smbd_connection *info, struct smbd_response *response)
1091 {
1092         struct ib_recv_wr recv_wr;
1093         int rc = -EIO;
1094
1095         response->sge.addr = ib_dma_map_single(
1096                                 info->id->device, response->packet,
1097                                 info->max_receive_size, DMA_FROM_DEVICE);
1098         if (ib_dma_mapping_error(info->id->device, response->sge.addr))
1099                 return rc;
1100
1101         response->sge.length = info->max_receive_size;
1102         response->sge.lkey = info->pd->local_dma_lkey;
1103
1104         response->cqe.done = recv_done;
1105
1106         recv_wr.wr_cqe = &response->cqe;
1107         recv_wr.next = NULL;
1108         recv_wr.sg_list = &response->sge;
1109         recv_wr.num_sge = 1;
1110
1111         rc = ib_post_recv(info->id->qp, &recv_wr, NULL);
1112         if (rc) {
1113                 ib_dma_unmap_single(info->id->device, response->sge.addr,
1114                                     response->sge.length, DMA_FROM_DEVICE);
1115                 smbd_disconnect_rdma_connection(info);
1116                 log_rdma_recv(ERR, "ib_post_recv failed rc=%d\n", rc);
1117         }
1118
1119         return rc;
1120 }
1121
1122 /* Perform SMBD negotiate according to [MS-SMBD] 3.1.5.2 */
1123 static int smbd_negotiate(struct smbd_connection *info)
1124 {
1125         int rc;
1126         struct smbd_response *response = get_receive_buffer(info);
1127
1128         response->type = SMBD_NEGOTIATE_RESP;
1129         rc = smbd_post_recv(info, response);
1130         log_rdma_event(INFO,
1131                 "smbd_post_recv rc=%d iov.addr=%llx iov.length=%x "
1132                 "iov.lkey=%x\n",
1133                 rc, response->sge.addr,
1134                 response->sge.length, response->sge.lkey);
1135         if (rc)
1136                 return rc;
1137
1138         init_completion(&info->negotiate_completion);
1139         info->negotiate_done = false;
1140         rc = smbd_post_send_negotiate_req(info);
1141         if (rc)
1142                 return rc;
1143
1144         rc = wait_for_completion_interruptible_timeout(
1145                 &info->negotiate_completion, SMBD_NEGOTIATE_TIMEOUT * HZ);
1146         log_rdma_event(INFO, "wait_for_completion_timeout rc=%d\n", rc);
1147
1148         if (info->negotiate_done)
1149                 return 0;
1150
1151         if (rc == 0)
1152                 rc = -ETIMEDOUT;
1153         else if (rc == -ERESTARTSYS)
1154                 rc = -EINTR;
1155         else
1156                 rc = -ENOTCONN;
1157
1158         return rc;
1159 }
1160
1161 static void put_empty_packet(
1162                 struct smbd_connection *info, struct smbd_response *response)
1163 {
1164         spin_lock(&info->empty_packet_queue_lock);
1165         list_add_tail(&response->list, &info->empty_packet_queue);
1166         info->count_empty_packet_queue++;
1167         spin_unlock(&info->empty_packet_queue_lock);
1168
1169         queue_work(info->workqueue, &info->post_send_credits_work);
1170 }
1171
1172 /*
1173  * Implement Connection.FragmentReassemblyBuffer defined in [MS-SMBD] 3.1.1.1
1174  * This is a queue for reassembling upper layer payload and present to upper
1175  * layer. All the inncoming payload go to the reassembly queue, regardless of
1176  * if reassembly is required. The uuper layer code reads from the queue for all
1177  * incoming payloads.
1178  * Put a received packet to the reassembly queue
1179  * response: the packet received
1180  * data_length: the size of payload in this packet
1181  */
1182 static void enqueue_reassembly(
1183         struct smbd_connection *info,
1184         struct smbd_response *response,
1185         int data_length)
1186 {
1187         spin_lock(&info->reassembly_queue_lock);
1188         list_add_tail(&response->list, &info->reassembly_queue);
1189         info->reassembly_queue_length++;
1190         /*
1191          * Make sure reassembly_data_length is updated after list and
1192          * reassembly_queue_length are updated. On the dequeue side
1193          * reassembly_data_length is checked without a lock to determine
1194          * if reassembly_queue_length and list is up to date
1195          */
1196         virt_wmb();
1197         info->reassembly_data_length += data_length;
1198         spin_unlock(&info->reassembly_queue_lock);
1199         info->count_reassembly_queue++;
1200         info->count_enqueue_reassembly_queue++;
1201 }
1202
1203 /*
1204  * Get the first entry at the front of reassembly queue
1205  * Caller is responsible for locking
1206  * return value: the first entry if any, NULL if queue is empty
1207  */
1208 static struct smbd_response *_get_first_reassembly(struct smbd_connection *info)
1209 {
1210         struct smbd_response *ret = NULL;
1211
1212         if (!list_empty(&info->reassembly_queue)) {
1213                 ret = list_first_entry(
1214                         &info->reassembly_queue,
1215                         struct smbd_response, list);
1216         }
1217         return ret;
1218 }
1219
1220 static struct smbd_response *get_empty_queue_buffer(
1221                 struct smbd_connection *info)
1222 {
1223         struct smbd_response *ret = NULL;
1224         unsigned long flags;
1225
1226         spin_lock_irqsave(&info->empty_packet_queue_lock, flags);
1227         if (!list_empty(&info->empty_packet_queue)) {
1228                 ret = list_first_entry(
1229                         &info->empty_packet_queue,
1230                         struct smbd_response, list);
1231                 list_del(&ret->list);
1232                 info->count_empty_packet_queue--;
1233         }
1234         spin_unlock_irqrestore(&info->empty_packet_queue_lock, flags);
1235
1236         return ret;
1237 }
1238
1239 /*
1240  * Get a receive buffer
1241  * For each remote send, we need to post a receive. The receive buffers are
1242  * pre-allocated in advance.
1243  * return value: the receive buffer, NULL if none is available
1244  */
1245 static struct smbd_response *get_receive_buffer(struct smbd_connection *info)
1246 {
1247         struct smbd_response *ret = NULL;
1248         unsigned long flags;
1249
1250         spin_lock_irqsave(&info->receive_queue_lock, flags);
1251         if (!list_empty(&info->receive_queue)) {
1252                 ret = list_first_entry(
1253                         &info->receive_queue,
1254                         struct smbd_response, list);
1255                 list_del(&ret->list);
1256                 info->count_receive_queue--;
1257                 info->count_get_receive_buffer++;
1258         }
1259         spin_unlock_irqrestore(&info->receive_queue_lock, flags);
1260
1261         return ret;
1262 }
1263
1264 /*
1265  * Return a receive buffer
1266  * Upon returning of a receive buffer, we can post new receive and extend
1267  * more receive credits to remote peer. This is done immediately after a
1268  * receive buffer is returned.
1269  */
1270 static void put_receive_buffer(
1271         struct smbd_connection *info, struct smbd_response *response)
1272 {
1273         unsigned long flags;
1274
1275         ib_dma_unmap_single(info->id->device, response->sge.addr,
1276                 response->sge.length, DMA_FROM_DEVICE);
1277
1278         spin_lock_irqsave(&info->receive_queue_lock, flags);
1279         list_add_tail(&response->list, &info->receive_queue);
1280         info->count_receive_queue++;
1281         info->count_put_receive_buffer++;
1282         spin_unlock_irqrestore(&info->receive_queue_lock, flags);
1283
1284         queue_work(info->workqueue, &info->post_send_credits_work);
1285 }
1286
1287 /* Preallocate all receive buffer on transport establishment */
1288 static int allocate_receive_buffers(struct smbd_connection *info, int num_buf)
1289 {
1290         int i;
1291         struct smbd_response *response;
1292
1293         INIT_LIST_HEAD(&info->reassembly_queue);
1294         spin_lock_init(&info->reassembly_queue_lock);
1295         info->reassembly_data_length = 0;
1296         info->reassembly_queue_length = 0;
1297
1298         INIT_LIST_HEAD(&info->receive_queue);
1299         spin_lock_init(&info->receive_queue_lock);
1300         info->count_receive_queue = 0;
1301
1302         INIT_LIST_HEAD(&info->empty_packet_queue);
1303         spin_lock_init(&info->empty_packet_queue_lock);
1304         info->count_empty_packet_queue = 0;
1305
1306         init_waitqueue_head(&info->wait_receive_queues);
1307
1308         for (i = 0; i < num_buf; i++) {
1309                 response = mempool_alloc(info->response_mempool, GFP_KERNEL);
1310                 if (!response)
1311                         goto allocate_failed;
1312
1313                 response->info = info;
1314                 list_add_tail(&response->list, &info->receive_queue);
1315                 info->count_receive_queue++;
1316         }
1317
1318         return 0;
1319
1320 allocate_failed:
1321         while (!list_empty(&info->receive_queue)) {
1322                 response = list_first_entry(
1323                                 &info->receive_queue,
1324                                 struct smbd_response, list);
1325                 list_del(&response->list);
1326                 info->count_receive_queue--;
1327
1328                 mempool_free(response, info->response_mempool);
1329         }
1330         return -ENOMEM;
1331 }
1332
1333 static void destroy_receive_buffers(struct smbd_connection *info)
1334 {
1335         struct smbd_response *response;
1336
1337         while ((response = get_receive_buffer(info)))
1338                 mempool_free(response, info->response_mempool);
1339
1340         while ((response = get_empty_queue_buffer(info)))
1341                 mempool_free(response, info->response_mempool);
1342 }
1343
1344 /*
1345  * Check and send an immediate or keep alive packet
1346  * The condition to send those packets are defined in [MS-SMBD] 3.1.1.1
1347  * Connection.KeepaliveRequested and Connection.SendImmediate
1348  * The idea is to extend credits to server as soon as it becomes available
1349  */
1350 static void send_immediate_work(struct work_struct *work)
1351 {
1352         struct smbd_connection *info = container_of(
1353                                         work, struct smbd_connection,
1354                                         send_immediate_work.work);
1355
1356         if (info->keep_alive_requested == KEEP_ALIVE_PENDING ||
1357             info->send_immediate) {
1358                 log_keep_alive(INFO, "send an empty message\n");
1359                 smbd_post_send_empty(info);
1360         }
1361 }
1362
1363 /* Implement idle connection timer [MS-SMBD] 3.1.6.2 */
1364 static void idle_connection_timer(struct work_struct *work)
1365 {
1366         struct smbd_connection *info = container_of(
1367                                         work, struct smbd_connection,
1368                                         idle_timer_work.work);
1369
1370         if (info->keep_alive_requested != KEEP_ALIVE_NONE) {
1371                 log_keep_alive(ERR,
1372                         "error status info->keep_alive_requested=%d\n",
1373                         info->keep_alive_requested);
1374                 smbd_disconnect_rdma_connection(info);
1375                 return;
1376         }
1377
1378         log_keep_alive(INFO, "about to send an empty idle message\n");
1379         smbd_post_send_empty(info);
1380
1381         /* Setup the next idle timeout work */
1382         queue_delayed_work(info->workqueue, &info->idle_timer_work,
1383                         info->keep_alive_interval*HZ);
1384 }
1385
1386 /*
1387  * Destroy the transport and related RDMA and memory resources
1388  * Need to go through all the pending counters and make sure on one is using
1389  * the transport while it is destroyed
1390  */
1391 void smbd_destroy(struct TCP_Server_Info *server)
1392 {
1393         struct smbd_connection *info = server->smbd_conn;
1394         struct smbd_response *response;
1395         unsigned long flags;
1396
1397         if (!info) {
1398                 log_rdma_event(INFO, "rdma session already destroyed\n");
1399                 return;
1400         }
1401
1402         log_rdma_event(INFO, "destroying rdma session\n");
1403         if (info->transport_status != SMBD_DISCONNECTED) {
1404                 rdma_disconnect(server->smbd_conn->id);
1405                 log_rdma_event(INFO, "wait for transport being disconnected\n");
1406                 wait_event_interruptible(
1407                         info->disconn_wait,
1408                         info->transport_status == SMBD_DISCONNECTED);
1409         }
1410
1411         log_rdma_event(INFO, "destroying qp\n");
1412         ib_drain_qp(info->id->qp);
1413         rdma_destroy_qp(info->id);
1414
1415         log_rdma_event(INFO, "cancelling idle timer\n");
1416         cancel_delayed_work_sync(&info->idle_timer_work);
1417         log_rdma_event(INFO, "cancelling send immediate work\n");
1418         cancel_delayed_work_sync(&info->send_immediate_work);
1419
1420         log_rdma_event(INFO, "wait for all send posted to IB to finish\n");
1421         wait_event(info->wait_send_pending,
1422                 atomic_read(&info->send_pending) == 0);
1423         wait_event(info->wait_send_payload_pending,
1424                 atomic_read(&info->send_payload_pending) == 0);
1425
1426         /* It's not posssible for upper layer to get to reassembly */
1427         log_rdma_event(INFO, "drain the reassembly queue\n");
1428         do {
1429                 spin_lock_irqsave(&info->reassembly_queue_lock, flags);
1430                 response = _get_first_reassembly(info);
1431                 if (response) {
1432                         list_del(&response->list);
1433                         spin_unlock_irqrestore(
1434                                 &info->reassembly_queue_lock, flags);
1435                         put_receive_buffer(info, response);
1436                 } else
1437                         spin_unlock_irqrestore(
1438                                 &info->reassembly_queue_lock, flags);
1439         } while (response);
1440         info->reassembly_data_length = 0;
1441
1442         log_rdma_event(INFO, "free receive buffers\n");
1443         wait_event(info->wait_receive_queues,
1444                 info->count_receive_queue + info->count_empty_packet_queue
1445                         == info->receive_credit_max);
1446         destroy_receive_buffers(info);
1447
1448         /*
1449          * For performance reasons, memory registration and deregistration
1450          * are not locked by srv_mutex. It is possible some processes are
1451          * blocked on transport srv_mutex while holding memory registration.
1452          * Release the transport srv_mutex to allow them to hit the failure
1453          * path when sending data, and then release memory registartions.
1454          */
1455         log_rdma_event(INFO, "freeing mr list\n");
1456         wake_up_interruptible_all(&info->wait_mr);
1457         while (atomic_read(&info->mr_used_count)) {
1458                 mutex_unlock(&server->srv_mutex);
1459                 msleep(1000);
1460                 mutex_lock(&server->srv_mutex);
1461         }
1462         destroy_mr_list(info);
1463
1464         ib_free_cq(info->send_cq);
1465         ib_free_cq(info->recv_cq);
1466         ib_dealloc_pd(info->pd);
1467         rdma_destroy_id(info->id);
1468
1469         /* free mempools */
1470         mempool_destroy(info->request_mempool);
1471         kmem_cache_destroy(info->request_cache);
1472
1473         mempool_destroy(info->response_mempool);
1474         kmem_cache_destroy(info->response_cache);
1475
1476         info->transport_status = SMBD_DESTROYED;
1477
1478         destroy_workqueue(info->workqueue);
1479         log_rdma_event(INFO,  "rdma session destroyed\n");
1480         kfree(info);
1481         server->smbd_conn = NULL;
1482 }
1483
1484 /*
1485  * Reconnect this SMBD connection, called from upper layer
1486  * return value: 0 on success, or actual error code
1487  */
1488 int smbd_reconnect(struct TCP_Server_Info *server)
1489 {
1490         log_rdma_event(INFO, "reconnecting rdma session\n");
1491
1492         if (!server->smbd_conn) {
1493                 log_rdma_event(INFO, "rdma session already destroyed\n");
1494                 goto create_conn;
1495         }
1496
1497         /*
1498          * This is possible if transport is disconnected and we haven't received
1499          * notification from RDMA, but upper layer has detected timeout
1500          */
1501         if (server->smbd_conn->transport_status == SMBD_CONNECTED) {
1502                 log_rdma_event(INFO, "disconnecting transport\n");
1503                 smbd_destroy(server);
1504         }
1505
1506 create_conn:
1507         log_rdma_event(INFO, "creating rdma session\n");
1508         server->smbd_conn = smbd_get_connection(
1509                 server, (struct sockaddr *) &server->dstaddr);
1510
1511         if (server->smbd_conn)
1512                 cifs_dbg(VFS, "RDMA transport re-established\n");
1513
1514         return server->smbd_conn ? 0 : -ENOENT;
1515 }
1516
1517 static void destroy_caches_and_workqueue(struct smbd_connection *info)
1518 {
1519         destroy_receive_buffers(info);
1520         destroy_workqueue(info->workqueue);
1521         mempool_destroy(info->response_mempool);
1522         kmem_cache_destroy(info->response_cache);
1523         mempool_destroy(info->request_mempool);
1524         kmem_cache_destroy(info->request_cache);
1525 }
1526
1527 #define MAX_NAME_LEN    80
1528 static int allocate_caches_and_workqueue(struct smbd_connection *info)
1529 {
1530         char name[MAX_NAME_LEN];
1531         int rc;
1532
1533         scnprintf(name, MAX_NAME_LEN, "smbd_request_%p", info);
1534         info->request_cache =
1535                 kmem_cache_create(
1536                         name,
1537                         sizeof(struct smbd_request) +
1538                                 sizeof(struct smbd_data_transfer),
1539                         0, SLAB_HWCACHE_ALIGN, NULL);
1540         if (!info->request_cache)
1541                 return -ENOMEM;
1542
1543         info->request_mempool =
1544                 mempool_create(info->send_credit_target, mempool_alloc_slab,
1545                         mempool_free_slab, info->request_cache);
1546         if (!info->request_mempool)
1547                 goto out1;
1548
1549         scnprintf(name, MAX_NAME_LEN, "smbd_response_%p", info);
1550         info->response_cache =
1551                 kmem_cache_create(
1552                         name,
1553                         sizeof(struct smbd_response) +
1554                                 info->max_receive_size,
1555                         0, SLAB_HWCACHE_ALIGN, NULL);
1556         if (!info->response_cache)
1557                 goto out2;
1558
1559         info->response_mempool =
1560                 mempool_create(info->receive_credit_max, mempool_alloc_slab,
1561                        mempool_free_slab, info->response_cache);
1562         if (!info->response_mempool)
1563                 goto out3;
1564
1565         scnprintf(name, MAX_NAME_LEN, "smbd_%p", info);
1566         info->workqueue = create_workqueue(name);
1567         if (!info->workqueue)
1568                 goto out4;
1569
1570         rc = allocate_receive_buffers(info, info->receive_credit_max);
1571         if (rc) {
1572                 log_rdma_event(ERR, "failed to allocate receive buffers\n");
1573                 goto out5;
1574         }
1575
1576         return 0;
1577
1578 out5:
1579         destroy_workqueue(info->workqueue);
1580 out4:
1581         mempool_destroy(info->response_mempool);
1582 out3:
1583         kmem_cache_destroy(info->response_cache);
1584 out2:
1585         mempool_destroy(info->request_mempool);
1586 out1:
1587         kmem_cache_destroy(info->request_cache);
1588         return -ENOMEM;
1589 }
1590
1591 /* Create a SMBD connection, called by upper layer */
1592 static struct smbd_connection *_smbd_get_connection(
1593         struct TCP_Server_Info *server, struct sockaddr *dstaddr, int port)
1594 {
1595         int rc;
1596         struct smbd_connection *info;
1597         struct rdma_conn_param conn_param;
1598         struct ib_qp_init_attr qp_attr;
1599         struct sockaddr_in *addr_in = (struct sockaddr_in *) dstaddr;
1600         struct ib_port_immutable port_immutable;
1601         u32 ird_ord_hdr[2];
1602
1603         info = kzalloc(sizeof(struct smbd_connection), GFP_KERNEL);
1604         if (!info)
1605                 return NULL;
1606
1607         info->transport_status = SMBD_CONNECTING;
1608         rc = smbd_ia_open(info, dstaddr, port);
1609         if (rc) {
1610                 log_rdma_event(INFO, "smbd_ia_open rc=%d\n", rc);
1611                 goto create_id_failed;
1612         }
1613
1614         if (smbd_send_credit_target > info->id->device->attrs.max_cqe ||
1615             smbd_send_credit_target > info->id->device->attrs.max_qp_wr) {
1616                 log_rdma_event(ERR,
1617                         "consider lowering send_credit_target = %d. "
1618                         "Possible CQE overrun, device "
1619                         "reporting max_cpe %d max_qp_wr %d\n",
1620                         smbd_send_credit_target,
1621                         info->id->device->attrs.max_cqe,
1622                         info->id->device->attrs.max_qp_wr);
1623                 goto config_failed;
1624         }
1625
1626         if (smbd_receive_credit_max > info->id->device->attrs.max_cqe ||
1627             smbd_receive_credit_max > info->id->device->attrs.max_qp_wr) {
1628                 log_rdma_event(ERR,
1629                         "consider lowering receive_credit_max = %d. "
1630                         "Possible CQE overrun, device "
1631                         "reporting max_cpe %d max_qp_wr %d\n",
1632                         smbd_receive_credit_max,
1633                         info->id->device->attrs.max_cqe,
1634                         info->id->device->attrs.max_qp_wr);
1635                 goto config_failed;
1636         }
1637
1638         info->receive_credit_max = smbd_receive_credit_max;
1639         info->send_credit_target = smbd_send_credit_target;
1640         info->max_send_size = smbd_max_send_size;
1641         info->max_fragmented_recv_size = smbd_max_fragmented_recv_size;
1642         info->max_receive_size = smbd_max_receive_size;
1643         info->keep_alive_interval = smbd_keep_alive_interval;
1644
1645         if (info->id->device->attrs.max_send_sge < SMBDIRECT_MAX_SGE) {
1646                 log_rdma_event(ERR,
1647                         "warning: device max_send_sge = %d too small\n",
1648                         info->id->device->attrs.max_send_sge);
1649                 log_rdma_event(ERR, "Queue Pair creation may fail\n");
1650         }
1651         if (info->id->device->attrs.max_recv_sge < SMBDIRECT_MAX_SGE) {
1652                 log_rdma_event(ERR,
1653                         "warning: device max_recv_sge = %d too small\n",
1654                         info->id->device->attrs.max_recv_sge);
1655                 log_rdma_event(ERR, "Queue Pair creation may fail\n");
1656         }
1657
1658         info->send_cq = NULL;
1659         info->recv_cq = NULL;
1660         info->send_cq =
1661                 ib_alloc_cq_any(info->id->device, info,
1662                                 info->send_credit_target, IB_POLL_SOFTIRQ);
1663         if (IS_ERR(info->send_cq)) {
1664                 info->send_cq = NULL;
1665                 goto alloc_cq_failed;
1666         }
1667
1668         info->recv_cq =
1669                 ib_alloc_cq_any(info->id->device, info,
1670                                 info->receive_credit_max, IB_POLL_SOFTIRQ);
1671         if (IS_ERR(info->recv_cq)) {
1672                 info->recv_cq = NULL;
1673                 goto alloc_cq_failed;
1674         }
1675
1676         memset(&qp_attr, 0, sizeof(qp_attr));
1677         qp_attr.event_handler = smbd_qp_async_error_upcall;
1678         qp_attr.qp_context = info;
1679         qp_attr.cap.max_send_wr = info->send_credit_target;
1680         qp_attr.cap.max_recv_wr = info->receive_credit_max;
1681         qp_attr.cap.max_send_sge = SMBDIRECT_MAX_SGE;
1682         qp_attr.cap.max_recv_sge = SMBDIRECT_MAX_SGE;
1683         qp_attr.cap.max_inline_data = 0;
1684         qp_attr.sq_sig_type = IB_SIGNAL_REQ_WR;
1685         qp_attr.qp_type = IB_QPT_RC;
1686         qp_attr.send_cq = info->send_cq;
1687         qp_attr.recv_cq = info->recv_cq;
1688         qp_attr.port_num = ~0;
1689
1690         rc = rdma_create_qp(info->id, info->pd, &qp_attr);
1691         if (rc) {
1692                 log_rdma_event(ERR, "rdma_create_qp failed %i\n", rc);
1693                 goto create_qp_failed;
1694         }
1695
1696         memset(&conn_param, 0, sizeof(conn_param));
1697         conn_param.initiator_depth = 0;
1698
1699         conn_param.responder_resources =
1700                 info->id->device->attrs.max_qp_rd_atom
1701                         < SMBD_CM_RESPONDER_RESOURCES ?
1702                 info->id->device->attrs.max_qp_rd_atom :
1703                 SMBD_CM_RESPONDER_RESOURCES;
1704         info->responder_resources = conn_param.responder_resources;
1705         log_rdma_mr(INFO, "responder_resources=%d\n",
1706                 info->responder_resources);
1707
1708         /* Need to send IRD/ORD in private data for iWARP */
1709         info->id->device->ops.get_port_immutable(
1710                 info->id->device, info->id->port_num, &port_immutable);
1711         if (port_immutable.core_cap_flags & RDMA_CORE_PORT_IWARP) {
1712                 ird_ord_hdr[0] = info->responder_resources;
1713                 ird_ord_hdr[1] = 1;
1714                 conn_param.private_data = ird_ord_hdr;
1715                 conn_param.private_data_len = sizeof(ird_ord_hdr);
1716         } else {
1717                 conn_param.private_data = NULL;
1718                 conn_param.private_data_len = 0;
1719         }
1720
1721         conn_param.retry_count = SMBD_CM_RETRY;
1722         conn_param.rnr_retry_count = SMBD_CM_RNR_RETRY;
1723         conn_param.flow_control = 0;
1724
1725         log_rdma_event(INFO, "connecting to IP %pI4 port %d\n",
1726                 &addr_in->sin_addr, port);
1727
1728         init_waitqueue_head(&info->conn_wait);
1729         init_waitqueue_head(&info->disconn_wait);
1730         init_waitqueue_head(&info->wait_reassembly_queue);
1731         rc = rdma_connect(info->id, &conn_param);
1732         if (rc) {
1733                 log_rdma_event(ERR, "rdma_connect() failed with %i\n", rc);
1734                 goto rdma_connect_failed;
1735         }
1736
1737         wait_event_interruptible(
1738                 info->conn_wait, info->transport_status != SMBD_CONNECTING);
1739
1740         if (info->transport_status != SMBD_CONNECTED) {
1741                 log_rdma_event(ERR, "rdma_connect failed port=%d\n", port);
1742                 goto rdma_connect_failed;
1743         }
1744
1745         log_rdma_event(INFO, "rdma_connect connected\n");
1746
1747         rc = allocate_caches_and_workqueue(info);
1748         if (rc) {
1749                 log_rdma_event(ERR, "cache allocation failed\n");
1750                 goto allocate_cache_failed;
1751         }
1752
1753         init_waitqueue_head(&info->wait_send_queue);
1754         INIT_DELAYED_WORK(&info->idle_timer_work, idle_connection_timer);
1755         INIT_DELAYED_WORK(&info->send_immediate_work, send_immediate_work);
1756         queue_delayed_work(info->workqueue, &info->idle_timer_work,
1757                 info->keep_alive_interval*HZ);
1758
1759         init_waitqueue_head(&info->wait_send_pending);
1760         atomic_set(&info->send_pending, 0);
1761
1762         init_waitqueue_head(&info->wait_send_payload_pending);
1763         atomic_set(&info->send_payload_pending, 0);
1764
1765         INIT_WORK(&info->disconnect_work, smbd_disconnect_rdma_work);
1766         INIT_WORK(&info->recv_done_work, smbd_recv_done_work);
1767         INIT_WORK(&info->post_send_credits_work, smbd_post_send_credits);
1768         info->new_credits_offered = 0;
1769         spin_lock_init(&info->lock_new_credits_offered);
1770
1771         rc = smbd_negotiate(info);
1772         if (rc) {
1773                 log_rdma_event(ERR, "smbd_negotiate rc=%d\n", rc);
1774                 goto negotiation_failed;
1775         }
1776
1777         rc = allocate_mr_list(info);
1778         if (rc) {
1779                 log_rdma_mr(ERR, "memory registration allocation failed\n");
1780                 goto allocate_mr_failed;
1781         }
1782
1783         return info;
1784
1785 allocate_mr_failed:
1786         /* At this point, need to a full transport shutdown */
1787         server->smbd_conn = info;
1788         smbd_destroy(server);
1789         return NULL;
1790
1791 negotiation_failed:
1792         cancel_delayed_work_sync(&info->idle_timer_work);
1793         destroy_caches_and_workqueue(info);
1794         info->transport_status = SMBD_NEGOTIATE_FAILED;
1795         init_waitqueue_head(&info->conn_wait);
1796         rdma_disconnect(info->id);
1797         wait_event(info->conn_wait,
1798                 info->transport_status == SMBD_DISCONNECTED);
1799
1800 allocate_cache_failed:
1801 rdma_connect_failed:
1802         rdma_destroy_qp(info->id);
1803
1804 create_qp_failed:
1805 alloc_cq_failed:
1806         if (info->send_cq)
1807                 ib_free_cq(info->send_cq);
1808         if (info->recv_cq)
1809                 ib_free_cq(info->recv_cq);
1810
1811 config_failed:
1812         ib_dealloc_pd(info->pd);
1813         rdma_destroy_id(info->id);
1814
1815 create_id_failed:
1816         kfree(info);
1817         return NULL;
1818 }
1819
1820 struct smbd_connection *smbd_get_connection(
1821         struct TCP_Server_Info *server, struct sockaddr *dstaddr)
1822 {
1823         struct smbd_connection *ret;
1824         int port = SMBD_PORT;
1825
1826 try_again:
1827         ret = _smbd_get_connection(server, dstaddr, port);
1828
1829         /* Try SMB_PORT if SMBD_PORT doesn't work */
1830         if (!ret && port == SMBD_PORT) {
1831                 port = SMB_PORT;
1832                 goto try_again;
1833         }
1834         return ret;
1835 }
1836
1837 /*
1838  * Receive data from receive reassembly queue
1839  * All the incoming data packets are placed in reassembly queue
1840  * buf: the buffer to read data into
1841  * size: the length of data to read
1842  * return value: actual data read
1843  * Note: this implementation copies the data from reassebmly queue to receive
1844  * buffers used by upper layer. This is not the optimal code path. A better way
1845  * to do it is to not have upper layer allocate its receive buffers but rather
1846  * borrow the buffer from reassembly queue, and return it after data is
1847  * consumed. But this will require more changes to upper layer code, and also
1848  * need to consider packet boundaries while they still being reassembled.
1849  */
1850 static int smbd_recv_buf(struct smbd_connection *info, char *buf,
1851                 unsigned int size)
1852 {
1853         struct smbd_response *response;
1854         struct smbd_data_transfer *data_transfer;
1855         int to_copy, to_read, data_read, offset;
1856         u32 data_length, remaining_data_length, data_offset;
1857         int rc;
1858
1859 again:
1860         /*
1861          * No need to hold the reassembly queue lock all the time as we are
1862          * the only one reading from the front of the queue. The transport
1863          * may add more entries to the back of the queue at the same time
1864          */
1865         log_read(INFO, "size=%d info->reassembly_data_length=%d\n", size,
1866                 info->reassembly_data_length);
1867         if (info->reassembly_data_length >= size) {
1868                 int queue_length;
1869                 int queue_removed = 0;
1870
1871                 /*
1872                  * Need to make sure reassembly_data_length is read before
1873                  * reading reassembly_queue_length and calling
1874                  * _get_first_reassembly. This call is lock free
1875                  * as we never read at the end of the queue which are being
1876                  * updated in SOFTIRQ as more data is received
1877                  */
1878                 virt_rmb();
1879                 queue_length = info->reassembly_queue_length;
1880                 data_read = 0;
1881                 to_read = size;
1882                 offset = info->first_entry_offset;
1883                 while (data_read < size) {
1884                         response = _get_first_reassembly(info);
1885                         data_transfer = smbd_response_payload(response);
1886                         data_length = le32_to_cpu(data_transfer->data_length);
1887                         remaining_data_length =
1888                                 le32_to_cpu(
1889                                         data_transfer->remaining_data_length);
1890                         data_offset = le32_to_cpu(data_transfer->data_offset);
1891
1892                         /*
1893                          * The upper layer expects RFC1002 length at the
1894                          * beginning of the payload. Return it to indicate
1895                          * the total length of the packet. This minimize the
1896                          * change to upper layer packet processing logic. This
1897                          * will be eventually remove when an intermediate
1898                          * transport layer is added
1899                          */
1900                         if (response->first_segment && size == 4) {
1901                                 unsigned int rfc1002_len =
1902                                         data_length + remaining_data_length;
1903                                 *((__be32 *)buf) = cpu_to_be32(rfc1002_len);
1904                                 data_read = 4;
1905                                 response->first_segment = false;
1906                                 log_read(INFO, "returning rfc1002 length %d\n",
1907                                         rfc1002_len);
1908                                 goto read_rfc1002_done;
1909                         }
1910
1911                         to_copy = min_t(int, data_length - offset, to_read);
1912                         memcpy(
1913                                 buf + data_read,
1914                                 (char *)data_transfer + data_offset + offset,
1915                                 to_copy);
1916
1917                         /* move on to the next buffer? */
1918                         if (to_copy == data_length - offset) {
1919                                 queue_length--;
1920                                 /*
1921                                  * No need to lock if we are not at the
1922                                  * end of the queue
1923                                  */
1924                                 if (queue_length)
1925                                         list_del(&response->list);
1926                                 else {
1927                                         spin_lock_irq(
1928                                                 &info->reassembly_queue_lock);
1929                                         list_del(&response->list);
1930                                         spin_unlock_irq(
1931                                                 &info->reassembly_queue_lock);
1932                                 }
1933                                 queue_removed++;
1934                                 info->count_reassembly_queue--;
1935                                 info->count_dequeue_reassembly_queue++;
1936                                 put_receive_buffer(info, response);
1937                                 offset = 0;
1938                                 log_read(INFO, "put_receive_buffer offset=0\n");
1939                         } else
1940                                 offset += to_copy;
1941
1942                         to_read -= to_copy;
1943                         data_read += to_copy;
1944
1945                         log_read(INFO, "_get_first_reassembly memcpy %d bytes "
1946                                 "data_transfer_length-offset=%d after that "
1947                                 "to_read=%d data_read=%d offset=%d\n",
1948                                 to_copy, data_length - offset,
1949                                 to_read, data_read, offset);
1950                 }
1951
1952                 spin_lock_irq(&info->reassembly_queue_lock);
1953                 info->reassembly_data_length -= data_read;
1954                 info->reassembly_queue_length -= queue_removed;
1955                 spin_unlock_irq(&info->reassembly_queue_lock);
1956
1957                 info->first_entry_offset = offset;
1958                 log_read(INFO, "returning to thread data_read=%d "
1959                         "reassembly_data_length=%d first_entry_offset=%d\n",
1960                         data_read, info->reassembly_data_length,
1961                         info->first_entry_offset);
1962 read_rfc1002_done:
1963                 return data_read;
1964         }
1965
1966         log_read(INFO, "wait_event on more data\n");
1967         rc = wait_event_interruptible(
1968                 info->wait_reassembly_queue,
1969                 info->reassembly_data_length >= size ||
1970                         info->transport_status != SMBD_CONNECTED);
1971         /* Don't return any data if interrupted */
1972         if (rc)
1973                 return rc;
1974
1975         if (info->transport_status != SMBD_CONNECTED) {
1976                 log_read(ERR, "disconnected\n");
1977                 return -ECONNABORTED;
1978         }
1979
1980         goto again;
1981 }
1982
1983 /*
1984  * Receive a page from receive reassembly queue
1985  * page: the page to read data into
1986  * to_read: the length of data to read
1987  * return value: actual data read
1988  */
1989 static int smbd_recv_page(struct smbd_connection *info,
1990                 struct page *page, unsigned int page_offset,
1991                 unsigned int to_read)
1992 {
1993         int ret;
1994         char *to_address;
1995         void *page_address;
1996
1997         /* make sure we have the page ready for read */
1998         ret = wait_event_interruptible(
1999                 info->wait_reassembly_queue,
2000                 info->reassembly_data_length >= to_read ||
2001                         info->transport_status != SMBD_CONNECTED);
2002         if (ret)
2003                 return ret;
2004
2005         /* now we can read from reassembly queue and not sleep */
2006         page_address = kmap_atomic(page);
2007         to_address = (char *) page_address + page_offset;
2008
2009         log_read(INFO, "reading from page=%p address=%p to_read=%d\n",
2010                 page, to_address, to_read);
2011
2012         ret = smbd_recv_buf(info, to_address, to_read);
2013         kunmap_atomic(page_address);
2014
2015         return ret;
2016 }
2017
2018 /*
2019  * Receive data from transport
2020  * msg: a msghdr point to the buffer, can be ITER_KVEC or ITER_BVEC
2021  * return: total bytes read, or 0. SMB Direct will not do partial read.
2022  */
2023 int smbd_recv(struct smbd_connection *info, struct msghdr *msg)
2024 {
2025         char *buf;
2026         struct page *page;
2027         unsigned int to_read, page_offset;
2028         int rc;
2029
2030         if (iov_iter_rw(&msg->msg_iter) == WRITE) {
2031                 /* It's a bug in upper layer to get there */
2032                 cifs_dbg(VFS, "CIFS: invalid msg iter dir %u\n",
2033                          iov_iter_rw(&msg->msg_iter));
2034                 rc = -EINVAL;
2035                 goto out;
2036         }
2037
2038         switch (iov_iter_type(&msg->msg_iter)) {
2039         case ITER_KVEC:
2040                 buf = msg->msg_iter.kvec->iov_base;
2041                 to_read = msg->msg_iter.kvec->iov_len;
2042                 rc = smbd_recv_buf(info, buf, to_read);
2043                 break;
2044
2045         case ITER_BVEC:
2046                 page = msg->msg_iter.bvec->bv_page;
2047                 page_offset = msg->msg_iter.bvec->bv_offset;
2048                 to_read = msg->msg_iter.bvec->bv_len;
2049                 rc = smbd_recv_page(info, page, page_offset, to_read);
2050                 break;
2051
2052         default:
2053                 /* It's a bug in upper layer to get there */
2054                 cifs_dbg(VFS, "CIFS: invalid msg type %d\n",
2055                          iov_iter_type(&msg->msg_iter));
2056                 rc = -EINVAL;
2057         }
2058
2059 out:
2060         /* SMBDirect will read it all or nothing */
2061         if (rc > 0)
2062                 msg->msg_iter.count = 0;
2063         return rc;
2064 }
2065
2066 /*
2067  * Send data to transport
2068  * Each rqst is transported as a SMBDirect payload
2069  * rqst: the data to write
2070  * return value: 0 if successfully write, otherwise error code
2071  */
2072 int smbd_send(struct TCP_Server_Info *server,
2073         int num_rqst, struct smb_rqst *rqst_array)
2074 {
2075         struct smbd_connection *info = server->smbd_conn;
2076         struct kvec vec;
2077         int nvecs;
2078         int size;
2079         unsigned int buflen, remaining_data_length;
2080         int start, i, j;
2081         int max_iov_size =
2082                 info->max_send_size - sizeof(struct smbd_data_transfer);
2083         struct kvec *iov;
2084         int rc;
2085         struct smb_rqst *rqst;
2086         int rqst_idx;
2087
2088         if (info->transport_status != SMBD_CONNECTED) {
2089                 rc = -EAGAIN;
2090                 goto done;
2091         }
2092
2093         /*
2094          * Add in the page array if there is one. The caller needs to set
2095          * rq_tailsz to PAGE_SIZE when the buffer has multiple pages and
2096          * ends at page boundary
2097          */
2098         remaining_data_length = 0;
2099         for (i = 0; i < num_rqst; i++)
2100                 remaining_data_length += smb_rqst_len(server, &rqst_array[i]);
2101
2102         if (remaining_data_length + sizeof(struct smbd_data_transfer) >
2103                 info->max_fragmented_send_size) {
2104                 log_write(ERR, "payload size %d > max size %d\n",
2105                         remaining_data_length, info->max_fragmented_send_size);
2106                 rc = -EINVAL;
2107                 goto done;
2108         }
2109
2110         log_write(INFO, "num_rqst=%d total length=%u\n",
2111                         num_rqst, remaining_data_length);
2112
2113         rqst_idx = 0;
2114 next_rqst:
2115         rqst = &rqst_array[rqst_idx];
2116         iov = rqst->rq_iov;
2117
2118         cifs_dbg(FYI, "Sending smb (RDMA): idx=%d smb_len=%lu\n",
2119                 rqst_idx, smb_rqst_len(server, rqst));
2120         for (i = 0; i < rqst->rq_nvec; i++)
2121                 dump_smb(iov[i].iov_base, iov[i].iov_len);
2122
2123
2124         log_write(INFO, "rqst_idx=%d nvec=%d rqst->rq_npages=%d rq_pagesz=%d "
2125                 "rq_tailsz=%d buflen=%lu\n",
2126                 rqst_idx, rqst->rq_nvec, rqst->rq_npages, rqst->rq_pagesz,
2127                 rqst->rq_tailsz, smb_rqst_len(server, rqst));
2128
2129         start = i = 0;
2130         buflen = 0;
2131         while (true) {
2132                 buflen += iov[i].iov_len;
2133                 if (buflen > max_iov_size) {
2134                         if (i > start) {
2135                                 remaining_data_length -=
2136                                         (buflen-iov[i].iov_len);
2137                                 log_write(INFO, "sending iov[] from start=%d "
2138                                         "i=%d nvecs=%d "
2139                                         "remaining_data_length=%d\n",
2140                                         start, i, i-start,
2141                                         remaining_data_length);
2142                                 rc = smbd_post_send_data(
2143                                         info, &iov[start], i-start,
2144                                         remaining_data_length);
2145                                 if (rc)
2146                                         goto done;
2147                         } else {
2148                                 /* iov[start] is too big, break it */
2149                                 nvecs = (buflen+max_iov_size-1)/max_iov_size;
2150                                 log_write(INFO, "iov[%d] iov_base=%p buflen=%d"
2151                                         " break to %d vectors\n",
2152                                         start, iov[start].iov_base,
2153                                         buflen, nvecs);
2154                                 for (j = 0; j < nvecs; j++) {
2155                                         vec.iov_base =
2156                                                 (char *)iov[start].iov_base +
2157                                                 j*max_iov_size;
2158                                         vec.iov_len = max_iov_size;
2159                                         if (j == nvecs-1)
2160                                                 vec.iov_len =
2161                                                         buflen -
2162                                                         max_iov_size*(nvecs-1);
2163                                         remaining_data_length -= vec.iov_len;
2164                                         log_write(INFO,
2165                                                 "sending vec j=%d iov_base=%p"
2166                                                 " iov_len=%zu "
2167                                                 "remaining_data_length=%d\n",
2168                                                 j, vec.iov_base, vec.iov_len,
2169                                                 remaining_data_length);
2170                                         rc = smbd_post_send_data(
2171                                                 info, &vec, 1,
2172                                                 remaining_data_length);
2173                                         if (rc)
2174                                                 goto done;
2175                                 }
2176                                 i++;
2177                                 if (i == rqst->rq_nvec)
2178                                         break;
2179                         }
2180                         start = i;
2181                         buflen = 0;
2182                 } else {
2183                         i++;
2184                         if (i == rqst->rq_nvec) {
2185                                 /* send out all remaining vecs */
2186                                 remaining_data_length -= buflen;
2187                                 log_write(INFO,
2188                                         "sending iov[] from start=%d i=%d "
2189                                         "nvecs=%d remaining_data_length=%d\n",
2190                                         start, i, i-start,
2191                                         remaining_data_length);
2192                                 rc = smbd_post_send_data(info, &iov[start],
2193                                         i-start, remaining_data_length);
2194                                 if (rc)
2195                                         goto done;
2196                                 break;
2197                         }
2198                 }
2199                 log_write(INFO, "looping i=%d buflen=%d\n", i, buflen);
2200         }
2201
2202         /* now sending pages if there are any */
2203         for (i = 0; i < rqst->rq_npages; i++) {
2204                 unsigned int offset;
2205
2206                 rqst_page_get_length(rqst, i, &buflen, &offset);
2207                 nvecs = (buflen + max_iov_size - 1) / max_iov_size;
2208                 log_write(INFO, "sending pages buflen=%d nvecs=%d\n",
2209                         buflen, nvecs);
2210                 for (j = 0; j < nvecs; j++) {
2211                         size = max_iov_size;
2212                         if (j == nvecs-1)
2213                                 size = buflen - j*max_iov_size;
2214                         remaining_data_length -= size;
2215                         log_write(INFO, "sending pages i=%d offset=%d size=%d"
2216                                 " remaining_data_length=%d\n",
2217                                 i, j*max_iov_size+offset, size,
2218                                 remaining_data_length);
2219                         rc = smbd_post_send_page(
2220                                 info, rqst->rq_pages[i],
2221                                 j*max_iov_size + offset,
2222                                 size, remaining_data_length);
2223                         if (rc)
2224                                 goto done;
2225                 }
2226         }
2227
2228         rqst_idx++;
2229         if (rqst_idx < num_rqst)
2230                 goto next_rqst;
2231
2232 done:
2233         /*
2234          * As an optimization, we don't wait for individual I/O to finish
2235          * before sending the next one.
2236          * Send them all and wait for pending send count to get to 0
2237          * that means all the I/Os have been out and we are good to return
2238          */
2239
2240         wait_event(info->wait_send_payload_pending,
2241                 atomic_read(&info->send_payload_pending) == 0);
2242
2243         return rc;
2244 }
2245
2246 static void register_mr_done(struct ib_cq *cq, struct ib_wc *wc)
2247 {
2248         struct smbd_mr *mr;
2249         struct ib_cqe *cqe;
2250
2251         if (wc->status) {
2252                 log_rdma_mr(ERR, "status=%d\n", wc->status);
2253                 cqe = wc->wr_cqe;
2254                 mr = container_of(cqe, struct smbd_mr, cqe);
2255                 smbd_disconnect_rdma_connection(mr->conn);
2256         }
2257 }
2258
2259 /*
2260  * The work queue function that recovers MRs
2261  * We need to call ib_dereg_mr() and ib_alloc_mr() before this MR can be used
2262  * again. Both calls are slow, so finish them in a workqueue. This will not
2263  * block I/O path.
2264  * There is one workqueue that recovers MRs, there is no need to lock as the
2265  * I/O requests calling smbd_register_mr will never update the links in the
2266  * mr_list.
2267  */
2268 static void smbd_mr_recovery_work(struct work_struct *work)
2269 {
2270         struct smbd_connection *info =
2271                 container_of(work, struct smbd_connection, mr_recovery_work);
2272         struct smbd_mr *smbdirect_mr;
2273         int rc;
2274
2275         list_for_each_entry(smbdirect_mr, &info->mr_list, list) {
2276                 if (smbdirect_mr->state == MR_ERROR) {
2277
2278                         /* recover this MR entry */
2279                         rc = ib_dereg_mr(smbdirect_mr->mr);
2280                         if (rc) {
2281                                 log_rdma_mr(ERR,
2282                                         "ib_dereg_mr failed rc=%x\n",
2283                                         rc);
2284                                 smbd_disconnect_rdma_connection(info);
2285                                 continue;
2286                         }
2287
2288                         smbdirect_mr->mr = ib_alloc_mr(
2289                                 info->pd, info->mr_type,
2290                                 info->max_frmr_depth);
2291                         if (IS_ERR(smbdirect_mr->mr)) {
2292                                 log_rdma_mr(ERR,
2293                                         "ib_alloc_mr failed mr_type=%x "
2294                                         "max_frmr_depth=%x\n",
2295                                         info->mr_type,
2296                                         info->max_frmr_depth);
2297                                 smbd_disconnect_rdma_connection(info);
2298                                 continue;
2299                         }
2300                 } else
2301                         /* This MR is being used, don't recover it */
2302                         continue;
2303
2304                 smbdirect_mr->state = MR_READY;
2305
2306                 /* smbdirect_mr->state is updated by this function
2307                  * and is read and updated by I/O issuing CPUs trying
2308                  * to get a MR, the call to atomic_inc_return
2309                  * implicates a memory barrier and guarantees this
2310                  * value is updated before waking up any calls to
2311                  * get_mr() from the I/O issuing CPUs
2312                  */
2313                 if (atomic_inc_return(&info->mr_ready_count) == 1)
2314                         wake_up_interruptible(&info->wait_mr);
2315         }
2316 }
2317
2318 static void destroy_mr_list(struct smbd_connection *info)
2319 {
2320         struct smbd_mr *mr, *tmp;
2321
2322         cancel_work_sync(&info->mr_recovery_work);
2323         list_for_each_entry_safe(mr, tmp, &info->mr_list, list) {
2324                 if (mr->state == MR_INVALIDATED)
2325                         ib_dma_unmap_sg(info->id->device, mr->sgl,
2326                                 mr->sgl_count, mr->dir);
2327                 ib_dereg_mr(mr->mr);
2328                 kfree(mr->sgl);
2329                 kfree(mr);
2330         }
2331 }
2332
2333 /*
2334  * Allocate MRs used for RDMA read/write
2335  * The number of MRs will not exceed hardware capability in responder_resources
2336  * All MRs are kept in mr_list. The MR can be recovered after it's used
2337  * Recovery is done in smbd_mr_recovery_work. The content of list entry changes
2338  * as MRs are used and recovered for I/O, but the list links will not change
2339  */
2340 static int allocate_mr_list(struct smbd_connection *info)
2341 {
2342         int i;
2343         struct smbd_mr *smbdirect_mr, *tmp;
2344
2345         INIT_LIST_HEAD(&info->mr_list);
2346         init_waitqueue_head(&info->wait_mr);
2347         spin_lock_init(&info->mr_list_lock);
2348         atomic_set(&info->mr_ready_count, 0);
2349         atomic_set(&info->mr_used_count, 0);
2350         init_waitqueue_head(&info->wait_for_mr_cleanup);
2351         INIT_WORK(&info->mr_recovery_work, smbd_mr_recovery_work);
2352         /* Allocate more MRs (2x) than hardware responder_resources */
2353         for (i = 0; i < info->responder_resources * 2; i++) {
2354                 smbdirect_mr = kzalloc(sizeof(*smbdirect_mr), GFP_KERNEL);
2355                 if (!smbdirect_mr)
2356                         goto out;
2357                 smbdirect_mr->mr = ib_alloc_mr(info->pd, info->mr_type,
2358                                         info->max_frmr_depth);
2359                 if (IS_ERR(smbdirect_mr->mr)) {
2360                         log_rdma_mr(ERR, "ib_alloc_mr failed mr_type=%x "
2361                                 "max_frmr_depth=%x\n",
2362                                 info->mr_type, info->max_frmr_depth);
2363                         goto out;
2364                 }
2365                 smbdirect_mr->sgl = kcalloc(
2366                                         info->max_frmr_depth,
2367                                         sizeof(struct scatterlist),
2368                                         GFP_KERNEL);
2369                 if (!smbdirect_mr->sgl) {
2370                         log_rdma_mr(ERR, "failed to allocate sgl\n");
2371                         ib_dereg_mr(smbdirect_mr->mr);
2372                         goto out;
2373                 }
2374                 smbdirect_mr->state = MR_READY;
2375                 smbdirect_mr->conn = info;
2376
2377                 list_add_tail(&smbdirect_mr->list, &info->mr_list);
2378                 atomic_inc(&info->mr_ready_count);
2379         }
2380         return 0;
2381
2382 out:
2383         kfree(smbdirect_mr);
2384
2385         list_for_each_entry_safe(smbdirect_mr, tmp, &info->mr_list, list) {
2386                 list_del(&smbdirect_mr->list);
2387                 ib_dereg_mr(smbdirect_mr->mr);
2388                 kfree(smbdirect_mr->sgl);
2389                 kfree(smbdirect_mr);
2390         }
2391         return -ENOMEM;
2392 }
2393
2394 /*
2395  * Get a MR from mr_list. This function waits until there is at least one
2396  * MR available in the list. It may access the list while the
2397  * smbd_mr_recovery_work is recovering the MR list. This doesn't need a lock
2398  * as they never modify the same places. However, there may be several CPUs
2399  * issueing I/O trying to get MR at the same time, mr_list_lock is used to
2400  * protect this situation.
2401  */
2402 static struct smbd_mr *get_mr(struct smbd_connection *info)
2403 {
2404         struct smbd_mr *ret;
2405         int rc;
2406 again:
2407         rc = wait_event_interruptible(info->wait_mr,
2408                 atomic_read(&info->mr_ready_count) ||
2409                 info->transport_status != SMBD_CONNECTED);
2410         if (rc) {
2411                 log_rdma_mr(ERR, "wait_event_interruptible rc=%x\n", rc);
2412                 return NULL;
2413         }
2414
2415         if (info->transport_status != SMBD_CONNECTED) {
2416                 log_rdma_mr(ERR, "info->transport_status=%x\n",
2417                         info->transport_status);
2418                 return NULL;
2419         }
2420
2421         spin_lock(&info->mr_list_lock);
2422         list_for_each_entry(ret, &info->mr_list, list) {
2423                 if (ret->state == MR_READY) {
2424                         ret->state = MR_REGISTERED;
2425                         spin_unlock(&info->mr_list_lock);
2426                         atomic_dec(&info->mr_ready_count);
2427                         atomic_inc(&info->mr_used_count);
2428                         return ret;
2429                 }
2430         }
2431
2432         spin_unlock(&info->mr_list_lock);
2433         /*
2434          * It is possible that we could fail to get MR because other processes may
2435          * try to acquire a MR at the same time. If this is the case, retry it.
2436          */
2437         goto again;
2438 }
2439
2440 /*
2441  * Register memory for RDMA read/write
2442  * pages[]: the list of pages to register memory with
2443  * num_pages: the number of pages to register
2444  * tailsz: if non-zero, the bytes to register in the last page
2445  * writing: true if this is a RDMA write (SMB read), false for RDMA read
2446  * need_invalidate: true if this MR needs to be locally invalidated after I/O
2447  * return value: the MR registered, NULL if failed.
2448  */
2449 struct smbd_mr *smbd_register_mr(
2450         struct smbd_connection *info, struct page *pages[], int num_pages,
2451         int offset, int tailsz, bool writing, bool need_invalidate)
2452 {
2453         struct smbd_mr *smbdirect_mr;
2454         int rc, i;
2455         enum dma_data_direction dir;
2456         struct ib_reg_wr *reg_wr;
2457
2458         if (num_pages > info->max_frmr_depth) {
2459                 log_rdma_mr(ERR, "num_pages=%d max_frmr_depth=%d\n",
2460                         num_pages, info->max_frmr_depth);
2461                 return NULL;
2462         }
2463
2464         smbdirect_mr = get_mr(info);
2465         if (!smbdirect_mr) {
2466                 log_rdma_mr(ERR, "get_mr returning NULL\n");
2467                 return NULL;
2468         }
2469         smbdirect_mr->need_invalidate = need_invalidate;
2470         smbdirect_mr->sgl_count = num_pages;
2471         sg_init_table(smbdirect_mr->sgl, num_pages);
2472
2473         log_rdma_mr(INFO, "num_pages=0x%x offset=0x%x tailsz=0x%x\n",
2474                         num_pages, offset, tailsz);
2475
2476         if (num_pages == 1) {
2477                 sg_set_page(&smbdirect_mr->sgl[0], pages[0], tailsz, offset);
2478                 goto skip_multiple_pages;
2479         }
2480
2481         /* We have at least two pages to register */
2482         sg_set_page(
2483                 &smbdirect_mr->sgl[0], pages[0], PAGE_SIZE - offset, offset);
2484         i = 1;
2485         while (i < num_pages - 1) {
2486                 sg_set_page(&smbdirect_mr->sgl[i], pages[i], PAGE_SIZE, 0);
2487                 i++;
2488         }
2489         sg_set_page(&smbdirect_mr->sgl[i], pages[i],
2490                 tailsz ? tailsz : PAGE_SIZE, 0);
2491
2492 skip_multiple_pages:
2493         dir = writing ? DMA_FROM_DEVICE : DMA_TO_DEVICE;
2494         smbdirect_mr->dir = dir;
2495         rc = ib_dma_map_sg(info->id->device, smbdirect_mr->sgl, num_pages, dir);
2496         if (!rc) {
2497                 log_rdma_mr(ERR, "ib_dma_map_sg num_pages=%x dir=%x rc=%x\n",
2498                         num_pages, dir, rc);
2499                 goto dma_map_error;
2500         }
2501
2502         rc = ib_map_mr_sg(smbdirect_mr->mr, smbdirect_mr->sgl, num_pages,
2503                 NULL, PAGE_SIZE);
2504         if (rc != num_pages) {
2505                 log_rdma_mr(ERR,
2506                         "ib_map_mr_sg failed rc = %d num_pages = %x\n",
2507                         rc, num_pages);
2508                 goto map_mr_error;
2509         }
2510
2511         ib_update_fast_reg_key(smbdirect_mr->mr,
2512                 ib_inc_rkey(smbdirect_mr->mr->rkey));
2513         reg_wr = &smbdirect_mr->wr;
2514         reg_wr->wr.opcode = IB_WR_REG_MR;
2515         smbdirect_mr->cqe.done = register_mr_done;
2516         reg_wr->wr.wr_cqe = &smbdirect_mr->cqe;
2517         reg_wr->wr.num_sge = 0;
2518         reg_wr->wr.send_flags = IB_SEND_SIGNALED;
2519         reg_wr->mr = smbdirect_mr->mr;
2520         reg_wr->key = smbdirect_mr->mr->rkey;
2521         reg_wr->access = writing ?
2522                         IB_ACCESS_REMOTE_WRITE | IB_ACCESS_LOCAL_WRITE :
2523                         IB_ACCESS_REMOTE_READ;
2524
2525         /*
2526          * There is no need for waiting for complemtion on ib_post_send
2527          * on IB_WR_REG_MR. Hardware enforces a barrier and order of execution
2528          * on the next ib_post_send when we actaully send I/O to remote peer
2529          */
2530         rc = ib_post_send(info->id->qp, &reg_wr->wr, NULL);
2531         if (!rc)
2532                 return smbdirect_mr;
2533
2534         log_rdma_mr(ERR, "ib_post_send failed rc=%x reg_wr->key=%x\n",
2535                 rc, reg_wr->key);
2536
2537         /* If all failed, attempt to recover this MR by setting it MR_ERROR*/
2538 map_mr_error:
2539         ib_dma_unmap_sg(info->id->device, smbdirect_mr->sgl,
2540                 smbdirect_mr->sgl_count, smbdirect_mr->dir);
2541
2542 dma_map_error:
2543         smbdirect_mr->state = MR_ERROR;
2544         if (atomic_dec_and_test(&info->mr_used_count))
2545                 wake_up(&info->wait_for_mr_cleanup);
2546
2547         smbd_disconnect_rdma_connection(info);
2548
2549         return NULL;
2550 }
2551
2552 static void local_inv_done(struct ib_cq *cq, struct ib_wc *wc)
2553 {
2554         struct smbd_mr *smbdirect_mr;
2555         struct ib_cqe *cqe;
2556
2557         cqe = wc->wr_cqe;
2558         smbdirect_mr = container_of(cqe, struct smbd_mr, cqe);
2559         smbdirect_mr->state = MR_INVALIDATED;
2560         if (wc->status != IB_WC_SUCCESS) {
2561                 log_rdma_mr(ERR, "invalidate failed status=%x\n", wc->status);
2562                 smbdirect_mr->state = MR_ERROR;
2563         }
2564         complete(&smbdirect_mr->invalidate_done);
2565 }
2566
2567 /*
2568  * Deregister a MR after I/O is done
2569  * This function may wait if remote invalidation is not used
2570  * and we have to locally invalidate the buffer to prevent data is being
2571  * modified by remote peer after upper layer consumes it
2572  */
2573 int smbd_deregister_mr(struct smbd_mr *smbdirect_mr)
2574 {
2575         struct ib_send_wr *wr;
2576         struct smbd_connection *info = smbdirect_mr->conn;
2577         int rc = 0;
2578
2579         if (smbdirect_mr->need_invalidate) {
2580                 /* Need to finish local invalidation before returning */
2581                 wr = &smbdirect_mr->inv_wr;
2582                 wr->opcode = IB_WR_LOCAL_INV;
2583                 smbdirect_mr->cqe.done = local_inv_done;
2584                 wr->wr_cqe = &smbdirect_mr->cqe;
2585                 wr->num_sge = 0;
2586                 wr->ex.invalidate_rkey = smbdirect_mr->mr->rkey;
2587                 wr->send_flags = IB_SEND_SIGNALED;
2588
2589                 init_completion(&smbdirect_mr->invalidate_done);
2590                 rc = ib_post_send(info->id->qp, wr, NULL);
2591                 if (rc) {
2592                         log_rdma_mr(ERR, "ib_post_send failed rc=%x\n", rc);
2593                         smbd_disconnect_rdma_connection(info);
2594                         goto done;
2595                 }
2596                 wait_for_completion(&smbdirect_mr->invalidate_done);
2597                 smbdirect_mr->need_invalidate = false;
2598         } else
2599                 /*
2600                  * For remote invalidation, just set it to MR_INVALIDATED
2601                  * and defer to mr_recovery_work to recover the MR for next use
2602                  */
2603                 smbdirect_mr->state = MR_INVALIDATED;
2604
2605         if (smbdirect_mr->state == MR_INVALIDATED) {
2606                 ib_dma_unmap_sg(
2607                         info->id->device, smbdirect_mr->sgl,
2608                         smbdirect_mr->sgl_count,
2609                         smbdirect_mr->dir);
2610                 smbdirect_mr->state = MR_READY;
2611                 if (atomic_inc_return(&info->mr_ready_count) == 1)
2612                         wake_up_interruptible(&info->wait_mr);
2613         } else
2614                 /*
2615                  * Schedule the work to do MR recovery for future I/Os MR
2616                  * recovery is slow and don't want it to block current I/O
2617                  */
2618                 queue_work(info->workqueue, &info->mr_recovery_work);
2619
2620 done:
2621         if (atomic_dec_and_test(&info->mr_used_count))
2622                 wake_up(&info->wait_for_mr_cleanup);
2623
2624         return rc;
2625 }