2 * Copyright 2009 Dan Kegel
3 * Copyright 2010 Jacek Caban for CodeWeavers
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 #include "wine/test.h"
25 static char workdir
[MAX_PATH
];
26 static DWORD workdir_len
;
28 /* Convert to DOS line endings, and substitute escaped spaces with real ones */
29 static const char* convert_input_data(const char *data
, DWORD size
, DWORD
*new_size
)
31 static const char escaped_space
[] = {'@','s','p','a','c','e','@'};
32 DWORD i
, eol_count
= 0;
35 for (i
= 0; i
< size
; i
++)
36 if (data
[i
] == '\n') eol_count
++;
38 ptr
= new_data
= HeapAlloc(GetProcessHeap(), 0, size
+ eol_count
+ 1);
40 for (i
= 0; i
< size
; i
++) {
47 if (data
+ i
+ sizeof(escaped_space
) - 1 < data
+ size
48 && !memcmp(data
+ i
, escaped_space
, sizeof(escaped_space
))) {
50 i
+= sizeof(escaped_space
) - 1;
61 *new_size
= strlen(new_data
);
65 static BOOL
run_cmd(const char *cmd_data
, DWORD cmd_size
)
67 SECURITY_ATTRIBUTES sa
= {sizeof(sa
), 0, TRUE
};
68 char command
[] = "test.cmd";
69 STARTUPINFOA si
= {sizeof(si
)};
70 PROCESS_INFORMATION pi
;
75 file
= CreateFileA("test.cmd", GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
76 FILE_ATTRIBUTE_NORMAL
, NULL
);
77 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed\n");
78 if(file
== INVALID_HANDLE_VALUE
)
81 bres
= WriteFile(file
, cmd_data
, cmd_size
, &size
, NULL
);
83 ok(bres
, "Could not write to file: %u\n", GetLastError());
87 file
= CreateFileA("test.out", GENERIC_WRITE
, FILE_SHARE_WRITE
|FILE_SHARE_READ
, &sa
, CREATE_ALWAYS
,
88 FILE_ATTRIBUTE_NORMAL
, NULL
);
89 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed\n");
90 if(file
== INVALID_HANDLE_VALUE
)
93 fileerr
= CreateFileA("test.err", GENERIC_WRITE
, FILE_SHARE_WRITE
|FILE_SHARE_READ
, &sa
, CREATE_ALWAYS
,
94 FILE_ATTRIBUTE_NORMAL
, NULL
);
95 ok(fileerr
!= INVALID_HANDLE_VALUE
, "CreateFile stderr failed\n");
96 if(fileerr
== INVALID_HANDLE_VALUE
)
99 si
.dwFlags
= STARTF_USESTDHANDLES
;
100 si
.hStdOutput
= file
;
101 si
.hStdError
= fileerr
;
102 bres
= CreateProcessA(NULL
, command
, NULL
, NULL
, TRUE
, 0, NULL
, NULL
, &si
, &pi
);
103 ok(bres
, "CreateProcess failed: %u\n", GetLastError());
105 DeleteFileA("test.out");
109 WaitForSingleObject(pi
.hProcess
, INFINITE
);
110 CloseHandle(pi
.hThread
);
111 CloseHandle(pi
.hProcess
);
113 CloseHandle(fileerr
);
114 DeleteFileA("test.cmd");
118 static DWORD
map_file(const char *file_name
, const char **ret
)
123 file
= CreateFileA(file_name
, GENERIC_READ
, 0, NULL
, OPEN_EXISTING
, FILE_ATTRIBUTE_READONLY
, NULL
);
124 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed: %08x\n", GetLastError());
125 if(file
== INVALID_HANDLE_VALUE
)
128 size
= GetFileSize(file
, NULL
);
130 map
= CreateFileMapping(file
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
132 ok(map
!= NULL
, "CreateFileMapping(%s) failed: %u\n", file_name
, GetLastError());
136 *ret
= MapViewOfFile(map
, FILE_MAP_READ
, 0, 0, 0);
137 ok(*ret
!= NULL
, "MapViewOfFile failed: %u\n", GetLastError());
145 static const char *compare_line(const char *out_line
, const char *out_end
, const char *exp_line
,
148 const char *out_ptr
= out_line
, *exp_ptr
= exp_line
;
149 const char *err
= NULL
;
151 static const char pwd_cmd
[] = {'@','p','w','d','@'};
152 static const char space_cmd
[] = {'@','s','p','a','c','e','@'};
153 static const char or_broken_cmd
[] = {'@','o','r','_','b','r','o','k','e','n','@'};
155 while(exp_ptr
< exp_end
) {
156 if(*exp_ptr
== '@') {
157 if(exp_ptr
+sizeof(pwd_cmd
) <= exp_end
158 && !memcmp(exp_ptr
, pwd_cmd
, sizeof(pwd_cmd
))) {
159 exp_ptr
+= sizeof(pwd_cmd
);
160 if(out_end
-out_ptr
< workdir_len
161 || (CompareStringA(LOCALE_SYSTEM_DEFAULT
, NORM_IGNORECASE
, out_ptr
, workdir_len
,
162 workdir
, workdir_len
) != CSTR_EQUAL
)) {
165 out_ptr
+= workdir_len
;
168 }else if(exp_ptr
+sizeof(space_cmd
) <= exp_end
169 && !memcmp(exp_ptr
, space_cmd
, sizeof(space_cmd
))) {
170 exp_ptr
+= sizeof(space_cmd
);
171 if(out_ptr
< out_end
&& *out_ptr
== ' ') {
178 }else if(exp_ptr
+sizeof(or_broken_cmd
) <= exp_end
179 && !memcmp(exp_ptr
, or_broken_cmd
, sizeof(or_broken_cmd
))) {
180 if(out_ptr
== out_end
)
184 }else if(out_ptr
== out_end
|| *out_ptr
!= *exp_ptr
)
186 }else if(out_ptr
== out_end
|| *out_ptr
!= *exp_ptr
) {
194 while(exp_ptr
+sizeof(or_broken_cmd
) <= exp_end
&& memcmp(exp_ptr
, or_broken_cmd
, sizeof(or_broken_cmd
)))
199 exp_ptr
+= sizeof(or_broken_cmd
);
209 if(exp_ptr
!= exp_end
)
211 else if(out_ptr
!= out_end
)
217 static void test_output(const char *out_data
, DWORD out_size
, const char *exp_data
, DWORD exp_size
)
219 const char *out_ptr
= out_data
, *exp_ptr
= exp_data
, *out_nl
, *exp_nl
, *err
;
221 static const char todo_wine_cmd
[] = {'@','t','o','d','o','_','w','i','n','e','@'};
224 while(out_ptr
< out_data
+out_size
&& exp_ptr
< exp_data
+exp_size
) {
227 for(exp_nl
= exp_ptr
; exp_nl
< exp_data
+exp_size
&& *exp_nl
!= '\r' && *exp_nl
!= '\n'; exp_nl
++);
228 for(out_nl
= out_ptr
; out_nl
< out_data
+out_size
&& *out_nl
!= '\r' && *out_nl
!= '\n'; out_nl
++);
230 is_todo_wine
= (exp_ptr
+sizeof(todo_wine_cmd
) <= exp_nl
&&
231 !memcmp(exp_ptr
, todo_wine_cmd
, sizeof(todo_wine_cmd
)));
233 exp_ptr
+= sizeof(todo_wine_cmd
);
234 winetest_start_todo("wine");
237 err
= compare_line(out_ptr
, out_nl
, exp_ptr
, exp_nl
);
239 ok(0, "unexpected end of line %d (got '%.*s', wanted '%.*s')\n",
240 line
, (int)(out_nl
-out_ptr
), out_ptr
, (int)(exp_nl
-exp_ptr
), exp_ptr
);
241 else if(err
== exp_nl
)
242 ok(0, "excess characters on line %d (got '%.*s', wanted '%.*s')\n",
243 line
, (int)(out_nl
-out_ptr
), out_ptr
, (int)(exp_nl
-exp_ptr
), exp_ptr
);
245 ok(!err
, "unexpected char 0x%x position %d in line %d (got '%.*s', wanted '%.*s')\n",
246 (err
? *err
: 0), (err
? (int)(err
-out_ptr
) : -1), line
, (int)(out_nl
-out_ptr
), out_ptr
, (int)(exp_nl
-exp_ptr
), exp_ptr
);
248 if(is_todo_wine
) winetest_end_todo("wine");
252 if(out_nl
+1 < out_data
+out_size
&& out_nl
[0] == '\r' && out_nl
[1] == '\n')
254 if(exp_nl
+1 < exp_data
+exp_size
&& exp_nl
[0] == '\r' && exp_nl
[1] == '\n')
258 ok(exp_ptr
>= exp_data
+exp_size
, "unexpected end of output in line %d, missing %s\n", line
, exp_ptr
);
259 ok(out_ptr
>= out_data
+out_size
, "too long output, got additional %s\n", out_ptr
);
262 static void run_test(const char *cmd_data
, DWORD cmd_size
, const char *exp_data
, DWORD exp_size
)
264 const char *out_data
, *actual_cmd_data
;
265 DWORD out_size
, actual_cmd_size
;
267 actual_cmd_data
= convert_input_data(cmd_data
, cmd_size
, &actual_cmd_size
);
268 if(!actual_cmd_size
|| !actual_cmd_data
)
271 if(!run_cmd(actual_cmd_data
, actual_cmd_size
))
274 out_size
= map_file("test.out", &out_data
);
276 test_output(out_data
, out_size
, exp_data
, exp_size
);
277 UnmapViewOfFile(out_data
);
279 DeleteFileA("test.out");
280 DeleteFileA("test.err");
283 HeapFree(GetProcessHeap(), 0, (LPVOID
)actual_cmd_data
);
286 static void run_from_file(const char *file_name
)
288 char out_name
[MAX_PATH
];
289 const char *test_data
, *out_data
;
290 DWORD test_size
, out_size
;
292 test_size
= map_file(file_name
, &test_data
);
294 ok(0, "Could not map file %s: %u\n", file_name
, GetLastError());
298 sprintf(out_name
, "%s.exp", file_name
);
299 out_size
= map_file(out_name
, &out_data
);
301 ok(0, "Could not map file %s: %u\n", out_name
, GetLastError());
302 UnmapViewOfFile(test_data
);
306 run_test(test_data
, test_size
, out_data
, out_size
);
308 UnmapViewOfFile(test_data
);
309 UnmapViewOfFile(out_data
);
312 static DWORD
load_resource(const char *name
, const char *type
, const char **ret
)
318 src
= FindResourceA(NULL
, name
, type
);
319 ok(src
!= NULL
, "Could not find resource %s: %u\n", name
, GetLastError());
323 res
= LoadResource(NULL
, src
);
324 size
= SizeofResource(NULL
, src
);
325 while(size
&& !res
[size
-1])
332 static BOOL WINAPI
test_enum_proc(HMODULE module
, LPCTSTR type
, LPSTR name
, LONG_PTR param
)
334 const char *cmd_data
, *out_data
;
335 DWORD cmd_size
, out_size
;
338 trace("running %s test...\n", name
);
340 cmd_size
= load_resource(name
, type
, &cmd_data
);
344 sprintf(res_name
, "%s.exp", name
);
345 out_size
= load_resource(res_name
, "TESTOUT", &out_data
);
349 run_test(cmd_data
, cmd_size
, out_data
, out_size
);
353 static int cmd_available(void)
356 PROCESS_INFORMATION pi
;
357 char cmd
[] = "cmd /c exit 0";
359 memset(&si
, 0, sizeof(si
));
361 if (CreateProcessA(NULL
, cmd
, NULL
, NULL
, FALSE
, 0, NULL
, NULL
, &si
, &pi
)) {
362 CloseHandle(pi
.hThread
);
363 CloseHandle(pi
.hProcess
);
374 if (!cmd_available()) {
375 win_skip("cmd not installed, skipping cmd tests\n");
379 workdir_len
= GetCurrentDirectoryA(sizeof(workdir
), workdir
);
381 argc
= winetest_get_mainargs(&argv
);
383 run_from_file(argv
[2]);
385 EnumResourceNamesA(NULL
, "TESTCMD", test_enum_proc
, 0);