Linux 4.1.16
[linux/fpc-iii.git] / net / nfc / llcp_commands.c
blob3621a902cb6e36e3399848694a8ab6bfc0a962a8
1 /*
2 * Copyright (C) 2011 Intel Corporation. All rights reserved.
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, see <http://www.gnu.org/licenses/>.
18 #define pr_fmt(fmt) "llcp: %s: " fmt, __func__
20 #include <linux/init.h>
21 #include <linux/kernel.h>
22 #include <linux/module.h>
23 #include <linux/nfc.h>
25 #include <net/nfc/nfc.h>
27 #include "nfc.h"
28 #include "llcp.h"
30 static u8 llcp_tlv_length[LLCP_TLV_MAX] = {
32 1, /* VERSION */
33 2, /* MIUX */
34 2, /* WKS */
35 1, /* LTO */
36 1, /* RW */
37 0, /* SN */
38 1, /* OPT */
39 0, /* SDREQ */
40 2, /* SDRES */
44 static u8 llcp_tlv8(u8 *tlv, u8 type)
46 if (tlv[0] != type || tlv[1] != llcp_tlv_length[tlv[0]])
47 return 0;
49 return tlv[2];
52 static u16 llcp_tlv16(u8 *tlv, u8 type)
54 if (tlv[0] != type || tlv[1] != llcp_tlv_length[tlv[0]])
55 return 0;
57 return be16_to_cpu(*((__be16 *)(tlv + 2)));
61 static u8 llcp_tlv_version(u8 *tlv)
63 return llcp_tlv8(tlv, LLCP_TLV_VERSION);
66 static u16 llcp_tlv_miux(u8 *tlv)
68 return llcp_tlv16(tlv, LLCP_TLV_MIUX) & 0x7ff;
71 static u16 llcp_tlv_wks(u8 *tlv)
73 return llcp_tlv16(tlv, LLCP_TLV_WKS);
76 static u16 llcp_tlv_lto(u8 *tlv)
78 return llcp_tlv8(tlv, LLCP_TLV_LTO);
81 static u8 llcp_tlv_opt(u8 *tlv)
83 return llcp_tlv8(tlv, LLCP_TLV_OPT);
86 static u8 llcp_tlv_rw(u8 *tlv)
88 return llcp_tlv8(tlv, LLCP_TLV_RW) & 0xf;
91 u8 *nfc_llcp_build_tlv(u8 type, u8 *value, u8 value_length, u8 *tlv_length)
93 u8 *tlv, length;
95 pr_debug("type %d\n", type);
97 if (type >= LLCP_TLV_MAX)
98 return NULL;
100 length = llcp_tlv_length[type];
101 if (length == 0 && value_length == 0)
102 return NULL;
103 else if (length == 0)
104 length = value_length;
106 *tlv_length = 2 + length;
107 tlv = kzalloc(2 + length, GFP_KERNEL);
108 if (tlv == NULL)
109 return tlv;
111 tlv[0] = type;
112 tlv[1] = length;
113 memcpy(tlv + 2, value, length);
115 return tlv;
118 struct nfc_llcp_sdp_tlv *nfc_llcp_build_sdres_tlv(u8 tid, u8 sap)
120 struct nfc_llcp_sdp_tlv *sdres;
121 u8 value[2];
123 sdres = kzalloc(sizeof(struct nfc_llcp_sdp_tlv), GFP_KERNEL);
124 if (sdres == NULL)
125 return NULL;
127 value[0] = tid;
128 value[1] = sap;
130 sdres->tlv = nfc_llcp_build_tlv(LLCP_TLV_SDRES, value, 2,
131 &sdres->tlv_len);
132 if (sdres->tlv == NULL) {
133 kfree(sdres);
134 return NULL;
137 sdres->tid = tid;
138 sdres->sap = sap;
140 INIT_HLIST_NODE(&sdres->node);
142 return sdres;
145 struct nfc_llcp_sdp_tlv *nfc_llcp_build_sdreq_tlv(u8 tid, char *uri,
146 size_t uri_len)
148 struct nfc_llcp_sdp_tlv *sdreq;
150 pr_debug("uri: %s, len: %zu\n", uri, uri_len);
152 sdreq = kzalloc(sizeof(struct nfc_llcp_sdp_tlv), GFP_KERNEL);
153 if (sdreq == NULL)
154 return NULL;
156 sdreq->tlv_len = uri_len + 3;
158 if (uri[uri_len - 1] == 0)
159 sdreq->tlv_len--;
161 sdreq->tlv = kzalloc(sdreq->tlv_len + 1, GFP_KERNEL);
162 if (sdreq->tlv == NULL) {
163 kfree(sdreq);
164 return NULL;
167 sdreq->tlv[0] = LLCP_TLV_SDREQ;
168 sdreq->tlv[1] = sdreq->tlv_len - 2;
169 sdreq->tlv[2] = tid;
171 sdreq->tid = tid;
172 sdreq->uri = sdreq->tlv + 3;
173 memcpy(sdreq->uri, uri, uri_len);
175 sdreq->time = jiffies;
177 INIT_HLIST_NODE(&sdreq->node);
179 return sdreq;
182 void nfc_llcp_free_sdp_tlv(struct nfc_llcp_sdp_tlv *sdp)
184 kfree(sdp->tlv);
185 kfree(sdp);
188 void nfc_llcp_free_sdp_tlv_list(struct hlist_head *head)
190 struct nfc_llcp_sdp_tlv *sdp;
191 struct hlist_node *n;
193 hlist_for_each_entry_safe(sdp, n, head, node) {
194 hlist_del(&sdp->node);
196 nfc_llcp_free_sdp_tlv(sdp);
200 int nfc_llcp_parse_gb_tlv(struct nfc_llcp_local *local,
201 u8 *tlv_array, u16 tlv_array_len)
203 u8 *tlv = tlv_array, type, length, offset = 0;
205 pr_debug("TLV array length %d\n", tlv_array_len);
207 if (local == NULL)
208 return -ENODEV;
210 while (offset < tlv_array_len) {
211 type = tlv[0];
212 length = tlv[1];
214 pr_debug("type 0x%x length %d\n", type, length);
216 switch (type) {
217 case LLCP_TLV_VERSION:
218 local->remote_version = llcp_tlv_version(tlv);
219 break;
220 case LLCP_TLV_MIUX:
221 local->remote_miu = llcp_tlv_miux(tlv) + 128;
222 break;
223 case LLCP_TLV_WKS:
224 local->remote_wks = llcp_tlv_wks(tlv);
225 break;
226 case LLCP_TLV_LTO:
227 local->remote_lto = llcp_tlv_lto(tlv) * 10;
228 break;
229 case LLCP_TLV_OPT:
230 local->remote_opt = llcp_tlv_opt(tlv);
231 break;
232 default:
233 pr_err("Invalid gt tlv value 0x%x\n", type);
234 break;
237 offset += length + 2;
238 tlv += length + 2;
241 pr_debug("version 0x%x miu %d lto %d opt 0x%x wks 0x%x\n",
242 local->remote_version, local->remote_miu,
243 local->remote_lto, local->remote_opt,
244 local->remote_wks);
246 return 0;
249 int nfc_llcp_parse_connection_tlv(struct nfc_llcp_sock *sock,
250 u8 *tlv_array, u16 tlv_array_len)
252 u8 *tlv = tlv_array, type, length, offset = 0;
254 pr_debug("TLV array length %d\n", tlv_array_len);
256 if (sock == NULL)
257 return -ENOTCONN;
259 while (offset < tlv_array_len) {
260 type = tlv[0];
261 length = tlv[1];
263 pr_debug("type 0x%x length %d\n", type, length);
265 switch (type) {
266 case LLCP_TLV_MIUX:
267 sock->remote_miu = llcp_tlv_miux(tlv) + 128;
268 break;
269 case LLCP_TLV_RW:
270 sock->remote_rw = llcp_tlv_rw(tlv);
271 break;
272 case LLCP_TLV_SN:
273 break;
274 default:
275 pr_err("Invalid gt tlv value 0x%x\n", type);
276 break;
279 offset += length + 2;
280 tlv += length + 2;
283 pr_debug("sock %p rw %d miu %d\n", sock,
284 sock->remote_rw, sock->remote_miu);
286 return 0;
289 static struct sk_buff *llcp_add_header(struct sk_buff *pdu,
290 u8 dsap, u8 ssap, u8 ptype)
292 u8 header[2];
294 pr_debug("ptype 0x%x dsap 0x%x ssap 0x%x\n", ptype, dsap, ssap);
296 header[0] = (u8)((dsap << 2) | (ptype >> 2));
297 header[1] = (u8)((ptype << 6) | ssap);
299 pr_debug("header 0x%x 0x%x\n", header[0], header[1]);
301 memcpy(skb_put(pdu, LLCP_HEADER_SIZE), header, LLCP_HEADER_SIZE);
303 return pdu;
306 static struct sk_buff *llcp_add_tlv(struct sk_buff *pdu, u8 *tlv,
307 u8 tlv_length)
309 /* XXX Add an skb length check */
311 if (tlv == NULL)
312 return NULL;
314 memcpy(skb_put(pdu, tlv_length), tlv, tlv_length);
316 return pdu;
319 static struct sk_buff *llcp_allocate_pdu(struct nfc_llcp_sock *sock,
320 u8 cmd, u16 size)
322 struct sk_buff *skb;
323 int err;
325 if (sock->ssap == 0)
326 return NULL;
328 skb = nfc_alloc_send_skb(sock->dev, &sock->sk, MSG_DONTWAIT,
329 size + LLCP_HEADER_SIZE, &err);
330 if (skb == NULL) {
331 pr_err("Could not allocate PDU\n");
332 return NULL;
335 skb = llcp_add_header(skb, sock->dsap, sock->ssap, cmd);
337 return skb;
340 int nfc_llcp_send_disconnect(struct nfc_llcp_sock *sock)
342 struct sk_buff *skb;
343 struct nfc_dev *dev;
344 struct nfc_llcp_local *local;
346 pr_debug("Sending DISC\n");
348 local = sock->local;
349 if (local == NULL)
350 return -ENODEV;
352 dev = sock->dev;
353 if (dev == NULL)
354 return -ENODEV;
356 skb = llcp_allocate_pdu(sock, LLCP_PDU_DISC, 0);
357 if (skb == NULL)
358 return -ENOMEM;
360 skb_queue_tail(&local->tx_queue, skb);
362 return 0;
365 int nfc_llcp_send_symm(struct nfc_dev *dev)
367 struct sk_buff *skb;
368 struct nfc_llcp_local *local;
369 u16 size = 0;
371 pr_debug("Sending SYMM\n");
373 local = nfc_llcp_find_local(dev);
374 if (local == NULL)
375 return -ENODEV;
377 size += LLCP_HEADER_SIZE;
378 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
380 skb = alloc_skb(size, GFP_KERNEL);
381 if (skb == NULL)
382 return -ENOMEM;
384 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
386 skb = llcp_add_header(skb, 0, 0, LLCP_PDU_SYMM);
388 __net_timestamp(skb);
390 nfc_llcp_send_to_raw_sock(local, skb, NFC_DIRECTION_TX);
392 return nfc_data_exchange(dev, local->target_idx, skb,
393 nfc_llcp_recv, local);
396 int nfc_llcp_send_connect(struct nfc_llcp_sock *sock)
398 struct nfc_llcp_local *local;
399 struct sk_buff *skb;
400 u8 *service_name_tlv = NULL, service_name_tlv_length;
401 u8 *miux_tlv = NULL, miux_tlv_length;
402 u8 *rw_tlv = NULL, rw_tlv_length, rw;
403 int err;
404 u16 size = 0;
405 __be16 miux;
407 pr_debug("Sending CONNECT\n");
409 local = sock->local;
410 if (local == NULL)
411 return -ENODEV;
413 if (sock->service_name != NULL) {
414 service_name_tlv = nfc_llcp_build_tlv(LLCP_TLV_SN,
415 sock->service_name,
416 sock->service_name_len,
417 &service_name_tlv_length);
418 size += service_name_tlv_length;
421 /* If the socket parameters are not set, use the local ones */
422 miux = be16_to_cpu(sock->miux) > LLCP_MAX_MIUX ?
423 local->miux : sock->miux;
424 rw = sock->rw > LLCP_MAX_RW ? local->rw : sock->rw;
426 miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&miux, 0,
427 &miux_tlv_length);
428 size += miux_tlv_length;
430 rw_tlv = nfc_llcp_build_tlv(LLCP_TLV_RW, &rw, 0, &rw_tlv_length);
431 size += rw_tlv_length;
433 pr_debug("SKB size %d SN length %zu\n", size, sock->service_name_len);
435 skb = llcp_allocate_pdu(sock, LLCP_PDU_CONNECT, size);
436 if (skb == NULL) {
437 err = -ENOMEM;
438 goto error_tlv;
441 if (service_name_tlv != NULL)
442 skb = llcp_add_tlv(skb, service_name_tlv,
443 service_name_tlv_length);
445 skb = llcp_add_tlv(skb, miux_tlv, miux_tlv_length);
446 skb = llcp_add_tlv(skb, rw_tlv, rw_tlv_length);
448 skb_queue_tail(&local->tx_queue, skb);
450 return 0;
452 error_tlv:
453 pr_err("error %d\n", err);
455 kfree(service_name_tlv);
456 kfree(miux_tlv);
457 kfree(rw_tlv);
459 return err;
462 int nfc_llcp_send_cc(struct nfc_llcp_sock *sock)
464 struct nfc_llcp_local *local;
465 struct sk_buff *skb;
466 u8 *miux_tlv = NULL, miux_tlv_length;
467 u8 *rw_tlv = NULL, rw_tlv_length, rw;
468 int err;
469 u16 size = 0;
470 __be16 miux;
472 pr_debug("Sending CC\n");
474 local = sock->local;
475 if (local == NULL)
476 return -ENODEV;
478 /* If the socket parameters are not set, use the local ones */
479 miux = be16_to_cpu(sock->miux) > LLCP_MAX_MIUX ?
480 local->miux : sock->miux;
481 rw = sock->rw > LLCP_MAX_RW ? local->rw : sock->rw;
483 miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&miux, 0,
484 &miux_tlv_length);
485 size += miux_tlv_length;
487 rw_tlv = nfc_llcp_build_tlv(LLCP_TLV_RW, &rw, 0, &rw_tlv_length);
488 size += rw_tlv_length;
490 skb = llcp_allocate_pdu(sock, LLCP_PDU_CC, size);
491 if (skb == NULL) {
492 err = -ENOMEM;
493 goto error_tlv;
496 skb = llcp_add_tlv(skb, miux_tlv, miux_tlv_length);
497 skb = llcp_add_tlv(skb, rw_tlv, rw_tlv_length);
499 skb_queue_tail(&local->tx_queue, skb);
501 return 0;
503 error_tlv:
504 pr_err("error %d\n", err);
506 kfree(miux_tlv);
507 kfree(rw_tlv);
509 return err;
512 static struct sk_buff *nfc_llcp_allocate_snl(struct nfc_llcp_local *local,
513 size_t tlv_length)
515 struct sk_buff *skb;
516 struct nfc_dev *dev;
517 u16 size = 0;
519 if (local == NULL)
520 return ERR_PTR(-ENODEV);
522 dev = local->dev;
523 if (dev == NULL)
524 return ERR_PTR(-ENODEV);
526 size += LLCP_HEADER_SIZE;
527 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
528 size += tlv_length;
530 skb = alloc_skb(size, GFP_KERNEL);
531 if (skb == NULL)
532 return ERR_PTR(-ENOMEM);
534 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
536 skb = llcp_add_header(skb, LLCP_SAP_SDP, LLCP_SAP_SDP, LLCP_PDU_SNL);
538 return skb;
541 int nfc_llcp_send_snl_sdres(struct nfc_llcp_local *local,
542 struct hlist_head *tlv_list, size_t tlvs_len)
544 struct nfc_llcp_sdp_tlv *sdp;
545 struct hlist_node *n;
546 struct sk_buff *skb;
548 skb = nfc_llcp_allocate_snl(local, tlvs_len);
549 if (IS_ERR(skb))
550 return PTR_ERR(skb);
552 hlist_for_each_entry_safe(sdp, n, tlv_list, node) {
553 memcpy(skb_put(skb, sdp->tlv_len), sdp->tlv, sdp->tlv_len);
555 hlist_del(&sdp->node);
557 nfc_llcp_free_sdp_tlv(sdp);
560 skb_queue_tail(&local->tx_queue, skb);
562 return 0;
565 int nfc_llcp_send_snl_sdreq(struct nfc_llcp_local *local,
566 struct hlist_head *tlv_list, size_t tlvs_len)
568 struct nfc_llcp_sdp_tlv *sdreq;
569 struct hlist_node *n;
570 struct sk_buff *skb;
572 skb = nfc_llcp_allocate_snl(local, tlvs_len);
573 if (IS_ERR(skb))
574 return PTR_ERR(skb);
576 mutex_lock(&local->sdreq_lock);
578 if (hlist_empty(&local->pending_sdreqs))
579 mod_timer(&local->sdreq_timer,
580 jiffies + msecs_to_jiffies(3 * local->remote_lto));
582 hlist_for_each_entry_safe(sdreq, n, tlv_list, node) {
583 pr_debug("tid %d for %s\n", sdreq->tid, sdreq->uri);
585 memcpy(skb_put(skb, sdreq->tlv_len), sdreq->tlv,
586 sdreq->tlv_len);
588 hlist_del(&sdreq->node);
590 hlist_add_head(&sdreq->node, &local->pending_sdreqs);
593 mutex_unlock(&local->sdreq_lock);
595 skb_queue_tail(&local->tx_queue, skb);
597 return 0;
600 int nfc_llcp_send_dm(struct nfc_llcp_local *local, u8 ssap, u8 dsap, u8 reason)
602 struct sk_buff *skb;
603 struct nfc_dev *dev;
604 u16 size = 1; /* Reason code */
606 pr_debug("Sending DM reason 0x%x\n", reason);
608 if (local == NULL)
609 return -ENODEV;
611 dev = local->dev;
612 if (dev == NULL)
613 return -ENODEV;
615 size += LLCP_HEADER_SIZE;
616 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
618 skb = alloc_skb(size, GFP_KERNEL);
619 if (skb == NULL)
620 return -ENOMEM;
622 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
624 skb = llcp_add_header(skb, dsap, ssap, LLCP_PDU_DM);
626 memcpy(skb_put(skb, 1), &reason, 1);
628 skb_queue_head(&local->tx_queue, skb);
630 return 0;
633 int nfc_llcp_send_i_frame(struct nfc_llcp_sock *sock,
634 struct msghdr *msg, size_t len)
636 struct sk_buff *pdu;
637 struct sock *sk = &sock->sk;
638 struct nfc_llcp_local *local;
639 size_t frag_len = 0, remaining_len;
640 u8 *msg_data, *msg_ptr;
641 u16 remote_miu;
643 pr_debug("Send I frame len %zd\n", len);
645 local = sock->local;
646 if (local == NULL)
647 return -ENODEV;
649 /* Remote is ready but has not acknowledged our frames */
650 if((sock->remote_ready &&
651 skb_queue_len(&sock->tx_pending_queue) >= sock->remote_rw &&
652 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
653 pr_err("Pending queue is full %d frames\n",
654 skb_queue_len(&sock->tx_pending_queue));
655 return -ENOBUFS;
658 /* Remote is not ready and we've been queueing enough frames */
659 if ((!sock->remote_ready &&
660 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
661 pr_err("Tx queue is full %d frames\n",
662 skb_queue_len(&sock->tx_queue));
663 return -ENOBUFS;
666 msg_data = kzalloc(len, GFP_KERNEL);
667 if (msg_data == NULL)
668 return -ENOMEM;
670 if (memcpy_from_msg(msg_data, msg, len)) {
671 kfree(msg_data);
672 return -EFAULT;
675 remaining_len = len;
676 msg_ptr = msg_data;
678 do {
679 remote_miu = sock->remote_miu > LLCP_MAX_MIU ?
680 LLCP_DEFAULT_MIU : sock->remote_miu;
682 frag_len = min_t(size_t, remote_miu, remaining_len);
684 pr_debug("Fragment %zd bytes remaining %zd",
685 frag_len, remaining_len);
687 pdu = llcp_allocate_pdu(sock, LLCP_PDU_I,
688 frag_len + LLCP_SEQUENCE_SIZE);
689 if (pdu == NULL) {
690 kfree(msg_data);
691 return -ENOMEM;
694 skb_put(pdu, LLCP_SEQUENCE_SIZE);
696 if (likely(frag_len > 0))
697 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
699 skb_queue_tail(&sock->tx_queue, pdu);
701 lock_sock(sk);
703 nfc_llcp_queue_i_frames(sock);
705 release_sock(sk);
707 remaining_len -= frag_len;
708 msg_ptr += frag_len;
709 } while (remaining_len > 0);
711 kfree(msg_data);
713 return len;
716 int nfc_llcp_send_ui_frame(struct nfc_llcp_sock *sock, u8 ssap, u8 dsap,
717 struct msghdr *msg, size_t len)
719 struct sk_buff *pdu;
720 struct nfc_llcp_local *local;
721 size_t frag_len = 0, remaining_len;
722 u8 *msg_ptr, *msg_data;
723 u16 remote_miu;
724 int err;
726 pr_debug("Send UI frame len %zd\n", len);
728 local = sock->local;
729 if (local == NULL)
730 return -ENODEV;
732 msg_data = kzalloc(len, GFP_KERNEL);
733 if (msg_data == NULL)
734 return -ENOMEM;
736 if (memcpy_from_msg(msg_data, msg, len)) {
737 kfree(msg_data);
738 return -EFAULT;
741 remaining_len = len;
742 msg_ptr = msg_data;
744 do {
745 remote_miu = sock->remote_miu > LLCP_MAX_MIU ?
746 local->remote_miu : sock->remote_miu;
748 frag_len = min_t(size_t, remote_miu, remaining_len);
750 pr_debug("Fragment %zd bytes remaining %zd",
751 frag_len, remaining_len);
753 pdu = nfc_alloc_send_skb(sock->dev, &sock->sk, MSG_DONTWAIT,
754 frag_len + LLCP_HEADER_SIZE, &err);
755 if (pdu == NULL) {
756 pr_err("Could not allocate PDU\n");
757 continue;
760 pdu = llcp_add_header(pdu, dsap, ssap, LLCP_PDU_UI);
762 if (likely(frag_len > 0))
763 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
765 /* No need to check for the peer RW for UI frames */
766 skb_queue_tail(&local->tx_queue, pdu);
768 remaining_len -= frag_len;
769 msg_ptr += frag_len;
770 } while (remaining_len > 0);
772 kfree(msg_data);
774 return len;
777 int nfc_llcp_send_rr(struct nfc_llcp_sock *sock)
779 struct sk_buff *skb;
780 struct nfc_llcp_local *local;
782 pr_debug("Send rr nr %d\n", sock->recv_n);
784 local = sock->local;
785 if (local == NULL)
786 return -ENODEV;
788 skb = llcp_allocate_pdu(sock, LLCP_PDU_RR, LLCP_SEQUENCE_SIZE);
789 if (skb == NULL)
790 return -ENOMEM;
792 skb_put(skb, LLCP_SEQUENCE_SIZE);
794 skb->data[2] = sock->recv_n;
796 skb_queue_head(&local->tx_queue, skb);
798 return 0;