xref: /openbmc/linux/net/bluetooth/hidp/sock.c (revision f79e4d5f)
1 /*
2    HIDP implementation for Linux Bluetooth stack (BlueZ).
3    Copyright (C) 2003-2004 Marcel Holtmann <marcel@holtmann.org>
4 
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License version 2 as
7    published by the Free Software Foundation;
8 
9    THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
10    OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
11    FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
12    IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
13    CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
14    WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15    ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16    OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 
18    ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
19    COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
20    SOFTWARE IS DISCLAIMED.
21 */
22 
23 #include <linux/export.h>
24 #include <linux/file.h>
25 
26 #include "hidp.h"
27 
28 static struct bt_sock_list hidp_sk_list = {
29 	.lock = __RW_LOCK_UNLOCKED(hidp_sk_list.lock)
30 };
31 
32 static int hidp_sock_release(struct socket *sock)
33 {
34 	struct sock *sk = sock->sk;
35 
36 	BT_DBG("sock %p sk %p", sock, sk);
37 
38 	if (!sk)
39 		return 0;
40 
41 	bt_sock_unlink(&hidp_sk_list, sk);
42 
43 	sock_orphan(sk);
44 	sock_put(sk);
45 
46 	return 0;
47 }
48 
49 static int hidp_sock_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
50 {
51 	void __user *argp = (void __user *) arg;
52 	struct hidp_connadd_req ca;
53 	struct hidp_conndel_req cd;
54 	struct hidp_connlist_req cl;
55 	struct hidp_conninfo ci;
56 	struct socket *csock;
57 	struct socket *isock;
58 	int err;
59 
60 	BT_DBG("cmd %x arg %lx", cmd, arg);
61 
62 	switch (cmd) {
63 	case HIDPCONNADD:
64 		if (!capable(CAP_NET_ADMIN))
65 			return -EPERM;
66 
67 		if (copy_from_user(&ca, argp, sizeof(ca)))
68 			return -EFAULT;
69 
70 		csock = sockfd_lookup(ca.ctrl_sock, &err);
71 		if (!csock)
72 			return err;
73 
74 		isock = sockfd_lookup(ca.intr_sock, &err);
75 		if (!isock) {
76 			sockfd_put(csock);
77 			return err;
78 		}
79 
80 		err = hidp_connection_add(&ca, csock, isock);
81 		if (!err && copy_to_user(argp, &ca, sizeof(ca)))
82 			err = -EFAULT;
83 
84 		sockfd_put(csock);
85 		sockfd_put(isock);
86 
87 		return err;
88 
89 	case HIDPCONNDEL:
90 		if (!capable(CAP_NET_ADMIN))
91 			return -EPERM;
92 
93 		if (copy_from_user(&cd, argp, sizeof(cd)))
94 			return -EFAULT;
95 
96 		return hidp_connection_del(&cd);
97 
98 	case HIDPGETCONNLIST:
99 		if (copy_from_user(&cl, argp, sizeof(cl)))
100 			return -EFAULT;
101 
102 		if (cl.cnum <= 0)
103 			return -EINVAL;
104 
105 		err = hidp_get_connlist(&cl);
106 		if (!err && copy_to_user(argp, &cl, sizeof(cl)))
107 			return -EFAULT;
108 
109 		return err;
110 
111 	case HIDPGETCONNINFO:
112 		if (copy_from_user(&ci, argp, sizeof(ci)))
113 			return -EFAULT;
114 
115 		err = hidp_get_conninfo(&ci);
116 		if (!err && copy_to_user(argp, &ci, sizeof(ci)))
117 			return -EFAULT;
118 
119 		return err;
120 	}
121 
122 	return -EINVAL;
123 }
124 
125 #ifdef CONFIG_COMPAT
126 struct compat_hidp_connadd_req {
127 	int   ctrl_sock;	/* Connected control socket */
128 	int   intr_sock;	/* Connected interrupt socket */
129 	__u16 parser;
130 	__u16 rd_size;
131 	compat_uptr_t rd_data;
132 	__u8  country;
133 	__u8  subclass;
134 	__u16 vendor;
135 	__u16 product;
136 	__u16 version;
137 	__u32 flags;
138 	__u32 idle_to;
139 	char  name[128];
140 };
141 
142 static int hidp_sock_compat_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
143 {
144 	if (cmd == HIDPGETCONNLIST) {
145 		struct hidp_connlist_req cl;
146 		u32 uci;
147 		int err;
148 
149 		if (get_user(cl.cnum, (u32 __user *) arg) ||
150 				get_user(uci, (u32 __user *) (arg + 4)))
151 			return -EFAULT;
152 
153 		cl.ci = compat_ptr(uci);
154 
155 		if (cl.cnum <= 0)
156 			return -EINVAL;
157 
158 		err = hidp_get_connlist(&cl);
159 
160 		if (!err && put_user(cl.cnum, (u32 __user *) arg))
161 			err = -EFAULT;
162 
163 		return err;
164 	} else if (cmd == HIDPCONNADD) {
165 		struct compat_hidp_connadd_req ca;
166 		struct hidp_connadd_req __user *uca;
167 
168 		uca = compat_alloc_user_space(sizeof(*uca));
169 
170 		if (copy_from_user(&ca, (void __user *) arg, sizeof(ca)))
171 			return -EFAULT;
172 
173 		if (put_user(ca.ctrl_sock, &uca->ctrl_sock) ||
174 				put_user(ca.intr_sock, &uca->intr_sock) ||
175 				put_user(ca.parser, &uca->parser) ||
176 				put_user(ca.rd_size, &uca->rd_size) ||
177 				put_user(compat_ptr(ca.rd_data), &uca->rd_data) ||
178 				put_user(ca.country, &uca->country) ||
179 				put_user(ca.subclass, &uca->subclass) ||
180 				put_user(ca.vendor, &uca->vendor) ||
181 				put_user(ca.product, &uca->product) ||
182 				put_user(ca.version, &uca->version) ||
183 				put_user(ca.flags, &uca->flags) ||
184 				put_user(ca.idle_to, &uca->idle_to) ||
185 				copy_to_user(&uca->name[0], &ca.name[0], 128))
186 			return -EFAULT;
187 
188 		arg = (unsigned long) uca;
189 
190 		/* Fall through. We don't actually write back any _changes_
191 		   to the structure anyway, so there's no need to copy back
192 		   into the original compat version */
193 	}
194 
195 	return hidp_sock_ioctl(sock, cmd, arg);
196 }
197 #endif
198 
199 static const struct proto_ops hidp_sock_ops = {
200 	.family		= PF_BLUETOOTH,
201 	.owner		= THIS_MODULE,
202 	.release	= hidp_sock_release,
203 	.ioctl		= hidp_sock_ioctl,
204 #ifdef CONFIG_COMPAT
205 	.compat_ioctl	= hidp_sock_compat_ioctl,
206 #endif
207 	.bind		= sock_no_bind,
208 	.getname	= sock_no_getname,
209 	.sendmsg	= sock_no_sendmsg,
210 	.recvmsg	= sock_no_recvmsg,
211 	.listen		= sock_no_listen,
212 	.shutdown	= sock_no_shutdown,
213 	.setsockopt	= sock_no_setsockopt,
214 	.getsockopt	= sock_no_getsockopt,
215 	.connect	= sock_no_connect,
216 	.socketpair	= sock_no_socketpair,
217 	.accept		= sock_no_accept,
218 	.mmap		= sock_no_mmap
219 };
220 
221 static struct proto hidp_proto = {
222 	.name		= "HIDP",
223 	.owner		= THIS_MODULE,
224 	.obj_size	= sizeof(struct bt_sock)
225 };
226 
227 static int hidp_sock_create(struct net *net, struct socket *sock, int protocol,
228 			    int kern)
229 {
230 	struct sock *sk;
231 
232 	BT_DBG("sock %p", sock);
233 
234 	if (sock->type != SOCK_RAW)
235 		return -ESOCKTNOSUPPORT;
236 
237 	sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hidp_proto, kern);
238 	if (!sk)
239 		return -ENOMEM;
240 
241 	sock_init_data(sock, sk);
242 
243 	sock->ops = &hidp_sock_ops;
244 
245 	sock->state = SS_UNCONNECTED;
246 
247 	sock_reset_flag(sk, SOCK_ZAPPED);
248 
249 	sk->sk_protocol = protocol;
250 	sk->sk_state	= BT_OPEN;
251 
252 	bt_sock_link(&hidp_sk_list, sk);
253 
254 	return 0;
255 }
256 
257 static const struct net_proto_family hidp_sock_family_ops = {
258 	.family	= PF_BLUETOOTH,
259 	.owner	= THIS_MODULE,
260 	.create	= hidp_sock_create
261 };
262 
263 int __init hidp_init_sockets(void)
264 {
265 	int err;
266 
267 	err = proto_register(&hidp_proto, 0);
268 	if (err < 0)
269 		return err;
270 
271 	err = bt_sock_register(BTPROTO_HIDP, &hidp_sock_family_ops);
272 	if (err < 0) {
273 		BT_ERR("Can't register HIDP socket");
274 		goto error;
275 	}
276 
277 	err = bt_procfs_init(&init_net, "hidp", &hidp_sk_list, NULL);
278 	if (err < 0) {
279 		BT_ERR("Failed to create HIDP proc file");
280 		bt_sock_unregister(BTPROTO_HIDP);
281 		goto error;
282 	}
283 
284 	BT_INFO("HIDP socket layer initialized");
285 
286 	return 0;
287 
288 error:
289 	proto_unregister(&hidp_proto);
290 	return err;
291 }
292 
293 void __exit hidp_cleanup_sockets(void)
294 {
295 	bt_procfs_cleanup(&init_net, "hidp");
296 	bt_sock_unregister(BTPROTO_HIDP);
297 	proto_unregister(&hidp_proto);
298 }
299