[IPG]: add IP1000A driver to kernel tree
[linux-2.6] / net / bluetooth / hci_conn.c
1 /*
2    BlueZ - Bluetooth protocol stack for Linux
3    Copyright (C) 2000-2001 Qualcomm Incorporated
4
5    Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License version 2 as
9    published by the Free Software Foundation;
10
11    THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
12    OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
13    FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
14    IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
15    CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
16    WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17    ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18    OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19
20    ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
21    COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
22    SOFTWARE IS DISCLAIMED.
23 */
24
25 /* Bluetooth HCI connection handling. */
26
27 #include <linux/module.h>
28
29 #include <linux/types.h>
30 #include <linux/errno.h>
31 #include <linux/kernel.h>
32 #include <linux/slab.h>
33 #include <linux/poll.h>
34 #include <linux/fcntl.h>
35 #include <linux/init.h>
36 #include <linux/skbuff.h>
37 #include <linux/interrupt.h>
38 #include <linux/notifier.h>
39 #include <net/sock.h>
40
41 #include <asm/system.h>
42 #include <asm/uaccess.h>
43 #include <asm/unaligned.h>
44
45 #include <net/bluetooth/bluetooth.h>
46 #include <net/bluetooth/hci_core.h>
47
48 #ifndef CONFIG_BT_HCI_CORE_DEBUG
49 #undef  BT_DBG
50 #define BT_DBG(D...)
51 #endif
52
53 void hci_acl_connect(struct hci_conn *conn)
54 {
55         struct hci_dev *hdev = conn->hdev;
56         struct inquiry_entry *ie;
57         struct hci_cp_create_conn cp;
58
59         BT_DBG("%p", conn);
60
61         conn->state = BT_CONNECT;
62         conn->out   = 1;
63         conn->link_mode = HCI_LM_MASTER;
64
65         conn->attempt++;
66
67         memset(&cp, 0, sizeof(cp));
68         bacpy(&cp.bdaddr, &conn->dst);
69         cp.pscan_rep_mode = 0x02;
70
71         if ((ie = hci_inquiry_cache_lookup(hdev, &conn->dst)) &&
72                         inquiry_entry_age(ie) <= INQUIRY_ENTRY_AGE_MAX) {
73                 cp.pscan_rep_mode = ie->data.pscan_rep_mode;
74                 cp.pscan_mode     = ie->data.pscan_mode;
75                 cp.clock_offset   = ie->data.clock_offset | cpu_to_le16(0x8000);
76                 memcpy(conn->dev_class, ie->data.dev_class, 3);
77         }
78
79         cp.pkt_type = cpu_to_le16(hdev->pkt_type & ACL_PTYPE_MASK);
80         if (lmp_rswitch_capable(hdev) && !(hdev->link_mode & HCI_LM_MASTER))
81                 cp.role_switch  = 0x01;
82         else
83                 cp.role_switch  = 0x00;
84
85         hci_send_cmd(hdev, OGF_LINK_CTL, OCF_CREATE_CONN, sizeof(cp), &cp);
86 }
87
88 static void hci_acl_connect_cancel(struct hci_conn *conn)
89 {
90         struct hci_cp_create_conn_cancel cp;
91
92         BT_DBG("%p", conn);
93
94         if (conn->hdev->hci_ver < 2)
95                 return;
96
97         bacpy(&cp.bdaddr, &conn->dst);
98         hci_send_cmd(conn->hdev, OGF_LINK_CTL,
99                                 OCF_CREATE_CONN_CANCEL, sizeof(cp), &cp);
100 }
101
102 void hci_acl_disconn(struct hci_conn *conn, __u8 reason)
103 {
104         struct hci_cp_disconnect cp;
105
106         BT_DBG("%p", conn);
107
108         conn->state = BT_DISCONN;
109
110         cp.handle = cpu_to_le16(conn->handle);
111         cp.reason = reason;
112         hci_send_cmd(conn->hdev, OGF_LINK_CTL,
113                                 OCF_DISCONNECT, sizeof(cp), &cp);
114 }
115
116 void hci_add_sco(struct hci_conn *conn, __u16 handle)
117 {
118         struct hci_dev *hdev = conn->hdev;
119         struct hci_cp_add_sco cp;
120
121         BT_DBG("%p", conn);
122
123         conn->state = BT_CONNECT;
124         conn->out = 1;
125
126         cp.handle   = cpu_to_le16(handle);
127         cp.pkt_type = cpu_to_le16(hdev->pkt_type & SCO_PTYPE_MASK);
128
129         hci_send_cmd(hdev, OGF_LINK_CTL, OCF_ADD_SCO, sizeof(cp), &cp);
130 }
131
132 static void hci_conn_timeout(unsigned long arg)
133 {
134         struct hci_conn *conn = (void *) arg;
135         struct hci_dev *hdev = conn->hdev;
136
137         BT_DBG("conn %p state %d", conn, conn->state);
138
139         if (atomic_read(&conn->refcnt))
140                 return;
141
142         hci_dev_lock(hdev);
143
144         switch (conn->state) {
145         case BT_CONNECT:
146                 hci_acl_connect_cancel(conn);
147                 break;
148         case BT_CONNECTED:
149                 hci_acl_disconn(conn, 0x13);
150                 break;
151         default:
152                 conn->state = BT_CLOSED;
153                 break;
154         }
155
156         hci_dev_unlock(hdev);
157 }
158
159 static void hci_conn_idle(unsigned long arg)
160 {
161         struct hci_conn *conn = (void *) arg;
162
163         BT_DBG("conn %p mode %d", conn, conn->mode);
164
165         hci_conn_enter_sniff_mode(conn);
166 }
167
168 struct hci_conn *hci_conn_add(struct hci_dev *hdev, int type, bdaddr_t *dst)
169 {
170         struct hci_conn *conn;
171
172         BT_DBG("%s dst %s", hdev->name, batostr(dst));
173
174         conn = kzalloc(sizeof(struct hci_conn), GFP_ATOMIC);
175         if (!conn)
176                 return NULL;
177
178         bacpy(&conn->dst, dst);
179         conn->hdev   = hdev;
180         conn->type   = type;
181         conn->mode   = HCI_CM_ACTIVE;
182         conn->state  = BT_OPEN;
183
184         conn->power_save = 1;
185
186         skb_queue_head_init(&conn->data_q);
187
188         init_timer(&conn->disc_timer);
189         conn->disc_timer.function = hci_conn_timeout;
190         conn->disc_timer.data = (unsigned long) conn;
191
192         init_timer(&conn->idle_timer);
193         conn->idle_timer.function = hci_conn_idle;
194         conn->idle_timer.data = (unsigned long) conn;
195
196         atomic_set(&conn->refcnt, 0);
197
198         hci_dev_hold(hdev);
199
200         tasklet_disable(&hdev->tx_task);
201
202         hci_conn_hash_add(hdev, conn);
203         if (hdev->notify)
204                 hdev->notify(hdev, HCI_NOTIFY_CONN_ADD);
205
206         hci_conn_add_sysfs(conn);
207
208         tasklet_enable(&hdev->tx_task);
209
210         return conn;
211 }
212
213 int hci_conn_del(struct hci_conn *conn)
214 {
215         struct hci_dev *hdev = conn->hdev;
216
217         BT_DBG("%s conn %p handle %d", hdev->name, conn, conn->handle);
218
219         del_timer(&conn->idle_timer);
220
221         del_timer(&conn->disc_timer);
222
223         if (conn->type == ACL_LINK) {
224                 struct hci_conn *sco = conn->link;
225                 if (sco)
226                         sco->link = NULL;
227
228                 /* Unacked frames */
229                 hdev->acl_cnt += conn->sent;
230         } else {
231                 struct hci_conn *acl = conn->link;
232                 if (acl) {
233                         acl->link = NULL;
234                         hci_conn_put(acl);
235                 }
236         }
237
238         tasklet_disable(&hdev->tx_task);
239
240         hci_conn_del_sysfs(conn);
241
242         hci_conn_hash_del(hdev, conn);
243         if (hdev->notify)
244                 hdev->notify(hdev, HCI_NOTIFY_CONN_DEL);
245
246         tasklet_enable(&hdev->tx_task);
247
248         skb_queue_purge(&conn->data_q);
249
250         hci_dev_put(hdev);
251
252         /* will free via device release */
253         put_device(&conn->dev);
254
255         return 0;
256 }
257
258 struct hci_dev *hci_get_route(bdaddr_t *dst, bdaddr_t *src)
259 {
260         int use_src = bacmp(src, BDADDR_ANY);
261         struct hci_dev *hdev = NULL;
262         struct list_head *p;
263
264         BT_DBG("%s -> %s", batostr(src), batostr(dst));
265
266         read_lock_bh(&hci_dev_list_lock);
267
268         list_for_each(p, &hci_dev_list) {
269                 struct hci_dev *d = list_entry(p, struct hci_dev, list);
270
271                 if (!test_bit(HCI_UP, &d->flags) || test_bit(HCI_RAW, &d->flags))
272                         continue;
273
274                 /* Simple routing:
275                  *   No source address - find interface with bdaddr != dst
276                  *   Source address    - find interface with bdaddr == src
277                  */
278
279                 if (use_src) {
280                         if (!bacmp(&d->bdaddr, src)) {
281                                 hdev = d; break;
282                         }
283                 } else {
284                         if (bacmp(&d->bdaddr, dst)) {
285                                 hdev = d; break;
286                         }
287                 }
288         }
289
290         if (hdev)
291                 hdev = hci_dev_hold(hdev);
292
293         read_unlock_bh(&hci_dev_list_lock);
294         return hdev;
295 }
296 EXPORT_SYMBOL(hci_get_route);
297
298 /* Create SCO or ACL connection.
299  * Device _must_ be locked */
300 struct hci_conn *hci_connect(struct hci_dev *hdev, int type, bdaddr_t *dst)
301 {
302         struct hci_conn *acl;
303         struct hci_conn *sco;
304
305         BT_DBG("%s dst %s", hdev->name, batostr(dst));
306
307         if (!(acl = hci_conn_hash_lookup_ba(hdev, ACL_LINK, dst))) {
308                 if (!(acl = hci_conn_add(hdev, ACL_LINK, dst)))
309                         return NULL;
310         }
311
312         hci_conn_hold(acl);
313
314         if (acl->state == BT_OPEN || acl->state == BT_CLOSED)
315                 hci_acl_connect(acl);
316
317         if (type == ACL_LINK)
318                 return acl;
319
320         if (!(sco = hci_conn_hash_lookup_ba(hdev, type, dst))) {
321                 if (!(sco = hci_conn_add(hdev, type, dst))) {
322                         hci_conn_put(acl);
323                         return NULL;
324                 }
325         }
326
327         acl->link = sco;
328         sco->link = acl;
329
330         hci_conn_hold(sco);
331
332         if (acl->state == BT_CONNECTED &&
333                         (sco->state == BT_OPEN || sco->state == BT_CLOSED))
334                 hci_add_sco(sco, acl->handle);
335
336         return sco;
337 }
338 EXPORT_SYMBOL(hci_connect);
339
340 /* Authenticate remote device */
341 int hci_conn_auth(struct hci_conn *conn)
342 {
343         BT_DBG("conn %p", conn);
344
345         if (conn->link_mode & HCI_LM_AUTH)
346                 return 1;
347
348         if (!test_and_set_bit(HCI_CONN_AUTH_PEND, &conn->pend)) {
349                 struct hci_cp_auth_requested cp;
350                 cp.handle = cpu_to_le16(conn->handle);
351                 hci_send_cmd(conn->hdev, OGF_LINK_CTL, OCF_AUTH_REQUESTED, sizeof(cp), &cp);
352         }
353         return 0;
354 }
355 EXPORT_SYMBOL(hci_conn_auth);
356
357 /* Enable encryption */
358 int hci_conn_encrypt(struct hci_conn *conn)
359 {
360         BT_DBG("conn %p", conn);
361
362         if (conn->link_mode & HCI_LM_ENCRYPT)
363                 return 1;
364
365         if (test_and_set_bit(HCI_CONN_ENCRYPT_PEND, &conn->pend))
366                 return 0;
367
368         if (hci_conn_auth(conn)) {
369                 struct hci_cp_set_conn_encrypt cp;
370                 cp.handle  = cpu_to_le16(conn->handle);
371                 cp.encrypt = 1;
372                 hci_send_cmd(conn->hdev, OGF_LINK_CTL, OCF_SET_CONN_ENCRYPT, sizeof(cp), &cp);
373         }
374         return 0;
375 }
376 EXPORT_SYMBOL(hci_conn_encrypt);
377
378 /* Change link key */
379 int hci_conn_change_link_key(struct hci_conn *conn)
380 {
381         BT_DBG("conn %p", conn);
382
383         if (!test_and_set_bit(HCI_CONN_AUTH_PEND, &conn->pend)) {
384                 struct hci_cp_change_conn_link_key cp;
385                 cp.handle = cpu_to_le16(conn->handle);
386                 hci_send_cmd(conn->hdev, OGF_LINK_CTL, OCF_CHANGE_CONN_LINK_KEY, sizeof(cp), &cp);
387         }
388         return 0;
389 }
390 EXPORT_SYMBOL(hci_conn_change_link_key);
391
392 /* Switch role */
393 int hci_conn_switch_role(struct hci_conn *conn, uint8_t role)
394 {
395         BT_DBG("conn %p", conn);
396
397         if (!role && conn->link_mode & HCI_LM_MASTER)
398                 return 1;
399
400         if (!test_and_set_bit(HCI_CONN_RSWITCH_PEND, &conn->pend)) {
401                 struct hci_cp_switch_role cp;
402                 bacpy(&cp.bdaddr, &conn->dst);
403                 cp.role = role;
404                 hci_send_cmd(conn->hdev, OGF_LINK_POLICY, OCF_SWITCH_ROLE, sizeof(cp), &cp);
405         }
406         return 0;
407 }
408 EXPORT_SYMBOL(hci_conn_switch_role);
409
410 /* Enter active mode */
411 void hci_conn_enter_active_mode(struct hci_conn *conn)
412 {
413         struct hci_dev *hdev = conn->hdev;
414
415         BT_DBG("conn %p mode %d", conn, conn->mode);
416
417         if (test_bit(HCI_RAW, &hdev->flags))
418                 return;
419
420         if (conn->mode != HCI_CM_SNIFF || !conn->power_save)
421                 goto timer;
422
423         if (!test_and_set_bit(HCI_CONN_MODE_CHANGE_PEND, &conn->pend)) {
424                 struct hci_cp_exit_sniff_mode cp;
425                 cp.handle = cpu_to_le16(conn->handle);
426                 hci_send_cmd(hdev, OGF_LINK_POLICY,
427                                 OCF_EXIT_SNIFF_MODE, sizeof(cp), &cp);
428         }
429
430 timer:
431         if (hdev->idle_timeout > 0)
432                 mod_timer(&conn->idle_timer,
433                         jiffies + msecs_to_jiffies(hdev->idle_timeout));
434 }
435
436 /* Enter sniff mode */
437 void hci_conn_enter_sniff_mode(struct hci_conn *conn)
438 {
439         struct hci_dev *hdev = conn->hdev;
440
441         BT_DBG("conn %p mode %d", conn, conn->mode);
442
443         if (test_bit(HCI_RAW, &hdev->flags))
444                 return;
445
446         if (!lmp_sniff_capable(hdev) || !lmp_sniff_capable(conn))
447                 return;
448
449         if (conn->mode != HCI_CM_ACTIVE || !(conn->link_policy & HCI_LP_SNIFF))
450                 return;
451
452         if (lmp_sniffsubr_capable(hdev) && lmp_sniffsubr_capable(conn)) {
453                 struct hci_cp_sniff_subrate cp;
454                 cp.handle             = cpu_to_le16(conn->handle);
455                 cp.max_latency        = cpu_to_le16(0);
456                 cp.min_remote_timeout = cpu_to_le16(0);
457                 cp.min_local_timeout  = cpu_to_le16(0);
458                 hci_send_cmd(hdev, OGF_LINK_POLICY,
459                                 OCF_SNIFF_SUBRATE, sizeof(cp), &cp);
460         }
461
462         if (!test_and_set_bit(HCI_CONN_MODE_CHANGE_PEND, &conn->pend)) {
463                 struct hci_cp_sniff_mode cp;
464                 cp.handle       = cpu_to_le16(conn->handle);
465                 cp.max_interval = cpu_to_le16(hdev->sniff_max_interval);
466                 cp.min_interval = cpu_to_le16(hdev->sniff_min_interval);
467                 cp.attempt      = cpu_to_le16(4);
468                 cp.timeout      = cpu_to_le16(1);
469                 hci_send_cmd(hdev, OGF_LINK_POLICY,
470                                 OCF_SNIFF_MODE, sizeof(cp), &cp);
471         }
472 }
473
474 /* Drop all connection on the device */
475 void hci_conn_hash_flush(struct hci_dev *hdev)
476 {
477         struct hci_conn_hash *h = &hdev->conn_hash;
478         struct list_head *p;
479
480         BT_DBG("hdev %s", hdev->name);
481
482         p = h->list.next;
483         while (p != &h->list) {
484                 struct hci_conn *c;
485
486                 c = list_entry(p, struct hci_conn, list);
487                 p = p->next;
488
489                 c->state = BT_CLOSED;
490
491                 hci_proto_disconn_ind(c, 0x16);
492                 hci_conn_del(c);
493         }
494 }
495
496 int hci_get_conn_list(void __user *arg)
497 {
498         struct hci_conn_list_req req, *cl;
499         struct hci_conn_info *ci;
500         struct hci_dev *hdev;
501         struct list_head *p;
502         int n = 0, size, err;
503
504         if (copy_from_user(&req, arg, sizeof(req)))
505                 return -EFAULT;
506
507         if (!req.conn_num || req.conn_num > (PAGE_SIZE * 2) / sizeof(*ci))
508                 return -EINVAL;
509
510         size = sizeof(req) + req.conn_num * sizeof(*ci);
511
512         if (!(cl = kmalloc(size, GFP_KERNEL)))
513                 return -ENOMEM;
514
515         if (!(hdev = hci_dev_get(req.dev_id))) {
516                 kfree(cl);
517                 return -ENODEV;
518         }
519
520         ci = cl->conn_info;
521
522         hci_dev_lock_bh(hdev);
523         list_for_each(p, &hdev->conn_hash.list) {
524                 register struct hci_conn *c;
525                 c = list_entry(p, struct hci_conn, list);
526
527                 bacpy(&(ci + n)->bdaddr, &c->dst);
528                 (ci + n)->handle = c->handle;
529                 (ci + n)->type  = c->type;
530                 (ci + n)->out   = c->out;
531                 (ci + n)->state = c->state;
532                 (ci + n)->link_mode = c->link_mode;
533                 if (++n >= req.conn_num)
534                         break;
535         }
536         hci_dev_unlock_bh(hdev);
537
538         cl->dev_id = hdev->id;
539         cl->conn_num = n;
540         size = sizeof(req) + n * sizeof(*ci);
541
542         hci_dev_put(hdev);
543
544         err = copy_to_user(arg, cl, size);
545         kfree(cl);
546
547         return err ? -EFAULT : 0;
548 }
549
550 int hci_get_conn_info(struct hci_dev *hdev, void __user *arg)
551 {
552         struct hci_conn_info_req req;
553         struct hci_conn_info ci;
554         struct hci_conn *conn;
555         char __user *ptr = arg + sizeof(req);
556
557         if (copy_from_user(&req, arg, sizeof(req)))
558                 return -EFAULT;
559
560         hci_dev_lock_bh(hdev);
561         conn = hci_conn_hash_lookup_ba(hdev, req.type, &req.bdaddr);
562         if (conn) {
563                 bacpy(&ci.bdaddr, &conn->dst);
564                 ci.handle = conn->handle;
565                 ci.type  = conn->type;
566                 ci.out   = conn->out;
567                 ci.state = conn->state;
568                 ci.link_mode = conn->link_mode;
569         }
570         hci_dev_unlock_bh(hdev);
571
572         if (!conn)
573                 return -ENOENT;
574
575         return copy_to_user(ptr, &ci, sizeof(ci)) ? -EFAULT : 0;
576 }