Simplify translation
[tinc] / src / process.c
index 218df76..babdf43 100644 (file)
@@ -17,7 +17,7 @@
     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.57 2003/07/22 20:55:20 guus Exp $
+    $Id: process.c,v 1.1.2.63 2003/08/03 21:45:13 guus Exp $
 */
 
 #include "system.h"
@@ -43,6 +43,7 @@ extern char *identname;
 extern char *pidfilename;
 extern char **g_argv;
 extern bool use_logfile;
+extern volatile bool running;
 
 sigset_t emptysigset;
 
@@ -70,24 +71,162 @@ static int fcloseall(void)
 }
 #endif
 
-/*
-  Close network connections, and terminate neatly
-*/
-void cleanup_and_exit(int c)
+#ifdef HAVE_MINGW
+extern char *identname;
+extern char *program_name;
+extern char **g_argv;
+
+static SC_HANDLE manager = NULL;
+static SC_HANDLE service = NULL;
+static SERVICE_STATUS status = {0};
+static SERVICE_STATUS_HANDLE statushandle = 0;
+
+bool install_service(void) {
+       char command[4096] = "";
+       char **argp;
+
+       manager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
+       if(!manager) {
+               logger(LOG_ERR, _("Could not open service manager: %s"), winerror(GetLastError()));
+               return false;
+       }
+
+       if(!strchr(program_name, '\\')) {
+               GetCurrentDirectory(sizeof(command), command);
+               strncat(command, "\\", sizeof(command));
+       }
+
+       strncat(command, program_name, sizeof(command));
+       for(argp = g_argv + 1; *argp; argp++) {
+               strncat(command, " ", sizeof(command));
+               strncat(command, *argp, sizeof(command));
+       }
+
+       service = CreateService(manager, identname, identname,
+                       SERVICE_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS, SERVICE_AUTO_START, SERVICE_ERROR_NORMAL,
+                       command, "NDIS", NULL, NULL, NULL, NULL);
+       
+       if(!service) {
+               logger(LOG_ERR, _("Could not create %s service: %s"), identname, winerror(GetLastError()));
+               return false;
+       }
+
+       logger(LOG_INFO, _("%s service installed"), identname);
+
+       if(!StartService(service, 0, NULL))
+               logger(LOG_WARNING, _("Could not start %s service: %s"), identname, winerror(GetLastError()));
+       else
+               logger(LOG_INFO, _("%s service started"), identname);
+
+       return true;
+}
+
+bool remove_service(void) {
+       manager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
+       if(!manager) {
+               logger(LOG_ERR, _("Could not open service manager: %s"), winerror(GetLastError()));
+               return false;
+       }
+
+       service = OpenService(manager, identname, SERVICE_ALL_ACCESS);
+
+       if(!service) {
+               logger(LOG_ERR, _("Could not open %s service: %s"), identname, winerror(GetLastError()));
+               return false;
+       }
+
+       if(!ControlService(service, SERVICE_CONTROL_STOP, &status))
+               logger(LOG_ERR, _("Could not stop %s service: %s"), identname, winerror(GetLastError()));
+       else
+               logger(LOG_INFO, _("%s service stopped"), identname);
+
+       if(!DeleteService(service)) {
+               logger(LOG_ERR, _("Could not remove %s service: %s"), identname, winerror(GetLastError()));
+               return false;
+       }
+
+       logger(LOG_INFO, _("%s service removed"), identname);
+
+       return true;
+}
+
+DWORD WINAPI controlhandler(DWORD request, DWORD type, LPVOID boe, LPVOID bah) {
+       switch(request) {
+               case SERVICE_CONTROL_STOP:
+                       logger(LOG_NOTICE, _("Got %s request"), "SERVICE_CONTROL_STOP");
+                       running = false;
+                       break;
+               case SERVICE_CONTROL_SHUTDOWN:
+                       logger(LOG_NOTICE, _("Got %s request"), "SERVICE_CONTROL_SHUTDOWN");
+                       running = false;
+                       break;
+               default:
+                       logger(LOG_WARNING, _("Got unexpected request %d"), request);
+                       return ERROR_CALL_NOT_IMPLEMENTED;
+       }
+
+       if(!running) {
+               status.dwCurrentState = SERVICE_STOP_PENDING; 
+               SetServiceStatus(statushandle, &status);
+       }
+
+       return NO_ERROR;
+}
+
+VOID WINAPI run_service(DWORD argc, LPTSTR* argv)
 {
-       cp();
+       int err = 1;
+       extern int main2(int argc, char **argv);
 
-       close_network_connections();
 
-       ifdebug(CONNECTIONS)
-               dump_device_stats();
+       status.dwServiceType = SERVICE_WIN32; 
+       status.dwControlsAccepted = SERVICE_ACCEPT_STOP | SERVICE_ACCEPT_SHUTDOWN;
+       status.dwWin32ExitCode = 0; 
+       status.dwServiceSpecificExitCode = 0; 
+       status.dwCheckPoint = 0; 
+       status.dwWaitHint = 0; 
 
-       logger(LOG_NOTICE, _("Terminating"));
+       statushandle = RegisterServiceCtrlHandlerEx(identname, controlhandler, NULL); 
 
-       closelogger();
-       exit(c);
+       if (!statushandle) {
+               logger(LOG_ERR, _("System call `%s' failed: %s"), "RegisterServiceCtrlHandlerEx", winerror(GetLastError()));
+               err = 1;
+       } else {
+               status.dwCurrentState = SERVICE_START_PENDING; 
+               SetServiceStatus(statushandle, &status);
+
+               status.dwCurrentState = SERVICE_RUNNING;
+               SetServiceStatus(statushandle, &status);
+
+               err = main2(argc, argv);
+
+               status.dwCurrentState = SERVICE_STOPPED; 
+               //status.dwWin32ExitCode = err; 
+               SetServiceStatus(statushandle, &status);
+       }
+
+       return;
+}
+
+bool init_service(void) {
+       SERVICE_TABLE_ENTRY services[] = {
+               {identname, run_service},
+               {NULL, NULL}
+       };
+
+       if(!StartServiceCtrlDispatcher(services)) {
+               if(GetLastError() == ERROR_FAILED_SERVICE_CONTROLLER_CONNECT) {
+                       return false;
+               }
+               else
+                       logger(LOG_ERR, _("System call `%s' failed: %s"), "StartServiceCtrlDispatcher", winerror(GetLastError()));
+       }
+
+       return true;
 }
+#endif
 
+#ifndef HAVE_MINGW
 /*
   check for an existing tinc for this net, and write pid to pidfile
 */
@@ -114,12 +253,14 @@ static bool write_pidfile(void)
 
        return true;
 }
+#endif
 
 /*
   kill older tincd for this net
 */
 bool kill_other(int signal)
 {
+#ifndef HAVE_MINGW
        int pid;
 
        cp();
@@ -150,6 +291,9 @@ bool kill_other(int signal)
        }
 
        return true;
+#else
+       return remove_service();
+#endif
 }
 
 /*
@@ -163,14 +307,17 @@ bool detach(void)
 
        /* First check if we can open a fresh new pidfile */
 
+#ifndef HAVE_MINGW
        if(!write_pidfile())
                return false;
 
        /* If we succeeded in doing that, detach */
 
        closelogger();
+#endif
 
        if(do_detach) {
+#ifndef HAVE_MINGW
                if(daemon(0, 0)) {
                        fprintf(stderr, _("Couldn't detach from terminal: %s"),
                                        strerror(errno));
@@ -181,6 +328,10 @@ bool detach(void)
 
                if(!write_pid(pidfilename))
                        return false;
+#else
+               if(!statushandle)
+                       exit(install_service());
+#endif
        }
 
        openlogger(identname, use_logfile?LOGMODE_FILE:(do_detach?LOGMODE_SYSLOG:LOGMODE_STDERR));
@@ -193,11 +344,12 @@ bool detach(void)
        return true;
 }
 
+#ifdef HAVE_FORK
 /*
   Execute the program name, with sane environment.
 */
 static void _execute_script(const char *scriptname, char **envp)
-       __attribute__ ((noreturn));
+       __attribute__ ((__noreturn__));
 static void _execute_script(const char *scriptname, char **envp)
 {
        int save_errno;
@@ -214,7 +366,7 @@ static void _execute_script(const char *scriptname, char **envp)
        /* Close all file descriptors */
        fcloseall();
 
-       execl(scriptname, NULL);
+       execl(scriptname, scriptname, NULL);
        /* No return on success */
 
        save_errno = errno;
@@ -224,12 +376,14 @@ static void _execute_script(const char *scriptname, char **envp)
                   strerror(save_errno));
        exit(save_errno);
 }
+#endif
 
 /*
   Fork and execute the program pointed to by name.
 */
 bool execute_script(const char *name, char **envp)
 {
+#ifdef HAVE_FORK
        pid_t pid;
        int status;
        struct stat s;
@@ -287,6 +441,9 @@ bool execute_script(const char *name, char **envp)
        /* Child here */
 
        _execute_script(scriptname, envp);
+#else
+       return true;
+#endif
 }
 
 
@@ -294,17 +451,17 @@ bool execute_script(const char *name, char **envp)
   Signal handlers.
 */
 
+#ifndef HAVE_MINGW
 static RETSIGTYPE sigterm_handler(int a)
 {
-       logger(LOG_NOTICE, _("Got TERM signal"));
-
-       cleanup_and_exit(0);
+       logger(LOG_NOTICE, _("Got %s signal"), "TERM");
+       running = false;
 }
 
 static RETSIGTYPE sigquit_handler(int a)
 {
-       logger(LOG_NOTICE, _("Got QUIT signal"));
-       cleanup_and_exit(0);
+       logger(LOG_NOTICE, _("Got %s signal"), "QUIT");
+       running = false;
 }
 
 static RETSIGTYPE fatal_signal_square(int a)
@@ -341,12 +498,14 @@ static RETSIGTYPE fatal_signal_handler(int a)
 
 static RETSIGTYPE sighup_handler(int a)
 {
-       logger(LOG_NOTICE, _("Got HUP signal"));
+       logger(LOG_NOTICE, _("Got %s signal"), "HUP");
        sighup = true;
 }
 
 static RETSIGTYPE sigint_handler(int a)
 {
+       logger(LOG_NOTICE, _("Got %s signal"), "INT");
+
        if(saved_debug_level != -1) {
                logger(LOG_NOTICE, _("Reverting to old debug level (%d)"),
                        saved_debug_level);
@@ -363,7 +522,7 @@ static RETSIGTYPE sigint_handler(int a)
 
 static RETSIGTYPE sigalrm_handler(int a)
 {
-       logger(LOG_NOTICE, _("Got ALRM signal"));
+       logger(LOG_NOTICE, _("Got %s signal"), "ALRM");
        sigalrm = true;
 }
 
@@ -415,9 +574,11 @@ static struct {
        {SIGWINCH, sigwinch_handler},
        {0, NULL}
 };
+#endif
 
 void setup_signals(void)
 {
+#ifndef HAVE_MINGW
        int i;
        struct sigaction act;
 
@@ -449,4 +610,5 @@ void setup_signals(void)
                                        sighandlers[i].signal, strsignal(sighandlers[i].signal),
                                        strerror(errno));
        }
+#endif
 }