s390x/sclpconsole-lm: Fix hanging SCLP line mode console
[qemu.git] / qga / service-win32.c
1 /*
2 * QEMU Guest Agent helpers for win32 service management
3 *
4 * Copyright IBM Corp. 2012
5 *
6 * Authors:
7 * Gal Hammer <ghammer@redhat.com>
8 * Michael Roth <mdroth@linux.vnet.ibm.com>
9 *
10 * This work is licensed under the terms of the GNU GPL, version 2 or later.
11 * See the COPYING file in the top-level directory.
12 */
13 #include <stdlib.h>
14 #include <stdio.h>
15 #include <glib.h>
16 #include <windows.h>
17 #include "qga/service-win32.h"
18
19 static int printf_win_error(const char *text)
20 {
21 DWORD err = GetLastError();
22 char *message;
23 int n;
24
25 FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |
26 FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS,
27 NULL,
28 err,
29 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
30 (char *)&message, 0,
31 NULL);
32 n = fprintf(stderr, "%s. (Error: %d) %s", text, (int)err, message);
33 LocalFree(message);
34
35 return n;
36 }
37
38 /* Windows command line escaping. Based on
39 * <http://blogs.msdn.com/b/oldnewthing/archive/2010/09/17/10063629.aspx> and
40 * <http://msdn.microsoft.com/en-us/library/windows/desktop/17w5ykft%28v=vs.85%29.aspx>.
41 *
42 * The caller is responsible for initializing @buffer; prior contents are lost.
43 */
44 static const char *win_escape_arg(const char *to_escape, GString *buffer)
45 {
46 size_t backslash_count;
47 const char *c;
48
49 /* open with a double quote */
50 g_string_assign(buffer, "\"");
51
52 backslash_count = 0;
53 for (c = to_escape; *c != '\0'; ++c) {
54 switch (*c) {
55 case '\\':
56 /* The meaning depends on the first non-backslash character coming
57 * up.
58 */
59 ++backslash_count;
60 break;
61
62 case '"':
63 /* We must escape each pending backslash, then escape the double
64 * quote. This creates a case of "odd number of backslashes [...]
65 * followed by a double quotation mark".
66 */
67 while (backslash_count) {
68 --backslash_count;
69 g_string_append(buffer, "\\\\");
70 }
71 g_string_append(buffer, "\\\"");
72 break;
73
74 default:
75 /* Any pending backslashes are without special meaning, flush them.
76 * "Backslashes are interpreted literally, unless they immediately
77 * precede a double quotation mark."
78 */
79 while (backslash_count) {
80 --backslash_count;
81 g_string_append_c(buffer, '\\');
82 }
83 g_string_append_c(buffer, *c);
84 }
85 }
86
87 /* We're about to close with a double quote in string delimiter role.
88 * Double all pending backslashes, creating a case of "even number of
89 * backslashes [...] followed by a double quotation mark".
90 */
91 while (backslash_count) {
92 --backslash_count;
93 g_string_append(buffer, "\\\\");
94 }
95 g_string_append_c(buffer, '"');
96
97 return buffer->str;
98 }
99
100 int ga_install_service(const char *path, const char *logfile,
101 const char *state_dir)
102 {
103 int ret = EXIT_FAILURE;
104 SC_HANDLE manager;
105 SC_HANDLE service;
106 TCHAR module_fname[MAX_PATH];
107 GString *esc;
108 GString *cmdline;
109 SERVICE_DESCRIPTION desc = { (char *)QGA_SERVICE_DESCRIPTION };
110
111 if (GetModuleFileName(NULL, module_fname, MAX_PATH) == 0) {
112 printf_win_error("No full path to service's executable");
113 return EXIT_FAILURE;
114 }
115
116 esc = g_string_new("");
117 cmdline = g_string_new("");
118
119 g_string_append_printf(cmdline, "%s -d",
120 win_escape_arg(module_fname, esc));
121
122 if (path) {
123 g_string_append_printf(cmdline, " -p %s", win_escape_arg(path, esc));
124 }
125 if (logfile) {
126 g_string_append_printf(cmdline, " -l %s -v",
127 win_escape_arg(logfile, esc));
128 }
129 if (state_dir) {
130 g_string_append_printf(cmdline, " -t %s",
131 win_escape_arg(state_dir, esc));
132 }
133
134 g_debug("service's cmdline: %s", cmdline->str);
135
136 manager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
137 if (manager == NULL) {
138 printf_win_error("No handle to service control manager");
139 goto out_strings;
140 }
141
142 service = CreateService(manager, QGA_SERVICE_NAME, QGA_SERVICE_DISPLAY_NAME,
143 SERVICE_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS, SERVICE_AUTO_START,
144 SERVICE_ERROR_NORMAL, cmdline->str, NULL, NULL, NULL, NULL, NULL);
145 if (service == NULL) {
146 printf_win_error("Failed to install service");
147 goto out_manager;
148 }
149
150 ChangeServiceConfig2(service, SERVICE_CONFIG_DESCRIPTION, &desc);
151 fprintf(stderr, "Service was installed successfully.\n");
152 ret = EXIT_SUCCESS;
153 CloseServiceHandle(service);
154
155 out_manager:
156 CloseServiceHandle(manager);
157
158 out_strings:
159 g_string_free(cmdline, TRUE);
160 g_string_free(esc, TRUE);
161 return ret;
162 }
163
164 int ga_uninstall_service(void)
165 {
166 SC_HANDLE manager;
167 SC_HANDLE service;
168
169 manager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
170 if (manager == NULL) {
171 printf_win_error("No handle to service control manager");
172 return EXIT_FAILURE;
173 }
174
175 service = OpenService(manager, QGA_SERVICE_NAME, DELETE);
176 if (service == NULL) {
177 printf_win_error("No handle to service");
178 CloseServiceHandle(manager);
179 return EXIT_FAILURE;
180 }
181
182 if (DeleteService(service) == FALSE) {
183 printf_win_error("Failed to delete service");
184 } else {
185 fprintf(stderr, "Service was deleted successfully.\n");
186 }
187
188 CloseServiceHandle(service);
189 CloseServiceHandle(manager);
190
191 return EXIT_SUCCESS;
192 }