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
53static 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
121static 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
170static 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
188static 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;
212out:
213	mutex_unlock(&to_mdev(ibdev)->cap_mask_mutex);
214	return err;
215}
216
217static 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
246static 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
286static 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
325static 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
332static 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
348static 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
368static 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
374static 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
385static 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
391static 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
437static 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
454static 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
552static 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
575static int mthca_create_cq(struct ib_cq *ibcq,
576			   const struct ib_cq_init_attr *attr,
577			   struct ib_udata *udata)
578{
579	struct ib_device *ibdev = ibcq->device;
580	int entries = attr->cqe;
581	struct mthca_create_cq ucmd;
582	struct mthca_cq *cq;
583	int nent;
584	int err;
585	struct mthca_ucontext *context = rdma_udata_to_drv_context(
586		udata, struct mthca_ucontext, ibucontext);
587
588	if (attr->flags)
589		return -EOPNOTSUPP;
590
591	if (entries < 1 || entries > to_mdev(ibdev)->limits.max_cqes)
592		return -EINVAL;
593
594	if (udata) {
595		if (ib_copy_from_udata(&ucmd, udata, sizeof(ucmd)))
596			return -EFAULT;
597
598		err = mthca_map_user_db(to_mdev(ibdev), &context->uar,
599					context->db_tab, ucmd.set_db_index,
600					ucmd.set_db_page);
601		if (err)
602			return err;
603
604		err = mthca_map_user_db(to_mdev(ibdev), &context->uar,
605					context->db_tab, ucmd.arm_db_index,
606					ucmd.arm_db_page);
607		if (err)
608			goto err_unmap_set;
609	}
610
611	cq = to_mcq(ibcq);
612
613	if (udata) {
614		cq->buf.mr.ibmr.lkey = ucmd.lkey;
615		cq->set_ci_db_index  = ucmd.set_db_index;
616		cq->arm_db_index     = ucmd.arm_db_index;
617	}
618
619	for (nent = 1; nent <= entries; nent <<= 1)
620		; /* nothing */
621
622	err = mthca_init_cq(to_mdev(ibdev), nent, context,
623			    udata ? ucmd.pdn : to_mdev(ibdev)->driver_pd.pd_num,
624			    cq);
625	if (err)
626		goto err_unmap_arm;
627
628	if (udata && ib_copy_to_udata(udata, &cq->cqn, sizeof(__u32))) {
629		mthca_free_cq(to_mdev(ibdev), cq);
630		err = -EFAULT;
631		goto err_unmap_arm;
632	}
633
634	cq->resize_buf = NULL;
635
636	return 0;
637
638err_unmap_arm:
639	if (udata)
640		mthca_unmap_user_db(to_mdev(ibdev), &context->uar,
641				    context->db_tab, ucmd.arm_db_index);
642
643err_unmap_set:
644	if (udata)
645		mthca_unmap_user_db(to_mdev(ibdev), &context->uar,
646				    context->db_tab, ucmd.set_db_index);
647
648	return err;
649}
650
651static int mthca_alloc_resize_buf(struct mthca_dev *dev, struct mthca_cq *cq,
652				  int entries)
653{
654	int ret;
655
656	spin_lock_irq(&cq->lock);
657	if (cq->resize_buf) {
658		ret = -EBUSY;
659		goto unlock;
660	}
661
662	cq->resize_buf = kmalloc(sizeof *cq->resize_buf, GFP_ATOMIC);
663	if (!cq->resize_buf) {
664		ret = -ENOMEM;
665		goto unlock;
666	}
667
668	cq->resize_buf->state = CQ_RESIZE_ALLOC;
669
670	ret = 0;
671
672unlock:
673	spin_unlock_irq(&cq->lock);
674
675	if (ret)
676		return ret;
677
678	ret = mthca_alloc_cq_buf(dev, &cq->resize_buf->buf, entries);
679	if (ret) {
680		spin_lock_irq(&cq->lock);
681		kfree(cq->resize_buf);
682		cq->resize_buf = NULL;
683		spin_unlock_irq(&cq->lock);
684		return ret;
685	}
686
687	cq->resize_buf->cqe = entries - 1;
688
689	spin_lock_irq(&cq->lock);
690	cq->resize_buf->state = CQ_RESIZE_READY;
691	spin_unlock_irq(&cq->lock);
692
693	return 0;
694}
695
696static int mthca_resize_cq(struct ib_cq *ibcq, int entries, struct ib_udata *udata)
697{
698	struct mthca_dev *dev = to_mdev(ibcq->device);
699	struct mthca_cq *cq = to_mcq(ibcq);
700	struct mthca_resize_cq ucmd;
701	u32 lkey;
702	int ret;
703
704	if (entries < 1 || entries > dev->limits.max_cqes)
705		return -EINVAL;
706
707	mutex_lock(&cq->mutex);
708
709	entries = roundup_pow_of_two(entries + 1);
710	if (entries == ibcq->cqe + 1) {
711		ret = 0;
712		goto out;
713	}
714
715	if (cq->is_kernel) {
716		ret = mthca_alloc_resize_buf(dev, cq, entries);
717		if (ret)
718			goto out;
719		lkey = cq->resize_buf->buf.mr.ibmr.lkey;
720	} else {
721		if (ib_copy_from_udata(&ucmd, udata, sizeof ucmd)) {
722			ret = -EFAULT;
723			goto out;
724		}
725		lkey = ucmd.lkey;
726	}
727
728	ret = mthca_RESIZE_CQ(dev, cq->cqn, lkey, ilog2(entries));
729
730	if (ret) {
731		if (cq->resize_buf) {
732			mthca_free_cq_buf(dev, &cq->resize_buf->buf,
733					  cq->resize_buf->cqe);
734			kfree(cq->resize_buf);
735			spin_lock_irq(&cq->lock);
736			cq->resize_buf = NULL;
737			spin_unlock_irq(&cq->lock);
738		}
739		goto out;
740	}
741
742	if (cq->is_kernel) {
743		struct mthca_cq_buf tbuf;
744		int tcqe;
745
746		spin_lock_irq(&cq->lock);
747		if (cq->resize_buf->state == CQ_RESIZE_READY) {
748			mthca_cq_resize_copy_cqes(cq);
749			tbuf         = cq->buf;
750			tcqe         = cq->ibcq.cqe;
751			cq->buf      = cq->resize_buf->buf;
752			cq->ibcq.cqe = cq->resize_buf->cqe;
753		} else {
754			tbuf = cq->resize_buf->buf;
755			tcqe = cq->resize_buf->cqe;
756		}
757
758		kfree(cq->resize_buf);
759		cq->resize_buf = NULL;
760		spin_unlock_irq(&cq->lock);
761
762		mthca_free_cq_buf(dev, &tbuf, tcqe);
763	} else
764		ibcq->cqe = entries - 1;
765
766out:
767	mutex_unlock(&cq->mutex);
768
769	return ret;
770}
771
772static int mthca_destroy_cq(struct ib_cq *cq, struct ib_udata *udata)
773{
774	if (udata) {
775		struct mthca_ucontext *context =
776			rdma_udata_to_drv_context(
777				udata,
778				struct mthca_ucontext,
779				ibucontext);
780
781		mthca_unmap_user_db(to_mdev(cq->device),
782				    &context->uar,
783				    context->db_tab,
784				    to_mcq(cq)->arm_db_index);
785		mthca_unmap_user_db(to_mdev(cq->device),
786				    &context->uar,
787				    context->db_tab,
788				    to_mcq(cq)->set_ci_db_index);
789	}
790	mthca_free_cq(to_mdev(cq->device), to_mcq(cq));
791	return 0;
792}
793
794static inline u32 convert_access(int acc)
795{
796	return (acc & IB_ACCESS_REMOTE_ATOMIC ? MTHCA_MPT_FLAG_ATOMIC       : 0) |
797	       (acc & IB_ACCESS_REMOTE_WRITE  ? MTHCA_MPT_FLAG_REMOTE_WRITE : 0) |
798	       (acc & IB_ACCESS_REMOTE_READ   ? MTHCA_MPT_FLAG_REMOTE_READ  : 0) |
799	       (acc & IB_ACCESS_LOCAL_WRITE   ? MTHCA_MPT_FLAG_LOCAL_WRITE  : 0) |
800	       MTHCA_MPT_FLAG_LOCAL_READ;
801}
802
803static struct ib_mr *mthca_get_dma_mr(struct ib_pd *pd, int acc)
804{
805	struct mthca_mr *mr;
806	int err;
807
808	mr = kmalloc(sizeof *mr, GFP_KERNEL);
809	if (!mr)
810		return ERR_PTR(-ENOMEM);
811
812	err = mthca_mr_alloc_notrans(to_mdev(pd->device),
813				     to_mpd(pd)->pd_num,
814				     convert_access(acc), mr);
815
816	if (err) {
817		kfree(mr);
818		return ERR_PTR(err);
819	}
820
821	mr->umem = NULL;
822
823	return &mr->ibmr;
824}
825
826static struct ib_mr *mthca_reg_user_mr(struct ib_pd *pd, u64 start, u64 length,
827				       u64 virt, int acc, struct ib_udata *udata)
828{
829	struct mthca_dev *dev = to_mdev(pd->device);
830	struct ib_block_iter biter;
831	struct mthca_ucontext *context = rdma_udata_to_drv_context(
832		udata, struct mthca_ucontext, ibucontext);
833	struct mthca_mr *mr;
834	struct mthca_reg_mr ucmd;
835	u64 *pages;
836	int n, i;
837	int err = 0;
838	int write_mtt_size;
839
840	if (udata->inlen < sizeof ucmd) {
841		if (!context->reg_mr_warned) {
842			mthca_warn(dev, "Process '%s' did not pass in MR attrs.\n",
843				   current->comm);
844			mthca_warn(dev, "  Update libmthca to fix this.\n");
845		}
846		++context->reg_mr_warned;
847		ucmd.mr_attrs = 0;
848	} else if (ib_copy_from_udata(&ucmd, udata, sizeof ucmd))
849		return ERR_PTR(-EFAULT);
850
851	mr = kmalloc(sizeof *mr, GFP_KERNEL);
852	if (!mr)
853		return ERR_PTR(-ENOMEM);
854
855	mr->umem = ib_umem_get(pd->device, start, length, acc);
856	if (IS_ERR(mr->umem)) {
857		err = PTR_ERR(mr->umem);
858		goto err;
859	}
860
861	n = ib_umem_num_dma_blocks(mr->umem, PAGE_SIZE);
862
863	mr->mtt = mthca_alloc_mtt(dev, n);
864	if (IS_ERR(mr->mtt)) {
865		err = PTR_ERR(mr->mtt);
866		goto err_umem;
867	}
868
869	pages = (u64 *) __get_free_page(GFP_KERNEL);
870	if (!pages) {
871		err = -ENOMEM;
872		goto err_mtt;
873	}
874
875	i = n = 0;
876
877	write_mtt_size = min(mthca_write_mtt_size(dev), (int) (PAGE_SIZE / sizeof *pages));
878
879	rdma_umem_for_each_dma_block(mr->umem, &biter, PAGE_SIZE) {
880		pages[i++] = rdma_block_iter_dma_address(&biter);
881
882		/*
883		 * Be friendly to write_mtt and pass it chunks
884		 * of appropriate size.
885		 */
886		if (i == write_mtt_size) {
887			err = mthca_write_mtt(dev, mr->mtt, n, pages, i);
888			if (err)
889				goto mtt_done;
890			n += i;
891			i = 0;
892		}
893	}
894
895	if (i)
896		err = mthca_write_mtt(dev, mr->mtt, n, pages, i);
897mtt_done:
898	free_page((unsigned long) pages);
899	if (err)
900		goto err_mtt;
901
902	err = mthca_mr_alloc(dev, to_mpd(pd)->pd_num, PAGE_SHIFT, virt, length,
903			     convert_access(acc), mr);
904
905	if (err)
906		goto err_mtt;
907
908	return &mr->ibmr;
909
910err_mtt:
911	mthca_free_mtt(dev, mr->mtt);
912
913err_umem:
914	ib_umem_release(mr->umem);
915
916err:
917	kfree(mr);
918	return ERR_PTR(err);
919}
920
921static int mthca_dereg_mr(struct ib_mr *mr, struct ib_udata *udata)
922{
923	struct mthca_mr *mmr = to_mmr(mr);
924
925	mthca_free_mr(to_mdev(mr->device), mmr);
926	ib_umem_release(mmr->umem);
927	kfree(mmr);
928
929	return 0;
930}
931
932static ssize_t hw_rev_show(struct device *device,
933			   struct device_attribute *attr, char *buf)
934{
935	struct mthca_dev *dev =
936		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
937
938	return sysfs_emit(buf, "%x\n", dev->rev_id);
939}
940static DEVICE_ATTR_RO(hw_rev);
941
942static const char *hca_type_string(int hca_type)
943{
944	switch (hca_type) {
945	case PCI_DEVICE_ID_MELLANOX_TAVOR:
946		return "MT23108";
947	case PCI_DEVICE_ID_MELLANOX_ARBEL_COMPAT:
948		return "MT25208 (MT23108 compat mode)";
949	case PCI_DEVICE_ID_MELLANOX_ARBEL:
950		return "MT25208";
951	case PCI_DEVICE_ID_MELLANOX_SINAI:
952	case PCI_DEVICE_ID_MELLANOX_SINAI_OLD:
953		return "MT25204";
954	}
955
956	return "unknown";
957}
958
959static ssize_t hca_type_show(struct device *device,
960			     struct device_attribute *attr, char *buf)
961{
962	struct mthca_dev *dev =
963		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
964
965	return sysfs_emit(buf, "%s\n", hca_type_string(dev->pdev->device));
966}
967static DEVICE_ATTR_RO(hca_type);
968
969static ssize_t board_id_show(struct device *device,
970			     struct device_attribute *attr, char *buf)
971{
972	struct mthca_dev *dev =
973		rdma_device_to_drv_device(device, struct mthca_dev, ib_dev);
974
975	return sysfs_emit(buf, "%.*s\n", MTHCA_BOARD_ID_LEN, dev->board_id);
976}
977static DEVICE_ATTR_RO(board_id);
978
979static struct attribute *mthca_dev_attributes[] = {
980	&dev_attr_hw_rev.attr,
981	&dev_attr_hca_type.attr,
982	&dev_attr_board_id.attr,
983	NULL
984};
985
986static const struct attribute_group mthca_attr_group = {
987	.attrs = mthca_dev_attributes,
988};
989
990static int mthca_init_node_data(struct mthca_dev *dev)
991{
992	struct ib_smp *in_mad;
993	struct ib_smp *out_mad;
994	int err = -ENOMEM;
995
996	in_mad  = kzalloc(sizeof *in_mad, GFP_KERNEL);
997	out_mad = kmalloc(sizeof *out_mad, GFP_KERNEL);
998	if (!in_mad || !out_mad)
999		goto out;
1000
1001	ib_init_query_mad(in_mad);
1002	in_mad->attr_id = IB_SMP_ATTR_NODE_DESC;
1003
1004	err = mthca_MAD_IFC(dev, 1, 1,
1005			    1, NULL, NULL, in_mad, out_mad);
1006	if (err)
1007		goto out;
1008
1009	memcpy(dev->ib_dev.node_desc, out_mad->data, IB_DEVICE_NODE_DESC_MAX);
1010
1011	in_mad->attr_id = IB_SMP_ATTR_NODE_INFO;
1012
1013	err = mthca_MAD_IFC(dev, 1, 1,
1014			    1, NULL, NULL, in_mad, out_mad);
1015	if (err)
1016		goto out;
1017
1018	if (mthca_is_memfree(dev))
1019		dev->rev_id = be32_to_cpup((__be32 *) (out_mad->data + 32));
1020	memcpy(&dev->ib_dev.node_guid, out_mad->data + 12, 8);
1021
1022out:
1023	kfree(in_mad);
1024	kfree(out_mad);
1025	return err;
1026}
1027
1028static int mthca_port_immutable(struct ib_device *ibdev, u32 port_num,
1029			        struct ib_port_immutable *immutable)
1030{
1031	struct ib_port_attr attr;
1032	int err;
1033
1034	immutable->core_cap_flags = RDMA_CORE_PORT_IBA_IB;
1035
1036	err = ib_query_port(ibdev, port_num, &attr);
1037	if (err)
1038		return err;
1039
1040	immutable->pkey_tbl_len = attr.pkey_tbl_len;
1041	immutable->gid_tbl_len = attr.gid_tbl_len;
1042	immutable->max_mad_size = IB_MGMT_MAD_SIZE;
1043
1044	return 0;
1045}
1046
1047static void get_dev_fw_str(struct ib_device *device, char *str)
1048{
1049	struct mthca_dev *dev =
1050		container_of(device, struct mthca_dev, ib_dev);
1051	snprintf(str, IB_FW_VERSION_NAME_MAX, "%d.%d.%d",
1052		 (int) (dev->fw_ver >> 32),
1053		 (int) (dev->fw_ver >> 16) & 0xffff,
1054		 (int) dev->fw_ver & 0xffff);
1055}
1056
1057static const struct ib_device_ops mthca_dev_ops = {
1058	.owner = THIS_MODULE,
1059	.driver_id = RDMA_DRIVER_MTHCA,
1060	.uverbs_abi_ver = MTHCA_UVERBS_ABI_VERSION,
1061	.uverbs_no_driver_id_binding = 1,
1062
1063	.alloc_pd = mthca_alloc_pd,
1064	.alloc_ucontext = mthca_alloc_ucontext,
1065	.attach_mcast = mthca_multicast_attach,
1066	.create_ah = mthca_ah_create,
1067	.create_cq = mthca_create_cq,
1068	.create_qp = mthca_create_qp,
1069	.dealloc_pd = mthca_dealloc_pd,
1070	.dealloc_ucontext = mthca_dealloc_ucontext,
1071	.dereg_mr = mthca_dereg_mr,
1072	.destroy_ah = mthca_ah_destroy,
1073	.destroy_cq = mthca_destroy_cq,
1074	.destroy_qp = mthca_destroy_qp,
1075	.detach_mcast = mthca_multicast_detach,
1076	.device_group = &mthca_attr_group,
1077	.get_dev_fw_str = get_dev_fw_str,
1078	.get_dma_mr = mthca_get_dma_mr,
1079	.get_port_immutable = mthca_port_immutable,
1080	.mmap = mthca_mmap_uar,
1081	.modify_device = mthca_modify_device,
1082	.modify_port = mthca_modify_port,
1083	.modify_qp = mthca_modify_qp,
1084	.poll_cq = mthca_poll_cq,
1085	.process_mad = mthca_process_mad,
1086	.query_ah = mthca_ah_query,
1087	.query_device = mthca_query_device,
1088	.query_gid = mthca_query_gid,
1089	.query_pkey = mthca_query_pkey,
1090	.query_port = mthca_query_port,
1091	.query_qp = mthca_query_qp,
1092	.reg_user_mr = mthca_reg_user_mr,
1093	.resize_cq = mthca_resize_cq,
1094
1095	INIT_RDMA_OBJ_SIZE(ib_ah, mthca_ah, ibah),
1096	INIT_RDMA_OBJ_SIZE(ib_cq, mthca_cq, ibcq),
1097	INIT_RDMA_OBJ_SIZE(ib_pd, mthca_pd, ibpd),
1098	INIT_RDMA_OBJ_SIZE(ib_qp, mthca_qp, ibqp),
1099	INIT_RDMA_OBJ_SIZE(ib_ucontext, mthca_ucontext, ibucontext),
1100};
1101
1102static const struct ib_device_ops mthca_dev_arbel_srq_ops = {
1103	.create_srq = mthca_create_srq,
1104	.destroy_srq = mthca_destroy_srq,
1105	.modify_srq = mthca_modify_srq,
1106	.post_srq_recv = mthca_arbel_post_srq_recv,
1107	.query_srq = mthca_query_srq,
1108
1109	INIT_RDMA_OBJ_SIZE(ib_srq, mthca_srq, ibsrq),
1110};
1111
1112static const struct ib_device_ops mthca_dev_tavor_srq_ops = {
1113	.create_srq = mthca_create_srq,
1114	.destroy_srq = mthca_destroy_srq,
1115	.modify_srq = mthca_modify_srq,
1116	.post_srq_recv = mthca_tavor_post_srq_recv,
1117	.query_srq = mthca_query_srq,
1118
1119	INIT_RDMA_OBJ_SIZE(ib_srq, mthca_srq, ibsrq),
1120};
1121
1122static const struct ib_device_ops mthca_dev_arbel_ops = {
1123	.post_recv = mthca_arbel_post_receive,
1124	.post_send = mthca_arbel_post_send,
1125	.req_notify_cq = mthca_arbel_arm_cq,
1126};
1127
1128static const struct ib_device_ops mthca_dev_tavor_ops = {
1129	.post_recv = mthca_tavor_post_receive,
1130	.post_send = mthca_tavor_post_send,
1131	.req_notify_cq = mthca_tavor_arm_cq,
1132};
1133
1134int mthca_register_device(struct mthca_dev *dev)
1135{
1136	int ret;
1137
1138	ret = mthca_init_node_data(dev);
1139	if (ret)
1140		return ret;
1141
1142	dev->ib_dev.node_type            = RDMA_NODE_IB_CA;
1143	dev->ib_dev.phys_port_cnt        = dev->limits.num_ports;
1144	dev->ib_dev.num_comp_vectors     = 1;
1145	dev->ib_dev.dev.parent           = &dev->pdev->dev;
1146
1147	if (dev->mthca_flags & MTHCA_FLAG_SRQ) {
1148		if (mthca_is_memfree(dev))
1149			ib_set_device_ops(&dev->ib_dev,
1150					  &mthca_dev_arbel_srq_ops);
1151		else
1152			ib_set_device_ops(&dev->ib_dev,
1153					  &mthca_dev_tavor_srq_ops);
1154	}
1155
1156	ib_set_device_ops(&dev->ib_dev, &mthca_dev_ops);
1157
1158	if (mthca_is_memfree(dev))
1159		ib_set_device_ops(&dev->ib_dev, &mthca_dev_arbel_ops);
1160	else
1161		ib_set_device_ops(&dev->ib_dev, &mthca_dev_tavor_ops);
1162
1163	mutex_init(&dev->cap_mask_mutex);
1164
1165	ret = ib_register_device(&dev->ib_dev, "mthca%d", &dev->pdev->dev);
1166	if (ret)
1167		return ret;
1168
1169	mthca_start_catas_poll(dev);
1170
1171	return 0;
1172}
1173
1174void mthca_unregister_device(struct mthca_dev *dev)
1175{
1176	mthca_stop_catas_poll(dev);
1177	ib_unregister_device(&dev->ib_dev);
1178}
1179