git.oblomov.eu Git - wine/blob - dlls/kernel/tests/file.c

   1 /*
   2  * Unit tests for file functions in Wine
   3  *
   4  * Copyright (c) 2002, 2004 Jakob Eriksson
   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  */
  21
  22 #include <stdarg.h>
  23 #include <stdlib.h>
  24 #include <time.h>
  25
  26 #include "wine/test.h"
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "winerror.h"
  30
  31 #ifdef NONAMELESSUNION
  32 # define U(x)  (x).u
  33 #else
  34 # define U(x)  (x)
  35 #endif
  36 #ifdef NONAMELESSSTRUCT
  37 # define S(x)  (x).s
  38 #else
  39 # define S(x)  (x)
  40 #endif
  41
  42 static int dll_capable(const char *dll, const char *function)
  43 {
  44     HMODULE module = GetModuleHandleA(dll);
  45     if (!module) return 0;
  46
  47     return (GetProcAddress(module, function) != NULL);
  48 }
  49
  50
  51 LPCSTR filename = "testfile.xxx";
  52 LPCSTR sillytext =
  53 "en larvig liten text dx \033 gx hej 84 hej 4484 ! \001\033 bla bl\na.. bla bla."
  54 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  55 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  56 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  57 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  58 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  59 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  60 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  61 "1234 43 4kljf lf &%%%&&&&&& 34 4 34   3############# 33 3 3 3 # 3## 3"
  62 "sdlkfjasdlkfj a dslkj adsklf  \n  \nasdklf askldfa sdlkf \nsadklf asdklf asdf ";
  63
  64
  65 static void test__hread( void )
  66 {
  67     HFILE filehandle;
  68     char buffer[10000];
  69     long bytes_read;
  70     long bytes_wanted;
  71     long i;
  72     BOOL ret;
  73
  74     SetFileAttributesA(filename,FILE_ATTRIBUTE_NORMAL); /* be sure to remove stale files */
  75     DeleteFileA( filename );
  76     filehandle = _lcreat( filename, 0 );
  77     if (filehandle == HFILE_ERROR)
  78     {
  79         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
  80         return;
  81     }
  82
  83     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
  84
  85     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
  86
  87     filehandle = _lopen( filename, OF_READ );
  88
  89     ok( HFILE_ERROR != filehandle, "couldn't open file \"%s\" again (err=%ld)\n", filename, GetLastError(  ) );
  90
  91     bytes_read = _hread( filehandle, buffer, 2 * strlen( sillytext ) );
  92
  93     ok( lstrlenA( sillytext ) == bytes_read, "file read size error\n" );
  94
  95     for (bytes_wanted = 0; bytes_wanted < lstrlenA( sillytext ); bytes_wanted++)
  96     {
  97         ok( 0 == _llseek( filehandle, 0, FILE_BEGIN ), "_llseek complains\n" );
  98         ok( _hread( filehandle, buffer, bytes_wanted ) == bytes_wanted, "erratic _hread return value\n" );
  99         for (i = 0; i < bytes_wanted; i++)
 100         {
 101             ok( buffer[i] == sillytext[i], "that's not what's written\n" );
 102         }
 103     }
 104
 105     ok( HFILE_ERROR != _lclose( filehandle ), "_lclose complains\n" );
 106
 107     ret = DeleteFileA( filename );
 108     ok( ret != 0, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 109 }
 110
 111
 112 static void test__hwrite( void )
 113 {
 114     HFILE filehandle;
 115     char buffer[10000];
 116     long bytes_read;
 117     long bytes_written;
 118     long blocks;
 119     long i;
 120     char *contents;
 121     HLOCAL memory_object;
 122     char checksum[1];
 123     BOOL ret;
 124
 125     filehandle = _lcreat( filename, 0 );
 126     if (filehandle == HFILE_ERROR)
 127     {
 128         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 129         return;
 130     }
 131
 132     ok( HFILE_ERROR != _hwrite( filehandle, "", 0 ), "_hwrite complains\n" );
 133
 134     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 135
 136     filehandle = _lopen( filename, OF_READ );
 137
 138     bytes_read = _hread( filehandle, buffer, 1);
 139
 140     ok( 0 == bytes_read, "file read size error\n" );
 141
 142     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 143
 144     filehandle = _lopen( filename, OF_READWRITE );
 145
 146     bytes_written = 0;
 147     checksum[0] = '\0';
 148     srand( (unsigned)time( NULL ) );
 149     for (blocks = 0; blocks < 100; blocks++)
 150     {
 151         for (i = 0; i < (long)sizeof( buffer ); i++)
 152         {
 153             buffer[i] = rand(  );
 154             checksum[0] = checksum[0] + buffer[i];
 155         }
 156         ok( HFILE_ERROR != _hwrite( filehandle, buffer, sizeof( buffer ) ), "_hwrite complains\n" );
 157         bytes_written = bytes_written + sizeof( buffer );
 158     }
 159
 160     ok( HFILE_ERROR != _hwrite( filehandle, checksum, 1 ), "_hwrite complains\n" );
 161     bytes_written++;
 162
 163     ok( HFILE_ERROR != _lclose( filehandle ), "_lclose complains\n" );
 164
 165     memory_object = LocalAlloc( LPTR, bytes_written );
 166
 167     ok( 0 != memory_object, "LocalAlloc fails. (Could be out of memory.)\n" );
 168
 169     contents = LocalLock( memory_object );
 170
 171     filehandle = _lopen( filename, OF_READ );
 172
 173     contents = LocalLock( memory_object );
 174
 175     ok( NULL != contents, "LocalLock whines\n" );
 176
 177     ok( bytes_written == _hread( filehandle, contents, bytes_written), "read length differ from write length\n" );
 178
 179     checksum[0] = '\0';
 180     i = 0;
 181     do
 182     {
 183         checksum[0] = checksum[0] + contents[i];
 184         i++;
 185     }
 186     while (i < bytes_written - 1);
 187
 188     ok( checksum[0] == contents[i], "stored checksum differ from computed checksum\n" );
 189
 190     ok( HFILE_ERROR != _lclose( filehandle ), "_lclose complains\n" );
 191
 192     ret = DeleteFileA( filename );
 193     ok( ret != 0, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 194 }
 195
 196
 197 static void test__lclose( void )
 198 {
 199     HFILE filehandle;
 200     BOOL ret;
 201
 202     filehandle = _lcreat( filename, 0 );
 203     if (filehandle == HFILE_ERROR)
 204     {
 205         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 206         return;
 207     }
 208
 209     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 210
 211     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 212
 213     ret = DeleteFileA( filename );
 214     ok( ret != 0, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 215 }
 216
 217
 218 static void test__lcreat( void )
 219 {
 220     HFILE filehandle;
 221     char buffer[10000];
 222     WIN32_FIND_DATAA search_results;
 223     char slashname[] = "testfi/";
 224     int err;
 225     HANDLE find;
 226     BOOL ret;
 227
 228     filehandle = _lcreat( filename, 0 );
 229     if (filehandle == HFILE_ERROR)
 230     {
 231         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 232         return;
 233     }
 234
 235     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 236
 237     ok( 0 == _llseek( filehandle, 0, FILE_BEGIN ), "_llseek complains\n" );
 238
 239     ok( _hread( filehandle, buffer, strlen( sillytext ) ) ==  lstrlenA( sillytext ), "erratic _hread return value\n" );
 240
 241     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 242
 243     ok( INVALID_HANDLE_VALUE != FindFirstFileA( filename, &search_results ), "should be able to find file\n" );
 244
 245     ret = DeleteFileA(filename);
 246     ok( ret != 0, "DeleteFile failed (%ld)\n", GetLastError());
 247
 248     filehandle = _lcreat( filename, 1 ); /* readonly */
 249     ok( HFILE_ERROR != filehandle, "couldn't create file \"%s\" (err=%ld)\n", filename, GetLastError(  ) );
 250
 251     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite shouldn't be able to write never the less\n" );
 252
 253     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 254
 255     ok( INVALID_HANDLE_VALUE != FindFirstFileA( filename, &search_results ), "should be able to find file\n" );
 256
 257     ok( 0 == DeleteFileA( filename ), "shouldn't be able to delete a readonly file\n" );
 258
 259     ok( SetFileAttributesA(filename, FILE_ATTRIBUTE_NORMAL ) != 0, "couldn't change attributes on file\n" );
 260
 261     ok( DeleteFileA( filename ) != 0, "now it should be possible to delete the file!\n" );
 262
 263     filehandle = _lcreat( filename, 2 );
 264     ok( HFILE_ERROR != filehandle, "couldn't create file \"%s\" (err=%ld)\n", filename, GetLastError(  ) );
 265
 266     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 267
 268     ok( 0 == _llseek( filehandle, 0, FILE_BEGIN ), "_llseek complains\n" );
 269
 270     ok( _hread( filehandle, buffer, strlen( sillytext ) ) ==  lstrlenA( sillytext ), "erratic _hread return value\n" );
 271
 272     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 273
 274     ok( INVALID_HANDLE_VALUE != FindFirstFileA( filename, &search_results ), "should STILL be able to find file\n" );
 275
 276     ret = DeleteFileA( filename );
 277     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 278
 279     filehandle = _lcreat( filename, 4 ); /* SYSTEM file */
 280     ok( HFILE_ERROR != filehandle, "couldn't create file \"%s\" (err=%ld)\n", filename, GetLastError(  ) );
 281
 282     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 283
 284     ok( 0 == _llseek( filehandle, 0, FILE_BEGIN ), "_llseek complains\n" );
 285
 286     ok( _hread( filehandle, buffer, strlen( sillytext ) ) ==  lstrlenA( sillytext ), "erratic _hread return value\n" );
 287
 288     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 289
 290     ok( INVALID_HANDLE_VALUE != FindFirstFileA( filename, &search_results ), "should STILL be able to find file\n" );
 291
 292     ret = DeleteFileA( filename );
 293     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 294
 295     filehandle=_lcreat (slashname, 0); /* illegal name */
 296     if (HFILE_ERROR==filehandle) {
 297       err=GetLastError ();
 298       ok (err==ERROR_INVALID_NAME || err==ERROR_PATH_NOT_FOUND,
 299           "creating file \"%s\" failed with error %d\n", slashname, err);
 300     } else { /* only NT succeeds */
 301       _lclose(filehandle);
 302       find=FindFirstFileA (slashname, &search_results);
 303       if (INVALID_HANDLE_VALUE!=find)
 304       {
 305         ret = FindClose (find);
 306         ok (0 != ret, "FindClose complains (%ld)\n", GetLastError ());
 307         slashname[strlen(slashname)-1]=0;
 308         ok (!strcmp (slashname, search_results.cFileName),
 309             "found unexpected name \"%s\"\n", search_results.cFileName);
 310         ok (FILE_ATTRIBUTE_ARCHIVE==search_results.dwFileAttributes,
 311             "attributes of file \"%s\" are 0x%04lx\n", search_results.cFileName,
 312             search_results.dwFileAttributes);
 313       }
 314     ret = DeleteFileA( slashname );
 315     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 316     }
 317
 318     filehandle=_lcreat (filename, 8); /* illegal attribute */
 319     if (HFILE_ERROR==filehandle)
 320       ok (0, "couldn't create volume label \"%s\"\n", filename);
 321     else {
 322       _lclose(filehandle);
 323       find=FindFirstFileA (filename, &search_results);
 324       if (INVALID_HANDLE_VALUE==find)
 325         ok (0, "file \"%s\" not found\n", filename);
 326       else {
 327         ret = FindClose(find);
 328         ok ( 0 != ret, "FindClose complains (%ld)\n", GetLastError ());
 329         ok (!strcmp (filename, search_results.cFileName),
 330             "found unexpected name \"%s\"\n", search_results.cFileName);
 331         ok (FILE_ATTRIBUTE_ARCHIVE==search_results.dwFileAttributes,
 332             "attributes of file \"%s\" are 0x%04lx\n", search_results.cFileName,
 333             search_results.dwFileAttributes);
 334       }
 335     ret = DeleteFileA( filename );
 336     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 337     }
 338 }
 339
 340
 341 static void test__llseek( void )
 342 {
 343     INT i;
 344     HFILE filehandle;
 345     char buffer[1];
 346     long bytes_read;
 347     BOOL ret;
 348
 349     filehandle = _lcreat( filename, 0 );
 350     if (filehandle == HFILE_ERROR)
 351     {
 352         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 353         return;
 354     }
 355
 356     for (i = 0; i < 400; i++)
 357     {
 358         ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 359     }
 360     ok( HFILE_ERROR != _llseek( filehandle, 400 * strlen( sillytext ), FILE_CURRENT ), "should be able to seek\n" );
 361     ok( HFILE_ERROR != _llseek( filehandle, 27 + 35 * strlen( sillytext ), FILE_BEGIN ), "should be able to seek\n" );
 362
 363     bytes_read = _hread( filehandle, buffer, 1);
 364     ok( 1 == bytes_read, "file read size error\n" );
 365     ok( buffer[0] == sillytext[27], "_llseek error, it got lost seeking\n" );
 366     ok( HFILE_ERROR != _llseek( filehandle, -400 * strlen( sillytext ), FILE_END ), "should be able to seek\n" );
 367
 368     bytes_read = _hread( filehandle, buffer, 1);
 369     ok( 1 == bytes_read, "file read size error\n" );
 370     ok( buffer[0] == sillytext[0], "_llseek error, it got lost seeking\n" );
 371     ok( HFILE_ERROR != _llseek( filehandle, 1000000, FILE_END ), "should be able to seek past file; poor, poor Windows programmers\n" );
 372     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 373
 374     ret = DeleteFileA( filename );
 375     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 376 }
 377
 378
 379 static void test__llopen( void )
 380 {
 381     HFILE filehandle;
 382     UINT bytes_read;
 383     char buffer[10000];
 384     BOOL ret;
 385
 386     filehandle = _lcreat( filename, 0 );
 387     if (filehandle == HFILE_ERROR)
 388     {
 389         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 390         return;
 391     }
 392
 393     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 394     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 395
 396     filehandle = _lopen( filename, OF_READ );
 397     ok( HFILE_ERROR == _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite shouldn't be able to write!\n" );
 398     bytes_read = _hread( filehandle, buffer, strlen( sillytext ) );
 399     ok( strlen( sillytext )  == bytes_read, "file read size error\n" );
 400     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 401
 402     filehandle = _lopen( filename, OF_READWRITE );
 403     bytes_read = _hread( filehandle, buffer, 2 * strlen( sillytext ) );
 404     ok( strlen( sillytext )  == bytes_read, "file read size error\n" );
 405     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite should write just fine\n" );
 406     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 407
 408     filehandle = _lopen( filename, OF_WRITE );
 409     ok( HFILE_ERROR == _hread( filehandle, buffer, 1 ), "you should only be able to write this file\n" );
 410     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite should write just fine\n" );
 411     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 412
 413     ret = DeleteFileA( filename );
 414     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 415     /* TODO - add tests for the SHARE modes  -  use two processes to pull this one off */
 416 }
 417
 418
 419 static void test__lread( void )
 420 {
 421     HFILE filehandle;
 422     char buffer[10000];
 423     long bytes_read;
 424     UINT bytes_wanted;
 425     UINT i;
 426     BOOL ret;
 427
 428     filehandle = _lcreat( filename, 0 );
 429     if (filehandle == HFILE_ERROR)
 430     {
 431         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 432         return;
 433     }
 434
 435     ok( HFILE_ERROR != _hwrite( filehandle, sillytext, strlen( sillytext ) ), "_hwrite complains\n" );
 436
 437     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 438
 439     filehandle = _lopen( filename, OF_READ );
 440
 441     ok( HFILE_ERROR != filehandle, "couldn't open file \"%s\" again (err=%ld)\n", filename, GetLastError());
 442
 443     bytes_read = _lread( filehandle, buffer, 2 * strlen( sillytext ) );
 444
 445     ok( lstrlenA( sillytext ) == bytes_read, "file read size error\n" );
 446
 447     for (bytes_wanted = 0; bytes_wanted < strlen( sillytext ); bytes_wanted++)
 448     {
 449         ok( 0 == _llseek( filehandle, 0, FILE_BEGIN ), "_llseek complains\n" );
 450         ok( _lread( filehandle, buffer, bytes_wanted ) == bytes_wanted, "erratic _hread return value\n" );
 451         for (i = 0; i < bytes_wanted; i++)
 452         {
 453             ok( buffer[i] == sillytext[i], "that's not what's written\n" );
 454         }
 455     }
 456
 457     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 458
 459     ret = DeleteFileA( filename );
 460     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 461 }
 462
 463
 464 static void test__lwrite( void )
 465 {
 466     HFILE filehandle;
 467     char buffer[10000];
 468     long bytes_read;
 469     long bytes_written;
 470     long blocks;
 471     long i;
 472     char *contents;
 473     HLOCAL memory_object;
 474     char checksum[1];
 475     BOOL ret;
 476
 477     filehandle = _lcreat( filename, 0 );
 478     if (filehandle == HFILE_ERROR)
 479     {
 480         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 481         return;
 482     }
 483
 484     ok( HFILE_ERROR != _lwrite( filehandle, "", 0 ), "_hwrite complains\n" );
 485
 486     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 487
 488     filehandle = _lopen( filename, OF_READ );
 489
 490     bytes_read = _hread( filehandle, buffer, 1);
 491
 492     ok( 0 == bytes_read, "file read size error\n" );
 493
 494     ok( HFILE_ERROR != _lclose(filehandle), "_lclose complains\n" );
 495
 496     filehandle = _lopen( filename, OF_READWRITE );
 497
 498     bytes_written = 0;
 499     checksum[0] = '\0';
 500     srand( (unsigned)time( NULL ) );
 501     for (blocks = 0; blocks < 100; blocks++)
 502     {
 503         for (i = 0; i < (long)sizeof( buffer ); i++)
 504         {
 505             buffer[i] = rand(  );
 506             checksum[0] = checksum[0] + buffer[i];
 507         }
 508         ok( HFILE_ERROR != _lwrite( filehandle, buffer, sizeof( buffer ) ), "_hwrite complains\n" );
 509         bytes_written = bytes_written + sizeof( buffer );
 510     }
 511
 512     ok( HFILE_ERROR != _lwrite( filehandle, checksum, 1 ), "_hwrite complains\n" );
 513     bytes_written++;
 514
 515     ok( HFILE_ERROR != _lclose( filehandle ), "_lclose complains\n" );
 516
 517     memory_object = LocalAlloc( LPTR, bytes_written );
 518
 519     ok( 0 != memory_object, "LocalAlloc fails, could be out of memory\n" );
 520
 521     contents = LocalLock( memory_object );
 522
 523     filehandle = _lopen( filename, OF_READ );
 524
 525     contents = LocalLock( memory_object );
 526
 527     ok( NULL != contents, "LocalLock whines\n" );
 528
 529     ok( bytes_written == _hread( filehandle, contents, bytes_written), "read length differ from write length\n" );
 530
 531     checksum[0] = '\0';
 532     i = 0;
 533     do
 534     {
 535         checksum[0] += contents[i];
 536         i++;
 537     }
 538     while (i < bytes_written - 1);
 539
 540     ok( checksum[0] == contents[i], "stored checksum differ from computed checksum\n" );
 541
 542     ok( HFILE_ERROR != _lclose( filehandle ), "_lclose complains\n" );
 543
 544     ret = DeleteFileA( filename );
 545     ok( ret, "DeleteFile failed (%ld)\n", GetLastError(  ) );
 546 }
 547
 548 static void test_CopyFileA(void)
 549 {
 550     char temp_path[MAX_PATH];
 551     char source[MAX_PATH], dest[MAX_PATH];
 552     static const char prefix[] = "pfx";
 553     HANDLE hfile;
 554     FILETIME ft1, ft2;
 555     char buf[10];
 556     DWORD ret;
 557     BOOL retok;
 558
 559     ret = GetTempPathA(MAX_PATH, temp_path);
 560     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
 561     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 562
 563     ret = GetTempFileNameA(temp_path, prefix, 0, source);
 564     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 565
 566     /* make the source have not zero size */
 567     hfile = CreateFileA(source, GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, 0 );
 568     ok(hfile != INVALID_HANDLE_VALUE, "failed to open source file\n");
 569     retok = WriteFile(hfile, prefix, sizeof(prefix), &ret, NULL );
 570     ok( retok && ret == sizeof(prefix),
 571        "WriteFile error %ld\n", GetLastError());
 572     ok(GetFileSize(hfile, NULL) == sizeof(prefix), "source file has wrong size\n");
 573     /* get the file time and change it to prove the difference */
 574     ok(GetFileTime(hfile, NULL, NULL, &ft1), "GetFileTime error %ld\n", GetLastError());
 575     ft1.dwLowDateTime -= 600000000; /* 60 second */
 576     ok(SetFileTime(hfile, NULL, NULL, &ft1), "SetFileTime error %ld\n", GetLastError());
 577     GetFileTime(hfile, NULL, NULL, &ft1);  /* get the actual time back */
 578     CloseHandle(hfile);
 579
 580     ret = GetTempFileNameA(temp_path, prefix, 0, dest);
 581     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 582
 583     SetLastError(0xdeadbeef);
 584     ret = CopyFileA(source, dest, TRUE);
 585     ok(!ret && GetLastError() == ERROR_FILE_EXISTS,
 586        "CopyFileA: unexpected error %ld\n", GetLastError());
 587
 588     ret = CopyFileA(source, dest, FALSE);
 589     ok(ret, "CopyFileA: error %ld\n", GetLastError());
 590
 591     /* make sure that destination has correct size */
 592     hfile = CreateFileA(dest, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
 593     ok(hfile != INVALID_HANDLE_VALUE, "failed to open destination file\n");
 594     ret = GetFileSize(hfile, NULL);
 595     ok(ret == sizeof(prefix), "destination file has wrong size %ld\n", ret);
 596
 597     /* make sure that destination has the same filetime */
 598     ok(ret = GetFileTime(hfile, NULL, NULL, &ft2), "GetFileTime error %ld\n", GetLastError());
 599     ok(CompareFileTime(&ft1, &ft2) == 0, "destination file has wrong filetime\n");
 600
 601     SetLastError(0xdeadbeef);
 602     ret = CopyFileA(source, dest, FALSE);
 603     ok(!ret && GetLastError() == ERROR_SHARING_VIOLATION,
 604        "CopyFileA: ret = %ld, unexpected error %ld\n", ret, GetLastError());
 605
 606     /* make sure that destination still has correct size */
 607     ret = GetFileSize(hfile, NULL);
 608     ok(ret == sizeof(prefix), "destination file has wrong size %ld\n", ret);
 609     retok = ReadFile(hfile, buf, sizeof(buf), &ret, NULL);
 610     ok( retok && ret == sizeof(prefix),
 611        "ReadFile: error %ld\n", GetLastError());
 612     ok(!memcmp(prefix, buf, sizeof(prefix)), "buffer contents mismatch\n");
 613     CloseHandle(hfile);
 614
 615     ret = DeleteFileA(source);
 616     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 617     ret = DeleteFileA(dest);
 618     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 619 }
 620
 621 static void test_CopyFileW(void)
 622 {
 623     WCHAR temp_path[MAX_PATH];
 624     WCHAR source[MAX_PATH], dest[MAX_PATH];
 625     static const WCHAR prefix[] = {'p','f','x',0};
 626     DWORD ret;
 627
 628     ret = GetTempPathW(MAX_PATH, temp_path);
 629     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 630         return;
 631     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 632     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 633
 634     ret = GetTempFileNameW(temp_path, prefix, 0, source);
 635     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 636
 637     ret = GetTempFileNameW(temp_path, prefix, 0, dest);
 638     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 639
 640     ret = CopyFileW(source, dest, TRUE);
 641     ok(!ret && GetLastError() == ERROR_FILE_EXISTS,
 642        "CopyFileW: unexpected error %ld\n", GetLastError());
 643
 644     ret = CopyFileW(source, dest, FALSE);
 645     ok(ret, "CopyFileW: error %ld\n", GetLastError());
 646
 647     ret = DeleteFileW(source);
 648     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 649     ret = DeleteFileW(dest);
 650     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 651 }
 652
 653 static void test_CreateFileA(void)
 654 {
 655     HANDLE hFile;
 656     char temp_path[MAX_PATH];
 657     char filename[MAX_PATH];
 658     static const char prefix[] = "pfx";
 659     DWORD ret;
 660
 661     ret = GetTempPathA(MAX_PATH, temp_path);
 662     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
 663     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 664
 665     ret = GetTempFileNameA(temp_path, prefix, 0, filename);
 666     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 667
 668     hFile = CreateFileA(filename, GENERIC_READ, 0, NULL,
 669                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 670     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_EXISTS,
 671         "CREATE_NEW should fail if file exists and last error value should be ERROR_FILE_EXISTS\n");
 672
 673     ret = DeleteFileA(filename);
 674     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 675 }
 676
 677 static void test_CreateFileW(void)
 678 {
 679     HANDLE hFile;
 680     WCHAR temp_path[MAX_PATH];
 681     WCHAR filename[MAX_PATH];
 682     static const WCHAR emptyW[]={'\0'};
 683     static const WCHAR prefix[] = {'p','f','x',0};
 684     static const WCHAR bogus[] = { '\\', '\\', '.', '\\', 'B', 'O', 'G', 'U', 'S', 0 };
 685     DWORD ret;
 686
 687     ret = GetTempPathW(MAX_PATH, temp_path);
 688     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 689         return;
 690     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 691     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 692
 693     ret = GetTempFileNameW(temp_path, prefix, 0, filename);
 694     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 695
 696     hFile = CreateFileW(filename, GENERIC_READ, 0, NULL,
 697                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 698     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_EXISTS,
 699         "CREATE_NEW should fail if file exists and last error value should be ERROR_FILE_EXISTS\n");
 700
 701     ret = DeleteFileW(filename);
 702     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 703
 704     hFile = CreateFileW(NULL, GENERIC_READ, 0, NULL,
 705                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 706     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_PATH_NOT_FOUND,
 707        "CreateFileW(NULL) returned ret=%p error=%ld\n",hFile,GetLastError());
 708
 709     hFile = CreateFileW(emptyW, GENERIC_READ, 0, NULL,
 710                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 711     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_PATH_NOT_FOUND,
 712        "CreateFileW(\"\") returned ret=%p error=%ld\n",hFile,GetLastError());
 713
 714     /* test the result of opening a nonexistent driver name */
 715     hFile = CreateFileW(bogus, 0, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
 716                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
 717     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_NOT_FOUND,
 718        "CreateFileW on invalid VxD name returned ret=%p error=%ld\n",hFile,GetLastError());
 719 }
 720
 721 static void test_GetTempFileNameA()
 722 {
 723     UINT result;
 724     char out[MAX_PATH];
 725     char expected[MAX_PATH + 10];
 726     char windowsdir[MAX_PATH + 10];
 727     char windowsdrive[3];
 728
 729     result = GetWindowsDirectory(windowsdir, sizeof(windowsdir));
 730     ok(result < sizeof(windowsdir), "windowsdir is abnormally long!\n");
 731     ok(result != 0, "GetWindowsDirectory: error %ld\n", GetLastError());
 732
 733     /* If the Windows directory is the root directory, it ends in backslash, not else. */
 734     if (strlen(windowsdir) != 3) /* As in  "C:\"  or  "F:\"  */
 735     {
 736         strcat(windowsdir, "\\");
 737     }
 738
 739     windowsdrive[0] = windowsdir[0];
 740     windowsdrive[1] = windowsdir[1];
 741     windowsdrive[2] = '\0';
 742
 743     result = GetTempFileNameA(windowsdrive, "abc", 1, out);
 744     ok(result != 0, "GetTempFileNameA: error %ld\n", GetLastError());
 745     ok(((out[0] == windowsdrive[0]) && (out[1] == ':')) && (out[2] == '\\'),
 746        "GetTempFileNameA: first three characters should be %c:\\, string was actually %s\n",
 747        windowsdrive[0], out);
 748
 749     result = GetTempFileNameA(windowsdir, "abc", 2, out);
 750     ok(result != 0, "GetTempFileNameA: error %ld\n", GetLastError());
 751     expected[0] = '\0';
 752     strcat(expected, windowsdir);
 753     strcat(expected, "abc2.tmp");
 754     ok(lstrcmpiA(out, expected) == 0, "GetTempFileNameA: Unexpected output \"%s\" vs \"%s\"\n",
 755        out, expected);
 756 }
 757
 758 static void test_DeleteFileA( void )
 759 {
 760     BOOL ret;
 761
 762     ret = DeleteFileA(NULL);
 763     ok(!ret && (GetLastError() == ERROR_INVALID_PARAMETER ||
 764                 GetLastError() == ERROR_PATH_NOT_FOUND),
 765        "DeleteFileA(NULL) returned ret=%d error=%ld\n",ret,GetLastError());
 766
 767     ret = DeleteFileA("");
 768     ok(!ret && (GetLastError() == ERROR_PATH_NOT_FOUND ||
 769                 GetLastError() == ERROR_BAD_PATHNAME),
 770        "DeleteFileA(\"\") returned ret=%d error=%ld\n",ret,GetLastError());
 771
 772     ret = DeleteFileA("nul");
 773     ok(!ret && (GetLastError() == ERROR_FILE_NOT_FOUND ||
 774                 GetLastError() == ERROR_INVALID_PARAMETER ||
 775                 GetLastError() == ERROR_ACCESS_DENIED),
 776        "DeleteFileA(\"nul\") returned ret=%d error=%ld\n",ret,GetLastError());
 777 }
 778
 779 static void test_DeleteFileW( void )
 780 {
 781     BOOL ret;
 782     static const WCHAR emptyW[]={'\0'};
 783
 784     ret = DeleteFileW(NULL);
 785     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 786         return;
 787     ok(!ret && GetLastError() == ERROR_PATH_NOT_FOUND,
 788        "DeleteFileW(NULL) returned ret=%d error=%ld\n",ret,GetLastError());
 789
 790     ret = DeleteFileW(emptyW);
 791     ok(!ret && GetLastError() == ERROR_PATH_NOT_FOUND,
 792        "DeleteFileW(\"\") returned ret=%d error=%ld\n",ret,GetLastError());
 793 }
 794
 795 #define IsDotDir(x)     ((x[0] == '.') && ((x[1] == 0) || ((x[1] == '.') && (x[2] == 0))))
 796
 797 static void test_MoveFileA(void)
 798 {
 799     char tempdir[MAX_PATH];
 800     char source[MAX_PATH], dest[MAX_PATH];
 801     static const char prefix[] = "pfx";
 802     DWORD ret;
 803
 804     ret = GetTempPathA(MAX_PATH, tempdir);
 805     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
 806     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 807
 808     ret = GetTempFileNameA(tempdir, prefix, 0, source);
 809     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 810
 811     ret = GetTempFileNameA(tempdir, prefix, 0, dest);
 812     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 813
 814     ret = MoveFileA(source, dest);
 815     ok(!ret && GetLastError() == ERROR_ALREADY_EXISTS,
 816        "MoveFileA: unexpected error %ld\n", GetLastError());
 817
 818     ret = DeleteFileA(dest);
 819     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 820
 821     ret = MoveFileA(source, dest);
 822     ok(ret, "MoveFileA: failed, error %ld\n", GetLastError());
 823
 824     lstrcatA(tempdir, "Remove Me");
 825     ret = CreateDirectoryA(tempdir, NULL);
 826     ok(ret == TRUE, "CreateDirectoryA failed\n");
 827
 828     lstrcpyA(source, dest);
 829     lstrcpyA(dest, tempdir);
 830     lstrcatA(dest, "\\wild?.*");
 831     /* FIXME: if we create a file with wildcards we can't delete it now that DeleteFile works correctly */
 832     ret = MoveFileA(source, dest);
 833     ok(!ret, "MoveFileA: shouldn't move to wildcard file\n");
 834     ok(GetLastError() == ERROR_INVALID_NAME || /* NT */
 835        GetLastError() == ERROR_FILE_NOT_FOUND, /* Win9x */
 836        "MoveFileA: with wildcards, unexpected error %ld\n", GetLastError());
 837     if (ret || (GetLastError() != ERROR_INVALID_NAME))
 838     {
 839         WIN32_FIND_DATAA fd;
 840         char temppath[MAX_PATH];
 841         HANDLE hFind;
 842
 843         lstrcpyA(temppath, tempdir);
 844         lstrcatA(temppath, "\\*.*");
 845         hFind = FindFirstFileA(temppath, &fd);
 846         if (INVALID_HANDLE_VALUE != hFind)
 847         {
 848           LPSTR lpName;
 849           do
 850           {
 851             lpName = fd.cAlternateFileName;
 852             if (!lpName[0])
 853               lpName = fd.cFileName;
 854             ok(IsDotDir(lpName), "MoveFileA: wildcards file created!\n");
 855           }
 856           while (FindNextFileA(hFind, &fd));
 857           FindClose(hFind);
 858         }
 859     }
 860     ret = DeleteFileA(source);
 861     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 862     ret = DeleteFileA(dest);
 863     ok(!ret, "DeleteFileA: error %ld\n", GetLastError());
 864     ret = RemoveDirectoryA(tempdir);
 865     ok(ret, "DeleteDirectoryA: error %ld\n", GetLastError());
 866 }
 867
 868 static void test_MoveFileW(void)
 869 {
 870     WCHAR temp_path[MAX_PATH];
 871     WCHAR source[MAX_PATH], dest[MAX_PATH];
 872     static const WCHAR prefix[] = {'p','f','x',0};
 873     DWORD ret;
 874
 875     ret = GetTempPathW(MAX_PATH, temp_path);
 876     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 877         return;
 878     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 879     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 880
 881     ret = GetTempFileNameW(temp_path, prefix, 0, source);
 882     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 883
 884     ret = GetTempFileNameW(temp_path, prefix, 0, dest);
 885     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 886
 887     ret = MoveFileW(source, dest);
 888     ok(!ret && GetLastError() == ERROR_ALREADY_EXISTS,
 889        "CopyFileW: unexpected error %ld\n", GetLastError());
 890
 891     ret = DeleteFileW(source);
 892     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 893     ret = DeleteFileW(dest);
 894     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 895 }
 896
 897 #define PATTERN_OFFSET 0x10
 898
 899 static void test_offset_in_overlapped_structure(void)
 900 {
 901     HANDLE hFile;
 902     OVERLAPPED ov;
 903     DWORD done;
 904     BOOL rc;
 905     BYTE buf[256], pattern[] = "TeSt";
 906     UINT i;
 907     char temp_path[MAX_PATH], temp_fname[MAX_PATH];
 908     BOOL ret;
 909
 910     ret =GetTempPathA(MAX_PATH, temp_path);
 911     ok( ret, "GetTempPathA error %ld\n", GetLastError());
 912     ret =GetTempFileNameA(temp_path, "pfx", 0, temp_fname);
 913     ok( ret, "GetTempFileNameA error %ld\n", GetLastError());
 914
 915     /*** Write File *****************************************************/
 916
 917     hFile = CreateFileA(temp_fname, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
 918     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError());
 919
 920     for(i = 0; i < sizeof(buf); i++) buf[i] = i;
 921     ret = WriteFile(hFile, buf, sizeof(buf), &done, NULL);
 922     ok( ret, "WriteFile error %ld\n", GetLastError());
 923     ok(done == sizeof(buf), "expected number of bytes written %lu\n", done);
 924
 925     memset(&ov, 0, sizeof(ov));
 926     S(U(ov)).Offset = PATTERN_OFFSET;
 927     S(U(ov)).OffsetHigh = 0;
 928     rc=WriteFile(hFile, pattern, sizeof(pattern), &done, &ov);
 929     /* Win 9x does not support the overlapped I/O on files */
 930     if (rc || GetLastError()!=ERROR_INVALID_PARAMETER) {
 931         ok(rc, "WriteFile error %ld\n", GetLastError());
 932         ok(done == sizeof(pattern), "expected number of bytes written %lu\n", done);
 933         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 934         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (PATTERN_OFFSET + sizeof(pattern)),
 935            "expected file offset %d\n", PATTERN_OFFSET + sizeof(pattern));
 936
 937         S(U(ov)).Offset = sizeof(buf) * 2;
 938         S(U(ov)).OffsetHigh = 0;
 939         ret = WriteFile(hFile, pattern, sizeof(pattern), &done, &ov);
 940         ok( ret, "WriteFile error %ld\n", GetLastError());
 941         ok(done == sizeof(pattern), "expected number of bytes written %lu\n", done);
 942         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 943         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (sizeof(buf) * 2 + sizeof(pattern)),
 944            "expected file offset %d\n", sizeof(buf) * 2 + sizeof(pattern));
 945     }
 946
 947     CloseHandle(hFile);
 948
 949     /*** Read File *****************************************************/
 950
 951     hFile = CreateFileA(temp_fname, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, 0);
 952     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError());
 953
 954     memset(buf, 0, sizeof(buf));
 955     memset(&ov, 0, sizeof(ov));
 956     S(U(ov)).Offset = PATTERN_OFFSET;
 957     S(U(ov)).OffsetHigh = 0;
 958     rc=ReadFile(hFile, buf, sizeof(pattern), &done, &ov);
 959     /* Win 9x does not support the overlapped I/O on files */
 960     if (rc || GetLastError()!=ERROR_INVALID_PARAMETER) {
 961         ok(rc, "ReadFile error %ld\n", GetLastError());
 962         ok(done == sizeof(pattern), "expected number of bytes read %lu\n", done);
 963         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 964         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (PATTERN_OFFSET + sizeof(pattern)),
 965            "expected file offset %d\n", PATTERN_OFFSET + sizeof(pattern));
 966         ok(!memcmp(buf, pattern, sizeof(pattern)), "pattern match failed\n");
 967     }
 968
 969     CloseHandle(hFile);
 970
 971     ret = DeleteFileA(temp_fname);
 972     ok( ret, "DeleteFileA error %ld\n", GetLastError());
 973 }
 974
 975 static void test_LockFile(void)
 976 {
 977     HANDLE handle;
 978     DWORD written;
 979     OVERLAPPED overlapped;
 980     int limited_LockFile;
 981     int limited_UnLockFile;
 982     int lockfileex_capable;
 983
 984     handle = CreateFileA( filename, GENERIC_READ | GENERIC_WRITE,
 985                           FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
 986                           CREATE_ALWAYS, 0, 0 );
 987     if (handle == INVALID_HANDLE_VALUE)
 988     {
 989         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 990         return;
 991     }
 992     ok( WriteFile( handle, sillytext, strlen(sillytext), &written, NULL ), "write failed\n" );
 993
 994     ok( LockFile( handle, 0, 0, 0, 0 ), "LockFile failed\n" );
 995     ok( UnlockFile( handle, 0, 0, 0, 0 ), "UnlockFile failed\n" );
 996
 997     limited_UnLockFile = 0;
 998     if (UnlockFile( handle, 0, 0, 0, 0 ))
 999     {
1000         limited_UnLockFile = 1;
1001     }
1002
1003     ok( LockFile( handle, 10, 0, 20, 0 ), "LockFile 10,20 failed\n" );
1004     /* overlapping locks must fail */
1005     ok( !LockFile( handle, 12, 0, 10, 0 ), "LockFile 12,10 succeeded\n" );
1006     ok( !LockFile( handle, 5, 0, 6, 0 ), "LockFile 5,6 succeeded\n" );
1007     /* non-overlapping locks must succeed */
1008     ok( LockFile( handle, 5, 0, 5, 0 ), "LockFile 5,5 failed\n" );
1009
1010     ok( !UnlockFile( handle, 10, 0, 10, 0 ), "UnlockFile 10,10 succeeded\n" );
1011     ok( UnlockFile( handle, 10, 0, 20, 0 ), "UnlockFile 10,20 failed\n" );
1012     ok( !UnlockFile( handle, 10, 0, 20, 0 ), "UnlockFile 10,20 again succeeded\n" );
1013     ok( UnlockFile( handle, 5, 0, 5, 0 ), "UnlockFile 5,5 failed\n" );
1014
1015     S(U(overlapped)).Offset = 100;
1016     S(U(overlapped)).OffsetHigh = 0;
1017     overlapped.hEvent = 0;
1018
1019     lockfileex_capable = dll_capable("kernel32", "LockFileEx");
1020     if (lockfileex_capable)
1021     {
1022         /* Test for broken LockFileEx a la Windows 95 OSR2. */
1023         if (LockFileEx( handle, 0, 0, 100, 0, &overlapped ))
1024         {
1025             /* LockFileEx is probably OK, test it more. */
1026             ok( LockFileEx( handle, 0, 0, 100, 0, &overlapped ),
1027                 "LockFileEx 100,100 failed\n" );
1028         }
1029     }
1030
1031     /* overlapping shared locks are OK */
1032     S(U(overlapped)).Offset = 150;
1033     limited_UnLockFile || ok( LockFileEx( handle, 0, 0, 100, 0, &overlapped ), "LockFileEx 150,100 failed\n" );
1034
1035     /* but exclusive is not */
1036     if (lockfileex_capable)
1037     {
1038         ok( !LockFileEx( handle, LOCKFILE_EXCLUSIVE_LOCK|LOCKFILE_FAIL_IMMEDIATELY,
1039                          0, 50, 0, &overlapped ),
1040                          "LockFileEx exclusive 150,50 succeeded\n" );
1041         if (dll_capable("kernel32.dll", "UnlockFileEx"))
1042         {
1043             if (!UnlockFileEx( handle, 0, 100, 0, &overlapped ))
1044             { /* UnLockFile is capable. */
1045                 S(U(overlapped)).Offset = 100;
1046                 ok( !UnlockFileEx( handle, 0, 100, 0, &overlapped ),
1047                     "UnlockFileEx 150,100 again succeeded\n" );
1048             }
1049         }
1050     }
1051
1052     ok( LockFile( handle, 0, 0x10000000, 0, 0xf0000000 ), "LockFile failed\n" );
1053     ok( !LockFile( handle, ~0, ~0, 1, 0 ), "LockFile ~0,1 succeeded\n" );
1054     ok( !LockFile( handle, 0, 0x20000000, 20, 0 ), "LockFile 0x20000000,20 succeeded\n" );
1055     ok( UnlockFile( handle, 0, 0x10000000, 0, 0xf0000000 ), "UnlockFile failed\n" );
1056
1057     /* wrap-around lock should not do anything */
1058     /* (but still succeeds on NT4 so we don't check result) */
1059     LockFile( handle, 0, 0x10000000, 0, 0xf0000001 );
1060
1061     limited_LockFile = 0;
1062     if (!LockFile( handle, ~0, ~0, 1, 0 ))
1063     {
1064         limited_LockFile = 1;
1065     }
1066
1067     limited_UnLockFile || ok( UnlockFile( handle, ~0, ~0, 1, 0 ), "Unlockfile ~0,1 failed\n" );
1068
1069     /* zero-byte lock */
1070     ok( LockFile( handle, 100, 0, 0, 0 ), "LockFile 100,0 failed\n" );
1071     limited_LockFile || ok( !LockFile( handle, 98, 0, 4, 0 ), "LockFile 98,4 succeeded\n" );
1072     ok( LockFile( handle, 90, 0, 10, 0 ), "LockFile 90,10 failed\n" );
1073     limited_LockFile || ok( !LockFile( handle, 100, 0, 10, 0 ), "LockFile 100,10 failed\n" );
1074
1075     ok( UnlockFile( handle, 90, 0, 10, 0 ), "UnlockFile 90,10 failed\n" );
1076     !ok( UnlockFile( handle, 100, 0, 10, 0 ), "UnlockFile 100,10 failed\n" );
1077
1078     ok( UnlockFile( handle, 100, 0, 0, 0 ), "UnlockFile 100,0 failed\n" );
1079
1080     CloseHandle( handle );
1081     DeleteFileA( filename );
1082 }
1083
1084 static inline int is_sharing_compatible( DWORD access1, DWORD sharing1, DWORD access2, DWORD sharing2 )
1085 {
1086     if (!access1 || !access2) return 1;
1087     if ((access1 & GENERIC_READ) && !(sharing2 & FILE_SHARE_READ)) return 0;
1088     if ((access1 & GENERIC_WRITE) && !(sharing2 & FILE_SHARE_WRITE)) return 0;
1089     if ((access2 & GENERIC_READ) && !(sharing1 & FILE_SHARE_READ)) return 0;
1090     if ((access2 & GENERIC_WRITE) && !(sharing1 & FILE_SHARE_WRITE)) return 0;
1091     return 1;
1092 }
1093
1094 static void test_file_sharing(void)
1095 {
1096     static const DWORD access_modes[4] = { 0, GENERIC_READ, GENERIC_WRITE, GENERIC_READ|GENERIC_WRITE };
1097     static const DWORD sharing_modes[4] = { 0, FILE_SHARE_READ, FILE_SHARE_WRITE, FILE_SHARE_READ|FILE_SHARE_WRITE };
1098     int a1, s1, a2, s2;
1099     int ret;
1100     HANDLE h, h2;
1101
1102     /* make sure the file exists */
1103     h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0 );
1104     if (h == INVALID_HANDLE_VALUE)
1105     {
1106         ok(0, "couldn't create file \"%s\" (err=%ld)\n", filename, GetLastError());
1107         return;
1108     }
1109     CloseHandle( h );
1110
1111     for (a1 = 0; a1 < 4; a1++)
1112     {
1113         for (s1 = 0; s1 < 4; s1++)
1114         {
1115             h = CreateFileA( filename, access_modes[a1], sharing_modes[s1],
1116                              NULL, OPEN_EXISTING, 0, 0 );
1117             if (h == INVALID_HANDLE_VALUE)
1118             {
1119                 ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
1120                 return;
1121             }
1122             for (a2 = 0; a2 < 4; a2++)
1123             {
1124                 for (s2 = 0; s2 < 4; s2++)
1125                 {
1126                     SetLastError(0xdeadbeef);
1127                     h2 = CreateFileA( filename, access_modes[a2], sharing_modes[s2],
1128                                       NULL, OPEN_EXISTING, 0, 0 );
1129                     if (is_sharing_compatible( access_modes[a1], sharing_modes[s1],
1130                                                access_modes[a2], sharing_modes[s2] ))
1131                     {
1132                         ret = GetLastError();
1133                         ok( ERROR_SHARING_VIOLATION == ret || 0 == ret,
1134                             "Windows 95 sets GetLastError() = ERROR_SHARING_VIOLATION and\n"
1135                             "  Windows XP GetLastError() = 0, but now it is %d.\n"
1136                             "  indexes = %d, %d, %d, %d\n"
1137                             "  modes   =\n  %lx/%lx/%lx/%lx\n",
1138                             ret,
1139                             a1, s1, a2, s2,
1140                             access_modes[a1], sharing_modes[s1],
1141                             access_modes[a2], sharing_modes[s2]
1142                             );
1143                     }
1144                     else
1145                     {
1146                         ok( h2 == INVALID_HANDLE_VALUE,
1147                             "open succeeded for modes %lx/%lx/%lx/%lx\n",
1148                             access_modes[a1], sharing_modes[s1],
1149                             access_modes[a2], sharing_modes[s2] );
1150                         if (h2 == INVALID_HANDLE_VALUE)
1151                             ok( GetLastError() == ERROR_SHARING_VIOLATION,
1152                                 "wrong error code %ld\n", GetLastError() );
1153                     }
1154                     if (h2 != INVALID_HANDLE_VALUE) CloseHandle( h2 );
1155                 }
1156             }
1157             CloseHandle( h );
1158         }
1159     }
1160
1161     SetLastError(0xdeadbeef);
1162     h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_ALWAYS, 0, 0 );
1163     ok( h != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError() );
1164
1165     SetLastError(0xdeadbeef);
1166     h2 = CreateFileA( filename, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0 );
1167     ok( h2 == INVALID_HANDLE_VALUE, "CreateFileA should fail\n");
1168     ok( GetLastError() == ERROR_SHARING_VIOLATION, "wrong error code %ld\n", GetLastError() );
1169
1170     h2 = CreateFileA( filename, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, 0 );
1171     ok( h2 != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError() );
1172
1173     CloseHandle(h);
1174     CloseHandle(h2);
1175
1176     DeleteFileA( filename );
1177 }
1178
1179 static char get_windows_drive()
1180 {
1181     char windowsdir[MAX_PATH];
1182     GetWindowsDirectory(windowsdir, sizeof(windowsdir));
1183     return windowsdir[0];
1184 }
1185
1186 static void test_FindFirstFileA()
1187 {
1188     HANDLE handle;
1189     WIN32_FIND_DATAA search_results;
1190     int err;
1191     char buffer[5] = "C:\\";
1192
1193     /* try FindFirstFileA on "C:\" */
1194     buffer[0] = get_windows_drive();
1195     handle = FindFirstFileA(buffer,&search_results);
1196     err = GetLastError();
1197     ok ( handle == INVALID_HANDLE_VALUE , "FindFirstFile on root directory should Fail\n");
1198     if (handle == INVALID_HANDLE_VALUE)
1199       ok ( err == ERROR_FILE_NOT_FOUND, "Bad Error number %d\n", err);
1200
1201     /* try FindFirstFileA on "C:\*" */
1202     strcat(buffer, "*");
1203     handle = FindFirstFileA(buffer,&search_results);
1204     ok ( handle != INVALID_HANDLE_VALUE, "FindFirstFile on %s should succeed\n", buffer );
1205     ok ( FindClose(handle) == TRUE, "Failed to close handle\n");
1206 }
1207
1208 static void test_FindNextFileA()
1209 {
1210     HANDLE handle;
1211     WIN32_FIND_DATAA search_results;
1212     int err;
1213     char buffer[5] = "C:\\*";
1214
1215     buffer[0] = get_windows_drive();
1216     handle = FindFirstFileA(buffer,&search_results);
1217     ok ( handle != INVALID_HANDLE_VALUE, "FindFirstFile on C:\\* should succeed\n" );
1218     while (FindNextFile(handle, &search_results))
1219     {
1220         /* get to the end of the files */
1221     }
1222     ok ( FindClose(handle) == TRUE, "Failed to close handle\n");
1223     err = GetLastError();
1224     ok ( err == ERROR_NO_MORE_FILES, "GetLastError should return ERROR_NO_MORE_FILES\n");
1225 }
1226
1227 static int test_Mapfile_createtemp(HANDLE *handle)
1228 {
1229     SetFileAttributesA(filename,FILE_ATTRIBUTE_NORMAL);
1230     DeleteFile(filename);
1231     *handle = CreateFile(filename, GENERIC_READ|GENERIC_WRITE, 0, 0,
1232                          CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
1233     if (*handle != INVALID_HANDLE_VALUE) {
1234
1235         return 1;
1236     }
1237
1238     return 0;
1239 }
1240
1241 static void test_MapFile()
1242 {
1243     HANDLE handle;
1244     HANDLE hmap;
1245
1246     ok(test_Mapfile_createtemp(&handle), "Couldn't create test file.\n");
1247
1248     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0x1000, "named_file_map" );
1249     ok( hmap != NULL, "mapping should work, I named it!\n" );
1250
1251     ok( CloseHandle( hmap ), "can't close mapping handle\n");
1252
1253     /* We have to close file before we try new stuff with mapping again.
1254        Else we would always succeed on XP or block descriptors on 95. */
1255     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0, NULL );
1256     ok( hmap != NULL, "We should still be able to map!\n" );
1257     ok( CloseHandle( hmap ), "can't close mapping handle\n");
1258     ok( CloseHandle( handle ), "can't close file handle\n");
1259     handle = NULL;
1260
1261     ok(test_Mapfile_createtemp(&handle), "Couldn't create test file.\n");
1262
1263     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0, NULL );
1264     ok( hmap == NULL, "mapped zero size file\n");
1265     ok( GetLastError() == ERROR_FILE_INVALID, "not ERROR_FILE_INVALID\n");
1266
1267     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0x1000, 0, NULL );
1268     ok( hmap == NULL, "mapping should fail\n");
1269     /* GetLastError() varies between win9x and WinNT and also depends on the filesystem */
1270
1271     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0x1000, 0x10000, NULL );
1272     ok( hmap == NULL, "mapping should fail\n");
1273     /* GetLastError() varies between win9x and WinNT and also depends on the filesystem */
1274
1275     /* On XP you can now map again, on Win 95 you can not. */
1276
1277     ok( CloseHandle( handle ), "can't close file handle\n");
1278     ok( DeleteFileA( filename ), "DeleteFile failed after map\n" );
1279 }
1280
1281 static void test_GetFileType(void)
1282 {
1283     DWORD type;
1284     HANDLE h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0 );
1285     ok( h != INVALID_HANDLE_VALUE, "open %s failed\n", filename );
1286     type = GetFileType(h);
1287     ok( type == FILE_TYPE_DISK, "expected type disk got %ld\n", type );
1288     CloseHandle( h );
1289     h = CreateFileA( "nul", GENERIC_READ|GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, 0 );
1290     ok( h != INVALID_HANDLE_VALUE, "open nul failed\n" );
1291     type = GetFileType(h);
1292     ok( type == FILE_TYPE_CHAR, "expected type char for nul got %ld\n", type );
1293     CloseHandle( h );
1294     DeleteFileA( filename );
1295 }
1296
1297 static int completion_count;
1298
1299 static void CALLBACK FileIOComplete(DWORD dwError, DWORD dwBytes, LPOVERLAPPED ovl)
1300 {
1301 /*      printf("(%ld, %ld, %p { %ld, %ld, %ld, %ld, %p })\n", dwError, dwBytes, ovl, ovl->Internal, ovl->InternalHigh, ovl->Offset, ovl->OffsetHigh, ovl->hEvent);*/
1302         ReleaseSemaphore(ovl->hEvent, 1, NULL);
1303         completion_count++;
1304 }
1305
1306 static void test_async_file_errors(void)
1307 {
1308     char szFile[MAX_PATH];
1309     HANDLE hSem = CreateSemaphoreW(NULL, 1, 1, NULL);
1310     HANDLE hFile;
1311     LPVOID lpBuffer = HeapAlloc(GetProcessHeap(), 0, 4096);
1312     OVERLAPPED ovl;
1313     S(U(ovl)).Offset = 0;
1314     S(U(ovl)).OffsetHigh = 0;
1315     ovl.hEvent = hSem;
1316     completion_count = 0;
1317     szFile[0] = '\0';
1318     GetWindowsDirectoryA(szFile, sizeof(szFile)/sizeof(szFile[0])-1-strlen("\\win.ini"));
1319     strcat(szFile, "\\win.ini");
1320     hFile = CreateFileA(szFile, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_ALWAYS, FILE_FLAG_OVERLAPPED, NULL);
1321     ok(hFile != NULL, "CreateFileA(%s ...) failed\n", szFile);
1322     while (TRUE)
1323     {
1324         BOOL res;
1325         while (WaitForSingleObjectEx(hSem, INFINITE, TRUE) == WAIT_IO_COMPLETION)
1326             ;
1327         res = ReadFileEx(hFile, lpBuffer, 4096, &ovl, FileIOComplete);
1328         /*printf("Offset = %ld, result = %s\n", ovl.Offset, res ? "TRUE" : "FALSE");*/
1329         if (!res)
1330             break;
1331         S(U(ovl)).Offset += 4096;
1332         /* i/o completion routine only called if ReadFileEx returned success.
1333          * we only care about violations of this rule so undo what should have
1334          * been done */
1335         completion_count--;
1336     }
1337     ok(completion_count == 0, "completion routine should only be called when ReadFileEx succeeds (this rule was violated %d times)\n", completion_count);
1338     /*printf("Error = %ld\n", GetLastError());*/
1339 }
1340
1341 static void test_read_write(void)
1342 {
1343     DWORD bytes, ret;
1344     HANDLE hFile;
1345     char temp_path[MAX_PATH];
1346     char filename[MAX_PATH];
1347     static const char prefix[] = "pfx";
1348
1349     ret = GetTempPathA(MAX_PATH, temp_path);
1350     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
1351     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
1352
1353     ret = GetTempFileNameA(temp_path, prefix, 0, filename);
1354     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
1355
1356     hFile = CreateFileA(filename, GENERIC_READ | GENERIC_WRITE, 0, NULL,
1357                         CREATE_ALWAYS, FILE_FLAG_RANDOM_ACCESS, 0);
1358     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA: error %ld\n", GetLastError());
1359
1360     SetLastError(12345678);
1361     bytes = 12345678;
1362     ret = WriteFile(hFile, NULL, 0, &bytes, NULL);
1363     ok(ret && GetLastError() == 12345678,
1364         "ret = %ld, error %ld\n", ret, GetLastError());
1365     ok(!bytes, "bytes = %ld\n", bytes);
1366
1367     SetLastError(12345678);
1368     bytes = 12345678;
1369     ret = WriteFile(hFile, NULL, 10, &bytes, NULL);
1370     ok((!ret && GetLastError() == ERROR_INVALID_USER_BUFFER) || /* Win2k */
1371         (ret && GetLastError() == 12345678), /* Win9x */
1372         "ret = %ld, error %ld\n", ret, GetLastError());
1373     ok(!bytes || /* Win2k */
1374         bytes == 10, /* Win9x */
1375         "bytes = %ld\n", bytes);
1376
1377     SetLastError(12345678);
1378     bytes = 12345678;
1379     ret = ReadFile(hFile, NULL, 0, &bytes, NULL);
1380     ok(ret && GetLastError() == 12345678,
1381         "ret = %ld, error %ld\n", ret, GetLastError());
1382     ok(!bytes, "bytes = %ld\n", bytes);
1383
1384     SetLastError(12345678);
1385     bytes = 12345678;
1386     ret = ReadFile(hFile, NULL, 10, &bytes, NULL);
1387     ok(!ret && (GetLastError() == ERROR_NOACCESS || /* Win2k */
1388                 GetLastError() == ERROR_INVALID_PARAMETER), /* Win9x */
1389         "ret = %ld, error %ld\n", ret, GetLastError());
1390     ok(!bytes, "bytes = %ld\n", bytes);
1391
1392     ret = CloseHandle(hFile);
1393     ok( ret, "CloseHandle: error %ld\n", GetLastError());
1394     ret = DeleteFileA(filename);
1395     ok( ret, "DeleteFileA: error %ld\n", GetLastError());
1396 }
1397
1398 START_TEST(file)
1399 {
1400     test__hread(  );
1401     test__hwrite(  );
1402     test__lclose(  );
1403     test__lcreat(  );
1404     test__llseek(  );
1405     test__llopen(  );
1406     test__lread(  );
1407     test__lwrite(  );
1408     test_GetTempFileNameA();
1409     test_CopyFileA();
1410     test_CopyFileW();
1411     test_CreateFileA();
1412     test_CreateFileW();
1413     test_DeleteFileA();
1414     test_DeleteFileW();
1415     test_MoveFileA();
1416     test_MoveFileW();
1417     test_FindFirstFileA();
1418     test_FindNextFileA();
1419     test_LockFile();
1420     test_file_sharing();
1421     test_offset_in_overlapped_structure();
1422     test_MapFile();
1423     test_GetFileType();
1424     test_async_file_errors();
1425     test_read_write();
1426 }