2 * Copyright (c) 2005 Ammasso, Inc. All rights reserved.
3 * Copyright (c) 2006-2009 Open Grid Computing, Inc. All rights reserved.
5 * This software is available to you under a choice of one of two
6 * licenses. You may choose to be licensed under the terms of the GNU
7 * General Public License (GPL) Version 2, available from the file
8 * COPYING in the main directory of this source tree, or the
9 * OpenIB.org BSD license below:
11 * Redistribution and use in source and binary forms, with or
12 * without modification, are permitted provided that the following
15 * - Redistributions of source code must retain the above
16 * copyright notice, this list of conditions and the following
19 * - Redistributions in binary form must reproduce the above
20 * copyright notice, this list of conditions and the following
21 * disclaimer in the documentation and/or other materials
22 * provided with the distribution.
24 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
25 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
26 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
27 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
28 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
29 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
30 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
34 #include <sys/cdefs.h>
35 __FBSDID("$FreeBSD$");
37 #include <linux/module.h>
38 #include <linux/moduleparam.h>
39 #include <linux/slab.h>
40 #include <linux/err.h>
41 #include <linux/string.h>
42 #include <linux/list.h>
44 #include <linux/device.h>
45 #include <linux/pci.h>
46 #include <linux/sched.h>
47 #include <linux/wait.h>
49 #include <asm/atomic.h>
51 #include <rdma/ib_verbs.h>
52 #include <rdma/rdma_cm.h>
57 #define PFX "krping: "
59 extern int krping_debug;
60 #define DEBUG_LOG(...) do { if (krping_debug) log(LOG_INFO, __VA_ARGS__); } while (0)
63 MODULE_AUTHOR("Steve Wise");
64 MODULE_DESCRIPTION("RDMA ping server");
65 MODULE_LICENSE("Dual BSD/GPL");
66 MODULE_VERSION(krping, 1);
67 MODULE_DEPEND(krping, linuxkpi, 1, 1, 1);
69 static __inline uint64_t
73 __asm __volatile("rdtsc" : "=a" (low), "=d" (high));
74 return (low | ((u_int64_t)high << 32));
77 typedef uint64_t cycles_t;
84 static const struct krping_option krping_opts[] = {
85 {"count", OPT_INT, 'C'},
86 {"size", OPT_INT, 'S'},
87 {"addr", OPT_STRING, 'a'},
88 {"addr6", OPT_STRING, 'A'},
89 {"port", OPT_INT, 'p'},
90 {"verbose", OPT_NOPARAM, 'v'},
91 {"validate", OPT_NOPARAM, 'V'},
92 {"server", OPT_NOPARAM, 's'},
93 {"client", OPT_NOPARAM, 'c'},
94 {"server_inv", OPT_NOPARAM, 'I'},
95 {"wlat", OPT_NOPARAM, 'l'},
96 {"rlat", OPT_NOPARAM, 'L'},
97 {"bw", OPT_NOPARAM, 'B'},
98 {"duplex", OPT_NOPARAM, 'd'},
99 {"txdepth", OPT_INT, 'T'},
100 {"poll", OPT_NOPARAM, 'P'},
101 {"local_dma_lkey", OPT_NOPARAM, 'Z'},
102 {"read_inv", OPT_NOPARAM, 'R'},
103 {"fr", OPT_NOPARAM, 'f'},
107 #define htonll(x) cpu_to_be64((x))
108 #define ntohll(x) cpu_to_be64((x))
110 static DEFINE_MUTEX(krping_mutex);
113 * List of running krping threads.
115 static LIST_HEAD(krping_cbs);
118 * Invoke like this, one on each side, using the server's address on
119 * the RDMA device (iw%d):
121 * /bin/echo server,port=9999,addr=192.168.69.142,validate > /proc/krping
122 * /bin/echo client,port=9999,addr=192.168.69.142,validate > /proc/krping
123 * /bin/echo client,port=9999,addr6=2001:db8:0:f101::1,validate > /proc/krping
125 * krping "ping/pong" loop:
126 * client sends source rkey/addr/len
127 * server receives source rkey/add/len
128 * server rdma reads "ping" data from source
129 * server sends "go ahead" on rdma read completion
130 * client sends sink rkey/addr/len
131 * server receives sink rkey/addr/len
132 * server rdma writes "pong" data to sink
133 * server sends "go ahead" on rdma write completion
138 * These states are used to signal events between the completion handler
139 * and the main client or server thread.
141 * Once CONNECTED, they cycle through RDMA_READ_ADV, RDMA_WRITE_ADV,
142 * and RDMA_WRITE_COMPLETE for each ping.
157 struct krping_rdma_info {
164 * Default max buffer size for IO...
166 #define RPING_BUFSIZE 128*1024
167 #define RPING_SQ_DEPTH 64
170 * Control block struct.
173 int server; /* 0 iff client */
178 struct ib_mr *dma_mr;
180 struct ib_fast_reg_page_list *page_list;
182 struct ib_reg_wr reg_mr_wr;
183 struct ib_send_wr invalidate_wr;
184 struct ib_mr *reg_mr;
185 int server_invalidate;
189 struct ib_recv_wr rq_wr; /* recv work request record */
190 struct ib_sge recv_sgl; /* recv single SGE */
191 struct krping_rdma_info recv_buf __aligned(16); /* malloc'd buffer */
193 DECLARE_PCI_UNMAP_ADDR(recv_mapping)
195 struct ib_send_wr sq_wr; /* send work requrest record */
196 struct ib_sge send_sgl;
197 struct krping_rdma_info send_buf __aligned(16); /* single send buf */
199 DECLARE_PCI_UNMAP_ADDR(send_mapping)
201 struct ib_rdma_wr rdma_sq_wr; /* rdma work request record */
202 struct ib_sge rdma_sgl; /* rdma single SGE */
203 char *rdma_buf; /* used as rdma sink */
205 DECLARE_PCI_UNMAP_ADDR(rdma_mapping)
206 struct ib_mr *rdma_mr;
208 uint32_t remote_rkey; /* remote guys RKEY */
209 uint64_t remote_addr; /* remote guys TO */
210 uint32_t remote_len; /* remote guys LEN */
212 char *start_buf; /* rdma read src */
214 DECLARE_PCI_UNMAP_ADDR(start_mapping)
215 struct ib_mr *start_mr;
217 enum test_state state; /* used for cond/signalling */
218 wait_queue_head_t sem;
219 struct krping_stats stats;
221 uint16_t port; /* dst port in NBO */
222 u8 addr[16] __aligned(8); /* dst addr in NBO */
223 char *addr_str; /* dst addr string */
224 uint8_t addr_type; /* ADDR_FAMILY - IPv4/V6 */
225 int verbose; /* verbose logging */
226 int count; /* ping count */
227 int size; /* ping data size */
228 int validate; /* validate ping data */
229 int wlat; /* run wlat test */
230 int rlat; /* run rlat test */
231 int bw; /* run bw test */
232 int duplex; /* run bw full duplex test */
233 int poll; /* poll or block for rlat test */
234 int txdepth; /* SQ depth */
235 int local_dma_lkey; /* use 0 for lkey */
236 int frtest; /* reg test */
239 struct rdma_cm_id *cm_id; /* connection on client side,*/
240 /* listener on server side. */
241 struct rdma_cm_id *child_cm_id; /* connection on server side */
242 struct list_head list;
245 static int krping_cma_event_handler(struct rdma_cm_id *cma_id,
246 struct rdma_cm_event *event)
249 struct krping_cb *cb = cma_id->context;
251 DEBUG_LOG("cma_event type %d cma_id %p (%s)\n", event->event, cma_id,
252 (cma_id == cb->cm_id) ? "parent" : "child");
254 switch (event->event) {
255 case RDMA_CM_EVENT_ADDR_RESOLVED:
256 cb->state = ADDR_RESOLVED;
257 ret = rdma_resolve_route(cma_id, 2000);
259 printk(KERN_ERR PFX "rdma_resolve_route error %d\n",
261 wake_up_interruptible(&cb->sem);
265 case RDMA_CM_EVENT_ROUTE_RESOLVED:
266 cb->state = ROUTE_RESOLVED;
267 wake_up_interruptible(&cb->sem);
270 case RDMA_CM_EVENT_CONNECT_REQUEST:
271 cb->state = CONNECT_REQUEST;
272 cb->child_cm_id = cma_id;
273 DEBUG_LOG("child cma %p\n", cb->child_cm_id);
274 wake_up_interruptible(&cb->sem);
277 case RDMA_CM_EVENT_ESTABLISHED:
278 DEBUG_LOG("ESTABLISHED\n");
280 cb->state = CONNECTED;
282 wake_up_interruptible(&cb->sem);
285 case RDMA_CM_EVENT_ADDR_ERROR:
286 case RDMA_CM_EVENT_ROUTE_ERROR:
287 case RDMA_CM_EVENT_CONNECT_ERROR:
288 case RDMA_CM_EVENT_UNREACHABLE:
289 case RDMA_CM_EVENT_REJECTED:
290 printk(KERN_ERR PFX "cma event %d, error %d\n", event->event,
293 wake_up_interruptible(&cb->sem);
296 case RDMA_CM_EVENT_DISCONNECTED:
297 printk(KERN_ERR PFX "DISCONNECT EVENT...\n");
299 wake_up_interruptible(&cb->sem);
302 case RDMA_CM_EVENT_DEVICE_REMOVAL:
303 printk(KERN_ERR PFX "cma detected device removal!!!!\n");
305 wake_up_interruptible(&cb->sem);
309 printk(KERN_ERR PFX "oof bad type!\n");
310 wake_up_interruptible(&cb->sem);
316 static int server_recv(struct krping_cb *cb, struct ib_wc *wc)
318 if (wc->byte_len != sizeof(cb->recv_buf)) {
319 printk(KERN_ERR PFX "Received bogus data, size %d\n",
324 cb->remote_rkey = ntohl(cb->recv_buf.rkey);
325 cb->remote_addr = ntohll(cb->recv_buf.buf);
326 cb->remote_len = ntohl(cb->recv_buf.size);
327 DEBUG_LOG("Received rkey %x addr %llx len %d from peer\n",
328 cb->remote_rkey, (unsigned long long)cb->remote_addr,
331 if (cb->state <= CONNECTED || cb->state == RDMA_WRITE_COMPLETE)
332 cb->state = RDMA_READ_ADV;
334 cb->state = RDMA_WRITE_ADV;
339 static int client_recv(struct krping_cb *cb, struct ib_wc *wc)
341 if (wc->byte_len != sizeof(cb->recv_buf)) {
342 printk(KERN_ERR PFX "Received bogus data, size %d\n",
347 if (cb->state == RDMA_READ_ADV)
348 cb->state = RDMA_WRITE_ADV;
350 cb->state = RDMA_WRITE_COMPLETE;
355 static void krping_cq_event_handler(struct ib_cq *cq, void *ctx)
357 struct krping_cb *cb = ctx;
359 struct ib_recv_wr *bad_wr;
362 BUG_ON(cb->cq != cq);
363 if (cb->state == ERROR) {
364 printk(KERN_ERR PFX "cq completion in ERROR state\n");
368 printk(KERN_ERR PFX "cq completion event in frtest!\n");
371 if (!cb->wlat && !cb->rlat && !cb->bw)
372 ib_req_notify_cq(cb->cq, IB_CQ_NEXT_COMP);
373 while ((ret = ib_poll_cq(cb->cq, 1, &wc)) == 1) {
375 if (wc.status == IB_WC_WR_FLUSH_ERR) {
376 DEBUG_LOG("cq flushed\n");
379 printk(KERN_ERR PFX "cq completion failed with "
380 "wr_id %jx status %d opcode %d vender_err %x\n",
381 (uintmax_t)wc.wr_id, wc.status, wc.opcode, wc.vendor_err);
388 DEBUG_LOG("send completion\n");
389 cb->stats.send_bytes += cb->send_sgl.length;
390 cb->stats.send_msgs++;
393 case IB_WC_RDMA_WRITE:
394 DEBUG_LOG("rdma write completion\n");
395 cb->stats.write_bytes += cb->rdma_sq_wr.wr.sg_list->length;
396 cb->stats.write_msgs++;
397 cb->state = RDMA_WRITE_COMPLETE;
398 wake_up_interruptible(&cb->sem);
401 case IB_WC_RDMA_READ:
402 DEBUG_LOG("rdma read completion\n");
403 cb->stats.read_bytes += cb->rdma_sq_wr.wr.sg_list->length;
404 cb->stats.read_msgs++;
405 cb->state = RDMA_READ_COMPLETE;
406 wake_up_interruptible(&cb->sem);
410 DEBUG_LOG("recv completion\n");
411 cb->stats.recv_bytes += sizeof(cb->recv_buf);
412 cb->stats.recv_msgs++;
413 if (cb->wlat || cb->rlat || cb->bw)
414 ret = server_recv(cb, &wc);
416 ret = cb->server ? server_recv(cb, &wc) :
417 client_recv(cb, &wc);
419 printk(KERN_ERR PFX "recv wc error: %d\n", ret);
423 ret = ib_post_recv(cb->qp, &cb->rq_wr, &bad_wr);
425 printk(KERN_ERR PFX "post recv error: %d\n",
429 wake_up_interruptible(&cb->sem);
434 "%s:%d Unexpected opcode %d, Shutting down\n",
435 __func__, __LINE__, wc.opcode);
440 printk(KERN_ERR PFX "poll error %d\n", ret);
446 wake_up_interruptible(&cb->sem);
449 static int krping_accept(struct krping_cb *cb)
451 struct rdma_conn_param conn_param;
454 DEBUG_LOG("accepting client connection request\n");
456 memset(&conn_param, 0, sizeof conn_param);
457 conn_param.responder_resources = 1;
458 conn_param.initiator_depth = 1;
460 ret = rdma_accept(cb->child_cm_id, &conn_param);
462 printk(KERN_ERR PFX "rdma_accept error: %d\n", ret);
466 if (!cb->wlat && !cb->rlat && !cb->bw) {
467 wait_event_interruptible(cb->sem, cb->state >= CONNECTED);
468 if (cb->state == ERROR) {
469 printk(KERN_ERR PFX "wait for CONNECTED state %d\n",
477 static void krping_setup_wr(struct krping_cb *cb)
479 cb->recv_sgl.addr = cb->recv_dma_addr;
480 cb->recv_sgl.length = sizeof cb->recv_buf;
481 cb->recv_sgl.lkey = cb->pd->local_dma_lkey;
482 cb->rq_wr.sg_list = &cb->recv_sgl;
483 cb->rq_wr.num_sge = 1;
485 cb->send_sgl.addr = cb->send_dma_addr;
486 cb->send_sgl.length = sizeof cb->send_buf;
487 cb->send_sgl.lkey = cb->pd->local_dma_lkey;
489 cb->sq_wr.opcode = IB_WR_SEND;
490 cb->sq_wr.send_flags = IB_SEND_SIGNALED;
491 cb->sq_wr.sg_list = &cb->send_sgl;
492 cb->sq_wr.num_sge = 1;
494 if (cb->server || cb->wlat || cb->rlat || cb->bw) {
495 cb->rdma_sgl.addr = cb->rdma_dma_addr;
496 cb->rdma_sq_wr.wr.send_flags = IB_SEND_SIGNALED;
497 cb->rdma_sq_wr.wr.sg_list = &cb->rdma_sgl;
498 cb->rdma_sq_wr.wr.num_sge = 1;
502 * A chain of 2 WRs, INVALDATE_MR + REG_MR.
503 * both unsignaled. The client uses them to reregister
504 * the rdma buffers with a new key each iteration.
506 cb->reg_mr_wr.wr.opcode = IB_WR_REG_MR;
507 cb->reg_mr_wr.mr = cb->reg_mr;
509 cb->invalidate_wr.next = &cb->reg_mr_wr.wr;
510 cb->invalidate_wr.opcode = IB_WR_LOCAL_INV;
513 static int krping_setup_buffers(struct krping_cb *cb)
517 DEBUG_LOG(PFX "krping_setup_buffers called on cb %p\n", cb);
519 cb->recv_dma_addr = ib_dma_map_single(cb->pd->device,
521 sizeof(cb->recv_buf), DMA_BIDIRECTIONAL);
522 pci_unmap_addr_set(cb, recv_mapping, cb->recv_dma_addr);
523 cb->send_dma_addr = ib_dma_map_single(cb->pd->device,
524 &cb->send_buf, sizeof(cb->send_buf),
526 pci_unmap_addr_set(cb, send_mapping, cb->send_dma_addr);
528 cb->rdma_buf = ib_dma_alloc_coherent(cb->pd->device, cb->size,
532 DEBUG_LOG(PFX "rdma_buf allocation failed\n");
536 pci_unmap_addr_set(cb, rdma_mapping, cb->rdma_dma_addr);
537 cb->page_list_len = (((cb->size - 1) & PAGE_MASK) + PAGE_SIZE)
539 cb->reg_mr = ib_alloc_mr(cb->pd, IB_MR_TYPE_MEM_REG,
541 if (IS_ERR(cb->reg_mr)) {
542 ret = PTR_ERR(cb->reg_mr);
543 DEBUG_LOG(PFX "recv_buf reg_mr failed %d\n", ret);
546 DEBUG_LOG(PFX "reg rkey 0x%x page_list_len %u\n",
547 cb->reg_mr->rkey, cb->page_list_len);
549 if (!cb->server || cb->wlat || cb->rlat || cb->bw) {
551 cb->start_buf = ib_dma_alloc_coherent(cb->pd->device, cb->size,
554 if (!cb->start_buf) {
555 DEBUG_LOG(PFX "start_buf malloc failed\n");
559 pci_unmap_addr_set(cb, start_mapping, cb->start_dma_addr);
563 DEBUG_LOG(PFX "allocated & registered buffers...\n");
566 if (cb->reg_mr && !IS_ERR(cb->reg_mr))
567 ib_dereg_mr(cb->reg_mr);
568 if (cb->rdma_mr && !IS_ERR(cb->rdma_mr))
569 ib_dereg_mr(cb->rdma_mr);
570 if (cb->dma_mr && !IS_ERR(cb->dma_mr))
571 ib_dereg_mr(cb->dma_mr);
573 ib_dma_free_coherent(cb->pd->device, cb->size, cb->rdma_buf,
577 ib_dma_free_coherent(cb->pd->device, cb->size, cb->start_buf,
583 static void krping_free_buffers(struct krping_cb *cb)
585 DEBUG_LOG("krping_free_buffers called on cb %p\n", cb);
588 ib_dereg_mr(cb->dma_mr);
590 ib_dereg_mr(cb->rdma_mr);
592 ib_dereg_mr(cb->start_mr);
594 ib_dereg_mr(cb->reg_mr);
596 dma_unmap_single(cb->pd->device->dma_device,
597 pci_unmap_addr(cb, recv_mapping),
598 sizeof(cb->recv_buf), DMA_BIDIRECTIONAL);
599 dma_unmap_single(cb->pd->device->dma_device,
600 pci_unmap_addr(cb, send_mapping),
601 sizeof(cb->send_buf), DMA_BIDIRECTIONAL);
603 ib_dma_free_coherent(cb->pd->device, cb->size, cb->rdma_buf,
607 ib_dma_free_coherent(cb->pd->device, cb->size, cb->start_buf,
612 static int krping_create_qp(struct krping_cb *cb)
614 struct ib_qp_init_attr init_attr;
617 memset(&init_attr, 0, sizeof(init_attr));
618 init_attr.cap.max_send_wr = cb->txdepth;
619 init_attr.cap.max_recv_wr = 2;
622 init_attr.cap.max_send_wr++;
623 init_attr.cap.max_recv_wr++;
625 init_attr.cap.max_recv_sge = 1;
626 init_attr.cap.max_send_sge = 1;
627 init_attr.qp_type = IB_QPT_RC;
628 init_attr.send_cq = cb->cq;
629 init_attr.recv_cq = cb->cq;
630 init_attr.sq_sig_type = IB_SIGNAL_REQ_WR;
633 ret = rdma_create_qp(cb->child_cm_id, cb->pd, &init_attr);
635 cb->qp = cb->child_cm_id->qp;
637 ret = rdma_create_qp(cb->cm_id, cb->pd, &init_attr);
639 cb->qp = cb->cm_id->qp;
645 static void krping_free_qp(struct krping_cb *cb)
647 ib_destroy_qp(cb->qp);
648 ib_destroy_cq(cb->cq);
649 ib_dealloc_pd(cb->pd);
652 static int krping_setup_qp(struct krping_cb *cb, struct rdma_cm_id *cm_id)
655 struct ib_cq_init_attr attr = {0};
657 cb->pd = ib_alloc_pd(cm_id->device, 0);
658 if (IS_ERR(cb->pd)) {
659 printk(KERN_ERR PFX "ib_alloc_pd failed\n");
660 return PTR_ERR(cb->pd);
662 DEBUG_LOG("created pd %p\n", cb->pd);
664 strlcpy(cb->stats.name, cb->pd->device->name, sizeof(cb->stats.name));
666 attr.cqe = cb->txdepth * 2;
667 attr.comp_vector = 0;
668 cb->cq = ib_create_cq(cm_id->device, krping_cq_event_handler, NULL,
670 if (IS_ERR(cb->cq)) {
671 printk(KERN_ERR PFX "ib_create_cq failed\n");
672 ret = PTR_ERR(cb->cq);
675 DEBUG_LOG("created cq %p\n", cb->cq);
677 if (!cb->wlat && !cb->rlat && !cb->bw && !cb->frtest) {
678 ret = ib_req_notify_cq(cb->cq, IB_CQ_NEXT_COMP);
680 printk(KERN_ERR PFX "ib_create_cq failed\n");
685 ret = krping_create_qp(cb);
687 printk(KERN_ERR PFX "krping_create_qp failed: %d\n", ret);
690 DEBUG_LOG("created qp %p\n", cb->qp);
693 ib_destroy_cq(cb->cq);
695 ib_dealloc_pd(cb->pd);
700 * return the (possibly rebound) rkey for the rdma buffer.
701 * REG mode: invalidate and rebind via reg wr.
702 * other modes: just return the mr rkey.
704 static u32 krping_rdma_rkey(struct krping_cb *cb, u64 buf, int post_inv)
707 struct ib_send_wr *bad_wr;
709 struct scatterlist sg = {0};
711 cb->invalidate_wr.ex.invalidate_rkey = cb->reg_mr->rkey;
714 * Update the reg key.
716 ib_update_fast_reg_key(cb->reg_mr, ++cb->key);
717 cb->reg_mr_wr.key = cb->reg_mr->rkey;
720 * Update the reg WR with new buf info.
722 if (buf == (u64)cb->start_dma_addr)
723 cb->reg_mr_wr.access = IB_ACCESS_REMOTE_READ;
725 cb->reg_mr_wr.access = IB_ACCESS_REMOTE_WRITE | IB_ACCESS_LOCAL_WRITE;
726 sg_dma_address(&sg) = buf;
727 sg_dma_len(&sg) = cb->size;
729 ret = ib_map_mr_sg(cb->reg_mr, &sg, 1, NULL, PAGE_SIZE);
730 BUG_ON(ret <= 0 || ret > cb->page_list_len);
732 DEBUG_LOG(PFX "post_inv = %d, reg_mr new rkey 0x%x pgsz %u len %u"
733 " iova_start %llx\n",
736 cb->reg_mr->page_size,
738 (unsigned long long)cb->reg_mr->iova);
741 ret = ib_post_send(cb->qp, &cb->invalidate_wr, &bad_wr);
743 ret = ib_post_send(cb->qp, &cb->reg_mr_wr.wr, &bad_wr);
745 printk(KERN_ERR PFX "post send error %d\n", ret);
748 rkey = cb->reg_mr->rkey;
752 static void krping_format_send(struct krping_cb *cb, u64 buf)
754 struct krping_rdma_info *info = &cb->send_buf;
758 * Client side will do reg or mw bind before
759 * advertising the rdma buffer. Server side
760 * sends have no data.
762 if (!cb->server || cb->wlat || cb->rlat || cb->bw) {
763 rkey = krping_rdma_rkey(cb, buf, !cb->server_invalidate);
764 info->buf = htonll(buf);
765 info->rkey = htonl(rkey);
766 info->size = htonl(cb->size);
767 DEBUG_LOG("RDMA addr %llx rkey %x len %d\n",
768 (unsigned long long)buf, rkey, cb->size);
772 static void krping_test_server(struct krping_cb *cb)
774 struct ib_send_wr *bad_wr, inv;
778 /* Wait for client's Start STAG/TO/Len */
779 wait_event_interruptible(cb->sem, cb->state >= RDMA_READ_ADV);
780 if (cb->state != RDMA_READ_ADV) {
781 printk(KERN_ERR PFX "wait for RDMA_READ_ADV state %d\n",
786 DEBUG_LOG("server received sink adv\n");
788 cb->rdma_sq_wr.rkey = cb->remote_rkey;
789 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
790 cb->rdma_sq_wr.wr.sg_list->length = cb->remote_len;
791 cb->rdma_sgl.lkey = krping_rdma_rkey(cb, cb->rdma_dma_addr, !cb->read_inv);
792 cb->rdma_sq_wr.wr.next = NULL;
794 /* Issue RDMA Read. */
796 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_READ_WITH_INV;
799 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_READ;
801 * Immediately follow the read with a
804 cb->rdma_sq_wr.wr.next = &inv;
805 memset(&inv, 0, sizeof inv);
806 inv.opcode = IB_WR_LOCAL_INV;
807 inv.ex.invalidate_rkey = cb->reg_mr->rkey;
808 inv.send_flags = IB_SEND_FENCE;
811 ret = ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr);
813 printk(KERN_ERR PFX "post send error %d\n", ret);
816 cb->rdma_sq_wr.wr.next = NULL;
818 DEBUG_LOG("server posted rdma read req \n");
820 /* Wait for read completion */
821 wait_event_interruptible(cb->sem,
822 cb->state >= RDMA_READ_COMPLETE);
823 if (cb->state != RDMA_READ_COMPLETE) {
825 "wait for RDMA_READ_COMPLETE state %d\n",
829 DEBUG_LOG("server received read complete\n");
831 /* Display data in recv buf */
833 printk(KERN_INFO PFX "server ping data: %s\n",
836 /* Tell client to continue */
837 if (cb->server && cb->server_invalidate) {
838 cb->sq_wr.ex.invalidate_rkey = cb->remote_rkey;
839 cb->sq_wr.opcode = IB_WR_SEND_WITH_INV;
840 DEBUG_LOG("send-w-inv rkey 0x%x\n", cb->remote_rkey);
842 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
844 printk(KERN_ERR PFX "post send error %d\n", ret);
847 DEBUG_LOG("server posted go ahead\n");
849 /* Wait for client's RDMA STAG/TO/Len */
850 wait_event_interruptible(cb->sem, cb->state >= RDMA_WRITE_ADV);
851 if (cb->state != RDMA_WRITE_ADV) {
853 "wait for RDMA_WRITE_ADV state %d\n",
857 DEBUG_LOG("server received sink adv\n");
859 /* RDMA Write echo data */
860 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_WRITE;
861 cb->rdma_sq_wr.rkey = cb->remote_rkey;
862 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
863 cb->rdma_sq_wr.wr.sg_list->length = strlen(cb->rdma_buf) + 1;
864 if (cb->local_dma_lkey)
865 cb->rdma_sgl.lkey = cb->pd->local_dma_lkey;
867 cb->rdma_sgl.lkey = krping_rdma_rkey(cb, cb->rdma_dma_addr, 0);
869 DEBUG_LOG("rdma write from lkey %x laddr %llx len %d\n",
870 cb->rdma_sq_wr.wr.sg_list->lkey,
871 (unsigned long long)cb->rdma_sq_wr.wr.sg_list->addr,
872 cb->rdma_sq_wr.wr.sg_list->length);
874 ret = ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr);
876 printk(KERN_ERR PFX "post send error %d\n", ret);
880 /* Wait for completion */
881 ret = wait_event_interruptible(cb->sem, cb->state >=
882 RDMA_WRITE_COMPLETE);
883 if (cb->state != RDMA_WRITE_COMPLETE) {
885 "wait for RDMA_WRITE_COMPLETE state %d\n",
889 DEBUG_LOG("server rdma write complete \n");
891 cb->state = CONNECTED;
893 /* Tell client to begin again */
894 if (cb->server && cb->server_invalidate) {
895 cb->sq_wr.ex.invalidate_rkey = cb->remote_rkey;
896 cb->sq_wr.opcode = IB_WR_SEND_WITH_INV;
897 DEBUG_LOG("send-w-inv rkey 0x%x\n", cb->remote_rkey);
899 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
901 printk(KERN_ERR PFX "post send error %d\n", ret);
904 DEBUG_LOG("server posted go ahead\n");
908 static void rlat_test(struct krping_cb *cb)
911 int iters = cb->count;
912 struct timeval start_tv, stop_tv;
915 struct ib_send_wr *bad_wr;
919 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_READ;
920 cb->rdma_sq_wr.rkey = cb->remote_rkey;
921 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
922 cb->rdma_sq_wr.wr.sg_list->length = cb->size;
924 microtime(&start_tv);
926 cb->state = RDMA_READ_ADV;
927 ib_req_notify_cq(cb->cq, IB_CQ_NEXT_COMP);
929 while (scnt < iters) {
931 cb->state = RDMA_READ_ADV;
932 ret = ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr);
935 "Couldn't post send: ret=%d scnt %d\n",
942 wait_event_interruptible(cb->sem,
943 cb->state != RDMA_READ_ADV);
944 if (cb->state == RDMA_READ_COMPLETE) {
946 ib_req_notify_cq(cb->cq,
952 ne = ib_poll_cq(cb->cq, 1, &wc);
953 if (cb->state == ERROR) {
955 "state == ERROR...bailing scnt %d\n",
962 printk(KERN_ERR PFX "poll CQ failed %d\n", ne);
965 if (cb->poll && wc.status != IB_WC_SUCCESS) {
966 printk(KERN_ERR PFX "Completion wth error at %s:\n",
967 cb->server ? "server" : "client");
968 printk(KERN_ERR PFX "Failed status %d: wr_id %d\n",
969 wc.status, (int) wc.wr_id);
976 if (stop_tv.tv_usec < start_tv.tv_usec) {
977 stop_tv.tv_usec += 1000000;
981 printk(KERN_ERR PFX "delta sec %lu delta usec %lu iter %d size %d\n",
982 (unsigned long)(stop_tv.tv_sec - start_tv.tv_sec),
983 (unsigned long)(stop_tv.tv_usec - start_tv.tv_usec),
987 static void wlat_test(struct krping_cb *cb)
989 int ccnt, scnt, rcnt;
991 volatile char *poll_buf = (char *) cb->start_buf;
992 char *buf = (char *)cb->rdma_buf;
993 struct timeval start_tv, stop_tv;
994 cycles_t *post_cycles_start, *post_cycles_stop;
995 cycles_t *poll_cycles_start, *poll_cycles_stop;
996 cycles_t *last_poll_cycles_start;
997 cycles_t sum_poll = 0, sum_post = 0, sum_last_poll = 0;
999 int cycle_iters = 1000;
1005 post_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1006 if (!post_cycles_start) {
1007 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1010 post_cycles_stop = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1011 if (!post_cycles_stop) {
1012 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1015 poll_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1016 if (!poll_cycles_start) {
1017 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1020 poll_cycles_stop = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1021 if (!poll_cycles_stop) {
1022 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1025 last_poll_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t),
1027 if (!last_poll_cycles_start) {
1028 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1031 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_WRITE;
1032 cb->rdma_sq_wr.rkey = cb->remote_rkey;
1033 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
1034 cb->rdma_sq_wr.wr.sg_list->length = cb->size;
1036 if (cycle_iters > iters)
1037 cycle_iters = iters;
1038 microtime(&start_tv);
1039 while (scnt < iters || ccnt < iters || rcnt < iters) {
1041 /* Wait till buffer changes. */
1042 if (rcnt < iters && !(scnt < 1 && !cb->server)) {
1044 while (*poll_buf != (char)rcnt) {
1045 if (cb->state == ERROR) {
1047 "state = ERROR, bailing\n");
1054 struct ib_send_wr *bad_wr;
1056 *buf = (char)scnt+1;
1057 if (scnt < cycle_iters)
1058 post_cycles_start[scnt] = get_cycles();
1059 if (ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr)) {
1061 "Couldn't post send: scnt=%d\n",
1065 if (scnt < cycle_iters)
1066 post_cycles_stop[scnt] = get_cycles();
1074 if (ccnt < cycle_iters)
1075 poll_cycles_start[ccnt] = get_cycles();
1077 if (ccnt < cycle_iters)
1078 last_poll_cycles_start[ccnt] =
1080 ne = ib_poll_cq(cb->cq, 1, &wc);
1082 if (ccnt < cycle_iters)
1083 poll_cycles_stop[ccnt] = get_cycles();
1087 printk(KERN_ERR PFX "poll CQ failed %d\n", ne);
1090 if (wc.status != IB_WC_SUCCESS) {
1092 "Completion wth error at %s:\n",
1093 cb->server ? "server" : "client");
1095 "Failed status %d: wr_id %d\n",
1096 wc.status, (int) wc.wr_id);
1098 "scnt=%d, rcnt=%d, ccnt=%d\n",
1104 microtime(&stop_tv);
1106 if (stop_tv.tv_usec < start_tv.tv_usec) {
1107 stop_tv.tv_usec += 1000000;
1108 stop_tv.tv_sec -= 1;
1111 for (i=0; i < cycle_iters; i++) {
1112 sum_post += post_cycles_stop[i] - post_cycles_start[i];
1113 sum_poll += poll_cycles_stop[i] - poll_cycles_start[i];
1114 sum_last_poll += poll_cycles_stop[i]-last_poll_cycles_start[i];
1117 "delta sec %lu delta usec %lu iter %d size %d cycle_iters %d"
1118 " sum_post %llu sum_poll %llu sum_last_poll %llu\n",
1119 (unsigned long)(stop_tv.tv_sec - start_tv.tv_sec),
1120 (unsigned long)(stop_tv.tv_usec - start_tv.tv_usec),
1121 scnt, cb->size, cycle_iters,
1122 (unsigned long long)sum_post, (unsigned long long)sum_poll,
1123 (unsigned long long)sum_last_poll);
1124 kfree(post_cycles_start);
1125 kfree(post_cycles_stop);
1126 kfree(poll_cycles_start);
1127 kfree(poll_cycles_stop);
1128 kfree(last_poll_cycles_start);
1131 static void bw_test(struct krping_cb *cb)
1133 int ccnt, scnt, rcnt;
1134 int iters=cb->count;
1135 struct timeval start_tv, stop_tv;
1136 cycles_t *post_cycles_start, *post_cycles_stop;
1137 cycles_t *poll_cycles_start, *poll_cycles_stop;
1138 cycles_t *last_poll_cycles_start;
1139 cycles_t sum_poll = 0, sum_post = 0, sum_last_poll = 0;
1141 int cycle_iters = 1000;
1147 post_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1148 if (!post_cycles_start) {
1149 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1152 post_cycles_stop = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1153 if (!post_cycles_stop) {
1154 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1157 poll_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1158 if (!poll_cycles_start) {
1159 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1162 poll_cycles_stop = kmalloc(cycle_iters * sizeof(cycles_t), GFP_KERNEL);
1163 if (!poll_cycles_stop) {
1164 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1167 last_poll_cycles_start = kmalloc(cycle_iters * sizeof(cycles_t),
1169 if (!last_poll_cycles_start) {
1170 printk(KERN_ERR PFX "%s kmalloc failed\n", __FUNCTION__);
1173 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_WRITE;
1174 cb->rdma_sq_wr.rkey = cb->remote_rkey;
1175 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
1176 cb->rdma_sq_wr.wr.sg_list->length = cb->size;
1178 if (cycle_iters > iters)
1179 cycle_iters = iters;
1180 microtime(&start_tv);
1181 while (scnt < iters || ccnt < iters) {
1183 while (scnt < iters && scnt - ccnt < cb->txdepth) {
1184 struct ib_send_wr *bad_wr;
1186 if (scnt < cycle_iters)
1187 post_cycles_start[scnt] = get_cycles();
1188 if (ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr)) {
1190 "Couldn't post send: scnt=%d\n",
1194 if (scnt < cycle_iters)
1195 post_cycles_stop[scnt] = get_cycles();
1203 if (ccnt < cycle_iters)
1204 poll_cycles_start[ccnt] = get_cycles();
1206 if (ccnt < cycle_iters)
1207 last_poll_cycles_start[ccnt] =
1209 ne = ib_poll_cq(cb->cq, 1, &wc);
1211 if (ccnt < cycle_iters)
1212 poll_cycles_stop[ccnt] = get_cycles();
1216 printk(KERN_ERR PFX "poll CQ failed %d\n", ne);
1219 if (wc.status != IB_WC_SUCCESS) {
1221 "Completion wth error at %s:\n",
1222 cb->server ? "server" : "client");
1224 "Failed status %d: wr_id %d\n",
1225 wc.status, (int) wc.wr_id);
1230 microtime(&stop_tv);
1232 if (stop_tv.tv_usec < start_tv.tv_usec) {
1233 stop_tv.tv_usec += 1000000;
1234 stop_tv.tv_sec -= 1;
1237 for (i=0; i < cycle_iters; i++) {
1238 sum_post += post_cycles_stop[i] - post_cycles_start[i];
1239 sum_poll += poll_cycles_stop[i] - poll_cycles_start[i];
1240 sum_last_poll += poll_cycles_stop[i]-last_poll_cycles_start[i];
1243 "delta sec %lu delta usec %lu iter %d size %d cycle_iters %d"
1244 " sum_post %llu sum_poll %llu sum_last_poll %llu\n",
1245 (unsigned long)(stop_tv.tv_sec - start_tv.tv_sec),
1246 (unsigned long)(stop_tv.tv_usec - start_tv.tv_usec),
1247 scnt, cb->size, cycle_iters,
1248 (unsigned long long)sum_post, (unsigned long long)sum_poll,
1249 (unsigned long long)sum_last_poll);
1250 kfree(post_cycles_start);
1251 kfree(post_cycles_stop);
1252 kfree(poll_cycles_start);
1253 kfree(poll_cycles_stop);
1254 kfree(last_poll_cycles_start);
1257 static void krping_rlat_test_server(struct krping_cb *cb)
1259 struct ib_send_wr *bad_wr;
1263 /* Spin waiting for client's Start STAG/TO/Len */
1264 while (cb->state < RDMA_READ_ADV) {
1265 krping_cq_event_handler(cb->cq, cb);
1268 /* Send STAG/TO/Len to client */
1269 krping_format_send(cb, cb->start_dma_addr);
1270 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1272 printk(KERN_ERR PFX "post send error %d\n", ret);
1276 /* Spin waiting for send completion */
1277 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1279 printk(KERN_ERR PFX "poll error %d\n", ret);
1283 printk(KERN_ERR PFX "send completiong error %d\n", wc.status);
1287 wait_event_interruptible(cb->sem, cb->state == ERROR);
1290 static void krping_wlat_test_server(struct krping_cb *cb)
1292 struct ib_send_wr *bad_wr;
1296 /* Spin waiting for client's Start STAG/TO/Len */
1297 while (cb->state < RDMA_READ_ADV) {
1298 krping_cq_event_handler(cb->cq, cb);
1301 /* Send STAG/TO/Len to client */
1302 krping_format_send(cb, cb->start_dma_addr);
1303 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1305 printk(KERN_ERR PFX "post send error %d\n", ret);
1309 /* Spin waiting for send completion */
1310 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1312 printk(KERN_ERR PFX "poll error %d\n", ret);
1316 printk(KERN_ERR PFX "send completiong error %d\n", wc.status);
1321 wait_event_interruptible(cb->sem, cb->state == ERROR);
1324 static void krping_bw_test_server(struct krping_cb *cb)
1326 struct ib_send_wr *bad_wr;
1330 /* Spin waiting for client's Start STAG/TO/Len */
1331 while (cb->state < RDMA_READ_ADV) {
1332 krping_cq_event_handler(cb->cq, cb);
1335 /* Send STAG/TO/Len to client */
1336 krping_format_send(cb, cb->start_dma_addr);
1337 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1339 printk(KERN_ERR PFX "post send error %d\n", ret);
1343 /* Spin waiting for send completion */
1344 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1346 printk(KERN_ERR PFX "poll error %d\n", ret);
1350 printk(KERN_ERR PFX "send completiong error %d\n", wc.status);
1356 wait_event_interruptible(cb->sem, cb->state == ERROR);
1359 static int reg_supported(struct ib_device *dev)
1361 u64 needed_flags = IB_DEVICE_MEM_MGT_EXTENSIONS;
1363 if ((dev->attrs.device_cap_flags & needed_flags) != needed_flags) {
1365 "Fastreg not supported - device_cap_flags 0x%llx\n",
1366 (unsigned long long)dev->attrs.device_cap_flags);
1369 DEBUG_LOG("Fastreg supported - device_cap_flags 0x%llx\n",
1370 (unsigned long long)dev->attrs.device_cap_flags);
1374 static void fill_sockaddr(struct sockaddr_storage *sin, struct krping_cb *cb)
1376 memset(sin, 0, sizeof(*sin));
1378 if (cb->addr_type == AF_INET) {
1379 struct sockaddr_in *sin4 = (struct sockaddr_in *)sin;
1380 sin4->sin_len = sizeof(*sin4);
1381 sin4->sin_family = AF_INET;
1382 memcpy((void *)&sin4->sin_addr.s_addr, cb->addr, 4);
1383 sin4->sin_port = cb->port;
1384 } else if (cb->addr_type == AF_INET6) {
1385 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sin;
1386 sin6->sin6_len = sizeof(*sin6);
1387 sin6->sin6_family = AF_INET6;
1388 memcpy((void *)&sin6->sin6_addr, cb->addr, 16);
1389 sin6->sin6_port = cb->port;
1393 static int krping_bind_server(struct krping_cb *cb)
1395 struct sockaddr_storage sin;
1399 fill_sockaddr(&sin, cb);
1401 ret = rdma_bind_addr(cb->cm_id, (struct sockaddr *)&sin);
1403 printk(KERN_ERR PFX "rdma_bind_addr error %d\n", ret);
1406 DEBUG_LOG("rdma_bind_addr successful\n");
1408 DEBUG_LOG("rdma_listen\n");
1409 ret = rdma_listen(cb->cm_id, 3);
1411 printk(KERN_ERR PFX "rdma_listen failed: %d\n", ret);
1415 wait_event_interruptible(cb->sem, cb->state >= CONNECT_REQUEST);
1416 if (cb->state != CONNECT_REQUEST) {
1417 printk(KERN_ERR PFX "wait for CONNECT_REQUEST state %d\n",
1422 if (!reg_supported(cb->child_cm_id->device))
1428 static void krping_run_server(struct krping_cb *cb)
1430 struct ib_recv_wr *bad_wr;
1433 ret = krping_bind_server(cb);
1437 ret = krping_setup_qp(cb, cb->child_cm_id);
1439 printk(KERN_ERR PFX "setup_qp failed: %d\n", ret);
1443 ret = krping_setup_buffers(cb);
1445 printk(KERN_ERR PFX "krping_setup_buffers failed: %d\n", ret);
1449 ret = ib_post_recv(cb->qp, &cb->rq_wr, &bad_wr);
1451 printk(KERN_ERR PFX "ib_post_recv failed: %d\n", ret);
1455 ret = krping_accept(cb);
1457 printk(KERN_ERR PFX "connect error %d\n", ret);
1462 krping_wlat_test_server(cb);
1464 krping_rlat_test_server(cb);
1466 krping_bw_test_server(cb);
1468 krping_test_server(cb);
1469 rdma_disconnect(cb->child_cm_id);
1471 krping_free_buffers(cb);
1475 rdma_destroy_id(cb->child_cm_id);
1478 static void krping_test_client(struct krping_cb *cb)
1480 int ping, start, cc, i, ret;
1481 struct ib_send_wr *bad_wr;
1485 for (ping = 0; !cb->count || ping < cb->count; ping++) {
1486 cb->state = RDMA_READ_ADV;
1488 /* Put some ascii text in the buffer. */
1489 cc = sprintf(cb->start_buf, "rdma-ping-%d: ", ping);
1490 for (i = cc, c = start; i < cb->size; i++) {
1491 cb->start_buf[i] = c;
1499 cb->start_buf[cb->size - 1] = 0;
1501 krping_format_send(cb, cb->start_dma_addr);
1502 if (cb->state == ERROR) {
1503 printk(KERN_ERR PFX "krping_format_send failed\n");
1506 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1508 printk(KERN_ERR PFX "post send error %d\n", ret);
1512 /* Wait for server to ACK */
1513 wait_event_interruptible(cb->sem, cb->state >= RDMA_WRITE_ADV);
1514 if (cb->state != RDMA_WRITE_ADV) {
1516 "wait for RDMA_WRITE_ADV state %d\n",
1521 krping_format_send(cb, cb->rdma_dma_addr);
1522 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1524 printk(KERN_ERR PFX "post send error %d\n", ret);
1528 /* Wait for the server to say the RDMA Write is complete. */
1529 wait_event_interruptible(cb->sem,
1530 cb->state >= RDMA_WRITE_COMPLETE);
1531 if (cb->state != RDMA_WRITE_COMPLETE) {
1533 "wait for RDMA_WRITE_COMPLETE state %d\n",
1539 if (memcmp(cb->start_buf, cb->rdma_buf, cb->size)) {
1540 printk(KERN_ERR PFX "data mismatch!\n");
1545 printk(KERN_INFO PFX "ping data: %s\n", cb->rdma_buf);
1547 wait_event_interruptible_timeout(cb->sem, cb->state == ERROR, HZ);
1552 static void krping_rlat_test_client(struct krping_cb *cb)
1554 struct ib_send_wr *bad_wr;
1558 cb->state = RDMA_READ_ADV;
1560 /* Send STAG/TO/Len to client */
1561 krping_format_send(cb, cb->start_dma_addr);
1562 if (cb->state == ERROR) {
1563 printk(KERN_ERR PFX "krping_format_send failed\n");
1566 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1568 printk(KERN_ERR PFX "post send error %d\n", ret);
1572 /* Spin waiting for send completion */
1573 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1575 printk(KERN_ERR PFX "poll error %d\n", ret);
1579 printk(KERN_ERR PFX "send completion error %d\n", wc.status);
1583 /* Spin waiting for server's Start STAG/TO/Len */
1584 while (cb->state < RDMA_WRITE_ADV) {
1585 krping_cq_event_handler(cb->cq, cb);
1591 struct timeval start, stop;
1594 unsigned long long elapsed;
1596 struct ib_send_wr *bad_wr;
1599 cb->rdma_sq_wr.wr.opcode = IB_WR_RDMA_WRITE;
1600 cb->rdma_sq_wr.rkey = cb->remote_rkey;
1601 cb->rdma_sq_wr.remote_addr = cb->remote_addr;
1602 cb->rdma_sq_wr.wr.sg_list->length = 0;
1603 cb->rdma_sq_wr.wr.num_sge = 0;
1606 for (i=0; i < 100000; i++) {
1607 if (ib_post_send(cb->qp, &cb->rdma_sq_wr.wr, &bad_wr)) {
1608 printk(KERN_ERR PFX "Couldn't post send\n");
1612 ne = ib_poll_cq(cb->cq, 1, &wc);
1615 printk(KERN_ERR PFX "poll CQ failed %d\n", ne);
1618 if (wc.status != IB_WC_SUCCESS) {
1619 printk(KERN_ERR PFX "Completion wth error at %s:\n",
1620 cb->server ? "server" : "client");
1621 printk(KERN_ERR PFX "Failed status %d: wr_id %d\n",
1622 wc.status, (int) wc.wr_id);
1628 if (stop.tv_usec < start.tv_usec) {
1629 stop.tv_usec += 1000000;
1632 sec = stop.tv_sec - start.tv_sec;
1633 usec = stop.tv_usec - start.tv_usec;
1634 elapsed = sec * 1000000 + usec;
1635 printk(KERN_ERR PFX "0B-write-lat iters 100000 usec %llu\n", elapsed);
1642 static void krping_wlat_test_client(struct krping_cb *cb)
1644 struct ib_send_wr *bad_wr;
1648 cb->state = RDMA_READ_ADV;
1650 /* Send STAG/TO/Len to client */
1651 krping_format_send(cb, cb->start_dma_addr);
1652 if (cb->state == ERROR) {
1653 printk(KERN_ERR PFX "krping_format_send failed\n");
1656 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1658 printk(KERN_ERR PFX "post send error %d\n", ret);
1662 /* Spin waiting for send completion */
1663 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1665 printk(KERN_ERR PFX "poll error %d\n", ret);
1669 printk(KERN_ERR PFX "send completion error %d\n", wc.status);
1673 /* Spin waiting for server's Start STAG/TO/Len */
1674 while (cb->state < RDMA_WRITE_ADV) {
1675 krping_cq_event_handler(cb->cq, cb);
1681 static void krping_bw_test_client(struct krping_cb *cb)
1683 struct ib_send_wr *bad_wr;
1687 cb->state = RDMA_READ_ADV;
1689 /* Send STAG/TO/Len to client */
1690 krping_format_send(cb, cb->start_dma_addr);
1691 if (cb->state == ERROR) {
1692 printk(KERN_ERR PFX "krping_format_send failed\n");
1695 ret = ib_post_send(cb->qp, &cb->sq_wr, &bad_wr);
1697 printk(KERN_ERR PFX "post send error %d\n", ret);
1701 /* Spin waiting for send completion */
1702 while ((ret = ib_poll_cq(cb->cq, 1, &wc) == 0));
1704 printk(KERN_ERR PFX "poll error %d\n", ret);
1708 printk(KERN_ERR PFX "send completion error %d\n", wc.status);
1712 /* Spin waiting for server's Start STAG/TO/Len */
1713 while (cb->state < RDMA_WRITE_ADV) {
1714 krping_cq_event_handler(cb->cq, cb);
1721 * Manual qp flush test
1723 static void flush_qp(struct krping_cb *cb)
1725 struct ib_send_wr wr = { 0 }, *bad;
1726 struct ib_recv_wr recv_wr = { 0 }, *recv_bad;
1732 rdma_disconnect(cb->cm_id);
1733 DEBUG_LOG("disconnected!\n");
1735 wr.opcode = IB_WR_SEND;
1736 wr.wr_id = 0xdeadbeefcafebabe;
1737 ret = ib_post_send(cb->qp, &wr, &bad);
1739 printk(KERN_ERR PFX "%s post_send failed ret %d\n", __func__, ret);
1743 recv_wr.wr_id = 0xcafebabedeadbeef;
1744 ret = ib_post_recv(cb->qp, &recv_wr, &recv_bad);
1746 printk(KERN_ERR PFX "%s post_recv failed ret %d\n", __func__, ret);
1750 /* poll until the flush WRs complete */
1752 ret = ib_poll_cq(cb->cq, 1, &wc);
1754 printk(KERN_ERR PFX "ib_poll_cq failed %d\n", ret);
1760 if (wc.wr_id == 0xdeadbeefcafebabe ||
1761 wc.wr_id == 0xcafebabedeadbeef)
1763 } while (flushed != 2);
1764 DEBUG_LOG("qp_flushed! ccnt %u\n", ccnt);
1767 static void krping_fr_test(struct krping_cb *cb)
1769 struct ib_send_wr inv, *bad;
1770 struct ib_reg_wr fr;
1775 int size = cb->size;
1776 int plen = (((size - 1) & PAGE_MASK) + PAGE_SIZE) >> PAGE_SHIFT;
1777 unsigned long start;
1780 struct scatterlist sg = {0};
1782 mr = ib_alloc_mr(cb->pd, IB_MR_TYPE_MEM_REG, plen);
1784 printk(KERN_ERR PFX "ib_alloc_mr failed %ld\n", PTR_ERR(mr));
1788 sg_dma_address(&sg) = (dma_addr_t)0xcafebabe0000ULL;
1789 sg_dma_len(&sg) = size;
1790 ret = ib_map_mr_sg(mr, &sg, 1, NULL, PAGE_SIZE);
1792 printk(KERN_ERR PFX "ib_map_mr_sge err %d\n", ret);
1796 memset(&fr, 0, sizeof fr);
1797 fr.wr.opcode = IB_WR_REG_MR;
1798 fr.access = IB_ACCESS_REMOTE_WRITE | IB_ACCESS_LOCAL_WRITE;
1802 memset(&inv, 0, sizeof inv);
1803 inv.opcode = IB_WR_LOCAL_INV;
1804 inv.send_flags = IB_SEND_SIGNALED;
1806 DEBUG_LOG("fr_test: stag index 0x%x plen %u size %u depth %u\n", mr->rkey >> 8, plen, cb->size, cb->txdepth);
1807 start = time_uptime;
1808 while (!cb->count || count <= cb->count) {
1809 if (SIGPENDING(curthread)) {
1810 printk(KERN_ERR PFX "signal!\n");
1813 if ((time_uptime - start) >= 9) {
1814 DEBUG_LOG("fr_test: pausing 1 second! count %u latest size %u plen %u\n", count, size, plen);
1815 wait_event_interruptible_timeout(cb->sem, cb->state == ERROR, HZ);
1816 if (cb->state == ERROR)
1818 start = time_uptime;
1820 while (scnt < (cb->txdepth>>1)) {
1821 ib_update_fast_reg_key(mr, ++key);
1823 inv.ex.invalidate_rkey = mr->rkey;
1825 size = arc4random() % cb->size;
1828 sg_dma_len(&sg) = size;
1829 ret = ib_map_mr_sg(mr, &sg, 1, NULL, PAGE_SIZE);
1831 printk(KERN_ERR PFX "ib_map_mr_sge err %d\n", ret);
1834 ret = ib_post_send(cb->qp, &fr.wr, &bad);
1836 printk(KERN_ERR PFX "ib_post_send failed %d\n", ret);
1842 ret = ib_poll_cq(cb->cq, 1, &wc);
1844 printk(KERN_ERR PFX "ib_poll_cq failed %d\n", ret);
1849 printk(KERN_ERR PFX "completion error %u\n", wc.status);
1858 DEBUG_LOG("fr_test: done!\n");
1862 static int krping_connect_client(struct krping_cb *cb)
1864 struct rdma_conn_param conn_param;
1867 memset(&conn_param, 0, sizeof conn_param);
1868 conn_param.responder_resources = 1;
1869 conn_param.initiator_depth = 1;
1870 conn_param.retry_count = 10;
1872 ret = rdma_connect(cb->cm_id, &conn_param);
1874 printk(KERN_ERR PFX "rdma_connect error %d\n", ret);
1878 wait_event_interruptible(cb->sem, cb->state >= CONNECTED);
1879 if (cb->state == ERROR) {
1880 printk(KERN_ERR PFX "wait for CONNECTED state %d\n", cb->state);
1884 DEBUG_LOG("rdma_connect successful\n");
1888 static int krping_bind_client(struct krping_cb *cb)
1890 struct sockaddr_storage sin;
1893 fill_sockaddr(&sin, cb);
1895 ret = rdma_resolve_addr(cb->cm_id, NULL, (struct sockaddr *)&sin, 2000);
1897 printk(KERN_ERR PFX "rdma_resolve_addr error %d\n", ret);
1901 wait_event_interruptible(cb->sem, cb->state >= ROUTE_RESOLVED);
1902 if (cb->state != ROUTE_RESOLVED) {
1904 "addr/route resolution did not resolve: state %d\n",
1909 if (!reg_supported(cb->cm_id->device))
1912 DEBUG_LOG("rdma_resolve_addr - rdma_resolve_route successful\n");
1916 static void krping_run_client(struct krping_cb *cb)
1918 struct ib_recv_wr *bad_wr;
1921 ret = krping_bind_client(cb);
1925 ret = krping_setup_qp(cb, cb->cm_id);
1927 printk(KERN_ERR PFX "setup_qp failed: %d\n", ret);
1931 ret = krping_setup_buffers(cb);
1933 printk(KERN_ERR PFX "krping_setup_buffers failed: %d\n", ret);
1937 ret = ib_post_recv(cb->qp, &cb->rq_wr, &bad_wr);
1939 printk(KERN_ERR PFX "ib_post_recv failed: %d\n", ret);
1943 ret = krping_connect_client(cb);
1945 printk(KERN_ERR PFX "connect error %d\n", ret);
1950 krping_wlat_test_client(cb);
1952 krping_rlat_test_client(cb);
1954 krping_bw_test_client(cb);
1955 else if (cb->frtest)
1958 krping_test_client(cb);
1959 rdma_disconnect(cb->cm_id);
1961 krping_free_buffers(cb);
1967 krping_get_ipv6_scope_id(char *name)
1974 CURVNET_SET_QUIET(TD_TO_VNET(curthread));
1975 ifp = ifunit_ref(name);
1979 retval = ifp->if_index;
1984 int krping_doit(char *cmd)
1986 struct krping_cb *cb;
1991 unsigned long optint;
1993 cb = kzalloc(sizeof(*cb), GFP_KERNEL);
1997 mutex_lock(&krping_mutex);
1998 list_add_tail(&cb->list, &krping_cbs);
1999 mutex_unlock(&krping_mutex);
2004 cb->txdepth = RPING_SQ_DEPTH;
2005 init_waitqueue_head(&cb->sem);
2007 while ((op = krping_getopt("krping", &cmd, krping_opts, NULL, &optarg,
2011 cb->addr_str = optarg;
2012 cb->addr_type = AF_INET;
2013 DEBUG_LOG("ipaddr (%s)\n", optarg);
2014 if (inet_pton(AF_INET, optarg, cb->addr) != 1) {
2015 printk(KERN_ERR PFX "bad addr string %s\n",
2021 cb->addr_str = optarg;
2022 cb->addr_type = AF_INET6;
2023 DEBUG_LOG("ipv6addr (%s)\n", optarg);
2024 scope = strstr(optarg, "%");
2025 /* extract scope ID, if any */
2028 /* extract IPv6 network address */
2029 if (inet_pton(AF_INET6, optarg, cb->addr) != 1) {
2030 printk(KERN_ERR PFX "bad addr string %s\n",
2033 } else if (IN6_IS_SCOPE_LINKLOCAL((struct in6_addr *)cb->addr) ||
2034 IN6_IS_ADDR_MC_INTFACELOCAL((struct in6_addr *)cb->addr)) {
2035 uint16_t scope_id = krping_get_ipv6_scope_id(scope);
2036 DEBUG_LOG("ipv6 scope ID = %d\n", scope_id);
2037 cb->addr[2] = scope_id >> 8;
2038 cb->addr[3] = scope_id & 0xFF;
2042 cb->port = htons(optint);
2043 DEBUG_LOG("port %d\n", (int)optint);
2047 DEBUG_LOG("server\n");
2051 DEBUG_LOG("server\n");
2055 DEBUG_LOG("client\n");
2059 if ((cb->size < 1) ||
2060 (cb->size > RPING_BUFSIZE)) {
2061 printk(KERN_ERR PFX "Invalid size %d "
2062 "(valid range is 1 to %d)\n",
2063 cb->size, RPING_BUFSIZE);
2066 DEBUG_LOG("size %d\n", (int)optint);
2070 if (cb->count < 0) {
2071 printk(KERN_ERR PFX "Invalid count %d\n",
2075 DEBUG_LOG("count %d\n", (int) cb->count);
2079 DEBUG_LOG("verbose\n");
2083 DEBUG_LOG("validate data\n");
2098 cb->server_invalidate = 1;
2101 cb->txdepth = optint;
2102 DEBUG_LOG("txdepth %d\n", (int) cb->txdepth);
2105 cb->local_dma_lkey = 1;
2106 DEBUG_LOG("using local dma lkey\n");
2110 DEBUG_LOG("using read-with-inv\n");
2114 DEBUG_LOG("fast-reg test!\n");
2117 printk(KERN_ERR PFX "unknown opt %s\n", optarg);
2125 if (cb->server == -1) {
2126 printk(KERN_ERR PFX "must be either client or server\n");
2131 if (cb->server && cb->frtest) {
2132 printk(KERN_ERR PFX "must be client to run frtest\n");
2137 if ((cb->frtest + cb->bw + cb->rlat + cb->wlat) > 1) {
2138 printk(KERN_ERR PFX "Pick only one test: fr, bw, rlat, wlat\n");
2143 if (cb->wlat || cb->rlat || cb->bw) {
2144 printk(KERN_ERR PFX "wlat, rlat, and bw tests only support mem_mode MR - which is no longer supported\n");
2149 cb->cm_id = rdma_create_id(&init_net, krping_cma_event_handler, cb, RDMA_PS_TCP, IB_QPT_RC);
2150 if (IS_ERR(cb->cm_id)) {
2151 ret = PTR_ERR(cb->cm_id);
2152 printk(KERN_ERR PFX "rdma_create_id error %d\n", ret);
2155 DEBUG_LOG("created cm_id %p\n", cb->cm_id);
2158 krping_run_server(cb);
2160 krping_run_client(cb);
2162 DEBUG_LOG("destroy cm_id %p\n", cb->cm_id);
2163 rdma_destroy_id(cb->cm_id);
2165 mutex_lock(&krping_mutex);
2166 list_del(&cb->list);
2167 mutex_unlock(&krping_mutex);
2173 krping_walk_cb_list(void (*f)(struct krping_stats *, void *), void *arg)
2175 struct krping_cb *cb;
2177 mutex_lock(&krping_mutex);
2178 list_for_each_entry(cb, &krping_cbs, list)
2179 (*f)(cb->pd ? &cb->stats : NULL, arg);
2180 mutex_unlock(&krping_mutex);