git.oblomov.eu Git - wine/blob - dlls/cabinet/tests/extract.c

   1 /*
   2  * Unit tests for cabinet.dll extract functions
   3  *
   4  * Copyright (C) 2006 James Hawkins
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdio.h>
  22 #include <windows.h>
  23 #include "fci.h"
  24 #include "fdi.h"
  25 #include "wine/test.h"
  26
  27 /* make the max size large so there is only one cab file */
  28 #define MEDIA_SIZE          999999999
  29 #define FOLDER_THRESHOLD    900000
  30
  31 /* The following defintions were copied from dlls/cabinet/cabinet.h
  32  * because they are undocumented in windows.
  33  */
  34
  35 /* SESSION Operation */
  36 #define EXTRACT_FILLFILELIST  0x00000001
  37 #define EXTRACT_EXTRACTFILES  0x00000002
  38
  39 struct FILELIST{
  40     LPSTR FileName;
  41     struct FILELIST *next;
  42     BOOL Extracted;
  43 };
  44
  45 typedef struct {
  46     INT FileSize;
  47     ERF Error;
  48     struct FILELIST *FileList;
  49     INT FileCount;
  50     INT Operation;
  51     CHAR Destination[MAX_PATH];
  52     CHAR CurrentFile[MAX_PATH];
  53     CHAR Reserved[MAX_PATH];
  54     struct FILELIST *FilterList;
  55 } SESSION;
  56
  57 /* function pointers */
  58 HMODULE hCabinet;
  59 static HRESULT (WINAPI *pExtract)(SESSION*, LPCSTR);
  60
  61 CHAR CURR_DIR[MAX_PATH];
  62
  63 static void init_function_pointers(void)
  64 {
  65     hCabinet = GetModuleHandleA("cabinet.dll");
  66
  67     pExtract = (void *)GetProcAddress(hCabinet, "Extract");
  68 }
  69
  70 /* creates a file with the specified name for tests */
  71 static void createTestFile(const CHAR *name)
  72 {
  73     HANDLE file;
  74     DWORD written;
  75
  76     file = CreateFileA(name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
  77     ok(file != INVALID_HANDLE_VALUE, "Failure to open file %s\n", name);
  78     WriteFile(file, name, strlen(name), &written, NULL);
  79     WriteFile(file, "\n", strlen("\n"), &written, NULL);
  80     CloseHandle(file);
  81 }
  82
  83 static void create_test_files(void)
  84 {
  85     int len;
  86
  87     GetCurrentDirectoryA(MAX_PATH, CURR_DIR);
  88     len = lstrlenA(CURR_DIR);
  89
  90     if(len && (CURR_DIR[len-1] == '\\'))
  91         CURR_DIR[len-1] = 0;
  92
  93     createTestFile("a.txt");
  94     createTestFile("b.txt");
  95     CreateDirectoryA("testdir", NULL);
  96     createTestFile("testdir\\c.txt");
  97     createTestFile("testdir\\d.txt");
  98     CreateDirectoryA("dest", NULL);
  99 }
 100
 101 static void delete_test_files(void)
 102 {
 103     DeleteFileA("a.txt");
 104     DeleteFileA("b.txt");
 105     DeleteFileA("testdir\\c.txt");
 106     DeleteFileA("testdir\\d.txt");
 107     RemoveDirectoryA("testdir");
 108
 109     DeleteFileA("extract.cab");
 110 }
 111
 112 /* the FCI callbacks */
 113
 114 static void *mem_alloc(ULONG cb)
 115 {
 116     return HeapAlloc(GetProcessHeap(), 0, cb);
 117 }
 118
 119 static void mem_free(void *memory)
 120 {
 121     HeapFree(GetProcessHeap(), 0, memory);
 122 }
 123
 124 static BOOL get_next_cabinet(PCCAB pccab, ULONG  cbPrevCab, void *pv)
 125 {
 126     return TRUE;
 127 }
 128
 129 static long progress(UINT typeStatus, ULONG cb1, ULONG cb2, void *pv)
 130 {
 131     return 0;
 132 }
 133
 134 static int file_placed(PCCAB pccab, char *pszFile, long cbFile,
 135                        BOOL fContinuation, void *pv)
 136 {
 137     return 0;
 138 }
 139
 140 static INT_PTR fci_open(char *pszFile, int oflag, int pmode, int *err, void *pv)
 141 {
 142     HANDLE handle;
 143     DWORD dwAccess = 0;
 144     DWORD dwShareMode = 0;
 145     DWORD dwCreateDisposition = OPEN_EXISTING;
 146
 147     dwAccess = GENERIC_READ | GENERIC_WRITE;
 148     /* FILE_SHARE_DELETE is not supported by Windows Me/98/95 */
 149     dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE;
 150
 151     if (GetFileAttributesA(pszFile) != INVALID_FILE_ATTRIBUTES)
 152         dwCreateDisposition = OPEN_EXISTING;
 153     else
 154         dwCreateDisposition = CREATE_NEW;
 155
 156     handle = CreateFileA(pszFile, dwAccess, dwShareMode, NULL,
 157                          dwCreateDisposition, 0, NULL);
 158
 159     ok(handle != INVALID_HANDLE_VALUE, "Failed to CreateFile %s\n", pszFile);
 160
 161     return (INT_PTR)handle;
 162 }
 163
 164 static UINT fci_read(INT_PTR hf, void *memory, UINT cb, int *err, void *pv)
 165 {
 166     HANDLE handle = (HANDLE)hf;
 167     DWORD dwRead;
 168     BOOL res;
 169
 170     res = ReadFile(handle, memory, cb, &dwRead, NULL);
 171     ok(res, "Failed to ReadFile\n");
 172
 173     return dwRead;
 174 }
 175
 176 static UINT fci_write(INT_PTR hf, void *memory, UINT cb, int *err, void *pv)
 177 {
 178     HANDLE handle = (HANDLE)hf;
 179     DWORD dwWritten;
 180     BOOL res;
 181
 182     res = WriteFile(handle, memory, cb, &dwWritten, NULL);
 183     ok(res, "Failed to WriteFile\n");
 184
 185     return dwWritten;
 186 }
 187
 188 static int fci_close(INT_PTR hf, int *err, void *pv)
 189 {
 190     HANDLE handle = (HANDLE)hf;
 191     ok(CloseHandle(handle), "Failed to CloseHandle\n");
 192
 193     return 0;
 194 }
 195
 196 static long fci_seek(INT_PTR hf, long dist, int seektype, int *err, void *pv)
 197 {
 198     HANDLE handle = (HANDLE)hf;
 199     DWORD ret;
 200
 201     ret = SetFilePointer(handle, dist, NULL, seektype);
 202     ok(ret != INVALID_SET_FILE_POINTER, "Failed to SetFilePointer\n");
 203
 204     return ret;
 205 }
 206
 207 static int fci_delete(char *pszFile, int *err, void *pv)
 208 {
 209     BOOL ret = DeleteFileA(pszFile);
 210     ok(ret, "Failed to DeleteFile %s\n", pszFile);
 211
 212     return 0;
 213 }
 214
 215 static BOOL get_temp_file(char *pszTempName, int cbTempName, void *pv)
 216 {
 217     LPSTR tempname;
 218
 219     tempname = HeapAlloc(GetProcessHeap(), 0, MAX_PATH);
 220     GetTempFileNameA(".", "xx", 0, tempname);
 221
 222     if (tempname && (strlen(tempname) < (unsigned)cbTempName))
 223     {
 224         lstrcpyA(pszTempName, tempname);
 225         HeapFree(GetProcessHeap(), 0, tempname);
 226         return TRUE;
 227     }
 228
 229     HeapFree(GetProcessHeap(), 0, tempname);
 230
 231     return FALSE;
 232 }
 233
 234 static INT_PTR get_open_info(char *pszName, USHORT *pdate, USHORT *ptime,
 235                              USHORT *pattribs, int *err, void *pv)
 236 {
 237     BY_HANDLE_FILE_INFORMATION finfo;
 238     FILETIME filetime;
 239     HANDLE handle;
 240     DWORD attrs;
 241     BOOL res;
 242
 243     handle = CreateFile(pszName, GENERIC_READ, FILE_SHARE_READ, NULL,
 244                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL);
 245
 246     ok(handle != INVALID_HANDLE_VALUE, "Failed to CreateFile %s\n", pszName);
 247
 248     res = GetFileInformationByHandle(handle, &finfo);
 249     ok(res, "Expected GetFileInformationByHandle to succeed\n");
 250
 251     FileTimeToLocalFileTime(&finfo.ftLastWriteTime, &filetime);
 252     FileTimeToDosDateTime(&filetime, pdate, ptime);
 253
 254     attrs = GetFileAttributes(pszName);
 255     ok(attrs != INVALID_FILE_ATTRIBUTES, "Failed to GetFileAttributes\n");
 256
 257     return (INT_PTR)handle;
 258 }
 259
 260 static void add_file(HFCI hfci, char *file)
 261 {
 262     char path[MAX_PATH];
 263     BOOL res;
 264
 265     lstrcpyA(path, CURR_DIR);
 266     lstrcatA(path, "\\");
 267     lstrcatA(path, file);
 268
 269     res = FCIAddFile(hfci, path, file, FALSE, get_next_cabinet, progress,
 270                      get_open_info, tcompTYPE_MSZIP);
 271     ok(res, "Expected FCIAddFile to succeed\n");
 272 }
 273
 274 static void set_cab_parameters(PCCAB pCabParams)
 275 {
 276     ZeroMemory(pCabParams, sizeof(CCAB));
 277
 278     pCabParams->cb = MEDIA_SIZE;
 279     pCabParams->cbFolderThresh = FOLDER_THRESHOLD;
 280     pCabParams->setID = 0xbeef;
 281     lstrcpyA(pCabParams->szCabPath, CURR_DIR);
 282     lstrcatA(pCabParams->szCabPath, "\\");
 283     lstrcpyA(pCabParams->szCab, "extract.cab");
 284 }
 285
 286 static void create_cab_file(void)
 287 {
 288     CCAB cabParams;
 289     HFCI hfci;
 290     ERF erf;
 291     static CHAR a_txt[]         = "a.txt",
 292                 b_txt[]         = "b.txt",
 293                 testdir_c_txt[] = "testdir\\c.txt",
 294                 testdir_d_txt[] = "testdir\\d.txt";
 295     BOOL res;
 296
 297     set_cab_parameters(&cabParams);
 298
 299     hfci = FCICreate(&erf, file_placed, mem_alloc, mem_free, fci_open,
 300                       fci_read, fci_write, fci_close, fci_seek, fci_delete,
 301                       get_temp_file, &cabParams, NULL);
 302
 303     ok(hfci != NULL, "Failed to create an FCI context\n");
 304
 305     add_file(hfci, a_txt);
 306     add_file(hfci, b_txt);
 307     add_file(hfci, testdir_c_txt);
 308     add_file(hfci, testdir_d_txt);
 309
 310     res = FCIFlushCabinet(hfci, FALSE, get_next_cabinet, progress);
 311     ok(res, "Failed to flush the cabinet\n");
 312
 313     res = FCIDestroy(hfci);
 314     ok(res, "Failed to destroy the cabinet\n");
 315 }
 316
 317 static BOOL check_list(struct FILELIST *filelist, const char *filename, BOOL extracted)
 318 {
 319     struct FILELIST *fl;
 320
 321     for (fl = filelist; fl; fl = fl->next)
 322         if (!lstrcmp(filename, fl->FileName))
 323             return (extracted == fl->Extracted);
 324
 325     return FALSE;
 326 }
 327
 328 static void test_Extract(void)
 329 {
 330     SESSION session;
 331     HRESULT res;
 332
 333     /* native windows crashes if
 334     *   - invalid parameters are sent in
 335     *   - you call EXTRACT_EXTRACTFILES without calling
 336     *     EXTRACT_FILLFILELIST first or at the same time
 337     */
 338
 339     /* try to extract all files */
 340     ZeroMemory(&session, sizeof(SESSION));
 341     lstrcpyA(session.Destination, "dest");
 342     session.Operation = EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES;
 343     res = pExtract(&session, "extract.cab");
 344     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 345     todo_wine
 346     {
 347         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 348     }
 349     ok(session.Error.erfOper == FDIERROR_NONE,
 350        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 351     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 352     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 353     ok(session.FileCount == 4, "Expected 4, got %d\n", session.FileCount);
 354     ok(session.Operation == (EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES),
 355        "Expected EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 356     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 357     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 358        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 359     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 360     ok(!session.FilterList, "Expected empty filter list\n");
 361     ok(DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 362     ok(DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to exist\n");
 363     ok(DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to exist\n");
 364     ok(DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to exist\n");
 365     ok(RemoveDirectoryA("dest\\testdir"), "Expected dest\\testdir to exist\n");
 366     ok(check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 367     ok(check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 368     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 369     ok(check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 370
 371     /* try fill file list operation */
 372     ZeroMemory(&session, sizeof(SESSION));
 373     lstrcpyA(session.Destination, "dest");
 374     session.Operation = EXTRACT_FILLFILELIST;
 375     res = pExtract(&session, "extract.cab");
 376     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 377     todo_wine
 378     {
 379         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 380     }
 381     ok(session.Error.erfOper == FDIERROR_NONE,
 382        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 383     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 384     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 385     ok(session.FileCount == 4, "Expected 4, got %d\n", session.FileCount);
 386     ok(session.Operation == EXTRACT_FILLFILELIST,
 387        "Expected EXTRACT_FILLFILELIST, got %d\n", session.Operation);
 388     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 389     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 390        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 391     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 392     ok(!session.FilterList, "Expected empty filter list\n");
 393     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to not exist\n");
 394     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 395     todo_wine
 396     {
 397         ok(check_list(session.FileList, "testdir\\d.txt", TRUE), "list entry wrong\n");
 398         ok(check_list(session.FileList, "testdir\\c.txt", TRUE), "list entry wrong\n");
 399         ok(check_list(session.FileList, "b.txt", TRUE), "list entry wrong\n");
 400         ok(check_list(session.FileList, "a.txt", TRUE), "list entry wrong\n");
 401     }
 402
 403     /* try extract files operation once file list is filled */
 404     session.Operation = EXTRACT_EXTRACTFILES;
 405     res = pExtract(&session, "extract.cab");
 406     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 407     todo_wine
 408     {
 409         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 410     }
 411     ok(session.Error.erfOper == FDIERROR_NONE,
 412        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 413     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 414     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 415     ok(session.FileCount == 4, "Expected 4, got %d\n", session.FileCount);
 416     ok(session.Operation == EXTRACT_EXTRACTFILES,
 417        "Expected EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 418     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 419     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 420        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 421     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 422     ok(!session.FilterList, "Expected empty filter list\n");
 423     ok(DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 424     ok(DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to exist\n");
 425     ok(DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to exist\n");
 426     ok(DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to exist\n");
 427     ok(RemoveDirectoryA("dest\\testdir"), "Expected dest\\testdir to exist\n");
 428     ok(RemoveDirectoryA("dest"), "Expected dest to exist\n");
 429     ok(check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 430     ok(check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 431     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 432     ok(check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 433
 434     /* Extract does not extract files if the dest dir does not exist */
 435     res = pExtract(&session, "extract.cab");
 436     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 437     todo_wine
 438     {
 439         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 440     }
 441     ok(session.Error.erfOper == FDIERROR_NONE,
 442        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 443     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 444     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 445     ok(session.FileCount == 4, "Expected 4, got %d\n", session.FileCount);
 446     ok(session.Operation == EXTRACT_EXTRACTFILES,
 447        "Expected EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 448     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 449     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 450        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 451     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 452     ok(!session.FilterList, "Expected empty filter list\n");
 453     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to not exist\n");
 454     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 455     ok(check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 456     ok(check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 457     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 458     ok(check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 459
 460     /* remove two of the files in the list */
 461     session.FileList->next = session.FileList->next->next;
 462     session.FileList->next->next = NULL;
 463     session.FilterList = NULL;
 464     CreateDirectoryA("dest", NULL);
 465     res = pExtract(&session, "extract.cab");
 466     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 467     todo_wine
 468     {
 469         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 470     }
 471     ok(session.Error.erfOper == FDIERROR_NONE,
 472        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 473     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 474     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 475     ok(session.FileCount == 4, "Expected 4, got %d\n", session.FileCount);
 476     ok(session.Operation == EXTRACT_EXTRACTFILES,
 477        "Expected EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 478     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 479     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 480        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 481     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 482     ok(!session.FilterList, "Expected empty filter list\n");
 483     ok(DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 484     ok(DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to exist\n");
 485     ok(!DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to not exist\n");
 486     ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to not exist\n");
 487
 488     todo_wine {
 489     ok(check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 490     ok(!check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 491     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 492     ok(!check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 493     }
 494
 495     session.Operation = EXTRACT_FILLFILELIST;
 496     session.FileList = NULL;
 497     res = pExtract(&session, "extract.cab");
 498     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 499     todo_wine
 500     {
 501         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 502     }
 503     ok(session.Error.erfOper == FDIERROR_NONE,
 504        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 505     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 506     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 507     ok(session.FileCount == 8, "Expected 8, got %d\n", session.FileCount);
 508     ok(session.Operation == EXTRACT_FILLFILELIST,
 509        "Expected EXTRACT_FILLFILELIST, got %d\n", session.Operation);
 510     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 511     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 512        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 513     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 514     ok(!session.FilterList, "Expected empty filter list\n");
 515     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to not exist\n");
 516     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 517     ok(!DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to not exist\n");
 518     ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to not exist\n");
 519
 520     todo_wine {
 521     ok(check_list(session.FileList, "testdir\\d.txt", TRUE), "list entry wrong\n");
 522     ok(check_list(session.FileList, "testdir\\c.txt", TRUE), "list entry wrong\n");
 523     ok(check_list(session.FileList, "b.txt", TRUE), "list entry wrong\n");
 524     ok(check_list(session.FileList, "a.txt", TRUE), "list entry wrong\n");
 525     }
 526
 527     session.Operation = 0;
 528     res = pExtract(&session, "extract.cab");
 529     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 530     todo_wine
 531     {
 532         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 533     }
 534     ok(session.Error.erfOper == FDIERROR_NONE,
 535        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 536     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 537     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 538     ok(session.FileCount == 8, "Expected 8, got %d\n", session.FileCount);
 539     ok(session.Operation == 0, "Expected 0, got %d\n", session.Operation);
 540     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 541     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 542        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 543     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 544     ok(!session.FilterList, "Expected empty filter list\n");
 545     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 546     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to exist\n");
 547     ok(!DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to exist\n");
 548     ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to exist\n");
 549
 550     todo_wine {
 551     ok(check_list(session.FileList, "testdir\\d.txt", TRUE), "list entry wrong\n");
 552     ok(check_list(session.FileList, "testdir\\c.txt", TRUE), "list entry wrong\n");
 553     ok(check_list(session.FileList, "b.txt", TRUE), "list entry wrong\n");
 554     ok(check_list(session.FileList, "a.txt", TRUE), "list entry wrong\n");
 555     }
 556
 557     session.Operation = 0;
 558     session.FilterList = session.FileList;
 559     res = pExtract(&session, "extract.cab");
 560     ok(res == S_OK, "Expected S_OK, got %d\n", res);
 561     todo_wine
 562     {
 563         ok(session.FileSize == 40, "Expected 40, got %d\n", session.FileSize);
 564     }
 565     ok(session.Error.erfOper == FDIERROR_NONE,
 566        "Expected FDIERROR_NONE, got %d\n", session.Error.erfOper);
 567     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 568     ok(session.Error.fError == FALSE, "Expected FALSE, got %d\n", session.Error.fError);
 569     ok(session.FileCount == 8, "Expected 8, got %d\n", session.FileCount);
 570     ok(session.Operation == 0, "Expected 0, got %d\n", session.Operation);
 571     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 572     ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\d.txt"),
 573        "Expected dest\\testdir\\d.txt, got %s\n", session.CurrentFile);
 574     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 575     ok(DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 576     ok(DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to exist\n");
 577     ok(DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to exist\n");
 578     ok(DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to exist\n");
 579
 580     ok(check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 581     ok(check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 582     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 583     ok(check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 584     ok(check_list(session.FilterList, "testdir\\d.txt", FALSE), "list entry wrong\n");
 585     ok(check_list(session.FilterList, "testdir\\c.txt", FALSE), "list entry wrong\n");
 586     ok(check_list(session.FilterList, "b.txt", FALSE), "list entry wrong\n");
 587     ok(check_list(session.FilterList, "a.txt", FALSE), "list entry wrong\n");
 588
 589     /* cabinet does not exist */
 590     ZeroMemory(&session, sizeof(SESSION));
 591     lstrcpyA(session.Destination, "dest");
 592     session.Operation = EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES;
 593     res = pExtract(&session, "nonexistent.cab");
 594     todo_wine
 595     {
 596         ok(res == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND),
 597            "Expected HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND), got %08x\n", res);
 598         ok(session.Error.erfOper == FDIERROR_CABINET_NOT_FOUND,
 599            "Expected FDIERROR_CABINET_NOT_FOUND, got %d\n", session.Error.erfOper);
 600     }
 601     ok(session.FileSize == 0, "Expected 0, got %d\n", session.FileSize);
 602     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 603     ok(session.Error.fError == TRUE, "Expected TRUE, got %d\n", session.Error.fError);
 604     ok(session.FileCount == 0, "Expected 0, got %d\n", session.FileCount);
 605     ok(session.Operation == (EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES),
 606        "Expected EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 607     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 608     ok(!*session.CurrentFile, "Expected empty string, got %s\n", session.CurrentFile);
 609     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 610     ok(!session.FilterList, "Expected empty filter list\n");
 611     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to not exist\n");
 612     ok(!DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to not exist\n");
 613     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 614     ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to not exist\n");
 615     ok(!check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry should not exist\n");
 616     ok(!check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry should not exist\n");
 617     ok(!check_list(session.FileList, "b.txt", FALSE), "list entry should not exist\n");
 618     ok(!check_list(session.FileList, "a.txt", FALSE), "list entry should not exist\n");
 619
 620     /* first file exists */
 621     createTestFile("dest\\a.txt");
 622     SetFileAttributes("dest\\a.txt", FILE_ATTRIBUTE_READONLY);
 623     ZeroMemory(&session, sizeof(SESSION));
 624     lstrcpyA(session.Destination, "dest");
 625     session.Operation = EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES;
 626     res = pExtract(&session, "extract.cab");
 627     todo_wine
 628     {
 629         ok(res == HRESULT_FROM_WIN32(ERROR_ACCESS_DENIED),
 630            "Expected HRESULT_FROM_WIN32(ERROR_ACCESS_DENIED), got %08x\n", res);
 631         ok(session.FileSize == 6, "Expected 6, got %d\n", session.FileSize);
 632         ok(session.Error.erfOper == FDIERROR_USER_ABORT,
 633            "Expected FDIERROR_USER_ABORT, got %d\n", session.Error.erfOper);
 634         ok(session.Error.fError == TRUE, "Expected TRUE, got %d\n", session.Error.fError);
 635         ok(session.FileCount == 1, "Expected 1, got %d\n", session.FileCount);
 636         ok(!lstrcmpA(session.CurrentFile, "dest\\a.txt"),
 637            "Expected dest\\a.txt, got %s\n", session.CurrentFile);
 638     }
 639     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 640     ok(session.Operation == (EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES),
 641        "Expected EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 642     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 643     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 644     ok(!session.FilterList, "Expected empty filter list\n");
 645     ok(!DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to not exist\n");
 646     todo_wine
 647     {
 648         ok(!DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to not exist\n");
 649         ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 650         ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to not exist\n");
 651         ok(!check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry should not exist\n");
 652         ok(!check_list(session.FileList, "testdir\\c.txt", FALSE), "list entry should not exist\n");
 653         ok(!check_list(session.FileList, "b.txt", FALSE), "list entry should not exist\n");
 654         ok(!check_list(session.FileList, "a.txt", FALSE), "list entry should not exist\n");
 655     }
 656
 657     SetFileAttributesA("dest\\a.txt", FILE_ATTRIBUTE_NORMAL);
 658     DeleteFileA("dest\\a.txt");
 659
 660     /* third file exists */
 661     createTestFile("dest\\testdir\\c.txt");
 662     SetFileAttributes("dest\\testdir\\c.txt", FILE_ATTRIBUTE_READONLY);
 663     ZeroMemory(&session, sizeof(SESSION));
 664     lstrcpyA(session.Destination, "dest");
 665     session.Operation = EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES;
 666     res = pExtract(&session, "extract.cab");
 667     todo_wine
 668     {
 669         ok(res == HRESULT_FROM_WIN32(ERROR_ACCESS_DENIED),
 670            "Expected HRESULT_FROM_WIN32(ERROR_ACCESS_DENIED), got %08x\n", res);
 671         ok(session.FileSize == 26, "Expected 26, got %d\n", session.FileSize);
 672         ok(session.Error.erfOper == FDIERROR_USER_ABORT,
 673            "Expected FDIERROR_USER_ABORT, got %d\n", session.Error.erfOper);
 674         ok(session.Error.fError == TRUE, "Expected TRUE, got %d\n", session.Error.fError);
 675         ok(session.FileCount == 3, "Expected 3, got %d\n", session.FileCount);
 676         ok(!lstrcmpA(session.CurrentFile, "dest\\testdir\\c.txt"),
 677            "Expected dest\\c.txt, got %s\n", session.CurrentFile);
 678     }
 679     ok(session.Error.erfType == 0, "Expected 0, got %d\n", session.Error.erfType);
 680     ok(session.Operation == (EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES),
 681        "Expected EXTRACT_FILLFILELIST | EXTRACT_EXTRACTFILES, got %d\n", session.Operation);
 682     ok(!lstrcmpA(session.Destination, "dest"), "Expected dest, got %s\n", session.Destination);
 683     ok(!*session.Reserved, "Expected empty string, got %s\n", session.Reserved);
 684     ok(!session.FilterList, "Expected empty filter list\n");
 685     ok(DeleteFileA("dest\\a.txt"), "Expected dest\\a.txt to exist\n");
 686     ok(DeleteFileA("dest\\b.txt"), "Expected dest\\b.txt to exist\n");
 687     ok(!DeleteFileA("dest\\testdir\\c.txt"), "Expected dest\\testdir\\c.txt to not exist\n");
 688     todo_wine
 689     {
 690         ok(!DeleteFileA("dest\\testdir\\d.txt"), "Expected dest\\testdir\\d.txt to not exist\n");
 691         ok(!check_list(session.FileList, "testdir\\d.txt", FALSE), "list entry should not exist\n");
 692         ok(check_list(session.FileList, "testdir\\c.txt", TRUE), "list entry wrong\n");
 693     }
 694     ok(check_list(session.FileList, "b.txt", FALSE), "list entry wrong\n");
 695     ok(check_list(session.FileList, "a.txt", FALSE), "list entry wrong\n");
 696
 697     SetFileAttributesA("dest\\testdir\\c.txt", FILE_ATTRIBUTE_NORMAL);
 698     DeleteFileA("dest\\testdir\\c.txt");
 699
 700     ok(RemoveDirectoryA("dest\\testdir"), "Expected dest\\testdir to exist\n");
 701     ok(RemoveDirectoryA("dest"), "Expected dest to exist\n");
 702 }
 703
 704 START_TEST(extract)
 705 {
 706     init_function_pointers();
 707     create_test_files();
 708     create_cab_file();
 709
 710     test_Extract();
 711
 712     delete_test_files();
 713 }