+static pid_t ppid;
+
+extern char *identname;
+extern char *pidfilename;
+extern char **g_argv;
+
+void memory_full(int size)
+{
+ syslog(LOG_ERR, _("Memory exhausted (couldn't allocate %d bytes), exiting."), size);
+ cp_trace();
+ exit(1);
+}
+
+/*
+ Close network connections, and terminate neatly
+*/
+void cleanup_and_exit(int c)
+{
+ 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;
+
+ if((pid = check_pid(pidfilename)))
+ {
+ 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 it's locked, write-protected, or whatever */
+ if(!write_pid(pidfilename))
+ return 1;
+
+ return 0;
+}
+
+/*
+ kill older tincd for this net
+*/
+int kill_other(void)
+{
+ int pid;
+
+ 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;
+ }
+
+ 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);
+
+ return 0;
+}
+