rpcrt4: Abstract RPCRT4_SpawnConnection.
[wine] / programs / start / start.c
1 /*
2  * Start a program using ShellExecuteEx, optionally wait for it to finish
3  * Compatible with Microsoft's "c:\windows\command\start.exe"
4  *
5  * Copyright 2003 Dan Kegel
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  */
21
22 #include <windows.h>
23 #include <winuser.h>
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <shlobj.h>
27
28 #include "resources.h"
29
30 /**
31  Output given message to stdout without formatting.
32 */
33 static void output(const char *message)
34 {
35         DWORD count;
36         WriteFile(GetStdHandle(STD_OUTPUT_HANDLE), message, strlen(message), &count, NULL);
37 }
38
39 /**
40  Output given message,
41  followed by ": ",
42  followed by description of given GetLastError() value to stdout,
43  followed by a trailing newline,
44  then terminate.
45 */
46 static void fatal_error(const char *msg, DWORD error_code)
47 {
48         LPVOID lpMsgBuf;
49         int status;
50
51         output(msg);
52         output(": ");
53         status = FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM, NULL, error_code, 0, (LPTSTR) & lpMsgBuf, 0, NULL);
54         if (!status) {
55                 output("FormatMessage failed\n");
56         } else {
57                 output(lpMsgBuf);
58                 LocalFree((HLOCAL) lpMsgBuf);
59                 output("\n");
60         }
61         ExitProcess(1);
62 }
63
64 /**
65  Output given message from string table,
66  followed by ": ",
67  followed by description of given GetLastError() value to stdout,
68  followed by a trailing newline,
69  then terminate.
70 */
71 static void fatal_string_error(int which, DWORD error_code)
72 {
73         char msg[2048];
74
75         if (!LoadString(GetModuleHandle(NULL), which, 
76                                         msg, sizeof(msg)))
77                 fatal_error("LoadString failed", GetLastError());
78
79         fatal_error(msg, error_code);
80 }
81         
82 static void fatal_string(int which)
83 {
84         char msg[2048];
85
86         if (!LoadString(GetModuleHandle(NULL), which, 
87                                         msg, sizeof(msg)))
88                 fatal_error("LoadString failed", GetLastError());
89
90         output(msg);
91         ExitProcess(1);
92 }
93
94 static void usage(void)
95 {
96         fatal_string(STRING_USAGE);
97 }
98
99 static void license(void)
100 {
101         fatal_string(STRING_LICENSE);
102 }
103
104 static char *build_args( int argc, char **argv )
105 {
106         int i, len = 1;
107         char *ret, *p;
108
109         for (i = 0; i < argc; i++ )
110                 len += strlen(argv[i]) + 1;
111         ret = HeapAlloc( GetProcessHeap(), 0, len );
112         ret[0] = 0;
113
114         for (i = 0, p = ret; i < argc; i++ )
115                 p += sprintf(p, " %s", argv[i]);
116         return ret;
117 }
118
119 int main(int argc, char *argv[])
120 {
121         SHELLEXECUTEINFO sei;
122         char *args;
123         int i;
124
125         memset(&sei, 0, sizeof(sei));
126         sei.cbSize = sizeof(sei);
127         sei.lpVerb = "open";
128         sei.nShow = SW_SHOWNORMAL;
129         /* Dunno what these mean, but it looks like winMe's start uses them */
130         sei.fMask = SEE_MASK_FLAG_DDEWAIT|SEE_MASK_FLAG_NO_UI;
131
132         /* Canonical Microsoft commandline flag processing:
133          * flags start with /, are case insensitive,
134          * and may be run together in same word.
135          */
136         for (i=1; i<argc; i++) {
137                 int ci;
138
139                 if (argv[i][0] != '/')
140                         break;
141
142                 /* Handle all options in this word */
143                 for (ci=0; argv[i][ci]; ) {
144                         /* Skip slash */
145                         ci++;
146                         switch(argv[i][ci]) {
147                         case 'l':
148                         case 'L':
149                                 license();
150                                 break;  /* notreached */
151                         case 'm':
152                         case 'M':
153                                 if (argv[i][ci+1] == 'a' || argv[i][ci+1] == 'A')
154                                         sei.nShow = SW_SHOWMAXIMIZED;
155                                 else
156                                         sei.nShow = SW_SHOWMINIMIZED;
157                                 break;
158                         case 'r':
159                         case 'R':
160                                 /* sei.nShow = SW_SHOWNORMAL; */
161                                 break;
162                         case 'w':
163                         case 'W':
164                                 sei.fMask |= SEE_MASK_NOCLOSEPROCESS;
165                                 break;
166                         default:
167                                 printf("Option '%s' not recognized\n", argv[i]+ci-1);
168                                 usage();
169                         }
170                         /* Skip to next slash */
171                         while (argv[i][ci] && (argv[i][ci] != '/'))
172                                 ci++;
173                 }
174         }
175
176         if (i == argc)
177                 usage();
178
179         sei.lpFile = argv[i++];
180
181         args = build_args( argc - i, &argv[i] );
182         sei.lpParameters = args;
183
184         if (!ShellExecuteEx(&sei))
185                 fatal_string_error(STRING_EXECFAIL, GetLastError());
186
187         HeapFree( GetProcessHeap(), 0, args );
188
189         if (sei.fMask & SEE_MASK_NOCLOSEPROCESS) {
190                 DWORD exitcode;
191                 DWORD waitcode;
192                 waitcode = WaitForSingleObject(sei.hProcess, INFINITE);
193                 if (waitcode)
194                         fatal_error("WaitForSingleObject", GetLastError());
195                 if (!GetExitCodeProcess(sei.hProcess, &exitcode))
196                         fatal_error("GetExitCodeProcess", GetLastError());
197                 /* fixme: haven't tested whether exit code works properly */
198                 ExitProcess(exitcode);
199         }
200
201         ExitProcess(0);
202 }