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