2 * PROJECT: ReactOS CRT library
3 * LICENSE: LGPL - See COPYING in the top level directory
4 * FILE: lib/sdk/crt/stdio/file.c
5 * PURPOSE: File CRT functions
6 * PROGRAMMERS: Wine team
7 * Ported to ReactOS by Aleksey Bragin (aleksey@reactos.org)
10 /*********************************************
11 * This file contains ReactOS changes!!
12 * Don't blindly sync it with Wine code!
14 * If you break Unicode output on the console again, please update this counter:
15 * int hours_wasted_on_this = 42;
16 *********************************************/
19 * msvcrt.dll file functions
21 * Copyright 1996,1998 Marcus Meissner
22 * Copyright 1996 Jukka Iivonen
23 * Copyright 1997,2000 Uwe Bonnes
24 * Copyright 2000 Jon Griffiths
25 * Copyright 2004 Eric Pouech
26 * Copyright 2004 Juan Lang
28 * This library is free software; you can redistribute it and/or
29 * modify it under the terms of the GNU Lesser General Public
30 * License as published by the Free Software Foundation; either
31 * version 2.1 of the License, or (at your option) any later version.
33 * This library is distributed in the hope that it will be useful,
34 * but WITHOUT ANY WARRANTY; without even the implied warranty of
35 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
36 * Lesser General Public License for more details.
38 * You should have received a copy of the GNU Lesser General Public
39 * License along with this library; if not, write to the Free Software
40 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
43 * Use the file flag hints O_SEQUENTIAL, O_RANDOM, O_SHORT_LIVED
47 #include "wine/unicode.h"
48 #include "internal/wine/msvcrt.h"
50 #include <sys/utime.h>
53 int *__p__fmode(void);
54 int *__p___mb_cur_max(void);
59 #define _IOCOMMIT 0x4000
87 /* _access() bit flags FIXME: incomplete */
88 /* defined in crt/io.h */
90 /* values for wxflag in file descriptor */
93 #define WX_READNL 0x04 /* read started with \n */
94 #define WX_READEOF 0x04 /* like ATEOF, but for underlying file rather than buffer */
96 #define WX_READCR 0x08 /* underlying file is at \r */
97 #define WX_DONTINHERIT 0x10
98 #define WX_APPEND 0x20
102 /* values for exflag - it's used differently in msvcr90.dll*/
104 #define EF_UTF16 0x02
105 #define EF_CRIT_INIT 0x04
106 #define EF_UNK_UNICODE 0x08
108 static char utf8_bom
[3] = { 0xef, 0xbb, 0xbf };
109 static char utf16_bom
[2] = { 0xff, 0xfe };
111 /* FIXME: this should be allocated dynamically */
112 #define MSVCRT_MAX_FILES 2048
113 #define MSVCRT_FD_BLOCK_SIZE 32
115 #define MSVCRT_INTERNAL_BUFSIZ 4096
117 /*********************************************************************
118 * __pioinfo (MSVCRT.@)
119 * array of pointers to ioinfo arrays [32]
121 ioinfo
* __pioinfo
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
] = { 0 };
123 /*********************************************************************
124 * __badioinfo (MSVCRT.@)
126 ioinfo __badioinfo
= { INVALID_HANDLE_VALUE
, WX_TEXT
};
128 static int fdstart
= 3; /* first unallocated fd */
129 static int fdend
= 3; /* highest allocated fd */
133 CRITICAL_SECTION crit
;
136 FILE _iob
[_IOB_ENTRIES
] = { { 0 } };
137 static file_crit
* MSVCRT_fstream
[MSVCRT_MAX_FILES
/MSVCRT_FD_BLOCK_SIZE
] = { NULL
};
138 static int MSVCRT_max_streams
= 512, MSVCRT_stream_idx
;
140 /* INTERNAL: process umask */
141 static int MSVCRT_umask
= 0;
143 /* INTERNAL: static data for tmpnam and _wtmpname functions */
144 static int tmpnam_unique
;
146 /* This critical section protects the tables __pioinfo and fstreams,
147 * and their related indexes, fdstart, fdend,
148 * and MSVCRT_stream_idx, from race conditions.
149 * It doesn't protect against race conditions manipulating the underlying files
150 * or flags; doing so would probably be better accomplished with per-file
151 * protection, rather than locking the whole table for every change.
153 static CRITICAL_SECTION MSVCRT_file_cs
;
154 static CRITICAL_SECTION_DEBUG MSVCRT_file_cs_debug
=
156 0, 0, &MSVCRT_file_cs
,
157 { &MSVCRT_file_cs_debug
.ProcessLocksList
, &MSVCRT_file_cs_debug
.ProcessLocksList
},
158 0, 0, { (DWORD_PTR
)(__FILE__
": MSVCRT_file_cs") }
160 static CRITICAL_SECTION MSVCRT_file_cs
= { &MSVCRT_file_cs_debug
, -1, 0, 0, 0, 0 };
161 #define LOCK_FILES() do { EnterCriticalSection(&MSVCRT_file_cs); } while (0)
162 #define UNLOCK_FILES() do { LeaveCriticalSection(&MSVCRT_file_cs); } while (0)
164 static inline ioinfo
* get_ioinfo_nolock(int fd
)
167 if(fd
>=0 && fd
<MSVCRT_MAX_FILES
)
168 ret
= __pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
];
172 return ret
+ (fd
%MSVCRT_FD_BLOCK_SIZE
);
175 /*static*/ inline ioinfo
* get_ioinfo(int fd
)
177 ioinfo
*ret
= get_ioinfo_nolock(fd
);
178 if(ret
== &__badioinfo
)
180 if(!(ret
->exflag
& EF_CRIT_INIT
)) {
182 if(!(ret
->exflag
& EF_CRIT_INIT
)) {
183 InitializeCriticalSection(&ret
->crit
);
184 ret
->exflag
|= EF_CRIT_INIT
;
188 EnterCriticalSection(&ret
->crit
);
192 static inline BOOL
alloc_pioinfo_block(int fd
)
197 if(fd
<0 || fd
>=MSVCRT_MAX_FILES
)
203 block
= calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(ioinfo
));
206 WARN(":out of memory!\n");
210 for(i
=0; i
<MSVCRT_FD_BLOCK_SIZE
; i
++)
211 block
[i
].handle
= INVALID_HANDLE_VALUE
;
212 if(InterlockedCompareExchangePointer((void**)&__pioinfo
[fd
/MSVCRT_FD_BLOCK_SIZE
], block
, NULL
))
217 static inline ioinfo
* get_ioinfo_alloc_fd(int fd
)
221 ret
= get_ioinfo(fd
);
222 if(ret
!= &__badioinfo
)
225 /* locate next free slot */
226 if (fd
== fdstart
&& fd
== fdend
)
228 else if (fd
== fdstart
)
231 while (fdstart
< fdend
&&
232 ((info
= get_ioinfo_nolock(fdstart
))->exflag
& EF_CRIT_INIT
))
234 if (TryEnterCriticalSection(&info
->crit
))
236 if (info
->handle
== INVALID_HANDLE_VALUE
)
238 LeaveCriticalSection(&info
->crit
);
241 LeaveCriticalSection(&info
->crit
);
246 /* update last fd in use */
249 TRACE("fdstart is %d, fdend is %d\n", fdstart
, fdend
);
254 if(!alloc_pioinfo_block(fd
))
257 ret
= get_ioinfo(fd
);
258 if(ret
== &__badioinfo
)
262 /* locate next free slot */
263 if (fd
== fdstart
&& fd
== fdend
)
265 else if (fd
== fdstart
)
268 while (fdstart
< fdend
&&
269 ((info
= get_ioinfo_nolock(fdstart
))->exflag
& EF_CRIT_INIT
))
271 if (TryEnterCriticalSection(&info
->crit
))
273 if (info
->handle
== INVALID_HANDLE_VALUE
)
275 LeaveCriticalSection(&info
->crit
);
278 LeaveCriticalSection(&info
->crit
);
283 /* update last fd in use */
286 TRACE("fdstart is %d, fdend is %d\n", fdstart
, fdend
);
292 /*static*/ inline void release_ioinfo(ioinfo
*info
)
294 if(info
!=&__badioinfo
&& info
->exflag
& EF_CRIT_INIT
)
295 LeaveCriticalSection(&info
->crit
);
298 static inline FILE* msvcrt_get_file(int i
)
302 if(i
>= MSVCRT_max_streams
)
308 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
];
310 MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] = calloc(MSVCRT_FD_BLOCK_SIZE
, sizeof(file_crit
));
311 if(!MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
]) {
312 ERR("out of memory\n");
317 ret
= MSVCRT_fstream
[i
/MSVCRT_FD_BLOCK_SIZE
] + (i
%MSVCRT_FD_BLOCK_SIZE
);
319 ret
+= i
%MSVCRT_FD_BLOCK_SIZE
;
324 /* INTERNAL: free a file entry fd */
325 static void msvcrt_free_fd(int fd
)
327 ioinfo
*fdinfo
= get_ioinfo(fd
);
329 if(fdinfo
!= &__badioinfo
)
331 fdinfo
->handle
= INVALID_HANDLE_VALUE
;
334 TRACE(":fd (%d) freed\n",fd
);
341 SetStdHandle(STD_INPUT_HANDLE
, 0);
344 SetStdHandle(STD_OUTPUT_HANDLE
, 0);
347 SetStdHandle(STD_ERROR_HANDLE
, 0);
351 release_ioinfo(fdinfo
);
361 static void msvcrt_set_fd(ioinfo
*fdinfo
, HANDLE hand
, int flag
)
363 fdinfo
->handle
= hand
;
364 fdinfo
->wxflag
= WX_OPEN
| (flag
& (WX_DONTINHERIT
| WX_APPEND
| WX_TEXT
| WX_PIPE
| WX_TTY
));
365 fdinfo
->lookahead
[0] = '\n';
366 fdinfo
->lookahead
[1] = '\n';
367 fdinfo
->lookahead
[2] = '\n';
368 fdinfo
->exflag
&= EF_CRIT_INIT
;
370 switch (fdinfo
-__pioinfo
[0])
372 case 0: SetStdHandle(STD_INPUT_HANDLE
, hand
); break;
373 case 1: SetStdHandle(STD_OUTPUT_HANDLE
, hand
); break;
374 case 2: SetStdHandle(STD_ERROR_HANDLE
, hand
); break;
378 /* INTERNAL: Allocate an fd slot from a Win32 HANDLE */
379 /*static*/ int msvcrt_alloc_fd(HANDLE hand
, int flag
)
386 TRACE(":handle (%p) allocating fd (%d)\n", hand
, fd
);
388 if (fd
>= MSVCRT_MAX_FILES
)
391 WARN(":files exhausted!\n");
396 info
= get_ioinfo_alloc_fd(fd
);
398 if(info
== &__badioinfo
)
401 msvcrt_set_fd(info
, hand
, flag
);
402 release_ioinfo(info
);
406 /* INTERNAL: Allocate a FILE* for an fd slot */
407 /* caller must hold the files lock */
408 static FILE* msvcrt_alloc_fp(void)
413 for (i
= 3; i
< MSVCRT_max_streams
; i
++)
415 file
= msvcrt_get_file(i
);
419 if (file
->_flag
== 0)
421 if (i
== MSVCRT_stream_idx
) MSVCRT_stream_idx
++;
429 /* INTERNAL: initialize a FILE* from an open fd */
430 static int msvcrt_init_fp(FILE* file
, int fd
, unsigned stream_flags
)
432 TRACE(":fd (%d) allocating FILE*\n",fd
);
433 if (!(get_ioinfo_nolock(fd
)->wxflag
& WX_OPEN
))
435 WARN(":invalid fd %d\n",fd
);
440 file
->_ptr
= file
->_base
= NULL
;
443 file
->_flag
= stream_flags
;
444 file
->_tmpfname
= NULL
;
446 if(file
<_iob
|| file
>=_iob
+_IOB_ENTRIES
)
447 InitializeCriticalSection(&((file_crit
*)file
)->crit
);
449 TRACE(":got FILE* (%p)\n",file
);
453 /* INTERNAL: Create an inheritance data block (for spawned process)
454 * The inheritance block is made of:
455 * 00 int nb of file descriptor (NBFD)
456 * 04 char file flags (wxflag): repeated for each fd
457 * 4+NBFD HANDLE file handle: repeated for each fd
459 unsigned create_io_inherit_block(WORD
*size
, BYTE
**block
)
466 for (last_fd
=MSVCRT_MAX_FILES
-1; last_fd
>=0; last_fd
--)
467 if (get_ioinfo_nolock(last_fd
)->handle
!= INVALID_HANDLE_VALUE
)
471 *size
= sizeof(unsigned) + (sizeof(char) + sizeof(HANDLE
)) * last_fd
;
472 *block
= calloc(1, *size
);
478 wxflag_ptr
= (char*)*block
+ sizeof(unsigned);
479 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ last_fd
);
481 *(unsigned*)*block
= last_fd
;
482 for (fd
= 0; fd
< last_fd
; fd
++)
484 /* to be inherited, we need it to be open, and that DONTINHERIT isn't set */
485 fdinfo
= get_ioinfo(fd
);
486 if ((fdinfo
->wxflag
& (WX_OPEN
| WX_DONTINHERIT
)) == WX_OPEN
)
488 *wxflag_ptr
= fdinfo
->wxflag
;
489 *handle_ptr
= fdinfo
->handle
;
494 *handle_ptr
= INVALID_HANDLE_VALUE
;
496 release_ioinfo(fdinfo
);
497 wxflag_ptr
++; handle_ptr
++;
502 /* INTERNAL: Set up all file descriptors,
503 * as well as default streams (stdin, stderr and stdout)
505 void msvcrt_init_io(void)
511 GetStartupInfoA(&si
);
512 if (si
.cbReserved2
>= sizeof(unsigned int) && si
.lpReserved2
!= NULL
)
518 count
= *(unsigned*)si
.lpReserved2
;
519 wxflag_ptr
= si
.lpReserved2
+ sizeof(unsigned);
520 handle_ptr
= (HANDLE
*)(wxflag_ptr
+ count
);
522 count
= min(count
, (si
.cbReserved2
- sizeof(unsigned)) / (sizeof(HANDLE
) + 1));
523 count
= min(count
, MSVCRT_MAX_FILES
);
524 for (i
= 0; i
< count
; i
++)
526 if ((*wxflag_ptr
& WX_OPEN
) && *handle_ptr
!= INVALID_HANDLE_VALUE
)
528 fdinfo
= get_ioinfo_alloc_fd(i
);
529 if(fdinfo
!= &__badioinfo
)
530 msvcrt_set_fd(fdinfo
, *handle_ptr
, *wxflag_ptr
);
531 release_ioinfo(fdinfo
);
534 wxflag_ptr
++; handle_ptr
++;
536 fdend
= max( 3, count
);
537 for (fdstart
= 3; fdstart
< fdend
; fdstart
++)
538 if (get_ioinfo_nolock(fdstart
)->handle
== INVALID_HANDLE_VALUE
) break;
541 fdinfo
= get_ioinfo_alloc_fd(STDIN_FILENO
);
542 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
543 HANDLE h
= GetStdHandle(STD_INPUT_HANDLE
);
544 DWORD type
= GetFileType(h
);
546 msvcrt_set_fd(fdinfo
, h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_TTY
: 0)
547 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0));
549 release_ioinfo(fdinfo
);
551 fdinfo
= get_ioinfo_alloc_fd(STDOUT_FILENO
);
552 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
553 HANDLE h
= GetStdHandle(STD_OUTPUT_HANDLE
);
554 DWORD type
= GetFileType(h
);
556 msvcrt_set_fd(fdinfo
, h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_TTY
: 0)
557 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0));
559 release_ioinfo(fdinfo
);
561 fdinfo
= get_ioinfo_alloc_fd(STDERR_FILENO
);
562 if (!(fdinfo
->wxflag
& WX_OPEN
) || fdinfo
->handle
== INVALID_HANDLE_VALUE
) {
563 HANDLE h
= GetStdHandle(STD_ERROR_HANDLE
);
564 DWORD type
= GetFileType(h
);
566 msvcrt_set_fd(fdinfo
, h
, WX_OPEN
|WX_TEXT
|((type
&0xf)==FILE_TYPE_CHAR
? WX_TTY
: 0)
567 |((type
&0xf)==FILE_TYPE_PIPE
? WX_PIPE
: 0));
569 release_ioinfo(fdinfo
);
571 TRACE(":handles (%p)(%p)(%p)\n", get_ioinfo_nolock(STDIN_FILENO
)->handle
,
572 get_ioinfo_nolock(STDOUT_FILENO
)->handle
,
573 get_ioinfo_nolock(STDERR_FILENO
)->handle
);
575 memset(_iob
,0,3*sizeof(FILE));
576 for (i
= 0; i
< 3; i
++)
578 /* FILE structs for stdin/out/err are static and never deleted */
580 _iob
[i
]._tmpfname
= NULL
;
581 _iob
[i
]._flag
= (i
== 0) ? _IOREAD
: _IOWRT
;
583 MSVCRT_stream_idx
= 3;
586 /* INTERNAL: Flush stdio file buffer */
587 static int msvcrt_flush_buffer(FILE* file
)
589 if((file
->_flag
& (_IOREAD
|_IOWRT
)) == _IOWRT
&&
590 file
->_flag
& (_IOMYBUF
|_USERBUF
)) {
591 int cnt
=file
->_ptr
-file
->_base
;
592 if(cnt
>0 && _write(file
->_file
, file
->_base
, cnt
) != cnt
) {
593 file
->_flag
|= _IOERR
;
597 if(file
->_flag
& _IORW
)
598 file
->_flag
&= ~_IOWRT
;
600 #ifdef __REACTOS__ /* CORE-11949 */
601 file
->_ptr
=file
->_base
;
606 #ifndef __REACTOS__ /* CORE-11949 */
607 file
->_ptr
=file
->_base
;
613 /*********************************************************************
616 int CDECL
_isatty(int fd
)
618 TRACE(":fd (%d)\n",fd
);
620 return get_ioinfo_nolock(fd
)->wxflag
& WX_TTY
;
623 /* INTERNAL: Allocate stdio file buffer */
624 /*static*/ BOOL
msvcrt_alloc_buffer(FILE* file
)
626 if((file
->_file
==STDOUT_FILENO
|| file
->_file
==STDERR_FILENO
)
627 && _isatty(file
->_file
))
630 file
->_base
= calloc(1, MSVCRT_INTERNAL_BUFSIZ
);
632 file
->_bufsiz
= MSVCRT_INTERNAL_BUFSIZ
;
633 file
->_flag
|= _IOMYBUF
;
635 file
->_base
= (char*)(&file
->_charbuf
);
637 file
->_flag
|= _IONBF
;
639 file
->_ptr
= file
->_base
;
644 /* INTERNAL: Allocate temporary buffer for stdout and stderr */
645 static BOOL
add_std_buffer(FILE *file
)
647 static char buffers
[2][BUFSIZ
];
649 if((file
->_file
!=STDOUT_FILENO
&& file
->_file
!=STDERR_FILENO
)
650 || (file
->_flag
& (_IONBF
| _IOMYBUF
| _USERBUF
))
651 || !_isatty(file
->_file
))
654 file
->_ptr
= file
->_base
= buffers
[file
->_file
== STDOUT_FILENO
? 0 : 1];
655 file
->_bufsiz
= file
->_cnt
= BUFSIZ
;
656 file
->_flag
|= _USERBUF
;
660 /* INTERNAL: Removes temporary buffer from stdout or stderr */
661 /* Only call this function when add_std_buffer returned TRUE */
662 static void remove_std_buffer(FILE *file
)
664 msvcrt_flush_buffer(file
);
665 file
->_ptr
= file
->_base
= NULL
;
666 file
->_bufsiz
= file
->_cnt
= 0;
667 file
->_flag
&= ~_USERBUF
;
670 /* INTERNAL: Convert integer to base32 string (0-9a-v), 0 becomes "" */
671 static int msvcrt_int_to_base32(int num
, char *str
)
686 *p
= (num
& 31) + '0';
688 *p
+= ('a' - '0' - 10);
695 /* INTERNAL: wide character version of msvcrt_int_to_base32 */
696 static int msvcrt_int_to_base32_w(int num
, wchar_t *str
)
711 *p
= (num
& 31) + '0';
713 *p
+= ('a' - '0' - 10);
720 /* INTERNAL: Create a wide string from an ascii string */
721 wchar_t *msvcrt_wstrdupa(const char *str
)
723 const unsigned int len
= strlen(str
) + 1 ;
724 wchar_t *wstr
= malloc(len
* sizeof (wchar_t));
727 MultiByteToWideChar(CP_ACP
, MB_PRECOMPOSED
,str
,len
,wstr
,len
);
731 /*********************************************************************
732 * __iob_func(MSVCRT.@)
734 FILE * CDECL
__iob_func(void)
739 /*********************************************************************
742 int CDECL
_access(const char *filename
, int mode
)
744 DWORD attr
= GetFileAttributesA(filename
);
746 TRACE("(%s,%d) %d\n",filename
,mode
,attr
);
748 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
750 _dosmaperr(GetLastError());
753 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& W_OK
))
755 _set_errno(ERROR_ACCESS_DENIED
);
761 /*********************************************************************
762 * _access_s (MSVCRT.@)
764 int CDECL
_access_s(const char *filename
, int mode
)
766 if (!MSVCRT_CHECK_PMT(filename
!= NULL
) ||
767 !MSVCRT_CHECK_PMT((mode
& ~(R_OK
| W_OK
)) == 0))
773 return _access(filename
, mode
);
776 /*********************************************************************
777 * _waccess (MSVCRT.@)
779 int CDECL
_waccess(const wchar_t *filename
, int mode
)
781 DWORD attr
= GetFileAttributesW(filename
);
783 TRACE("(%s,%d) %d\n",debugstr_w(filename
),mode
,attr
);
785 if (!filename
|| attr
== INVALID_FILE_ATTRIBUTES
)
787 _dosmaperr(GetLastError());
790 if ((attr
& FILE_ATTRIBUTE_READONLY
) && (mode
& W_OK
))
792 _set_errno(ERROR_ACCESS_DENIED
);
798 /*********************************************************************
799 * _waccess_s (MSVCRT.@)
801 int CDECL
_waccess_s(const wchar_t *filename
, int mode
)
803 if (!MSVCRT_CHECK_PMT(filename
!= NULL
) ||
804 !MSVCRT_CHECK_PMT((mode
& ~(R_OK
| W_OK
)) == 0))
810 return _waccess(filename
, mode
);
813 /*********************************************************************
816 int CDECL
_chmod(const char *path
, int flags
)
818 DWORD oldFlags
= GetFileAttributesA(path
);
820 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
822 DWORD newFlags
= (flags
& _S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
823 oldFlags
| FILE_ATTRIBUTE_READONLY
;
825 if (newFlags
== oldFlags
|| SetFileAttributesA(path
, newFlags
))
828 _dosmaperr(GetLastError());
832 /*********************************************************************
835 int CDECL
_wchmod(const wchar_t *path
, int flags
)
837 DWORD oldFlags
= GetFileAttributesW(path
);
839 if (oldFlags
!= INVALID_FILE_ATTRIBUTES
)
841 DWORD newFlags
= (flags
& _S_IWRITE
)? oldFlags
& ~FILE_ATTRIBUTE_READONLY
:
842 oldFlags
| FILE_ATTRIBUTE_READONLY
;
844 if (newFlags
== oldFlags
|| SetFileAttributesW(path
, newFlags
))
847 _dosmaperr(GetLastError());
851 /*********************************************************************
854 int CDECL
_unlink(const char *path
)
856 TRACE("%s\n",debugstr_a(path
));
857 if(DeleteFileA(path
))
859 TRACE("failed (%d)\n",GetLastError());
860 _dosmaperr(GetLastError());
864 /*********************************************************************
865 * _wunlink (MSVCRT.@)
867 int CDECL
_wunlink(const wchar_t *path
)
869 TRACE("(%s)\n",debugstr_w(path
));
870 if(DeleteFileW(path
))
872 TRACE("failed (%d)\n",GetLastError());
873 _dosmaperr(GetLastError());
877 /*********************************************************************
880 int CDECL
_commit(int fd
)
882 ioinfo
*info
= get_ioinfo(fd
);
885 TRACE(":fd (%d) handle (%p)\n", fd
, info
->handle
);
886 if (info
->handle
== INVALID_HANDLE_VALUE
)
888 else if (!FlushFileBuffers(info
->handle
))
890 if (GetLastError() == ERROR_INVALID_HANDLE
)
892 /* FlushFileBuffers fails for console handles
893 * so we ignore this error.
899 TRACE(":failed-last error (%d)\n",GetLastError());
900 _dosmaperr(GetLastError());
910 release_ioinfo(info
);
914 /* _flushall calls fflush which calls _flushall */
915 int CDECL
fflush(FILE* file
);
917 /* INTERNAL: Flush all stream buffer */
918 static int msvcrt_flush_all_buffers(int mask
)
920 int i
, num_flushed
= 0;
924 for (i
= 0; i
< MSVCRT_stream_idx
; i
++) {
925 file
= msvcrt_get_file(i
);
929 if(file
->_flag
& mask
) {
937 TRACE(":flushed (%d) handles\n",num_flushed
);
941 /*********************************************************************
942 * _flushall (MSVCRT.@)
944 int CDECL
_flushall(void)
946 return msvcrt_flush_all_buffers(_IOWRT
| _IOREAD
);
949 /*********************************************************************
952 int CDECL
fflush(FILE* file
)
955 msvcrt_flush_all_buffers(_IOWRT
);
956 } else if(file
->_flag
& _IOWRT
) {
960 res
= msvcrt_flush_buffer(file
);
962 if(!res && (file->_flag & _IOCOMMIT))
963 res = _commit(file->_file) ? EOF : 0;
968 } else if(file
->_flag
& _IOREAD
) {
971 file
->_ptr
= file
->_base
;
979 /*********************************************************************
982 int CDECL
_close(int fd
)
984 ioinfo
*info
= get_ioinfo(fd
);
988 TRACE(":fd (%d) handle (%p)\n", fd
, info
->handle
);
989 if (!(info
->wxflag
& WX_OPEN
)) {
992 ret
= CloseHandle(info
->handle
) ? 0 : -1;
995 WARN(":failed-last error (%d)\n",GetLastError());
996 _dosmaperr(GetLastError());
1001 release_ioinfo(info
);
1005 /*********************************************************************
1008 * MSDN isn't clear on this point, but the remarks for _pipe
1009 * indicate file descriptors duplicated with _dup and _dup2 are always
1012 int CDECL
_dup2(int od
, int nd
)
1014 ioinfo
*info_od
, *info_nd
;
1017 TRACE("(od=%d, nd=%d)\n", od
, nd
);
1022 info_od
= get_ioinfo(od
);
1023 info_nd
= get_ioinfo_alloc_fd(nd
);
1027 info_nd
= get_ioinfo_alloc_fd(nd
);
1028 info_od
= get_ioinfo(od
);
1031 if (info_nd
== &__badioinfo
)
1035 else if (info_od
->wxflag
& WX_OPEN
)
1039 if (DuplicateHandle(GetCurrentProcess(), info_od
->handle
,
1040 GetCurrentProcess(), &handle
, 0, TRUE
, DUPLICATE_SAME_ACCESS
))
1042 int wxflag
= info_od
->wxflag
& ~_O_NOINHERIT
;
1044 if (info_nd
->wxflag
& WX_OPEN
)
1047 msvcrt_set_fd(info_nd
, handle
, wxflag
);
1048 /* _dup2 returns 0, not nd, on success */
1054 _dosmaperr(GetLastError());
1063 release_ioinfo(info_od
);
1064 release_ioinfo(info_nd
);
1069 /*********************************************************************
1072 int CDECL
_dup(int od
)
1078 if (_dup2(od
, fd
) == 0)
1086 /*********************************************************************
1089 int CDECL
_eof(int fd
)
1091 ioinfo
*info
= get_ioinfo(fd
);
1092 DWORD curpos
,endpos
;
1093 LONG hcurpos
,hendpos
;
1095 TRACE(":fd (%d) handle (%p)\n", fd
, info
->handle
);
1097 if (info
->handle
== INVALID_HANDLE_VALUE
)
1099 release_ioinfo(info
);
1103 if (info
->wxflag
& WX_ATEOF
)
1105 release_ioinfo(info
);
1109 /* Otherwise we do it the hard way */
1110 hcurpos
= hendpos
= 0;
1111 curpos
= SetFilePointer(info
->handle
, 0, &hcurpos
, FILE_CURRENT
);
1112 endpos
= SetFilePointer(info
->handle
, 0, &hendpos
, FILE_END
);
1114 if (curpos
== endpos
&& hcurpos
== hendpos
)
1116 /* FIXME: shouldn't WX_ATEOF be set here? */
1117 release_ioinfo(info
);
1121 SetFilePointer(info
->handle
, curpos
, &hcurpos
, FILE_BEGIN
);
1122 release_ioinfo(info
);
1126 /*********************************************************************
1127 * _fcloseall (MSVCRT.@)
1129 int CDECL
_fcloseall(void)
1131 int num_closed
= 0, i
;
1135 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
1136 file
= msvcrt_get_file(i
);
1138 if (file
->_flag
&& !fclose(file
))
1143 TRACE(":closed (%d) handles\n",num_closed
);
1147 /* free everything on process exit */
1148 void msvcrt_free_io(void)
1156 for(i
=0; i
<sizeof(__pioinfo
)/sizeof(__pioinfo
[0]); i
++)
1161 for(j
=0; j
<MSVCRT_FD_BLOCK_SIZE
; j
++)
1163 if(__pioinfo
[i
][j
].exflag
& EF_CRIT_INIT
)
1164 DeleteCriticalSection(&__pioinfo
[i
][j
].crit
);
1169 for(j
=0; j
<MSVCRT_stream_idx
; j
++)
1171 FILE *file
= msvcrt_get_file(j
);
1172 if(file
<_iob
|| file
>=_iob
+_IOB_ENTRIES
)
1174 ((file_crit
*)file
)->crit
.DebugInfo
->Spare
[0] = 0;
1175 DeleteCriticalSection(&((file_crit
*)file
)->crit
);
1179 for(i
=0; i
<sizeof(MSVCRT_fstream
)/sizeof(MSVCRT_fstream
[0]); i
++)
1180 free(MSVCRT_fstream
[i
]);
1183 /*********************************************************************
1184 * _lseeki64 (MSVCRT.@)
1186 __int64 CDECL
_lseeki64(int fd
, __int64 offset
, int whence
)
1188 ioinfo
*info
= get_ioinfo(fd
);
1191 TRACE(":fd (%d) handle (%p)\n", fd
, info
->handle
);
1193 if (info
->handle
== INVALID_HANDLE_VALUE
)
1195 release_ioinfo(info
);
1199 if (whence
< 0 || whence
> 2)
1201 release_ioinfo(info
);
1206 TRACE(":fd (%d) to %s pos %s\n",
1207 fd
,wine_dbgstr_longlong(offset
),
1208 (whence
==SEEK_SET
)?"SEEK_SET":
1209 (whence
==SEEK_CUR
)?"SEEK_CUR":
1210 (whence
==SEEK_END
)?"SEEK_END":"UNKNOWN");
1212 /* The MoleBox protection scheme expects msvcrt to use SetFilePointer only,
1213 * so a LARGE_INTEGER offset cannot be passed directly via SetFilePointerEx. */
1214 ofs
.QuadPart
= offset
;
1215 if ((ofs
.u
.LowPart
= SetFilePointer(info
->handle
, ofs
.u
.LowPart
, &ofs
.u
.HighPart
, whence
)) != INVALID_SET_FILE_POINTER
||
1216 GetLastError() == ERROR_SUCCESS
)
1218 info
->wxflag
&= ~(WX_ATEOF
|WX_READEOF
);
1219 /* FIXME: What if we seek _to_ EOF - is EOF set? */
1221 release_ioinfo(info
);
1222 return ofs
.QuadPart
;
1224 release_ioinfo(info
);
1225 TRACE(":error-last error (%d)\n",GetLastError());
1226 _dosmaperr(GetLastError());
1230 /*********************************************************************
1233 LONG CDECL
_lseek(int fd
, LONG offset
, int whence
)
1235 return (LONG
)_lseeki64(fd
, offset
, whence
);
1238 /*********************************************************************
1239 * _lock_file (MSVCRT.@)
1241 void CDECL
_lock_file(FILE *file
)
1243 if(file
>=_iob
&& file
<_iob
+_IOB_ENTRIES
)
1244 _lock(_STREAM_LOCKS
+(file
-_iob
));
1245 /* ReactOS: string streams dont need to be locked */
1246 else if(!(file
->_flag
& _IOSTRG
))
1247 EnterCriticalSection(&((file_crit
*)file
)->crit
);
1250 /*********************************************************************
1251 * _unlock_file (MSVCRT.@)
1253 void CDECL
_unlock_file(FILE *file
)
1255 if(file
>=_iob
&& file
<_iob
+_IOB_ENTRIES
)
1256 _unlock(_STREAM_LOCKS
+(file
-_iob
));
1257 /* ReactOS: string streams dont need to be locked */
1258 else if(!(file
->_flag
& _IOSTRG
))
1259 LeaveCriticalSection(&((file_crit
*)file
)->crit
);
1263 /*********************************************************************
1264 * _locking (MSVCRT.@)
1266 * This is untested; the underlying LockFile doesn't work yet.
1268 int CDECL
_locking(int fd
, int mode
, LONG nbytes
)
1270 ioinfo
*info
= get_ioinfo(fd
);
1274 TRACE(":fd (%d) handle (%p)\n", fd
, info
->handle
);
1275 if (info
->handle
== INVALID_HANDLE_VALUE
)
1277 release_ioinfo(info
);
1281 if (mode
< 0 || mode
> 4)
1283 release_ioinfo(info
);
1288 TRACE(":fd (%d) by 0x%08x mode %s\n",
1289 fd
,nbytes
,(mode
==_LK_UNLCK
)?"_LK_UNLCK":
1290 (mode
==_LK_LOCK
)?"_LK_LOCK":
1291 (mode
==_LK_NBLCK
)?"_LK_NBLCK":
1292 (mode
==_LK_RLCK
)?"_LK_RLCK":
1293 (mode
==_LK_NBRLCK
)?"_LK_NBRLCK":
1296 if ((cur_locn
= SetFilePointer(info
->handle
, 0L, NULL
, SEEK_CUR
)) == INVALID_SET_FILE_POINTER
)
1298 release_ioinfo(info
);
1299 FIXME ("Seek failed\n");
1300 *_errno() = EINVAL
; /* FIXME */
1303 if (mode
== _LK_LOCK
|| mode
== _LK_RLCK
)
1306 ret
= 1; /* just to satisfy gcc */
1309 ret
= LockFile(info
->handle
, cur_locn
, 0L, nbytes
, 0L);
1314 else if (mode
== _LK_UNLCK
)
1315 ret
= UnlockFile(info
->handle
, cur_locn
, 0L, nbytes
, 0L);
1317 ret
= LockFile(info
->handle
, cur_locn
, 0L, nbytes
, 0L);
1318 /* FIXME - what about error settings? */
1319 release_ioinfo(info
);
1320 return ret
? 0 : -1;
1323 /*********************************************************************
1324 * _fseeki64 (MSVCRT.@)
1326 int CDECL
_fseeki64(FILE* file
, __int64 offset
, int whence
)
1331 /* Flush output if needed */
1332 if(file
->_flag
& _IOWRT
)
1333 msvcrt_flush_buffer(file
);
1335 if(whence
== SEEK_CUR
&& file
->_flag
& _IOREAD
) {
1337 offset
+= _ftelli64(file
);
1340 /* Discard buffered input */
1342 file
->_ptr
= file
->_base
;
1343 /* Reset direction of i/o */
1344 if(file
->_flag
& _IORW
) {
1345 file
->_flag
&= ~(_IOREAD
|_IOWRT
);
1347 /* Clear end of file flag */
1348 file
->_flag
&= ~_IOEOF
;
1349 ret
= (_lseeki64(file
->_file
,offset
,whence
) == -1)?-1:0;
1355 /*********************************************************************
1358 int CDECL
fseek(FILE* file
, long offset
, int whence
)
1360 return _fseeki64( file
, offset
, whence
);
1363 /*********************************************************************
1364 * _chsize_s (MSVCRT.@)
1366 int CDECL
_chsize_s(int fd
, __int64 size
)
1372 TRACE("(fd=%d, size=%s)\n", fd
, wine_dbgstr_longlong(size
));
1374 if (!MSVCRT_CHECK_PMT(size
>= 0)) return EINVAL
;
1376 info
= get_ioinfo(fd
);
1377 if (info
->handle
!= INVALID_HANDLE_VALUE
)
1379 /* save the current file pointer */
1380 cur
= _lseeki64(fd
, 0, SEEK_CUR
);
1383 pos
= _lseeki64(fd
, size
, SEEK_SET
);
1386 ret
= SetEndOfFile(info
->handle
);
1387 if (!ret
) _dosmaperr(GetLastError());
1390 /* restore the file pointer */
1391 _lseeki64(fd
, cur
, SEEK_SET
);
1395 release_ioinfo(info
);
1396 return ret
? 0 : *_errno();
1399 /*********************************************************************
1400 * _chsize (MSVCRT.@)
1402 int CDECL
_chsize(int fd
, long size
)
1404 /* _chsize_s returns errno on failure but _chsize should return -1 */
1405 return _chsize_s( fd
, size
) == 0 ? 0 : -1;
1408 /*********************************************************************
1409 * clearerr (MSVCRT.@)
1411 void CDECL
clearerr(FILE* file
)
1413 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1416 file
->_flag
&= ~(_IOERR
| _IOEOF
);
1420 /*********************************************************************
1423 void CDECL
rewind(FILE* file
)
1425 TRACE(":file (%p) fd (%d)\n",file
,file
->_file
);
1428 fseek(file
, 0L, SEEK_SET
);
1433 static int msvcrt_get_flags(const wchar_t* mode
, int *open_flags
, int* stream_flags
)
1435 int plus
= strchrW(mode
, '+') != NULL
;
1437 TRACE("%s\n", debugstr_w(mode
));
1439 while(*mode
== ' ') mode
++;
1444 *open_flags
= plus
? _O_RDWR
: _O_RDONLY
;
1445 *stream_flags
= plus
? _IORW
: _IOREAD
;
1448 *open_flags
= _O_CREAT
| _O_TRUNC
| (plus
? _O_RDWR
: _O_WRONLY
);
1449 *stream_flags
= plus
? _IORW
: _IOWRT
;
1452 *open_flags
= _O_CREAT
| _O_APPEND
| (plus
? _O_RDWR
: _O_WRONLY
);
1453 *stream_flags
= plus
? _IORW
: _IOWRT
;
1456 MSVCRT_INVALID_PMT(0, EINVAL
);
1460 *stream_flags
|= _commode
;
1462 while (*mode
&& *mode
!=',')
1466 *open_flags
|= _O_BINARY
;
1467 *open_flags
&= ~_O_TEXT
;
1470 *open_flags
|= _O_TEXT
;
1471 *open_flags
&= ~_O_BINARY
;
1474 *open_flags
|= _O_TEMPORARY
;
1477 *open_flags
|= _O_SHORT_LIVED
;
1480 *stream_flags
|= _IOCOMMIT
;
1483 *stream_flags
&= ~_IOCOMMIT
;
1486 *open_flags
|= _O_NOINHERIT
;
1495 FIXME("ignoring cache optimization flag: %c\n", mode
[-1]);
1498 ERR("incorrect mode flag: %c\n", mode
[-1]);
1504 static const WCHAR ccs
[] = {'c','c','s'};
1505 static const WCHAR utf8
[] = {'u','t','f','-','8'};
1506 static const WCHAR utf16le
[] = {'u','t','f','-','1','6','l','e'};
1507 static const WCHAR unicode
[] = {'u','n','i','c','o','d','e'};
1510 while(*mode
== ' ') mode
++;
1511 if(!MSVCRT_CHECK_PMT(!strncmpW(ccs
, mode
, sizeof(ccs
)/sizeof(ccs
[0]))))
1513 mode
+= sizeof(ccs
)/sizeof(ccs
[0]);
1514 while(*mode
== ' ') mode
++;
1515 if(!MSVCRT_CHECK_PMT(*mode
== '='))
1518 while(*mode
== ' ') mode
++;
1520 if(!strncmpiW(utf8
, mode
, sizeof(utf8
)/sizeof(utf8
[0])))
1522 *open_flags
|= _O_U8TEXT
;
1523 mode
+= sizeof(utf8
)/sizeof(utf8
[0]);
1525 else if(!strncmpiW(utf16le
, mode
, sizeof(utf16le
)/sizeof(utf16le
[0])))
1527 *open_flags
|= _O_U16TEXT
;
1528 mode
+= sizeof(utf16le
)/sizeof(utf16le
[0]);
1530 else if(!strncmpiW(unicode
, mode
, sizeof(unicode
)/sizeof(unicode
[0])))
1532 *open_flags
|= _O_WTEXT
;
1533 mode
+= sizeof(unicode
)/sizeof(unicode
[0]);
1537 MSVCRT_INVALID_PMT(0, EINVAL
);
1541 while(*mode
== ' ') mode
++;
1544 if(!MSVCRT_CHECK_PMT(*mode
== 0))
1549 /*********************************************************************
1550 * _fdopen (MSVCRT.@)
1552 FILE* CDECL
_fdopen(int fd
, const char *mode
)
1555 wchar_t *modeW
= NULL
;
1557 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
))) return NULL
;
1559 ret
= _wfdopen(fd
, modeW
);
1565 /*********************************************************************
1566 * _wfdopen (MSVCRT.@)
1568 FILE* CDECL
_wfdopen(int fd
, const wchar_t *mode
)
1570 int open_flags
, stream_flags
;
1573 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1) return NULL
;
1576 if (!(file
= msvcrt_alloc_fp()))
1578 else if (msvcrt_init_fp(file
, fd
, stream_flags
) == -1)
1583 else TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
1589 /*********************************************************************
1590 * _filelength (MSVCRT.@)
1592 LONG CDECL
_filelength(int fd
)
1594 LONG curPos
= _lseek(fd
, 0, SEEK_CUR
);
1597 LONG endPos
= _lseek(fd
, 0, SEEK_END
);
1600 if (endPos
!= curPos
)
1601 _lseek(fd
, curPos
, SEEK_SET
);
1608 /*********************************************************************
1609 * _filelengthi64 (MSVCRT.@)
1611 __int64 CDECL
_filelengthi64(int fd
)
1613 __int64 curPos
= _lseeki64(fd
, 0, SEEK_CUR
);
1616 __int64 endPos
= _lseeki64(fd
, 0, SEEK_END
);
1619 if (endPos
!= curPos
)
1620 _lseeki64(fd
, curPos
, SEEK_SET
);
1627 /*********************************************************************
1628 * _fileno (MSVCRT.@)
1630 int CDECL
_fileno(FILE* file
)
1632 TRACE(":FILE* (%p) fd (%d)\n",file
,file
->_file
);
1636 /*********************************************************************
1637 * _get_osfhandle (MSVCRT.@)
1639 intptr_t CDECL
_get_osfhandle(int fd
)
1641 HANDLE hand
= get_ioinfo_nolock(fd
)->handle
;
1642 TRACE(":fd (%d) handle (%p)\n",fd
,hand
);
1644 if(hand
== INVALID_HANDLE_VALUE
)
1646 return (intptr_t)hand
;
1649 /*********************************************************************
1650 * _mktemp (MSVCRT.@)
1652 char * CDECL
_mktemp(char *pattern
)
1655 char *retVal
= pattern
;
1663 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1667 id
= GetCurrentProcessId();
1671 int tempNum
= id
/ 10;
1672 *pattern
-- = id
- (tempNum
* 10) + '0';
1678 *pattern
= letter
++;
1679 if (GetFileAttributesA(retVal
) == INVALID_FILE_ATTRIBUTES
)
1681 } while(letter
<= 'z');
1685 /*********************************************************************
1686 * _wmktemp (MSVCRT.@)
1688 wchar_t * CDECL
_wmktemp(wchar_t *pattern
)
1691 wchar_t *retVal
= pattern
;
1693 wchar_t letter
= 'a';
1696 numX
= (*pattern
++ == 'X')? numX
+ 1 : 0;
1700 id
= GetCurrentProcessId();
1704 int tempNum
= id
/ 10;
1705 *pattern
-- = id
- (tempNum
* 10) + '0';
1711 if (GetFileAttributesW(retVal
) == INVALID_FILE_ATTRIBUTES
&&
1712 GetLastError() == ERROR_FILE_NOT_FOUND
)
1714 *pattern
= letter
++;
1715 } while(letter
!= '|');
1719 /*static*/ unsigned split_oflags(unsigned oflags
)
1722 unsigned unsupp
; /* until we support everything */
1724 if (oflags
& _O_APPEND
) wxflags
|= WX_APPEND
;
1725 if (oflags
& _O_BINARY
) {/* Nothing to do */}
1726 else if (oflags
& _O_TEXT
) wxflags
|= WX_TEXT
;
1727 else if (oflags
& _O_WTEXT
) wxflags
|= WX_TEXT
;
1728 else if (oflags
& _O_U16TEXT
) wxflags
|= WX_TEXT
;
1729 else if (oflags
& _O_U8TEXT
) wxflags
|= WX_TEXT
;
1730 else if (*__p__fmode() & _O_BINARY
) {/* Nothing to do */}
1731 else wxflags
|= WX_TEXT
; /* default to TEXT*/
1732 if (oflags
& _O_NOINHERIT
) wxflags
|= WX_DONTINHERIT
;
1734 if ((unsupp
= oflags
& ~(
1735 _O_BINARY
|_O_TEXT
|_O_APPEND
|
1736 _O_TRUNC
|_O_EXCL
|_O_CREAT
|
1737 _O_RDWR
|_O_WRONLY
|_O_TEMPORARY
|
1739 _O_SEQUENTIAL
|_O_RANDOM
|_O_SHORT_LIVED
|
1740 _O_WTEXT
|_O_U16TEXT
|_O_U8TEXT
1742 ERR(":unsupported oflags 0x%04x\n",unsupp
);
1747 /*********************************************************************
1750 int CDECL
_pipe(int *pfds
, unsigned int psize
, int textmode
)
1753 SECURITY_ATTRIBUTES sa
;
1754 HANDLE readHandle
, writeHandle
;
1762 sa
.nLength
= sizeof(SECURITY_ATTRIBUTES
);
1763 sa
.bInheritHandle
= !(textmode
& _O_NOINHERIT
);
1764 sa
.lpSecurityDescriptor
= NULL
;
1765 if (CreatePipe(&readHandle
, &writeHandle
, &sa
, psize
))
1767 unsigned int wxflags
= split_oflags(textmode
);
1771 fd
= msvcrt_alloc_fd(readHandle
, wxflags
);
1775 fd
= msvcrt_alloc_fd(writeHandle
, wxflags
);
1784 CloseHandle(writeHandle
);
1790 CloseHandle(readHandle
);
1791 CloseHandle(writeHandle
);
1797 _dosmaperr(GetLastError());
1802 static int check_bom(HANDLE h
, int oflags
, BOOL seek
)
1804 char bom
[sizeof(utf8_bom
)];
1807 oflags
&= ~(_O_WTEXT
|_O_U16TEXT
|_O_U8TEXT
);
1809 if (!ReadFile(h
, bom
, sizeof(utf8_bom
), &r
, NULL
))
1812 if (r
==sizeof(utf8_bom
) && !memcmp(bom
, utf8_bom
, sizeof(utf8_bom
))) {
1813 oflags
|= _O_U8TEXT
;
1814 }else if (r
>=sizeof(utf16_bom
) && !memcmp(bom
, utf16_bom
, sizeof(utf16_bom
))) {
1816 SetFilePointer(h
, 2, NULL
, FILE_BEGIN
);
1817 oflags
|= _O_U16TEXT
;
1819 SetFilePointer(h
, 0, NULL
, FILE_BEGIN
);
1825 /*********************************************************************
1826 * _wsopen_s (MSVCRT.@)
1828 int CDECL
_wsopen_s( int *fd
, const wchar_t* path
, int oflags
, int shflags
, int pmode
)
1830 DWORD access
= 0, creation
= 0, attrib
;
1831 SECURITY_ATTRIBUTES sa
;
1832 DWORD sharing
, type
;
1836 TRACE("fd*: %p :file (%s) oflags: 0x%04x shflags: 0x%04x pmode: 0x%04x\n",
1837 fd
, debugstr_w(path
), oflags
, shflags
, pmode
);
1839 if (!MSVCRT_CHECK_PMT( fd
!= NULL
)) return EINVAL
;
1842 wxflag
= split_oflags(oflags
);
1843 switch (oflags
& (_O_RDONLY
| _O_WRONLY
| _O_RDWR
))
1845 case _O_RDONLY
: access
|= GENERIC_READ
; break;
1846 case _O_WRONLY
: access
|= GENERIC_WRITE
; break;
1847 case _O_RDWR
: access
|= GENERIC_WRITE
| GENERIC_READ
; break;
1850 if (oflags
& _O_CREAT
)
1852 if(pmode
& ~(_S_IREAD
| _S_IWRITE
))
1853 FIXME(": pmode 0x%04x ignored\n", pmode
);
1855 WARN(": pmode 0x%04x ignored\n", pmode
);
1857 if (oflags
& _O_EXCL
)
1858 creation
= CREATE_NEW
;
1859 else if (oflags
& _O_TRUNC
)
1860 creation
= CREATE_ALWAYS
;
1862 creation
= OPEN_ALWAYS
;
1864 else /* no _O_CREAT */
1866 if (oflags
& _O_TRUNC
)
1867 creation
= TRUNCATE_EXISTING
;
1869 creation
= OPEN_EXISTING
;
1878 sharing
= FILE_SHARE_READ
;
1881 sharing
= FILE_SHARE_WRITE
;
1884 sharing
= FILE_SHARE_READ
| FILE_SHARE_WRITE
;
1887 ERR( "Unhandled shflags 0x%x\n", shflags
);
1890 attrib
= FILE_ATTRIBUTE_NORMAL
;
1892 if (oflags
& _O_TEMPORARY
)
1894 attrib
|= FILE_FLAG_DELETE_ON_CLOSE
;
1896 sharing
|= FILE_SHARE_DELETE
;
1899 sa
.nLength
= sizeof( SECURITY_ATTRIBUTES
);
1900 sa
.lpSecurityDescriptor
= NULL
;
1901 sa
.bInheritHandle
= !(oflags
& _O_NOINHERIT
);
1903 if ((oflags
&(_O_WTEXT
|_O_U16TEXT
|_O_U8TEXT
))
1904 && (creation
==OPEN_ALWAYS
|| creation
==OPEN_EXISTING
)
1905 && !(access
&GENERIC_READ
))
1907 hand
= CreateFileW(path
, GENERIC_READ
, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
1908 &sa
, OPEN_EXISTING
, FILE_ATTRIBUTE_NORMAL
, 0);
1909 if (hand
!= INVALID_HANDLE_VALUE
)
1911 oflags
= check_bom(hand
, oflags
, FALSE
);
1915 oflags
&= ~(_O_WTEXT
|_O_U16TEXT
|_O_U8TEXT
);
1918 hand
= CreateFileW(path
, access
, sharing
, &sa
, creation
, attrib
, 0);
1919 if (hand
== INVALID_HANDLE_VALUE
) {
1920 WARN(":failed-last error (%d)\n",GetLastError());
1921 _dosmaperr(GetLastError());
1925 if (oflags
& (_O_WTEXT
|_O_U16TEXT
|_O_U8TEXT
))
1927 if ((access
& GENERIC_WRITE
) && (creation
==CREATE_NEW
1928 || creation
==CREATE_ALWAYS
|| creation
==TRUNCATE_EXISTING
1929 || (creation
==OPEN_ALWAYS
&& GetLastError()==ERROR_ALREADY_EXISTS
)))
1931 if (oflags
& _O_U8TEXT
)
1933 DWORD written
= 0, tmp
;
1935 while(written
!=sizeof(utf8_bom
) && WriteFile(hand
, (char*)utf8_bom
+written
,
1936 sizeof(utf8_bom
)-written
, &tmp
, NULL
))
1938 if (written
!= sizeof(utf8_bom
)) {
1939 WARN("error writing BOM\n");
1941 _dosmaperr(GetLastError());
1947 DWORD written
= 0, tmp
;
1949 while(written
!=sizeof(utf16_bom
) && WriteFile(hand
, (char*)utf16_bom
+written
,
1950 sizeof(utf16_bom
)-written
, &tmp
, NULL
))
1952 if (written
!= sizeof(utf16_bom
))
1954 WARN("error writing BOM\n");
1956 _dosmaperr(GetLastError());
1961 else if (access
& GENERIC_READ
)
1962 oflags
= check_bom(hand
, oflags
, TRUE
);
1965 type
= GetFileType(hand
);
1966 if (type
== FILE_TYPE_CHAR
)
1968 else if (type
== FILE_TYPE_PIPE
)
1971 *fd
= msvcrt_alloc_fd(hand
, wxflag
);
1975 if (oflags
& _O_WTEXT
)
1976 get_ioinfo_nolock(*fd
)->exflag
|= EF_UTF16
|EF_UNK_UNICODE
;
1977 else if (oflags
& _O_U16TEXT
)
1978 get_ioinfo_nolock(*fd
)->exflag
|= EF_UTF16
;
1979 else if (oflags
& _O_U8TEXT
)
1980 get_ioinfo_nolock(*fd
)->exflag
|= EF_UTF8
;
1982 TRACE(":fd (%d) handle (%p)\n", *fd
, hand
);
1986 /*********************************************************************
1987 * _wsopen (MSVCRT.@)
1989 int CDECL
_wsopen( const wchar_t *path
, int oflags
, int shflags
, ... )
1994 if (oflags
& _O_CREAT
)
1998 __ms_va_start(ap
, shflags
);
1999 pmode
= va_arg(ap
, int);
2005 _wsopen_s(&fd
, path
, oflags
, shflags
, pmode
);
2009 /*********************************************************************
2010 * _sopen_s (MSVCRT.@)
2012 int CDECL
_sopen_s( int *fd
, const char *path
, int oflags
, int shflags
, int pmode
)
2017 if(!MSVCRT_CHECK_PMT(path
&& (pathW
= msvcrt_wstrdupa(path
))))
2020 ret
= _wsopen_s(fd
, pathW
, oflags
, shflags
, pmode
);
2025 /*********************************************************************
2028 int CDECL
_sopen( const char *path
, int oflags
, int shflags
, ... )
2033 if (oflags
& _O_CREAT
)
2037 va_start(ap
, shflags
);
2038 pmode
= va_arg(ap
, int);
2044 _sopen_s(&fd
, path
, oflags
, shflags
, pmode
);
2048 /*********************************************************************
2051 int CDECL
_open( const char *path
, int flags
, ... )
2055 if (flags
& _O_CREAT
)
2058 va_start(ap
, flags
);
2059 pmode
= va_arg(ap
, int);
2061 return _sopen( path
, flags
, _SH_DENYNO
, pmode
);
2064 return _sopen( path
, flags
, _SH_DENYNO
);
2067 /*********************************************************************
2070 int CDECL
_wopen(const wchar_t *path
,int flags
,...)
2074 if (flags
& _O_CREAT
)
2077 va_start(ap
, flags
);
2078 pmode
= va_arg(ap
, int);
2080 return _wsopen( path
, flags
, _SH_DENYNO
, pmode
);
2083 return _wsopen( path
, flags
, _SH_DENYNO
);
2086 /*********************************************************************
2089 int CDECL
_creat(const char *path
, int flags
)
2091 int usedFlags
= (flags
& _O_TEXT
)| _O_CREAT
| _O_WRONLY
| _O_TRUNC
;
2092 return _open(path
, usedFlags
);
2095 /*********************************************************************
2096 * _wcreat (MSVCRT.@)
2098 int CDECL
_wcreat(const wchar_t *path
, int flags
)
2100 int usedFlags
= (flags
& _O_TEXT
)| _O_CREAT
| _O_WRONLY
| _O_TRUNC
;
2101 return _wopen(path
, usedFlags
);
2104 /*********************************************************************
2105 * _open_osfhandle (MSVCRT.@)
2107 int CDECL
_open_osfhandle(intptr_t handle
, int oflags
)
2112 /* _O_RDONLY (0) always matches, so set the read flag
2113 * MFC's CStdioFile clears O_RDONLY (0)! if it wants to write to the
2114 * file, so set the write flag. It also only sets _O_TEXT if it wants
2115 * text - it never sets _O_BINARY.
2117 /* don't let split_oflags() decide the mode if no mode is passed */
2118 if (!(oflags
& (_O_BINARY
| _O_TEXT
)))
2119 oflags
|= _O_BINARY
;
2121 flags
= GetFileType((HANDLE
)handle
);
2122 if (flags
==FILE_TYPE_UNKNOWN
&& GetLastError()!=NO_ERROR
)
2124 _dosmaperr(GetLastError());
2128 if (flags
== FILE_TYPE_CHAR
)
2130 else if (flags
== FILE_TYPE_PIPE
)
2134 flags
|= split_oflags(oflags
);
2136 fd
= msvcrt_alloc_fd((HANDLE
)handle
, flags
);
2137 TRACE(":handle (%ld) fd (%d) flags 0x%08x\n", handle
, fd
, flags
);
2141 /*********************************************************************
2144 int CDECL
_rmtmp(void)
2146 int num_removed
= 0, i
;
2150 for (i
= 3; i
< MSVCRT_stream_idx
; i
++) {
2151 file
= msvcrt_get_file(i
);
2153 if (file
->_tmpfname
)
2162 TRACE(":removed (%d) temp files\n",num_removed
);
2166 static inline int get_utf8_char_len(char ch
)
2168 if((ch
&0xf8) == 0xf0)
2170 else if((ch
&0xf0) == 0xe0)
2172 else if((ch
&0xe0) == 0xc0)
2177 /*********************************************************************
2178 * (internal) read_utf8
2180 static int read_utf8(ioinfo
*fdinfo
, wchar_t *buf
, unsigned int count
)
2182 HANDLE hand
= fdinfo
->handle
;
2183 char min_buf
[4], *readbuf
, lookahead
;
2184 DWORD readbuf_size
, pos
=0, num_read
=1, char_len
, i
, j
;
2186 /* make the buffer big enough to hold at least one character */
2187 /* read bytes have to fit to output and lookahead buffers */
2189 readbuf_size
= count
< 4 ? 4 : count
;
2190 if(readbuf_size
<=4 || !(readbuf
= malloc(readbuf_size
))) {
2195 if(fdinfo
->lookahead
[0] != '\n') {
2196 readbuf
[pos
++] = fdinfo
->lookahead
[0];
2197 fdinfo
->lookahead
[0] = '\n';
2199 if(fdinfo
->lookahead
[1] != '\n') {
2200 readbuf
[pos
++] = fdinfo
->lookahead
[1];
2201 fdinfo
->lookahead
[1] = '\n';
2203 if(fdinfo
->lookahead
[2] != '\n') {
2204 readbuf
[pos
++] = fdinfo
->lookahead
[2];
2205 fdinfo
->lookahead
[2] = '\n';
2210 /* NOTE: this case is broken in native dll, reading
2211 * sometimes fails when small buffer is passed
2214 if(!pos
&& !ReadFile(hand
, readbuf
, 1, &num_read
, NULL
)) {
2215 if (GetLastError() == ERROR_BROKEN_PIPE
) {
2216 fdinfo
->wxflag
|= WX_ATEOF
;
2219 _dosmaperr(GetLastError());
2222 }else if(!num_read
) {
2223 fdinfo
->wxflag
|= WX_ATEOF
;
2229 char_len
= get_utf8_char_len(readbuf
[0]);
2231 if(ReadFile(hand
, readbuf
+pos
, char_len
-pos
, &num_read
, NULL
))
2235 if(readbuf
[0] == '\n')
2236 fdinfo
->wxflag
|= WX_READNL
;
2238 fdinfo
->wxflag
&= ~WX_READNL
;
2240 if(readbuf
[0] == 0x1a) {
2241 fdinfo
->wxflag
|= WX_ATEOF
;
2245 if(readbuf
[0] == '\r') {
2246 if(!ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || num_read
!=1)
2248 else if(lookahead
== '\n')
2252 if(fdinfo
->wxflag
& (WX_PIPE
| WX_TTY
))
2253 fdinfo
->lookahead
[0] = lookahead
;
2255 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2260 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2261 _dosmaperr(GetLastError());
2268 if(!ReadFile(hand
, readbuf
+pos
, readbuf_size
-pos
, &num_read
, NULL
)) {
2271 }else if(GetLastError() == ERROR_BROKEN_PIPE
) {
2272 fdinfo
->wxflag
|= WX_ATEOF
;
2273 if (readbuf
!= min_buf
) free(readbuf
);
2276 _dosmaperr(GetLastError());
2277 if (readbuf
!= min_buf
) free(readbuf
);
2280 }else if(!pos
&& !num_read
) {
2281 fdinfo
->wxflag
|= WX_ATEOF
;
2282 if (readbuf
!= min_buf
) free(readbuf
);
2287 if(readbuf
[0] == '\n')
2288 fdinfo
->wxflag
|= WX_READNL
;
2290 fdinfo
->wxflag
&= ~WX_READNL
;
2292 /* Find first byte of last character (may be incomplete) */
2293 for(i
=pos
-1; i
>0 && i
>pos
-4; i
--)
2294 if((readbuf
[i
]&0xc0) != 0x80)
2296 char_len
= get_utf8_char_len(readbuf
[i
]);
2297 if(char_len
+i
<= pos
)
2300 if(fdinfo
->wxflag
& (WX_PIPE
| WX_TTY
)) {
2302 fdinfo
->lookahead
[0] = readbuf
[i
];
2304 fdinfo
->lookahead
[1] = readbuf
[i
+1];
2306 fdinfo
->lookahead
[2] = readbuf
[i
+2];
2308 SetFilePointer(fdinfo
->handle
, i
-pos
, NULL
, FILE_CURRENT
);
2312 for(i
=0, j
=0; i
<pos
; i
++) {
2313 if(readbuf
[i
] == 0x1a) {
2314 fdinfo
->wxflag
|= WX_ATEOF
;
2318 /* strip '\r' if followed by '\n' */
2319 if(readbuf
[i
] == '\r' && i
+1==pos
) {
2320 if(fdinfo
->lookahead
[0] != '\n' || !ReadFile(hand
, &lookahead
, 1, &num_read
, NULL
) || !num_read
) {
2321 readbuf
[j
++] = '\r';
2322 }else if(lookahead
== '\n' && j
==0) {
2323 readbuf
[j
++] = '\n';
2325 if(lookahead
!= '\n')
2326 readbuf
[j
++] = '\r';
2328 if(fdinfo
->wxflag
& (WX_PIPE
| WX_TTY
))
2329 fdinfo
->lookahead
[0] = lookahead
;
2331 SetFilePointer(fdinfo
->handle
, -1, NULL
, FILE_CURRENT
);
2333 }else if(readbuf
[i
]!='\r' || readbuf
[i
+1]!='\n') {
2334 readbuf
[j
++] = readbuf
[i
];
2339 if(!(num_read
= MultiByteToWideChar(CP_UTF8
, 0, readbuf
, pos
, buf
, count
))) {
2340 _dosmaperr(GetLastError());
2341 if (readbuf
!= min_buf
) free(readbuf
);
2345 if (readbuf
!= min_buf
) free(readbuf
);
2349 /*********************************************************************
2352 * When reading \r as last character in text mode, read() positions
2353 * the file pointer on the \r character while getc() goes on to
2356 static int read_i(int fd
, ioinfo
*fdinfo
, void *buf
, unsigned int count
)
2358 DWORD num_read
, utf16
;
2359 char *bufstart
= buf
;
2364 if (fdinfo
->wxflag
& WX_ATEOF
) {
2365 TRACE("already at EOF, returning 0\n");
2368 /* Don't trace small reads, it gets *very* annoying */
2370 TRACE(":fd (%d) handle (%p) buf (%p) len (%d)\n", fd
, fdinfo
->handle
, buf
, count
);
2371 if (fdinfo
->handle
== INVALID_HANDLE_VALUE
)
2377 utf16
= (fdinfo
->exflag
& EF_UTF16
) != 0;
2378 if (((fdinfo
->exflag
&EF_UTF8
) || utf16
) && count
&1)
2384 if((fdinfo
->wxflag
&WX_TEXT
) && (fdinfo
->exflag
&EF_UTF8
))
2385 return read_utf8(fdinfo
, buf
, count
);
2387 if (fdinfo
->lookahead
[0]!='\n' || ReadFile(fdinfo
->handle
, bufstart
, count
, &num_read
, NULL
))
2389 if (fdinfo
->lookahead
[0] != '\n')
2391 bufstart
[0] = fdinfo
->lookahead
[0];
2392 fdinfo
->lookahead
[0] = '\n';
2396 bufstart
[1] = fdinfo
->lookahead
[1];
2397 fdinfo
->lookahead
[1] = '\n';
2400 if(count
>1+utf16
&& ReadFile(fdinfo
->handle
, bufstart
+1+utf16
, count
-1-utf16
, &num_read
, NULL
))
2401 num_read
+= 1+utf16
;
2406 if(utf16
&& (num_read
&1))
2408 /* msvcr90 uses uninitialized value from the buffer in this case */
2409 /* msvcrt ignores additional data */
2410 ERR("got odd number of bytes in UTF16 mode\n");
2414 if (count
!= 0 && num_read
== 0)
2416 fdinfo
->wxflag
|= WX_ATEOF
;
2417 TRACE(":EOF %s\n",debugstr_an(buf
,num_read
));
2419 else if (fdinfo
->wxflag
& WX_TEXT
)
2423 if (bufstart
[0]=='\n' && (!utf16
|| bufstart
[1]==0))
2424 fdinfo
->wxflag
|= WX_READNL
;
2426 fdinfo
->wxflag
&= ~WX_READNL
;
2428 for (i
=0, j
=0; i
<num_read
; i
+=1+utf16
)
2430 /* in text mode, a ctrl-z signals EOF */
2431 if (bufstart
[i
]==0x1a && (!utf16
|| bufstart
[i
+1]==0))
2433 fdinfo
->wxflag
|= WX_ATEOF
;
2434 TRACE(":^Z EOF %s\n",debugstr_an(buf
,num_read
));
2438 /* in text mode, strip \r if followed by \n */
2439 if (bufstart
[i
]=='\r' && (!utf16
|| bufstart
[i
+1]==0) && i
+1+utf16
==num_read
)
2444 lookahead
[1] = '\n';
2445 if (ReadFile(fdinfo
->handle
, lookahead
, 1+utf16
, &len
, NULL
) && len
)
2447 if(lookahead
[0]=='\n' && (!utf16
|| lookahead
[1]==0) && j
==0)
2449 bufstart
[j
++] = '\n';
2450 if(utf16
) bufstart
[j
++] = 0;
2454 if(lookahead
[0]!='\n' || (utf16
&& lookahead
[1]!=0))
2456 bufstart
[j
++] = '\r';
2457 if(utf16
) bufstart
[j
++] = 0;
2460 if (fdinfo
->wxflag
& (WX_PIPE
| WX_TTY
))
2462 if (lookahead
[0]=='\n' && (!utf16
|| !lookahead
[1]))
2464 bufstart
[j
++] = '\n';
2465 if (utf16
) bufstart
[j
++] = 0;
2469 fdinfo
->lookahead
[0] = lookahead
[0];
2470 fdinfo
->lookahead
[1] = lookahead
[1];
2474 SetFilePointer(fdinfo
->handle
, -1-utf16
, NULL
, FILE_CURRENT
);
2479 bufstart
[j
++] = '\r';
2480 if(utf16
) bufstart
[j
++] = 0;
2483 else if((bufstart
[i
]!='\r' || (utf16
&& bufstart
[i
+1]!=0))
2484 || (bufstart
[i
+1+utf16
]!='\n' || (utf16
&& bufstart
[i
+3]!=0)))
2486 bufstart
[j
++] = bufstart
[i
];
2487 if(utf16
) bufstart
[j
++] = bufstart
[i
+1];
2495 if (GetLastError() == ERROR_BROKEN_PIPE
)
2497 TRACE(":end-of-pipe\n");
2498 fdinfo
->wxflag
|= WX_ATEOF
;
2503 TRACE(":failed-last error (%d)\n",GetLastError());
2509 TRACE("(%u), %s\n",num_read
,debugstr_an(buf
, num_read
));
2513 /*********************************************************************
2516 int CDECL
_read(int fd
, void *buf
, unsigned int count
)
2518 ioinfo
*info
= get_ioinfo(fd
);
2519 int num_read
= read_i(fd
, info
, buf
, count
);
2520 release_ioinfo(info
);
2524 /*********************************************************************
2525 * _setmode (MSVCRT.@)
2527 int CDECL
_setmode(int fd
,int mode
)
2529 ioinfo
*info
= get_ioinfo(fd
);
2530 int ret
= info
->wxflag
& WX_TEXT
? _O_TEXT
: _O_BINARY
;
2531 if(ret
==_O_TEXT
&& (info
->exflag
& (EF_UTF8
|EF_UTF16
)))
2534 if(mode
!=_O_TEXT
&& mode
!=_O_BINARY
&& mode
!=_O_WTEXT
2535 && mode
!=_O_U16TEXT
&& mode
!=_O_U8TEXT
) {
2537 release_ioinfo(info
);
2541 if(mode
== _O_BINARY
) {
2542 info
->wxflag
&= ~WX_TEXT
;
2543 info
->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2544 release_ioinfo(info
);
2548 info
->wxflag
|= WX_TEXT
;
2550 info
->exflag
&= ~(EF_UTF8
|EF_UTF16
);
2551 else if(mode
== _O_U8TEXT
)
2552 info
->exflag
= (info
->exflag
& ~EF_UTF16
) | EF_UTF8
;
2554 info
->exflag
= (info
->exflag
& ~EF_UTF8
) | EF_UTF16
;
2556 release_ioinfo(info
);
2561 /*********************************************************************
2564 long CDECL
_tell(int fd
)
2566 return _lseek(fd
, 0, SEEK_CUR
);
2569 /*********************************************************************
2570 * _telli64 (MSVCRT.@)
2572 __int64 CDECL
_telli64(int fd
)
2574 return _lseeki64(fd
, 0, SEEK_CUR
);
2577 /*********************************************************************
2578 * _tempnam (MSVCRT.@)
2580 char * CDECL
_tempnam(const char *dir
, const char *prefix
)
2582 char tmpbuf
[MAX_PATH
];
2583 const char *tmp_dir
= getenv("TMP");
2585 if (tmp_dir
) dir
= tmp_dir
;
2587 TRACE("dir (%s) prefix (%s)\n",dir
,prefix
);
2588 if (GetTempFileNameA(dir
,prefix
,0,tmpbuf
))
2590 TRACE("got name (%s)\n",tmpbuf
);
2591 DeleteFileA(tmpbuf
);
2592 return _strdup(tmpbuf
);
2594 TRACE("failed (%d)\n",GetLastError());
2598 /*********************************************************************
2599 * _wtempnam (MSVCRT.@)
2601 wchar_t * CDECL
_wtempnam(const wchar_t *dir
, const wchar_t *prefix
)
2603 wchar_t tmpbuf
[MAX_PATH
];
2605 TRACE("dir (%s) prefix (%s)\n",debugstr_w(dir
),debugstr_w(prefix
));
2606 if (GetTempFileNameW(dir
,prefix
,0,tmpbuf
))
2608 TRACE("got name (%s)\n",debugstr_w(tmpbuf
));
2609 DeleteFileW(tmpbuf
);
2610 return _wcsdup(tmpbuf
);
2612 TRACE("failed (%d)\n",GetLastError());
2616 /*********************************************************************
2619 int CDECL
_umask(int umask
)
2621 int old_umask
= MSVCRT_umask
;
2622 TRACE("(%d)\n",umask
);
2623 MSVCRT_umask
= umask
;
2627 /*********************************************************************
2630 int CDECL
_write(int fd
, const void* buf
, unsigned int count
)
2633 ioinfo
*info
= get_ioinfo(fd
);
2634 HANDLE hand
= info
->handle
;
2636 /* Don't trace small writes, it gets *very* annoying */
2639 TRACE(":fd (%d) handle (%d) buf (%p) len (%d)\n",fd
,hand
,buf
,count
);
2641 if (hand
== INVALID_HANDLE_VALUE
)
2644 release_ioinfo(info
);
2648 if (((info
->exflag
&EF_UTF8
) || (info
->exflag
&EF_UTF16
)) && count
&1)
2651 release_ioinfo(info
);
2655 /* If appending, go to EOF */
2656 if (info
->wxflag
& WX_APPEND
)
2657 _lseek(fd
, 0, FILE_END
);
2659 if (!(info
->wxflag
& WX_TEXT
))
2661 if (WriteFile(hand
, buf
, count
, &num_written
, NULL
)
2662 && (num_written
== count
))
2664 release_ioinfo(info
);
2667 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d)\n", fd
,
2668 hand
, GetLastError());
2673 unsigned int i
, j
, nr_lf
, size
;
2676 const char *s
= buf
, *buf_start
= buf
;
2678 if (!(info
->exflag
& (EF_UTF8
|EF_UTF16
)))
2680 /* find number of \n */
2681 for (nr_lf
=0, i
=0; i
<count
; i
++)
2687 if ((q
= p
= malloc(size
)))
2689 for (s
= buf
, i
= 0, j
= 0; i
< count
; i
++)
2698 FIXME("Malloc failed\n");
2710 else if (info
->exflag
& EF_UTF16
)
2712 for (nr_lf
=0, i
=0; i
<count
; i
+=2)
2713 if (s
[i
]=='\n' && s
[i
+1]==0)
2718 if ((q
= p
= malloc(size
)))
2720 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
2722 if (s
[i
]=='\n' && s
[i
+1]==0)
2733 FIXME("Malloc failed\n");
2749 for(nr_lf
=0, i
=0; i
<count
; i
+=2)
2750 if (s
[i
]=='\n' && s
[i
+1]==0)
2753 conv_len
= WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)buf
, count
/2, NULL
, 0, NULL
, NULL
);
2755 _dosmaperr(GetLastError());
2757 release_ioinfo(info
);
2761 size
= conv_len
+nr_lf
;
2762 if((p
= malloc(count
+nr_lf
*2+size
)))
2764 for (s
=buf
, i
=0, j
=0; i
<count
; i
++)
2766 if (s
[i
]=='\n' && s
[i
+1]==0)
2774 q
= p
+count
+nr_lf
*2;
2775 WideCharToMultiByte(CP_UTF8
, 0, (WCHAR
*)p
, count
/2+nr_lf
,
2776 p
+count
+nr_lf
*2, conv_len
+nr_lf
, NULL
, NULL
);
2780 FIXME("Malloc failed\n");
2787 if (!WriteFile(hand
, q
, size
, &num_written
, NULL
))
2789 release_ioinfo(info
);
2792 if (num_written
!= size
)
2794 TRACE("WriteFile (fd %d, hand %p) failed-last error (%d), num_written %d\n",
2795 fd
, hand
, GetLastError(), num_written
);
2797 return s
- buf_start
;
2802 release_ioinfo(info
);
2806 /*********************************************************************
2809 int CDECL
_putw(int val
, FILE* file
)
2814 len
= _write(file
->_file
, &val
, sizeof(val
));
2815 if (len
== sizeof(val
)) {
2820 file
->_flag
|= _IOERR
;
2825 /*********************************************************************
2828 int CDECL
fclose(FILE* file
)
2834 free(file
->_tmpfname
);
2835 file
->_tmpfname
= NULL
;
2836 /* flush stdio buffers */
2837 if(file
->_flag
& _IOWRT
)
2839 if(file
->_flag
& _IOMYBUF
)
2842 r
=_close(file
->_file
);
2846 if(file
<_iob
|| file
>=_iob
+_IOB_ENTRIES
)
2847 DeleteCriticalSection(&((file_crit
*)file
)->crit
);
2849 if(file
== msvcrt_get_file(MSVCRT_stream_idx
-1)) {
2850 while(MSVCRT_stream_idx
>3 && !file
->_flag
) {
2851 MSVCRT_stream_idx
--;
2852 file
= msvcrt_get_file(MSVCRT_stream_idx
-1);
2856 return ((r
== -1) || (flag
& _IOERR
) ? EOF
: 0);
2859 /*********************************************************************
2862 int CDECL
feof(FILE* file
)
2864 return file
->_flag
& _IOEOF
;
2867 /*********************************************************************
2870 int CDECL
ferror(FILE* file
)
2872 return file
->_flag
& _IOERR
;
2875 /*********************************************************************
2876 * _filbuf (MSVCRT.@)
2878 int CDECL
_filbuf(FILE* file
)
2883 if(file
->_flag
& _IOSTRG
) {
2888 /* Allocate buffer if needed */
2889 if(!(file
->_flag
& (_IONBF
| _IOMYBUF
| _USERBUF
)))
2890 msvcrt_alloc_buffer(file
);
2892 if(!(file
->_flag
& _IOREAD
)) {
2893 if(file
->_flag
& _IORW
)
2894 file
->_flag
|= _IOREAD
;
2901 if(!(file
->_flag
& (_IOMYBUF
| _USERBUF
))) {
2903 if ((r
= _read(file
->_file
,&c
,1)) != 1) {
2904 file
->_flag
|= (r
== 0) ? _IOEOF
: _IOERR
;
2912 file
->_cnt
= _read(file
->_file
, file
->_base
, file
->_bufsiz
);
2914 file
->_flag
|= (file
->_cnt
== 0) ? _IOEOF
: _IOERR
;
2921 file
->_ptr
= file
->_base
+1;
2922 c
= *(unsigned char *)file
->_base
;
2928 /*********************************************************************
2931 int CDECL
fgetc(FILE* file
)
2939 i
= (unsigned char *)file
->_ptr
++;
2948 /*********************************************************************
2949 * _fgetchar (MSVCRT.@)
2951 int CDECL
_fgetchar(void)
2953 return fgetc(stdin
);
2956 /*********************************************************************
2959 char * CDECL
fgets(char *s
, int size
, FILE* file
)
2962 char * buf_start
= s
;
2964 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
2965 file
,file
->_file
,s
,size
);
2969 while ((size
>1) && (cc
= fgetc(file
)) != EOF
&& cc
!= '\n')
2974 if ((cc
== EOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
2976 TRACE(":nothing read\n");
2980 if ((cc
!= EOF
) && (size
> 1))
2983 TRACE(":got %s\n", debugstr_a(buf_start
));
2988 /*********************************************************************
2991 wint_t CDECL
fgetwc(FILE* file
)
2998 if((get_ioinfo_nolock(file
->_file
)->exflag
& (EF_UTF8
| EF_UTF16
))
2999 || !(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
)) {
3002 for(p
=(char*)&ret
; (wint_t*)p
<&ret
+1; p
++) {
3011 char mbs
[MB_LEN_MAX
];
3017 if(isleadbyte((unsigned char)mbs
[0])) {
3028 if(!len
|| mbtowc(&ret
, mbs
, len
)==-1)
3036 /*********************************************************************
3039 int CDECL
_getw(FILE* file
)
3047 for (j
=0; j
<sizeof(int); j
++) {
3050 file
->_flag
|= _IOEOF
;
3061 /*********************************************************************
3064 wint_t CDECL
getwc(FILE* file
)
3066 return fgetwc(file
);
3069 /*********************************************************************
3070 * _fgetwchar (MSVCRT.@)
3072 wint_t CDECL
_fgetwchar(void)
3074 return fgetwc(stdin
);
3077 /*********************************************************************
3078 * getwchar (MSVCRT.@)
3080 wint_t CDECL
getwchar(void)
3082 return _fgetwchar();
3085 /*********************************************************************
3088 wchar_t * CDECL
fgetws(wchar_t *s
, int size
, FILE* file
)
3091 wchar_t * buf_start
= s
;
3093 TRACE(":file(%p) fd (%d) str (%p) len (%d)\n",
3094 file
,file
->_file
,s
,size
);
3098 while ((size
>1) && (cc
= fgetwc(file
)) != WEOF
&& cc
!= '\n')
3103 if ((cc
== WEOF
) && (s
== buf_start
)) /* If nothing read, return 0*/
3105 TRACE(":nothing read\n");
3109 if ((cc
!= WEOF
) && (size
> 1))
3112 TRACE(":got %s\n", debugstr_w(buf_start
));
3117 /*********************************************************************
3120 size_t CDECL
fwrite(const void *ptr
, size_t size
, size_t nmemb
, FILE* file
)
3122 size_t wrcnt
=size
* nmemb
;
3131 if(file
->_cnt
< 0) {
3132 WARN("negative file->_cnt value in %p\n", file
);
3133 file
->_flag
|= MSVCRT__IOERR
;
3138 int pcnt
=(file
->_cnt
>wrcnt
)? wrcnt
: file
->_cnt
;
3139 memcpy(file
->_ptr
, ptr
, pcnt
);
3144 ptr
= (const char*)ptr
+ pcnt
;
3145 } else if((file
->_flag
& _IONBF
)
3146 || ((file
->_flag
& (_IOMYBUF
| _USERBUF
)) && wrcnt
>= file
->_bufsiz
)
3147 || (!(file
->_flag
& (_IOMYBUF
| _USERBUF
)) && wrcnt
>= MSVCRT_INTERNAL_BUFSIZ
)) {
3151 if(file
->_flag
& _IONBF
)
3153 else if(!(file
->_flag
& (_IOMYBUF
| _USERBUF
)))
3154 bufsiz
= MSVCRT_INTERNAL_BUFSIZ
;
3156 bufsiz
= file
->_bufsiz
;
3158 pcnt
= (wrcnt
/ bufsiz
) * bufsiz
;
3160 if(msvcrt_flush_buffer(file
) == EOF
)
3163 if(_write(file
->_file
, ptr
, pcnt
) <= 0) {
3164 file
->_flag
|= _IOERR
;
3169 ptr
= (const char*)ptr
+ pcnt
;
3171 if(_flsbuf(*(const char*)ptr
, file
) == EOF
)
3175 ptr
= (const char*)ptr
+ 1;
3180 return written
/ size
;
3183 /*********************************************************************
3185 * FORKED for ReactOS, don't sync with Wine!
3187 * - http://jira.reactos.org/browse/CORE-6495
3188 * - http://bugs.winehq.org/show_bug.cgi?id=8598
3190 wint_t CDECL
fputwc(wchar_t c
, FILE* stream
)
3192 /* If this is a real file stream (and not some temporary one for
3193 sprintf-like functions), check whether it is opened in text mode.
3194 In this case, we have to perform an implicit conversion to ANSI. */
3195 if (!(stream
->_flag
& _IOSTRG
) && get_ioinfo_nolock(stream
->_file
)->wxflag
& WX_TEXT
)
3197 /* Convert to multibyte in text mode */
3198 char mbc
[MB_LEN_MAX
];
3201 mb_return
= wctomb(mbc
, c
);
3206 /* Output all characters */
3207 if (fwrite(mbc
, mb_return
, 1, stream
) != 1)
3212 if (fwrite(&c
, sizeof(c
), 1, stream
) != 1)
3219 /*********************************************************************
3220 * _fputwchar (MSVCRT.@)
3222 wint_t CDECL
_fputwchar(wint_t wc
)
3224 return fputwc(wc
, stdout
);
3227 /*********************************************************************
3228 * _wfsopen (MSVCRT.@)
3230 FILE * CDECL
_wfsopen(const wchar_t *path
, const wchar_t *mode
, int share
)
3233 int open_flags
, stream_flags
, fd
;
3235 TRACE("(%s,%s)\n", debugstr_w(path
), debugstr_w(mode
));
3237 /* map mode string to open() flags. "man fopen" for possibilities. */
3238 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1)
3242 fd
= _wsopen(path
, open_flags
, share
, _S_IREAD
| _S_IWRITE
);
3245 else if ((file
= msvcrt_alloc_fp()) && msvcrt_init_fp(file
, fd
, stream_flags
)
3247 TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd
, debugstr_w(mode
), file
);
3254 TRACE(":got (%p)\n",file
);
3255 if (fd
>= 0 && !file
)
3261 /*********************************************************************
3262 * _fsopen (MSVCRT.@)
3264 FILE * CDECL
_fsopen(const char *path
, const char *mode
, int share
)
3267 wchar_t *pathW
= NULL
, *modeW
= NULL
;
3269 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) {
3270 _invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3274 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
3277 _invalid_parameter(NULL
, NULL
, NULL
, 0, 0);
3282 ret
= _wfsopen(pathW
, modeW
, share
);
3289 /*********************************************************************
3292 FILE * CDECL
fopen(const char *path
, const char *mode
)
3294 return _fsopen( path
, mode
, _SH_DENYNO
);
3297 /*********************************************************************
3298 * fopen_s (MSVCRT.@)
3300 int CDECL
fopen_s(FILE** pFile
,
3301 const char *filename
, const char *mode
)
3303 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
)) return EINVAL
;
3304 if (!MSVCRT_CHECK_PMT(filename
!= NULL
)) return EINVAL
;
3305 if (!MSVCRT_CHECK_PMT(mode
!= NULL
)) return EINVAL
;
3307 *pFile
= fopen(filename
, mode
);
3314 /*********************************************************************
3315 * _wfopen (MSVCRT.@)
3317 FILE * CDECL
_wfopen(const wchar_t *path
, const wchar_t *mode
)
3319 return _wfsopen( path
, mode
, _SH_DENYNO
);
3322 /*********************************************************************
3323 * _wfopen_s (MSVCRT.@)
3325 int CDECL
_wfopen_s(FILE** pFile
, const wchar_t *filename
,
3326 const wchar_t *mode
)
3328 if (!MSVCRT_CHECK_PMT(pFile
!= NULL
) || !MSVCRT_CHECK_PMT(filename
!= NULL
) ||
3329 !MSVCRT_CHECK_PMT(mode
!= NULL
)) {
3334 *pFile
= _wfopen(filename
, mode
);
3341 /* fputc calls _flsbuf which calls fputc */
3342 int CDECL
_flsbuf(int c
, FILE* file
);
3344 /*********************************************************************
3347 int CDECL
fputc(int c
, FILE* file
)
3357 res
= msvcrt_flush_buffer(file
);
3359 return res
? res
: c
;
3366 res
= _flsbuf(c
, file
);
3372 /*********************************************************************
3373 * _fputchar (MSVCRT.@)
3375 int CDECL
_fputchar(int c
)
3377 return fputc(c
, stdout
);
3380 /*********************************************************************
3383 size_t CDECL
fread(void *ptr
, size_t size
, size_t nmemb
, FILE* file
)
3385 size_t rcnt
=size
* nmemb
;
3394 /* first buffered data */
3396 int pcnt
= (rcnt
>file
->_cnt
)? file
->_cnt
:rcnt
;
3397 memcpy(ptr
, file
->_ptr
, pcnt
);
3402 ptr
= (char*)ptr
+ pcnt
;
3403 } else if(!(file
->_flag
& _IOREAD
)) {
3404 if(file
->_flag
& _IORW
) {
3405 file
->_flag
|= _IOREAD
;
3412 if(rcnt
>0 && !(file
->_flag
& (_IONBF
| _IOMYBUF
| _USERBUF
)))
3413 msvcrt_alloc_buffer(file
);
3418 if (!file
->_cnt
&& rcnt
<BUFSIZ
&& (file
->_flag
& (_IOMYBUF
| _USERBUF
))) {
3419 file
->_cnt
= _read(file
->_file
, file
->_base
, file
->_bufsiz
);
3420 file
->_ptr
= file
->_base
;
3421 i
= (file
->_cnt
<rcnt
) ? file
->_cnt
: rcnt
;
3422 /* If the buffer fill reaches eof but fread wouldn't, clear eof. */
3423 if (i
> 0 && i
< file
->_cnt
) {
3424 get_ioinfo_nolock(file
->_file
)->wxflag
&= ~WX_ATEOF
;
3425 file
->_flag
&= ~_IOEOF
;
3428 memcpy(ptr
, file
->_ptr
, i
);
3432 } else if (rcnt
> INT_MAX
) {
3433 i
= _read(file
->_file
, ptr
, INT_MAX
);
3434 } else if (rcnt
< BUFSIZ
) {
3435 i
= _read(file
->_file
, ptr
, rcnt
);
3437 i
= _read(file
->_file
, ptr
, rcnt
- BUFSIZ
/2);
3441 ptr
= (char *)ptr
+i
;
3442 /* expose feof condition in the flags
3443 * MFC tests file->_flag for feof, and doesn't call feof())
3445 if (get_ioinfo_nolock(file
->_file
)->wxflag
& WX_ATEOF
)
3446 file
->_flag
|= _IOEOF
;
3449 file
->_flag
|= _IOERR
;
3460 /*********************************************************************
3461 * _wfreopen (MSVCRT.@)
3464 FILE* CDECL
_wfreopen(const wchar_t *path
, const wchar_t *mode
, FILE* file
)
3466 int open_flags
, stream_flags
, fd
;
3468 TRACE(":path (%p) mode (%s) file (%p) fd (%d)\n", debugstr_w(path
), debugstr_w(mode
), file
, file
? file
->_file
: -1);
3471 if (!file
|| ((fd
= file
->_file
) < 0) || fd
> fdend
)
3476 /* map mode string to open() flags. "man fopen" for possibilities. */
3477 if (msvcrt_get_flags(mode
, &open_flags
, &stream_flags
) == -1)
3481 fd
= _wopen(path
, open_flags
, _S_IREAD
| _S_IWRITE
);
3484 else if (msvcrt_init_fp(file
, fd
, stream_flags
) == -1)
3487 WARN(":failed-last error (%d)\n",GetLastError());
3488 _dosmaperr(GetLastError());
3497 /*********************************************************************
3498 * freopen (MSVCRT.@)
3501 FILE* CDECL
freopen(const char *path
, const char *mode
, FILE* file
)
3504 wchar_t *pathW
= NULL
, *modeW
= NULL
;
3506 if (path
&& !(pathW
= msvcrt_wstrdupa(path
))) return NULL
;
3507 if (mode
&& !(modeW
= msvcrt_wstrdupa(mode
)))
3513 ret
= _wfreopen(pathW
, modeW
, file
);
3520 /*********************************************************************
3521 * fsetpos (MSVCRT.@)
3523 int CDECL
fsetpos(FILE* file
, const fpos_t *pos
)
3528 /* Note that all this has been lifted 'as is' from fseek */
3529 if(file
->_flag
& _IOWRT
)
3530 msvcrt_flush_buffer(file
);
3532 /* Discard buffered input */
3534 file
->_ptr
= file
->_base
;
3536 /* Reset direction of i/o */
3537 if(file
->_flag
& _IORW
) {
3538 file
->_flag
&= ~(_IOREAD
|_IOWRT
);
3541 ret
= (_lseeki64(file
->_file
,*pos
,SEEK_SET
) == -1) ? -1 : 0;
3546 /*********************************************************************
3547 * _ftelli64 (MSVCRT.@)
3549 __int64 CDECL
_ftelli64(FILE* file
)
3554 pos
= _telli64(file
->_file
);
3559 if(file
->_flag
& (_IOMYBUF
| _USERBUF
)) {
3560 if(file
->_flag
& _IOWRT
) {
3561 pos
+= file
->_ptr
- file
->_base
;
3563 if(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
) {
3566 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
3570 } else if(!file
->_cnt
) { /* nothing to do */
3571 } else if(_lseeki64(file
->_file
, 0, SEEK_END
)==pos
) {
3575 if(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
) {
3576 for(i
=0; i
<file
->_cnt
; i
++)
3577 if(file
->_ptr
[i
] == '\n')
3583 if(_lseeki64(file
->_file
, pos
, SEEK_SET
) != pos
) {
3588 pos
-= file
->_bufsiz
;
3589 pos
+= file
->_ptr
- file
->_base
;
3591 if(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
) {
3592 if(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_READNL
)
3595 for(p
=file
->_base
; p
<file
->_ptr
; p
++)
3606 /*********************************************************************
3609 LONG CDECL
ftell(FILE* file
)
3611 return (LONG
)_ftelli64(file
);
3614 /*********************************************************************
3615 * fgetpos (MSVCRT.@)
3617 int CDECL
fgetpos(FILE* file
, fpos_t *pos
)
3619 *pos
= _ftelli64(file
);
3625 /*********************************************************************
3628 int CDECL
fputs(const char *s
, FILE* file
)
3630 size_t len
= strlen(s
);
3634 ret
= fwrite(s
, sizeof(*s
), len
, file
) == len
? 0 : EOF
;
3639 /*********************************************************************
3642 int CDECL
fputws(const wchar_t *s
, FILE* file
)
3644 size_t i
, len
= strlenW(s
);
3649 if (!(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
)) {
3650 ret
= fwrite(s
,sizeof(*s
),len
,file
) == len
? 0 : EOF
;
3655 tmp_buf
= add_std_buffer(file
);
3656 for (i
=0; i
<len
; i
++) {
3657 if(fputwc(s
[i
], file
) == WEOF
) {
3658 if(tmp_buf
) remove_std_buffer(file
);
3664 if(tmp_buf
) remove_std_buffer(file
);
3669 /*********************************************************************
3670 * getchar (MSVCRT.@)
3672 int CDECL
getchar(void)
3674 return fgetc(stdin
);
3677 /*********************************************************************
3680 int CDECL
getc(FILE* file
)
3685 /*********************************************************************
3688 char * CDECL
gets(char *buf
)
3691 char * buf_start
= buf
;
3694 for(cc
= fgetc(stdin
); cc
!= EOF
&& cc
!= '\n';
3696 if(cc
!= '\r') *buf
++ = (char)cc
;
3700 TRACE("got '%s'\n", buf_start
);
3701 _unlock_file(stdin
);
3705 /*********************************************************************
3708 wchar_t* CDECL
_getws(wchar_t* buf
)
3714 for (cc
= fgetwc(stdin
); cc
!= WEOF
&& cc
!= '\n';
3718 *buf
++ = (wchar_t)cc
;
3722 TRACE("got %s\n", debugstr_w(ws
));
3723 _unlock_file(stdin
);
3727 /*********************************************************************
3730 int CDECL
putc(int c
, FILE* file
)
3732 return fputc(c
, file
);
3735 /*********************************************************************
3736 * putchar (MSVCRT.@)
3738 int CDECL
putchar(int c
)
3740 return fputc(c
, stdout
);
3743 /*********************************************************************
3744 * _putwch (MSVCRT.@)
3746 wint_t CDECL
_putwch(wchar_t c
)
3748 return fputwc(c
, stdout
);
3751 /*********************************************************************
3754 int CDECL
puts(const char *s
)
3756 size_t len
= strlen(s
);
3760 if(fwrite(s
, sizeof(*s
), len
, stdout
) != len
) {
3761 _unlock_file(stdout
);
3765 ret
= fwrite("\n",1,1,stdout
) == 1 ? 0 : EOF
;
3766 _unlock_file(stdout
);
3770 /*********************************************************************
3773 int CDECL
_putws(const wchar_t *s
)
3775 static const wchar_t nl
= '\n';
3776 size_t len
= strlenW(s
);
3780 if(fwrite(s
, sizeof(*s
), len
, stdout
) != len
) {
3781 _unlock_file(stdout
);
3785 ret
= fwrite(&nl
,sizeof(nl
),1,stdout
) == 1 ? 0 : EOF
;
3786 _unlock_file(stdout
);
3790 /*********************************************************************
3793 int CDECL
remove(const char *path
)
3795 TRACE("(%s)\n",path
);
3796 if (DeleteFileA(path
))
3798 TRACE(":failed (%d)\n",GetLastError());
3799 _dosmaperr(GetLastError());
3803 /*********************************************************************
3804 * _wremove (MSVCRT.@)
3806 int CDECL
_wremove(const wchar_t *path
)
3808 TRACE("(%s)\n",debugstr_w(path
));
3809 if (DeleteFileW(path
))
3811 TRACE(":failed (%d)\n",GetLastError());
3812 _dosmaperr(GetLastError());
3816 /*********************************************************************
3819 int CDECL
rename(const char *oldpath
,const char *newpath
)
3821 TRACE(":from %s to %s\n",oldpath
,newpath
);
3822 if (MoveFileExA(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
3824 TRACE(":failed (%d)\n",GetLastError());
3825 _dosmaperr(GetLastError());
3829 /*********************************************************************
3830 * _wrename (MSVCRT.@)
3832 int CDECL
_wrename(const wchar_t *oldpath
,const wchar_t *newpath
)
3834 TRACE(":from %s to %s\n",debugstr_w(oldpath
),debugstr_w(newpath
));
3835 if (MoveFileExW(oldpath
, newpath
, MOVEFILE_COPY_ALLOWED
))
3837 TRACE(":failed (%d)\n",GetLastError());
3838 _dosmaperr(GetLastError());
3842 /*********************************************************************
3843 * setvbuf (MSVCRT.@)
3845 int CDECL
setvbuf(FILE* file
, char *buf
, int mode
, size_t size
)
3847 if(!MSVCRT_CHECK_PMT(file
!= NULL
)) return -1;
3848 if(!MSVCRT_CHECK_PMT(mode
==_IONBF
|| mode
==_IOFBF
|| mode
==_IOLBF
)) return -1;
3849 if(!MSVCRT_CHECK_PMT(mode
==_IONBF
|| (size
>=2 && size
<=INT_MAX
))) return -1;
3854 if(file
->_flag
& _IOMYBUF
)
3856 file
->_flag
&= ~(_IONBF
| _IOMYBUF
| _USERBUF
);
3859 if(mode
== _IONBF
) {
3860 file
->_flag
|= _IONBF
;
3861 file
->_base
= file
->_ptr
= (char*)&file
->_charbuf
;
3864 file
->_base
= file
->_ptr
= buf
;
3865 file
->_flag
|= _USERBUF
;
3866 file
->_bufsiz
= size
;
3868 file
->_base
= file
->_ptr
= malloc(size
);
3875 file
->_flag
|= _IOMYBUF
;
3876 file
->_bufsiz
= size
;
3882 /*********************************************************************
3885 void CDECL
setbuf(FILE* file
, char *buf
)
3887 setvbuf(file
, buf
, buf
? _IOFBF
: _IONBF
, BUFSIZ
);
3890 /*********************************************************************
3893 char * CDECL
tmpnam(char *s
)
3900 thread_data_t
*data
= msvcrt_get_thread_data();
3902 if(!data
->tmpnam_buffer
)
3903 data
->tmpnam_buffer
= malloc(MAX_PATH
);
3905 s
= data
->tmpnam_buffer
;
3908 msvcrt_int_to_base32(GetCurrentProcessId(), tmpstr
);
3909 p
= s
+ sprintf(s
, "\\s%s.", tmpstr
);
3910 for (count
= 0; count
< TMP_MAX
; count
++)
3912 size
= msvcrt_int_to_base32(tmpnam_unique
++, tmpstr
);
3913 memcpy(p
, tmpstr
, size
);
3915 if (GetFileAttributesA(s
) == INVALID_FILE_ATTRIBUTES
&&
3916 GetLastError() == ERROR_FILE_NOT_FOUND
)
3922 /*********************************************************************
3923 * _wtmpnam (MSVCRT.@)
3925 wchar_t * CDECL
_wtmpnam(wchar_t *s
)
3927 static const wchar_t format
[] = {'\\','s','%','s','.',0};
3932 thread_data_t
*data
= msvcrt_get_thread_data();
3934 if(!data
->wtmpnam_buffer
)
3935 data
->wtmpnam_buffer
= malloc(sizeof(wchar_t[MAX_PATH
]));
3937 s
= data
->wtmpnam_buffer
;
3940 msvcrt_int_to_base32_w(GetCurrentProcessId(), tmpstr
);
3941 p
= s
+ _snwprintf(s
, MAX_PATH
, format
, tmpstr
);
3942 for (count
= 0; count
< TMP_MAX
; count
++)
3944 size
= msvcrt_int_to_base32_w(tmpnam_unique
++, tmpstr
);
3945 memcpy(p
, tmpstr
, size
*sizeof(wchar_t));
3947 if (GetFileAttributesW(s
) == INVALID_FILE_ATTRIBUTES
&&
3948 GetLastError() == ERROR_FILE_NOT_FOUND
)
3954 /*********************************************************************
3955 * tmpfile (MSVCRT.@)
3957 FILE* CDECL
tmpfile(void)
3959 char *filename
= tmpnam(NULL
);
3964 fd
= _open(filename
, _O_CREAT
| _O_BINARY
| _O_RDWR
| _O_TEMPORARY
,
3965 _S_IREAD
| _S_IWRITE
);
3966 if (fd
!= -1 && (file
= msvcrt_alloc_fp()))
3968 if (msvcrt_init_fp(file
, fd
, _IORW
) == -1)
3973 else file
->_tmpfname
= _strdup(filename
);
3976 if(fd
!= -1 && !file
)
3982 /*********************************************************************
3985 int CDECL
ungetc(int c
, FILE * file
)
3987 if(!MSVCRT_CHECK_PMT(file
!= NULL
)) return EOF
;
3989 if (c
== EOF
|| !(file
->_flag
&_IOREAD
||
3990 (file
->_flag
&_IORW
&& !(file
->_flag
&_IOWRT
))))
3994 if((!(file
->_flag
& (_IONBF
| _IOMYBUF
| _USERBUF
))
3995 && msvcrt_alloc_buffer(file
))
3996 || (!file
->_cnt
&& file
->_ptr
==file
->_base
))
3999 if(file
->_ptr
>file
->_base
) {
4001 if(file
->_flag
& _IOSTRG
) {
4002 if(*file
->_ptr
!= c
) {
4012 file
->_flag
|= _IOREAD
;
4021 /*********************************************************************
4022 * ungetwc (MSVCRT.@)
4024 wint_t CDECL
ungetwc(wint_t wc
, FILE * file
)
4033 if((get_ioinfo_nolock(file
->_file
)->exflag
& (EF_UTF8
| EF_UTF16
))
4034 || !(get_ioinfo_nolock(file
->_file
)->wxflag
& WX_TEXT
)) {
4035 unsigned char * pp
= (unsigned char *)&mwc
;
4038 for(i
=sizeof(wchar_t)-1;i
>=0;i
--) {
4039 if(pp
[i
] != ungetc(pp
[i
],file
)) {
4045 char mbs
[MB_LEN_MAX
];
4048 len
= wctomb(mbs
, mwc
);
4054 for(len
--; len
>=0; len
--) {
4055 if(mbs
[len
] != ungetc(mbs
[len
], file
)) {
4068 /*********************************************************************
4069 * _getmaxstdio (MSVCRT.@)
4071 int CDECL
_getmaxstdio(void)
4073 return MSVCRT_max_streams
;
4076 /*********************************************************************
4077 * _setmaxstdio (MSVCRT.@)
4079 int CDECL
_setmaxstdio(int newmax
)
4081 TRACE("%d\n", newmax
);
4083 if(newmax
<_IOB_ENTRIES
|| newmax
>MSVCRT_MAX_FILES
|| newmax
<MSVCRT_stream_idx
)
4086 MSVCRT_max_streams
= newmax
;
4087 return MSVCRT_max_streams
;