daemon.c

   1 /*
   2  * Copyright (C) 1997-2006 Andre Noll <maan@systemlinux.org>
   3  *
   4  *     This program is free software; you can redistribute it and/or modify
   5  *     it under the terms of the GNU General Public License as published by
   6  *     the Free Software Foundation; either version 2 of the License, or
   7  *     (at your option) any later version.
   8  *
   9  *     This program is distributed in the hope that it will be useful,
  10  *     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  *     GNU General Public License for more details.
  13  *
  14  *     You should have received a copy of the GNU General Public License
  15  *     along with this program; if not, write to the Free Software
  16  *     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  17  */
  18
  19 /** \file daemon.c some helpers for programs that detach from the console */
  20 #include "para.h"
  21 #include "daemon.h"
  22 #include <pwd.h>
  23
  24 /* getgrnam() */
  25 #include <sys/types.h>
  26 #include <grp.h>
  27
  28 #include "string.h"
  29
  30 /**
  31  * do the usual stuff to become a daemon
  32  *
  33  * Fork, become session leader, dup fd 0, 1, 2 to /dev/null.
  34  *
  35  * \sa fork(2), setsid(2), dup(2)
  36  */
  37 void daemon_init(void)
  38 {
  39         pid_t pid;
  40         int null;
  41
  42         PARA_INFO_LOG("%s", "daemonizing\n");
  43         if ((pid = fork()) < 0) {
  44                 PARA_EMERG_LOG("%s", "failed to init daemon\n");
  45                 exit(EXIT_FAILURE);
  46         } else if (pid)
  47                 exit(EXIT_SUCCESS); /* parent exits */
  48         /* child */
  49         setsid(); /* become session leader */
  50         chdir("/");
  51         umask(0);
  52
  53         null = open("/dev/null", O_RDONLY);
  54         if (null < 0)
  55                 exit(EXIT_FAILURE);
  56         dup2(null, STDIN_FILENO);
  57         dup2(null, STDOUT_FILENO);
  58         dup2(null, STDERR_FILENO);
  59         close(null);
  60 }
  61
  62 /**
  63  * fopen() a file in append mode
  64  *
  65  * \param logfile_name the name of the file to open
  66  *
  67  * Either calls exit() or returns a valid file handle.
  68  */
  69 FILE *open_log(const char *logfile_name)
  70 {
  71         FILE *logfile;
  72
  73         if (!logfile_name)
  74                 return NULL;
  75         if (!(logfile = fopen(logfile_name, "a"))) {
  76                 PARA_EMERG_LOG("can not open %s, uid: %d\n", logfile_name,
  77                         getuid());
  78                 exit(EXIT_FAILURE);
  79         }
  80         setlinebuf(logfile);
  81         return logfile;
  82 }
  83
  84 /**
  85  * close the log file of the daemon
  86  *
  87  * \param logfile the log file handle
  88  *
  89  * It's OK to call this with logfile == NULL
  90  */
  91 void close_log(FILE* logfile)
  92 {
  93         if (!logfile)
  94                 return;
  95         PARA_INFO_LOG("%s", "closing logfile\n");
  96         fclose(logfile);
  97 }
  98
  99 /**
 100  * log the startup message containing the paraslash version
 101  */
 102 void log_welcome(const char *whoami, int loglevel)
 103 {
 104         PARA_INFO_LOG("welcome to %s " PACKAGE_VERSION " ("BUILD_DATE")\n",
 105                 whoami);
 106         PARA_DEBUG_LOG("using loglevel %d\n", loglevel);
 107 }
 108
 109 /**
 110  * give up superuser privileges
 111  *
 112  * This function returns immediately if not invoked with EUID zero. Otherwise,
 113  * it tries to obtain the GID of \a groupname and the UID of \a username.  On
 114  * success, effective and real GID/UID and the saved set-group-ID/set-user-ID
 115  * are all set accordingly. On errors, an appropriate message is logged and exit()
 116  * is called to terminate the process.
 117  *
 118  * \sa getpwnam(3), getuid(2), setuid(2), getgrnam(2), setgid(2)
 119  */
 120 void para_drop_privileges(const char *username, const char *groupname)
 121 {
 122         struct passwd *p;
 123         char *tmp;
 124
 125         if (geteuid())
 126                 return;
 127         if (groupname) {
 128                 struct group *g = getgrnam(groupname);
 129                 if (!g) {
 130                         PARA_EMERG_LOG("failed to get group %s\n", groupname);
 131                         exit(EXIT_FAILURE);
 132                 }
 133                 if (setgid(g->gr_gid) < 0) {
 134                         PARA_EMERG_LOG("failed to set group id %d (%s)\n",
 135                                 g->gr_gid, strerror(errno));
 136                         exit(EXIT_FAILURE);
 137                 }
 138         }
 139         if (!username) {
 140                 PARA_EMERG_LOG("%s", "root privileges, but no user option given\n");
 141                 exit(EXIT_FAILURE);
 142         }
 143         tmp = para_strdup(username);
 144         p = getpwnam(tmp);
 145         free(tmp);
 146         if (!p) {
 147                 PARA_EMERG_LOG("%s", "no such user\n");
 148                 exit(EXIT_FAILURE);
 149         }
 150         PARA_INFO_LOG("%s", "dropping root privileges\n");
 151         setuid(p->pw_uid);
 152         PARA_DEBUG_LOG("uid: %d, euid: %d\n", getuid(), geteuid());
 153         setuid(p->pw_uid);
 154 }
 155
 156 /**
 157  * set/get the server uptime
 158  *
 159  * \param set_or_get chose one of the two modes
 160  *
 161  * This should be called at startup time with \a set_or_get equal to \p
 162  * UPTIME_SET which sets the uptime to zero.  Subsequent calls with \a
 163  * set_or_get equal to \p UPTIME_GET return the number of seconds ellapsed
 164  * since the last reset.
 165  *
 166  * \sa time(2), difftime(3)
 167  */
 168 time_t server_uptime(enum uptime set_or_get)
 169 {
 170         static time_t startuptime;
 171         time_t now;
 172
 173         if (set_or_get == UPTIME_SET) {
 174                 time(&startuptime);
 175                 return 0;
 176         }
 177         time(&now);
 178         return (time_t) difftime(now, startuptime);
 179 }
 180
 181 /**
 182  * construct string containing uptime
 183  *
 184  * The format of the returned string is "days:hours:minutes"
 185  *
 186  * \sa server_uptime
 187  */
 188 __malloc char *uptime_str(void)
 189 {
 190         time_t t = server_uptime(UPTIME_GET);
 191         return make_message("%li:%02li:%02li", t / 86400,
 192                 (t / 3600) % 24, (t / 60) % 60);
 193 }