nssm.cpp

   1 #include "nssm.h"\r
   2 \r
   3 extern unsigned long tls_index;\r
   4 extern bool is_admin;\r
   5 extern imports_t imports;\r
   6 \r
   7 static TCHAR unquoted_imagepath[PATH_LENGTH];\r
   8 static TCHAR imagepath[PATH_LENGTH];\r
   9 static TCHAR imageargv0[PATH_LENGTH];\r
  10 \r
  11 /* Are two strings case-insensitively equivalent? */\r
  12 int str_equiv(const TCHAR *a, const TCHAR *b) {\r
  13   size_t len = _tcslen(a);\r
  14   if (_tcslen(b) != len) return 0;\r
  15   if (_tcsnicmp(a, b, len)) return 0;\r
  16   return 1;\r
  17 }\r
  18 \r
  19 /* Convert a string to a number. */\r
  20 int str_number(const TCHAR *string, unsigned long *number, TCHAR **bogus) {\r
  21   if (! string) return 1;\r
  22 \r
  23   *number = _tcstoul(string, bogus, 0);\r
  24   if (**bogus) return 2;\r
  25 \r
  26   return 0;\r
  27 }\r
  28 \r
  29 int str_number(const TCHAR *string, unsigned long *number) {\r
  30   TCHAR *bogus;\r
  31   return str_number(string, number, &bogus);\r
  32 }\r
  33 \r
  34 /* Remove basename of a path. */\r
  35 void strip_basename(TCHAR *buffer) {\r
  36   size_t len = _tcslen(buffer);\r
  37   size_t i;\r
  38   for (i = len; i && buffer[i] != _T('\\') && buffer[i] != _T('/'); i--);\r
  39   /* X:\ is OK. */\r
  40   if (i && buffer[i - 1] == _T(':')) i++;\r
  41   buffer[i] = _T('\0');\r
  42 }\r
  43 \r
  44 /* How to use me correctly */\r
  45 int usage(int ret) {\r
  46   if (GetConsoleWindow()) print_message(stderr, NSSM_MESSAGE_USAGE, NSSM_VERSION, NSSM_CONFIGURATION, NSSM_DATE);\r
  47   else popup_message(0, MB_OK, NSSM_MESSAGE_USAGE, NSSM_VERSION, NSSM_CONFIGURATION, NSSM_DATE);\r
  48   return(ret);\r
  49 }\r
  50 \r
  51 void check_admin() {\r
  52   is_admin = false;\r
  53 \r
  54   /* Lifted from MSDN examples */\r
  55   PSID AdministratorsGroup;\r
  56   SID_IDENTIFIER_AUTHORITY NtAuthority = SECURITY_NT_AUTHORITY;\r
  57   if (! AllocateAndInitializeSid(&NtAuthority, 2, SECURITY_BUILTIN_DOMAIN_RID, DOMAIN_ALIAS_RID_ADMINS, 0, 0, 0, 0, 0, 0, &AdministratorsGroup)) return;\r
  58   CheckTokenMembership(0, AdministratorsGroup, /*XXX*/(PBOOL) &is_admin);\r
  59   FreeSid(AdministratorsGroup);\r
  60 }\r
  61 \r
  62 static int elevate(int argc, TCHAR **argv, unsigned long message) {\r
  63   print_message(stderr, message);\r
  64 \r
  65   SHELLEXECUTEINFO sei;\r
  66   ZeroMemory(&sei, sizeof(sei));\r
  67   sei.cbSize = sizeof(sei);\r
  68   sei.lpVerb = _T("runas");\r
  69   sei.lpFile = (TCHAR *) nssm_imagepath();\r
  70 \r
  71   TCHAR *args = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, EXE_LENGTH * sizeof(TCHAR));\r
  72   if (! args) {\r
  73     print_message(stderr, NSSM_MESSAGE_OUT_OF_MEMORY, _T("GetCommandLine()"), _T("elevate()"));\r
  74     return 111;\r
  75   }\r
  76 \r
  77   /* Get command line, which includes the path to NSSM, and skip that part. */\r
  78   _sntprintf_s(args, EXE_LENGTH, _TRUNCATE, _T("%s"), GetCommandLine());\r
  79   size_t s = _tcslen(argv[0]) + 1;\r
  80   if (args[0] == _T('"')) s += 2;\r
  81   while (isspace(args[s])) s++;\r
  82 \r
  83   sei.lpParameters = args + s;\r
  84   sei.nShow = SW_SHOW;\r
  85 \r
  86   unsigned long exitcode = 0;\r
  87   if (! ShellExecuteEx(&sei)) exitcode = 100;\r
  88 \r
  89   HeapFree(GetProcessHeap(), 0, (void *) args);\r
  90   return exitcode;\r
  91 }\r
  92 \r
  93 int num_cpus() {\r
  94   DWORD_PTR i, affinity, system_affinity;\r
  95   if (! GetProcessAffinityMask(GetCurrentProcess(), &affinity, &system_affinity)) return 64;\r
  96   for (i = 0; system_affinity & (1LL << i); i++);\r
  97   return (int) i;\r
  98 }\r
  99 \r
 100 const TCHAR *nssm_unquoted_imagepath() {\r
 101   return unquoted_imagepath;\r
 102 }\r
 103 \r
 104 const TCHAR *nssm_imagepath() {\r
 105   return imagepath;\r
 106 }\r
 107 \r
 108 const TCHAR *nssm_exe() {\r
 109   return imageargv0;\r
 110 }\r
 111 \r
 112 int _tmain(int argc, TCHAR **argv) {\r
 113   check_console();\r
 114 \r
 115 #ifdef UNICODE\r
 116   /*\r
 117     Ensure we write in UTF-16 mode, so that non-ASCII characters don't get\r
 118     mangled.  If we were compiled in ANSI mode it won't work.\r
 119    */\r
 120   _setmode(_fileno(stdout), _O_U16TEXT);\r
 121   _setmode(_fileno(stderr), _O_U16TEXT);\r
 122 #endif\r
 123 \r
 124   /* Remember if we are admin */\r
 125   check_admin();\r
 126 \r
 127   /* Set up function pointers. */\r
 128   if (get_imports()) exit(111);\r
 129 \r
 130   /* Remember our path for later. */\r
 131   _sntprintf_s(imageargv0, _countof(imageargv0), _TRUNCATE, _T("%s"), argv[0]);\r
 132   PathQuoteSpaces(imageargv0);\r
 133   GetModuleFileName(0, unquoted_imagepath, _countof(unquoted_imagepath));\r
 134   GetModuleFileName(0, imagepath, _countof(imagepath));\r
 135   PathQuoteSpaces(imagepath);\r
 136 \r
 137   /* Elevate */\r
 138   if (argc > 1) {\r
 139     /*\r
 140       Valid commands are:\r
 141       start, stop, pause, continue, install, edit, get, set, reset, unset, remove\r
 142     */\r
 143     if (str_equiv(argv[1], _T("start"))) exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
 144     if (str_equiv(argv[1], _T("stop"))) exit(control_service(SERVICE_CONTROL_STOP, argc - 2, argv + 2));\r
 145     if (str_equiv(argv[1], _T("restart"))) {\r
 146       int ret = control_service(SERVICE_CONTROL_STOP, argc - 2, argv + 2);\r
 147       if (ret) exit(ret);\r
 148       exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
 149     }\r
 150     if (str_equiv(argv[1], _T("pause"))) exit(control_service(SERVICE_CONTROL_PAUSE, argc - 2, argv + 2));\r
 151     if (str_equiv(argv[1], _T("continue"))) exit(control_service(SERVICE_CONTROL_CONTINUE, argc - 2, argv + 2));\r
 152     if (str_equiv(argv[1], _T("status"))) exit(control_service(SERVICE_CONTROL_INTERROGATE, argc - 2, argv + 2));\r
 153     if (str_equiv(argv[1], _T("rotate"))) exit(control_service(NSSM_SERVICE_CONTROL_ROTATE, argc - 2, argv + 2));\r
 154     if (str_equiv(argv[1], _T("install"))) {\r
 155       if (! is_admin) exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_INSTALL));\r
 156       create_messages();\r
 157       exit(pre_install_service(argc - 2, argv + 2));\r
 158     }\r
 159     if (str_equiv(argv[1], _T("edit")) || str_equiv(argv[1], _T("get")) || str_equiv(argv[1], _T("set")) || str_equiv(argv[1], _T("reset")) || str_equiv(argv[1], _T("unset"))) {\r
 160       int ret = pre_edit_service(argc - 1, argv + 1);\r
 161       if (ret == 3 && ! is_admin && argc == 3) exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_EDIT));\r
 162       /* There might be a password here. */\r
 163       for (int i = 0; i < argc; i++) SecureZeroMemory(argv[i], _tcslen(argv[i]) * sizeof(TCHAR));\r
 164       exit(ret);\r
 165     }\r
 166     if (str_equiv(argv[1], _T("list"))) exit(list_nssm_services());\r
 167     if (str_equiv(argv[1], _T("remove"))) {\r
 168       if (! is_admin) exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_REMOVE));\r
 169       exit(pre_remove_service(argc - 2, argv + 2));\r
 170     }\r
 171   }\r
 172 \r
 173   /* Thread local storage for error message buffer */\r
 174   tls_index = TlsAlloc();\r
 175 \r
 176   /* Register messages */\r
 177   if (is_admin) create_messages();\r
 178 \r
 179   /*\r
 180     Optimisation for Windows 2000:\r
 181     When we're run from the command line the StartServiceCtrlDispatcher() call\r
 182     will time out after a few seconds on Windows 2000.  On newer versions the\r
 183     call returns instantly.  Check for stdin first and only try to call the\r
 184     function if there's no input stream found.  Although it's possible that\r
 185     we're running with input redirected it's much more likely that we're\r
 186     actually running as a service.\r
 187     This will save time when running with no arguments from a command prompt.\r
 188   */\r
 189   if (! GetStdHandle(STD_INPUT_HANDLE)) {\r
 190     /* Start service magic */\r
 191     SERVICE_TABLE_ENTRY table[] = { { NSSM, service_main }, { 0, 0 } };\r
 192     if (! StartServiceCtrlDispatcher(table)) {\r
 193       unsigned long error = GetLastError();\r
 194       /* User probably ran nssm with no argument */\r
 195       if (error == ERROR_FAILED_SERVICE_CONTROLLER_CONNECT) exit(usage(1));\r
 196       log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_DISPATCHER_FAILED, error_string(error), 0);\r
 197       free_imports();\r
 198       exit(100);\r
 199     }\r
 200   }\r
 201   else exit(usage(1));\r
 202 \r
 203   /* And nothing more to do */\r
 204   exit(0);\r
 205 }\r