|  | /* | 
|  | * Copyright (C) 2011  Intel Corporation. All rights reserved. | 
|  | * | 
|  | * This program is free software; you can redistribute it and/or modify | 
|  | * it under the terms of the GNU General Public License as published by | 
|  | * the Free Software Foundation; either version 2 of the License, or | 
|  | * (at your option) any later version. | 
|  | * | 
|  | * This program is distributed in the hope that it will be useful, | 
|  | * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|  | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 
|  | * GNU General Public License for more details. | 
|  | * | 
|  | * You should have received a copy of the GNU General Public License | 
|  | * along with this program; if not, write to the | 
|  | * Free Software Foundation, Inc., | 
|  | * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | 
|  | */ | 
|  |  | 
|  | #define pr_fmt(fmt) "llcp: %s: " fmt, __func__ | 
|  |  | 
|  | #include <linux/init.h> | 
|  | #include <linux/kernel.h> | 
|  | #include <linux/list.h> | 
|  | #include <linux/nfc.h> | 
|  |  | 
|  | #include "../nfc.h" | 
|  | #include "llcp.h" | 
|  |  | 
|  | static u8 llcp_magic[3] = {0x46, 0x66, 0x6d}; | 
|  |  | 
|  | static struct list_head llcp_devices; | 
|  |  | 
|  | static void nfc_llcp_socket_release(struct nfc_llcp_local *local) | 
|  | { | 
|  | struct nfc_llcp_sock *parent, *s, *n; | 
|  | struct sock *sk, *parent_sk; | 
|  | int i; | 
|  |  | 
|  | mutex_lock(&local->socket_lock); | 
|  |  | 
|  | for (i = 0; i < LLCP_MAX_SAP; i++) { | 
|  | parent = local->sockets[i]; | 
|  | if (parent == NULL) | 
|  | continue; | 
|  |  | 
|  | /* Release all child sockets */ | 
|  | list_for_each_entry_safe(s, n, &parent->list, list) { | 
|  | list_del_init(&s->list); | 
|  | sk = &s->sk; | 
|  |  | 
|  | lock_sock(sk); | 
|  |  | 
|  | if (sk->sk_state == LLCP_CONNECTED) | 
|  | nfc_put_device(s->dev); | 
|  |  | 
|  | sk->sk_state = LLCP_CLOSED; | 
|  |  | 
|  | release_sock(sk); | 
|  |  | 
|  | sock_orphan(sk); | 
|  |  | 
|  | s->local = NULL; | 
|  | } | 
|  |  | 
|  | parent_sk = &parent->sk; | 
|  |  | 
|  | lock_sock(parent_sk); | 
|  |  | 
|  | if (parent_sk->sk_state == LLCP_LISTEN) { | 
|  | struct nfc_llcp_sock *lsk, *n; | 
|  | struct sock *accept_sk; | 
|  |  | 
|  | list_for_each_entry_safe(lsk, n, &parent->accept_queue, | 
|  | accept_queue) { | 
|  | accept_sk = &lsk->sk; | 
|  | lock_sock(accept_sk); | 
|  |  | 
|  | nfc_llcp_accept_unlink(accept_sk); | 
|  |  | 
|  | accept_sk->sk_state = LLCP_CLOSED; | 
|  |  | 
|  | release_sock(accept_sk); | 
|  |  | 
|  | sock_orphan(accept_sk); | 
|  |  | 
|  | lsk->local = NULL; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (parent_sk->sk_state == LLCP_CONNECTED) | 
|  | nfc_put_device(parent->dev); | 
|  |  | 
|  | parent_sk->sk_state = LLCP_CLOSED; | 
|  |  | 
|  | release_sock(parent_sk); | 
|  |  | 
|  | sock_orphan(parent_sk); | 
|  |  | 
|  | parent->local = NULL; | 
|  | } | 
|  |  | 
|  | mutex_unlock(&local->socket_lock); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_clear_sdp(struct nfc_llcp_local *local) | 
|  | { | 
|  | mutex_lock(&local->sdp_lock); | 
|  |  | 
|  | local->local_wks = 0; | 
|  | local->local_sdp = 0; | 
|  | local->local_sap = 0; | 
|  |  | 
|  | mutex_unlock(&local->sdp_lock); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_timeout_work(struct work_struct *work) | 
|  | { | 
|  | struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local, | 
|  | timeout_work); | 
|  |  | 
|  | nfc_dep_link_down(local->dev); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_symm_timer(unsigned long data) | 
|  | { | 
|  | struct nfc_llcp_local *local = (struct nfc_llcp_local *) data; | 
|  |  | 
|  | pr_err("SYMM timeout\n"); | 
|  |  | 
|  | queue_work(local->timeout_wq, &local->timeout_work); | 
|  | } | 
|  |  | 
|  | struct nfc_llcp_local *nfc_llcp_find_local(struct nfc_dev *dev) | 
|  | { | 
|  | struct nfc_llcp_local *local, *n; | 
|  |  | 
|  | list_for_each_entry_safe(local, n, &llcp_devices, list) | 
|  | if (local->dev == dev) | 
|  | return local; | 
|  |  | 
|  | pr_debug("No device found\n"); | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | static char *wks[] = { | 
|  | NULL, | 
|  | NULL, /* SDP */ | 
|  | "urn:nfc:sn:ip", | 
|  | "urn:nfc:sn:obex", | 
|  | "urn:nfc:sn:snep", | 
|  | }; | 
|  |  | 
|  | static int nfc_llcp_wks_sap(char *service_name, size_t service_name_len) | 
|  | { | 
|  | int sap, num_wks; | 
|  |  | 
|  | pr_debug("%s\n", service_name); | 
|  |  | 
|  | if (service_name == NULL) | 
|  | return -EINVAL; | 
|  |  | 
|  | num_wks = ARRAY_SIZE(wks); | 
|  |  | 
|  | for (sap = 0; sap < num_wks; sap++) { | 
|  | if (wks[sap] == NULL) | 
|  | continue; | 
|  |  | 
|  | if (strncmp(wks[sap], service_name, service_name_len) == 0) | 
|  | return sap; | 
|  | } | 
|  |  | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | u8 nfc_llcp_get_sdp_ssap(struct nfc_llcp_local *local, | 
|  | struct nfc_llcp_sock *sock) | 
|  | { | 
|  | mutex_lock(&local->sdp_lock); | 
|  |  | 
|  | if (sock->service_name != NULL && sock->service_name_len > 0) { | 
|  | int ssap = nfc_llcp_wks_sap(sock->service_name, | 
|  | sock->service_name_len); | 
|  |  | 
|  | if (ssap > 0) { | 
|  | pr_debug("WKS %d\n", ssap); | 
|  |  | 
|  | /* This is a WKS, let's check if it's free */ | 
|  | if (local->local_wks & BIT(ssap)) { | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return LLCP_SAP_MAX; | 
|  | } | 
|  |  | 
|  | set_bit(ssap, &local->local_wks); | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return ssap; | 
|  | } | 
|  |  | 
|  | /* | 
|  | * This is not a well known service, | 
|  | * we should try to find a local SDP free spot | 
|  | */ | 
|  | ssap = find_first_zero_bit(&local->local_sdp, LLCP_SDP_NUM_SAP); | 
|  | if (ssap == LLCP_SDP_NUM_SAP) { | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return LLCP_SAP_MAX; | 
|  | } | 
|  |  | 
|  | pr_debug("SDP ssap %d\n", LLCP_WKS_NUM_SAP + ssap); | 
|  |  | 
|  | set_bit(ssap, &local->local_sdp); | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return LLCP_WKS_NUM_SAP + ssap; | 
|  |  | 
|  | } else if (sock->ssap != 0) { | 
|  | if (sock->ssap < LLCP_WKS_NUM_SAP) { | 
|  | if (!test_bit(sock->ssap, &local->local_wks)) { | 
|  | set_bit(sock->ssap, &local->local_wks); | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return sock->ssap; | 
|  | } | 
|  |  | 
|  | } else if (sock->ssap < LLCP_SDP_NUM_SAP) { | 
|  | if (!test_bit(sock->ssap - LLCP_WKS_NUM_SAP, | 
|  | &local->local_sdp)) { | 
|  | set_bit(sock->ssap - LLCP_WKS_NUM_SAP, | 
|  | &local->local_sdp); | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return sock->ssap; | 
|  | } | 
|  | } | 
|  | } | 
|  |  | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return LLCP_SAP_MAX; | 
|  | } | 
|  |  | 
|  | u8 nfc_llcp_get_local_ssap(struct nfc_llcp_local *local) | 
|  | { | 
|  | u8 local_ssap; | 
|  |  | 
|  | mutex_lock(&local->sdp_lock); | 
|  |  | 
|  | local_ssap = find_first_zero_bit(&local->local_sap, LLCP_LOCAL_NUM_SAP); | 
|  | if (local_ssap == LLCP_LOCAL_NUM_SAP) { | 
|  | mutex_unlock(&local->sdp_lock); | 
|  | return LLCP_SAP_MAX; | 
|  | } | 
|  |  | 
|  | set_bit(local_ssap, &local->local_sap); | 
|  |  | 
|  | mutex_unlock(&local->sdp_lock); | 
|  |  | 
|  | return local_ssap + LLCP_LOCAL_SAP_OFFSET; | 
|  | } | 
|  |  | 
|  | void nfc_llcp_put_ssap(struct nfc_llcp_local *local, u8 ssap) | 
|  | { | 
|  | u8 local_ssap; | 
|  | unsigned long *sdp; | 
|  |  | 
|  | if (ssap < LLCP_WKS_NUM_SAP) { | 
|  | local_ssap = ssap; | 
|  | sdp = &local->local_wks; | 
|  | } else if (ssap < LLCP_LOCAL_NUM_SAP) { | 
|  | local_ssap = ssap - LLCP_WKS_NUM_SAP; | 
|  | sdp = &local->local_sdp; | 
|  | } else if (ssap < LLCP_MAX_SAP) { | 
|  | local_ssap = ssap - LLCP_LOCAL_NUM_SAP; | 
|  | sdp = &local->local_sap; | 
|  | } else { | 
|  | return; | 
|  | } | 
|  |  | 
|  | mutex_lock(&local->sdp_lock); | 
|  |  | 
|  | clear_bit(local_ssap, sdp); | 
|  |  | 
|  | mutex_unlock(&local->sdp_lock); | 
|  | } | 
|  |  | 
|  | u8 *nfc_llcp_general_bytes(struct nfc_dev *dev, size_t *general_bytes_len) | 
|  | { | 
|  | struct nfc_llcp_local *local; | 
|  |  | 
|  | local = nfc_llcp_find_local(dev); | 
|  | if (local == NULL) { | 
|  | *general_bytes_len = 0; | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | *general_bytes_len = local->gb_len; | 
|  |  | 
|  | return local->gb; | 
|  | } | 
|  |  | 
|  | static int nfc_llcp_build_gb(struct nfc_llcp_local *local) | 
|  | { | 
|  | u8 *gb_cur, *version_tlv, version, version_length; | 
|  | u8 *lto_tlv, lto, lto_length; | 
|  | u8 *wks_tlv, wks_length; | 
|  | u8 gb_len = 0; | 
|  |  | 
|  | version = LLCP_VERSION_11; | 
|  | version_tlv = nfc_llcp_build_tlv(LLCP_TLV_VERSION, &version, | 
|  | 1, &version_length); | 
|  | gb_len += version_length; | 
|  |  | 
|  | /* 1500 ms */ | 
|  | lto = 150; | 
|  | lto_tlv = nfc_llcp_build_tlv(LLCP_TLV_VERSION, <o, 1, <o_length); | 
|  | gb_len += lto_length; | 
|  |  | 
|  | pr_debug("Local wks 0x%lx\n", local->local_wks); | 
|  | wks_tlv = nfc_llcp_build_tlv(LLCP_TLV_WKS, (u8 *)&local->local_wks, 2, | 
|  | &wks_length); | 
|  | gb_len += wks_length; | 
|  |  | 
|  | gb_len += ARRAY_SIZE(llcp_magic); | 
|  |  | 
|  | if (gb_len > NFC_MAX_GT_LEN) { | 
|  | kfree(version_tlv); | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | gb_cur = local->gb; | 
|  |  | 
|  | memcpy(gb_cur, llcp_magic, ARRAY_SIZE(llcp_magic)); | 
|  | gb_cur += ARRAY_SIZE(llcp_magic); | 
|  |  | 
|  | memcpy(gb_cur, version_tlv, version_length); | 
|  | gb_cur += version_length; | 
|  |  | 
|  | memcpy(gb_cur, lto_tlv, lto_length); | 
|  | gb_cur += lto_length; | 
|  |  | 
|  | memcpy(gb_cur, wks_tlv, wks_length); | 
|  | gb_cur += wks_length; | 
|  |  | 
|  | kfree(version_tlv); | 
|  | kfree(lto_tlv); | 
|  |  | 
|  | local->gb_len = gb_len; | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | int nfc_llcp_set_remote_gb(struct nfc_dev *dev, u8 *gb, u8 gb_len) | 
|  | { | 
|  | struct nfc_llcp_local *local = nfc_llcp_find_local(dev); | 
|  |  | 
|  | if (local == NULL) { | 
|  | pr_err("No LLCP device\n"); | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | memset(local->remote_gb, 0, NFC_MAX_GT_LEN); | 
|  | memcpy(local->remote_gb, gb, gb_len); | 
|  | local->remote_gb_len = gb_len; | 
|  |  | 
|  | if (local->remote_gb == NULL || local->remote_gb_len == 0) | 
|  | return -ENODEV; | 
|  |  | 
|  | if (memcmp(local->remote_gb, llcp_magic, 3)) { | 
|  | pr_err("MAC does not support LLCP\n"); | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | return nfc_llcp_parse_tlv(local, | 
|  | &local->remote_gb[3], | 
|  | local->remote_gb_len - 3); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_tx_work(struct work_struct *work) | 
|  | { | 
|  | struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local, | 
|  | tx_work); | 
|  | struct sk_buff *skb; | 
|  |  | 
|  | skb = skb_dequeue(&local->tx_queue); | 
|  | if (skb != NULL) { | 
|  | pr_debug("Sending pending skb\n"); | 
|  | nfc_data_exchange(local->dev, local->target_idx, | 
|  | skb, nfc_llcp_recv, local); | 
|  | } else { | 
|  | nfc_llcp_send_symm(local->dev); | 
|  | } | 
|  |  | 
|  | mod_timer(&local->link_timer, | 
|  | jiffies + msecs_to_jiffies(local->remote_lto)); | 
|  | } | 
|  |  | 
|  | static u8 nfc_llcp_dsap(struct sk_buff *pdu) | 
|  | { | 
|  | return (pdu->data[0] & 0xfc) >> 2; | 
|  | } | 
|  |  | 
|  | static u8 nfc_llcp_ptype(struct sk_buff *pdu) | 
|  | { | 
|  | return ((pdu->data[0] & 0x03) << 2) | ((pdu->data[1] & 0xc0) >> 6); | 
|  | } | 
|  |  | 
|  | static u8 nfc_llcp_ssap(struct sk_buff *pdu) | 
|  | { | 
|  | return pdu->data[1] & 0x3f; | 
|  | } | 
|  |  | 
|  | static u8 nfc_llcp_ns(struct sk_buff *pdu) | 
|  | { | 
|  | return pdu->data[2] >> 4; | 
|  | } | 
|  |  | 
|  | static u8 nfc_llcp_nr(struct sk_buff *pdu) | 
|  | { | 
|  | return pdu->data[2] & 0xf; | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_set_nrns(struct nfc_llcp_sock *sock, struct sk_buff *pdu) | 
|  | { | 
|  | pdu->data[2] = (sock->send_n << 4) | (sock->recv_n % 16); | 
|  | sock->send_n = (sock->send_n + 1) % 16; | 
|  | sock->recv_ack_n = (sock->recv_n - 1) % 16; | 
|  | } | 
|  |  | 
|  | static struct nfc_llcp_sock *nfc_llcp_sock_get(struct nfc_llcp_local *local, | 
|  | u8 ssap, u8 dsap) | 
|  | { | 
|  | struct nfc_llcp_sock *sock, *llcp_sock, *n; | 
|  |  | 
|  | if (ssap == 0 && dsap == 0) | 
|  | return NULL; | 
|  |  | 
|  | mutex_lock(&local->socket_lock); | 
|  | sock = local->sockets[ssap]; | 
|  | if (sock == NULL) { | 
|  | mutex_unlock(&local->socket_lock); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | pr_debug("root dsap %d (%d)\n", sock->dsap, dsap); | 
|  |  | 
|  | if (sock->dsap == dsap) { | 
|  | sock_hold(&sock->sk); | 
|  | mutex_unlock(&local->socket_lock); | 
|  | return sock; | 
|  | } | 
|  |  | 
|  | list_for_each_entry_safe(llcp_sock, n, &sock->list, list) { | 
|  | pr_debug("llcp_sock %p sk %p dsap %d\n", llcp_sock, | 
|  | &llcp_sock->sk, llcp_sock->dsap); | 
|  | if (llcp_sock->dsap == dsap) { | 
|  | sock_hold(&llcp_sock->sk); | 
|  | mutex_unlock(&local->socket_lock); | 
|  | return llcp_sock; | 
|  | } | 
|  | } | 
|  |  | 
|  | pr_err("Could not find socket for %d %d\n", ssap, dsap); | 
|  |  | 
|  | mutex_unlock(&local->socket_lock); | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_sock_put(struct nfc_llcp_sock *sock) | 
|  | { | 
|  | sock_put(&sock->sk); | 
|  | } | 
|  |  | 
|  | static u8 *nfc_llcp_connect_sn(struct sk_buff *skb, size_t *sn_len) | 
|  | { | 
|  | u8 *tlv = &skb->data[2], type, length; | 
|  | size_t tlv_array_len = skb->len - LLCP_HEADER_SIZE, offset = 0; | 
|  |  | 
|  | while (offset < tlv_array_len) { | 
|  | type = tlv[0]; | 
|  | length = tlv[1]; | 
|  |  | 
|  | pr_debug("type 0x%x length %d\n", type, length); | 
|  |  | 
|  | if (type == LLCP_TLV_SN) { | 
|  | *sn_len = length; | 
|  | return &tlv[2]; | 
|  | } | 
|  |  | 
|  | offset += length + 2; | 
|  | tlv += length + 2; | 
|  | } | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_recv_connect(struct nfc_llcp_local *local, | 
|  | struct sk_buff *skb) | 
|  | { | 
|  | struct sock *new_sk, *parent; | 
|  | struct nfc_llcp_sock *sock, *new_sock; | 
|  | u8 dsap, ssap, bound_sap, reason; | 
|  |  | 
|  | dsap = nfc_llcp_dsap(skb); | 
|  | ssap = nfc_llcp_ssap(skb); | 
|  |  | 
|  | pr_debug("%d %d\n", dsap, ssap); | 
|  |  | 
|  | nfc_llcp_parse_tlv(local, &skb->data[LLCP_HEADER_SIZE], | 
|  | skb->len - LLCP_HEADER_SIZE); | 
|  |  | 
|  | if (dsap != LLCP_SAP_SDP) { | 
|  | bound_sap = dsap; | 
|  |  | 
|  | mutex_lock(&local->socket_lock); | 
|  | sock = local->sockets[dsap]; | 
|  | if (sock == NULL) { | 
|  | mutex_unlock(&local->socket_lock); | 
|  | reason = LLCP_DM_NOBOUND; | 
|  | goto fail; | 
|  | } | 
|  |  | 
|  | sock_hold(&sock->sk); | 
|  | mutex_unlock(&local->socket_lock); | 
|  |  | 
|  | lock_sock(&sock->sk); | 
|  |  | 
|  | if (sock->dsap == LLCP_SAP_SDP && | 
|  | sock->sk.sk_state == LLCP_LISTEN) | 
|  | goto enqueue; | 
|  | } else { | 
|  | u8 *sn; | 
|  | size_t sn_len; | 
|  |  | 
|  | sn = nfc_llcp_connect_sn(skb, &sn_len); | 
|  | if (sn == NULL) { | 
|  | reason = LLCP_DM_NOBOUND; | 
|  | goto fail; | 
|  | } | 
|  |  | 
|  | pr_debug("Service name length %zu\n", sn_len); | 
|  |  | 
|  | mutex_lock(&local->socket_lock); | 
|  | for (bound_sap = 0; bound_sap < LLCP_LOCAL_SAP_OFFSET; | 
|  | bound_sap++) { | 
|  | sock = local->sockets[bound_sap]; | 
|  | if (sock == NULL) | 
|  | continue; | 
|  |  | 
|  | if (sock->service_name == NULL || | 
|  | sock->service_name_len == 0) | 
|  | continue; | 
|  |  | 
|  | if (sock->service_name_len != sn_len) | 
|  | continue; | 
|  |  | 
|  | if (sock->dsap == LLCP_SAP_SDP && | 
|  | sock->sk.sk_state == LLCP_LISTEN && | 
|  | !memcmp(sn, sock->service_name, sn_len)) { | 
|  | pr_debug("Found service name at SAP %d\n", | 
|  | bound_sap); | 
|  | sock_hold(&sock->sk); | 
|  | mutex_unlock(&local->socket_lock); | 
|  |  | 
|  | lock_sock(&sock->sk); | 
|  |  | 
|  | goto enqueue; | 
|  | } | 
|  | } | 
|  | mutex_unlock(&local->socket_lock); | 
|  | } | 
|  |  | 
|  | reason = LLCP_DM_NOBOUND; | 
|  | goto fail; | 
|  |  | 
|  | enqueue: | 
|  | parent = &sock->sk; | 
|  |  | 
|  | if (sk_acceptq_is_full(parent)) { | 
|  | reason = LLCP_DM_REJ; | 
|  | release_sock(&sock->sk); | 
|  | sock_put(&sock->sk); | 
|  | goto fail; | 
|  | } | 
|  |  | 
|  | new_sk = nfc_llcp_sock_alloc(NULL, parent->sk_type, GFP_ATOMIC); | 
|  | if (new_sk == NULL) { | 
|  | reason = LLCP_DM_REJ; | 
|  | release_sock(&sock->sk); | 
|  | sock_put(&sock->sk); | 
|  | goto fail; | 
|  | } | 
|  |  | 
|  | new_sock = nfc_llcp_sock(new_sk); | 
|  | new_sock->dev = local->dev; | 
|  | new_sock->local = local; | 
|  | new_sock->nfc_protocol = sock->nfc_protocol; | 
|  | new_sock->ssap = bound_sap; | 
|  | new_sock->dsap = ssap; | 
|  | new_sock->parent = parent; | 
|  |  | 
|  | pr_debug("new sock %p sk %p\n", new_sock, &new_sock->sk); | 
|  |  | 
|  | list_add_tail(&new_sock->list, &sock->list); | 
|  |  | 
|  | nfc_llcp_accept_enqueue(&sock->sk, new_sk); | 
|  |  | 
|  | nfc_get_device(local->dev->idx); | 
|  |  | 
|  | new_sk->sk_state = LLCP_CONNECTED; | 
|  |  | 
|  | /* Wake the listening processes */ | 
|  | parent->sk_data_ready(parent, 0); | 
|  |  | 
|  | /* Send CC */ | 
|  | nfc_llcp_send_cc(new_sock); | 
|  |  | 
|  | release_sock(&sock->sk); | 
|  | sock_put(&sock->sk); | 
|  |  | 
|  | return; | 
|  |  | 
|  | fail: | 
|  | /* Send DM */ | 
|  | nfc_llcp_send_dm(local, dsap, ssap, reason); | 
|  |  | 
|  | return; | 
|  |  | 
|  | } | 
|  |  | 
|  | int nfc_llcp_queue_i_frames(struct nfc_llcp_sock *sock) | 
|  | { | 
|  | int nr_frames = 0; | 
|  | struct nfc_llcp_local *local = sock->local; | 
|  |  | 
|  | pr_debug("Remote ready %d tx queue len %d remote rw %d", | 
|  | sock->remote_ready, skb_queue_len(&sock->tx_pending_queue), | 
|  | local->remote_rw); | 
|  |  | 
|  | /* Try to queue some I frames for transmission */ | 
|  | while (sock->remote_ready && | 
|  | skb_queue_len(&sock->tx_pending_queue) < local->remote_rw) { | 
|  | struct sk_buff *pdu, *pending_pdu; | 
|  |  | 
|  | pdu = skb_dequeue(&sock->tx_queue); | 
|  | if (pdu == NULL) | 
|  | break; | 
|  |  | 
|  | /* Update N(S)/N(R) */ | 
|  | nfc_llcp_set_nrns(sock, pdu); | 
|  |  | 
|  | pending_pdu = skb_clone(pdu, GFP_KERNEL); | 
|  |  | 
|  | skb_queue_tail(&local->tx_queue, pdu); | 
|  | skb_queue_tail(&sock->tx_pending_queue, pending_pdu); | 
|  | nr_frames++; | 
|  | } | 
|  |  | 
|  | return nr_frames; | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_recv_hdlc(struct nfc_llcp_local *local, | 
|  | struct sk_buff *skb) | 
|  | { | 
|  | struct nfc_llcp_sock *llcp_sock; | 
|  | struct sock *sk; | 
|  | u8 dsap, ssap, ptype, ns, nr; | 
|  |  | 
|  | ptype = nfc_llcp_ptype(skb); | 
|  | dsap = nfc_llcp_dsap(skb); | 
|  | ssap = nfc_llcp_ssap(skb); | 
|  | ns = nfc_llcp_ns(skb); | 
|  | nr = nfc_llcp_nr(skb); | 
|  |  | 
|  | pr_debug("%d %d R %d S %d\n", dsap, ssap, nr, ns); | 
|  |  | 
|  | llcp_sock = nfc_llcp_sock_get(local, dsap, ssap); | 
|  | if (llcp_sock == NULL) { | 
|  | nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN); | 
|  | return; | 
|  | } | 
|  |  | 
|  | sk = &llcp_sock->sk; | 
|  | lock_sock(sk); | 
|  | if (sk->sk_state == LLCP_CLOSED) { | 
|  | release_sock(sk); | 
|  | nfc_llcp_sock_put(llcp_sock); | 
|  | } | 
|  |  | 
|  | /* Pass the payload upstream */ | 
|  | if (ptype == LLCP_PDU_I) { | 
|  | pr_debug("I frame, queueing on %p\n", &llcp_sock->sk); | 
|  |  | 
|  | if (ns == llcp_sock->recv_n) | 
|  | llcp_sock->recv_n = (llcp_sock->recv_n + 1) % 16; | 
|  | else | 
|  | pr_err("Received out of sequence I PDU\n"); | 
|  |  | 
|  | skb_pull(skb, LLCP_HEADER_SIZE + LLCP_SEQUENCE_SIZE); | 
|  | if (sock_queue_rcv_skb(&llcp_sock->sk, skb)) { | 
|  | pr_err("receive queue is full\n"); | 
|  | skb_queue_head(&llcp_sock->tx_backlog_queue, skb); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* Remove skbs from the pending queue */ | 
|  | if (llcp_sock->send_ack_n != nr) { | 
|  | struct sk_buff *s, *tmp; | 
|  |  | 
|  | llcp_sock->send_ack_n = nr; | 
|  |  | 
|  | skb_queue_walk_safe(&llcp_sock->tx_pending_queue, s, tmp) | 
|  | if (nfc_llcp_ns(s) <= nr) { | 
|  | skb_unlink(s, &llcp_sock->tx_pending_queue); | 
|  | kfree_skb(s); | 
|  | } | 
|  | } | 
|  |  | 
|  | if (ptype == LLCP_PDU_RR) | 
|  | llcp_sock->remote_ready = true; | 
|  | else if (ptype == LLCP_PDU_RNR) | 
|  | llcp_sock->remote_ready = false; | 
|  |  | 
|  | if (nfc_llcp_queue_i_frames(llcp_sock) == 0) | 
|  | nfc_llcp_send_rr(llcp_sock); | 
|  |  | 
|  | release_sock(sk); | 
|  | nfc_llcp_sock_put(llcp_sock); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_recv_disc(struct nfc_llcp_local *local, | 
|  | struct sk_buff *skb) | 
|  | { | 
|  | struct nfc_llcp_sock *llcp_sock; | 
|  | struct sock *sk; | 
|  | u8 dsap, ssap; | 
|  |  | 
|  | dsap = nfc_llcp_dsap(skb); | 
|  | ssap = nfc_llcp_ssap(skb); | 
|  |  | 
|  | llcp_sock = nfc_llcp_sock_get(local, dsap, ssap); | 
|  | if (llcp_sock == NULL) { | 
|  | nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN); | 
|  | return; | 
|  | } | 
|  |  | 
|  | sk = &llcp_sock->sk; | 
|  | lock_sock(sk); | 
|  | if (sk->sk_state == LLCP_CLOSED) { | 
|  | release_sock(sk); | 
|  | nfc_llcp_sock_put(llcp_sock); | 
|  | } | 
|  |  | 
|  | if (sk->sk_state == LLCP_CONNECTED) { | 
|  | nfc_put_device(local->dev); | 
|  | sk->sk_state = LLCP_CLOSED; | 
|  | sk->sk_state_change(sk); | 
|  | } | 
|  |  | 
|  | nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_DISC); | 
|  |  | 
|  | release_sock(sk); | 
|  | nfc_llcp_sock_put(llcp_sock); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_recv_cc(struct nfc_llcp_local *local, struct sk_buff *skb) | 
|  | { | 
|  | struct nfc_llcp_sock *llcp_sock; | 
|  | u8 dsap, ssap; | 
|  |  | 
|  | dsap = nfc_llcp_dsap(skb); | 
|  | ssap = nfc_llcp_ssap(skb); | 
|  |  | 
|  | llcp_sock = nfc_llcp_sock_get(local, dsap, ssap); | 
|  |  | 
|  | if (llcp_sock == NULL) | 
|  | llcp_sock = nfc_llcp_sock_get(local, dsap, LLCP_SAP_SDP); | 
|  |  | 
|  | if (llcp_sock == NULL) { | 
|  | pr_err("Invalid CC\n"); | 
|  | nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN); | 
|  |  | 
|  | return; | 
|  | } | 
|  |  | 
|  | llcp_sock->dsap = ssap; | 
|  |  | 
|  | nfc_llcp_parse_tlv(local, &skb->data[LLCP_HEADER_SIZE], | 
|  | skb->len - LLCP_HEADER_SIZE); | 
|  |  | 
|  | nfc_llcp_sock_put(llcp_sock); | 
|  | } | 
|  |  | 
|  | static void nfc_llcp_rx_work(struct work_struct *work) | 
|  | { | 
|  | struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local, | 
|  | rx_work); | 
|  | u8 dsap, ssap, ptype; | 
|  | struct sk_buff *skb; | 
|  |  | 
|  | skb = local->rx_pending; | 
|  | if (skb == NULL) { | 
|  | pr_debug("No pending SKB\n"); | 
|  | return; | 
|  | } | 
|  |  | 
|  | ptype = nfc_llcp_ptype(skb); | 
|  | dsap = nfc_llcp_dsap(skb); | 
|  | ssap = nfc_llcp_ssap(skb); | 
|  |  | 
|  | pr_debug("ptype 0x%x dsap 0x%x ssap 0x%x\n", ptype, dsap, ssap); | 
|  |  | 
|  | switch (ptype) { | 
|  | case LLCP_PDU_SYMM: | 
|  | pr_debug("SYMM\n"); | 
|  | break; | 
|  |  | 
|  | case LLCP_PDU_CONNECT: | 
|  | pr_debug("CONNECT\n"); | 
|  | nfc_llcp_recv_connect(local, skb); | 
|  | break; | 
|  |  | 
|  | case LLCP_PDU_DISC: | 
|  | pr_debug("DISC\n"); | 
|  | nfc_llcp_recv_disc(local, skb); | 
|  | break; | 
|  |  | 
|  | case LLCP_PDU_CC: | 
|  | pr_debug("CC\n"); | 
|  | nfc_llcp_recv_cc(local, skb); | 
|  | break; | 
|  |  | 
|  | case LLCP_PDU_I: | 
|  | case LLCP_PDU_RR: | 
|  | case LLCP_PDU_RNR: | 
|  | pr_debug("I frame\n"); | 
|  | nfc_llcp_recv_hdlc(local, skb); | 
|  | break; | 
|  |  | 
|  | } | 
|  |  | 
|  | queue_work(local->tx_wq, &local->tx_work); | 
|  | kfree_skb(local->rx_pending); | 
|  | local->rx_pending = NULL; | 
|  |  | 
|  | return; | 
|  | } | 
|  |  | 
|  | void nfc_llcp_recv(void *data, struct sk_buff *skb, int err) | 
|  | { | 
|  | struct nfc_llcp_local *local = (struct nfc_llcp_local *) data; | 
|  |  | 
|  | pr_debug("Received an LLCP PDU\n"); | 
|  | if (err < 0) { | 
|  | pr_err("err %d\n", err); | 
|  | return; | 
|  | } | 
|  |  | 
|  | local->rx_pending = skb_get(skb); | 
|  | del_timer(&local->link_timer); | 
|  | queue_work(local->rx_wq, &local->rx_work); | 
|  |  | 
|  | return; | 
|  | } | 
|  |  | 
|  | void nfc_llcp_mac_is_down(struct nfc_dev *dev) | 
|  | { | 
|  | struct nfc_llcp_local *local; | 
|  |  | 
|  | local = nfc_llcp_find_local(dev); | 
|  | if (local == NULL) | 
|  | return; | 
|  |  | 
|  | nfc_llcp_clear_sdp(local); | 
|  |  | 
|  | /* Close and purge all existing sockets */ | 
|  | nfc_llcp_socket_release(local); | 
|  | } | 
|  |  | 
|  | void nfc_llcp_mac_is_up(struct nfc_dev *dev, u32 target_idx, | 
|  | u8 comm_mode, u8 rf_mode) | 
|  | { | 
|  | struct nfc_llcp_local *local; | 
|  |  | 
|  | pr_debug("rf mode %d\n", rf_mode); | 
|  |  | 
|  | local = nfc_llcp_find_local(dev); | 
|  | if (local == NULL) | 
|  | return; | 
|  |  | 
|  | local->target_idx = target_idx; | 
|  | local->comm_mode = comm_mode; | 
|  | local->rf_mode = rf_mode; | 
|  |  | 
|  | if (rf_mode == NFC_RF_INITIATOR) { | 
|  | pr_debug("Queueing Tx work\n"); | 
|  |  | 
|  | queue_work(local->tx_wq, &local->tx_work); | 
|  | } else { | 
|  | mod_timer(&local->link_timer, | 
|  | jiffies + msecs_to_jiffies(local->remote_lto)); | 
|  | } | 
|  | } | 
|  |  | 
|  | int nfc_llcp_register_device(struct nfc_dev *ndev) | 
|  | { | 
|  | struct device *dev = &ndev->dev; | 
|  | struct nfc_llcp_local *local; | 
|  | char name[32]; | 
|  | int err; | 
|  |  | 
|  | local = kzalloc(sizeof(struct nfc_llcp_local), GFP_KERNEL); | 
|  | if (local == NULL) | 
|  | return -ENOMEM; | 
|  |  | 
|  | local->dev = ndev; | 
|  | INIT_LIST_HEAD(&local->list); | 
|  | mutex_init(&local->sdp_lock); | 
|  | mutex_init(&local->socket_lock); | 
|  | init_timer(&local->link_timer); | 
|  | local->link_timer.data = (unsigned long) local; | 
|  | local->link_timer.function = nfc_llcp_symm_timer; | 
|  |  | 
|  | skb_queue_head_init(&local->tx_queue); | 
|  | INIT_WORK(&local->tx_work, nfc_llcp_tx_work); | 
|  | snprintf(name, sizeof(name), "%s_llcp_tx_wq", dev_name(dev)); | 
|  | local->tx_wq = | 
|  | alloc_workqueue(name, | 
|  | WQ_NON_REENTRANT | WQ_UNBOUND | WQ_MEM_RECLAIM, | 
|  | 1); | 
|  | if (local->tx_wq == NULL) { | 
|  | err = -ENOMEM; | 
|  | goto err_local; | 
|  | } | 
|  |  | 
|  | local->rx_pending = NULL; | 
|  | INIT_WORK(&local->rx_work, nfc_llcp_rx_work); | 
|  | snprintf(name, sizeof(name), "%s_llcp_rx_wq", dev_name(dev)); | 
|  | local->rx_wq = | 
|  | alloc_workqueue(name, | 
|  | WQ_NON_REENTRANT | WQ_UNBOUND | WQ_MEM_RECLAIM, | 
|  | 1); | 
|  | if (local->rx_wq == NULL) { | 
|  | err = -ENOMEM; | 
|  | goto err_tx_wq; | 
|  | } | 
|  |  | 
|  | INIT_WORK(&local->timeout_work, nfc_llcp_timeout_work); | 
|  | snprintf(name, sizeof(name), "%s_llcp_timeout_wq", dev_name(dev)); | 
|  | local->timeout_wq = | 
|  | alloc_workqueue(name, | 
|  | WQ_NON_REENTRANT | WQ_UNBOUND | WQ_MEM_RECLAIM, | 
|  | 1); | 
|  | if (local->timeout_wq == NULL) { | 
|  | err = -ENOMEM; | 
|  | goto err_rx_wq; | 
|  | } | 
|  |  | 
|  | nfc_llcp_build_gb(local); | 
|  |  | 
|  | local->remote_miu = LLCP_DEFAULT_MIU; | 
|  | local->remote_lto = LLCP_DEFAULT_LTO; | 
|  | local->remote_rw = LLCP_DEFAULT_RW; | 
|  |  | 
|  | list_add(&llcp_devices, &local->list); | 
|  |  | 
|  | return 0; | 
|  |  | 
|  | err_rx_wq: | 
|  | destroy_workqueue(local->rx_wq); | 
|  |  | 
|  | err_tx_wq: | 
|  | destroy_workqueue(local->tx_wq); | 
|  |  | 
|  | err_local: | 
|  | kfree(local); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | void nfc_llcp_unregister_device(struct nfc_dev *dev) | 
|  | { | 
|  | struct nfc_llcp_local *local = nfc_llcp_find_local(dev); | 
|  |  | 
|  | if (local == NULL) { | 
|  | pr_debug("No such device\n"); | 
|  | return; | 
|  | } | 
|  |  | 
|  | list_del(&local->list); | 
|  | nfc_llcp_socket_release(local); | 
|  | del_timer_sync(&local->link_timer); | 
|  | skb_queue_purge(&local->tx_queue); | 
|  | destroy_workqueue(local->tx_wq); | 
|  | destroy_workqueue(local->rx_wq); | 
|  | kfree_skb(local->rx_pending); | 
|  | kfree(local); | 
|  | } | 
|  |  | 
|  | int __init nfc_llcp_init(void) | 
|  | { | 
|  | INIT_LIST_HEAD(&llcp_devices); | 
|  |  | 
|  | return nfc_llcp_sock_init(); | 
|  | } | 
|  |  | 
|  | void nfc_llcp_exit(void) | 
|  | { | 
|  | nfc_llcp_sock_exit(); | 
|  | } |