74e5676ffe6630d7fb51f42bfd648850c8d0060a
[tinc] / 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-2016 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         return -1;
86 #endif
87 }
88 #endif
89
90 #ifndef HAVE_ASPRINTF
91 int asprintf(char **buf, const char *fmt, ...) {
92         int result;
93         va_list ap;
94         va_start(ap, fmt);
95         result = vasprintf(buf, fmt, ap);
96         va_end(ap);
97         return result;
98 }
99
100 int vasprintf(char **buf, const char *fmt, va_list ap) {
101         int status;
102         va_list aq;
103         int len;
104
105         len = 4096;
106         *buf = xmalloc(len);
107
108         va_copy(aq, ap);
109         status = vsnprintf(*buf, len, fmt, aq);
110         va_end(aq);
111
112         if(status >= 0) {
113                 *buf = xrealloc(*buf, status + 1);
114         }
115
116         if(status > len - 1) {
117                 len = status + 1;
118                 va_copy(aq, ap);
119                 status = vsnprintf(*buf, len, fmt, aq);
120                 va_end(aq);
121         }
122
123         return status;
124 }
125 #endif
126
127 #ifndef HAVE_GETTIMEOFDAY
128 int gettimeofday(struct timeval *tv, void *tz) {
129 #ifdef HAVE_MINGW
130         FILETIME ft;
131         GetSystemTimeAsFileTime(&ft);
132         uint64_t lt = (uint64_t)ft.dwLowDateTime | ((uint64_t)ft.dwHighDateTime << 32);
133         lt -= 116444736000000000ULL;
134         tv->tv_sec = lt / 10000000;
135         tv->tv_usec = (lt / 10) % 1000000;
136 #else
137 #warning No high resolution time source!
138         tv->tv_sec = time(NULL);
139         tv->tv_usec = 0;
140 #endif
141         return 0;
142 }
143 #endif
144
145 #ifndef HAVE_NANOSLEEP
146 int nanosleep(const struct timespec *req, struct timespec *rem) {
147         struct timeval tv = {req->tv_sec, req->tv_nsec / 1000};
148         return select(0, NULL, NULL, NULL, &tv);
149 }
150 #endif