1  /*
2   * Copyright (c) 2017, Mellanox Technologies inc.  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 <rdma/rdma_user_ioctl.h>
34  #include <rdma/uverbs_ioctl.h>
35  #include "rdma_core.h"
36  #include "uverbs.h"
37  
38  struct bundle_alloc_head {
39  	struct_group_tagged(bundle_alloc_head_hdr, hdr,
40  		struct bundle_alloc_head *next;
41  	);
42  	u8 data[];
43  };
44  
45  struct bundle_priv {
46  	/* Must be first */
47  	struct bundle_alloc_head_hdr alloc_head;
48  	struct bundle_alloc_head *allocated_mem;
49  	size_t internal_avail;
50  	size_t internal_used;
51  
52  	struct radix_tree_root *radix;
53  	const struct uverbs_api_ioctl_method *method_elm;
54  	void __rcu **radix_slots;
55  	unsigned long radix_slots_len;
56  	u32 method_key;
57  
58  	struct ib_uverbs_attr __user *user_attrs;
59  	struct ib_uverbs_attr *uattrs;
60  
61  	DECLARE_BITMAP(uobj_finalize, UVERBS_API_ATTR_BKEY_LEN);
62  	DECLARE_BITMAP(spec_finalize, UVERBS_API_ATTR_BKEY_LEN);
63  	DECLARE_BITMAP(uobj_hw_obj_valid, UVERBS_API_ATTR_BKEY_LEN);
64  
65  	/*
66  	 * Must be last. bundle ends in a flex array which overlaps
67  	 * internal_buffer.
68  	 */
69  	struct uverbs_attr_bundle_hdr bundle;
70  	u64 internal_buffer[32];
71  };
72  
73  /*
74   * Each method has an absolute minimum amount of memory it needs to allocate,
75   * precompute that amount and determine if the onstack memory can be used or
76   * if allocation is need.
77   */
uapi_compute_bundle_size(struct uverbs_api_ioctl_method * method_elm,unsigned int num_attrs)78  void uapi_compute_bundle_size(struct uverbs_api_ioctl_method *method_elm,
79  			      unsigned int num_attrs)
80  {
81  	struct bundle_priv *pbundle;
82  	struct uverbs_attr_bundle *bundle;
83  	size_t bundle_size =
84  		offsetof(struct bundle_priv, internal_buffer) +
85  		sizeof(*bundle->attrs) * method_elm->key_bitmap_len +
86  		sizeof(*pbundle->uattrs) * num_attrs;
87  
88  	method_elm->use_stack = bundle_size <= sizeof(*pbundle);
89  	method_elm->bundle_size =
90  		ALIGN(bundle_size + 256, sizeof(*pbundle->internal_buffer));
91  
92  	/* Do not want order-2 allocations for this. */
93  	WARN_ON_ONCE(method_elm->bundle_size > PAGE_SIZE);
94  }
95  
96  /**
97   * _uverbs_alloc() - Quickly allocate memory for use with a bundle
98   * @bundle: The bundle
99   * @size: Number of bytes to allocate
100   * @flags: Allocator flags
101   *
102   * The bundle allocator is intended for allocations that are connected with
103   * processing the system call related to the bundle. The allocated memory is
104   * always freed once the system call completes, and cannot be freed any other
105   * way.
106   *
107   * This tries to use a small pool of pre-allocated memory for performance.
108   */
_uverbs_alloc(struct uverbs_attr_bundle * bundle,size_t size,gfp_t flags)109  __malloc void *_uverbs_alloc(struct uverbs_attr_bundle *bundle, size_t size,
110  			     gfp_t flags)
111  {
112  	struct bundle_priv *pbundle =
113  		container_of(&bundle->hdr, struct bundle_priv, bundle);
114  	size_t new_used;
115  	void *res;
116  
117  	if (check_add_overflow(size, pbundle->internal_used, &new_used))
118  		return ERR_PTR(-EOVERFLOW);
119  
120  	if (new_used > pbundle->internal_avail) {
121  		struct bundle_alloc_head *buf;
122  
123  		buf = kvmalloc(struct_size(buf, data, size), flags);
124  		if (!buf)
125  			return ERR_PTR(-ENOMEM);
126  		buf->next = pbundle->allocated_mem;
127  		pbundle->allocated_mem = buf;
128  		return buf->data;
129  	}
130  
131  	res = (void *)pbundle->internal_buffer + pbundle->internal_used;
132  	pbundle->internal_used =
133  		ALIGN(new_used, sizeof(*pbundle->internal_buffer));
134  	if (want_init_on_alloc(flags))
135  		memset(res, 0, size);
136  	return res;
137  }
138  EXPORT_SYMBOL(_uverbs_alloc);
139  
uverbs_is_attr_cleared(const struct ib_uverbs_attr * uattr,u16 len)140  static bool uverbs_is_attr_cleared(const struct ib_uverbs_attr *uattr,
141  				   u16 len)
142  {
143  	if (uattr->len > sizeof_field(struct ib_uverbs_attr, data))
144  		return ib_is_buffer_cleared(u64_to_user_ptr(uattr->data) + len,
145  					    uattr->len - len);
146  
147  	return !memchr_inv((const void *)&uattr->data + len,
148  			   0, uattr->len - len);
149  }
150  
uverbs_set_output(const struct uverbs_attr_bundle * bundle,const struct uverbs_attr * attr)151  static int uverbs_set_output(const struct uverbs_attr_bundle *bundle,
152  			     const struct uverbs_attr *attr)
153  {
154  	struct bundle_priv *pbundle =
155  		container_of(&bundle->hdr, struct bundle_priv, bundle);
156  	u16 flags;
157  
158  	flags = pbundle->uattrs[attr->ptr_attr.uattr_idx].flags |
159  		UVERBS_ATTR_F_VALID_OUTPUT;
160  	if (put_user(flags,
161  		     &pbundle->user_attrs[attr->ptr_attr.uattr_idx].flags))
162  		return -EFAULT;
163  	return 0;
164  }
165  
uverbs_process_idrs_array(struct bundle_priv * pbundle,const struct uverbs_api_attr * attr_uapi,struct uverbs_objs_arr_attr * attr,struct ib_uverbs_attr * uattr,u32 attr_bkey)166  static int uverbs_process_idrs_array(struct bundle_priv *pbundle,
167  				     const struct uverbs_api_attr *attr_uapi,
168  				     struct uverbs_objs_arr_attr *attr,
169  				     struct ib_uverbs_attr *uattr,
170  				     u32 attr_bkey)
171  {
172  	struct uverbs_attr_bundle *bundle =
173  		container_of(&pbundle->bundle, struct uverbs_attr_bundle, hdr);
174  	const struct uverbs_attr_spec *spec = &attr_uapi->spec;
175  	size_t array_len;
176  	u32 *idr_vals;
177  	int ret = 0;
178  	size_t i;
179  
180  	if (uattr->attr_data.reserved)
181  		return -EINVAL;
182  
183  	if (uattr->len % sizeof(u32))
184  		return -EINVAL;
185  
186  	array_len = uattr->len / sizeof(u32);
187  	if (array_len < spec->u2.objs_arr.min_len ||
188  	    array_len > spec->u2.objs_arr.max_len)
189  		return -EINVAL;
190  
191  	attr->uobjects =
192  		uverbs_alloc(bundle,
193  			     array_size(array_len, sizeof(*attr->uobjects)));
194  	if (IS_ERR(attr->uobjects))
195  		return PTR_ERR(attr->uobjects);
196  
197  	/*
198  	 * Since idr is 4B and *uobjects is >= 4B, we can use attr->uobjects
199  	 * to store idrs array and avoid additional memory allocation. The
200  	 * idrs array is offset to the end of the uobjects array so we will be
201  	 * able to read idr and replace with a pointer.
202  	 */
203  	idr_vals = (u32 *)(attr->uobjects + array_len) - array_len;
204  
205  	if (uattr->len > sizeof(uattr->data)) {
206  		ret = copy_from_user(idr_vals, u64_to_user_ptr(uattr->data),
207  				     uattr->len);
208  		if (ret)
209  			return -EFAULT;
210  	} else {
211  		memcpy(idr_vals, &uattr->data, uattr->len);
212  	}
213  
214  	for (i = 0; i != array_len; i++) {
215  		attr->uobjects[i] = uverbs_get_uobject_from_file(
216  			spec->u2.objs_arr.obj_type, spec->u2.objs_arr.access,
217  			idr_vals[i], bundle);
218  		if (IS_ERR(attr->uobjects[i])) {
219  			ret = PTR_ERR(attr->uobjects[i]);
220  			break;
221  		}
222  	}
223  
224  	attr->len = i;
225  	__set_bit(attr_bkey, pbundle->spec_finalize);
226  	return ret;
227  }
228  
uverbs_free_idrs_array(const struct uverbs_api_attr * attr_uapi,struct uverbs_objs_arr_attr * attr,bool commit,struct uverbs_attr_bundle * attrs)229  static void uverbs_free_idrs_array(const struct uverbs_api_attr *attr_uapi,
230  				   struct uverbs_objs_arr_attr *attr,
231  				   bool commit,
232  				   struct uverbs_attr_bundle *attrs)
233  {
234  	const struct uverbs_attr_spec *spec = &attr_uapi->spec;
235  	size_t i;
236  
237  	for (i = 0; i != attr->len; i++)
238  		uverbs_finalize_object(attr->uobjects[i],
239  				       spec->u2.objs_arr.access, false, commit,
240  				       attrs);
241  }
242  
uverbs_process_attr(struct bundle_priv * pbundle,const struct uverbs_api_attr * attr_uapi,struct ib_uverbs_attr * uattr,u32 attr_bkey)243  static int uverbs_process_attr(struct bundle_priv *pbundle,
244  			       const struct uverbs_api_attr *attr_uapi,
245  			       struct ib_uverbs_attr *uattr, u32 attr_bkey)
246  {
247  	const struct uverbs_attr_spec *spec = &attr_uapi->spec;
248  	struct uverbs_attr_bundle *bundle =
249  		container_of(&pbundle->bundle, struct uverbs_attr_bundle, hdr);
250  	struct uverbs_attr *e = &bundle->attrs[attr_bkey];
251  	const struct uverbs_attr_spec *val_spec = spec;
252  	struct uverbs_obj_attr *o_attr;
253  
254  	switch (spec->type) {
255  	case UVERBS_ATTR_TYPE_ENUM_IN:
256  		if (uattr->attr_data.enum_data.elem_id >= spec->u.enum_def.num_elems)
257  			return -EOPNOTSUPP;
258  
259  		if (uattr->attr_data.enum_data.reserved)
260  			return -EINVAL;
261  
262  		val_spec = &spec->u2.enum_def.ids[uattr->attr_data.enum_data.elem_id];
263  
264  		/* Currently we only support PTR_IN based enums */
265  		if (val_spec->type != UVERBS_ATTR_TYPE_PTR_IN)
266  			return -EOPNOTSUPP;
267  
268  		e->ptr_attr.enum_id = uattr->attr_data.enum_data.elem_id;
269  		fallthrough;
270  	case UVERBS_ATTR_TYPE_PTR_IN:
271  		/* Ensure that any data provided by userspace beyond the known
272  		 * struct is zero. Userspace that knows how to use some future
273  		 * longer struct will fail here if used with an old kernel and
274  		 * non-zero content, making ABI compat/discovery simpler.
275  		 */
276  		if (uattr->len > val_spec->u.ptr.len &&
277  		    val_spec->zero_trailing &&
278  		    !uverbs_is_attr_cleared(uattr, val_spec->u.ptr.len))
279  			return -EOPNOTSUPP;
280  
281  		fallthrough;
282  	case UVERBS_ATTR_TYPE_PTR_OUT:
283  		if (uattr->len < val_spec->u.ptr.min_len ||
284  		    (!val_spec->zero_trailing &&
285  		     uattr->len > val_spec->u.ptr.len))
286  			return -EINVAL;
287  
288  		if (spec->type != UVERBS_ATTR_TYPE_ENUM_IN &&
289  		    uattr->attr_data.reserved)
290  			return -EINVAL;
291  
292  		e->ptr_attr.uattr_idx = uattr - pbundle->uattrs;
293  		e->ptr_attr.len = uattr->len;
294  
295  		if (val_spec->alloc_and_copy && !uverbs_attr_ptr_is_inline(e)) {
296  			void *p;
297  
298  			p = uverbs_alloc(bundle, uattr->len);
299  			if (IS_ERR(p))
300  				return PTR_ERR(p);
301  
302  			e->ptr_attr.ptr = p;
303  
304  			if (copy_from_user(p, u64_to_user_ptr(uattr->data),
305  					   uattr->len))
306  				return -EFAULT;
307  		} else {
308  			e->ptr_attr.data = uattr->data;
309  		}
310  		break;
311  
312  	case UVERBS_ATTR_TYPE_IDR:
313  	case UVERBS_ATTR_TYPE_FD:
314  		if (uattr->attr_data.reserved)
315  			return -EINVAL;
316  
317  		if (uattr->len != 0)
318  			return -EINVAL;
319  
320  		o_attr = &e->obj_attr;
321  		o_attr->attr_elm = attr_uapi;
322  
323  		/*
324  		 * The type of uattr->data is u64 for UVERBS_ATTR_TYPE_IDR and
325  		 * s64 for UVERBS_ATTR_TYPE_FD. We can cast the u64 to s64
326  		 * here without caring about truncation as we know that the
327  		 * IDR implementation today rejects negative IDs
328  		 */
329  		o_attr->uobject = uverbs_get_uobject_from_file(
330  			spec->u.obj.obj_type, spec->u.obj.access,
331  			uattr->data_s64, bundle);
332  		if (IS_ERR(o_attr->uobject))
333  			return PTR_ERR(o_attr->uobject);
334  		__set_bit(attr_bkey, pbundle->uobj_finalize);
335  
336  		if (spec->u.obj.access == UVERBS_ACCESS_NEW) {
337  			unsigned int uattr_idx = uattr - pbundle->uattrs;
338  			s64 id = o_attr->uobject->id;
339  
340  			/* Copy the allocated id to the user-space */
341  			if (put_user(id, &pbundle->user_attrs[uattr_idx].data))
342  				return -EFAULT;
343  		}
344  
345  		break;
346  
347  	case UVERBS_ATTR_TYPE_RAW_FD:
348  		if (uattr->attr_data.reserved || uattr->len != 0 ||
349  		    uattr->data_s64 < INT_MIN || uattr->data_s64 > INT_MAX)
350  			return -EINVAL;
351  		/* _uverbs_get_const_signed() is the accessor */
352  		e->ptr_attr.data = uattr->data_s64;
353  		break;
354  
355  	case UVERBS_ATTR_TYPE_IDRS_ARRAY:
356  		return uverbs_process_idrs_array(pbundle, attr_uapi,
357  						 &e->objs_arr_attr, uattr,
358  						 attr_bkey);
359  	default:
360  		return -EOPNOTSUPP;
361  	}
362  
363  	return 0;
364  }
365  
366  /*
367   * We search the radix tree with the method prefix and now we want to fast
368   * search the suffix bits to get a particular attribute pointer. It is not
369   * totally clear to me if this breaks the radix tree encasulation or not, but
370   * it uses the iter data to determine if the method iter points at the same
371   * chunk that will store the attribute, if so it just derefs it directly. By
372   * construction in most kernel configs the method and attrs will all fit in a
373   * single radix chunk, so in most cases this will have no search. Other cases
374   * this falls back to a full search.
375   */
uapi_get_attr_for_method(struct bundle_priv * pbundle,u32 attr_key)376  static void __rcu **uapi_get_attr_for_method(struct bundle_priv *pbundle,
377  					     u32 attr_key)
378  {
379  	void __rcu **slot;
380  
381  	if (likely(attr_key < pbundle->radix_slots_len)) {
382  		void *entry;
383  
384  		slot = pbundle->radix_slots + attr_key;
385  		entry = rcu_dereference_raw(*slot);
386  		if (likely(!radix_tree_is_internal_node(entry) && entry))
387  			return slot;
388  	}
389  
390  	return radix_tree_lookup_slot(pbundle->radix,
391  				      pbundle->method_key | attr_key);
392  }
393  
uverbs_set_attr(struct bundle_priv * pbundle,struct ib_uverbs_attr * uattr)394  static int uverbs_set_attr(struct bundle_priv *pbundle,
395  			   struct ib_uverbs_attr *uattr)
396  {
397  	u32 attr_key = uapi_key_attr(uattr->attr_id);
398  	u32 attr_bkey = uapi_bkey_attr(attr_key);
399  	const struct uverbs_api_attr *attr;
400  	void __rcu **slot;
401  	int ret;
402  
403  	slot = uapi_get_attr_for_method(pbundle, attr_key);
404  	if (!slot) {
405  		/*
406  		 * Kernel does not support the attribute but user-space says it
407  		 * is mandatory
408  		 */
409  		if (uattr->flags & UVERBS_ATTR_F_MANDATORY)
410  			return -EPROTONOSUPPORT;
411  		return 0;
412  	}
413  	attr = rcu_dereference_protected(*slot, true);
414  
415  	/* Reject duplicate attributes from user-space */
416  	if (test_bit(attr_bkey, pbundle->bundle.attr_present))
417  		return -EINVAL;
418  
419  	ret = uverbs_process_attr(pbundle, attr, uattr, attr_bkey);
420  	if (ret)
421  		return ret;
422  
423  	__set_bit(attr_bkey, pbundle->bundle.attr_present);
424  
425  	return 0;
426  }
427  
ib_uverbs_run_method(struct bundle_priv * pbundle,unsigned int num_attrs)428  static int ib_uverbs_run_method(struct bundle_priv *pbundle,
429  				unsigned int num_attrs)
430  {
431  	int (*handler)(struct uverbs_attr_bundle *attrs);
432  	struct uverbs_attr_bundle *bundle =
433  		container_of(&pbundle->bundle, struct uverbs_attr_bundle, hdr);
434  	size_t uattrs_size = array_size(sizeof(*pbundle->uattrs), num_attrs);
435  	unsigned int destroy_bkey = pbundle->method_elm->destroy_bkey;
436  	unsigned int i;
437  	int ret;
438  
439  	/* See uverbs_disassociate_api() */
440  	handler = srcu_dereference(
441  		pbundle->method_elm->handler,
442  		&pbundle->bundle.ufile->device->disassociate_srcu);
443  	if (!handler)
444  		return -EIO;
445  
446  	pbundle->uattrs = uverbs_alloc(bundle, uattrs_size);
447  	if (IS_ERR(pbundle->uattrs))
448  		return PTR_ERR(pbundle->uattrs);
449  	if (copy_from_user(pbundle->uattrs, pbundle->user_attrs, uattrs_size))
450  		return -EFAULT;
451  
452  	for (i = 0; i != num_attrs; i++) {
453  		ret = uverbs_set_attr(pbundle, &pbundle->uattrs[i]);
454  		if (unlikely(ret))
455  			return ret;
456  	}
457  
458  	/* User space did not provide all the mandatory attributes */
459  	if (unlikely(!bitmap_subset(pbundle->method_elm->attr_mandatory,
460  				    pbundle->bundle.attr_present,
461  				    pbundle->method_elm->key_bitmap_len)))
462  		return -EINVAL;
463  
464  	if (pbundle->method_elm->has_udata)
465  		uverbs_fill_udata(bundle, &pbundle->bundle.driver_udata,
466  				  UVERBS_ATTR_UHW_IN, UVERBS_ATTR_UHW_OUT);
467  	else
468  		pbundle->bundle.driver_udata = (struct ib_udata){};
469  
470  	if (destroy_bkey != UVERBS_API_ATTR_BKEY_LEN) {
471  		struct uverbs_obj_attr *destroy_attr = &bundle->attrs[destroy_bkey].obj_attr;
472  
473  		ret = uobj_destroy(destroy_attr->uobject, bundle);
474  		if (ret)
475  			return ret;
476  		__clear_bit(destroy_bkey, pbundle->uobj_finalize);
477  
478  		ret = handler(bundle);
479  		uobj_put_destroy(destroy_attr->uobject);
480  	} else {
481  		ret = handler(bundle);
482  	}
483  
484  	/*
485  	 * Until the drivers are revised to use the bundle directly we have to
486  	 * assume that the driver wrote to its UHW_OUT and flag userspace
487  	 * appropriately.
488  	 */
489  	if (!ret && pbundle->method_elm->has_udata) {
490  		const struct uverbs_attr *attr =
491  			uverbs_attr_get(bundle, UVERBS_ATTR_UHW_OUT);
492  
493  		if (!IS_ERR(attr))
494  			ret = uverbs_set_output(bundle, attr);
495  	}
496  
497  	/*
498  	 * EPROTONOSUPPORT is ONLY to be returned if the ioctl framework can
499  	 * not invoke the method because the request is not supported.  No
500  	 * other cases should return this code.
501  	 */
502  	if (WARN_ON_ONCE(ret == -EPROTONOSUPPORT))
503  		return -EINVAL;
504  
505  	return ret;
506  }
507  
bundle_destroy(struct bundle_priv * pbundle,bool commit)508  static void bundle_destroy(struct bundle_priv *pbundle, bool commit)
509  {
510  	unsigned int key_bitmap_len = pbundle->method_elm->key_bitmap_len;
511  	struct uverbs_attr_bundle *bundle =
512  		container_of(&pbundle->bundle, struct uverbs_attr_bundle, hdr);
513  	struct bundle_alloc_head *memblock;
514  	unsigned int i;
515  
516  	/* fast path for simple uobjects */
517  	i = -1;
518  	while ((i = find_next_bit(pbundle->uobj_finalize, key_bitmap_len,
519  				  i + 1)) < key_bitmap_len) {
520  		struct uverbs_attr *attr = &bundle->attrs[i];
521  
522  		uverbs_finalize_object(
523  			attr->obj_attr.uobject,
524  			attr->obj_attr.attr_elm->spec.u.obj.access,
525  			test_bit(i, pbundle->uobj_hw_obj_valid),
526  			commit, bundle);
527  	}
528  
529  	i = -1;
530  	while ((i = find_next_bit(pbundle->spec_finalize, key_bitmap_len,
531  				  i + 1)) < key_bitmap_len) {
532  		struct uverbs_attr *attr = &bundle->attrs[i];
533  		const struct uverbs_api_attr *attr_uapi;
534  		void __rcu **slot;
535  
536  		slot = uapi_get_attr_for_method(
537  			pbundle,
538  			pbundle->method_key | uapi_bkey_to_key_attr(i));
539  		if (WARN_ON(!slot))
540  			continue;
541  
542  		attr_uapi = rcu_dereference_protected(*slot, true);
543  
544  		if (attr_uapi->spec.type == UVERBS_ATTR_TYPE_IDRS_ARRAY) {
545  			uverbs_free_idrs_array(attr_uapi, &attr->objs_arr_attr,
546  					       commit, bundle);
547  		}
548  	}
549  
550  	for (memblock = pbundle->allocated_mem; memblock;) {
551  		struct bundle_alloc_head *tmp = memblock;
552  
553  		memblock = memblock->next;
554  		kvfree(tmp);
555  	}
556  }
557  
ib_uverbs_cmd_verbs(struct ib_uverbs_file * ufile,struct ib_uverbs_ioctl_hdr * hdr,struct ib_uverbs_attr __user * user_attrs)558  static int ib_uverbs_cmd_verbs(struct ib_uverbs_file *ufile,
559  			       struct ib_uverbs_ioctl_hdr *hdr,
560  			       struct ib_uverbs_attr __user *user_attrs)
561  {
562  	const struct uverbs_api_ioctl_method *method_elm;
563  	struct uverbs_api *uapi = ufile->device->uapi;
564  	struct radix_tree_iter attrs_iter;
565  	struct bundle_priv *pbundle;
566  	struct bundle_priv onstack;
567  	void __rcu **slot;
568  	int ret;
569  
570  	if (unlikely(hdr->driver_id != uapi->driver_id))
571  		return -EINVAL;
572  
573  	slot = radix_tree_iter_lookup(
574  		&uapi->radix, &attrs_iter,
575  		uapi_key_obj(hdr->object_id) |
576  			uapi_key_ioctl_method(hdr->method_id));
577  	if (unlikely(!slot))
578  		return -EPROTONOSUPPORT;
579  	method_elm = rcu_dereference_protected(*slot, true);
580  
581  	if (!method_elm->use_stack) {
582  		pbundle = kmalloc(method_elm->bundle_size, GFP_KERNEL);
583  		if (!pbundle)
584  			return -ENOMEM;
585  		pbundle->internal_avail =
586  			method_elm->bundle_size -
587  			offsetof(struct bundle_priv, internal_buffer);
588  		pbundle->alloc_head.next = NULL;
589  		pbundle->allocated_mem = container_of(&pbundle->alloc_head,
590  						struct bundle_alloc_head, hdr);
591  	} else {
592  		pbundle = &onstack;
593  		pbundle->internal_avail = sizeof(pbundle->internal_buffer);
594  		pbundle->allocated_mem = NULL;
595  	}
596  
597  	/* Space for the pbundle->bundle.attrs flex array */
598  	pbundle->method_elm = method_elm;
599  	pbundle->method_key = attrs_iter.index;
600  	pbundle->bundle.ufile = ufile;
601  	pbundle->bundle.context = NULL; /* only valid if bundle has uobject */
602  	pbundle->radix = &uapi->radix;
603  	pbundle->radix_slots = slot;
604  	pbundle->radix_slots_len = radix_tree_chunk_size(&attrs_iter);
605  	pbundle->user_attrs = user_attrs;
606  
607  	pbundle->internal_used = ALIGN(pbundle->method_elm->key_bitmap_len *
608  					       sizeof(*container_of(&pbundle->bundle,
609  							struct uverbs_attr_bundle, hdr)->attrs),
610  					       sizeof(*pbundle->internal_buffer));
611  	memset(pbundle->bundle.attr_present, 0,
612  	       sizeof(pbundle->bundle.attr_present));
613  	memset(pbundle->uobj_finalize, 0, sizeof(pbundle->uobj_finalize));
614  	memset(pbundle->spec_finalize, 0, sizeof(pbundle->spec_finalize));
615  	memset(pbundle->uobj_hw_obj_valid, 0,
616  	       sizeof(pbundle->uobj_hw_obj_valid));
617  
618  	ret = ib_uverbs_run_method(pbundle, hdr->num_attrs);
619  	bundle_destroy(pbundle, ret == 0);
620  	return ret;
621  }
622  
ib_uverbs_ioctl(struct file * filp,unsigned int cmd,unsigned long arg)623  long ib_uverbs_ioctl(struct file *filp, unsigned int cmd, unsigned long arg)
624  {
625  	struct ib_uverbs_file *file = filp->private_data;
626  	struct ib_uverbs_ioctl_hdr __user *user_hdr =
627  		(struct ib_uverbs_ioctl_hdr __user *)arg;
628  	struct ib_uverbs_ioctl_hdr hdr;
629  	int srcu_key;
630  	int err;
631  
632  	if (unlikely(cmd != RDMA_VERBS_IOCTL))
633  		return -ENOIOCTLCMD;
634  
635  	err = copy_from_user(&hdr, user_hdr, sizeof(hdr));
636  	if (err)
637  		return -EFAULT;
638  
639  	if (hdr.length > PAGE_SIZE ||
640  	    hdr.length != struct_size(&hdr, attrs, hdr.num_attrs))
641  		return -EINVAL;
642  
643  	if (hdr.reserved1 || hdr.reserved2)
644  		return -EPROTONOSUPPORT;
645  
646  	srcu_key = srcu_read_lock(&file->device->disassociate_srcu);
647  	err = ib_uverbs_cmd_verbs(file, &hdr, user_hdr->attrs);
648  	srcu_read_unlock(&file->device->disassociate_srcu, srcu_key);
649  	return err;
650  }
651  
uverbs_get_flags64(u64 * to,const struct uverbs_attr_bundle * attrs_bundle,size_t idx,u64 allowed_bits)652  int uverbs_get_flags64(u64 *to, const struct uverbs_attr_bundle *attrs_bundle,
653  		       size_t idx, u64 allowed_bits)
654  {
655  	const struct uverbs_attr *attr;
656  	u64 flags;
657  
658  	attr = uverbs_attr_get(attrs_bundle, idx);
659  	/* Missing attribute means 0 flags */
660  	if (IS_ERR(attr)) {
661  		*to = 0;
662  		return 0;
663  	}
664  
665  	/*
666  	 * New userspace code should use 8 bytes to pass flags, but we
667  	 * transparently support old userspaces that were using 4 bytes as
668  	 * well.
669  	 */
670  	if (attr->ptr_attr.len == 8)
671  		flags = attr->ptr_attr.data;
672  	else if (attr->ptr_attr.len == 4)
673  		flags = *(u32 *)&attr->ptr_attr.data;
674  	else
675  		return -EINVAL;
676  
677  	if (flags & ~allowed_bits)
678  		return -EINVAL;
679  
680  	*to = flags;
681  	return 0;
682  }
683  EXPORT_SYMBOL(uverbs_get_flags64);
684  
uverbs_get_flags32(u32 * to,const struct uverbs_attr_bundle * attrs_bundle,size_t idx,u64 allowed_bits)685  int uverbs_get_flags32(u32 *to, const struct uverbs_attr_bundle *attrs_bundle,
686  		       size_t idx, u64 allowed_bits)
687  {
688  	u64 flags;
689  	int ret;
690  
691  	ret = uverbs_get_flags64(&flags, attrs_bundle, idx, allowed_bits);
692  	if (ret)
693  		return ret;
694  
695  	if (flags > U32_MAX)
696  		return -EINVAL;
697  	*to = flags;
698  
699  	return 0;
700  }
701  EXPORT_SYMBOL(uverbs_get_flags32);
702  
703  /*
704   * Fill a ib_udata struct (core or uhw) using the given attribute IDs.
705   * This is primarily used to convert the UVERBS_ATTR_UHW() into the
706   * ib_udata format used by the drivers.
707   */
uverbs_fill_udata(struct uverbs_attr_bundle * bundle,struct ib_udata * udata,unsigned int attr_in,unsigned int attr_out)708  void uverbs_fill_udata(struct uverbs_attr_bundle *bundle,
709  		       struct ib_udata *udata, unsigned int attr_in,
710  		       unsigned int attr_out)
711  {
712  	struct bundle_priv *pbundle =
713  		container_of(&bundle->hdr, struct bundle_priv, bundle);
714  	struct uverbs_attr_bundle *bundle_aux =
715  		container_of(&pbundle->bundle, struct uverbs_attr_bundle, hdr);
716  	const struct uverbs_attr *in =
717  		uverbs_attr_get(bundle_aux, attr_in);
718  	const struct uverbs_attr *out =
719  		uverbs_attr_get(bundle_aux, attr_out);
720  
721  	if (!IS_ERR(in)) {
722  		udata->inlen = in->ptr_attr.len;
723  		if (uverbs_attr_ptr_is_inline(in))
724  			udata->inbuf =
725  				&pbundle->user_attrs[in->ptr_attr.uattr_idx]
726  					 .data;
727  		else
728  			udata->inbuf = u64_to_user_ptr(in->ptr_attr.data);
729  	} else {
730  		udata->inbuf = NULL;
731  		udata->inlen = 0;
732  	}
733  
734  	if (!IS_ERR(out)) {
735  		udata->outbuf = u64_to_user_ptr(out->ptr_attr.data);
736  		udata->outlen = out->ptr_attr.len;
737  	} else {
738  		udata->outbuf = NULL;
739  		udata->outlen = 0;
740  	}
741  }
742  
uverbs_copy_to(const struct uverbs_attr_bundle * bundle,size_t idx,const void * from,size_t size)743  int uverbs_copy_to(const struct uverbs_attr_bundle *bundle, size_t idx,
744  		   const void *from, size_t size)
745  {
746  	const struct uverbs_attr *attr = uverbs_attr_get(bundle, idx);
747  	size_t min_size;
748  
749  	if (IS_ERR(attr))
750  		return PTR_ERR(attr);
751  
752  	min_size = min_t(size_t, attr->ptr_attr.len, size);
753  	if (copy_to_user(u64_to_user_ptr(attr->ptr_attr.data), from, min_size))
754  		return -EFAULT;
755  
756  	return uverbs_set_output(bundle, attr);
757  }
758  EXPORT_SYMBOL(uverbs_copy_to);
759  
760  
761  /*
762   * This is only used if the caller has directly used copy_to_use to write the
763   * data.  It signals to user space that the buffer is filled in.
764   */
uverbs_output_written(const struct uverbs_attr_bundle * bundle,size_t idx)765  int uverbs_output_written(const struct uverbs_attr_bundle *bundle, size_t idx)
766  {
767  	const struct uverbs_attr *attr = uverbs_attr_get(bundle, idx);
768  
769  	if (IS_ERR(attr))
770  		return PTR_ERR(attr);
771  
772  	return uverbs_set_output(bundle, attr);
773  }
774  
_uverbs_get_const_signed(s64 * to,const struct uverbs_attr_bundle * attrs_bundle,size_t idx,s64 lower_bound,u64 upper_bound,s64 * def_val)775  int _uverbs_get_const_signed(s64 *to,
776  			     const struct uverbs_attr_bundle *attrs_bundle,
777  			     size_t idx, s64 lower_bound, u64 upper_bound,
778  			     s64  *def_val)
779  {
780  	const struct uverbs_attr *attr;
781  
782  	attr = uverbs_attr_get(attrs_bundle, idx);
783  	if (IS_ERR(attr)) {
784  		if ((PTR_ERR(attr) != -ENOENT) || !def_val)
785  			return PTR_ERR(attr);
786  
787  		*to = *def_val;
788  	} else {
789  		*to = attr->ptr_attr.data;
790  	}
791  
792  	if (*to < lower_bound || (*to > 0 && (u64)*to > upper_bound))
793  		return -EINVAL;
794  
795  	return 0;
796  }
797  EXPORT_SYMBOL(_uverbs_get_const_signed);
798  
_uverbs_get_const_unsigned(u64 * to,const struct uverbs_attr_bundle * attrs_bundle,size_t idx,u64 upper_bound,u64 * def_val)799  int _uverbs_get_const_unsigned(u64 *to,
800  			       const struct uverbs_attr_bundle *attrs_bundle,
801  			       size_t idx, u64 upper_bound, u64 *def_val)
802  {
803  	const struct uverbs_attr *attr;
804  
805  	attr = uverbs_attr_get(attrs_bundle, idx);
806  	if (IS_ERR(attr)) {
807  		if ((PTR_ERR(attr) != -ENOENT) || !def_val)
808  			return PTR_ERR(attr);
809  
810  		*to = *def_val;
811  	} else {
812  		*to = attr->ptr_attr.data;
813  	}
814  
815  	if (*to > upper_bound)
816  		return -EINVAL;
817  
818  	return 0;
819  }
820  EXPORT_SYMBOL(_uverbs_get_const_unsigned);
821  
uverbs_copy_to_struct_or_zero(const struct uverbs_attr_bundle * bundle,size_t idx,const void * from,size_t size)822  int uverbs_copy_to_struct_or_zero(const struct uverbs_attr_bundle *bundle,
823  				  size_t idx, const void *from, size_t size)
824  {
825  	const struct uverbs_attr *attr = uverbs_attr_get(bundle, idx);
826  
827  	if (IS_ERR(attr))
828  		return PTR_ERR(attr);
829  
830  	if (size < attr->ptr_attr.len) {
831  		if (clear_user(u64_to_user_ptr(attr->ptr_attr.data) + size,
832  			       attr->ptr_attr.len - size))
833  			return -EFAULT;
834  	}
835  	return uverbs_copy_to(bundle, idx, from, size);
836  }
837  EXPORT_SYMBOL(uverbs_copy_to_struct_or_zero);
838  
839  /* Once called an abort will call through to the type's destroy_hw() */
uverbs_finalize_uobj_create(const struct uverbs_attr_bundle * bundle,u16 idx)840  void uverbs_finalize_uobj_create(const struct uverbs_attr_bundle *bundle,
841  				 u16 idx)
842  {
843  	struct bundle_priv *pbundle =
844  		container_of(&bundle->hdr, struct bundle_priv, bundle);
845  
846  	__set_bit(uapi_bkey_attr(uapi_key_attr(idx)),
847  		  pbundle->uobj_hw_obj_valid);
848  }
849  EXPORT_SYMBOL(uverbs_finalize_uobj_create);
850