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>
30 static int sock_wait_state(struct sock *sk, int state, unsigned long timeo)
32 DECLARE_WAITQUEUE(wait, current);
35 pr_debug("sk %p", sk);
37 add_wait_queue(sk_sleep(sk), &wait);
38 set_current_state(TASK_INTERRUPTIBLE);
40 while (sk->sk_state != state) {
46 if (signal_pending(current)) {
47 err = sock_intr_errno(timeo);
52 timeo = schedule_timeout(timeo);
54 set_current_state(TASK_INTERRUPTIBLE);
61 __set_current_state(TASK_RUNNING);
62 remove_wait_queue(sk_sleep(sk), &wait);
66 static struct proto llcp_sock_proto = {
69 .obj_size = sizeof(struct nfc_llcp_sock),
72 static int llcp_sock_bind(struct socket *sock, struct sockaddr *addr, int alen)
74 struct sock *sk = sock->sk;
75 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
76 struct nfc_llcp_local *local;
78 struct sockaddr_nfc_llcp llcp_addr;
81 pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
83 if (!addr || addr->sa_family != AF_NFC)
86 memset(&llcp_addr, 0, sizeof(llcp_addr));
87 len = min_t(unsigned int, sizeof(llcp_addr), alen);
88 memcpy(&llcp_addr, addr, len);
90 /* This is going to be a listening socket, dsap must be 0 */
91 if (llcp_addr.dsap != 0)
96 if (sk->sk_state != LLCP_CLOSED) {
101 dev = nfc_get_device(llcp_addr.dev_idx);
107 local = nfc_llcp_find_local(dev);
113 llcp_sock->dev = dev;
114 llcp_sock->local = nfc_llcp_local_get(local);
115 llcp_sock->nfc_protocol = llcp_addr.nfc_protocol;
116 llcp_sock->service_name_len = min_t(unsigned int,
117 llcp_addr.service_name_len,
118 NFC_LLCP_MAX_SERVICE_NAME);
119 llcp_sock->service_name = kmemdup(llcp_addr.service_name,
120 llcp_sock->service_name_len,
123 llcp_sock->ssap = nfc_llcp_get_sdp_ssap(local, llcp_sock);
124 if (llcp_sock->ssap == LLCP_MAX_SAP)
127 nfc_llcp_sock_link(&local->sockets, sk);
129 pr_debug("Socket bound to SAP %d\n", llcp_sock->ssap);
131 sk->sk_state = LLCP_BOUND;
141 static int llcp_sock_listen(struct socket *sock, int backlog)
143 struct sock *sk = sock->sk;
146 pr_debug("sk %p backlog %d\n", sk, backlog);
150 if ((sock->type != SOCK_SEQPACKET && sock->type != SOCK_STREAM)
151 || sk->sk_state != LLCP_BOUND) {
156 sk->sk_max_ack_backlog = backlog;
157 sk->sk_ack_backlog = 0;
159 pr_debug("Socket listening\n");
160 sk->sk_state = LLCP_LISTEN;
168 void nfc_llcp_accept_unlink(struct sock *sk)
170 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
172 pr_debug("state %d\n", sk->sk_state);
174 list_del_init(&llcp_sock->accept_queue);
175 sk_acceptq_removed(llcp_sock->parent);
176 llcp_sock->parent = NULL;
181 void nfc_llcp_accept_enqueue(struct sock *parent, struct sock *sk)
183 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
184 struct nfc_llcp_sock *llcp_sock_parent = nfc_llcp_sock(parent);
186 /* Lock will be free from unlink */
189 list_add_tail(&llcp_sock->accept_queue,
190 &llcp_sock_parent->accept_queue);
191 llcp_sock->parent = parent;
192 sk_acceptq_added(parent);
195 struct sock *nfc_llcp_accept_dequeue(struct sock *parent,
196 struct socket *newsock)
198 struct nfc_llcp_sock *lsk, *n, *llcp_parent;
201 llcp_parent = nfc_llcp_sock(parent);
203 list_for_each_entry_safe(lsk, n, &llcp_parent->accept_queue,
208 if (sk->sk_state == LLCP_CLOSED) {
210 nfc_llcp_accept_unlink(sk);
214 if (sk->sk_state == LLCP_CONNECTED || !newsock) {
215 nfc_llcp_accept_unlink(sk);
217 sock_graft(sk, newsock);
221 pr_debug("Returning sk state %d\n", sk->sk_state);
232 static int llcp_sock_accept(struct socket *sock, struct socket *newsock,
235 DECLARE_WAITQUEUE(wait, current);
236 struct sock *sk = sock->sk, *new_sk;
240 pr_debug("parent %p\n", sk);
242 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
244 if (sk->sk_state != LLCP_LISTEN) {
249 timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
251 /* Wait for an incoming connection. */
252 add_wait_queue_exclusive(sk_sleep(sk), &wait);
253 while (!(new_sk = nfc_llcp_accept_dequeue(sk, newsock))) {
254 set_current_state(TASK_INTERRUPTIBLE);
261 if (signal_pending(current)) {
262 ret = sock_intr_errno(timeo);
267 timeo = schedule_timeout(timeo);
268 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
270 __set_current_state(TASK_RUNNING);
271 remove_wait_queue(sk_sleep(sk), &wait);
276 newsock->state = SS_CONNECTED;
278 pr_debug("new socket %p\n", new_sk);
286 static int llcp_sock_getname(struct socket *sock, struct sockaddr *addr,
289 struct sockaddr_nfc_llcp *llcp_addr = (struct sockaddr_nfc_llcp *)addr;
290 struct sock *sk = sock->sk;
291 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
293 pr_debug("%p\n", sk);
295 if (llcp_sock == NULL || llcp_sock->dev == NULL)
298 addr->sa_family = AF_NFC;
299 *len = sizeof(struct sockaddr_nfc_llcp);
301 llcp_addr->dev_idx = llcp_sock->dev->idx;
302 llcp_addr->dsap = llcp_sock->dsap;
303 llcp_addr->ssap = llcp_sock->ssap;
304 llcp_addr->service_name_len = llcp_sock->service_name_len;
305 memcpy(llcp_addr->service_name, llcp_sock->service_name,
306 llcp_addr->service_name_len);
311 static inline unsigned int llcp_accept_poll(struct sock *parent)
313 struct nfc_llcp_sock *llcp_sock, *n, *parent_sock;
316 parent_sock = nfc_llcp_sock(parent);
318 list_for_each_entry_safe(llcp_sock, n, &parent_sock->accept_queue,
322 if (sk->sk_state == LLCP_CONNECTED)
323 return POLLIN | POLLRDNORM;
329 static unsigned int llcp_sock_poll(struct file *file, struct socket *sock,
332 struct sock *sk = sock->sk;
333 unsigned int mask = 0;
335 pr_debug("%p\n", sk);
337 sock_poll_wait(file, sk_sleep(sk), wait);
339 if (sk->sk_state == LLCP_LISTEN)
340 return llcp_accept_poll(sk);
342 if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
345 if (!skb_queue_empty(&sk->sk_receive_queue))
346 mask |= POLLIN | POLLRDNORM;
348 if (sk->sk_state == LLCP_CLOSED)
351 if (sk->sk_shutdown & RCV_SHUTDOWN)
352 mask |= POLLRDHUP | POLLIN | POLLRDNORM;
354 if (sk->sk_shutdown == SHUTDOWN_MASK)
357 if (sock_writeable(sk))
358 mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
360 set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
362 pr_debug("mask 0x%x\n", mask);
367 static int llcp_sock_release(struct socket *sock)
369 struct sock *sk = sock->sk;
370 struct nfc_llcp_local *local;
371 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
377 pr_debug("%p\n", sk);
379 local = llcp_sock->local;
388 if (sk->sk_state == LLCP_CONNECTED)
389 nfc_llcp_disconnect(llcp_sock);
391 if (sk->sk_state == LLCP_LISTEN) {
392 struct nfc_llcp_sock *lsk, *n;
393 struct sock *accept_sk;
395 list_for_each_entry_safe(lsk, n, &llcp_sock->accept_queue,
397 accept_sk = &lsk->sk;
398 lock_sock(accept_sk);
400 nfc_llcp_disconnect(lsk);
401 nfc_llcp_accept_unlink(accept_sk);
403 release_sock(accept_sk);
405 sock_orphan(accept_sk);
409 nfc_llcp_put_ssap(llcp_sock->local, llcp_sock->ssap);
413 nfc_llcp_sock_unlink(&local->sockets, sk);
422 static int llcp_sock_connect(struct socket *sock, struct sockaddr *_addr,
425 struct sock *sk = sock->sk;
426 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
427 struct sockaddr_nfc_llcp *addr = (struct sockaddr_nfc_llcp *)_addr;
429 struct nfc_llcp_local *local;
432 pr_debug("sock %p sk %p flags 0x%x\n", sock, sk, flags);
434 if (!addr || len < sizeof(struct sockaddr_nfc) ||
435 addr->sa_family != AF_NFC) {
436 pr_err("Invalid socket\n");
440 if (addr->service_name_len == 0 && addr->dsap == 0) {
441 pr_err("Missing service name or dsap\n");
445 pr_debug("addr dev_idx=%u target_idx=%u protocol=%u\n", addr->dev_idx,
446 addr->target_idx, addr->nfc_protocol);
450 if (sk->sk_state == LLCP_CONNECTED) {
455 dev = nfc_get_device(addr->dev_idx);
461 local = nfc_llcp_find_local(dev);
467 device_lock(&dev->dev);
468 if (dev->dep_link_up == false) {
470 device_unlock(&dev->dev);
473 device_unlock(&dev->dev);
475 if (local->rf_mode == NFC_RF_INITIATOR &&
476 addr->target_idx != local->target_idx) {
481 llcp_sock->dev = dev;
482 llcp_sock->local = nfc_llcp_local_get(local);
483 llcp_sock->miu = llcp_sock->local->remote_miu;
484 llcp_sock->ssap = nfc_llcp_get_local_ssap(local);
485 if (llcp_sock->ssap == LLCP_SAP_MAX) {
489 if (addr->service_name_len == 0)
490 llcp_sock->dsap = addr->dsap;
492 llcp_sock->dsap = LLCP_SAP_SDP;
493 llcp_sock->nfc_protocol = addr->nfc_protocol;
494 llcp_sock->service_name_len = min_t(unsigned int,
495 addr->service_name_len,
496 NFC_LLCP_MAX_SERVICE_NAME);
497 llcp_sock->service_name = kmemdup(addr->service_name,
498 llcp_sock->service_name_len,
501 nfc_llcp_sock_link(&local->connecting_sockets, sk);
503 ret = nfc_llcp_send_connect(llcp_sock);
507 ret = sock_wait_state(sk, LLCP_CONNECTED,
508 sock_sndtimeo(sk, flags & O_NONBLOCK));
517 nfc_llcp_put_ssap(local, llcp_sock->ssap);
519 nfc_llcp_sock_unlink(&local->connecting_sockets, sk);
529 static int llcp_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
530 struct msghdr *msg, size_t len)
532 struct sock *sk = sock->sk;
533 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
536 pr_debug("sock %p sk %p", sock, sk);
538 ret = sock_error(sk);
542 if (msg->msg_flags & MSG_OOB)
547 if (sk->sk_state != LLCP_CONNECTED) {
554 return nfc_llcp_send_i_frame(llcp_sock, msg, len);
557 static int llcp_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
558 struct msghdr *msg, size_t len, int flags)
560 int noblock = flags & MSG_DONTWAIT;
561 struct sock *sk = sock->sk;
562 unsigned int copied, rlen;
563 struct sk_buff *skb, *cskb;
566 pr_debug("%p %zu\n", sk, len);
570 if (sk->sk_state == LLCP_CLOSED &&
571 skb_queue_empty(&sk->sk_receive_queue)) {
578 if (flags & (MSG_OOB))
581 skb = skb_recv_datagram(sk, flags, noblock, &err);
583 pr_err("Recv datagram failed state %d %d %d",
584 sk->sk_state, err, sock_error(sk));
586 if (sk->sk_shutdown & RCV_SHUTDOWN)
592 rlen = skb->len; /* real length of skb */
593 copied = min_t(unsigned int, rlen, len);
596 if (memcpy_toiovec(msg->msg_iov, cskb->data, copied)) {
597 if (!(flags & MSG_PEEK))
598 skb_queue_head(&sk->sk_receive_queue, skb);
602 /* Mark read part of skb as used */
603 if (!(flags & MSG_PEEK)) {
605 /* SOCK_STREAM: re-queue skb if it contains unreceived data */
606 if (sk->sk_type == SOCK_STREAM) {
607 skb_pull(skb, copied);
609 skb_queue_head(&sk->sk_receive_queue, skb);
617 /* XXX Queue backlogged skbs */
620 /* SOCK_SEQPACKET: return real length if MSG_TRUNC is set */
621 if (sk->sk_type == SOCK_SEQPACKET && (flags & MSG_TRUNC))
627 static const struct proto_ops llcp_sock_ops = {
629 .owner = THIS_MODULE,
630 .bind = llcp_sock_bind,
631 .connect = llcp_sock_connect,
632 .release = llcp_sock_release,
633 .socketpair = sock_no_socketpair,
634 .accept = llcp_sock_accept,
635 .getname = llcp_sock_getname,
636 .poll = llcp_sock_poll,
637 .ioctl = sock_no_ioctl,
638 .listen = llcp_sock_listen,
639 .shutdown = sock_no_shutdown,
640 .setsockopt = sock_no_setsockopt,
641 .getsockopt = sock_no_getsockopt,
642 .sendmsg = llcp_sock_sendmsg,
643 .recvmsg = llcp_sock_recvmsg,
644 .mmap = sock_no_mmap,
647 static void llcp_sock_destruct(struct sock *sk)
649 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
651 pr_debug("%p\n", sk);
653 if (sk->sk_state == LLCP_CONNECTED)
654 nfc_put_device(llcp_sock->dev);
656 skb_queue_purge(&sk->sk_receive_queue);
658 nfc_llcp_sock_free(llcp_sock);
660 if (!sock_flag(sk, SOCK_DEAD)) {
661 pr_err("Freeing alive NFC LLCP socket %p\n", sk);
666 struct sock *nfc_llcp_sock_alloc(struct socket *sock, int type, gfp_t gfp)
669 struct nfc_llcp_sock *llcp_sock;
671 sk = sk_alloc(&init_net, PF_NFC, gfp, &llcp_sock_proto);
675 llcp_sock = nfc_llcp_sock(sk);
677 sock_init_data(sock, sk);
678 sk->sk_state = LLCP_CLOSED;
679 sk->sk_protocol = NFC_SOCKPROTO_LLCP;
681 sk->sk_destruct = llcp_sock_destruct;
684 llcp_sock->dsap = LLCP_SAP_SDP;
685 llcp_sock->rw = LLCP_DEFAULT_RW;
686 llcp_sock->miu = LLCP_DEFAULT_MIU;
687 llcp_sock->send_n = llcp_sock->send_ack_n = 0;
688 llcp_sock->recv_n = llcp_sock->recv_ack_n = 0;
689 llcp_sock->remote_ready = 1;
690 skb_queue_head_init(&llcp_sock->tx_queue);
691 skb_queue_head_init(&llcp_sock->tx_pending_queue);
692 skb_queue_head_init(&llcp_sock->tx_backlog_queue);
693 INIT_LIST_HEAD(&llcp_sock->accept_queue);
696 sock->state = SS_UNCONNECTED;
701 void nfc_llcp_sock_free(struct nfc_llcp_sock *sock)
703 kfree(sock->service_name);
705 skb_queue_purge(&sock->tx_queue);
706 skb_queue_purge(&sock->tx_pending_queue);
707 skb_queue_purge(&sock->tx_backlog_queue);
709 list_del_init(&sock->accept_queue);
713 nfc_llcp_local_put(sock->local);
716 static int llcp_sock_create(struct net *net, struct socket *sock,
717 const struct nfc_protocol *nfc_proto)
721 pr_debug("%p\n", sock);
723 if (sock->type != SOCK_STREAM && sock->type != SOCK_DGRAM)
724 return -ESOCKTNOSUPPORT;
726 sock->ops = &llcp_sock_ops;
728 sk = nfc_llcp_sock_alloc(sock, sock->type, GFP_ATOMIC);
735 static const struct nfc_protocol llcp_nfc_proto = {
736 .id = NFC_SOCKPROTO_LLCP,
737 .proto = &llcp_sock_proto,
738 .owner = THIS_MODULE,
739 .create = llcp_sock_create
742 int __init nfc_llcp_sock_init(void)
744 return nfc_proto_register(&llcp_nfc_proto);
747 void nfc_llcp_sock_exit(void)
749 nfc_proto_unregister(&llcp_nfc_proto);