ntdll: Reimplement qsort() using generic mergesort.
[wine] / dlls / ntdll / tests / directory.c
1 /* Unit test suite for Ntdll directory functions
2  *
3  * Copyright 2007 Jeff Latimer
4  * Copyright 2007 Andrey Turkin
5  * Copyright 2008 Jeff Zaroyko
6  * Copyright 2009 Dan Kegel
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  * NOTES
23  * We use function pointers here as there is no import library for NTDLL on
24  * windows.
25  */
26
27 #include <stdio.h>
28 #include <stdarg.h>
29
30 #include "ntstatus.h"
31 /* Define WIN32_NO_STATUS so MSVC does not give us duplicate macro
32  * definition errors when we get to winnt.h
33  */
34 #define WIN32_NO_STATUS
35
36 #include "wine/test.h"
37 #include "winternl.h"
38
39 static NTSTATUS (WINAPI *pNtClose)( PHANDLE );
40 static NTSTATUS (WINAPI *pNtOpenFile)    ( PHANDLE, ACCESS_MASK, POBJECT_ATTRIBUTES, PIO_STATUS_BLOCK, ULONG, ULONG );
41 static NTSTATUS (WINAPI *pNtQueryDirectoryFile)(HANDLE,HANDLE,PIO_APC_ROUTINE,PVOID,PIO_STATUS_BLOCK,
42                                                 PVOID,ULONG,FILE_INFORMATION_CLASS,BOOLEAN,PUNICODE_STRING,BOOLEAN);
43 static BOOLEAN  (WINAPI *pRtlCreateUnicodeStringFromAsciiz)(PUNICODE_STRING,LPCSTR);
44 static BOOL     (WINAPI *pRtlDosPathNameToNtPathName_U)( LPCWSTR, PUNICODE_STRING, PWSTR*, CURDIR* );
45 static VOID     (WINAPI *pRtlInitUnicodeString)( PUNICODE_STRING, LPCWSTR );
46 static VOID     (WINAPI *pRtlFreeUnicodeString)( PUNICODE_STRING );
47 static NTSTATUS (WINAPI *pRtlMultiByteToUnicodeN)( LPWSTR dst, DWORD dstlen, LPDWORD reslen,
48                                                    LPCSTR src, DWORD srclen );
49 static NTSTATUS (WINAPI *pRtlWow64EnableFsRedirection)( BOOLEAN enable );
50 static NTSTATUS (WINAPI *pRtlWow64EnableFsRedirectionEx)( ULONG disable, ULONG *old_value );
51
52 /* The attribute sets to test */
53 struct testfile_s {
54     int todo;                 /* set if it doesn't work on wine yet */
55     const DWORD attr;         /* desired attribute */
56     const char *name;         /* filename to use */
57     const char *target;       /* what to point to (only for reparse pts) */
58     const char *description;  /* for error messages */
59     int nfound;               /* How many were found (expect 1) */
60     WCHAR nameW[20];          /* unicode version of name (filled in later) */
61 } testfiles[] = {
62     { 0, FILE_ATTRIBUTE_NORMAL,    "n.tmp", NULL, "normal" },
63     { 1, FILE_ATTRIBUTE_HIDDEN,    "h.tmp", NULL, "hidden" },
64     { 1, FILE_ATTRIBUTE_SYSTEM,    "s.tmp", NULL, "system" },
65     { 0, FILE_ATTRIBUTE_DIRECTORY, "d.tmp", NULL, "directory" },
66     { 0, 0, NULL }
67 };
68 static const int max_test_dir_size = 20;  /* size of above plus some for .. etc */
69
70 /* Create a test directory full of attribute test files, clear counts */
71 static void set_up_attribute_test(const char *testdirA)
72 {
73     int i;
74
75     ok(CreateDirectoryA(testdirA, NULL),
76        "couldn't create dir '%s', error %d\n", testdirA, GetLastError());
77
78     for (i=0; testfiles[i].name; i++) {
79         char buf[MAX_PATH];
80         pRtlMultiByteToUnicodeN(testfiles[i].nameW, sizeof(testfiles[i].nameW), NULL, testfiles[i].name, strlen(testfiles[i].name)+1);
81
82         sprintf(buf, "%s\\%s", testdirA, testfiles[i].name);
83         testfiles[i].nfound = 0;
84         if (testfiles[i].attr & FILE_ATTRIBUTE_DIRECTORY) {
85             ok(CreateDirectoryA(buf, NULL),
86                "couldn't create dir '%s', error %d\n", buf, GetLastError());
87         } else {
88             HANDLE h = CreateFileA(buf,
89                                    GENERIC_READ|GENERIC_WRITE,
90                                    0, NULL, CREATE_ALWAYS,
91                                    testfiles[i].attr, 0);
92             ok( h != INVALID_HANDLE_VALUE, "failed to create temp file '%s'\n", buf );
93             CloseHandle(h);
94         }
95     }
96 }
97
98 /* Remove the given test directory and the attribute test files, if any */
99 static void tear_down_attribute_test(const char *testdirA)
100 {
101     int i;
102
103     for (i=0; testfiles[i].name; i++) {
104         int ret;
105         char buf[MAX_PATH];
106         sprintf(buf, "%s\\%s", testdirA, testfiles[i].name);
107         if (testfiles[i].attr & FILE_ATTRIBUTE_DIRECTORY) {
108             ret = RemoveDirectory(buf);
109             ok(ret || (GetLastError() == ERROR_PATH_NOT_FOUND),
110                "Failed to rmdir %s, error %d\n", buf, GetLastError());
111         } else {
112             ret = DeleteFile(buf);
113             ok(ret || (GetLastError() == ERROR_PATH_NOT_FOUND),
114                "Failed to rm %s, error %d\n", buf, GetLastError());
115         }
116     }
117     RemoveDirectoryA(testdirA);
118 }
119
120 /* Match one found file against testfiles[], increment count if found */
121 static void tally_test_file(FILE_BOTH_DIRECTORY_INFORMATION *dir_info)
122 {
123     int i;
124     DWORD attribmask =
125       (FILE_ATTRIBUTE_SYSTEM|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_DIRECTORY|FILE_ATTRIBUTE_REPARSE_POINT);
126     DWORD attrib = dir_info->FileAttributes & attribmask;
127     WCHAR *nameW = dir_info->FileName;
128     int namelen = dir_info->FileNameLength / sizeof(WCHAR);
129
130     if (nameW[0] == '.')
131         return;
132
133     for (i=0; testfiles[i].name; i++) {
134         int len = strlen(testfiles[i].name);
135         if (namelen != len || memcmp(nameW, testfiles[i].nameW, len*sizeof(WCHAR)))
136             continue;
137         if (testfiles[i].todo) {
138             todo_wine
139             ok (attrib == (testfiles[i].attr & attribmask), "file %s: expected %s (%x), got %x (is your linux new enough?)\n", testfiles[i].name, testfiles[i].description, testfiles[i].attr, attrib);
140         } else {
141             ok (attrib == (testfiles[i].attr & attribmask), "file %s: expected %s (%x), got %x (is your linux new enough?)\n", testfiles[i].name, testfiles[i].description, testfiles[i].attr, attrib);
142         }
143         testfiles[i].nfound++;
144         break;
145     }
146     ok(testfiles[i].name != NULL, "unexpected file found\n");
147 }
148
149 static void test_NtQueryDirectoryFile(void)
150 {
151     OBJECT_ATTRIBUTES attr;
152     UNICODE_STRING ntdirname;
153     char testdirA[MAX_PATH];
154     WCHAR testdirW[MAX_PATH];
155     HANDLE dirh;
156     IO_STATUS_BLOCK io;
157     UINT data_pos;
158     UINT data_len;    /* length of dir data */
159     BYTE data[8192];  /* directory data */
160     FILE_BOTH_DIRECTORY_INFORMATION *dir_info;
161     DWORD status;
162     int numfiles;
163     int i;
164
165     /* Clean up from prior aborted run, if any, then set up test files */
166     ok(GetTempPathA(MAX_PATH, testdirA), "couldn't get temp dir\n");
167     strcat(testdirA, "NtQueryDirectoryFile.tmp");
168     tear_down_attribute_test(testdirA);
169     set_up_attribute_test(testdirA);
170
171     /* Read the directory and note which files are found */
172     pRtlMultiByteToUnicodeN(testdirW, sizeof(testdirW), NULL, testdirA, strlen(testdirA)+1);
173     if (!pRtlDosPathNameToNtPathName_U(testdirW, &ntdirname, NULL, NULL))
174     {
175         ok(0,"RtlDosPathNametoNtPathName_U failed\n");
176         goto done;
177     }
178     InitializeObjectAttributes(&attr, &ntdirname, OBJ_CASE_INSENSITIVE, 0, NULL);
179     status = pNtOpenFile( &dirh, SYNCHRONIZE | FILE_LIST_DIRECTORY, &attr, &io,
180                          FILE_OPEN,
181                          FILE_SYNCHRONOUS_IO_NONALERT|FILE_OPEN_FOR_BACKUP_INTENT|FILE_DIRECTORY_FILE);
182     ok (status == STATUS_SUCCESS, "failed to open dir '%s', ret 0x%x, error %d\n", testdirA, status, GetLastError());
183     if (status != STATUS_SUCCESS) {
184        skip("can't test if we can't open the directory\n");
185        goto done;
186     }
187
188     pNtQueryDirectoryFile( dirh, NULL, NULL, NULL, &io, data, sizeof(data),
189                        FileBothDirectoryInformation, FALSE, NULL, TRUE );
190     ok (U(io).Status == STATUS_SUCCESS, "filed to query directory; status %x\n", U(io).Status);
191     data_len = io.Information;
192     ok (data_len >= sizeof(FILE_BOTH_DIRECTORY_INFORMATION), "not enough data in directory\n");
193
194     data_pos = 0;
195     numfiles = 0;
196     while ((data_pos < data_len) && (numfiles < max_test_dir_size)) {
197         dir_info = (FILE_BOTH_DIRECTORY_INFORMATION *)(data + data_pos);
198
199         tally_test_file(dir_info);
200
201         if (dir_info->NextEntryOffset == 0) {
202             pNtQueryDirectoryFile( dirh, 0, NULL, NULL, &io, data, sizeof(data),
203                                FileBothDirectoryInformation, FALSE, NULL, FALSE );
204             if (U(io).Status == STATUS_NO_MORE_FILES)
205                 break;
206             ok (U(io).Status == STATUS_SUCCESS, "filed to query directory; status %x\n", U(io).Status);
207             data_len = io.Information;
208             if (data_len < sizeof(FILE_BOTH_DIRECTORY_INFORMATION))
209                 break;
210             data_pos = 0;
211         } else {
212             data_pos += dir_info->NextEntryOffset;
213         }
214         numfiles++;
215     }
216     ok(numfiles < max_test_dir_size, "too many loops\n");
217
218     for (i=0; testfiles[i].name; i++)
219         ok(testfiles[i].nfound == 1, "Wrong number %d of %s files found\n",
220           testfiles[i].nfound, testfiles[i].description);
221
222     pNtClose(dirh);
223 done:
224     tear_down_attribute_test(testdirA);
225     pRtlFreeUnicodeString(&ntdirname);
226 }
227
228 static void test_redirection(void)
229 {
230     ULONG old, cur;
231     NTSTATUS status;
232
233     if (!pRtlWow64EnableFsRedirection || !pRtlWow64EnableFsRedirectionEx)
234     {
235         skip( "Wow64 redirection not supported\n" );
236         return;
237     }
238     status = pRtlWow64EnableFsRedirectionEx( FALSE, &old );
239     if (status == STATUS_NOT_IMPLEMENTED)
240     {
241         skip( "Wow64 redirection not supported\n" );
242         return;
243     }
244     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
245
246     status = pRtlWow64EnableFsRedirectionEx( FALSE, &cur );
247     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
248     ok( !cur, "RtlWow64EnableFsRedirectionEx got %u\n", cur );
249
250     status = pRtlWow64EnableFsRedirectionEx( TRUE, &cur );
251     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
252     status = pRtlWow64EnableFsRedirectionEx( TRUE, &cur );
253     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
254     ok( cur == 1, "RtlWow64EnableFsRedirectionEx got %u\n", cur );
255
256     status = pRtlWow64EnableFsRedirection( TRUE );
257     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
258     status = pRtlWow64EnableFsRedirectionEx( TRUE, &cur );
259     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
260     ok( !cur, "RtlWow64EnableFsRedirectionEx got %u\n", cur );
261
262     status = pRtlWow64EnableFsRedirection( FALSE );
263     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
264     status = pRtlWow64EnableFsRedirectionEx( FALSE, &cur );
265     ok( !status, "RtlWow64EnableFsRedirectionEx failed status %x\n", status );
266     ok( cur == 1, "RtlWow64EnableFsRedirectionEx got %u\n", cur );
267
268     pRtlWow64EnableFsRedirectionEx( old, &cur );
269 }
270
271 START_TEST(directory)
272 {
273     HMODULE hntdll = GetModuleHandleA("ntdll.dll");
274     if (!hntdll)
275     {
276         skip("not running on NT, skipping test\n");
277         return;
278     }
279
280     pNtClose                = (void *)GetProcAddress(hntdll, "NtClose");
281     pNtOpenFile             = (void *)GetProcAddress(hntdll, "NtOpenFile");
282     pNtQueryDirectoryFile   = (void *)GetProcAddress(hntdll, "NtQueryDirectoryFile");
283     pRtlCreateUnicodeStringFromAsciiz = (void *)GetProcAddress(hntdll, "RtlCreateUnicodeStringFromAsciiz");
284     pRtlDosPathNameToNtPathName_U = (void *)GetProcAddress(hntdll, "RtlDosPathNameToNtPathName_U");
285     pRtlInitUnicodeString   = (void *)GetProcAddress(hntdll, "RtlInitUnicodeString");
286     pRtlFreeUnicodeString   = (void *)GetProcAddress(hntdll, "RtlFreeUnicodeString");
287     pRtlMultiByteToUnicodeN = (void *)GetProcAddress(hntdll,"RtlMultiByteToUnicodeN");
288     pRtlWow64EnableFsRedirection = (void *)GetProcAddress(hntdll,"RtlWow64EnableFsRedirection");
289     pRtlWow64EnableFsRedirectionEx = (void *)GetProcAddress(hntdll,"RtlWow64EnableFsRedirectionEx");
290
291     test_NtQueryDirectoryFile();
292     test_redirection();
293 }