xref: /linux/drivers/infiniband/hw/mthca/mthca_provider.c (revision ed7171ff9fabc49ae6ed42fbd082a576473836fc)
1 /*
2  * Copyright (c) 2004, 2005 Topspin Communications.  All rights reserved.
3  * Copyright (c) 2005 Sun Microsystems, Inc. All rights reserved.
4  * Copyright (c) 2005, 2006 Cisco Systems.  All rights reserved.
5  * Copyright (c) 2005 Mellanox Technologies. All rights reserved.
6  * Copyright (c) 2004 Voltaire, Inc. All rights reserved.
7  *
8  * This software is available to you under a choice of one of two
9  * licenses.  You may choose to be licensed under the terms of the GNU
10  * General Public License (GPL) Version 2, available from the file
11  * COPYING in the main directory of this source tree, or the
12  * OpenIB.org BSD license below:
13  *
14  *     Redistribution and use in source and binary forms, with or
15  *     without modification, are permitted provided that the following
16  *     conditions are met:
17  *
18  *      - Redistributions of source code must retain the above
19  *        copyright notice, this list of conditions and the following
20  *        disclaimer.
21  *
22  *      - Redistributions in binary form must reproduce the above
23  *        copyright notice, this list of conditions and the following
24  *        disclaimer in the documentation and/or other materials
25  *        provided with the distribution.
26  *
27  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
28  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
29  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
30  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
31  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
32  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
33  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
34  * SOFTWARE.
35  */
36 
37 #include <rdma/ib_smi.h>
38 #include <rdma/ib_umem.h>
39 #include <rdma/ib_user_verbs.h>
40 #include <rdma/uverbs_ioctl.h>
41 
42 #include <linux/sched.h>
43 #include <linux/slab.h>
44 #include <linux/stat.h>
45 #include <linux/mm.h>
46 #include <linux/export.h>
47 
48 #include "mthca_dev.h"
49 #include "mthca_cmd.h"
50 #include <rdma/mthca-abi.h>
51 #include "mthca_memfree.h"
52 
53 static int mthca_query_device(struct ib_device *ibdev, struct ib_device_attr *props,
54 			      struct ib_udata *uhw)
55 {
56 	struct ib_smp *in_mad;
57 	struct ib_smp *out_mad;
58 	int err = -ENOMEM;
59 	struct mthca_dev *mdev = to_mdev(ibdev);
60 
61 	if (uhw->inlen || uhw->outlen)
62 		return -EINVAL;
63 
64 	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
65 	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
66 	if (!in_mad || !out_mad)
67 		goto out;
68 
69 	memset(props, 0, sizeof *props);
70 
71 	props->fw_ver              = mdev->fw_ver;
72 
73 	ib_init_query_mad(in_mad);
74 	in_mad->attr_id = IB_SMP_ATTR_NODE_INFO;
75 
76 	err = mthca_MAD_IFC(mdev, 1, 1,
77 			    1, NULL, NULL, in_mad, out_mad);
78 	if (err)
79 		goto out;
80 
81 	props->device_cap_flags    = mdev->device_cap_flags;
82 	props->vendor_id           = be32_to_cpup((__be32 *) (out_mad->data + 36)) &
83 		0xffffff;
84 	props->vendor_part_id      = be16_to_cpup((__be16 *) (out_mad->data + 30));
85 	props->hw_ver              = be32_to_cpup((__be32 *) (out_mad->data + 32));
86 	memcpy(&props->sys_image_guid, out_mad->data +  4, 8);
87 
88 	props->max_mr_size         = ~0ull;
89 	props->page_size_cap       = mdev->limits.page_size_cap;
90 	props->max_qp              = mdev->limits.num_qps - mdev->limits.reserved_qps;
91 	props->max_qp_wr           = mdev->limits.max_wqes;
92 	props->max_send_sge        = mdev->limits.max_sg;
93 	props->max_recv_sge        = mdev->limits.max_sg;
94 	props->max_sge_rd          = mdev->limits.max_sg;
95 	props->max_cq              = mdev->limits.num_cqs - mdev->limits.reserved_cqs;
96 	props->max_cqe             = mdev->limits.max_cqes;
97 	props->max_mr              = mdev->limits.num_mpts - mdev->limits.reserved_mrws;
98 	props->max_pd              = mdev->limits.num_pds - mdev->limits.reserved_pds;
99 	props->max_qp_rd_atom      = 1 << mdev->qp_table.rdb_shift;
100 	props->max_qp_init_rd_atom = mdev->limits.max_qp_init_rdma;
101 	props->max_res_rd_atom     = props->max_qp_rd_atom * props->max_qp;
102 	props->max_srq             = mdev->limits.num_srqs - mdev->limits.reserved_srqs;
103 	props->max_srq_wr          = mdev->limits.max_srq_wqes;
104 	props->max_srq_sge         = mdev->limits.max_srq_sge;
105 	props->local_ca_ack_delay  = mdev->limits.local_ca_ack_delay;
106 	props->atomic_cap          = mdev->limits.flags & DEV_LIM_FLAG_ATOMIC ?
107 					IB_ATOMIC_HCA : IB_ATOMIC_NONE;
108 	props->max_pkeys           = mdev->limits.pkey_table_len;
109 	props->max_mcast_grp       = mdev->limits.num_mgms + mdev->limits.num_amgms;
110 	props->max_mcast_qp_attach = MTHCA_QP_PER_MGM;
111 	props->max_total_mcast_qp_attach = props->max_mcast_qp_attach *
112 					   props->max_mcast_grp;
113 
114 	err = 0;
115  out:
116 	kfree(in_mad);
117 	kfree(out_mad);
118 	return err;
119 }
120 
121 static int mthca_query_port(struct ib_device *ibdev,
122 			    u32 port, struct ib_port_attr *props)
123 {
124 	struct ib_smp *in_mad;
125 	struct ib_smp *out_mad;
126 	int err = -ENOMEM;
127 
128 	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
129 	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
130 	if (!in_mad || !out_mad)
131 		goto out;
132 
133 	/* props being zeroed by the caller, avoid zeroing it here */
134 
135 	ib_init_query_mad(in_mad);
136 	in_mad->attr_id  = IB_SMP_ATTR_PORT_INFO;
137 	in_mad->attr_mod = cpu_to_be32(port);
138 
139 	err = mthca_MAD_IFC(to_mdev(ibdev), 1, 1,
140 			    port, NULL, NULL, in_mad, out_mad);
141 	if (err)
142 		goto out;
143 
144 	props->lid               = be16_to_cpup((__be16 *) (out_mad->data + 16));
145 	props->lmc               = out_mad->data[34] & 0x7;
146 	props->sm_lid            = be16_to_cpup((__be16 *) (out_mad->data + 18));
147 	props->sm_sl             = out_mad->data[36] & 0xf;
148 	props->state             = out_mad->data[32] & 0xf;
149 	props->phys_state        = out_mad->data[33] >> 4;
150 	props->port_cap_flags    = be32_to_cpup((__be32 *) (out_mad->data + 20));
151 	props->gid_tbl_len       = to_mdev(ibdev)->limits.gid_table_len;
152 	props->max_msg_sz        = 0x80000000;
153 	props->pkey_tbl_len      = to_mdev(ibdev)->limits.pkey_table_len;
154 	props->bad_pkey_cntr     = be16_to_cpup((__be16 *) (out_mad->data + 46));
155 	props->qkey_viol_cntr    = be16_to_cpup((__be16 *) (out_mad->data + 48));
156 	props->active_width      = out_mad->data[31] & 0xf;
157 	props->active_speed      = out_mad->data[35] >> 4;
158 	props->max_mtu           = out_mad->data[41] & 0xf;
159 	props->active_mtu        = out_mad->data[36] >> 4;
160 	props->subnet_timeout    = out_mad->data[51] & 0x1f;
161 	props->max_vl_num        = out_mad->data[37] >> 4;
162 	props->init_type_reply   = out_mad->data[41] >> 4;
163 
164  out:
165 	kfree(in_mad);
166 	kfree(out_mad);
167 	return err;
168 }
169 
170 static int mthca_modify_device(struct ib_device *ibdev,
171 			       int mask,
172 			       struct ib_device_modify *props)
173 {
174 	if (mask & ~IB_DEVICE_MODIFY_NODE_DESC)
175 		return -EOPNOTSUPP;
176 
177 	if (mask & IB_DEVICE_MODIFY_NODE_DESC) {
178 		if (mutex_lock_interruptible(&to_mdev(ibdev)->cap_mask_mutex))
179 			return -ERESTARTSYS;
180 		memcpy(ibdev->node_desc, props->node_desc,
181 		       IB_DEVICE_NODE_DESC_MAX);
182 		mutex_unlock(&to_mdev(ibdev)->cap_mask_mutex);
183 	}
184 
185 	return 0;
186 }
187 
188 static int mthca_modify_port(struct ib_device *ibdev,
189 			     u32 port, int port_modify_mask,
190 			     struct ib_port_modify *props)
191 {
192 	struct mthca_set_ib_param set_ib;
193 	struct ib_port_attr attr;
194 	int err;
195 
196 	if (mutex_lock_interruptible(&to_mdev(ibdev)->cap_mask_mutex))
197 		return -ERESTARTSYS;
198 
199 	err = ib_query_port(ibdev, port, &attr);
200 	if (err)
201 		goto out;
202 
203 	set_ib.set_si_guid     = 0;
204 	set_ib.reset_qkey_viol = !!(port_modify_mask & IB_PORT_RESET_QKEY_CNTR);
205 
206 	set_ib.cap_mask = (attr.port_cap_flags | props->set_port_cap_mask) &
207 		~props->clr_port_cap_mask;
208 
209 	err = mthca_SET_IB(to_mdev(ibdev), &set_ib, port);
210 	if (err)
211 		goto out;
212 out:
213 	mutex_unlock(&to_mdev(ibdev)->cap_mask_mutex);
214 	return err;
215 }
216 
217 static int mthca_query_pkey(struct ib_device *ibdev,
218 			    u32 port, u16 index, u16 *pkey)
219 {
220 	struct ib_smp *in_mad;
221 	struct ib_smp *out_mad;
222 	int err = -ENOMEM;
223 
224 	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
225 	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
226 	if (!in_mad || !out_mad)
227 		goto out;
228 
229 	ib_init_query_mad(in_mad);
230 	in_mad->attr_id  = IB_SMP_ATTR_PKEY_TABLE;
231 	in_mad->attr_mod = cpu_to_be32(index / 32);
232 
233 	err = mthca_MAD_IFC(to_mdev(ibdev), 1, 1,
234 			    port, NULL, NULL, in_mad, out_mad);
235 	if (err)
236 		goto out;
237 
238 	*pkey = be16_to_cpu(((__be16 *) out_mad->data)[index % 32]);
239 
240  out:
241 	kfree(in_mad);
242 	kfree(out_mad);
243 	return err;
244 }
245 
246 static int mthca_query_gid(struct ib_device *ibdev, u32 port,
247 			   int index, union ib_gid *gid)
248 {
249 	struct ib_smp *in_mad;
250 	struct ib_smp *out_mad;
251 	int err = -ENOMEM;
252 
253 	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
254 	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
255 	if (!in_mad || !out_mad)
256 		goto out;
257 
258 	ib_init_query_mad(in_mad);
259 	in_mad->attr_id  = IB_SMP_ATTR_PORT_INFO;
260 	in_mad->attr_mod = cpu_to_be32(port);
261 
262 	err = mthca_MAD_IFC(to_mdev(ibdev), 1, 1,
263 			    port, NULL, NULL, in_mad, out_mad);
264 	if (err)
265 		goto out;
266 
267 	memcpy(gid->raw, out_mad->data + 8, 8);
268 
269 	ib_init_query_mad(in_mad);
270 	in_mad->attr_id  = IB_SMP_ATTR_GUID_INFO;
271 	in_mad->attr_mod = cpu_to_be32(index / 8);
272 
273 	err = mthca_MAD_IFC(to_mdev(ibdev), 1, 1,
274 			    port, NULL, NULL, in_mad, out_mad);
275 	if (err)
276 		goto out;
277 
278 	memcpy(gid->raw + 8, out_mad->data + (index % 8) * 8, 8);
279 
280  out:
281 	kfree(in_mad);
282 	kfree(out_mad);
283 	return err;
284 }
285 
286 static int mthca_alloc_ucontext(struct ib_ucontext *uctx,
287 				struct ib_udata *udata)
288 {
289 	struct ib_device *ibdev = uctx->device;
290 	struct mthca_alloc_ucontext_resp uresp = {};
291 	struct mthca_ucontext *context = to_mucontext(uctx);
292 	int                              err;
293 
294 	if (!(to_mdev(ibdev)->active))
295 		return -EAGAIN;
296 
297 	uresp.qp_tab_size = to_mdev(ibdev)->limits.num_qps;
298 	if (mthca_is_memfree(to_mdev(ibdev)))
299 		uresp.uarc_size = to_mdev(ibdev)->uar_table.uarc_size;
300 	else
301 		uresp.uarc_size = 0;
302 
303 	err = mthca_uar_alloc(to_mdev(ibdev), &context->uar);
304 	if (err)
305 		return err;
306 
307 	context->db_tab = mthca_init_user_db_tab(to_mdev(ibdev));
308 	if (IS_ERR(context->db_tab)) {
309 		err = PTR_ERR(context->db_tab);
310 		mthca_uar_free(to_mdev(ibdev), &context->uar);
311 		return err;
312 	}
313 
314 	if (ib_copy_to_udata(udata, &uresp, sizeof(uresp))) {
315 		mthca_cleanup_user_db_tab(to_mdev(ibdev), &context->uar, context->db_tab);
316 		mthca_uar_free(to_mdev(ibdev), &context->uar);
317 		return -EFAULT;
318 	}
319 
320 	context->reg_mr_warned = 0;
321 
322 	return 0;
323 }
324 
325 static void mthca_dealloc_ucontext(struct ib_ucontext *context)
326 {
327 	mthca_cleanup_user_db_tab(to_mdev(context->device), &to_mucontext(context)->uar,
328 				  to_mucontext(context)->db_tab);
329 	mthca_uar_free(to_mdev(context->device), &to_mucontext(context)->uar);
330 }
331 
332 static int mthca_mmap_uar(struct ib_ucontext *context,
333 			  struct vm_area_struct *vma)
334 {
335 	if (vma->vm_end - vma->vm_start != PAGE_SIZE)
336 		return -EINVAL;
337 
338 	vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
339 
340 	if (io_remap_pfn_range(vma, vma->vm_start,
341 			       to_mucontext(context)->uar.pfn,
342 			       PAGE_SIZE, vma->vm_page_prot))
343 		return -EAGAIN;
344 
345 	return 0;
346 }
347 
348 static int mthca_alloc_pd(struct ib_pd *ibpd, struct ib_udata *udata)
349 {
350 	struct ib_device *ibdev = ibpd->device;
351 	struct mthca_pd *pd = to_mpd(ibpd);
352 	int err;
353 
354 	err = mthca_pd_alloc(to_mdev(ibdev), !udata, pd);
355 	if (err)
356 		return err;
357 
358 	if (udata) {
359 		if (ib_copy_to_udata(udata, &pd->pd_num, sizeof (__u32))) {
360 			mthca_pd_free(to_mdev(ibdev), pd);
361 			return -EFAULT;
362 		}
363 	}
364 
365 	return 0;
366 }
367 
368 static int mthca_dealloc_pd(struct ib_pd *pd, struct ib_udata *udata)
369 {
370 	mthca_pd_free(to_mdev(pd->device), to_mpd(pd));
371 	return 0;
372 }
373 
374 static int mthca_ah_create(struct ib_ah *ibah,
375 			   struct rdma_ah_init_attr *init_attr,
376 			   struct ib_udata *udata)
377 
378 {
379 	struct mthca_ah *ah = to_mah(ibah);
380 
381 	return mthca_create_ah(to_mdev(ibah->device), to_mpd(ibah->pd),
382 			       init_attr->ah_attr, ah);
383 }
384 
385 static int mthca_ah_destroy(struct ib_ah *ah, u32 flags)
386 {
387 	mthca_destroy_ah(to_mdev(ah->device), to_mah(ah));
388 	return 0;
389 }
390 
391 static int mthca_create_srq(struct ib_srq *ibsrq,
392 			    struct ib_srq_init_attr *init_attr,
393 			    struct ib_udata *udata)
394 {
395 	struct mthca_create_srq ucmd;
396 	struct mthca_ucontext *context = rdma_udata_to_drv_context(
397 		udata, struct mthca_ucontext, ibucontext);
398 	struct mthca_srq *srq = to_msrq(ibsrq);
399 	int err;
400 
401 	if (init_attr->srq_type != IB_SRQT_BASIC)
402 		return -EOPNOTSUPP;
403 
404 	if (udata) {
405 		if (ib_copy_from_udata(&ucmd, udata, sizeof(ucmd)))
406 			return -EFAULT;
407 
408 		err = mthca_map_user_db(to_mdev(ibsrq->device), &context->uar,
409 					context->db_tab, ucmd.db_index,
410 					ucmd.db_page);
411 
412 		if (err)
413 			return err;
414 
415 		srq->mr.ibmr.lkey = ucmd.lkey;
416 		srq->db_index     = ucmd.db_index;
417 	}
418 
419 	err = mthca_alloc_srq(to_mdev(ibsrq->device), to_mpd(ibsrq->pd),
420 			      &init_attr->attr, srq, udata);
421 
422 	if (err && udata)
423 		mthca_unmap_user_db(to_mdev(ibsrq->device), &context->uar,
424 				    context->db_tab, ucmd.db_index);
425 
426 	if (err)
427 		return err;
428 
429 	if (context && ib_copy_to_udata(udata, &srq->srqn, sizeof(__u32))) {
430 		mthca_free_srq(to_mdev(ibsrq->device), srq);
431 		return -EFAULT;
432 	}
433 
434 	return 0;
435 }
436 
437 static int mthca_destroy_srq(struct ib_srq *srq, struct ib_udata *udata)
438 {
439 	if (udata) {
440 		struct mthca_ucontext *context =
441 			rdma_udata_to_drv_context(
442 				udata,
443 				struct mthca_ucontext,
444 				ibucontext);
445 
446 		mthca_unmap_user_db(to_mdev(srq->device), &context->uar,
447 				    context->db_tab, to_msrq(srq)->db_index);
448 	}
449 
450 	mthca_free_srq(to_mdev(srq->device), to_msrq(srq));
451 	return 0;
452 }
453 
454 static int mthca_create_qp(struct ib_qp *ibqp,
455 			   struct ib_qp_init_attr *init_attr,
456 			   struct ib_udata *udata)
457 {
458 	struct mthca_ucontext *context = rdma_udata_to_drv_context(
459 		udata, struct mthca_ucontext, ibucontext);
460 	struct mthca_create_qp ucmd;
461 	struct mthca_qp *qp = to_mqp(ibqp);
462 	struct mthca_dev *dev = to_mdev(ibqp->device);
463 	int err;
464 
465 	if (init_attr->create_flags)
466 		return -EOPNOTSUPP;
467 
468 	switch (init_attr->qp_type) {
469 	case IB_QPT_RC:
470 	case IB_QPT_UC:
471 	case IB_QPT_UD:
472 	{
473 		if (udata) {
474 			if (ib_copy_from_udata(&ucmd, udata, sizeof(ucmd)))
475 				return -EFAULT;
476 
477 			err = mthca_map_user_db(dev, &context->uar,
478 						context->db_tab,
479 						ucmd.sq_db_index,
480 						ucmd.sq_db_page);
481 			if (err)
482 				return err;
483 
484 			err = mthca_map_user_db(dev, &context->uar,
485 						context->db_tab,
486 						ucmd.rq_db_index,
487 						ucmd.rq_db_page);
488 			if (err) {
489 				mthca_unmap_user_db(dev, &context->uar,
490 						    context->db_tab,
491 						    ucmd.sq_db_index);
492 				return err;
493 			}
494 
495 			qp->mr.ibmr.lkey = ucmd.lkey;
496 			qp->sq.db_index  = ucmd.sq_db_index;
497 			qp->rq.db_index  = ucmd.rq_db_index;
498 		}
499 
500 		err = mthca_alloc_qp(dev, to_mpd(ibqp->pd),
501 				     to_mcq(init_attr->send_cq),
502 				     to_mcq(init_attr->recv_cq),
503 				     init_attr->qp_type, init_attr->sq_sig_type,
504 				     &init_attr->cap, qp, udata);
505 
506 		if (err && udata) {
507 			mthca_unmap_user_db(dev, &context->uar, context->db_tab,
508 					    ucmd.sq_db_index);
509 			mthca_unmap_user_db(dev, &context->uar, context->db_tab,
510 					    ucmd.rq_db_index);
511 		}
512 
513 		qp->ibqp.qp_num = qp->qpn;
514 		break;
515 	}
516 	case IB_QPT_SMI:
517 	case IB_QPT_GSI:
518 	{
519 		qp->sqp = kzalloc(sizeof(struct mthca_sqp), GFP_KERNEL);
520 		if (!qp->sqp)
521 			return -ENOMEM;
522 
523 		qp->ibqp.qp_num = init_attr->qp_type == IB_QPT_SMI ? 0 : 1;
524 
525 		err = mthca_alloc_sqp(dev, to_mpd(ibqp->pd),
526 				      to_mcq(init_attr->send_cq),
527 				      to_mcq(init_attr->recv_cq),
528 				      init_attr->sq_sig_type, &init_attr->cap,
529 				      qp->ibqp.qp_num, init_attr->port_num, qp,
530 				      udata);
531 		break;
532 	}
533 	default:
534 		/* Don't support raw QPs */
535 		return -EOPNOTSUPP;
536 	}
537 
538 	if (err) {
539 		kfree(qp->sqp);
540 		return err;
541 	}
542 
543 	init_attr->cap.max_send_wr     = qp->sq.max;
544 	init_attr->cap.max_recv_wr     = qp->rq.max;
545 	init_attr->cap.max_send_sge    = qp->sq.max_gs;
546 	init_attr->cap.max_recv_sge    = qp->rq.max_gs;
547 	init_attr->cap.max_inline_data = qp->max_inline_data;
548 
549 	return 0;
550 }
551 
552 static int mthca_destroy_qp(struct ib_qp *qp, struct ib_udata *udata)
553 {
554 	if (udata) {
555 		struct mthca_ucontext *context =
556 			rdma_udata_to_drv_context(
557 				udata,
558 				struct mthca_ucontext,
559 				ibucontext);
560 
561 		mthca_unmap_user_db(to_mdev(qp->device),
562 				    &context->uar,
563 				    context->db_tab,
564 				    to_mqp(qp)->sq.db_index);
565 		mthca_unmap_user_db(to_mdev(qp->device),
566 				    &context->uar,
567 				    context->db_tab,
568 				    to_mqp(qp)->rq.db_index);
569 	}
570 	mthca_free_qp(to_mdev(qp->device), to_mqp(qp));
571 	kfree(to_mqp(qp)->sqp);
572 	return 0;
573 }
574 
575 static int mthca_create_cq(struct ib_cq *ibcq,
576 			   const struct ib_cq_init_attr *attr,
577 			   struct uverbs_attr_bundle *attrs)
578 {
579 	struct ib_udata *udata = &attrs->driver_udata;
580 	struct ib_device *ibdev = ibcq->device;
581 	int entries = attr->cqe;
582 	struct mthca_create_cq ucmd;
583 	struct mthca_cq *cq;
584 	int nent;
585 	int err;
586 	struct mthca_ucontext *context = rdma_udata_to_drv_context(
587 		udata, struct mthca_ucontext, ibucontext);
588 
589 	if (attr->flags)
590 		return -EOPNOTSUPP;
591 
592 	if (entries < 1 || entries > to_mdev(ibdev)->limits.max_cqes)
593 		return -EINVAL;
594 
595 	if (udata) {
596 		if (ib_copy_from_udata(&ucmd, udata, sizeof(ucmd)))
597 			return -EFAULT;
598 
599 		err = mthca_map_user_db(to_mdev(ibdev), &context->uar,
600 					context->db_tab, ucmd.set_db_index,
601 					ucmd.set_db_page);
602 		if (err)
603 			return err;
604 
605 		err = mthca_map_user_db(to_mdev(ibdev), &context->uar,
606 					context->db_tab, ucmd.arm_db_index,
607 					ucmd.arm_db_page);
608 		if (err)
609 			goto err_unmap_set;
610 	}
611 
612 	cq = to_mcq(ibcq);
613 
614 	if (udata) {
615 		cq->buf.mr.ibmr.lkey = ucmd.lkey;
616 		cq->set_ci_db_index  = ucmd.set_db_index;
617 		cq->arm_db_index     = ucmd.arm_db_index;
618 	}
619 
620 	for (nent = 1; nent <= entries; nent <<= 1)
621 		; /* nothing */
622 
623 	err = mthca_init_cq(to_mdev(ibdev), nent, context,
624 			    udata ? ucmd.pdn : to_mdev(ibdev)->driver_pd.pd_num,
625 			    cq);
626 	if (err)
627 		goto err_unmap_arm;
628 
629 	if (udata && ib_copy_to_udata(udata, &cq->cqn, sizeof(__u32))) {
630 		mthca_free_cq(to_mdev(ibdev), cq);
631 		err = -EFAULT;
632 		goto err_unmap_arm;
633 	}
634 
635 	cq->resize_buf = NULL;
636 
637 	return 0;
638 
639 err_unmap_arm:
640 	if (udata)
641 		mthca_unmap_user_db(to_mdev(ibdev), &context->uar,
642 				    context->db_tab, ucmd.arm_db_index);
643 
644 err_unmap_set:
645 	if (udata)
646 		mthca_unmap_user_db(to_mdev(ibdev), &context->uar,
647 				    context->db_tab, ucmd.set_db_index);
648 
649 	return err;
650 }
651 
652 static int mthca_alloc_resize_buf(struct mthca_dev *dev, struct mthca_cq *cq,
653 				  int entries)
654 {
655 	int ret;
656 
657 	spin_lock_irq(&cq->lock);
658 	if (cq->resize_buf) {
659 		ret = -EBUSY;
660 		goto unlock;
661 	}
662 
663 	cq->resize_buf = kmalloc(sizeof *cq->resize_buf, GFP_ATOMIC);
664 	if (!cq->resize_buf) {
665 		ret = -ENOMEM;
666 		goto unlock;
667 	}
668 
669 	cq->resize_buf->state = CQ_RESIZE_ALLOC;
670 
671 	ret = 0;
672 
673 unlock:
674 	spin_unlock_irq(&cq->lock);
675 
676 	if (ret)
677 		return ret;
678 
679 	ret = mthca_alloc_cq_buf(dev, &cq->resize_buf->buf, entries);
680 	if (ret) {
681 		spin_lock_irq(&cq->lock);
682 		kfree(cq->resize_buf);
683 		cq->resize_buf = NULL;
684 		spin_unlock_irq(&cq->lock);
685 		return ret;
686 	}
687 
688 	cq->resize_buf->cqe = entries - 1;
689 
690 	spin_lock_irq(&cq->lock);
691 	cq->resize_buf->state = CQ_RESIZE_READY;
692 	spin_unlock_irq(&cq->lock);
693 
694 	return 0;
695 }
696 
697 static int mthca_resize_cq(struct ib_cq *ibcq, int entries, struct ib_udata *udata)
698 {
699 	struct mthca_dev *dev = to_mdev(ibcq->device);
700 	struct mthca_cq *cq = to_mcq(ibcq);
701 	struct mthca_resize_cq ucmd;
702 	u32 lkey;
703 	int ret;
704 
705 	if (entries < 1 || entries > dev->limits.max_cqes)
706 		return -EINVAL;
707 
708 	mutex_lock(&cq->mutex);
709 
710 	entries = roundup_pow_of_two(entries + 1);
711 	if (entries == ibcq->cqe + 1) {
712 		ret = 0;
713 		goto out;
714 	}
715 
716 	if (cq->is_kernel) {
717 		ret = mthca_alloc_resize_buf(dev, cq, entries);
718 		if (ret)
719 			goto out;
720 		lkey = cq->resize_buf->buf.mr.ibmr.lkey;
721 	} else {
722 		if (ib_copy_from_udata(&ucmd, udata, sizeof ucmd)) {
723 			ret = -EFAULT;
724 			goto out;
725 		}
726 		lkey = ucmd.lkey;
727 	}
728 
729 	ret = mthca_RESIZE_CQ(dev, cq->cqn, lkey, ilog2(entries));
730 
731 	if (ret) {
732 		if (cq->resize_buf) {
733 			mthca_free_cq_buf(dev, &cq->resize_buf->buf,
734 					  cq->resize_buf->cqe);
735 			kfree(cq->resize_buf);
736 			spin_lock_irq(&cq->lock);
737 			cq->resize_buf = NULL;
738 			spin_unlock_irq(&cq->lock);
739 		}
740 		goto out;
741 	}
742 
743 	if (cq->is_kernel) {
744 		struct mthca_cq_buf tbuf;
745 		int tcqe;
746 
747 		spin_lock_irq(&cq->lock);
748 		if (cq->resize_buf->state == CQ_RESIZE_READY) {
749 			mthca_cq_resize_copy_cqes(cq);
750 			tbuf         = cq->buf;
751 			tcqe         = cq->ibcq.cqe;
752 			cq->buf      = cq->resize_buf->buf;
753 			cq->ibcq.cqe = cq->resize_buf->cqe;
754 		} else {
755 			tbuf = cq->resize_buf->buf;
756 			tcqe = cq->resize_buf->cqe;
757 		}
758 
759 		kfree(cq->resize_buf);
760 		cq->resize_buf = NULL;
761 		spin_unlock_irq(&cq->lock);
762 
763 		mthca_free_cq_buf(dev, &tbuf, tcqe);
764 	} else
765 		ibcq->cqe = entries - 1;
766 
767 out:
768 	mutex_unlock(&cq->mutex);
769 
770 	return ret;
771 }
772 
773 static int mthca_destroy_cq(struct ib_cq *cq, struct ib_udata *udata)
774 {
775 	if (udata) {
776 		struct mthca_ucontext *context =
777 			rdma_udata_to_drv_context(
778 				udata,
779 				struct mthca_ucontext,
780 				ibucontext);
781 
782 		mthca_unmap_user_db(to_mdev(cq->device),
783 				    &context->uar,
784 				    context->db_tab,
785 				    to_mcq(cq)->arm_db_index);
786 		mthca_unmap_user_db(to_mdev(cq->device),
787 				    &context->uar,
788 				    context->db_tab,
789 				    to_mcq(cq)->set_ci_db_index);
790 	}
791 	mthca_free_cq(to_mdev(cq->device), to_mcq(cq));
792 	return 0;
793 }
794 
795 static inline u32 convert_access(int acc)
796 {
797 	return (acc & IB_ACCESS_REMOTE_ATOMIC ? MTHCA_MPT_FLAG_ATOMIC       : 0) |
798 	       (acc & IB_ACCESS_REMOTE_WRITE  ? MTHCA_MPT_FLAG_REMOTE_WRITE : 0) |
799 	       (acc & IB_ACCESS_REMOTE_READ   ? MTHCA_MPT_FLAG_REMOTE_READ  : 0) |
800 	       (acc & IB_ACCESS_LOCAL_WRITE   ? MTHCA_MPT_FLAG_LOCAL_WRITE  : 0) |
801 	       MTHCA_MPT_FLAG_LOCAL_READ;
802 }
803 
804 static struct ib_mr *mthca_get_dma_mr(struct ib_pd *pd, int acc)
805 {
806 	struct mthca_mr *mr;
807 	int err;
808 
809 	mr = kmalloc(sizeof *mr, GFP_KERNEL);
810 	if (!mr)
811 		return ERR_PTR(-ENOMEM);
812 
813 	err = mthca_mr_alloc_notrans(to_mdev(pd->device),
814 				     to_mpd(pd)->pd_num,
815 				     convert_access(acc), mr);
816 
817 	if (err) {
818 		kfree(mr);
819 		return ERR_PTR(err);
820 	}
821 
822 	mr->umem = NULL;
823 
824 	return &mr->ibmr;
825 }
826 
827 static struct ib_mr *mthca_reg_user_mr(struct ib_pd *pd, u64 start, u64 length,
828 				       u64 virt, int acc, struct ib_udata *udata)
829 {
830 	struct mthca_dev *dev = to_mdev(pd->device);
831 	struct ib_block_iter biter;
832 	struct mthca_ucontext *context = rdma_udata_to_drv_context(
833 		udata, struct mthca_ucontext, ibucontext);
834 	struct mthca_mr *mr;
835 	struct mthca_reg_mr ucmd;
836 	u64 *pages;
837 	int n, i;
838 	int err = 0;
839 	int write_mtt_size;
840 
841 	if (udata->inlen < sizeof ucmd) {
842 		if (!context->reg_mr_warned) {
843 			mthca_warn(dev, "Process '%s' did not pass in MR attrs.\n",
844 				   current->comm);
845 			mthca_warn(dev, "  Update libmthca to fix this.\n");
846 		}
847 		++context->reg_mr_warned;
848 		ucmd.mr_attrs = 0;
849 	} else if (ib_copy_from_udata(&ucmd, udata, sizeof ucmd))
850 		return ERR_PTR(-EFAULT);
851 
852 	mr = kmalloc(sizeof *mr, GFP_KERNEL);
853 	if (!mr)
854 		return ERR_PTR(-ENOMEM);
855 
856 	mr->umem = ib_umem_get(pd->device, start, length, acc);
857 	if (IS_ERR(mr->umem)) {
858 		err = PTR_ERR(mr->umem);
859 		goto err;
860 	}
861 
862 	n = ib_umem_num_dma_blocks(mr->umem, PAGE_SIZE);
863 
864 	mr->mtt = mthca_alloc_mtt(dev, n);
865 	if (IS_ERR(mr->mtt)) {
866 		err = PTR_ERR(mr->mtt);
867 		goto err_umem;
868 	}
869 
870 	pages = (u64 *) __get_free_page(GFP_KERNEL);
871 	if (!pages) {
872 		err = -ENOMEM;
873 		goto err_mtt;
874 	}
875 
876 	i = n = 0;
877 
878 	write_mtt_size = min(mthca_write_mtt_size(dev), (int) (PAGE_SIZE / sizeof *pages));
879 
880 	rdma_umem_for_each_dma_block(mr->umem, &biter, PAGE_SIZE) {
881 		pages[i++] = rdma_block_iter_dma_address(&biter);
882 
883 		/*
884 		 * Be friendly to write_mtt and pass it chunks
885 		 * of appropriate size.
886 		 */
887 		if (i == write_mtt_size) {
888 			err = mthca_write_mtt(dev, mr->mtt, n, pages, i);
889 			if (err)
890 				goto mtt_done;
891 			n += i;
892 			i = 0;
893 		}
894 	}
895 
896 	if (i)
897 		err = mthca_write_mtt(dev, mr->mtt, n, pages, i);
898 mtt_done:
899 	free_page((unsigned long) pages);
900 	if (err)
901 		goto err_mtt;
902 
903 	err = mthca_mr_alloc(dev, to_mpd(pd)->pd_num, PAGE_SHIFT, virt, length,
904 			     convert_access(acc), mr);
905 
906 	if (err)
907 		goto err_mtt;
908 
909 	return &mr->ibmr;
910 
911 err_mtt:
912 	mthca_free_mtt(dev, mr->mtt);
913 
914 err_umem:
915 	ib_umem_release(mr->umem);
916 
917 err:
918 	kfree(mr);
919 	return ERR_PTR(err);
920 }
921 
922 static int mthca_dereg_mr(struct ib_mr *mr, struct ib_udata *udata)
923 {
924 	struct mthca_mr *mmr = to_mmr(mr);
925 
926 	mthca_free_mr(to_mdev(mr->device), mmr);
927 	ib_umem_release(mmr->umem);
928 	kfree(mmr);
929 
930 	return 0;
931 }
932 
933 static ssize_t hw_rev_show(struct device *device,
934 			   struct device_attribute *attr, char *buf)
935 {
936 	struct mthca_dev *dev =
937 		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
938 
939 	return sysfs_emit(buf, "%x\n", dev->rev_id);
940 }
941 static DEVICE_ATTR_RO(hw_rev);
942 
943 static const char *hca_type_string(int hca_type)
944 {
945 	switch (hca_type) {
946 	case PCI_DEVICE_ID_MELLANOX_TAVOR:
947 		return "MT23108";
948 	case PCI_DEVICE_ID_MELLANOX_ARBEL_COMPAT:
949 		return "MT25208 (MT23108 compat mode)";
950 	case PCI_DEVICE_ID_MELLANOX_ARBEL:
951 		return "MT25208";
952 	case PCI_DEVICE_ID_MELLANOX_SINAI:
953 	case PCI_DEVICE_ID_MELLANOX_SINAI_OLD:
954 		return "MT25204";
955 	}
956 
957 	return "unknown";
958 }
959 
960 static ssize_t hca_type_show(struct device *device,
961 			     struct device_attribute *attr, char *buf)
962 {
963 	struct mthca_dev *dev =
964 		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
965 
966 	return sysfs_emit(buf, "%s\n", hca_type_string(dev->pdev->device));
967 }
968 static DEVICE_ATTR_RO(hca_type);
969 
970 static ssize_t board_id_show(struct device *device,
971 			     struct device_attribute *attr, char *buf)
972 {
973 	struct mthca_dev *dev =
974 		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
975 
976 	return sysfs_emit(buf, "%.*s\n", MTHCA_BOARD_ID_LEN, dev->board_id);
977 }
978 static DEVICE_ATTR_RO(board_id);
979 
980 static struct attribute *mthca_dev_attributes[] = {
981 	&dev_attr_hw_rev.attr,
982 	&dev_attr_hca_type.attr,
983 	&dev_attr_board_id.attr,
984 	NULL
985 };
986 
987 static const struct attribute_group mthca_attr_group = {
988 	.attrs = mthca_dev_attributes,
989 };
990 
991 static int mthca_init_node_data(struct mthca_dev *dev)
992 {
993 	struct ib_smp *in_mad;
994 	struct ib_smp *out_mad;
995 	int err = -ENOMEM;
996 
997 	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
998 	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
999 	if (!in_mad || !out_mad)
1000 		goto out;
1001 
1002 	ib_init_query_mad(in_mad);
1003 	in_mad->attr_id = IB_SMP_ATTR_NODE_DESC;
1004 
1005 	err = mthca_MAD_IFC(dev, 1, 1,
1006 			    1, NULL, NULL, in_mad, out_mad);
1007 	if (err)
1008 		goto out;
1009 
1010 	memcpy(dev->ib_dev.node_desc, out_mad->data, IB_DEVICE_NODE_DESC_MAX);
1011 
1012 	in_mad->attr_id = IB_SMP_ATTR_NODE_INFO;
1013 
1014 	err = mthca_MAD_IFC(dev, 1, 1,
1015 			    1, NULL, NULL, in_mad, out_mad);
1016 	if (err)
1017 		goto out;
1018 
1019 	if (mthca_is_memfree(dev))
1020 		dev->rev_id = be32_to_cpup((__be32 *) (out_mad->data + 32));
1021 	memcpy(&dev->ib_dev.node_guid, out_mad->data + 12, 8);
1022 
1023 out:
1024 	kfree(in_mad);
1025 	kfree(out_mad);
1026 	return err;
1027 }
1028 
1029 static int mthca_port_immutable(struct ib_device *ibdev, u32 port_num,
1030 			        struct ib_port_immutable *immutable)
1031 {
1032 	struct ib_port_attr attr;
1033 	int err;
1034 
1035 	immutable->core_cap_flags = RDMA_CORE_PORT_IBA_IB;
1036 
1037 	err = ib_query_port(ibdev, port_num, &attr);
1038 	if (err)
1039 		return err;
1040 
1041 	immutable->pkey_tbl_len = attr.pkey_tbl_len;
1042 	immutable->gid_tbl_len = attr.gid_tbl_len;
1043 	immutable->max_mad_size = IB_MGMT_MAD_SIZE;
1044 
1045 	return 0;
1046 }
1047 
1048 static void get_dev_fw_str(struct ib_device *device, char *str)
1049 {
1050 	struct mthca_dev *dev =
1051 		container_of(device, struct mthca_dev, ib_dev);
1052 	snprintf(str, IB_FW_VERSION_NAME_MAX, "%d.%d.%d",
1053 		 (int) (dev->fw_ver >> 32),
1054 		 (int) (dev->fw_ver >> 16) & 0xffff,
1055 		 (int) dev->fw_ver & 0xffff);
1056 }
1057 
1058 static const struct ib_device_ops mthca_dev_ops = {
1059 	.owner = THIS_MODULE,
1060 	.driver_id = RDMA_DRIVER_MTHCA,
1061 	.uverbs_abi_ver = MTHCA_UVERBS_ABI_VERSION,
1062 	.uverbs_no_driver_id_binding = 1,
1063 
1064 	.alloc_pd = mthca_alloc_pd,
1065 	.alloc_ucontext = mthca_alloc_ucontext,
1066 	.attach_mcast = mthca_multicast_attach,
1067 	.create_ah = mthca_ah_create,
1068 	.create_cq = mthca_create_cq,
1069 	.create_qp = mthca_create_qp,
1070 	.dealloc_pd = mthca_dealloc_pd,
1071 	.dealloc_ucontext = mthca_dealloc_ucontext,
1072 	.dereg_mr = mthca_dereg_mr,
1073 	.destroy_ah = mthca_ah_destroy,
1074 	.destroy_cq = mthca_destroy_cq,
1075 	.destroy_qp = mthca_destroy_qp,
1076 	.detach_mcast = mthca_multicast_detach,
1077 	.device_group = &mthca_attr_group,
1078 	.get_dev_fw_str = get_dev_fw_str,
1079 	.get_dma_mr = mthca_get_dma_mr,
1080 	.get_port_immutable = mthca_port_immutable,
1081 	.mmap = mthca_mmap_uar,
1082 	.modify_device = mthca_modify_device,
1083 	.modify_port = mthca_modify_port,
1084 	.modify_qp = mthca_modify_qp,
1085 	.poll_cq = mthca_poll_cq,
1086 	.process_mad = mthca_process_mad,
1087 	.query_ah = mthca_ah_query,
1088 	.query_device = mthca_query_device,
1089 	.query_gid = mthca_query_gid,
1090 	.query_pkey = mthca_query_pkey,
1091 	.query_port = mthca_query_port,
1092 	.query_qp = mthca_query_qp,
1093 	.reg_user_mr = mthca_reg_user_mr,
1094 	.resize_cq = mthca_resize_cq,
1095 
1096 	INIT_RDMA_OBJ_SIZE(ib_ah, mthca_ah, ibah),
1097 	INIT_RDMA_OBJ_SIZE(ib_cq, mthca_cq, ibcq),
1098 	INIT_RDMA_OBJ_SIZE(ib_pd, mthca_pd, ibpd),
1099 	INIT_RDMA_OBJ_SIZE(ib_qp, mthca_qp, ibqp),
1100 	INIT_RDMA_OBJ_SIZE(ib_ucontext, mthca_ucontext, ibucontext),
1101 };
1102 
1103 static const struct ib_device_ops mthca_dev_arbel_srq_ops = {
1104 	.create_srq = mthca_create_srq,
1105 	.destroy_srq = mthca_destroy_srq,
1106 	.modify_srq = mthca_modify_srq,
1107 	.post_srq_recv = mthca_arbel_post_srq_recv,
1108 	.query_srq = mthca_query_srq,
1109 
1110 	INIT_RDMA_OBJ_SIZE(ib_srq, mthca_srq, ibsrq),
1111 };
1112 
1113 static const struct ib_device_ops mthca_dev_tavor_srq_ops = {
1114 	.create_srq = mthca_create_srq,
1115 	.destroy_srq = mthca_destroy_srq,
1116 	.modify_srq = mthca_modify_srq,
1117 	.post_srq_recv = mthca_tavor_post_srq_recv,
1118 	.query_srq = mthca_query_srq,
1119 
1120 	INIT_RDMA_OBJ_SIZE(ib_srq, mthca_srq, ibsrq),
1121 };
1122 
1123 static const struct ib_device_ops mthca_dev_arbel_ops = {
1124 	.post_recv = mthca_arbel_post_receive,
1125 	.post_send = mthca_arbel_post_send,
1126 	.req_notify_cq = mthca_arbel_arm_cq,
1127 };
1128 
1129 static const struct ib_device_ops mthca_dev_tavor_ops = {
1130 	.post_recv = mthca_tavor_post_receive,
1131 	.post_send = mthca_tavor_post_send,
1132 	.req_notify_cq = mthca_tavor_arm_cq,
1133 };
1134 
1135 int mthca_register_device(struct mthca_dev *dev)
1136 {
1137 	int ret;
1138 
1139 	ret = mthca_init_node_data(dev);
1140 	if (ret)
1141 		return ret;
1142 
1143 	dev->ib_dev.node_type            = RDMA_NODE_IB_CA;
1144 	dev->ib_dev.phys_port_cnt        = dev->limits.num_ports;
1145 	dev->ib_dev.num_comp_vectors     = 1;
1146 	dev->ib_dev.dev.parent           = &dev->pdev->dev;
1147 
1148 	if (dev->mthca_flags & MTHCA_FLAG_SRQ) {
1149 		if (mthca_is_memfree(dev))
1150 			ib_set_device_ops(&dev->ib_dev,
1151 					  &mthca_dev_arbel_srq_ops);
1152 		else
1153 			ib_set_device_ops(&dev->ib_dev,
1154 					  &mthca_dev_tavor_srq_ops);
1155 	}
1156 
1157 	ib_set_device_ops(&dev->ib_dev, &mthca_dev_ops);
1158 
1159 	if (mthca_is_memfree(dev))
1160 		ib_set_device_ops(&dev->ib_dev, &mthca_dev_arbel_ops);
1161 	else
1162 		ib_set_device_ops(&dev->ib_dev, &mthca_dev_tavor_ops);
1163 
1164 	mutex_init(&dev->cap_mask_mutex);
1165 
1166 	ret = ib_register_device(&dev->ib_dev, "mthca%d", &dev->pdev->dev);
1167 	if (ret)
1168 		return ret;
1169 
1170 	mthca_start_catas_poll(dev);
1171 
1172 	return 0;
1173 }
1174 
1175 void mthca_unregister_device(struct mthca_dev *dev)
1176 {
1177 	mthca_stop_catas_poll(dev);
1178 	ib_unregister_device(&dev->ib_dev);
1179 }
1180