service.cpp

   1 #include "nssm.h"\r
   2 \r
   3 SERVICE_STATUS service_status;\r
   4 SERVICE_STATUS_HANDLE service_handle;\r
   5 HANDLE wait_handle;\r
   6 HANDLE pid;\r
   7 static char service_name[SERVICE_NAME_LENGTH];\r
   8 char exe[EXE_LENGTH];\r
   9 char flags[CMD_LENGTH];\r
  10 char dir[MAX_PATH];\r
  11 \r
  12 static enum { NSSM_EXIT_RESTART, NSSM_EXIT_IGNORE, NSSM_EXIT_REALLY } exit_actions;\r
  13 static const char *exit_action_strings[] = { "Restart", "Ignore", "Exit", 0 };\r
  14 \r
  15 /* Connect to the service manager */\r
  16 SC_HANDLE open_service_manager() {\r
  17   SC_HANDLE ret = OpenSCManager(0, SERVICES_ACTIVE_DATABASE, SC_MANAGER_ALL_ACCESS);\r
  18   if (! ret) {\r
  19     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENSCMANAGER_FAILED, 0);\r
  20     return 0;\r
  21   }\r
  22 \r
  23   return ret;\r
  24 }\r
  25 \r
  26 /* About to install the service */\r
  27 int pre_install_service(int argc, char **argv) {\r
  28   /* Show the dialogue box if we didn't give the */\r
  29   if (argc < 2) return nssm_gui(IDD_INSTALL, argv[0]);\r
  30 \r
  31   /* Arguments are optional */\r
  32   char *flags;\r
  33   if (argc == 2) flags = "";\r
  34   else flags = argv[2];\r
  35 \r
  36   return install_service(argv[0], argv[1], flags);\r
  37 }\r
  38 \r
  39 /* About to remove the service */\r
  40 int pre_remove_service(int argc, char **argv) {\r
  41   /* Show dialogue box if we didn't pass service name and "confirm" */\r
  42   if (argc < 2) return nssm_gui(IDD_REMOVE, argv[0]);\r
  43   if (str_equiv(argv[1], "confirm")) return remove_service(argv[0]);\r
  44   fprintf(stderr, "To remove a service without confirmation: nssm remove <servicename> confirm\n");\r
  45   return 100;\r
  46 }\r
  47 \r
  48 /* Install the service */\r
  49 int install_service(char *name, char *exe, char *flags) {\r
  50   /* Open service manager */\r
  51   SC_HANDLE services = open_service_manager();\r
  52   if (! services) {\r
  53     fprintf(stderr, "Error opening service manager!\n");\r
  54     return 2;\r
  55   }\r
  56   \r
  57   /* Get path of this program */\r
  58   char path[MAX_PATH];\r
  59   GetModuleFileName(0, path, MAX_PATH);\r
  60 \r
  61   /* Construct command */\r
  62   char command[CMD_LENGTH];\r
  63   size_t runlen = strlen(NSSM_RUN);\r
  64   size_t pathlen = strlen(path);\r
  65   if (pathlen + runlen + 2 >= VALUE_LENGTH) {\r
  66     fprintf(stderr, "The full path to " NSSM " is too long!\n");\r
  67     return 3;\r
  68   }\r
  69   if (snprintf(command, sizeof(command), "\"%s\" %s", path, NSSM_RUN) < 0) {\r
  70     fprintf(stderr, "Out of memory for ImagePath!\n");\r
  71     return 4;\r
  72   }\r
  73 \r
  74   /* Work out directory name */\r
  75   size_t len = strlen(exe);\r
  76   size_t i;\r
  77   for (i = len; i && exe[i] != '\\' && exe[i] != '/'; i--);\r
  78   char dir[MAX_PATH];\r
  79   memmove(dir, exe, i);\r
  80   dir[i] = '\0';\r
  81 \r
  82   /* Create the service */\r
  83   SC_HANDLE service = CreateService(services, name, name, SC_MANAGER_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS, SERVICE_AUTO_START, SERVICE_ERROR_NORMAL, command, 0, 0, 0, 0, 0);\r
  84   if (! service) {\r
  85     fprintf(stderr, "Error creating service!\n");\r
  86     CloseServiceHandle(services);\r
  87     return 5;\r
  88   }\r
  89 \r
  90   /* Now we need to put the parameters into the registry */\r
  91   if (create_parameters(name, exe, flags, dir)) {\r
  92     fprintf(stderr, "Error setting startup parameters for the service!\n");\r
  93     DeleteService(service);\r
  94     CloseServiceHandle(services);\r
  95     return 6;\r
  96   }\r
  97 \r
  98   /* Cleanup */\r
  99   CloseServiceHandle(service);\r
 100   CloseServiceHandle(services);\r
 101 \r
 102   printf("Service \"%s\" installed successfully!\n", name);\r
 103   return 0;\r
 104 }\r
 105 \r
 106 /* Remove the service */\r
 107 int remove_service(char *name) {\r
 108   /* Open service manager */\r
 109   SC_HANDLE services = open_service_manager();\r
 110   if (! services) {\r
 111     fprintf(stderr, "Error opening service manager!\n");\r
 112     return 2;\r
 113   }\r
 114   \r
 115   /* Try to open the service */\r
 116   SC_HANDLE service = OpenService(services, name, SC_MANAGER_ALL_ACCESS);\r
 117   if (! service) {\r
 118     fprintf(stderr, "Can't open service!");\r
 119     CloseServiceHandle(services);\r
 120     return 3;\r
 121   }\r
 122 \r
 123   /* Try to delete the service */\r
 124   if (! DeleteService(service)) {\r
 125     fprintf(stderr, "Error deleting service!\n");\r
 126     CloseServiceHandle(service);\r
 127     CloseServiceHandle(services);\r
 128     return 4;\r
 129   }\r
 130 \r
 131   /* Cleanup */\r
 132   CloseServiceHandle(service);\r
 133   CloseServiceHandle(services);\r
 134 \r
 135   printf("Service \"%s\" removed successfully!\n", name);\r
 136   return 0;\r
 137 }\r
 138 \r
 139 /* Service initialisation */\r
 140 void WINAPI service_main(unsigned long argc, char **argv) {\r
 141   if (_snprintf(service_name, sizeof(service_name), "%s", argv[0]) < 0) {\r
 142     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "service_name", "service_main()", 0);\r
 143     return;\r
 144   }\r
 145 \r
 146   /* Initialise status */\r
 147   ZeroMemory(&service_status, sizeof(service_status));\r
 148   service_status.dwServiceType = SERVICE_WIN32_OWN_PROCESS | SERVICE_INTERACTIVE_PROCESS;\r
 149   service_status.dwCurrentState = SERVICE_RUNNING;\r
 150   service_status.dwControlsAccepted = SERVICE_ACCEPT_SHUTDOWN | SERVICE_ACCEPT_STOP;\r
 151   service_status.dwWin32ExitCode = NO_ERROR;\r
 152   service_status.dwServiceSpecificExitCode = 0;\r
 153   service_status.dwCheckPoint = 0;\r
 154   service_status.dwWaitHint = 1000;\r
 155 \r
 156   /* Signal we AREN'T running the server */\r
 157   pid = 0;\r
 158 \r
 159   /* Get startup parameters */\r
 160   int ret = get_parameters(argv[0], exe, sizeof(exe), flags, sizeof(flags), dir, sizeof(dir));\r
 161   if (ret) {\r
 162     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_GET_PARAMETERS_FAILED, argv[0], 0);\r
 163     return;\r
 164   }\r
 165 \r
 166   /* Register control handler */\r
 167   service_handle = RegisterServiceCtrlHandlerEx(NSSM, service_control_handler, 0);\r
 168   if (! service_handle) {\r
 169     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_REGISTERSERVICECTRLHANDER_FAILED, GetLastError(), 0);\r
 170     return;\r
 171   }\r
 172 \r
 173   /* Try to create the exit action parameters; we don't care if it fails */\r
 174   create_exit_action(argv[0], exit_action_strings[0]);\r
 175 \r
 176   monitor_service();\r
 177 }\r
 178 \r
 179 int monitor_service() {\r
 180   /* Set service status to started */\r
 181   int ret = start_service();\r
 182   if (ret) {\r
 183     char code[16];\r
 184     snprintf(code, sizeof(code), "%d", ret);\r
 185     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_START_SERVICE_FAILED, exe, service_name, ret, 0);\r
 186     return ret;\r
 187   }\r
 188   log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_STARTED_SERVICE, exe, flags, service_name, dir, 0);\r
 189 \r
 190   /* Monitor service service */\r
 191   if (! RegisterWaitForSingleObject(&wait_handle, pid, end_service, 0, INFINITE, WT_EXECUTEONLYONCE | WT_EXECUTELONGFUNCTION)) {\r
 192     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_REGISTERWAITFORSINGLEOBJECT_FAILED, service_name, exe, GetLastError(), 0);\r
 193   }\r
 194 \r
 195   return 0;\r
 196 }\r
 197 \r
 198 /* Service control handler */\r
 199 unsigned long WINAPI service_control_handler(unsigned long control, unsigned long event, void *data, void *context) {\r
 200   switch (control) {\r
 201     case SERVICE_CONTROL_SHUTDOWN:\r
 202     case SERVICE_CONTROL_STOP:\r
 203       stop_service(0);\r
 204       return NO_ERROR;\r
 205   }\r
 206 \r
 207   /* Unknown control */\r
 208   return ERROR_CALL_NOT_IMPLEMENTED;\r
 209 }\r
 210 \r
 211 /* Start the service */\r
 212 int start_service() {\r
 213   if (pid) return 0;\r
 214 \r
 215   /* Allocate a STARTUPINFO structure for a new process */\r
 216   STARTUPINFO si;\r
 217   ZeroMemory(&si, sizeof(si));\r
 218   si.cb = sizeof(si);\r
 219 \r
 220   /* Allocate a PROCESSINFO structure for the process */\r
 221   PROCESS_INFORMATION pi;\r
 222   ZeroMemory(&pi, sizeof(pi));\r
 223 \r
 224   /* Launch executable with arguments */\r
 225   char cmd[CMD_LENGTH];\r
 226   if (_snprintf(cmd, sizeof(cmd), "%s %s", exe, flags) < 0) {\r
 227     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "command line", "start_service", 0);\r
 228     return stop_service(2);\r
 229   }\r
 230   if (! CreateProcess(0, cmd, 0, 0, 0, 0, 0, dir, &si, &pi)) {\r
 231     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEPROCESS_FAILED, service_name, exe, GetLastError(), 0);\r
 232     return stop_service(3);\r
 233   }\r
 234   pid = pi.hProcess;\r
 235 \r
 236   /* Signal successful start */\r
 237   service_status.dwCurrentState = SERVICE_RUNNING;\r
 238   SetServiceStatus(service_handle, &service_status);\r
 239 \r
 240   return 0;\r
 241 }\r
 242 \r
 243 /* Stop the service */\r
 244 int stop_service(unsigned long exitcode) {\r
 245   /* Signal we are stopping */\r
 246   service_status.dwCurrentState = SERVICE_STOP_PENDING;\r
 247   SetServiceStatus(service_handle, &service_status);\r
 248 \r
 249   /* Nothing to do if server isn't running */\r
 250   if (pid) {\r
 251     /* Shut down server */\r
 252     log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_TERMINATEPROCESS, service_name, exe, 0);\r
 253     TerminateProcess(pid, 0);\r
 254     pid = 0;\r
 255   }\r
 256   else log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_PROCESS_ALREADY_STOPPED, service_name, exe, 0);\r
 257 \r
 258   /* Signal we stopped */\r
 259   service_status.dwCurrentState = SERVICE_STOPPED;\r
 260   if (exitcode) {\r
 261     service_status.dwWin32ExitCode = ERROR_SERVICE_SPECIFIC_ERROR;\r
 262     service_status.dwServiceSpecificExitCode = exitcode;\r
 263   }\r
 264   else {\r
 265     service_status.dwWin32ExitCode = NO_ERROR;\r
 266     service_status.dwServiceSpecificExitCode = 0;\r
 267   }\r
 268   SetServiceStatus(service_handle, &service_status);\r
 269 \r
 270   return exitcode;\r
 271 }\r
 272 \r
 273 /* Callback function triggered when the server exits */\r
 274 void CALLBACK end_service(void *arg, unsigned char why) {\r
 275   /* Check exit code */\r
 276   unsigned long ret = 0;\r
 277   GetExitCodeProcess(pid, &ret);\r
 278 \r
 279   char code[16];\r
 280   _snprintf(code, sizeof(code), "%d", ret);\r
 281   log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_ENDED_SERVICE, exe, service_name, code, 0);\r
 282 \r
 283   /* What action should we take? */\r
 284   int action = NSSM_EXIT_RESTART;\r
 285   unsigned char action_string[ACTION_LEN];\r
 286   if (! get_exit_action(service_name, &ret, action_string)) {\r
 287     for (int i = 0; exit_action_strings[i]; i++) {\r
 288       if (! _strnicmp((const char *) action_string, exit_action_strings[i], ACTION_LEN)) {\r
 289         action = i;\r
 290         break;\r
 291       }\r
 292     }\r
 293   }\r
 294 \r
 295   pid = 0;\r
 296   switch (action) {\r
 297     /* Try to restart the service or return failure code to service manager */\r
 298     case NSSM_EXIT_RESTART:\r
 299       log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_EXIT_RESTART, service_name, code, exit_action_strings[action], exe, 0);\r
 300       while (monitor_service()) {\r
 301         log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_RESTART_SERVICE_FAILED, exe, service_name, 0);\r
 302         Sleep(30000);\r
 303       }\r
 304     break;\r
 305 \r
 306     /* Do nothing, just like srvany would */\r
 307     case NSSM_EXIT_IGNORE:\r
 308       log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_EXIT_IGNORE, service_name, code, exit_action_strings[action], exe, 0);\r
 309       Sleep(INFINITE);\r
 310     break;\r
 311 \r
 312     /* Tell the service manager we are finished */\r
 313     case NSSM_EXIT_REALLY:\r
 314       log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_EXIT_REALLY, service_name, code, exit_action_strings[action], 0);\r
 315       stop_service(ret);\r
 316     break;\r
 317   }\r
 318 }\r