along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- $Id: process.c,v 1.1.2.1 2000/11/16 17:54:28 zarq Exp $
+ $Id: process.c,v 1.1.2.11 2000/11/22 22:05:37 guus Exp $
*/
#include "config.h"
+#include <errno.h>
+#include <fcntl.h>
+#include <signal.h>
+#include <stdio.h>
+#include <string.h>
+#include <syslog.h>
+#include <sys/ioctl.h>
+#include <sys/types.h>
+#include <sys/wait.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <termios.h>
+
#include <list.h>
+#include <pidfile.h>
+#include <utils.h>
+#include <xalloc.h>
+
+#include "conf.h"
+#include "process.h"
+
+#include "system.h"
/* A list containing all our children */
-list_t *child_pids;
+list_t *child_pids = NULL;
/* If zero, don't detach from the terminal. */
int do_detach = 1;
-/*
- Detach from current terminal, write pidfile, kill parent
-*/
-int detach(void)
+static pid_t ppid;
+
+extern char *identname;
+extern char *pidfilename;
+extern char **g_argv;
+
+void init_processes(void)
+{
+cp
+ child_pids = list_new();
+cp
+}
+
+void memory_full(int size)
+{
+ syslog(LOG_ERR, _("Memory exhausted (couldn't allocate %d bytes), exiting."), size);
+ cp_trace();
+ exit(1);
+}
+
+/* Some functions the less gifted operating systems might lack... */
+
+#ifndef HAVE_FCLOSEALL
+int fcloseall(void)
+{
+ fflush(stdin);
+ fflush(stdout);
+ fflush(stderr);
+ fclose(stdin);
+ fclose(stdout);
+ fclose(stderr);
+}
+#endif
+
+#ifndef HAVE_DAEMON
+int daemon(int nochdir, int noclose)
{
- int fd;
pid_t pid;
+ int fd;
+
+ ppid = getpid();
- if(do_detach)
+ if((pid = fork()) < 0)
+ {
+ perror("fork");
+ return -1;
+ }
+ if(pid) /* parent process */
{
- ppid = getpid();
+ signal(SIGTERM, parent_exit);
+ sleep(600); /* wait 10 minutes */
+ exit(1);
+ }
- if((pid = fork()) < 0)
- {
- perror("fork");
- return -1;
- }
- if(pid) /* parent process */
- {
- signal(SIGTERM, parent_exit);
- sleep(600); /* wait 10 minutes */
- exit(1);
- }
+ if((fd = open("/dev/tty", O_RDWR)) >= 0)
+ {
+ if(ioctl(fd, TIOCNOTTY, NULL))
+ {
+ perror("ioctl");
+ return -1;
+ }
+ close(fd);
}
-
- if(write_pidfile())
+
+ if(setsid() < 0)
return -1;
- if(do_detach)
+ kill(ppid, SIGTERM);
+
+ if(!nochdir)
+ chdir("/");
+
+ if(!noclose)
+ fcloseall();
+}
+#endif
+
+/*
+ Close network connections, and terminate neatly
+*/
+void cleanup_and_exit(int c)
+{
+cp
+ close_network_connections();
+
+ if(debug_lvl > DEBUG_NOTHING)
+ syslog(LOG_INFO, _("Total bytes written: tap %d, socket %d; bytes read: tap %d, socket %d"),
+ total_tap_out, total_socket_out, total_tap_in, total_socket_in);
+
+ closelog();
+ kill(ppid, SIGTERM);
+ exit(c);
+}
+
+/*
+ check for an existing tinc for this net, and write pid to pidfile
+*/
+int write_pidfile(void)
+{
+ int pid;
+cp
+ if((pid = check_pid(pidfilename)))
{
- if((fd = open("/dev/tty", O_RDWR)) >= 0)
- {
- if(ioctl(fd, TIOCNOTTY, NULL))
- {
- perror("ioctl");
- return -1;
- }
- close(fd);
- }
+ if(netname)
+ fprintf(stderr, _("A tincd is already running for net `%s' with pid %d.\n"),
+ netname, pid);
+ else
+ fprintf(stderr, _("A tincd is already running with pid %d.\n"), pid);
+ return 1;
+ }
- if(setsid() < 0)
- return -1;
+ /* if it's locked, write-protected, or whatever */
+ if(!write_pid(pidfilename))
+ return 1;
+cp
+ return 0;
+}
- kill(ppid, SIGTERM);
+/*
+ kill older tincd for this net
+*/
+int kill_other(void)
+{
+ int pid;
+cp
+ if(!(pid = read_pid(pidfilename)))
+ {
+ if(netname)
+ fprintf(stderr, _("No other tincd is running for net `%s'.\n"), netname);
+ else
+ fprintf(stderr, _("No other tincd is running.\n"));
+ return 1;
}
-
- chdir("/"); /* avoid keeping a mointpoint busy */
+
+ errno = 0; /* No error, sometimes errno is only changed on error */
+ /* ESRCH is returned when no process with that pid is found */
+ if(kill(pid, SIGTERM) && errno == ESRCH)
+ fprintf(stderr, _("Removing stale lock file.\n"));
+ remove_pid(pidfilename);
+cp
+ return 0;
+}
+
+/*
+ Detach from current terminal, write pidfile, kill parent
+*/
+int detach(void)
+{
+ int fd;
+ pid_t pid;
+cp
+ setup_signals();
+
+ if(do_detach)
+ daemon(0, 0);
+
+ if(write_pidfile())
+ return -1;
openlog(identname, LOG_CONS | LOG_PID, LOG_DAEMON);
syslog(LOG_NOTICE, _("tincd %s starting"), VERSION);
xalloc_fail_func = memory_full;
-
+cp
return 0;
}
Execute the program name, with sane environment. All output will be
redirected to syslog.
*/
+void _execute_script(const char *name) __attribute__ ((noreturn));
void _execute_script(const char *name)
{
int error = 0;
char *scriptname;
char *s;
int fd;
-
+
+cp
if(netname)
{
asprintf(&s, "NETNAME=%s", netname);
fcloseall();
/* Open standard input */
- if(open("/dev/null", O_RDONLY) < 0)
+ if((fd = open("/dev/null", O_RDONLY)) < 0)
{
syslog(LOG_ERR, _("Opening `/dev/null' failed: %m"));
error = 1;
}
+ if(dup2(fd, 0) != 0)
+ {
+ syslog(LOG_ERR, _("Couldn't assign /dev/null to standard input: %m"));
+ error = 1;
+ }
if(!error)
{
+ close(1); /* fd #1 should be the first available filedescriptor now. */
/* Standard output directly goes to syslog */
openlog(name, LOG_CONS | LOG_PID, LOG_DAEMON);
/* Standard error as well */
int execute_script(const char *name)
{
pid_t pid;
-
+cp
if((pid = fork()) < 0)
{
syslog(LOG_ERR, _("System call `%s' failed: %m"),
if(pid)
{
- list_append(child_pids, pid);
+ list_append(child_pids, &pid);
return 0;
}
-
+cp
/* Child here */
-
_execute_script(name);
}
{
pid_t pid;
int status;
-
+cp
pid = (pid_t) data;
pid = waitpid(pid, &status, WNOHANG);
if(WIFEXITED(status))
}
return -1;
}
-
+cp
/* Child is still running */
return 0;
}
}
-
/*
Signal handlers.
*/
RETSIGTYPE
sigusr1_handler(int a)
{
- dump_conn_list();
+ dump_connection_list();
}
RETSIGTYPE