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>
30 static u8 llcp_tlv_length
[LLCP_TLV_MAX
] = {
44 static u8
llcp_tlv8(u8
*tlv
, u8 type
)
46 if (tlv
[0] != type
|| tlv
[1] != llcp_tlv_length
[tlv
[0]])
52 static u16
llcp_tlv16(u8
*tlv
, u8 type
)
54 if (tlv
[0] != type
|| tlv
[1] != llcp_tlv_length
[tlv
[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
)
95 pr_debug("type %d\n", type
);
97 if (type
>= LLCP_TLV_MAX
)
100 length
= llcp_tlv_length
[type
];
101 if (length
== 0 && value_length
== 0)
103 else if (length
== 0)
104 length
= value_length
;
106 *tlv_length
= 2 + length
;
107 tlv
= kzalloc(2 + length
, GFP_KERNEL
);
113 memcpy(tlv
+ 2, value
, length
);
118 struct nfc_llcp_sdp_tlv
*nfc_llcp_build_sdres_tlv(u8 tid
, u8 sap
)
120 struct nfc_llcp_sdp_tlv
*sdres
;
123 sdres
= kzalloc(sizeof(struct nfc_llcp_sdp_tlv
), GFP_KERNEL
);
130 sdres
->tlv
= nfc_llcp_build_tlv(LLCP_TLV_SDRES
, value
, 2,
132 if (sdres
->tlv
== NULL
) {
140 INIT_HLIST_NODE(&sdres
->node
);
145 struct nfc_llcp_sdp_tlv
*nfc_llcp_build_sdreq_tlv(u8 tid
, char *uri
,
148 struct nfc_llcp_sdp_tlv
*sdreq
;
150 pr_debug("uri: %s, len: %zu\n", uri
, uri_len
);
152 /* sdreq->tlv_len is u8, takes uri_len, + 3 for header, + 1 for NULL */
153 if (WARN_ON_ONCE(uri_len
> U8_MAX
- 4))
156 sdreq
= kzalloc(sizeof(struct nfc_llcp_sdp_tlv
), GFP_KERNEL
);
160 sdreq
->tlv_len
= uri_len
+ 3;
162 if (uri
[uri_len
- 1] == 0)
165 sdreq
->tlv
= kzalloc(sdreq
->tlv_len
+ 1, GFP_KERNEL
);
166 if (sdreq
->tlv
== NULL
) {
171 sdreq
->tlv
[0] = LLCP_TLV_SDREQ
;
172 sdreq
->tlv
[1] = sdreq
->tlv_len
- 2;
176 sdreq
->uri
= sdreq
->tlv
+ 3;
177 memcpy(sdreq
->uri
, uri
, uri_len
);
179 sdreq
->time
= jiffies
;
181 INIT_HLIST_NODE(&sdreq
->node
);
186 void nfc_llcp_free_sdp_tlv(struct nfc_llcp_sdp_tlv
*sdp
)
192 void nfc_llcp_free_sdp_tlv_list(struct hlist_head
*head
)
194 struct nfc_llcp_sdp_tlv
*sdp
;
195 struct hlist_node
*n
;
197 hlist_for_each_entry_safe(sdp
, n
, head
, node
) {
198 hlist_del(&sdp
->node
);
200 nfc_llcp_free_sdp_tlv(sdp
);
204 int nfc_llcp_parse_gb_tlv(struct nfc_llcp_local
*local
,
205 u8
*tlv_array
, u16 tlv_array_len
)
207 u8
*tlv
= tlv_array
, type
, length
, offset
= 0;
209 pr_debug("TLV array length %d\n", tlv_array_len
);
214 while (offset
< tlv_array_len
) {
218 pr_debug("type 0x%x length %d\n", type
, length
);
221 case LLCP_TLV_VERSION
:
222 local
->remote_version
= llcp_tlv_version(tlv
);
225 local
->remote_miu
= llcp_tlv_miux(tlv
) + 128;
228 local
->remote_wks
= llcp_tlv_wks(tlv
);
231 local
->remote_lto
= llcp_tlv_lto(tlv
) * 10;
234 local
->remote_opt
= llcp_tlv_opt(tlv
);
237 pr_err("Invalid gt tlv value 0x%x\n", type
);
241 offset
+= length
+ 2;
245 pr_debug("version 0x%x miu %d lto %d opt 0x%x wks 0x%x\n",
246 local
->remote_version
, local
->remote_miu
,
247 local
->remote_lto
, local
->remote_opt
,
253 int nfc_llcp_parse_connection_tlv(struct nfc_llcp_sock
*sock
,
254 u8
*tlv_array
, u16 tlv_array_len
)
256 u8
*tlv
= tlv_array
, type
, length
, offset
= 0;
258 pr_debug("TLV array length %d\n", tlv_array_len
);
263 while (offset
< tlv_array_len
) {
267 pr_debug("type 0x%x length %d\n", type
, length
);
271 sock
->remote_miu
= llcp_tlv_miux(tlv
) + 128;
274 sock
->remote_rw
= llcp_tlv_rw(tlv
);
279 pr_err("Invalid gt tlv value 0x%x\n", type
);
283 offset
+= length
+ 2;
287 pr_debug("sock %p rw %d miu %d\n", sock
,
288 sock
->remote_rw
, sock
->remote_miu
);
293 static struct sk_buff
*llcp_add_header(struct sk_buff
*pdu
,
294 u8 dsap
, u8 ssap
, u8 ptype
)
298 pr_debug("ptype 0x%x dsap 0x%x ssap 0x%x\n", ptype
, dsap
, ssap
);
300 header
[0] = (u8
)((dsap
<< 2) | (ptype
>> 2));
301 header
[1] = (u8
)((ptype
<< 6) | ssap
);
303 pr_debug("header 0x%x 0x%x\n", header
[0], header
[1]);
305 skb_put_data(pdu
, header
, LLCP_HEADER_SIZE
);
310 static struct sk_buff
*llcp_add_tlv(struct sk_buff
*pdu
, u8
*tlv
,
313 /* XXX Add an skb length check */
318 skb_put_data(pdu
, tlv
, tlv_length
);
323 static struct sk_buff
*llcp_allocate_pdu(struct nfc_llcp_sock
*sock
,
332 skb
= nfc_alloc_send_skb(sock
->dev
, &sock
->sk
, MSG_DONTWAIT
,
333 size
+ LLCP_HEADER_SIZE
, &err
);
335 pr_err("Could not allocate PDU\n");
339 skb
= llcp_add_header(skb
, sock
->dsap
, sock
->ssap
, cmd
);
344 int nfc_llcp_send_disconnect(struct nfc_llcp_sock
*sock
)
348 struct nfc_llcp_local
*local
;
350 pr_debug("Sending DISC\n");
360 skb
= llcp_allocate_pdu(sock
, LLCP_PDU_DISC
, 0);
364 skb_queue_tail(&local
->tx_queue
, skb
);
369 int nfc_llcp_send_symm(struct nfc_dev
*dev
)
372 struct nfc_llcp_local
*local
;
375 pr_debug("Sending SYMM\n");
377 local
= nfc_llcp_find_local(dev
);
381 size
+= LLCP_HEADER_SIZE
;
382 size
+= dev
->tx_headroom
+ dev
->tx_tailroom
+ NFC_HEADER_SIZE
;
384 skb
= alloc_skb(size
, GFP_KERNEL
);
388 skb_reserve(skb
, dev
->tx_headroom
+ NFC_HEADER_SIZE
);
390 skb
= llcp_add_header(skb
, 0, 0, LLCP_PDU_SYMM
);
392 __net_timestamp(skb
);
394 nfc_llcp_send_to_raw_sock(local
, skb
, NFC_DIRECTION_TX
);
396 return nfc_data_exchange(dev
, local
->target_idx
, skb
,
397 nfc_llcp_recv
, local
);
400 int nfc_llcp_send_connect(struct nfc_llcp_sock
*sock
)
402 struct nfc_llcp_local
*local
;
404 u8
*service_name_tlv
= NULL
, service_name_tlv_length
;
405 u8
*miux_tlv
= NULL
, miux_tlv_length
;
406 u8
*rw_tlv
= NULL
, rw_tlv_length
, rw
;
411 pr_debug("Sending CONNECT\n");
417 if (sock
->service_name
!= NULL
) {
418 service_name_tlv
= nfc_llcp_build_tlv(LLCP_TLV_SN
,
420 sock
->service_name_len
,
421 &service_name_tlv_length
);
422 size
+= service_name_tlv_length
;
425 /* If the socket parameters are not set, use the local ones */
426 miux
= be16_to_cpu(sock
->miux
) > LLCP_MAX_MIUX
?
427 local
->miux
: sock
->miux
;
428 rw
= sock
->rw
> LLCP_MAX_RW
? local
->rw
: sock
->rw
;
430 miux_tlv
= nfc_llcp_build_tlv(LLCP_TLV_MIUX
, (u8
*)&miux
, 0,
432 size
+= miux_tlv_length
;
434 rw_tlv
= nfc_llcp_build_tlv(LLCP_TLV_RW
, &rw
, 0, &rw_tlv_length
);
435 size
+= rw_tlv_length
;
437 pr_debug("SKB size %d SN length %zu\n", size
, sock
->service_name_len
);
439 skb
= llcp_allocate_pdu(sock
, LLCP_PDU_CONNECT
, size
);
445 llcp_add_tlv(skb
, service_name_tlv
, service_name_tlv_length
);
446 llcp_add_tlv(skb
, miux_tlv
, miux_tlv_length
);
447 llcp_add_tlv(skb
, rw_tlv
, rw_tlv_length
);
449 skb_queue_tail(&local
->tx_queue
, skb
);
455 pr_err("error %d\n", err
);
457 kfree(service_name_tlv
);
464 int nfc_llcp_send_cc(struct nfc_llcp_sock
*sock
)
466 struct nfc_llcp_local
*local
;
468 u8
*miux_tlv
= NULL
, miux_tlv_length
;
469 u8
*rw_tlv
= NULL
, rw_tlv_length
, rw
;
474 pr_debug("Sending CC\n");
480 /* If the socket parameters are not set, use the local ones */
481 miux
= be16_to_cpu(sock
->miux
) > LLCP_MAX_MIUX
?
482 local
->miux
: sock
->miux
;
483 rw
= sock
->rw
> LLCP_MAX_RW
? local
->rw
: sock
->rw
;
485 miux_tlv
= nfc_llcp_build_tlv(LLCP_TLV_MIUX
, (u8
*)&miux
, 0,
487 size
+= miux_tlv_length
;
489 rw_tlv
= nfc_llcp_build_tlv(LLCP_TLV_RW
, &rw
, 0, &rw_tlv_length
);
490 size
+= rw_tlv_length
;
492 skb
= llcp_allocate_pdu(sock
, LLCP_PDU_CC
, size
);
498 llcp_add_tlv(skb
, miux_tlv
, miux_tlv_length
);
499 llcp_add_tlv(skb
, rw_tlv
, rw_tlv_length
);
501 skb_queue_tail(&local
->tx_queue
, skb
);
507 pr_err("error %d\n", err
);
515 static struct sk_buff
*nfc_llcp_allocate_snl(struct nfc_llcp_local
*local
,
523 return ERR_PTR(-ENODEV
);
527 return ERR_PTR(-ENODEV
);
529 size
+= LLCP_HEADER_SIZE
;
530 size
+= dev
->tx_headroom
+ dev
->tx_tailroom
+ NFC_HEADER_SIZE
;
533 skb
= alloc_skb(size
, GFP_KERNEL
);
535 return ERR_PTR(-ENOMEM
);
537 skb_reserve(skb
, dev
->tx_headroom
+ NFC_HEADER_SIZE
);
539 skb
= llcp_add_header(skb
, LLCP_SAP_SDP
, LLCP_SAP_SDP
, LLCP_PDU_SNL
);
544 int nfc_llcp_send_snl_sdres(struct nfc_llcp_local
*local
,
545 struct hlist_head
*tlv_list
, size_t tlvs_len
)
547 struct nfc_llcp_sdp_tlv
*sdp
;
548 struct hlist_node
*n
;
551 skb
= nfc_llcp_allocate_snl(local
, tlvs_len
);
555 hlist_for_each_entry_safe(sdp
, n
, tlv_list
, node
) {
556 skb_put_data(skb
, sdp
->tlv
, sdp
->tlv_len
);
558 hlist_del(&sdp
->node
);
560 nfc_llcp_free_sdp_tlv(sdp
);
563 skb_queue_tail(&local
->tx_queue
, skb
);
568 int nfc_llcp_send_snl_sdreq(struct nfc_llcp_local
*local
,
569 struct hlist_head
*tlv_list
, size_t tlvs_len
)
571 struct nfc_llcp_sdp_tlv
*sdreq
;
572 struct hlist_node
*n
;
575 skb
= nfc_llcp_allocate_snl(local
, tlvs_len
);
579 mutex_lock(&local
->sdreq_lock
);
581 if (hlist_empty(&local
->pending_sdreqs
))
582 mod_timer(&local
->sdreq_timer
,
583 jiffies
+ msecs_to_jiffies(3 * local
->remote_lto
));
585 hlist_for_each_entry_safe(sdreq
, n
, tlv_list
, node
) {
586 pr_debug("tid %d for %s\n", sdreq
->tid
, sdreq
->uri
);
588 skb_put_data(skb
, sdreq
->tlv
, sdreq
->tlv_len
);
590 hlist_del(&sdreq
->node
);
592 hlist_add_head(&sdreq
->node
, &local
->pending_sdreqs
);
595 mutex_unlock(&local
->sdreq_lock
);
597 skb_queue_tail(&local
->tx_queue
, skb
);
602 int nfc_llcp_send_dm(struct nfc_llcp_local
*local
, u8 ssap
, u8 dsap
, u8 reason
)
606 u16 size
= 1; /* Reason code */
608 pr_debug("Sending DM reason 0x%x\n", reason
);
617 size
+= LLCP_HEADER_SIZE
;
618 size
+= dev
->tx_headroom
+ dev
->tx_tailroom
+ NFC_HEADER_SIZE
;
620 skb
= alloc_skb(size
, GFP_KERNEL
);
624 skb_reserve(skb
, dev
->tx_headroom
+ NFC_HEADER_SIZE
);
626 skb
= llcp_add_header(skb
, dsap
, ssap
, LLCP_PDU_DM
);
628 skb_put_data(skb
, &reason
, 1);
630 skb_queue_head(&local
->tx_queue
, skb
);
635 int nfc_llcp_send_i_frame(struct nfc_llcp_sock
*sock
,
636 struct msghdr
*msg
, size_t len
)
639 struct sock
*sk
= &sock
->sk
;
640 struct nfc_llcp_local
*local
;
641 size_t frag_len
= 0, remaining_len
;
642 u8
*msg_data
, *msg_ptr
;
645 pr_debug("Send I frame len %zd\n", len
);
651 /* Remote is ready but has not acknowledged our frames */
652 if((sock
->remote_ready
&&
653 skb_queue_len(&sock
->tx_pending_queue
) >= sock
->remote_rw
&&
654 skb_queue_len(&sock
->tx_queue
) >= 2 * sock
->remote_rw
)) {
655 pr_err("Pending queue is full %d frames\n",
656 skb_queue_len(&sock
->tx_pending_queue
));
660 /* Remote is not ready and we've been queueing enough frames */
661 if ((!sock
->remote_ready
&&
662 skb_queue_len(&sock
->tx_queue
) >= 2 * sock
->remote_rw
)) {
663 pr_err("Tx queue is full %d frames\n",
664 skb_queue_len(&sock
->tx_queue
));
668 msg_data
= kmalloc(len
, GFP_USER
| __GFP_NOWARN
);
669 if (msg_data
== NULL
)
672 if (memcpy_from_msg(msg_data
, msg
, len
)) {
681 remote_miu
= sock
->remote_miu
> LLCP_MAX_MIU
?
682 LLCP_DEFAULT_MIU
: sock
->remote_miu
;
684 frag_len
= min_t(size_t, remote_miu
, remaining_len
);
686 pr_debug("Fragment %zd bytes remaining %zd",
687 frag_len
, remaining_len
);
689 pdu
= llcp_allocate_pdu(sock
, LLCP_PDU_I
,
690 frag_len
+ LLCP_SEQUENCE_SIZE
);
696 skb_put(pdu
, LLCP_SEQUENCE_SIZE
);
698 if (likely(frag_len
> 0))
699 skb_put_data(pdu
, msg_ptr
, frag_len
);
701 skb_queue_tail(&sock
->tx_queue
, pdu
);
705 nfc_llcp_queue_i_frames(sock
);
709 remaining_len
-= frag_len
;
711 } while (remaining_len
> 0);
718 int nfc_llcp_send_ui_frame(struct nfc_llcp_sock
*sock
, u8 ssap
, u8 dsap
,
719 struct msghdr
*msg
, size_t len
)
722 struct nfc_llcp_local
*local
;
723 size_t frag_len
= 0, remaining_len
;
724 u8
*msg_ptr
, *msg_data
;
728 pr_debug("Send UI frame len %zd\n", len
);
734 msg_data
= kmalloc(len
, GFP_USER
| __GFP_NOWARN
);
735 if (msg_data
== NULL
)
738 if (memcpy_from_msg(msg_data
, msg
, len
)) {
747 remote_miu
= sock
->remote_miu
> LLCP_MAX_MIU
?
748 local
->remote_miu
: sock
->remote_miu
;
750 frag_len
= min_t(size_t, remote_miu
, remaining_len
);
752 pr_debug("Fragment %zd bytes remaining %zd",
753 frag_len
, remaining_len
);
755 pdu
= nfc_alloc_send_skb(sock
->dev
, &sock
->sk
, 0,
756 frag_len
+ LLCP_HEADER_SIZE
, &err
);
758 pr_err("Could not allocate PDU (error=%d)\n", err
);
759 len
-= remaining_len
;
765 pdu
= llcp_add_header(pdu
, dsap
, ssap
, LLCP_PDU_UI
);
767 if (likely(frag_len
> 0))
768 skb_put_data(pdu
, msg_ptr
, frag_len
);
770 /* No need to check for the peer RW for UI frames */
771 skb_queue_tail(&local
->tx_queue
, pdu
);
773 remaining_len
-= frag_len
;
775 } while (remaining_len
> 0);
782 int nfc_llcp_send_rr(struct nfc_llcp_sock
*sock
)
785 struct nfc_llcp_local
*local
;
787 pr_debug("Send rr nr %d\n", sock
->recv_n
);
793 skb
= llcp_allocate_pdu(sock
, LLCP_PDU_RR
, LLCP_SEQUENCE_SIZE
);
797 skb_put(skb
, LLCP_SEQUENCE_SIZE
);
799 skb
->data
[2] = sock
->recv_n
;
801 skb_queue_head(&local
->tx_queue
, skb
);