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 memcpy(skb_put(pdu, LLCP_HEADER_SIZE), 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 memcpy(skb_put(pdu, tlv_length), 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 if (!service_name_tlv) {
426 size += service_name_tlv_length;
429 /* If the socket parameters are not set, use the local ones */
430 miux = be16_to_cpu(sock->miux) > LLCP_MAX_MIUX ?
431 local->miux : sock->miux;
432 rw = sock->rw > LLCP_MAX_RW ? local->rw : sock->rw;
434 miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&miux, 0,
440 size += miux_tlv_length;
442 rw_tlv = nfc_llcp_build_tlv(LLCP_TLV_RW, &rw, 0, &rw_tlv_length);
447 size += rw_tlv_length;
449 pr_debug("SKB size %d SN length %zu\n", size, sock->service_name_len);
451 skb = llcp_allocate_pdu(sock, LLCP_PDU_CONNECT, size);
457 if (service_name_tlv != NULL)
458 skb = llcp_add_tlv(skb, service_name_tlv,
459 service_name_tlv_length);
461 skb = llcp_add_tlv(skb, miux_tlv, miux_tlv_length);
462 skb = llcp_add_tlv(skb, rw_tlv, rw_tlv_length);
464 skb_queue_tail(&local->tx_queue, skb);
469 pr_err("error %d\n", err);
471 kfree(service_name_tlv);
478 int nfc_llcp_send_cc(struct nfc_llcp_sock *sock)
480 struct nfc_llcp_local *local;
482 u8 *miux_tlv = NULL, miux_tlv_length;
483 u8 *rw_tlv = NULL, rw_tlv_length, rw;
488 pr_debug("Sending CC\n");
494 /* If the socket parameters are not set, use the local ones */
495 miux = be16_to_cpu(sock->miux) > LLCP_MAX_MIUX ?
496 local->miux : sock->miux;
497 rw = sock->rw > LLCP_MAX_RW ? local->rw : sock->rw;
499 miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&miux, 0,
505 size += miux_tlv_length;
507 rw_tlv = nfc_llcp_build_tlv(LLCP_TLV_RW, &rw, 0, &rw_tlv_length);
512 size += rw_tlv_length;
514 skb = llcp_allocate_pdu(sock, LLCP_PDU_CC, size);
520 skb = llcp_add_tlv(skb, miux_tlv, miux_tlv_length);
521 skb = llcp_add_tlv(skb, rw_tlv, rw_tlv_length);
523 skb_queue_tail(&local->tx_queue, skb);
528 pr_err("error %d\n", err);
536 static struct sk_buff *nfc_llcp_allocate_snl(struct nfc_llcp_local *local,
544 return ERR_PTR(-ENODEV);
548 return ERR_PTR(-ENODEV);
550 size += LLCP_HEADER_SIZE;
551 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
554 skb = alloc_skb(size, GFP_KERNEL);
556 return ERR_PTR(-ENOMEM);
558 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
560 skb = llcp_add_header(skb, LLCP_SAP_SDP, LLCP_SAP_SDP, LLCP_PDU_SNL);
565 int nfc_llcp_send_snl_sdres(struct nfc_llcp_local *local,
566 struct hlist_head *tlv_list, size_t tlvs_len)
568 struct nfc_llcp_sdp_tlv *sdp;
569 struct hlist_node *n;
572 skb = nfc_llcp_allocate_snl(local, tlvs_len);
576 hlist_for_each_entry_safe(sdp, n, tlv_list, node) {
577 memcpy(skb_put(skb, sdp->tlv_len), sdp->tlv, sdp->tlv_len);
579 hlist_del(&sdp->node);
581 nfc_llcp_free_sdp_tlv(sdp);
584 skb_queue_tail(&local->tx_queue, skb);
589 int nfc_llcp_send_snl_sdreq(struct nfc_llcp_local *local,
590 struct hlist_head *tlv_list, size_t tlvs_len)
592 struct nfc_llcp_sdp_tlv *sdreq;
593 struct hlist_node *n;
596 skb = nfc_llcp_allocate_snl(local, tlvs_len);
600 mutex_lock(&local->sdreq_lock);
602 if (hlist_empty(&local->pending_sdreqs))
603 mod_timer(&local->sdreq_timer,
604 jiffies + msecs_to_jiffies(3 * local->remote_lto));
606 hlist_for_each_entry_safe(sdreq, n, tlv_list, node) {
607 pr_debug("tid %d for %s\n", sdreq->tid, sdreq->uri);
609 memcpy(skb_put(skb, sdreq->tlv_len), sdreq->tlv,
612 hlist_del(&sdreq->node);
614 hlist_add_head(&sdreq->node, &local->pending_sdreqs);
617 mutex_unlock(&local->sdreq_lock);
619 skb_queue_tail(&local->tx_queue, skb);
624 int nfc_llcp_send_dm(struct nfc_llcp_local *local, u8 ssap, u8 dsap, u8 reason)
628 u16 size = 1; /* Reason code */
630 pr_debug("Sending DM reason 0x%x\n", reason);
639 size += LLCP_HEADER_SIZE;
640 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
642 skb = alloc_skb(size, GFP_KERNEL);
646 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
648 skb = llcp_add_header(skb, dsap, ssap, LLCP_PDU_DM);
650 memcpy(skb_put(skb, 1), &reason, 1);
652 skb_queue_head(&local->tx_queue, skb);
657 int nfc_llcp_send_i_frame(struct nfc_llcp_sock *sock,
658 struct msghdr *msg, size_t len)
661 struct sock *sk = &sock->sk;
662 struct nfc_llcp_local *local;
663 size_t frag_len = 0, remaining_len;
664 u8 *msg_data, *msg_ptr;
667 pr_debug("Send I frame len %zd\n", len);
673 /* Remote is ready but has not acknowledged our frames */
674 if((sock->remote_ready &&
675 skb_queue_len(&sock->tx_pending_queue) >= sock->remote_rw &&
676 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
677 pr_err("Pending queue is full %d frames\n",
678 skb_queue_len(&sock->tx_pending_queue));
682 /* Remote is not ready and we've been queueing enough frames */
683 if ((!sock->remote_ready &&
684 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
685 pr_err("Tx queue is full %d frames\n",
686 skb_queue_len(&sock->tx_queue));
690 msg_data = kzalloc(len, GFP_KERNEL);
691 if (msg_data == NULL)
694 if (memcpy_from_msg(msg_data, msg, len)) {
703 remote_miu = sock->remote_miu > LLCP_MAX_MIU ?
704 LLCP_DEFAULT_MIU : sock->remote_miu;
706 frag_len = min_t(size_t, remote_miu, remaining_len);
708 pr_debug("Fragment %zd bytes remaining %zd",
709 frag_len, remaining_len);
711 pdu = llcp_allocate_pdu(sock, LLCP_PDU_I,
712 frag_len + LLCP_SEQUENCE_SIZE);
718 skb_put(pdu, LLCP_SEQUENCE_SIZE);
720 if (likely(frag_len > 0))
721 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
723 skb_queue_tail(&sock->tx_queue, pdu);
727 nfc_llcp_queue_i_frames(sock);
731 remaining_len -= frag_len;
733 } while (remaining_len > 0);
740 int nfc_llcp_send_ui_frame(struct nfc_llcp_sock *sock, u8 ssap, u8 dsap,
741 struct msghdr *msg, size_t len)
744 struct nfc_llcp_local *local;
745 size_t frag_len = 0, remaining_len;
746 u8 *msg_ptr, *msg_data;
750 pr_debug("Send UI frame len %zd\n", len);
756 msg_data = kzalloc(len, GFP_KERNEL);
757 if (msg_data == NULL)
760 if (memcpy_from_msg(msg_data, msg, len)) {
769 remote_miu = sock->remote_miu > LLCP_MAX_MIU ?
770 local->remote_miu : sock->remote_miu;
772 frag_len = min_t(size_t, remote_miu, remaining_len);
774 pr_debug("Fragment %zd bytes remaining %zd",
775 frag_len, remaining_len);
777 pdu = nfc_alloc_send_skb(sock->dev, &sock->sk, 0,
778 frag_len + LLCP_HEADER_SIZE, &err);
780 pr_err("Could not allocate PDU (error=%d)\n", err);
781 len -= remaining_len;
787 pdu = llcp_add_header(pdu, dsap, ssap, LLCP_PDU_UI);
789 if (likely(frag_len > 0))
790 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
792 /* No need to check for the peer RW for UI frames */
793 skb_queue_tail(&local->tx_queue, pdu);
795 remaining_len -= frag_len;
797 } while (remaining_len > 0);
804 int nfc_llcp_send_rr(struct nfc_llcp_sock *sock)
807 struct nfc_llcp_local *local;
809 pr_debug("Send rr nr %d\n", sock->recv_n);
815 skb = llcp_allocate_pdu(sock, LLCP_PDU_RR, LLCP_SEQUENCE_SIZE);
819 skb_put(skb, LLCP_SEQUENCE_SIZE);
821 skb->data[2] = sock->recv_n;
823 skb_queue_head(&local->tx_queue, skb);