Commit | Line | Data |
---|---|---|
18722c24 | 1 | /* |
6b8d4a6a | 2 | Copyright (c) 2013-2014 Intel Corp. |
18722c24 JR |
3 | |
4 | This program is free software; you can redistribute it and/or modify | |
5 | it under the terms of the GNU General Public License version 2 and | |
6 | only version 2 as published by the Free Software Foundation. | |
7 | ||
8 | This program is distributed in the hope that it will be useful, | |
9 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
10 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
11 | GNU General Public License for more details. | |
12 | */ | |
13 | ||
18722c24 JR |
14 | #include <linux/if_arp.h> |
15 | #include <linux/netdevice.h> | |
16 | #include <linux/etherdevice.h> | |
5547e48c | 17 | #include <linux/module.h> |
6b8d4a6a | 18 | #include <linux/debugfs.h> |
18722c24 JR |
19 | |
20 | #include <net/ipv6.h> | |
21 | #include <net/ip6_route.h> | |
22 | #include <net/addrconf.h> | |
23 | ||
24 | #include <net/af_ieee802154.h> /* to get the address type */ | |
25 | ||
26 | #include <net/bluetooth/bluetooth.h> | |
27 | #include <net/bluetooth/hci_core.h> | |
28 | #include <net/bluetooth/l2cap.h> | |
29 | ||
cefc8c8a | 30 | #include <net/6lowpan.h> /* for the compression support */ |
18722c24 | 31 | |
6b8d4a6a JR |
32 | #define VERSION "0.1" |
33 | ||
34 | static struct dentry *lowpan_psm_debugfs; | |
35 | static struct dentry *lowpan_control_debugfs; | |
36 | ||
18722c24 JR |
37 | #define IFACE_NAME_TEMPLATE "bt%d" |
38 | #define EUI64_ADDR_LEN 8 | |
39 | ||
40 | struct skb_cb { | |
41 | struct in6_addr addr; | |
39e90c77 | 42 | struct in6_addr gw; |
6b8d4a6a JR |
43 | struct l2cap_chan *chan; |
44 | int status; | |
18722c24 JR |
45 | }; |
46 | #define lowpan_cb(skb) ((struct skb_cb *)((skb)->cb)) | |
47 | ||
48 | /* The devices list contains those devices that we are acting | |
49 | * as a proxy. The BT 6LoWPAN device is a virtual device that | |
50 | * connects to the Bluetooth LE device. The real connection to | |
51 | * BT device is done via l2cap layer. There exists one | |
52 | * virtual device / one BT 6LoWPAN network (=hciX device). | |
53 | * The list contains struct lowpan_dev elements. | |
54 | */ | |
55 | static LIST_HEAD(bt_6lowpan_devices); | |
56 | static DEFINE_RWLOCK(devices_lock); | |
57 | ||
6b8d4a6a JR |
58 | /* If psm is set to 0 (default value), then 6lowpan is disabled. |
59 | * Other values are used to indicate a Protocol Service Multiplexer | |
60 | * value for 6lowpan. | |
61 | */ | |
62 | static u16 psm_6lowpan; | |
63 | ||
64 | /* We are listening incoming connections via this channel | |
65 | */ | |
66 | static struct l2cap_chan *listen_chan; | |
67 | ||
18722c24 JR |
68 | struct lowpan_peer { |
69 | struct list_head list; | |
6b8d4a6a | 70 | struct l2cap_chan *chan; |
18722c24 JR |
71 | |
72 | /* peer addresses in various formats */ | |
73 | unsigned char eui64_addr[EUI64_ADDR_LEN]; | |
74 | struct in6_addr peer_addr; | |
75 | }; | |
76 | ||
77 | struct lowpan_dev { | |
78 | struct list_head list; | |
79 | ||
80 | struct hci_dev *hdev; | |
81 | struct net_device *netdev; | |
82 | struct list_head peers; | |
83 | atomic_t peer_count; /* number of items in peers list */ | |
84 | ||
85 | struct work_struct delete_netdev; | |
86 | struct delayed_work notify_peers; | |
87 | }; | |
88 | ||
89 | static inline struct lowpan_dev *lowpan_dev(const struct net_device *netdev) | |
90 | { | |
91 | return netdev_priv(netdev); | |
92 | } | |
93 | ||
94 | static inline void peer_add(struct lowpan_dev *dev, struct lowpan_peer *peer) | |
95 | { | |
96 | list_add(&peer->list, &dev->peers); | |
97 | atomic_inc(&dev->peer_count); | |
98 | } | |
99 | ||
100 | static inline bool peer_del(struct lowpan_dev *dev, struct lowpan_peer *peer) | |
101 | { | |
102 | list_del(&peer->list); | |
103 | ||
18d93c17 JR |
104 | module_put(THIS_MODULE); |
105 | ||
18722c24 JR |
106 | if (atomic_dec_and_test(&dev->peer_count)) { |
107 | BT_DBG("last peer"); | |
108 | return true; | |
109 | } | |
110 | ||
111 | return false; | |
112 | } | |
113 | ||
114 | static inline struct lowpan_peer *peer_lookup_ba(struct lowpan_dev *dev, | |
115 | bdaddr_t *ba, __u8 type) | |
116 | { | |
117 | struct lowpan_peer *peer, *tmp; | |
118 | ||
119 | BT_DBG("peers %d addr %pMR type %d", atomic_read(&dev->peer_count), | |
120 | ba, type); | |
121 | ||
122 | list_for_each_entry_safe(peer, tmp, &dev->peers, list) { | |
6b8d4a6a JR |
123 | BT_DBG("dst addr %pMR dst type %d", |
124 | &peer->chan->dst, peer->chan->dst_type); | |
18722c24 | 125 | |
6b8d4a6a | 126 | if (bacmp(&peer->chan->dst, ba)) |
18722c24 JR |
127 | continue; |
128 | ||
6b8d4a6a JR |
129 | if (type == peer->chan->dst_type) |
130 | return peer; | |
131 | } | |
132 | ||
133 | return NULL; | |
134 | } | |
135 | ||
136 | static inline struct lowpan_peer *peer_lookup_chan(struct lowpan_dev *dev, | |
137 | struct l2cap_chan *chan) | |
138 | { | |
139 | struct lowpan_peer *peer, *tmp; | |
140 | ||
141 | list_for_each_entry_safe(peer, tmp, &dev->peers, list) { | |
142 | if (peer->chan == chan) | |
18722c24 JR |
143 | return peer; |
144 | } | |
145 | ||
146 | return NULL; | |
147 | } | |
148 | ||
149 | static inline struct lowpan_peer *peer_lookup_conn(struct lowpan_dev *dev, | |
150 | struct l2cap_conn *conn) | |
151 | { | |
152 | struct lowpan_peer *peer, *tmp; | |
153 | ||
154 | list_for_each_entry_safe(peer, tmp, &dev->peers, list) { | |
6b8d4a6a | 155 | if (peer->chan->conn == conn) |
18722c24 JR |
156 | return peer; |
157 | } | |
158 | ||
159 | return NULL; | |
160 | } | |
161 | ||
39e90c77 JR |
162 | static inline struct lowpan_peer *peer_lookup_dst(struct lowpan_dev *dev, |
163 | struct in6_addr *daddr, | |
164 | struct sk_buff *skb) | |
165 | { | |
166 | struct lowpan_peer *peer, *tmp; | |
167 | struct in6_addr *nexthop; | |
168 | struct rt6_info *rt = (struct rt6_info *)skb_dst(skb); | |
169 | int count = atomic_read(&dev->peer_count); | |
170 | ||
171 | BT_DBG("peers %d addr %pI6c rt %p", count, daddr, rt); | |
172 | ||
173 | /* If we have multiple 6lowpan peers, then check where we should | |
174 | * send the packet. If only one peer exists, then we can send the | |
175 | * packet right away. | |
176 | */ | |
177 | if (count == 1) | |
178 | return list_first_entry(&dev->peers, struct lowpan_peer, | |
179 | list); | |
180 | ||
181 | if (!rt) { | |
182 | nexthop = &lowpan_cb(skb)->gw; | |
183 | ||
184 | if (ipv6_addr_any(nexthop)) | |
185 | return NULL; | |
186 | } else { | |
187 | nexthop = rt6_nexthop(rt); | |
188 | ||
189 | /* We need to remember the address because it is needed | |
190 | * by bt_xmit() when sending the packet. In bt_xmit(), the | |
191 | * destination routing info is not set. | |
192 | */ | |
193 | memcpy(&lowpan_cb(skb)->gw, nexthop, sizeof(struct in6_addr)); | |
194 | } | |
195 | ||
196 | BT_DBG("gw %pI6c", nexthop); | |
197 | ||
198 | list_for_each_entry_safe(peer, tmp, &dev->peers, list) { | |
199 | BT_DBG("dst addr %pMR dst type %d ip %pI6c", | |
200 | &peer->chan->dst, peer->chan->dst_type, | |
201 | &peer->peer_addr); | |
202 | ||
203 | if (!ipv6_addr_cmp(&peer->peer_addr, nexthop)) | |
204 | return peer; | |
205 | } | |
206 | ||
207 | return NULL; | |
208 | } | |
209 | ||
18722c24 JR |
210 | static struct lowpan_peer *lookup_peer(struct l2cap_conn *conn) |
211 | { | |
212 | struct lowpan_dev *entry, *tmp; | |
213 | struct lowpan_peer *peer = NULL; | |
214 | unsigned long flags; | |
215 | ||
216 | read_lock_irqsave(&devices_lock, flags); | |
217 | ||
218 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, list) { | |
219 | peer = peer_lookup_conn(entry, conn); | |
220 | if (peer) | |
221 | break; | |
222 | } | |
223 | ||
224 | read_unlock_irqrestore(&devices_lock, flags); | |
225 | ||
226 | return peer; | |
227 | } | |
228 | ||
229 | static struct lowpan_dev *lookup_dev(struct l2cap_conn *conn) | |
230 | { | |
231 | struct lowpan_dev *entry, *tmp; | |
232 | struct lowpan_dev *dev = NULL; | |
233 | unsigned long flags; | |
234 | ||
235 | read_lock_irqsave(&devices_lock, flags); | |
236 | ||
237 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, list) { | |
238 | if (conn->hcon->hdev == entry->hdev) { | |
239 | dev = entry; | |
240 | break; | |
241 | } | |
242 | } | |
243 | ||
244 | read_unlock_irqrestore(&devices_lock, flags); | |
245 | ||
246 | return dev; | |
247 | } | |
248 | ||
18722c24 JR |
249 | static int give_skb_to_upper(struct sk_buff *skb, struct net_device *dev) |
250 | { | |
251 | struct sk_buff *skb_cp; | |
252 | int ret; | |
253 | ||
254 | skb_cp = skb_copy(skb, GFP_ATOMIC); | |
255 | if (!skb_cp) | |
256 | return -ENOMEM; | |
257 | ||
258 | ret = netif_rx(skb_cp); | |
6b8d4a6a JR |
259 | if (ret < 0) { |
260 | BT_DBG("receive skb %d", ret); | |
18722c24 | 261 | return NET_RX_DROP; |
6b8d4a6a | 262 | } |
18722c24 JR |
263 | |
264 | return ret; | |
265 | } | |
266 | ||
267 | static int process_data(struct sk_buff *skb, struct net_device *netdev, | |
6b8d4a6a | 268 | struct l2cap_chan *chan) |
18722c24 JR |
269 | { |
270 | const u8 *saddr, *daddr; | |
271 | u8 iphc0, iphc1; | |
272 | struct lowpan_dev *dev; | |
273 | struct lowpan_peer *peer; | |
274 | unsigned long flags; | |
275 | ||
276 | dev = lowpan_dev(netdev); | |
277 | ||
278 | read_lock_irqsave(&devices_lock, flags); | |
6b8d4a6a | 279 | peer = peer_lookup_chan(dev, chan); |
18722c24 JR |
280 | read_unlock_irqrestore(&devices_lock, flags); |
281 | if (!peer) | |
282 | goto drop; | |
283 | ||
284 | saddr = peer->eui64_addr; | |
285 | daddr = dev->netdev->dev_addr; | |
286 | ||
287 | /* at least two bytes will be used for the encoding */ | |
288 | if (skb->len < 2) | |
289 | goto drop; | |
290 | ||
291 | if (lowpan_fetch_skb_u8(skb, &iphc0)) | |
292 | goto drop; | |
293 | ||
294 | if (lowpan_fetch_skb_u8(skb, &iphc1)) | |
295 | goto drop; | |
296 | ||
297 | return lowpan_process_data(skb, netdev, | |
298 | saddr, IEEE802154_ADDR_LONG, EUI64_ADDR_LEN, | |
299 | daddr, IEEE802154_ADDR_LONG, EUI64_ADDR_LEN, | |
300 | iphc0, iphc1, give_skb_to_upper); | |
301 | ||
302 | drop: | |
303 | kfree_skb(skb); | |
304 | return -EINVAL; | |
305 | } | |
306 | ||
307 | static int recv_pkt(struct sk_buff *skb, struct net_device *dev, | |
6b8d4a6a | 308 | struct l2cap_chan *chan) |
18722c24 JR |
309 | { |
310 | struct sk_buff *local_skb; | |
311 | int ret; | |
312 | ||
313 | if (!netif_running(dev)) | |
314 | goto drop; | |
315 | ||
316 | if (dev->type != ARPHRD_6LOWPAN) | |
317 | goto drop; | |
318 | ||
319 | /* check that it's our buffer */ | |
320 | if (skb->data[0] == LOWPAN_DISPATCH_IPV6) { | |
321 | /* Copy the packet so that the IPv6 header is | |
322 | * properly aligned. | |
323 | */ | |
324 | local_skb = skb_copy_expand(skb, NET_SKB_PAD - 1, | |
325 | skb_tailroom(skb), GFP_ATOMIC); | |
326 | if (!local_skb) | |
327 | goto drop; | |
328 | ||
329 | local_skb->protocol = htons(ETH_P_IPV6); | |
330 | local_skb->pkt_type = PACKET_HOST; | |
331 | ||
332 | skb_reset_network_header(local_skb); | |
333 | skb_set_transport_header(local_skb, sizeof(struct ipv6hdr)); | |
334 | ||
335 | if (give_skb_to_upper(local_skb, dev) != NET_RX_SUCCESS) { | |
336 | kfree_skb(local_skb); | |
337 | goto drop; | |
338 | } | |
339 | ||
340 | dev->stats.rx_bytes += skb->len; | |
341 | dev->stats.rx_packets++; | |
342 | ||
343 | kfree_skb(local_skb); | |
344 | kfree_skb(skb); | |
345 | } else { | |
346 | switch (skb->data[0] & 0xe0) { | |
347 | case LOWPAN_DISPATCH_IPHC: /* ipv6 datagram */ | |
348 | local_skb = skb_clone(skb, GFP_ATOMIC); | |
349 | if (!local_skb) | |
350 | goto drop; | |
351 | ||
6b8d4a6a | 352 | ret = process_data(local_skb, dev, chan); |
18722c24 JR |
353 | if (ret != NET_RX_SUCCESS) |
354 | goto drop; | |
355 | ||
356 | dev->stats.rx_bytes += skb->len; | |
357 | dev->stats.rx_packets++; | |
358 | ||
359 | kfree_skb(skb); | |
360 | break; | |
361 | default: | |
362 | break; | |
363 | } | |
364 | } | |
365 | ||
366 | return NET_RX_SUCCESS; | |
367 | ||
368 | drop: | |
6b8d4a6a | 369 | dev->stats.rx_dropped++; |
18722c24 JR |
370 | kfree_skb(skb); |
371 | return NET_RX_DROP; | |
372 | } | |
373 | ||
374 | /* Packet from BT LE device */ | |
6b8d4a6a | 375 | static int chan_recv_cb(struct l2cap_chan *chan, struct sk_buff *skb) |
18722c24 JR |
376 | { |
377 | struct lowpan_dev *dev; | |
378 | struct lowpan_peer *peer; | |
379 | int err; | |
380 | ||
6b8d4a6a | 381 | peer = lookup_peer(chan->conn); |
18722c24 JR |
382 | if (!peer) |
383 | return -ENOENT; | |
384 | ||
6b8d4a6a | 385 | dev = lookup_dev(chan->conn); |
30d3db44 | 386 | if (!dev || !dev->netdev) |
18722c24 JR |
387 | return -ENOENT; |
388 | ||
6b8d4a6a JR |
389 | err = recv_pkt(skb, dev->netdev, chan); |
390 | if (err) { | |
391 | BT_DBG("recv pkt %d", err); | |
392 | err = -EAGAIN; | |
18722c24 JR |
393 | } |
394 | ||
6b8d4a6a | 395 | return err; |
18722c24 JR |
396 | } |
397 | ||
62bbd5b3 | 398 | static u8 get_addr_type_from_eui64(u8 byte) |
18722c24 | 399 | { |
6b8d4a6a JR |
400 | /* Is universal(0) or local(1) bit */ |
401 | return ((byte & 0x02) ? BDADDR_LE_RANDOM : BDADDR_LE_PUBLIC); | |
62bbd5b3 JR |
402 | } |
403 | ||
404 | static void copy_to_bdaddr(struct in6_addr *ip6_daddr, bdaddr_t *addr) | |
405 | { | |
406 | u8 *eui64 = ip6_daddr->s6_addr + 8; | |
18722c24 JR |
407 | |
408 | addr->b[0] = eui64[7]; | |
409 | addr->b[1] = eui64[6]; | |
410 | addr->b[2] = eui64[5]; | |
411 | addr->b[3] = eui64[2]; | |
412 | addr->b[4] = eui64[1]; | |
413 | addr->b[5] = eui64[0]; | |
62bbd5b3 | 414 | } |
18722c24 | 415 | |
62bbd5b3 JR |
416 | static void convert_dest_bdaddr(struct in6_addr *ip6_daddr, |
417 | bdaddr_t *addr, u8 *addr_type) | |
418 | { | |
419 | copy_to_bdaddr(ip6_daddr, addr); | |
18722c24 | 420 | |
62bbd5b3 JR |
421 | /* We need to toggle the U/L bit that we got from IPv6 address |
422 | * so that we get the proper address and type of the BD address. | |
423 | */ | |
424 | addr->b[5] ^= 0x02; | |
425 | ||
426 | *addr_type = get_addr_type_from_eui64(addr->b[5]); | |
18722c24 JR |
427 | } |
428 | ||
36b3dd25 JR |
429 | static int setup_header(struct sk_buff *skb, struct net_device *netdev, |
430 | bdaddr_t *peer_addr, u8 *peer_addr_type) | |
18722c24 | 431 | { |
36b3dd25 | 432 | struct in6_addr ipv6_daddr; |
18722c24 JR |
433 | struct lowpan_dev *dev; |
434 | struct lowpan_peer *peer; | |
435 | bdaddr_t addr, *any = BDADDR_ANY; | |
36b3dd25 JR |
436 | u8 *daddr = any->b; |
437 | int err, status = 0; | |
18722c24 JR |
438 | |
439 | dev = lowpan_dev(netdev); | |
440 | ||
36b3dd25 JR |
441 | memcpy(&ipv6_daddr, &lowpan_cb(skb)->addr, sizeof(ipv6_daddr)); |
442 | ||
443 | if (ipv6_addr_is_multicast(&ipv6_daddr)) { | |
6b8d4a6a | 444 | lowpan_cb(skb)->chan = NULL; |
18722c24 JR |
445 | } else { |
446 | unsigned long flags; | |
36b3dd25 | 447 | u8 addr_type; |
18722c24 JR |
448 | |
449 | /* Get destination BT device from skb. | |
450 | * If there is no such peer then discard the packet. | |
451 | */ | |
36b3dd25 | 452 | convert_dest_bdaddr(&ipv6_daddr, &addr, &addr_type); |
18722c24 | 453 | |
6b8d4a6a | 454 | BT_DBG("dest addr %pMR type %d IP %pI6c", &addr, |
36b3dd25 | 455 | addr_type, &ipv6_daddr); |
18722c24 JR |
456 | |
457 | read_lock_irqsave(&devices_lock, flags); | |
458 | peer = peer_lookup_ba(dev, &addr, addr_type); | |
459 | read_unlock_irqrestore(&devices_lock, flags); | |
460 | ||
461 | if (!peer) { | |
39e90c77 JR |
462 | /* The packet might be sent to 6lowpan interface |
463 | * because of routing (either via default route | |
464 | * or user set route) so get peer according to | |
465 | * the destination address. | |
466 | */ | |
467 | read_lock_irqsave(&devices_lock, flags); | |
36b3dd25 | 468 | peer = peer_lookup_dst(dev, &ipv6_daddr, skb); |
39e90c77 JR |
469 | read_unlock_irqrestore(&devices_lock, flags); |
470 | if (!peer) { | |
471 | BT_DBG("no such peer %pMR found", &addr); | |
472 | return -ENOENT; | |
473 | } | |
18722c24 JR |
474 | } |
475 | ||
476 | daddr = peer->eui64_addr; | |
36b3dd25 JR |
477 | *peer_addr = addr; |
478 | *peer_addr_type = addr_type; | |
6b8d4a6a | 479 | lowpan_cb(skb)->chan = peer->chan; |
36b3dd25 JR |
480 | |
481 | status = 1; | |
18722c24 JR |
482 | } |
483 | ||
36b3dd25 JR |
484 | lowpan_header_compress(skb, netdev, ETH_P_IPV6, daddr, |
485 | dev->netdev->dev_addr, skb->len); | |
486 | ||
487 | err = dev_hard_header(skb, netdev, ETH_P_IPV6, NULL, NULL, 0); | |
488 | if (err < 0) | |
489 | return err; | |
490 | ||
491 | return status; | |
492 | } | |
493 | ||
494 | static int header_create(struct sk_buff *skb, struct net_device *netdev, | |
495 | unsigned short type, const void *_daddr, | |
496 | const void *_saddr, unsigned int len) | |
497 | { | |
498 | struct ipv6hdr *hdr; | |
499 | ||
500 | if (type != ETH_P_IPV6) | |
501 | return -EINVAL; | |
502 | ||
503 | hdr = ipv6_hdr(skb); | |
504 | ||
505 | memcpy(&lowpan_cb(skb)->addr, &hdr->daddr, sizeof(struct in6_addr)); | |
18722c24 | 506 | |
36b3dd25 | 507 | return 0; |
18722c24 JR |
508 | } |
509 | ||
510 | /* Packet to BT LE device */ | |
6b8d4a6a | 511 | static int send_pkt(struct l2cap_chan *chan, struct sk_buff *skb, |
36b3dd25 | 512 | struct net_device *netdev, bool is_mcast) |
18722c24 | 513 | { |
6b8d4a6a JR |
514 | struct msghdr msg; |
515 | struct kvec iv; | |
516 | int err; | |
517 | ||
518 | /* Remember the skb so that we can send EAGAIN to the caller if | |
36b3dd25 JR |
519 | * we run out of credits. This is not done for multicast packets |
520 | * because we generate mcast packet in this module and are not | |
521 | * really able to remember the skb after this packet is sent. | |
6b8d4a6a | 522 | */ |
36b3dd25 JR |
523 | if (is_mcast) |
524 | chan->data = NULL; | |
525 | else | |
526 | chan->data = skb; | |
6b8d4a6a JR |
527 | |
528 | memset(&msg, 0, sizeof(msg)); | |
529 | msg.msg_iov = (struct iovec *) &iv; | |
530 | msg.msg_iovlen = 1; | |
531 | iv.iov_base = skb->data; | |
532 | iv.iov_len = skb->len; | |
533 | ||
534 | err = l2cap_chan_send(chan, &msg, skb->len); | |
535 | if (err > 0) { | |
536 | netdev->stats.tx_bytes += err; | |
537 | netdev->stats.tx_packets++; | |
538 | return 0; | |
539 | } | |
540 | ||
541 | if (!err) | |
542 | err = lowpan_cb(skb)->status; | |
543 | ||
544 | if (err < 0) { | |
545 | if (err == -EAGAIN) | |
546 | netdev->stats.tx_dropped++; | |
547 | else | |
548 | netdev->stats.tx_errors++; | |
549 | } | |
18722c24 | 550 | |
6b8d4a6a | 551 | return err; |
18722c24 JR |
552 | } |
553 | ||
554 | static void send_mcast_pkt(struct sk_buff *skb, struct net_device *netdev) | |
555 | { | |
556 | struct sk_buff *local_skb; | |
557 | struct lowpan_dev *entry, *tmp; | |
558 | unsigned long flags; | |
559 | ||
560 | read_lock_irqsave(&devices_lock, flags); | |
561 | ||
562 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, list) { | |
563 | struct lowpan_peer *pentry, *ptmp; | |
564 | struct lowpan_dev *dev; | |
565 | ||
566 | if (entry->netdev != netdev) | |
567 | continue; | |
568 | ||
569 | dev = lowpan_dev(entry->netdev); | |
570 | ||
571 | list_for_each_entry_safe(pentry, ptmp, &dev->peers, list) { | |
572 | local_skb = skb_clone(skb, GFP_ATOMIC); | |
573 | ||
36b3dd25 JR |
574 | BT_DBG("xmit %s to %pMR type %d IP %pI6c chan %p", |
575 | netdev->name, | |
576 | &pentry->chan->dst, pentry->chan->dst_type, | |
577 | &pentry->peer_addr, pentry->chan); | |
578 | send_pkt(pentry->chan, local_skb, netdev, true); | |
18722c24 JR |
579 | |
580 | kfree_skb(local_skb); | |
581 | } | |
582 | } | |
583 | ||
584 | read_unlock_irqrestore(&devices_lock, flags); | |
585 | } | |
586 | ||
587 | static netdev_tx_t bt_xmit(struct sk_buff *skb, struct net_device *netdev) | |
588 | { | |
589 | int err = 0; | |
18722c24 JR |
590 | bdaddr_t addr; |
591 | u8 addr_type; | |
592 | ||
36b3dd25 JR |
593 | /* We must take a copy of the skb before we modify/replace the ipv6 |
594 | * header as the header could be used elsewhere | |
595 | */ | |
596 | skb = skb_unshare(skb, GFP_ATOMIC); | |
597 | if (!skb) | |
598 | return NET_XMIT_DROP; | |
599 | ||
600 | /* Return values from setup_header() | |
601 | * <0 - error, packet is dropped | |
602 | * 0 - this is a multicast packet | |
603 | * 1 - this is unicast packet | |
604 | */ | |
605 | err = setup_header(skb, netdev, &addr, &addr_type); | |
606 | if (err < 0) { | |
607 | kfree_skb(skb); | |
608 | return NET_XMIT_DROP; | |
609 | } | |
18722c24 | 610 | |
36b3dd25 JR |
611 | if (err) { |
612 | if (lowpan_cb(skb)->chan) { | |
613 | BT_DBG("xmit %s to %pMR type %d IP %pI6c chan %p", | |
614 | netdev->name, &addr, addr_type, | |
615 | &lowpan_cb(skb)->addr, lowpan_cb(skb)->chan); | |
616 | err = send_pkt(lowpan_cb(skb)->chan, skb, netdev, | |
617 | false); | |
618 | } else { | |
6b8d4a6a | 619 | err = -ENOENT; |
36b3dd25 JR |
620 | } |
621 | } else { | |
622 | /* We need to send the packet to every device behind this | |
623 | * interface. | |
624 | */ | |
625 | send_mcast_pkt(skb, netdev); | |
18722c24 | 626 | } |
18722c24 JR |
627 | |
628 | if (err) | |
629 | BT_DBG("ERROR: xmit failed (%d)", err); | |
630 | ||
36b3dd25 | 631 | return err < 0 ? NET_XMIT_DROP : err; |
18722c24 JR |
632 | } |
633 | ||
634 | static const struct net_device_ops netdev_ops = { | |
635 | .ndo_start_xmit = bt_xmit, | |
636 | }; | |
637 | ||
638 | static struct header_ops header_ops = { | |
639 | .create = header_create, | |
640 | }; | |
641 | ||
642 | static void netdev_setup(struct net_device *dev) | |
643 | { | |
644 | dev->addr_len = EUI64_ADDR_LEN; | |
645 | dev->type = ARPHRD_6LOWPAN; | |
646 | ||
647 | dev->hard_header_len = 0; | |
648 | dev->needed_tailroom = 0; | |
649 | dev->mtu = IPV6_MIN_MTU; | |
650 | dev->tx_queue_len = 0; | |
156395c9 JR |
651 | dev->flags = IFF_RUNNING | IFF_POINTOPOINT | |
652 | IFF_MULTICAST; | |
18722c24 JR |
653 | dev->watchdog_timeo = 0; |
654 | ||
655 | dev->netdev_ops = &netdev_ops; | |
656 | dev->header_ops = &header_ops; | |
657 | dev->destructor = free_netdev; | |
658 | } | |
659 | ||
660 | static struct device_type bt_type = { | |
661 | .name = "bluetooth", | |
662 | }; | |
663 | ||
664 | static void set_addr(u8 *eui, u8 *addr, u8 addr_type) | |
665 | { | |
666 | /* addr is the BT address in little-endian format */ | |
667 | eui[0] = addr[5]; | |
668 | eui[1] = addr[4]; | |
669 | eui[2] = addr[3]; | |
670 | eui[3] = 0xFF; | |
671 | eui[4] = 0xFE; | |
672 | eui[5] = addr[2]; | |
673 | eui[6] = addr[1]; | |
674 | eui[7] = addr[0]; | |
675 | ||
62bbd5b3 | 676 | /* Universal/local bit set, BT 6lowpan draft ch. 3.2.1 */ |
6b8d4a6a | 677 | if (addr_type == BDADDR_LE_PUBLIC) |
62bbd5b3 | 678 | eui[0] &= ~0x02; |
18722c24 | 679 | else |
62bbd5b3 JR |
680 | eui[0] |= 0x02; |
681 | ||
682 | BT_DBG("type %d addr %*phC", addr_type, 8, eui); | |
18722c24 JR |
683 | } |
684 | ||
685 | static void set_dev_addr(struct net_device *netdev, bdaddr_t *addr, | |
686 | u8 addr_type) | |
687 | { | |
688 | netdev->addr_assign_type = NET_ADDR_PERM; | |
689 | set_addr(netdev->dev_addr, addr->b, addr_type); | |
18722c24 JR |
690 | } |
691 | ||
692 | static void ifup(struct net_device *netdev) | |
693 | { | |
694 | int err; | |
695 | ||
696 | rtnl_lock(); | |
697 | err = dev_open(netdev); | |
698 | if (err < 0) | |
699 | BT_INFO("iface %s cannot be opened (%d)", netdev->name, err); | |
700 | rtnl_unlock(); | |
701 | } | |
702 | ||
7f118253 JR |
703 | static void ifdown(struct net_device *netdev) |
704 | { | |
705 | int err; | |
706 | ||
707 | rtnl_lock(); | |
708 | err = dev_close(netdev); | |
709 | if (err < 0) | |
710 | BT_INFO("iface %s cannot be closed (%d)", netdev->name, err); | |
711 | rtnl_unlock(); | |
712 | } | |
713 | ||
18722c24 JR |
714 | static void do_notify_peers(struct work_struct *work) |
715 | { | |
716 | struct lowpan_dev *dev = container_of(work, struct lowpan_dev, | |
717 | notify_peers.work); | |
718 | ||
719 | netdev_notify_peers(dev->netdev); /* send neighbour adv at startup */ | |
720 | } | |
721 | ||
722 | static bool is_bt_6lowpan(struct hci_conn *hcon) | |
723 | { | |
724 | if (hcon->type != LE_LINK) | |
725 | return false; | |
726 | ||
6b8d4a6a JR |
727 | if (!psm_6lowpan) |
728 | return false; | |
729 | ||
730 | return true; | |
18722c24 JR |
731 | } |
732 | ||
6b8d4a6a JR |
733 | static struct l2cap_chan *chan_create(void) |
734 | { | |
735 | struct l2cap_chan *chan; | |
736 | ||
737 | chan = l2cap_chan_create(); | |
738 | if (!chan) | |
739 | return NULL; | |
740 | ||
741 | l2cap_chan_set_defaults(chan); | |
742 | ||
743 | chan->chan_type = L2CAP_CHAN_CONN_ORIENTED; | |
744 | chan->mode = L2CAP_MODE_LE_FLOWCTL; | |
745 | chan->omtu = 65535; | |
746 | chan->imtu = chan->omtu; | |
747 | ||
748 | return chan; | |
749 | } | |
750 | ||
751 | static struct l2cap_chan *chan_open(struct l2cap_chan *pchan) | |
752 | { | |
753 | struct l2cap_chan *chan; | |
754 | ||
755 | chan = chan_create(); | |
756 | if (!chan) | |
757 | return NULL; | |
758 | ||
759 | chan->remote_mps = chan->omtu; | |
760 | chan->mps = chan->omtu; | |
761 | ||
762 | chan->state = BT_CONNECTED; | |
763 | ||
764 | return chan; | |
765 | } | |
766 | ||
b2799cec JR |
767 | static void set_ip_addr_bits(u8 addr_type, u8 *addr) |
768 | { | |
769 | if (addr_type == BDADDR_LE_PUBLIC) | |
770 | *addr |= 0x02; | |
771 | else | |
772 | *addr &= ~0x02; | |
773 | } | |
774 | ||
6b8d4a6a JR |
775 | static struct l2cap_chan *add_peer_chan(struct l2cap_chan *chan, |
776 | struct lowpan_dev *dev) | |
18722c24 JR |
777 | { |
778 | struct lowpan_peer *peer; | |
779 | unsigned long flags; | |
780 | ||
781 | peer = kzalloc(sizeof(*peer), GFP_ATOMIC); | |
782 | if (!peer) | |
6b8d4a6a | 783 | return NULL; |
18722c24 | 784 | |
6b8d4a6a | 785 | peer->chan = chan; |
18722c24 JR |
786 | memset(&peer->peer_addr, 0, sizeof(struct in6_addr)); |
787 | ||
788 | /* RFC 2464 ch. 5 */ | |
789 | peer->peer_addr.s6_addr[0] = 0xFE; | |
790 | peer->peer_addr.s6_addr[1] = 0x80; | |
6b8d4a6a JR |
791 | set_addr((u8 *)&peer->peer_addr.s6_addr + 8, chan->dst.b, |
792 | chan->dst_type); | |
18722c24 JR |
793 | |
794 | memcpy(&peer->eui64_addr, (u8 *)&peer->peer_addr.s6_addr + 8, | |
795 | EUI64_ADDR_LEN); | |
18722c24 | 796 | |
b2799cec JR |
797 | /* IPv6 address needs to have the U/L bit set properly so toggle |
798 | * it back here. | |
799 | */ | |
800 | set_ip_addr_bits(chan->dst_type, (u8 *)&peer->peer_addr.s6_addr + 8); | |
801 | ||
18722c24 JR |
802 | write_lock_irqsave(&devices_lock, flags); |
803 | INIT_LIST_HEAD(&peer->list); | |
804 | peer_add(dev, peer); | |
805 | write_unlock_irqrestore(&devices_lock, flags); | |
806 | ||
807 | /* Notifying peers about us needs to be done without locks held */ | |
808 | INIT_DELAYED_WORK(&dev->notify_peers, do_notify_peers); | |
809 | schedule_delayed_work(&dev->notify_peers, msecs_to_jiffies(100)); | |
810 | ||
6b8d4a6a | 811 | return peer->chan; |
18722c24 JR |
812 | } |
813 | ||
6b8d4a6a | 814 | static int setup_netdev(struct l2cap_chan *chan, struct lowpan_dev **dev) |
18722c24 | 815 | { |
18722c24 JR |
816 | struct net_device *netdev; |
817 | int err = 0; | |
818 | unsigned long flags; | |
819 | ||
6b8d4a6a | 820 | netdev = alloc_netdev(sizeof(struct lowpan_dev), IFACE_NAME_TEMPLATE, |
c835a677 | 821 | NET_NAME_UNKNOWN, netdev_setup); |
18722c24 JR |
822 | if (!netdev) |
823 | return -ENOMEM; | |
824 | ||
6b8d4a6a | 825 | set_dev_addr(netdev, &chan->src, chan->src_type); |
18722c24 JR |
826 | |
827 | netdev->netdev_ops = &netdev_ops; | |
6b8d4a6a | 828 | SET_NETDEV_DEV(netdev, &chan->conn->hcon->dev); |
18722c24 JR |
829 | SET_NETDEV_DEVTYPE(netdev, &bt_type); |
830 | ||
831 | err = register_netdev(netdev); | |
832 | if (err < 0) { | |
833 | BT_INFO("register_netdev failed %d", err); | |
834 | free_netdev(netdev); | |
835 | goto out; | |
836 | } | |
837 | ||
6b8d4a6a JR |
838 | BT_DBG("ifindex %d peer bdaddr %pMR type %d my addr %pMR type %d", |
839 | netdev->ifindex, &chan->dst, chan->dst_type, | |
840 | &chan->src, chan->src_type); | |
18722c24 JR |
841 | set_bit(__LINK_STATE_PRESENT, &netdev->state); |
842 | ||
6b8d4a6a JR |
843 | *dev = netdev_priv(netdev); |
844 | (*dev)->netdev = netdev; | |
845 | (*dev)->hdev = chan->conn->hcon->hdev; | |
846 | INIT_LIST_HEAD(&(*dev)->peers); | |
18722c24 JR |
847 | |
848 | write_lock_irqsave(&devices_lock, flags); | |
6b8d4a6a JR |
849 | INIT_LIST_HEAD(&(*dev)->list); |
850 | list_add(&(*dev)->list, &bt_6lowpan_devices); | |
18722c24 JR |
851 | write_unlock_irqrestore(&devices_lock, flags); |
852 | ||
6b8d4a6a | 853 | return 0; |
18722c24 JR |
854 | |
855 | out: | |
856 | return err; | |
857 | } | |
858 | ||
6b8d4a6a JR |
859 | static inline void chan_ready_cb(struct l2cap_chan *chan) |
860 | { | |
861 | struct lowpan_dev *dev; | |
862 | ||
863 | dev = lookup_dev(chan->conn); | |
864 | ||
865 | BT_DBG("chan %p conn %p dev %p", chan, chan->conn, dev); | |
866 | ||
867 | if (!dev) { | |
868 | if (setup_netdev(chan, &dev) < 0) { | |
869 | l2cap_chan_del(chan, -ENOENT); | |
870 | return; | |
871 | } | |
872 | } | |
873 | ||
18d93c17 JR |
874 | if (!try_module_get(THIS_MODULE)) |
875 | return; | |
876 | ||
6b8d4a6a JR |
877 | add_peer_chan(chan, dev); |
878 | ifup(dev->netdev); | |
879 | } | |
880 | ||
2b293490 | 881 | static inline struct l2cap_chan *chan_new_conn_cb(struct l2cap_chan *pchan) |
6b8d4a6a | 882 | { |
2b293490 | 883 | struct l2cap_chan *chan; |
6b8d4a6a | 884 | |
2b293490 JH |
885 | chan = chan_open(pchan); |
886 | chan->ops = pchan->ops; | |
6b8d4a6a JR |
887 | |
888 | BT_DBG("chan %p pchan %p", chan, pchan); | |
889 | ||
2b293490 | 890 | return chan; |
6b8d4a6a JR |
891 | } |
892 | ||
18722c24 JR |
893 | static void delete_netdev(struct work_struct *work) |
894 | { | |
895 | struct lowpan_dev *entry = container_of(work, struct lowpan_dev, | |
896 | delete_netdev); | |
897 | ||
898 | unregister_netdev(entry->netdev); | |
899 | ||
900 | /* The entry pointer is deleted in device_event() */ | |
901 | } | |
902 | ||
6b8d4a6a | 903 | static void chan_close_cb(struct l2cap_chan *chan) |
18722c24 JR |
904 | { |
905 | struct lowpan_dev *entry, *tmp; | |
906 | struct lowpan_dev *dev = NULL; | |
907 | struct lowpan_peer *peer; | |
908 | int err = -ENOENT; | |
909 | unsigned long flags; | |
6b8d4a6a | 910 | bool last = false, removed = true; |
18722c24 | 911 | |
6b8d4a6a JR |
912 | BT_DBG("chan %p conn %p", chan, chan->conn); |
913 | ||
914 | if (chan->conn && chan->conn->hcon) { | |
915 | if (!is_bt_6lowpan(chan->conn->hcon)) | |
916 | return; | |
917 | ||
918 | /* If conn is set, then the netdev is also there and we should | |
919 | * not remove it. | |
920 | */ | |
921 | removed = false; | |
922 | } | |
18722c24 JR |
923 | |
924 | write_lock_irqsave(&devices_lock, flags); | |
925 | ||
926 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, list) { | |
927 | dev = lowpan_dev(entry->netdev); | |
6b8d4a6a | 928 | peer = peer_lookup_chan(dev, chan); |
18722c24 JR |
929 | if (peer) { |
930 | last = peer_del(dev, peer); | |
931 | err = 0; | |
6b8d4a6a JR |
932 | |
933 | BT_DBG("dev %p removing %speer %p", dev, | |
934 | last ? "last " : "1 ", peer); | |
935 | BT_DBG("chan %p orig refcnt %d", chan, | |
936 | atomic_read(&chan->kref.refcount)); | |
937 | ||
938 | l2cap_chan_put(chan); | |
939 | kfree(peer); | |
18722c24 JR |
940 | break; |
941 | } | |
942 | } | |
943 | ||
944 | if (!err && last && dev && !atomic_read(&dev->peer_count)) { | |
945 | write_unlock_irqrestore(&devices_lock, flags); | |
946 | ||
947 | cancel_delayed_work_sync(&dev->notify_peers); | |
948 | ||
7f118253 JR |
949 | ifdown(dev->netdev); |
950 | ||
6b8d4a6a JR |
951 | if (!removed) { |
952 | INIT_WORK(&entry->delete_netdev, delete_netdev); | |
953 | schedule_work(&entry->delete_netdev); | |
954 | } | |
18722c24 JR |
955 | } else { |
956 | write_unlock_irqrestore(&devices_lock, flags); | |
957 | } | |
958 | ||
6b8d4a6a JR |
959 | return; |
960 | } | |
961 | ||
962 | static void chan_state_change_cb(struct l2cap_chan *chan, int state, int err) | |
963 | { | |
964 | BT_DBG("chan %p conn %p state %s err %d", chan, chan->conn, | |
965 | state_to_string(state), err); | |
966 | } | |
967 | ||
968 | static struct sk_buff *chan_alloc_skb_cb(struct l2cap_chan *chan, | |
969 | unsigned long hdr_len, | |
970 | unsigned long len, int nb) | |
971 | { | |
972 | /* Note that we must allocate using GFP_ATOMIC here as | |
973 | * this function is called originally from netdev hard xmit | |
974 | * function in atomic context. | |
975 | */ | |
976 | return bt_skb_alloc(hdr_len + len, GFP_ATOMIC); | |
977 | } | |
978 | ||
979 | static void chan_suspend_cb(struct l2cap_chan *chan) | |
980 | { | |
981 | struct sk_buff *skb = chan->data; | |
982 | ||
983 | BT_DBG("chan %p conn %p skb %p", chan, chan->conn, skb); | |
984 | ||
59790aa2 JR |
985 | if (!skb) |
986 | return; | |
987 | ||
6b8d4a6a JR |
988 | lowpan_cb(skb)->status = -EAGAIN; |
989 | } | |
990 | ||
991 | static void chan_resume_cb(struct l2cap_chan *chan) | |
992 | { | |
993 | struct sk_buff *skb = chan->data; | |
994 | ||
995 | BT_DBG("chan %p conn %p skb %p", chan, chan->conn, skb); | |
996 | ||
59790aa2 JR |
997 | if (!skb) |
998 | return; | |
999 | ||
6b8d4a6a JR |
1000 | lowpan_cb(skb)->status = 0; |
1001 | } | |
1002 | ||
1003 | static long chan_get_sndtimeo_cb(struct l2cap_chan *chan) | |
1004 | { | |
2ae50d8d | 1005 | return L2CAP_CONN_TIMEOUT; |
6b8d4a6a JR |
1006 | } |
1007 | ||
1008 | static const struct l2cap_ops bt_6lowpan_chan_ops = { | |
1009 | .name = "L2CAP 6LoWPAN channel", | |
1010 | .new_connection = chan_new_conn_cb, | |
1011 | .recv = chan_recv_cb, | |
1012 | .close = chan_close_cb, | |
1013 | .state_change = chan_state_change_cb, | |
1014 | .ready = chan_ready_cb, | |
1015 | .resume = chan_resume_cb, | |
1016 | .suspend = chan_suspend_cb, | |
1017 | .get_sndtimeo = chan_get_sndtimeo_cb, | |
1018 | .alloc_skb = chan_alloc_skb_cb, | |
1019 | .memcpy_fromiovec = l2cap_chan_no_memcpy_fromiovec, | |
1020 | ||
1021 | .teardown = l2cap_chan_no_teardown, | |
1022 | .defer = l2cap_chan_no_defer, | |
1023 | .set_shutdown = l2cap_chan_no_set_shutdown, | |
1024 | }; | |
1025 | ||
1026 | static inline __u8 bdaddr_type(__u8 type) | |
1027 | { | |
1028 | if (type == ADDR_LE_DEV_PUBLIC) | |
1029 | return BDADDR_LE_PUBLIC; | |
1030 | else | |
1031 | return BDADDR_LE_RANDOM; | |
1032 | } | |
1033 | ||
1034 | static struct l2cap_chan *chan_get(void) | |
1035 | { | |
1036 | struct l2cap_chan *pchan; | |
1037 | ||
1038 | pchan = chan_create(); | |
1039 | if (!pchan) | |
1040 | return NULL; | |
1041 | ||
1042 | pchan->ops = &bt_6lowpan_chan_ops; | |
1043 | ||
1044 | return pchan; | |
1045 | } | |
1046 | ||
1047 | static int bt_6lowpan_connect(bdaddr_t *addr, u8 dst_type) | |
1048 | { | |
1049 | struct l2cap_chan *pchan; | |
1050 | int err; | |
1051 | ||
1052 | pchan = chan_get(); | |
1053 | if (!pchan) | |
1054 | return -EINVAL; | |
1055 | ||
1056 | err = l2cap_chan_connect(pchan, cpu_to_le16(psm_6lowpan), 0, | |
1057 | addr, dst_type); | |
1058 | ||
1059 | BT_DBG("chan %p err %d", pchan, err); | |
1060 | if (err < 0) | |
1061 | l2cap_chan_put(pchan); | |
1062 | ||
18722c24 JR |
1063 | return err; |
1064 | } | |
1065 | ||
6b8d4a6a JR |
1066 | static int bt_6lowpan_disconnect(struct l2cap_conn *conn, u8 dst_type) |
1067 | { | |
1068 | struct lowpan_peer *peer; | |
1069 | ||
1070 | BT_DBG("conn %p dst type %d", conn, dst_type); | |
1071 | ||
1072 | peer = lookup_peer(conn); | |
1073 | if (!peer) | |
1074 | return -ENOENT; | |
1075 | ||
1076 | BT_DBG("peer %p chan %p", peer, peer->chan); | |
1077 | ||
1078 | l2cap_chan_close(peer->chan, ENOENT); | |
1079 | ||
1080 | return 0; | |
1081 | } | |
1082 | ||
1083 | static struct l2cap_chan *bt_6lowpan_listen(void) | |
1084 | { | |
1085 | bdaddr_t *addr = BDADDR_ANY; | |
1086 | struct l2cap_chan *pchan; | |
1087 | int err; | |
1088 | ||
1089 | if (psm_6lowpan == 0) | |
1090 | return NULL; | |
1091 | ||
1092 | pchan = chan_get(); | |
1093 | if (!pchan) | |
1094 | return NULL; | |
1095 | ||
1096 | pchan->state = BT_LISTEN; | |
1097 | pchan->src_type = BDADDR_LE_PUBLIC; | |
1098 | ||
1099 | BT_DBG("psm 0x%04x chan %p src type %d", psm_6lowpan, pchan, | |
1100 | pchan->src_type); | |
1101 | ||
1102 | err = l2cap_add_psm(pchan, addr, cpu_to_le16(psm_6lowpan)); | |
1103 | if (err) { | |
1104 | l2cap_chan_put(pchan); | |
1105 | BT_ERR("psm cannot be added err %d", err); | |
1106 | return NULL; | |
1107 | } | |
1108 | ||
1109 | return pchan; | |
1110 | } | |
1111 | ||
1112 | static int get_l2cap_conn(char *buf, bdaddr_t *addr, u8 *addr_type, | |
1113 | struct l2cap_conn **conn) | |
1114 | { | |
1115 | struct hci_conn *hcon; | |
1116 | struct hci_dev *hdev; | |
1117 | bdaddr_t *src = BDADDR_ANY; | |
1118 | int n; | |
1119 | ||
1120 | n = sscanf(buf, "%hhx:%hhx:%hhx:%hhx:%hhx:%hhx %hhu", | |
1121 | &addr->b[5], &addr->b[4], &addr->b[3], | |
1122 | &addr->b[2], &addr->b[1], &addr->b[0], | |
1123 | addr_type); | |
1124 | ||
1125 | if (n < 7) | |
1126 | return -EINVAL; | |
1127 | ||
1128 | hdev = hci_get_route(addr, src); | |
1129 | if (!hdev) | |
1130 | return -ENOENT; | |
1131 | ||
1132 | hci_dev_lock(hdev); | |
1133 | hcon = hci_conn_hash_lookup_ba(hdev, LE_LINK, addr); | |
1134 | hci_dev_unlock(hdev); | |
1135 | ||
1136 | if (!hcon) | |
1137 | return -ENOENT; | |
1138 | ||
1139 | *conn = (struct l2cap_conn *)hcon->l2cap_data; | |
1140 | ||
1141 | BT_DBG("conn %p dst %pMR type %d", *conn, &hcon->dst, hcon->dst_type); | |
1142 | ||
1143 | return 0; | |
1144 | } | |
1145 | ||
1146 | static void disconnect_all_peers(void) | |
1147 | { | |
1148 | struct lowpan_dev *entry, *tmp_dev; | |
1149 | struct lowpan_peer *peer, *tmp_peer, *new_peer; | |
1150 | struct list_head peers; | |
1151 | unsigned long flags; | |
1152 | ||
1153 | INIT_LIST_HEAD(&peers); | |
1154 | ||
1155 | /* We make a separate list of peers as the close_cb() will | |
1156 | * modify the device peers list so it is better not to mess | |
1157 | * with the same list at the same time. | |
1158 | */ | |
1159 | ||
1160 | read_lock_irqsave(&devices_lock, flags); | |
1161 | ||
1162 | list_for_each_entry_safe(entry, tmp_dev, &bt_6lowpan_devices, list) { | |
1163 | list_for_each_entry_safe(peer, tmp_peer, &entry->peers, list) { | |
1164 | new_peer = kmalloc(sizeof(*new_peer), GFP_ATOMIC); | |
1165 | if (!new_peer) | |
1166 | break; | |
1167 | ||
1168 | new_peer->chan = peer->chan; | |
1169 | INIT_LIST_HEAD(&new_peer->list); | |
1170 | ||
1171 | list_add(&new_peer->list, &peers); | |
1172 | } | |
1173 | } | |
1174 | ||
1175 | read_unlock_irqrestore(&devices_lock, flags); | |
1176 | ||
1177 | list_for_each_entry_safe(peer, tmp_peer, &peers, list) { | |
1178 | l2cap_chan_close(peer->chan, ENOENT); | |
1179 | kfree(peer); | |
1180 | } | |
1181 | } | |
1182 | ||
1183 | static int lowpan_psm_set(void *data, u64 val) | |
1184 | { | |
1185 | u16 psm; | |
1186 | ||
1187 | psm = val; | |
1188 | if (psm == 0 || psm_6lowpan != psm) | |
1189 | /* Disconnect existing connections if 6lowpan is | |
1190 | * disabled (psm = 0), or if psm changes. | |
1191 | */ | |
1192 | disconnect_all_peers(); | |
1193 | ||
1194 | psm_6lowpan = psm; | |
1195 | ||
1196 | if (listen_chan) { | |
1197 | l2cap_chan_close(listen_chan, 0); | |
1198 | l2cap_chan_put(listen_chan); | |
1199 | } | |
1200 | ||
1201 | listen_chan = bt_6lowpan_listen(); | |
1202 | ||
1203 | return 0; | |
1204 | } | |
1205 | ||
1206 | static int lowpan_psm_get(void *data, u64 *val) | |
1207 | { | |
1208 | *val = psm_6lowpan; | |
1209 | return 0; | |
1210 | } | |
1211 | ||
1212 | DEFINE_SIMPLE_ATTRIBUTE(lowpan_psm_fops, lowpan_psm_get, | |
1213 | lowpan_psm_set, "%llu\n"); | |
1214 | ||
1215 | static ssize_t lowpan_control_write(struct file *fp, | |
1216 | const char __user *user_buffer, | |
1217 | size_t count, | |
1218 | loff_t *position) | |
1219 | { | |
1220 | char buf[32]; | |
1221 | size_t buf_size = min(count, sizeof(buf) - 1); | |
1222 | int ret; | |
1223 | bdaddr_t addr; | |
1224 | u8 addr_type; | |
1225 | struct l2cap_conn *conn = NULL; | |
1226 | ||
1227 | if (copy_from_user(buf, user_buffer, buf_size)) | |
1228 | return -EFAULT; | |
1229 | ||
1230 | buf[buf_size] = '\0'; | |
1231 | ||
1232 | if (memcmp(buf, "connect ", 8) == 0) { | |
1233 | ret = get_l2cap_conn(&buf[8], &addr, &addr_type, &conn); | |
1234 | if (ret == -EINVAL) | |
1235 | return ret; | |
1236 | ||
1237 | if (listen_chan) { | |
1238 | l2cap_chan_close(listen_chan, 0); | |
1239 | l2cap_chan_put(listen_chan); | |
1240 | listen_chan = NULL; | |
1241 | } | |
1242 | ||
1243 | if (conn) { | |
1244 | struct lowpan_peer *peer; | |
1245 | ||
1246 | if (!is_bt_6lowpan(conn->hcon)) | |
1247 | return -EINVAL; | |
1248 | ||
1249 | peer = lookup_peer(conn); | |
1250 | if (peer) { | |
1251 | BT_DBG("6LoWPAN connection already exists"); | |
1252 | return -EALREADY; | |
1253 | } | |
1254 | ||
1255 | BT_DBG("conn %p dst %pMR type %d user %d", conn, | |
1256 | &conn->hcon->dst, conn->hcon->dst_type, | |
1257 | addr_type); | |
1258 | } | |
1259 | ||
1260 | ret = bt_6lowpan_connect(&addr, addr_type); | |
1261 | if (ret < 0) | |
1262 | return ret; | |
1263 | ||
1264 | return count; | |
1265 | } | |
1266 | ||
1267 | if (memcmp(buf, "disconnect ", 11) == 0) { | |
1268 | ret = get_l2cap_conn(&buf[11], &addr, &addr_type, &conn); | |
1269 | if (ret < 0) | |
1270 | return ret; | |
1271 | ||
1272 | ret = bt_6lowpan_disconnect(conn, addr_type); | |
1273 | if (ret < 0) | |
1274 | return ret; | |
1275 | ||
1276 | return count; | |
1277 | } | |
1278 | ||
1279 | return count; | |
1280 | } | |
1281 | ||
1282 | static int lowpan_control_show(struct seq_file *f, void *ptr) | |
1283 | { | |
1284 | struct lowpan_dev *entry, *tmp_dev; | |
1285 | struct lowpan_peer *peer, *tmp_peer; | |
1286 | unsigned long flags; | |
1287 | ||
1288 | read_lock_irqsave(&devices_lock, flags); | |
1289 | ||
1290 | list_for_each_entry_safe(entry, tmp_dev, &bt_6lowpan_devices, list) { | |
1291 | list_for_each_entry_safe(peer, tmp_peer, &entry->peers, list) | |
1292 | seq_printf(f, "%pMR (type %u)\n", | |
1293 | &peer->chan->dst, peer->chan->dst_type); | |
1294 | } | |
1295 | ||
1296 | read_unlock_irqrestore(&devices_lock, flags); | |
1297 | ||
1298 | return 0; | |
1299 | } | |
1300 | ||
1301 | static int lowpan_control_open(struct inode *inode, struct file *file) | |
1302 | { | |
1303 | return single_open(file, lowpan_control_show, inode->i_private); | |
1304 | } | |
1305 | ||
1306 | static const struct file_operations lowpan_control_fops = { | |
1307 | .open = lowpan_control_open, | |
1308 | .read = seq_read, | |
1309 | .write = lowpan_control_write, | |
1310 | .llseek = seq_lseek, | |
1311 | .release = single_release, | |
1312 | }; | |
1313 | ||
7f118253 JR |
1314 | static void disconnect_devices(void) |
1315 | { | |
1316 | struct lowpan_dev *entry, *tmp, *new_dev; | |
1317 | struct list_head devices; | |
1318 | unsigned long flags; | |
1319 | ||
1320 | INIT_LIST_HEAD(&devices); | |
1321 | ||
1322 | /* We make a separate list of devices because the unregister_netdev() | |
1323 | * will call device_event() which will also want to modify the same | |
1324 | * devices list. | |
1325 | */ | |
1326 | ||
1327 | read_lock_irqsave(&devices_lock, flags); | |
1328 | ||
1329 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, list) { | |
1330 | new_dev = kmalloc(sizeof(*new_dev), GFP_ATOMIC); | |
1331 | if (!new_dev) | |
1332 | break; | |
1333 | ||
1334 | new_dev->netdev = entry->netdev; | |
1335 | INIT_LIST_HEAD(&new_dev->list); | |
1336 | ||
1337 | list_add(&new_dev->list, &devices); | |
1338 | } | |
1339 | ||
1340 | read_unlock_irqrestore(&devices_lock, flags); | |
1341 | ||
1342 | list_for_each_entry_safe(entry, tmp, &devices, list) { | |
1343 | ifdown(entry->netdev); | |
1344 | BT_DBG("Unregistering netdev %s %p", | |
1345 | entry->netdev->name, entry->netdev); | |
1346 | unregister_netdev(entry->netdev); | |
1347 | kfree(entry); | |
1348 | } | |
1349 | } | |
1350 | ||
18722c24 JR |
1351 | static int device_event(struct notifier_block *unused, |
1352 | unsigned long event, void *ptr) | |
1353 | { | |
1354 | struct net_device *netdev = netdev_notifier_info_to_dev(ptr); | |
1355 | struct lowpan_dev *entry, *tmp; | |
1356 | unsigned long flags; | |
1357 | ||
1358 | if (netdev->type != ARPHRD_6LOWPAN) | |
1359 | return NOTIFY_DONE; | |
1360 | ||
1361 | switch (event) { | |
1362 | case NETDEV_UNREGISTER: | |
1363 | write_lock_irqsave(&devices_lock, flags); | |
1364 | list_for_each_entry_safe(entry, tmp, &bt_6lowpan_devices, | |
1365 | list) { | |
1366 | if (entry->netdev == netdev) { | |
7f118253 JR |
1367 | BT_DBG("Unregistered netdev %s %p", |
1368 | netdev->name, netdev); | |
18722c24 JR |
1369 | list_del(&entry->list); |
1370 | kfree(entry); | |
1371 | break; | |
1372 | } | |
1373 | } | |
1374 | write_unlock_irqrestore(&devices_lock, flags); | |
1375 | break; | |
1376 | } | |
1377 | ||
1378 | return NOTIFY_DONE; | |
1379 | } | |
1380 | ||
1381 | static struct notifier_block bt_6lowpan_dev_notifier = { | |
1382 | .notifier_call = device_event, | |
1383 | }; | |
1384 | ||
5547e48c | 1385 | static int __init bt_6lowpan_init(void) |
18722c24 | 1386 | { |
6b8d4a6a JR |
1387 | lowpan_psm_debugfs = debugfs_create_file("6lowpan_psm", 0644, |
1388 | bt_debugfs, NULL, | |
1389 | &lowpan_psm_fops); | |
1390 | lowpan_control_debugfs = debugfs_create_file("6lowpan_control", 0644, | |
1391 | bt_debugfs, NULL, | |
1392 | &lowpan_control_fops); | |
1393 | ||
18722c24 JR |
1394 | return register_netdevice_notifier(&bt_6lowpan_dev_notifier); |
1395 | } | |
1396 | ||
5547e48c | 1397 | static void __exit bt_6lowpan_exit(void) |
18722c24 | 1398 | { |
6b8d4a6a JR |
1399 | debugfs_remove(lowpan_psm_debugfs); |
1400 | debugfs_remove(lowpan_control_debugfs); | |
1401 | ||
1402 | if (listen_chan) { | |
1403 | l2cap_chan_close(listen_chan, 0); | |
1404 | l2cap_chan_put(listen_chan); | |
1405 | } | |
1406 | ||
7f118253 JR |
1407 | disconnect_devices(); |
1408 | ||
18722c24 JR |
1409 | unregister_netdevice_notifier(&bt_6lowpan_dev_notifier); |
1410 | } | |
5547e48c JR |
1411 | |
1412 | module_init(bt_6lowpan_init); | |
1413 | module_exit(bt_6lowpan_exit); | |
1414 | ||
1415 | MODULE_AUTHOR("Jukka Rissanen <jukka.rissanen@linux.intel.com>"); | |
1416 | MODULE_DESCRIPTION("Bluetooth 6LoWPAN"); | |
1417 | MODULE_VERSION(VERSION); | |
1418 | MODULE_LICENSE("GPL"); |