\r
extern unsigned long tls_index;\r
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
+static TCHAR unquoted_imagepath[PATH_LENGTH];\r
+static TCHAR imagepath[PATH_LENGTH];\r
+static TCHAR imageargv0[PATH_LENGTH];\r
+\r
+void nssm_exit(int status) {\r
+ free_imports();\r
+ unsetup_utf8();\r
+ exit(status);\r
+}\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
+/* Does a char need to be escaped? */\r
+static bool needs_escape(const TCHAR c) {\r
+ if (c == _T('"')) return true;\r
+ if (c == _T('&')) return true;\r
+ if (c == _T('%')) return true;\r
+ if (c == _T('^')) return true;\r
+ if (c == _T('<')) return true;\r
+ if (c == _T('>')) return true;\r
+ if (c == _T('|')) return true;\r
+ return false;\r
+}\r
+\r
+/* Does a char need to be quoted? */\r
+static bool needs_quote(const TCHAR c) {\r
+ if (c == _T(' ')) return true;\r
+ if (c == _T('\t')) return true;\r
+ if (c == _T('\n')) return true;\r
+ if (c == _T('\v')) return true;\r
+ if (c == _T('"')) return true;\r
+ if (c == _T('*')) return true;\r
+ return needs_escape(c);\r
+}\r
+\r
+/* https://blogs.msdn.microsoft.com/twistylittlepassagesallalike/2011/04/23/everyone-quotes-command-line-arguments-the-wrong-way/ */\r
+/* http://www.robvanderwoude.com/escapechars.php */\r
+int quote(const TCHAR *unquoted, TCHAR *buffer, size_t buflen) {\r
+ size_t i, j, n;\r
+ size_t len = _tcslen(unquoted);\r
+ if (len > buflen - 1) return 1;\r
+\r
+ bool escape = false;\r
+ bool quotes = false;\r
+\r
+ for (i = 0; i < len; i++) {\r
+ if (needs_escape(unquoted[i])) {\r
+ escape = quotes = true;\r
+ break;\r
+ }\r
+ if (needs_quote(unquoted[i])) quotes = true;\r
+ }\r
+ if (! quotes) {\r
+ memmove(buffer, unquoted, (len + 1) * sizeof(TCHAR));\r
+ return 0;\r
+ }\r
+\r
+ /* "" */\r
+ size_t quoted_len = 2;\r
+ if (escape) quoted_len += 2;\r
for (i = 0; ; i++) {\r
- if (tolower(b[i]) != tolower(a[i])) return 0;\r
- if (! a[i]) return 1;\r
+ n = 0;\r
+\r
+ while (i != len && unquoted[i] == _T('\\')) {\r
+ i++;\r
+ n++;\r
+ }\r
+\r
+ if (i == len) {\r
+ quoted_len += n * 2;\r
+ break;\r
+ }\r
+ else if (unquoted[i] == _T('"')) quoted_len += n * 2 + 2;\r
+ else quoted_len += n + 1;\r
+ if (needs_escape(unquoted[i])) quoted_len += n;\r
}\r
+ if (quoted_len > buflen - 1) return 1;\r
+\r
+ TCHAR *s = buffer;\r
+ if (escape) *s++ = _T('^');\r
+ *s++ = _T('"');\r
+\r
+ for (i = 0; ; i++) {\r
+ n = 0;\r
+\r
+ while (i != len && unquoted[i] == _T('\\')) {\r
+ i++;\r
+ n++;\r
+ }\r
+\r
+ if (i == len) {\r
+ for (j = 0; j < n * 2; j++) {\r
+ if (escape) *s++ = _T('^');\r
+ *s++ = _T('\\');\r
+ }\r
+ break;\r
+ }\r
+ else if (unquoted[i] == _T('"')) {\r
+ for (j = 0; j < n * 2 + 1; j++) {\r
+ if (escape) *s++ = _T('^');\r
+ *s++ = _T('\\');\r
+ }\r
+ if (escape && needs_escape(unquoted[i])) *s++ = _T('^');\r
+ *s++ = unquoted[i];\r
+ }\r
+ else {\r
+ for (j = 0; j < n; j++) {\r
+ if (escape) *s++ = _T('^');\r
+ *s++ = _T('\\');\r
+ }\r
+ if (escape && needs_escape(unquoted[i])) *s++ = _T('^');\r
+ *s++ = unquoted[i];\r
+ }\r
+ }\r
+ if (escape) *s++ = _T('^');\r
+ *s++ = _T('"');\r
+ *s++ = _T('\0');\r
+\r
+ return 0;\r
+}\r
+\r
+/* Remove basename of a path. */\r
+void strip_basename(TCHAR *buffer) {\r
+ size_t len = _tcslen(buffer);\r
+ size_t i;\r
+ for (i = len; i && buffer[i] != _T('\\') && buffer[i] != _T('/'); i--);\r
+ /* X:\ is OK. */\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
FreeSid(AdministratorsGroup);\r
}\r
\r
-int main(int argc, char **argv) {\r
+static int elevate(int argc, TCHAR **argv, unsigned long message) {\r
+ print_message(stderr, message);\r
+\r
+ SHELLEXECUTEINFO sei;\r
+ ZeroMemory(&sei, sizeof(sei));\r
+ sei.cbSize = sizeof(sei);\r
+ sei.lpVerb = _T("runas");\r
+ sei.lpFile = (TCHAR *) nssm_imagepath();\r
+\r
+ TCHAR *args = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, EXE_LENGTH * sizeof(TCHAR));\r
+ if (! args) {\r
+ print_message(stderr, NSSM_MESSAGE_OUT_OF_MEMORY, _T("GetCommandLine()"), _T("elevate()"));\r
+ return 111;\r
+ }\r
+\r
+ /* Get command line, which includes the path to NSSM, and skip that part. */\r
+ _sntprintf_s(args, EXE_LENGTH, _TRUNCATE, _T("%s"), GetCommandLine());\r
+ size_t s = _tcslen(argv[0]) + 1;\r
+ if (args[0] == _T('"')) s += 2;\r
+ while (isspace(args[s])) s++;\r
+\r
+ sei.lpParameters = args + s;\r
+ sei.nShow = SW_SHOW;\r
+\r
+ unsigned long exitcode = 0;\r
+ if (! ShellExecuteEx(&sei)) exitcode = 100;\r
+\r
+ HeapFree(GetProcessHeap(), 0, (void *) args);\r
+ return exitcode;\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
+const TCHAR *nssm_unquoted_imagepath() {\r
+ return unquoted_imagepath;\r
+}\r
+\r
+const TCHAR *nssm_imagepath() {\r
+ return imagepath;\r
+}\r
+\r
+const TCHAR *nssm_exe() {\r
+ return imageargv0;\r
+}\r
+\r
+int _tmain(int argc, TCHAR **argv) {\r
+ if (check_console()) setup_utf8();\r
+\r
/* Remember if we are admin */\r
check_admin();\r
\r
+ /* Set up function pointers. */\r
+ if (get_imports()) nssm_exit(111);\r
+\r
+ /* Remember our path for later. */\r
+ _sntprintf_s(imageargv0, _countof(imageargv0), _TRUNCATE, _T("%s"), argv[0]);\r
+ PathQuoteSpaces(imageargv0);\r
+ GetModuleFileName(0, unquoted_imagepath, _countof(unquoted_imagepath));\r
+ GetModuleFileName(0, imagepath, _countof(imagepath));\r
+ PathQuoteSpaces(imagepath);\r
+\r
/* Elevate */\r
if (argc > 1) {\r
- /* Valid commands are install or remove */\r
- if (str_equiv(argv[1], "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
+ Valid commands are:\r
+ start, stop, pause, continue, install, edit, get, set, reset, unset, remove\r
+ */\r
+ if (str_equiv(argv[1], _T("start"))) nssm_exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("stop"))) nssm_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) nssm_exit(ret);\r
+ nssm_exit(control_service(NSSM_SERVICE_CONTROL_START, argc - 2, argv + 2));\r
}\r
- if (str_equiv(argv[1], "remove")) {\r
- if (! is_admin) {\r
- print_message(stderr, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_REMOVE);\r
- exit(100);\r
- }\r
- exit(pre_remove_service(argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("pause"))) nssm_exit(control_service(SERVICE_CONTROL_PAUSE, argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("continue"))) nssm_exit(control_service(SERVICE_CONTROL_CONTINUE, argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("status"))) nssm_exit(control_service(SERVICE_CONTROL_INTERROGATE, argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("rotate"))) nssm_exit(control_service(NSSM_SERVICE_CONTROL_ROTATE, argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("install"))) {\r
+ if (! is_admin) nssm_exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_INSTALL));\r
+ create_messages();\r
+ nssm_exit(pre_install_service(argc - 2, argv + 2));\r
+ }\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")) || str_equiv(argv[1], _T("dump"))) {\r
+ int ret = pre_edit_service(argc - 1, argv + 1);\r
+ if (ret == 3 && ! is_admin && argc == 3) nssm_exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_EDIT));\r
+ /* There might be a password here. */\r
+ for (int i = 0; i < argc; i++) SecureZeroMemory(argv[i], _tcslen(argv[i]) * sizeof(TCHAR));\r
+ nssm_exit(ret);\r
+ }\r
+ if (str_equiv(argv[1], _T("list"))) nssm_exit(list_nssm_services(argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("processes"))) nssm_exit(service_process_tree(argc - 2, argv + 2));\r
+ if (str_equiv(argv[1], _T("remove"))) {\r
+ if (! is_admin) nssm_exit(elevate(argc, argv, NSSM_MESSAGE_NOT_ADMINISTRATOR_CANNOT_REMOVE));\r
+ nssm_exit(pre_remove_service(argc - 2, argv + 2));\r
}\r
}\r
\r
actually running as a service.\r
This will save time when running with no arguments from a command prompt.\r
*/\r
- if (_fileno(stdin) < 0) {\r
+ if (! GetStdHandle(STD_INPUT_HANDLE)) {\r
/* Start service magic */\r
SERVICE_TABLE_ENTRY table[] = { { NSSM, service_main }, { 0, 0 } };\r
if (! StartServiceCtrlDispatcher(table)) {\r
unsigned long error = GetLastError();\r
/* User probably ran nssm with no argument */\r
- if (error == ERROR_FAILED_SERVICE_CONTROLLER_CONNECT) exit(usage(1));\r
+ if (error == ERROR_FAILED_SERVICE_CONTROLLER_CONNECT) nssm_exit(usage(1));\r
log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_DISPATCHER_FAILED, error_string(error), 0);\r
- exit(100);\r
+ nssm_exit(100);\r
}\r
}\r
- else exit(usage(1));\r
+ else nssm_exit(usage(1));\r
\r
/* And nothing more to do */\r
- exit(0);\r
+ nssm_exit(0);\r
}\r
git://git.iain.cx/iain / nssm.git / blobdiff