winhelp: Specify the lex options directly in the source file.
[wine] / programs / regsvr32 / regsvr32.c
1 /*
2  * PURPOSE: Register OLE components in the registry
3  *
4  * Copyright 2001 ReactOS project
5  * Copyright 2001 Jurgen Van Gael [jurgen.vangael@student.kuleuven.ac.be]
6  * Copyright 2002 Andriy Palamarchuk
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  * This version deliberately differs in error handling compared to the
23  * windows version.
24  */
25
26 /*
27  *
28  *  regsvr32 [/u] [/s] [/n] [/i[:cmdline]] dllname ...
29  *  [/u]    unregister server
30  *  [/s]    silent (no message boxes)
31  *  [/i]    Call DllInstall passing it an optional [cmdline];
32  *          when used with /u calls dll uninstall.
33  *  [/n]    Do not call DllRegisterServer; this option must be used with [/i]
34  *  [/c]    Console output (seems to be deprecated and ignored)
35  *
36  *  Note the complication that this version may be passed unix format file names
37  *  which might be mistaken for flags.  Conveniently the Windows version
38  *  requires each flag to be separate (e.g. no /su ) and so we will simply
39  *  assume that anything longer than /. is a filename.
40  */
41
42 /**
43  * FIXME - currently receives command-line parameters in ASCII only and later
44  * converts to Unicode. Ideally the function should have wWinMain entry point
45  * and then work in Unicode only, but it seems Wine does not have necessary
46  * support.
47  */
48
49 #define WIN32_LEAN_AND_MEAN
50
51 #include "config.h"
52 #include "wine/port.h"
53
54 #include <stdio.h>
55 #include <string.h>
56 #include <windows.h>
57 #include <ole2.h>
58
59 typedef HRESULT (*DLLREGISTER)          (void);
60 typedef HRESULT (*DLLUNREGISTER)        (void);
61 typedef HRESULT (*DLLINSTALL)           (BOOL,LPCWSTR);
62
63 int Silent = 0;
64
65 static int Usage(void)
66 {
67     printf("regsvr32 [/u] [/s] [/n] [/i[:cmdline]] dllname ...\n");
68     printf("\t[/u]  unregister server\n");
69     printf("\t[/s]  silent (no message boxes)\n");
70     printf("\t[/i]  Call DllInstall passing it an optional [cmdline];\n");
71     printf("\t      when used with /u calls dll uninstall\n");
72     printf("\t[/n]  Do not call DllRegisterServer; this option "
73            "must be used with [/i]\n");
74     return 0;
75 }
76
77 /**
78  * Loads procedure.
79  *
80  * Parameters:
81  * strDll - name of the dll.
82  * procName - name of the procedure to load from dll
83  * pDllHanlde - output variable receives handle of the loaded dll.
84  */
85 static VOID *LoadProc(const char* strDll, const char* procName, HMODULE* DllHandle)
86 {
87     VOID* (*proc)(void);
88
89     *DllHandle = LoadLibraryEx(strDll, 0, LOAD_WITH_ALTERED_SEARCH_PATH);
90     if(!*DllHandle)
91     {
92         if(!Silent)
93             printf("Failed to load DLL %s\n", strDll);
94
95         ExitProcess(1);
96     }
97     proc = (VOID *) GetProcAddress(*DllHandle, procName);
98     if(!proc)
99     {
100         if(!Silent)
101             printf("%s not implemented in DLL %s\n", procName, strDll);
102         FreeLibrary(*DllHandle);
103         ExitProcess(1);
104     }
105     return proc;
106 }
107
108 static int RegisterDll(const char* strDll)
109 {
110     HRESULT hr;
111     DLLREGISTER pfRegister;
112     HMODULE DllHandle = NULL;
113
114     pfRegister = LoadProc(strDll, "DllRegisterServer", &DllHandle);
115
116     hr = pfRegister();
117     if(FAILED(hr))
118     {
119         if(!Silent)
120             printf("Failed to register DLL %s\n", strDll);
121
122         return -1;
123     }
124     if(!Silent)
125         printf("Successfully registered DLL %s\n", strDll);
126
127     if(DllHandle)
128         FreeLibrary(DllHandle);
129     return 0;
130 }
131
132 static int UnregisterDll(char* strDll)
133 {
134     HRESULT hr;
135     DLLUNREGISTER pfUnregister;
136     HMODULE DllHandle = NULL;
137
138     pfUnregister = LoadProc(strDll, "DllUnregisterServer", &DllHandle);
139     hr = pfUnregister();
140     if(FAILED(hr))
141     {
142         if(!Silent)
143             printf("Failed to unregister DLL %s\n", strDll);
144
145         return -1;
146     }
147     if(!Silent)
148         printf("Successfully unregistered DLL %s\n", strDll);
149
150     if(DllHandle)
151         FreeLibrary(DllHandle);
152     return 0;
153 }
154
155 static int InstallDll(BOOL install, char *strDll, WCHAR *command_line)
156 {
157     HRESULT hr;
158     DLLINSTALL pfInstall;
159     HMODULE DllHandle = NULL;
160
161     pfInstall = LoadProc(strDll, "DllInstall", &DllHandle);
162     hr = pfInstall(install, command_line);
163     if(FAILED(hr))
164     {
165         if(!Silent)
166             printf("Failed to %s DLL %s\n", install ? "install" : "uninstall",
167                    strDll);
168         return -1;
169     }
170     if(!Silent)
171         printf("Successfully %s DLL %s\n",  install ? "installed" : "uninstalled",
172                strDll);
173
174     if(DllHandle)
175         FreeLibrary(DllHandle);
176     return 0;
177 }
178
179 int main(int argc, char* argv[])
180 {
181     int             i;
182     BOOL            CallRegister = TRUE;
183     BOOL            CallInstall = FALSE;
184     BOOL            Unregister = FALSE;
185     BOOL            DllFound = FALSE;
186     WCHAR*          wsCommandLine = NULL;
187     WCHAR           EmptyLine[1] = {0};
188
189     OleInitialize(NULL);
190
191     /* Strictly, the Microsoft version processes all the flags before
192      * the files (e.g. regsvr32 file1 /s file2 is silent even for file1.
193      * For ease, we will not replicate that and will process the arguments
194      * in order.
195      */
196     for(i = 1; i < argc; i++)
197     {
198         if ((!strcasecmp(argv[i], "/u")) ||(!strcasecmp(argv[i], "-u")))
199                 Unregister = TRUE;
200         else if ((!strcasecmp(argv[i], "/s"))||(!strcasecmp(argv[i], "-s")))
201                 Silent = 1;
202         else if ((!strncasecmp(argv[i], "/i", strlen("/i")))||(!strncasecmp(argv[i], "-i", strlen("-i"))))
203         {
204             CHAR* command_line = argv[i] + strlen("/i");
205
206             CallInstall = TRUE;
207             if (command_line[0] == ':' && command_line[1])
208             {
209                 int len = strlen(command_line);
210
211                 command_line++;
212                 len--;
213                 /* remove double quotes */
214                 if (command_line[0] == '"')
215                 {
216                     command_line++;
217                     len--;
218                     if (command_line[0])
219                     {
220                         len--;
221                         command_line[len] = 0;
222                     }
223                 }
224                 if (command_line[0])
225                 {
226                     len = MultiByteToWideChar(CP_ACP, 0, command_line, -1,
227                                               NULL, 0);
228                     wsCommandLine = HeapAlloc(GetProcessHeap(), 0,
229                                               len * sizeof(WCHAR));
230                     if (wsCommandLine)
231                         MultiByteToWideChar(CP_ACP, 0, command_line, -1,
232                                             wsCommandLine, len);
233                 }
234                 else
235                 {
236                     wsCommandLine = EmptyLine;
237                 }
238             }
239             else
240             {
241                 wsCommandLine = EmptyLine;
242             }
243         }
244         else if((!strcasecmp(argv[i], "/n"))||(!strcasecmp(argv[i], "-n")))
245             CallRegister = FALSE;
246         else if((!strcasecmp(argv[i], "/c"))||(!strcasecmp(argv[i], "-c")))
247             /* console output */;
248         else if (argv[i][0] == '/' && (!argv[i][2] || argv[i][2] == ':'))
249             printf("Unrecognized switch %s\n", argv[i]);
250         else
251         {
252             char *DllName = argv[i];
253             int res = 0;
254
255             DllFound = TRUE;
256             if (!CallInstall || (CallInstall && CallRegister))
257             {
258                 if(Unregister)
259                     res = UnregisterDll(DllName);
260                 else
261                     res = RegisterDll(DllName);
262             }
263
264             if (res)
265                 return res;
266             /* Confirmed.  The windows version does stop on the first error.*/
267
268             if (CallInstall)
269             {
270                 res = InstallDll(!Unregister, DllName, wsCommandLine);
271             }
272
273             if (res)
274                 return res;
275         }
276     }
277
278     if (!DllFound)
279     {
280         if(!Silent)
281             return Usage();
282         else
283             return -1;
284     }
285
286     OleUninitialize();
287
288     return 0;
289 }