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     ret = GetFileTime(hfile, NULL, NULL, &ft1);
 575     ok( ret, "GetFileTime error %ld\n", GetLastError());
 576     ft1.dwLowDateTime -= 600000000; /* 60 second */
 577     ret = SetFileTime(hfile, NULL, NULL, &ft1);
 578     ok( ret, "SetFileTime error %ld\n", GetLastError());
 579     GetFileTime(hfile, NULL, NULL, &ft1);  /* get the actual time back */
 580     CloseHandle(hfile);
 581
 582     ret = GetTempFileNameA(temp_path, prefix, 0, dest);
 583     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 584
 585     SetLastError(0xdeadbeef);
 586     ret = CopyFileA(source, dest, TRUE);
 587     ok(!ret && GetLastError() == ERROR_FILE_EXISTS,
 588        "CopyFileA: unexpected error %ld\n", GetLastError());
 589
 590     ret = CopyFileA(source, dest, FALSE);
 591     ok(ret, "CopyFileA: error %ld\n", GetLastError());
 592
 593     /* make sure that destination has correct size */
 594     hfile = CreateFileA(dest, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
 595     ok(hfile != INVALID_HANDLE_VALUE, "failed to open destination file\n");
 596     ret = GetFileSize(hfile, NULL);
 597     ok(ret == sizeof(prefix), "destination file has wrong size %ld\n", ret);
 598
 599     /* make sure that destination has the same filetime */
 600     ret = GetFileTime(hfile, NULL, NULL, &ft2);
 601     ok( ret, "GetFileTime error %ld\n", GetLastError());
 602     ok(CompareFileTime(&ft1, &ft2) == 0, "destination file has wrong filetime\n");
 603
 604     SetLastError(0xdeadbeef);
 605     ret = CopyFileA(source, dest, FALSE);
 606     ok(!ret && GetLastError() == ERROR_SHARING_VIOLATION,
 607        "CopyFileA: ret = %ld, unexpected error %ld\n", ret, GetLastError());
 608
 609     /* make sure that destination still has correct size */
 610     ret = GetFileSize(hfile, NULL);
 611     ok(ret == sizeof(prefix), "destination file has wrong size %ld\n", ret);
 612     retok = ReadFile(hfile, buf, sizeof(buf), &ret, NULL);
 613     ok( retok && ret == sizeof(prefix),
 614        "ReadFile: error %ld\n", GetLastError());
 615     ok(!memcmp(prefix, buf, sizeof(prefix)), "buffer contents mismatch\n");
 616     CloseHandle(hfile);
 617
 618     ret = DeleteFileA(source);
 619     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 620     ret = DeleteFileA(dest);
 621     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 622 }
 623
 624 static void test_CopyFileW(void)
 625 {
 626     WCHAR temp_path[MAX_PATH];
 627     WCHAR source[MAX_PATH], dest[MAX_PATH];
 628     static const WCHAR prefix[] = {'p','f','x',0};
 629     DWORD ret;
 630
 631     ret = GetTempPathW(MAX_PATH, temp_path);
 632     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 633         return;
 634     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 635     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 636
 637     ret = GetTempFileNameW(temp_path, prefix, 0, source);
 638     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 639
 640     ret = GetTempFileNameW(temp_path, prefix, 0, dest);
 641     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 642
 643     ret = CopyFileW(source, dest, TRUE);
 644     ok(!ret && GetLastError() == ERROR_FILE_EXISTS,
 645        "CopyFileW: unexpected error %ld\n", GetLastError());
 646
 647     ret = CopyFileW(source, dest, FALSE);
 648     ok(ret, "CopyFileW: error %ld\n", GetLastError());
 649
 650     ret = DeleteFileW(source);
 651     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 652     ret = DeleteFileW(dest);
 653     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 654 }
 655
 656 static void test_CreateFileA(void)
 657 {
 658     HANDLE hFile;
 659     char temp_path[MAX_PATH];
 660     char filename[MAX_PATH];
 661     static const char prefix[] = "pfx";
 662     DWORD ret;
 663
 664     ret = GetTempPathA(MAX_PATH, temp_path);
 665     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
 666     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 667
 668     ret = GetTempFileNameA(temp_path, prefix, 0, filename);
 669     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 670
 671     hFile = CreateFileA(filename, GENERIC_READ, 0, NULL,
 672                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 673     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_EXISTS,
 674         "CREATE_NEW should fail if file exists and last error value should be ERROR_FILE_EXISTS\n");
 675
 676     ret = DeleteFileA(filename);
 677     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 678 }
 679
 680 static void test_CreateFileW(void)
 681 {
 682     HANDLE hFile;
 683     WCHAR temp_path[MAX_PATH];
 684     WCHAR filename[MAX_PATH];
 685     static const WCHAR emptyW[]={'\0'};
 686     static const WCHAR prefix[] = {'p','f','x',0};
 687     static const WCHAR bogus[] = { '\\', '\\', '.', '\\', 'B', 'O', 'G', 'U', 'S', 0 };
 688     DWORD ret;
 689
 690     ret = GetTempPathW(MAX_PATH, temp_path);
 691     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 692         return;
 693     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 694     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 695
 696     ret = GetTempFileNameW(temp_path, prefix, 0, filename);
 697     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 698
 699     hFile = CreateFileW(filename, GENERIC_READ, 0, NULL,
 700                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 701     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_EXISTS,
 702         "CREATE_NEW should fail if file exists and last error value should be ERROR_FILE_EXISTS\n");
 703
 704     ret = DeleteFileW(filename);
 705     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 706
 707     hFile = CreateFileW(NULL, GENERIC_READ, 0, NULL,
 708                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 709     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_PATH_NOT_FOUND,
 710        "CreateFileW(NULL) returned ret=%p error=%ld\n",hFile,GetLastError());
 711
 712     hFile = CreateFileW(emptyW, GENERIC_READ, 0, NULL,
 713                         CREATE_NEW, FILE_FLAG_RANDOM_ACCESS, 0);
 714     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_PATH_NOT_FOUND,
 715        "CreateFileW(\"\") returned ret=%p error=%ld\n",hFile,GetLastError());
 716
 717     /* test the result of opening a nonexistent driver name */
 718     hFile = CreateFileW(bogus, 0, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
 719                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
 720     ok(hFile == INVALID_HANDLE_VALUE && GetLastError() == ERROR_FILE_NOT_FOUND,
 721        "CreateFileW on invalid VxD name returned ret=%p error=%ld\n",hFile,GetLastError());
 722 }
 723
 724 static void test_GetTempFileNameA()
 725 {
 726     UINT result;
 727     char out[MAX_PATH];
 728     char expected[MAX_PATH + 10];
 729     char windowsdir[MAX_PATH + 10];
 730     char windowsdrive[3];
 731
 732     result = GetWindowsDirectory(windowsdir, sizeof(windowsdir));
 733     ok(result < sizeof(windowsdir), "windowsdir is abnormally long!\n");
 734     ok(result != 0, "GetWindowsDirectory: error %ld\n", GetLastError());
 735
 736     /* If the Windows directory is the root directory, it ends in backslash, not else. */
 737     if (strlen(windowsdir) != 3) /* As in  "C:\"  or  "F:\"  */
 738     {
 739         strcat(windowsdir, "\\");
 740     }
 741
 742     windowsdrive[0] = windowsdir[0];
 743     windowsdrive[1] = windowsdir[1];
 744     windowsdrive[2] = '\0';
 745
 746     result = GetTempFileNameA(windowsdrive, "abc", 1, out);
 747     ok(result != 0, "GetTempFileNameA: error %ld\n", GetLastError());
 748     ok(((out[0] == windowsdrive[0]) && (out[1] == ':')) && (out[2] == '\\'),
 749        "GetTempFileNameA: first three characters should be %c:\\, string was actually %s\n",
 750        windowsdrive[0], out);
 751
 752     result = GetTempFileNameA(windowsdir, "abc", 2, out);
 753     ok(result != 0, "GetTempFileNameA: error %ld\n", GetLastError());
 754     expected[0] = '\0';
 755     strcat(expected, windowsdir);
 756     strcat(expected, "abc2.tmp");
 757     ok(lstrcmpiA(out, expected) == 0, "GetTempFileNameA: Unexpected output \"%s\" vs \"%s\"\n",
 758        out, expected);
 759 }
 760
 761 static void test_DeleteFileA( void )
 762 {
 763     BOOL ret;
 764
 765     ret = DeleteFileA(NULL);
 766     ok(!ret && (GetLastError() == ERROR_INVALID_PARAMETER ||
 767                 GetLastError() == ERROR_PATH_NOT_FOUND),
 768        "DeleteFileA(NULL) returned ret=%d error=%ld\n",ret,GetLastError());
 769
 770     ret = DeleteFileA("");
 771     ok(!ret && (GetLastError() == ERROR_PATH_NOT_FOUND ||
 772                 GetLastError() == ERROR_BAD_PATHNAME),
 773        "DeleteFileA(\"\") returned ret=%d error=%ld\n",ret,GetLastError());
 774
 775     ret = DeleteFileA("nul");
 776     ok(!ret && (GetLastError() == ERROR_FILE_NOT_FOUND ||
 777                 GetLastError() == ERROR_INVALID_PARAMETER ||
 778                 GetLastError() == ERROR_ACCESS_DENIED),
 779        "DeleteFileA(\"nul\") returned ret=%d error=%ld\n",ret,GetLastError());
 780 }
 781
 782 static void test_DeleteFileW( void )
 783 {
 784     BOOL ret;
 785     static const WCHAR emptyW[]={'\0'};
 786
 787     ret = DeleteFileW(NULL);
 788     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 789         return;
 790     ok(!ret && GetLastError() == ERROR_PATH_NOT_FOUND,
 791        "DeleteFileW(NULL) returned ret=%d error=%ld\n",ret,GetLastError());
 792
 793     ret = DeleteFileW(emptyW);
 794     ok(!ret && GetLastError() == ERROR_PATH_NOT_FOUND,
 795        "DeleteFileW(\"\") returned ret=%d error=%ld\n",ret,GetLastError());
 796 }
 797
 798 #define IsDotDir(x)     ((x[0] == '.') && ((x[1] == 0) || ((x[1] == '.') && (x[2] == 0))))
 799
 800 static void test_MoveFileA(void)
 801 {
 802     char tempdir[MAX_PATH];
 803     char source[MAX_PATH], dest[MAX_PATH];
 804     static const char prefix[] = "pfx";
 805     DWORD ret;
 806
 807     ret = GetTempPathA(MAX_PATH, tempdir);
 808     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
 809     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 810
 811     ret = GetTempFileNameA(tempdir, prefix, 0, source);
 812     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 813
 814     ret = GetTempFileNameA(tempdir, prefix, 0, dest);
 815     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
 816
 817     ret = MoveFileA(source, dest);
 818     ok(!ret && GetLastError() == ERROR_ALREADY_EXISTS,
 819        "MoveFileA: unexpected error %ld\n", GetLastError());
 820
 821     ret = DeleteFileA(dest);
 822     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 823
 824     ret = MoveFileA(source, dest);
 825     ok(ret, "MoveFileA: failed, error %ld\n", GetLastError());
 826
 827     lstrcatA(tempdir, "Remove Me");
 828     ret = CreateDirectoryA(tempdir, NULL);
 829     ok(ret == TRUE, "CreateDirectoryA failed\n");
 830
 831     lstrcpyA(source, dest);
 832     lstrcpyA(dest, tempdir);
 833     lstrcatA(dest, "\\wild?.*");
 834     /* FIXME: if we create a file with wildcards we can't delete it now that DeleteFile works correctly */
 835     ret = MoveFileA(source, dest);
 836     ok(!ret, "MoveFileA: shouldn't move to wildcard file\n");
 837     ok(GetLastError() == ERROR_INVALID_NAME || /* NT */
 838        GetLastError() == ERROR_FILE_NOT_FOUND, /* Win9x */
 839        "MoveFileA: with wildcards, unexpected error %ld\n", GetLastError());
 840     if (ret || (GetLastError() != ERROR_INVALID_NAME))
 841     {
 842         WIN32_FIND_DATAA fd;
 843         char temppath[MAX_PATH];
 844         HANDLE hFind;
 845
 846         lstrcpyA(temppath, tempdir);
 847         lstrcatA(temppath, "\\*.*");
 848         hFind = FindFirstFileA(temppath, &fd);
 849         if (INVALID_HANDLE_VALUE != hFind)
 850         {
 851           LPSTR lpName;
 852           do
 853           {
 854             lpName = fd.cAlternateFileName;
 855             if (!lpName[0])
 856               lpName = fd.cFileName;
 857             ok(IsDotDir(lpName), "MoveFileA: wildcards file created!\n");
 858           }
 859           while (FindNextFileA(hFind, &fd));
 860           FindClose(hFind);
 861         }
 862     }
 863     ret = DeleteFileA(source);
 864     ok(ret, "DeleteFileA: error %ld\n", GetLastError());
 865     ret = DeleteFileA(dest);
 866     ok(!ret, "DeleteFileA: error %ld\n", GetLastError());
 867     ret = RemoveDirectoryA(tempdir);
 868     ok(ret, "DeleteDirectoryA: error %ld\n", GetLastError());
 869 }
 870
 871 static void test_MoveFileW(void)
 872 {
 873     WCHAR temp_path[MAX_PATH];
 874     WCHAR source[MAX_PATH], dest[MAX_PATH];
 875     static const WCHAR prefix[] = {'p','f','x',0};
 876     DWORD ret;
 877
 878     ret = GetTempPathW(MAX_PATH, temp_path);
 879     if (ret==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 880         return;
 881     ok(ret != 0, "GetTempPathW error %ld\n", GetLastError());
 882     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
 883
 884     ret = GetTempFileNameW(temp_path, prefix, 0, source);
 885     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 886
 887     ret = GetTempFileNameW(temp_path, prefix, 0, dest);
 888     ok(ret != 0, "GetTempFileNameW error %ld\n", GetLastError());
 889
 890     ret = MoveFileW(source, dest);
 891     ok(!ret && GetLastError() == ERROR_ALREADY_EXISTS,
 892        "CopyFileW: unexpected error %ld\n", GetLastError());
 893
 894     ret = DeleteFileW(source);
 895     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 896     ret = DeleteFileW(dest);
 897     ok(ret, "DeleteFileW: error %ld\n", GetLastError());
 898 }
 899
 900 #define PATTERN_OFFSET 0x10
 901
 902 static void test_offset_in_overlapped_structure(void)
 903 {
 904     HANDLE hFile;
 905     OVERLAPPED ov;
 906     DWORD done;
 907     BOOL rc;
 908     BYTE buf[256], pattern[] = "TeSt";
 909     UINT i;
 910     char temp_path[MAX_PATH], temp_fname[MAX_PATH];
 911     BOOL ret;
 912
 913     ret =GetTempPathA(MAX_PATH, temp_path);
 914     ok( ret, "GetTempPathA error %ld\n", GetLastError());
 915     ret =GetTempFileNameA(temp_path, "pfx", 0, temp_fname);
 916     ok( ret, "GetTempFileNameA error %ld\n", GetLastError());
 917
 918     /*** Write File *****************************************************/
 919
 920     hFile = CreateFileA(temp_fname, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
 921     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError());
 922
 923     for(i = 0; i < sizeof(buf); i++) buf[i] = i;
 924     ret = WriteFile(hFile, buf, sizeof(buf), &done, NULL);
 925     ok( ret, "WriteFile error %ld\n", GetLastError());
 926     ok(done == sizeof(buf), "expected number of bytes written %lu\n", done);
 927
 928     memset(&ov, 0, sizeof(ov));
 929     S(U(ov)).Offset = PATTERN_OFFSET;
 930     S(U(ov)).OffsetHigh = 0;
 931     rc=WriteFile(hFile, pattern, sizeof(pattern), &done, &ov);
 932     /* Win 9x does not support the overlapped I/O on files */
 933     if (rc || GetLastError()!=ERROR_INVALID_PARAMETER) {
 934         ok(rc, "WriteFile error %ld\n", GetLastError());
 935         ok(done == sizeof(pattern), "expected number of bytes written %lu\n", done);
 936         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 937         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (PATTERN_OFFSET + sizeof(pattern)),
 938            "expected file offset %d\n", PATTERN_OFFSET + sizeof(pattern));
 939
 940         S(U(ov)).Offset = sizeof(buf) * 2;
 941         S(U(ov)).OffsetHigh = 0;
 942         ret = WriteFile(hFile, pattern, sizeof(pattern), &done, &ov);
 943         ok( ret, "WriteFile error %ld\n", GetLastError());
 944         ok(done == sizeof(pattern), "expected number of bytes written %lu\n", done);
 945         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 946         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (sizeof(buf) * 2 + sizeof(pattern)),
 947            "expected file offset %d\n", sizeof(buf) * 2 + sizeof(pattern));
 948     }
 949
 950     CloseHandle(hFile);
 951
 952     /*** Read File *****************************************************/
 953
 954     hFile = CreateFileA(temp_fname, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, 0);
 955     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError());
 956
 957     memset(buf, 0, sizeof(buf));
 958     memset(&ov, 0, sizeof(ov));
 959     S(U(ov)).Offset = PATTERN_OFFSET;
 960     S(U(ov)).OffsetHigh = 0;
 961     rc=ReadFile(hFile, buf, sizeof(pattern), &done, &ov);
 962     /* Win 9x does not support the overlapped I/O on files */
 963     if (rc || GetLastError()!=ERROR_INVALID_PARAMETER) {
 964         ok(rc, "ReadFile error %ld\n", GetLastError());
 965         ok(done == sizeof(pattern), "expected number of bytes read %lu\n", done);
 966         /*trace("Current offset = %04lx\n", SetFilePointer(hFile, 0, NULL, FILE_CURRENT));*/
 967         ok(SetFilePointer(hFile, 0, NULL, FILE_CURRENT) == (PATTERN_OFFSET + sizeof(pattern)),
 968            "expected file offset %d\n", PATTERN_OFFSET + sizeof(pattern));
 969         ok(!memcmp(buf, pattern, sizeof(pattern)), "pattern match failed\n");
 970     }
 971
 972     CloseHandle(hFile);
 973
 974     ret = DeleteFileA(temp_fname);
 975     ok( ret, "DeleteFileA error %ld\n", GetLastError());
 976 }
 977
 978 static void test_LockFile(void)
 979 {
 980     HANDLE handle;
 981     DWORD written;
 982     OVERLAPPED overlapped;
 983     int limited_LockFile;
 984     int limited_UnLockFile;
 985     int lockfileex_capable;
 986
 987     handle = CreateFileA( filename, GENERIC_READ | GENERIC_WRITE,
 988                           FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
 989                           CREATE_ALWAYS, 0, 0 );
 990     if (handle == INVALID_HANDLE_VALUE)
 991     {
 992         ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
 993         return;
 994     }
 995     ok( WriteFile( handle, sillytext, strlen(sillytext), &written, NULL ), "write failed\n" );
 996
 997     ok( LockFile( handle, 0, 0, 0, 0 ), "LockFile failed\n" );
 998     ok( UnlockFile( handle, 0, 0, 0, 0 ), "UnlockFile failed\n" );
 999
1000     limited_UnLockFile = 0;
1001     if (UnlockFile( handle, 0, 0, 0, 0 ))
1002     {
1003         limited_UnLockFile = 1;
1004     }
1005
1006     ok( LockFile( handle, 10, 0, 20, 0 ), "LockFile 10,20 failed\n" );
1007     /* overlapping locks must fail */
1008     ok( !LockFile( handle, 12, 0, 10, 0 ), "LockFile 12,10 succeeded\n" );
1009     ok( !LockFile( handle, 5, 0, 6, 0 ), "LockFile 5,6 succeeded\n" );
1010     /* non-overlapping locks must succeed */
1011     ok( LockFile( handle, 5, 0, 5, 0 ), "LockFile 5,5 failed\n" );
1012
1013     ok( !UnlockFile( handle, 10, 0, 10, 0 ), "UnlockFile 10,10 succeeded\n" );
1014     ok( UnlockFile( handle, 10, 0, 20, 0 ), "UnlockFile 10,20 failed\n" );
1015     ok( !UnlockFile( handle, 10, 0, 20, 0 ), "UnlockFile 10,20 again succeeded\n" );
1016     ok( UnlockFile( handle, 5, 0, 5, 0 ), "UnlockFile 5,5 failed\n" );
1017
1018     S(U(overlapped)).Offset = 100;
1019     S(U(overlapped)).OffsetHigh = 0;
1020     overlapped.hEvent = 0;
1021
1022     lockfileex_capable = dll_capable("kernel32", "LockFileEx");
1023     if (lockfileex_capable)
1024     {
1025         /* Test for broken LockFileEx a la Windows 95 OSR2. */
1026         if (LockFileEx( handle, 0, 0, 100, 0, &overlapped ))
1027         {
1028             /* LockFileEx is probably OK, test it more. */
1029             ok( LockFileEx( handle, 0, 0, 100, 0, &overlapped ),
1030                 "LockFileEx 100,100 failed\n" );
1031         }
1032     }
1033
1034     /* overlapping shared locks are OK */
1035     S(U(overlapped)).Offset = 150;
1036     limited_UnLockFile || ok( LockFileEx( handle, 0, 0, 100, 0, &overlapped ), "LockFileEx 150,100 failed\n" );
1037
1038     /* but exclusive is not */
1039     if (lockfileex_capable)
1040     {
1041         ok( !LockFileEx( handle, LOCKFILE_EXCLUSIVE_LOCK|LOCKFILE_FAIL_IMMEDIATELY,
1042                          0, 50, 0, &overlapped ),
1043                          "LockFileEx exclusive 150,50 succeeded\n" );
1044         if (dll_capable("kernel32.dll", "UnlockFileEx"))
1045         {
1046             if (!UnlockFileEx( handle, 0, 100, 0, &overlapped ))
1047             { /* UnLockFile is capable. */
1048                 S(U(overlapped)).Offset = 100;
1049                 ok( !UnlockFileEx( handle, 0, 100, 0, &overlapped ),
1050                     "UnlockFileEx 150,100 again succeeded\n" );
1051             }
1052         }
1053     }
1054
1055     ok( LockFile( handle, 0, 0x10000000, 0, 0xf0000000 ), "LockFile failed\n" );
1056     ok( !LockFile( handle, ~0, ~0, 1, 0 ), "LockFile ~0,1 succeeded\n" );
1057     ok( !LockFile( handle, 0, 0x20000000, 20, 0 ), "LockFile 0x20000000,20 succeeded\n" );
1058     ok( UnlockFile( handle, 0, 0x10000000, 0, 0xf0000000 ), "UnlockFile failed\n" );
1059
1060     /* wrap-around lock should not do anything */
1061     /* (but still succeeds on NT4 so we don't check result) */
1062     LockFile( handle, 0, 0x10000000, 0, 0xf0000001 );
1063
1064     limited_LockFile = 0;
1065     if (!LockFile( handle, ~0, ~0, 1, 0 ))
1066     {
1067         limited_LockFile = 1;
1068     }
1069
1070     limited_UnLockFile || ok( UnlockFile( handle, ~0, ~0, 1, 0 ), "Unlockfile ~0,1 failed\n" );
1071
1072     /* zero-byte lock */
1073     ok( LockFile( handle, 100, 0, 0, 0 ), "LockFile 100,0 failed\n" );
1074     limited_LockFile || ok( !LockFile( handle, 98, 0, 4, 0 ), "LockFile 98,4 succeeded\n" );
1075     ok( LockFile( handle, 90, 0, 10, 0 ), "LockFile 90,10 failed\n" );
1076     limited_LockFile || ok( !LockFile( handle, 100, 0, 10, 0 ), "LockFile 100,10 failed\n" );
1077
1078     ok( UnlockFile( handle, 90, 0, 10, 0 ), "UnlockFile 90,10 failed\n" );
1079     !ok( UnlockFile( handle, 100, 0, 10, 0 ), "UnlockFile 100,10 failed\n" );
1080
1081     ok( UnlockFile( handle, 100, 0, 0, 0 ), "UnlockFile 100,0 failed\n" );
1082
1083     CloseHandle( handle );
1084     DeleteFileA( filename );
1085 }
1086
1087 static inline int is_sharing_compatible( DWORD access1, DWORD sharing1, DWORD access2, DWORD sharing2 )
1088 {
1089     if (!access1 || !access2) return 1;
1090     if ((access1 & GENERIC_READ) && !(sharing2 & FILE_SHARE_READ)) return 0;
1091     if ((access1 & GENERIC_WRITE) && !(sharing2 & FILE_SHARE_WRITE)) return 0;
1092     if ((access2 & GENERIC_READ) && !(sharing1 & FILE_SHARE_READ)) return 0;
1093     if ((access2 & GENERIC_WRITE) && !(sharing1 & FILE_SHARE_WRITE)) return 0;
1094     return 1;
1095 }
1096
1097 static void test_file_sharing(void)
1098 {
1099     static const DWORD access_modes[4] = { 0, GENERIC_READ, GENERIC_WRITE, GENERIC_READ|GENERIC_WRITE };
1100     static const DWORD sharing_modes[4] = { 0, FILE_SHARE_READ, FILE_SHARE_WRITE, FILE_SHARE_READ|FILE_SHARE_WRITE };
1101     int a1, s1, a2, s2;
1102     int ret;
1103     HANDLE h, h2;
1104
1105     /* make sure the file exists */
1106     h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0 );
1107     if (h == INVALID_HANDLE_VALUE)
1108     {
1109         ok(0, "couldn't create file \"%s\" (err=%ld)\n", filename, GetLastError());
1110         return;
1111     }
1112     CloseHandle( h );
1113
1114     for (a1 = 0; a1 < 4; a1++)
1115     {
1116         for (s1 = 0; s1 < 4; s1++)
1117         {
1118             h = CreateFileA( filename, access_modes[a1], sharing_modes[s1],
1119                              NULL, OPEN_EXISTING, 0, 0 );
1120             if (h == INVALID_HANDLE_VALUE)
1121             {
1122                 ok(0,"couldn't create file \"%s\" (err=%ld)\n",filename,GetLastError());
1123                 return;
1124             }
1125             for (a2 = 0; a2 < 4; a2++)
1126             {
1127                 for (s2 = 0; s2 < 4; s2++)
1128                 {
1129                     SetLastError(0xdeadbeef);
1130                     h2 = CreateFileA( filename, access_modes[a2], sharing_modes[s2],
1131                                       NULL, OPEN_EXISTING, 0, 0 );
1132                     if (is_sharing_compatible( access_modes[a1], sharing_modes[s1],
1133                                                access_modes[a2], sharing_modes[s2] ))
1134                     {
1135                         ret = GetLastError();
1136                         ok( ERROR_SHARING_VIOLATION == ret || 0 == ret,
1137                             "Windows 95 sets GetLastError() = ERROR_SHARING_VIOLATION and\n"
1138                             "  Windows XP GetLastError() = 0, but now it is %d.\n"
1139                             "  indexes = %d, %d, %d, %d\n"
1140                             "  modes   =\n  %lx/%lx/%lx/%lx\n",
1141                             ret,
1142                             a1, s1, a2, s2,
1143                             access_modes[a1], sharing_modes[s1],
1144                             access_modes[a2], sharing_modes[s2]
1145                             );
1146                     }
1147                     else
1148                     {
1149                         ok( h2 == INVALID_HANDLE_VALUE,
1150                             "open succeeded for modes %lx/%lx/%lx/%lx\n",
1151                             access_modes[a1], sharing_modes[s1],
1152                             access_modes[a2], sharing_modes[s2] );
1153                         if (h2 == INVALID_HANDLE_VALUE)
1154                             ok( GetLastError() == ERROR_SHARING_VIOLATION,
1155                                 "wrong error code %ld\n", GetLastError() );
1156                     }
1157                     if (h2 != INVALID_HANDLE_VALUE) CloseHandle( h2 );
1158                 }
1159             }
1160             CloseHandle( h );
1161         }
1162     }
1163
1164     SetLastError(0xdeadbeef);
1165     h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_ALWAYS, 0, 0 );
1166     ok( h != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError() );
1167
1168     SetLastError(0xdeadbeef);
1169     h2 = CreateFileA( filename, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0 );
1170     ok( h2 == INVALID_HANDLE_VALUE, "CreateFileA should fail\n");
1171     ok( GetLastError() == ERROR_SHARING_VIOLATION, "wrong error code %ld\n", GetLastError() );
1172
1173     h2 = CreateFileA( filename, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, 0 );
1174     ok( h2 != INVALID_HANDLE_VALUE, "CreateFileA error %ld\n", GetLastError() );
1175
1176     CloseHandle(h);
1177     CloseHandle(h2);
1178
1179     DeleteFileA( filename );
1180 }
1181
1182 static char get_windows_drive()
1183 {
1184     char windowsdir[MAX_PATH];
1185     GetWindowsDirectory(windowsdir, sizeof(windowsdir));
1186     return windowsdir[0];
1187 }
1188
1189 static void test_FindFirstFileA()
1190 {
1191     HANDLE handle;
1192     WIN32_FIND_DATAA search_results;
1193     int err;
1194     char buffer[5] = "C:\\";
1195
1196     /* try FindFirstFileA on "C:\" */
1197     buffer[0] = get_windows_drive();
1198     handle = FindFirstFileA(buffer,&search_results);
1199     err = GetLastError();
1200     ok ( handle == INVALID_HANDLE_VALUE , "FindFirstFile on root directory should Fail\n");
1201     if (handle == INVALID_HANDLE_VALUE)
1202       ok ( err == ERROR_FILE_NOT_FOUND, "Bad Error number %d\n", err);
1203
1204     /* try FindFirstFileA on "C:\*" */
1205     strcat(buffer, "*");
1206     handle = FindFirstFileA(buffer,&search_results);
1207     ok ( handle != INVALID_HANDLE_VALUE, "FindFirstFile on %s should succeed\n", buffer );
1208     ok ( FindClose(handle) == TRUE, "Failed to close handle\n");
1209 }
1210
1211 static void test_FindNextFileA()
1212 {
1213     HANDLE handle;
1214     WIN32_FIND_DATAA search_results;
1215     int err;
1216     char buffer[5] = "C:\\*";
1217
1218     buffer[0] = get_windows_drive();
1219     handle = FindFirstFileA(buffer,&search_results);
1220     ok ( handle != INVALID_HANDLE_VALUE, "FindFirstFile on C:\\* should succeed\n" );
1221     while (FindNextFile(handle, &search_results))
1222     {
1223         /* get to the end of the files */
1224     }
1225     ok ( FindClose(handle) == TRUE, "Failed to close handle\n");
1226     err = GetLastError();
1227     ok ( err == ERROR_NO_MORE_FILES, "GetLastError should return ERROR_NO_MORE_FILES\n");
1228 }
1229
1230 static int test_Mapfile_createtemp(HANDLE *handle)
1231 {
1232     SetFileAttributesA(filename,FILE_ATTRIBUTE_NORMAL);
1233     DeleteFile(filename);
1234     *handle = CreateFile(filename, GENERIC_READ|GENERIC_WRITE, 0, 0,
1235                          CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
1236     if (*handle != INVALID_HANDLE_VALUE) {
1237
1238         return 1;
1239     }
1240
1241     return 0;
1242 }
1243
1244 static void test_MapFile()
1245 {
1246     HANDLE handle;
1247     HANDLE hmap;
1248
1249     ok(test_Mapfile_createtemp(&handle), "Couldn't create test file.\n");
1250
1251     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0x1000, "named_file_map" );
1252     ok( hmap != NULL, "mapping should work, I named it!\n" );
1253
1254     ok( CloseHandle( hmap ), "can't close mapping handle\n");
1255
1256     /* We have to close file before we try new stuff with mapping again.
1257        Else we would always succeed on XP or block descriptors on 95. */
1258     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0, NULL );
1259     ok( hmap != NULL, "We should still be able to map!\n" );
1260     ok( CloseHandle( hmap ), "can't close mapping handle\n");
1261     ok( CloseHandle( handle ), "can't close file handle\n");
1262     handle = NULL;
1263
1264     ok(test_Mapfile_createtemp(&handle), "Couldn't create test file.\n");
1265
1266     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0, 0, NULL );
1267     ok( hmap == NULL, "mapped zero size file\n");
1268     ok( GetLastError() == ERROR_FILE_INVALID, "not ERROR_FILE_INVALID\n");
1269
1270     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0x1000, 0, NULL );
1271     ok( hmap == NULL, "mapping should fail\n");
1272     /* GetLastError() varies between win9x and WinNT and also depends on the filesystem */
1273
1274     hmap = CreateFileMapping( handle, NULL, PAGE_READWRITE, 0x1000, 0x10000, NULL );
1275     ok( hmap == NULL, "mapping should fail\n");
1276     /* GetLastError() varies between win9x and WinNT and also depends on the filesystem */
1277
1278     /* On XP you can now map again, on Win 95 you can not. */
1279
1280     ok( CloseHandle( handle ), "can't close file handle\n");
1281     ok( DeleteFileA( filename ), "DeleteFile failed after map\n" );
1282 }
1283
1284 static void test_GetFileType(void)
1285 {
1286     DWORD type;
1287     HANDLE h = CreateFileA( filename, GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0 );
1288     ok( h != INVALID_HANDLE_VALUE, "open %s failed\n", filename );
1289     type = GetFileType(h);
1290     ok( type == FILE_TYPE_DISK, "expected type disk got %ld\n", type );
1291     CloseHandle( h );
1292     h = CreateFileA( "nul", GENERIC_READ|GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, 0 );
1293     ok( h != INVALID_HANDLE_VALUE, "open nul failed\n" );
1294     type = GetFileType(h);
1295     ok( type == FILE_TYPE_CHAR, "expected type char for nul got %ld\n", type );
1296     CloseHandle( h );
1297     DeleteFileA( filename );
1298 }
1299
1300 static int completion_count;
1301
1302 static void CALLBACK FileIOComplete(DWORD dwError, DWORD dwBytes, LPOVERLAPPED ovl)
1303 {
1304 /*      printf("(%ld, %ld, %p { %ld, %ld, %ld, %ld, %p })\n", dwError, dwBytes, ovl, ovl->Internal, ovl->InternalHigh, ovl->Offset, ovl->OffsetHigh, ovl->hEvent);*/
1305         ReleaseSemaphore(ovl->hEvent, 1, NULL);
1306         completion_count++;
1307 }
1308
1309 static void test_async_file_errors(void)
1310 {
1311     char szFile[MAX_PATH];
1312     HANDLE hSem = CreateSemaphoreW(NULL, 1, 1, NULL);
1313     HANDLE hFile;
1314     LPVOID lpBuffer = HeapAlloc(GetProcessHeap(), 0, 4096);
1315     OVERLAPPED ovl;
1316     S(U(ovl)).Offset = 0;
1317     S(U(ovl)).OffsetHigh = 0;
1318     ovl.hEvent = hSem;
1319     completion_count = 0;
1320     szFile[0] = '\0';
1321     GetWindowsDirectoryA(szFile, sizeof(szFile)/sizeof(szFile[0])-1-strlen("\\win.ini"));
1322     strcat(szFile, "\\win.ini");
1323     hFile = CreateFileA(szFile, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_ALWAYS, FILE_FLAG_OVERLAPPED, NULL);
1324     ok(hFile != NULL, "CreateFileA(%s ...) failed\n", szFile);
1325     while (TRUE)
1326     {
1327         BOOL res;
1328         while (WaitForSingleObjectEx(hSem, INFINITE, TRUE) == WAIT_IO_COMPLETION)
1329             ;
1330         res = ReadFileEx(hFile, lpBuffer, 4096, &ovl, FileIOComplete);
1331         /*printf("Offset = %ld, result = %s\n", ovl.Offset, res ? "TRUE" : "FALSE");*/
1332         if (!res)
1333             break;
1334         S(U(ovl)).Offset += 4096;
1335         /* i/o completion routine only called if ReadFileEx returned success.
1336          * we only care about violations of this rule so undo what should have
1337          * been done */
1338         completion_count--;
1339     }
1340     ok(completion_count == 0, "completion routine should only be called when ReadFileEx succeeds (this rule was violated %d times)\n", completion_count);
1341     /*printf("Error = %ld\n", GetLastError());*/
1342 }
1343
1344 static void test_read_write(void)
1345 {
1346     DWORD bytes, ret;
1347     HANDLE hFile;
1348     char temp_path[MAX_PATH];
1349     char filename[MAX_PATH];
1350     static const char prefix[] = "pfx";
1351
1352     ret = GetTempPathA(MAX_PATH, temp_path);
1353     ok(ret != 0, "GetTempPathA error %ld\n", GetLastError());
1354     ok(ret < MAX_PATH, "temp path should fit into MAX_PATH\n");
1355
1356     ret = GetTempFileNameA(temp_path, prefix, 0, filename);
1357     ok(ret != 0, "GetTempFileNameA error %ld\n", GetLastError());
1358
1359     hFile = CreateFileA(filename, GENERIC_READ | GENERIC_WRITE, 0, NULL,
1360                         CREATE_ALWAYS, FILE_FLAG_RANDOM_ACCESS, 0);
1361     ok(hFile != INVALID_HANDLE_VALUE, "CreateFileA: error %ld\n", GetLastError());
1362
1363     SetLastError(12345678);
1364     bytes = 12345678;
1365     ret = WriteFile(hFile, NULL, 0, &bytes, NULL);
1366     ok(ret && GetLastError() == 12345678,
1367         "ret = %ld, error %ld\n", ret, GetLastError());
1368     ok(!bytes, "bytes = %ld\n", bytes);
1369
1370     SetLastError(12345678);
1371     bytes = 12345678;
1372     ret = WriteFile(hFile, NULL, 10, &bytes, NULL);
1373     ok((!ret && GetLastError() == ERROR_INVALID_USER_BUFFER) || /* Win2k */
1374         (ret && GetLastError() == 12345678), /* Win9x */
1375         "ret = %ld, error %ld\n", ret, GetLastError());
1376     ok(!bytes || /* Win2k */
1377         bytes == 10, /* Win9x */
1378         "bytes = %ld\n", bytes);
1379
1380     SetLastError(12345678);
1381     bytes = 12345678;
1382     ret = ReadFile(hFile, NULL, 0, &bytes, NULL);
1383     ok(ret && GetLastError() == 12345678,
1384         "ret = %ld, error %ld\n", ret, GetLastError());
1385     ok(!bytes, "bytes = %ld\n", bytes);
1386
1387     SetLastError(12345678);
1388     bytes = 12345678;
1389     ret = ReadFile(hFile, NULL, 10, &bytes, NULL);
1390     ok(!ret && (GetLastError() == ERROR_NOACCESS || /* Win2k */
1391                 GetLastError() == ERROR_INVALID_PARAMETER), /* Win9x */
1392         "ret = %ld, error %ld\n", ret, GetLastError());
1393     ok(!bytes, "bytes = %ld\n", bytes);
1394
1395     ret = CloseHandle(hFile);
1396     ok( ret, "CloseHandle: error %ld\n", GetLastError());
1397     ret = DeleteFileA(filename);
1398     ok( ret, "DeleteFileA: error %ld\n", GetLastError());
1399 }
1400
1401 START_TEST(file)
1402 {
1403     test__hread(  );
1404     test__hwrite(  );
1405     test__lclose(  );
1406     test__lcreat(  );
1407     test__llseek(  );
1408     test__llopen(  );
1409     test__lread(  );
1410     test__lwrite(  );
1411     test_GetTempFileNameA();
1412     test_CopyFileA();
1413     test_CopyFileW();
1414     test_CreateFileA();
1415     test_CreateFileW();
1416     test_DeleteFileA();
1417     test_DeleteFileW();
1418     test_MoveFileA();
1419     test_MoveFileW();
1420     test_FindFirstFileA();
1421     test_FindNextFileA();
1422     test_LockFile();
1423     test_file_sharing();
1424     test_offset_in_overlapped_structure();
1425     test_MapFile();
1426     test_GetFileType();
1427     test_async_file_errors();
1428     test_read_write();
1429 }