utils/svcgssd/svcgssd.c

   1 /*
   2   gssd.c
   3
   4   Copyright (c) 2000 The Regents of the University of Michigan.
   5   All rights reserved.
   6
   7   Copyright (c) 2000 Dug Song <dugsong@UMICH.EDU>.
   8   Copyright (c) 2002 Andy Adamson <andros@UMICH.EDU>.
   9   Copyright (c) 2002 Marius Aamodt Eriksen <marius@UMICH.EDU>.
  10   Copyright (c) 2002 J. Bruce Fields <bfields@UMICH.EDU>.
  11   All rights reserved, all wrongs reversed.
  12
  13   Redistribution and use in source and binary forms, with or without
  14   modification, are permitted provided that the following conditions
  15   are met:
  16
  17   1. Redistributions of source code must retain the above copyright
  18      notice, this list of conditions and the following disclaimer.
  19   2. Redistributions in binary form must reproduce the above copyright
  20      notice, this list of conditions and the following disclaimer in the
  21      documentation and/or other materials provided with the distribution.
  22   3. Neither the name of the University nor the names of its
  23      contributors may be used to endorse or promote products derived
  24      from this software without specific prior written permission.
  25
  26   THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  27   WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  28   MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  29   DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  30   FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  31   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  32   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  33   BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  34   LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  35   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  36   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  37
  38 */
  39
  40 #include <sys/param.h>
  41 #include <sys/types.h>
  42 #include <sys/stat.h>
  43 #include <sys/socket.h>
  44 #include <rpc/rpc.h>
  45 #include <fcntl.h>
  46 #include <errno.h>
  47
  48
  49 #include <unistd.h>
  50 #include <err.h>
  51 #include <stdio.h>
  52 #include <stdlib.h>
  53 #include <string.h>
  54 #include <signal.h>
  55 #include "svcgssd.h"
  56 #include "gss_util.h"
  57 #include "err_util.h"
  58
  59 /*
  60  * mydaemon creates a pipe between the partent and child
  61  * process. The parent process will wait until the
  62  * child dies or writes a '1' on the pipe signaling
  63  * that it started successfully.
  64  */
  65 int pipefds[2] = { -1, -1};
  66
  67 static void
  68 mydaemon(int nochdir, int noclose)
  69 {
  70         int pid, status, tempfd, fdmax, filedes;
  71
  72         if (pipe(pipefds) < 0) {
  73                 printerr(1, "mydaemon: pipe() failed: errno %d (%s)\n",
  74                         errno, strerror(errno));
  75                 exit(1);
  76         }
  77         if ((pid = fork ()) < 0) {
  78                 printerr(1, "mydaemon: fork() failed: errno %d (%s)\n",
  79                         errno, strerror(errno));
  80                 exit(1);
  81         }
  82
  83         if (pid != 0) {
  84                 /*
  85                  * Parent. Wait for status from child.
  86                  */
  87                 close(pipefds[1]);
  88                 if (read(pipefds[0], &status, 1) != 1)
  89                         exit(1);
  90                 exit (0);
  91         }
  92         /* Child.       */
  93         close(pipefds[0]);
  94         setsid ();
  95         if (nochdir == 0) {
  96                 if (chdir ("/") == -1) {
  97                         printerr(1, "mydaemon: chdir() failed: errno %d (%s)\n",
  98                                 errno, strerror(errno));
  99                         exit(1);
 100                 }
 101         }
 102
 103         while (pipefds[1] <= 2) {
 104                 pipefds[1] = dup(pipefds[1]);
 105                 if (pipefds[1] < 0) {
 106                         printerr(1, "mydaemon: dup() failed: errno %d (%s)\n",
 107                                 errno, strerror(errno));
 108                         exit(1);
 109                 }
 110         }
 111
 112         if (noclose == 0) {
 113                 tempfd = open("/dev/null", O_RDWR);
 114                 close(0); dup2(tempfd, 0);
 115                 close(1); dup2(tempfd, 1);
 116                 close(2); dup2(tempfd, 2);
 117                 fdmax = sysconf (_SC_OPEN_MAX);
 118                 for (filedes = 3; filedes < fdmax; filedes++)
 119                         if (filedes != pipefds[1])
 120                                 close (filedes);
 121         }
 122
 123         return;
 124 }
 125
 126 static void
 127 release_parent()
 128 {
 129         int status;
 130
 131         if (pipefds[1] > 0) {
 132                 write(pipefds[1], &status, 1);
 133                 close(pipefds[1]);
 134                 pipefds[1] = -1;
 135         }
 136 }
 137
 138 void
 139 sig_die(int signal)
 140 {
 141         /* destroy krb5 machine creds */
 142         printerr(1, "exiting on signal %d\n", signal);
 143         exit(1);
 144 }
 145
 146 void
 147 sig_hup(int signal)
 148 {
 149         /* don't exit on SIGHUP */
 150         printerr(1, "Received SIGHUP... Ignoring.\n");
 151         return;
 152 }
 153
 154 static void
 155 usage(char *progname)
 156 {
 157         fprintf(stderr, "usage: %s [-n] [-f] [-v]\n",
 158                 progname);
 159         exit(1);
 160 }
 161
 162 int
 163 main(int argc, char *argv[])
 164 {
 165         int get_creds = 1;
 166         int fg = 0;
 167         int verbosity = 0;
 168         int opt;
 169         extern char *optarg;
 170         char *progname;
 171
 172         while ((opt = getopt(argc, argv, "fvnp:")) != -1) {
 173                 switch (opt) {
 174                         case 'f':
 175                                 fg = 1;
 176                                 break;
 177                         case 'n':
 178                                 get_creds = 0;
 179                                 break;
 180                         case 'v':
 181                                 verbosity++;
 182                                 break;
 183                         default:
 184                                 usage(argv[0]);
 185                                 break;
 186                 }
 187         }
 188
 189         if ((progname = strrchr(argv[0], '/')))
 190                 progname++;
 191         else
 192                 progname = argv[0];
 193
 194         initerr(progname, verbosity, fg);
 195
 196         if (!fg)
 197                 mydaemon(0, 0);
 198
 199         signal(SIGINT, sig_die);
 200         signal(SIGTERM, sig_die);
 201         signal(SIGHUP, sig_hup);
 202
 203         if (get_creds && !gssd_acquire_cred(GSSD_SERVICE_NAME)) {
 204                 printerr(0, "unable to obtain root (machine) credentials\n");
 205                 printerr(0, "do you have a keytab entry for "
 206                             "nfs/<your.host>@<YOUR.REALM> in "
 207                             "/etc/krb5.keytab?\n");
 208                 exit(1);
 209         }
 210
 211         if (!fg)
 212                 release_parent();
 213
 214         gssd_run();
 215         printerr(0, "gssd_run returned!\n");
 216         abort();
 217 }