Linux Audio

Check our new training course

Loading...
v3.1
   1/*
   2 * linux/net/sunrpc/svcsock.c
   3 *
   4 * These are the RPC server socket internals.
   5 *
   6 * The server scheduling algorithm does not always distribute the load
   7 * evenly when servicing a single client. May need to modify the
   8 * svc_xprt_enqueue procedure...
   9 *
  10 * TCP support is largely untested and may be a little slow. The problem
  11 * is that we currently do two separate recvfrom's, one for the 4-byte
  12 * record length, and the second for the actual record. This could possibly
  13 * be improved by always reading a minimum size of around 100 bytes and
  14 * tucking any superfluous bytes away in a temporary store. Still, that
  15 * leaves write requests out in the rain. An alternative may be to peek at
  16 * the first skb in the queue, and if it matches the next TCP sequence
  17 * number, to extract the record marker. Yuck.
  18 *
  19 * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de>
  20 */
  21
  22#include <linux/kernel.h>
  23#include <linux/sched.h>
 
  24#include <linux/errno.h>
  25#include <linux/fcntl.h>
  26#include <linux/net.h>
  27#include <linux/in.h>
  28#include <linux/inet.h>
  29#include <linux/udp.h>
  30#include <linux/tcp.h>
  31#include <linux/unistd.h>
  32#include <linux/slab.h>
  33#include <linux/netdevice.h>
  34#include <linux/skbuff.h>
  35#include <linux/file.h>
  36#include <linux/freezer.h>
  37#include <net/sock.h>
  38#include <net/checksum.h>
  39#include <net/ip.h>
  40#include <net/ipv6.h>
 
  41#include <net/tcp.h>
  42#include <net/tcp_states.h>
  43#include <asm/uaccess.h>
  44#include <asm/ioctls.h>
 
  45
  46#include <linux/sunrpc/types.h>
  47#include <linux/sunrpc/clnt.h>
  48#include <linux/sunrpc/xdr.h>
  49#include <linux/sunrpc/msg_prot.h>
  50#include <linux/sunrpc/svcsock.h>
  51#include <linux/sunrpc/stats.h>
  52#include <linux/sunrpc/xprt.h>
  53
  54#include "sunrpc.h"
  55
  56#define RPCDBG_FACILITY	RPCDBG_SVCXPRT
  57
  58
  59static struct svc_sock *svc_setup_socket(struct svc_serv *, struct socket *,
  60					 int *errp, int flags);
  61static void		svc_udp_data_ready(struct sock *, int);
  62static int		svc_udp_recvfrom(struct svc_rqst *);
  63static int		svc_udp_sendto(struct svc_rqst *);
  64static void		svc_sock_detach(struct svc_xprt *);
  65static void		svc_tcp_sock_detach(struct svc_xprt *);
  66static void		svc_sock_free(struct svc_xprt *);
  67
  68static struct svc_xprt *svc_create_socket(struct svc_serv *, int,
  69					  struct net *, struct sockaddr *,
  70					  int, int);
  71#if defined(CONFIG_SUNRPC_BACKCHANNEL)
  72static struct svc_xprt *svc_bc_create_socket(struct svc_serv *, int,
  73					     struct net *, struct sockaddr *,
  74					     int, int);
  75static void svc_bc_sock_free(struct svc_xprt *xprt);
  76#endif /* CONFIG_SUNRPC_BACKCHANNEL */
  77
  78#ifdef CONFIG_DEBUG_LOCK_ALLOC
  79static struct lock_class_key svc_key[2];
  80static struct lock_class_key svc_slock_key[2];
  81
  82static void svc_reclassify_socket(struct socket *sock)
  83{
  84	struct sock *sk = sock->sk;
  85	BUG_ON(sock_owned_by_user(sk));
 
 
 
  86	switch (sk->sk_family) {
  87	case AF_INET:
  88		sock_lock_init_class_and_name(sk, "slock-AF_INET-NFSD",
  89					      &svc_slock_key[0],
  90					      "sk_xprt.xpt_lock-AF_INET-NFSD",
  91					      &svc_key[0]);
  92		break;
  93
  94	case AF_INET6:
  95		sock_lock_init_class_and_name(sk, "slock-AF_INET6-NFSD",
  96					      &svc_slock_key[1],
  97					      "sk_xprt.xpt_lock-AF_INET6-NFSD",
  98					      &svc_key[1]);
  99		break;
 100
 101	default:
 102		BUG();
 103	}
 104}
 105#else
 106static void svc_reclassify_socket(struct socket *sock)
 107{
 108}
 109#endif
 110
 111/*
 112 * Release an skbuff after use
 113 */
 114static void svc_release_skb(struct svc_rqst *rqstp)
 115{
 116	struct sk_buff *skb = rqstp->rq_xprt_ctxt;
 117
 118	if (skb) {
 119		struct svc_sock *svsk =
 120			container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 121		rqstp->rq_xprt_ctxt = NULL;
 122
 123		dprintk("svc: service %p, releasing skb %p\n", rqstp, skb);
 124		skb_free_datagram_locked(svsk->sk_sk, skb);
 125	}
 126}
 127
 
 
 
 
 
 
 
 
 
 
 
 
 128union svc_pktinfo_u {
 129	struct in_pktinfo pkti;
 130	struct in6_pktinfo pkti6;
 131};
 132#define SVC_PKTINFO_SPACE \
 133	CMSG_SPACE(sizeof(union svc_pktinfo_u))
 134
 135static void svc_set_cmsg_data(struct svc_rqst *rqstp, struct cmsghdr *cmh)
 136{
 137	struct svc_sock *svsk =
 138		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 139	switch (svsk->sk_sk->sk_family) {
 140	case AF_INET: {
 141			struct in_pktinfo *pki = CMSG_DATA(cmh);
 142
 143			cmh->cmsg_level = SOL_IP;
 144			cmh->cmsg_type = IP_PKTINFO;
 145			pki->ipi_ifindex = 0;
 146			pki->ipi_spec_dst.s_addr = rqstp->rq_daddr.addr.s_addr;
 
 147			cmh->cmsg_len = CMSG_LEN(sizeof(*pki));
 148		}
 149		break;
 150
 151	case AF_INET6: {
 152			struct in6_pktinfo *pki = CMSG_DATA(cmh);
 
 153
 154			cmh->cmsg_level = SOL_IPV6;
 155			cmh->cmsg_type = IPV6_PKTINFO;
 156			pki->ipi6_ifindex = 0;
 157			ipv6_addr_copy(&pki->ipi6_addr,
 158					&rqstp->rq_daddr.addr6);
 159			cmh->cmsg_len = CMSG_LEN(sizeof(*pki));
 160		}
 161		break;
 162	}
 163}
 164
 165/*
 166 * send routine intended to be shared by the fore- and back-channel
 167 */
 168int svc_send_common(struct socket *sock, struct xdr_buf *xdr,
 169		    struct page *headpage, unsigned long headoffset,
 170		    struct page *tailpage, unsigned long tailoffset)
 171{
 172	int		result;
 173	int		size;
 174	struct page	**ppage = xdr->pages;
 175	size_t		base = xdr->page_base;
 176	unsigned int	pglen = xdr->page_len;
 177	unsigned int	flags = MSG_MORE;
 178	int		slen;
 179	int		len = 0;
 180
 181	slen = xdr->len;
 182
 183	/* send head */
 184	if (slen == xdr->head[0].iov_len)
 185		flags = 0;
 186	len = kernel_sendpage(sock, headpage, headoffset,
 187				  xdr->head[0].iov_len, flags);
 188	if (len != xdr->head[0].iov_len)
 189		goto out;
 190	slen -= xdr->head[0].iov_len;
 191	if (slen == 0)
 192		goto out;
 193
 194	/* send page data */
 195	size = PAGE_SIZE - base < pglen ? PAGE_SIZE - base : pglen;
 196	while (pglen > 0) {
 197		if (slen == size)
 198			flags = 0;
 199		result = kernel_sendpage(sock, *ppage, base, size, flags);
 200		if (result > 0)
 201			len += result;
 202		if (result != size)
 203			goto out;
 204		slen -= size;
 205		pglen -= size;
 206		size = PAGE_SIZE < pglen ? PAGE_SIZE : pglen;
 207		base = 0;
 208		ppage++;
 209	}
 210
 211	/* send tail */
 212	if (xdr->tail[0].iov_len) {
 213		result = kernel_sendpage(sock, tailpage, tailoffset,
 214				   xdr->tail[0].iov_len, 0);
 215		if (result > 0)
 216			len += result;
 217	}
 218
 219out:
 220	return len;
 221}
 222
 223
 224/*
 225 * Generic sendto routine
 226 */
 227static int svc_sendto(struct svc_rqst *rqstp, struct xdr_buf *xdr)
 228{
 229	struct svc_sock	*svsk =
 230		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 231	struct socket	*sock = svsk->sk_sock;
 232	union {
 233		struct cmsghdr	hdr;
 234		long		all[SVC_PKTINFO_SPACE / sizeof(long)];
 235	} buffer;
 236	struct cmsghdr *cmh = &buffer.hdr;
 237	int		len = 0;
 238	unsigned long tailoff;
 239	unsigned long headoff;
 240	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
 241
 242	if (rqstp->rq_prot == IPPROTO_UDP) {
 243		struct msghdr msg = {
 244			.msg_name	= &rqstp->rq_addr,
 245			.msg_namelen	= rqstp->rq_addrlen,
 246			.msg_control	= cmh,
 247			.msg_controllen	= sizeof(buffer),
 248			.msg_flags	= MSG_MORE,
 249		};
 250
 251		svc_set_cmsg_data(rqstp, cmh);
 252
 253		if (sock_sendmsg(sock, &msg, 0) < 0)
 254			goto out;
 255	}
 256
 257	tailoff = ((unsigned long)xdr->tail[0].iov_base) & (PAGE_SIZE-1);
 258	headoff = 0;
 259	len = svc_send_common(sock, xdr, rqstp->rq_respages[0], headoff,
 260			       rqstp->rq_respages[0], tailoff);
 261
 262out:
 263	dprintk("svc: socket %p sendto([%p %Zu... ], %d) = %d (addr %s)\n",
 264		svsk, xdr->head[0].iov_base, xdr->head[0].iov_len,
 265		xdr->len, len, svc_print_addr(rqstp, buf, sizeof(buf)));
 266
 267	return len;
 268}
 269
 270/*
 271 * Report socket names for nfsdfs
 272 */
 273static int svc_one_sock_name(struct svc_sock *svsk, char *buf, int remaining)
 274{
 275	const struct sock *sk = svsk->sk_sk;
 276	const char *proto_name = sk->sk_protocol == IPPROTO_UDP ?
 277							"udp" : "tcp";
 278	int len;
 279
 280	switch (sk->sk_family) {
 281	case PF_INET:
 282		len = snprintf(buf, remaining, "ipv4 %s %pI4 %d\n",
 283				proto_name,
 284				&inet_sk(sk)->inet_rcv_saddr,
 285				inet_sk(sk)->inet_num);
 286		break;
 
 287	case PF_INET6:
 288		len = snprintf(buf, remaining, "ipv6 %s %pI6 %d\n",
 289				proto_name,
 290				&inet6_sk(sk)->rcv_saddr,
 291				inet_sk(sk)->inet_num);
 292		break;
 
 293	default:
 294		len = snprintf(buf, remaining, "*unknown-%d*\n",
 295				sk->sk_family);
 296	}
 297
 298	if (len >= remaining) {
 299		*buf = '\0';
 300		return -ENAMETOOLONG;
 301	}
 302	return len;
 303}
 304
 305/**
 306 * svc_sock_names - construct a list of listener names in a string
 307 * @serv: pointer to RPC service
 308 * @buf: pointer to a buffer to fill in with socket names
 309 * @buflen: size of the buffer to be filled
 310 * @toclose: pointer to '\0'-terminated C string containing the name
 311 *		of a listener to be closed
 312 *
 313 * Fills in @buf with a '\n'-separated list of names of listener
 314 * sockets.  If @toclose is not NULL, the socket named by @toclose
 315 * is closed, and is not included in the output list.
 316 *
 317 * Returns positive length of the socket name string, or a negative
 318 * errno value on error.
 319 */
 320int svc_sock_names(struct svc_serv *serv, char *buf, const size_t buflen,
 321		   const char *toclose)
 322{
 323	struct svc_sock *svsk, *closesk = NULL;
 324	int len = 0;
 325
 326	if (!serv)
 327		return 0;
 328
 329	spin_lock_bh(&serv->sv_lock);
 330	list_for_each_entry(svsk, &serv->sv_permsocks, sk_xprt.xpt_list) {
 331		int onelen = svc_one_sock_name(svsk, buf + len, buflen - len);
 332		if (onelen < 0) {
 333			len = onelen;
 334			break;
 335		}
 336		if (toclose && strcmp(toclose, buf + len) == 0) {
 337			closesk = svsk;
 338			svc_xprt_get(&closesk->sk_xprt);
 339		} else
 340			len += onelen;
 341	}
 342	spin_unlock_bh(&serv->sv_lock);
 343
 344	if (closesk) {
 345		/* Should unregister with portmap, but you cannot
 346		 * unregister just one protocol...
 347		 */
 348		svc_close_xprt(&closesk->sk_xprt);
 349		svc_xprt_put(&closesk->sk_xprt);
 350	} else if (toclose)
 351		return -ENOENT;
 352	return len;
 353}
 354EXPORT_SYMBOL_GPL(svc_sock_names);
 355
 356/*
 357 * Check input queue length
 358 */
 359static int svc_recv_available(struct svc_sock *svsk)
 360{
 361	struct socket	*sock = svsk->sk_sock;
 362	int		avail, err;
 363
 364	err = kernel_sock_ioctl(sock, TIOCINQ, (unsigned long) &avail);
 365
 366	return (err >= 0)? avail : err;
 367}
 368
 369/*
 370 * Generic recvfrom routine.
 371 */
 372static int svc_recvfrom(struct svc_rqst *rqstp, struct kvec *iov, int nr,
 373			int buflen)
 374{
 375	struct svc_sock *svsk =
 376		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 377	struct msghdr msg = {
 378		.msg_flags	= MSG_DONTWAIT,
 379	};
 380	int len;
 381
 382	rqstp->rq_xprt_hlen = 0;
 383
 384	len = kernel_recvmsg(svsk->sk_sock, &msg, iov, nr, buflen,
 385				msg.msg_flags);
 
 
 
 
 
 
 386
 387	dprintk("svc: socket %p recvfrom(%p, %Zu) = %d\n",
 388		svsk, iov[0].iov_base, iov[0].iov_len, len);
 389	return len;
 390}
 391
 392static int svc_partial_recvfrom(struct svc_rqst *rqstp,
 393				struct kvec *iov, int nr,
 394				int buflen, unsigned int base)
 395{
 396	size_t save_iovlen;
 397	void __user *save_iovbase;
 398	unsigned int i;
 399	int ret;
 400
 401	if (base == 0)
 402		return svc_recvfrom(rqstp, iov, nr, buflen);
 403
 404	for (i = 0; i < nr; i++) {
 405		if (iov[i].iov_len > base)
 406			break;
 407		base -= iov[i].iov_len;
 408	}
 409	save_iovlen = iov[i].iov_len;
 410	save_iovbase = iov[i].iov_base;
 411	iov[i].iov_len -= base;
 412	iov[i].iov_base += base;
 413	ret = svc_recvfrom(rqstp, &iov[i], nr - i, buflen);
 414	iov[i].iov_len = save_iovlen;
 415	iov[i].iov_base = save_iovbase;
 416	return ret;
 417}
 418
 419/*
 420 * Set socket snd and rcv buffer lengths
 421 */
 422static void svc_sock_setbufsize(struct socket *sock, unsigned int snd,
 423				unsigned int rcv)
 424{
 425#if 0
 426	mm_segment_t	oldfs;
 427	oldfs = get_fs(); set_fs(KERNEL_DS);
 428	sock_setsockopt(sock, SOL_SOCKET, SO_SNDBUF,
 429			(char*)&snd, sizeof(snd));
 430	sock_setsockopt(sock, SOL_SOCKET, SO_RCVBUF,
 431			(char*)&rcv, sizeof(rcv));
 432#else
 433	/* sock_setsockopt limits use to sysctl_?mem_max,
 434	 * which isn't acceptable.  Until that is made conditional
 435	 * on not having CAP_SYS_RESOURCE or similar, we go direct...
 436	 * DaveM said I could!
 437	 */
 438	lock_sock(sock->sk);
 439	sock->sk->sk_sndbuf = snd * 2;
 440	sock->sk->sk_rcvbuf = rcv * 2;
 441	sock->sk->sk_write_space(sock->sk);
 442	release_sock(sock->sk);
 443#endif
 444}
 
 
 
 
 
 
 
 
 
 445/*
 446 * INET callback when data has been received on the socket.
 447 */
 448static void svc_udp_data_ready(struct sock *sk, int count)
 449{
 450	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 451	wait_queue_head_t *wq = sk_sleep(sk);
 452
 453	if (svsk) {
 454		dprintk("svc: socket %p(inet %p), count=%d, busy=%d\n",
 455			svsk, sk, count,
 456			test_bit(XPT_BUSY, &svsk->sk_xprt.xpt_flags));
 457		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 458		svc_xprt_enqueue(&svsk->sk_xprt);
 
 
 
 
 459	}
 460	if (wq && waitqueue_active(wq))
 461		wake_up_interruptible(wq);
 462}
 463
 464/*
 465 * INET callback when space is newly available on the socket.
 466 */
 467static void svc_write_space(struct sock *sk)
 468{
 469	struct svc_sock	*svsk = (struct svc_sock *)(sk->sk_user_data);
 470	wait_queue_head_t *wq = sk_sleep(sk);
 471
 472	if (svsk) {
 473		dprintk("svc: socket %p(inet %p), write_space busy=%d\n",
 474			svsk, sk, test_bit(XPT_BUSY, &svsk->sk_xprt.xpt_flags));
 
 
 
 
 475		svc_xprt_enqueue(&svsk->sk_xprt);
 476	}
 
 477
 478	if (wq && waitqueue_active(wq)) {
 479		dprintk("RPC svc_write_space: someone sleeping on %p\n",
 480		       svsk);
 481		wake_up_interruptible(wq);
 482	}
 
 
 483}
 484
 485static void svc_tcp_write_space(struct sock *sk)
 486{
 487	struct socket *sock = sk->sk_socket;
 
 
 
 
 
 488
 489	if (sk_stream_wspace(sk) >= sk_stream_min_wspace(sk) && sock)
 490		clear_bit(SOCK_NOSPACE, &sock->flags);
 491	svc_write_space(sk);
 
 492}
 493
 494/*
 495 * See net/ipv6/ip_sockglue.c : ip_cmsg_recv_pktinfo
 496 */
 497static int svc_udp_get_dest_address4(struct svc_rqst *rqstp,
 498				     struct cmsghdr *cmh)
 499{
 500	struct in_pktinfo *pki = CMSG_DATA(cmh);
 
 
 501	if (cmh->cmsg_type != IP_PKTINFO)
 502		return 0;
 503	rqstp->rq_daddr.addr.s_addr = pki->ipi_spec_dst.s_addr;
 
 
 504	return 1;
 505}
 506
 507/*
 508 * See net/ipv6/datagram.c : datagram_recv_ctl
 509 */
 510static int svc_udp_get_dest_address6(struct svc_rqst *rqstp,
 511				     struct cmsghdr *cmh)
 512{
 513	struct in6_pktinfo *pki = CMSG_DATA(cmh);
 
 
 514	if (cmh->cmsg_type != IPV6_PKTINFO)
 515		return 0;
 516	ipv6_addr_copy(&rqstp->rq_daddr.addr6, &pki->ipi6_addr);
 
 
 
 517	return 1;
 518}
 519
 520/*
 521 * Copy the UDP datagram's destination address to the rqstp structure.
 522 * The 'destination' address in this case is the address to which the
 523 * peer sent the datagram, i.e. our local address. For multihomed
 524 * hosts, this can change from msg to msg. Note that only the IP
 525 * address changes, the port number should remain the same.
 526 */
 527static int svc_udp_get_dest_address(struct svc_rqst *rqstp,
 528				    struct cmsghdr *cmh)
 529{
 530	switch (cmh->cmsg_level) {
 531	case SOL_IP:
 532		return svc_udp_get_dest_address4(rqstp, cmh);
 533	case SOL_IPV6:
 534		return svc_udp_get_dest_address6(rqstp, cmh);
 535	}
 536
 537	return 0;
 538}
 539
 540/*
 541 * Receive a datagram from a UDP socket.
 542 */
 543static int svc_udp_recvfrom(struct svc_rqst *rqstp)
 544{
 545	struct svc_sock	*svsk =
 546		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 547	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 548	struct sk_buff	*skb;
 549	union {
 550		struct cmsghdr	hdr;
 551		long		all[SVC_PKTINFO_SPACE / sizeof(long)];
 552	} buffer;
 553	struct cmsghdr *cmh = &buffer.hdr;
 554	struct msghdr msg = {
 555		.msg_name = svc_addr(rqstp),
 556		.msg_control = cmh,
 557		.msg_controllen = sizeof(buffer),
 558		.msg_flags = MSG_DONTWAIT,
 559	};
 560	size_t len;
 561	int err;
 562
 563	if (test_and_clear_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags))
 564	    /* udp sockets need large rcvbuf as all pending
 565	     * requests are still in that buffer.  sndbuf must
 566	     * also be large enough that there is enough space
 567	     * for one reply per thread.  We count all threads
 568	     * rather than threads in a particular pool, which
 569	     * provides an upper bound on the number of threads
 570	     * which will access the socket.
 571	     */
 572	    svc_sock_setbufsize(svsk->sk_sock,
 573				(serv->sv_nrthreads+3) * serv->sv_max_mesg,
 574				(serv->sv_nrthreads+3) * serv->sv_max_mesg);
 575
 576	clear_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 577	skb = NULL;
 578	err = kernel_recvmsg(svsk->sk_sock, &msg, NULL,
 579			     0, 0, MSG_PEEK | MSG_DONTWAIT);
 580	if (err >= 0)
 581		skb = skb_recv_datagram(svsk->sk_sk, 0, 1, &err);
 582
 583	if (skb == NULL) {
 584		if (err != -EAGAIN) {
 585			/* possibly an icmp error */
 586			dprintk("svc: recvfrom returned error %d\n", -err);
 587			set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 588		}
 589		return -EAGAIN;
 590	}
 591	len = svc_addr_len(svc_addr(rqstp));
 592	if (len == 0)
 593		return -EAFNOSUPPORT;
 594	rqstp->rq_addrlen = len;
 595	if (skb->tstamp.tv64 == 0) {
 596		skb->tstamp = ktime_get_real();
 597		/* Don't enable netstamp, sunrpc doesn't
 598		   need that much accuracy */
 599	}
 600	svsk->sk_sk->sk_stamp = skb->tstamp;
 601	set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags); /* there may be more data... */
 602
 603	len  = skb->len - sizeof(struct udphdr);
 604	rqstp->rq_arg.len = len;
 605
 606	rqstp->rq_prot = IPPROTO_UDP;
 607
 608	if (!svc_udp_get_dest_address(rqstp, cmh)) {
 609		if (net_ratelimit())
 610			printk(KERN_WARNING
 611				"svc: received unknown control message %d/%d; "
 612				"dropping RPC reply datagram\n",
 613					cmh->cmsg_level, cmh->cmsg_type);
 614		skb_free_datagram_locked(svsk->sk_sk, skb);
 615		return 0;
 616	}
 
 617
 618	if (skb_is_nonlinear(skb)) {
 619		/* we have to copy */
 620		local_bh_disable();
 621		if (csum_partial_copy_to_xdr(&rqstp->rq_arg, skb)) {
 622			local_bh_enable();
 623			/* checksum error */
 624			skb_free_datagram_locked(svsk->sk_sk, skb);
 625			return 0;
 626		}
 627		local_bh_enable();
 628		skb_free_datagram_locked(svsk->sk_sk, skb);
 629	} else {
 630		/* we can use it in-place */
 631		rqstp->rq_arg.head[0].iov_base = skb->data +
 632			sizeof(struct udphdr);
 633		rqstp->rq_arg.head[0].iov_len = len;
 634		if (skb_checksum_complete(skb)) {
 635			skb_free_datagram_locked(svsk->sk_sk, skb);
 636			return 0;
 637		}
 638		rqstp->rq_xprt_ctxt = skb;
 639	}
 640
 641	rqstp->rq_arg.page_base = 0;
 642	if (len <= rqstp->rq_arg.head[0].iov_len) {
 643		rqstp->rq_arg.head[0].iov_len = len;
 644		rqstp->rq_arg.page_len = 0;
 645		rqstp->rq_respages = rqstp->rq_pages+1;
 646	} else {
 647		rqstp->rq_arg.page_len = len - rqstp->rq_arg.head[0].iov_len;
 648		rqstp->rq_respages = rqstp->rq_pages + 1 +
 649			DIV_ROUND_UP(rqstp->rq_arg.page_len, PAGE_SIZE);
 650	}
 
 651
 652	if (serv->sv_stats)
 653		serv->sv_stats->netudpcnt++;
 654
 655	return len;
 
 
 
 656}
 657
 658static int
 659svc_udp_sendto(struct svc_rqst *rqstp)
 660{
 661	int		error;
 662
 663	error = svc_sendto(rqstp, &rqstp->rq_res);
 664	if (error == -ECONNREFUSED)
 665		/* ICMP error on earlier request. */
 666		error = svc_sendto(rqstp, &rqstp->rq_res);
 667
 668	return error;
 669}
 670
 671static void svc_udp_prep_reply_hdr(struct svc_rqst *rqstp)
 672{
 673}
 674
 675static int svc_udp_has_wspace(struct svc_xprt *xprt)
 676{
 677	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
 678	struct svc_serv	*serv = xprt->xpt_server;
 679	unsigned long required;
 680
 681	/*
 682	 * Set the SOCK_NOSPACE flag before checking the available
 683	 * sock space.
 684	 */
 685	set_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
 686	required = atomic_read(&svsk->sk_xprt.xpt_reserved) + serv->sv_max_mesg;
 687	if (required*2 > sock_wspace(svsk->sk_sk))
 688		return 0;
 689	clear_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
 690	return 1;
 691}
 692
 693static struct svc_xprt *svc_udp_accept(struct svc_xprt *xprt)
 694{
 695	BUG();
 696	return NULL;
 697}
 698
 
 
 
 
 699static struct svc_xprt *svc_udp_create(struct svc_serv *serv,
 700				       struct net *net,
 701				       struct sockaddr *sa, int salen,
 702				       int flags)
 703{
 704	return svc_create_socket(serv, IPPROTO_UDP, net, sa, salen, flags);
 705}
 706
 707static struct svc_xprt_ops svc_udp_ops = {
 708	.xpo_create = svc_udp_create,
 709	.xpo_recvfrom = svc_udp_recvfrom,
 710	.xpo_sendto = svc_udp_sendto,
 711	.xpo_release_rqst = svc_release_skb,
 712	.xpo_detach = svc_sock_detach,
 713	.xpo_free = svc_sock_free,
 714	.xpo_prep_reply_hdr = svc_udp_prep_reply_hdr,
 715	.xpo_has_wspace = svc_udp_has_wspace,
 716	.xpo_accept = svc_udp_accept,
 
 
 717};
 718
 719static struct svc_xprt_class svc_udp_class = {
 720	.xcl_name = "udp",
 721	.xcl_owner = THIS_MODULE,
 722	.xcl_ops = &svc_udp_ops,
 723	.xcl_max_payload = RPCSVC_MAXPAYLOAD_UDP,
 
 724};
 725
 726static void svc_udp_init(struct svc_sock *svsk, struct svc_serv *serv)
 727{
 728	int err, level, optname, one = 1;
 729
 730	svc_xprt_init(&svc_udp_class, &svsk->sk_xprt, serv);
 
 731	clear_bit(XPT_CACHE_AUTH, &svsk->sk_xprt.xpt_flags);
 732	svsk->sk_sk->sk_data_ready = svc_udp_data_ready;
 733	svsk->sk_sk->sk_write_space = svc_write_space;
 734
 735	/* initialise setting must have enough space to
 736	 * receive and respond to one request.
 737	 * svc_udp_recvfrom will re-adjust if necessary
 738	 */
 739	svc_sock_setbufsize(svsk->sk_sock,
 740			    3 * svsk->sk_xprt.xpt_server->sv_max_mesg,
 741			    3 * svsk->sk_xprt.xpt_server->sv_max_mesg);
 742
 743	/* data might have come in before data_ready set up */
 744	set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 745	set_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags);
 746
 747	/* make sure we get destination address info */
 748	switch (svsk->sk_sk->sk_family) {
 749	case AF_INET:
 750		level = SOL_IP;
 751		optname = IP_PKTINFO;
 752		break;
 753	case AF_INET6:
 754		level = SOL_IPV6;
 755		optname = IPV6_RECVPKTINFO;
 756		break;
 757	default:
 758		BUG();
 759	}
 760	err = kernel_setsockopt(svsk->sk_sock, level, optname,
 761					(char *)&one, sizeof(one));
 762	dprintk("svc: kernel_setsockopt returned %d\n", err);
 763}
 764
 765/*
 766 * A data_ready event on a listening socket means there's a connection
 767 * pending. Do not use state_change as a substitute for it.
 768 */
 769static void svc_tcp_listen_data_ready(struct sock *sk, int count_unused)
 770{
 771	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 772	wait_queue_head_t *wq;
 773
 774	dprintk("svc: socket %p TCP (listen) state change %d\n",
 775		sk, sk->sk_state);
 776
 
 
 
 
 
 
 777	/*
 778	 * This callback may called twice when a new connection
 779	 * is established as a child socket inherits everything
 780	 * from a parent LISTEN socket.
 781	 * 1) data_ready method of the parent socket will be called
 782	 *    when one of child sockets become ESTABLISHED.
 783	 * 2) data_ready method of the child socket may be called
 784	 *    when it receives data before the socket is accepted.
 785	 * In case of 2, we should ignore it silently.
 786	 */
 787	if (sk->sk_state == TCP_LISTEN) {
 788		if (svsk) {
 789			set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 790			svc_xprt_enqueue(&svsk->sk_xprt);
 791		} else
 792			printk("svc: socket %p: no user data\n", sk);
 793	}
 794
 795	wq = sk_sleep(sk);
 796	if (wq && waitqueue_active(wq))
 797		wake_up_interruptible_all(wq);
 798}
 799
 800/*
 801 * A state change on a connected socket means it's dying or dead.
 802 */
 803static void svc_tcp_state_change(struct sock *sk)
 804{
 805	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 806	wait_queue_head_t *wq = sk_sleep(sk);
 807
 808	dprintk("svc: socket %p TCP (connected) state change %d (svsk %p)\n",
 809		sk, sk->sk_state, sk->sk_user_data);
 810
 811	if (!svsk)
 812		printk("svc: socket %p: no user data\n", sk);
 813	else {
 814		set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
 815		svc_xprt_enqueue(&svsk->sk_xprt);
 816	}
 817	if (wq && waitqueue_active(wq))
 818		wake_up_interruptible_all(wq);
 819}
 820
 821static void svc_tcp_data_ready(struct sock *sk, int count)
 822{
 823	struct svc_sock *svsk = (struct svc_sock *)sk->sk_user_data;
 824	wait_queue_head_t *wq = sk_sleep(sk);
 825
 826	dprintk("svc: socket %p TCP data ready (svsk %p)\n",
 827		sk, sk->sk_user_data);
 828	if (svsk) {
 829		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 830		svc_xprt_enqueue(&svsk->sk_xprt);
 831	}
 832	if (wq && waitqueue_active(wq))
 833		wake_up_interruptible(wq);
 834}
 835
 836/*
 837 * Accept a TCP connection
 838 */
 839static struct svc_xprt *svc_tcp_accept(struct svc_xprt *xprt)
 840{
 841	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
 842	struct sockaddr_storage addr;
 843	struct sockaddr	*sin = (struct sockaddr *) &addr;
 844	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 845	struct socket	*sock = svsk->sk_sock;
 846	struct socket	*newsock;
 847	struct svc_sock	*newsvsk;
 848	int		err, slen;
 849	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
 850
 851	dprintk("svc: tcp_accept %p sock %p\n", svsk, sock);
 852	if (!sock)
 853		return NULL;
 854
 855	clear_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 856	err = kernel_accept(sock, &newsock, O_NONBLOCK);
 857	if (err < 0) {
 858		if (err == -ENOMEM)
 859			printk(KERN_WARNING "%s: no more sockets!\n",
 860			       serv->sv_name);
 861		else if (err != -EAGAIN && net_ratelimit())
 862			printk(KERN_WARNING "%s: accept failed (err %d)!\n",
 863				   serv->sv_name, -err);
 864		return NULL;
 865	}
 866	set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 867
 868	err = kernel_getpeername(newsock, sin, &slen);
 869	if (err < 0) {
 870		if (net_ratelimit())
 871			printk(KERN_WARNING "%s: peername failed (err %d)!\n",
 872				   serv->sv_name, -err);
 873		goto failed;		/* aborted connection or whatever */
 874	}
 
 875
 876	/* Ideally, we would want to reject connections from unauthorized
 877	 * hosts here, but when we get encryption, the IP of the host won't
 878	 * tell us anything.  For now just warn about unpriv connections.
 879	 */
 880	if (!svc_port_is_privileged(sin)) {
 881		dprintk(KERN_WARNING
 882			"%s: connect from unprivileged port: %s\n",
 883			serv->sv_name,
 884			__svc_print_addr(sin, buf, sizeof(buf)));
 885	}
 886	dprintk("%s: connect from %s\n", serv->sv_name,
 887		__svc_print_addr(sin, buf, sizeof(buf)));
 888
 
 
 
 
 
 889	/* make sure that a write doesn't block forever when
 890	 * low on memory
 891	 */
 892	newsock->sk->sk_sndtimeo = HZ*30;
 893
 894	if (!(newsvsk = svc_setup_socket(serv, newsock, &err,
 895				 (SVC_SOCK_ANONYMOUS | SVC_SOCK_TEMPORARY))))
 
 896		goto failed;
 897	svc_xprt_set_remote(&newsvsk->sk_xprt, sin, slen);
 898	err = kernel_getsockname(newsock, sin, &slen);
 
 899	if (unlikely(err < 0)) {
 900		dprintk("svc_tcp_accept: kernel_getsockname error %d\n", -err);
 901		slen = offsetof(struct sockaddr, sa_data);
 902	}
 903	svc_xprt_set_local(&newsvsk->sk_xprt, sin, slen);
 904
 
 
 
 
 905	if (serv->sv_stats)
 906		serv->sv_stats->nettcpconn++;
 907
 908	return &newsvsk->sk_xprt;
 909
 910failed:
 911	sock_release(newsock);
 912	return NULL;
 913}
 914
 915static unsigned int svc_tcp_restore_pages(struct svc_sock *svsk, struct svc_rqst *rqstp)
 916{
 917	unsigned int i, len, npages;
 918
 919	if (svsk->sk_tcplen <= sizeof(rpc_fraghdr))
 920		return 0;
 921	len = svsk->sk_tcplen - sizeof(rpc_fraghdr);
 922	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 923	for (i = 0; i < npages; i++) {
 924		if (rqstp->rq_pages[i] != NULL)
 925			put_page(rqstp->rq_pages[i]);
 926		BUG_ON(svsk->sk_pages[i] == NULL);
 927		rqstp->rq_pages[i] = svsk->sk_pages[i];
 928		svsk->sk_pages[i] = NULL;
 929	}
 930	rqstp->rq_arg.head[0].iov_base = page_address(rqstp->rq_pages[0]);
 931	return len;
 932}
 933
 934static void svc_tcp_save_pages(struct svc_sock *svsk, struct svc_rqst *rqstp)
 935{
 936	unsigned int i, len, npages;
 937
 938	if (svsk->sk_tcplen <= sizeof(rpc_fraghdr))
 939		return;
 940	len = svsk->sk_tcplen - sizeof(rpc_fraghdr);
 941	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 942	for (i = 0; i < npages; i++) {
 943		svsk->sk_pages[i] = rqstp->rq_pages[i];
 944		rqstp->rq_pages[i] = NULL;
 945	}
 946}
 947
 948static void svc_tcp_clear_pages(struct svc_sock *svsk)
 949{
 950	unsigned int i, len, npages;
 951
 952	if (svsk->sk_tcplen <= sizeof(rpc_fraghdr))
 953		goto out;
 954	len = svsk->sk_tcplen - sizeof(rpc_fraghdr);
 955	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 956	for (i = 0; i < npages; i++) {
 957		BUG_ON(svsk->sk_pages[i] == NULL);
 
 
 
 958		put_page(svsk->sk_pages[i]);
 959		svsk->sk_pages[i] = NULL;
 960	}
 961out:
 962	svsk->sk_tcplen = 0;
 
 963}
 964
 965/*
 966 * Receive data.
 967 * If we haven't gotten the record length yet, get the next four bytes.
 968 * Otherwise try to gobble up as much as possible up to the complete
 969 * record length.
 970 */
 971static int svc_tcp_recv_record(struct svc_sock *svsk, struct svc_rqst *rqstp)
 972{
 973	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 974	unsigned int want;
 975	int len;
 976
 977	clear_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 978
 979	if (svsk->sk_tcplen < sizeof(rpc_fraghdr)) {
 980		struct kvec	iov;
 981
 982		want = sizeof(rpc_fraghdr) - svsk->sk_tcplen;
 983		iov.iov_base = ((char *) &svsk->sk_reclen) + svsk->sk_tcplen;
 984		iov.iov_len  = want;
 985		if ((len = svc_recvfrom(rqstp, &iov, 1, want)) < 0)
 986			goto error;
 987		svsk->sk_tcplen += len;
 988
 989		if (len < want) {
 990			dprintk("svc: short recvfrom while reading record "
 991				"length (%d of %d)\n", len, want);
 992			return -EAGAIN;
 993		}
 994
 995		svsk->sk_reclen = ntohl(svsk->sk_reclen);
 996		if (!(svsk->sk_reclen & RPC_LAST_STREAM_FRAGMENT)) {
 997			/* FIXME: technically, a record can be fragmented,
 998			 *  and non-terminal fragments will not have the top
 999			 *  bit set in the fragment length header.
1000			 *  But apparently no known nfs clients send fragmented
1001			 *  records. */
1002			if (net_ratelimit())
1003				printk(KERN_NOTICE "RPC: multiple fragments "
1004					"per record not supported\n");
1005			goto err_delete;
1006		}
1007
1008		svsk->sk_reclen &= RPC_FRAGMENT_SIZE_MASK;
1009		dprintk("svc: TCP record, %d bytes\n", svsk->sk_reclen);
1010		if (svsk->sk_reclen > serv->sv_max_mesg) {
1011			if (net_ratelimit())
1012				printk(KERN_NOTICE "RPC: "
1013					"fragment too large: 0x%08lx\n",
1014					(unsigned long)svsk->sk_reclen);
1015			goto err_delete;
1016		}
1017	}
1018
1019	if (svsk->sk_reclen < 8)
1020		goto err_delete; /* client is nuts. */
1021
1022	len = svsk->sk_reclen;
1023
1024	return len;
1025error:
1026	dprintk("RPC: TCP recv_record got %d\n", len);
1027	return len;
1028err_delete:
1029	set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
1030	return -EAGAIN;
1031}
1032
1033static int receive_cb_reply(struct svc_sock *svsk, struct svc_rqst *rqstp)
1034{
1035	struct rpc_xprt *bc_xprt = svsk->sk_xprt.xpt_bc_xprt;
1036	struct rpc_rqst *req = NULL;
1037	struct kvec *src, *dst;
1038	__be32 *p = (__be32 *)rqstp->rq_arg.head[0].iov_base;
1039	__be32 xid;
1040	__be32 calldir;
1041
1042	xid = *p++;
1043	calldir = *p;
1044
1045	if (bc_xprt)
1046		req = xprt_lookup_rqst(bc_xprt, xid);
1047
1048	if (!req) {
1049		printk(KERN_NOTICE
1050			"%s: Got unrecognized reply: "
1051			"calldir 0x%x xpt_bc_xprt %p xid %08x\n",
1052			__func__, ntohl(calldir),
1053			bc_xprt, xid);
1054		return -EAGAIN;
1055	}
 
 
 
1056
1057	memcpy(&req->rq_private_buf, &req->rq_rcv_buf, sizeof(struct xdr_buf));
1058	/*
1059	 * XXX!: cheating for now!  Only copying HEAD.
1060	 * But we know this is good enough for now (in fact, for any
1061	 * callback reply in the forseeable future).
1062	 */
1063	dst = &req->rq_private_buf.head[0];
1064	src = &rqstp->rq_arg.head[0];
1065	if (dst->iov_len < src->iov_len)
1066		return -EAGAIN; /* whatever; just giving up. */
1067	memcpy(dst->iov_base, src->iov_base, src->iov_len);
1068	xprt_complete_rqst(req->rq_task, svsk->sk_reclen);
1069	rqstp->rq_arg.len = 0;
 
1070	return 0;
 
 
 
 
 
 
 
 
 
1071}
1072
1073static int copy_pages_to_kvecs(struct kvec *vec, struct page **pages, int len)
1074{
1075	int i = 0;
1076	int t = 0;
1077
1078	while (t < len) {
1079		vec[i].iov_base = page_address(pages[i]);
1080		vec[i].iov_len = PAGE_SIZE;
1081		i++;
1082		t += PAGE_SIZE;
1083	}
1084	return i;
1085}
1086
 
 
 
 
 
 
 
 
 
1087
1088/*
1089 * Receive data from a TCP socket.
1090 */
1091static int svc_tcp_recvfrom(struct svc_rqst *rqstp)
1092{
1093	struct svc_sock	*svsk =
1094		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
1095	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
1096	int		len;
1097	struct kvec *vec;
1098	unsigned int want, base;
1099	__be32 *p;
1100	__be32 calldir;
1101	int pnum;
1102
1103	dprintk("svc: tcp_recv %p data %d conn %d close %d\n",
1104		svsk, test_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags),
1105		test_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags),
1106		test_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags));
1107
1108	len = svc_tcp_recv_record(svsk, rqstp);
1109	if (len < 0)
1110		goto error;
1111
1112	base = svc_tcp_restore_pages(svsk, rqstp);
1113	want = svsk->sk_reclen - base;
1114
1115	vec = rqstp->rq_vec;
1116
1117	pnum = copy_pages_to_kvecs(&vec[0], &rqstp->rq_pages[0],
1118						svsk->sk_reclen);
1119
1120	rqstp->rq_respages = &rqstp->rq_pages[pnum];
 
1121
1122	/* Now receive data */
1123	len = svc_partial_recvfrom(rqstp, vec, pnum, want, base);
1124	if (len >= 0)
1125		svsk->sk_tcplen += len;
1126	if (len != want) {
1127		if (len < 0 && len != -EAGAIN)
1128			goto err_other;
1129		svc_tcp_save_pages(svsk, rqstp);
1130		dprintk("svc: incomplete TCP record (%d of %d)\n",
1131			svsk->sk_tcplen, svsk->sk_reclen);
 
 
 
 
 
 
1132		goto err_noclose;
1133	}
1134
1135	rqstp->rq_arg.len = svsk->sk_reclen;
 
 
 
 
 
1136	rqstp->rq_arg.page_base = 0;
1137	if (rqstp->rq_arg.len <= rqstp->rq_arg.head[0].iov_len) {
1138		rqstp->rq_arg.head[0].iov_len = rqstp->rq_arg.len;
1139		rqstp->rq_arg.page_len = 0;
1140	} else
1141		rqstp->rq_arg.page_len = rqstp->rq_arg.len - rqstp->rq_arg.head[0].iov_len;
1142
1143	rqstp->rq_xprt_ctxt   = NULL;
1144	rqstp->rq_prot	      = IPPROTO_TCP;
 
 
 
 
1145
1146	p = (__be32 *)rqstp->rq_arg.head[0].iov_base;
1147	calldir = p[1];
1148	if (calldir)
1149		len = receive_cb_reply(svsk, rqstp);
1150
1151	/* Reset TCP read info */
1152	svsk->sk_reclen = 0;
1153	svsk->sk_tcplen = 0;
1154	/* If we have more data, signal svc_xprt_enqueue() to try again */
1155	if (svc_recv_available(svsk) > sizeof(rpc_fraghdr))
1156		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
1157
1158	if (len < 0)
1159		goto error;
1160
1161	svc_xprt_copy_addrs(rqstp, &svsk->sk_xprt);
1162	if (serv->sv_stats)
1163		serv->sv_stats->nettcpcnt++;
1164
1165	dprintk("svc: TCP complete record (%d bytes)\n", rqstp->rq_arg.len);
1166	return rqstp->rq_arg.len;
1167
1168error:
1169	if (len != -EAGAIN)
1170		goto err_other;
1171	dprintk("RPC: TCP recvfrom got EAGAIN\n");
1172	return -EAGAIN;
1173err_other:
1174	printk(KERN_NOTICE "%s: recvfrom returned errno %d\n",
1175	       svsk->sk_xprt.xpt_server->sv_name, -len);
1176	set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
1177err_noclose:
1178	return -EAGAIN;	/* record not complete */
1179}
1180
1181/*
1182 * Send out data on TCP socket.
1183 */
1184static int svc_tcp_sendto(struct svc_rqst *rqstp)
1185{
1186	struct xdr_buf	*xbufp = &rqstp->rq_res;
1187	int sent;
1188	__be32 reclen;
1189
1190	/* Set up the first element of the reply kvec.
1191	 * Any other kvecs that may be in use have been taken
1192	 * care of by the server implementation itself.
1193	 */
1194	reclen = htonl(0x80000000|((xbufp->len ) - 4));
1195	memcpy(xbufp->head[0].iov_base, &reclen, 4);
1196
1197	sent = svc_sendto(rqstp, &rqstp->rq_res);
1198	if (sent != xbufp->len) {
1199		printk(KERN_NOTICE
1200		       "rpc-srv/tcp: %s: %s %d when sending %d bytes "
1201		       "- shutting down socket\n",
1202		       rqstp->rq_xprt->xpt_server->sv_name,
1203		       (sent<0)?"got error":"sent only",
1204		       sent, xbufp->len);
1205		set_bit(XPT_CLOSE, &rqstp->rq_xprt->xpt_flags);
1206		svc_xprt_enqueue(rqstp->rq_xprt);
1207		sent = -EAGAIN;
1208	}
1209	return sent;
1210}
1211
1212/*
1213 * Setup response header. TCP has a 4B record length field.
1214 */
1215static void svc_tcp_prep_reply_hdr(struct svc_rqst *rqstp)
1216{
1217	struct kvec *resv = &rqstp->rq_res.head[0];
1218
1219	/* tcp needs a space for the record length... */
1220	svc_putnl(resv, 0);
1221}
1222
1223static int svc_tcp_has_wspace(struct svc_xprt *xprt)
1224{
1225	struct svc_sock *svsk =	container_of(xprt, struct svc_sock, sk_xprt);
1226	struct svc_serv *serv = svsk->sk_xprt.xpt_server;
1227	int required;
1228
1229	if (test_bit(XPT_LISTENER, &xprt->xpt_flags))
1230		return 1;
1231	required = atomic_read(&xprt->xpt_reserved) + serv->sv_max_mesg;
1232	if (sk_stream_wspace(svsk->sk_sk) >= required)
1233		return 1;
1234	set_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
1235	return 0;
1236}
1237
1238static struct svc_xprt *svc_tcp_create(struct svc_serv *serv,
1239				       struct net *net,
1240				       struct sockaddr *sa, int salen,
1241				       int flags)
1242{
1243	return svc_create_socket(serv, IPPROTO_TCP, net, sa, salen, flags);
1244}
1245
1246#if defined(CONFIG_SUNRPC_BACKCHANNEL)
1247static struct svc_xprt *svc_bc_create_socket(struct svc_serv *, int,
1248					     struct net *, struct sockaddr *,
1249					     int, int);
1250static void svc_bc_sock_free(struct svc_xprt *xprt);
1251
1252static struct svc_xprt *svc_bc_tcp_create(struct svc_serv *serv,
1253				       struct net *net,
1254				       struct sockaddr *sa, int salen,
1255				       int flags)
1256{
1257	return svc_bc_create_socket(serv, IPPROTO_TCP, net, sa, salen, flags);
1258}
1259
1260static void svc_bc_tcp_sock_detach(struct svc_xprt *xprt)
1261{
1262}
1263
1264static struct svc_xprt_ops svc_tcp_bc_ops = {
1265	.xpo_create = svc_bc_tcp_create,
1266	.xpo_detach = svc_bc_tcp_sock_detach,
1267	.xpo_free = svc_bc_sock_free,
1268	.xpo_prep_reply_hdr = svc_tcp_prep_reply_hdr,
 
1269};
1270
1271static struct svc_xprt_class svc_tcp_bc_class = {
1272	.xcl_name = "tcp-bc",
1273	.xcl_owner = THIS_MODULE,
1274	.xcl_ops = &svc_tcp_bc_ops,
1275	.xcl_max_payload = RPCSVC_MAXPAYLOAD_TCP,
1276};
1277
1278static void svc_init_bc_xprt_sock(void)
1279{
1280	svc_reg_xprt_class(&svc_tcp_bc_class);
1281}
1282
1283static void svc_cleanup_bc_xprt_sock(void)
1284{
1285	svc_unreg_xprt_class(&svc_tcp_bc_class);
1286}
1287#else /* CONFIG_SUNRPC_BACKCHANNEL */
1288static void svc_init_bc_xprt_sock(void)
1289{
1290}
1291
1292static void svc_cleanup_bc_xprt_sock(void)
1293{
1294}
1295#endif /* CONFIG_SUNRPC_BACKCHANNEL */
1296
1297static struct svc_xprt_ops svc_tcp_ops = {
1298	.xpo_create = svc_tcp_create,
1299	.xpo_recvfrom = svc_tcp_recvfrom,
1300	.xpo_sendto = svc_tcp_sendto,
1301	.xpo_release_rqst = svc_release_skb,
1302	.xpo_detach = svc_tcp_sock_detach,
1303	.xpo_free = svc_sock_free,
1304	.xpo_prep_reply_hdr = svc_tcp_prep_reply_hdr,
1305	.xpo_has_wspace = svc_tcp_has_wspace,
1306	.xpo_accept = svc_tcp_accept,
 
 
1307};
1308
1309static struct svc_xprt_class svc_tcp_class = {
1310	.xcl_name = "tcp",
1311	.xcl_owner = THIS_MODULE,
1312	.xcl_ops = &svc_tcp_ops,
1313	.xcl_max_payload = RPCSVC_MAXPAYLOAD_TCP,
 
1314};
1315
1316void svc_init_xprt_sock(void)
1317{
1318	svc_reg_xprt_class(&svc_tcp_class);
1319	svc_reg_xprt_class(&svc_udp_class);
1320	svc_init_bc_xprt_sock();
1321}
1322
1323void svc_cleanup_xprt_sock(void)
1324{
1325	svc_unreg_xprt_class(&svc_tcp_class);
1326	svc_unreg_xprt_class(&svc_udp_class);
1327	svc_cleanup_bc_xprt_sock();
1328}
1329
1330static void svc_tcp_init(struct svc_sock *svsk, struct svc_serv *serv)
1331{
1332	struct sock	*sk = svsk->sk_sk;
1333
1334	svc_xprt_init(&svc_tcp_class, &svsk->sk_xprt, serv);
 
1335	set_bit(XPT_CACHE_AUTH, &svsk->sk_xprt.xpt_flags);
 
1336	if (sk->sk_state == TCP_LISTEN) {
1337		dprintk("setting up TCP socket for listening\n");
 
1338		set_bit(XPT_LISTENER, &svsk->sk_xprt.xpt_flags);
1339		sk->sk_data_ready = svc_tcp_listen_data_ready;
1340		set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
1341	} else {
1342		dprintk("setting up TCP socket for reading\n");
1343		sk->sk_state_change = svc_tcp_state_change;
1344		sk->sk_data_ready = svc_tcp_data_ready;
1345		sk->sk_write_space = svc_tcp_write_space;
1346
1347		svsk->sk_reclen = 0;
1348		svsk->sk_tcplen = 0;
 
1349		memset(&svsk->sk_pages[0], 0, sizeof(svsk->sk_pages));
1350
1351		tcp_sk(sk)->nonagle |= TCP_NAGLE_OFF;
1352
1353		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
1354		if (sk->sk_state != TCP_ESTABLISHED)
 
 
 
 
1355			set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
 
1356	}
1357}
1358
1359void svc_sock_update_bufs(struct svc_serv *serv)
1360{
1361	/*
1362	 * The number of server threads has changed. Update
1363	 * rcvbuf and sndbuf accordingly on all sockets
1364	 */
1365	struct svc_sock *svsk;
1366
1367	spin_lock_bh(&serv->sv_lock);
1368	list_for_each_entry(svsk, &serv->sv_permsocks, sk_xprt.xpt_list)
1369		set_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags);
1370	list_for_each_entry(svsk, &serv->sv_tempsocks, sk_xprt.xpt_list)
1371		set_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags);
1372	spin_unlock_bh(&serv->sv_lock);
1373}
1374EXPORT_SYMBOL_GPL(svc_sock_update_bufs);
1375
1376/*
1377 * Initialize socket for RPC use and create svc_sock struct
1378 * XXX: May want to setsockopt SO_SNDBUF and SO_RCVBUF.
1379 */
1380static struct svc_sock *svc_setup_socket(struct svc_serv *serv,
1381						struct socket *sock,
1382						int *errp, int flags)
1383{
1384	struct svc_sock	*svsk;
1385	struct sock	*inet;
1386	int		pmap_register = !(flags & SVC_SOCK_ANONYMOUS);
 
1387
1388	dprintk("svc: svc_setup_socket %p\n", sock);
1389	if (!(svsk = kzalloc(sizeof(*svsk), GFP_KERNEL))) {
1390		*errp = -ENOMEM;
1391		return NULL;
1392	}
1393
1394	inet = sock->sk;
1395
1396	/* Register socket with portmapper */
1397	if (*errp >= 0 && pmap_register)
1398		*errp = svc_register(serv, inet->sk_family, inet->sk_protocol,
 
1399				     ntohs(inet_sk(inet)->inet_sport));
1400
1401	if (*errp < 0) {
1402		kfree(svsk);
1403		return NULL;
1404	}
1405
1406	inet->sk_user_data = svsk;
1407	svsk->sk_sock = sock;
1408	svsk->sk_sk = inet;
1409	svsk->sk_ostate = inet->sk_state_change;
1410	svsk->sk_odata = inet->sk_data_ready;
1411	svsk->sk_owspace = inet->sk_write_space;
 
 
 
 
 
 
 
1412
1413	/* Initialize the socket */
1414	if (sock->type == SOCK_DGRAM)
1415		svc_udp_init(svsk, serv);
1416	else {
1417		/* initialise setting must have enough space to
1418		 * receive and respond to one request.
1419		 */
1420		svc_sock_setbufsize(svsk->sk_sock, 4 * serv->sv_max_mesg,
1421					4 * serv->sv_max_mesg);
1422		svc_tcp_init(svsk, serv);
1423	}
1424
1425	dprintk("svc: svc_setup_socket created %p (inet %p)\n",
1426				svsk, svsk->sk_sk);
 
 
 
1427
1428	return svsk;
1429}
1430
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1431/**
1432 * svc_addsock - add a listener socket to an RPC service
1433 * @serv: pointer to RPC service to which to add a new listener
1434 * @fd: file descriptor of the new listener
1435 * @name_return: pointer to buffer to fill in with name of listener
1436 * @len: size of the buffer
1437 *
1438 * Fills in socket name and returns positive length of name if successful.
1439 * Name is terminated with '\n'.  On error, returns a negative errno
1440 * value.
1441 */
1442int svc_addsock(struct svc_serv *serv, const int fd, char *name_return,
1443		const size_t len)
1444{
1445	int err = 0;
1446	struct socket *so = sockfd_lookup(fd, &err);
1447	struct svc_sock *svsk = NULL;
 
 
 
1448
1449	if (!so)
1450		return err;
 
1451	if ((so->sk->sk_family != PF_INET) && (so->sk->sk_family != PF_INET6))
1452		err =  -EAFNOSUPPORT;
1453	else if (so->sk->sk_protocol != IPPROTO_TCP &&
 
1454	    so->sk->sk_protocol != IPPROTO_UDP)
1455		err =  -EPROTONOSUPPORT;
1456	else if (so->state > SS_UNCONNECTED)
1457		err = -EISCONN;
1458	else {
1459		if (!try_module_get(THIS_MODULE))
1460			err = -ENOENT;
1461		else
1462			svsk = svc_setup_socket(serv, so, &err,
1463						SVC_SOCK_DEFAULTS);
1464		if (svsk) {
1465			struct sockaddr_storage addr;
1466			struct sockaddr *sin = (struct sockaddr *)&addr;
1467			int salen;
1468			if (kernel_getsockname(svsk->sk_sock, sin, &salen) == 0)
1469				svc_xprt_set_local(&svsk->sk_xprt, sin, salen);
1470			clear_bit(XPT_TEMP, &svsk->sk_xprt.xpt_flags);
1471			spin_lock_bh(&serv->sv_lock);
1472			list_add(&svsk->sk_xprt.xpt_list, &serv->sv_permsocks);
1473			spin_unlock_bh(&serv->sv_lock);
1474			svc_xprt_received(&svsk->sk_xprt);
1475			err = 0;
1476		} else
1477			module_put(THIS_MODULE);
1478	}
1479	if (err) {
1480		sockfd_put(so);
1481		return err;
1482	}
 
 
 
 
1483	return svc_one_sock_name(svsk, name_return, len);
 
 
 
1484}
1485EXPORT_SYMBOL_GPL(svc_addsock);
1486
1487/*
1488 * Create socket for RPC service.
1489 */
1490static struct svc_xprt *svc_create_socket(struct svc_serv *serv,
1491					  int protocol,
1492					  struct net *net,
1493					  struct sockaddr *sin, int len,
1494					  int flags)
1495{
1496	struct svc_sock	*svsk;
1497	struct socket	*sock;
1498	int		error;
1499	int		type;
1500	struct sockaddr_storage addr;
1501	struct sockaddr *newsin = (struct sockaddr *)&addr;
1502	int		newlen;
1503	int		family;
1504	int		val;
1505	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
1506
1507	dprintk("svc: svc_create_socket(%s, %d, %s)\n",
1508			serv->sv_program->pg_name, protocol,
1509			__svc_print_addr(sin, buf, sizeof(buf)));
1510
1511	if (protocol != IPPROTO_UDP && protocol != IPPROTO_TCP) {
1512		printk(KERN_WARNING "svc: only UDP and TCP "
1513				"sockets supported\n");
1514		return ERR_PTR(-EINVAL);
1515	}
1516
1517	type = (protocol == IPPROTO_UDP)? SOCK_DGRAM : SOCK_STREAM;
1518	switch (sin->sa_family) {
1519	case AF_INET6:
1520		family = PF_INET6;
1521		break;
1522	case AF_INET:
1523		family = PF_INET;
1524		break;
1525	default:
1526		return ERR_PTR(-EINVAL);
1527	}
1528
1529	error = __sock_create(net, family, type, protocol, &sock, 1);
1530	if (error < 0)
1531		return ERR_PTR(error);
1532
1533	svc_reclassify_socket(sock);
1534
1535	/*
1536	 * If this is an PF_INET6 listener, we want to avoid
1537	 * getting requests from IPv4 remotes.  Those should
1538	 * be shunted to a PF_INET listener via rpcbind.
1539	 */
1540	val = 1;
1541	if (family == PF_INET6)
1542		kernel_setsockopt(sock, SOL_IPV6, IPV6_V6ONLY,
1543					(char *)&val, sizeof(val));
1544
1545	if (type == SOCK_STREAM)
1546		sock->sk->sk_reuse = 1;		/* allow address reuse */
1547	error = kernel_bind(sock, sin, len);
1548	if (error < 0)
1549		goto bummer;
1550
1551	newlen = len;
1552	error = kernel_getsockname(sock, newsin, &newlen);
1553	if (error < 0)
1554		goto bummer;
 
1555
1556	if (protocol == IPPROTO_TCP) {
1557		if ((error = kernel_listen(sock, 64)) < 0)
1558			goto bummer;
1559	}
1560
1561	if ((svsk = svc_setup_socket(serv, sock, &error, flags)) != NULL) {
1562		svc_xprt_set_local(&svsk->sk_xprt, newsin, newlen);
1563		return (struct svc_xprt *)svsk;
 
1564	}
1565
 
1566bummer:
1567	dprintk("svc: svc_create_socket error = %d\n", -error);
1568	sock_release(sock);
1569	return ERR_PTR(error);
1570}
1571
1572/*
1573 * Detach the svc_sock from the socket so that no
1574 * more callbacks occur.
1575 */
1576static void svc_sock_detach(struct svc_xprt *xprt)
1577{
1578	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1579	struct sock *sk = svsk->sk_sk;
1580	wait_queue_head_t *wq;
1581
1582	dprintk("svc: svc_sock_detach(%p)\n", svsk);
1583
1584	/* put back the old socket callbacks */
 
1585	sk->sk_state_change = svsk->sk_ostate;
1586	sk->sk_data_ready = svsk->sk_odata;
1587	sk->sk_write_space = svsk->sk_owspace;
1588
1589	wq = sk_sleep(sk);
1590	if (wq && waitqueue_active(wq))
1591		wake_up_interruptible(wq);
1592}
1593
1594/*
1595 * Disconnect the socket, and reset the callbacks
1596 */
1597static void svc_tcp_sock_detach(struct svc_xprt *xprt)
1598{
1599	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1600
1601	dprintk("svc: svc_tcp_sock_detach(%p)\n", svsk);
1602
1603	svc_sock_detach(xprt);
1604
1605	if (!test_bit(XPT_LISTENER, &xprt->xpt_flags)) {
1606		svc_tcp_clear_pages(svsk);
1607		kernel_sock_shutdown(svsk->sk_sock, SHUT_RDWR);
1608	}
1609}
1610
1611/*
1612 * Free the svc_sock's socket resources and the svc_sock itself.
1613 */
1614static void svc_sock_free(struct svc_xprt *xprt)
1615{
1616	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1617	dprintk("svc: svc_sock_free(%p)\n", svsk);
1618
1619	if (svsk->sk_sock->file)
1620		sockfd_put(svsk->sk_sock);
1621	else
1622		sock_release(svsk->sk_sock);
1623	kfree(svsk);
1624}
1625
1626#if defined(CONFIG_SUNRPC_BACKCHANNEL)
1627/*
1628 * Create a back channel svc_xprt which shares the fore channel socket.
1629 */
1630static struct svc_xprt *svc_bc_create_socket(struct svc_serv *serv,
1631					     int protocol,
1632					     struct net *net,
1633					     struct sockaddr *sin, int len,
1634					     int flags)
1635{
1636	struct svc_sock *svsk;
1637	struct svc_xprt *xprt;
1638
1639	if (protocol != IPPROTO_TCP) {
1640		printk(KERN_WARNING "svc: only TCP sockets"
1641			" supported on shared back channel\n");
1642		return ERR_PTR(-EINVAL);
1643	}
1644
1645	svsk = kzalloc(sizeof(*svsk), GFP_KERNEL);
1646	if (!svsk)
1647		return ERR_PTR(-ENOMEM);
1648
1649	xprt = &svsk->sk_xprt;
1650	svc_xprt_init(&svc_tcp_bc_class, xprt, serv);
 
1651
1652	serv->sv_bc_xprt = xprt;
1653
1654	return xprt;
1655}
1656
1657/*
1658 * Free a back channel svc_sock.
1659 */
1660static void svc_bc_sock_free(struct svc_xprt *xprt)
1661{
1662	if (xprt)
1663		kfree(container_of(xprt, struct svc_sock, sk_xprt));
1664}
1665#endif /* CONFIG_SUNRPC_BACKCHANNEL */
v4.17
   1/*
   2 * linux/net/sunrpc/svcsock.c
   3 *
   4 * These are the RPC server socket internals.
   5 *
   6 * The server scheduling algorithm does not always distribute the load
   7 * evenly when servicing a single client. May need to modify the
   8 * svc_xprt_enqueue procedure...
   9 *
  10 * TCP support is largely untested and may be a little slow. The problem
  11 * is that we currently do two separate recvfrom's, one for the 4-byte
  12 * record length, and the second for the actual record. This could possibly
  13 * be improved by always reading a minimum size of around 100 bytes and
  14 * tucking any superfluous bytes away in a temporary store. Still, that
  15 * leaves write requests out in the rain. An alternative may be to peek at
  16 * the first skb in the queue, and if it matches the next TCP sequence
  17 * number, to extract the record marker. Yuck.
  18 *
  19 * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de>
  20 */
  21
  22#include <linux/kernel.h>
  23#include <linux/sched.h>
  24#include <linux/module.h>
  25#include <linux/errno.h>
  26#include <linux/fcntl.h>
  27#include <linux/net.h>
  28#include <linux/in.h>
  29#include <linux/inet.h>
  30#include <linux/udp.h>
  31#include <linux/tcp.h>
  32#include <linux/unistd.h>
  33#include <linux/slab.h>
  34#include <linux/netdevice.h>
  35#include <linux/skbuff.h>
  36#include <linux/file.h>
  37#include <linux/freezer.h>
  38#include <net/sock.h>
  39#include <net/checksum.h>
  40#include <net/ip.h>
  41#include <net/ipv6.h>
  42#include <net/udp.h>
  43#include <net/tcp.h>
  44#include <net/tcp_states.h>
  45#include <linux/uaccess.h>
  46#include <asm/ioctls.h>
  47#include <trace/events/skb.h>
  48
  49#include <linux/sunrpc/types.h>
  50#include <linux/sunrpc/clnt.h>
  51#include <linux/sunrpc/xdr.h>
  52#include <linux/sunrpc/msg_prot.h>
  53#include <linux/sunrpc/svcsock.h>
  54#include <linux/sunrpc/stats.h>
  55#include <linux/sunrpc/xprt.h>
  56
  57#include "sunrpc.h"
  58
  59#define RPCDBG_FACILITY	RPCDBG_SVCXPRT
  60
  61
  62static struct svc_sock *svc_setup_socket(struct svc_serv *, struct socket *,
  63					 int flags);
 
  64static int		svc_udp_recvfrom(struct svc_rqst *);
  65static int		svc_udp_sendto(struct svc_rqst *);
  66static void		svc_sock_detach(struct svc_xprt *);
  67static void		svc_tcp_sock_detach(struct svc_xprt *);
  68static void		svc_sock_free(struct svc_xprt *);
  69
  70static struct svc_xprt *svc_create_socket(struct svc_serv *, int,
  71					  struct net *, struct sockaddr *,
  72					  int, int);
  73#if defined(CONFIG_SUNRPC_BACKCHANNEL)
  74static struct svc_xprt *svc_bc_create_socket(struct svc_serv *, int,
  75					     struct net *, struct sockaddr *,
  76					     int, int);
  77static void svc_bc_sock_free(struct svc_xprt *xprt);
  78#endif /* CONFIG_SUNRPC_BACKCHANNEL */
  79
  80#ifdef CONFIG_DEBUG_LOCK_ALLOC
  81static struct lock_class_key svc_key[2];
  82static struct lock_class_key svc_slock_key[2];
  83
  84static void svc_reclassify_socket(struct socket *sock)
  85{
  86	struct sock *sk = sock->sk;
  87
  88	if (WARN_ON_ONCE(!sock_allow_reclassification(sk)))
  89		return;
  90
  91	switch (sk->sk_family) {
  92	case AF_INET:
  93		sock_lock_init_class_and_name(sk, "slock-AF_INET-NFSD",
  94					      &svc_slock_key[0],
  95					      "sk_xprt.xpt_lock-AF_INET-NFSD",
  96					      &svc_key[0]);
  97		break;
  98
  99	case AF_INET6:
 100		sock_lock_init_class_and_name(sk, "slock-AF_INET6-NFSD",
 101					      &svc_slock_key[1],
 102					      "sk_xprt.xpt_lock-AF_INET6-NFSD",
 103					      &svc_key[1]);
 104		break;
 105
 106	default:
 107		BUG();
 108	}
 109}
 110#else
 111static void svc_reclassify_socket(struct socket *sock)
 112{
 113}
 114#endif
 115
 116/*
 117 * Release an skbuff after use
 118 */
 119static void svc_release_skb(struct svc_rqst *rqstp)
 120{
 121	struct sk_buff *skb = rqstp->rq_xprt_ctxt;
 122
 123	if (skb) {
 124		struct svc_sock *svsk =
 125			container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 126		rqstp->rq_xprt_ctxt = NULL;
 127
 128		dprintk("svc: service %p, releasing skb %p\n", rqstp, skb);
 129		skb_free_datagram_locked(svsk->sk_sk, skb);
 130	}
 131}
 132
 133static void svc_release_udp_skb(struct svc_rqst *rqstp)
 134{
 135	struct sk_buff *skb = rqstp->rq_xprt_ctxt;
 136
 137	if (skb) {
 138		rqstp->rq_xprt_ctxt = NULL;
 139
 140		dprintk("svc: service %p, releasing skb %p\n", rqstp, skb);
 141		consume_skb(skb);
 142	}
 143}
 144
 145union svc_pktinfo_u {
 146	struct in_pktinfo pkti;
 147	struct in6_pktinfo pkti6;
 148};
 149#define SVC_PKTINFO_SPACE \
 150	CMSG_SPACE(sizeof(union svc_pktinfo_u))
 151
 152static void svc_set_cmsg_data(struct svc_rqst *rqstp, struct cmsghdr *cmh)
 153{
 154	struct svc_sock *svsk =
 155		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 156	switch (svsk->sk_sk->sk_family) {
 157	case AF_INET: {
 158			struct in_pktinfo *pki = CMSG_DATA(cmh);
 159
 160			cmh->cmsg_level = SOL_IP;
 161			cmh->cmsg_type = IP_PKTINFO;
 162			pki->ipi_ifindex = 0;
 163			pki->ipi_spec_dst.s_addr =
 164				 svc_daddr_in(rqstp)->sin_addr.s_addr;
 165			cmh->cmsg_len = CMSG_LEN(sizeof(*pki));
 166		}
 167		break;
 168
 169	case AF_INET6: {
 170			struct in6_pktinfo *pki = CMSG_DATA(cmh);
 171			struct sockaddr_in6 *daddr = svc_daddr_in6(rqstp);
 172
 173			cmh->cmsg_level = SOL_IPV6;
 174			cmh->cmsg_type = IPV6_PKTINFO;
 175			pki->ipi6_ifindex = daddr->sin6_scope_id;
 176			pki->ipi6_addr = daddr->sin6_addr;
 
 177			cmh->cmsg_len = CMSG_LEN(sizeof(*pki));
 178		}
 179		break;
 180	}
 181}
 182
 183/*
 184 * send routine intended to be shared by the fore- and back-channel
 185 */
 186int svc_send_common(struct socket *sock, struct xdr_buf *xdr,
 187		    struct page *headpage, unsigned long headoffset,
 188		    struct page *tailpage, unsigned long tailoffset)
 189{
 190	int		result;
 191	int		size;
 192	struct page	**ppage = xdr->pages;
 193	size_t		base = xdr->page_base;
 194	unsigned int	pglen = xdr->page_len;
 195	unsigned int	flags = MSG_MORE | MSG_SENDPAGE_NOTLAST;
 196	int		slen;
 197	int		len = 0;
 198
 199	slen = xdr->len;
 200
 201	/* send head */
 202	if (slen == xdr->head[0].iov_len)
 203		flags = 0;
 204	len = kernel_sendpage(sock, headpage, headoffset,
 205				  xdr->head[0].iov_len, flags);
 206	if (len != xdr->head[0].iov_len)
 207		goto out;
 208	slen -= xdr->head[0].iov_len;
 209	if (slen == 0)
 210		goto out;
 211
 212	/* send page data */
 213	size = PAGE_SIZE - base < pglen ? PAGE_SIZE - base : pglen;
 214	while (pglen > 0) {
 215		if (slen == size)
 216			flags = 0;
 217		result = kernel_sendpage(sock, *ppage, base, size, flags);
 218		if (result > 0)
 219			len += result;
 220		if (result != size)
 221			goto out;
 222		slen -= size;
 223		pglen -= size;
 224		size = PAGE_SIZE < pglen ? PAGE_SIZE : pglen;
 225		base = 0;
 226		ppage++;
 227	}
 228
 229	/* send tail */
 230	if (xdr->tail[0].iov_len) {
 231		result = kernel_sendpage(sock, tailpage, tailoffset,
 232				   xdr->tail[0].iov_len, 0);
 233		if (result > 0)
 234			len += result;
 235	}
 236
 237out:
 238	return len;
 239}
 240
 241
 242/*
 243 * Generic sendto routine
 244 */
 245static int svc_sendto(struct svc_rqst *rqstp, struct xdr_buf *xdr)
 246{
 247	struct svc_sock	*svsk =
 248		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 249	struct socket	*sock = svsk->sk_sock;
 250	union {
 251		struct cmsghdr	hdr;
 252		long		all[SVC_PKTINFO_SPACE / sizeof(long)];
 253	} buffer;
 254	struct cmsghdr *cmh = &buffer.hdr;
 255	int		len = 0;
 256	unsigned long tailoff;
 257	unsigned long headoff;
 258	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
 259
 260	if (rqstp->rq_prot == IPPROTO_UDP) {
 261		struct msghdr msg = {
 262			.msg_name	= &rqstp->rq_addr,
 263			.msg_namelen	= rqstp->rq_addrlen,
 264			.msg_control	= cmh,
 265			.msg_controllen	= sizeof(buffer),
 266			.msg_flags	= MSG_MORE,
 267		};
 268
 269		svc_set_cmsg_data(rqstp, cmh);
 270
 271		if (sock_sendmsg(sock, &msg) < 0)
 272			goto out;
 273	}
 274
 275	tailoff = ((unsigned long)xdr->tail[0].iov_base) & (PAGE_SIZE-1);
 276	headoff = 0;
 277	len = svc_send_common(sock, xdr, rqstp->rq_respages[0], headoff,
 278			       rqstp->rq_respages[0], tailoff);
 279
 280out:
 281	dprintk("svc: socket %p sendto([%p %zu... ], %d) = %d (addr %s)\n",
 282		svsk, xdr->head[0].iov_base, xdr->head[0].iov_len,
 283		xdr->len, len, svc_print_addr(rqstp, buf, sizeof(buf)));
 284
 285	return len;
 286}
 287
 288/*
 289 * Report socket names for nfsdfs
 290 */
 291static int svc_one_sock_name(struct svc_sock *svsk, char *buf, int remaining)
 292{
 293	const struct sock *sk = svsk->sk_sk;
 294	const char *proto_name = sk->sk_protocol == IPPROTO_UDP ?
 295							"udp" : "tcp";
 296	int len;
 297
 298	switch (sk->sk_family) {
 299	case PF_INET:
 300		len = snprintf(buf, remaining, "ipv4 %s %pI4 %d\n",
 301				proto_name,
 302				&inet_sk(sk)->inet_rcv_saddr,
 303				inet_sk(sk)->inet_num);
 304		break;
 305#if IS_ENABLED(CONFIG_IPV6)
 306	case PF_INET6:
 307		len = snprintf(buf, remaining, "ipv6 %s %pI6 %d\n",
 308				proto_name,
 309				&sk->sk_v6_rcv_saddr,
 310				inet_sk(sk)->inet_num);
 311		break;
 312#endif
 313	default:
 314		len = snprintf(buf, remaining, "*unknown-%d*\n",
 315				sk->sk_family);
 316	}
 317
 318	if (len >= remaining) {
 319		*buf = '\0';
 320		return -ENAMETOOLONG;
 321	}
 322	return len;
 323}
 324
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 325/*
 326 * Generic recvfrom routine.
 327 */
 328static int svc_recvfrom(struct svc_rqst *rqstp, struct kvec *iov, int nr,
 329			int buflen)
 330{
 331	struct svc_sock *svsk =
 332		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 333	struct msghdr msg = {
 334		.msg_flags	= MSG_DONTWAIT,
 335	};
 336	int len;
 337
 338	rqstp->rq_xprt_hlen = 0;
 339
 340	clear_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 341	iov_iter_kvec(&msg.msg_iter, READ | ITER_KVEC, iov, nr, buflen);
 342	len = sock_recvmsg(svsk->sk_sock, &msg, msg.msg_flags);
 343	/* If we read a full record, then assume there may be more
 344	 * data to read (stream based sockets only!)
 345	 */
 346	if (len == buflen)
 347		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 348
 349	dprintk("svc: socket %p recvfrom(%p, %zu) = %d\n",
 350		svsk, iov[0].iov_base, iov[0].iov_len, len);
 351	return len;
 352}
 353
 354static int svc_partial_recvfrom(struct svc_rqst *rqstp,
 355				struct kvec *iov, int nr,
 356				int buflen, unsigned int base)
 357{
 358	size_t save_iovlen;
 359	void *save_iovbase;
 360	unsigned int i;
 361	int ret;
 362
 363	if (base == 0)
 364		return svc_recvfrom(rqstp, iov, nr, buflen);
 365
 366	for (i = 0; i < nr; i++) {
 367		if (iov[i].iov_len > base)
 368			break;
 369		base -= iov[i].iov_len;
 370	}
 371	save_iovlen = iov[i].iov_len;
 372	save_iovbase = iov[i].iov_base;
 373	iov[i].iov_len -= base;
 374	iov[i].iov_base += base;
 375	ret = svc_recvfrom(rqstp, &iov[i], nr - i, buflen);
 376	iov[i].iov_len = save_iovlen;
 377	iov[i].iov_base = save_iovbase;
 378	return ret;
 379}
 380
 381/*
 382 * Set socket snd and rcv buffer lengths
 383 */
 384static void svc_sock_setbufsize(struct socket *sock, unsigned int snd,
 385				unsigned int rcv)
 386{
 
 
 
 
 
 
 
 
 
 
 
 
 
 387	lock_sock(sock->sk);
 388	sock->sk->sk_sndbuf = snd * 2;
 389	sock->sk->sk_rcvbuf = rcv * 2;
 390	sock->sk->sk_write_space(sock->sk);
 391	release_sock(sock->sk);
 
 392}
 393
 394static void svc_sock_secure_port(struct svc_rqst *rqstp)
 395{
 396	if (svc_port_is_privileged(svc_addr(rqstp)))
 397		set_bit(RQ_SECURE, &rqstp->rq_flags);
 398	else
 399		clear_bit(RQ_SECURE, &rqstp->rq_flags);
 400}
 401
 402/*
 403 * INET callback when data has been received on the socket.
 404 */
 405static void svc_data_ready(struct sock *sk)
 406{
 407	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 
 408
 409	if (svsk) {
 410		dprintk("svc: socket %p(inet %p), busy=%d\n",
 411			svsk, sk,
 412			test_bit(XPT_BUSY, &svsk->sk_xprt.xpt_flags));
 413
 414		/* Refer to svc_setup_socket() for details. */
 415		rmb();
 416		svsk->sk_odata(sk);
 417		if (!test_and_set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags))
 418			svc_xprt_enqueue(&svsk->sk_xprt);
 419	}
 
 
 420}
 421
 422/*
 423 * INET callback when space is newly available on the socket.
 424 */
 425static void svc_write_space(struct sock *sk)
 426{
 427	struct svc_sock	*svsk = (struct svc_sock *)(sk->sk_user_data);
 
 428
 429	if (svsk) {
 430		dprintk("svc: socket %p(inet %p), write_space busy=%d\n",
 431			svsk, sk, test_bit(XPT_BUSY, &svsk->sk_xprt.xpt_flags));
 432
 433		/* Refer to svc_setup_socket() for details. */
 434		rmb();
 435		svsk->sk_owspace(sk);
 436		svc_xprt_enqueue(&svsk->sk_xprt);
 437	}
 438}
 439
 440static int svc_tcp_has_wspace(struct svc_xprt *xprt)
 441{
 442	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
 443
 444	if (test_bit(XPT_LISTENER, &xprt->xpt_flags))
 445		return 1;
 446	return !test_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
 447}
 448
 449static void svc_tcp_kill_temp_xprt(struct svc_xprt *xprt)
 450{
 451	struct svc_sock *svsk;
 452	struct socket *sock;
 453	struct linger no_linger = {
 454		.l_onoff = 1,
 455		.l_linger = 0,
 456	};
 457
 458	svsk = container_of(xprt, struct svc_sock, sk_xprt);
 459	sock = svsk->sk_sock;
 460	kernel_setsockopt(sock, SOL_SOCKET, SO_LINGER,
 461			  (char *)&no_linger, sizeof(no_linger));
 462}
 463
 464/*
 465 * See net/ipv6/ip_sockglue.c : ip_cmsg_recv_pktinfo
 466 */
 467static int svc_udp_get_dest_address4(struct svc_rqst *rqstp,
 468				     struct cmsghdr *cmh)
 469{
 470	struct in_pktinfo *pki = CMSG_DATA(cmh);
 471	struct sockaddr_in *daddr = svc_daddr_in(rqstp);
 472
 473	if (cmh->cmsg_type != IP_PKTINFO)
 474		return 0;
 475
 476	daddr->sin_family = AF_INET;
 477	daddr->sin_addr.s_addr = pki->ipi_spec_dst.s_addr;
 478	return 1;
 479}
 480
 481/*
 482 * See net/ipv6/datagram.c : ip6_datagram_recv_ctl
 483 */
 484static int svc_udp_get_dest_address6(struct svc_rqst *rqstp,
 485				     struct cmsghdr *cmh)
 486{
 487	struct in6_pktinfo *pki = CMSG_DATA(cmh);
 488	struct sockaddr_in6 *daddr = svc_daddr_in6(rqstp);
 489
 490	if (cmh->cmsg_type != IPV6_PKTINFO)
 491		return 0;
 492
 493	daddr->sin6_family = AF_INET6;
 494	daddr->sin6_addr = pki->ipi6_addr;
 495	daddr->sin6_scope_id = pki->ipi6_ifindex;
 496	return 1;
 497}
 498
 499/*
 500 * Copy the UDP datagram's destination address to the rqstp structure.
 501 * The 'destination' address in this case is the address to which the
 502 * peer sent the datagram, i.e. our local address. For multihomed
 503 * hosts, this can change from msg to msg. Note that only the IP
 504 * address changes, the port number should remain the same.
 505 */
 506static int svc_udp_get_dest_address(struct svc_rqst *rqstp,
 507				    struct cmsghdr *cmh)
 508{
 509	switch (cmh->cmsg_level) {
 510	case SOL_IP:
 511		return svc_udp_get_dest_address4(rqstp, cmh);
 512	case SOL_IPV6:
 513		return svc_udp_get_dest_address6(rqstp, cmh);
 514	}
 515
 516	return 0;
 517}
 518
 519/*
 520 * Receive a datagram from a UDP socket.
 521 */
 522static int svc_udp_recvfrom(struct svc_rqst *rqstp)
 523{
 524	struct svc_sock	*svsk =
 525		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
 526	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 527	struct sk_buff	*skb;
 528	union {
 529		struct cmsghdr	hdr;
 530		long		all[SVC_PKTINFO_SPACE / sizeof(long)];
 531	} buffer;
 532	struct cmsghdr *cmh = &buffer.hdr;
 533	struct msghdr msg = {
 534		.msg_name = svc_addr(rqstp),
 535		.msg_control = cmh,
 536		.msg_controllen = sizeof(buffer),
 537		.msg_flags = MSG_DONTWAIT,
 538	};
 539	size_t len;
 540	int err;
 541
 542	if (test_and_clear_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags))
 543	    /* udp sockets need large rcvbuf as all pending
 544	     * requests are still in that buffer.  sndbuf must
 545	     * also be large enough that there is enough space
 546	     * for one reply per thread.  We count all threads
 547	     * rather than threads in a particular pool, which
 548	     * provides an upper bound on the number of threads
 549	     * which will access the socket.
 550	     */
 551	    svc_sock_setbufsize(svsk->sk_sock,
 552				(serv->sv_nrthreads+3) * serv->sv_max_mesg,
 553				(serv->sv_nrthreads+3) * serv->sv_max_mesg);
 554
 555	clear_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 556	skb = NULL;
 557	err = kernel_recvmsg(svsk->sk_sock, &msg, NULL,
 558			     0, 0, MSG_PEEK | MSG_DONTWAIT);
 559	if (err >= 0)
 560		skb = skb_recv_udp(svsk->sk_sk, 0, 1, &err);
 561
 562	if (skb == NULL) {
 563		if (err != -EAGAIN) {
 564			/* possibly an icmp error */
 565			dprintk("svc: recvfrom returned error %d\n", -err);
 566			set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 567		}
 568		return 0;
 569	}
 570	len = svc_addr_len(svc_addr(rqstp));
 
 
 571	rqstp->rq_addrlen = len;
 572	if (skb->tstamp == 0) {
 573		skb->tstamp = ktime_get_real();
 574		/* Don't enable netstamp, sunrpc doesn't
 575		   need that much accuracy */
 576	}
 577	svsk->sk_sk->sk_stamp = skb->tstamp;
 578	set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags); /* there may be more data... */
 579
 580	len  = skb->len;
 581	rqstp->rq_arg.len = len;
 582
 583	rqstp->rq_prot = IPPROTO_UDP;
 584
 585	if (!svc_udp_get_dest_address(rqstp, cmh)) {
 586		net_warn_ratelimited("svc: received unknown control message %d/%d; dropping RPC reply datagram\n",
 587				     cmh->cmsg_level, cmh->cmsg_type);
 588		goto out_free;
 
 
 
 
 589	}
 590	rqstp->rq_daddrlen = svc_addr_len(svc_daddr(rqstp));
 591
 592	if (skb_is_nonlinear(skb)) {
 593		/* we have to copy */
 594		local_bh_disable();
 595		if (csum_partial_copy_to_xdr(&rqstp->rq_arg, skb)) {
 596			local_bh_enable();
 597			/* checksum error */
 598			goto out_free;
 
 599		}
 600		local_bh_enable();
 601		consume_skb(skb);
 602	} else {
 603		/* we can use it in-place */
 604		rqstp->rq_arg.head[0].iov_base = skb->data;
 
 605		rqstp->rq_arg.head[0].iov_len = len;
 606		if (skb_checksum_complete(skb))
 607			goto out_free;
 
 
 608		rqstp->rq_xprt_ctxt = skb;
 609	}
 610
 611	rqstp->rq_arg.page_base = 0;
 612	if (len <= rqstp->rq_arg.head[0].iov_len) {
 613		rqstp->rq_arg.head[0].iov_len = len;
 614		rqstp->rq_arg.page_len = 0;
 615		rqstp->rq_respages = rqstp->rq_pages+1;
 616	} else {
 617		rqstp->rq_arg.page_len = len - rqstp->rq_arg.head[0].iov_len;
 618		rqstp->rq_respages = rqstp->rq_pages + 1 +
 619			DIV_ROUND_UP(rqstp->rq_arg.page_len, PAGE_SIZE);
 620	}
 621	rqstp->rq_next_page = rqstp->rq_respages+1;
 622
 623	if (serv->sv_stats)
 624		serv->sv_stats->netudpcnt++;
 625
 626	return len;
 627out_free:
 628	kfree_skb(skb);
 629	return 0;
 630}
 631
 632static int
 633svc_udp_sendto(struct svc_rqst *rqstp)
 634{
 635	int		error;
 636
 637	error = svc_sendto(rqstp, &rqstp->rq_res);
 638	if (error == -ECONNREFUSED)
 639		/* ICMP error on earlier request. */
 640		error = svc_sendto(rqstp, &rqstp->rq_res);
 641
 642	return error;
 643}
 644
 645static void svc_udp_prep_reply_hdr(struct svc_rqst *rqstp)
 646{
 647}
 648
 649static int svc_udp_has_wspace(struct svc_xprt *xprt)
 650{
 651	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
 652	struct svc_serv	*serv = xprt->xpt_server;
 653	unsigned long required;
 654
 655	/*
 656	 * Set the SOCK_NOSPACE flag before checking the available
 657	 * sock space.
 658	 */
 659	set_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
 660	required = atomic_read(&svsk->sk_xprt.xpt_reserved) + serv->sv_max_mesg;
 661	if (required*2 > sock_wspace(svsk->sk_sk))
 662		return 0;
 663	clear_bit(SOCK_NOSPACE, &svsk->sk_sock->flags);
 664	return 1;
 665}
 666
 667static struct svc_xprt *svc_udp_accept(struct svc_xprt *xprt)
 668{
 669	BUG();
 670	return NULL;
 671}
 672
 673static void svc_udp_kill_temp_xprt(struct svc_xprt *xprt)
 674{
 675}
 676
 677static struct svc_xprt *svc_udp_create(struct svc_serv *serv,
 678				       struct net *net,
 679				       struct sockaddr *sa, int salen,
 680				       int flags)
 681{
 682	return svc_create_socket(serv, IPPROTO_UDP, net, sa, salen, flags);
 683}
 684
 685static const struct svc_xprt_ops svc_udp_ops = {
 686	.xpo_create = svc_udp_create,
 687	.xpo_recvfrom = svc_udp_recvfrom,
 688	.xpo_sendto = svc_udp_sendto,
 689	.xpo_release_rqst = svc_release_udp_skb,
 690	.xpo_detach = svc_sock_detach,
 691	.xpo_free = svc_sock_free,
 692	.xpo_prep_reply_hdr = svc_udp_prep_reply_hdr,
 693	.xpo_has_wspace = svc_udp_has_wspace,
 694	.xpo_accept = svc_udp_accept,
 695	.xpo_secure_port = svc_sock_secure_port,
 696	.xpo_kill_temp_xprt = svc_udp_kill_temp_xprt,
 697};
 698
 699static struct svc_xprt_class svc_udp_class = {
 700	.xcl_name = "udp",
 701	.xcl_owner = THIS_MODULE,
 702	.xcl_ops = &svc_udp_ops,
 703	.xcl_max_payload = RPCSVC_MAXPAYLOAD_UDP,
 704	.xcl_ident = XPRT_TRANSPORT_UDP,
 705};
 706
 707static void svc_udp_init(struct svc_sock *svsk, struct svc_serv *serv)
 708{
 709	int err, level, optname, one = 1;
 710
 711	svc_xprt_init(sock_net(svsk->sk_sock->sk), &svc_udp_class,
 712		      &svsk->sk_xprt, serv);
 713	clear_bit(XPT_CACHE_AUTH, &svsk->sk_xprt.xpt_flags);
 714	svsk->sk_sk->sk_data_ready = svc_data_ready;
 715	svsk->sk_sk->sk_write_space = svc_write_space;
 716
 717	/* initialise setting must have enough space to
 718	 * receive and respond to one request.
 719	 * svc_udp_recvfrom will re-adjust if necessary
 720	 */
 721	svc_sock_setbufsize(svsk->sk_sock,
 722			    3 * svsk->sk_xprt.xpt_server->sv_max_mesg,
 723			    3 * svsk->sk_xprt.xpt_server->sv_max_mesg);
 724
 725	/* data might have come in before data_ready set up */
 726	set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
 727	set_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags);
 728
 729	/* make sure we get destination address info */
 730	switch (svsk->sk_sk->sk_family) {
 731	case AF_INET:
 732		level = SOL_IP;
 733		optname = IP_PKTINFO;
 734		break;
 735	case AF_INET6:
 736		level = SOL_IPV6;
 737		optname = IPV6_RECVPKTINFO;
 738		break;
 739	default:
 740		BUG();
 741	}
 742	err = kernel_setsockopt(svsk->sk_sock, level, optname,
 743					(char *)&one, sizeof(one));
 744	dprintk("svc: kernel_setsockopt returned %d\n", err);
 745}
 746
 747/*
 748 * A data_ready event on a listening socket means there's a connection
 749 * pending. Do not use state_change as a substitute for it.
 750 */
 751static void svc_tcp_listen_data_ready(struct sock *sk)
 752{
 753	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 
 754
 755	dprintk("svc: socket %p TCP (listen) state change %d\n",
 756		sk, sk->sk_state);
 757
 758	if (svsk) {
 759		/* Refer to svc_setup_socket() for details. */
 760		rmb();
 761		svsk->sk_odata(sk);
 762	}
 763
 764	/*
 765	 * This callback may called twice when a new connection
 766	 * is established as a child socket inherits everything
 767	 * from a parent LISTEN socket.
 768	 * 1) data_ready method of the parent socket will be called
 769	 *    when one of child sockets become ESTABLISHED.
 770	 * 2) data_ready method of the child socket may be called
 771	 *    when it receives data before the socket is accepted.
 772	 * In case of 2, we should ignore it silently.
 773	 */
 774	if (sk->sk_state == TCP_LISTEN) {
 775		if (svsk) {
 776			set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 777			svc_xprt_enqueue(&svsk->sk_xprt);
 778		} else
 779			printk("svc: socket %p: no user data\n", sk);
 780	}
 
 
 
 
 781}
 782
 783/*
 784 * A state change on a connected socket means it's dying or dead.
 785 */
 786static void svc_tcp_state_change(struct sock *sk)
 787{
 788	struct svc_sock	*svsk = (struct svc_sock *)sk->sk_user_data;
 
 789
 790	dprintk("svc: socket %p TCP (connected) state change %d (svsk %p)\n",
 791		sk, sk->sk_state, sk->sk_user_data);
 792
 793	if (!svsk)
 794		printk("svc: socket %p: no user data\n", sk);
 795	else {
 796		/* Refer to svc_setup_socket() for details. */
 797		rmb();
 798		svsk->sk_ostate(sk);
 799		if (sk->sk_state != TCP_ESTABLISHED) {
 800			set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
 801			svc_xprt_enqueue(&svsk->sk_xprt);
 802		}
 
 
 
 
 
 
 
 
 
 
 803	}
 
 
 804}
 805
 806/*
 807 * Accept a TCP connection
 808 */
 809static struct svc_xprt *svc_tcp_accept(struct svc_xprt *xprt)
 810{
 811	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
 812	struct sockaddr_storage addr;
 813	struct sockaddr	*sin = (struct sockaddr *) &addr;
 814	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 815	struct socket	*sock = svsk->sk_sock;
 816	struct socket	*newsock;
 817	struct svc_sock	*newsvsk;
 818	int		err, slen;
 819	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
 820
 821	dprintk("svc: tcp_accept %p sock %p\n", svsk, sock);
 822	if (!sock)
 823		return NULL;
 824
 825	clear_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 826	err = kernel_accept(sock, &newsock, O_NONBLOCK);
 827	if (err < 0) {
 828		if (err == -ENOMEM)
 829			printk(KERN_WARNING "%s: no more sockets!\n",
 830			       serv->sv_name);
 831		else if (err != -EAGAIN)
 832			net_warn_ratelimited("%s: accept failed (err %d)!\n",
 833					     serv->sv_name, -err);
 834		return NULL;
 835	}
 836	set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
 837
 838	err = kernel_getpeername(newsock, sin);
 839	if (err < 0) {
 840		net_warn_ratelimited("%s: peername failed (err %d)!\n",
 841				     serv->sv_name, -err);
 
 842		goto failed;		/* aborted connection or whatever */
 843	}
 844	slen = err;
 845
 846	/* Ideally, we would want to reject connections from unauthorized
 847	 * hosts here, but when we get encryption, the IP of the host won't
 848	 * tell us anything.  For now just warn about unpriv connections.
 849	 */
 850	if (!svc_port_is_privileged(sin)) {
 851		dprintk("%s: connect from unprivileged port: %s\n",
 
 852			serv->sv_name,
 853			__svc_print_addr(sin, buf, sizeof(buf)));
 854	}
 855	dprintk("%s: connect from %s\n", serv->sv_name,
 856		__svc_print_addr(sin, buf, sizeof(buf)));
 857
 858	/* Reset the inherited callbacks before calling svc_setup_socket */
 859	newsock->sk->sk_state_change = svsk->sk_ostate;
 860	newsock->sk->sk_data_ready = svsk->sk_odata;
 861	newsock->sk->sk_write_space = svsk->sk_owspace;
 862
 863	/* make sure that a write doesn't block forever when
 864	 * low on memory
 865	 */
 866	newsock->sk->sk_sndtimeo = HZ*30;
 867
 868	newsvsk = svc_setup_socket(serv, newsock,
 869				 (SVC_SOCK_ANONYMOUS | SVC_SOCK_TEMPORARY));
 870	if (IS_ERR(newsvsk))
 871		goto failed;
 872	svc_xprt_set_remote(&newsvsk->sk_xprt, sin, slen);
 873	err = kernel_getsockname(newsock, sin);
 874	slen = err;
 875	if (unlikely(err < 0)) {
 876		dprintk("svc_tcp_accept: kernel_getsockname error %d\n", -err);
 877		slen = offsetof(struct sockaddr, sa_data);
 878	}
 879	svc_xprt_set_local(&newsvsk->sk_xprt, sin, slen);
 880
 881	if (sock_is_loopback(newsock->sk))
 882		set_bit(XPT_LOCAL, &newsvsk->sk_xprt.xpt_flags);
 883	else
 884		clear_bit(XPT_LOCAL, &newsvsk->sk_xprt.xpt_flags);
 885	if (serv->sv_stats)
 886		serv->sv_stats->nettcpconn++;
 887
 888	return &newsvsk->sk_xprt;
 889
 890failed:
 891	sock_release(newsock);
 892	return NULL;
 893}
 894
 895static unsigned int svc_tcp_restore_pages(struct svc_sock *svsk, struct svc_rqst *rqstp)
 896{
 897	unsigned int i, len, npages;
 898
 899	if (svsk->sk_datalen == 0)
 900		return 0;
 901	len = svsk->sk_datalen;
 902	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 903	for (i = 0; i < npages; i++) {
 904		if (rqstp->rq_pages[i] != NULL)
 905			put_page(rqstp->rq_pages[i]);
 906		BUG_ON(svsk->sk_pages[i] == NULL);
 907		rqstp->rq_pages[i] = svsk->sk_pages[i];
 908		svsk->sk_pages[i] = NULL;
 909	}
 910	rqstp->rq_arg.head[0].iov_base = page_address(rqstp->rq_pages[0]);
 911	return len;
 912}
 913
 914static void svc_tcp_save_pages(struct svc_sock *svsk, struct svc_rqst *rqstp)
 915{
 916	unsigned int i, len, npages;
 917
 918	if (svsk->sk_datalen == 0)
 919		return;
 920	len = svsk->sk_datalen;
 921	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 922	for (i = 0; i < npages; i++) {
 923		svsk->sk_pages[i] = rqstp->rq_pages[i];
 924		rqstp->rq_pages[i] = NULL;
 925	}
 926}
 927
 928static void svc_tcp_clear_pages(struct svc_sock *svsk)
 929{
 930	unsigned int i, len, npages;
 931
 932	if (svsk->sk_datalen == 0)
 933		goto out;
 934	len = svsk->sk_datalen;
 935	npages = (len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 936	for (i = 0; i < npages; i++) {
 937		if (svsk->sk_pages[i] == NULL) {
 938			WARN_ON_ONCE(1);
 939			continue;
 940		}
 941		put_page(svsk->sk_pages[i]);
 942		svsk->sk_pages[i] = NULL;
 943	}
 944out:
 945	svsk->sk_tcplen = 0;
 946	svsk->sk_datalen = 0;
 947}
 948
 949/*
 950 * Receive fragment record header.
 951 * If we haven't gotten the record length yet, get the next four bytes.
 
 
 952 */
 953static int svc_tcp_recv_record(struct svc_sock *svsk, struct svc_rqst *rqstp)
 954{
 955	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
 956	unsigned int want;
 957	int len;
 958
 
 
 959	if (svsk->sk_tcplen < sizeof(rpc_fraghdr)) {
 960		struct kvec	iov;
 961
 962		want = sizeof(rpc_fraghdr) - svsk->sk_tcplen;
 963		iov.iov_base = ((char *) &svsk->sk_reclen) + svsk->sk_tcplen;
 964		iov.iov_len  = want;
 965		if ((len = svc_recvfrom(rqstp, &iov, 1, want)) < 0)
 966			goto error;
 967		svsk->sk_tcplen += len;
 968
 969		if (len < want) {
 970			dprintk("svc: short recvfrom while reading record "
 971				"length (%d of %d)\n", len, want);
 972			return -EAGAIN;
 973		}
 974
 975		dprintk("svc: TCP record, %d bytes\n", svc_sock_reclen(svsk));
 976		if (svc_sock_reclen(svsk) + svsk->sk_datalen >
 977							serv->sv_max_mesg) {
 978			net_notice_ratelimited("RPC: fragment too large: %d\n",
 979					svc_sock_reclen(svsk));
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 980			goto err_delete;
 981		}
 982	}
 983
 984	return svc_sock_reclen(svsk);
 
 
 
 
 
 985error:
 986	dprintk("RPC: TCP recv_record got %d\n", len);
 987	return len;
 988err_delete:
 989	set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
 990	return -EAGAIN;
 991}
 992
 993static int receive_cb_reply(struct svc_sock *svsk, struct svc_rqst *rqstp)
 994{
 995	struct rpc_xprt *bc_xprt = svsk->sk_xprt.xpt_bc_xprt;
 996	struct rpc_rqst *req = NULL;
 997	struct kvec *src, *dst;
 998	__be32 *p = (__be32 *)rqstp->rq_arg.head[0].iov_base;
 999	__be32 xid;
1000	__be32 calldir;
1001
1002	xid = *p++;
1003	calldir = *p;
1004
1005	if (!bc_xprt)
 
 
 
 
 
 
 
 
1006		return -EAGAIN;
1007	spin_lock(&bc_xprt->recv_lock);
1008	req = xprt_lookup_rqst(bc_xprt, xid);
1009	if (!req)
1010		goto unlock_notfound;
1011
1012	memcpy(&req->rq_private_buf, &req->rq_rcv_buf, sizeof(struct xdr_buf));
1013	/*
1014	 * XXX!: cheating for now!  Only copying HEAD.
1015	 * But we know this is good enough for now (in fact, for any
1016	 * callback reply in the forseeable future).
1017	 */
1018	dst = &req->rq_private_buf.head[0];
1019	src = &rqstp->rq_arg.head[0];
1020	if (dst->iov_len < src->iov_len)
1021		goto unlock_eagain; /* whatever; just giving up. */
1022	memcpy(dst->iov_base, src->iov_base, src->iov_len);
1023	xprt_complete_rqst(req->rq_task, rqstp->rq_arg.len);
1024	rqstp->rq_arg.len = 0;
1025	spin_unlock(&bc_xprt->recv_lock);
1026	return 0;
1027unlock_notfound:
1028	printk(KERN_NOTICE
1029		"%s: Got unrecognized reply: "
1030		"calldir 0x%x xpt_bc_xprt %p xid %08x\n",
1031		__func__, ntohl(calldir),
1032		bc_xprt, ntohl(xid));
1033unlock_eagain:
1034	spin_unlock(&bc_xprt->recv_lock);
1035	return -EAGAIN;
1036}
1037
1038static int copy_pages_to_kvecs(struct kvec *vec, struct page **pages, int len)
1039{
1040	int i = 0;
1041	int t = 0;
1042
1043	while (t < len) {
1044		vec[i].iov_base = page_address(pages[i]);
1045		vec[i].iov_len = PAGE_SIZE;
1046		i++;
1047		t += PAGE_SIZE;
1048	}
1049	return i;
1050}
1051
1052static void svc_tcp_fragment_received(struct svc_sock *svsk)
1053{
1054	/* If we have more data, signal svc_xprt_enqueue() to try again */
1055	dprintk("svc: TCP %s record (%d bytes)\n",
1056		svc_sock_final_rec(svsk) ? "final" : "nonfinal",
1057		svc_sock_reclen(svsk));
1058	svsk->sk_tcplen = 0;
1059	svsk->sk_reclen = 0;
1060}
1061
1062/*
1063 * Receive data from a TCP socket.
1064 */
1065static int svc_tcp_recvfrom(struct svc_rqst *rqstp)
1066{
1067	struct svc_sock	*svsk =
1068		container_of(rqstp->rq_xprt, struct svc_sock, sk_xprt);
1069	struct svc_serv	*serv = svsk->sk_xprt.xpt_server;
1070	int		len;
1071	struct kvec *vec;
1072	unsigned int want, base;
1073	__be32 *p;
1074	__be32 calldir;
1075	int pnum;
1076
1077	dprintk("svc: tcp_recv %p data %d conn %d close %d\n",
1078		svsk, test_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags),
1079		test_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags),
1080		test_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags));
1081
1082	len = svc_tcp_recv_record(svsk, rqstp);
1083	if (len < 0)
1084		goto error;
1085
1086	base = svc_tcp_restore_pages(svsk, rqstp);
1087	want = svc_sock_reclen(svsk) - (svsk->sk_tcplen - sizeof(rpc_fraghdr));
1088
1089	vec = rqstp->rq_vec;
1090
1091	pnum = copy_pages_to_kvecs(&vec[0], &rqstp->rq_pages[0],
1092						svsk->sk_datalen + want);
1093
1094	rqstp->rq_respages = &rqstp->rq_pages[pnum];
1095	rqstp->rq_next_page = rqstp->rq_respages + 1;
1096
1097	/* Now receive data */
1098	len = svc_partial_recvfrom(rqstp, vec, pnum, want, base);
1099	if (len >= 0) {
1100		svsk->sk_tcplen += len;
1101		svsk->sk_datalen += len;
1102	}
1103	if (len != want || !svc_sock_final_rec(svsk)) {
1104		svc_tcp_save_pages(svsk, rqstp);
1105		if (len < 0 && len != -EAGAIN)
1106			goto err_delete;
1107		if (len == want)
1108			svc_tcp_fragment_received(svsk);
1109		else
1110			dprintk("svc: incomplete TCP record (%d of %d)\n",
1111				(int)(svsk->sk_tcplen - sizeof(rpc_fraghdr)),
1112				svc_sock_reclen(svsk));
1113		goto err_noclose;
1114	}
1115
1116	if (svsk->sk_datalen < 8) {
1117		svsk->sk_datalen = 0;
1118		goto err_delete; /* client is nuts. */
1119	}
1120
1121	rqstp->rq_arg.len = svsk->sk_datalen;
1122	rqstp->rq_arg.page_base = 0;
1123	if (rqstp->rq_arg.len <= rqstp->rq_arg.head[0].iov_len) {
1124		rqstp->rq_arg.head[0].iov_len = rqstp->rq_arg.len;
1125		rqstp->rq_arg.page_len = 0;
1126	} else
1127		rqstp->rq_arg.page_len = rqstp->rq_arg.len - rqstp->rq_arg.head[0].iov_len;
1128
1129	rqstp->rq_xprt_ctxt   = NULL;
1130	rqstp->rq_prot	      = IPPROTO_TCP;
1131	if (test_bit(XPT_LOCAL, &svsk->sk_xprt.xpt_flags))
1132		set_bit(RQ_LOCAL, &rqstp->rq_flags);
1133	else
1134		clear_bit(RQ_LOCAL, &rqstp->rq_flags);
1135
1136	p = (__be32 *)rqstp->rq_arg.head[0].iov_base;
1137	calldir = p[1];
1138	if (calldir)
1139		len = receive_cb_reply(svsk, rqstp);
1140
1141	/* Reset TCP read info */
1142	svsk->sk_datalen = 0;
1143	svc_tcp_fragment_received(svsk);
 
 
 
1144
1145	if (len < 0)
1146		goto error;
1147
1148	svc_xprt_copy_addrs(rqstp, &svsk->sk_xprt);
1149	if (serv->sv_stats)
1150		serv->sv_stats->nettcpcnt++;
1151
 
1152	return rqstp->rq_arg.len;
1153
1154error:
1155	if (len != -EAGAIN)
1156		goto err_delete;
1157	dprintk("RPC: TCP recvfrom got EAGAIN\n");
1158	return 0;
1159err_delete:
1160	printk(KERN_NOTICE "%s: recvfrom returned errno %d\n",
1161	       svsk->sk_xprt.xpt_server->sv_name, -len);
1162	set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
1163err_noclose:
1164	return 0;	/* record not complete */
1165}
1166
1167/*
1168 * Send out data on TCP socket.
1169 */
1170static int svc_tcp_sendto(struct svc_rqst *rqstp)
1171{
1172	struct xdr_buf	*xbufp = &rqstp->rq_res;
1173	int sent;
1174	__be32 reclen;
1175
1176	/* Set up the first element of the reply kvec.
1177	 * Any other kvecs that may be in use have been taken
1178	 * care of by the server implementation itself.
1179	 */
1180	reclen = htonl(0x80000000|((xbufp->len ) - 4));
1181	memcpy(xbufp->head[0].iov_base, &reclen, 4);
1182
1183	sent = svc_sendto(rqstp, &rqstp->rq_res);
1184	if (sent != xbufp->len) {
1185		printk(KERN_NOTICE
1186		       "rpc-srv/tcp: %s: %s %d when sending %d bytes "
1187		       "- shutting down socket\n",
1188		       rqstp->rq_xprt->xpt_server->sv_name,
1189		       (sent<0)?"got error":"sent only",
1190		       sent, xbufp->len);
1191		set_bit(XPT_CLOSE, &rqstp->rq_xprt->xpt_flags);
1192		svc_xprt_enqueue(rqstp->rq_xprt);
1193		sent = -EAGAIN;
1194	}
1195	return sent;
1196}
1197
1198/*
1199 * Setup response header. TCP has a 4B record length field.
1200 */
1201static void svc_tcp_prep_reply_hdr(struct svc_rqst *rqstp)
1202{
1203	struct kvec *resv = &rqstp->rq_res.head[0];
1204
1205	/* tcp needs a space for the record length... */
1206	svc_putnl(resv, 0);
1207}
1208
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1209static struct svc_xprt *svc_tcp_create(struct svc_serv *serv,
1210				       struct net *net,
1211				       struct sockaddr *sa, int salen,
1212				       int flags)
1213{
1214	return svc_create_socket(serv, IPPROTO_TCP, net, sa, salen, flags);
1215}
1216
1217#if defined(CONFIG_SUNRPC_BACKCHANNEL)
1218static struct svc_xprt *svc_bc_create_socket(struct svc_serv *, int,
1219					     struct net *, struct sockaddr *,
1220					     int, int);
1221static void svc_bc_sock_free(struct svc_xprt *xprt);
1222
1223static struct svc_xprt *svc_bc_tcp_create(struct svc_serv *serv,
1224				       struct net *net,
1225				       struct sockaddr *sa, int salen,
1226				       int flags)
1227{
1228	return svc_bc_create_socket(serv, IPPROTO_TCP, net, sa, salen, flags);
1229}
1230
1231static void svc_bc_tcp_sock_detach(struct svc_xprt *xprt)
1232{
1233}
1234
1235static const struct svc_xprt_ops svc_tcp_bc_ops = {
1236	.xpo_create = svc_bc_tcp_create,
1237	.xpo_detach = svc_bc_tcp_sock_detach,
1238	.xpo_free = svc_bc_sock_free,
1239	.xpo_prep_reply_hdr = svc_tcp_prep_reply_hdr,
1240	.xpo_secure_port = svc_sock_secure_port,
1241};
1242
1243static struct svc_xprt_class svc_tcp_bc_class = {
1244	.xcl_name = "tcp-bc",
1245	.xcl_owner = THIS_MODULE,
1246	.xcl_ops = &svc_tcp_bc_ops,
1247	.xcl_max_payload = RPCSVC_MAXPAYLOAD_TCP,
1248};
1249
1250static void svc_init_bc_xprt_sock(void)
1251{
1252	svc_reg_xprt_class(&svc_tcp_bc_class);
1253}
1254
1255static void svc_cleanup_bc_xprt_sock(void)
1256{
1257	svc_unreg_xprt_class(&svc_tcp_bc_class);
1258}
1259#else /* CONFIG_SUNRPC_BACKCHANNEL */
1260static void svc_init_bc_xprt_sock(void)
1261{
1262}
1263
1264static void svc_cleanup_bc_xprt_sock(void)
1265{
1266}
1267#endif /* CONFIG_SUNRPC_BACKCHANNEL */
1268
1269static const struct svc_xprt_ops svc_tcp_ops = {
1270	.xpo_create = svc_tcp_create,
1271	.xpo_recvfrom = svc_tcp_recvfrom,
1272	.xpo_sendto = svc_tcp_sendto,
1273	.xpo_release_rqst = svc_release_skb,
1274	.xpo_detach = svc_tcp_sock_detach,
1275	.xpo_free = svc_sock_free,
1276	.xpo_prep_reply_hdr = svc_tcp_prep_reply_hdr,
1277	.xpo_has_wspace = svc_tcp_has_wspace,
1278	.xpo_accept = svc_tcp_accept,
1279	.xpo_secure_port = svc_sock_secure_port,
1280	.xpo_kill_temp_xprt = svc_tcp_kill_temp_xprt,
1281};
1282
1283static struct svc_xprt_class svc_tcp_class = {
1284	.xcl_name = "tcp",
1285	.xcl_owner = THIS_MODULE,
1286	.xcl_ops = &svc_tcp_ops,
1287	.xcl_max_payload = RPCSVC_MAXPAYLOAD_TCP,
1288	.xcl_ident = XPRT_TRANSPORT_TCP,
1289};
1290
1291void svc_init_xprt_sock(void)
1292{
1293	svc_reg_xprt_class(&svc_tcp_class);
1294	svc_reg_xprt_class(&svc_udp_class);
1295	svc_init_bc_xprt_sock();
1296}
1297
1298void svc_cleanup_xprt_sock(void)
1299{
1300	svc_unreg_xprt_class(&svc_tcp_class);
1301	svc_unreg_xprt_class(&svc_udp_class);
1302	svc_cleanup_bc_xprt_sock();
1303}
1304
1305static void svc_tcp_init(struct svc_sock *svsk, struct svc_serv *serv)
1306{
1307	struct sock	*sk = svsk->sk_sk;
1308
1309	svc_xprt_init(sock_net(svsk->sk_sock->sk), &svc_tcp_class,
1310		      &svsk->sk_xprt, serv);
1311	set_bit(XPT_CACHE_AUTH, &svsk->sk_xprt.xpt_flags);
1312	set_bit(XPT_CONG_CTRL, &svsk->sk_xprt.xpt_flags);
1313	if (sk->sk_state == TCP_LISTEN) {
1314		dprintk("setting up TCP socket for listening\n");
1315		strcpy(svsk->sk_xprt.xpt_remotebuf, "listener");
1316		set_bit(XPT_LISTENER, &svsk->sk_xprt.xpt_flags);
1317		sk->sk_data_ready = svc_tcp_listen_data_ready;
1318		set_bit(XPT_CONN, &svsk->sk_xprt.xpt_flags);
1319	} else {
1320		dprintk("setting up TCP socket for reading\n");
1321		sk->sk_state_change = svc_tcp_state_change;
1322		sk->sk_data_ready = svc_data_ready;
1323		sk->sk_write_space = svc_write_space;
1324
1325		svsk->sk_reclen = 0;
1326		svsk->sk_tcplen = 0;
1327		svsk->sk_datalen = 0;
1328		memset(&svsk->sk_pages[0], 0, sizeof(svsk->sk_pages));
1329
1330		tcp_sk(sk)->nonagle |= TCP_NAGLE_OFF;
1331
1332		set_bit(XPT_DATA, &svsk->sk_xprt.xpt_flags);
1333		switch (sk->sk_state) {
1334		case TCP_SYN_RECV:
1335		case TCP_ESTABLISHED:
1336			break;
1337		default:
1338			set_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags);
1339		}
1340	}
1341}
1342
1343void svc_sock_update_bufs(struct svc_serv *serv)
1344{
1345	/*
1346	 * The number of server threads has changed. Update
1347	 * rcvbuf and sndbuf accordingly on all sockets
1348	 */
1349	struct svc_sock *svsk;
1350
1351	spin_lock_bh(&serv->sv_lock);
1352	list_for_each_entry(svsk, &serv->sv_permsocks, sk_xprt.xpt_list)
1353		set_bit(XPT_CHNGBUF, &svsk->sk_xprt.xpt_flags);
 
 
1354	spin_unlock_bh(&serv->sv_lock);
1355}
1356EXPORT_SYMBOL_GPL(svc_sock_update_bufs);
1357
1358/*
1359 * Initialize socket for RPC use and create svc_sock struct
 
1360 */
1361static struct svc_sock *svc_setup_socket(struct svc_serv *serv,
1362						struct socket *sock,
1363						int flags)
1364{
1365	struct svc_sock	*svsk;
1366	struct sock	*inet;
1367	int		pmap_register = !(flags & SVC_SOCK_ANONYMOUS);
1368	int		err = 0;
1369
1370	dprintk("svc: svc_setup_socket %p\n", sock);
1371	svsk = kzalloc(sizeof(*svsk), GFP_KERNEL);
1372	if (!svsk)
1373		return ERR_PTR(-ENOMEM);
 
1374
1375	inet = sock->sk;
1376
1377	/* Register socket with portmapper */
1378	if (pmap_register)
1379		err = svc_register(serv, sock_net(sock->sk), inet->sk_family,
1380				     inet->sk_protocol,
1381				     ntohs(inet_sk(inet)->inet_sport));
1382
1383	if (err < 0) {
1384		kfree(svsk);
1385		return ERR_PTR(err);
1386	}
1387
 
1388	svsk->sk_sock = sock;
1389	svsk->sk_sk = inet;
1390	svsk->sk_ostate = inet->sk_state_change;
1391	svsk->sk_odata = inet->sk_data_ready;
1392	svsk->sk_owspace = inet->sk_write_space;
1393	/*
1394	 * This barrier is necessary in order to prevent race condition
1395	 * with svc_data_ready(), svc_listen_data_ready() and others
1396	 * when calling callbacks above.
1397	 */
1398	wmb();
1399	inet->sk_user_data = svsk;
1400
1401	/* Initialize the socket */
1402	if (sock->type == SOCK_DGRAM)
1403		svc_udp_init(svsk, serv);
1404	else
 
 
 
 
 
1405		svc_tcp_init(svsk, serv);
 
1406
1407	dprintk("svc: svc_setup_socket created %p (inet %p), "
1408			"listen %d close %d\n",
1409			svsk, svsk->sk_sk,
1410			test_bit(XPT_LISTENER, &svsk->sk_xprt.xpt_flags),
1411			test_bit(XPT_CLOSE, &svsk->sk_xprt.xpt_flags));
1412
1413	return svsk;
1414}
1415
1416bool svc_alien_sock(struct net *net, int fd)
1417{
1418	int err;
1419	struct socket *sock = sockfd_lookup(fd, &err);
1420	bool ret = false;
1421
1422	if (!sock)
1423		goto out;
1424	if (sock_net(sock->sk) != net)
1425		ret = true;
1426	sockfd_put(sock);
1427out:
1428	return ret;
1429}
1430EXPORT_SYMBOL_GPL(svc_alien_sock);
1431
1432/**
1433 * svc_addsock - add a listener socket to an RPC service
1434 * @serv: pointer to RPC service to which to add a new listener
1435 * @fd: file descriptor of the new listener
1436 * @name_return: pointer to buffer to fill in with name of listener
1437 * @len: size of the buffer
1438 *
1439 * Fills in socket name and returns positive length of name if successful.
1440 * Name is terminated with '\n'.  On error, returns a negative errno
1441 * value.
1442 */
1443int svc_addsock(struct svc_serv *serv, const int fd, char *name_return,
1444		const size_t len)
1445{
1446	int err = 0;
1447	struct socket *so = sockfd_lookup(fd, &err);
1448	struct svc_sock *svsk = NULL;
1449	struct sockaddr_storage addr;
1450	struct sockaddr *sin = (struct sockaddr *)&addr;
1451	int salen;
1452
1453	if (!so)
1454		return err;
1455	err = -EAFNOSUPPORT;
1456	if ((so->sk->sk_family != PF_INET) && (so->sk->sk_family != PF_INET6))
1457		goto out;
1458	err =  -EPROTONOSUPPORT;
1459	if (so->sk->sk_protocol != IPPROTO_TCP &&
1460	    so->sk->sk_protocol != IPPROTO_UDP)
1461		goto out;
1462	err = -EISCONN;
1463	if (so->state > SS_UNCONNECTED)
1464		goto out;
1465	err = -ENOENT;
1466	if (!try_module_get(THIS_MODULE))
1467		goto out;
1468	svsk = svc_setup_socket(serv, so, SVC_SOCK_DEFAULTS);
1469	if (IS_ERR(svsk)) {
1470		module_put(THIS_MODULE);
1471		err = PTR_ERR(svsk);
1472		goto out;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1473	}
1474	salen = kernel_getsockname(svsk->sk_sock, sin);
1475	if (salen >= 0)
1476		svc_xprt_set_local(&svsk->sk_xprt, sin, salen);
1477	svc_add_new_perm_xprt(serv, &svsk->sk_xprt);
1478	return svc_one_sock_name(svsk, name_return, len);
1479out:
1480	sockfd_put(so);
1481	return err;
1482}
1483EXPORT_SYMBOL_GPL(svc_addsock);
1484
1485/*
1486 * Create socket for RPC service.
1487 */
1488static struct svc_xprt *svc_create_socket(struct svc_serv *serv,
1489					  int protocol,
1490					  struct net *net,
1491					  struct sockaddr *sin, int len,
1492					  int flags)
1493{
1494	struct svc_sock	*svsk;
1495	struct socket	*sock;
1496	int		error;
1497	int		type;
1498	struct sockaddr_storage addr;
1499	struct sockaddr *newsin = (struct sockaddr *)&addr;
1500	int		newlen;
1501	int		family;
1502	int		val;
1503	RPC_IFDEBUG(char buf[RPC_MAX_ADDRBUFLEN]);
1504
1505	dprintk("svc: svc_create_socket(%s, %d, %s)\n",
1506			serv->sv_program->pg_name, protocol,
1507			__svc_print_addr(sin, buf, sizeof(buf)));
1508
1509	if (protocol != IPPROTO_UDP && protocol != IPPROTO_TCP) {
1510		printk(KERN_WARNING "svc: only UDP and TCP "
1511				"sockets supported\n");
1512		return ERR_PTR(-EINVAL);
1513	}
1514
1515	type = (protocol == IPPROTO_UDP)? SOCK_DGRAM : SOCK_STREAM;
1516	switch (sin->sa_family) {
1517	case AF_INET6:
1518		family = PF_INET6;
1519		break;
1520	case AF_INET:
1521		family = PF_INET;
1522		break;
1523	default:
1524		return ERR_PTR(-EINVAL);
1525	}
1526
1527	error = __sock_create(net, family, type, protocol, &sock, 1);
1528	if (error < 0)
1529		return ERR_PTR(error);
1530
1531	svc_reclassify_socket(sock);
1532
1533	/*
1534	 * If this is an PF_INET6 listener, we want to avoid
1535	 * getting requests from IPv4 remotes.  Those should
1536	 * be shunted to a PF_INET listener via rpcbind.
1537	 */
1538	val = 1;
1539	if (family == PF_INET6)
1540		kernel_setsockopt(sock, SOL_IPV6, IPV6_V6ONLY,
1541					(char *)&val, sizeof(val));
1542
1543	if (type == SOCK_STREAM)
1544		sock->sk->sk_reuse = SK_CAN_REUSE; /* allow address reuse */
1545	error = kernel_bind(sock, sin, len);
1546	if (error < 0)
1547		goto bummer;
1548
1549	error = kernel_getsockname(sock, newsin);
 
1550	if (error < 0)
1551		goto bummer;
1552	newlen = error;
1553
1554	if (protocol == IPPROTO_TCP) {
1555		if ((error = kernel_listen(sock, 64)) < 0)
1556			goto bummer;
1557	}
1558
1559	svsk = svc_setup_socket(serv, sock, flags);
1560	if (IS_ERR(svsk)) {
1561		error = PTR_ERR(svsk);
1562		goto bummer;
1563	}
1564	svc_xprt_set_local(&svsk->sk_xprt, newsin, newlen);
1565	return (struct svc_xprt *)svsk;
1566bummer:
1567	dprintk("svc: svc_create_socket error = %d\n", -error);
1568	sock_release(sock);
1569	return ERR_PTR(error);
1570}
1571
1572/*
1573 * Detach the svc_sock from the socket so that no
1574 * more callbacks occur.
1575 */
1576static void svc_sock_detach(struct svc_xprt *xprt)
1577{
1578	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1579	struct sock *sk = svsk->sk_sk;
 
1580
1581	dprintk("svc: svc_sock_detach(%p)\n", svsk);
1582
1583	/* put back the old socket callbacks */
1584	lock_sock(sk);
1585	sk->sk_state_change = svsk->sk_ostate;
1586	sk->sk_data_ready = svsk->sk_odata;
1587	sk->sk_write_space = svsk->sk_owspace;
1588	sk->sk_user_data = NULL;
1589	release_sock(sk);
 
 
1590}
1591
1592/*
1593 * Disconnect the socket, and reset the callbacks
1594 */
1595static void svc_tcp_sock_detach(struct svc_xprt *xprt)
1596{
1597	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1598
1599	dprintk("svc: svc_tcp_sock_detach(%p)\n", svsk);
1600
1601	svc_sock_detach(xprt);
1602
1603	if (!test_bit(XPT_LISTENER, &xprt->xpt_flags)) {
1604		svc_tcp_clear_pages(svsk);
1605		kernel_sock_shutdown(svsk->sk_sock, SHUT_RDWR);
1606	}
1607}
1608
1609/*
1610 * Free the svc_sock's socket resources and the svc_sock itself.
1611 */
1612static void svc_sock_free(struct svc_xprt *xprt)
1613{
1614	struct svc_sock *svsk = container_of(xprt, struct svc_sock, sk_xprt);
1615	dprintk("svc: svc_sock_free(%p)\n", svsk);
1616
1617	if (svsk->sk_sock->file)
1618		sockfd_put(svsk->sk_sock);
1619	else
1620		sock_release(svsk->sk_sock);
1621	kfree(svsk);
1622}
1623
1624#if defined(CONFIG_SUNRPC_BACKCHANNEL)
1625/*
1626 * Create a back channel svc_xprt which shares the fore channel socket.
1627 */
1628static struct svc_xprt *svc_bc_create_socket(struct svc_serv *serv,
1629					     int protocol,
1630					     struct net *net,
1631					     struct sockaddr *sin, int len,
1632					     int flags)
1633{
1634	struct svc_sock *svsk;
1635	struct svc_xprt *xprt;
1636
1637	if (protocol != IPPROTO_TCP) {
1638		printk(KERN_WARNING "svc: only TCP sockets"
1639			" supported on shared back channel\n");
1640		return ERR_PTR(-EINVAL);
1641	}
1642
1643	svsk = kzalloc(sizeof(*svsk), GFP_KERNEL);
1644	if (!svsk)
1645		return ERR_PTR(-ENOMEM);
1646
1647	xprt = &svsk->sk_xprt;
1648	svc_xprt_init(net, &svc_tcp_bc_class, xprt, serv);
1649	set_bit(XPT_CONG_CTRL, &svsk->sk_xprt.xpt_flags);
1650
1651	serv->sv_bc_xprt = xprt;
1652
1653	return xprt;
1654}
1655
1656/*
1657 * Free a back channel svc_sock.
1658 */
1659static void svc_bc_sock_free(struct svc_xprt *xprt)
1660{
1661	if (xprt)
1662		kfree(container_of(xprt, struct svc_sock, sk_xprt));
1663}
1664#endif /* CONFIG_SUNRPC_BACKCHANNEL */