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 -ENOMEM;
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         kfree(info);
1480 }
1481
1482 /*
1483  * Reconnect this SMBD connection, called from upper layer
1484  * return value: 0 on success, or actual error code
1485  */
1486 int smbd_reconnect(struct TCP_Server_Info *server)
1487 {
1488         log_rdma_event(INFO, "reconnecting rdma session\n");
1489
1490         if (!server->smbd_conn) {
1491                 log_rdma_event(INFO, "rdma session already destroyed\n");
1492                 goto create_conn;
1493         }
1494
1495         /*
1496          * This is possible if transport is disconnected and we haven't received
1497          * notification from RDMA, but upper layer has detected timeout
1498          */
1499         if (server->smbd_conn->transport_status == SMBD_CONNECTED) {
1500                 log_rdma_event(INFO, "disconnecting transport\n");
1501                 smbd_destroy(server);
1502         }
1503
1504 create_conn:
1505         log_rdma_event(INFO, "creating rdma session\n");
1506         server->smbd_conn = smbd_get_connection(
1507                 server, (struct sockaddr *) &server->dstaddr);
1508         log_rdma_event(INFO, "created rdma session info=%p\n",
1509                 server->smbd_conn);
1510
1511         return server->smbd_conn ? 0 : -ENOENT;
1512 }
1513
1514 static void destroy_caches_and_workqueue(struct smbd_connection *info)
1515 {
1516         destroy_receive_buffers(info);
1517         destroy_workqueue(info->workqueue);
1518         mempool_destroy(info->response_mempool);
1519         kmem_cache_destroy(info->response_cache);
1520         mempool_destroy(info->request_mempool);
1521         kmem_cache_destroy(info->request_cache);
1522 }
1523
1524 #define MAX_NAME_LEN    80
1525 static int allocate_caches_and_workqueue(struct smbd_connection *info)
1526 {
1527         char name[MAX_NAME_LEN];
1528         int rc;
1529
1530         scnprintf(name, MAX_NAME_LEN, "smbd_request_%p", info);
1531         info->request_cache =
1532                 kmem_cache_create(
1533                         name,
1534                         sizeof(struct smbd_request) +
1535                                 sizeof(struct smbd_data_transfer),
1536                         0, SLAB_HWCACHE_ALIGN, NULL);
1537         if (!info->request_cache)
1538                 return -ENOMEM;
1539
1540         info->request_mempool =
1541                 mempool_create(info->send_credit_target, mempool_alloc_slab,
1542                         mempool_free_slab, info->request_cache);
1543         if (!info->request_mempool)
1544                 goto out1;
1545
1546         scnprintf(name, MAX_NAME_LEN, "smbd_response_%p", info);
1547         info->response_cache =
1548                 kmem_cache_create(
1549                         name,
1550                         sizeof(struct smbd_response) +
1551                                 info->max_receive_size,
1552                         0, SLAB_HWCACHE_ALIGN, NULL);
1553         if (!info->response_cache)
1554                 goto out2;
1555
1556         info->response_mempool =
1557                 mempool_create(info->receive_credit_max, mempool_alloc_slab,
1558                        mempool_free_slab, info->response_cache);
1559         if (!info->response_mempool)
1560                 goto out3;
1561
1562         scnprintf(name, MAX_NAME_LEN, "smbd_%p", info);
1563         info->workqueue = create_workqueue(name);
1564         if (!info->workqueue)
1565                 goto out4;
1566
1567         rc = allocate_receive_buffers(info, info->receive_credit_max);
1568         if (rc) {
1569                 log_rdma_event(ERR, "failed to allocate receive buffers\n");
1570                 goto out5;
1571         }
1572
1573         return 0;
1574
1575 out5:
1576         destroy_workqueue(info->workqueue);
1577 out4:
1578         mempool_destroy(info->response_mempool);
1579 out3:
1580         kmem_cache_destroy(info->response_cache);
1581 out2:
1582         mempool_destroy(info->request_mempool);
1583 out1:
1584         kmem_cache_destroy(info->request_cache);
1585         return -ENOMEM;
1586 }
1587
1588 /* Create a SMBD connection, called by upper layer */
1589 static struct smbd_connection *_smbd_get_connection(
1590         struct TCP_Server_Info *server, struct sockaddr *dstaddr, int port)
1591 {
1592         int rc;
1593         struct smbd_connection *info;
1594         struct rdma_conn_param conn_param;
1595         struct ib_qp_init_attr qp_attr;
1596         struct sockaddr_in *addr_in = (struct sockaddr_in *) dstaddr;
1597         struct ib_port_immutable port_immutable;
1598         u32 ird_ord_hdr[2];
1599
1600         info = kzalloc(sizeof(struct smbd_connection), GFP_KERNEL);
1601         if (!info)
1602                 return NULL;
1603
1604         info->transport_status = SMBD_CONNECTING;
1605         rc = smbd_ia_open(info, dstaddr, port);
1606         if (rc) {
1607                 log_rdma_event(INFO, "smbd_ia_open rc=%d\n", rc);
1608                 goto create_id_failed;
1609         }
1610
1611         if (smbd_send_credit_target > info->id->device->attrs.max_cqe ||
1612             smbd_send_credit_target > info->id->device->attrs.max_qp_wr) {
1613                 log_rdma_event(ERR,
1614                         "consider lowering send_credit_target = %d. "
1615                         "Possible CQE overrun, device "
1616                         "reporting max_cpe %d max_qp_wr %d\n",
1617                         smbd_send_credit_target,
1618                         info->id->device->attrs.max_cqe,
1619                         info->id->device->attrs.max_qp_wr);
1620                 goto config_failed;
1621         }
1622
1623         if (smbd_receive_credit_max > info->id->device->attrs.max_cqe ||
1624             smbd_receive_credit_max > info->id->device->attrs.max_qp_wr) {
1625                 log_rdma_event(ERR,
1626                         "consider lowering receive_credit_max = %d. "
1627                         "Possible CQE overrun, device "
1628                         "reporting max_cpe %d max_qp_wr %d\n",
1629                         smbd_receive_credit_max,
1630                         info->id->device->attrs.max_cqe,
1631                         info->id->device->attrs.max_qp_wr);
1632                 goto config_failed;
1633         }
1634
1635         info->receive_credit_max = smbd_receive_credit_max;
1636         info->send_credit_target = smbd_send_credit_target;
1637         info->max_send_size = smbd_max_send_size;
1638         info->max_fragmented_recv_size = smbd_max_fragmented_recv_size;
1639         info->max_receive_size = smbd_max_receive_size;
1640         info->keep_alive_interval = smbd_keep_alive_interval;
1641
1642         if (info->id->device->attrs.max_send_sge < SMBDIRECT_MAX_SGE) {
1643                 log_rdma_event(ERR,
1644                         "warning: device max_send_sge = %d too small\n",
1645                         info->id->device->attrs.max_send_sge);
1646                 log_rdma_event(ERR, "Queue Pair creation may fail\n");
1647         }
1648         if (info->id->device->attrs.max_recv_sge < SMBDIRECT_MAX_SGE) {
1649                 log_rdma_event(ERR,
1650                         "warning: device max_recv_sge = %d too small\n",
1651                         info->id->device->attrs.max_recv_sge);
1652                 log_rdma_event(ERR, "Queue Pair creation may fail\n");
1653         }
1654
1655         info->send_cq = NULL;
1656         info->recv_cq = NULL;
1657         info->send_cq =
1658                 ib_alloc_cq_any(info->id->device, info,
1659                                 info->send_credit_target, IB_POLL_SOFTIRQ);
1660         if (IS_ERR(info->send_cq)) {
1661                 info->send_cq = NULL;
1662                 goto alloc_cq_failed;
1663         }
1664
1665         info->recv_cq =
1666                 ib_alloc_cq_any(info->id->device, info,
1667                                 info->receive_credit_max, IB_POLL_SOFTIRQ);
1668         if (IS_ERR(info->recv_cq)) {
1669                 info->recv_cq = NULL;
1670                 goto alloc_cq_failed;
1671         }
1672
1673         memset(&qp_attr, 0, sizeof(qp_attr));
1674         qp_attr.event_handler = smbd_qp_async_error_upcall;
1675         qp_attr.qp_context = info;
1676         qp_attr.cap.max_send_wr = info->send_credit_target;
1677         qp_attr.cap.max_recv_wr = info->receive_credit_max;
1678         qp_attr.cap.max_send_sge = SMBDIRECT_MAX_SGE;
1679         qp_attr.cap.max_recv_sge = SMBDIRECT_MAX_SGE;
1680         qp_attr.cap.max_inline_data = 0;
1681         qp_attr.sq_sig_type = IB_SIGNAL_REQ_WR;
1682         qp_attr.qp_type = IB_QPT_RC;
1683         qp_attr.send_cq = info->send_cq;
1684         qp_attr.recv_cq = info->recv_cq;
1685         qp_attr.port_num = ~0;
1686
1687         rc = rdma_create_qp(info->id, info->pd, &qp_attr);
1688         if (rc) {
1689                 log_rdma_event(ERR, "rdma_create_qp failed %i\n", rc);
1690                 goto create_qp_failed;
1691         }
1692
1693         memset(&conn_param, 0, sizeof(conn_param));
1694         conn_param.initiator_depth = 0;
1695
1696         conn_param.responder_resources =
1697                 info->id->device->attrs.max_qp_rd_atom
1698                         < SMBD_CM_RESPONDER_RESOURCES ?
1699                 info->id->device->attrs.max_qp_rd_atom :
1700                 SMBD_CM_RESPONDER_RESOURCES;
1701         info->responder_resources = conn_param.responder_resources;
1702         log_rdma_mr(INFO, "responder_resources=%d\n",
1703                 info->responder_resources);
1704
1705         /* Need to send IRD/ORD in private data for iWARP */
1706         info->id->device->ops.get_port_immutable(
1707                 info->id->device, info->id->port_num, &port_immutable);
1708         if (port_immutable.core_cap_flags & RDMA_CORE_PORT_IWARP) {
1709                 ird_ord_hdr[0] = info->responder_resources;
1710                 ird_ord_hdr[1] = 1;
1711                 conn_param.private_data = ird_ord_hdr;
1712                 conn_param.private_data_len = sizeof(ird_ord_hdr);
1713         } else {
1714                 conn_param.private_data = NULL;
1715                 conn_param.private_data_len = 0;
1716         }
1717
1718         conn_param.retry_count = SMBD_CM_RETRY;
1719         conn_param.rnr_retry_count = SMBD_CM_RNR_RETRY;
1720         conn_param.flow_control = 0;
1721
1722         log_rdma_event(INFO, "connecting to IP %pI4 port %d\n",
1723                 &addr_in->sin_addr, port);
1724
1725         init_waitqueue_head(&info->conn_wait);
1726         init_waitqueue_head(&info->disconn_wait);
1727         init_waitqueue_head(&info->wait_reassembly_queue);
1728         rc = rdma_connect(info->id, &conn_param);
1729         if (rc) {
1730                 log_rdma_event(ERR, "rdma_connect() failed with %i\n", rc);
1731                 goto rdma_connect_failed;
1732         }
1733
1734         wait_event_interruptible(
1735                 info->conn_wait, info->transport_status != SMBD_CONNECTING);
1736
1737         if (info->transport_status != SMBD_CONNECTED) {
1738                 log_rdma_event(ERR, "rdma_connect failed port=%d\n", port);
1739                 goto rdma_connect_failed;
1740         }
1741
1742         log_rdma_event(INFO, "rdma_connect connected\n");
1743
1744         rc = allocate_caches_and_workqueue(info);
1745         if (rc) {
1746                 log_rdma_event(ERR, "cache allocation failed\n");
1747                 goto allocate_cache_failed;
1748         }
1749
1750         init_waitqueue_head(&info->wait_send_queue);
1751         INIT_DELAYED_WORK(&info->idle_timer_work, idle_connection_timer);
1752         INIT_DELAYED_WORK(&info->send_immediate_work, send_immediate_work);
1753         queue_delayed_work(info->workqueue, &info->idle_timer_work,
1754                 info->keep_alive_interval*HZ);
1755
1756         init_waitqueue_head(&info->wait_send_pending);
1757         atomic_set(&info->send_pending, 0);
1758
1759         init_waitqueue_head(&info->wait_send_payload_pending);
1760         atomic_set(&info->send_payload_pending, 0);
1761
1762         INIT_WORK(&info->disconnect_work, smbd_disconnect_rdma_work);
1763         INIT_WORK(&info->recv_done_work, smbd_recv_done_work);
1764         INIT_WORK(&info->post_send_credits_work, smbd_post_send_credits);
1765         info->new_credits_offered = 0;
1766         spin_lock_init(&info->lock_new_credits_offered);
1767
1768         rc = smbd_negotiate(info);
1769         if (rc) {
1770                 log_rdma_event(ERR, "smbd_negotiate rc=%d\n", rc);
1771                 goto negotiation_failed;
1772         }
1773
1774         rc = allocate_mr_list(info);
1775         if (rc) {
1776                 log_rdma_mr(ERR, "memory registration allocation failed\n");
1777                 goto allocate_mr_failed;
1778         }
1779
1780         return info;
1781
1782 allocate_mr_failed:
1783         /* At this point, need to a full transport shutdown */
1784         smbd_destroy(server);
1785         return NULL;
1786
1787 negotiation_failed:
1788         cancel_delayed_work_sync(&info->idle_timer_work);
1789         destroy_caches_and_workqueue(info);
1790         info->transport_status = SMBD_NEGOTIATE_FAILED;
1791         init_waitqueue_head(&info->conn_wait);
1792         rdma_disconnect(info->id);
1793         wait_event(info->conn_wait,
1794                 info->transport_status == SMBD_DISCONNECTED);
1795
1796 allocate_cache_failed:
1797 rdma_connect_failed:
1798         rdma_destroy_qp(info->id);
1799
1800 create_qp_failed:
1801 alloc_cq_failed:
1802         if (info->send_cq)
1803                 ib_free_cq(info->send_cq);
1804         if (info->recv_cq)
1805                 ib_free_cq(info->recv_cq);
1806
1807 config_failed:
1808         ib_dealloc_pd(info->pd);
1809         rdma_destroy_id(info->id);
1810
1811 create_id_failed:
1812         kfree(info);
1813         return NULL;
1814 }
1815
1816 struct smbd_connection *smbd_get_connection(
1817         struct TCP_Server_Info *server, struct sockaddr *dstaddr)
1818 {
1819         struct smbd_connection *ret;
1820         int port = SMBD_PORT;
1821
1822 try_again:
1823         ret = _smbd_get_connection(server, dstaddr, port);
1824
1825         /* Try SMB_PORT if SMBD_PORT doesn't work */
1826         if (!ret && port == SMBD_PORT) {
1827                 port = SMB_PORT;
1828                 goto try_again;
1829         }
1830         return ret;
1831 }
1832
1833 /*
1834  * Receive data from receive reassembly queue
1835  * All the incoming data packets are placed in reassembly queue
1836  * buf: the buffer to read data into
1837  * size: the length of data to read
1838  * return value: actual data read
1839  * Note: this implementation copies the data from reassebmly queue to receive
1840  * buffers used by upper layer. This is not the optimal code path. A better way
1841  * to do it is to not have upper layer allocate its receive buffers but rather
1842  * borrow the buffer from reassembly queue, and return it after data is
1843  * consumed. But this will require more changes to upper layer code, and also
1844  * need to consider packet boundaries while they still being reassembled.
1845  */
1846 static int smbd_recv_buf(struct smbd_connection *info, char *buf,
1847                 unsigned int size)
1848 {
1849         struct smbd_response *response;
1850         struct smbd_data_transfer *data_transfer;
1851         int to_copy, to_read, data_read, offset;
1852         u32 data_length, remaining_data_length, data_offset;
1853         int rc;
1854
1855 again:
1856         /*
1857          * No need to hold the reassembly queue lock all the time as we are
1858          * the only one reading from the front of the queue. The transport
1859          * may add more entries to the back of the queue at the same time
1860          */
1861         log_read(INFO, "size=%d info->reassembly_data_length=%d\n", size,
1862                 info->reassembly_data_length);
1863         if (info->reassembly_data_length >= size) {
1864                 int queue_length;
1865                 int queue_removed = 0;
1866
1867                 /*
1868                  * Need to make sure reassembly_data_length is read before
1869                  * reading reassembly_queue_length and calling
1870                  * _get_first_reassembly. This call is lock free
1871                  * as we never read at the end of the queue which are being
1872                  * updated in SOFTIRQ as more data is received
1873                  */
1874                 virt_rmb();
1875                 queue_length = info->reassembly_queue_length;
1876                 data_read = 0;
1877                 to_read = size;
1878                 offset = info->first_entry_offset;
1879                 while (data_read < size) {
1880                         response = _get_first_reassembly(info);
1881                         data_transfer = smbd_response_payload(response);
1882                         data_length = le32_to_cpu(data_transfer->data_length);
1883                         remaining_data_length =
1884                                 le32_to_cpu(
1885                                         data_transfer->remaining_data_length);
1886                         data_offset = le32_to_cpu(data_transfer->data_offset);
1887
1888                         /*
1889                          * The upper layer expects RFC1002 length at the
1890                          * beginning of the payload. Return it to indicate
1891                          * the total length of the packet. This minimize the
1892                          * change to upper layer packet processing logic. This
1893                          * will be eventually remove when an intermediate
1894                          * transport layer is added
1895                          */
1896                         if (response->first_segment && size == 4) {
1897                                 unsigned int rfc1002_len =
1898                                         data_length + remaining_data_length;
1899                                 *((__be32 *)buf) = cpu_to_be32(rfc1002_len);
1900                                 data_read = 4;
1901                                 response->first_segment = false;
1902                                 log_read(INFO, "returning rfc1002 length %d\n",
1903                                         rfc1002_len);
1904                                 goto read_rfc1002_done;
1905                         }
1906
1907                         to_copy = min_t(int, data_length - offset, to_read);
1908                         memcpy(
1909                                 buf + data_read,
1910                                 (char *)data_transfer + data_offset + offset,
1911                                 to_copy);
1912
1913                         /* move on to the next buffer? */
1914                         if (to_copy == data_length - offset) {
1915                                 queue_length--;
1916                                 /*
1917                                  * No need to lock if we are not at the
1918                                  * end of the queue
1919                                  */
1920                                 if (queue_length)
1921                                         list_del(&response->list);
1922                                 else {
1923                                         spin_lock_irq(
1924                                                 &info->reassembly_queue_lock);
1925                                         list_del(&response->list);
1926                                         spin_unlock_irq(
1927                                                 &info->reassembly_queue_lock);
1928                                 }
1929                                 queue_removed++;
1930                                 info->count_reassembly_queue--;
1931                                 info->count_dequeue_reassembly_queue++;
1932                                 put_receive_buffer(info, response);
1933                                 offset = 0;
1934                                 log_read(INFO, "put_receive_buffer offset=0\n");
1935                         } else
1936                                 offset += to_copy;
1937
1938                         to_read -= to_copy;
1939                         data_read += to_copy;
1940
1941                         log_read(INFO, "_get_first_reassembly memcpy %d bytes "
1942                                 "data_transfer_length-offset=%d after that "
1943                                 "to_read=%d data_read=%d offset=%d\n",
1944                                 to_copy, data_length - offset,
1945                                 to_read, data_read, offset);
1946                 }
1947
1948                 spin_lock_irq(&info->reassembly_queue_lock);
1949                 info->reassembly_data_length -= data_read;
1950                 info->reassembly_queue_length -= queue_removed;
1951                 spin_unlock_irq(&info->reassembly_queue_lock);
1952
1953                 info->first_entry_offset = offset;
1954                 log_read(INFO, "returning to thread data_read=%d "
1955                         "reassembly_data_length=%d first_entry_offset=%d\n",
1956                         data_read, info->reassembly_data_length,
1957                         info->first_entry_offset);
1958 read_rfc1002_done:
1959                 return data_read;
1960         }
1961
1962         log_read(INFO, "wait_event on more data\n");
1963         rc = wait_event_interruptible(
1964                 info->wait_reassembly_queue,
1965                 info->reassembly_data_length >= size ||
1966                         info->transport_status != SMBD_CONNECTED);
1967         /* Don't return any data if interrupted */
1968         if (rc)
1969                 return rc;
1970
1971         if (info->transport_status != SMBD_CONNECTED) {
1972                 log_read(ERR, "disconnected\n");
1973                 return 0;
1974         }
1975
1976         goto again;
1977 }
1978
1979 /*
1980  * Receive a page from receive reassembly queue
1981  * page: the page to read data into
1982  * to_read: the length of data to read
1983  * return value: actual data read
1984  */
1985 static int smbd_recv_page(struct smbd_connection *info,
1986                 struct page *page, unsigned int page_offset,
1987                 unsigned int to_read)
1988 {
1989         int ret;
1990         char *to_address;
1991         void *page_address;
1992
1993         /* make sure we have the page ready for read */
1994         ret = wait_event_interruptible(
1995                 info->wait_reassembly_queue,
1996                 info->reassembly_data_length >= to_read ||
1997                         info->transport_status != SMBD_CONNECTED);
1998         if (ret)
1999                 return ret;
2000
2001         /* now we can read from reassembly queue and not sleep */
2002         page_address = kmap_atomic(page);
2003         to_address = (char *) page_address + page_offset;
2004
2005         log_read(INFO, "reading from page=%p address=%p to_read=%d\n",
2006                 page, to_address, to_read);
2007
2008         ret = smbd_recv_buf(info, to_address, to_read);
2009         kunmap_atomic(page_address);
2010
2011         return ret;
2012 }
2013
2014 /*
2015  * Receive data from transport
2016  * msg: a msghdr point to the buffer, can be ITER_KVEC or ITER_BVEC
2017  * return: total bytes read, or 0. SMB Direct will not do partial read.
2018  */
2019 int smbd_recv(struct smbd_connection *info, struct msghdr *msg)
2020 {
2021         char *buf;
2022         struct page *page;
2023         unsigned int to_read, page_offset;
2024         int rc;
2025
2026         if (iov_iter_rw(&msg->msg_iter) == WRITE) {
2027                 /* It's a bug in upper layer to get there */
2028                 cifs_dbg(VFS, "CIFS: invalid msg iter dir %u\n",
2029                          iov_iter_rw(&msg->msg_iter));
2030                 rc = -EINVAL;
2031                 goto out;
2032         }
2033
2034         switch (iov_iter_type(&msg->msg_iter)) {
2035         case ITER_KVEC:
2036                 buf = msg->msg_iter.kvec->iov_base;
2037                 to_read = msg->msg_iter.kvec->iov_len;
2038                 rc = smbd_recv_buf(info, buf, to_read);
2039                 break;
2040
2041         case ITER_BVEC:
2042                 page = msg->msg_iter.bvec->bv_page;
2043                 page_offset = msg->msg_iter.bvec->bv_offset;
2044                 to_read = msg->msg_iter.bvec->bv_len;
2045                 rc = smbd_recv_page(info, page, page_offset, to_read);
2046                 break;
2047
2048         default:
2049                 /* It's a bug in upper layer to get there */
2050                 cifs_dbg(VFS, "CIFS: invalid msg type %d\n",
2051                          iov_iter_type(&msg->msg_iter));
2052                 rc = -EINVAL;
2053         }
2054
2055 out:
2056         /* SMBDirect will read it all or nothing */
2057         if (rc > 0)
2058                 msg->msg_iter.count = 0;
2059         return rc;
2060 }
2061
2062 /*
2063  * Send data to transport
2064  * Each rqst is transported as a SMBDirect payload
2065  * rqst: the data to write
2066  * return value: 0 if successfully write, otherwise error code
2067  */
2068 int smbd_send(struct TCP_Server_Info *server,
2069         int num_rqst, struct smb_rqst *rqst_array)
2070 {
2071         struct smbd_connection *info = server->smbd_conn;
2072         struct kvec vec;
2073         int nvecs;
2074         int size;
2075         unsigned int buflen, remaining_data_length;
2076         int start, i, j;
2077         int max_iov_size =
2078                 info->max_send_size - sizeof(struct smbd_data_transfer);
2079         struct kvec *iov;
2080         int rc;
2081         struct smb_rqst *rqst;
2082         int rqst_idx;
2083
2084         if (info->transport_status != SMBD_CONNECTED) {
2085                 rc = -EAGAIN;
2086                 goto done;
2087         }
2088
2089         /*
2090          * Add in the page array if there is one. The caller needs to set
2091          * rq_tailsz to PAGE_SIZE when the buffer has multiple pages and
2092          * ends at page boundary
2093          */
2094         remaining_data_length = 0;
2095         for (i = 0; i < num_rqst; i++)
2096                 remaining_data_length += smb_rqst_len(server, &rqst_array[i]);
2097
2098         if (remaining_data_length + sizeof(struct smbd_data_transfer) >
2099                 info->max_fragmented_send_size) {
2100                 log_write(ERR, "payload size %d > max size %d\n",
2101                         remaining_data_length, info->max_fragmented_send_size);
2102                 rc = -EINVAL;
2103                 goto done;
2104         }
2105
2106         log_write(INFO, "num_rqst=%d total length=%u\n",
2107                         num_rqst, remaining_data_length);
2108
2109         rqst_idx = 0;
2110 next_rqst:
2111         rqst = &rqst_array[rqst_idx];
2112         iov = rqst->rq_iov;
2113
2114         cifs_dbg(FYI, "Sending smb (RDMA): idx=%d smb_len=%lu\n",
2115                 rqst_idx, smb_rqst_len(server, rqst));
2116         for (i = 0; i < rqst->rq_nvec; i++)
2117                 dump_smb(iov[i].iov_base, iov[i].iov_len);
2118
2119
2120         log_write(INFO, "rqst_idx=%d nvec=%d rqst->rq_npages=%d rq_pagesz=%d "
2121                 "rq_tailsz=%d buflen=%lu\n",
2122                 rqst_idx, rqst->rq_nvec, rqst->rq_npages, rqst->rq_pagesz,
2123                 rqst->rq_tailsz, smb_rqst_len(server, rqst));
2124
2125         start = i = 0;
2126         buflen = 0;
2127         while (true) {
2128                 buflen += iov[i].iov_len;
2129                 if (buflen > max_iov_size) {
2130                         if (i > start) {
2131                                 remaining_data_length -=
2132                                         (buflen-iov[i].iov_len);
2133                                 log_write(INFO, "sending iov[] from start=%d "
2134                                         "i=%d nvecs=%d "
2135                                         "remaining_data_length=%d\n",
2136                                         start, i, i-start,
2137                                         remaining_data_length);
2138                                 rc = smbd_post_send_data(
2139                                         info, &iov[start], i-start,
2140                                         remaining_data_length);
2141                                 if (rc)
2142                                         goto done;
2143                         } else {
2144                                 /* iov[start] is too big, break it */
2145                                 nvecs = (buflen+max_iov_size-1)/max_iov_size;
2146                                 log_write(INFO, "iov[%d] iov_base=%p buflen=%d"
2147                                         " break to %d vectors\n",
2148                                         start, iov[start].iov_base,
2149                                         buflen, nvecs);
2150                                 for (j = 0; j < nvecs; j++) {
2151                                         vec.iov_base =
2152                                                 (char *)iov[start].iov_base +
2153                                                 j*max_iov_size;
2154                                         vec.iov_len = max_iov_size;
2155                                         if (j == nvecs-1)
2156                                                 vec.iov_len =
2157                                                         buflen -
2158                                                         max_iov_size*(nvecs-1);
2159                                         remaining_data_length -= vec.iov_len;
2160                                         log_write(INFO,
2161                                                 "sending vec j=%d iov_base=%p"
2162                                                 " iov_len=%zu "
2163                                                 "remaining_data_length=%d\n",
2164                                                 j, vec.iov_base, vec.iov_len,
2165                                                 remaining_data_length);
2166                                         rc = smbd_post_send_data(
2167                                                 info, &vec, 1,
2168                                                 remaining_data_length);
2169                                         if (rc)
2170                                                 goto done;
2171                                 }
2172                                 i++;
2173                                 if (i == rqst->rq_nvec)
2174                                         break;
2175                         }
2176                         start = i;
2177                         buflen = 0;
2178                 } else {
2179                         i++;
2180                         if (i == rqst->rq_nvec) {
2181                                 /* send out all remaining vecs */
2182                                 remaining_data_length -= buflen;
2183                                 log_write(INFO,
2184                                         "sending iov[] from start=%d i=%d "
2185                                         "nvecs=%d remaining_data_length=%d\n",
2186                                         start, i, i-start,
2187                                         remaining_data_length);
2188                                 rc = smbd_post_send_data(info, &iov[start],
2189                                         i-start, remaining_data_length);
2190                                 if (rc)
2191                                         goto done;
2192                                 break;
2193                         }
2194                 }
2195                 log_write(INFO, "looping i=%d buflen=%d\n", i, buflen);
2196         }
2197
2198         /* now sending pages if there are any */
2199         for (i = 0; i < rqst->rq_npages; i++) {
2200                 unsigned int offset;
2201
2202                 rqst_page_get_length(rqst, i, &buflen, &offset);
2203                 nvecs = (buflen + max_iov_size - 1) / max_iov_size;
2204                 log_write(INFO, "sending pages buflen=%d nvecs=%d\n",
2205                         buflen, nvecs);
2206                 for (j = 0; j < nvecs; j++) {
2207                         size = max_iov_size;
2208                         if (j == nvecs-1)
2209                                 size = buflen - j*max_iov_size;
2210                         remaining_data_length -= size;
2211                         log_write(INFO, "sending pages i=%d offset=%d size=%d"
2212                                 " remaining_data_length=%d\n",
2213                                 i, j*max_iov_size+offset, size,
2214                                 remaining_data_length);
2215                         rc = smbd_post_send_page(
2216                                 info, rqst->rq_pages[i],
2217                                 j*max_iov_size + offset,
2218                                 size, remaining_data_length);
2219                         if (rc)
2220                                 goto done;
2221                 }
2222         }
2223
2224         rqst_idx++;
2225         if (rqst_idx < num_rqst)
2226                 goto next_rqst;
2227
2228 done:
2229         /*
2230          * As an optimization, we don't wait for individual I/O to finish
2231          * before sending the next one.
2232          * Send them all and wait for pending send count to get to 0
2233          * that means all the I/Os have been out and we are good to return
2234          */
2235
2236         wait_event(info->wait_send_payload_pending,
2237                 atomic_read(&info->send_payload_pending) == 0);
2238
2239         return rc;
2240 }
2241
2242 static void register_mr_done(struct ib_cq *cq, struct ib_wc *wc)
2243 {
2244         struct smbd_mr *mr;
2245         struct ib_cqe *cqe;
2246
2247         if (wc->status) {
2248                 log_rdma_mr(ERR, "status=%d\n", wc->status);
2249                 cqe = wc->wr_cqe;
2250                 mr = container_of(cqe, struct smbd_mr, cqe);
2251                 smbd_disconnect_rdma_connection(mr->conn);
2252         }
2253 }
2254
2255 /*
2256  * The work queue function that recovers MRs
2257  * We need to call ib_dereg_mr() and ib_alloc_mr() before this MR can be used
2258  * again. Both calls are slow, so finish them in a workqueue. This will not
2259  * block I/O path.
2260  * There is one workqueue that recovers MRs, there is no need to lock as the
2261  * I/O requests calling smbd_register_mr will never update the links in the
2262  * mr_list.
2263  */
2264 static void smbd_mr_recovery_work(struct work_struct *work)
2265 {
2266         struct smbd_connection *info =
2267                 container_of(work, struct smbd_connection, mr_recovery_work);
2268         struct smbd_mr *smbdirect_mr;
2269         int rc;
2270
2271         list_for_each_entry(smbdirect_mr, &info->mr_list, list) {
2272                 if (smbdirect_mr->state == MR_INVALIDATED)
2273                         ib_dma_unmap_sg(
2274                                 info->id->device, smbdirect_mr->sgl,
2275                                 smbdirect_mr->sgl_count,
2276                                 smbdirect_mr->dir);
2277                 else if (smbdirect_mr->state == MR_ERROR) {
2278
2279                         /* recover this MR entry */
2280                         rc = ib_dereg_mr(smbdirect_mr->mr);
2281                         if (rc) {
2282                                 log_rdma_mr(ERR,
2283                                         "ib_dereg_mr failed rc=%x\n",
2284                                         rc);
2285                                 smbd_disconnect_rdma_connection(info);
2286                                 continue;
2287                         }
2288
2289                         smbdirect_mr->mr = ib_alloc_mr(
2290                                 info->pd, info->mr_type,
2291                                 info->max_frmr_depth);
2292                         if (IS_ERR(smbdirect_mr->mr)) {
2293                                 log_rdma_mr(ERR,
2294                                         "ib_alloc_mr failed mr_type=%x "
2295                                         "max_frmr_depth=%x\n",
2296                                         info->mr_type,
2297                                         info->max_frmr_depth);
2298                                 smbd_disconnect_rdma_connection(info);
2299                                 continue;
2300                         }
2301                 } else
2302                         /* This MR is being used, don't recover it */
2303                         continue;
2304
2305                 smbdirect_mr->state = MR_READY;
2306
2307                 /* smbdirect_mr->state is updated by this function
2308                  * and is read and updated by I/O issuing CPUs trying
2309                  * to get a MR, the call to atomic_inc_return
2310                  * implicates a memory barrier and guarantees this
2311                  * value is updated before waking up any calls to
2312                  * get_mr() from the I/O issuing CPUs
2313                  */
2314                 if (atomic_inc_return(&info->mr_ready_count) == 1)
2315                         wake_up_interruptible(&info->wait_mr);
2316         }
2317 }
2318
2319 static void destroy_mr_list(struct smbd_connection *info)
2320 {
2321         struct smbd_mr *mr, *tmp;
2322
2323         cancel_work_sync(&info->mr_recovery_work);
2324         list_for_each_entry_safe(mr, tmp, &info->mr_list, list) {
2325                 if (mr->state == MR_INVALIDATED)
2326                         ib_dma_unmap_sg(info->id->device, mr->sgl,
2327                                 mr->sgl_count, mr->dir);
2328                 ib_dereg_mr(mr->mr);
2329                 kfree(mr->sgl);
2330                 kfree(mr);
2331         }
2332 }
2333
2334 /*
2335  * Allocate MRs used for RDMA read/write
2336  * The number of MRs will not exceed hardware capability in responder_resources
2337  * All MRs are kept in mr_list. The MR can be recovered after it's used
2338  * Recovery is done in smbd_mr_recovery_work. The content of list entry changes
2339  * as MRs are used and recovered for I/O, but the list links will not change
2340  */
2341 static int allocate_mr_list(struct smbd_connection *info)
2342 {
2343         int i;
2344         struct smbd_mr *smbdirect_mr, *tmp;
2345
2346         INIT_LIST_HEAD(&info->mr_list);
2347         init_waitqueue_head(&info->wait_mr);
2348         spin_lock_init(&info->mr_list_lock);
2349         atomic_set(&info->mr_ready_count, 0);
2350         atomic_set(&info->mr_used_count, 0);
2351         init_waitqueue_head(&info->wait_for_mr_cleanup);
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         INIT_WORK(&info->mr_recovery_work, smbd_mr_recovery_work);
2381         return 0;
2382
2383 out:
2384         kfree(smbdirect_mr);
2385
2386         list_for_each_entry_safe(smbdirect_mr, tmp, &info->mr_list, 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         /*
2606          * Schedule the work to do MR recovery for future I/Os
2607          * MR recovery is slow and we don't want it to block the current I/O
2608          */
2609         queue_work(info->workqueue, &info->mr_recovery_work);
2610
2611 done:
2612         if (atomic_dec_and_test(&info->mr_used_count))
2613                 wake_up(&info->wait_for_mr_cleanup);
2614
2615         return rc;
2616 }