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 if (!addr || addr->sa_family != AF_NFC)
84 pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
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_SAP_MAX) {
129 llcp_sock->reserved_ssap = llcp_sock->ssap;
131 nfc_llcp_sock_link(&local->sockets, sk);
133 pr_debug("Socket bound to SAP %d\n", llcp_sock->ssap);
135 sk->sk_state = LLCP_BOUND;
145 static int llcp_raw_sock_bind(struct socket *sock, struct sockaddr *addr,
148 struct sock *sk = sock->sk;
149 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
150 struct nfc_llcp_local *local;
152 struct sockaddr_nfc_llcp llcp_addr;
155 if (!addr || addr->sa_family != AF_NFC)
158 pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
160 memset(&llcp_addr, 0, sizeof(llcp_addr));
161 len = min_t(unsigned int, sizeof(llcp_addr), alen);
162 memcpy(&llcp_addr, addr, len);
166 if (sk->sk_state != LLCP_CLOSED) {
171 dev = nfc_get_device(llcp_addr.dev_idx);
177 local = nfc_llcp_find_local(dev);
183 llcp_sock->dev = dev;
184 llcp_sock->local = nfc_llcp_local_get(local);
185 llcp_sock->nfc_protocol = llcp_addr.nfc_protocol;
187 nfc_llcp_sock_link(&local->raw_sockets, sk);
189 sk->sk_state = LLCP_BOUND;
199 static int llcp_sock_listen(struct socket *sock, int backlog)
201 struct sock *sk = sock->sk;
204 pr_debug("sk %p backlog %d\n", sk, backlog);
208 if ((sock->type != SOCK_SEQPACKET && sock->type != SOCK_STREAM) ||
209 sk->sk_state != LLCP_BOUND) {
214 sk->sk_max_ack_backlog = backlog;
215 sk->sk_ack_backlog = 0;
217 pr_debug("Socket listening\n");
218 sk->sk_state = LLCP_LISTEN;
226 static int nfc_llcp_setsockopt(struct socket *sock, int level, int optname,
227 char __user *optval, unsigned int optlen)
229 struct sock *sk = sock->sk;
230 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
234 pr_debug("%p optname %d\n", sk, optname);
236 if (level != SOL_NFC)
243 if (sk->sk_state == LLCP_CONNECTED ||
244 sk->sk_state == LLCP_BOUND ||
245 sk->sk_state == LLCP_LISTEN) {
250 if (get_user(opt, (u32 __user *) optval)) {
255 if (opt > LLCP_MAX_RW) {
260 llcp_sock->rw = (u8) opt;
265 if (sk->sk_state == LLCP_CONNECTED ||
266 sk->sk_state == LLCP_BOUND ||
267 sk->sk_state == LLCP_LISTEN) {
272 if (get_user(opt, (u32 __user *) optval)) {
277 if (opt > LLCP_MAX_MIUX) {
282 llcp_sock->miux = (u16) opt;
293 pr_debug("%p rw %d miux %d\n", llcp_sock,
294 llcp_sock->rw, llcp_sock->miux);
299 static int nfc_llcp_getsockopt(struct socket *sock, int level, int optname,
300 char __user *optval, int __user *optlen)
302 struct sock *sk = sock->sk;
303 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
306 pr_debug("%p optname %d\n", sk, optname);
308 if (level != SOL_NFC)
311 if (get_user(len, optlen))
314 len = min_t(u32, len, sizeof(u32));
320 if (put_user(llcp_sock->rw, (u32 __user *) optval))
326 if (put_user(llcp_sock->miux, (u32 __user *) optval))
338 if (put_user(len, optlen))
344 void nfc_llcp_accept_unlink(struct sock *sk)
346 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
348 pr_debug("state %d\n", sk->sk_state);
350 list_del_init(&llcp_sock->accept_queue);
351 sk_acceptq_removed(llcp_sock->parent);
352 llcp_sock->parent = NULL;
357 void nfc_llcp_accept_enqueue(struct sock *parent, struct sock *sk)
359 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
360 struct nfc_llcp_sock *llcp_sock_parent = nfc_llcp_sock(parent);
362 /* Lock will be free from unlink */
365 list_add_tail(&llcp_sock->accept_queue,
366 &llcp_sock_parent->accept_queue);
367 llcp_sock->parent = parent;
368 sk_acceptq_added(parent);
371 struct sock *nfc_llcp_accept_dequeue(struct sock *parent,
372 struct socket *newsock)
374 struct nfc_llcp_sock *lsk, *n, *llcp_parent;
377 llcp_parent = nfc_llcp_sock(parent);
379 list_for_each_entry_safe(lsk, n, &llcp_parent->accept_queue,
384 if (sk->sk_state == LLCP_CLOSED) {
386 nfc_llcp_accept_unlink(sk);
390 if (sk->sk_state == LLCP_CONNECTED || !newsock) {
391 list_del_init(&lsk->accept_queue);
395 sock_graft(sk, newsock);
399 pr_debug("Returning sk state %d\n", sk->sk_state);
401 sk_acceptq_removed(parent);
412 static int llcp_sock_accept(struct socket *sock, struct socket *newsock,
415 DECLARE_WAITQUEUE(wait, current);
416 struct sock *sk = sock->sk, *new_sk;
420 pr_debug("parent %p\n", sk);
422 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
424 if (sk->sk_state != LLCP_LISTEN) {
429 timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
431 /* Wait for an incoming connection. */
432 add_wait_queue_exclusive(sk_sleep(sk), &wait);
433 while (!(new_sk = nfc_llcp_accept_dequeue(sk, newsock))) {
434 set_current_state(TASK_INTERRUPTIBLE);
441 if (signal_pending(current)) {
442 ret = sock_intr_errno(timeo);
447 timeo = schedule_timeout(timeo);
448 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
450 __set_current_state(TASK_RUNNING);
451 remove_wait_queue(sk_sleep(sk), &wait);
456 newsock->state = SS_CONNECTED;
458 pr_debug("new socket %p\n", new_sk);
466 static int llcp_sock_getname(struct socket *sock, struct sockaddr *uaddr,
469 struct sock *sk = sock->sk;
470 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
471 DECLARE_SOCKADDR(struct sockaddr_nfc_llcp *, llcp_addr, uaddr);
473 if (llcp_sock == NULL || llcp_sock->dev == NULL)
476 pr_debug("%p %d %d %d\n", sk, llcp_sock->target_idx,
477 llcp_sock->dsap, llcp_sock->ssap);
479 uaddr->sa_family = AF_NFC;
481 *len = sizeof(struct sockaddr_nfc_llcp);
483 llcp_addr->dev_idx = llcp_sock->dev->idx;
484 llcp_addr->target_idx = llcp_sock->target_idx;
485 llcp_addr->dsap = llcp_sock->dsap;
486 llcp_addr->ssap = llcp_sock->ssap;
487 llcp_addr->service_name_len = llcp_sock->service_name_len;
488 memcpy(llcp_addr->service_name, llcp_sock->service_name,
489 llcp_addr->service_name_len);
494 static inline unsigned int llcp_accept_poll(struct sock *parent)
496 struct nfc_llcp_sock *llcp_sock, *n, *parent_sock;
499 parent_sock = nfc_llcp_sock(parent);
501 list_for_each_entry_safe(llcp_sock, n, &parent_sock->accept_queue,
505 if (sk->sk_state == LLCP_CONNECTED)
506 return POLLIN | POLLRDNORM;
512 static unsigned int llcp_sock_poll(struct file *file, struct socket *sock,
515 struct sock *sk = sock->sk;
516 unsigned int mask = 0;
518 pr_debug("%p\n", sk);
520 sock_poll_wait(file, sk_sleep(sk), wait);
522 if (sk->sk_state == LLCP_LISTEN)
523 return llcp_accept_poll(sk);
525 if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
527 (sock_flag(sk, SOCK_SELECT_ERR_QUEUE) ? POLLPRI : 0);
529 if (!skb_queue_empty(&sk->sk_receive_queue))
530 mask |= POLLIN | POLLRDNORM;
532 if (sk->sk_state == LLCP_CLOSED)
535 if (sk->sk_shutdown & RCV_SHUTDOWN)
536 mask |= POLLRDHUP | POLLIN | POLLRDNORM;
538 if (sk->sk_shutdown == SHUTDOWN_MASK)
541 if (sock_writeable(sk))
542 mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
544 set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
546 pr_debug("mask 0x%x\n", mask);
551 static int llcp_sock_release(struct socket *sock)
553 struct sock *sk = sock->sk;
554 struct nfc_llcp_local *local;
555 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
561 pr_debug("%p\n", sk);
563 local = llcp_sock->local;
572 if (sk->sk_state == LLCP_CONNECTED)
573 nfc_llcp_disconnect(llcp_sock);
575 if (sk->sk_state == LLCP_LISTEN) {
576 struct nfc_llcp_sock *lsk, *n;
577 struct sock *accept_sk;
579 list_for_each_entry_safe(lsk, n, &llcp_sock->accept_queue,
581 accept_sk = &lsk->sk;
582 lock_sock(accept_sk);
584 nfc_llcp_disconnect(lsk);
585 nfc_llcp_accept_unlink(accept_sk);
587 release_sock(accept_sk);
591 if (llcp_sock->reserved_ssap < LLCP_SAP_MAX)
592 nfc_llcp_put_ssap(llcp_sock->local, llcp_sock->ssap);
596 if (sock->type == SOCK_RAW)
597 nfc_llcp_sock_unlink(&local->raw_sockets, sk);
599 nfc_llcp_sock_unlink(&local->sockets, sk);
608 static int llcp_sock_connect(struct socket *sock, struct sockaddr *_addr,
611 struct sock *sk = sock->sk;
612 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
613 struct sockaddr_nfc_llcp *addr = (struct sockaddr_nfc_llcp *)_addr;
615 struct nfc_llcp_local *local;
618 pr_debug("sock %p sk %p flags 0x%x\n", sock, sk, flags);
620 if (!addr || len < sizeof(struct sockaddr_nfc) ||
621 addr->sa_family != AF_NFC)
624 if (addr->service_name_len == 0 && addr->dsap == 0)
627 pr_debug("addr dev_idx=%u target_idx=%u protocol=%u\n", addr->dev_idx,
628 addr->target_idx, addr->nfc_protocol);
632 if (sk->sk_state == LLCP_CONNECTED) {
637 dev = nfc_get_device(addr->dev_idx);
643 local = nfc_llcp_find_local(dev);
649 device_lock(&dev->dev);
650 if (dev->dep_link_up == false) {
652 device_unlock(&dev->dev);
655 device_unlock(&dev->dev);
657 if (local->rf_mode == NFC_RF_INITIATOR &&
658 addr->target_idx != local->target_idx) {
663 llcp_sock->dev = dev;
664 llcp_sock->local = nfc_llcp_local_get(local);
665 llcp_sock->remote_miu = llcp_sock->local->remote_miu;
666 llcp_sock->ssap = nfc_llcp_get_local_ssap(local);
667 if (llcp_sock->ssap == LLCP_SAP_MAX) {
672 llcp_sock->reserved_ssap = llcp_sock->ssap;
674 if (addr->service_name_len == 0)
675 llcp_sock->dsap = addr->dsap;
677 llcp_sock->dsap = LLCP_SAP_SDP;
678 llcp_sock->nfc_protocol = addr->nfc_protocol;
679 llcp_sock->service_name_len = min_t(unsigned int,
680 addr->service_name_len,
681 NFC_LLCP_MAX_SERVICE_NAME);
682 llcp_sock->service_name = kmemdup(addr->service_name,
683 llcp_sock->service_name_len,
686 nfc_llcp_sock_link(&local->connecting_sockets, sk);
688 ret = nfc_llcp_send_connect(llcp_sock);
692 ret = sock_wait_state(sk, LLCP_CONNECTED,
693 sock_sndtimeo(sk, flags & O_NONBLOCK));
702 nfc_llcp_put_ssap(local, llcp_sock->ssap);
704 nfc_llcp_sock_unlink(&local->connecting_sockets, sk);
714 static int llcp_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
715 struct msghdr *msg, size_t len)
717 struct sock *sk = sock->sk;
718 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
721 pr_debug("sock %p sk %p", sock, sk);
723 ret = sock_error(sk);
727 if (msg->msg_flags & MSG_OOB)
732 if (sk->sk_type == SOCK_DGRAM) {
733 struct sockaddr_nfc_llcp *addr =
734 (struct sockaddr_nfc_llcp *)msg->msg_name;
736 if (msg->msg_namelen < sizeof(*addr)) {
743 return nfc_llcp_send_ui_frame(llcp_sock, addr->dsap, addr->ssap,
747 if (sk->sk_state != LLCP_CONNECTED) {
754 return nfc_llcp_send_i_frame(llcp_sock, msg, len);
757 static int llcp_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
758 struct msghdr *msg, size_t len, int flags)
760 int noblock = flags & MSG_DONTWAIT;
761 struct sock *sk = sock->sk;
762 unsigned int copied, rlen;
763 struct sk_buff *skb, *cskb;
766 pr_debug("%p %zu\n", sk, len);
768 msg->msg_namelen = 0;
772 if (sk->sk_state == LLCP_CLOSED &&
773 skb_queue_empty(&sk->sk_receive_queue)) {
780 if (flags & (MSG_OOB))
783 skb = skb_recv_datagram(sk, flags, noblock, &err);
785 pr_err("Recv datagram failed state %d %d %d",
786 sk->sk_state, err, sock_error(sk));
788 if (sk->sk_shutdown & RCV_SHUTDOWN)
794 rlen = skb->len; /* real length of skb */
795 copied = min_t(unsigned int, rlen, len);
798 if (skb_copy_datagram_iovec(cskb, 0, msg->msg_iov, copied)) {
799 if (!(flags & MSG_PEEK))
800 skb_queue_head(&sk->sk_receive_queue, skb);
804 sock_recv_timestamp(msg, sk, skb);
806 if (sk->sk_type == SOCK_DGRAM && msg->msg_name) {
807 struct nfc_llcp_ui_cb *ui_cb = nfc_llcp_ui_skb_cb(skb);
808 struct sockaddr_nfc_llcp *sockaddr =
809 (struct sockaddr_nfc_llcp *) msg->msg_name;
811 msg->msg_namelen = sizeof(struct sockaddr_nfc_llcp);
813 pr_debug("Datagram socket %d %d\n", ui_cb->dsap, ui_cb->ssap);
815 memset(sockaddr, 0, sizeof(*sockaddr));
816 sockaddr->sa_family = AF_NFC;
817 sockaddr->nfc_protocol = NFC_PROTO_NFC_DEP;
818 sockaddr->dsap = ui_cb->dsap;
819 sockaddr->ssap = ui_cb->ssap;
822 /* Mark read part of skb as used */
823 if (!(flags & MSG_PEEK)) {
825 /* SOCK_STREAM: re-queue skb if it contains unreceived data */
826 if (sk->sk_type == SOCK_STREAM ||
827 sk->sk_type == SOCK_DGRAM ||
828 sk->sk_type == SOCK_RAW) {
829 skb_pull(skb, copied);
831 skb_queue_head(&sk->sk_receive_queue, skb);
839 /* XXX Queue backlogged skbs */
842 /* SOCK_SEQPACKET: return real length if MSG_TRUNC is set */
843 if (sk->sk_type == SOCK_SEQPACKET && (flags & MSG_TRUNC))
849 static const struct proto_ops llcp_sock_ops = {
851 .owner = THIS_MODULE,
852 .bind = llcp_sock_bind,
853 .connect = llcp_sock_connect,
854 .release = llcp_sock_release,
855 .socketpair = sock_no_socketpair,
856 .accept = llcp_sock_accept,
857 .getname = llcp_sock_getname,
858 .poll = llcp_sock_poll,
859 .ioctl = sock_no_ioctl,
860 .listen = llcp_sock_listen,
861 .shutdown = sock_no_shutdown,
862 .setsockopt = nfc_llcp_setsockopt,
863 .getsockopt = nfc_llcp_getsockopt,
864 .sendmsg = llcp_sock_sendmsg,
865 .recvmsg = llcp_sock_recvmsg,
866 .mmap = sock_no_mmap,
869 static const struct proto_ops llcp_rawsock_ops = {
871 .owner = THIS_MODULE,
872 .bind = llcp_raw_sock_bind,
873 .connect = sock_no_connect,
874 .release = llcp_sock_release,
875 .socketpair = sock_no_socketpair,
876 .accept = sock_no_accept,
877 .getname = llcp_sock_getname,
878 .poll = llcp_sock_poll,
879 .ioctl = sock_no_ioctl,
880 .listen = sock_no_listen,
881 .shutdown = sock_no_shutdown,
882 .setsockopt = sock_no_setsockopt,
883 .getsockopt = sock_no_getsockopt,
884 .sendmsg = sock_no_sendmsg,
885 .recvmsg = llcp_sock_recvmsg,
886 .mmap = sock_no_mmap,
889 static void llcp_sock_destruct(struct sock *sk)
891 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
893 pr_debug("%p\n", sk);
895 if (sk->sk_state == LLCP_CONNECTED)
896 nfc_put_device(llcp_sock->dev);
898 skb_queue_purge(&sk->sk_receive_queue);
900 nfc_llcp_sock_free(llcp_sock);
902 if (!sock_flag(sk, SOCK_DEAD)) {
903 pr_err("Freeing alive NFC LLCP socket %p\n", sk);
908 struct sock *nfc_llcp_sock_alloc(struct socket *sock, int type, gfp_t gfp)
911 struct nfc_llcp_sock *llcp_sock;
913 sk = sk_alloc(&init_net, PF_NFC, gfp, &llcp_sock_proto);
917 llcp_sock = nfc_llcp_sock(sk);
919 sock_init_data(sock, sk);
920 sk->sk_state = LLCP_CLOSED;
921 sk->sk_protocol = NFC_SOCKPROTO_LLCP;
923 sk->sk_destruct = llcp_sock_destruct;
926 llcp_sock->dsap = LLCP_SAP_SDP;
927 llcp_sock->rw = LLCP_MAX_RW + 1;
928 llcp_sock->miux = LLCP_MAX_MIUX + 1;
929 llcp_sock->remote_rw = LLCP_DEFAULT_RW;
930 llcp_sock->remote_miu = LLCP_DEFAULT_MIU;
931 llcp_sock->send_n = llcp_sock->send_ack_n = 0;
932 llcp_sock->recv_n = llcp_sock->recv_ack_n = 0;
933 llcp_sock->remote_ready = 1;
934 llcp_sock->reserved_ssap = LLCP_SAP_MAX;
935 skb_queue_head_init(&llcp_sock->tx_queue);
936 skb_queue_head_init(&llcp_sock->tx_pending_queue);
937 INIT_LIST_HEAD(&llcp_sock->accept_queue);
940 sock->state = SS_UNCONNECTED;
945 void nfc_llcp_sock_free(struct nfc_llcp_sock *sock)
947 kfree(sock->service_name);
949 skb_queue_purge(&sock->tx_queue);
950 skb_queue_purge(&sock->tx_pending_queue);
952 list_del_init(&sock->accept_queue);
956 nfc_llcp_local_put(sock->local);
959 static int llcp_sock_create(struct net *net, struct socket *sock,
960 const struct nfc_protocol *nfc_proto)
964 pr_debug("%p\n", sock);
966 if (sock->type != SOCK_STREAM &&
967 sock->type != SOCK_DGRAM &&
968 sock->type != SOCK_RAW)
969 return -ESOCKTNOSUPPORT;
971 if (sock->type == SOCK_RAW)
972 sock->ops = &llcp_rawsock_ops;
974 sock->ops = &llcp_sock_ops;
976 sk = nfc_llcp_sock_alloc(sock, sock->type, GFP_ATOMIC);
983 static const struct nfc_protocol llcp_nfc_proto = {
984 .id = NFC_SOCKPROTO_LLCP,
985 .proto = &llcp_sock_proto,
986 .owner = THIS_MODULE,
987 .create = llcp_sock_create
990 int __init nfc_llcp_sock_init(void)
992 return nfc_proto_register(&llcp_nfc_proto);
995 void nfc_llcp_sock_exit(void)
997 nfc_proto_unregister(&llcp_nfc_proto);