1192811Srmacklem/*- 2192811Srmacklem * Copyright (c) 2009 Rick Macklem, University of Guelph 3192811Srmacklem * All rights reserved. 4192811Srmacklem * 5192811Srmacklem * Redistribution and use in source and binary forms, with or without 6192811Srmacklem * modification, are permitted provided that the following conditions 7192811Srmacklem * are met: 8192811Srmacklem * 1. Redistributions of source code must retain the above copyright 9192811Srmacklem * notice, this list of conditions and the following disclaimer. 10192811Srmacklem * 2. Redistributions in binary form must reproduce the above copyright 11192811Srmacklem * notice, this list of conditions and the following disclaimer in the 12192811Srmacklem * documentation and/or other materials provided with the distribution. 13192811Srmacklem * 14192811Srmacklem * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15192811Srmacklem * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16192811Srmacklem * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17192811Srmacklem * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18192811Srmacklem * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19192811Srmacklem * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20192811Srmacklem * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21192811Srmacklem * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22192811Srmacklem * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23192811Srmacklem * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24192811Srmacklem * SUCH DAMAGE. 25192811Srmacklem * 26192811Srmacklem */ 27192811Srmacklem 28192811Srmacklem#include <sys/cdefs.h> 29192811Srmacklem__FBSDID("$FreeBSD: releng/10.3/usr.sbin/nfscbd/nfscbd.c 241737 2012-10-19 14:49:42Z ed $"); 30192811Srmacklem 31192811Srmacklem#include <sys/param.h> 32192811Srmacklem#include <sys/ioctl.h> 33192811Srmacklem#include <sys/linker.h> 34192811Srmacklem#include <sys/module.h> 35192811Srmacklem#include <sys/mount.h> 36192811Srmacklem#include <sys/socket.h> 37192811Srmacklem#include <sys/socketvar.h> 38192811Srmacklem#include <sys/stat.h> 39192811Srmacklem#include <sys/ucred.h> 40192811Srmacklem#include <sys/uio.h> 41192811Srmacklem#include <sys/vnode.h> 42192811Srmacklem#include <sys/wait.h> 43192811Srmacklem 44192811Srmacklem#include <nfs/nfssvc.h> 45192811Srmacklem 46192811Srmacklem#include <rpc/rpc.h> 47192811Srmacklem 48194526Sstas#include <fs/nfs/rpcv2.h> 49192811Srmacklem#include <fs/nfs/nfsproto.h> 50192811Srmacklem#include <fs/nfs/nfskpiport.h> 51192811Srmacklem#include <fs/nfs/nfs.h> 52192811Srmacklem 53192811Srmacklem#include <err.h> 54192811Srmacklem#include <errno.h> 55192811Srmacklem#include <fcntl.h> 56192811Srmacklem#include <grp.h> 57192811Srmacklem#include <netdb.h> 58192811Srmacklem#include <pwd.h> 59192811Srmacklem#include <signal.h> 60192811Srmacklem#include <stdio.h> 61192811Srmacklem#include <stdlib.h> 62192811Srmacklem#include <string.h> 63192811Srmacklem#include <syslog.h> 64192811Srmacklem#include <unistd.h> 65192811Srmacklem 66192811Srmacklem/* Global defs */ 67192811Srmacklem#ifdef DEBUG 68192811Srmacklem#define syslog(e, s) fprintf(stderr,(s)) 69241737Sedstatic int debug = 1; 70192811Srmacklem#else 71241737Sedstatic int debug = 0; 72192811Srmacklem#endif 73192811Srmacklem 74241737Sedstatic pid_t children; 75192811Srmacklem 76193070Sdelphijstatic void nonfs(int); 77193070Sdelphijstatic void reapchild(int); 78193070Sdelphijstatic void usage(void); 79193070Sdelphijstatic void cleanup(int); 80193070Sdelphijstatic void child_cleanup(int); 81193070Sdelphijstatic void nfscbd_exit(int); 82193070Sdelphijstatic void killchildren(void); 83192811Srmacklem 84192811Srmacklem/* 85192811Srmacklem * Nfs callback server daemon. 86192811Srmacklem * 87192811Srmacklem * 1 - do file descriptor and signal cleanup 88192811Srmacklem * 2 - fork the nfscbd(s) 89192811Srmacklem * 4 - create callback server socket(s) 90192811Srmacklem * 5 - set up server socket for rpc 91192811Srmacklem * 92192811Srmacklem * For connectionless protocols, just pass the socket into the kernel via. 93192811Srmacklem * nfssvc(). 94192811Srmacklem * For connection based sockets, loop doing accepts. When you get a new 95192811Srmacklem * socket from accept, pass the msgsock into the kernel via. nfssvc(). 96192811Srmacklem */ 97192811Srmacklemint 98193070Sdelphijmain(int argc, char *argv[]) 99192811Srmacklem{ 100192811Srmacklem struct nfscbd_args nfscbdargs; 101192811Srmacklem struct nfsd_nfscbd_args nfscbdargs2; 102192811Srmacklem struct sockaddr_in inetaddr, inetpeer; 103192811Srmacklem fd_set ready, sockbits; 104193070Sdelphij int ch, connect_type_cnt, len, maxsock, msgsock, error; 105192811Srmacklem int nfssvc_flag, on, sock, tcpsock, ret, mustfreeai = 0; 106193070Sdelphij char *cp, princname[128]; 107192811Srmacklem char myname[MAXHOSTNAMELEN], *myfqdnname = NULL; 108192811Srmacklem struct addrinfo *aip, hints; 109192811Srmacklem pid_t pid; 110192811Srmacklem short myport = NFSV4_CBPORT; 111192811Srmacklem 112192811Srmacklem if (modfind("nfscl") < 0) { 113192811Srmacklem /* Not present in kernel, try loading it */ 114192811Srmacklem if (kldload("nfscl") < 0 || 115192811Srmacklem modfind("nfscl") < 0) 116192811Srmacklem errx(1, "nfscl is not available"); 117192811Srmacklem } 118192811Srmacklem /* 119192811Srmacklem * First, get our fully qualified host name, if possible. 120192811Srmacklem */ 121192811Srmacklem if (gethostname(myname, MAXHOSTNAMELEN) >= 0) { 122192811Srmacklem cp = strchr(myname, '.'); 123192811Srmacklem if (cp != NULL && *(cp + 1) != '\0') { 124192811Srmacklem cp = myname; 125192811Srmacklem } else { 126192811Srmacklem /* 127192811Srmacklem * No domain on myname, so try looking it up. 128192811Srmacklem */ 129192811Srmacklem cp = NULL; 130192811Srmacklem memset((void *)&hints, 0, sizeof (hints)); 131192811Srmacklem hints.ai_flags = AI_CANONNAME; 132192811Srmacklem error = getaddrinfo(myname, NULL, &hints, &aip); 133192811Srmacklem if (error == 0) { 134192811Srmacklem if (aip->ai_canonname != NULL && 135192811Srmacklem (cp = strchr(aip->ai_canonname, '.')) != NULL 136192811Srmacklem && *(cp + 1) != '\0') { 137192811Srmacklem cp = aip->ai_canonname; 138192811Srmacklem mustfreeai = 1; 139192811Srmacklem } else { 140192811Srmacklem freeaddrinfo(aip); 141192811Srmacklem } 142192811Srmacklem } 143192811Srmacklem } 144192811Srmacklem if (cp == NULL) 145192811Srmacklem warnx("Can't get fully qualified host name"); 146192811Srmacklem myfqdnname = cp; 147192811Srmacklem } 148192811Srmacklem 149192811Srmacklem princname[0] = '\0'; 150192811Srmacklem#define GETOPT "p:P:" 151192811Srmacklem#define USAGE "[ -p port_num ] [ -P client_principal ]" 152192811Srmacklem while ((ch = getopt(argc, argv, GETOPT)) != -1) 153192811Srmacklem switch (ch) { 154192811Srmacklem case 'p': 155192811Srmacklem myport = atoi(optarg); 156192811Srmacklem if (myport < 1) { 157192811Srmacklem warnx("port# non-positive, reset to %d", 158192811Srmacklem NFSV4_CBPORT); 159192811Srmacklem myport = NFSV4_CBPORT; 160192811Srmacklem } 161192811Srmacklem break; 162192811Srmacklem case 'P': 163192811Srmacklem cp = optarg; 164192811Srmacklem if (cp != NULL && strlen(cp) > 0 && 165192811Srmacklem strlen(cp) < sizeof (princname)) { 166192811Srmacklem if (strchr(cp, '@') == NULL && 167192811Srmacklem myfqdnname != NULL) 168192811Srmacklem snprintf(princname, sizeof (princname), 169192811Srmacklem "%s@%s", cp, myfqdnname); 170192811Srmacklem else 171192811Srmacklem strlcpy(princname, cp, 172192811Srmacklem sizeof (princname)); 173192811Srmacklem } else { 174192811Srmacklem warnx("client princ invalid. ignored\n"); 175192811Srmacklem } 176192811Srmacklem break; 177192811Srmacklem default: 178192811Srmacklem case '?': 179192811Srmacklem usage(); 180192811Srmacklem }; 181192811Srmacklem argv += optind; 182192811Srmacklem argc -= optind; 183192811Srmacklem 184192811Srmacklem if (argc > 0) 185192811Srmacklem usage(); 186192811Srmacklem 187192811Srmacklem if (mustfreeai) 188192811Srmacklem freeaddrinfo(aip); 189192811Srmacklem nfscbdargs2.principal = (const char *)princname; 190192811Srmacklem if (debug == 0) { 191192811Srmacklem daemon(0, 0); 192192811Srmacklem (void)signal(SIGTERM, SIG_IGN); 193192811Srmacklem (void)signal(SIGHUP, SIG_IGN); 194192811Srmacklem (void)signal(SIGINT, SIG_IGN); 195192811Srmacklem (void)signal(SIGQUIT, SIG_IGN); 196192811Srmacklem } 197192811Srmacklem (void)signal(SIGSYS, nonfs); 198192811Srmacklem (void)signal(SIGCHLD, reapchild); 199192811Srmacklem 200192811Srmacklem openlog("nfscbd:", LOG_PID, LOG_DAEMON); 201192811Srmacklem 202192811Srmacklem pid = fork(); 203192811Srmacklem if (pid < 0) { 204192811Srmacklem syslog(LOG_ERR, "fork: %m"); 205192811Srmacklem nfscbd_exit(1); 206192811Srmacklem } else if (pid > 0) { 207192811Srmacklem children = pid; 208192811Srmacklem } else { 209192811Srmacklem (void)signal(SIGUSR1, child_cleanup); 210192811Srmacklem setproctitle("server"); 211192811Srmacklem nfssvc_flag = NFSSVC_NFSCBD; 212192811Srmacklem if (nfssvc(nfssvc_flag, &nfscbdargs2) < 0) { 213192811Srmacklem syslog(LOG_ERR, "nfssvc: %m"); 214192811Srmacklem nfscbd_exit(1); 215192811Srmacklem } 216192811Srmacklem exit(0); 217192811Srmacklem } 218192811Srmacklem (void)signal(SIGUSR1, cleanup); 219192811Srmacklem 220192811Srmacklem if ((sock = socket(AF_INET, SOCK_DGRAM, 0)) < 0) { 221192811Srmacklem syslog(LOG_ERR, "can't create udp socket"); 222192811Srmacklem nfscbd_exit(1); 223192811Srmacklem } 224192811Srmacklem memset(&inetaddr, 0, sizeof inetaddr); 225192811Srmacklem inetaddr.sin_family = AF_INET; 226192811Srmacklem inetaddr.sin_addr.s_addr = INADDR_ANY; 227192811Srmacklem inetaddr.sin_port = htons(myport); 228192811Srmacklem inetaddr.sin_len = sizeof(inetaddr); 229192811Srmacklem ret = bind(sock, (struct sockaddr *)&inetaddr, sizeof(inetaddr)); 230192811Srmacklem /* If bind() fails, this is a restart, so just skip UDP. */ 231192811Srmacklem if (ret == 0) { 232192811Srmacklem len = sizeof(inetaddr); 233192811Srmacklem if (getsockname(sock, (struct sockaddr *)&inetaddr, &len) < 0){ 234192811Srmacklem syslog(LOG_ERR, "can't get bound addr"); 235192811Srmacklem nfscbd_exit(1); 236192811Srmacklem } 237192811Srmacklem nfscbdargs.port = ntohs(inetaddr.sin_port); 238192811Srmacklem if (nfscbdargs.port != myport) { 239192811Srmacklem syslog(LOG_ERR, "BAD PORT#"); 240192811Srmacklem nfscbd_exit(1); 241192811Srmacklem } 242192811Srmacklem nfscbdargs.sock = sock; 243192811Srmacklem nfscbdargs.name = NULL; 244192811Srmacklem nfscbdargs.namelen = 0; 245192811Srmacklem if (nfssvc(NFSSVC_CBADDSOCK, &nfscbdargs) < 0) { 246192811Srmacklem syslog(LOG_ERR, "can't Add UDP socket"); 247192811Srmacklem nfscbd_exit(1); 248192811Srmacklem } 249192811Srmacklem } 250192811Srmacklem (void)close(sock); 251192811Srmacklem 252192811Srmacklem /* Now set up the master server socket waiting for tcp connections. */ 253192811Srmacklem on = 1; 254192811Srmacklem FD_ZERO(&sockbits); 255192811Srmacklem connect_type_cnt = 0; 256192811Srmacklem if ((tcpsock = socket(AF_INET, SOCK_STREAM, 0)) < 0) { 257192811Srmacklem syslog(LOG_ERR, "can't create tcp socket"); 258192811Srmacklem nfscbd_exit(1); 259192811Srmacklem } 260192811Srmacklem if (setsockopt(tcpsock, 261192811Srmacklem SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on)) < 0) 262192811Srmacklem syslog(LOG_ERR, "setsockopt SO_REUSEADDR: %m"); 263192811Srmacklem /* sin_port is already set */ 264192811Srmacklem inetaddr.sin_family = AF_INET; 265192811Srmacklem inetaddr.sin_addr.s_addr = INADDR_ANY; 266192811Srmacklem inetaddr.sin_port = htons(myport); 267192811Srmacklem inetaddr.sin_len = sizeof(inetaddr); 268192811Srmacklem if (bind(tcpsock, 269192811Srmacklem (struct sockaddr *)&inetaddr, sizeof (inetaddr)) < 0) { 270192811Srmacklem syslog(LOG_ERR, "can't bind tcp addr"); 271192811Srmacklem nfscbd_exit(1); 272192811Srmacklem } 273192811Srmacklem if (listen(tcpsock, 5) < 0) { 274192811Srmacklem syslog(LOG_ERR, "listen failed"); 275192811Srmacklem nfscbd_exit(1); 276192811Srmacklem } 277192811Srmacklem FD_SET(tcpsock, &sockbits); 278192811Srmacklem maxsock = tcpsock; 279192811Srmacklem connect_type_cnt++; 280192811Srmacklem 281192811Srmacklem setproctitle("master"); 282192811Srmacklem 283192811Srmacklem /* 284192811Srmacklem * Loop forever accepting connections and passing the sockets 285192811Srmacklem * into the kernel for the mounts. 286192811Srmacklem */ 287192811Srmacklem for (;;) { 288192811Srmacklem ready = sockbits; 289192811Srmacklem if (connect_type_cnt > 1) { 290192811Srmacklem if (select(maxsock + 1, 291192811Srmacklem &ready, NULL, NULL, NULL) < 1) { 292192811Srmacklem syslog(LOG_ERR, "select failed: %m"); 293192811Srmacklem nfscbd_exit(1); 294192811Srmacklem } 295192811Srmacklem } 296192811Srmacklem if (FD_ISSET(tcpsock, &ready)) { 297192811Srmacklem len = sizeof(inetpeer); 298192811Srmacklem if ((msgsock = accept(tcpsock, 299192811Srmacklem (struct sockaddr *)&inetpeer, &len)) < 0) { 300192811Srmacklem syslog(LOG_ERR, "accept failed: %m"); 301192811Srmacklem nfscbd_exit(1); 302192811Srmacklem } 303192811Srmacklem memset(inetpeer.sin_zero, 0, 304192811Srmacklem sizeof (inetpeer.sin_zero)); 305192811Srmacklem if (setsockopt(msgsock, SOL_SOCKET, 306192811Srmacklem SO_KEEPALIVE, (char *)&on, sizeof(on)) < 0) 307192811Srmacklem syslog(LOG_ERR, 308192811Srmacklem "setsockopt SO_KEEPALIVE: %m"); 309192811Srmacklem nfscbdargs.sock = msgsock; 310192811Srmacklem nfscbdargs.name = (caddr_t)&inetpeer; 311192811Srmacklem nfscbdargs.namelen = sizeof(inetpeer); 312192811Srmacklem nfssvc(NFSSVC_CBADDSOCK, &nfscbdargs); 313192811Srmacklem (void)close(msgsock); 314192811Srmacklem } 315192811Srmacklem } 316192811Srmacklem} 317192811Srmacklem 318193070Sdelphijstatic void 319192811Srmacklemusage(void) 320192811Srmacklem{ 321192811Srmacklem 322192811Srmacklem errx(1, "usage: nfscbd %s", USAGE); 323192811Srmacklem} 324192811Srmacklem 325193070Sdelphijstatic void 326193070Sdelphijnonfs(int signo __unused) 327192811Srmacklem{ 328192811Srmacklem syslog(LOG_ERR, "missing system call: NFS not available"); 329192811Srmacklem} 330192811Srmacklem 331193070Sdelphijstatic void 332193070Sdelphijreapchild(int signo __unused) 333192811Srmacklem{ 334192811Srmacklem pid_t pid; 335192811Srmacklem 336192811Srmacklem while ((pid = wait3(NULL, WNOHANG, NULL)) > 0) { 337192811Srmacklem if (pid == children) 338192811Srmacklem children = -1; 339192811Srmacklem } 340192811Srmacklem} 341192811Srmacklem 342193070Sdelphijstatic void 343192811Srmacklemkillchildren(void) 344192811Srmacklem{ 345192811Srmacklem 346192811Srmacklem if (children > 0) 347192811Srmacklem kill(children, SIGKILL); 348192811Srmacklem} 349192811Srmacklem 350192811Srmacklem/* 351192811Srmacklem * Cleanup master after SIGUSR1. 352192811Srmacklem */ 353193070Sdelphijstatic void 354193070Sdelphijcleanup(int signo __unused) 355192811Srmacklem{ 356192811Srmacklem nfscbd_exit(0); 357192811Srmacklem} 358192811Srmacklem 359192811Srmacklem/* 360192811Srmacklem * Cleanup child after SIGUSR1. 361192811Srmacklem */ 362193070Sdelphijstatic void 363193070Sdelphijchild_cleanup(int signo __unused) 364192811Srmacklem{ 365192811Srmacklem exit(0); 366192811Srmacklem} 367192811Srmacklem 368193070Sdelphijstatic void 369193070Sdelphijnfscbd_exit(int status __unused) 370192811Srmacklem{ 371192811Srmacklem killchildren(); 372192811Srmacklem exit(status); 373192811Srmacklem} 374