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 struct proto llcp_sock_proto = {
33 .obj_size = sizeof(struct nfc_llcp_sock),
36 static int llcp_sock_bind(struct socket *sock, struct sockaddr *addr, int alen)
38 struct sock *sk = sock->sk;
39 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
40 struct nfc_llcp_local *local;
42 struct sockaddr_nfc_llcp llcp_addr;
45 pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
47 if (!addr || addr->sa_family != AF_NFC)
50 memset(&llcp_addr, 0, sizeof(llcp_addr));
51 len = min_t(unsigned int, sizeof(llcp_addr), alen);
52 memcpy(&llcp_addr, addr, len);
54 /* This is going to be a listening socket, dsap must be 0 */
55 if (llcp_addr.dsap != 0)
60 if (sk->sk_state != LLCP_CLOSED) {
65 dev = nfc_get_device(llcp_addr.dev_idx);
71 local = nfc_llcp_find_local(dev);
78 llcp_sock->local = local;
79 llcp_sock->nfc_protocol = llcp_addr.nfc_protocol;
80 llcp_sock->service_name_len = min_t(unsigned int,
81 llcp_addr.service_name_len,
82 NFC_LLCP_MAX_SERVICE_NAME);
83 llcp_sock->service_name = kmemdup(llcp_addr.service_name,
84 llcp_sock->service_name_len,
87 llcp_sock->ssap = nfc_llcp_get_sdp_ssap(local, llcp_sock);
88 if (llcp_sock->ssap == LLCP_MAX_SAP)
91 local->sockets[llcp_sock->ssap] = llcp_sock;
93 pr_debug("Socket bound to SAP %d\n", llcp_sock->ssap);
95 sk->sk_state = LLCP_BOUND;
105 static int llcp_sock_listen(struct socket *sock, int backlog)
107 struct sock *sk = sock->sk;
110 pr_debug("sk %p backlog %d\n", sk, backlog);
114 if ((sock->type != SOCK_SEQPACKET && sock->type != SOCK_STREAM)
115 || sk->sk_state != LLCP_BOUND) {
120 sk->sk_max_ack_backlog = backlog;
121 sk->sk_ack_backlog = 0;
123 pr_debug("Socket listening\n");
124 sk->sk_state = LLCP_LISTEN;
132 void nfc_llcp_accept_unlink(struct sock *sk)
134 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
136 pr_debug("state %d\n", sk->sk_state);
138 list_del_init(&llcp_sock->accept_queue);
139 sk_acceptq_removed(llcp_sock->parent);
140 llcp_sock->parent = NULL;
145 void nfc_llcp_accept_enqueue(struct sock *parent, struct sock *sk)
147 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
148 struct nfc_llcp_sock *llcp_sock_parent = nfc_llcp_sock(parent);
150 /* Lock will be free from unlink */
153 list_add_tail(&llcp_sock->accept_queue,
154 &llcp_sock_parent->accept_queue);
155 llcp_sock->parent = parent;
156 sk_acceptq_added(parent);
159 struct sock *nfc_llcp_accept_dequeue(struct sock *parent,
160 struct socket *newsock)
162 struct nfc_llcp_sock *lsk, *n, *llcp_parent;
165 llcp_parent = nfc_llcp_sock(parent);
167 list_for_each_entry_safe(lsk, n, &llcp_parent->accept_queue,
172 if (sk->sk_state == LLCP_CLOSED) {
174 nfc_llcp_accept_unlink(sk);
178 if (sk->sk_state == LLCP_CONNECTED || !newsock) {
179 nfc_llcp_accept_unlink(sk);
181 sock_graft(sk, newsock);
185 pr_debug("Returning sk state %d\n", sk->sk_state);
196 static int llcp_sock_accept(struct socket *sock, struct socket *newsock,
199 DECLARE_WAITQUEUE(wait, current);
200 struct sock *sk = sock->sk, *new_sk;
204 pr_debug("parent %p\n", sk);
206 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
208 if (sk->sk_state != LLCP_LISTEN) {
213 timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
215 /* Wait for an incoming connection. */
216 add_wait_queue_exclusive(sk_sleep(sk), &wait);
217 while (!(new_sk = nfc_llcp_accept_dequeue(sk, newsock))) {
218 set_current_state(TASK_INTERRUPTIBLE);
225 if (signal_pending(current)) {
226 ret = sock_intr_errno(timeo);
231 timeo = schedule_timeout(timeo);
232 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
234 __set_current_state(TASK_RUNNING);
235 remove_wait_queue(sk_sleep(sk), &wait);
240 newsock->state = SS_CONNECTED;
242 pr_debug("new socket %p\n", new_sk);
250 static int llcp_sock_getname(struct socket *sock, struct sockaddr *addr,
253 struct sockaddr_nfc_llcp *llcp_addr = (struct sockaddr_nfc_llcp *)addr;
254 struct sock *sk = sock->sk;
255 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
257 pr_debug("%p\n", sk);
259 addr->sa_family = AF_NFC;
260 *len = sizeof(struct sockaddr_nfc_llcp);
262 llcp_addr->dev_idx = llcp_sock->dev->idx;
263 llcp_addr->dsap = llcp_sock->dsap;
264 llcp_addr->ssap = llcp_sock->ssap;
265 llcp_addr->service_name_len = llcp_sock->service_name_len;
266 memcpy(llcp_addr->service_name, llcp_sock->service_name,
267 llcp_addr->service_name_len);
272 static inline unsigned int llcp_accept_poll(struct sock *parent)
274 struct nfc_llcp_sock *llcp_sock, *n, *parent_sock;
277 parent_sock = nfc_llcp_sock(parent);
279 list_for_each_entry_safe(llcp_sock, n, &parent_sock->accept_queue,
283 if (sk->sk_state == LLCP_CONNECTED)
284 return POLLIN | POLLRDNORM;
290 static unsigned int llcp_sock_poll(struct file *file, struct socket *sock,
293 struct sock *sk = sock->sk;
294 unsigned int mask = 0;
296 pr_debug("%p\n", sk);
298 sock_poll_wait(file, sk_sleep(sk), wait);
300 if (sk->sk_state == LLCP_LISTEN)
301 return llcp_accept_poll(sk);
303 if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
306 if (!skb_queue_empty(&sk->sk_receive_queue))
309 if (sk->sk_state == LLCP_CLOSED)
315 static int llcp_sock_release(struct socket *sock)
317 struct sock *sk = sock->sk;
318 struct nfc_llcp_local *local;
319 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
325 pr_debug("%p\n", sk);
327 local = llcp_sock->local;
333 mutex_lock(&local->socket_lock);
335 if (llcp_sock == local->sockets[llcp_sock->ssap])
336 local->sockets[llcp_sock->ssap] = NULL;
338 list_del_init(&llcp_sock->list);
340 mutex_unlock(&local->socket_lock);
345 if (sk->sk_state == LLCP_CONNECTED)
346 nfc_llcp_disconnect(llcp_sock);
348 if (sk->sk_state == LLCP_LISTEN) {
349 struct nfc_llcp_sock *lsk, *n;
350 struct sock *accept_sk;
352 list_for_each_entry_safe(lsk, n, &llcp_sock->accept_queue,
354 accept_sk = &lsk->sk;
355 lock_sock(accept_sk);
357 nfc_llcp_disconnect(lsk);
358 nfc_llcp_accept_unlink(accept_sk);
360 release_sock(accept_sk);
362 sock_orphan(accept_sk);
366 /* Freeing the SAP */
367 if ((sk->sk_state == LLCP_CONNECTED
368 && llcp_sock->ssap > LLCP_LOCAL_SAP_OFFSET) ||
369 sk->sk_state == LLCP_BOUND || sk->sk_state == LLCP_LISTEN)
370 nfc_llcp_put_ssap(llcp_sock->local, llcp_sock->ssap);
381 static int llcp_sock_connect(struct socket *sock, struct sockaddr *_addr,
384 struct sock *sk = sock->sk;
385 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
386 struct sockaddr_nfc_llcp *addr = (struct sockaddr_nfc_llcp *)_addr;
388 struct nfc_llcp_local *local;
391 pr_debug("sock %p sk %p flags 0x%x\n", sock, sk, flags);
393 if (!addr || len < sizeof(struct sockaddr_nfc) ||
394 addr->sa_family != AF_NFC) {
395 pr_err("Invalid socket\n");
399 if (addr->service_name_len == 0 && addr->dsap == 0) {
400 pr_err("Missing service name or dsap\n");
404 pr_debug("addr dev_idx=%u target_idx=%u protocol=%u\n", addr->dev_idx,
405 addr->target_idx, addr->nfc_protocol);
409 if (sk->sk_state == LLCP_CONNECTED) {
414 dev = nfc_get_device(addr->dev_idx);
420 local = nfc_llcp_find_local(dev);
426 device_lock(&dev->dev);
427 if (dev->dep_link_up == false) {
429 device_unlock(&dev->dev);
432 device_unlock(&dev->dev);
434 if (local->rf_mode == NFC_RF_INITIATOR &&
435 addr->target_idx != local->target_idx) {
440 llcp_sock->dev = dev;
441 llcp_sock->local = local;
442 llcp_sock->ssap = nfc_llcp_get_local_ssap(local);
443 if (llcp_sock->ssap == LLCP_SAP_MAX) {
447 if (addr->service_name_len == 0)
448 llcp_sock->dsap = addr->dsap;
450 llcp_sock->dsap = LLCP_SAP_SDP;
451 llcp_sock->nfc_protocol = addr->nfc_protocol;
452 llcp_sock->service_name_len = min_t(unsigned int,
453 addr->service_name_len,
454 NFC_LLCP_MAX_SERVICE_NAME);
455 llcp_sock->service_name = kmemdup(addr->service_name,
456 llcp_sock->service_name_len,
459 local->sockets[llcp_sock->ssap] = llcp_sock;
461 ret = nfc_llcp_send_connect(llcp_sock);
465 sk->sk_state = LLCP_CONNECTED;
478 static int llcp_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
479 struct msghdr *msg, size_t len)
481 struct sock *sk = sock->sk;
482 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
485 pr_debug("sock %p sk %p", sock, sk);
487 ret = sock_error(sk);
491 if (msg->msg_flags & MSG_OOB)
496 if (sk->sk_state != LLCP_CONNECTED) {
503 return nfc_llcp_send_i_frame(llcp_sock, msg, len);
506 static int llcp_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
507 struct msghdr *msg, size_t len, int flags)
509 int noblock = flags & MSG_DONTWAIT;
510 struct sock *sk = sock->sk;
511 unsigned int copied, rlen;
512 struct sk_buff *skb, *cskb;
515 pr_debug("%p %zu\n", sk, len);
519 if (sk->sk_state == LLCP_CLOSED &&
520 skb_queue_empty(&sk->sk_receive_queue)) {
527 if (flags & (MSG_OOB))
530 skb = skb_recv_datagram(sk, flags, noblock, &err);
532 pr_err("Recv datagram failed state %d %d %d",
533 sk->sk_state, err, sock_error(sk));
535 if (sk->sk_shutdown & RCV_SHUTDOWN)
541 rlen = skb->len; /* real length of skb */
542 copied = min_t(unsigned int, rlen, len);
545 if (memcpy_toiovec(msg->msg_iov, cskb->data, copied)) {
546 if (!(flags & MSG_PEEK))
547 skb_queue_head(&sk->sk_receive_queue, skb);
551 /* Mark read part of skb as used */
552 if (!(flags & MSG_PEEK)) {
554 /* SOCK_STREAM: re-queue skb if it contains unreceived data */
555 if (sk->sk_type == SOCK_STREAM) {
556 skb_pull(skb, copied);
558 skb_queue_head(&sk->sk_receive_queue, skb);
566 /* XXX Queue backlogged skbs */
569 /* SOCK_SEQPACKET: return real length if MSG_TRUNC is set */
570 if (sk->sk_type == SOCK_SEQPACKET && (flags & MSG_TRUNC))
576 static const struct proto_ops llcp_sock_ops = {
578 .owner = THIS_MODULE,
579 .bind = llcp_sock_bind,
580 .connect = llcp_sock_connect,
581 .release = llcp_sock_release,
582 .socketpair = sock_no_socketpair,
583 .accept = llcp_sock_accept,
584 .getname = llcp_sock_getname,
585 .poll = llcp_sock_poll,
586 .ioctl = sock_no_ioctl,
587 .listen = llcp_sock_listen,
588 .shutdown = sock_no_shutdown,
589 .setsockopt = sock_no_setsockopt,
590 .getsockopt = sock_no_getsockopt,
591 .sendmsg = llcp_sock_sendmsg,
592 .recvmsg = llcp_sock_recvmsg,
593 .mmap = sock_no_mmap,
596 static void llcp_sock_destruct(struct sock *sk)
598 struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
600 pr_debug("%p\n", sk);
602 if (sk->sk_state == LLCP_CONNECTED)
603 nfc_put_device(llcp_sock->dev);
605 skb_queue_purge(&sk->sk_receive_queue);
607 nfc_llcp_sock_free(llcp_sock);
609 if (!sock_flag(sk, SOCK_DEAD)) {
610 pr_err("Freeing alive NFC LLCP socket %p\n", sk);
615 struct sock *nfc_llcp_sock_alloc(struct socket *sock, int type, gfp_t gfp)
618 struct nfc_llcp_sock *llcp_sock;
620 sk = sk_alloc(&init_net, PF_NFC, gfp, &llcp_sock_proto);
624 llcp_sock = nfc_llcp_sock(sk);
626 sock_init_data(sock, sk);
627 sk->sk_state = LLCP_CLOSED;
628 sk->sk_protocol = NFC_SOCKPROTO_LLCP;
630 sk->sk_destruct = llcp_sock_destruct;
633 llcp_sock->dsap = LLCP_SAP_SDP;
634 llcp_sock->send_n = llcp_sock->send_ack_n = 0;
635 llcp_sock->recv_n = llcp_sock->recv_ack_n = 0;
636 llcp_sock->remote_ready = 1;
637 skb_queue_head_init(&llcp_sock->tx_queue);
638 skb_queue_head_init(&llcp_sock->tx_pending_queue);
639 skb_queue_head_init(&llcp_sock->tx_backlog_queue);
640 INIT_LIST_HEAD(&llcp_sock->list);
641 INIT_LIST_HEAD(&llcp_sock->accept_queue);
644 sock->state = SS_UNCONNECTED;
649 void nfc_llcp_sock_free(struct nfc_llcp_sock *sock)
651 struct nfc_llcp_local *local = sock->local;
653 kfree(sock->service_name);
655 skb_queue_purge(&sock->tx_queue);
656 skb_queue_purge(&sock->tx_pending_queue);
657 skb_queue_purge(&sock->tx_backlog_queue);
659 list_del_init(&sock->accept_queue);
661 if (local != NULL && sock == local->sockets[sock->ssap])
662 local->sockets[sock->ssap] = NULL;
664 list_del_init(&sock->list);
669 static int llcp_sock_create(struct net *net, struct socket *sock,
670 const struct nfc_protocol *nfc_proto)
674 pr_debug("%p\n", sock);
676 if (sock->type != SOCK_STREAM && sock->type != SOCK_DGRAM)
677 return -ESOCKTNOSUPPORT;
679 sock->ops = &llcp_sock_ops;
681 sk = nfc_llcp_sock_alloc(sock, sock->type, GFP_ATOMIC);
688 static const struct nfc_protocol llcp_nfc_proto = {
689 .id = NFC_SOCKPROTO_LLCP,
690 .proto = &llcp_sock_proto,
691 .owner = THIS_MODULE,
692 .create = llcp_sock_create
695 int __init nfc_llcp_sock_init(void)
697 return nfc_proto_register(&llcp_nfc_proto);
700 void nfc_llcp_sock_exit(void)
702 nfc_proto_unregister(&llcp_nfc_proto);