1 /* $NetBSD: lockd.c,v 1.7 2000/08/12 18:08:44 thorpej Exp $ */ 2 /* $FreeBSD$ */ 3 4 /* 5 * Copyright (c) 1995 6 * A.R. Gordon (andrew.gordon@net-tel.co.uk). All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed for the FreeBSD project 19 * 4. Neither the name of the author nor the names of any co-contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY ANDREW GORDON AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 * 35 */ 36 37 #include <sys/cdefs.h> 38 #ifndef lint 39 __RCSID("$NetBSD: lockd.c,v 1.7 2000/08/12 18:08:44 thorpej Exp $"); 40 #endif 41 42 /* 43 * main() function for NFS lock daemon. Most of the code in this 44 * file was generated by running rpcgen /usr/include/rpcsvc/nlm_prot.x. 45 * 46 * The actual program logic is in the file lock_proc.c 47 */ 48 49 #include <sys/types.h> 50 #include <sys/socket.h> 51 52 #include <err.h> 53 #include <stdio.h> 54 #include <stdlib.h> 55 #include <errno.h> 56 #include <syslog.h> 57 #include <signal.h> 58 #include <string.h> 59 #include <unistd.h> 60 #include <libutil.h> 61 #include <netconfig.h> 62 63 #include <rpc/rpc.h> 64 #include <rpc/rpc_com.h> 65 #include <rpcsvc/sm_inter.h> 66 67 #include "lockd.h" 68 #include <rpcsvc/nlm_prot.h> 69 70 int debug_level = 0; /* 0 = no debugging syslog() calls */ 71 int _rpcsvcdirty = 0; 72 73 int grace_expired; 74 int nsm_state; 75 pid_t client_pid; 76 struct mon mon_host; 77 78 void init_nsm(void); 79 void nlm_prog_0(struct svc_req *, SVCXPRT *); 80 void nlm_prog_1(struct svc_req *, SVCXPRT *); 81 void nlm_prog_3(struct svc_req *, SVCXPRT *); 82 void nlm_prog_4(struct svc_req *, SVCXPRT *); 83 void usage(void); 84 85 void sigalarm_handler(void); 86 87 const char *transports[] = { "udp", "tcp", "udp6", "tcp6" }; 88 89 int 90 main(argc, argv) 91 int argc; 92 char **argv; 93 { 94 SVCXPRT *transp; 95 int ch, i, maxindex, s; 96 struct sigaction sigalarm; 97 int grace_period = 30; 98 struct netconfig *nconf; 99 int maxrec = RPC_MAXDATASIZE; 100 101 while ((ch = getopt(argc, argv, "d:g:")) != (-1)) { 102 switch (ch) { 103 case 'd': 104 debug_level = atoi(optarg); 105 if (!debug_level) { 106 usage(); 107 /* NOTREACHED */ 108 } 109 break; 110 case 'g': 111 grace_period = atoi(optarg); 112 if (!grace_period) { 113 usage(); 114 /* NOTREACHED */ 115 } 116 break; 117 default: 118 case '?': 119 usage(); 120 /* NOTREACHED */ 121 } 122 } 123 if (geteuid()) { /* This command allowed only to root */ 124 fprintf(stderr, "Sorry. You are not superuser\n"); 125 exit(1); 126 } 127 128 (void)rpcb_unset(NLM_PROG, NLM_SM, NULL); 129 (void)rpcb_unset(NLM_PROG, NLM_VERS, NULL); 130 (void)rpcb_unset(NLM_PROG, NLM_VERSX, NULL); 131 (void)rpcb_unset(NLM_PROG, NLM_VERS4, NULL); 132 133 /* 134 * Check if IPv6 support is present. 135 */ 136 s = socket(AF_INET6, SOCK_DGRAM, IPPROTO_UDP); 137 if (s < 0) 138 maxindex = 2; 139 else { 140 close(s); 141 maxindex = 4; 142 } 143 144 rpc_control(RPC_SVC_CONNMAXREC_SET, &maxrec); 145 146 for (i = 0; i < maxindex; i++) { 147 nconf = getnetconfigent(transports[i]); 148 if (nconf == NULL) 149 errx(1, "cannot get %s netconf: %s.", transports[i], 150 nc_sperror()); 151 152 transp = svc_tli_create(RPC_ANYFD, nconf, NULL, 153 RPC_MAXDATASIZE, RPC_MAXDATASIZE); 154 if (transp == NULL) { 155 errx(1, "cannot create %s service.", transports[i]); 156 /* NOTREACHED */ 157 } 158 if (!svc_reg(transp, NLM_PROG, NLM_SM, nlm_prog_0, nconf)) { 159 errx(1, "unable to register (NLM_PROG, NLM_SM, %s)", 160 transports[i]); 161 /* NOTREACHED */ 162 } 163 if (!svc_reg(transp, NLM_PROG, NLM_VERS, nlm_prog_1, nconf)) { 164 errx(1, "unable to register (NLM_PROG, NLM_VERS, %s)", 165 transports[i]); 166 /* NOTREACHED */ 167 } 168 if (!svc_reg(transp, NLM_PROG, NLM_VERSX, nlm_prog_3, nconf)) { 169 errx(1, "unable to register (NLM_PROG, NLM_VERSX, %s)", 170 transports[i]); 171 /* NOTREACHED */ 172 } 173 if (!svc_reg(transp, NLM_PROG, NLM_VERS4, nlm_prog_4, nconf)) { 174 errx(1, "unable to register (NLM_PROG, NLM_VERS4, %s)", 175 transports[i]); 176 /* NOTREACHED */ 177 } 178 freenetconfigent(nconf); 179 } 180 181 /* 182 * Note that it is NOT sensible to run this program from inetd - the 183 * protocol assumes that it will run immediately at boot time. 184 */ 185 if (daemon(0, debug_level > 0)) { 186 err(1, "cannot fork"); 187 /* NOTREACHED */ 188 } 189 190 openlog("rpc.lockd", 0, LOG_DAEMON); 191 if (debug_level) 192 syslog(LOG_INFO, "Starting, debug level %d", debug_level); 193 else 194 syslog(LOG_INFO, "Starting"); 195 196 sigalarm.sa_handler = (sig_t) sigalarm_handler; 197 sigemptyset(&sigalarm.sa_mask); 198 sigalarm.sa_flags = SA_RESETHAND; /* should only happen once */ 199 sigalarm.sa_flags |= SA_RESTART; 200 if (sigaction(SIGALRM, &sigalarm, NULL) != 0) { 201 syslog(LOG_WARNING, "sigaction(SIGALRM) failed: %s", 202 strerror(errno)); 203 exit(1); 204 } 205 grace_expired = 0; 206 alarm(grace_period); 207 208 init_nsm(); 209 210 client_pid = client_request(); 211 212 svc_run(); /* Should never return */ 213 exit(1); 214 } 215 216 void 217 sigalarm_handler(void) 218 { 219 220 grace_expired = 1; 221 } 222 223 void 224 usage() 225 { 226 errx(1, "usage: rpc.lockd [-d <debuglevel>] [-g <grace period>]"); 227 } 228 229 /* 230 * init_nsm -- 231 * Reset the NSM state-of-the-world and acquire its state. 232 */ 233 void 234 init_nsm(void) 235 { 236 enum clnt_stat ret; 237 my_id id; 238 sm_stat stat; 239 char name[] = "NFS NLM"; 240 char localhost[] = "localhost"; 241 242 /* 243 * !!! 244 * The my_id structure isn't used by the SM_UNMON_ALL call, as far 245 * as I know. Leave it empty for now. 246 */ 247 memset(&id, 0, sizeof(id)); 248 id.my_name = name; 249 250 /* 251 * !!! 252 * The statd program must already be registered when lockd runs. 253 */ 254 do { 255 ret = callrpc("localhost", SM_PROG, SM_VERS, SM_UNMON_ALL, 256 (xdrproc_t)xdr_my_id, &id, (xdrproc_t)xdr_sm_stat, &stat); 257 if (ret == RPC_PROGUNAVAIL) { 258 syslog(LOG_WARNING, "%lu %s", SM_PROG, 259 clnt_sperrno(ret)); 260 sleep(2); 261 continue; 262 } 263 break; 264 } while (0); 265 266 if (ret != 0) { 267 syslog(LOG_ERR, "%lu %s", SM_PROG, clnt_sperrno(ret)); 268 exit(1); 269 } 270 271 nsm_state = stat.state; 272 273 /* setup constant data for SM_MON calls */ 274 mon_host.mon_id.my_id.my_name = localhost; 275 mon_host.mon_id.my_id.my_prog = NLM_PROG; 276 mon_host.mon_id.my_id.my_vers = NLM_SM; 277 mon_host.mon_id.my_id.my_proc = NLM_SM_NOTIFY; /* bsdi addition */ 278 } 279