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, write to the
16 * Free Software Foundation, Inc.,
17 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20 #define pr_fmt(fmt) "llcp: %s: " fmt, __func__
22 #include <linux/init.h>
23 #include <linux/kernel.h>
24 #include <linux/module.h>
25 #include <linux/nfc.h>
27 #include <net/nfc/nfc.h>
32 static u8 llcp_tlv_length[LLCP_TLV_MAX] = {
46 static u8 llcp_tlv8(u8 *tlv, u8 type)
48 if (tlv[0] != type || tlv[1] != llcp_tlv_length[tlv[0]])
54 static u16 llcp_tlv16(u8 *tlv, u8 type)
56 if (tlv[0] != type || tlv[1] != llcp_tlv_length[tlv[0]])
59 return be16_to_cpu(*((__be16 *)(tlv + 2)));
63 static u8 llcp_tlv_version(u8 *tlv)
65 return llcp_tlv8(tlv, LLCP_TLV_VERSION);
68 static u16 llcp_tlv_miux(u8 *tlv)
70 return llcp_tlv16(tlv, LLCP_TLV_MIUX) & 0x7ff;
73 static u16 llcp_tlv_wks(u8 *tlv)
75 return llcp_tlv16(tlv, LLCP_TLV_WKS);
78 static u16 llcp_tlv_lto(u8 *tlv)
80 return llcp_tlv8(tlv, LLCP_TLV_LTO);
83 static u8 llcp_tlv_opt(u8 *tlv)
85 return llcp_tlv8(tlv, LLCP_TLV_OPT);
88 static u8 llcp_tlv_rw(u8 *tlv)
90 return llcp_tlv8(tlv, LLCP_TLV_RW) & 0xf;
93 u8 *nfc_llcp_build_tlv(u8 type, u8 *value, u8 value_length, u8 *tlv_length)
97 pr_debug("type %d\n", type);
99 if (type >= LLCP_TLV_MAX)
102 length = llcp_tlv_length[type];
103 if (length == 0 && value_length == 0)
105 else if (length == 0)
106 length = value_length;
108 *tlv_length = 2 + length;
109 tlv = kzalloc(2 + length, GFP_KERNEL);
115 memcpy(tlv + 2, value, length);
120 struct nfc_llcp_sdp_tlv *nfc_llcp_build_sdres_tlv(u8 tid, u8 sap)
122 struct nfc_llcp_sdp_tlv *sdres;
125 sdres = kzalloc(sizeof(struct nfc_llcp_sdp_tlv), GFP_KERNEL);
132 sdres->tlv = nfc_llcp_build_tlv(LLCP_TLV_SDRES, value, 2,
134 if (sdres->tlv == NULL) {
142 INIT_HLIST_NODE(&sdres->node);
147 struct nfc_llcp_sdp_tlv *nfc_llcp_build_sdreq_tlv(u8 tid, char *uri,
150 struct nfc_llcp_sdp_tlv *sdreq;
152 pr_debug("uri: %s, len: %zu\n", uri, uri_len);
154 sdreq = kzalloc(sizeof(struct nfc_llcp_sdp_tlv), GFP_KERNEL);
158 sdreq->tlv_len = uri_len + 3;
160 if (uri[uri_len - 1] == 0)
163 sdreq->tlv = kzalloc(sdreq->tlv_len + 1, GFP_KERNEL);
164 if (sdreq->tlv == NULL) {
169 sdreq->tlv[0] = LLCP_TLV_SDREQ;
170 sdreq->tlv[1] = sdreq->tlv_len - 2;
174 sdreq->uri = sdreq->tlv + 3;
175 memcpy(sdreq->uri, uri, uri_len);
177 sdreq->time = jiffies;
179 INIT_HLIST_NODE(&sdreq->node);
184 void nfc_llcp_free_sdp_tlv(struct nfc_llcp_sdp_tlv *sdp)
190 void nfc_llcp_free_sdp_tlv_list(struct hlist_head *head)
192 struct nfc_llcp_sdp_tlv *sdp;
193 struct hlist_node *n;
195 hlist_for_each_entry_safe(sdp, n, head, node) {
196 hlist_del(&sdp->node);
198 nfc_llcp_free_sdp_tlv(sdp);
202 int nfc_llcp_parse_gb_tlv(struct nfc_llcp_local *local,
203 u8 *tlv_array, u16 tlv_array_len)
205 u8 *tlv = tlv_array, type, length, offset = 0;
207 pr_debug("TLV array length %d\n", tlv_array_len);
212 while (offset < tlv_array_len) {
216 pr_debug("type 0x%x length %d\n", type, length);
219 case LLCP_TLV_VERSION:
220 local->remote_version = llcp_tlv_version(tlv);
223 local->remote_miu = llcp_tlv_miux(tlv) + 128;
226 local->remote_wks = llcp_tlv_wks(tlv);
229 local->remote_lto = llcp_tlv_lto(tlv) * 10;
232 local->remote_opt = llcp_tlv_opt(tlv);
235 pr_err("Invalid gt tlv value 0x%x\n", type);
239 offset += length + 2;
243 pr_debug("version 0x%x miu %d lto %d opt 0x%x wks 0x%x\n",
244 local->remote_version, local->remote_miu,
245 local->remote_lto, local->remote_opt,
251 int nfc_llcp_parse_connection_tlv(struct nfc_llcp_sock *sock,
252 u8 *tlv_array, u16 tlv_array_len)
254 u8 *tlv = tlv_array, type, length, offset = 0;
256 pr_debug("TLV array length %d\n", tlv_array_len);
261 while (offset < tlv_array_len) {
265 pr_debug("type 0x%x length %d\n", type, length);
269 sock->remote_miu = llcp_tlv_miux(tlv) + 128;
272 sock->remote_rw = llcp_tlv_rw(tlv);
277 pr_err("Invalid gt tlv value 0x%x\n", type);
281 offset += length + 2;
285 pr_debug("sock %p rw %d miu %d\n", sock,
286 sock->remote_rw, sock->remote_miu);
291 static struct sk_buff *llcp_add_header(struct sk_buff *pdu,
292 u8 dsap, u8 ssap, u8 ptype)
296 pr_debug("ptype 0x%x dsap 0x%x ssap 0x%x\n", ptype, dsap, ssap);
298 header[0] = (u8)((dsap << 2) | (ptype >> 2));
299 header[1] = (u8)((ptype << 6) | ssap);
301 pr_debug("header 0x%x 0x%x\n", header[0], header[1]);
303 memcpy(skb_put(pdu, LLCP_HEADER_SIZE), header, LLCP_HEADER_SIZE);
308 static struct sk_buff *llcp_add_tlv(struct sk_buff *pdu, u8 *tlv,
311 /* XXX Add an skb length check */
316 memcpy(skb_put(pdu, tlv_length), tlv, tlv_length);
321 static struct sk_buff *llcp_allocate_pdu(struct nfc_llcp_sock *sock,
330 skb = nfc_alloc_send_skb(sock->dev, &sock->sk, MSG_DONTWAIT,
331 size + LLCP_HEADER_SIZE, &err);
333 pr_err("Could not allocate PDU\n");
337 skb = llcp_add_header(skb, sock->dsap, sock->ssap, cmd);
342 int nfc_llcp_disconnect(struct nfc_llcp_sock *sock)
346 struct nfc_llcp_local *local;
348 pr_debug("Sending DISC\n");
358 skb = llcp_allocate_pdu(sock, LLCP_PDU_DISC, 0);
362 skb_queue_tail(&local->tx_queue, skb);
367 int nfc_llcp_send_symm(struct nfc_dev *dev)
370 struct nfc_llcp_local *local;
373 pr_debug("Sending SYMM\n");
375 local = nfc_llcp_find_local(dev);
379 size += LLCP_HEADER_SIZE;
380 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
382 skb = alloc_skb(size, GFP_KERNEL);
386 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
388 skb = llcp_add_header(skb, 0, 0, LLCP_PDU_SYMM);
390 __net_timestamp(skb);
392 nfc_llcp_send_to_raw_sock(local, skb, NFC_LLCP_DIRECTION_TX);
394 return nfc_data_exchange(dev, local->target_idx, skb,
395 nfc_llcp_recv, local);
398 int nfc_llcp_send_connect(struct nfc_llcp_sock *sock)
400 struct nfc_llcp_local *local;
402 u8 *service_name_tlv = NULL, service_name_tlv_length;
403 u8 *miux_tlv = NULL, miux_tlv_length;
404 u8 *rw_tlv = NULL, rw_tlv_length, rw;
408 pr_debug("Sending CONNECT\n");
414 if (sock->service_name != NULL) {
415 service_name_tlv = nfc_llcp_build_tlv(LLCP_TLV_SN,
417 sock->service_name_len,
418 &service_name_tlv_length);
419 size += service_name_tlv_length;
422 /* If the socket parameters are not set, use the local ones */
423 miux = sock->miux > LLCP_MAX_MIUX ? 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,
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);
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);
453 pr_err("error %d\n", err);
455 kfree(service_name_tlv);
462 int nfc_llcp_send_cc(struct nfc_llcp_sock *sock)
464 struct nfc_llcp_local *local;
466 u8 *miux_tlv = NULL, miux_tlv_length;
467 u8 *rw_tlv = NULL, rw_tlv_length, rw;
471 pr_debug("Sending CC\n");
477 /* If the socket parameters are not set, use the local ones */
478 miux = sock->miux > LLCP_MAX_MIUX ? local->miux : sock->miux;
479 rw = sock->rw > LLCP_MAX_RW ? local->rw : sock->rw;
481 miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&miux, 0,
483 size += miux_tlv_length;
485 rw_tlv = nfc_llcp_build_tlv(LLCP_TLV_RW, &rw, 0, &rw_tlv_length);
486 size += rw_tlv_length;
488 skb = llcp_allocate_pdu(sock, LLCP_PDU_CC, size);
494 skb = llcp_add_tlv(skb, miux_tlv, miux_tlv_length);
495 skb = llcp_add_tlv(skb, rw_tlv, rw_tlv_length);
497 skb_queue_tail(&local->tx_queue, skb);
502 pr_err("error %d\n", err);
510 static struct sk_buff *nfc_llcp_allocate_snl(struct nfc_llcp_local *local,
518 return ERR_PTR(-ENODEV);
522 return ERR_PTR(-ENODEV);
524 size += LLCP_HEADER_SIZE;
525 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
528 skb = alloc_skb(size, GFP_KERNEL);
530 return ERR_PTR(-ENOMEM);
532 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
534 skb = llcp_add_header(skb, LLCP_SAP_SDP, LLCP_SAP_SDP, LLCP_PDU_SNL);
539 int nfc_llcp_send_snl_sdres(struct nfc_llcp_local *local,
540 struct hlist_head *tlv_list, size_t tlvs_len)
542 struct nfc_llcp_sdp_tlv *sdp;
543 struct hlist_node *n;
546 skb = nfc_llcp_allocate_snl(local, tlvs_len);
550 hlist_for_each_entry_safe(sdp, n, tlv_list, node) {
551 memcpy(skb_put(skb, sdp->tlv_len), sdp->tlv, sdp->tlv_len);
553 hlist_del(&sdp->node);
555 nfc_llcp_free_sdp_tlv(sdp);
558 skb_queue_tail(&local->tx_queue, skb);
563 int nfc_llcp_send_snl_sdreq(struct nfc_llcp_local *local,
564 struct hlist_head *tlv_list, size_t tlvs_len)
566 struct nfc_llcp_sdp_tlv *sdreq;
567 struct hlist_node *n;
570 skb = nfc_llcp_allocate_snl(local, tlvs_len);
574 mutex_lock(&local->sdreq_lock);
576 if (hlist_empty(&local->pending_sdreqs))
577 mod_timer(&local->sdreq_timer,
578 jiffies + msecs_to_jiffies(3 * local->remote_lto));
580 hlist_for_each_entry_safe(sdreq, n, tlv_list, node) {
581 pr_debug("tid %d for %s\n", sdreq->tid, sdreq->uri);
583 memcpy(skb_put(skb, sdreq->tlv_len), sdreq->tlv,
586 hlist_del(&sdreq->node);
588 hlist_add_head(&sdreq->node, &local->pending_sdreqs);
591 mutex_unlock(&local->sdreq_lock);
593 skb_queue_tail(&local->tx_queue, skb);
598 int nfc_llcp_send_dm(struct nfc_llcp_local *local, u8 ssap, u8 dsap, u8 reason)
602 u16 size = 1; /* Reason code */
604 pr_debug("Sending DM reason 0x%x\n", reason);
613 size += LLCP_HEADER_SIZE;
614 size += dev->tx_headroom + dev->tx_tailroom + NFC_HEADER_SIZE;
616 skb = alloc_skb(size, GFP_KERNEL);
620 skb_reserve(skb, dev->tx_headroom + NFC_HEADER_SIZE);
622 skb = llcp_add_header(skb, dsap, ssap, LLCP_PDU_DM);
624 memcpy(skb_put(skb, 1), &reason, 1);
626 skb_queue_head(&local->tx_queue, skb);
631 int nfc_llcp_send_disconnect(struct nfc_llcp_sock *sock)
634 struct nfc_llcp_local *local;
636 pr_debug("Send DISC\n");
642 skb = llcp_allocate_pdu(sock, LLCP_PDU_DISC, 0);
646 skb_queue_head(&local->tx_queue, skb);
651 int nfc_llcp_send_i_frame(struct nfc_llcp_sock *sock,
652 struct msghdr *msg, size_t len)
655 struct sock *sk = &sock->sk;
656 struct nfc_llcp_local *local;
657 size_t frag_len = 0, remaining_len;
658 u8 *msg_data, *msg_ptr;
660 pr_debug("Send I frame len %zd\n", len);
666 /* Remote is ready but has not acknowledged our frames */
667 if((sock->remote_ready &&
668 skb_queue_len(&sock->tx_pending_queue) >= sock->remote_rw &&
669 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
670 pr_err("Pending queue is full %d frames\n",
671 skb_queue_len(&sock->tx_pending_queue));
675 /* Remote is not ready and we've been queueing enough frames */
676 if ((!sock->remote_ready &&
677 skb_queue_len(&sock->tx_queue) >= 2 * sock->remote_rw)) {
678 pr_err("Tx queue is full %d frames\n",
679 skb_queue_len(&sock->tx_queue));
683 msg_data = kzalloc(len, GFP_KERNEL);
684 if (msg_data == NULL)
687 if (memcpy_fromiovec(msg_data, msg->msg_iov, len)) {
695 while (remaining_len > 0) {
697 frag_len = min_t(size_t, sock->remote_miu, remaining_len);
699 pr_debug("Fragment %zd bytes remaining %zd",
700 frag_len, remaining_len);
702 pdu = llcp_allocate_pdu(sock, LLCP_PDU_I,
703 frag_len + LLCP_SEQUENCE_SIZE);
707 skb_put(pdu, LLCP_SEQUENCE_SIZE);
709 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
711 skb_queue_tail(&sock->tx_queue, pdu);
715 nfc_llcp_queue_i_frames(sock);
719 remaining_len -= frag_len;
728 int nfc_llcp_send_ui_frame(struct nfc_llcp_sock *sock, u8 ssap, u8 dsap,
729 struct msghdr *msg, size_t len)
732 struct nfc_llcp_local *local;
733 size_t frag_len = 0, remaining_len;
734 u8 *msg_ptr, *msg_data;
737 pr_debug("Send UI frame len %zd\n", len);
743 msg_data = kzalloc(len, GFP_KERNEL);
744 if (msg_data == NULL)
747 if (memcpy_fromiovec(msg_data, msg->msg_iov, len)) {
755 while (remaining_len > 0) {
757 frag_len = min_t(size_t, sock->remote_miu, remaining_len);
759 pr_debug("Fragment %zd bytes remaining %zd",
760 frag_len, remaining_len);
762 pdu = nfc_alloc_send_skb(sock->dev, &sock->sk, MSG_DONTWAIT,
763 frag_len + LLCP_HEADER_SIZE, &err);
765 pr_err("Could not allocate PDU\n");
769 pdu = llcp_add_header(pdu, dsap, ssap, LLCP_PDU_UI);
771 memcpy(skb_put(pdu, frag_len), msg_ptr, frag_len);
773 /* No need to check for the peer RW for UI frames */
774 skb_queue_tail(&local->tx_queue, pdu);
776 remaining_len -= frag_len;
785 int nfc_llcp_send_rr(struct nfc_llcp_sock *sock)
788 struct nfc_llcp_local *local;
790 pr_debug("Send rr nr %d\n", sock->recv_n);
796 skb = llcp_allocate_pdu(sock, LLCP_PDU_RR, LLCP_SEQUENCE_SIZE);
800 skb_put(skb, LLCP_SEQUENCE_SIZE);
802 skb->data[2] = sock->recv_n;
804 skb_queue_head(&local->tx_queue, skb);