2 * msvcrt.dll file functions
4 * Copyright 1996,1998 Marcus Meissner
5 * Copyright 1996 Jukka Iivonen
6 * Copyright 1997,2000 Uwe Bonnes
7 * Copyright 2000 Jon Griffiths
8 * Copyright 2004 Eric Pouech
9 * Copyright 2004 Juan Lang
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Lesser General Public
13 * License as published by the Free Software Foundation; either
14 * version 2.1 of the License, or (at your option) any later version.
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Lesser General Public License for more details.
21 * You should have received a copy of the GNU Lesser General Public
22 * License along with this library; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
26 * Use the file flag hints O_SEQUENTIAL, O_RANDOM, O_SHORT_LIVED
30 #include "wine/port.h"
37 #include <sys/types.h>
46 #include "wine/unicode.h"
48 #include "wine/debug.h"
50 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt
);
52 /* for stat mode, permissions apply to all,owner and group */
53 #define ALL_S_IREAD (MSVCRT__S_IREAD | (MSVCRT__S_IREAD >> 3) | (MSVCRT__S_IREAD >> 6))
54 #define ALL_S_IWRITE (MSVCRT__S_IWRITE | (MSVCRT__S_IWRITE >> 3) | (MSVCRT__S_IWRITE >> 6))
55 #define ALL_S_IEXEC (MSVCRT__S_IEXEC | (MSVCRT__S_IEXEC >> 3) | (MSVCRT__S_IEXEC >> 6))
57 /* _access() bit flags FIXME: incomplete */
58 #define MSVCRT_W_OK 0x02
59 #define MSVCRT_R_OK 0x04
61 /* values for wxflag in file descriptor */
64 #define WX_READNL 0x04 /* read started with \n */
66 #define WX_DONTINHERIT 0x10
67 #define WX_APPEND 0x20
68 #define WX_NOSEEK 0x40
71 /* values for exflag - it's used differently in msvcr90.dll*/
74 #define EF_CRIT_INIT 0x04
75 #define EF_UNK_UNICODE 0x08
77 static char utf8_bom
[3] = { 0xef, 0xbb, 0xbf };
78 static char utf16_bom
[2] = { 0xff, 0xfe };
80 /* FIXME: this should be allocated dynamically */
81 #define MSVCRT_MAX_FILES 2048
82 #define MSVCRT_FD_BLOCK_SIZE 32
84 #define MSVCRT_INTERNAL_BUFSIZ 4096
86 /* ioinfo structure size is different in msvcrXX.dll's */
92 CRITICAL_SECTION crit
;
98 BOOL utf8translations
;
106 /*********************************************************************
107 * __pioinfo (MSVCRT.@)
108 * array of pointers to ioinfo arrays [32]
110 ioinfo
* MSVCRT___pioinfo
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
] = { 0 };
112 /*********************************************************************
113 * __badioinfo (MSVCRT.@)
115 ioinfo MSVCRT___badioinfo
= { INVALID_HANDLE_VALUE
, WX_TEXT
};
117 static int MSVCRT_fdstart
= 3; /* first unallocated fd */
118 static int MSVCRT_fdend
= 3; /* highest allocated fd */
122 CRITICAL_SECTION crit
;
125 MSVCRT_FILE MSVCRT__iob
[_IOB_ENTRIES
] = { { 0 } };
126 static file_crit
* MSVCRT_fstream
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
];
127 static int MSVCRT_max_streams
= 512, MSVCRT_stream_idx
;
129 /* INTERNAL: process umask */
130 static int MSVCRT_umask
= 0;
132 /* INTERNAL: static data for tmpnam and _wtmpname functions */
133 static int tmpnam_unique
;
135 static const unsigned int EXE
= 'e' << 16 | 'x' << 8 | 'e';
136 static const unsigned int BAT
= 'b' << 16 | 'a' << 8 | 't';
137 static const unsigned int CMD
= 'c' << 16 | 'm' << 8 | 'd';
138 static const unsigned int COM
= 'c' << 16 | 'o' << 8 | 'm';
140 #define TOUL(x) (ULONGLONG)(x)
141 static const ULONGLONG WCEXE
= TOUL('e') << 32 | TOUL('x') << 16 | TOUL('e');
142 static const ULONGLONG WCBAT
= TOUL('b') << 32 | TOUL('a') << 16 | TOUL('t');
143 static const ULONGLONG WCCMD
= TOUL('c') << 32 | TOUL('m') << 16 | TOUL('d');
144 static const ULONGLONG WCCOM
= TOUL('c') << 32 | TOUL('o') << 16 | TOUL('m');
146 /* This critical section protects the tables MSVCRT___pioinfo and MSVCRT_fstreams,
147 * and their related indexes, MSVCRT_fdstart, MSVCRT_fdend,
148 * and MSVCRT_stream_idx, from race conditions.
149 * It doesn't protect against race conditions manipulating the underlying files
150 * or flags; doing so would probably be better accomplished with per-file
151 * protection, rather than locking the whole table for every change.
153 static CRITICAL_SECTION MSVCRT_file_cs
;
154 static CRITICAL_SECTION_DEBUG MSVCRT_file_cs_debug
=
156 0, 0, &MSVCRT_file_cs
,
157 { &MSVCRT_file_cs_debug
.ProcessLocksList
, &MSVCRT_file_cs_debug
.ProcessLocksList
},
158 0, 0, { (DWORD_PTR
)(__FILE__
": MSVCRT_file_cs") }
160 static CRITICAL_SECTION MSVCRT_file_cs
= { &MSVCRT_file_cs_debug
, -1, 0, 0, 0, 0 };
161 #define LOCK_FILES() do { EnterCriticalSection(&MSVCRT_file_cs); } while (0)
162 #define UNLOCK_FILES() do { LeaveCriticalSection(&MSVCRT_file_cs); } while (0)
164 static void msvcrt_stat64_to_stat(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stat
*buf
)
166 buf
->st_dev
= buf64
->st_dev
;
167 buf
->st_ino
= buf64
->st_ino
;
168 buf
->st_mode
= buf64
->st_mode
;
169 buf
->st_nlink
= buf64
->st_nlink
;
170 buf
->st_uid
= buf64
->st_uid
;
171 buf
->st_gid
= buf64
->st_gid
;
172 buf
->st_rdev
= buf64
->st_rdev
;
173 buf
->st_size
= buf64
->st_size
;
174 buf
->st_atime
= buf64
->st_atime
;
175 buf
->st_mtime
= buf64
->st_mtime
;
176 buf
->st_ctime
= buf64
->st_ctime
;
179 static void msvcrt_stat64_to_stati64(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stati64
*buf
)
181 buf
->st_dev
= buf64
->st_dev
;
182 buf
->st_ino
= buf64
->st_ino
;
183 buf
->st_mode
= buf64
->st_mode
;
184 buf
->st_nlink
= buf64
->st_nlink
;
185 buf
->st_uid
= buf64
->st_uid
;
186 buf
->st_gid
= buf64
->st_gid
;
187 buf
->st_rdev
= buf64
->st_rdev
;
188 buf
->st_size
= buf64
->st_size
;
189 buf
->st_atime
= buf64
->st_atime
;
190 buf
->st_mtime
= buf64
->st_mtime
;
191 buf
->st_ctime
= buf64
->st_ctime
;
194 static void msvcrt_stat64_to_stat32(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stat32
*buf
)
196 buf
->st_dev
= buf64
->st_dev
;
197 buf
->st_ino
= buf64
->st_ino
;
198 buf
->st_mode
= buf64
->st_mode
;
199 buf
->st_nlink
= buf64
->st_nlink
;
200 buf
->st_uid
= buf64
->st_uid
;
201 buf
->st_gid
= buf64
->st_gid
;
202 buf
->st_rdev
= buf64
->st_rdev
;
203 buf
->st_size
= buf64
->st_size
;
204 buf
->st_atime
= buf64
->st_atime
;
205 buf
->st_mtime
= buf64
->st_mtime
;
206 buf
->st_ctime
= buf64
->st_ctime
;
209 static void msvcrt_stat64_to_stat64i32(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stat64i32
*buf
)
211 buf
->st_dev
= buf64
->st_dev
;
212 buf
->st_ino
= buf64
->st_ino
;
213 buf
->st_mode
= buf64
->st_mode
;
214 buf
->st_nlink
= buf64
->st_nlink
;
215 buf
->st_uid
= buf64
->st_uid
;
216 buf
->st_gid
= buf64
->st_gid
;
217 buf
->st_rdev
= buf64
->st_rdev
;
218 buf
->st_size
= buf64
->st_size
;
219 buf
->st_atime
= buf64
->st_atime
;
220 buf
->st_mtime
= buf64
->st_mtime
;
221 buf
->st_ctime
= buf64
->st_ctime
;
224 static void msvcrt_stat64_to_stat32i64(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stat32i64
*buf
)
226 buf
->st_dev
= buf64
->st_dev
;
227 buf
->st_ino
= buf64
->st_ino
;
228 buf
->st_mode
= buf64
->st_mode
;
229 buf
->st_nlink
= buf64
->st_nlink
;
230 buf
->st_uid
= buf64
->st_uid
;
231 buf
->st_gid
= buf64
->st_gid
;
232 buf
->st_rdev
= buf64
->st_rdev
;
233 buf
->st_size
= buf64
->st_size
;
234 buf
->st_atime
= buf64
->st_atime
;
235 buf
->st_mtime
= buf64
->st_mtime
;
236 buf
->st_ctime
= buf64
->st_ctime
;
239 static void time_to_filetime( MSVCRT___time64_t time
, FILETIME
*ft
)
241 /* 1601 to 1970 is 369 years plus 89 leap days */
242 static const __int64 secs_1601_to_1970
= ((369 * 365 + 89) * (__int64
)86400);
244 __int64 ticks
= (time
+ secs_1601_to_1970
) * 10000000;
245 ft
->dwHighDateTime
= ticks
>> 32;
246 ft
->dwLowDateTime
= ticks
;
249 static inline ioinfo
* msvcrt_get_ioinfo(int fd
)
252 if(fd
< MSVCRT_MAX_FILES
)
253 ret
= MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
];
255 return &MSVCRT___badioinfo
;
257 return ret
+ (fd
%MSVCRT_FD_BLOCK_SIZE
);
260 static inline MSVCRT_FILE
* msvcrt_get_file(int i
)
264 if(i
>= MSVCRT_max_streams
)
268 return &MSVCRT__iob
[i
];
270 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
];
272 MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] = MSVCRT_calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(file_crit
));
273 if(!MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
]) {
274 ERR("out of memory\n");
275 *MSVCRT__errno() = MSVCRT_ENOMEM
;
279 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] + (i
%MSVCRT_FD_BLOCK_SIZE
);
281 ret
+= i
%MSVCRT_FD_BLOCK_SIZE
;
286 static inline BOOL
msvcrt_is_valid_fd(int fd
)
288 return fd
>= 0 && fd
< MSVCRT_fdend
&& (msvcrt_get_ioinfo(fd
)->wxflag
& WX_OPEN
);
291 /* INTERNAL: Get the HANDLE for a fd
292 * This doesn't lock the table, because a failure will result in
293 * INVALID_HANDLE_VALUE being returned, which should be handled correctly. If
294 * it returns a valid handle which is about to be closed, a subsequent call
295 * will fail, most likely in a sane way.
297 static HANDLE
msvcrt_fdtoh(int fd
)
299 if (!msvcrt_is_valid_fd(fd
))
301 WARN(":fd (%d) - no handle!\n",fd
);
302 *MSVCRT___doserrno() = 0;
303 *MSVCRT__errno() = MSVCRT_EBADF
;
304 return INVALID_HANDLE_VALUE
;
306 if (msvcrt_get_ioinfo(fd
)->handle
== INVALID_HANDLE_VALUE
)
307 WARN("returning INVALID_HANDLE_VALUE for %d\n", fd
);
308 return msvcrt_get_ioinfo(fd
)->handle
;
311 /* INTERNAL: free a file entry fd */
312 static void msvcrt_free_fd(int fd
)
317 fdinfo
= msvcrt_get_ioinfo(fd
);
318 if(fdinfo
!= &MSVCRT___badioinfo
)
320 fdinfo
->handle
= INVALID_HANDLE_VALUE
;
323 TRACE(":fd (%d) freed\n",fd
);
330 SetStdHandle(STD_INPUT_HANDLE
, 0);
333 SetStdHandle(STD_OUTPUT_HANDLE
, 0);
336 SetStdHandle(STD_ERROR_HANDLE
, 0);
341 if (fd
== MSVCRT_fdend
- 1)
343 if (fd
< MSVCRT_fdstart
)
348 /* INTERNAL: Allocate an fd slot from a Win32 HANDLE, starting from fd */
349 /* caller must hold the files lock */
350 static int msvcrt_set_fd(HANDLE hand
, int flag
, int fd
)
354 if (fd
>= MSVCRT_MAX_FILES
)
356 WARN(":files exhausted!\n");
357 *MSVCRT__errno() = MSVCRT_ENFILE
;
361 fdinfo
= msvcrt_get_ioinfo(fd
);
362 if(fdinfo
== &MSVCRT___badioinfo
) {
365 MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
] = MSVCRT_calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(ioinfo
));
366 if(!MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
]) {
367 WARN(":out of memory!\n");
368 *MSVCRT__errno() = MSVCRT_ENOMEM
;
372 for(i
=0; i
<MSVCRT_FD_BLOCK_SIZE
; i
++)
373 MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
][i
].handle
= INVALID_HANDLE_VALUE
;
375 fdinfo
= msvcrt_get_ioinfo(fd
);
378 fdinfo
->handle
= hand
;
379 fdinfo
->wxflag
= WX_OPEN
| (flag
& (WX_DONTINHERIT
| WX_APPEND
| WX_TEXT
| WX_PIPE
| WX_NOSEEK
));
380 fdinfo
->lookahead
[0] = '\n';
381 fdinfo
->lookahead
[1] = '\n';
382 fdinfo
->lookahead
[2] = '\n';
385 /* locate next free slot */
386 if (fd
== MSVCRT_fdstart
&& fd
== MSVCRT_fdend
)
387 MSVCRT_fdstart
= MSVCRT_fdend
+ 1;
389 while (MSVCRT_fdstart
< MSVCRT_fdend
&&
390 msvcrt_get_ioinfo(MSVCRT_fdstart
)->handle
!= INVALID_HANDLE_VALUE
)
392 /* update last fd in use */
393 if (fd
>= MSVCRT_fdend
)
394 MSVCRT_fdend
= fd
+ 1;
395 TRACE("fdstart is %d, fdend is %d\n", MSVCRT_fdstart
, MSVCRT_fdend
);
399 case 0: SetStdHandle(STD_INPUT_HANDLE
, hand
); break;
400 case 1: SetStdHandle(STD_OUTPUT_HANDLE
, hand
); break;
401 case 2: SetStdHandle(STD_ERROR_HANDLE
, hand
); break;
407 /* INTERNAL: Allocate an fd slot from a Win32 HANDLE */
408 static int msvcrt_alloc_fd(HANDLE hand
, int flag
)
413 TRACE(":handle (%p) allocating fd (%d)\n",hand
,MSVCRT_fdstart
);
414 ret
= msvcrt_set_fd(hand
, flag
, MSVCRT_fdstart
);
419 /* INTERNAL: Allocate a FILE* for an fd slot */
420 /* caller must hold the files lock */
421 static MSVCRT_FILE
* msvcrt_alloc_fp(void)
426 for (i
= 3; i
< MSVCRT_max_streams
; i
++)
428 file
= msvcrt_get_file(i
);
432 if (file
->_flag
== 0)
434 if (i
== MSVCRT_stream_idx
)
436 if (file
<MSVCRT__iob
|| file
>=MSVCRT__iob
+_IOB_ENTRIES
)
438 InitializeCriticalSection(&((file_crit
*)file
)->crit
);
439 ((file_crit
*)file
)->crit
.DebugInfo
->Spare
[0] = (DWORD_PTR
)(__FILE__
": file_crit.crit");
450 /* INTERNAL: initialize a FILE* from an open fd */
451 static int msvcrt_init_fp(MSVCRT_FILE
* file
, int fd
, unsigned stream_flags
)
453 TRACE(":fd (%d) allocating FILE*\n",fd
);
454 if (!msvcrt_is_valid_fd(fd
))
456 WARN(":invalid fd %d\n",fd
);
457 *MSVCRT___doserrno() = 0;
458 *MSVCRT__errno() = MSVCRT_EBADF
;
461 memset(file
, 0, sizeof(*file
));
463 file
->_flag
= stream_flags
;
465 TRACE(":got FILE* (%p)\n",file
);
469 /* INTERNAL: Create an inheritance data block (for spawned process)
470 * The inheritance block is made of:
471 * 00 int nb of file descriptor (NBFD)
472 * 04 char file flags (wxflag): repeated for each fd
473 * 4+NBFD HANDLE file handle: repeated for each fd
475 unsigned msvcrt_create_io_inherit_block(WORD
*size
, BYTE
**block
)
482 *size
= sizeof(unsigned) + (sizeof(char) + sizeof(HANDLE
)) * MSVCRT_fdend
;
483 *block
= MSVCRT_calloc(*size
, 1);
489 wxflag_ptr
= (char*)*block
+ sizeof(unsigned);
490 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ MSVCRT_fdend
* sizeof(char));
492 *(unsigned*)*block
= MSVCRT_fdend
;
493 for (fd
= 0; fd
< MSVCRT_fdend
; fd
++)
495 /* to be inherited, we need it to be open, and that DONTINHERIT isn't set */
496 fdinfo
= msvcrt_get_ioinfo(fd
);
497 if ((fdinfo
->wxflag
& (WX_OPEN
| WX_DONTINHERIT
)) == WX_OPEN
)
499 *wxflag_ptr
= fdinfo
->wxflag
;
500 *handle_ptr
= fdinfo
->handle
;
505 *handle_ptr
= INVALID_HANDLE_VALUE
;
507 wxflag_ptr
++; handle_ptr
++;
512 /* INTERNAL: Set up all file descriptors,
513 * as well as default streams (stdin, stderr and stdout)
515 void msvcrt_init_io(void)
521 GetStartupInfoA(&si
);
522 if (si
.cbReserved2
>= sizeof(unsigned int) && si
.lpReserved2
!= NULL
)
528 count
= *(unsigned*)si
.lpReserved2
;
529 wxflag_ptr
= si
.lpReserved2
+ sizeof(unsigned);
530 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ count
);
532 count
= min(count
, (si
.cbReserved2
- sizeof(unsigned)) / (sizeof(HANDLE
) + 1));
533 count
= min(count
, MSVCRT_MAX_FILES
);
534 for (i
= 0; i
< count
; i
++)
536 if ((*wxflag_ptr
& WX_OPEN
) && *handle_ptr
!= INVALID_HANDLE_VALUE
)
537 msvcrt_set_fd(*handle_ptr
, *wxflag_ptr
, i
);
539 wxflag_ptr
++; handle_ptr
++;
541 MSVCRT_fdend
= max( 3, count
);
542 for (MSVCRT_fdstart
= 3; MSVCRT_fdstart
< MSVCRT_fdend
; MSVCRT_fdstart
++)
543 if (msvcrt_get_ioinfo(MSVCRT_fdstart
)->handle
== INVALID_HANDLE_VALUE
) break;
546 fdinfo
= msvcrt_get_ioinfo(MSVCRT_STDIN_FILENO
);
547 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
548 HANDLE h
= GetStdHandle(STD_INPUT_HANDLE
);
549 DWORD type
= GetFileType(h
);
551 msvcrt_set_fd(h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_NOSEEK
: 0)
552 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0), MSVCRT_STDIN_FILENO
);
555 fdinfo
= msvcrt_get_ioinfo(MSVCRT_STDOUT_FILENO
);
556 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
557 HANDLE h
= GetStdHandle(STD_OUTPUT_HANDLE
);
558 DWORD type
= GetFileType(h
);
560 msvcrt_set_fd(h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_NOSEEK
: 0)
561 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0), MSVCRT_STDOUT_FILENO
);
564 fdinfo
= msvcrt_get_ioinfo(MSVCRT_STDERR_FILENO
);
565 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
566 HANDLE h
= GetStdHandle(STD_ERROR_HANDLE
);
567 DWORD type
= GetFileType(h
);
569 msvcrt_set_fd(h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_NOSEEK
: 0)
570 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0), MSVCRT_STDERR_FILENO
);
573 TRACE(":handles (%p)(%p)(%p)\n", msvcrt_get_ioinfo(MSVCRT_STDIN_FILENO
)->handle
,
574 msvcrt_get_ioinfo(MSVCRT_STDOUT_FILENO
)->handle
,
575 msvcrt_get_ioinfo(MSVCRT_STDERR_FILENO
)->handle
);
577 memset(MSVCRT__iob
,0,3*sizeof(MSVCRT_FILE
));
578 for (i
= 0; i
< 3; i
++)
580 /* FILE structs for stdin/out/err are static and never deleted */
581 MSVCRT__iob
[i
]._file
= i
;
582 MSVCRT__iob
[i
]._tmpfname
= NULL
;
583 MSVCRT__iob
[i
]._flag
= (i
== 0) ? MSVCRT__IOREAD
: MSVCRT__IOWRT
;
585 MSVCRT_stream_idx
= 3;
588 /* INTERNAL: Flush stdio file buffer */
589 static int msvcrt_flush_buffer(MSVCRT_FILE
* file
)
592 int cnt
=file
->_ptr
-file
->_base
;
593 if(cnt
>0 && MSVCRT__write(file
->_file
, file
->_base
, cnt
) != cnt
) {
594 file
->_flag
|= MSVCRT__IOERR
;
597 file
->_ptr
=file
->_base
;
598 file
->_cnt
=file
->_bufsiz
;
603 /*********************************************************************
606 int CDECL
MSVCRT__isatty(int fd
)
608 HANDLE hand
= msvcrt_fdtoh(fd
);
610 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
611 if (hand
== INVALID_HANDLE_VALUE
)
614 return GetFileType(hand
) == FILE_TYPE_CHAR
? 1 : 0;
617 /* INTERNAL: Allocate stdio file buffer */
618 static BOOL
msvcrt_alloc_buffer(MSVCRT_FILE
* file
)
620 if((file
->_file
==MSVCRT_STDOUT_FILENO
|| file
->_file
==MSVCRT_STDERR_FILENO
)
621 && MSVCRT__isatty(file
->_file
))
624 file
->_base
= MSVCRT_calloc(MSVCRT_INTERNAL_BUFSIZ
,1);
626 file
->_bufsiz
= MSVCRT_INTERNAL_BUFSIZ
;
627 file
->_flag
|= MSVCRT__IOMYBUF
;
629 file
->_base
= (char*)(&file
->_charbuf
);
631 file
->_bufsiz
= sizeof(file
->_charbuf
);
633 file
->_ptr
= file
->_base
;
638 /* INTERNAL: Allocate temporary buffer for stdout and stderr */
639 static BOOL
add_std_buffer(MSVCRT_FILE
*file
)
641 static char buffers
[2][MSVCRT_BUFSIZ
];
643 if((file
->_file
!=MSVCRT_STDOUT_FILENO
&& file
->_file
!=MSVCRT_STDERR_FILENO
)
644 || !MSVCRT__isatty(file
->_file
) || file
->_bufsiz
)
647 file
->_ptr
= file
->_base
= buffers
[file
->_file
== MSVCRT_STDOUT_FILENO
? 0 : 1];
648 file
->_bufsiz
= file
->_cnt
= MSVCRT_BUFSIZ
;
652 /* INTERNAL: Removes temporary buffer from stdout or stderr */
653 /* Only call this function when add_std_buffer returned TRUE */
654 static void remove_std_buffer(MSVCRT_FILE
*file
)
656 msvcrt_flush_buffer(file
);
657 file
->_ptr
= file
->_base
= NULL
;
658 file
->_bufsiz
= file
->_cnt
= 0;
661 /* INTERNAL: Convert integer to base32 string (0-9a-v), 0 becomes "" */
662 static int msvcrt_int_to_base32(int num
, char *str
)
677 *p
= (num
& 31) + '0';
679 *p
+= ('a' - '0' - 10);
686 /* INTERNAL: wide character version of msvcrt_int_to_base32 */
687 static int msvcrt_int_to_base32_w(int num
, MSVCRT_wchar_t
*str
)
702 *p
= (num
& 31) + '0';
704 *p
+= ('a' - '0' - 10);
711 /*********************************************************************
712 * __iob_func(MSVCRT.@)
714 MSVCRT_FILE
* CDECL
MSVCRT___iob_func(void)
716 return &MSVCRT__iob
[0];
719 /*********************************************************************
722 int CDECL
MSVCRT__access(const char *filename
, int mode
)
724 DWORD attr
= GetFileAttributesA(filename
);
726 TRACE("(%s,%d) %d\n",filename
,mode
,attr
);
728 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
730 msvcrt_set_errno(GetLastError());
733 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& MSVCRT_W_OK
))
735 msvcrt_set_errno(ERROR_ACCESS_DENIED
);
741 /*********************************************************************
742 * _access_s (MSVCRT.@)
744 int CDECL
MSVCRT__access_s(const char *filename
, int mode
)
746 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return *MSVCRT__errno();
747 if (!MSVCRT_CHECK_PMT((mode
& ~(MSVCRT_R_OK
| MSVCRT_W_OK
)) == 0)) return *MSVCRT__errno();
749 if (MSVCRT__access(filename
, mode
) == -1)
750 return *MSVCRT__errno();
754 /*********************************************************************
755 * _waccess (MSVCRT.@)
757 int CDECL
MSVCRT__waccess(const MSVCRT_wchar_t
*filename
, int mode
)
759 DWORD attr
= GetFileAttributesW(filename
);
761 TRACE("(%s,%d) %d\n",debugstr_w(filename
),mode
,attr
);
763 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
765 msvcrt_set_errno(GetLastError());
768 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& MSVCRT_W_OK
))
770 msvcrt_set_errno(ERROR_ACCESS_DENIED
);
776 /*********************************************************************
777 * _waccess_s (MSVCRT.@)
779 int CDECL
MSVCRT__waccess_s(const MSVCRT_wchar_t
*filename
, int mode
)
781 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return *MSVCRT__errno();
782 if (!MSVCRT_CHECK_PMT((mode
& ~(MSVCRT_R_OK
| MSVCRT_W_OK
)) == 0)) return *MSVCRT__errno();
784 if (MSVCRT__waccess(filename
, mode
) == -1)
785 return *MSVCRT__errno();
789 /*********************************************************************
792 int CDECL
MSVCRT__chmod(const char *path
, int flags
)
794 DWORD oldFlags
= GetFileAttributesA(path
);
796 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
798 DWORD newFlags
= (flags
& MSVCRT__S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
799 oldFlags
| FILE_ATTRIBUTE_READONLY
;
801 if (newFlags
== oldFlags
|| SetFileAttributesA(path
, newFlags
))
804 msvcrt_set_errno(GetLastError());
808 /*********************************************************************
811 int CDECL
MSVCRT__wchmod(const MSVCRT_wchar_t
*path
, int flags
)
813 DWORD oldFlags
= GetFileAttributesW(path
);
815 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
817 DWORD newFlags
= (flags
& MSVCRT__S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
818 oldFlags
| FILE_ATTRIBUTE_READONLY
;
820 if (newFlags
== oldFlags
|| SetFileAttributesW(path
, newFlags
))
823 msvcrt_set_errno(GetLastError());
827 /*********************************************************************
830 int CDECL
MSVCRT__unlink(const char *path
)
832 TRACE("%s\n",debugstr_a(path
));
833 if(DeleteFileA(path
))
835 TRACE("failed (%d)\n",GetLastError());
836 msvcrt_set_errno(GetLastError());
840 /*********************************************************************
841 * _wunlink (MSVCRT.@)
843 int CDECL
MSVCRT__wunlink(const MSVCRT_wchar_t
*path
)
845 TRACE("(%s)\n",debugstr_w(path
));
846 if(DeleteFileW(path
))
848 TRACE("failed (%d)\n",GetLastError());
849 msvcrt_set_errno(GetLastError());
853 /*********************************************************************
856 int CDECL
MSVCRT__commit(int fd
)
858 HANDLE hand
= msvcrt_fdtoh(fd
);
860 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
861 if (hand
== INVALID_HANDLE_VALUE
)
864 if (!FlushFileBuffers(hand
))
866 if (GetLastError() == ERROR_INVALID_HANDLE
)
868 /* FlushFileBuffers fails for console handles
869 * so we ignore this error.
873 TRACE(":failed-last error (%d)\n",GetLastError());
874 msvcrt_set_errno(GetLastError());
881 /* flush_all_buffers calls MSVCRT_fflush which calls flush_all_buffers */
882 int CDECL
MSVCRT_fflush(MSVCRT_FILE
* file
);
884 /* INTERNAL: Flush all stream buffer */
885 static int msvcrt_flush_all_buffers(int mask
)
887 int i
, num_flushed
= 0;
891 for (i
= 0; i
< MSVCRT_stream_idx
; i
++) {
892 file
= msvcrt_get_file(i
);
896 if(file
->_flag
& mask
) {
904 TRACE(":flushed (%d) handles\n",num_flushed
);
908 /*********************************************************************
909 * _flushall (MSVCRT.@)
911 int CDECL
MSVCRT__flushall(void)
913 return msvcrt_flush_all_buffers(MSVCRT__IOWRT
| MSVCRT__IOREAD
);
916 /*********************************************************************
919 int CDECL
MSVCRT_fflush(MSVCRT_FILE
* file
)
922 msvcrt_flush_all_buffers(MSVCRT__IOWRT
);
923 } else if(file
->_flag
& MSVCRT__IOWRT
) {
926 MSVCRT__lock_file(file
);
927 res
= msvcrt_flush_buffer(file
);
929 if(!res
&& (file
->_flag
& MSVCRT__IOCOMMIT
))
930 res
= MSVCRT__commit(file
->_file
) ? MSVCRT_EOF
: 0;
931 MSVCRT__unlock_file(file
);
934 } else if(file
->_flag
& MSVCRT__IOREAD
) {
935 MSVCRT__lock_file(file
);
937 file
->_ptr
= file
->_base
;
938 MSVCRT__unlock_file(file
);
945 /*********************************************************************
948 int CDECL
MSVCRT__close(int fd
)
954 hand
= msvcrt_fdtoh(fd
);
955 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
956 if (!msvcrt_is_valid_fd(fd
)) {
960 ret
= CloseHandle(hand
) ? 0 : -1;
962 WARN(":failed-last error (%d)\n",GetLastError());
963 msvcrt_set_errno(GetLastError());
971 /*********************************************************************
974 * MSDN isn't clear on this point, but the remarks for _pipe
975 * indicate file descriptors duplicated with _dup and _dup2 are always
978 int CDECL
MSVCRT__dup2(int od
, int nd
)
982 TRACE("(od=%d, nd=%d)\n", od
, nd
);
984 if (nd
< MSVCRT_MAX_FILES
&& nd
>= 0 && msvcrt_is_valid_fd(od
))
988 if (DuplicateHandle(GetCurrentProcess(), msvcrt_get_ioinfo(od
)->handle
,
989 GetCurrentProcess(), &handle
, 0, TRUE
, DUPLICATE_SAME_ACCESS
))
991 int wxflag
= msvcrt_get_ioinfo(od
)->wxflag
& ~MSVCRT__O_NOINHERIT
;
993 if (msvcrt_is_valid_fd(nd
))
995 ret
= msvcrt_set_fd(handle
, wxflag
, nd
);
999 *MSVCRT__errno() = MSVCRT_EMFILE
;
1003 /* _dup2 returns 0, not nd, on success */
1010 msvcrt_set_errno(GetLastError());
1015 *MSVCRT__errno() = MSVCRT_EBADF
;
1022 /*********************************************************************
1025 int CDECL
MSVCRT__dup(int od
)
1030 fd
= MSVCRT_fdstart
;
1031 if (MSVCRT__dup2(od
, fd
) == 0)
1039 /*********************************************************************
1042 int CDECL
MSVCRT__eof(int fd
)
1044 DWORD curpos
,endpos
;
1045 LONG hcurpos
,hendpos
;
1046 HANDLE hand
= msvcrt_fdtoh(fd
);
1048 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1050 if (hand
== INVALID_HANDLE_VALUE
)
1053 if (msvcrt_get_ioinfo(fd
)->wxflag
& WX_ATEOF
) return TRUE
;
1055 /* Otherwise we do it the hard way */
1056 hcurpos
= hendpos
= 0;
1057 curpos
= SetFilePointer(hand
, 0, &hcurpos
, FILE_CURRENT
);
1058 endpos
= SetFilePointer(hand
, 0, &hendpos
, FILE_END
);
1060 if (curpos
== endpos
&& hcurpos
== hendpos
)
1062 /* FIXME: shouldn't WX_ATEOF be set here? */
1066 SetFilePointer(hand
, curpos
, &hcurpos
, FILE_BEGIN
);
1070 /*********************************************************************
1071 * _fcloseall (MSVCRT.@)
1073 int CDECL
MSVCRT__fcloseall(void)
1075 int num_closed
= 0, i
;
1079 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
1080 file
= msvcrt_get_file(i
);
1082 if (file
->_flag
&& !MSVCRT_fclose(file
))
1087 TRACE(":closed (%d) handles\n",num_closed
);
1091 /* free everything on process exit */
1092 void msvcrt_free_io(void)
1098 MSVCRT__fcloseall();
1100 for(i
=0; i
<sizeof(MSVCRT___pioinfo
)/sizeof(MSVCRT___pioinfo
[0]); i
++)
1101 MSVCRT_free(MSVCRT___pioinfo
[i
]);
1103 for(j
=0; j
<MSVCRT_stream_idx
; j
++)
1105 MSVCRT_FILE
*file
= msvcrt_get_file(j
);
1106 if(file
<MSVCRT__iob
|| file
>=MSVCRT__iob
+_IOB_ENTRIES
)
1108 ((file_crit
*)file
)->crit
.DebugInfo
->Spare
[0] = 0;
1109 DeleteCriticalSection(&((file_crit
*)file
)->crit
);
1113 for(i
=0; i
<sizeof(MSVCRT_fstream
)/sizeof(MSVCRT_fstream
[0]); i
++)
1114 MSVCRT_free(MSVCRT_fstream
[i
]);
1116 DeleteCriticalSection(&MSVCRT_file_cs
);
1119 /*********************************************************************
1120 * _lseeki64 (MSVCRT.@)
1122 __int64 CDECL
MSVCRT__lseeki64(int fd
, __int64 offset
, int whence
)
1124 HANDLE hand
= msvcrt_fdtoh(fd
);
1127 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1128 if (hand
== INVALID_HANDLE_VALUE
)
1131 if (whence
< 0 || whence
> 2)
1133 *MSVCRT__errno() = MSVCRT_EINVAL
;
1137 TRACE(":fd (%d) to %s pos %s\n",
1138 fd
,wine_dbgstr_longlong(offset
),
1139 (whence
==SEEK_SET
)?"SEEK_SET":
1140 (whence
==SEEK_CUR
)?"SEEK_CUR":
1141 (whence
==SEEK_END
)?"SEEK_END":"UNKNOWN");
1143 /* The MoleBox protection scheme expects msvcrt to use SetFilePointer only,
1144 * so a LARGE_INTEGER offset cannot be passed directly via SetFilePointerEx. */
1145 ofs
.QuadPart
= offset
;
1146 if ((ofs
.u
.LowPart
= SetFilePointer(hand
, ofs
.u
.LowPart
, &ofs
.u
.HighPart
, whence
)) != INVALID_SET_FILE_POINTER
||
1147 GetLastError() == ERROR_SUCCESS
)
1149 msvcrt_get_ioinfo(fd
)->wxflag
&= ~WX_ATEOF
;
1150 /* FIXME: What if we seek _to_ EOF - is EOF set? */
1152 return ofs
.QuadPart
;
1154 TRACE(":error-last error (%d)\n",GetLastError());
1155 msvcrt_set_errno(GetLastError());
1159 /*********************************************************************
1162 LONG CDECL
MSVCRT__lseek(int fd
, LONG offset
, int whence
)
1164 return MSVCRT__lseeki64(fd
, offset
, whence
);
1167 /*********************************************************************
1168 * _lock_file (MSVCRT.@)
1170 void CDECL
MSVCRT__lock_file(MSVCRT_FILE
*file
)
1172 if(file
>=MSVCRT__iob
&& file
<MSVCRT__iob
+_IOB_ENTRIES
)
1173 _lock(_STREAM_LOCKS
+(file
-MSVCRT__iob
));
1175 EnterCriticalSection(&((file_crit
*)file
)->crit
);
1178 /*********************************************************************
1179 * _unlock_file (MSVCRT.@)
1181 void CDECL
MSVCRT__unlock_file(MSVCRT_FILE
*file
)
1183 if(file
>=MSVCRT__iob
&& file
<MSVCRT__iob
+_IOB_ENTRIES
)
1184 _unlock(_STREAM_LOCKS
+(file
-MSVCRT__iob
));
1186 LeaveCriticalSection(&((file_crit
*)file
)->crit
);
1189 /*********************************************************************
1190 * _locking (MSVCRT.@)
1192 * This is untested; the underlying LockFile doesn't work yet.
1194 int CDECL
MSVCRT__locking(int fd
, int mode
, LONG nbytes
)
1198 HANDLE hand
= msvcrt_fdtoh(fd
);
1200 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1201 if (hand
== INVALID_HANDLE_VALUE
)
1204 if (mode
< 0 || mode
> 4)
1206 *MSVCRT__errno() = MSVCRT_EINVAL
;
1210 TRACE(":fd (%d) by 0x%08x mode %s\n",
1211 fd
,nbytes
,(mode
==MSVCRT__LK_UNLCK
)?"_LK_UNLCK":
1212 (mode
==MSVCRT__LK_LOCK
)?"_LK_LOCK":
1213 (mode
==MSVCRT__LK_NBLCK
)?"_LK_NBLCK":
1214 (mode
==MSVCRT__LK_RLCK
)?"_LK_RLCK":
1215 (mode
==MSVCRT__LK_NBRLCK
)?"_LK_NBRLCK":
1218 if ((cur_locn
= SetFilePointer(hand
, 0L, NULL
, SEEK_CUR
)) == INVALID_SET_FILE_POINTER
)
1220 FIXME ("Seek failed\n");
1221 *MSVCRT__errno() = MSVCRT_EINVAL
; /* FIXME */
1224 if (mode
== MSVCRT__LK_LOCK
|| mode
== MSVCRT__LK_RLCK
)
1227 ret
= 1; /* just to satisfy gcc */
1230 ret
= LockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1235 else if (mode
== MSVCRT__LK_UNLCK
)
1236 ret
= UnlockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1238 ret
= LockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1239 /* FIXME - what about error settings? */
1240 return ret
? 0 : -1;
1243 /*********************************************************************
1244 * _fseeki64 (MSVCRT.@)
1246 int CDECL
MSVCRT__fseeki64(MSVCRT_FILE
* file
, __int64 offset
, int whence
)
1250 MSVCRT__lock_file(file
);
1251 /* Flush output if needed */
1252 if(file
->_flag
& MSVCRT__IOWRT
)
1253 msvcrt_flush_buffer(file
);
1255 if(whence
== SEEK_CUR
&& file
->_flag
& MSVCRT__IOREAD
) {
1257 offset
+= MSVCRT__ftelli64(file
);
1260 /* Discard buffered input */
1262 file
->_ptr
= file
->_base
;
1263 /* Reset direction of i/o */
1264 if(file
->_flag
& MSVCRT__IORW
) {
1265 file
->_flag
&= ~(MSVCRT__IOREAD
|MSVCRT__IOWRT
);
1267 /* Clear end of file flag */
1268 file
->_flag
&= ~MSVCRT__IOEOF
;
1269 ret
= (MSVCRT__lseeki64(file
->_file
,offset
,whence
) == -1)?-1:0;
1271 MSVCRT__unlock_file(file
);
1275 /*********************************************************************
1278 int CDECL
MSVCRT_fseek(MSVCRT_FILE
* file
, MSVCRT_long offset
, int whence
)
1280 return MSVCRT__fseeki64( file
, offset
, whence
);
1283 /*********************************************************************
1284 * _chsize_s (MSVCRT.@)
1286 int CDECL
MSVCRT__chsize_s(int fd
, __int64 size
)
1292 TRACE("(fd=%d, size=%s)\n", fd
, wine_dbgstr_longlong(size
));
1294 if (!MSVCRT_CHECK_PMT(size
>= 0)) return MSVCRT_EINVAL
;
1298 handle
= msvcrt_fdtoh(fd
);
1299 if (handle
!= INVALID_HANDLE_VALUE
)
1301 /* save the current file pointer */
1302 cur
= MSVCRT__lseeki64(fd
, 0, SEEK_CUR
);
1305 pos
= MSVCRT__lseeki64(fd
, size
, SEEK_SET
);
1308 ret
= SetEndOfFile(handle
);
1309 if (!ret
) msvcrt_set_errno(GetLastError());
1312 /* restore the file pointer */
1313 MSVCRT__lseeki64(fd
, cur
, SEEK_SET
);
1318 return ret
? 0 : *MSVCRT__errno();
1321 /*********************************************************************
1322 * _chsize (MSVCRT.@)
1324 int CDECL
MSVCRT__chsize(int fd
, MSVCRT_long size
)
1326 /* _chsize_s returns errno on failure but _chsize should return -1 */
1327 return MSVCRT__chsize_s( fd
, size
) == 0 ? 0 : -1;
1330 /*********************************************************************
1331 * clearerr (MSVCRT.@)
1333 void CDECL
MSVCRT_clearerr(MSVCRT_FILE
* file
)
1335 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1337 MSVCRT__lock_file(file
);
1338 file
->_flag
&= ~(MSVCRT__IOERR
| MSVCRT__IOEOF
);
1339 MSVCRT__unlock_file(file
);
1342 /*********************************************************************
1345 void CDECL
MSVCRT_rewind(MSVCRT_FILE
* file
)
1347 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1349 MSVCRT__lock_file(file
);
1350 MSVCRT_fseek(file
, 0L, SEEK_SET
);
1351 MSVCRT_clearerr(file
);
1352 MSVCRT__unlock_file(file
);
1355 static int msvcrt_get_flags(const MSVCRT_wchar_t
* mode
, int *open_flags
, int* stream_flags
)
1357 int plus
= strchrW(mode
, '+') != NULL
;
1359 TRACE("%s\n", debugstr_w(mode
));
1361 while(*mode
== ' ') mode
++;
1366 *open_flags
= plus
? MSVCRT__O_RDWR
: MSVCRT__O_RDONLY
;
1367 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOREAD
;
1370 *open_flags
= MSVCRT__O_CREAT
| MSVCRT__O_TRUNC
| (plus
? MSVCRT__O_RDWR
: MSVCRT__O_WRONLY
);
1371 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOWRT
;
1374 *open_flags
= MSVCRT__O_CREAT
| MSVCRT__O_APPEND
| (plus
? MSVCRT__O_RDWR
: MSVCRT__O_WRONLY
);
1375 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOWRT
;
1378 MSVCRT_INVALID_PMT(0, MSVCRT_EINVAL
);
1382 *stream_flags
|= MSVCRT__commode
;
1384 while (*mode
&& *mode
!=',')
1388 *open_flags
|= MSVCRT__O_BINARY
;
1389 *open_flags
&= ~MSVCRT__O_TEXT
;
1392 *open_flags
|= MSVCRT__O_TEXT
;
1393 *open_flags
&= ~MSVCRT__O_BINARY
;
1396 *open_flags
|= MSVCRT__O_TEMPORARY
;
1399 *open_flags
|= MSVCRT__O_SHORT_LIVED
;
1402 *stream_flags
|= MSVCRT__IOCOMMIT
;
1405 *stream_flags
&= ~MSVCRT__IOCOMMIT
;
1408 *open_flags
|= MSVCRT__O_NOINHERIT
;
1417 FIXME("ignoring cache optimization flag: %c\n", mode
[-1]);
1420 ERR("incorrect mode flag: %c\n", mode
[-1]);
1426 static const WCHAR ccs
[] = {'c','c','s'};
1427 static const WCHAR utf8
[] = {'u','t','f','-','8'};
1428 static const WCHAR utf16le
[] = {'u','t','f','-','1','6','l','e'};
1429 static const WCHAR unicode
[] = {'u','n','i','c','o','d','e'};
1432 while(*mode
== ' ') mode
++;
1433 if(!MSVCRT_CHECK_PMT(!strncmpW(ccs
, mode
, sizeof(ccs
)/sizeof(ccs
[0]))))
1435 mode
+= sizeof(ccs
)/sizeof(ccs
[0]);
1436 while(*mode
== ' ') mode
++;
1437 if(!MSVCRT_CHECK_PMT(*mode
== '='))
1440 while(*mode
== ' ') mode
++;
1442 if(!strncmpiW(utf8
, mode
, sizeof(utf8
)/sizeof(utf8
[0])))
1444 *open_flags
|= MSVCRT__O_U8TEXT
;
1445 mode
+= sizeof(utf8
)/sizeof(utf8
[0]);
1447 else if(!strncmpiW(utf16le
, mode
, sizeof(utf16le
)/sizeof(utf16le
[0])))
1449 *open_flags
|= MSVCRT__O_U16TEXT
;
1450 mode
+= sizeof(utf16le
)/sizeof(utf16le
[0]);
1452 else if(!strncmpiW(unicode
, mode
, sizeof(unicode
)/sizeof(unicode
[0])))
1454 *open_flags
|= MSVCRT__O_WTEXT
;
1455 mode
+= sizeof(unicode
)/sizeof(unicode
[0]);
1459 MSVCRT_INVALID_PMT(0, MSVCRT_EINVAL
);
1463 while(*mode
== ' ') mode
++;
1466 if(!MSVCRT_CHECK_PMT(*mode
== 0))
1471 /*********************************************************************
1472 * _fdopen (MSVCRT.@)
1474 MSVCRT_FILE
* CDECL
MSVCRT__fdopen(int fd
, const char *mode
)
1477 MSVCRT_wchar_t
*modeW
= NULL
;
1479 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
))) return NULL
;
1481 ret
= MSVCRT__wfdopen(fd
, modeW
);
1487 /*********************************************************************
1488 * _wfdopen (MSVCRT.@)
1490 MSVCRT_FILE
* CDECL
MSVCRT__wfdopen(int fd
, const MSVCRT_wchar_t
*mode
)
1492 int open_flags
, stream_flags
;
1495 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1) return NULL
;
1498 if (!(file
= msvcrt_alloc_fp()))
1500 else if (msvcrt_init_fp(file
, fd
, stream_flags
) == -1)
1505 else TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
1511 /*********************************************************************
1512 * _filelength (MSVCRT.@)
1514 LONG CDECL
MSVCRT__filelength(int fd
)
1516 LONG curPos
= MSVCRT__lseek(fd
, 0, SEEK_CUR
);
1519 LONG endPos
= MSVCRT__lseek(fd
, 0, SEEK_END
);
1522 if (endPos
!= curPos
)
1523 MSVCRT__lseek(fd
, curPos
, SEEK_SET
);
1530 /*********************************************************************
1531 * _filelengthi64 (MSVCRT.@)
1533 __int64 CDECL
MSVCRT__filelengthi64(int fd
)
1535 __int64 curPos
= MSVCRT__lseeki64(fd
, 0, SEEK_CUR
);
1538 __int64 endPos
= MSVCRT__lseeki64(fd
, 0, SEEK_END
);
1541 if (endPos
!= curPos
)
1542 MSVCRT__lseeki64(fd
, curPos
, SEEK_SET
);
1549 /*********************************************************************
1550 * _fileno (MSVCRT.@)
1552 int CDECL
MSVCRT__fileno(MSVCRT_FILE
* file
)
1554 TRACE(":FILE* (%p) fd (%d)\n",file
,file
->_file
);
1558 /*********************************************************************
1559 * _fstat64 (MSVCRT.@)
1561 int CDECL
MSVCRT__fstat64(int fd
, struct MSVCRT__stat64
* buf
)
1565 BY_HANDLE_FILE_INFORMATION hfi
;
1566 HANDLE hand
= msvcrt_fdtoh(fd
);
1568 TRACE(":fd (%d) stat (%p)\n",fd
,buf
);
1569 if (hand
== INVALID_HANDLE_VALUE
)
1574 WARN(":failed-NULL buf\n");
1575 msvcrt_set_errno(ERROR_INVALID_PARAMETER
);
1579 memset(&hfi
, 0, sizeof(hfi
));
1580 memset(buf
, 0, sizeof(struct MSVCRT__stat64
));
1581 type
= GetFileType(hand
);
1582 if (type
== FILE_TYPE_PIPE
)
1584 buf
->st_dev
= buf
->st_rdev
= fd
;
1585 buf
->st_mode
= S_IFIFO
;
1588 else if (type
== FILE_TYPE_CHAR
)
1590 buf
->st_dev
= buf
->st_rdev
= fd
;
1591 buf
->st_mode
= S_IFCHR
;
1594 else /* FILE_TYPE_DISK etc. */
1596 if (!GetFileInformationByHandle(hand
, &hfi
))
1598 WARN(":failed-last error (%d)\n",GetLastError());
1599 msvcrt_set_errno(ERROR_INVALID_PARAMETER
);
1602 buf
->st_mode
= S_IFREG
| 0444;
1603 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
1604 buf
->st_mode
|= 0222;
1605 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
1606 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
1608 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
1609 buf
->st_mtime
= buf
->st_ctime
= dw
;
1610 buf
->st_nlink
= hfi
.nNumberOfLinks
;
1612 TRACE(":dwFileAttributes = 0x%x, mode set to 0x%x\n",hfi
.dwFileAttributes
,
1617 /*********************************************************************
1618 * _fstati64 (MSVCRT.@)
1620 int CDECL
MSVCRT__fstati64(int fd
, struct MSVCRT__stati64
* buf
)
1623 struct MSVCRT__stat64 buf64
;
1625 ret
= MSVCRT__fstat64(fd
, &buf64
);
1627 msvcrt_stat64_to_stati64(&buf64
, buf
);
1631 /*********************************************************************
1634 int CDECL
MSVCRT__fstat(int fd
, struct MSVCRT__stat
* buf
)
1636 struct MSVCRT__stat64 buf64
;
1638 ret
= MSVCRT__fstat64(fd
, &buf64
);
1640 msvcrt_stat64_to_stat(&buf64
, buf
);
1644 /*********************************************************************
1645 * _fstat32 (MSVCR80.@)
1647 int CDECL
MSVCRT__fstat32(int fd
, struct MSVCRT__stat32
* buf
)
1650 struct MSVCRT__stat64 buf64
;
1652 ret
= MSVCRT__fstat64(fd
, &buf64
);
1654 msvcrt_stat64_to_stat32(&buf64
, buf
);
1658 /*********************************************************************
1659 * _fstat64i32 (MSVCR80.@)
1661 int CDECL
MSVCRT__fstat64i32(int fd
, struct MSVCRT__stat64i32
* buf
)
1664 struct MSVCRT__stat64 buf64
;
1666 ret
= MSVCRT__fstat64(fd
, &buf64
);
1668 msvcrt_stat64_to_stat64i32(&buf64
, buf
);
1672 /*********************************************************************
1673 * _futime64 (MSVCRT.@)
1675 int CDECL
_futime64(int fd
, struct MSVCRT___utimbuf64
*t
)
1677 HANDLE hand
= msvcrt_fdtoh(fd
);
1682 time_to_filetime( MSVCRT__time64(NULL
), &at
);
1687 time_to_filetime( t
->actime
, &at
);
1688 time_to_filetime( t
->modtime
, &wt
);
1691 if (!SetFileTime(hand
, NULL
, &at
, &wt
))
1693 msvcrt_set_errno(GetLastError());
1699 /*********************************************************************
1700 * _futime32 (MSVCRT.@)
1702 int CDECL
_futime32(int fd
, struct MSVCRT___utimbuf32
*t
)
1706 struct MSVCRT___utimbuf64 t64
;
1707 t64
.actime
= t
->actime
;
1708 t64
.modtime
= t
->modtime
;
1709 return _futime64( fd
, &t64
);
1712 return _futime64( fd
, NULL
);
1715 /*********************************************************************
1716 * _futime (MSVCRT.@)
1719 int CDECL
_futime(int fd
, struct MSVCRT___utimbuf64
*t
)
1721 return _futime64( fd
, t
);
1724 int CDECL
_futime(int fd
, struct MSVCRT___utimbuf32
*t
)
1726 return _futime32( fd
, t
);
1730 /*********************************************************************
1731 * _get_osfhandle (MSVCRT.@)
1733 MSVCRT_intptr_t CDECL
MSVCRT__get_osfhandle(int fd
)
1735 HANDLE hand
= msvcrt_fdtoh(fd
);
1736 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1738 return (MSVCRT_intptr_t
)hand
;
1741 /*********************************************************************
1742 * _mktemp_s (MSVCRT.@)
1744 int CDECL
MSVCRT__mktemp_s(char *pattern
, MSVCRT_size_t size
)
1748 if(!MSVCRT_CHECK_PMT(pattern
!=NULL
))
1749 return MSVCRT_EINVAL
;
1751 for(len
=0; len
<size
; len
++)
1754 if(!MSVCRT_CHECK_PMT(len
!=size
&& len
>=6)) {
1757 return MSVCRT_EINVAL
;
1760 for(xno
=1; xno
<=6; xno
++)
1761 if(!MSVCRT_CHECK_PMT(pattern
[len
-xno
] == 'X'))
1762 return MSVCRT_EINVAL
;
1764 id
= GetCurrentProcessId();
1765 for(xno
=1; xno
<6; xno
++) {
1766 pattern
[len
-xno
] = id
%10 + '0';
1770 for(pattern
[len
-6]='a'; pattern
[len
-6]<='z'; pattern
[len
-6]++) {
1771 if(GetFileAttributesA(pattern
) == INVALID_FILE_ATTRIBUTES
)
1776 *MSVCRT__errno() = MSVCRT_EEXIST
;
1777 return MSVCRT_EEXIST
;
1780 /*********************************************************************
1781 * _mktemp (MSVCRT.@)
1783 char * CDECL
MSVCRT__mktemp(char *pattern
)
1786 char *retVal
= pattern
;
1794 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1798 id
= GetCurrentProcessId();
1802 int tempNum
= id
/ 10;
1803 *pattern
-- = id
- (tempNum
* 10) + '0';
1809 *pattern
= letter
++;
1810 if (GetFileAttributesA(retVal
) == INVALID_FILE_ATTRIBUTES
)
1812 } while(letter
<= 'z');
1816 /*********************************************************************
1817 * _wmktemp_s (MSVCRT.@)
1819 int CDECL
MSVCRT__wmktemp_s(MSVCRT_wchar_t
*pattern
, MSVCRT_size_t size
)
1823 if(!MSVCRT_CHECK_PMT(pattern
!=NULL
))
1824 return MSVCRT_EINVAL
;
1826 for(len
=0; len
<size
; len
++)
1829 if(!MSVCRT_CHECK_PMT(len
!=size
&& len
>=6)) {
1832 return MSVCRT_EINVAL
;
1835 for(xno
=1; xno
<=6; xno
++)
1836 if(!MSVCRT_CHECK_PMT(pattern
[len
-xno
] == 'X'))
1837 return MSVCRT_EINVAL
;
1839 id
= GetCurrentProcessId();
1840 for(xno
=1; xno
<6; xno
++) {
1841 pattern
[len
-xno
] = id
%10 + '0';
1845 for(pattern
[len
-6]='a'; pattern
[len
-6]<='z'; pattern
[len
-6]++) {
1846 if(GetFileAttributesW(pattern
) == INVALID_FILE_ATTRIBUTES
)
1851 *MSVCRT__errno() = MSVCRT_EEXIST
;
1852 return MSVCRT_EEXIST
;
1855 /*********************************************************************
1856 * _wmktemp (MSVCRT.@)
1858 MSVCRT_wchar_t
* CDECL
MSVCRT__wmktemp(MSVCRT_wchar_t
*pattern
)
1861 MSVCRT_wchar_t
*retVal
= pattern
;
1863 MSVCRT_wchar_t letter
= 'a';
1869 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1873 id
= GetCurrentProcessId();
1877 int tempNum
= id
/ 10;
1878 *pattern
-- = id
- (tempNum
* 10) + '0';
1884 if (GetFileAttributesW(retVal
) == INVALID_FILE_ATTRIBUTES
)
1886 *pattern
= letter
++;
1887 } while(letter
!= '|');
1891 static unsigned split_oflags(unsigned oflags
)
1894 unsigned unsupp
; /* until we support everything */
1896 if (oflags
& MSVCRT__O_APPEND
) wxflags
|= WX_APPEND
;
1897 if (oflags
& MSVCRT__O_BINARY
) {/* Nothing to do */}
1898 else if (oflags
& MSVCRT__O_TEXT
) wxflags
|= WX_TEXT
;
1899 else if (oflags
& MSVCRT__O_WTEXT
) wxflags
|= WX_TEXT
;
1900 else if (oflags
& MSVCRT__O_U16TEXT
) wxflags
|= WX_TEXT
;
1901 else if (oflags
& MSVCRT__O_U8TEXT
) wxflags
|= WX_TEXT
;
1902 else if (*__p__fmode() & MSVCRT__O_BINARY
) {/* Nothing to do */}
1903 else wxflags
|= WX_TEXT
; /* default to TEXT*/
1904 if (oflags
& MSVCRT__O_NOINHERIT
) wxflags
|= WX_DONTINHERIT
;
1906 if ((unsupp
= oflags
& ~(
1907 MSVCRT__O_BINARY
|MSVCRT__O_TEXT
|MSVCRT__O_APPEND
|
1908 MSVCRT__O_TRUNC
|MSVCRT__O_EXCL
|MSVCRT__O_CREAT
|
1909 MSVCRT__O_RDWR
|MSVCRT__O_WRONLY
|MSVCRT__O_TEMPORARY
|
1910 MSVCRT__O_NOINHERIT
|
1911 MSVCRT__O_SEQUENTIAL
|MSVCRT__O_RANDOM
|MSVCRT__O_SHORT_LIVED
|
1912 MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
1914 ERR(":unsupported oflags 0x%04x\n",unsupp
);
1919 /*********************************************************************
1922 int CDECL
MSVCRT__pipe(int *pfds
, unsigned int psize
, int textmode
)
1925 SECURITY_ATTRIBUTES sa
;
1926 HANDLE readHandle
, writeHandle
;
1930 *MSVCRT__errno() = MSVCRT_EINVAL
;
1934 sa
.nLength
= sizeof(SECURITY_ATTRIBUTES
);
1935 sa
.bInheritHandle
= !(textmode
& MSVCRT__O_NOINHERIT
);
1936 sa
.lpSecurityDescriptor
= NULL
;
1937 if (CreatePipe(&readHandle
, &writeHandle
, &sa
, psize
))
1939 unsigned int wxflags
= split_oflags(textmode
);
1943 fd
= msvcrt_alloc_fd(readHandle
, wxflags
|WX_PIPE
);
1947 fd
= msvcrt_alloc_fd(writeHandle
, wxflags
|WX_PIPE
);
1955 MSVCRT__close(pfds
[0]);
1956 CloseHandle(writeHandle
);
1957 *MSVCRT__errno() = MSVCRT_EMFILE
;
1962 CloseHandle(readHandle
);
1963 CloseHandle(writeHandle
);
1964 *MSVCRT__errno() = MSVCRT_EMFILE
;
1969 msvcrt_set_errno(GetLastError());
1974 static int check_bom(HANDLE h
, int oflags
, BOOL seek
)
1976 char bom
[sizeof(utf8_bom
)];
1979 oflags
&= ~(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
);
1981 if (!ReadFile(h
, bom
, sizeof(utf8_bom
), &r
, NULL
))
1984 if (r
==sizeof(utf8_bom
) && !memcmp(bom
, utf8_bom
, sizeof(utf8_bom
))) {
1985 oflags
|= MSVCRT__O_U8TEXT
;
1986 }else if (r
>=sizeof(utf16_bom
) && !memcmp(bom
, utf16_bom
, sizeof(utf16_bom
))) {
1988 SetFilePointer(h
, 2, NULL
, FILE_BEGIN
);
1989 oflags
|= MSVCRT__O_U16TEXT
;
1991 SetFilePointer(h
, 0, NULL
, FILE_BEGIN
);
1997 /*********************************************************************
1998 * _wsopen_s (MSVCRT.@)
2000 int CDECL
MSVCRT__wsopen_s( int *fd
, const MSVCRT_wchar_t
* path
, int oflags
, int shflags
, int pmode
)
2002 DWORD access
= 0, creation
= 0, attrib
;
2003 SECURITY_ATTRIBUTES sa
;
2008 TRACE("fd*: %p :file (%s) oflags: 0x%04x shflags: 0x%04x pmode: 0x%04x\n",
2009 fd
, debugstr_w(path
), oflags
, shflags
, pmode
);
2011 if (!MSVCRT_CHECK_PMT( fd
!= NULL
)) return MSVCRT_EINVAL
;
2014 wxflag
= split_oflags(oflags
);
2015 switch (oflags
& (MSVCRT__O_RDONLY
| MSVCRT__O_WRONLY
| MSVCRT__O_RDWR
))
2017 case MSVCRT__O_RDONLY
: access
|= GENERIC_READ
; break;
2018 case MSVCRT__O_WRONLY
: access
|= GENERIC_WRITE
; break;
2019 case MSVCRT__O_RDWR
: access
|= GENERIC_WRITE
| GENERIC_READ
; break;
2022 if (oflags
& MSVCRT__O_CREAT
)
2024 if(pmode
& ~(MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
))
2025 FIXME(": pmode 0x%04x ignored\n", pmode
);
2027 WARN(": pmode 0x%04x ignored\n", pmode
);
2029 if (oflags
& MSVCRT__O_EXCL
)
2030 creation
= CREATE_NEW
;
2031 else if (oflags
& MSVCRT__O_TRUNC
)
2032 creation
= CREATE_ALWAYS
;
2034 creation
= OPEN_ALWAYS
;
2036 else /* no MSVCRT__O_CREAT */
2038 if (oflags
& MSVCRT__O_TRUNC
)
2039 creation
= TRUNCATE_EXISTING
;
2041 creation
= OPEN_EXISTING
;
2046 case MSVCRT__SH_DENYRW
:
2049 case MSVCRT__SH_DENYWR
:
2050 sharing
= FILE_SHARE_READ
;
2052 case MSVCRT__SH_DENYRD
:
2053 sharing
= FILE_SHARE_WRITE
;
2055 case MSVCRT__SH_DENYNO
:
2056 sharing
= FILE_SHARE_READ
| FILE_SHARE_WRITE
;
2059 ERR( "Unhandled shflags 0x%x\n", shflags
);
2060 return MSVCRT_EINVAL
;
2062 attrib
= FILE_ATTRIBUTE_NORMAL
;
2064 if (oflags
& MSVCRT__O_TEMPORARY
)
2066 attrib
|= FILE_FLAG_DELETE_ON_CLOSE
;
2068 sharing
|= FILE_SHARE_DELETE
;
2071 sa
.nLength
= sizeof( SECURITY_ATTRIBUTES
);
2072 sa
.lpSecurityDescriptor
= NULL
;
2073 sa
.bInheritHandle
= !(oflags
& MSVCRT__O_NOINHERIT
);
2075 if ((oflags
&(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
))
2076 && (creation
==OPEN_ALWAYS
|| creation
==OPEN_EXISTING
)
2077 && !(access
&GENERIC_READ
))
2079 hand
= CreateFileW(path
, GENERIC_READ
, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
2080 &sa
, OPEN_EXISTING
, FILE_ATTRIBUTE_NORMAL
, 0);
2081 if (hand
!= INVALID_HANDLE_VALUE
)
2083 oflags
= check_bom(hand
, oflags
, FALSE
);
2087 oflags
&= ~(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
);
2090 hand
= CreateFileW(path
, access
, sharing
, &sa
, creation
, attrib
, 0);
2091 if (hand
== INVALID_HANDLE_VALUE
) {
2092 WARN(":failed-last error (%d)\n",GetLastError());
2093 msvcrt_set_errno(GetLastError());
2094 return *MSVCRT__errno();
2097 if (oflags
& (MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
))
2099 if ((access
& GENERIC_WRITE
) && (creation
==CREATE_NEW
2100 || creation
==CREATE_ALWAYS
|| creation
==TRUNCATE_EXISTING
2101 || (creation
==OPEN_ALWAYS
&& GetLastError()==ERROR_ALREADY_EXISTS
)))
2103 if (oflags
& MSVCRT__O_U8TEXT
)
2105 DWORD written
= 0, tmp
;
2107 while(written
!=sizeof(utf8_bom
) && WriteFile(hand
, (char*)utf8_bom
+written
,
2108 sizeof(utf8_bom
)-written
, &tmp
, NULL
))
2110 if (written
!= sizeof(utf8_bom
)) {
2111 WARN("error writing BOM\n");
2113 msvcrt_set_errno(GetLastError());
2114 return *MSVCRT__errno();
2119 DWORD written
= 0, tmp
;
2121 while(written
!=sizeof(utf16_bom
) && WriteFile(hand
, (char*)utf16_bom
+written
,
2122 sizeof(utf16_bom
)-written
, &tmp
, NULL
))
2124 if (written
!= sizeof(utf16_bom
))
2126 WARN("error writing BOM\n");
2128 msvcrt_set_errno(GetLastError());
2129 return *MSVCRT__errno();
2133 else if (access
& GENERIC_READ
)
2134 oflags
= check_bom(hand
, oflags
, TRUE
);
2137 *fd
= msvcrt_alloc_fd(hand
, wxflag
);
2139 return *MSVCRT__errno();
2141 if (oflags
& MSVCRT__O_WTEXT
)
2142 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF16
|EF_UNK_UNICODE
;
2143 else if (oflags
& MSVCRT__O_U16TEXT
)
2144 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF16
;
2145 else if (oflags
& MSVCRT__O_U8TEXT
)
2146 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF8
;
2148 TRACE(":fd (%d) handle (%p)\n", *fd
, hand
);
2152 /*********************************************************************
2153 * _wsopen (MSVCRT.@)
2155 int CDECL
MSVCRT__wsopen( const MSVCRT_wchar_t
*path
, int oflags
, int shflags
, ... )
2160 if (oflags
& MSVCRT__O_CREAT
)
2164 __ms_va_start(ap
, shflags
);
2165 pmode
= va_arg(ap
, int);
2171 MSVCRT__wsopen_s(&fd
, path
, oflags
, shflags
, pmode
);
2175 /*********************************************************************
2176 * _sopen_s (MSVCRT.@)
2178 int CDECL
MSVCRT__sopen_s( int *fd
, const char *path
, int oflags
, int shflags
, int pmode
)
2180 MSVCRT_wchar_t
*pathW
;
2183 if(!MSVCRT_CHECK_PMT(path
&& (pathW
= msvcrt_wstrdupa(path
))))
2184 return MSVCRT_EINVAL
;
2186 ret
= MSVCRT__wsopen_s(fd
, pathW
, oflags
, shflags
, pmode
);
2191 /*********************************************************************
2194 int CDECL
MSVCRT__sopen( const char *path
, int oflags
, int shflags
, ... )
2199 if (oflags
& MSVCRT__O_CREAT
)
2203 __ms_va_start(ap
, shflags
);
2204 pmode
= va_arg(ap
, int);
2210 MSVCRT__sopen_s(&fd
, path
, oflags
, shflags
, pmode
);
2214 /*********************************************************************
2217 int CDECL
MSVCRT__open( const char *path
, int flags
, ... )
2221 if (flags
& MSVCRT__O_CREAT
)
2224 __ms_va_start(ap
, flags
);
2225 pmode
= va_arg(ap
, int);
2227 return MSVCRT__sopen( path
, flags
, MSVCRT__SH_DENYNO
, pmode
);
2230 return MSVCRT__sopen( path
, flags
, MSVCRT__SH_DENYNO
);
2233 /*********************************************************************
2236 int CDECL
MSVCRT__wopen(const MSVCRT_wchar_t
*path
,int flags
,...)
2240 if (flags
& MSVCRT__O_CREAT
)
2243 __ms_va_start(ap
, flags
);
2244 pmode
= va_arg(ap
, int);
2246 return MSVCRT__wsopen( path
, flags
, MSVCRT__SH_DENYNO
, pmode
);
2249 return MSVCRT__wsopen( path
, flags
, MSVCRT__SH_DENYNO
);
2252 /*********************************************************************
2255 int CDECL
MSVCRT__creat(const char *path
, int flags
)
2257 int usedFlags
= (flags
& MSVCRT__O_TEXT
)| MSVCRT__O_CREAT
| MSVCRT__O_WRONLY
| MSVCRT__O_TRUNC
;
2258 return MSVCRT__open(path
, usedFlags
);
2261 /*********************************************************************
2262 * _wcreat (MSVCRT.@)
2264 int CDECL
MSVCRT__wcreat(const MSVCRT_wchar_t
*path
, int flags
)
2266 int usedFlags
= (flags
& MSVCRT__O_TEXT
)| MSVCRT__O_CREAT
| MSVCRT__O_WRONLY
| MSVCRT__O_TRUNC
;
2267 return MSVCRT__wopen(path
, usedFlags
);
2270 /*********************************************************************
2271 * _open_osfhandle (MSVCRT.@)
2273 int CDECL
MSVCRT__open_osfhandle(MSVCRT_intptr_t handle
, int oflags
)
2278 /* MSVCRT__O_RDONLY (0) always matches, so set the read flag
2279 * MFC's CStdioFile clears O_RDONLY (0)! if it wants to write to the
2280 * file, so set the write flag. It also only sets MSVCRT__O_TEXT if it wants
2281 * text - it never sets MSVCRT__O_BINARY.
2283 /* don't let split_oflags() decide the mode if no mode is passed */
2284 if (!(oflags
& (MSVCRT__O_BINARY
| MSVCRT__O_TEXT
)))
2285 oflags
|= MSVCRT__O_BINARY
;
2287 flags
= GetFileType((HANDLE
)handle
);
2288 if (flags
==FILE_TYPE_UNKNOWN
&& GetLastError()!=NO_ERROR
)
2290 msvcrt_set_errno(GetLastError());
2294 if (flags
== FILE_TYPE_CHAR
)
2296 else if (flags
== FILE_TYPE_PIPE
)
2300 flags
|= split_oflags(oflags
);
2302 fd
= msvcrt_alloc_fd((HANDLE
)handle
, flags
);
2303 TRACE(":handle (%ld) fd (%d) flags 0x%08x\n", handle
, fd
, flags
);
2307 /*********************************************************************
2310 int CDECL
MSVCRT__rmtmp(void)
2312 int num_removed
= 0, i
;
2316 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
2317 file
= msvcrt_get_file(i
);
2319 if (file
->_tmpfname
)
2321 MSVCRT_fclose(file
);
2328 TRACE(":removed (%d) temp files\n",num_removed
);
2332 static inline int get_utf8_char_len(char ch
)
2334 if((ch
&0xf8) == 0xf0)
2336 else if((ch
&0xf0) == 0xe0)
2338 else if((ch
&0xe0) == 0xc0)
2343 /*********************************************************************
2344 * (internal) read_utf8
2346 static int read_utf8(int fd
, MSVCRT_wchar_t
*buf
, unsigned int count
)
2348 ioinfo
*fdinfo
= msvcrt_get_ioinfo(fd
);
2349 HANDLE hand
= fdinfo
->handle
;
2350 char min_buf
[4], *readbuf
, lookahead
;
2351 DWORD readbuf_size
, pos
=0, num_read
=1, char_len
, i
, j
;
2353 /* make the buffer big enough to hold at least one character */
2354 /* read bytes have to fit to output and lookahead buffers */
2356 readbuf_size
= count
< 4 ? 4 : count
;
2357 if(readbuf_size
<=4 || !(readbuf
= MSVCRT_malloc(readbuf_size
))) {
2362 if(fdinfo
->lookahead
[0] != '\n') {
2363 readbuf
[pos
++] = fdinfo
->lookahead
[0];
2364 fdinfo
->lookahead
[0] = '\n';
2366 if(fdinfo
->lookahead
[1] != '\n') {
2367 readbuf
[pos
++] = fdinfo
->lookahead
[1];
2368 fdinfo
->lookahead
[1] = '\n';
2370 if(fdinfo
->lookahead
[2] != '\n') {
2371 readbuf
[pos
++] = fdinfo
->lookahead
[2];
2372 fdinfo
->lookahead
[2] = '\n';
2377 /* NOTE: this case is broken in native dll, reading
2378 * sometimes fails when small buffer is passed
2381 if(!pos
&& !ReadFile(hand
, readbuf
, 1, &num_read
, NULL
)) {
2382 if (GetLastError() == ERROR_BROKEN_PIPE
) {
2383 fdinfo
->wxflag
|= WX_ATEOF
;
2386 msvcrt_set_errno(GetLastError());
2389 }else if(!num_read
) {
2390 fdinfo
->wxflag
|= WX_ATEOF
;
2396 char_len
= get_utf8_char_len(readbuf
[0]);
2398 if(ReadFile(hand
, readbuf
+pos
, char_len
-pos
, &num_read
, NULL
))
2402 if(readbuf
[0] == '\n')
2403 fdinfo
->wxflag
|= WX_READNL
;
2405 fdinfo
->wxflag
&= ~WX_READNL
;
2407 if(readbuf
[0] == 0x1a) {
2408 fdinfo
->wxflag
|= WX_ATEOF
;
2412 if(readbuf
[0] == '\r') {
2413 if(!ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || num_read
!=1)
2415 else if(lookahead
== '\n')
2419 if(fdinfo
->wxflag
& (WX_PIPE
| WX_NOSEEK
))
2420 fdinfo
->lookahead
[0] = lookahead
;
2422 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2427 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2428 msvcrt_set_errno(GetLastError());
2435 if(!ReadFile(hand
, readbuf
+pos
, readbuf_size
-pos
, &num_read
, NULL
)) {
2438 }else if(GetLastError() == ERROR_BROKEN_PIPE
) {
2439 fdinfo
->wxflag
|= WX_ATEOF
;
2440 if (readbuf
!= min_buf
) MSVCRT_free(readbuf
);
2443 msvcrt_set_errno(GetLastError());
2444 if (readbuf
!= min_buf
) MSVCRT_free(readbuf
);
2447 }else if(!pos
&& !num_read
) {
2448 fdinfo
->wxflag
|= WX_ATEOF
;
2449 if (readbuf
!= min_buf
) MSVCRT_free(readbuf
);
2454 if(readbuf
[0] == '\n')
2455 fdinfo
->wxflag
|= WX_READNL
;
2457 fdinfo
->wxflag
&= ~WX_READNL
;
2459 /* Find first byte of last character (may be incomplete) */
2460 for(i
=pos
-1; i
>0 && i
>pos
-4; i
--)
2461 if((readbuf
[i
]&0xc0) != 0x80)
2463 char_len
= get_utf8_char_len(readbuf
[i
]);
2464 if(char_len
+i
<= pos
)
2467 if(fdinfo
->wxflag
& (WX_PIPE
| WX_NOSEEK
)) {
2469 fdinfo
->lookahead
[0] = readbuf
[i
];
2471 fdinfo
->lookahead
[1] = readbuf
[i
+1];
2473 fdinfo
->lookahead
[2] = readbuf
[i
+2];
2475 SetFilePointer(fdinfo
->handle
, i
-pos
, NULL
, FILE_CURRENT
);
2479 for(i
=0, j
=0; i
<pos
; i
++) {
2480 if(readbuf
[i
] == 0x1a) {
2481 fdinfo
->wxflag
|= WX_ATEOF
;
2485 /* strip '\r' if followed by '\n' */
2486 if(readbuf
[i
] == '\r' && i
+1==pos
) {
2487 if(fdinfo
->lookahead
[0] != '\n' || !ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || !num_read
) {
2488 readbuf
[j
++] = '\r';
2489 }else if(lookahead
== '\n' && j
==0) {
2490 readbuf
[j
++] = '\n';
2492 if(lookahead
!= '\n')
2493 readbuf
[j
++] = '\r';
2495 if(fdinfo
->wxflag
& (WX_PIPE
| WX_NOSEEK
))
2496 fdinfo
->lookahead
[0] = lookahead
;
2498 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2500 }else if(readbuf
[i
]!='\r' || readbuf
[i
+1]!='\n') {
2501 readbuf
[j
++] = readbuf
[i
];
2506 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2507 msvcrt_set_errno(GetLastError());
2508 if (readbuf
!= min_buf
) MSVCRT_free(readbuf
);
2512 if (readbuf
!= min_buf
) MSVCRT_free(readbuf
);
2516 /*********************************************************************
2519 * When reading \r as last character in text mode, read() positions
2520 * the file pointer on the \r character while getc() goes on to
2523 static int read_i(int fd
, void *buf
, unsigned int count
)
2525 DWORD num_read
, utf16
;
2526 char *bufstart
= buf
;
2527 HANDLE hand
= msvcrt_fdtoh(fd
);
2528 ioinfo
*fdinfo
= msvcrt_get_ioinfo(fd
);
2533 if (fdinfo
->wxflag
& WX_ATEOF
) {
2534 TRACE("already at EOF, returning 0\n");
2537 /* Don't trace small reads, it gets *very* annoying */
2539 TRACE(":fd (%d) handle (%p) buf (%p) len (%d)\n",fd
,hand
,buf
,count
);
2540 if (hand
== INVALID_HANDLE_VALUE
)
2542 *MSVCRT__errno() = MSVCRT_EBADF
;
2546 utf16
= (fdinfo
->exflag
& EF_UTF16
) != 0;
2547 if (((fdinfo
->exflag
&EF_UTF8
) || utf16
) && count
&1)
2549 *MSVCRT__errno() = MSVCRT_EINVAL
;
2553 if((fdinfo
->wxflag
&WX_TEXT
) && (fdinfo
->exflag
&EF_UTF8
))
2554 return read_utf8(fd
, buf
, count
);
2556 if (fdinfo
->lookahead
[0]!='\n' || ReadFile(hand
, bufstart
, count
, &num_read
, NULL
))
2558 if (fdinfo
->lookahead
[0] != '\n')
2560 bufstart
[0] = fdinfo
->lookahead
[0];
2561 fdinfo
->lookahead
[0] = '\n';
2565 bufstart
[1] = fdinfo
->lookahead
[1];
2566 fdinfo
->lookahead
[1] = '\n';
2569 if(count
>1+utf16
&& ReadFile(hand
, bufstart
+1+utf16
, count
-1-utf16
, &num_read
, NULL
))
2570 num_read
+= 1+utf16
;
2575 if(utf16
&& (num_read
&1))
2577 /* msvcr90 uses uninitialized value from the buffer in this case */
2578 /* msvcrt ignores additional data */
2579 ERR("got odd number of bytes in UTF16 mode\n");
2583 if (count
!= 0 && num_read
== 0)
2585 fdinfo
->wxflag
|= WX_ATEOF
;
2586 TRACE(":EOF %s\n",debugstr_an(buf
,num_read
));
2588 else if (fdinfo
->wxflag
& WX_TEXT
)
2592 if (bufstart
[0]=='\n' && (!utf16
|| bufstart
[1]==0))
2593 fdinfo
->wxflag
|= WX_READNL
;
2595 fdinfo
->wxflag
&= ~WX_READNL
;
2597 for (i
=0, j
=0; i
<num_read
; i
+=1+utf16
)
2599 /* in text mode, a ctrl-z signals EOF */
2600 if (bufstart
[i
]==0x1a && (!utf16
|| bufstart
[i
+1]==0))
2602 fdinfo
->wxflag
|= WX_ATEOF
;
2603 TRACE(":^Z EOF %s\n",debugstr_an(buf
,num_read
));
2607 /* in text mode, strip \r if followed by \n */
2608 if (bufstart
[i
]=='\r' && (!utf16
|| bufstart
[i
+1]==0) && i
+1+utf16
==num_read
)
2613 lookahead
[1] = '\n';
2614 if (ReadFile(hand
, lookahead
, 1+utf16
, &len
, NULL
) && len
)
2616 if(lookahead
[0]=='\n' && (!utf16
|| lookahead
[1]==0) && j
==0)
2618 bufstart
[j
++] = '\n';
2619 if(utf16
) bufstart
[j
++] = 0;
2623 if(lookahead
[0]!='\n' || (utf16
&& lookahead
[1]!=0))
2625 bufstart
[j
++] = '\r';
2626 if(utf16
) bufstart
[j
++] = 0;
2629 if (fdinfo
->wxflag
& (WX_PIPE
| WX_NOSEEK
))
2631 if (lookahead
[0]=='\n' && (!utf16
|| !lookahead
[1]))
2633 bufstart
[j
++] = '\n';
2634 if (utf16
) bufstart
[j
++] = 0;
2638 fdinfo
->lookahead
[0] = lookahead
[0];
2639 fdinfo
->lookahead
[1] = lookahead
[1];
2643 SetFilePointer(fdinfo
->handle
, -1-utf16
, NULL
, FILE_CURRENT
);
2648 bufstart
[j
++] = '\r';
2649 if(utf16
) bufstart
[j
++] = 0;
2652 else if((bufstart
[i
]!='\r' || (utf16
&& bufstart
[i
+1]!=0))
2653 || (bufstart
[i
+1+utf16
]!='\n' || (utf16
&& bufstart
[i
+3]!=0)))
2655 bufstart
[j
++] = bufstart
[i
];
2656 if(utf16
) bufstart
[j
++] = bufstart
[i
+1];
2664 if (GetLastError() == ERROR_BROKEN_PIPE
)
2666 TRACE(":end-of-pipe\n");
2667 fdinfo
->wxflag
|= WX_ATEOF
;
2672 TRACE(":failed-last error (%d)\n",GetLastError());
2678 TRACE("(%u), %s\n",num_read
,debugstr_an(buf
, num_read
));
2682 /*********************************************************************
2685 int CDECL
MSVCRT__read(int fd
, void *buf
, unsigned int count
)
2688 num_read
= read_i(fd
, buf
, count
);
2692 /*********************************************************************
2693 * _setmode (MSVCRT.@)
2695 int CDECL
MSVCRT__setmode(int fd
,int mode
)
2697 int ret
= msvcrt_get_ioinfo(fd
)->wxflag
& WX_TEXT
? MSVCRT__O_TEXT
: MSVCRT__O_BINARY
;
2698 if(ret
==MSVCRT__O_TEXT
&& (msvcrt_get_ioinfo(fd
)->exflag
& (EF_UTF8
|EF_UTF16
)))
2699 ret
= MSVCRT__O_WTEXT
;
2701 if(mode
!=MSVCRT__O_TEXT
&& mode
!=MSVCRT__O_BINARY
&& mode
!=MSVCRT__O_WTEXT
2702 && mode
!=MSVCRT__O_U16TEXT
&& mode
!=MSVCRT__O_U8TEXT
) {
2703 *MSVCRT__errno() = MSVCRT_EINVAL
;
2707 if(mode
== MSVCRT__O_BINARY
) {
2708 msvcrt_get_ioinfo(fd
)->wxflag
&= ~WX_TEXT
;
2709 msvcrt_get_ioinfo(fd
)->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2713 msvcrt_get_ioinfo(fd
)->wxflag
|= WX_TEXT
;
2714 if(mode
== MSVCRT__O_TEXT
)
2715 msvcrt_get_ioinfo(fd
)->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2716 else if(mode
== MSVCRT__O_U8TEXT
)
2717 msvcrt_get_ioinfo(fd
)->exflag
= (msvcrt_get_ioinfo(fd
)->exflag
& ~EF_UTF16
) | EF_UTF8
;
2719 msvcrt_get_ioinfo(fd
)->exflag
= (msvcrt_get_ioinfo(fd
)->exflag
& ~EF_UTF8
) | EF_UTF16
;
2724 /*********************************************************************
2725 * _stat64 (MSVCRT.@)
2727 int CDECL
MSVCRT_stat64(const char* path
, struct MSVCRT__stat64
* buf
)
2730 WIN32_FILE_ATTRIBUTE_DATA hfi
;
2731 unsigned short mode
= ALL_S_IREAD
;
2734 TRACE(":file (%s) buf(%p)\n",path
,buf
);
2736 plen
= strlen(path
);
2737 while (plen
&& path
[plen
-1]==' ')
2740 if (plen
&& (plen
<2 || path
[plen
-2]!=':') &&
2741 (path
[plen
-1]==':' || path
[plen
-1]=='\\' || path
[plen
-1]=='/'))
2743 *MSVCRT__errno() = MSVCRT_ENOENT
;
2747 if (!GetFileAttributesExA(path
, GetFileExInfoStandard
, &hfi
))
2749 TRACE("failed (%d)\n",GetLastError());
2750 *MSVCRT__errno() = MSVCRT_ENOENT
;
2754 memset(buf
,0,sizeof(struct MSVCRT__stat64
));
2756 /* FIXME: rdev isn't drive num, despite what the docs say-what is it?
2757 Bon 011120: This FIXME seems incorrect
2758 Also a letter as first char isn't enough to be classified
2761 if (isalpha(*path
)&& (*(path
+1)==':'))
2762 buf
->st_dev
= buf
->st_rdev
= toupper(*path
) - 'A'; /* drive num */
2764 buf
->st_dev
= buf
->st_rdev
= MSVCRT__getdrive() - 1;
2766 /* Dir, or regular file? */
2767 if (hfi
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
2768 mode
|= (MSVCRT__S_IFDIR
| ALL_S_IEXEC
);
2771 mode
|= MSVCRT__S_IFREG
;
2773 if (plen
> 6 && path
[plen
-4] == '.') /* shortest exe: "\x.exe" */
2775 unsigned int ext
= tolower(path
[plen
-1]) | (tolower(path
[plen
-2]) << 8) |
2776 (tolower(path
[plen
-3]) << 16);
2777 if (ext
== EXE
|| ext
== BAT
|| ext
== CMD
|| ext
== COM
)
2778 mode
|= ALL_S_IEXEC
;
2782 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
2783 mode
|= ALL_S_IWRITE
;
2785 buf
->st_mode
= mode
;
2787 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
2788 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
2790 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
2791 buf
->st_mtime
= buf
->st_ctime
= dw
;
2792 TRACE("%d %d 0x%08x%08x %d %d %d\n", buf
->st_mode
,buf
->st_nlink
,
2793 (int)(buf
->st_size
>> 32),(int)buf
->st_size
,
2794 (int)buf
->st_atime
,(int)buf
->st_mtime
,(int)buf
->st_ctime
);
2798 /*********************************************************************
2799 * _stati64 (MSVCRT.@)
2801 int CDECL
MSVCRT_stati64(const char* path
, struct MSVCRT__stati64
* buf
)
2804 struct MSVCRT__stat64 buf64
;
2806 ret
= MSVCRT_stat64(path
, &buf64
);
2808 msvcrt_stat64_to_stati64(&buf64
, buf
);
2812 /*********************************************************************
2815 int CDECL
MSVCRT_stat(const char* path
, struct MSVCRT__stat
* buf
)
2818 struct MSVCRT__stat64 buf64
;
2820 ret
= MSVCRT_stat64( path
, &buf64
);
2822 msvcrt_stat64_to_stat(&buf64
, buf
);
2826 /*********************************************************************
2827 * _stat32 (MSVCR100.@)
2829 int CDECL
MSVCRT__stat32(const char *path
, struct MSVCRT__stat32
*buf
)
2832 struct MSVCRT__stat64 buf64
;
2834 ret
= MSVCRT_stat64(path
, &buf64
);
2836 msvcrt_stat64_to_stat32(&buf64
, buf
);
2840 /*********************************************************************
2841 * _stat32i64 (MSVCR100.@)
2843 int CDECL
MSVCRT__stat32i64(const char *path
, struct MSVCRT__stat32i64
*buf
)
2846 struct MSVCRT__stat64 buf64
;
2848 ret
= MSVCRT_stat64(path
, &buf64
);
2850 msvcrt_stat64_to_stat32i64(&buf64
, buf
);
2854 /*********************************************************************
2855 * _stat64i32 (MSVCR100.@)
2857 int CDECL
MSVCRT__stat64i32(const char* path
, struct MSVCRT__stat64i32
*buf
)
2860 struct MSVCRT__stat64 buf64
;
2862 ret
= MSVCRT_stat64(path
, &buf64
);
2864 msvcrt_stat64_to_stat64i32(&buf64
, buf
);
2868 /*********************************************************************
2869 * _wstat64 (MSVCRT.@)
2871 int CDECL
MSVCRT__wstat64(const MSVCRT_wchar_t
* path
, struct MSVCRT__stat64
* buf
)
2874 WIN32_FILE_ATTRIBUTE_DATA hfi
;
2875 unsigned short mode
= ALL_S_IREAD
;
2878 TRACE(":file (%s) buf(%p)\n",debugstr_w(path
),buf
);
2880 plen
= strlenW(path
);
2881 while (plen
&& path
[plen
-1]==' ')
2884 if(plen
&& (plen
<2 || path
[plen
-2]!=':') &&
2885 (path
[plen
-1]==':' || path
[plen
-1]=='\\' || path
[plen
-1]=='/'))
2887 *MSVCRT__errno() = MSVCRT_ENOENT
;
2891 if (!GetFileAttributesExW(path
, GetFileExInfoStandard
, &hfi
))
2893 TRACE("failed (%d)\n",GetLastError());
2894 *MSVCRT__errno() = MSVCRT_ENOENT
;
2898 memset(buf
,0,sizeof(struct MSVCRT__stat64
));
2900 /* FIXME: rdev isn't drive num, despite what the docs says-what is it? */
2901 if (MSVCRT_iswalpha(*path
))
2902 buf
->st_dev
= buf
->st_rdev
= toupperW(*path
- 'A'); /* drive num */
2904 buf
->st_dev
= buf
->st_rdev
= MSVCRT__getdrive() - 1;
2906 /* Dir, or regular file? */
2907 if (hfi
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
2908 mode
|= (MSVCRT__S_IFDIR
| ALL_S_IEXEC
);
2911 mode
|= MSVCRT__S_IFREG
;
2913 if (plen
> 6 && path
[plen
-4] == '.') /* shortest exe: "\x.exe" */
2915 ULONGLONG ext
= tolowerW(path
[plen
-1]) | (tolowerW(path
[plen
-2]) << 16) |
2916 ((ULONGLONG
)tolowerW(path
[plen
-3]) << 32);
2917 if (ext
== WCEXE
|| ext
== WCBAT
|| ext
== WCCMD
|| ext
== WCCOM
)
2918 mode
|= ALL_S_IEXEC
;
2922 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
2923 mode
|= ALL_S_IWRITE
;
2925 buf
->st_mode
= mode
;
2927 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
2928 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
2930 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
2931 buf
->st_mtime
= buf
->st_ctime
= dw
;
2932 TRACE("%d %d 0x%08x%08x %d %d %d\n", buf
->st_mode
,buf
->st_nlink
,
2933 (int)(buf
->st_size
>> 32),(int)buf
->st_size
,
2934 (int)buf
->st_atime
,(int)buf
->st_mtime
,(int)buf
->st_ctime
);
2938 /*********************************************************************
2939 * _wstati64 (MSVCRT.@)
2941 int CDECL
MSVCRT__wstati64(const MSVCRT_wchar_t
* path
, struct MSVCRT__stati64
* buf
)
2944 struct MSVCRT__stat64 buf64
;
2946 ret
= MSVCRT__wstat64(path
, &buf64
);
2948 msvcrt_stat64_to_stati64(&buf64
, buf
);
2952 /*********************************************************************
2955 int CDECL
MSVCRT__wstat(const MSVCRT_wchar_t
* path
, struct MSVCRT__stat
* buf
)
2958 struct MSVCRT__stat64 buf64
;
2960 ret
= MSVCRT__wstat64( path
, &buf64
);
2961 if (!ret
) msvcrt_stat64_to_stat(&buf64
, buf
);
2965 /*********************************************************************
2966 * _wstat32 (MSVCR100.@)
2968 int CDECL
MSVCRT__wstat32(const MSVCRT_wchar_t
*path
, struct MSVCRT__stat32
*buf
)
2971 struct MSVCRT__stat64 buf64
;
2973 ret
= MSVCRT__wstat64(path
, &buf64
);
2975 msvcrt_stat64_to_stat32(&buf64
, buf
);
2979 /*********************************************************************
2980 * _wstat32i64 (MSVCR100.@)
2982 int CDECL
MSVCRT__wstat32i64(const MSVCRT_wchar_t
*path
, struct MSVCRT__stat32i64
*buf
)
2985 struct MSVCRT__stat64 buf64
;
2987 ret
= MSVCRT__wstat64(path
, &buf64
);
2989 msvcrt_stat64_to_stat32i64(&buf64
, buf
);
2993 /*********************************************************************
2994 * _wstat64i32 (MSVCR100.@)
2996 int CDECL
MSVCRT__wstat64i32(const MSVCRT_wchar_t
*path
, struct MSVCRT__stat64i32
*buf
)
2999 struct MSVCRT__stat64 buf64
;
3001 ret
= MSVCRT__wstat64(path
, &buf64
);
3003 msvcrt_stat64_to_stat64i32(&buf64
, buf
);
3007 /*********************************************************************
3010 MSVCRT_long CDECL
MSVCRT__tell(int fd
)
3012 return MSVCRT__lseek(fd
, 0, SEEK_CUR
);
3015 /*********************************************************************
3016 * _telli64 (MSVCRT.@)
3018 __int64 CDECL
_telli64(int fd
)
3020 return MSVCRT__lseeki64(fd
, 0, SEEK_CUR
);
3023 /*********************************************************************
3024 * _tempnam (MSVCRT.@)
3026 char * CDECL
MSVCRT__tempnam(const char *dir
, const char *prefix
)
3028 char tmpbuf
[MAX_PATH
];
3029 const char *tmp_dir
= MSVCRT_getenv("TMP");
3031 if (tmp_dir
) dir
= tmp_dir
;
3033 TRACE("dir (%s) prefix (%s)\n",dir
,prefix
);
3034 if (GetTempFileNameA(dir
,prefix
,0,tmpbuf
))
3036 TRACE("got name (%s)\n",tmpbuf
);
3037 DeleteFileA(tmpbuf
);
3038 return MSVCRT__strdup(tmpbuf
);
3040 TRACE("failed (%d)\n",GetLastError());
3044 /*********************************************************************
3045 * _wtempnam (MSVCRT.@)
3047 MSVCRT_wchar_t
* CDECL
MSVCRT__wtempnam(const MSVCRT_wchar_t
*dir
, const MSVCRT_wchar_t
*prefix
)
3049 static const MSVCRT_wchar_t tmpW
[] = {'T','M','P',0};
3050 MSVCRT_wchar_t tmpbuf
[MAX_PATH
];
3051 const MSVCRT_wchar_t
*tmp_dir
= MSVCRT__wgetenv(tmpW
);
3053 if (tmp_dir
) dir
= tmp_dir
;
3055 TRACE("dir (%s) prefix (%s)\n",debugstr_w(dir
),debugstr_w(prefix
));
3056 if (GetTempFileNameW(dir
,prefix
,0,tmpbuf
))
3058 TRACE("got name (%s)\n",debugstr_w(tmpbuf
));
3059 DeleteFileW(tmpbuf
);
3060 return MSVCRT__wcsdup(tmpbuf
);
3062 TRACE("failed (%d)\n",GetLastError());
3066 /*********************************************************************
3069 int CDECL
MSVCRT__umask(int umask
)
3071 int old_umask
= MSVCRT_umask
;
3072 TRACE("(%d)\n",umask
);
3073 MSVCRT_umask
= umask
;
3077 /*********************************************************************
3078 * _utime64 (MSVCRT.@)
3080 int CDECL
_utime64(const char* path
, struct MSVCRT___utimbuf64
*t
)
3082 int fd
= MSVCRT__open(path
, MSVCRT__O_WRONLY
| MSVCRT__O_BINARY
);
3086 int retVal
= _futime64(fd
, t
);
3093 /*********************************************************************
3094 * _utime32 (MSVCRT.@)
3096 int CDECL
_utime32(const char* path
, struct MSVCRT___utimbuf32
*t
)
3100 struct MSVCRT___utimbuf64 t64
;
3101 t64
.actime
= t
->actime
;
3102 t64
.modtime
= t
->modtime
;
3103 return _utime64( path
, &t64
);
3106 return _utime64( path
, NULL
);
3109 /*********************************************************************
3113 int CDECL
_utime(const char* path
, struct MSVCRT___utimbuf64
*t
)
3115 return _utime64( path
, t
);
3118 int CDECL
_utime(const char* path
, struct MSVCRT___utimbuf32
*t
)
3120 return _utime32( path
, t
);
3124 /*********************************************************************
3125 * _wutime64 (MSVCRT.@)
3127 int CDECL
_wutime64(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf64
*t
)
3129 int fd
= MSVCRT__wopen(path
, MSVCRT__O_WRONLY
| MSVCRT__O_BINARY
);
3133 int retVal
= _futime64(fd
, t
);
3140 /*********************************************************************
3141 * _wutime32 (MSVCRT.@)
3143 int CDECL
_wutime32(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf32
*t
)
3147 struct MSVCRT___utimbuf64 t64
;
3148 t64
.actime
= t
->actime
;
3149 t64
.modtime
= t
->modtime
;
3150 return _wutime64( path
, &t64
);
3153 return _wutime64( path
, NULL
);
3156 /*********************************************************************
3157 * _wutime (MSVCRT.@)
3160 int CDECL
_wutime(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf64
*t
)
3162 return _wutime64( path
, t
);
3165 int CDECL
_wutime(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf32
*t
)
3167 return _wutime32( path
, t
);
3171 /*********************************************************************
3174 int CDECL
MSVCRT__write(int fd
, const void* buf
, unsigned int count
)
3177 ioinfo
*info
= msvcrt_get_ioinfo(fd
);
3178 HANDLE hand
= info
->handle
;
3180 /* Don't trace small writes, it gets *very* annoying */
3183 TRACE(":fd (%d) handle (%d) buf (%p) len (%d)\n",fd
,hand
,buf
,count
);
3185 if (hand
== INVALID_HANDLE_VALUE
)
3187 *MSVCRT__errno() = MSVCRT_EBADF
;
3191 if (((info
->exflag
&EF_UTF8
) || (info
->exflag
&EF_UTF16
)) && count
&1)
3193 *MSVCRT__errno() = MSVCRT_EINVAL
;
3197 /* If appending, go to EOF */
3198 if (info
->wxflag
& WX_APPEND
)
3199 MSVCRT__lseek(fd
, 0, FILE_END
);
3201 if (!(info
->wxflag
& WX_TEXT
))
3203 if (WriteFile(hand
, buf
, count
, &num_written
, NULL
)
3204 && (num_written
== count
))
3206 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d)\n", fd
,
3207 hand
, GetLastError());
3208 *MSVCRT__errno() = MSVCRT_ENOSPC
;
3212 unsigned int i
, j
, nr_lf
, size
;
3215 const char *s
= buf
, *buf_start
= buf
;
3217 if (!(info
->exflag
& (EF_UTF8
|EF_UTF16
)))
3219 /* find number of \n */
3220 for (nr_lf
=0, i
=0; i
<count
; i
++)
3226 if ((q
= p
= MSVCRT_malloc(size
)))
3228 for (s
= buf
, i
= 0, j
= 0; i
< count
; i
++)
3237 FIXME("Malloc failed\n");
3249 else if (info
->exflag
& EF_UTF16
)
3251 for (nr_lf
=0, i
=0; i
<count
; i
+=2)
3252 if (s
[i
]=='\n' && s
[i
+1]==0)
3257 if ((q
= p
= MSVCRT_malloc(size
)))
3259 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
3261 if (s
[i
]=='\n' && s
[i
+1]==0)
3272 FIXME("Malloc failed\n");
3288 for(nr_lf
=0, i
=0; i
<count
; i
+=2)
3289 if (s
[i
]=='\n' && s
[i
+1]==0)
3292 conv_len
= WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)buf
, count
/2, NULL
, 0, NULL
, NULL
);
3294 msvcrt_set_errno(GetLastError());
3299 size
= conv_len
+nr_lf
;
3300 if((p
= MSVCRT_malloc(count
+nr_lf
*2+size
)))
3302 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
3304 if (s
[i
]=='\n' && s
[i
+1]==0)
3312 q
= p
+count
+nr_lf
*2;
3313 WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)p
, count
/2+nr_lf
,
3314 p
+count
+nr_lf
*2, conv_len
+nr_lf
, NULL
, NULL
);
3318 FIXME("Malloc failed\n");
3325 if (!WriteFile(hand
, q
, size
, &num_written
, NULL
))
3329 if (num_written
!= size
)
3331 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d), num_written %d\n",
3332 fd
, hand
, GetLastError(), num_written
);
3333 *MSVCRT__errno() = MSVCRT_ENOSPC
;
3334 return s
- buf_start
;
3342 /*********************************************************************
3345 int CDECL
MSVCRT__putw(int val
, MSVCRT_FILE
* file
)
3349 MSVCRT__lock_file(file
);
3350 len
= MSVCRT__write(file
->_file
, &val
, sizeof(val
));
3351 if (len
== sizeof(val
)) {
3352 MSVCRT__unlock_file(file
);
3356 file
->_flag
|= MSVCRT__IOERR
;
3357 MSVCRT__unlock_file(file
);
3361 /*********************************************************************
3364 int CDECL
MSVCRT_fclose(MSVCRT_FILE
* file
)
3368 MSVCRT__lock_file(file
);
3370 MSVCRT_free(file
->_tmpfname
);
3371 file
->_tmpfname
= NULL
;
3372 /* flush stdio buffers */
3373 if(file
->_flag
& MSVCRT__IOWRT
)
3374 MSVCRT_fflush(file
);
3375 if(file
->_flag
& MSVCRT__IOMYBUF
)
3376 MSVCRT_free(file
->_base
);
3378 r
=MSVCRT__close(file
->_file
);
3381 MSVCRT__unlock_file(file
);
3383 return ((r
== -1) || (flag
& MSVCRT__IOERR
) ? MSVCRT_EOF
: 0);
3386 /*********************************************************************
3389 int CDECL
MSVCRT_feof(MSVCRT_FILE
* file
)
3391 return file
->_flag
& MSVCRT__IOEOF
;
3394 /*********************************************************************
3397 int CDECL
MSVCRT_ferror(MSVCRT_FILE
* file
)
3399 return file
->_flag
& MSVCRT__IOERR
;
3402 /*********************************************************************
3403 * _filbuf (MSVCRT.@)
3405 int CDECL
MSVCRT__filbuf(MSVCRT_FILE
* file
)
3408 MSVCRT__lock_file(file
);
3410 if(file
->_flag
& MSVCRT__IOSTRG
) {
3411 MSVCRT__unlock_file(file
);
3415 /* Allocate buffer if needed */
3416 if(file
->_bufsiz
== 0 && !(file
->_flag
& MSVCRT__IONBF
))
3417 msvcrt_alloc_buffer(file
);
3419 if(!(file
->_flag
& MSVCRT__IOREAD
)) {
3420 if(file
->_flag
& MSVCRT__IORW
)
3421 file
->_flag
|= MSVCRT__IOREAD
;
3423 MSVCRT__unlock_file(file
);
3428 if(file
->_flag
& MSVCRT__IONBF
) {
3430 if ((r
= read_i(file
->_file
,&c
,1)) != 1) {
3431 file
->_flag
|= (r
== 0) ? MSVCRT__IOEOF
: MSVCRT__IOERR
;
3432 MSVCRT__unlock_file(file
);
3436 MSVCRT__unlock_file(file
);
3439 file
->_cnt
= read_i(file
->_file
, file
->_base
, file
->_bufsiz
);
3441 file
->_flag
|= (file
->_cnt
== 0) ? MSVCRT__IOEOF
: MSVCRT__IOERR
;
3443 MSVCRT__unlock_file(file
);
3448 file
->_ptr
= file
->_base
+1;
3449 c
= *(unsigned char *)file
->_base
;
3450 MSVCRT__unlock_file(file
);
3455 /*********************************************************************
3458 int CDECL
MSVCRT_fgetc(MSVCRT_FILE
* file
)
3463 MSVCRT__lock_file(file
);
3466 i
= (unsigned char *)file
->_ptr
++;
3469 j
= MSVCRT__filbuf(file
);
3471 MSVCRT__unlock_file(file
);
3475 /*********************************************************************
3476 * _fgetchar (MSVCRT.@)
3478 int CDECL
MSVCRT__fgetchar(void)
3480 return MSVCRT_fgetc(MSVCRT_stdin
);
3483 /*********************************************************************
3486 char * CDECL
MSVCRT_fgets(char *s
, int size
, MSVCRT_FILE
* file
)
3488 int cc
= MSVCRT_EOF
;
3489 char * buf_start
= s
;
3491 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
3492 file
,file
->_file
,s
,size
);
3494 MSVCRT__lock_file(file
);
3496 while ((size
>1) && (cc
= MSVCRT_fgetc(file
)) != MSVCRT_EOF
&& cc
!= '\n')
3501 if ((cc
== MSVCRT_EOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
3503 TRACE(":nothing read\n");
3504 MSVCRT__unlock_file(file
);
3507 if ((cc
!= MSVCRT_EOF
) && (size
> 1))
3510 TRACE(":got %s\n", debugstr_a(buf_start
));
3511 MSVCRT__unlock_file(file
);
3515 /*********************************************************************
3518 MSVCRT_wint_t CDECL
MSVCRT_fgetwc(MSVCRT_FILE
* file
)
3523 MSVCRT__lock_file(file
);
3525 if((msvcrt_get_ioinfo(file
->_file
)->exflag
& (EF_UTF8
| EF_UTF16
))
3526 || !(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
)) {
3529 for(p
=(char*)&ret
; (MSVCRT_wint_t
*)p
<&ret
+1; p
++) {
3530 ch
= MSVCRT_fgetc(file
);
3531 if(ch
== MSVCRT_EOF
) {
3538 char mbs
[MSVCRT_MB_LEN_MAX
];
3541 ch
= MSVCRT_fgetc(file
);
3542 if(ch
!= MSVCRT_EOF
) {
3544 if(MSVCRT_isleadbyte((unsigned char)mbs
[0])) {
3545 ch
= MSVCRT_fgetc(file
);
3546 if(ch
!= MSVCRT_EOF
) {
3555 if(!len
|| MSVCRT_mbtowc(&ret
, mbs
, len
)==-1)
3559 MSVCRT__unlock_file(file
);
3563 /*********************************************************************
3566 int CDECL
MSVCRT__getw(MSVCRT_FILE
* file
)
3573 MSVCRT__lock_file(file
);
3574 for (j
=0; j
<sizeof(int); j
++) {
3575 k
= MSVCRT_fgetc(file
);
3576 if (k
== MSVCRT_EOF
) {
3577 file
->_flag
|= MSVCRT__IOEOF
;
3578 MSVCRT__unlock_file(file
);
3584 MSVCRT__unlock_file(file
);
3588 /*********************************************************************
3591 MSVCRT_wint_t CDECL
MSVCRT_getwc(MSVCRT_FILE
* file
)
3593 return MSVCRT_fgetwc(file
);
3596 /*********************************************************************
3597 * _fgetwchar (MSVCRT.@)
3599 MSVCRT_wint_t CDECL
MSVCRT__fgetwchar(void)
3601 return MSVCRT_fgetwc(MSVCRT_stdin
);
3604 /*********************************************************************
3605 * getwchar (MSVCRT.@)
3607 MSVCRT_wint_t CDECL
MSVCRT_getwchar(void)
3609 return MSVCRT__fgetwchar();
3612 /*********************************************************************
3615 MSVCRT_wchar_t
* CDECL
MSVCRT_fgetws(MSVCRT_wchar_t
*s
, int size
, MSVCRT_FILE
* file
)
3617 MSVCRT_wint_t cc
= MSVCRT_WEOF
;
3618 MSVCRT_wchar_t
* buf_start
= s
;
3620 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
3621 file
,file
->_file
,s
,size
);
3623 MSVCRT__lock_file(file
);
3625 while ((size
>1) && (cc
= MSVCRT_fgetwc(file
)) != MSVCRT_WEOF
&& cc
!= '\n')
3630 if ((cc
== MSVCRT_WEOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
3632 TRACE(":nothing read\n");
3633 MSVCRT__unlock_file(file
);
3636 if ((cc
!= MSVCRT_WEOF
) && (size
> 1))
3639 TRACE(":got %s\n", debugstr_w(buf_start
));
3640 MSVCRT__unlock_file(file
);
3644 /*********************************************************************
3645 * _flsbuf (MSVCRT.@)
3647 int CDECL
MSVCRT__flsbuf(int c
, MSVCRT_FILE
* file
)
3649 /* Flush output buffer */
3650 if(file
->_bufsiz
== 0 && !(file
->_flag
& MSVCRT__IONBF
)) {
3651 msvcrt_alloc_buffer(file
);
3653 if(!(file
->_flag
& MSVCRT__IOWRT
)) {
3654 if(file
->_flag
& MSVCRT__IORW
)
3655 file
->_flag
|= MSVCRT__IOWRT
;
3663 res
= msvcrt_flush_buffer(file
);
3669 return res
? res
: c
&0xff;
3673 /* set _cnt to 0 for unbuffered FILEs */
3675 len
= MSVCRT__write(file
->_file
, &cc
, 1);
3678 file
->_flag
|= MSVCRT__IOERR
;
3683 /*********************************************************************
3686 MSVCRT_size_t CDECL
MSVCRT_fwrite(const void *ptr
, MSVCRT_size_t size
, MSVCRT_size_t nmemb
, MSVCRT_FILE
* file
)
3688 MSVCRT_size_t wrcnt
=size
* nmemb
;
3693 MSVCRT__lock_file(file
);
3696 if(file
->_cnt
< 0) {
3697 WARN("negative file->_cnt value in %p\n", file
);
3698 file
->_flag
|= MSVCRT__IOERR
;
3700 } else if(file
->_cnt
) {
3701 int pcnt
=(file
->_cnt
>wrcnt
)? wrcnt
: file
->_cnt
;
3702 memcpy(file
->_ptr
, ptr
, pcnt
);
3707 ptr
= (const char*)ptr
+ pcnt
;
3708 } else if(!file
->_bufsiz
&& (file
->_flag
& MSVCRT__IONBF
)) {
3709 if(!(file
->_flag
& MSVCRT__IOWRT
)) {
3710 if(file
->_flag
& MSVCRT__IORW
)
3711 file
->_flag
|= MSVCRT__IOWRT
;
3716 if(MSVCRT__write(file
->_file
, ptr
, wrcnt
) <= 0) {
3717 file
->_flag
|= MSVCRT__IOERR
;
3723 if(MSVCRT__flsbuf(*(const char*)ptr
, file
) == MSVCRT_EOF
)
3727 ptr
= (const char*)ptr
+ 1;
3731 MSVCRT__unlock_file(file
);
3732 return written
/ size
;
3735 /*********************************************************************
3738 MSVCRT_wint_t CDECL
MSVCRT_fputwc(MSVCRT_wint_t wc
, MSVCRT_FILE
* file
)
3740 MSVCRT_wchar_t mwc
=wc
;
3744 MSVCRT__lock_file(file
);
3745 fdinfo
= msvcrt_get_ioinfo(file
->_file
);
3747 if((fdinfo
->wxflag
&WX_TEXT
) && !(fdinfo
->exflag
&(EF_UTF8
|EF_UTF16
))) {
3748 char buf
[MSVCRT_MB_LEN_MAX
];
3751 char_len
= MSVCRT_wctomb(buf
, mwc
);
3752 if(char_len
!=-1 && MSVCRT_fwrite(buf
, char_len
, 1, file
)==1)
3756 }else if(MSVCRT_fwrite(&mwc
, sizeof(mwc
), 1, file
) == 1) {
3762 MSVCRT__unlock_file(file
);
3766 /*********************************************************************
3767 * _fputwchar (MSVCRT.@)
3769 MSVCRT_wint_t CDECL
MSVCRT__fputwchar(MSVCRT_wint_t wc
)
3771 return MSVCRT_fputwc(wc
, MSVCRT_stdout
);
3774 /*********************************************************************
3775 * _wfsopen (MSVCRT.@)
3777 MSVCRT_FILE
* CDECL
MSVCRT__wfsopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, int share
)
3780 int open_flags
, stream_flags
, fd
;
3782 TRACE("(%s,%s)\n", debugstr_w(path
), debugstr_w(mode
));
3784 /* map mode string to open() flags. "man fopen" for possibilities. */
3785 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1)
3789 fd
= MSVCRT__wsopen(path
, open_flags
, share
, MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
);
3792 else if ((file
= msvcrt_alloc_fp()) && msvcrt_init_fp(file
, fd
, stream_flags
)
3794 TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
3801 TRACE(":got (%p)\n",file
);
3802 if (fd
>= 0 && !file
)
3808 /*********************************************************************
3809 * _fsopen (MSVCRT.@)
3811 MSVCRT_FILE
* CDECL
MSVCRT__fsopen(const char *path
, const char *mode
, int share
)
3814 MSVCRT_wchar_t
*pathW
= NULL
, *modeW
= NULL
;
3816 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) {
3817 MSVCRT__invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3818 *MSVCRT__errno() = MSVCRT_EINVAL
;
3821 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
3824 MSVCRT__invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3825 *MSVCRT__errno() = MSVCRT_EINVAL
;
3829 ret
= MSVCRT__wfsopen(pathW
, modeW
, share
);
3836 /*********************************************************************
3839 MSVCRT_FILE
* CDECL
MSVCRT_fopen(const char *path
, const char *mode
)
3841 return MSVCRT__fsopen( path
, mode
, MSVCRT__SH_DENYNO
);
3844 /*********************************************************************
3845 * fopen_s (MSVCRT.@)
3847 int CDECL
MSVCRT_fopen_s(MSVCRT_FILE
** pFile
,
3848 const char *filename
, const char *mode
)
3850 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3851 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return MSVCRT_EINVAL
;
3852 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3854 *pFile
= MSVCRT_fopen(filename
, mode
);
3857 return *MSVCRT__errno();
3861 /*********************************************************************
3862 * _wfopen (MSVCRT.@)
3864 MSVCRT_FILE
* CDECL
MSVCRT__wfopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
)
3866 return MSVCRT__wfsopen( path
, mode
, MSVCRT__SH_DENYNO
);
3869 /*********************************************************************
3870 * _wfopen_s (MSVCRT.@)
3872 int CDECL
MSVCRT__wfopen_s(MSVCRT_FILE
** pFile
, const MSVCRT_wchar_t
*filename
,
3873 const MSVCRT_wchar_t
*mode
)
3875 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3876 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return MSVCRT_EINVAL
;
3877 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3879 *pFile
= MSVCRT__wfopen(filename
, mode
);
3882 return *MSVCRT__errno();
3886 /*********************************************************************
3889 int CDECL
MSVCRT_fputc(int c
, MSVCRT_FILE
* file
)
3893 MSVCRT__lock_file(file
);
3899 res
= msvcrt_flush_buffer(file
);
3900 MSVCRT__unlock_file(file
);
3901 return res
? res
: c
;
3904 MSVCRT__unlock_file(file
);
3908 res
= MSVCRT__flsbuf(c
, file
);
3909 MSVCRT__unlock_file(file
);
3914 /*********************************************************************
3915 * _fputchar (MSVCRT.@)
3917 int CDECL
MSVCRT__fputchar(int c
)
3919 return MSVCRT_fputc(c
, MSVCRT_stdout
);
3922 /*********************************************************************
3925 MSVCRT_size_t CDECL
MSVCRT_fread(void *ptr
, MSVCRT_size_t size
, MSVCRT_size_t nmemb
, MSVCRT_FILE
* file
)
3927 MSVCRT_size_t rcnt
=size
* nmemb
;
3928 MSVCRT_size_t read
=0;
3934 MSVCRT__lock_file(file
);
3936 /* first buffered data */
3938 int pcnt
= (rcnt
>file
->_cnt
)? file
->_cnt
:rcnt
;
3939 memcpy(ptr
, file
->_ptr
, pcnt
);
3944 ptr
= (char*)ptr
+ pcnt
;
3945 } else if(!(file
->_flag
& MSVCRT__IOREAD
)) {
3946 if(file
->_flag
& MSVCRT__IORW
) {
3947 file
->_flag
|= MSVCRT__IOREAD
;
3949 MSVCRT__unlock_file(file
);
3956 if (!file
->_cnt
&& rcnt
<MSVCRT_BUFSIZ
&& !(file
->_flag
& MSVCRT__IONBF
)
3957 && (file
->_bufsiz
!= 0 || msvcrt_alloc_buffer(file
))) {
3958 file
->_cnt
= MSVCRT__read(file
->_file
, file
->_base
, file
->_bufsiz
);
3959 file
->_ptr
= file
->_base
;
3960 i
= (file
->_cnt
<rcnt
) ? file
->_cnt
: rcnt
;
3961 /* If the buffer fill reaches eof but fread wouldn't, clear eof. */
3962 if (i
> 0 && i
< file
->_cnt
) {
3963 msvcrt_get_ioinfo(file
->_file
)->wxflag
&= ~WX_ATEOF
;
3964 file
->_flag
&= ~MSVCRT__IOEOF
;
3967 memcpy(ptr
, file
->_ptr
, i
);
3971 } else if (rcnt
> UINT_MAX
) {
3972 i
= MSVCRT__read(file
->_file
, ptr
, UINT_MAX
);
3973 } else if (rcnt
< MSVCRT_BUFSIZ
) {
3974 i
= MSVCRT__read(file
->_file
, ptr
, rcnt
);
3976 i
= MSVCRT__read(file
->_file
, ptr
, rcnt
- MSVCRT_BUFSIZ
/2);
3980 ptr
= (char *)ptr
+i
;
3981 /* expose feof condition in the flags
3982 * MFC tests file->_flag for feof, and doesn't call feof())
3984 if (msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_ATEOF
)
3985 file
->_flag
|= MSVCRT__IOEOF
;
3988 file
->_flag
|= MSVCRT__IOERR
;
3995 MSVCRT__unlock_file(file
);
4000 /*********************************************************************
4001 * fread_s (MSVCR80.@)
4003 MSVCRT_size_t CDECL
MSVCRT_fread_s(void *buf
, MSVCRT_size_t buf_size
, MSVCRT_size_t elem_size
,
4004 MSVCRT_size_t count
, MSVCRT_FILE
*stream
)
4006 size_t bytes_left
, buf_pos
;
4008 TRACE("(%p %lu %lu %lu %p\n", buf
, buf_size
, elem_size
, count
, stream
);
4010 if(!MSVCRT_CHECK_PMT(stream
!= NULL
)) {
4012 memset(buf
, 0, buf_size
);
4015 if(!elem_size
|| !count
) return 0;
4016 if(!MSVCRT_CHECK_PMT(buf
!= NULL
)) return 0;
4017 if(!MSVCRT_CHECK_PMT(MSVCRT_SIZE_MAX
/count
>= elem_size
)) return 0;
4019 bytes_left
= elem_size
*count
;
4022 if(stream
->_cnt
> 0) {
4023 size_t size
= bytes_left
<stream
->_cnt
? bytes_left
: stream
->_cnt
;
4025 if(!MSVCRT_CHECK_PMT_ERR(size
<= buf_size
-buf_pos
, MSVCRT_ERANGE
)) {
4026 memset(buf
, 0, buf_size
);
4030 MSVCRT_fread((char*)buf
+buf_pos
, 1, size
, stream
);
4034 int c
= MSVCRT__filbuf(stream
);
4039 if(!MSVCRT_CHECK_PMT_ERR(buf_size
-buf_pos
> 0, MSVCRT_ERANGE
)) {
4040 memset(buf
, 0, buf_size
);
4044 ((char*)buf
)[buf_pos
++] = c
;
4049 return buf_pos
/elem_size
;
4052 /*********************************************************************
4053 * _wfreopen (MSVCRT.@)
4056 MSVCRT_FILE
* CDECL
MSVCRT__wfreopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, MSVCRT_FILE
* file
)
4058 int open_flags
, stream_flags
, fd
;
4060 TRACE(":path (%s) mode (%s) file (%p) fd (%d)\n", debugstr_w(path
), debugstr_w(mode
), file
, file
? file
->_file
: -1);
4063 if (!file
|| ((fd
= file
->_file
) < 0) || fd
> MSVCRT_fdend
)
4067 MSVCRT_fclose(file
);
4068 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1)
4070 else if((fd
= MSVCRT__wopen(path
, open_flags
, MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
)) < 0)
4072 else if(msvcrt_init_fp(file
, fd
, stream_flags
) == -1)
4082 /*********************************************************************
4083 * _wfreopen_s (MSVCRT.@)
4085 int CDECL
MSVCRT__wfreopen_s(MSVCRT_FILE
** pFile
,
4086 const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, MSVCRT_FILE
* file
)
4088 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
4089 if (!MSVCRT_CHECK_PMT(path
!= NULL
)) return MSVCRT_EINVAL
;
4090 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
4091 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
4093 *pFile
= MSVCRT__wfreopen(path
, mode
, file
);
4096 return *MSVCRT__errno();
4100 /*********************************************************************
4101 * freopen (MSVCRT.@)
4104 MSVCRT_FILE
* CDECL
MSVCRT_freopen(const char *path
, const char *mode
, MSVCRT_FILE
* file
)
4107 MSVCRT_wchar_t
*pathW
= NULL
, *modeW
= NULL
;
4109 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) return NULL
;
4110 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
4116 ret
= MSVCRT__wfreopen(pathW
, modeW
, file
);
4123 /*********************************************************************
4124 * freopen_s (MSVCRT.@)
4126 int CDECL
MSVCRT_freopen_s(MSVCRT_FILE
** pFile
,
4127 const char *path
, const char *mode
, MSVCRT_FILE
* file
)
4129 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
4130 if (!MSVCRT_CHECK_PMT(path
!= NULL
)) return MSVCRT_EINVAL
;
4131 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
4132 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
4134 *pFile
= MSVCRT_freopen(path
, mode
, file
);
4137 return *MSVCRT__errno();
4141 /*********************************************************************
4142 * fsetpos (MSVCRT.@)
4144 int CDECL
MSVCRT_fsetpos(MSVCRT_FILE
* file
, MSVCRT_fpos_t
*pos
)
4148 MSVCRT__lock_file(file
);
4149 /* Note that all this has been lifted 'as is' from fseek */
4150 if(file
->_flag
& MSVCRT__IOWRT
)
4151 msvcrt_flush_buffer(file
);
4153 /* Discard buffered input */
4155 file
->_ptr
= file
->_base
;
4157 /* Reset direction of i/o */
4158 if(file
->_flag
& MSVCRT__IORW
) {
4159 file
->_flag
&= ~(MSVCRT__IOREAD
|MSVCRT__IOWRT
);
4162 ret
= (MSVCRT__lseeki64(file
->_file
,*pos
,SEEK_SET
) == -1) ? -1 : 0;
4163 MSVCRT__unlock_file(file
);
4167 /*********************************************************************
4168 * _ftelli64 (MSVCRT.@)
4170 __int64 CDECL
MSVCRT__ftelli64(MSVCRT_FILE
* file
)
4174 MSVCRT__lock_file(file
);
4175 pos
= _telli64(file
->_file
);
4177 MSVCRT__unlock_file(file
);
4181 if(file
->_flag
& MSVCRT__IOWRT
) {
4182 pos
+= file
->_ptr
- file
->_base
;
4184 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
4187 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
4191 } else if(!file
->_cnt
) { /* nothing to do */
4192 } else if(MSVCRT__lseeki64(file
->_file
, 0, SEEK_END
)==pos
) {
4196 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
4197 for(i
=0; i
<file
->_cnt
; i
++)
4198 if(file
->_ptr
[i
] == '\n')
4204 if(MSVCRT__lseeki64(file
->_file
, pos
, SEEK_SET
) != pos
) {
4205 MSVCRT__unlock_file(file
);
4209 pos
-= file
->_bufsiz
;
4210 pos
+= file
->_ptr
- file
->_base
;
4212 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
4213 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_READNL
)
4216 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
4223 MSVCRT__unlock_file(file
);
4227 /*********************************************************************
4230 LONG CDECL
MSVCRT_ftell(MSVCRT_FILE
* file
)
4232 return MSVCRT__ftelli64(file
);
4235 /*********************************************************************
4236 * fgetpos (MSVCRT.@)
4238 int CDECL
MSVCRT_fgetpos(MSVCRT_FILE
* file
, MSVCRT_fpos_t
*pos
)
4240 *pos
= MSVCRT__ftelli64(file
);
4246 /*********************************************************************
4249 int CDECL
MSVCRT_fputs(const char *s
, MSVCRT_FILE
* file
)
4251 MSVCRT_size_t len
= strlen(s
);
4254 MSVCRT__lock_file(file
);
4255 ret
= MSVCRT_fwrite(s
, sizeof(*s
), len
, file
) == len
? 0 : MSVCRT_EOF
;
4256 MSVCRT__unlock_file(file
);
4260 /*********************************************************************
4263 int CDECL
MSVCRT_fputws(const MSVCRT_wchar_t
*s
, MSVCRT_FILE
* file
)
4265 MSVCRT_size_t i
, len
= strlenW(s
);
4269 MSVCRT__lock_file(file
);
4270 if (!(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
)) {
4271 ret
= MSVCRT_fwrite(s
,sizeof(*s
),len
,file
) == len
? 0 : MSVCRT_EOF
;
4272 MSVCRT__unlock_file(file
);
4276 tmp_buf
= add_std_buffer(file
);
4277 for (i
=0; i
<len
; i
++) {
4278 if(MSVCRT_fputwc(s
[i
], file
) == MSVCRT_WEOF
) {
4279 if(tmp_buf
) remove_std_buffer(file
);
4280 MSVCRT__unlock_file(file
);
4285 if(tmp_buf
) remove_std_buffer(file
);
4286 MSVCRT__unlock_file(file
);
4290 /*********************************************************************
4291 * getchar (MSVCRT.@)
4293 int CDECL
MSVCRT_getchar(void)
4295 return MSVCRT_fgetc(MSVCRT_stdin
);
4298 /*********************************************************************
4301 int CDECL
MSVCRT_getc(MSVCRT_FILE
* file
)
4303 return MSVCRT_fgetc(file
);
4306 /*********************************************************************
4309 char * CDECL
MSVCRT_gets(char *buf
)
4312 char * buf_start
= buf
;
4314 MSVCRT__lock_file(MSVCRT_stdin
);
4315 for(cc
= MSVCRT_fgetc(MSVCRT_stdin
); cc
!= MSVCRT_EOF
&& cc
!= '\n';
4316 cc
= MSVCRT_fgetc(MSVCRT_stdin
))
4317 if(cc
!= '\r') *buf
++ = (char)cc
;
4321 TRACE("got '%s'\n", buf_start
);
4322 MSVCRT__unlock_file(MSVCRT_stdin
);
4326 /*********************************************************************
4329 MSVCRT_wchar_t
* CDECL
MSVCRT__getws(MSVCRT_wchar_t
* buf
)
4332 MSVCRT_wchar_t
* ws
= buf
;
4334 MSVCRT__lock_file(MSVCRT_stdin
);
4335 for (cc
= MSVCRT_fgetwc(MSVCRT_stdin
); cc
!= MSVCRT_WEOF
&& cc
!= '\n';
4336 cc
= MSVCRT_fgetwc(MSVCRT_stdin
))
4339 *buf
++ = (MSVCRT_wchar_t
)cc
;
4343 TRACE("got %s\n", debugstr_w(ws
));
4344 MSVCRT__unlock_file(MSVCRT_stdin
);
4348 /*********************************************************************
4351 int CDECL
MSVCRT_putc(int c
, MSVCRT_FILE
* file
)
4353 return MSVCRT_fputc(c
, file
);
4356 /*********************************************************************
4357 * putchar (MSVCRT.@)
4359 int CDECL
MSVCRT_putchar(int c
)
4361 return MSVCRT_fputc(c
, MSVCRT_stdout
);
4364 /*********************************************************************
4365 * _putwch (MSVCRT.@)
4367 int CDECL
MSVCRT__putwch(int c
)
4369 return MSVCRT_fputwc(c
, MSVCRT_stdout
);
4372 /*********************************************************************
4375 int CDECL
MSVCRT_puts(const char *s
)
4377 MSVCRT_size_t len
= strlen(s
);
4380 MSVCRT__lock_file(MSVCRT_stdout
);
4381 if(MSVCRT_fwrite(s
, sizeof(*s
), len
, MSVCRT_stdout
) != len
) {
4382 MSVCRT__unlock_file(MSVCRT_stdout
);
4386 ret
= MSVCRT_fwrite("\n",1,1,MSVCRT_stdout
) == 1 ? 0 : MSVCRT_EOF
;
4387 MSVCRT__unlock_file(MSVCRT_stdout
);
4391 /*********************************************************************
4394 int CDECL
MSVCRT__putws(const MSVCRT_wchar_t
*s
)
4396 static const MSVCRT_wchar_t nl
= '\n';
4397 MSVCRT_size_t len
= strlenW(s
);
4400 MSVCRT__lock_file(MSVCRT_stdout
);
4401 if(MSVCRT_fwrite(s
, sizeof(*s
), len
, MSVCRT_stdout
) != len
) {
4402 MSVCRT__unlock_file(MSVCRT_stdout
);
4406 ret
= MSVCRT_fwrite(&nl
,sizeof(nl
),1,MSVCRT_stdout
) == 1 ? 0 : MSVCRT_EOF
;
4407 MSVCRT__unlock_file(MSVCRT_stdout
);
4411 /*********************************************************************
4414 int CDECL
MSVCRT_remove(const char *path
)
4416 TRACE("(%s)\n",path
);
4417 if (DeleteFileA(path
))
4419 TRACE(":failed (%d)\n",GetLastError());
4420 msvcrt_set_errno(GetLastError());
4424 /*********************************************************************
4425 * _wremove (MSVCRT.@)
4427 int CDECL
MSVCRT__wremove(const MSVCRT_wchar_t
*path
)
4429 TRACE("(%s)\n",debugstr_w(path
));
4430 if (DeleteFileW(path
))
4432 TRACE(":failed (%d)\n",GetLastError());
4433 msvcrt_set_errno(GetLastError());
4437 /*********************************************************************
4440 int CDECL
MSVCRT_rename(const char *oldpath
,const char *newpath
)
4442 TRACE(":from %s to %s\n",oldpath
,newpath
);
4443 if (MoveFileExA(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
4445 TRACE(":failed (%d)\n",GetLastError());
4446 msvcrt_set_errno(GetLastError());
4450 /*********************************************************************
4451 * _wrename (MSVCRT.@)
4453 int CDECL
MSVCRT__wrename(const MSVCRT_wchar_t
*oldpath
,const MSVCRT_wchar_t
*newpath
)
4455 TRACE(":from %s to %s\n",debugstr_w(oldpath
),debugstr_w(newpath
));
4456 if (MoveFileExW(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
4458 TRACE(":failed (%d)\n",GetLastError());
4459 msvcrt_set_errno(GetLastError());
4463 /*********************************************************************
4464 * setvbuf (MSVCRT.@)
4466 int CDECL
MSVCRT_setvbuf(MSVCRT_FILE
* file
, char *buf
, int mode
, MSVCRT_size_t size
)
4468 MSVCRT__lock_file(file
);
4470 if(file
->_flag
& MSVCRT__IOMYBUF
)
4471 MSVCRT_free(file
->_base
);
4472 file
->_flag
&= ~MSVCRT__IOMYBUF
;
4473 file
->_base
= file
->_ptr
= NULL
;
4477 if(mode
== MSVCRT__IOFBF
) {
4478 file
->_flag
&= ~MSVCRT__IONBF
;
4479 file
->_base
= file
->_ptr
= buf
;
4481 file
->_bufsiz
= size
;
4484 file
->_flag
|= MSVCRT__IONBF
;
4486 MSVCRT__unlock_file(file
);
4490 /*********************************************************************
4493 void CDECL
MSVCRT_setbuf(MSVCRT_FILE
* file
, char *buf
)
4495 MSVCRT_setvbuf(file
, buf
, buf
? MSVCRT__IOFBF
: MSVCRT__IONBF
, MSVCRT_BUFSIZ
);
4498 /*********************************************************************
4501 char * CDECL
MSVCRT_tmpnam(char *s
)
4508 thread_data_t
*data
= msvcrt_get_thread_data();
4510 if(!data
->tmpnam_buffer
)
4511 data
->tmpnam_buffer
= MSVCRT_malloc(MAX_PATH
);
4513 s
= data
->tmpnam_buffer
;
4516 msvcrt_int_to_base32(GetCurrentProcessId(), tmpstr
);
4517 p
= s
+ sprintf(s
, "\\s%s.", tmpstr
);
4518 for (count
= 0; count
< MSVCRT_TMP_MAX
; count
++)
4520 size
= msvcrt_int_to_base32(tmpnam_unique
++, tmpstr
);
4521 memcpy(p
, tmpstr
, size
);
4523 if (GetFileAttributesA(s
) == INVALID_FILE_ATTRIBUTES
&&
4524 GetLastError() == ERROR_FILE_NOT_FOUND
)
4530 /*********************************************************************
4531 * _wtmpnam (MSVCRT.@)
4533 MSVCRT_wchar_t
* CDECL
MSVCRT_wtmpnam(MSVCRT_wchar_t
*s
)
4535 static const MSVCRT_wchar_t format
[] = {'\\','s','%','s','.',0};
4536 MSVCRT_wchar_t tmpstr
[16];
4540 thread_data_t
*data
= msvcrt_get_thread_data();
4542 if(!data
->wtmpnam_buffer
)
4543 data
->wtmpnam_buffer
= MSVCRT_malloc(sizeof(MSVCRT_wchar_t
[MAX_PATH
]));
4545 s
= data
->wtmpnam_buffer
;
4548 msvcrt_int_to_base32_w(GetCurrentProcessId(), tmpstr
);
4549 p
= s
+ MSVCRT__snwprintf(s
, MAX_PATH
, format
, tmpstr
);
4550 for (count
= 0; count
< MSVCRT_TMP_MAX
; count
++)
4552 size
= msvcrt_int_to_base32_w(tmpnam_unique
++, tmpstr
);
4553 memcpy(p
, tmpstr
, size
*sizeof(MSVCRT_wchar_t
));
4555 if (GetFileAttributesW(s
) == INVALID_FILE_ATTRIBUTES
&&
4556 GetLastError() == ERROR_FILE_NOT_FOUND
)
4562 /*********************************************************************
4563 * tmpfile (MSVCRT.@)
4565 MSVCRT_FILE
* CDECL
MSVCRT_tmpfile(void)
4567 char *filename
= MSVCRT_tmpnam(NULL
);
4569 MSVCRT_FILE
* file
= NULL
;
4572 fd
= MSVCRT__open(filename
, MSVCRT__O_CREAT
| MSVCRT__O_BINARY
| MSVCRT__O_RDWR
| MSVCRT__O_TEMPORARY
,
4573 MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
);
4574 if (fd
!= -1 && (file
= msvcrt_alloc_fp()))
4576 if (msvcrt_init_fp(file
, fd
, MSVCRT__IORW
) == -1)
4581 else file
->_tmpfname
= MSVCRT__strdup(filename
);
4584 if(fd
!= -1 && !file
)
4590 /*********************************************************************
4591 * tmpfile_s (MSVCRT.@)
4593 int CDECL
MSVCRT_tmpfile_s(MSVCRT_FILE
** file
)
4595 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
4597 *file
= MSVCRT_tmpfile();
4601 static int puts_clbk_file_a(void *file
, int len
, const char *str
)
4603 return MSVCRT_fwrite(str
, sizeof(char), len
, file
);
4606 static int puts_clbk_file_w(void *file
, int len
, const MSVCRT_wchar_t
*str
)
4610 MSVCRT__lock_file(file
);
4612 if(!(msvcrt_get_ioinfo(((MSVCRT_FILE
*)file
)->_file
)->wxflag
& WX_TEXT
)) {
4613 ret
= MSVCRT_fwrite(str
, sizeof(MSVCRT_wchar_t
), len
, file
);
4614 MSVCRT__unlock_file(file
);
4618 for(i
=0; i
<len
; i
++) {
4619 if(MSVCRT_fputwc(str
[i
], file
) == MSVCRT_WEOF
) {
4620 MSVCRT__unlock_file(file
);
4625 MSVCRT__unlock_file(file
);
4629 /*********************************************************************
4630 * vfprintf (MSVCRT.@)
4632 int CDECL
MSVCRT_vfprintf(MSVCRT_FILE
* file
, const char *format
, __ms_va_list valist
)
4637 MSVCRT__lock_file(file
);
4638 tmp_buf
= add_std_buffer(file
);
4639 ret
= pf_printf_a(puts_clbk_file_a
, file
, format
, NULL
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4640 if(tmp_buf
) remove_std_buffer(file
);
4641 MSVCRT__unlock_file(file
);
4646 /*********************************************************************
4647 * vfprintf_s (MSVCRT.@)
4649 int CDECL
MSVCRT_vfprintf_s(MSVCRT_FILE
* file
, const char *format
, __ms_va_list valist
)
4654 if(!MSVCRT_CHECK_PMT(file
!= NULL
)) return -1;
4656 MSVCRT__lock_file(file
);
4657 tmp_buf
= add_std_buffer(file
);
4658 ret
= pf_printf_a(puts_clbk_file_a
, file
, format
, NULL
, FALSE
, TRUE
, arg_clbk_valist
, NULL
, &valist
);
4659 if(tmp_buf
) remove_std_buffer(file
);
4660 MSVCRT__unlock_file(file
);
4665 /*********************************************************************
4666 * vfwprintf (MSVCRT.@)
4668 int CDECL
MSVCRT_vfwprintf(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4673 MSVCRT__lock_file(file
);
4674 tmp_buf
= add_std_buffer(file
);
4675 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, NULL
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4676 if(tmp_buf
) remove_std_buffer(file
);
4677 MSVCRT__unlock_file(file
);
4682 /*********************************************************************
4683 * vfwprintf_s (MSVCRT.@)
4685 int CDECL
MSVCRT_vfwprintf_s(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4690 if (!MSVCRT_CHECK_PMT( file
!= NULL
)) return -1;
4692 MSVCRT__lock_file(file
);
4693 tmp_buf
= add_std_buffer(file
);
4694 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, NULL
, FALSE
, TRUE
, arg_clbk_valist
, NULL
, &valist
);
4695 if(tmp_buf
) remove_std_buffer(file
);
4696 MSVCRT__unlock_file(file
);
4701 /*********************************************************************
4702 * _vfwprintf_l (MSVCRT.@)
4704 int CDECL
MSVCRT__vfwprintf_l(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
,
4705 MSVCRT__locale_t locale
, __ms_va_list valist
)
4710 if (!MSVCRT_CHECK_PMT( file
!= NULL
)) return -1;
4712 MSVCRT__lock_file(file
);
4713 tmp_buf
= add_std_buffer(file
);
4714 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, locale
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4715 if(tmp_buf
) remove_std_buffer(file
);
4716 MSVCRT__unlock_file(file
);
4721 /*********************************************************************
4722 * vprintf (MSVCRT.@)
4724 int CDECL
MSVCRT_vprintf(const char *format
, __ms_va_list valist
)
4726 return MSVCRT_vfprintf(MSVCRT_stdout
,format
,valist
);
4729 /*********************************************************************
4730 * vprintf_s (MSVCRT.@)
4732 int CDECL
MSVCRT_vprintf_s(const char *format
, __ms_va_list valist
)
4734 return MSVCRT_vfprintf_s(MSVCRT_stdout
,format
,valist
);
4737 /*********************************************************************
4738 * vwprintf (MSVCRT.@)
4740 int CDECL
MSVCRT_vwprintf(const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4742 return MSVCRT_vfwprintf(MSVCRT_stdout
,format
,valist
);
4745 /*********************************************************************
4746 * vwprintf_s (MSVCRT.@)
4748 int CDECL
MSVCRT_vwprintf_s(const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4750 return MSVCRT_vfwprintf_s(MSVCRT_stdout
,format
,valist
);
4753 /*********************************************************************
4754 * fprintf (MSVCRT.@)
4756 int CDECL
MSVCRT_fprintf(MSVCRT_FILE
* file
, const char *format
, ...)
4758 __ms_va_list valist
;
4760 __ms_va_start(valist
, format
);
4761 res
= MSVCRT_vfprintf(file
, format
, valist
);
4762 __ms_va_end(valist
);
4766 /*********************************************************************
4767 * fprintf_s (MSVCRT.@)
4769 int CDECL
MSVCRT_fprintf_s(MSVCRT_FILE
* file
, const char *format
, ...)
4771 __ms_va_list valist
;
4773 __ms_va_start(valist
, format
);
4774 res
= MSVCRT_vfprintf_s(file
, format
, valist
);
4775 __ms_va_end(valist
);
4779 /*********************************************************************
4780 * fwprintf (MSVCRT.@)
4782 int CDECL
MSVCRT_fwprintf(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, ...)
4784 __ms_va_list valist
;
4786 __ms_va_start(valist
, format
);
4787 res
= MSVCRT_vfwprintf(file
, format
, valist
);
4788 __ms_va_end(valist
);
4792 /*********************************************************************
4793 * fwprintf_s (MSVCRT.@)
4795 int CDECL
MSVCRT_fwprintf_s(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, ...)
4797 __ms_va_list valist
;
4799 __ms_va_start(valist
, format
);
4800 res
= MSVCRT_vfwprintf_s(file
, format
, valist
);
4801 __ms_va_end(valist
);
4805 /*********************************************************************
4806 * _fwprintf_l (MSVCRT.@)
4808 int CDECL
MSVCRT__fwprintf_l(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, MSVCRT__locale_t locale
, ...)
4810 __ms_va_list valist
;
4812 __ms_va_start(valist
, locale
);
4813 res
= MSVCRT__vfwprintf_l(file
, format
, locale
, valist
);
4814 __ms_va_end(valist
);
4818 /*********************************************************************
4821 int CDECL
MSVCRT_printf(const char *format
, ...)
4823 __ms_va_list valist
;
4825 __ms_va_start(valist
, format
);
4826 res
= MSVCRT_vfprintf(MSVCRT_stdout
, format
, valist
);
4827 __ms_va_end(valist
);
4831 /*********************************************************************
4832 * printf_s (MSVCRT.@)
4834 int CDECL
MSVCRT_printf_s(const char *format
, ...)
4836 __ms_va_list valist
;
4838 __ms_va_start(valist
, format
);
4839 res
= MSVCRT_vprintf_s(format
, valist
);
4840 __ms_va_end(valist
);
4844 /*********************************************************************
4847 int CDECL
MSVCRT_ungetc(int c
, MSVCRT_FILE
* file
)
4849 if (c
== MSVCRT_EOF
)
4852 MSVCRT__lock_file(file
);
4853 if(file
->_bufsiz
== 0 && msvcrt_alloc_buffer(file
))
4855 if(file
->_ptr
>file
->_base
) {
4857 if(file
->_flag
& MSVCRT__IOSTRG
) {
4858 if(*file
->_ptr
!= c
) {
4860 MSVCRT__unlock_file(file
);
4867 MSVCRT_clearerr(file
);
4868 MSVCRT__unlock_file(file
);
4872 MSVCRT__unlock_file(file
);
4876 /*********************************************************************
4877 * ungetwc (MSVCRT.@)
4879 MSVCRT_wint_t CDECL
MSVCRT_ungetwc(MSVCRT_wint_t wc
, MSVCRT_FILE
* file
)
4881 MSVCRT_wchar_t mwc
= wc
;
4883 if (wc
== MSVCRT_WEOF
)
4886 MSVCRT__lock_file(file
);
4888 if((msvcrt_get_ioinfo(file
->_file
)->exflag
& (EF_UTF8
| EF_UTF16
))
4889 || !(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
)) {
4890 unsigned char * pp
= (unsigned char *)&mwc
;
4893 for(i
=sizeof(MSVCRT_wchar_t
)-1;i
>=0;i
--) {
4894 if(pp
[i
] != MSVCRT_ungetc(pp
[i
],file
)) {
4895 MSVCRT__unlock_file(file
);
4900 char mbs
[MSVCRT_MB_LEN_MAX
];
4903 len
= MSVCRT_wctomb(mbs
, mwc
);
4905 MSVCRT__unlock_file(file
);
4909 for(len
--; len
>=0; len
--) {
4910 if(mbs
[len
] != MSVCRT_ungetc(mbs
[len
], file
)) {
4911 MSVCRT__unlock_file(file
);
4917 MSVCRT__unlock_file(file
);
4921 /*********************************************************************
4922 * wprintf (MSVCRT.@)
4924 int CDECL
MSVCRT_wprintf(const MSVCRT_wchar_t
*format
, ...)
4926 __ms_va_list valist
;
4928 __ms_va_start(valist
, format
);
4929 res
= MSVCRT_vwprintf(format
, valist
);
4930 __ms_va_end(valist
);
4934 /*********************************************************************
4935 * wprintf_s (MSVCRT.@)
4937 int CDECL
MSVCRT_wprintf_s(const MSVCRT_wchar_t
*format
, ...)
4939 __ms_va_list valist
;
4941 __ms_va_start(valist
, format
);
4942 res
= MSVCRT_vwprintf_s(format
, valist
);
4943 __ms_va_end(valist
);
4947 /*********************************************************************
4948 * _getmaxstdio (MSVCRT.@)
4950 int CDECL
MSVCRT__getmaxstdio(void)
4952 return MSVCRT_max_streams
;
4955 /*********************************************************************
4956 * _setmaxstdio (MSVCRT.@)
4958 int CDECL
MSVCRT__setmaxstdio(int newmax
)
4960 TRACE("%d\n", newmax
);
4962 if(newmax
<_IOB_ENTRIES
|| newmax
>MSVCRT_MAX_FILES
|| newmax
<MSVCRT_stream_idx
)
4965 MSVCRT_max_streams
= newmax
;
4966 return MSVCRT_max_streams
;