tinc-vpn.org Git - tinc/blob - src/dropin.c

   1 /*
   2     dropin.c -- a set of drop-in replacements for libc functions
   3     Copyright (C) 2000-2005 Ivo Timmermans,
   4                   2000-2018 Guus Sliepen <guus@tinc-vpn.org>
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License along
  17     with this program; if not, write to the Free Software Foundation, Inc.,
  18     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19 */
  20
  21 #include "system.h"
  22
  23 #include "xalloc.h"
  24
  25 #ifndef HAVE_DAEMON
  26 /*
  27   Replacement for the daemon() function.
  28
  29   The daemon() function is for programs wishing to detach themselves
  30   from the controlling terminal and run in the background as system
  31   daemons.
  32
  33   Unless the argument nochdir is non-zero, daemon() changes the
  34   current working directory to the root (``/'').
  35
  36   Unless the argument noclose is non-zero, daemon() will redirect
  37   standard input, standard output and standard error to /dev/null.
  38 */
  39 int daemon(int nochdir, int noclose) {
  40 #ifdef HAVE_FORK
  41         pid_t pid;
  42         int fd;
  43
  44         pid = fork();
  45
  46         /* Check if forking failed */
  47         if(pid < 0) {
  48                 perror("fork");
  49                 exit(-1);
  50         }
  51
  52         /* If we are the parent, terminate */
  53         if(pid) {
  54                 exit(0);
  55         }
  56
  57         /* Detach by becoming the new process group leader */
  58         if(setsid() < 0) {
  59                 perror("setsid");
  60                 return -1;
  61         }
  62
  63         /* Change working directory to the root (to avoid keeping mount
  64            points busy) */
  65         if(!nochdir) {
  66                 chdir("/");
  67         }
  68
  69         /* Redirect stdin/out/err to /dev/null */
  70         if(!noclose) {
  71                 fd = open("/dev/null", O_RDWR);
  72
  73                 if(fd < 0) {
  74                         perror("opening /dev/null");
  75                         return -1;
  76                 } else {
  77                         dup2(fd, 0);
  78                         dup2(fd, 1);
  79                         dup2(fd, 2);
  80                 }
  81         }
  82
  83         return 0;
  84 #else
  85         (void)nochdir;
  86         (void)noclose;
  87         return -1;
  88 #endif
  89 }
  90 #endif
  91
  92 #ifndef HAVE_ASPRINTF
  93 int asprintf(char **buf, const char *fmt, ...) {
  94         int result;
  95         va_list ap;
  96         va_start(ap, fmt);
  97         result = vasprintf(buf, fmt, ap);
  98         va_end(ap);
  99         return result;
 100 }
 101
 102 int vasprintf(char **buf, const char *fmt, va_list ap) {
 103         int status;
 104         va_list aq;
 105         int len;
 106
 107         len = 4096;
 108         *buf = xmalloc(len);
 109
 110         va_copy(aq, ap);
 111         status = vsnprintf(*buf, len, fmt, aq);
 112         va_end(aq);
 113
 114         if(status >= 0) {
 115                 *buf = xrealloc(*buf, status + 1);
 116         }
 117
 118         if(status > len - 1) {
 119                 len = status + 1;
 120                 va_copy(aq, ap);
 121                 status = vsnprintf(*buf, len, fmt, aq);
 122                 va_end(aq);
 123         }
 124
 125         return status;
 126 }
 127 #endif
 128
 129 #ifndef HAVE_GETTIMEOFDAY
 130 int gettimeofday(struct timeval *tv, void *tz) {
 131 #ifdef HAVE_MINGW
 132         FILETIME ft;
 133         GetSystemTimeAsFileTime(&ft);
 134         uint64_t lt = (uint64_t)ft.dwLowDateTime | ((uint64_t)ft.dwHighDateTime << 32);
 135         lt -= 116444736000000000ULL;
 136         tv->tv_sec = lt / 10000000;
 137         tv->tv_usec = (lt / 10) % 1000000;
 138 #else
 139 #warning No high resolution time source!
 140         tv->tv_sec = time(NULL);
 141         tv->tv_usec = 0;
 142 #endif
 143         return 0;
 144 }
 145 #endif
 146
 147 #ifndef HAVE_NANOSLEEP
 148 int nanosleep(const struct timespec *req, struct timespec *rem) {
 149         (void)rem;
 150         struct timeval tv = {req->tv_sec, req->tv_nsec / 1000};
 151         return select(0, NULL, NULL, NULL, &tv);
 152 }
 153 #endif