Allocate new console by default.
[nssm.git] / nssm.cpp
index a60c378..8c36780 100644 (file)
--- a/nssm.cpp
+++ b/nssm.cpp
@@ -4,28 +4,43 @@ extern unsigned long tls_index;
 extern bool is_admin;\r
 extern imports_t imports;\r
 \r
-/* String function */\r
-int str_equiv(const char *a, const char *b) {\r
-  int i;\r
-  for (i = 0; ; i++) {\r
-    if (tolower(b[i]) != tolower(a[i])) return 0;\r
-    if (! a[i]) return 1;\r
-  }\r
+/* Are two strings case-insensitively equivalent? */\r
+int str_equiv(const TCHAR *a, const TCHAR *b) {\r
+  size_t len = _tcslen(a);\r
+  if (_tcslen(b) != len) return 0;\r
+  if (_tcsnicmp(a, b, len)) return 0;\r
+  return 1;\r
+}\r
+\r
+/* Convert a string to a number. */\r
+int str_number(const TCHAR *string, unsigned long *number, TCHAR **bogus) {\r
+  if (! string) return 1;\r
+\r
+  *number = _tcstoul(string, bogus, 0);\r
+  if (**bogus) return 2;\r
+\r
+  return 0;\r
+}\r
+\r
+int str_number(const TCHAR *string, unsigned long *number) {\r
+  TCHAR *bogus;\r
+  return str_number(string, number, &bogus);\r
 }\r
 \r
 /* Remove basename of a path. */\r
-void strip_basename(char *buffer) {\r
-  size_t len = strlen(buffer);\r
+void strip_basename(TCHAR *buffer) {\r
+  size_t len = _tcslen(buffer);\r
   size_t i;\r
-  for (i = len; i && buffer[i] != '\\' && buffer[i] != '/'; i--);\r
+  for (i = len; i && buffer[i] != _T('\\') && buffer[i] != _T('/'); i--);\r
   /* X:\ is OK. */\r
-  if (i && buffer[i-1] == ':') i++;\r
-  buffer[i] = '\0';\r
+  if (i && buffer[i - 1] == _T(':')) i++;\r
+  buffer[i] = _T('\0');\r
 }\r
 \r
 /* How to use me correctly */\r
 int usage(int ret) {\r
-  print_message(stderr, NSSM_MESSAGE_USAGE, NSSM_VERSION, NSSM_DATE);\r
+  if (GetConsoleWindow()) print_message(stderr, NSSM_MESSAGE_USAGE, NSSM_VERSION, NSSM_CONFIGURATION, NSSM_DATE);\r
+  else popup_message(0, MB_OK, NSSM_MESSAGE_USAGE, NSSM_VERSION, NSSM_CONFIGURATION, NSSM_DATE);\r
   return(ret);\r
 }\r
 \r
@@ -40,21 +55,212 @@ void check_admin() {
   FreeSid(AdministratorsGroup);\r
 }\r
 \r
-int main(int argc, char **argv) {\r
+/* See if we were launched from a console window. */\r
+static void check_console() {\r
+  /* If we're running in a service context there will be no console window. */\r
+  HWND console = GetConsoleWindow();\r
+  if (! console) return;\r
+\r
+  unsigned long pid;\r
+  if (! GetWindowThreadProcessId(console, &pid)) return;\r
+\r
+  /*\r
+    If the process associated with the console window handle is the same as\r
+    this process, we were not launched from an existing console.  The user\r
+    probably double-clicked our executable.\r
+  */\r
+  if (GetCurrentProcessId() != pid) return;\r
+\r
+  /* We close our new console so that subsequent messages appear in a popup. */\r
+  FreeConsole();\r
+}\r
+\r
+int num_cpus() {\r
+  DWORD_PTR i, affinity, system_affinity;\r
+  if (! GetProcessAffinityMask(GetCurrentProcess(), &affinity, &system_affinity)) return 64;\r
+  for (i = 0; system_affinity & (1LL << i); i++);\r
+  return (int) i;\r
+}\r
+\r
+static inline void block(unsigned int a, short x, short y, unsigned long n) {\r
+  HANDLE h = GetStdHandle(STD_OUTPUT_HANDLE);\r
+  TCHAR s = _T(' ');\r
+\r
+  unsigned long out;\r
+  COORD c = { x, y };\r
+  FillConsoleOutputAttribute(h, a, n, c, &out);\r
+  FillConsoleOutputCharacter(h, s, n, c, &out);\r
+}\r
+\r
+static inline void R(short x, short y, unsigned long n) {\r
+  block(BACKGROUND_RED | BACKGROUND_INTENSITY, x, y, n);\r
+}\r
+\r
+static inline void r(short x, short y, unsigned long n) {\r
+  block(BACKGROUND_RED, x, y, n);\r
+}\r
+\r
+static inline void b(short x, short y, unsigned long n) {\r
+  block(0, x, y, n);\r
+}\r
+\r
+void banner() {\r
+  short y = 0;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(18, y, 5); r(28, y, 4); r(41, y, 4); r(68, y, 1);\r
+  R(6, y, 5); R(19, y, 4); R(29, y, 1); R(32, y, 3); R(42, y, 1); R(45, y, 3); R(52, y, 5); R(69, y, 4);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(8, y, 4); r(20, y, 1); r(28, y, 1); r(33, y, 3); r(41, y, 1); r(46, y, 3); r (57, y, 1);\r
+  R(9, y, 2); R(21, y, 1); R(27, y, 1); R(34, y, 1); R(40, y, 1); R(47, y, 1); R(54, y, 3); R(68, y, 3);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(12, y, 1); r(20, y, 1); r(26, y, 1); r(34, y, 2); r(39, y, 1); r(47, y, 2); r(67, y, 2);\r
+  R(9, y, 3); R(21, y, 1); R(27, y, 1); R(40, y, 1); R(54, y, 1); R(56, y, 2); R(67, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(20, y, 1); r(26, y, 1); r (35, y, 1); r(39, y, 1); r(48, y, 1); r(58, y, 1);\r
+  R(10, y, 3); R(21, y, 1); R(27, y, 1); R(40, y, 1); R(54, y, 1); R(56, y, 2); R(67, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(56, y, 1); r(66, y, 2);\r
+  R(11, y, 3); R(21, y, 1); R(26, y, 2); R(39, y, 2); R(54, y, 1); R(57, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(26, y, 1); r(39, y, 1); r(59, y, 1);\r
+  R(12, y, 3); R(21, y, 1); R(27, y, 2); R(40, y, 2); R(54, y, 1); R(57, y, 2); R(66, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(12, y, 4); r(30, y, 1); r(43, y, 1); r(57, y, 1); r(65, y, 2);\r
+  R(13, y, 2); R(21, y, 1); R(27, y, 3); R(40, y, 3); R(54, y, 1); R(58, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(13, y, 4); r(27, y, 7); r(40, y, 7);\r
+  R(14, y, 2); R(21, y, 1); R(28, y, 5); R(41, y, 5); R(54, y, 1); R(58, y, 2); R(65, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(60, y, 1); r(65, y, 1);\r
+  R(14, y, 3); R(21, y, 1); R(29, y, 6); R(42, y, 6); R(54, y, 1); R(58, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(31, y, 1); r(44, y, 1); r(58, y, 1); r(64, y, 1);\r
+  R(15, y, 3); R(21, y, 1); R(32, y, 4); R(45, y, 4); R(54, y, 1); R(59, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(33, y, 1); r(46, y, 1); r(61, y, 1); r(64, y, 1);\r
+  R(16, y, 3); R(21, y, 1); R(34, y, 2); R(47, y, 2); R(54, y, 1); R(59, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(16, y, 4); r(36, y, 1); r(49, y, 1); r(59, y, 1); r(63, y, 1);\r
+  R(17, y, 2); R(21, y, 1); R(34, y, 2); R(47, y, 2); R(54, y, 1); R(60, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(9, y, 1); r(17, y, 4); r(26, y, 1); r(36, y, 1); r(39, y, 1); r(49, y, 1);\r
+  R(18, y, 2); R(21, y, 1); R(35, y, 1); R(48, y, 1); R(54, y, 1); R(60, y, 2); R(63, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(26, y, 2); r(39, y, 2); r(63, y, 1);\r
+  R(9, y, 1); R(18, y, 4); R(35, y, 1); R(48, y, 1); R(54, y, 1); R(60, y, 3); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(34, y, 1); r(47, y, 1); r(60, y, 1);\r
+  R(9, y, 1); R(19, y, 3); R(26, y, 2); R(35, y, 1); R(39, y, 2); R(48, y, 1); R(54, y, 1); R(61, y, 2); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(8, y, 1); r(35, y, 1); r(48, y, 1); r(62, y, 1); r(71, y, 1);\r
+  R(9, y, 1); R(20, y, 2); R(26, y, 3); R(34, y, 1); R(39, y, 3); R(47, y, 1); R(54, y, 1); R(61, y, 1); R(69, y, 2);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  r(11, y, 1); r(26, y, 1); r(28, y, 5); r(39, y, 1); r(41, y, 5); r(51, y, 7); r(61, y, 1); r(66, y, 8);\r
+  R(7, y, 4); R(21, y, 1); R(29, y, 1); R(33, y, 1); R(42, y, 1); R(46, y, 1); R(52, y, 5); R(67, y, 7);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+\r
+  b(0, y, 80);\r
+  y++;\r
+}\r
+\r
+int _tmain(int argc, TCHAR **argv) {\r
+  check_console();\r
+\r
+#ifdef UNICODE\r
+  /*\r
+    Ensure we write in UTF-16 mode, so that non-ASCII characters don't get\r
+    mangled.  If we were compiled in ANSI mode it won't work.\r
+   */\r
+  _setmode(_fileno(stdout), _O_U16TEXT);\r
+  _setmode(_fileno(stderr), _O_U16TEXT);\r
+#endif\r
+\r
   /* Remember if we are admin */\r
   check_admin();\r
 \r
   /* Elevate */\r
   if (argc > 1) {\r
-    /* Valid commands are install or remove */\r
-    if (str_equiv(argv[1], "install")) {\r
+    /*\r
+      Valid commands are:\r
+      start, stop, pause, continue, install, edit, get, set, reset, unset, remove\r
+    */\r
+    if (str_equiv(argv[1], _T("start"))) exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("stop"))) exit(control_service(SERVICE_CONTROL_STOP, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("restart"))) {\r
+      int ret = control_service(SERVICE_CONTROL_STOP, argc - 2, argv + 2);\r
+      if (ret) exit(ret);\r
+      exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
+    }\r
+    if (str_equiv(argv[1], _T("pause"))) exit(control_service(SERVICE_CONTROL_PAUSE, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("continue"))) exit(control_service(SERVICE_CONTROL_CONTINUE, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("status"))) exit(control_service(SERVICE_CONTROL_INTERROGATE, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("rotate"))) exit(control_service(NSSM_SERVICE_CONTROL_ROTATE, argc - 2, argv + 2));\r
+    if (str_equiv(argv[1], _T("install"))) {\r
       if (! is_admin) {\r
         print_message(stderr, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_INSTALL);\r
         exit(100);\r
       }\r
       exit(pre_install_service(argc - 2, argv + 2));\r
     }\r
-    if (str_equiv(argv[1], "remove")) {\r
+    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
+      if (! is_admin) {\r
+        print_message(stderr, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_EDIT);\r
+        exit(100);\r
+      }\r
+      int ret = pre_edit_service(argc - 1, argv + 1);\r
+      /* There might be a password here. */\r
+      for (int i = 0; i < argc; i++) SecureZeroMemory(argv[i], _tcslen(argv[i]) * sizeof(TCHAR));\r
+      exit(ret);\r
+    }\r
+    if (str_equiv(argv[1], _T("remove"))) {\r
       if (! is_admin) {\r
         print_message(stderr, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_REMOVE);\r
         exit(100);\r