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>
45 #include "wine/unicode.h"
47 #include "wine/debug.h"
49 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt
);
51 /* for stat mode, permissions apply to all,owner and group */
52 #define ALL_S_IREAD (MSVCRT__S_IREAD | (MSVCRT__S_IREAD >> 3) | (MSVCRT__S_IREAD >> 6))
53 #define ALL_S_IWRITE (MSVCRT__S_IWRITE | (MSVCRT__S_IWRITE >> 3) | (MSVCRT__S_IWRITE >> 6))
54 #define ALL_S_IEXEC (MSVCRT__S_IEXEC | (MSVCRT__S_IEXEC >> 3) | (MSVCRT__S_IEXEC >> 6))
56 /* _access() bit flags FIXME: incomplete */
57 #define MSVCRT_W_OK 0x02
58 #define MSVCRT_R_OK 0x04
60 /* values for wxflag in file descriptor */
63 #define WX_READNL 0x04 /* read started with \n */
65 #define WX_DONTINHERIT 0x10
66 #define WX_APPEND 0x20
69 /* values for exflag - it's used differently in msvcr90.dll*/
72 #define EF_CRIT_INIT 0x04
73 #define EF_UNK_UNICODE 0x08
75 static char utf8_bom
[3] = { 0xef, 0xbb, 0xbf };
76 static char utf16_bom
[2] = { 0xff, 0xfe };
78 /* FIXME: this should be allocated dynamically */
79 #define MSVCRT_MAX_FILES 2048
80 #define MSVCRT_FD_BLOCK_SIZE 32
82 /* ioinfo structure size is different in msvcrXX.dll's */
88 CRITICAL_SECTION crit
;
91 /*********************************************************************
92 * __pioinfo (MSVCRT.@)
93 * array of pointers to ioinfo arrays [32]
95 ioinfo
* MSVCRT___pioinfo
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
] = { 0 };
97 /*********************************************************************
98 * __badioinfo (MSVCRT.@)
100 ioinfo MSVCRT___badioinfo
= { INVALID_HANDLE_VALUE
, WX_TEXT
};
102 static int MSVCRT_fdstart
= 3; /* first unallocated fd */
103 static int MSVCRT_fdend
= 3; /* highest allocated fd */
107 CRITICAL_SECTION crit
;
110 MSVCRT_FILE MSVCRT__iob
[_IOB_ENTRIES
] = { { 0 } };
111 static file_crit
* MSVCRT_fstream
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
];
112 static int MSVCRT_max_streams
= 512, MSVCRT_stream_idx
;
114 /* INTERNAL: process umask */
115 static int MSVCRT_umask
= 0;
117 /* INTERNAL: static data for tmpnam and _wtmpname functions */
118 static int tmpnam_unique
;
120 static const unsigned int EXE
= 'e' << 16 | 'x' << 8 | 'e';
121 static const unsigned int BAT
= 'b' << 16 | 'a' << 8 | 't';
122 static const unsigned int CMD
= 'c' << 16 | 'm' << 8 | 'd';
123 static const unsigned int COM
= 'c' << 16 | 'o' << 8 | 'm';
125 #define TOUL(x) (ULONGLONG)(x)
126 static const ULONGLONG WCEXE
= TOUL('e') << 32 | TOUL('x') << 16 | TOUL('e');
127 static const ULONGLONG WCBAT
= TOUL('b') << 32 | TOUL('a') << 16 | TOUL('t');
128 static const ULONGLONG WCCMD
= TOUL('c') << 32 | TOUL('m') << 16 | TOUL('d');
129 static const ULONGLONG WCCOM
= TOUL('c') << 32 | TOUL('o') << 16 | TOUL('m');
131 /* This critical section protects the tables MSVCRT___pioinfo and MSVCRT_fstreams,
132 * and their related indexes, MSVCRT_fdstart, MSVCRT_fdend,
133 * and MSVCRT_stream_idx, from race conditions.
134 * It doesn't protect against race conditions manipulating the underlying files
135 * or flags; doing so would probably be better accomplished with per-file
136 * protection, rather than locking the whole table for every change.
138 static CRITICAL_SECTION MSVCRT_file_cs
;
139 static CRITICAL_SECTION_DEBUG MSVCRT_file_cs_debug
=
141 0, 0, &MSVCRT_file_cs
,
142 { &MSVCRT_file_cs_debug
.ProcessLocksList
, &MSVCRT_file_cs_debug
.ProcessLocksList
},
143 0, 0, { (DWORD_PTR
)(__FILE__
": MSVCRT_file_cs") }
145 static CRITICAL_SECTION MSVCRT_file_cs
= { &MSVCRT_file_cs_debug
, -1, 0, 0, 0, 0 };
146 #define LOCK_FILES() do { EnterCriticalSection(&MSVCRT_file_cs); } while (0)
147 #define UNLOCK_FILES() do { LeaveCriticalSection(&MSVCRT_file_cs); } while (0)
149 static void msvcrt_stat64_to_stat(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stat
*buf
)
151 buf
->st_dev
= buf64
->st_dev
;
152 buf
->st_ino
= buf64
->st_ino
;
153 buf
->st_mode
= buf64
->st_mode
;
154 buf
->st_nlink
= buf64
->st_nlink
;
155 buf
->st_uid
= buf64
->st_uid
;
156 buf
->st_gid
= buf64
->st_gid
;
157 buf
->st_rdev
= buf64
->st_rdev
;
158 buf
->st_size
= buf64
->st_size
;
159 buf
->st_atime
= buf64
->st_atime
;
160 buf
->st_mtime
= buf64
->st_mtime
;
161 buf
->st_ctime
= buf64
->st_ctime
;
164 static void msvcrt_stat64_to_stati64(const struct MSVCRT__stat64
*buf64
, struct MSVCRT__stati64
*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 time_to_filetime( MSVCRT___time64_t time
, FILETIME
*ft
)
181 /* 1601 to 1970 is 369 years plus 89 leap days */
182 static const __int64 secs_1601_to_1970
= ((369 * 365 + 89) * (__int64
)86400);
184 __int64 ticks
= (time
+ secs_1601_to_1970
) * 10000000;
185 ft
->dwHighDateTime
= ticks
>> 32;
186 ft
->dwLowDateTime
= ticks
;
189 static inline ioinfo
* msvcrt_get_ioinfo(int fd
)
192 if(fd
< MSVCRT_MAX_FILES
)
193 ret
= MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
];
195 return &MSVCRT___badioinfo
;
197 return ret
+ (fd
%MSVCRT_FD_BLOCK_SIZE
);
200 static inline MSVCRT_FILE
* msvcrt_get_file(int i
)
204 if(i
>= MSVCRT_max_streams
)
208 return &MSVCRT__iob
[i
];
210 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
];
212 MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] = MSVCRT_calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(file_crit
));
213 if(!MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
]) {
214 ERR("out of memory\n");
215 *MSVCRT__errno() = MSVCRT_ENOMEM
;
219 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] + (i
%MSVCRT_FD_BLOCK_SIZE
);
221 ret
+= i
%MSVCRT_FD_BLOCK_SIZE
;
226 static inline BOOL
msvcrt_is_valid_fd(int fd
)
228 return fd
>= 0 && fd
< MSVCRT_fdend
&& (msvcrt_get_ioinfo(fd
)->wxflag
& WX_OPEN
);
231 /* INTERNAL: Get the HANDLE for a fd
232 * This doesn't lock the table, because a failure will result in
233 * INVALID_HANDLE_VALUE being returned, which should be handled correctly. If
234 * it returns a valid handle which is about to be closed, a subsequent call
235 * will fail, most likely in a sane way.
237 static HANDLE
msvcrt_fdtoh(int fd
)
239 if (!msvcrt_is_valid_fd(fd
))
241 WARN(":fd (%d) - no handle!\n",fd
);
242 *MSVCRT___doserrno() = 0;
243 *MSVCRT__errno() = MSVCRT_EBADF
;
244 return INVALID_HANDLE_VALUE
;
246 if (msvcrt_get_ioinfo(fd
)->handle
== INVALID_HANDLE_VALUE
)
247 WARN("returning INVALID_HANDLE_VALUE for %d\n", fd
);
248 return msvcrt_get_ioinfo(fd
)->handle
;
251 /* INTERNAL: free a file entry fd */
252 static void msvcrt_free_fd(int fd
)
258 fdinfo
= msvcrt_get_ioinfo(fd
);
259 old_handle
= fdinfo
->handle
;
260 if(fdinfo
!= &MSVCRT___badioinfo
)
262 fdinfo
->handle
= INVALID_HANDLE_VALUE
;
265 TRACE(":fd (%d) freed\n",fd
);
266 if (fd
< 3) /* don't use 0,1,2 for user files */
271 if (GetStdHandle(STD_INPUT_HANDLE
) == old_handle
) SetStdHandle(STD_INPUT_HANDLE
, 0);
274 if (GetStdHandle(STD_OUTPUT_HANDLE
) == old_handle
) SetStdHandle(STD_OUTPUT_HANDLE
, 0);
277 if (GetStdHandle(STD_ERROR_HANDLE
) == old_handle
) SetStdHandle(STD_ERROR_HANDLE
, 0);
283 if (fd
== MSVCRT_fdend
- 1)
285 if (fd
< MSVCRT_fdstart
)
291 /* INTERNAL: Allocate an fd slot from a Win32 HANDLE, starting from fd */
292 /* caller must hold the files lock */
293 static int msvcrt_alloc_fd_from(HANDLE hand
, int flag
, int fd
)
297 if (fd
>= MSVCRT_MAX_FILES
)
299 WARN(":files exhausted!\n");
300 *MSVCRT__errno() = MSVCRT_ENFILE
;
304 fdinfo
= msvcrt_get_ioinfo(fd
);
305 if(fdinfo
== &MSVCRT___badioinfo
) {
308 MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
] = MSVCRT_calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(ioinfo
));
309 if(!MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
]) {
310 WARN(":out of memory!\n");
311 *MSVCRT__errno() = MSVCRT_ENOMEM
;
315 for(i
=0; i
<MSVCRT_FD_BLOCK_SIZE
; i
++)
316 MSVCRT___pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
][i
].handle
= INVALID_HANDLE_VALUE
;
318 fdinfo
= msvcrt_get_ioinfo(fd
);
321 fdinfo
->handle
= hand
;
322 fdinfo
->wxflag
= WX_OPEN
| (flag
& (WX_DONTINHERIT
| WX_APPEND
| WX_TEXT
| WX_PIPE
));
323 fdinfo
->lookahead
[0] = '\n';
324 fdinfo
->lookahead
[1] = '\n';
325 fdinfo
->lookahead
[2] = '\n';
328 /* locate next free slot */
329 if (fd
== MSVCRT_fdstart
&& fd
== MSVCRT_fdend
)
330 MSVCRT_fdstart
= MSVCRT_fdend
+ 1;
332 while (MSVCRT_fdstart
< MSVCRT_fdend
&&
333 msvcrt_get_ioinfo(MSVCRT_fdstart
)->handle
!= INVALID_HANDLE_VALUE
)
335 /* update last fd in use */
336 if (fd
>= MSVCRT_fdend
)
337 MSVCRT_fdend
= fd
+ 1;
338 TRACE("fdstart is %d, fdend is %d\n", MSVCRT_fdstart
, MSVCRT_fdend
);
342 case 0: SetStdHandle(STD_INPUT_HANDLE
, hand
); break;
343 case 1: SetStdHandle(STD_OUTPUT_HANDLE
, hand
); break;
344 case 2: SetStdHandle(STD_ERROR_HANDLE
, hand
); break;
350 /* INTERNAL: Allocate an fd slot from a Win32 HANDLE */
351 static int msvcrt_alloc_fd(HANDLE hand
, int flag
)
356 TRACE(":handle (%p) allocating fd (%d)\n",hand
,MSVCRT_fdstart
);
357 ret
= msvcrt_alloc_fd_from(hand
, flag
, MSVCRT_fdstart
);
362 /* INTERNAL: Allocate a FILE* for an fd slot */
363 /* caller must hold the files lock */
364 static MSVCRT_FILE
* msvcrt_alloc_fp(void)
369 for (i
= 3; i
< MSVCRT_max_streams
; i
++)
371 file
= msvcrt_get_file(i
);
375 if (file
->_flag
== 0)
377 if (i
== MSVCRT_stream_idx
)
379 if (file
<MSVCRT__iob
|| file
>=MSVCRT__iob
+_IOB_ENTRIES
)
381 InitializeCriticalSection(&((file_crit
*)file
)->crit
);
382 ((file_crit
*)file
)->crit
.DebugInfo
->Spare
[0] = (DWORD_PTR
)(__FILE__
": file_crit.crit");
393 /* INTERNAL: initialize a FILE* from an open fd */
394 static int msvcrt_init_fp(MSVCRT_FILE
* file
, int fd
, unsigned stream_flags
)
396 TRACE(":fd (%d) allocating FILE*\n",fd
);
397 if (!msvcrt_is_valid_fd(fd
))
399 WARN(":invalid fd %d\n",fd
);
400 *MSVCRT___doserrno() = 0;
401 *MSVCRT__errno() = MSVCRT_EBADF
;
404 memset(file
, 0, sizeof(*file
));
406 file
->_flag
= stream_flags
;
408 TRACE(":got FILE* (%p)\n",file
);
412 /* INTERNAL: Create an inheritance data block (for spawned process)
413 * The inheritance block is made of:
414 * 00 int nb of file descriptor (NBFD)
415 * 04 char file flags (wxflag): repeated for each fd
416 * 4+NBFD HANDLE file handle: repeated for each fd
418 unsigned msvcrt_create_io_inherit_block(WORD
*size
, BYTE
**block
)
425 *size
= sizeof(unsigned) + (sizeof(char) + sizeof(HANDLE
)) * MSVCRT_fdend
;
426 *block
= MSVCRT_calloc(*size
, 1);
432 wxflag_ptr
= (char*)*block
+ sizeof(unsigned);
433 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ MSVCRT_fdend
* sizeof(char));
435 *(unsigned*)*block
= MSVCRT_fdend
;
436 for (fd
= 0; fd
< MSVCRT_fdend
; fd
++)
438 /* to be inherited, we need it to be open, and that DONTINHERIT isn't set */
439 fdinfo
= msvcrt_get_ioinfo(fd
);
440 if ((fdinfo
->wxflag
& (WX_OPEN
| WX_DONTINHERIT
)) == WX_OPEN
)
442 *wxflag_ptr
= fdinfo
->wxflag
;
443 *handle_ptr
= fdinfo
->handle
;
448 *handle_ptr
= INVALID_HANDLE_VALUE
;
450 wxflag_ptr
++; handle_ptr
++;
455 /* INTERNAL: Set up all file descriptors,
456 * as well as default streams (stdin, stderr and stdout)
458 void msvcrt_init_io(void)
464 GetStartupInfoA(&si
);
465 if (si
.cbReserved2
>= sizeof(unsigned int) && si
.lpReserved2
!= NULL
)
471 count
= *(unsigned*)si
.lpReserved2
;
472 wxflag_ptr
= si
.lpReserved2
+ sizeof(unsigned);
473 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ count
);
475 count
= min(count
, (si
.cbReserved2
- sizeof(unsigned)) / (sizeof(HANDLE
) + 1));
476 count
= min(count
, MSVCRT_MAX_FILES
);
477 for (i
= 0; i
< count
; i
++)
479 if ((*wxflag_ptr
& WX_OPEN
) && *handle_ptr
!= INVALID_HANDLE_VALUE
)
480 msvcrt_alloc_fd_from(*handle_ptr
, *wxflag_ptr
, i
);
482 wxflag_ptr
++; handle_ptr
++;
484 MSVCRT_fdend
= max( 3, count
);
485 for (MSVCRT_fdstart
= 3; MSVCRT_fdstart
< MSVCRT_fdend
; MSVCRT_fdstart
++)
486 if (msvcrt_get_ioinfo(MSVCRT_fdstart
)->handle
== INVALID_HANDLE_VALUE
) break;
489 if(!MSVCRT___pioinfo
[0])
490 msvcrt_alloc_fd_from(INVALID_HANDLE_VALUE
, 0, 3);
492 fdinfo
= msvcrt_get_ioinfo(0);
493 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
)
495 HANDLE std
= GetStdHandle(STD_INPUT_HANDLE
);
496 if (std
!= INVALID_HANDLE_VALUE
&& DuplicateHandle(GetCurrentProcess(), std
,
497 GetCurrentProcess(), &fdinfo
->handle
,
498 0, TRUE
, DUPLICATE_SAME_ACCESS
))
499 fdinfo
->wxflag
= WX_OPEN
| WX_TEXT
;
500 fdinfo
->lookahead
[0] = '\n';
501 fdinfo
->lookahead
[1] = '\n';
502 fdinfo
->lookahead
[2] = '\n';
506 fdinfo
= msvcrt_get_ioinfo(1);
507 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
)
509 HANDLE std
= GetStdHandle(STD_OUTPUT_HANDLE
);
510 if (std
!= INVALID_HANDLE_VALUE
&& DuplicateHandle(GetCurrentProcess(), std
,
511 GetCurrentProcess(), &fdinfo
->handle
,
512 0, TRUE
, DUPLICATE_SAME_ACCESS
))
513 fdinfo
->wxflag
= WX_OPEN
| WX_TEXT
;
514 fdinfo
->lookahead
[0] = '\n';
515 fdinfo
->lookahead
[1] = '\n';
516 fdinfo
->lookahead
[2] = '\n';
520 fdinfo
= msvcrt_get_ioinfo(2);
521 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
)
523 HANDLE std
= GetStdHandle(STD_ERROR_HANDLE
);
524 if (std
!= INVALID_HANDLE_VALUE
&& DuplicateHandle(GetCurrentProcess(), std
,
525 GetCurrentProcess(), &fdinfo
->handle
,
526 0, TRUE
, DUPLICATE_SAME_ACCESS
))
527 fdinfo
->wxflag
= WX_OPEN
| WX_TEXT
;
528 fdinfo
->lookahead
[0] = '\n';
529 fdinfo
->lookahead
[1] = '\n';
530 fdinfo
->lookahead
[2] = '\n';
534 TRACE(":handles (%p)(%p)(%p)\n", msvcrt_get_ioinfo(0)->handle
,
535 msvcrt_get_ioinfo(1)->handle
, msvcrt_get_ioinfo(2)->handle
);
537 memset(MSVCRT__iob
,0,3*sizeof(MSVCRT_FILE
));
538 for (i
= 0; i
< 3; i
++)
540 /* FILE structs for stdin/out/err are static and never deleted */
541 MSVCRT__iob
[i
]._file
= i
;
542 MSVCRT__iob
[i
]._tmpfname
= NULL
;
543 MSVCRT__iob
[i
]._flag
= (i
== 0) ? MSVCRT__IOREAD
: MSVCRT__IOWRT
;
545 MSVCRT_stream_idx
= 3;
548 /* INTERNAL: Flush stdio file buffer */
549 static int msvcrt_flush_buffer(MSVCRT_FILE
* file
)
552 int cnt
=file
->_ptr
-file
->_base
;
553 if(cnt
>0 && MSVCRT__write(file
->_file
, file
->_base
, cnt
) != cnt
) {
554 file
->_flag
|= MSVCRT__IOERR
;
557 file
->_ptr
=file
->_base
;
558 file
->_cnt
=file
->_bufsiz
;
563 /* INTERNAL: Allocate stdio file buffer */
564 static void msvcrt_alloc_buffer(MSVCRT_FILE
* file
)
566 file
->_base
= MSVCRT_calloc(MSVCRT_BUFSIZ
,1);
568 file
->_bufsiz
= MSVCRT_BUFSIZ
;
569 file
->_flag
|= MSVCRT__IOMYBUF
;
571 file
->_base
= (char*)(&file
->_charbuf
);
573 file
->_bufsiz
= sizeof(file
->_charbuf
);
575 file
->_ptr
= file
->_base
;
579 /* INTERNAL: Convert integer to base32 string (0-9a-v), 0 becomes "" */
580 static int msvcrt_int_to_base32(int num
, char *str
)
595 *p
= (num
& 31) + '0';
597 *p
+= ('a' - '0' - 10);
604 /* INTERNAL: wide character version of msvcrt_int_to_base32 */
605 static int msvcrt_int_to_base32_w(int num
, MSVCRT_wchar_t
*str
)
620 *p
= (num
& 31) + '0';
622 *p
+= ('a' - '0' - 10);
629 /*********************************************************************
630 * __iob_func(MSVCRT.@)
632 MSVCRT_FILE
* CDECL
MSVCRT___iob_func(void)
634 return &MSVCRT__iob
[0];
637 /*********************************************************************
640 int CDECL
MSVCRT__access(const char *filename
, int mode
)
642 DWORD attr
= GetFileAttributesA(filename
);
644 TRACE("(%s,%d) %d\n",filename
,mode
,attr
);
646 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
648 msvcrt_set_errno(GetLastError());
651 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& MSVCRT_W_OK
))
653 msvcrt_set_errno(ERROR_ACCESS_DENIED
);
659 /*********************************************************************
660 * _access_s (MSVCRT.@)
662 int CDECL
_access_s(const char *filename
, int mode
)
664 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return -1;
665 if (!MSVCRT_CHECK_PMT((mode
& ~(MSVCRT_R_OK
| MSVCRT_W_OK
)) == 0)) return -1;
667 return MSVCRT__access(filename
, mode
);
670 /*********************************************************************
671 * _waccess (MSVCRT.@)
673 int CDECL
MSVCRT__waccess(const MSVCRT_wchar_t
*filename
, int mode
)
675 DWORD attr
= GetFileAttributesW(filename
);
677 TRACE("(%s,%d) %d\n",debugstr_w(filename
),mode
,attr
);
679 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
681 msvcrt_set_errno(GetLastError());
684 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& MSVCRT_W_OK
))
686 msvcrt_set_errno(ERROR_ACCESS_DENIED
);
692 /*********************************************************************
693 * _waccess_s (MSVCRT.@)
695 int CDECL
_waccess_s(const MSVCRT_wchar_t
*filename
, int mode
)
697 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return -1;
698 if (!MSVCRT_CHECK_PMT((mode
& ~(MSVCRT_R_OK
| MSVCRT_W_OK
)) == 0)) return -1;
700 return MSVCRT__waccess(filename
, mode
);
703 /*********************************************************************
706 int CDECL
MSVCRT__chmod(const char *path
, int flags
)
708 DWORD oldFlags
= GetFileAttributesA(path
);
710 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
712 DWORD newFlags
= (flags
& MSVCRT__S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
713 oldFlags
| FILE_ATTRIBUTE_READONLY
;
715 if (newFlags
== oldFlags
|| SetFileAttributesA(path
, newFlags
))
718 msvcrt_set_errno(GetLastError());
722 /*********************************************************************
725 int CDECL
MSVCRT__wchmod(const MSVCRT_wchar_t
*path
, int flags
)
727 DWORD oldFlags
= GetFileAttributesW(path
);
729 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
731 DWORD newFlags
= (flags
& MSVCRT__S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
732 oldFlags
| FILE_ATTRIBUTE_READONLY
;
734 if (newFlags
== oldFlags
|| SetFileAttributesW(path
, newFlags
))
737 msvcrt_set_errno(GetLastError());
741 /*********************************************************************
744 int CDECL
MSVCRT__unlink(const char *path
)
746 TRACE("%s\n",debugstr_a(path
));
747 if(DeleteFileA(path
))
749 TRACE("failed (%d)\n",GetLastError());
750 msvcrt_set_errno(GetLastError());
754 /*********************************************************************
755 * _wunlink (MSVCRT.@)
757 int CDECL
MSVCRT__wunlink(const MSVCRT_wchar_t
*path
)
759 TRACE("(%s)\n",debugstr_w(path
));
760 if(DeleteFileW(path
))
762 TRACE("failed (%d)\n",GetLastError());
763 msvcrt_set_errno(GetLastError());
767 /*********************************************************************
770 int CDECL
MSVCRT__commit(int fd
)
772 HANDLE hand
= msvcrt_fdtoh(fd
);
774 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
775 if (hand
== INVALID_HANDLE_VALUE
)
778 if (!FlushFileBuffers(hand
))
780 if (GetLastError() == ERROR_INVALID_HANDLE
)
782 /* FlushFileBuffers fails for console handles
783 * so we ignore this error.
787 TRACE(":failed-last error (%d)\n",GetLastError());
788 msvcrt_set_errno(GetLastError());
795 /* flush_all_buffers calls MSVCRT_fflush which calls flush_all_buffers */
796 int CDECL
MSVCRT_fflush(MSVCRT_FILE
* file
);
798 /* INTERNAL: Flush all stream buffer */
799 static int msvcrt_flush_all_buffers(int mask
)
801 int i
, num_flushed
= 0;
805 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
806 file
= msvcrt_get_file(i
);
810 if(file
->_flag
& mask
) {
818 TRACE(":flushed (%d) handles\n",num_flushed
);
822 /*********************************************************************
823 * _flushall (MSVCRT.@)
825 int CDECL
MSVCRT__flushall(void)
827 return msvcrt_flush_all_buffers(MSVCRT__IOWRT
| MSVCRT__IOREAD
);
830 /*********************************************************************
833 int CDECL
MSVCRT_fflush(MSVCRT_FILE
* file
)
836 msvcrt_flush_all_buffers(MSVCRT__IOWRT
);
837 } else if(file
->_flag
& MSVCRT__IOWRT
) {
840 MSVCRT__lock_file(file
);
841 res
= msvcrt_flush_buffer(file
);
843 if(!res
&& (file
->_flag
& MSVCRT__IOCOMMIT
))
844 res
= MSVCRT__commit(file
->_file
) ? MSVCRT_EOF
: 0;
845 MSVCRT__unlock_file(file
);
848 } else if(file
->_flag
& MSVCRT__IOREAD
) {
849 MSVCRT__lock_file(file
);
851 file
->_ptr
= file
->_base
;
852 MSVCRT__unlock_file(file
);
859 /*********************************************************************
862 int CDECL
MSVCRT__close(int fd
)
868 hand
= msvcrt_fdtoh(fd
);
869 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
870 if (!msvcrt_is_valid_fd(fd
)) {
874 ret
= CloseHandle(hand
) ? 0 : -1;
876 WARN(":failed-last error (%d)\n",GetLastError());
877 msvcrt_set_errno(GetLastError());
885 /*********************************************************************
888 * MSDN isn't clear on this point, but the remarks for _pipe
889 * indicate file descriptors duplicated with _dup and _dup2 are always
892 int CDECL
MSVCRT__dup2(int od
, int nd
)
896 TRACE("(od=%d, nd=%d)\n", od
, nd
);
898 if (nd
< MSVCRT_MAX_FILES
&& nd
>= 0 && msvcrt_is_valid_fd(od
))
902 if (DuplicateHandle(GetCurrentProcess(), msvcrt_get_ioinfo(od
)->handle
,
903 GetCurrentProcess(), &handle
, 0, TRUE
, DUPLICATE_SAME_ACCESS
))
905 int wxflag
= msvcrt_get_ioinfo(od
)->wxflag
& ~MSVCRT__O_NOINHERIT
;
907 if (msvcrt_is_valid_fd(nd
))
909 ret
= msvcrt_alloc_fd_from(handle
, wxflag
, nd
);
913 *MSVCRT__errno() = MSVCRT_EMFILE
;
917 /* _dup2 returns 0, not nd, on success */
924 msvcrt_set_errno(GetLastError());
929 *MSVCRT__errno() = MSVCRT_EBADF
;
936 /*********************************************************************
939 int CDECL
MSVCRT__dup(int od
)
945 if (MSVCRT__dup2(od
, fd
) == 0)
953 /*********************************************************************
956 int CDECL
MSVCRT__eof(int fd
)
959 LONG hcurpos
,hendpos
;
960 HANDLE hand
= msvcrt_fdtoh(fd
);
962 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
964 if (hand
== INVALID_HANDLE_VALUE
)
967 if (msvcrt_get_ioinfo(fd
)->wxflag
& WX_ATEOF
) return TRUE
;
969 /* Otherwise we do it the hard way */
970 hcurpos
= hendpos
= 0;
971 curpos
= SetFilePointer(hand
, 0, &hcurpos
, FILE_CURRENT
);
972 endpos
= SetFilePointer(hand
, 0, &hendpos
, FILE_END
);
974 if (curpos
== endpos
&& hcurpos
== hendpos
)
976 /* FIXME: shouldn't WX_ATEOF be set here? */
980 SetFilePointer(hand
, curpos
, &hcurpos
, FILE_BEGIN
);
984 /*********************************************************************
985 * _fcloseall (MSVCRT.@)
987 int CDECL
MSVCRT__fcloseall(void)
989 int num_closed
= 0, i
;
993 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
994 file
= msvcrt_get_file(i
);
996 if (file
->_flag
&& !MSVCRT_fclose(file
))
1001 TRACE(":closed (%d) handles\n",num_closed
);
1005 /* free everything on process exit */
1006 void msvcrt_free_io(void)
1010 MSVCRT__fcloseall();
1011 /* The Win32 _fcloseall() function explicitly doesn't close stdin,
1012 * stdout, and stderr (unlike GNU), so we need to fclose() them here
1013 * or they won't get flushed.
1015 MSVCRT_fclose(&MSVCRT__iob
[0]);
1016 MSVCRT_fclose(&MSVCRT__iob
[1]);
1017 MSVCRT_fclose(&MSVCRT__iob
[2]);
1019 for(i
=0; i
<sizeof(MSVCRT___pioinfo
)/sizeof(MSVCRT___pioinfo
[0]); i
++)
1020 MSVCRT_free(MSVCRT___pioinfo
[i
]);
1022 for(i
=0; i
<MSVCRT_stream_idx
; i
++)
1024 MSVCRT_FILE
*file
= msvcrt_get_file(i
);
1025 if(file
<MSVCRT__iob
|| file
>=MSVCRT__iob
+_IOB_ENTRIES
)
1027 ((file_crit
*)file
)->crit
.DebugInfo
->Spare
[0] = 0;
1028 DeleteCriticalSection(&((file_crit
*)file
)->crit
);
1032 for(i
=0; i
<sizeof(MSVCRT_fstream
)/sizeof(MSVCRT_fstream
[0]); i
++)
1033 MSVCRT_free(MSVCRT_fstream
[i
]);
1035 DeleteCriticalSection(&MSVCRT_file_cs
);
1038 /*********************************************************************
1039 * _lseeki64 (MSVCRT.@)
1041 __int64 CDECL
MSVCRT__lseeki64(int fd
, __int64 offset
, int whence
)
1043 HANDLE hand
= msvcrt_fdtoh(fd
);
1046 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1047 if (hand
== INVALID_HANDLE_VALUE
)
1050 if (whence
< 0 || whence
> 2)
1052 *MSVCRT__errno() = MSVCRT_EINVAL
;
1056 TRACE(":fd (%d) to %s pos %s\n",
1057 fd
,wine_dbgstr_longlong(offset
),
1058 (whence
==SEEK_SET
)?"SEEK_SET":
1059 (whence
==SEEK_CUR
)?"SEEK_CUR":
1060 (whence
==SEEK_END
)?"SEEK_END":"UNKNOWN");
1062 /* The MoleBox protection scheme expects msvcrt to use SetFilePointer only,
1063 * so a LARGE_INTEGER offset cannot be passed directly via SetFilePointerEx. */
1064 ofs
.QuadPart
= offset
;
1065 if ((ofs
.u
.LowPart
= SetFilePointer(hand
, ofs
.u
.LowPart
, &ofs
.u
.HighPart
, whence
)) != INVALID_SET_FILE_POINTER
||
1066 GetLastError() == ERROR_SUCCESS
)
1068 msvcrt_get_ioinfo(fd
)->wxflag
&= ~WX_ATEOF
;
1069 /* FIXME: What if we seek _to_ EOF - is EOF set? */
1071 return ofs
.QuadPart
;
1073 TRACE(":error-last error (%d)\n",GetLastError());
1074 msvcrt_set_errno(GetLastError());
1078 /*********************************************************************
1081 LONG CDECL
MSVCRT__lseek(int fd
, LONG offset
, int whence
)
1083 return MSVCRT__lseeki64(fd
, offset
, whence
);
1086 /*********************************************************************
1087 * _lock_file (MSVCRT.@)
1089 void CDECL
MSVCRT__lock_file(MSVCRT_FILE
*file
)
1091 if(file
>=MSVCRT__iob
&& file
<MSVCRT__iob
+_IOB_ENTRIES
)
1092 _lock(_STREAM_LOCKS
+(file
-MSVCRT__iob
));
1094 EnterCriticalSection(&((file_crit
*)file
)->crit
);
1097 /*********************************************************************
1098 * _unlock_file (MSVCRT.@)
1100 void CDECL
MSVCRT__unlock_file(MSVCRT_FILE
*file
)
1102 if(file
>=MSVCRT__iob
&& file
<MSVCRT__iob
+_IOB_ENTRIES
)
1103 _unlock(_STREAM_LOCKS
+(file
-MSVCRT__iob
));
1105 LeaveCriticalSection(&((file_crit
*)file
)->crit
);
1108 /*********************************************************************
1109 * _locking (MSVCRT.@)
1111 * This is untested; the underlying LockFile doesn't work yet.
1113 int CDECL
MSVCRT__locking(int fd
, int mode
, LONG nbytes
)
1117 HANDLE hand
= msvcrt_fdtoh(fd
);
1119 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1120 if (hand
== INVALID_HANDLE_VALUE
)
1123 if (mode
< 0 || mode
> 4)
1125 *MSVCRT__errno() = MSVCRT_EINVAL
;
1129 TRACE(":fd (%d) by 0x%08x mode %s\n",
1130 fd
,nbytes
,(mode
==MSVCRT__LK_UNLCK
)?"_LK_UNLCK":
1131 (mode
==MSVCRT__LK_LOCK
)?"_LK_LOCK":
1132 (mode
==MSVCRT__LK_NBLCK
)?"_LK_NBLCK":
1133 (mode
==MSVCRT__LK_RLCK
)?"_LK_RLCK":
1134 (mode
==MSVCRT__LK_NBRLCK
)?"_LK_NBRLCK":
1137 if ((cur_locn
= SetFilePointer(hand
, 0L, NULL
, SEEK_CUR
)) == INVALID_SET_FILE_POINTER
)
1139 FIXME ("Seek failed\n");
1140 *MSVCRT__errno() = MSVCRT_EINVAL
; /* FIXME */
1143 if (mode
== MSVCRT__LK_LOCK
|| mode
== MSVCRT__LK_RLCK
)
1146 ret
= 1; /* just to satisfy gcc */
1149 ret
= LockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1154 else if (mode
== MSVCRT__LK_UNLCK
)
1155 ret
= UnlockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1157 ret
= LockFile(hand
, cur_locn
, 0L, nbytes
, 0L);
1158 /* FIXME - what about error settings? */
1159 return ret
? 0 : -1;
1162 /*********************************************************************
1163 * _fseeki64 (MSVCRT.@)
1165 int CDECL
MSVCRT__fseeki64(MSVCRT_FILE
* file
, __int64 offset
, int whence
)
1169 MSVCRT__lock_file(file
);
1170 /* Flush output if needed */
1171 if(file
->_flag
& MSVCRT__IOWRT
)
1172 msvcrt_flush_buffer(file
);
1174 if(whence
== SEEK_CUR
&& file
->_flag
& MSVCRT__IOREAD
) {
1176 offset
+= MSVCRT__ftelli64(file
);
1179 /* Discard buffered input */
1181 file
->_ptr
= file
->_base
;
1182 /* Reset direction of i/o */
1183 if(file
->_flag
& MSVCRT__IORW
) {
1184 file
->_flag
&= ~(MSVCRT__IOREAD
|MSVCRT__IOWRT
);
1186 /* Clear end of file flag */
1187 file
->_flag
&= ~MSVCRT__IOEOF
;
1188 ret
= (MSVCRT__lseeki64(file
->_file
,offset
,whence
) == -1)?-1:0;
1190 MSVCRT__unlock_file(file
);
1194 /*********************************************************************
1197 int CDECL
MSVCRT_fseek(MSVCRT_FILE
* file
, MSVCRT_long offset
, int whence
)
1199 return MSVCRT__fseeki64( file
, offset
, whence
);
1202 /*********************************************************************
1203 * _chsize (MSVCRT.@)
1205 int CDECL
MSVCRT__chsize(int fd
, MSVCRT_long size
)
1211 TRACE("(fd=%d, size=%d)\n", fd
, size
);
1215 handle
= msvcrt_fdtoh(fd
);
1216 if (handle
!= INVALID_HANDLE_VALUE
)
1218 /* save the current file pointer */
1219 cur
= MSVCRT__lseek(fd
, 0, SEEK_CUR
);
1222 pos
= MSVCRT__lseek(fd
, size
, SEEK_SET
);
1225 ret
= SetEndOfFile(handle
);
1226 if (!ret
) msvcrt_set_errno(GetLastError());
1229 /* restore the file pointer */
1230 MSVCRT__lseek(fd
, cur
, SEEK_SET
);
1235 return ret
? 0 : -1;
1238 /*********************************************************************
1239 * clearerr (MSVCRT.@)
1241 void CDECL
MSVCRT_clearerr(MSVCRT_FILE
* file
)
1243 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1245 MSVCRT__lock_file(file
);
1246 file
->_flag
&= ~(MSVCRT__IOERR
| MSVCRT__IOEOF
);
1247 MSVCRT__unlock_file(file
);
1250 /*********************************************************************
1253 void CDECL
MSVCRT_rewind(MSVCRT_FILE
* file
)
1255 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1257 MSVCRT__lock_file(file
);
1258 MSVCRT_fseek(file
, 0L, SEEK_SET
);
1259 MSVCRT_clearerr(file
);
1260 MSVCRT__unlock_file(file
);
1263 static int msvcrt_get_flags(const MSVCRT_wchar_t
* mode
, int *open_flags
, int* stream_flags
)
1265 int plus
= strchrW(mode
, '+') != NULL
;
1267 TRACE("%s\n", debugstr_w(mode
));
1269 while(*mode
== ' ') mode
++;
1274 *open_flags
= plus
? MSVCRT__O_RDWR
: MSVCRT__O_RDONLY
;
1275 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOREAD
;
1278 *open_flags
= MSVCRT__O_CREAT
| MSVCRT__O_TRUNC
| (plus
? MSVCRT__O_RDWR
: MSVCRT__O_WRONLY
);
1279 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOWRT
;
1282 *open_flags
= MSVCRT__O_CREAT
| MSVCRT__O_APPEND
| (plus
? MSVCRT__O_RDWR
: MSVCRT__O_WRONLY
);
1283 *stream_flags
= plus
? MSVCRT__IORW
: MSVCRT__IOWRT
;
1286 MSVCRT_INVALID_PMT(0, MSVCRT_EINVAL
);
1290 *stream_flags
|= MSVCRT__commode
;
1292 while (*mode
&& *mode
!=',')
1296 *open_flags
|= MSVCRT__O_BINARY
;
1297 *open_flags
&= ~MSVCRT__O_TEXT
;
1300 *open_flags
|= MSVCRT__O_TEXT
;
1301 *open_flags
&= ~MSVCRT__O_BINARY
;
1304 *open_flags
|= MSVCRT__O_TEMPORARY
;
1307 *open_flags
|= MSVCRT__O_SHORT_LIVED
;
1310 *stream_flags
|= MSVCRT__IOCOMMIT
;
1313 *stream_flags
&= ~MSVCRT__IOCOMMIT
;
1321 MSVCRT_INVALID_PMT(0, MSVCRT_EINVAL
);
1327 static const WCHAR ccs
[] = {'c','c','s'};
1328 static const WCHAR utf8
[] = {'u','t','f','-','8'};
1329 static const WCHAR utf16le
[] = {'u','t','f','-','1','6','l','e'};
1330 static const WCHAR unicode
[] = {'u','n','i','c','o','d','e'};
1333 while(*mode
== ' ') mode
++;
1334 if(!MSVCRT_CHECK_PMT(!strncmpW(ccs
, mode
, sizeof(ccs
)/sizeof(ccs
[0]))))
1336 mode
+= sizeof(ccs
)/sizeof(ccs
[0]);
1337 while(*mode
== ' ') mode
++;
1338 if(!MSVCRT_CHECK_PMT(*mode
== '='))
1341 while(*mode
== ' ') mode
++;
1343 if(!strncmpiW(utf8
, mode
, sizeof(utf8
)/sizeof(utf8
[0])))
1345 *open_flags
|= MSVCRT__O_U8TEXT
;
1346 mode
+= sizeof(utf8
)/sizeof(utf8
[0]);
1348 else if(!strncmpiW(utf16le
, mode
, sizeof(utf16le
)/sizeof(utf16le
[0])))
1350 *open_flags
|= MSVCRT__O_U16TEXT
;
1351 mode
+= sizeof(utf16le
)/sizeof(utf16le
[0]);
1353 else if(!strncmpiW(unicode
, mode
, sizeof(unicode
)/sizeof(unicode
[0])))
1355 *open_flags
|= MSVCRT__O_WTEXT
;
1356 mode
+= sizeof(unicode
)/sizeof(unicode
[0]);
1360 MSVCRT_INVALID_PMT(0, MSVCRT_EINVAL
);
1364 while(*mode
== ' ') mode
++;
1367 if(!MSVCRT_CHECK_PMT(*mode
== 0))
1372 /*********************************************************************
1373 * _fdopen (MSVCRT.@)
1375 MSVCRT_FILE
* CDECL
MSVCRT__fdopen(int fd
, const char *mode
)
1378 MSVCRT_wchar_t
*modeW
= NULL
;
1380 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
))) return NULL
;
1382 ret
= MSVCRT__wfdopen(fd
, modeW
);
1388 /*********************************************************************
1389 * _wfdopen (MSVCRT.@)
1391 MSVCRT_FILE
* CDECL
MSVCRT__wfdopen(int fd
, const MSVCRT_wchar_t
*mode
)
1393 int open_flags
, stream_flags
;
1396 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1) return NULL
;
1399 if (!(file
= msvcrt_alloc_fp()))
1401 else if (msvcrt_init_fp(file
, fd
, stream_flags
) == -1)
1406 else TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
1412 /*********************************************************************
1413 * _filelength (MSVCRT.@)
1415 LONG CDECL
MSVCRT__filelength(int fd
)
1417 LONG curPos
= MSVCRT__lseek(fd
, 0, SEEK_CUR
);
1420 LONG endPos
= MSVCRT__lseek(fd
, 0, SEEK_END
);
1423 if (endPos
!= curPos
)
1424 MSVCRT__lseek(fd
, curPos
, SEEK_SET
);
1431 /*********************************************************************
1432 * _filelengthi64 (MSVCRT.@)
1434 __int64 CDECL
MSVCRT__filelengthi64(int fd
)
1436 __int64 curPos
= MSVCRT__lseeki64(fd
, 0, SEEK_CUR
);
1439 __int64 endPos
= MSVCRT__lseeki64(fd
, 0, SEEK_END
);
1442 if (endPos
!= curPos
)
1443 MSVCRT__lseeki64(fd
, curPos
, SEEK_SET
);
1450 /*********************************************************************
1451 * _fileno (MSVCRT.@)
1453 int CDECL
MSVCRT__fileno(MSVCRT_FILE
* file
)
1455 TRACE(":FILE* (%p) fd (%d)\n",file
,file
->_file
);
1459 /*********************************************************************
1460 * _fstat64 (MSVCRT.@)
1462 int CDECL
MSVCRT__fstat64(int fd
, struct MSVCRT__stat64
* buf
)
1466 BY_HANDLE_FILE_INFORMATION hfi
;
1467 HANDLE hand
= msvcrt_fdtoh(fd
);
1469 TRACE(":fd (%d) stat (%p)\n",fd
,buf
);
1470 if (hand
== INVALID_HANDLE_VALUE
)
1475 WARN(":failed-NULL buf\n");
1476 msvcrt_set_errno(ERROR_INVALID_PARAMETER
);
1480 memset(&hfi
, 0, sizeof(hfi
));
1481 memset(buf
, 0, sizeof(struct MSVCRT__stat64
));
1482 type
= GetFileType(hand
);
1483 if (type
== FILE_TYPE_PIPE
)
1485 buf
->st_dev
= buf
->st_rdev
= fd
;
1486 buf
->st_mode
= S_IFIFO
;
1489 else if (type
== FILE_TYPE_CHAR
)
1491 buf
->st_dev
= buf
->st_rdev
= fd
;
1492 buf
->st_mode
= S_IFCHR
;
1495 else /* FILE_TYPE_DISK etc. */
1497 if (!GetFileInformationByHandle(hand
, &hfi
))
1499 WARN(":failed-last error (%d)\n",GetLastError());
1500 msvcrt_set_errno(ERROR_INVALID_PARAMETER
);
1503 buf
->st_mode
= S_IFREG
| 0444;
1504 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
1505 buf
->st_mode
|= 0222;
1506 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
1507 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
1509 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
1510 buf
->st_mtime
= buf
->st_ctime
= dw
;
1511 buf
->st_nlink
= hfi
.nNumberOfLinks
;
1513 TRACE(":dwFileAttributes = 0x%x, mode set to 0x%x\n",hfi
.dwFileAttributes
,
1518 /*********************************************************************
1519 * _fstati64 (MSVCRT.@)
1521 int CDECL
MSVCRT__fstati64(int fd
, struct MSVCRT__stati64
* buf
)
1524 struct MSVCRT__stat64 buf64
;
1526 ret
= MSVCRT__fstat64(fd
, &buf64
);
1528 msvcrt_stat64_to_stati64(&buf64
, buf
);
1532 /*********************************************************************
1535 int CDECL
MSVCRT__fstat(int fd
, struct MSVCRT__stat
* buf
)
1537 struct MSVCRT__stat64 buf64
;
1539 ret
= MSVCRT__fstat64(fd
, &buf64
);
1541 msvcrt_stat64_to_stat(&buf64
, buf
);
1545 /*********************************************************************
1546 * _futime64 (MSVCRT.@)
1548 int CDECL
_futime64(int fd
, struct MSVCRT___utimbuf64
*t
)
1550 HANDLE hand
= msvcrt_fdtoh(fd
);
1555 time_to_filetime( MSVCRT__time64(NULL
), &at
);
1560 time_to_filetime( t
->actime
, &at
);
1561 time_to_filetime( t
->modtime
, &wt
);
1564 if (!SetFileTime(hand
, NULL
, &at
, &wt
))
1566 msvcrt_set_errno(GetLastError());
1572 /*********************************************************************
1573 * _futime32 (MSVCRT.@)
1575 int CDECL
_futime32(int fd
, struct MSVCRT___utimbuf32
*t
)
1579 struct MSVCRT___utimbuf64 t64
;
1580 t64
.actime
= t
->actime
;
1581 t64
.modtime
= t
->modtime
;
1582 return _futime64( fd
, &t64
);
1585 return _futime64( fd
, NULL
);
1588 /*********************************************************************
1589 * _futime (MSVCRT.@)
1592 int CDECL
_futime(int fd
, struct MSVCRT___utimbuf64
*t
)
1594 return _futime64( fd
, t
);
1597 int CDECL
_futime(int fd
, struct MSVCRT___utimbuf32
*t
)
1599 return _futime32( fd
, t
);
1603 /*********************************************************************
1604 * _get_osfhandle (MSVCRT.@)
1606 MSVCRT_intptr_t CDECL
MSVCRT__get_osfhandle(int fd
)
1608 HANDLE hand
= msvcrt_fdtoh(fd
);
1609 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1611 return (MSVCRT_intptr_t
)hand
;
1614 /*********************************************************************
1615 * _isatty (MSVCRT.@)
1617 int CDECL
MSVCRT__isatty(int fd
)
1619 HANDLE hand
= msvcrt_fdtoh(fd
);
1621 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1622 if (hand
== INVALID_HANDLE_VALUE
)
1625 return GetFileType(hand
) == FILE_TYPE_CHAR
? 1 : 0;
1628 /*********************************************************************
1629 * _mktemp (MSVCRT.@)
1631 char * CDECL
MSVCRT__mktemp(char *pattern
)
1634 char *retVal
= pattern
;
1639 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1643 id
= GetCurrentProcessId();
1647 int tempNum
= id
/ 10;
1648 *pattern
-- = id
- (tempNum
* 10) + '0';
1654 *pattern
= letter
++;
1655 if (GetFileAttributesA(retVal
) == INVALID_FILE_ATTRIBUTES
&&
1656 GetLastError() == ERROR_FILE_NOT_FOUND
)
1658 } while(letter
<= 'z');
1662 /*********************************************************************
1663 * _wmktemp (MSVCRT.@)
1665 MSVCRT_wchar_t
* CDECL
MSVCRT__wmktemp(MSVCRT_wchar_t
*pattern
)
1668 MSVCRT_wchar_t
*retVal
= pattern
;
1670 MSVCRT_wchar_t letter
= 'a';
1673 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1677 id
= GetCurrentProcessId();
1681 int tempNum
= id
/ 10;
1682 *pattern
-- = id
- (tempNum
* 10) + '0';
1688 if (GetFileAttributesW(retVal
) == INVALID_FILE_ATTRIBUTES
&&
1689 GetLastError() == ERROR_FILE_NOT_FOUND
)
1691 *pattern
= letter
++;
1692 } while(letter
!= '|');
1696 static unsigned split_oflags(unsigned oflags
)
1699 unsigned unsupp
; /* until we support everything */
1701 if (oflags
& MSVCRT__O_APPEND
) wxflags
|= WX_APPEND
;
1702 if (oflags
& MSVCRT__O_BINARY
) {/* Nothing to do */}
1703 else if (oflags
& MSVCRT__O_TEXT
) wxflags
|= WX_TEXT
;
1704 else if (oflags
& MSVCRT__O_WTEXT
) wxflags
|= WX_TEXT
;
1705 else if (oflags
& MSVCRT__O_U16TEXT
) wxflags
|= WX_TEXT
;
1706 else if (oflags
& MSVCRT__O_U8TEXT
) wxflags
|= WX_TEXT
;
1707 else if (*__p__fmode() & MSVCRT__O_BINARY
) {/* Nothing to do */}
1708 else wxflags
|= WX_TEXT
; /* default to TEXT*/
1709 if (oflags
& MSVCRT__O_NOINHERIT
) wxflags
|= WX_DONTINHERIT
;
1711 if ((unsupp
= oflags
& ~(
1712 MSVCRT__O_BINARY
|MSVCRT__O_TEXT
|MSVCRT__O_APPEND
|
1713 MSVCRT__O_TRUNC
|MSVCRT__O_EXCL
|MSVCRT__O_CREAT
|
1714 MSVCRT__O_RDWR
|MSVCRT__O_WRONLY
|MSVCRT__O_TEMPORARY
|
1715 MSVCRT__O_NOINHERIT
|
1716 MSVCRT__O_SEQUENTIAL
|MSVCRT__O_RANDOM
|MSVCRT__O_SHORT_LIVED
|
1717 MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
1719 ERR(":unsupported oflags 0x%04x\n",unsupp
);
1724 /*********************************************************************
1727 int CDECL
MSVCRT__pipe(int *pfds
, unsigned int psize
, int textmode
)
1730 SECURITY_ATTRIBUTES sa
;
1731 HANDLE readHandle
, writeHandle
;
1735 *MSVCRT__errno() = MSVCRT_EINVAL
;
1739 sa
.nLength
= sizeof(SECURITY_ATTRIBUTES
);
1740 sa
.bInheritHandle
= !(textmode
& MSVCRT__O_NOINHERIT
);
1741 sa
.lpSecurityDescriptor
= NULL
;
1742 if (CreatePipe(&readHandle
, &writeHandle
, &sa
, psize
))
1744 unsigned int wxflags
= split_oflags(textmode
);
1748 fd
= msvcrt_alloc_fd(readHandle
, wxflags
|WX_PIPE
);
1752 fd
= msvcrt_alloc_fd(writeHandle
, wxflags
|WX_PIPE
);
1760 MSVCRT__close(pfds
[0]);
1761 CloseHandle(writeHandle
);
1762 *MSVCRT__errno() = MSVCRT_EMFILE
;
1767 CloseHandle(readHandle
);
1768 CloseHandle(writeHandle
);
1769 *MSVCRT__errno() = MSVCRT_EMFILE
;
1774 msvcrt_set_errno(GetLastError());
1779 static int check_bom(HANDLE h
, int oflags
, BOOL seek
)
1781 char bom
[sizeof(utf8_bom
)];
1784 oflags
&= ~(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
);
1786 if (!ReadFile(h
, bom
, sizeof(utf8_bom
), &r
, NULL
))
1789 if (r
==sizeof(utf8_bom
) && !memcmp(bom
, utf8_bom
, sizeof(utf8_bom
))) {
1790 oflags
|= MSVCRT__O_U8TEXT
;
1791 }else if (r
>=sizeof(utf16_bom
) && !memcmp(bom
, utf16_bom
, sizeof(utf16_bom
))) {
1793 SetFilePointer(h
, 2, NULL
, FILE_BEGIN
);
1794 oflags
|= MSVCRT__O_U16TEXT
;
1796 SetFilePointer(h
, 0, NULL
, FILE_BEGIN
);
1802 /*********************************************************************
1803 * _wsopen_s (MSVCRT.@)
1805 int CDECL
MSVCRT__wsopen_s( int *fd
, const MSVCRT_wchar_t
* path
, int oflags
, int shflags
, int pmode
)
1807 DWORD access
= 0, creation
= 0, attrib
;
1808 SECURITY_ATTRIBUTES sa
;
1813 TRACE("fd*: %p :file (%s) oflags: 0x%04x shflags: 0x%04x pmode: 0x%04x\n",
1814 fd
, debugstr_w(path
), oflags
, shflags
, pmode
);
1816 if (!MSVCRT_CHECK_PMT( fd
!= NULL
)) return MSVCRT_EINVAL
;
1819 wxflag
= split_oflags(oflags
);
1820 switch (oflags
& (MSVCRT__O_RDONLY
| MSVCRT__O_WRONLY
| MSVCRT__O_RDWR
))
1822 case MSVCRT__O_RDONLY
: access
|= GENERIC_READ
; break;
1823 case MSVCRT__O_WRONLY
: access
|= GENERIC_WRITE
; break;
1824 case MSVCRT__O_RDWR
: access
|= GENERIC_WRITE
| GENERIC_READ
; break;
1827 if (oflags
& MSVCRT__O_CREAT
)
1829 if(pmode
& ~(MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
))
1830 FIXME(": pmode 0x%04x ignored\n", pmode
);
1832 WARN(": pmode 0x%04x ignored\n", pmode
);
1834 if (oflags
& MSVCRT__O_EXCL
)
1835 creation
= CREATE_NEW
;
1836 else if (oflags
& MSVCRT__O_TRUNC
)
1837 creation
= CREATE_ALWAYS
;
1839 creation
= OPEN_ALWAYS
;
1841 else /* no MSVCRT__O_CREAT */
1843 if (oflags
& MSVCRT__O_TRUNC
)
1844 creation
= TRUNCATE_EXISTING
;
1846 creation
= OPEN_EXISTING
;
1851 case MSVCRT__SH_DENYRW
:
1854 case MSVCRT__SH_DENYWR
:
1855 sharing
= FILE_SHARE_READ
;
1857 case MSVCRT__SH_DENYRD
:
1858 sharing
= FILE_SHARE_WRITE
;
1860 case MSVCRT__SH_DENYNO
:
1861 sharing
= FILE_SHARE_READ
| FILE_SHARE_WRITE
;
1864 ERR( "Unhandled shflags 0x%x\n", shflags
);
1865 return MSVCRT_EINVAL
;
1867 attrib
= FILE_ATTRIBUTE_NORMAL
;
1869 if (oflags
& MSVCRT__O_TEMPORARY
)
1871 attrib
|= FILE_FLAG_DELETE_ON_CLOSE
;
1873 sharing
|= FILE_SHARE_DELETE
;
1876 sa
.nLength
= sizeof( SECURITY_ATTRIBUTES
);
1877 sa
.lpSecurityDescriptor
= NULL
;
1878 sa
.bInheritHandle
= !(oflags
& MSVCRT__O_NOINHERIT
);
1880 if ((oflags
&(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
))
1881 && (creation
==OPEN_ALWAYS
|| creation
==OPEN_EXISTING
)
1882 && !(access
&GENERIC_READ
))
1884 hand
= CreateFileW(path
, GENERIC_READ
, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
1885 &sa
, OPEN_EXISTING
, FILE_ATTRIBUTE_NORMAL
, 0);
1886 if (hand
!= INVALID_HANDLE_VALUE
)
1888 oflags
= check_bom(hand
, oflags
, FALSE
);
1892 oflags
&= ~(MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
);
1895 hand
= CreateFileW(path
, access
, sharing
, &sa
, creation
, attrib
, 0);
1896 if (hand
== INVALID_HANDLE_VALUE
) {
1897 WARN(":failed-last error (%d)\n",GetLastError());
1898 msvcrt_set_errno(GetLastError());
1899 return *MSVCRT__errno();
1902 if (oflags
& (MSVCRT__O_WTEXT
|MSVCRT__O_U16TEXT
|MSVCRT__O_U8TEXT
))
1904 if ((access
& GENERIC_WRITE
) && (creation
==CREATE_NEW
1905 || creation
==CREATE_ALWAYS
|| creation
==TRUNCATE_EXISTING
1906 || (creation
==OPEN_ALWAYS
&& GetLastError()==ERROR_ALREADY_EXISTS
)))
1908 if (oflags
& MSVCRT__O_U8TEXT
)
1910 DWORD written
= 0, tmp
;
1912 while(written
!=sizeof(utf8_bom
) && WriteFile(hand
, (char*)utf8_bom
+written
,
1913 sizeof(utf8_bom
)-written
, &tmp
, NULL
))
1915 if (written
!= sizeof(utf8_bom
)) {
1916 WARN("error writting BOM\n");
1918 msvcrt_set_errno(GetLastError());
1919 return *MSVCRT__errno();
1924 DWORD written
= 0, tmp
;
1926 while(written
!=sizeof(utf16_bom
) && WriteFile(hand
, (char*)utf16_bom
+written
,
1927 sizeof(utf16_bom
)-written
, &tmp
, NULL
))
1929 if (written
!= sizeof(utf16_bom
))
1931 WARN("error writting BOM\n");
1933 msvcrt_set_errno(GetLastError());
1934 return *MSVCRT__errno();
1938 else if (access
& GENERIC_READ
)
1939 oflags
= check_bom(hand
, oflags
, TRUE
);
1942 *fd
= msvcrt_alloc_fd(hand
, wxflag
);
1944 return *MSVCRT__errno();
1946 if (oflags
& MSVCRT__O_WTEXT
)
1947 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF16
|EF_UNK_UNICODE
;
1948 else if (oflags
& MSVCRT__O_U16TEXT
)
1949 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF16
;
1950 else if (oflags
& MSVCRT__O_U8TEXT
)
1951 msvcrt_get_ioinfo(*fd
)->exflag
|= EF_UTF8
;
1953 TRACE(":fd (%d) handle (%p)\n", *fd
, hand
);
1957 /*********************************************************************
1958 * _wsopen (MSVCRT.@)
1960 int CDECL
MSVCRT__wsopen( const MSVCRT_wchar_t
*path
, int oflags
, int shflags
, ... )
1965 if (oflags
& MSVCRT__O_CREAT
)
1969 __ms_va_start(ap
, shflags
);
1970 pmode
= va_arg(ap
, int);
1976 MSVCRT__wsopen_s(&fd
, path
, oflags
, shflags
, pmode
);
1980 /*********************************************************************
1981 * _sopen_s (MSVCRT.@)
1983 int CDECL
MSVCRT__sopen_s( int *fd
, const char *path
, int oflags
, int shflags
, int pmode
)
1985 MSVCRT_wchar_t
*pathW
;
1988 if(!MSVCRT_CHECK_PMT(path
&& (pathW
= msvcrt_wstrdupa(path
))))
1989 return MSVCRT_EINVAL
;
1991 ret
= MSVCRT__wsopen_s(fd
, pathW
, oflags
, shflags
, pmode
);
1996 /*********************************************************************
1999 int CDECL
MSVCRT__sopen( const char *path
, int oflags
, int shflags
, ... )
2004 if (oflags
& MSVCRT__O_CREAT
)
2008 __ms_va_start(ap
, shflags
);
2009 pmode
= va_arg(ap
, int);
2015 MSVCRT__sopen_s(&fd
, path
, oflags
, shflags
, pmode
);
2019 /*********************************************************************
2022 int CDECL
MSVCRT__open( const char *path
, int flags
, ... )
2026 if (flags
& MSVCRT__O_CREAT
)
2029 __ms_va_start(ap
, flags
);
2030 pmode
= va_arg(ap
, int);
2032 return MSVCRT__sopen( path
, flags
, MSVCRT__SH_DENYNO
, pmode
);
2035 return MSVCRT__sopen( path
, flags
, MSVCRT__SH_DENYNO
);
2038 /*********************************************************************
2041 int CDECL
MSVCRT__wopen(const MSVCRT_wchar_t
*path
,int flags
,...)
2045 if (flags
& MSVCRT__O_CREAT
)
2048 __ms_va_start(ap
, flags
);
2049 pmode
= va_arg(ap
, int);
2051 return MSVCRT__wsopen( path
, flags
, MSVCRT__SH_DENYNO
, pmode
);
2054 return MSVCRT__wsopen( path
, flags
, MSVCRT__SH_DENYNO
);
2057 /*********************************************************************
2060 int CDECL
MSVCRT__creat(const char *path
, int flags
)
2062 int usedFlags
= (flags
& MSVCRT__O_TEXT
)| MSVCRT__O_CREAT
| MSVCRT__O_WRONLY
| MSVCRT__O_TRUNC
;
2063 return MSVCRT__open(path
, usedFlags
);
2066 /*********************************************************************
2067 * _wcreat (MSVCRT.@)
2069 int CDECL
MSVCRT__wcreat(const MSVCRT_wchar_t
*path
, int flags
)
2071 int usedFlags
= (flags
& MSVCRT__O_TEXT
)| MSVCRT__O_CREAT
| MSVCRT__O_WRONLY
| MSVCRT__O_TRUNC
;
2072 return MSVCRT__wopen(path
, usedFlags
);
2075 /*********************************************************************
2076 * _open_osfhandle (MSVCRT.@)
2078 int CDECL
MSVCRT__open_osfhandle(MSVCRT_intptr_t handle
, int oflags
)
2082 /* MSVCRT__O_RDONLY (0) always matches, so set the read flag
2083 * MFC's CStdioFile clears O_RDONLY (0)! if it wants to write to the
2084 * file, so set the write flag. It also only sets MSVCRT__O_TEXT if it wants
2085 * text - it never sets MSVCRT__O_BINARY.
2087 /* don't let split_oflags() decide the mode if no mode is passed */
2088 if (!(oflags
& (MSVCRT__O_BINARY
| MSVCRT__O_TEXT
)))
2089 oflags
|= MSVCRT__O_BINARY
;
2091 fd
= msvcrt_alloc_fd((HANDLE
)handle
, split_oflags(oflags
));
2092 TRACE(":handle (%ld) fd (%d) flags 0x%08x\n", handle
, fd
, oflags
);
2096 /*********************************************************************
2099 int CDECL
MSVCRT__rmtmp(void)
2101 int num_removed
= 0, i
;
2105 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
2106 file
= msvcrt_get_file(i
);
2108 if (file
->_tmpfname
)
2110 MSVCRT_fclose(file
);
2117 TRACE(":removed (%d) temp files\n",num_removed
);
2121 static inline int get_utf8_char_len(char ch
)
2123 if((ch
&0xf8) == 0xf0)
2125 else if((ch
&0xf0) == 0xe0)
2127 else if((ch
&0xe0) == 0xc0)
2132 /*********************************************************************
2133 * (internal) read_utf8
2135 static int read_utf8(int fd
, MSVCRT_wchar_t
*buf
, unsigned int count
)
2137 ioinfo
*fdinfo
= msvcrt_get_ioinfo(fd
);
2138 HANDLE hand
= fdinfo
->handle
;
2139 char min_buf
[4], *readbuf
, lookahead
;
2140 DWORD readbuf_size
, pos
=0, num_read
=1, char_len
, i
, j
;
2142 /* make the buffer big enough to hold at least one character */
2143 /* read bytes have to fit to output and lookahead buffers */
2145 readbuf_size
= count
< 4 ? 4 : count
;
2146 if(readbuf_size
<=4 || !(readbuf
= MSVCRT_malloc(readbuf_size
))) {
2151 if(fdinfo
->lookahead
[0] != '\n') {
2152 readbuf
[pos
++] = fdinfo
->lookahead
[0];
2153 fdinfo
->lookahead
[0] = '\n';
2155 if(fdinfo
->lookahead
[1] != '\n') {
2156 readbuf
[pos
++] = fdinfo
->lookahead
[1];
2157 fdinfo
->lookahead
[1] = '\n';
2159 if(fdinfo
->lookahead
[2] != '\n') {
2160 readbuf
[pos
++] = fdinfo
->lookahead
[2];
2161 fdinfo
->lookahead
[2] = '\n';
2166 /* NOTE: this case is broken in native dll, reading
2167 * sometimes fails when small buffer is passed
2170 if(!pos
&& !ReadFile(hand
, readbuf
, 1, &num_read
, NULL
)) {
2171 if (GetLastError() == ERROR_BROKEN_PIPE
) {
2172 fdinfo
->wxflag
|= WX_ATEOF
;
2175 msvcrt_set_errno(GetLastError());
2178 }else if(!num_read
) {
2179 fdinfo
->wxflag
|= WX_ATEOF
;
2185 char_len
= get_utf8_char_len(readbuf
[0]);
2187 if(ReadFile(hand
, readbuf
+pos
, char_len
-pos
, &num_read
, NULL
))
2191 if(readbuf
[0] == '\n')
2192 fdinfo
->wxflag
|= WX_READNL
;
2194 fdinfo
->wxflag
&= ~WX_READNL
;
2196 if(readbuf
[0] == 0x1a) {
2197 fdinfo
->wxflag
|= WX_ATEOF
;
2201 if(readbuf
[0] == '\r') {
2202 if(!ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || num_read
!=1)
2204 else if(lookahead
== '\n')
2208 if(fdinfo
->wxflag
& WX_PIPE
)
2209 fdinfo
->lookahead
[0] = lookahead
;
2211 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2216 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2217 msvcrt_set_errno(GetLastError());
2224 if(!ReadFile(hand
, readbuf
+pos
, readbuf_size
-pos
, &num_read
, NULL
)) {
2227 }else if(GetLastError() == ERROR_BROKEN_PIPE
) {
2228 fdinfo
->wxflag
|= WX_ATEOF
;
2231 msvcrt_set_errno(GetLastError());
2234 }else if(!pos
&& !num_read
) {
2235 fdinfo
->wxflag
|= WX_ATEOF
;
2240 if(readbuf
[0] == '\n')
2241 fdinfo
->wxflag
|= WX_READNL
;
2243 fdinfo
->wxflag
&= ~WX_READNL
;
2245 /* Find first byte of last character (may be incomplete) */
2246 for(i
=pos
-1; i
>0 && i
>pos
-4; i
--)
2247 if((readbuf
[i
]&0xc0) != 0x80)
2249 char_len
= get_utf8_char_len(readbuf
[i
]);
2250 if(char_len
+i
<= pos
)
2253 if(fdinfo
->wxflag
& WX_PIPE
) {
2255 fdinfo
->lookahead
[0] = readbuf
[i
];
2257 fdinfo
->lookahead
[1] = readbuf
[i
+1];
2259 fdinfo
->lookahead
[2] = readbuf
[i
+2];
2261 SetFilePointer(fdinfo
->handle
, i
-pos
, NULL
, FILE_CURRENT
);
2265 for(i
=0, j
=0; i
<pos
; i
++) {
2266 if(readbuf
[i
] == 0x1a) {
2267 fdinfo
->wxflag
|= WX_ATEOF
;
2271 /* strip '\r' if followed by '\n' */
2272 if(readbuf
[i
] == '\r' && i
+1==pos
) {
2273 if(fdinfo
->lookahead
[0] != '\n' || !ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || !num_read
) {
2274 readbuf
[j
++] = '\r';
2275 }else if(lookahead
== '\n' && j
==0) {
2276 readbuf
[j
++] = '\n';
2278 if(lookahead
!= '\n')
2279 readbuf
[j
++] = '\r';
2281 if(fdinfo
->wxflag
& WX_PIPE
)
2282 fdinfo
->lookahead
[0] = lookahead
;
2284 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2286 }else if(readbuf
[i
]!='\r' || readbuf
[i
+1]!='\n') {
2287 readbuf
[j
++] = readbuf
[i
];
2292 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2293 msvcrt_set_errno(GetLastError());
2300 /*********************************************************************
2303 * When reading \r as last character in text mode, read() positions
2304 * the file pointer on the \r character while getc() goes on to
2307 static int read_i(int fd
, void *buf
, unsigned int count
)
2309 DWORD num_read
, utf16
;
2310 char *bufstart
= buf
;
2311 HANDLE hand
= msvcrt_fdtoh(fd
);
2312 ioinfo
*fdinfo
= msvcrt_get_ioinfo(fd
);
2317 if (fdinfo
->wxflag
& WX_ATEOF
) {
2318 TRACE("already at EOF, returning 0\n");
2321 /* Don't trace small reads, it gets *very* annoying */
2323 TRACE(":fd (%d) handle (%p) buf (%p) len (%d)\n",fd
,hand
,buf
,count
);
2324 if (hand
== INVALID_HANDLE_VALUE
)
2326 *MSVCRT__errno() = MSVCRT_EBADF
;
2330 utf16
= (fdinfo
->exflag
& EF_UTF16
) != 0;
2331 if (((fdinfo
->exflag
&EF_UTF8
) || utf16
) && count
&1)
2333 *MSVCRT__errno() = MSVCRT_EINVAL
;
2337 if((fdinfo
->wxflag
&WX_TEXT
) && (fdinfo
->exflag
&EF_UTF8
))
2338 return read_utf8(fd
, buf
, count
);
2340 if (fdinfo
->lookahead
[0]!='\n' || ReadFile(hand
, bufstart
, count
, &num_read
, NULL
))
2342 if (fdinfo
->lookahead
[0] != '\n')
2344 bufstart
[0] = fdinfo
->lookahead
[0];
2345 fdinfo
->lookahead
[0] = '\n';
2349 bufstart
[1] = fdinfo
->lookahead
[1];
2350 fdinfo
->lookahead
[1] = '\n';
2353 if(count
>1+utf16
&& ReadFile(hand
, bufstart
+1+utf16
, count
-1-utf16
, &num_read
, NULL
))
2354 num_read
+= 1+utf16
;
2359 if(utf16
&& (num_read
&1))
2361 /* msvcr90 uses uninitialized value from the buffer in this case */
2362 /* msvcrt ignores additional data */
2363 ERR("got odd number of bytes in UTF16 mode\n");
2367 if (count
!= 0 && num_read
== 0)
2369 fdinfo
->wxflag
|= WX_ATEOF
;
2370 TRACE(":EOF %s\n",debugstr_an(buf
,num_read
));
2372 else if (fdinfo
->wxflag
& WX_TEXT
)
2376 if (bufstart
[0]=='\n' && (!utf16
|| bufstart
[1]==0))
2377 fdinfo
->wxflag
|= WX_READNL
;
2379 fdinfo
->wxflag
&= ~WX_READNL
;
2381 for (i
=0, j
=0; i
<num_read
; i
+=1+utf16
)
2383 /* in text mode, a ctrl-z signals EOF */
2384 if (bufstart
[i
]==0x1a && (!utf16
|| bufstart
[i
+1]==0))
2386 fdinfo
->wxflag
|= WX_ATEOF
;
2387 TRACE(":^Z EOF %s\n",debugstr_an(buf
,num_read
));
2391 /* in text mode, strip \r if followed by \n */
2392 if (bufstart
[i
]=='\r' && (!utf16
|| bufstart
[i
+1]==0) && i
+1+utf16
==num_read
)
2397 lookahead
[1] = '\n';
2398 if (ReadFile(hand
, lookahead
, 1+utf16
, &len
, NULL
) && len
)
2400 if(lookahead
[0]=='\n' && (!utf16
|| lookahead
[1]==0) && j
==0)
2402 bufstart
[j
++] = '\n';
2403 if(utf16
) bufstart
[j
++] = 0;
2407 if(lookahead
[0]!='\n' || (utf16
&& lookahead
[1]!=0))
2409 bufstart
[j
++] = '\r';
2410 if(utf16
) bufstart
[j
++] = 0;
2413 if (fdinfo
->wxflag
& WX_PIPE
)
2415 fdinfo
->lookahead
[0] = lookahead
[0];
2416 fdinfo
->lookahead
[1] = lookahead
[1];
2419 SetFilePointer(fdinfo
->handle
, -1-utf16
, NULL
, FILE_CURRENT
);
2424 bufstart
[j
++] = '\r';
2425 if(utf16
) bufstart
[j
++] = 0;
2428 else if((bufstart
[i
]!='\r' || (utf16
&& bufstart
[i
+1]!=0))
2429 || (bufstart
[i
+1+utf16
]!='\n' || (utf16
&& bufstart
[i
+3]!=0)))
2431 bufstart
[j
++] = bufstart
[i
];
2432 if(utf16
) bufstart
[j
++] = bufstart
[i
+1];
2440 if (GetLastError() == ERROR_BROKEN_PIPE
)
2442 TRACE(":end-of-pipe\n");
2443 fdinfo
->wxflag
|= WX_ATEOF
;
2448 TRACE(":failed-last error (%d)\n",GetLastError());
2454 TRACE("(%u), %s\n",num_read
,debugstr_an(buf
, num_read
));
2458 /*********************************************************************
2461 int CDECL
MSVCRT__read(int fd
, void *buf
, unsigned int count
)
2464 num_read
= read_i(fd
, buf
, count
);
2468 /*********************************************************************
2469 * _setmode (MSVCRT.@)
2471 int CDECL
MSVCRT__setmode(int fd
,int mode
)
2473 int ret
= msvcrt_get_ioinfo(fd
)->wxflag
& WX_TEXT
? MSVCRT__O_TEXT
: MSVCRT__O_BINARY
;
2474 if(ret
==MSVCRT__O_TEXT
&& (msvcrt_get_ioinfo(fd
)->exflag
& (EF_UTF8
|EF_UTF16
)))
2475 ret
= MSVCRT__O_WTEXT
;
2477 if(mode
!=MSVCRT__O_TEXT
&& mode
!=MSVCRT__O_BINARY
&& mode
!=MSVCRT__O_WTEXT
2478 && mode
!=MSVCRT__O_U16TEXT
&& mode
!=MSVCRT__O_U8TEXT
) {
2479 *MSVCRT__errno() = MSVCRT_EINVAL
;
2483 if(mode
== MSVCRT__O_BINARY
) {
2484 msvcrt_get_ioinfo(fd
)->wxflag
&= ~WX_TEXT
;
2485 msvcrt_get_ioinfo(fd
)->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2489 msvcrt_get_ioinfo(fd
)->wxflag
|= WX_TEXT
;
2490 if(mode
== MSVCRT__O_TEXT
)
2491 msvcrt_get_ioinfo(fd
)->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2492 else if(mode
== MSVCRT__O_U8TEXT
)
2493 msvcrt_get_ioinfo(fd
)->exflag
= (msvcrt_get_ioinfo(fd
)->exflag
& ~EF_UTF16
) | EF_UTF8
;
2495 msvcrt_get_ioinfo(fd
)->exflag
= (msvcrt_get_ioinfo(fd
)->exflag
& ~EF_UTF8
) | EF_UTF16
;
2500 /*********************************************************************
2501 * _stat64 (MSVCRT.@)
2503 int CDECL
MSVCRT_stat64(const char* path
, struct MSVCRT__stat64
* buf
)
2506 WIN32_FILE_ATTRIBUTE_DATA hfi
;
2507 unsigned short mode
= ALL_S_IREAD
;
2510 TRACE(":file (%s) buf(%p)\n",path
,buf
);
2512 plen
= strlen(path
);
2513 while (plen
&& path
[plen
-1]==' ')
2516 if (plen
&& (path
[plen
-1]=='\\' || path
[plen
-1]=='/'))
2518 *MSVCRT__errno() = MSVCRT_ENOENT
;
2522 if (!GetFileAttributesExA(path
, GetFileExInfoStandard
, &hfi
))
2524 TRACE("failed (%d)\n",GetLastError());
2525 *MSVCRT__errno() = MSVCRT_ENOENT
;
2529 memset(buf
,0,sizeof(struct MSVCRT__stat64
));
2531 /* FIXME: rdev isn't drive num, despite what the docs say-what is it?
2532 Bon 011120: This FIXME seems incorrect
2533 Also a letter as first char isn't enough to be classified
2536 if (isalpha(*path
)&& (*(path
+1)==':'))
2537 buf
->st_dev
= buf
->st_rdev
= toupper(*path
) - 'A'; /* drive num */
2539 buf
->st_dev
= buf
->st_rdev
= MSVCRT__getdrive() - 1;
2541 /* Dir, or regular file? */
2542 if (hfi
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
2543 mode
|= (MSVCRT__S_IFDIR
| ALL_S_IEXEC
);
2546 mode
|= MSVCRT__S_IFREG
;
2548 if (plen
> 6 && path
[plen
-4] == '.') /* shortest exe: "\x.exe" */
2550 unsigned int ext
= tolower(path
[plen
-1]) | (tolower(path
[plen
-2]) << 8) |
2551 (tolower(path
[plen
-3]) << 16);
2552 if (ext
== EXE
|| ext
== BAT
|| ext
== CMD
|| ext
== COM
)
2553 mode
|= ALL_S_IEXEC
;
2557 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
2558 mode
|= ALL_S_IWRITE
;
2560 buf
->st_mode
= mode
;
2562 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
2563 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
2565 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
2566 buf
->st_mtime
= buf
->st_ctime
= dw
;
2567 TRACE("%d %d 0x%08x%08x %d %d %d\n", buf
->st_mode
,buf
->st_nlink
,
2568 (int)(buf
->st_size
>> 32),(int)buf
->st_size
,
2569 (int)buf
->st_atime
,(int)buf
->st_mtime
,(int)buf
->st_ctime
);
2573 /*********************************************************************
2574 * _stati64 (MSVCRT.@)
2576 int CDECL
MSVCRT_stati64(const char* path
, struct MSVCRT__stati64
* buf
)
2579 struct MSVCRT__stat64 buf64
;
2581 ret
= MSVCRT_stat64(path
, &buf64
);
2583 msvcrt_stat64_to_stati64(&buf64
, buf
);
2587 /*********************************************************************
2590 int CDECL
MSVCRT_stat(const char* path
, struct MSVCRT__stat
* buf
)
2592 struct MSVCRT__stat64 buf64
;
2594 ret
= MSVCRT_stat64( path
, &buf64
);
2596 msvcrt_stat64_to_stat(&buf64
, buf
);
2600 /*********************************************************************
2601 * _wstat64 (MSVCRT.@)
2603 int CDECL
MSVCRT__wstat64(const MSVCRT_wchar_t
* path
, struct MSVCRT__stat64
* buf
)
2606 WIN32_FILE_ATTRIBUTE_DATA hfi
;
2607 unsigned short mode
= ALL_S_IREAD
;
2610 TRACE(":file (%s) buf(%p)\n",debugstr_w(path
),buf
);
2612 plen
= strlenW(path
);
2613 while (plen
&& path
[plen
-1]==' ')
2616 if(plen
&& (path
[plen
-1]=='\\' || path
[plen
-1]=='/'))
2618 *MSVCRT__errno() = MSVCRT_ENOENT
;
2622 if (!GetFileAttributesExW(path
, GetFileExInfoStandard
, &hfi
))
2624 TRACE("failed (%d)\n",GetLastError());
2625 *MSVCRT__errno() = MSVCRT_ENOENT
;
2629 memset(buf
,0,sizeof(struct MSVCRT__stat64
));
2631 /* FIXME: rdev isn't drive num, despite what the docs says-what is it? */
2632 if (MSVCRT_iswalpha(*path
))
2633 buf
->st_dev
= buf
->st_rdev
= toupperW(*path
- 'A'); /* drive num */
2635 buf
->st_dev
= buf
->st_rdev
= MSVCRT__getdrive() - 1;
2637 /* Dir, or regular file? */
2638 if (hfi
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
2639 mode
|= (MSVCRT__S_IFDIR
| ALL_S_IEXEC
);
2642 mode
|= MSVCRT__S_IFREG
;
2644 if (plen
> 6 && path
[plen
-4] == '.') /* shortest exe: "\x.exe" */
2646 ULONGLONG ext
= tolowerW(path
[plen
-1]) | (tolowerW(path
[plen
-2]) << 16) |
2647 ((ULONGLONG
)tolowerW(path
[plen
-3]) << 32);
2648 if (ext
== WCEXE
|| ext
== WCBAT
|| ext
== WCCMD
|| ext
== WCCOM
)
2649 mode
|= ALL_S_IEXEC
;
2653 if (!(hfi
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
2654 mode
|= ALL_S_IWRITE
;
2656 buf
->st_mode
= mode
;
2658 buf
->st_size
= ((__int64
)hfi
.nFileSizeHigh
<< 32) + hfi
.nFileSizeLow
;
2659 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastAccessTime
, &dw
);
2661 RtlTimeToSecondsSince1970((LARGE_INTEGER
*)&hfi
.ftLastWriteTime
, &dw
);
2662 buf
->st_mtime
= buf
->st_ctime
= dw
;
2663 TRACE("%d %d 0x%08x%08x %d %d %d\n", buf
->st_mode
,buf
->st_nlink
,
2664 (int)(buf
->st_size
>> 32),(int)buf
->st_size
,
2665 (int)buf
->st_atime
,(int)buf
->st_mtime
,(int)buf
->st_ctime
);
2669 /*********************************************************************
2670 * _wstati64 (MSVCRT.@)
2672 int CDECL
MSVCRT__wstati64(const MSVCRT_wchar_t
* path
, struct MSVCRT__stati64
* buf
)
2675 struct MSVCRT__stat64 buf64
;
2677 ret
= MSVCRT__wstat64(path
, &buf64
);
2679 msvcrt_stat64_to_stati64(&buf64
, buf
);
2683 /*********************************************************************
2686 int CDECL
MSVCRT__wstat(const MSVCRT_wchar_t
* path
, struct MSVCRT__stat
* buf
)
2689 struct MSVCRT__stat64 buf64
;
2691 ret
= MSVCRT__wstat64( path
, &buf64
);
2692 if (!ret
) msvcrt_stat64_to_stat(&buf64
, buf
);
2696 /*********************************************************************
2699 MSVCRT_long CDECL
MSVCRT__tell(int fd
)
2701 return MSVCRT__lseek(fd
, 0, SEEK_CUR
);
2704 /*********************************************************************
2705 * _telli64 (MSVCRT.@)
2707 __int64 CDECL
_telli64(int fd
)
2709 return MSVCRT__lseeki64(fd
, 0, SEEK_CUR
);
2712 /*********************************************************************
2713 * _tempnam (MSVCRT.@)
2715 char * CDECL
MSVCRT__tempnam(const char *dir
, const char *prefix
)
2717 char tmpbuf
[MAX_PATH
];
2718 const char *tmp_dir
= MSVCRT_getenv("TMP");
2720 if (tmp_dir
) dir
= tmp_dir
;
2722 TRACE("dir (%s) prefix (%s)\n",dir
,prefix
);
2723 if (GetTempFileNameA(dir
,prefix
,0,tmpbuf
))
2725 TRACE("got name (%s)\n",tmpbuf
);
2726 DeleteFileA(tmpbuf
);
2727 return MSVCRT__strdup(tmpbuf
);
2729 TRACE("failed (%d)\n",GetLastError());
2733 /*********************************************************************
2734 * _wtempnam (MSVCRT.@)
2736 MSVCRT_wchar_t
* CDECL
MSVCRT__wtempnam(const MSVCRT_wchar_t
*dir
, const MSVCRT_wchar_t
*prefix
)
2738 static const MSVCRT_wchar_t tmpW
[] = {'T','M','P',0};
2739 MSVCRT_wchar_t tmpbuf
[MAX_PATH
];
2740 const MSVCRT_wchar_t
*tmp_dir
= MSVCRT__wgetenv(tmpW
);
2742 if (tmp_dir
) dir
= tmp_dir
;
2744 TRACE("dir (%s) prefix (%s)\n",debugstr_w(dir
),debugstr_w(prefix
));
2745 if (GetTempFileNameW(dir
,prefix
,0,tmpbuf
))
2747 TRACE("got name (%s)\n",debugstr_w(tmpbuf
));
2748 DeleteFileW(tmpbuf
);
2749 return MSVCRT__wcsdup(tmpbuf
);
2751 TRACE("failed (%d)\n",GetLastError());
2755 /*********************************************************************
2758 int CDECL
MSVCRT__umask(int umask
)
2760 int old_umask
= MSVCRT_umask
;
2761 TRACE("(%d)\n",umask
);
2762 MSVCRT_umask
= umask
;
2766 /*********************************************************************
2767 * _utime64 (MSVCRT.@)
2769 int CDECL
_utime64(const char* path
, struct MSVCRT___utimbuf64
*t
)
2771 int fd
= MSVCRT__open(path
, MSVCRT__O_WRONLY
| MSVCRT__O_BINARY
);
2775 int retVal
= _futime64(fd
, t
);
2782 /*********************************************************************
2783 * _utime32 (MSVCRT.@)
2785 int CDECL
_utime32(const char* path
, struct MSVCRT___utimbuf32
*t
)
2789 struct MSVCRT___utimbuf64 t64
;
2790 t64
.actime
= t
->actime
;
2791 t64
.modtime
= t
->modtime
;
2792 return _utime64( path
, &t64
);
2795 return _utime64( path
, NULL
);
2798 /*********************************************************************
2802 int CDECL
_utime(const char* path
, struct MSVCRT___utimbuf64
*t
)
2804 return _utime64( path
, t
);
2807 int CDECL
_utime(const char* path
, struct MSVCRT___utimbuf32
*t
)
2809 return _utime32( path
, t
);
2813 /*********************************************************************
2814 * _wutime64 (MSVCRT.@)
2816 int CDECL
_wutime64(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf64
*t
)
2818 int fd
= MSVCRT__wopen(path
, MSVCRT__O_WRONLY
| MSVCRT__O_BINARY
);
2822 int retVal
= _futime64(fd
, t
);
2829 /*********************************************************************
2830 * _wutime32 (MSVCRT.@)
2832 int CDECL
_wutime32(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf32
*t
)
2836 struct MSVCRT___utimbuf64 t64
;
2837 t64
.actime
= t
->actime
;
2838 t64
.modtime
= t
->modtime
;
2839 return _wutime64( path
, &t64
);
2842 return _wutime64( path
, NULL
);
2845 /*********************************************************************
2846 * _wutime (MSVCRT.@)
2849 int CDECL
_wutime(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf64
*t
)
2851 return _wutime64( path
, t
);
2854 int CDECL
_wutime(const MSVCRT_wchar_t
* path
, struct MSVCRT___utimbuf32
*t
)
2856 return _wutime32( path
, t
);
2860 /*********************************************************************
2863 int CDECL
MSVCRT__write(int fd
, const void* buf
, unsigned int count
)
2866 ioinfo
*info
= msvcrt_get_ioinfo(fd
);
2867 HANDLE hand
= info
->handle
;
2869 /* Don't trace small writes, it gets *very* annoying */
2872 TRACE(":fd (%d) handle (%d) buf (%p) len (%d)\n",fd
,hand
,buf
,count
);
2874 if (hand
== INVALID_HANDLE_VALUE
)
2876 *MSVCRT__errno() = MSVCRT_EBADF
;
2880 if (((info
->exflag
&EF_UTF8
) || (info
->exflag
&EF_UTF16
)) && count
&1)
2882 *MSVCRT__errno() = MSVCRT_EINVAL
;
2886 /* If appending, go to EOF */
2887 if (info
->wxflag
& WX_APPEND
)
2888 MSVCRT__lseek(fd
, 0, FILE_END
);
2890 if (!(info
->wxflag
& WX_TEXT
))
2892 if (WriteFile(hand
, buf
, count
, &num_written
, NULL
)
2893 && (num_written
== count
))
2895 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d)\n", fd
,
2896 hand
, GetLastError());
2897 *MSVCRT__errno() = MSVCRT_ENOSPC
;
2901 unsigned int i
, j
, nr_lf
, size
;
2904 const char *s
= buf
, *buf_start
= buf
;
2906 if (!(info
->exflag
& (EF_UTF8
|EF_UTF16
)))
2908 /* find number of \n */
2909 for (nr_lf
=0, i
=0; i
<count
; i
++)
2915 if ((q
= p
= MSVCRT_malloc(size
)))
2917 for (s
= buf
, i
= 0, j
= 0; i
< count
; i
++)
2926 FIXME("Malloc failed\n");
2938 else if (info
->exflag
& EF_UTF16
)
2940 for (nr_lf
=0, i
=0; i
<count
; i
+=2)
2941 if (s
[i
]=='\n' && s
[i
+1]==0)
2946 if ((q
= p
= MSVCRT_malloc(size
)))
2948 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
2950 if (s
[i
]=='\n' && s
[i
+1]==0)
2961 FIXME("Malloc failed\n");
2977 for(nr_lf
=0, i
=0; i
<count
; i
+=2)
2978 if (s
[i
]=='\n' && s
[i
+1]==0)
2981 conv_len
= WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)buf
, count
/2, NULL
, 0, NULL
, NULL
);
2983 msvcrt_set_errno(GetLastError());
2988 size
= conv_len
+nr_lf
;
2989 if((p
= MSVCRT_malloc(count
+nr_lf
*2+size
)))
2991 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
2993 if (s
[i
]=='\n' && s
[i
+1]==0)
3001 q
= p
+count
+nr_lf
*2;
3002 WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)p
, count
/2+nr_lf
,
3003 p
+count
+nr_lf
*2, conv_len
+nr_lf
, NULL
, NULL
);
3007 FIXME("Malloc failed\n");
3014 if (!WriteFile(hand
, q
, size
, &num_written
, NULL
))
3018 if (num_written
!= size
)
3020 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d), num_written %d\n",
3021 fd
, hand
, GetLastError(), num_written
);
3022 *MSVCRT__errno() = MSVCRT_ENOSPC
;
3023 return s
- buf_start
;
3031 /*********************************************************************
3034 int CDECL
MSVCRT__putw(int val
, MSVCRT_FILE
* file
)
3038 MSVCRT__lock_file(file
);
3039 len
= MSVCRT__write(file
->_file
, &val
, sizeof(val
));
3040 if (len
== sizeof(val
)) {
3041 MSVCRT__unlock_file(file
);
3045 file
->_flag
|= MSVCRT__IOERR
;
3046 MSVCRT__unlock_file(file
);
3050 /*********************************************************************
3053 int CDECL
MSVCRT_fclose(MSVCRT_FILE
* file
)
3057 MSVCRT__lock_file(file
);
3059 MSVCRT_free(file
->_tmpfname
);
3060 file
->_tmpfname
= NULL
;
3061 /* flush stdio buffers */
3062 if(file
->_flag
& MSVCRT__IOWRT
)
3063 MSVCRT_fflush(file
);
3064 if(file
->_flag
& MSVCRT__IOMYBUF
)
3065 MSVCRT_free(file
->_base
);
3067 r
=MSVCRT__close(file
->_file
);
3070 MSVCRT__unlock_file(file
);
3072 return ((r
== -1) || (flag
& MSVCRT__IOERR
) ? MSVCRT_EOF
: 0);
3075 /*********************************************************************
3078 int CDECL
MSVCRT_feof(MSVCRT_FILE
* file
)
3080 return file
->_flag
& MSVCRT__IOEOF
;
3083 /*********************************************************************
3086 int CDECL
MSVCRT_ferror(MSVCRT_FILE
* file
)
3088 return file
->_flag
& MSVCRT__IOERR
;
3091 /*********************************************************************
3092 * _filbuf (MSVCRT.@)
3094 int CDECL
MSVCRT__filbuf(MSVCRT_FILE
* file
)
3097 MSVCRT__lock_file(file
);
3099 /* Allocate buffer if needed */
3100 if(file
->_bufsiz
== 0 && !(file
->_flag
& MSVCRT__IONBF
))
3101 msvcrt_alloc_buffer(file
);
3103 if(!(file
->_flag
& MSVCRT__IOREAD
)) {
3104 if(file
->_flag
& MSVCRT__IORW
)
3105 file
->_flag
|= MSVCRT__IOREAD
;
3107 MSVCRT__unlock_file(file
);
3112 if(file
->_flag
& MSVCRT__IONBF
) {
3114 if ((r
= read_i(file
->_file
,&c
,1)) != 1) {
3115 file
->_flag
|= (r
== 0) ? MSVCRT__IOEOF
: MSVCRT__IOERR
;
3116 MSVCRT__unlock_file(file
);
3120 MSVCRT__unlock_file(file
);
3123 file
->_cnt
= read_i(file
->_file
, file
->_base
, file
->_bufsiz
);
3125 file
->_flag
|= (file
->_cnt
== 0) ? MSVCRT__IOEOF
: MSVCRT__IOERR
;
3127 MSVCRT__unlock_file(file
);
3132 file
->_ptr
= file
->_base
+1;
3133 c
= *(unsigned char *)file
->_base
;
3134 MSVCRT__unlock_file(file
);
3139 /*********************************************************************
3142 int CDECL
MSVCRT_fgetc(MSVCRT_FILE
* file
)
3147 MSVCRT__lock_file(file
);
3150 i
= (unsigned char *)file
->_ptr
++;
3153 j
= MSVCRT__filbuf(file
);
3155 MSVCRT__unlock_file(file
);
3159 /*********************************************************************
3160 * _fgetchar (MSVCRT.@)
3162 int CDECL
MSVCRT__fgetchar(void)
3164 return MSVCRT_fgetc(MSVCRT_stdin
);
3167 /*********************************************************************
3170 char * CDECL
MSVCRT_fgets(char *s
, int size
, MSVCRT_FILE
* file
)
3172 int cc
= MSVCRT_EOF
;
3173 char * buf_start
= s
;
3175 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
3176 file
,file
->_file
,s
,size
);
3178 MSVCRT__lock_file(file
);
3180 while ((size
>1) && (cc
= MSVCRT_fgetc(file
)) != MSVCRT_EOF
&& cc
!= '\n')
3185 if ((cc
== MSVCRT_EOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
3187 TRACE(":nothing read\n");
3188 MSVCRT__unlock_file(file
);
3191 if ((cc
!= MSVCRT_EOF
) && (size
> 1))
3194 TRACE(":got %s\n", debugstr_a(buf_start
));
3195 MSVCRT__unlock_file(file
);
3199 /*********************************************************************
3202 * In MSVCRT__O_TEXT mode, multibyte characters are read from the file, dropping
3203 * the CR from CR/LF combinations
3205 MSVCRT_wint_t CDECL
MSVCRT_fgetwc(MSVCRT_FILE
* file
)
3209 MSVCRT__lock_file(file
);
3210 if (!(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
))
3217 for(i
=0; i
<sizeof(wc
); i
++)
3227 j
= MSVCRT__filbuf(file
);
3230 file
->_flag
|= (file
->_cnt
== 0) ? MSVCRT__IOEOF
: MSVCRT__IOERR
;
3233 MSVCRT__unlock_file(file
);
3240 MSVCRT__unlock_file(file
);
3244 c
= MSVCRT_fgetc(file
);
3245 if ((get_locinfo()->mb_cur_max
> 1) && MSVCRT_isleadbyte(c
))
3247 FIXME("Treat Multibyte characters\n");
3250 MSVCRT__unlock_file(file
);
3251 if (c
== MSVCRT_EOF
)
3254 return (MSVCRT_wint_t
)c
;
3257 /*********************************************************************
3260 int CDECL
MSVCRT__getw(MSVCRT_FILE
* file
)
3267 MSVCRT__lock_file(file
);
3268 for (j
=0; j
<sizeof(int); j
++) {
3269 k
= MSVCRT_fgetc(file
);
3270 if (k
== MSVCRT_EOF
) {
3271 file
->_flag
|= MSVCRT__IOEOF
;
3272 MSVCRT__unlock_file(file
);
3278 MSVCRT__unlock_file(file
);
3282 /*********************************************************************
3285 MSVCRT_wint_t CDECL
MSVCRT_getwc(MSVCRT_FILE
* file
)
3287 return MSVCRT_fgetwc(file
);
3290 /*********************************************************************
3291 * _fgetwchar (MSVCRT.@)
3293 MSVCRT_wint_t CDECL
MSVCRT__fgetwchar(void)
3295 return MSVCRT_fgetwc(MSVCRT_stdin
);
3298 /*********************************************************************
3299 * getwchar (MSVCRT.@)
3301 MSVCRT_wint_t CDECL
MSVCRT_getwchar(void)
3303 return MSVCRT__fgetwchar();
3306 /*********************************************************************
3309 MSVCRT_wchar_t
* CDECL
MSVCRT_fgetws(MSVCRT_wchar_t
*s
, int size
, MSVCRT_FILE
* file
)
3311 int cc
= MSVCRT_WEOF
;
3312 MSVCRT_wchar_t
* buf_start
= s
;
3314 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
3315 file
,file
->_file
,s
,size
);
3317 MSVCRT__lock_file(file
);
3319 while ((size
>1) && (cc
= MSVCRT_fgetwc(file
)) != MSVCRT_WEOF
&& cc
!= '\n')
3324 if ((cc
== MSVCRT_WEOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
3326 TRACE(":nothing read\n");
3327 MSVCRT__unlock_file(file
);
3330 if ((cc
!= MSVCRT_WEOF
) && (size
> 1))
3333 TRACE(":got %s\n", debugstr_w(buf_start
));
3334 MSVCRT__unlock_file(file
);
3338 /*********************************************************************
3341 MSVCRT_size_t CDECL
MSVCRT_fwrite(const void *ptr
, MSVCRT_size_t size
, MSVCRT_size_t nmemb
, MSVCRT_FILE
* file
)
3343 MSVCRT_size_t wrcnt
=size
* nmemb
;
3348 MSVCRT__lock_file(file
);
3350 int pcnt
=(file
->_cnt
>wrcnt
)? wrcnt
: file
->_cnt
;
3351 memcpy(file
->_ptr
, ptr
, pcnt
);
3356 ptr
= (const char*)ptr
+ pcnt
;
3357 } else if(!(file
->_flag
& MSVCRT__IOWRT
)) {
3358 if(file
->_flag
& MSVCRT__IORW
) {
3359 file
->_flag
|= MSVCRT__IOWRT
;
3361 MSVCRT__unlock_file(file
);
3368 if(file
->_bufsiz
== 0 && !(file
->_flag
& MSVCRT__IONBF
))
3369 msvcrt_alloc_buffer(file
);
3372 res
=msvcrt_flush_buffer(file
);
3374 int pwritten
= MSVCRT__write(file
->_file
, ptr
, wrcnt
);
3377 file
->_flag
|= MSVCRT__IOERR
;
3380 written
+= pwritten
;
3384 MSVCRT__unlock_file(file
);
3385 return written
/ size
;
3388 /*********************************************************************
3391 MSVCRT_wint_t CDECL
MSVCRT_fputwc(MSVCRT_wint_t wc
, MSVCRT_FILE
* file
)
3393 MSVCRT_wchar_t mwc
=wc
;
3397 MSVCRT__lock_file(file
);
3398 fdinfo
= msvcrt_get_ioinfo(file
->_file
);
3400 if((fdinfo
->wxflag
&WX_TEXT
) && !(fdinfo
->exflag
&(EF_UTF8
|EF_UTF16
))) {
3401 char buf
[MSVCRT_MB_LEN_MAX
];
3404 char_len
= MSVCRT_wctomb(buf
, mwc
);
3405 if(char_len
!=-1 && MSVCRT_fwrite(buf
, char_len
, 1, file
)==1)
3409 }else if(MSVCRT_fwrite(&mwc
, sizeof(mwc
), 1, file
) == 1) {
3415 MSVCRT__unlock_file(file
);
3419 /*********************************************************************
3420 * _fputwchar (MSVCRT.@)
3422 MSVCRT_wint_t CDECL
MSVCRT__fputwchar(MSVCRT_wint_t wc
)
3424 return MSVCRT_fputwc(wc
, MSVCRT_stdout
);
3427 /*********************************************************************
3428 * _wfsopen (MSVCRT.@)
3430 MSVCRT_FILE
* CDECL
MSVCRT__wfsopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, int share
)
3433 int open_flags
, stream_flags
, fd
;
3435 TRACE("(%s,%s)\n", debugstr_w(path
), debugstr_w(mode
));
3437 /* map mode string to open() flags. "man fopen" for possibilities. */
3438 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1)
3442 fd
= MSVCRT__wsopen(path
, open_flags
, share
, MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
);
3445 else if ((file
= msvcrt_alloc_fp()) && msvcrt_init_fp(file
, fd
, stream_flags
)
3447 TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
3454 TRACE(":got (%p)\n",file
);
3455 if (fd
>= 0 && !file
)
3461 /*********************************************************************
3462 * _fsopen (MSVCRT.@)
3464 MSVCRT_FILE
* CDECL
MSVCRT__fsopen(const char *path
, const char *mode
, int share
)
3467 MSVCRT_wchar_t
*pathW
= NULL
, *modeW
= NULL
;
3469 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) {
3470 MSVCRT__invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3471 *MSVCRT__errno() = MSVCRT_EINVAL
;
3474 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
3477 MSVCRT__invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3478 *MSVCRT__errno() = MSVCRT_EINVAL
;
3482 ret
= MSVCRT__wfsopen(pathW
, modeW
, share
);
3489 /*********************************************************************
3492 MSVCRT_FILE
* CDECL
MSVCRT_fopen(const char *path
, const char *mode
)
3494 return MSVCRT__fsopen( path
, mode
, MSVCRT__SH_DENYNO
);
3497 /*********************************************************************
3498 * fopen_s (MSVCRT.@)
3500 int CDECL
MSVCRT_fopen_s(MSVCRT_FILE
** pFile
,
3501 const char *filename
, const char *mode
)
3503 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3504 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return MSVCRT_EINVAL
;
3505 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3507 *pFile
= MSVCRT_fopen(filename
, mode
);
3510 return *MSVCRT__errno();
3514 /*********************************************************************
3515 * _wfopen (MSVCRT.@)
3517 MSVCRT_FILE
* CDECL
MSVCRT__wfopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
)
3519 return MSVCRT__wfsopen( path
, mode
, MSVCRT__SH_DENYNO
);
3522 /*********************************************************************
3523 * _wfopen_s (MSVCRT.@)
3525 int CDECL
MSVCRT__wfopen_s(MSVCRT_FILE
** pFile
, const MSVCRT_wchar_t
*filename
,
3526 const MSVCRT_wchar_t
*mode
)
3528 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3529 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return MSVCRT_EINVAL
;
3530 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3532 *pFile
= MSVCRT__wfopen(filename
, mode
);
3535 return *MSVCRT__errno();
3539 /*********************************************************************
3540 * _flsbuf (MSVCRT.@)
3542 int CDECL
MSVCRT__flsbuf(int c
, MSVCRT_FILE
* file
)
3544 /* Flush output buffer */
3545 if(file
->_bufsiz
== 0 && !(file
->_flag
& MSVCRT__IONBF
)) {
3546 msvcrt_alloc_buffer(file
);
3548 if(!(file
->_flag
& MSVCRT__IOWRT
)) {
3549 if(file
->_flag
& MSVCRT__IORW
)
3550 file
->_flag
|= MSVCRT__IOWRT
;
3558 res
= msvcrt_flush_buffer(file
);
3562 res
= msvcrt_flush_buffer(file
);
3565 return res
? res
: c
&0xff;
3569 /* set _cnt to 0 for unbuffered FILEs */
3571 len
= MSVCRT__write(file
->_file
, &cc
, 1);
3574 file
->_flag
|= MSVCRT__IOERR
;
3579 /*********************************************************************
3582 int CDECL
MSVCRT_fputc(int c
, MSVCRT_FILE
* file
)
3586 MSVCRT__lock_file(file
);
3592 res
= msvcrt_flush_buffer(file
);
3593 MSVCRT__unlock_file(file
);
3594 return res
? res
: c
;
3597 MSVCRT__unlock_file(file
);
3601 res
= MSVCRT__flsbuf(c
, file
);
3602 MSVCRT__unlock_file(file
);
3607 /*********************************************************************
3608 * _fputchar (MSVCRT.@)
3610 int CDECL
MSVCRT__fputchar(int c
)
3612 return MSVCRT_fputc(c
, MSVCRT_stdout
);
3615 /*********************************************************************
3618 MSVCRT_size_t CDECL
MSVCRT_fread(void *ptr
, MSVCRT_size_t size
, MSVCRT_size_t nmemb
, MSVCRT_FILE
* file
)
3620 MSVCRT_size_t rcnt
=size
* nmemb
;
3621 MSVCRT_size_t read
=0;
3627 MSVCRT__lock_file(file
);
3629 /* first buffered data */
3631 int pcnt
= (rcnt
>file
->_cnt
)? file
->_cnt
:rcnt
;
3632 memcpy(ptr
, file
->_ptr
, pcnt
);
3637 ptr
= (char*)ptr
+ pcnt
;
3638 } else if(!(file
->_flag
& MSVCRT__IOREAD
)) {
3639 if(file
->_flag
& MSVCRT__IORW
) {
3640 file
->_flag
|= MSVCRT__IOREAD
;
3642 MSVCRT__unlock_file(file
);
3649 /* Fill the buffer on small reads.
3650 * TODO: Use a better buffering strategy.
3652 if (!file
->_cnt
&& size
*nmemb
<= MSVCRT_BUFSIZ
/2 && !(file
->_flag
& MSVCRT__IONBF
)) {
3653 if (file
->_bufsiz
== 0) {
3654 msvcrt_alloc_buffer(file
);
3656 file
->_cnt
= MSVCRT__read(file
->_file
, file
->_base
, file
->_bufsiz
);
3657 file
->_ptr
= file
->_base
;
3658 i
= (file
->_cnt
<rcnt
) ? file
->_cnt
: rcnt
;
3659 /* If the buffer fill reaches eof but fread wouldn't, clear eof. */
3660 if (i
> 0 && i
< file
->_cnt
) {
3661 msvcrt_get_ioinfo(file
->_file
)->wxflag
&= ~WX_ATEOF
;
3662 file
->_flag
&= ~MSVCRT__IOEOF
;
3665 memcpy(ptr
, file
->_ptr
, i
);
3670 i
= MSVCRT__read(file
->_file
,ptr
, rcnt
);
3674 ptr
= (char *)ptr
+i
;
3675 /* expose feof condition in the flags
3676 * MFC tests file->_flag for feof, and doesn't call feof())
3678 if (msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_ATEOF
)
3679 file
->_flag
|= MSVCRT__IOEOF
;
3682 file
->_flag
|= MSVCRT__IOERR
;
3689 MSVCRT__unlock_file(file
);
3693 /*********************************************************************
3694 * _wfreopen (MSVCRT.@)
3697 MSVCRT_FILE
* CDECL
MSVCRT__wfreopen(const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, MSVCRT_FILE
* file
)
3701 TRACE(":path (%s) mode (%s) file (%p) fd (%d)\n", debugstr_w(path
), debugstr_w(mode
), file
, file
->_file
);
3704 if (!file
|| ((fd
= file
->_file
) < 0) || fd
> MSVCRT_fdend
)
3708 MSVCRT_fclose(file
);
3709 file
= MSVCRT__wfsopen(path
, mode
, MSVCRT__SH_DENYNO
);
3715 /*********************************************************************
3716 * _wfreopen_s (MSVCRT.@)
3718 int CDECL
MSVCRT__wfreopen_s(MSVCRT_FILE
** pFile
,
3719 const MSVCRT_wchar_t
*path
, const MSVCRT_wchar_t
*mode
, MSVCRT_FILE
* file
)
3721 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3722 if (!MSVCRT_CHECK_PMT(path
!= NULL
)) return MSVCRT_EINVAL
;
3723 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3724 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
3726 *pFile
= MSVCRT__wfreopen(path
, mode
, file
);
3729 return *MSVCRT__errno();
3733 /*********************************************************************
3734 * freopen (MSVCRT.@)
3737 MSVCRT_FILE
* CDECL
MSVCRT_freopen(const char *path
, const char *mode
, MSVCRT_FILE
* file
)
3740 MSVCRT_wchar_t
*pathW
= NULL
, *modeW
= NULL
;
3742 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) return NULL
;
3743 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
3749 ret
= MSVCRT__wfreopen(pathW
, modeW
, file
);
3756 /*********************************************************************
3757 * freopen_s (MSVCRT.@)
3759 int CDECL
MSVCRT_freopen_s(MSVCRT_FILE
** pFile
,
3760 const char *path
, const char *mode
, MSVCRT_FILE
* file
)
3762 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return MSVCRT_EINVAL
;
3763 if (!MSVCRT_CHECK_PMT(path
!= NULL
)) return MSVCRT_EINVAL
;
3764 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return MSVCRT_EINVAL
;
3765 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
3767 *pFile
= MSVCRT_freopen(path
, mode
, file
);
3770 return *MSVCRT__errno();
3774 /*********************************************************************
3775 * fsetpos (MSVCRT.@)
3777 int CDECL
MSVCRT_fsetpos(MSVCRT_FILE
* file
, MSVCRT_fpos_t
*pos
)
3781 MSVCRT__lock_file(file
);
3782 /* Note that all this has been lifted 'as is' from fseek */
3783 if(file
->_flag
& MSVCRT__IOWRT
)
3784 msvcrt_flush_buffer(file
);
3786 /* Discard buffered input */
3788 file
->_ptr
= file
->_base
;
3790 /* Reset direction of i/o */
3791 if(file
->_flag
& MSVCRT__IORW
) {
3792 file
->_flag
&= ~(MSVCRT__IOREAD
|MSVCRT__IOWRT
);
3795 ret
= (MSVCRT__lseeki64(file
->_file
,*pos
,SEEK_SET
) == -1) ? -1 : 0;
3796 MSVCRT__unlock_file(file
);
3800 /*********************************************************************
3801 * _ftelli64 (MSVCRT.@)
3803 __int64 CDECL
MSVCRT__ftelli64(MSVCRT_FILE
* file
)
3807 MSVCRT__lock_file(file
);
3808 pos
= _telli64(file
->_file
);
3810 MSVCRT__unlock_file(file
);
3814 if(file
->_flag
& MSVCRT__IOWRT
) {
3815 pos
+= file
->_ptr
- file
->_base
;
3817 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
3820 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
3824 } else if(!file
->_cnt
) { /* nothing to do */
3825 } else if(MSVCRT__lseeki64(file
->_file
, 0, SEEK_END
)==pos
) {
3829 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
3830 for(i
=0; i
<file
->_cnt
; i
++)
3831 if(file
->_ptr
[i
] == '\n')
3837 if(MSVCRT__lseeki64(file
->_file
, pos
, SEEK_SET
) != pos
) {
3838 MSVCRT__unlock_file(file
);
3842 pos
-= file
->_bufsiz
;
3843 pos
+= file
->_ptr
- file
->_base
;
3845 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
) {
3846 if(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_READNL
)
3849 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
3856 MSVCRT__unlock_file(file
);
3860 /*********************************************************************
3863 LONG CDECL
MSVCRT_ftell(MSVCRT_FILE
* file
)
3865 return MSVCRT__ftelli64(file
);
3868 /*********************************************************************
3869 * fgetpos (MSVCRT.@)
3871 int CDECL
MSVCRT_fgetpos(MSVCRT_FILE
* file
, MSVCRT_fpos_t
*pos
)
3873 *pos
= MSVCRT__ftelli64(file
);
3879 /*********************************************************************
3882 int CDECL
MSVCRT_fputs(const char *s
, MSVCRT_FILE
* file
)
3884 MSVCRT_size_t len
= strlen(s
);
3887 MSVCRT__lock_file(file
);
3888 ret
= MSVCRT_fwrite(s
, sizeof(*s
), len
, file
) == len
? 0 : MSVCRT_EOF
;
3889 MSVCRT__unlock_file(file
);
3893 /*********************************************************************
3896 int CDECL
MSVCRT_fputws(const MSVCRT_wchar_t
*s
, MSVCRT_FILE
* file
)
3898 MSVCRT_size_t i
, len
= strlenW(s
);
3901 MSVCRT__lock_file(file
);
3902 if (!(msvcrt_get_ioinfo(file
->_file
)->wxflag
& WX_TEXT
)) {
3903 ret
= MSVCRT_fwrite(s
,sizeof(*s
),len
,file
) == len
? 0 : MSVCRT_EOF
;
3904 MSVCRT__unlock_file(file
);
3907 for (i
=0; i
<len
; i
++) {
3908 if(MSVCRT_fputwc(s
[i
], file
) == MSVCRT_WEOF
) {
3909 MSVCRT__unlock_file(file
);
3914 MSVCRT__unlock_file(file
);
3918 /*********************************************************************
3919 * getchar (MSVCRT.@)
3921 int CDECL
MSVCRT_getchar(void)
3923 return MSVCRT_fgetc(MSVCRT_stdin
);
3926 /*********************************************************************
3929 int CDECL
MSVCRT_getc(MSVCRT_FILE
* file
)
3931 return MSVCRT_fgetc(file
);
3934 /*********************************************************************
3937 char * CDECL
MSVCRT_gets(char *buf
)
3940 char * buf_start
= buf
;
3942 MSVCRT__lock_file(MSVCRT_stdin
);
3943 for(cc
= MSVCRT_fgetc(MSVCRT_stdin
); cc
!= MSVCRT_EOF
&& cc
!= '\n';
3944 cc
= MSVCRT_fgetc(MSVCRT_stdin
))
3945 if(cc
!= '\r') *buf
++ = (char)cc
;
3949 TRACE("got '%s'\n", buf_start
);
3950 MSVCRT__unlock_file(MSVCRT_stdin
);
3954 /*********************************************************************
3957 MSVCRT_wchar_t
* CDECL
MSVCRT__getws(MSVCRT_wchar_t
* buf
)
3960 MSVCRT_wchar_t
* ws
= buf
;
3962 MSVCRT__lock_file(MSVCRT_stdin
);
3963 for (cc
= MSVCRT_fgetwc(MSVCRT_stdin
); cc
!= MSVCRT_WEOF
&& cc
!= '\n';
3964 cc
= MSVCRT_fgetwc(MSVCRT_stdin
))
3967 *buf
++ = (MSVCRT_wchar_t
)cc
;
3971 TRACE("got %s\n", debugstr_w(ws
));
3972 MSVCRT__unlock_file(MSVCRT_stdin
);
3976 /*********************************************************************
3979 int CDECL
MSVCRT_putc(int c
, MSVCRT_FILE
* file
)
3981 return MSVCRT_fputc(c
, file
);
3984 /*********************************************************************
3985 * putchar (MSVCRT.@)
3987 int CDECL
MSVCRT_putchar(int c
)
3989 return MSVCRT_fputc(c
, MSVCRT_stdout
);
3992 /*********************************************************************
3993 * _putwch (MSVCRT.@)
3995 int CDECL
MSVCRT__putwch(int c
)
3997 return MSVCRT_fputwc(c
, MSVCRT_stdout
);
4000 /*********************************************************************
4003 int CDECL
MSVCRT_puts(const char *s
)
4005 MSVCRT_size_t len
= strlen(s
);
4008 MSVCRT__lock_file(MSVCRT_stdout
);
4009 if(MSVCRT_fwrite(s
, sizeof(*s
), len
, MSVCRT_stdout
) != len
) {
4010 MSVCRT__unlock_file(MSVCRT_stdout
);
4014 ret
= MSVCRT_fwrite("\n",1,1,MSVCRT_stdout
) == 1 ? 0 : MSVCRT_EOF
;
4015 MSVCRT__unlock_file(MSVCRT_stdout
);
4019 /*********************************************************************
4022 int CDECL
MSVCRT__putws(const MSVCRT_wchar_t
*s
)
4024 static const MSVCRT_wchar_t nl
= '\n';
4025 MSVCRT_size_t len
= strlenW(s
);
4028 MSVCRT__lock_file(MSVCRT_stdout
);
4029 if(MSVCRT_fwrite(s
, sizeof(*s
), len
, MSVCRT_stdout
) != len
) {
4030 MSVCRT__unlock_file(MSVCRT_stdout
);
4034 ret
= MSVCRT_fwrite(&nl
,sizeof(nl
),1,MSVCRT_stdout
) == 1 ? 0 : MSVCRT_EOF
;
4035 MSVCRT__unlock_file(MSVCRT_stdout
);
4039 /*********************************************************************
4042 int CDECL
MSVCRT_remove(const char *path
)
4044 TRACE("(%s)\n",path
);
4045 if (DeleteFileA(path
))
4047 TRACE(":failed (%d)\n",GetLastError());
4048 msvcrt_set_errno(GetLastError());
4052 /*********************************************************************
4053 * _wremove (MSVCRT.@)
4055 int CDECL
MSVCRT__wremove(const MSVCRT_wchar_t
*path
)
4057 TRACE("(%s)\n",debugstr_w(path
));
4058 if (DeleteFileW(path
))
4060 TRACE(":failed (%d)\n",GetLastError());
4061 msvcrt_set_errno(GetLastError());
4065 /*********************************************************************
4068 int CDECL
MSVCRT_rename(const char *oldpath
,const char *newpath
)
4070 TRACE(":from %s to %s\n",oldpath
,newpath
);
4071 if (MoveFileExA(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
4073 TRACE(":failed (%d)\n",GetLastError());
4074 msvcrt_set_errno(GetLastError());
4078 /*********************************************************************
4079 * _wrename (MSVCRT.@)
4081 int CDECL
MSVCRT__wrename(const MSVCRT_wchar_t
*oldpath
,const MSVCRT_wchar_t
*newpath
)
4083 TRACE(":from %s to %s\n",debugstr_w(oldpath
),debugstr_w(newpath
));
4084 if (MoveFileExW(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
4086 TRACE(":failed (%d)\n",GetLastError());
4087 msvcrt_set_errno(GetLastError());
4091 /*********************************************************************
4092 * setvbuf (MSVCRT.@)
4094 int CDECL
MSVCRT_setvbuf(MSVCRT_FILE
* file
, char *buf
, int mode
, MSVCRT_size_t size
)
4096 MSVCRT__lock_file(file
);
4098 MSVCRT_free(file
->_base
);
4102 if(mode
== MSVCRT__IOFBF
) {
4103 file
->_flag
&= ~MSVCRT__IONBF
;
4104 file
->_base
= file
->_ptr
= buf
;
4106 file
->_bufsiz
= size
;
4109 file
->_flag
|= MSVCRT__IONBF
;
4111 MSVCRT__unlock_file(file
);
4115 /*********************************************************************
4118 void CDECL
MSVCRT_setbuf(MSVCRT_FILE
* file
, char *buf
)
4120 MSVCRT_setvbuf(file
, buf
, buf
? MSVCRT__IOFBF
: MSVCRT__IONBF
, MSVCRT_BUFSIZ
);
4123 /*********************************************************************
4126 char * CDECL
MSVCRT_tmpnam(char *s
)
4133 thread_data_t
*data
= msvcrt_get_thread_data();
4135 if(!data
->tmpnam_buffer
)
4136 data
->tmpnam_buffer
= MSVCRT_malloc(MAX_PATH
);
4138 s
= data
->tmpnam_buffer
;
4141 msvcrt_int_to_base32(GetCurrentProcessId(), tmpstr
);
4142 p
= s
+ sprintf(s
, "\\s%s.", tmpstr
);
4143 for (count
= 0; count
< MSVCRT_TMP_MAX
; count
++)
4145 size
= msvcrt_int_to_base32(tmpnam_unique
++, tmpstr
);
4146 memcpy(p
, tmpstr
, size
);
4148 if (GetFileAttributesA(s
) == INVALID_FILE_ATTRIBUTES
&&
4149 GetLastError() == ERROR_FILE_NOT_FOUND
)
4155 /*********************************************************************
4156 * _wtmpnam (MSVCRT.@)
4158 MSVCRT_wchar_t
* CDECL
MSVCRT_wtmpnam(MSVCRT_wchar_t
*s
)
4160 static const MSVCRT_wchar_t format
[] = {'\\','s','%','s','.',0};
4161 MSVCRT_wchar_t tmpstr
[16];
4165 thread_data_t
*data
= msvcrt_get_thread_data();
4167 if(!data
->wtmpnam_buffer
)
4168 data
->wtmpnam_buffer
= MSVCRT_malloc(sizeof(MSVCRT_wchar_t
[MAX_PATH
]));
4170 s
= data
->wtmpnam_buffer
;
4173 msvcrt_int_to_base32_w(GetCurrentProcessId(), tmpstr
);
4174 p
= s
+ MSVCRT__snwprintf(s
, MAX_PATH
, format
, tmpstr
);
4175 for (count
= 0; count
< MSVCRT_TMP_MAX
; count
++)
4177 size
= msvcrt_int_to_base32_w(tmpnam_unique
++, tmpstr
);
4178 memcpy(p
, tmpstr
, size
*sizeof(MSVCRT_wchar_t
));
4180 if (GetFileAttributesW(s
) == INVALID_FILE_ATTRIBUTES
&&
4181 GetLastError() == ERROR_FILE_NOT_FOUND
)
4187 /*********************************************************************
4188 * tmpfile (MSVCRT.@)
4190 MSVCRT_FILE
* CDECL
MSVCRT_tmpfile(void)
4192 char *filename
= MSVCRT_tmpnam(NULL
);
4194 MSVCRT_FILE
* file
= NULL
;
4197 fd
= MSVCRT__open(filename
, MSVCRT__O_CREAT
| MSVCRT__O_BINARY
| MSVCRT__O_RDWR
| MSVCRT__O_TEMPORARY
,
4198 MSVCRT__S_IREAD
| MSVCRT__S_IWRITE
);
4199 if (fd
!= -1 && (file
= msvcrt_alloc_fp()))
4201 if (msvcrt_init_fp(file
, fd
, MSVCRT__IORW
) == -1)
4206 else file
->_tmpfname
= MSVCRT__strdup(filename
);
4209 if(fd
!= -1 && !file
)
4215 /*********************************************************************
4216 * tmpfile_s (MSVCRT.@)
4218 int CDECL
MSVCRT_tmpfile_s(MSVCRT_FILE
** file
)
4220 if (!MSVCRT_CHECK_PMT(file
!= NULL
)) return MSVCRT_EINVAL
;
4222 *file
= MSVCRT_tmpfile();
4226 static int puts_clbk_file_a(void *file
, int len
, const char *str
)
4228 return MSVCRT_fwrite(str
, sizeof(char), len
, file
);
4231 static int puts_clbk_file_w(void *file
, int len
, const MSVCRT_wchar_t
*str
)
4235 MSVCRT__lock_file(file
);
4237 if(!(msvcrt_get_ioinfo(((MSVCRT_FILE
*)file
)->_file
)->wxflag
& WX_TEXT
)) {
4238 ret
= MSVCRT_fwrite(str
, sizeof(MSVCRT_wchar_t
), len
, file
);
4239 MSVCRT__unlock_file(file
);
4243 for(i
=0; i
<len
; i
++) {
4244 if(MSVCRT_fputwc(str
[i
], file
) == MSVCRT_WEOF
) {
4245 MSVCRT__unlock_file(file
);
4250 MSVCRT__unlock_file(file
);
4254 /*********************************************************************
4255 * vfprintf (MSVCRT.@)
4257 int CDECL
MSVCRT_vfprintf(MSVCRT_FILE
* file
, const char *format
, __ms_va_list valist
)
4261 MSVCRT__lock_file(file
);
4262 ret
= pf_printf_a(puts_clbk_file_a
, file
, format
, NULL
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4263 MSVCRT__unlock_file(file
);
4268 /*********************************************************************
4269 * vfprintf_s (MSVCRT.@)
4271 int CDECL
MSVCRT_vfprintf_s(MSVCRT_FILE
* file
, const char *format
, __ms_va_list valist
)
4275 if(!MSVCRT_CHECK_PMT(file
!= NULL
)) return -1;
4277 MSVCRT__lock_file(file
);
4278 ret
= pf_printf_a(puts_clbk_file_a
, file
, format
, NULL
, FALSE
, TRUE
, arg_clbk_valist
, NULL
, &valist
);
4279 MSVCRT__unlock_file(file
);
4284 /*********************************************************************
4285 * vfwprintf (MSVCRT.@)
4287 int CDECL
MSVCRT_vfwprintf(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4291 MSVCRT__lock_file(file
);
4292 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, NULL
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4293 MSVCRT__unlock_file(file
);
4298 /*********************************************************************
4299 * vfwprintf_s (MSVCRT.@)
4301 int CDECL
MSVCRT_vfwprintf_s(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4305 if (!MSVCRT_CHECK_PMT( file
!= NULL
)) return -1;
4307 MSVCRT__lock_file(file
);
4308 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, NULL
, FALSE
, TRUE
, arg_clbk_valist
, NULL
, &valist
);
4309 MSVCRT__unlock_file(file
);
4314 /*********************************************************************
4315 * _vfwprintf_l (MSVCRT.@)
4317 int CDECL
MSVCRT__vfwprintf_l(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
,
4318 MSVCRT__locale_t locale
, __ms_va_list valist
)
4322 if (!MSVCRT_CHECK_PMT( file
!= NULL
)) return -1;
4324 MSVCRT__lock_file(file
);
4325 ret
= pf_printf_w(puts_clbk_file_w
, file
, format
, locale
, FALSE
, FALSE
, arg_clbk_valist
, NULL
, &valist
);
4326 MSVCRT__unlock_file(file
);
4331 /*********************************************************************
4332 * vprintf (MSVCRT.@)
4334 int CDECL
MSVCRT_vprintf(const char *format
, __ms_va_list valist
)
4336 return MSVCRT_vfprintf(MSVCRT_stdout
,format
,valist
);
4339 /*********************************************************************
4340 * vprintf_s (MSVCRT.@)
4342 int CDECL
MSVCRT_vprintf_s(const char *format
, __ms_va_list valist
)
4344 return MSVCRT_vfprintf_s(MSVCRT_stdout
,format
,valist
);
4347 /*********************************************************************
4348 * vwprintf (MSVCRT.@)
4350 int CDECL
MSVCRT_vwprintf(const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4352 return MSVCRT_vfwprintf(MSVCRT_stdout
,format
,valist
);
4355 /*********************************************************************
4356 * vwprintf_s (MSVCRT.@)
4358 int CDECL
MSVCRT_vwprintf_s(const MSVCRT_wchar_t
*format
, __ms_va_list valist
)
4360 return MSVCRT_vfwprintf_s(MSVCRT_stdout
,format
,valist
);
4363 /*********************************************************************
4364 * fprintf (MSVCRT.@)
4366 int CDECL
MSVCRT_fprintf(MSVCRT_FILE
* file
, const char *format
, ...)
4368 __ms_va_list valist
;
4370 __ms_va_start(valist
, format
);
4371 res
= MSVCRT_vfprintf(file
, format
, valist
);
4372 __ms_va_end(valist
);
4376 /*********************************************************************
4377 * fprintf_s (MSVCRT.@)
4379 int CDECL
MSVCRT_fprintf_s(MSVCRT_FILE
* file
, const char *format
, ...)
4381 __ms_va_list valist
;
4383 __ms_va_start(valist
, format
);
4384 res
= MSVCRT_vfprintf_s(file
, format
, valist
);
4385 __ms_va_end(valist
);
4389 /*********************************************************************
4390 * fwprintf (MSVCRT.@)
4392 int CDECL
MSVCRT_fwprintf(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, ...)
4394 __ms_va_list valist
;
4396 __ms_va_start(valist
, format
);
4397 res
= MSVCRT_vfwprintf(file
, format
, valist
);
4398 __ms_va_end(valist
);
4402 /*********************************************************************
4403 * fwprintf_s (MSVCRT.@)
4405 int CDECL
MSVCRT_fwprintf_s(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, ...)
4407 __ms_va_list valist
;
4409 __ms_va_start(valist
, format
);
4410 res
= MSVCRT_vfwprintf_s(file
, format
, valist
);
4411 __ms_va_end(valist
);
4415 /*********************************************************************
4416 * _fwprintf_l (MSVCRT.@)
4418 int CDECL
MSVCRT__fwprintf_l(MSVCRT_FILE
* file
, const MSVCRT_wchar_t
*format
, MSVCRT__locale_t locale
, ...)
4420 __ms_va_list valist
;
4422 __ms_va_start(valist
, locale
);
4423 res
= MSVCRT__vfwprintf_l(file
, format
, locale
, valist
);
4424 __ms_va_end(valist
);
4428 /*********************************************************************
4431 int CDECL
MSVCRT_printf(const char *format
, ...)
4433 __ms_va_list valist
;
4435 __ms_va_start(valist
, format
);
4436 res
= MSVCRT_vfprintf(MSVCRT_stdout
, format
, valist
);
4437 __ms_va_end(valist
);
4441 /*********************************************************************
4442 * printf_s (MSVCRT.@)
4444 int CDECL
MSVCRT_printf_s(const char *format
, ...)
4446 __ms_va_list valist
;
4448 __ms_va_start(valist
, format
);
4449 res
= MSVCRT_vprintf_s(format
, valist
);
4450 __ms_va_end(valist
);
4454 /*********************************************************************
4457 int CDECL
MSVCRT_ungetc(int c
, MSVCRT_FILE
* file
)
4459 if (c
== MSVCRT_EOF
)
4462 MSVCRT__lock_file(file
);
4463 if(file
->_bufsiz
== 0) {
4464 msvcrt_alloc_buffer(file
);
4467 if(file
->_ptr
>file
->_base
) {
4471 MSVCRT_clearerr(file
);
4472 MSVCRT__unlock_file(file
);
4476 MSVCRT__unlock_file(file
);
4480 /*********************************************************************
4481 * ungetwc (MSVCRT.@)
4483 MSVCRT_wint_t CDECL
MSVCRT_ungetwc(MSVCRT_wint_t wc
, MSVCRT_FILE
* file
)
4485 MSVCRT_wchar_t mwc
= wc
;
4486 unsigned char * pp
= (unsigned char *)&mwc
;
4489 if (wc
== MSVCRT_WEOF
)
4492 MSVCRT__lock_file(file
);
4493 for(i
=sizeof(MSVCRT_wchar_t
)-1;i
>=0;i
--) {
4494 if(pp
[i
] != MSVCRT_ungetc(pp
[i
],file
)) {
4495 MSVCRT__unlock_file(file
);
4500 MSVCRT__unlock_file(file
);
4504 /*********************************************************************
4505 * wprintf (MSVCRT.@)
4507 int CDECL
MSVCRT_wprintf(const MSVCRT_wchar_t
*format
, ...)
4509 __ms_va_list valist
;
4511 __ms_va_start(valist
, format
);
4512 res
= MSVCRT_vwprintf(format
, valist
);
4513 __ms_va_end(valist
);
4517 /*********************************************************************
4518 * wprintf_s (MSVCRT.@)
4520 int CDECL
MSVCRT_wprintf_s(const MSVCRT_wchar_t
*format
, ...)
4522 __ms_va_list valist
;
4524 __ms_va_start(valist
, format
);
4525 res
= MSVCRT_vwprintf_s(format
, valist
);
4526 __ms_va_end(valist
);
4530 /*********************************************************************
4531 * _getmaxstdio (MSVCRT.@)
4533 int CDECL
MSVCRT__getmaxstdio(void)
4535 return MSVCRT_max_streams
;
4538 /*********************************************************************
4539 * _setmaxstdio (MSVCRT.@)
4541 int CDECL
MSVCRT__setmaxstdio(int newmax
)
4543 TRACE("%d\n", newmax
);
4545 if(newmax
<_IOB_ENTRIES
|| newmax
>MSVCRT_MAX_FILES
|| newmax
<MSVCRT_stream_idx
)
4548 MSVCRT_max_streams
= newmax
;
4549 return MSVCRT_max_streams
;