]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - sys/ofed/drivers/infiniband/core/ucma.c
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / sys / ofed / drivers / infiniband / core / ucma.c
1 /*
2  * Copyright (c) 2005-2006 Intel Corporation.  All rights reserved.
3  *
4  * This software is available to you under a choice of one of two
5  * licenses.  You may choose to be licensed under the terms of the GNU
6  * General Public License (GPL) Version 2, available from the file
7  * COPYING in the main directory of this source tree, or the
8  * OpenIB.org BSD license below:
9  *
10  *     Redistribution and use in source and binary forms, with or
11  *     without modification, are permitted provided that the following
12  *     conditions are met:
13  *
14  *      - Redistributions of source code must retain the above
15  *      copyright notice, this list of conditions and the following
16  *      disclaimer.
17  *
18  *      - Redistributions in binary form must reproduce the above
19  *      copyright notice, this list of conditions and the following
20  *      disclaimer in the documentation and/or other materials
21  *      provided with the distribution.
22  *
23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30  * SOFTWARE.
31  */
32
33 #include <linux/completion.h>
34 #include <linux/file.h>
35 #include <linux/mutex.h>
36 #include <linux/poll.h>
37 #include <linux/idr.h>
38 #include <linux/in.h>
39 #include <linux/in6.h>
40 #include <linux/miscdevice.h>
41
42 #include <rdma/rdma_user_cm.h>
43 #include <rdma/ib_marshall.h>
44 #include <rdma/rdma_cm.h>
45 #include <rdma/rdma_cm_ib.h>
46
47 MODULE_AUTHOR("Sean Hefty");
48 MODULE_DESCRIPTION("RDMA Userspace Connection Manager Access");
49 MODULE_LICENSE("Dual BSD/GPL");
50
51 enum {
52         UCMA_MAX_BACKLOG        = 1024
53 };
54
55 struct ucma_file {
56         struct mutex            mut;
57         struct file             *filp;
58         struct list_head        ctx_list;
59         struct list_head        event_list;
60         wait_queue_head_t       poll_wait;
61 };
62
63 struct ucma_context {
64         int                     id;
65         struct completion       comp;
66         atomic_t                ref;
67         int                     events_reported;
68         int                     backlog;
69
70         struct ucma_file        *file;
71         struct rdma_cm_id       *cm_id;
72         u64                     uid;
73
74         struct list_head        list;
75         struct list_head        mc_list;
76 };
77
78 struct ucma_multicast {
79         struct ucma_context     *ctx;
80         int                     id;
81         int                     events_reported;
82
83         u64                     uid;
84         struct list_head        list;
85         struct sockaddr_storage addr;
86 };
87
88 struct ucma_event {
89         struct ucma_context     *ctx;
90         struct ucma_multicast   *mc;
91         struct list_head        list;
92         struct rdma_cm_id       *cm_id;
93         struct rdma_ucm_event_resp resp;
94 };
95
96 static DEFINE_MUTEX(mut);
97 static DEFINE_IDR(ctx_idr);
98 static DEFINE_IDR(multicast_idr);
99
100 static inline struct ucma_context *_ucma_find_context(int id,
101                                                       struct ucma_file *file)
102 {
103         struct ucma_context *ctx;
104
105         ctx = idr_find(&ctx_idr, id);
106         if (!ctx)
107                 ctx = ERR_PTR(-ENOENT);
108         else if (ctx->file != file)
109                 ctx = ERR_PTR(-EINVAL);
110         return ctx;
111 }
112
113 static struct ucma_context *ucma_get_ctx(struct ucma_file *file, int id)
114 {
115         struct ucma_context *ctx;
116
117         mutex_lock(&mut);
118         ctx = _ucma_find_context(id, file);
119         if (!IS_ERR(ctx))
120                 atomic_inc(&ctx->ref);
121         mutex_unlock(&mut);
122         return ctx;
123 }
124
125 static void ucma_put_ctx(struct ucma_context *ctx)
126 {
127         if (atomic_dec_and_test(&ctx->ref))
128                 complete(&ctx->comp);
129 }
130
131 static struct ucma_context *ucma_alloc_ctx(struct ucma_file *file)
132 {
133         struct ucma_context *ctx;
134         int ret;
135
136         ctx = kzalloc(sizeof(*ctx), GFP_KERNEL);
137         if (!ctx)
138                 return NULL;
139
140         atomic_set(&ctx->ref, 1);
141         init_completion(&ctx->comp);
142         INIT_LIST_HEAD(&ctx->mc_list);
143         ctx->file = file;
144
145         do {
146                 ret = idr_pre_get(&ctx_idr, GFP_KERNEL);
147                 if (!ret)
148                         goto error;
149
150                 mutex_lock(&mut);
151                 ret = idr_get_new(&ctx_idr, ctx, &ctx->id);
152                 mutex_unlock(&mut);
153         } while (ret == -EAGAIN);
154
155         if (ret)
156                 goto error;
157
158         list_add_tail(&ctx->list, &file->ctx_list);
159         return ctx;
160
161 error:
162         kfree(ctx);
163         return NULL;
164 }
165
166 static struct ucma_multicast* ucma_alloc_multicast(struct ucma_context *ctx)
167 {
168         struct ucma_multicast *mc;
169         int ret;
170
171         mc = kzalloc(sizeof(*mc), GFP_KERNEL);
172         if (!mc)
173                 return NULL;
174
175         do {
176                 ret = idr_pre_get(&multicast_idr, GFP_KERNEL);
177                 if (!ret)
178                         goto error;
179
180                 mutex_lock(&mut);
181                 ret = idr_get_new(&multicast_idr, mc, &mc->id);
182                 mutex_unlock(&mut);
183         } while (ret == -EAGAIN);
184
185         if (ret)
186                 goto error;
187
188         mc->ctx = ctx;
189         list_add_tail(&mc->list, &ctx->mc_list);
190         return mc;
191
192 error:
193         kfree(mc);
194         return NULL;
195 }
196
197 static void ucma_copy_conn_event(struct rdma_ucm_conn_param *dst,
198                                  struct rdma_conn_param *src)
199 {
200         if (src->private_data_len)
201                 memcpy(dst->private_data, src->private_data,
202                        src->private_data_len);
203         dst->private_data_len = src->private_data_len;
204         dst->responder_resources =src->responder_resources;
205         dst->initiator_depth = src->initiator_depth;
206         dst->flow_control = src->flow_control;
207         dst->retry_count = src->retry_count;
208         dst->rnr_retry_count = src->rnr_retry_count;
209         dst->srq = src->srq;
210         dst->qp_num = src->qp_num;
211 }
212
213 static void ucma_copy_ud_event(struct rdma_ucm_ud_param *dst,
214                                struct rdma_ud_param *src)
215 {
216         if (src->private_data_len)
217                 memcpy(dst->private_data, src->private_data,
218                        src->private_data_len);
219         dst->private_data_len = src->private_data_len;
220         ib_copy_ah_attr_to_user(&dst->ah_attr, &src->ah_attr);
221         dst->qp_num = src->qp_num;
222         dst->qkey = src->qkey;
223 }
224
225 static void ucma_set_event_context(struct ucma_context *ctx,
226                                    struct rdma_cm_event *event,
227                                    struct ucma_event *uevent)
228 {
229         uevent->ctx = ctx;
230         switch (event->event) {
231         case RDMA_CM_EVENT_MULTICAST_JOIN:
232         case RDMA_CM_EVENT_MULTICAST_ERROR:
233                 uevent->mc = (struct ucma_multicast *)
234                              event->param.ud.private_data;
235                 uevent->resp.uid = uevent->mc->uid;
236                 uevent->resp.id = uevent->mc->id;
237                 break;
238         default:
239                 uevent->resp.uid = ctx->uid;
240                 uevent->resp.id = ctx->id;
241                 break;
242         }
243 }
244
245 static int ucma_event_handler(struct rdma_cm_id *cm_id,
246                               struct rdma_cm_event *event)
247 {
248         struct ucma_event *uevent;
249         struct ucma_context *ctx = cm_id->context;
250         int ret = 0;
251
252         uevent = kzalloc(sizeof(*uevent), GFP_KERNEL);
253         if (!uevent)
254                 return event->event == RDMA_CM_EVENT_CONNECT_REQUEST;
255
256         uevent->cm_id = cm_id;
257         ucma_set_event_context(ctx, event, uevent);
258         uevent->resp.event = event->event;
259         uevent->resp.status = event->status;
260         if (cm_id->ps == RDMA_PS_UDP || cm_id->ps == RDMA_PS_IPOIB)
261                 ucma_copy_ud_event(&uevent->resp.param.ud, &event->param.ud);
262         else
263                 ucma_copy_conn_event(&uevent->resp.param.conn,
264                                      &event->param.conn);
265
266         mutex_lock(&ctx->file->mut);
267         if (event->event == RDMA_CM_EVENT_CONNECT_REQUEST) {
268                 if (!ctx->backlog) {
269                         ret = -ENOMEM;
270                         kfree(uevent);
271                         goto out;
272                 }
273                 ctx->backlog--;
274         } else if (!ctx->uid) {
275                 /*
276                  * We ignore events for new connections until userspace has set
277                  * their context.  This can only happen if an error occurs on a
278                  * new connection before the user accepts it.  This is okay,
279                  * since the accept will just fail later.
280                  */
281                 kfree(uevent);
282                 goto out;
283         }
284
285         list_add_tail(&uevent->list, &ctx->file->event_list);
286         wake_up_interruptible(&ctx->file->poll_wait);
287         if (ctx->file->filp)
288                 selwakeup(&ctx->file->filp->f_selinfo);
289 out:
290         mutex_unlock(&ctx->file->mut);
291         return ret;
292 }
293
294 static ssize_t ucma_get_event(struct ucma_file *file, const char __user *inbuf,
295                               int in_len, int out_len)
296 {
297         struct ucma_context *ctx;
298         struct rdma_ucm_get_event cmd;
299         struct ucma_event *uevent;
300         int ret = 0;
301         DEFINE_WAIT(wait);
302
303         if (out_len < sizeof uevent->resp)
304                 return -ENOSPC;
305
306         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
307                 return -EFAULT;
308
309         mutex_lock(&file->mut);
310         while (list_empty(&file->event_list)) {
311                 mutex_unlock(&file->mut);
312
313                 if (file->filp->f_flags & O_NONBLOCK)
314                         return -EAGAIN;
315
316                 if (wait_event_interruptible(file->poll_wait,
317                                              !list_empty(&file->event_list)))
318                         return -ERESTARTSYS;
319
320                 mutex_lock(&file->mut);
321         }
322
323         uevent = list_entry(file->event_list.next, struct ucma_event, list);
324
325         if (uevent->resp.event == RDMA_CM_EVENT_CONNECT_REQUEST) {
326                 ctx = ucma_alloc_ctx(file);
327                 if (!ctx) {
328                         ret = -ENOMEM;
329                         goto done;
330                 }
331                 uevent->ctx->backlog++;
332                 ctx->cm_id = uevent->cm_id;
333                 ctx->cm_id->context = ctx;
334                 uevent->resp.id = ctx->id;
335         }
336
337         if (copy_to_user((void __user *)(unsigned long)cmd.response,
338                          &uevent->resp, sizeof uevent->resp)) {
339                 ret = -EFAULT;
340                 goto done;
341         }
342
343         list_del(&uevent->list);
344         uevent->ctx->events_reported++;
345         if (uevent->mc)
346                 uevent->mc->events_reported++;
347         kfree(uevent);
348 done:
349         mutex_unlock(&file->mut);
350         return ret;
351 }
352
353 static ssize_t ucma_create_id(struct ucma_file *file,
354                                 const char __user *inbuf,
355                                 int in_len, int out_len)
356 {
357         struct rdma_ucm_create_id cmd;
358         struct rdma_ucm_create_id_resp resp;
359         struct ucma_context *ctx;
360         int ret;
361
362         if (out_len < sizeof(resp))
363                 return -ENOSPC;
364
365         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
366                 return -EFAULT;
367
368         mutex_lock(&file->mut);
369         ctx = ucma_alloc_ctx(file);
370         mutex_unlock(&file->mut);
371         if (!ctx)
372                 return -ENOMEM;
373
374         ctx->uid = cmd.uid;
375         ctx->cm_id = rdma_create_id(ucma_event_handler, ctx, cmd.ps);
376         if (IS_ERR(ctx->cm_id)) {
377                 ret = PTR_ERR(ctx->cm_id);
378                 goto err1;
379         }
380
381         resp.id = ctx->id;
382         if (copy_to_user((void __user *)(unsigned long)cmd.response,
383                          &resp, sizeof(resp))) {
384                 ret = -EFAULT;
385                 goto err2;
386         }
387         return 0;
388
389 err2:
390         rdma_destroy_id(ctx->cm_id);
391 err1:
392         mutex_lock(&mut);
393         idr_remove(&ctx_idr, ctx->id);
394         mutex_unlock(&mut);
395         kfree(ctx);
396         return ret;
397 }
398
399 static void ucma_cleanup_multicast(struct ucma_context *ctx)
400 {
401         struct ucma_multicast *mc, *tmp;
402
403         mutex_lock(&mut);
404         list_for_each_entry_safe(mc, tmp, &ctx->mc_list, list) {
405                 list_del(&mc->list);
406                 idr_remove(&multicast_idr, mc->id);
407                 kfree(mc);
408         }
409         mutex_unlock(&mut);
410 }
411
412 static void ucma_cleanup_events(struct ucma_context *ctx)
413 {
414         struct ucma_event *uevent, *tmp;
415
416         list_for_each_entry_safe(uevent, tmp, &ctx->file->event_list, list) {
417                 if (uevent->ctx != ctx)
418                         continue;
419
420                 list_del(&uevent->list);
421
422                 /* clear incoming connections. */
423                 if (uevent->resp.event == RDMA_CM_EVENT_CONNECT_REQUEST)
424                         rdma_destroy_id(uevent->cm_id);
425
426                 kfree(uevent);
427         }
428 }
429
430 static void ucma_cleanup_mc_events(struct ucma_multicast *mc)
431 {
432         struct ucma_event *uevent, *tmp;
433
434         list_for_each_entry_safe(uevent, tmp, &mc->ctx->file->event_list, list) {
435                 if (uevent->mc != mc)
436                         continue;
437
438                 list_del(&uevent->list);
439                 kfree(uevent);
440         }
441 }
442
443 static int ucma_free_ctx(struct ucma_context *ctx)
444 {
445         int events_reported;
446
447         /* No new events will be generated after destroying the id. */
448         rdma_destroy_id(ctx->cm_id);
449
450         ucma_cleanup_multicast(ctx);
451
452         /* Cleanup events not yet reported to the user. */
453         mutex_lock(&ctx->file->mut);
454         ucma_cleanup_events(ctx);
455         list_del(&ctx->list);
456         mutex_unlock(&ctx->file->mut);
457
458         events_reported = ctx->events_reported;
459         kfree(ctx);
460         return events_reported;
461 }
462
463 static ssize_t ucma_destroy_id(struct ucma_file *file, const char __user *inbuf,
464                                int in_len, int out_len)
465 {
466         struct rdma_ucm_destroy_id cmd;
467         struct rdma_ucm_destroy_id_resp resp;
468         struct ucma_context *ctx;
469         int ret = 0;
470
471         if (out_len < sizeof(resp))
472                 return -ENOSPC;
473
474         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
475                 return -EFAULT;
476
477         mutex_lock(&mut);
478         ctx = _ucma_find_context(cmd.id, file);
479         if (!IS_ERR(ctx))
480                 idr_remove(&ctx_idr, ctx->id);
481         mutex_unlock(&mut);
482
483         if (IS_ERR(ctx))
484                 return PTR_ERR(ctx);
485
486         ucma_put_ctx(ctx);
487         wait_for_completion(&ctx->comp);
488         resp.events_reported = ucma_free_ctx(ctx);
489
490         if (copy_to_user((void __user *)(unsigned long)cmd.response,
491                          &resp, sizeof(resp)))
492                 ret = -EFAULT;
493
494         return ret;
495 }
496
497 static ssize_t ucma_bind_addr(struct ucma_file *file, const char __user *inbuf,
498                               int in_len, int out_len)
499 {
500         struct rdma_ucm_bind_addr cmd;
501         struct ucma_context *ctx;
502         int ret;
503
504         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
505                 return -EFAULT;
506
507         ctx = ucma_get_ctx(file, cmd.id);
508         if (IS_ERR(ctx))
509                 return PTR_ERR(ctx);
510
511         ret = rdma_bind_addr(ctx->cm_id, (struct sockaddr *) &cmd.addr);
512         ucma_put_ctx(ctx);
513         return ret;
514 }
515
516 static ssize_t ucma_resolve_addr(struct ucma_file *file,
517                                  const char __user *inbuf,
518                                  int in_len, int out_len)
519 {
520         struct rdma_ucm_resolve_addr cmd;
521         struct ucma_context *ctx;
522         int ret;
523
524         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
525                 return -EFAULT;
526
527         ctx = ucma_get_ctx(file, cmd.id);
528         if (IS_ERR(ctx))
529                 return PTR_ERR(ctx);
530
531         ret = rdma_resolve_addr(ctx->cm_id, (struct sockaddr *) &cmd.src_addr,
532                                 (struct sockaddr *) &cmd.dst_addr,
533                                 cmd.timeout_ms);
534         ucma_put_ctx(ctx);
535         return ret;
536 }
537
538 static ssize_t ucma_resolve_route(struct ucma_file *file,
539                                   const char __user *inbuf,
540                                   int in_len, int out_len)
541 {
542         struct rdma_ucm_resolve_route cmd;
543         struct ucma_context *ctx;
544         int ret;
545
546         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
547                 return -EFAULT;
548
549         ctx = ucma_get_ctx(file, cmd.id);
550         if (IS_ERR(ctx))
551                 return PTR_ERR(ctx);
552
553         ret = rdma_resolve_route(ctx->cm_id, cmd.timeout_ms);
554         ucma_put_ctx(ctx);
555         return ret;
556 }
557
558 static void ucma_copy_ib_route(struct rdma_ucm_query_route_resp *resp,
559                                struct rdma_route *route)
560 {
561         struct rdma_dev_addr *dev_addr;
562
563         resp->num_paths = route->num_paths;
564         switch (route->num_paths) {
565         case 0:
566                 dev_addr = &route->addr.dev_addr;
567                 rdma_addr_get_dgid(dev_addr,
568                                    (union ib_gid *) &resp->ib_route[0].dgid);
569                 rdma_addr_get_sgid(dev_addr,
570                                    (union ib_gid *) &resp->ib_route[0].sgid);
571                 resp->ib_route[0].pkey = cpu_to_be16(ib_addr_get_pkey(dev_addr));
572                 break;
573         case 2:
574                 ib_copy_path_rec_to_user(&resp->ib_route[1],
575                                          &route->path_rec[1]);
576                 /* fall through */
577         case 1:
578                 ib_copy_path_rec_to_user(&resp->ib_route[0],
579                                          &route->path_rec[0]);
580                 break;
581         default:
582                 break;
583         }
584 }
585
586 static void ucma_copy_iboe_route(struct rdma_ucm_query_route_resp *resp,
587                                  struct rdma_route *route)
588 {
589         struct rdma_dev_addr *dev_addr;
590         struct net_device *dev;
591         u16 vid = 0;
592
593         resp->num_paths = route->num_paths;
594         switch (route->num_paths) {
595         case 0:
596                 dev_addr = &route->addr.dev_addr;
597                 dev = dev_get_by_index(&init_net, dev_addr->bound_dev_if);
598                         if (dev) {
599                                 vid = rdma_vlan_dev_vlan_id(dev);
600                                 dev_put(dev);
601                         }
602
603                 iboe_mac_vlan_to_ll((union ib_gid *) &resp->ib_route[0].dgid,
604                                     dev_addr->dst_dev_addr, vid);
605                 iboe_addr_get_sgid(dev_addr,
606                                    (union ib_gid *) &resp->ib_route[0].sgid);
607                 resp->ib_route[0].pkey = cpu_to_be16(0xffff);
608                 break;
609         case 2:
610                 ib_copy_path_rec_to_user(&resp->ib_route[1],
611                                          &route->path_rec[1]);
612                 /* fall through */
613         case 1:
614                 ib_copy_path_rec_to_user(&resp->ib_route[0],
615                                          &route->path_rec[0]);
616                 break;
617         default:
618                 break;
619         }
620 }
621
622 static ssize_t ucma_query_route(struct ucma_file *file,
623                                 const char __user *inbuf,
624                                 int in_len, int out_len)
625 {
626         struct rdma_ucm_query_route cmd;
627         struct rdma_ucm_query_route_resp resp;
628         struct ucma_context *ctx;
629         struct sockaddr *addr;
630         int ret = 0;
631
632         if (out_len < sizeof(resp))
633                 return -ENOSPC;
634
635         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
636                 return -EFAULT;
637
638         ctx = ucma_get_ctx(file, cmd.id);
639         if (IS_ERR(ctx))
640                 return PTR_ERR(ctx);
641
642         memset(&resp, 0, sizeof resp);
643         addr = (struct sockaddr *) &ctx->cm_id->route.addr.src_addr;
644         memcpy(&resp.src_addr, addr, addr->sa_family == AF_INET ?
645                                      sizeof(struct sockaddr_in) :
646                                      sizeof(struct sockaddr_in6));
647         addr = (struct sockaddr *) &ctx->cm_id->route.addr.dst_addr;
648         memcpy(&resp.dst_addr, addr, addr->sa_family == AF_INET ?
649                                      sizeof(struct sockaddr_in) :
650                                      sizeof(struct sockaddr_in6));
651         if (!ctx->cm_id->device)
652                 goto out;
653
654         resp.node_guid = (__force __u64) ctx->cm_id->device->node_guid;
655         resp.port_num = ctx->cm_id->port_num;
656         if (rdma_node_get_transport(ctx->cm_id->device->node_type) == RDMA_TRANSPORT_IB) {
657                 switch (rdma_port_get_link_layer(ctx->cm_id->device, ctx->cm_id->port_num)) {
658                 case IB_LINK_LAYER_INFINIBAND:
659                         ucma_copy_ib_route(&resp, &ctx->cm_id->route);
660                         break;
661                 case IB_LINK_LAYER_ETHERNET:
662                         ucma_copy_iboe_route(&resp, &ctx->cm_id->route);
663                         break;
664                 default:
665                         break;
666                 }
667         }
668
669 out:
670         if (copy_to_user((void __user *)(unsigned long)cmd.response,
671                          &resp, sizeof(resp)))
672                 ret = -EFAULT;
673
674         ucma_put_ctx(ctx);
675         return ret;
676 }
677
678 static void ucma_copy_conn_param(struct rdma_conn_param *dst,
679                                  struct rdma_ucm_conn_param *src)
680 {
681         dst->private_data = src->private_data;
682         dst->private_data_len = src->private_data_len;
683         dst->responder_resources =src->responder_resources;
684         dst->initiator_depth = src->initiator_depth;
685         dst->flow_control = src->flow_control;
686         dst->retry_count = src->retry_count;
687         dst->rnr_retry_count = src->rnr_retry_count;
688         dst->srq = src->srq;
689         dst->qp_num = src->qp_num;
690 }
691
692 static ssize_t ucma_connect(struct ucma_file *file, const char __user *inbuf,
693                             int in_len, int out_len)
694 {
695         struct rdma_ucm_connect cmd;
696         struct rdma_conn_param conn_param;
697         struct ucma_context *ctx;
698         int ret;
699
700         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
701                 return -EFAULT;
702
703         if (!cmd.conn_param.valid)
704                 return -EINVAL;
705
706         ctx = ucma_get_ctx(file, cmd.id);
707         if (IS_ERR(ctx))
708                 return PTR_ERR(ctx);
709
710         ucma_copy_conn_param(&conn_param, &cmd.conn_param);
711         ret = rdma_connect(ctx->cm_id, &conn_param);
712         ucma_put_ctx(ctx);
713         return ret;
714 }
715
716 static ssize_t ucma_listen(struct ucma_file *file, const char __user *inbuf,
717                            int in_len, int out_len)
718 {
719         struct rdma_ucm_listen cmd;
720         struct ucma_context *ctx;
721         int ret;
722
723         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
724                 return -EFAULT;
725
726         ctx = ucma_get_ctx(file, cmd.id);
727         if (IS_ERR(ctx))
728                 return PTR_ERR(ctx);
729
730         ctx->backlog = cmd.backlog > 0 && cmd.backlog < UCMA_MAX_BACKLOG ?
731                        cmd.backlog : UCMA_MAX_BACKLOG;
732         ret = rdma_listen(ctx->cm_id, ctx->backlog);
733         ucma_put_ctx(ctx);
734         return ret;
735 }
736
737 static ssize_t ucma_accept(struct ucma_file *file, const char __user *inbuf,
738                            int in_len, int out_len)
739 {
740         struct rdma_ucm_accept cmd;
741         struct rdma_conn_param conn_param;
742         struct ucma_context *ctx;
743         int ret;
744
745         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
746                 return -EFAULT;
747
748         ctx = ucma_get_ctx(file, cmd.id);
749         if (IS_ERR(ctx))
750                 return PTR_ERR(ctx);
751
752         if (cmd.conn_param.valid) {
753                 ctx->uid = cmd.uid;
754                 ucma_copy_conn_param(&conn_param, &cmd.conn_param);
755                 ret = rdma_accept(ctx->cm_id, &conn_param);
756         } else
757                 ret = rdma_accept(ctx->cm_id, NULL);
758
759         ucma_put_ctx(ctx);
760         return ret;
761 }
762
763 static ssize_t ucma_reject(struct ucma_file *file, const char __user *inbuf,
764                            int in_len, int out_len)
765 {
766         struct rdma_ucm_reject cmd;
767         struct ucma_context *ctx;
768         int ret;
769
770         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
771                 return -EFAULT;
772
773         ctx = ucma_get_ctx(file, cmd.id);
774         if (IS_ERR(ctx))
775                 return PTR_ERR(ctx);
776
777         ret = rdma_reject(ctx->cm_id, cmd.private_data, cmd.private_data_len);
778         ucma_put_ctx(ctx);
779         return ret;
780 }
781
782 static ssize_t ucma_disconnect(struct ucma_file *file, const char __user *inbuf,
783                                int in_len, int out_len)
784 {
785         struct rdma_ucm_disconnect cmd;
786         struct ucma_context *ctx;
787         int ret;
788
789         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
790                 return -EFAULT;
791
792         ctx = ucma_get_ctx(file, cmd.id);
793         if (IS_ERR(ctx))
794                 return PTR_ERR(ctx);
795
796         ret = rdma_disconnect(ctx->cm_id);
797         ucma_put_ctx(ctx);
798         return ret;
799 }
800
801 static ssize_t ucma_init_qp_attr(struct ucma_file *file,
802                                  const char __user *inbuf,
803                                  int in_len, int out_len)
804 {
805         struct rdma_ucm_init_qp_attr cmd;
806         struct ib_uverbs_qp_attr resp;
807         struct ucma_context *ctx;
808         struct ib_qp_attr qp_attr;
809         int ret;
810
811         if (out_len < sizeof(resp))
812                 return -ENOSPC;
813
814         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
815                 return -EFAULT;
816
817         ctx = ucma_get_ctx(file, cmd.id);
818         if (IS_ERR(ctx))
819                 return PTR_ERR(ctx);
820
821         resp.qp_attr_mask = 0;
822         memset(&qp_attr, 0, sizeof qp_attr);
823         qp_attr.qp_state = cmd.qp_state;
824         ret = rdma_init_qp_attr(ctx->cm_id, &qp_attr, &resp.qp_attr_mask);
825         if (ret)
826                 goto out;
827
828         ib_copy_qp_attr_to_user(&resp, &qp_attr);
829         if (copy_to_user((void __user *)(unsigned long)cmd.response,
830                          &resp, sizeof(resp)))
831                 ret = -EFAULT;
832
833 out:
834         ucma_put_ctx(ctx);
835         return ret;
836 }
837
838 static int ucma_set_option_id(struct ucma_context *ctx, int optname,
839                               void *optval, size_t optlen)
840 {
841         int ret = 0;
842
843         switch (optname) {
844         case RDMA_OPTION_ID_TOS:
845                 if (optlen != sizeof(u8)) {
846                         ret = -EINVAL;
847                         break;
848                 }
849                 rdma_set_service_type(ctx->cm_id, *((u8 *) optval));
850                 break;
851         default:
852                 ret = -ENOSYS;
853         }
854
855         return ret;
856 }
857
858 static int ucma_set_ib_path(struct ucma_context *ctx,
859                             struct ib_path_rec_data *path_data, size_t optlen)
860 {
861         struct ib_sa_path_rec sa_path;
862         struct rdma_cm_event event;
863         int ret;
864
865         if (optlen % sizeof(*path_data))
866                 return -EINVAL;
867
868         for (; optlen; optlen -= sizeof(*path_data), path_data++) {
869                 if (path_data->flags == (IB_PATH_GMP | IB_PATH_PRIMARY |
870                                          IB_PATH_BIDIRECTIONAL))
871                         break;
872         }
873
874         if (!optlen)
875                 return -EINVAL;
876
877         ib_sa_unpack_path(path_data->path_rec, &sa_path);
878         ret = rdma_set_ib_paths(ctx->cm_id, &sa_path, 1);
879         if (ret)
880                 return ret;
881
882         memset(&event, 0, sizeof event);
883         event.event = RDMA_CM_EVENT_ROUTE_RESOLVED;
884         return ucma_event_handler(ctx->cm_id, &event);
885 }
886
887 static int ucma_set_option_ib(struct ucma_context *ctx, int optname,
888                               void *optval, size_t optlen)
889 {
890         int ret;
891
892         switch (optname) {
893         case RDMA_OPTION_IB_PATH:
894                 ret = ucma_set_ib_path(ctx, optval, optlen);
895                 break;
896         default:
897                 ret = -ENOSYS;
898         }
899
900         return ret;
901 }
902
903 static int ucma_set_option_level(struct ucma_context *ctx, int level,
904                                  int optname, void *optval, size_t optlen)
905 {
906         int ret;
907
908         switch (level) {
909         case RDMA_OPTION_ID:
910                 ret = ucma_set_option_id(ctx, optname, optval, optlen);
911                 break;
912         case RDMA_OPTION_IB:
913                 ret = ucma_set_option_ib(ctx, optname, optval, optlen);
914                 break;
915         default:
916                 ret = -ENOSYS;
917         }
918
919         return ret;
920 }
921
922 static ssize_t ucma_set_option(struct ucma_file *file, const char __user *inbuf,
923                                int in_len, int out_len)
924 {
925         struct rdma_ucm_set_option cmd;
926         struct ucma_context *ctx;
927         void *optval;
928         int ret;
929
930         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
931                 return -EFAULT;
932
933         ctx = ucma_get_ctx(file, cmd.id);
934         if (IS_ERR(ctx))
935                 return PTR_ERR(ctx);
936
937         optval = kmalloc(cmd.optlen, GFP_KERNEL);
938         if (!optval) {
939                 ret = -ENOMEM;
940                 goto out1;
941         }
942
943         if (copy_from_user(optval, (void __user *) (unsigned long) cmd.optval,
944                            cmd.optlen)) {
945                 ret = -EFAULT;
946                 goto out2;
947         }
948
949         ret = ucma_set_option_level(ctx, cmd.level, cmd.optname, optval,
950                                     cmd.optlen);
951 out2:
952         kfree(optval);
953 out1:
954         ucma_put_ctx(ctx);
955         return ret;
956 }
957
958 static ssize_t ucma_notify(struct ucma_file *file, const char __user *inbuf,
959                            int in_len, int out_len)
960 {
961         struct rdma_ucm_notify cmd;
962         struct ucma_context *ctx;
963         int ret;
964
965         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
966                 return -EFAULT;
967
968         ctx = ucma_get_ctx(file, cmd.id);
969         if (IS_ERR(ctx))
970                 return PTR_ERR(ctx);
971
972         ret = rdma_notify(ctx->cm_id, (enum ib_event_type) cmd.event);
973         ucma_put_ctx(ctx);
974         return ret;
975 }
976
977 static ssize_t ucma_join_multicast(struct ucma_file *file,
978                                    const char __user *inbuf,
979                                    int in_len, int out_len)
980 {
981         struct rdma_ucm_join_mcast cmd;
982         struct rdma_ucm_create_id_resp resp;
983         struct ucma_context *ctx;
984         struct ucma_multicast *mc;
985         int ret;
986
987         if (out_len < sizeof(resp))
988                 return -ENOSPC;
989
990         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
991                 return -EFAULT;
992
993         ctx = ucma_get_ctx(file, cmd.id);
994         if (IS_ERR(ctx))
995                 return PTR_ERR(ctx);
996
997         mutex_lock(&file->mut);
998         mc = ucma_alloc_multicast(ctx);
999         if (!mc) {
1000                 ret = -ENOMEM;
1001                 goto err1;
1002         }
1003
1004         mc->uid = cmd.uid;
1005         memcpy(&mc->addr, &cmd.addr, sizeof cmd.addr);
1006         ret = rdma_join_multicast(ctx->cm_id, (struct sockaddr *) &mc->addr, mc);
1007         if (ret)
1008                 goto err2;
1009
1010         resp.id = mc->id;
1011         if (copy_to_user((void __user *)(unsigned long)cmd.response,
1012                          &resp, sizeof(resp))) {
1013                 ret = -EFAULT;
1014                 goto err3;
1015         }
1016
1017         mutex_unlock(&file->mut);
1018         ucma_put_ctx(ctx);
1019         return 0;
1020
1021 err3:
1022         rdma_leave_multicast(ctx->cm_id, (struct sockaddr *) &mc->addr);
1023         ucma_cleanup_mc_events(mc);
1024 err2:
1025         mutex_lock(&mut);
1026         idr_remove(&multicast_idr, mc->id);
1027         mutex_unlock(&mut);
1028         list_del(&mc->list);
1029         kfree(mc);
1030 err1:
1031         mutex_unlock(&file->mut);
1032         ucma_put_ctx(ctx);
1033         return ret;
1034 }
1035
1036 static ssize_t ucma_leave_multicast(struct ucma_file *file,
1037                                     const char __user *inbuf,
1038                                     int in_len, int out_len)
1039 {
1040         struct rdma_ucm_destroy_id cmd;
1041         struct rdma_ucm_destroy_id_resp resp;
1042         struct ucma_multicast *mc;
1043         int ret = 0;
1044
1045         if (out_len < sizeof(resp))
1046                 return -ENOSPC;
1047
1048         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
1049                 return -EFAULT;
1050
1051         mutex_lock(&mut);
1052         mc = idr_find(&multicast_idr, cmd.id);
1053         if (!mc)
1054                 mc = ERR_PTR(-ENOENT);
1055         else if (mc->ctx->file != file)
1056                 mc = ERR_PTR(-EINVAL);
1057         else {
1058                 idr_remove(&multicast_idr, mc->id);
1059                 atomic_inc(&mc->ctx->ref);
1060         }
1061         mutex_unlock(&mut);
1062
1063         if (IS_ERR(mc)) {
1064                 ret = PTR_ERR(mc);
1065                 goto out;
1066         }
1067
1068         rdma_leave_multicast(mc->ctx->cm_id, (struct sockaddr *) &mc->addr);
1069         mutex_lock(&mc->ctx->file->mut);
1070         ucma_cleanup_mc_events(mc);
1071         list_del(&mc->list);
1072         mutex_unlock(&mc->ctx->file->mut);
1073
1074         ucma_put_ctx(mc->ctx);
1075         resp.events_reported = mc->events_reported;
1076         kfree(mc);
1077
1078         if (copy_to_user((void __user *)(unsigned long)cmd.response,
1079                          &resp, sizeof(resp)))
1080                 ret = -EFAULT;
1081 out:
1082         return ret;
1083 }
1084
1085 static void ucma_lock_files(struct ucma_file *file1, struct ucma_file *file2)
1086 {
1087         /* Acquire mutex's based on pointer comparison to prevent deadlock. */
1088         if (file1 < file2) {
1089                 mutex_lock(&file1->mut);
1090                 mutex_lock(&file2->mut);
1091         } else {
1092                 mutex_lock(&file2->mut);
1093                 mutex_lock(&file1->mut);
1094         }
1095 }
1096
1097 static void ucma_unlock_files(struct ucma_file *file1, struct ucma_file *file2)
1098 {
1099         if (file1 < file2) {
1100                 mutex_unlock(&file2->mut);
1101                 mutex_unlock(&file1->mut);
1102         } else {
1103                 mutex_unlock(&file1->mut);
1104                 mutex_unlock(&file2->mut);
1105         }
1106 }
1107
1108 static void ucma_move_events(struct ucma_context *ctx, struct ucma_file *file)
1109 {
1110         struct ucma_event *uevent, *tmp;
1111
1112         list_for_each_entry_safe(uevent, tmp, &ctx->file->event_list, list)
1113                 if (uevent->ctx == ctx)
1114                         list_move_tail(&uevent->list, &file->event_list);
1115 }
1116
1117 static ssize_t ucma_migrate_id(struct ucma_file *new_file,
1118                                const char __user *inbuf,
1119                                int in_len, int out_len)
1120 {
1121         struct rdma_ucm_migrate_id cmd;
1122         struct rdma_ucm_migrate_resp resp;
1123         struct ucma_context *ctx;
1124         struct file *filp;
1125         struct ucma_file *cur_file;
1126         int ret = 0;
1127
1128         if (copy_from_user(&cmd, inbuf, sizeof(cmd)))
1129                 return -EFAULT;
1130
1131         /* Get current fd to protect against it being closed */
1132         filp = fget(cmd.fd);
1133         if (!filp)
1134                 return -ENOENT;
1135
1136         /* Validate current fd and prevent destruction of id. */
1137         ctx = ucma_get_ctx(filp->private_data, cmd.id);
1138         if (IS_ERR(ctx)) {
1139                 ret = PTR_ERR(ctx);
1140                 goto file_put;
1141         }
1142
1143         cur_file = ctx->file;
1144         if (cur_file == new_file) {
1145                 resp.events_reported = ctx->events_reported;
1146                 goto response;
1147         }
1148
1149         /*
1150          * Migrate events between fd's, maintaining order, and avoiding new
1151          * events being added before existing events.
1152          */
1153         ucma_lock_files(cur_file, new_file);
1154         mutex_lock(&mut);
1155
1156         list_move_tail(&ctx->list, &new_file->ctx_list);
1157         ucma_move_events(ctx, new_file);
1158         ctx->file = new_file;
1159         resp.events_reported = ctx->events_reported;
1160
1161         mutex_unlock(&mut);
1162         ucma_unlock_files(cur_file, new_file);
1163
1164 response:
1165         if (copy_to_user((void __user *)(unsigned long)cmd.response,
1166                          &resp, sizeof(resp)))
1167                 ret = -EFAULT;
1168
1169         ucma_put_ctx(ctx);
1170 file_put:
1171         fput(filp);
1172         return ret;
1173 }
1174
1175 static ssize_t (*ucma_cmd_table[])(struct ucma_file *file,
1176                                    const char __user *inbuf,
1177                                    int in_len, int out_len) = {
1178         [RDMA_USER_CM_CMD_CREATE_ID]    = ucma_create_id,
1179         [RDMA_USER_CM_CMD_DESTROY_ID]   = ucma_destroy_id,
1180         [RDMA_USER_CM_CMD_BIND_ADDR]    = ucma_bind_addr,
1181         [RDMA_USER_CM_CMD_RESOLVE_ADDR] = ucma_resolve_addr,
1182         [RDMA_USER_CM_CMD_RESOLVE_ROUTE]= ucma_resolve_route,
1183         [RDMA_USER_CM_CMD_QUERY_ROUTE]  = ucma_query_route,
1184         [RDMA_USER_CM_CMD_CONNECT]      = ucma_connect,
1185         [RDMA_USER_CM_CMD_LISTEN]       = ucma_listen,
1186         [RDMA_USER_CM_CMD_ACCEPT]       = ucma_accept,
1187         [RDMA_USER_CM_CMD_REJECT]       = ucma_reject,
1188         [RDMA_USER_CM_CMD_DISCONNECT]   = ucma_disconnect,
1189         [RDMA_USER_CM_CMD_INIT_QP_ATTR] = ucma_init_qp_attr,
1190         [RDMA_USER_CM_CMD_GET_EVENT]    = ucma_get_event,
1191         [RDMA_USER_CM_CMD_GET_OPTION]   = NULL,
1192         [RDMA_USER_CM_CMD_SET_OPTION]   = ucma_set_option,
1193         [RDMA_USER_CM_CMD_NOTIFY]       = ucma_notify,
1194         [RDMA_USER_CM_CMD_JOIN_MCAST]   = ucma_join_multicast,
1195         [RDMA_USER_CM_CMD_LEAVE_MCAST]  = ucma_leave_multicast,
1196         [RDMA_USER_CM_CMD_MIGRATE_ID]   = ucma_migrate_id
1197 };
1198
1199 static ssize_t ucma_write(struct file *filp, const char __user *buf,
1200                           size_t len, loff_t *pos)
1201 {
1202         struct ucma_file *file = filp->private_data;
1203         struct rdma_ucm_cmd_hdr hdr;
1204         ssize_t ret;
1205
1206         if (len < sizeof(hdr))
1207                 return -EINVAL;
1208
1209         if (copy_from_user(&hdr, buf, sizeof(hdr)))
1210                 return -EFAULT;
1211
1212         if (hdr.cmd < 0 || hdr.cmd >= ARRAY_SIZE(ucma_cmd_table))
1213                 return -EINVAL;
1214
1215         if (hdr.in + sizeof(hdr) > len)
1216                 return -EINVAL;
1217
1218         if (!ucma_cmd_table[hdr.cmd])
1219                 return -ENOSYS;
1220
1221         ret = ucma_cmd_table[hdr.cmd](file, buf + sizeof(hdr), hdr.in, hdr.out);
1222         if (!ret)
1223                 ret = len;
1224
1225         return ret;
1226 }
1227
1228 static unsigned int ucma_poll(struct file *filp, struct poll_table_struct *wait)
1229 {
1230         struct ucma_file *file = filp->private_data;
1231         unsigned int mask = 0;
1232
1233         poll_wait(filp, &file->poll_wait, wait);
1234
1235         if (!list_empty(&file->event_list))
1236                 mask = POLLIN | POLLRDNORM;
1237
1238         return mask;
1239 }
1240
1241 /*
1242  * ucma_open() does not need the BKL:
1243  *
1244  *  - no global state is referred to;
1245  *  - there is no ioctl method to race against;
1246  *  - no further module initialization is required for open to work
1247  *    after the device is registered.
1248  */
1249 static int ucma_open(struct inode *inode, struct file *filp)
1250 {
1251         struct ucma_file *file;
1252
1253         file = kmalloc(sizeof *file, GFP_KERNEL);
1254         if (!file)
1255                 return -ENOMEM;
1256
1257         INIT_LIST_HEAD(&file->event_list);
1258         INIT_LIST_HEAD(&file->ctx_list);
1259         init_waitqueue_head(&file->poll_wait);
1260         mutex_init(&file->mut);
1261
1262         filp->private_data = file;
1263         file->filp = filp;
1264         return 0;
1265 }
1266
1267 static int ucma_close(struct inode *inode, struct file *filp)
1268 {
1269         struct ucma_file *file = filp->private_data;
1270         struct ucma_context *ctx, *tmp;
1271
1272         mutex_lock(&file->mut);
1273         list_for_each_entry_safe(ctx, tmp, &file->ctx_list, list) {
1274                 mutex_unlock(&file->mut);
1275
1276                 mutex_lock(&mut);
1277                 idr_remove(&ctx_idr, ctx->id);
1278                 mutex_unlock(&mut);
1279
1280                 ucma_free_ctx(ctx);
1281                 mutex_lock(&file->mut);
1282         }
1283         mutex_unlock(&file->mut);
1284         kfree(file);
1285         return 0;
1286 }
1287
1288 static const struct file_operations ucma_fops = {
1289         .owner   = THIS_MODULE,
1290         .open    = ucma_open,
1291         .release = ucma_close,
1292         .write   = ucma_write,
1293         .poll    = ucma_poll,
1294 };
1295
1296 static struct miscdevice ucma_misc = {
1297         .minor  = MISC_DYNAMIC_MINOR,
1298         .name   = "rdma_cm",
1299         .fops   = &ucma_fops,
1300 };
1301
1302 static ssize_t show_abi_version(struct device *dev,
1303                                 struct device_attribute *attr,
1304                                 char *buf)
1305 {
1306         return sprintf(buf, "%d\n", RDMA_USER_CM_ABI_VERSION);
1307 }
1308 static DEVICE_ATTR(abi_version, S_IRUGO, show_abi_version, NULL);
1309
1310 static int __init ucma_init(void)
1311 {
1312         int ret;
1313
1314         ret = misc_register(&ucma_misc);
1315         if (ret)
1316                 return ret;
1317
1318         ret = device_create_file(ucma_misc.this_device, &dev_attr_abi_version);
1319         if (ret) {
1320                 printk(KERN_ERR "rdma_ucm: couldn't create abi_version attr\n");
1321                 goto err;
1322         }
1323         return 0;
1324 err:
1325         misc_deregister(&ucma_misc);
1326         return ret;
1327 }
1328
1329 static void __exit ucma_cleanup(void)
1330 {
1331         device_remove_file(ucma_misc.this_device, &dev_attr_abi_version);
1332         misc_deregister(&ucma_misc);
1333         idr_destroy(&ctx_idr);
1334 }
1335
1336 module_init(ucma_init);
1337 module_exit(ucma_cleanup);