winhttp: Implement IWinHttpRequest::SetAutoLogonPolicy.
[wine] / programs / uninstaller / main.c
1 /*
2  * Uninstaller
3  *
4  * Copyright 2000 Andreas Mohr
5  * Copyright 2004 Hannu Valtonen
6  * Copyright 2005 Jonathan Ernst
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  *
22  */
23
24 #include <stdio.h>
25 #include <string.h>
26 #include <windows.h>
27 #include <shlwapi.h>
28 #include "resource.h"
29 #include "regstr.h"
30 #include "wine/debug.h"
31
32 WINE_DEFAULT_DEBUG_CHANNEL(uninstaller);
33
34 extern void WINAPI Control_RunDLL(HWND hWnd, HINSTANCE hInst, LPCSTR cmd, DWORD nCmdShow);
35
36 typedef struct {
37     HKEY  root;
38     WCHAR *key;
39     WCHAR *descr;
40     WCHAR *command;
41     int active;
42 } uninst_entry;
43 static uninst_entry *entries = NULL;
44 static unsigned int numentries = 0;
45 static int list_need_update = 1;
46 static int oldsel = -1;
47 static WCHAR *sFilter;
48
49 static int FetchUninstallInformation(void);
50 static void UninstallProgram(void);
51 static int cmp_by_name(const void *a, const void *b);
52
53 static const WCHAR BackSlashW[] = { '\\', 0 };
54 static const WCHAR DisplayNameW[] = {'D','i','s','p','l','a','y','N','a','m','e',0};
55 static const WCHAR PathUninstallW[] = {
56         'S','o','f','t','w','a','r','e','\\',
57         'M','i','c','r','o','s','o','f','t','\\',
58         'W','i','n','d','o','w','s','\\',
59         'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
60         'U','n','i','n','s','t','a','l','l',0 };
61 static const WCHAR UninstallCommandlineW[] = {'U','n','i','n','s','t','a','l','l','S','t','r','i','n','g',0};
62 static const WCHAR WindowsInstallerW[] = {'W','i','n','d','o','w','s','I','n','s','t','a','l','l','e','r',0};
63 static const WCHAR SystemComponentW[] = {'S','y','s','t','e','m','C','o','m','p','o','n','e','n','t',0};
64
65 /**
66  * Used to output program list when used with --list
67  */
68 static void ListUninstallPrograms(void)
69 {
70     unsigned int i;
71     int lenDescr, lenKey;
72     char *descr;
73     char *key;
74
75     FetchUninstallInformation();
76
77     for (i=0; i < numentries; i++)
78     {
79         lenDescr = WideCharToMultiByte(CP_UNIXCP, 0, entries[i].descr, -1, NULL, 0, NULL, NULL); 
80         lenKey = WideCharToMultiByte(CP_UNIXCP, 0, entries[i].key, -1, NULL, 0, NULL, NULL); 
81         descr = HeapAlloc(GetProcessHeap(), 0, lenDescr);
82         key = HeapAlloc(GetProcessHeap(), 0, lenKey);
83         WideCharToMultiByte(CP_UNIXCP, 0, entries[i].descr, -1, descr, lenDescr, NULL, NULL);
84         WideCharToMultiByte(CP_UNIXCP, 0, entries[i].key, -1, key, lenKey, NULL, NULL);
85         printf("%s|||%s\n", key, descr);
86         HeapFree(GetProcessHeap(), 0, descr);
87         HeapFree(GetProcessHeap(), 0, key);
88     }
89 }
90
91
92 static void RemoveSpecificProgram(WCHAR *nameW)
93 {
94     unsigned int i;
95     int lenName;
96     char *name;
97
98     FetchUninstallInformation();
99
100     for (i=0; i < numentries; i++)
101     {
102         if (CompareStringW(GetThreadLocale(), NORM_IGNORECASE, entries[i].key, -1, nameW, -1) == CSTR_EQUAL)
103         {
104             entries[i].active++;
105             break;
106         }
107     }
108
109     if (i < numentries)
110         UninstallProgram();
111     else
112     {
113         lenName = WideCharToMultiByte(CP_UNIXCP, 0, nameW, -1, NULL, 0, NULL, NULL); 
114         name = HeapAlloc(GetProcessHeap(), 0, lenName);
115         WideCharToMultiByte(CP_UNIXCP, 0, nameW, -1, name, lenName, NULL, NULL);
116         fprintf(stderr, "Error: could not match application [%s]\n", name);
117         HeapFree(GetProcessHeap(), 0, name);
118     }
119 }
120
121
122 int wmain(int argc, WCHAR *argv[])
123 {
124     LPCWSTR token = NULL;
125     static const WCHAR listW[] = { '-','-','l','i','s','t',0 };
126     static const WCHAR removeW[] = { '-','-','r','e','m','o','v','e',0 };
127     int i = 1;
128
129     while( i<argc )
130     {
131         token = argv[i++];
132         
133         /* Handle requests just to list the applications */
134         if( !lstrcmpW( token, listW ) )
135         {
136             ListUninstallPrograms();
137             return 0;
138         }
139         else if( !lstrcmpW( token, removeW ) )
140         {
141             if( i >= argc )
142             {
143                 WINE_ERR( "The remove option requires a parameter.\n");
144                 return 1;
145             }
146
147             RemoveSpecificProgram( argv[i++] );
148             return 0;
149         }
150         else 
151         {
152             WINE_ERR( "unknown option %s\n",wine_dbgstr_w(token));
153             return 1;
154         }
155     }
156
157     /* Start the GUI control panel */
158     Control_RunDLL(GetDesktopWindow(), 0, "appwiz.cpl", SW_SHOW);
159     return 1;
160 }
161
162
163 /**
164  * Used to sort entries by name.
165  */
166 static int cmp_by_name(const void *a, const void *b)
167 {
168     return lstrcmpiW(((const uninst_entry *)a)->descr, ((const uninst_entry *)b)->descr);
169 }
170
171
172 /**
173  * Fetch information from the uninstall key.
174  */
175 static int FetchFromRootKey(HKEY root)
176 {
177     HKEY hkeyApp;
178     int i;
179     DWORD sizeOfSubKeyName, displen, uninstlen, value, type, size;
180     WCHAR subKeyName[256];
181
182     sizeOfSubKeyName = 255;
183     for (i=0; RegEnumKeyExW( root, i, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, NULL ) != ERROR_NO_MORE_ITEMS; ++i)
184     {
185         RegOpenKeyExW(root, subKeyName, 0, KEY_READ, &hkeyApp);
186         if (!RegQueryValueExW(hkeyApp, SystemComponentW, NULL, &type, (LPBYTE)&value, &size) &&
187             type == REG_DWORD && value == 1)
188         {
189             RegCloseKey(hkeyApp);
190             sizeOfSubKeyName = 255;
191             continue;
192         }
193         if (!RegQueryValueExW(hkeyApp, DisplayNameW, NULL, NULL, NULL, &displen))
194         {
195             WCHAR *command;
196
197             size = sizeof(value);
198             if (!RegQueryValueExW(hkeyApp, WindowsInstallerW, NULL, &type, (LPBYTE)&value, &size) &&
199                 type == REG_DWORD && value == 1)
200             {
201                 static const WCHAR fmtW[] = {'m','s','i','e','x','e','c',' ','/','x','%','s',0};
202                 command = HeapAlloc(GetProcessHeap(), 0, (lstrlenW(fmtW) + lstrlenW(subKeyName)) * sizeof(WCHAR));
203                 wsprintfW(command, fmtW, subKeyName);
204             }
205             else if (!RegQueryValueExW(hkeyApp, UninstallCommandlineW, NULL, NULL, NULL, &uninstlen))
206             {
207                 command = HeapAlloc(GetProcessHeap(), 0, uninstlen);
208                 RegQueryValueExW(hkeyApp, UninstallCommandlineW, 0, 0, (LPBYTE)command, &uninstlen);
209             }
210             else
211             {
212                 RegCloseKey(hkeyApp);
213                 sizeOfSubKeyName = 255;
214                 continue;
215             }
216             numentries++;
217             entries = HeapReAlloc(GetProcessHeap(), 0, entries, numentries*sizeof(uninst_entry));
218             entries[numentries-1].root = root;
219             entries[numentries-1].key = HeapAlloc(GetProcessHeap(), 0, (lstrlenW(subKeyName)+1)*sizeof(WCHAR));
220             lstrcpyW(entries[numentries-1].key, subKeyName);
221             entries[numentries-1].descr = HeapAlloc(GetProcessHeap(), 0, displen);
222             RegQueryValueExW(hkeyApp, DisplayNameW, 0, 0, (LPBYTE)entries[numentries-1].descr, &displen);
223             entries[numentries-1].command = command;
224             entries[numentries-1].active = 0;
225             WINE_TRACE("allocated entry #%d: %s (%s), %s\n",
226             numentries, wine_dbgstr_w(entries[numentries-1].key), wine_dbgstr_w(entries[numentries-1].descr), wine_dbgstr_w(entries[numentries-1].command));
227             if(sFilter != NULL && StrStrIW(entries[numentries-1].descr,sFilter)==NULL)
228                 numentries--;
229         }
230         RegCloseKey(hkeyApp);
231         sizeOfSubKeyName = 255;
232     }
233     return 1;
234
235 }
236
237 static int FetchUninstallInformation(void)
238 {
239     static const BOOL is_64bit = sizeof(void *) > sizeof(int);
240     int rc = 0;
241     HKEY root;
242
243     numentries = 0;
244     oldsel = -1;
245     if (!entries)
246         entries = HeapAlloc(GetProcessHeap(), 0, sizeof(uninst_entry));
247
248     if (!RegOpenKeyExW(HKEY_LOCAL_MACHINE, PathUninstallW, 0, KEY_READ, &root))
249     {
250         rc |= FetchFromRootKey(root);
251         RegCloseKey(root);
252     }
253     if (is_64bit &&
254         !RegOpenKeyExW(HKEY_LOCAL_MACHINE, PathUninstallW, 0, KEY_READ|KEY_WOW64_32KEY, &root))
255     {
256         rc |= FetchFromRootKey(root);
257         RegCloseKey(root);
258     }
259     if (!RegOpenKeyExW(HKEY_CURRENT_USER, PathUninstallW, 0, KEY_READ, &root))
260     {
261         rc |= FetchFromRootKey(root);
262         RegCloseKey(root);
263     }
264
265     qsort(entries, numentries, sizeof(uninst_entry), cmp_by_name);
266     return rc;
267 }
268
269 static void UninstallProgram(void)
270 {
271     unsigned int i;
272     WCHAR errormsg[1024];
273     BOOL res;
274     STARTUPINFOW si;
275     PROCESS_INFORMATION info;
276     DWORD exit_code;
277     HKEY hkey;
278     for (i=0; i < numentries; i++)
279     {
280         if (!(entries[i].active)) /* don't uninstall this one */
281             continue;
282         WINE_TRACE("uninstalling %s\n", wine_dbgstr_w(entries[i].descr));
283         memset(&si, 0, sizeof(STARTUPINFOW));
284         si.cb = sizeof(STARTUPINFOW);
285         si.wShowWindow = SW_NORMAL;
286         res = CreateProcessW(NULL, entries[i].command, NULL, NULL, FALSE, 0, NULL, NULL, &si, &info);
287         if (res)
288         {   /* wait for the process to exit */
289             WaitForSingleObject(info.hProcess, INFINITE);
290             res = GetExitCodeProcess(info.hProcess, &exit_code);
291             WINE_TRACE("%d: %08x\n", res, exit_code);
292         }
293         else
294         {
295             WCHAR sAppName[MAX_STRING_LEN];
296             WCHAR sUninstallFailed[MAX_STRING_LEN];
297             HINSTANCE hInst = GetModuleHandleW(0);
298
299             LoadStringW(hInst, IDS_APPNAME, sAppName, sizeof(sAppName)/sizeof(WCHAR));
300             LoadStringW(hInst, IDS_UNINSTALLFAILED, sUninstallFailed, sizeof(sUninstallFailed)/sizeof(WCHAR));
301             wsprintfW(errormsg, sUninstallFailed, entries[i].command);
302             if(MessageBoxW(0, errormsg, sAppName, MB_YESNO | MB_ICONQUESTION)==IDYES)
303             {
304                 /* delete the application's uninstall entry */
305                 RegOpenKeyExW(entries[i].root, PathUninstallW, 0, KEY_READ, &hkey);
306                 RegDeleteKeyW(hkey, entries[i].key);
307                 RegCloseKey(hkey);
308             }
309         }
310     }
311     WINE_TRACE("finished uninstall phase.\n");
312     list_need_update = 1;
313 }