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

   1 /*
   2  * Unit test suite for file functions
   3  *
   4  * Copyright 2002 Bill Currie
   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 #include "wine/test.h"
  22 #include <stdarg.h>
  23 #include <stdlib.h>
  24 #include <stdio.h>
  25 #include <fcntl.h>
  26 #include <sys/stat.h>
  27 #include <io.h>
  28 #include <windef.h>
  29 #include <winbase.h>
  30 #include <winnls.h>
  31
  32 static void test_fdopen( void )
  33 {
  34     static const char buffer[] = {0,1,2,3,4,5,6,7,8,9};
  35     char ibuf[10];
  36     int fd;
  37     FILE *file;
  38
  39     fd = open ("fdopen.tst", O_WRONLY | O_CREAT | O_BINARY, _S_IREAD |_S_IWRITE);
  40     write (fd, buffer, sizeof (buffer));
  41     close (fd);
  42
  43     fd = open ("fdopen.tst", O_RDONLY | O_BINARY);
  44     lseek (fd, 5, SEEK_SET);
  45     file = fdopen (fd, "rb");
  46     ok (fread (ibuf, 1, sizeof (buffer), file) == 5, "read wrong byte count\n");
  47     ok (memcmp (ibuf, buffer + 5, 5) == 0, "read wrong bytes\n");
  48     fclose (file);
  49     unlink ("fdopen.tst");
  50 }
  51
  52 static void test_fileops( void )
  53 {
  54     static const char outbuffer[] = "0,1,2,3,4,5,6,7,8,9";
  55     char buffer[256];
  56     WCHAR wbuffer[256];
  57     int fd;
  58     FILE *file;
  59
  60     fd = open ("fdopen.tst", O_WRONLY | O_CREAT | O_BINARY, _S_IREAD |_S_IWRITE);
  61     write (fd, outbuffer, sizeof (outbuffer));
  62     close (fd);
  63
  64     fd = open ("fdopen.tst", O_RDONLY | O_BINARY);
  65     file = fdopen (fd, "rb");
  66     ok(strlen(outbuffer) == (sizeof(outbuffer)-1),"strlen/sizeof error\n");
  67     ok(fgets(buffer,sizeof(buffer),file) !=0,"fgets failed unexpected\n");
  68     ok(fgets(buffer,sizeof(buffer),file) ==0,"fgets didn't signal EOF\n");
  69     ok(feof(file) !=0,"feof doesn't signal EOF\n");
  70     rewind(file);
  71     ok(fgets(buffer,strlen(outbuffer),file) !=0,"fgets failed unexpected\n");
  72     ok(lstrlenA(buffer) == strlen(outbuffer) -1,"fgets didn't read right size\n");
  73     ok(fgets(buffer,sizeof(outbuffer),file) !=0,"fgets failed unexpected\n");
  74     ok(strlen(buffer) == 1,"fgets dropped chars\n");
  75     ok(buffer[0] == outbuffer[strlen(outbuffer)-1],"fgets exchanged chars\n");
  76     fclose (file);
  77     fd = open ("fdopen.tst", O_RDONLY | O_TEXT);
  78     file = fdopen (fd, "rt"); /* open in TEXT mode */
  79     ok(fgetws(wbuffer,sizeof(wbuffer),file) !=0,"fgetws failed unexpected\n");
  80     ok(fgetws(wbuffer,sizeof(wbuffer),file) ==0,"fgetws didn't signal EOF\n");
  81     ok(feof(file) !=0,"feof doesn't signal EOF\n");
  82     rewind(file);
  83     ok(fgetws(wbuffer,strlen(outbuffer),file) !=0,"fgetws failed unexpected\n");
  84     ok(lstrlenW(wbuffer) == (strlen(outbuffer) -1),"fgetws didn't read right size\n");
  85     ok(fgetws(wbuffer,sizeof(outbuffer),file) !=0,"fgets failed unexpected\n");
  86     ok(lstrlenW(wbuffer) == 1,"fgets dropped chars\n");
  87     fclose (file);
  88     unlink ("fdopen.tst");
  89 }
  90
  91 static WCHAR* AtoW( char* p )
  92 {
  93     WCHAR* buffer;
  94     DWORD len = MultiByteToWideChar( CP_ACP, 0, p, -1, NULL, 0 );
  95     buffer = malloc( len * sizeof(WCHAR) );
  96     MultiByteToWideChar( CP_ACP, 0, p, -1, buffer, len );
  97     return buffer;
  98 }
  99
 100 static void test_fgetwc( void )
 101 {
 102 #define LLEN 512
 103
 104   char* tempf;
 105   FILE *tempfh;
 106   static const char mytext[]= "This is test_fgetwc\n";
 107   WCHAR wtextW[LLEN+1];
 108   WCHAR *mytextW = NULL, *aptr, *wptr;
 109   BOOL diff_found = FALSE;
 110   unsigned int i;
 111
 112   tempf=_tempnam(".","wne");
 113   tempfh = fopen(tempf,"wt"); /* open in TEXT mode */
 114   fputs(mytext,tempfh);
 115   fclose(tempfh);
 116   tempfh = fopen(tempf,"rt");
 117   fgetws(wtextW,LLEN,tempfh);
 118   mytextW = AtoW ((char*)mytext);
 119   aptr = mytextW;
 120   wptr = wtextW;
 121
 122   for (i=0; i<strlen(mytext); i++, aptr++, wptr++)
 123     {
 124       diff_found |= (*aptr != *wptr);
 125     }
 126   ok(!(diff_found), "fgetwc difference found in TEXT mode\n");
 127   if(mytextW) free (mytextW);
 128   fclose(tempfh);
 129   unlink(tempf);
 130 }
 131
 132 static void test_file_put_get( void )
 133 {
 134   char* tempf;
 135   FILE *tempfh;
 136   static const char mytext[]=  "This is a test_file_put_get\n";
 137   static const char dostext[]= "This is a test_file_put_get\r\n";
 138   char btext[LLEN];
 139   WCHAR wtextW[LLEN+1];
 140   WCHAR *mytextW = NULL, *aptr, *wptr;
 141   BOOL diff_found = FALSE;
 142   unsigned int i;
 143
 144   tempf=_tempnam(".","wne");
 145   tempfh = fopen(tempf,"wt"); /* open in TEXT mode */
 146   fputs(mytext,tempfh);
 147   fclose(tempfh);
 148   tempfh = fopen(tempf,"rb"); /* open in TEXT mode */
 149   fgets(btext,LLEN,tempfh);
 150   ok( strlen(mytext) + 1 == strlen(btext),"TEXT/BINARY mode not handled for write\n");
 151   ok( btext[strlen(mytext)-1] == '\r', "CR not written\n");
 152   fclose(tempfh);
 153   tempfh = fopen(tempf,"wb"); /* open in BINARY mode */
 154   fputs(dostext,tempfh);
 155   fclose(tempfh);
 156   tempfh = fopen(tempf,"rt"); /* open in TEXT mode */
 157   fgets(btext,LLEN,tempfh);
 158   ok(strcmp(btext, mytext) == 0,"_O_TEXT read doesn't strip CR\n");
 159   fclose(tempfh);
 160   tempfh = fopen(tempf,"rb"); /* open in TEXT mode */
 161   fgets(btext,LLEN,tempfh);
 162   ok(strcmp(btext, dostext) == 0,"_O_BINARY read doesn't preserve CR\n");
 163
 164   fclose(tempfh);
 165   tempfh = fopen(tempf,"rt"); /* open in TEXT mode */
 166   fgetws(wtextW,LLEN,tempfh);
 167   mytextW = AtoW ((char*)mytext);
 168   aptr = mytextW;
 169   wptr = wtextW;
 170
 171   for (i=0; i<strlen(mytext); i++, aptr++, wptr++)
 172     {
 173       diff_found |= (*aptr != *wptr);
 174     }
 175   ok(!(diff_found), "fgetwc doesn't strip CR in TEXT mode\n");
 176   if(mytextW) free (mytextW);
 177   fclose(tempfh);
 178   unlink(tempf);
 179 }
 180
 181 static void test_file_write_read( void )
 182 {
 183   char* tempf;
 184   int tempfd;
 185   static const char mytext[]=  "This is test_file_write_read\nsecond line\n";
 186   static const char dostext[]= "This is test_file_write_read\r\nsecond line\r\n";
 187   char btext[LLEN];
 188
 189   tempf=_tempnam(".","wne");
 190   ok((tempfd = _open(tempf,_O_CREAT|_O_TRUNC|_O_TEXT|_O_RDWR,
 191                      _S_IREAD | _S_IWRITE)) != -1,
 192      "Can't open '%s': %d\n", tempf, errno); /* open in TEXT mode */
 193   ok(_write(tempfd,mytext,strlen(mytext)) == lstrlenA(mytext),
 194      "_write _O_TEXT bad return value\n");
 195   _close(tempfd);
 196   tempfd = _open(tempf,_O_RDONLY|_O_BINARY,0); /* open in BINARY mode */
 197   ok(_read(tempfd,btext,LLEN) == lstrlenA(dostext),
 198      "_read _O_BINARY got bad length\n");
 199   ok( memcmp(dostext,btext,strlen(dostext)) == 0,
 200       "problems with _O_TEXT _write / _O_BINARY _read\n");
 201   ok( btext[strlen(dostext)-2] == '\r', "CR not written or read\n");
 202   _close(tempfd);
 203   tempfd = _open(tempf,_O_RDONLY|_O_TEXT); /* open in TEXT mode */
 204   ok(_read(tempfd,btext,LLEN) == lstrlenA(mytext),
 205      "_read _O_TEXT got bad length\n");
 206   ok( memcmp(mytext,btext,strlen(mytext)) == 0,
 207       "problems with _O_TEXT _write / _read\n");
 208   _close(tempfd);
 209   ok(unlink(tempf) !=-1 ,"Can't unlink '%s': %d\n", tempf, errno);
 210
 211   tempf=_tempnam(".","wne");
 212   ok((tempfd = _open(tempf,_O_CREAT|_O_TRUNC|_O_BINARY|_O_RDWR,0)) != -1,
 213      "Can't open '%s': %d\n", tempf, errno); /* open in BINARY mode */
 214   ok(_write(tempfd,dostext,strlen(dostext)) == lstrlenA(dostext),
 215      "_write _O_BINARY bad return value\n");
 216   _close(tempfd);
 217   tempfd = _open(tempf,_O_RDONLY|_O_BINARY,0); /* open in BINARY mode */
 218   ok(_read(tempfd,btext,LLEN) == lstrlenA(dostext),
 219      "_read _O_BINARY got bad length\n");
 220   ok( memcmp(dostext,btext,strlen(dostext)) == 0,
 221       "problems with _O_BINARY _write / _read\n");
 222   ok( btext[strlen(dostext)-2] == '\r', "CR not written or read\n");
 223   _close(tempfd);
 224   tempfd = _open(tempf,_O_RDONLY|_O_TEXT); /* open in TEXT mode */
 225   ok(_read(tempfd,btext,LLEN) == lstrlenA(mytext),
 226      "_read _O_TEXT got bad length\n");
 227   ok( memcmp(mytext,btext,strlen(mytext)) == 0,
 228       "problems with _O_BINARY _write / _O_TEXT _read\n");
 229   _close(tempfd);
 230
 231   ok(_chmod (tempf, _S_IREAD | _S_IWRITE) == 0,
 232      "Can't chmod '%s' to read-write: %d\n", tempf, errno);
 233   ok(unlink(tempf) !=-1 ,"Can't unlink '%s': %d\n", tempf, errno);
 234 }
 235
 236 static void test_tmpnam( void )
 237 {
 238   char name[MAX_PATH] = "abc";
 239   char *res;
 240
 241   res = tmpnam(NULL);
 242   ok(res != NULL, "tmpnam returned NULL\n");
 243   ok(res[0] == '\\', "first character is not a backslash\n");
 244   ok(strchr(res+1, '\\') == 0, "file not in the root directory\n");
 245   ok(res[strlen(res)-1] == '.', "first call - last character is not a dot\n");
 246
 247   res = tmpnam(name);
 248   ok(res != NULL, "tmpnam returned NULL\n");
 249   ok(res == name, "supplied buffer was not used\n");
 250   ok(res[0] == '\\', "first character is not a backslash\n");
 251   ok(strchr(res+1, '\\') == 0, "file not in the root directory\n");
 252   ok(res[strlen(res)-1] != '.', "second call - last character is not a dot\n");
 253 }
 254
 255
 256
 257 START_TEST(file)
 258 {
 259     test_fdopen();
 260     test_fileops();
 261     test_fgetwc();
 262     test_file_put_get();
 263     test_file_write_read();
 264     test_tmpnam();
 265 }