file.c File Reference

#include <precomp.h>
#include "wine/unicode.h"
#include "internal/wine/msvcrt.h"
#include <sys/utime.h>
#include <direct.h>

Include dependency graph for file.c:

Go to the source code of this file.

Classes
struct	file_crit

Macros
#define	_IOCOMMIT   0x4000
#define	WX_OPEN   0x01
#define	WX_ATEOF   0x02
#define	WX_READNL   0x04 /* read started with \n */
#define	WX_READEOF   0x04 /* like ATEOF, but for underlying file rather than buffer */
#define	WX_PIPE   0x08
#define	WX_READCR   0x08 /* underlying file is at \r */
#define	WX_DONTINHERIT   0x10
#define	WX_APPEND   0x20
#define	WX_TTY   0x40
#define	WX_TEXT   0x80
#define	EF_UTF8   0x01
#define	EF_UTF16   0x02
#define	EF_CRIT_INIT   0x04
#define	EF_UNK_UNICODE   0x08
#define	MSVCRT_MAX_FILES   2048
#define	MSVCRT_FD_BLOCK_SIZE   32
#define	MSVCRT_INTERNAL_BUFSIZ   4096
#define	LOCK_FILES()   do { EnterCriticalSection(&MSVCRT_file_cs); } while (0)
#define	UNLOCK_FILES()   do { LeaveCriticalSection(&MSVCRT_file_cs); } while (0)

Functions
int *	__p__fmode (void)
int *	__p___mb_cur_max (void)
static ioinfo *	get_ioinfo_nolock (int fd)
static void	init_ioinfo_cs (ioinfo *info)
ioinfo *	get_ioinfo (int fd)
static BOOL	alloc_pioinfo_block (int fd)
static ioinfo *	get_ioinfo_alloc_fd (int fd)
static ioinfo *	get_ioinfo_alloc (int *fd)
void	release_ioinfo (ioinfo *info)
static FILE *	msvcrt_get_file (int i)
static void	msvcrt_free_fd (int fd)
static void	msvcrt_set_fd (ioinfo *fdinfo, HANDLE hand, int flag)
int	msvcrt_alloc_fd (HANDLE hand, int flag)
static FILE *	msvcrt_alloc_fp (void)
static int	msvcrt_init_fp (FILE *file, int fd, unsigned stream_flags)
unsigned	create_io_inherit_block (WORD *size, BYTE **block)
void	msvcrt_init_io (void)
static int	msvcrt_flush_buffer (FILE *file)
int CDECL	_isatty (int fd)
BOOL	msvcrt_alloc_buffer (FILE *file)
static BOOL	add_std_buffer (FILE *file)
static void	remove_std_buffer (FILE *file)
static int	msvcrt_int_to_base32 (int num, char *str)
static int	msvcrt_int_to_base32_w (int num, wchar_t *str)
wchar_t *	msvcrt_wstrdupa (const char *str)
FILE *CDECL	__iob_func (void)
int CDECL	_access (const char *filename, int mode)
int CDECL	_access_s (const char *filename, int mode)
int CDECL	_waccess (const wchar_t *filename, int mode)
int CDECL	_waccess_s (const wchar_t *filename, int mode)
int CDECL	_chmod (const char *path, int flags)
int CDECL	_wchmod (const wchar_t *path, int flags)
int CDECL	_unlink (const char *path)
int CDECL	_wunlink (const wchar_t *path)
int CDECL	_commit (int fd)
int CDECL	fflush (FILE *file)
static int	msvcrt_flush_all_buffers (int mask)
int CDECL	_flushall (void)
int CDECL	_close (int fd)
int CDECL	_dup2 (int od, int nd)
int CDECL	_dup (int od)
int CDECL	_eof (int fd)
int CDECL	_fcloseall (void)
void	msvcrt_free_io (void)
__int64 CDECL	_lseeki64 (int fd, __int64 offset, int whence)
LONG CDECL	_lseek (int fd, LONG offset, int whence)
void CDECL	_lock_file (FILE *file)
void CDECL	_unlock_file (FILE *file)
int CDECL	_locking (int fd, int mode, LONG nbytes)
int CDECL	_fseeki64 (FILE *file, __int64 offset, int whence)
int CDECL	fseek (FILE *file, long offset, int whence)
int CDECL	_chsize_s (int fd, __int64 size)
int CDECL	_chsize (int fd, long size)
void CDECL	clearerr (FILE *file)
void CDECL	rewind (FILE *file)
static int	msvcrt_get_flags (const wchar_t *mode, int *open_flags, int *stream_flags)
FILE *CDECL	_fdopen (int fd, const char *mode)
FILE *CDECL	_wfdopen (int fd, const wchar_t *mode)
LONG CDECL	_filelength (int fd)
__int64 CDECL	_filelengthi64 (int fd)
int CDECL	_fileno (FILE *file)
intptr_t CDECL	_get_osfhandle (int fd)
char *CDECL	_mktemp (char *pattern)
wchar_t *CDECL	_wmktemp (wchar_t *pattern)
unsigned	split_oflags (unsigned oflags)
int CDECL	_pipe (int *pfds, unsigned int psize, int textmode)
static int	check_bom (HANDLE h, int oflags, BOOL seek)
int CDECL	_wsopen_s (int *fd, const wchar_t *path, int oflags, int shflags, int pmode)
int CDECL	_wsopen (const wchar_t *path, int oflags, int shflags,...)
int CDECL	_sopen_s (int *fd, const char *path, int oflags, int shflags, int pmode)
int CDECL	_sopen (const char *path, int oflags, int shflags,...)
int CDECL	_open (const char *path, int flags,...)
int CDECL	_wopen (const wchar_t *path, int flags,...)
int CDECL	_creat (const char *path, int flags)
int CDECL	_wcreat (const wchar_t *path, int flags)
int CDECL	_open_osfhandle (intptr_t handle, int oflags)
int CDECL	_rmtmp (void)
static int	get_utf8_char_len (char ch)
static int	read_utf8 (ioinfo *fdinfo, wchar_t *buf, unsigned int count)
static int	read_i (int fd, ioinfo *fdinfo, void *buf, unsigned int count)
int CDECL	_read (int fd, void *buf, unsigned int count)
int CDECL	_setmode (int fd, int mode)
long CDECL	_tell (int fd)
__int64 CDECL	_telli64 (int fd)
char *CDECL	_tempnam (const char *dir, const char *prefix)
wchar_t *CDECL	_wtempnam (const wchar_t *dir, const wchar_t *prefix)
int CDECL	_umask (int umask)
int CDECL	_write (int fd, const void *buf, unsigned int count)
int CDECL	_putw (int val, FILE *file)
int CDECL	fclose (FILE *file)
int CDECL	feof (FILE *file)
int CDECL	ferror (FILE *file)
int CDECL	_filbuf (FILE *file)
int CDECL	fgetc (FILE *file)
int CDECL	_fgetchar (void)
char *CDECL	fgets (char *s, int size, FILE *file)
wint_t CDECL	fgetwc (FILE *file)
int CDECL	_getw (FILE *file)
wint_t CDECL	getwc (FILE *file)
wint_t CDECL	_fgetwchar (void)
wint_t CDECL	getwchar (void)
wchar_t *CDECL	fgetws (wchar_t *s, int size, FILE *file)
size_t CDECL	fwrite (const void *ptr, size_t size, size_t nmemb, FILE *file)
wint_t CDECL	fputwc (wchar_t c, FILE *stream)
wint_t CDECL	_fputwchar (wint_t wc)
FILE *CDECL	_wfsopen (const wchar_t *path, const wchar_t *mode, int share)
FILE *CDECL	_fsopen (const char *path, const char *mode, int share)
FILE *CDECL	fopen (const char *path, const char *mode)
int CDECL	fopen_s (FILE **pFile, const char *filename, const char *mode)
FILE *CDECL	_wfopen (const wchar_t *path, const wchar_t *mode)
int CDECL	_wfopen_s (FILE **pFile, const wchar_t *filename, const wchar_t *mode)
int CDECL	_flsbuf (int c, FILE *file)
int CDECL	fputc (int c, FILE *file)
int CDECL	_fputchar (int c)
size_t CDECL	fread (void *ptr, size_t size, size_t nmemb, FILE *file)
FILE *CDECL	_wfreopen (const wchar_t *path, const wchar_t *mode, FILE *file)
FILE *CDECL	freopen (const char *path, const char *mode, FILE *file)
int CDECL	fsetpos (FILE *file, const fpos_t *pos)
__int64 CDECL	_ftelli64 (FILE *file)
LONG CDECL	ftell (FILE *file)
int CDECL	fgetpos (FILE *file, fpos_t *pos)
int CDECL	fputs (const char *s, FILE *file)
int CDECL	fputws (const wchar_t *s, FILE *file)
int CDECL	getchar (void)
int CDECL	getc (FILE *file)
char *CDECL	gets (char *buf)
wchar_t *CDECL	_getws (wchar_t *buf)
int CDECL	putc (int c, FILE *file)
int CDECL	putchar (int c)
wint_t CDECL	_putwch (wchar_t c)
int CDECL	puts (const char *s)
int CDECL	_putws (const wchar_t *s)
int CDECL	remove (const char *path)
int CDECL	_wremove (const wchar_t *path)
int CDECL	rename (const char *oldpath, const char *newpath)
int CDECL	_wrename (const wchar_t *oldpath, const wchar_t *newpath)
int CDECL	setvbuf (FILE *file, char *buf, int mode, size_t size)
void CDECL	setbuf (FILE *file, char *buf)
char *CDECL	tmpnam (char *s)
wchar_t *CDECL	_wtmpnam (wchar_t *s)
FILE *CDECL	tmpfile (void)
int CDECL	ungetc (int c, FILE *file)
wint_t CDECL	ungetwc (wint_t wc, FILE *file)
int CDECL	_getmaxstdio (void)
int CDECL	_setmaxstdio (int newmax)

Variables
int	_commode
static char	utf8_bom [3] = { 0xef, 0xbb, 0xbf }
static char	utf16_bom [2] = { 0xff, 0xfe }
ioinfo *	__pioinfo [MSVCRT_MAX_FILES/MSVCRT_FD_BLOCK_SIZE] = { 0 }
ioinfo	__badioinfo = { INVALID_HANDLE_VALUE, WX_TEXT }
FILE	_iob [_IOB_ENTRIES] = { { 0 } }
static file_crit *	MSVCRT_fstream [MSVCRT_MAX_FILES/MSVCRT_FD_BLOCK_SIZE] = { NULL }
static int	MSVCRT_max_streams = 512
static int	MSVCRT_stream_idx
static int	MSVCRT_umask = 0
static int	tmpnam_unique
static CRITICAL_SECTION	MSVCRT_file_cs = { &MSVCRT_file_cs_debug, -1, 0, 0, 0, 0 }
static CRITICAL_SECTION_DEBUG	MSVCRT_file_cs_debug

Macro Definition Documentation

_IOCOMMIT

#define _IOCOMMIT   0x4000

Definition at line 59 of file file.c.

EF_CRIT_INIT

#define EF_CRIT_INIT   0x04

Definition at line 105 of file file.c.

EF_UNK_UNICODE

#define EF_UNK_UNICODE   0x08

Definition at line 106 of file file.c.

EF_UTF16

#define EF_UTF16   0x02

Definition at line 104 of file file.c.

EF_UTF8

#define EF_UTF8   0x01

Definition at line 103 of file file.c.

LOCK_FILES

#define LOCK_FILES

(

)

do { EnterCriticalSection(&MSVCRT_file_cs); } while (0)

Definition at line 155 of file file.c.

MSVCRT_FD_BLOCK_SIZE

#define MSVCRT_FD_BLOCK_SIZE   32

Definition at line 113 of file file.c.

MSVCRT_INTERNAL_BUFSIZ

#define MSVCRT_INTERNAL_BUFSIZ   4096

Definition at line 115 of file file.c.

MSVCRT_MAX_FILES

#define MSVCRT_MAX_FILES   2048

Definition at line 112 of file file.c.

UNLOCK_FILES

#define UNLOCK_FILES

(

)

do { LeaveCriticalSection(&MSVCRT_file_cs); } while (0)

Definition at line 156 of file file.c.

WX_APPEND

#define WX_APPEND   0x20

Definition at line 98 of file file.c.

WX_ATEOF

#define WX_ATEOF   0x02

Definition at line 92 of file file.c.

WX_DONTINHERIT

#define WX_DONTINHERIT   0x10

Definition at line 97 of file file.c.

WX_OPEN

#define WX_OPEN   0x01

Definition at line 91 of file file.c.

WX_PIPE

#define WX_PIPE   0x08

Definition at line 95 of file file.c.

WX_READCR

#define WX_READCR   0x08 /* underlying file is at \r */

Definition at line 96 of file file.c.

WX_READEOF

#define WX_READEOF   0x04 /* like ATEOF, but for underlying file rather than buffer */

Definition at line 94 of file file.c.

WX_READNL

#define WX_READNL   0x04 /* read started with \n */

Definition at line 93 of file file.c.

WX_TEXT

#define WX_TEXT   0x80

Definition at line 100 of file file.c.

WX_TTY

#define WX_TTY   0x40

Definition at line 99 of file file.c.

Function Documentation

__iob_func()

FILE* CDECL __iob_func

(

void

)

Definition at line 682 of file file.c.

{
 return &_iob[0];
}

Referenced by Test__iob().

__p___mb_cur_max()

int* __p___mb_cur_max

(

void

)

Definition at line 430 of file environ.c.

{
    return &get_locinfo()->mb_cur_max;
}

__p__fmode()

int* __p__fmode

(

void

)

Definition at line 9 of file fmode.c.

{
   return &_fmode;
}

Referenced by split_oflags().

_access()

int CDECL _access	(	const char *	filename,
		int	mode
	)

Definition at line 690 of file file.c.

{
  DWORD attr = GetFileAttributesA(filename);

  TRACE("(%s,%d) %d\n",filename,mode,attr);

  if (!filename || attr == INVALID_FILE_ATTRIBUTES)
  {
    _dosmaperr(GetLastError());
    return -1;
  }
  if ((attr & FILE_ATTRIBUTE_READONLY) && (mode & W_OK))
  {
    _set_errno(ERROR_ACCESS_DENIED);
    return -1;
  }
  return 0;
}

Referenced by _access_s().

_access_s()

int CDECL _access_s	(	const char *	filename,
		int	mode
	)

Definition at line 712 of file file.c.

{
  if (!MSVCRT_CHECK_PMT(filename != NULL) ||
      !MSVCRT_CHECK_PMT((mode & ~(R_OK | W_OK)) == 0))
  {
     _set_errno(EINVAL);
     return -1;
  }

  return _access(filename, mode);
}

_chmod()

int CDECL _chmod	(	const char *	path,
		int	flags
	)

Definition at line 764 of file file.c.

{
  DWORD oldFlags = GetFileAttributesA(path);

  if (oldFlags != INVALID_FILE_ATTRIBUTES)
  {
    DWORD newFlags = (flags & _S_IWRITE)? oldFlags & ~FILE_ATTRIBUTE_READONLY:
      oldFlags | FILE_ATTRIBUTE_READONLY;

    if (newFlags == oldFlags || SetFileAttributesA(path, newFlags))
      return 0;
  }
  _dosmaperr(GetLastError());
  return -1;
}

Referenced by test_file_write_read().

_chsize()

int CDECL _chsize	(	int	fd,
		long	size
	)

Definition at line 1354 of file file.c.

{
    /* _chsize_s returns errno on failure but _chsize should return -1 */
    return _chsize_s( fd, size ) == 0 ? 0 : -1;
}

Referenced by test_chsize().

_chsize_s()

int CDECL _chsize_s	(	int	fd,
		__int64	size
	)

Definition at line 1318 of file file.c.

{
    ioinfo *info;
    __int64 cur, pos;
    BOOL ret = FALSE;

    TRACE("(fd=%d, size=%s)\n", fd, wine_dbgstr_longlong(size));

    if (!MSVCRT_CHECK_PMT(size >= 0)) return EINVAL;

    info = get_ioinfo(fd);
    if (info->handle != INVALID_HANDLE_VALUE)
    {
        /* save the current file pointer */
        cur = _lseeki64(fd, 0, SEEK_CUR);
        if (cur >= 0)
        {
            pos = _lseeki64(fd, size, SEEK_SET);
            if (pos >= 0)
            {
                ret = SetEndOfFile(info->handle);
                if (!ret) _dosmaperr(GetLastError());
            }

            /* restore the file pointer */
            _lseeki64(fd, cur, SEEK_SET);
        }
    }

    release_ioinfo(info);
    return ret ? 0 : *_errno();
}

Referenced by _chsize().

_close()

int CDECL _close

(

int

fd

)

Definition at line 931 of file file.c.

{
  ioinfo *info = get_ioinfo(fd);
  int ret;

  TRACE(":fd (%d) handle (%p)\n", fd, info->handle);
  if (!(info->wxflag & WX_OPEN)) {
    ret = -1;
  } else if (fd == STDOUT_FILENO &&
          info->handle == get_ioinfo_nolock(STDERR_FILENO)->handle) {
    msvcrt_free_fd(fd);
    ret = 0;
  } else if (fd == STDERR_FILENO &&
          info->handle == get_ioinfo_nolock(STDOUT_FILENO)->handle) {
    msvcrt_free_fd(fd);
    ret = 0;
  } else {
    ret = CloseHandle(info->handle) ? 0 : -1;
    msvcrt_free_fd(fd);
    if (ret) {
      WARN(":failed-last error (%d)\n",GetLastError());
      _dosmaperr(GetLastError());
      ret = -1;
    }
  }
  release_ioinfo(info);
  return ret;
}

Referenced by _dup2(), _pipe(), _wfsopen(), fclose(), test__creat(), test_chsize(), test_file_write_read(), test_get_osfhandle(), test_setmode(), and tmpfile().

_commit()

int CDECL _commit

(

int

fd

)

Definition at line 828 of file file.c.

{
    ioinfo *info = get_ioinfo(fd);
    int ret;

    TRACE(":fd (%d) handle (%p)\n", fd, info->handle);

    if (info->handle == INVALID_HANDLE_VALUE)
        ret = -1;
    else if (!FlushFileBuffers(info->handle))
    {
        if (GetLastError() == ERROR_INVALID_HANDLE)
        {
            /* FlushFileBuffers fails for console handles
             * so we ignore this error.
             */
            ret = 0;
        }
        else
        {
            TRACE(":failed-last error (%d)\n",GetLastError());
            _dosmaperr(GetLastError());
            ret = -1;
        }
    }
    else
    {
        TRACE(":ok\n");
        ret = 0;
    }

    release_ioinfo(info);
    return ret;
}

_creat()

int CDECL _creat	(	const char *	path,
		int	flags
	)

Definition at line 2039 of file file.c.

{
  int usedFlags = (flags & _O_TEXT)| _O_CREAT| _O_WRONLY| _O_TRUNC;
  return _open(path, usedFlags);
}

Referenced by test__creat().

_dup()

int CDECL _dup

(

int

od

)

Definition at line 1025 of file file.c.

{
  int fd, ret;
  ioinfo *info = get_ioinfo_alloc(&fd);

  if (_dup2(od, fd) == 0)
    ret = fd;
  else
    ret = -1;
  release_ioinfo(info);
  return ret;
}

Referenced by test_stdin().

_dup2()

int CDECL _dup2	(	int	od,
		int	nd
	)

Definition at line 967 of file file.c.

{
  ioinfo *info_od, *info_nd;
  int ret;

  TRACE("(od=%d, nd=%d)\n", od, nd);

  if (od < nd)
  {
    info_od = get_ioinfo(od);
    info_nd = get_ioinfo_alloc_fd(nd);
  }
  else
  {
    info_nd = get_ioinfo_alloc_fd(nd);
    info_od = get_ioinfo(od);
  }

  if (info_nd == &__badioinfo)
  {
      ret = -1;
  }
  else if (info_od->wxflag & WX_OPEN)
  {
    HANDLE handle;

    if (DuplicateHandle(GetCurrentProcess(), info_od->handle,
     GetCurrentProcess(), &handle, 0, TRUE, DUPLICATE_SAME_ACCESS))
    {
      int wxflag = info_od->wxflag & ~WX_DONTINHERIT;

      if (info_nd->wxflag & WX_OPEN)
        _close(nd);

      msvcrt_set_fd(info_nd, handle, wxflag);
      /* _dup2 returns 0, not nd, on success */
      ret = 0;
    }
    else
    {
      ret = -1;
      _dosmaperr(GetLastError());
    }
  }
  else
  {
    *_errno() = EBADF;
    ret = -1;
  }

  release_ioinfo(info_od);
  release_ioinfo(info_nd);
  return ret;
}

Referenced by _dup(), test_dup2(), test_stat(), and test_stdin().

_eof()

int CDECL _eof

(

int

fd

)

Definition at line 1041 of file file.c.

{
  ioinfo *info = get_ioinfo(fd);
  DWORD curpos,endpos;
  LONG hcurpos,hendpos;

  TRACE(":fd (%d) handle (%p)\n", fd, info->handle);

  if (info->handle == INVALID_HANDLE_VALUE)
  {
    release_ioinfo(info);
    return -1;
  }

  if (info->wxflag & WX_ATEOF)
  {
      release_ioinfo(info);
      return TRUE;
  }

  /* Otherwise we do it the hard way */
  hcurpos = hendpos = 0;
  curpos = SetFilePointer(info->handle, 0, &hcurpos, FILE_CURRENT);
  endpos = SetFilePointer(info->handle, 0, &hendpos, FILE_END);

  if (curpos == endpos && hcurpos == hendpos)
  {
    /* FIXME: shouldn't WX_ATEOF be set here? */
    release_ioinfo(info);
    return TRUE;
  }

  SetFilePointer(info->handle, curpos, &hcurpos, FILE_BEGIN);
  release_ioinfo(info);
  return FALSE;
}

_fcloseall()

int CDECL _fcloseall

(

void

)

Definition at line 1081 of file file.c.

{
  int num_closed = 0, i;
  FILE *file;

  LOCK_FILES();
  for (i = 3; i < MSVCRT_stream_idx; i++) {
    file = msvcrt_get_file(i);

    if (file->_flag && !fclose(file))
      num_closed++;
  }
  UNLOCK_FILES();

  TRACE(":closed (%d) handles\n",num_closed);
  return num_closed;
}

Referenced by msvcrt_free_io(), and test_fopen_fclose_fcloseall().

_fdopen()

FILE* CDECL _fdopen	(	int	fd,
		const char *	mode
	)

Definition at line 1504 of file file.c.

{
    FILE *ret;
    wchar_t *modeW = NULL;

    if (mode && !(modeW = msvcrt_wstrdupa(mode))) return NULL;

    ret = _wfdopen(fd, modeW);

    free(modeW);
    return ret;
}

_fgetchar()

int CDECL _fgetchar

(

void

)

Definition at line 2906 of file file.c.

{
  return fgetc(stdin);
}

_fgetwchar()

wint_t CDECL _fgetwchar

(

void

)

Definition at line 3027 of file file.c.

{
  return fgetwc(stdin);
}

Referenced by getwchar().

_filbuf()

int CDECL _filbuf

(

FILE *

file

)

Definition at line 2833 of file file.c.

{
    unsigned char c;
    _lock_file(file);

    if(file->_flag & _IOSTRG) {
        _unlock_file(file);
        return EOF;
    }

    /* Allocate buffer if needed */
    if(!(file->_flag & (_IONBF | _IOMYBUF | _USERBUF)))
        msvcrt_alloc_buffer(file);

    if(!(file->_flag & _IOREAD)) {
        if(file->_flag & _IORW)
            file->_flag |= _IOREAD;
        else {
            _unlock_file(file);
            return EOF;
        }
    }

    if(!(file->_flag & (_IOMYBUF | _USERBUF))) {
        int r;
        if ((r = _read(file->_file,&c,1)) != 1) {
            file->_flag |= (r == 0) ? _IOEOF : _IOERR;
            _unlock_file(file);
            return EOF;
        }

        _unlock_file(file);
        return c;
    } else {
        file->_cnt = _read(file->_file, file->_base, file->_bufsiz);
        if(file->_cnt<=0) {
            file->_flag |= (file->_cnt == 0) ? _IOEOF : _IOERR;
            file->_cnt = 0;
            _unlock_file(file);
            return EOF;
        }

        file->_cnt--;
        file->_ptr = file->_base+1;
        c = *(unsigned char *)file->_base;
        _unlock_file(file);
        return c;
    }
}

Referenced by fgetc(), and test_filbuf().

_filelength()

LONG CDECL _filelength

(

int

fd

)

Definition at line 1544 of file file.c.

{
  LONG curPos = _lseek(fd, 0, SEEK_CUR);
  if (curPos != -1)
  {
    LONG endPos = _lseek(fd, 0, SEEK_END);
    if (endPos != -1)
    {
      if (endPos != curPos)
        _lseek(fd, curPos, SEEK_SET);
      return endPos;
    }
  }
  return -1;
}

Referenced by test_chsize().

_filelengthi64()

__int64 CDECL _filelengthi64

(

int

fd

)

Definition at line 1563 of file file.c.

{
  __int64 curPos = _lseeki64(fd, 0, SEEK_CUR);
  if (curPos != -1)
  {
    __int64 endPos = _lseeki64(fd, 0, SEEK_END);
    if (endPos != -1)
    {
      if (endPos != curPos)
        _lseeki64(fd, curPos, SEEK_SET);
      return endPos;
    }
  }
  return -1;
}

_fileno()

int CDECL _fileno

(

FILE *

file

)

Definition at line 1582 of file file.c.

{
  TRACE(":FILE* (%p) fd (%d)\n",file,file->_file);
  return file->_file;
}

Referenced by test_fflush().

_flsbuf()

int CDECL _flsbuf	(	int	c,
		FILE *	file
	)

Definition at line 14 of file _flsbuf.c.

{
    int count, written;

    /* Check if the stream supports flushing */
    if ((stream->_flag & _IOSTRG) || !(stream->_flag & (_IORW|_IOWRT)))
    {
        stream->_flag |= _IOERR;
        return EOF;
    }

    /* Always reset _cnt */
    stream->_cnt = 0;

    /* Check if this was a read buffer */
    if (stream->_flag & _IOREAD)
    {
        /* Must be at the end of the file */
        if (!(stream->_flag & _IOEOF))
        {
            stream->_flag |= _IOERR;
            return EOF;
        }

        /* Reset buffer */
        stream->_ptr = stream->_base;
    }

    /* Fixup flags */
    stream->_flag &= ~(_IOREAD|_IOEOF);
    stream->_flag |= _IOWRT;

    /* Check if should get a buffer */
    if (!(stream->_flag & _IONBF) && stream != stdout && stream != stderr)
    {
        /* If we have no buffer, try to allocate one */
        if (!stream->_base) msvcrt_alloc_buffer(stream);
    }

    /* Check if we can use a buffer now */
    if (stream->_base && !(stream->_flag & _IONBF))
    {
        /* We can, check if there is something to write */
        count = (int)(stream->_ptr - stream->_base);
        if (count > 0)
            written = _write(stream->_file, stream->_base, count);
        else
            written = 0;

        /* Reset buffer and put the char into it */
        stream->_ptr = stream->_base + sizeof(TCHAR);
        stream->_cnt = stream->_bufsiz - sizeof(TCHAR);
        *(TCHAR*)stream->_base = ch;
    }
    else
    {
        /* There is no buffer, write the char directly */
        count = sizeof(TCHAR);
        written = _write(stream->_file, &ch, sizeof(TCHAR));
    }

    /* Check for failure */
    if (written != count)
    {
        stream->_flag |= _IOERR;
        return EOF;
    }

    return ch & (sizeof(TCHAR) > sizeof(char) ? 0xffff : 0xff);
}

Referenced by fputc(), fwrite(), test_flsbuf(), and test_invalid_stdin_child().

_flushall()

int CDECL _flushall

(

void

)

Definition at line 893 of file file.c.

{
    return msvcrt_flush_all_buffers(_IOWRT | _IOREAD);
}

Referenced by msvcrt_free_io(), test_fflush(), and wmain().

_fputchar()

int CDECL _fputchar

(

int

c

)

Definition at line 3330 of file file.c.

{
  return fputc(c, stdout);
}

_fputwchar()

wint_t CDECL _fputwchar

(

wint_t

wc

)

Definition at line 3177 of file file.c.

{
  return fputwc(wc, stdout);
}

_fseeki64()

int CDECL _fseeki64	(	FILE *	file,
		__int64	offset,
		int	whence
	)

Definition at line 1278 of file file.c.

{
  int ret;

  _lock_file(file);
  /* Flush output if needed */
  if(file->_flag & _IOWRT)
    msvcrt_flush_buffer(file);

  if(whence == SEEK_CUR && file->_flag & _IOREAD ) {
      whence = SEEK_SET;
      offset += _ftelli64(file);
  }

  /* Discard buffered input */
  file->_cnt = 0;
  file->_ptr = file->_base;
  /* Reset direction of i/o */
  if(file->_flag & _IORW) {
        file->_flag &= ~(_IOREAD|_IOWRT);
  }
  /* Clear end of file flag */
  file->_flag &= ~_IOEOF;
  ret = (_lseeki64(file->_file,offset,whence) == -1)?-1:0;

  _unlock_file(file);
  return ret;
}

Referenced by fseek().

_fsopen()

FILE* CDECL _fsopen	(	const char *	path,
		const char *	mode,
		int	share
	)

Definition at line 3219 of file file.c.

{
    FILE *ret;
    wchar_t *pathW = NULL, *modeW = NULL;

    if (path && !(pathW = msvcrt_wstrdupa(path))) {
        _invalid_parameter(NULL, NULL, NULL, 0, 0);
        *_errno() = EINVAL;
        return NULL;
    }
    if (mode && !(modeW = msvcrt_wstrdupa(mode)))
    {
        free(pathW);
        _invalid_parameter(NULL, NULL, NULL, 0, 0);
        *_errno() = EINVAL;
        return NULL;
    }

    ret = _wfsopen(pathW, modeW, share);

    free(pathW);
    free(modeW);
    return ret;
}

Referenced by fopen().

_ftelli64()

__int64 CDECL _ftelli64

(

FILE *

file

)

Definition at line 3504 of file file.c.

{
    __int64 pos;

    _lock_file(file);
    pos = _telli64(file->_file);
    if(pos == -1) {
        _unlock_file(file);
        return -1;
    }
    if(file->_flag & (_IOMYBUF | _USERBUF))  {
        if(file->_flag & _IOWRT) {
            pos += file->_ptr - file->_base;

            if(get_ioinfo_nolock(file->_file)->wxflag & WX_TEXT) {
                char *p;

                for(p=file->_base; p<file->_ptr; p++)
                    if(*p == '\n')
                        pos++;
            }
        } else if(!file->_cnt) { /* nothing to do */
        } else if(_lseeki64(file->_file, 0, SEEK_END)==pos) {
            int i;

            pos -= file->_cnt;
            if(get_ioinfo_nolock(file->_file)->wxflag & WX_TEXT) {
                for(i=0; i<file->_cnt; i++)
                    if(file->_ptr[i] == '\n')
                        pos--;
            }
        } else {
            char *p;

            if(_lseeki64(file->_file, pos, SEEK_SET) != pos) {
                _unlock_file(file);
                return -1;
            }

            pos -= file->_bufsiz;
            pos += file->_ptr - file->_base;

            if(get_ioinfo_nolock(file->_file)->wxflag & WX_TEXT) {
                if(get_ioinfo_nolock(file->_file)->wxflag & WX_READNL)
                    pos--;

                for(p=file->_base; p<file->_ptr; p++)
                    if(*p == '\n')
                        pos++;
            }
        }
    }

    _unlock_file(file);
    return pos;
}

Referenced by _fseeki64(), fgetpos(), and ftell().

_get_osfhandle()

intptr_t CDECL _get_osfhandle

(

int

fd

)

Definition at line 1591 of file file.c.

{
  HANDLE hand = get_ioinfo_nolock(fd)->handle;
  TRACE(":fd (%d) handle (%p)\n",fd,hand);

  if(hand == INVALID_HANDLE_VALUE)
      *_errno() = EBADF;
  return (intptr_t)hand;
}

Referenced by test_close(), test_get_osfhandle(), test_invalid_stdin_child(), and test_stdin().

_getmaxstdio()

int CDECL _getmaxstdio

(

void

)

Definition at line 4026 of file file.c.

{
    return MSVCRT_max_streams;
}

_getw()

int CDECL _getw

(

FILE *

file

)

Definition at line 2994 of file file.c.

{
  char *ch;
  int i, k;
  unsigned int j;
  ch = (char *)&i;

  _lock_file(file);
  for (j=0; j<sizeof(int); j++) {
    k = fgetc(file);
    if (k == EOF) {
      file->_flag |= _IOEOF;
      _unlock_file(file);
      return EOF;
    }
    ch[j] = k;
  }

  _unlock_file(file);
  return i;
}

Referenced by test_readmode().

_getws()

wchar_t* CDECL _getws

(

wchar_t *

buf

)

Definition at line 3663 of file file.c.

{
    wint_t cc;
    wchar_t* ws = buf;

    _lock_file(stdin);
    for (cc = fgetwc(stdin); cc != WEOF && cc != '\n';
         cc = fgetwc(stdin))
    {
        if (cc != '\r')
            *buf++ = (wchar_t)cc;
    }
    *buf = '\0';

    TRACE("got %s\n", debugstr_w(ws));
    _unlock_file(stdin);
    return ws;
}

_isatty()

int CDECL _isatty

(

int

fd

)

Definition at line 564 of file file.c.

{
    TRACE(":fd (%d)\n",fd);

    return get_ioinfo_nolock(fd)->wxflag & WX_TTY;
}

Referenced by add_std_buffer(), and msvcrt_alloc_buffer().

_lock_file()

void CDECL _lock_file

(

FILE *

file

)

Definition at line 1193 of file file.c.

{
    if(file>=_iob && file<_iob+_IOB_ENTRIES)
        _lock(_STREAM_LOCKS+(file-_iob));
    /* ReactOS: string streams dont need to be locked */
    else if(!(file->_flag & _IOSTRG))
        EnterCriticalSection(&((file_crit*)file)->crit);
}

Referenced by _filbuf(), _fseeki64(), _ftelli64(), _getw(), _getws(), _putw(), _putws(), clearerr(), fclose(), fflush(), fgetc(), fgets(), fgetwc(), fgetws(), fputc(), fputs(), fputws(), fread(), fsetpos(), fwrite(), gets(), puts(), rewind(), setvbuf(), ungetc(), and ungetwc().

_locking()

int CDECL _locking	(	int	fd,
		int	mode,
		LONG	nbytes
	)

Definition at line 1220 of file file.c.

{
  ioinfo *info = get_ioinfo(fd);
  BOOL ret;
  DWORD cur_locn;

  TRACE(":fd (%d) handle (%p)\n", fd, info->handle);
  if (info->handle == INVALID_HANDLE_VALUE)
  {
    release_ioinfo(info);
    return -1;
  }

  if (mode < 0 || mode > 4)
  {
    release_ioinfo(info);
    *_errno() = EINVAL;
    return -1;
  }

  TRACE(":fd (%d) by 0x%08x mode %s\n",
        fd,nbytes,(mode==_LK_UNLCK)?"_LK_UNLCK":
        (mode==_LK_LOCK)?"_LK_LOCK":
        (mode==_LK_NBLCK)?"_LK_NBLCK":
        (mode==_LK_RLCK)?"_LK_RLCK":
        (mode==_LK_NBRLCK)?"_LK_NBRLCK":
                          "UNKNOWN");

  if ((cur_locn = SetFilePointer(info->handle, 0L, NULL, FILE_CURRENT)) == INVALID_SET_FILE_POINTER)
  {
    release_ioinfo(info);
    FIXME ("Seek failed\n");
    *_errno() = EINVAL; /* FIXME */
    return -1;
  }
  if (mode == _LK_LOCK || mode == _LK_RLCK)
  {
    int nretry = 10;
    ret = 1; /* just to satisfy gcc */
    while (nretry--)
    {
      ret = LockFile(info->handle, cur_locn, 0L, nbytes, 0L);
      if (ret) break;
      Sleep(1);
    }
  }
  else if (mode == _LK_UNLCK)
    ret = UnlockFile(info->handle, cur_locn, 0L, nbytes, 0L);
  else
    ret = LockFile(info->handle, cur_locn, 0L, nbytes, 0L);
  /* FIXME - what about error settings? */
  release_ioinfo(info);
  return ret ? 0 : -1;
}

_lseek()

LONG CDECL _lseek	(	int	fd,
		LONG	offset,
		int	whence
	)

Definition at line 1185 of file file.c.

{
    return (LONG)_lseeki64(fd, offset, whence);
}

Referenced by _filelength(), _tell(), _write(), test__creat(), test_chsize(), test_fflush(), and test_file_write_read().

_lseeki64()

__int64 CDECL _lseeki64	(	int	fd,
		__int64	offset,
		int	whence
	)

Definition at line 1138 of file file.c.

{
  ioinfo *info = get_ioinfo(fd);
  LARGE_INTEGER ofs;

  TRACE(":fd (%d) handle (%p)\n", fd, info->handle);

  if (info->handle == INVALID_HANDLE_VALUE)
  {
    release_ioinfo(info);
    return -1;
  }

  if (whence < 0 || whence > 2)
  {
    release_ioinfo(info);
    *_errno() = EINVAL;
    return -1;
  }

  TRACE(":fd (%d) to %s pos %s\n",
        fd,wine_dbgstr_longlong(offset),
        (whence==SEEK_SET)?"SEEK_SET":
        (whence==SEEK_CUR)?"SEEK_CUR":
        (whence==SEEK_END)?"SEEK_END":"UNKNOWN");

  /* The MoleBox protection scheme expects msvcrt to use SetFilePointer only,
   * so a LARGE_INTEGER offset cannot be passed directly via SetFilePointerEx. */
  ofs.QuadPart = offset;
  if ((ofs.u.LowPart = SetFilePointer(info->handle, ofs.u.LowPart, &ofs.u.HighPart, whence)) != INVALID_SET_FILE_POINTER ||
      GetLastError() == ERROR_SUCCESS)
  {
    info->wxflag &= ~(WX_ATEOF|WX_READEOF);
    /* FIXME: What if we seek _to_ EOF - is EOF set? */

    release_ioinfo(info);
    return ofs.QuadPart;
  }
  release_ioinfo(info);
  TRACE(":error-last error (%d)\n",GetLastError());
  _dosmaperr(GetLastError());
  return -1;
}

Referenced by _chsize_s(), _filelengthi64(), _fseeki64(), _ftelli64(), _lseek(), _telli64(), and fsetpos().

_mktemp()

char* CDECL _mktemp

(

char *

pattern

)

Definition at line 1604 of file file.c.

{
  int numX = 0;
  char *retVal = pattern;
  int id;
  char letter = 'a';

  if(!pattern)
      return NULL;

  while(*pattern)
    numX = (*pattern++ == 'X')? numX + 1 : 0;
  if (numX < 6)
    return NULL;
  pattern--;
  id = GetCurrentProcessId();
  numX = 6;
  while(numX--)
  {
    int tempNum = id / 10;
    *pattern-- = id - (tempNum * 10) + '0';
    id = tempNum;
  }
  pattern++;
  do
  {
    *pattern = letter++;
    if (GetFileAttributesA(retVal) == INVALID_FILE_ATTRIBUTES)
      return retVal;
  } while(letter <= 'z');
  return NULL;
}

Referenced by test_mktemp().

_open()

int CDECL _open	(	const char *	path,
		int	flags,
			...
	)

Definition at line 2001 of file file.c.

{
  va_list ap;

  if (flags & _O_CREAT)
  {
    int pmode;
    va_start(ap, flags);
    pmode = va_arg(ap, int);
    va_end(ap);
    return _sopen( path, flags, _SH_DENYNO, pmode );
  }
  else
    return _sopen( path, flags, _SH_DENYNO);
}

Referenced by _creat(), compat_open(), install_from_unix_file(), main(), process_file(), rd_open_file(), test_chsize(), test_file_write_read(), test_get_osfhandle(), test_setmode(), and tmpfile().

_open_osfhandle()

int CDECL _open_osfhandle	(	intptr_t	handle,
		int	oflags
	)

Definition at line 2057 of file file.c.

{
  DWORD flags;
  int fd;

  /* _O_RDONLY (0) always matches, so set the read flag
   * MFC's CStdioFile clears O_RDONLY (0)! if it wants to write to the
   * file, so set the write flag. It also only sets _O_TEXT if it wants
   * text - it never sets _O_BINARY.
   */
  /* don't let split_oflags() decide the mode if no mode is passed */
  if (!(oflags & (_O_BINARY | _O_TEXT)))
      oflags |= _O_BINARY;

  flags = GetFileType((HANDLE)handle);
  if (flags==FILE_TYPE_UNKNOWN && GetLastError()!=NO_ERROR)
  {
    _dosmaperr(GetLastError());
    return -1;
  }

  if (flags == FILE_TYPE_CHAR)
    flags = WX_TTY;
  else if (flags == FILE_TYPE_PIPE)
    flags = WX_PIPE;
  else
    flags = 0;
  flags |= split_oflags(oflags);

  fd = msvcrt_alloc_fd((HANDLE)handle, flags);
  TRACE(":handle (%ld) fd (%d) flags 0x%08x\n", handle, fd, flags);
  return fd;
}

Referenced by test__open_osfhandle(), and test_close().

_pipe()

int CDECL _pipe	(	int *	pfds,
		unsigned int	psize,
		int	textmode
	)

Definition at line 1702 of file file.c.

{
  int ret = -1;
  SECURITY_ATTRIBUTES sa;
  HANDLE readHandle, writeHandle;

  if (!pfds)
  {
    *_errno() = EINVAL;
    return -1;
  }

  sa.nLength = sizeof(SECURITY_ATTRIBUTES);
  sa.bInheritHandle = !(textmode & _O_NOINHERIT);
  sa.lpSecurityDescriptor = NULL;
  if (CreatePipe(&readHandle, &writeHandle, &sa, psize))
  {
    unsigned int wxflags = split_oflags(textmode);
    int fd;

    fd = msvcrt_alloc_fd(readHandle, wxflags);
    if (fd != -1)
    {
      pfds[0] = fd;
      fd = msvcrt_alloc_fd(writeHandle, wxflags);
      if (fd != -1)
      {
        pfds[1] = fd;
        ret = 0;
      }
      else
      {
        _close(pfds[0]);
        CloseHandle(writeHandle);
        *_errno() = EMFILE;
      }
    }
    else
    {
      CloseHandle(readHandle);
      CloseHandle(writeHandle);
      *_errno() = EMFILE;
    }
  }
  else
    _dosmaperr(GetLastError());

  return ret;
}

Referenced by test_pipes(), and test_stat().

_putw()

int CDECL _putw	(	int	val,
		FILE *	file
	)

Definition at line 2764 of file file.c.

{
  int len;

  _lock_file(file);
  len = _write(file->_file, &val, sizeof(val));
  if (len == sizeof(val)) {
    _unlock_file(file);
    return val;
  }

  file->_flag |= _IOERR;
  _unlock_file(file);
  return EOF;
}

_putwch()

wint_t CDECL _putwch

(

wchar_t

c

)

Definition at line 3701 of file file.c.

{
  return fputwc(c, stdout);
}

_putws()

int CDECL _putws

(

const wchar_t *

s

)

Definition at line 3728 of file file.c.

{
    static const wchar_t nl = '\n';
    size_t len = strlenW(s);
    int ret;

    _lock_file(stdout);
    if(fwrite(s, sizeof(*s), len, stdout) != len) {
        _unlock_file(stdout);
        return EOF;
    }

    ret = fwrite(&nl,sizeof(nl),1,stdout) == 1 ? 0 : EOF;
    _unlock_file(stdout);
    return ret;
}

_read()

int CDECL _read	(	int	fd,
		void *	buf,
		unsigned int	count
	)

Definition at line 2466 of file file.c.

{
    ioinfo *info = get_ioinfo(fd);
    int num_read = read_i(fd, info, buf, count);
    release_ioinfo(info);
    return num_read;
}

Referenced by _filbuf(), fread(), test__creat(), and test_file_write_read().

_rmtmp()

int CDECL _rmtmp

(

void

)

Definition at line 2094 of file file.c.

{
  int num_removed = 0, i;
  FILE *file;

  LOCK_FILES();
  for (i = 3; i < MSVCRT_stream_idx; i++) {
    file = msvcrt_get_file(i);

    if (file->_tmpfname)
    {
      fclose(file);
      num_removed++;
    }
  }
  UNLOCK_FILES();

  if (num_removed)
    TRACE(":removed (%d) temp files\n",num_removed);
  return num_removed;
}

_setmaxstdio()

int CDECL _setmaxstdio

(

int

newmax

)

Definition at line 4034 of file file.c.

{
    TRACE("%d\n", newmax);

    if(newmax<_IOB_ENTRIES || newmax>MSVCRT_MAX_FILES || newmax<MSVCRT_stream_idx)
        return -1;

    MSVCRT_max_streams = newmax;
    return MSVCRT_max_streams;
}

Referenced by test_setmaxstdio().

_setmode()

int CDECL _setmode	(	int	fd,
		int	mode
	)

Definition at line 2477 of file file.c.

{
    ioinfo *info = get_ioinfo(fd);
    int ret = info->wxflag & WX_TEXT ? _O_TEXT : _O_BINARY;
    if(ret==_O_TEXT && (info->exflag & (EF_UTF8|EF_UTF16)))
        ret = _O_WTEXT;

    if(mode!=_O_TEXT && mode!=_O_BINARY && mode!=_O_WTEXT
                && mode!=_O_U16TEXT && mode!=_O_U8TEXT) {
        *_errno() = EINVAL;
        release_ioinfo(info);
        return -1;
    }

    if(info == &__badioinfo) {
        *_errno() = EBADF;
        return EOF;
    }

    if(mode == _O_BINARY) {
        info->wxflag &= ~WX_TEXT;
        info->exflag &= ~(EF_UTF8|EF_UTF16);
        release_ioinfo(info);
        return ret;
    }

    info->wxflag |= WX_TEXT;
    if(mode == _O_TEXT)
        info->exflag &= ~(EF_UTF8|EF_UTF16);
    else if(mode == _O_U8TEXT)
        info->exflag = (info->exflag & ~EF_UTF16) | EF_UTF8;
    else
        info->exflag = (info->exflag & ~EF_UTF8) | EF_UTF16;

    release_ioinfo(info);
    return ret;

}

Referenced by test_setmode().

_sopen()

int CDECL _sopen	(	const char *	path,
		int	oflags,
		int	shflags,
			...
	)

Definition at line 1978 of file file.c.

{
  int pmode;
  int fd;

  if (oflags & _O_CREAT)
  {
    va_list ap;

    va_start(ap, shflags);
    pmode = va_arg(ap, int);
    va_end(ap);
  }
  else
    pmode = 0;

  _sopen_s(&fd, path, oflags, shflags, pmode);
  return fd;
}

Referenced by _open(), and test_get_osfhandle().

_sopen_s()

int CDECL _sopen_s	(	int *	fd,
		const char *	path,
		int	oflags,
		int	shflags,
		int	pmode
	)

Definition at line 1962 of file file.c.

{
    wchar_t *pathW;
    int ret;

    if(!MSVCRT_CHECK_PMT(path && (pathW = msvcrt_wstrdupa(path))))
        return EINVAL;

    ret = _wsopen_s(fd, pathW, oflags, shflags, pmode);
    free(pathW);
    return ret;
}

Referenced by _sopen().

_tell()

long CDECL _tell

(

int

fd

)

Definition at line 2519 of file file.c.

{
  return _lseek(fd, 0, SEEK_CUR);
}

Referenced by test__creat().

_telli64()

__int64 CDECL _telli64

(

int

fd

)

Definition at line 2527 of file file.c.

{
  return _lseeki64(fd, 0, SEEK_CUR);
}

Referenced by _ftelli64().

_tempnam()

char* CDECL _tempnam	(	const char *	dir,
		const char *	prefix
	)

Definition at line 2535 of file file.c.

{
  char tmpbuf[MAX_PATH];
  const char *tmp_dir = getenv("TMP");

  if (tmp_dir) dir = tmp_dir;

  TRACE("dir (%s) prefix (%s)\n",dir,prefix);
  if (GetTempFileNameA(dir,prefix,0,tmpbuf))
  {
    TRACE("got name (%s)\n",tmpbuf);
    DeleteFileA(tmpbuf);
    return _strdup(tmpbuf);
  }
  TRACE("failed (%d)\n",GetLastError());
  return NULL;
}

Referenced by test_chsize(), test_ctrlz(), test_fflush(), test_fgetc(), test_fgetwc(), test_file_put_get(), test_file_write_read(), test_flsbuf(), test_fputc(), and test_write_flush().

_umask()

int CDECL _umask

(

int

umask

)

Definition at line 2574 of file file.c.

{
  int old_umask = MSVCRT_umask;
  TRACE("(%d)\n",umask);
  MSVCRT_umask = umask;
  return old_umask;
}

_unlink()

int CDECL _unlink

(

const char *

path

)

Definition at line 802 of file file.c.

{
  TRACE("%s\n",debugstr_a(path));
  if(DeleteFileA(path))
    return 0;
  TRACE("failed (%d)\n",GetLastError());
  _dosmaperr(GetLastError());
  return -1;
}

Referenced by test__wfopen_s(), test_chsize(), test_fopen_fclose_fcloseall(), test_fopen_s(), test_fputwc(), test_get_osfhandle(), test_setmode(), and test_unlink().

_unlock_file()

void CDECL _unlock_file

(

FILE *

file

)

Definition at line 1205 of file file.c.

{
    if(file>=_iob && file<_iob+_IOB_ENTRIES)
        _unlock(_STREAM_LOCKS+(file-_iob));
    /* ReactOS: string streams dont need to be locked */
    else if(!(file->_flag & _IOSTRG))
        LeaveCriticalSection(&((file_crit*)file)->crit);

}

Referenced by _filbuf(), _fseeki64(), _ftelli64(), _getw(), _getws(), _putw(), _putws(), clearerr(), fclose(), fflush(), fgetc(), fgets(), fgetwc(), fgetws(), fputc(), fputs(), fputws(), fread(), fsetpos(), fwrite(), gets(), puts(), rewind(), setvbuf(), ungetc(), and ungetwc().

_waccess()

int CDECL _waccess	(	const wchar_t *	filename,
		int	mode
	)

Definition at line 727 of file file.c.

{
  DWORD attr = GetFileAttributesW(filename);

  TRACE("(%s,%d) %d\n",debugstr_w(filename),mode,attr);

  if (!filename || attr == INVALID_FILE_ATTRIBUTES)
  {
    _dosmaperr(GetLastError());
    return -1;
  }
  if ((attr & FILE_ATTRIBUTE_READONLY) && (mode & W_OK))
  {
    _set_errno(ERROR_ACCESS_DENIED);
    return -1;
  }
  return 0;
}

Referenced by _waccess_s().

_waccess_s()

int CDECL _waccess_s	(	const wchar_t *	filename,
		int	mode
	)

Definition at line 749 of file file.c.

{
  if (!MSVCRT_CHECK_PMT(filename != NULL) ||
      !MSVCRT_CHECK_PMT((mode & ~(R_OK | W_OK)) == 0))
  {
     *_errno() = EINVAL;
     return -1;
  }

  return _waccess(filename, mode);
}

_wchmod()

int CDECL _wchmod	(	const wchar_t *	path,
		int	flags
	)

Definition at line 783 of file file.c.

{
  DWORD oldFlags = GetFileAttributesW(path);

  if (oldFlags != INVALID_FILE_ATTRIBUTES)
  {
    DWORD newFlags = (flags & _S_IWRITE)? oldFlags & ~FILE_ATTRIBUTE_READONLY:
      oldFlags | FILE_ATTRIBUTE_READONLY;

    if (newFlags == oldFlags || SetFileAttributesW(path, newFlags))
      return 0;
  }
  _dosmaperr(GetLastError());
  return -1;
}

_wcreat()

int CDECL _wcreat	(	const wchar_t *	path,
		int	flags
	)

Definition at line 2048 of file file.c.

{
  int usedFlags = (flags & _O_TEXT)| _O_CREAT| _O_WRONLY| _O_TRUNC;
  return _wopen(path, usedFlags);
}

_wfdopen()

FILE* CDECL _wfdopen	(	int	fd,
		const wchar_t *	mode
	)

Definition at line 1520 of file file.c.

{
  int open_flags, stream_flags;
  FILE* file;

  if (msvcrt_get_flags(mode, &open_flags, &stream_flags) == -1) return NULL;

  LOCK_FILES();
  if (!(file = msvcrt_alloc_fp()))
    file = NULL;
  else if (msvcrt_init_fp(file, fd, stream_flags) == -1)
  {
    file->_flag = 0;
    file = NULL;
  }
  else TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd, debugstr_w(mode), file);
  UNLOCK_FILES();

  return file;
}

Referenced by _fdopen().

_wfopen()

FILE* CDECL _wfopen	(	const wchar_t *	path,
		const wchar_t *	mode
	)

Definition at line 3272 of file file.c.

{
    return _wfsopen( path, mode, _SH_DENYNO );
}

Referenced by _wfopen_s().

_wfopen_s()

int CDECL _wfopen_s	(	FILE **	pFile,
		const wchar_t *	filename,
		const wchar_t *	mode
	)

Definition at line 3280 of file file.c.

{
    if (!MSVCRT_CHECK_PMT(pFile != NULL) || !MSVCRT_CHECK_PMT(filename != NULL) ||
        !MSVCRT_CHECK_PMT(mode != NULL)) {
        *_errno() = EINVAL;
        return EINVAL;
    }

    *pFile = _wfopen(filename, mode);

    if(!*pFile)
        return *_errno();
    return 0;
}

_wfreopen()

FILE* CDECL _wfreopen	(	const wchar_t *	path,
		const wchar_t *	mode,
		FILE *	file
	)

Definition at line 3419 of file file.c.

{
  int open_flags, stream_flags, fd;

  TRACE(":path (%s) mode (%s) file (%p) fd (%d)\n", debugstr_w(path), debugstr_w(mode), file, file ? file->_file : -1);

  LOCK_FILES();
  if (!file || ((fd = file->_file) < 0))
    file = NULL;
  else
  {
    fclose(file);
    /* map mode string to open() flags. "man fopen" for possibilities. */
    if (msvcrt_get_flags(mode, &open_flags, &stream_flags) == -1)
      file = NULL;
    else
    {
      fd = _wopen(path, open_flags, _S_IREAD | _S_IWRITE);
      if (fd < 0)
        file = NULL;
      else if (msvcrt_init_fp(file, fd, stream_flags) == -1)
      {
          file->_flag = 0;
          WARN(":failed-last error (%d)\n",GetLastError());
          _dosmaperr(GetLastError());
          file = NULL;
      }
    }
  }
  UNLOCK_FILES();
  return file;
}

Referenced by freopen().

_wfsopen()

FILE* CDECL _wfsopen	(	const wchar_t *	path,
		const wchar_t *	mode,
		int	share
	)

Definition at line 3185 of file file.c.

{
  FILE* file;
  int open_flags, stream_flags, fd;

  TRACE("(%s,%s)\n", debugstr_w(path), debugstr_w(mode));

  /* map mode string to open() flags. "man fopen" for possibilities. */
  if (msvcrt_get_flags(mode, &open_flags, &stream_flags) == -1)
      return NULL;

  LOCK_FILES();
  fd = _wsopen(path, open_flags, share, _S_IREAD | _S_IWRITE);
  if (fd < 0)
    file = NULL;
  else if ((file = msvcrt_alloc_fp()) && msvcrt_init_fp(file, fd, stream_flags)
   != -1)
    TRACE(":fd (%d) mode (%s) FILE* (%p)\n", fd, debugstr_w(mode), file);
  else if (file)
  {
    file->_flag = 0;
    file = NULL;
  }

  TRACE(":got (%p)\n",file);
  if (fd >= 0 && !file)
    _close(fd);
  UNLOCK_FILES();
  return file;
}

Referenced by _fsopen(), and _wfopen().

_wmktemp()

wchar_t* CDECL _wmktemp

(

wchar_t *

pattern

)

Definition at line 1640 of file file.c.

{
  int numX = 0;
  wchar_t *retVal = pattern;
  int id;
  wchar_t letter = 'a';

  while(*pattern)
    numX = (*pattern++ == 'X')? numX + 1 : 0;
  if (numX < 5)
    return NULL;
  pattern--;
  id = GetCurrentProcessId();
  numX = 6;
  while(numX--)
  {
    int tempNum = id / 10;
    *pattern-- = id - (tempNum * 10) + '0';
    id = tempNum;
  }
  pattern++;
  do
  {
    if (GetFileAttributesW(retVal) == INVALID_FILE_ATTRIBUTES &&
        GetLastError() == ERROR_FILE_NOT_FOUND)
      return retVal;
    *pattern = letter++;
  } while(letter != '|');
  return NULL;
}

_wopen()

int CDECL _wopen	(	const wchar_t *	path,
		int	flags,
			...
	)

Definition at line 2020 of file file.c.

{
  va_list ap;

  if (flags & _O_CREAT)
  {
    int pmode;
    va_start(ap, flags);
    pmode = va_arg(ap, int);
    va_end(ap);
    return _wsopen( path, flags, _SH_DENYNO, pmode );
  }
  else
    return _wsopen( path, flags, _SH_DENYNO);
}

Referenced by _wcreat(), _wfreopen(), compat_open(), and gz_open().

_wremove()

int CDECL _wremove

(

const wchar_t *

path

)

Definition at line 3761 of file file.c.

{
  TRACE("(%s)\n",debugstr_w(path));
  if (DeleteFileW(path))
    return 0;
  TRACE(":failed (%d)\n",GetLastError());
  _dosmaperr(GetLastError());
  return -1;
}

_wrename()

int CDECL _wrename	(	const wchar_t *	oldpath,
		const wchar_t *	newpath
	)

Definition at line 3787 of file file.c.

{
  TRACE(":from %s to %s\n",debugstr_w(oldpath),debugstr_w(newpath));
  if (MoveFileExW(oldpath, newpath, MOVEFILE_COPY_ALLOWED))
    return 0;
  TRACE(":failed (%d)\n",GetLastError());
  _dosmaperr(GetLastError());
  return -1;
}

_write()

int CDECL _write	(	int	fd,
		const void *	buf,
		unsigned int	count
	)

Definition at line 2585 of file file.c.

{
    DWORD num_written;
    ioinfo *info = get_ioinfo(fd);
    HANDLE hand = info->handle;

    /* Don't trace small writes, it gets *very* annoying */
#if 0
    if (count > 32)
        TRACE(":fd (%d) handle (%d) buf (%p) len (%d)\n",fd,hand,buf,count);
#endif
    if (hand == INVALID_HANDLE_VALUE)
    {
        *_errno() = EBADF;
        release_ioinfo(info);
        return -1;
    }

    if (((info->exflag&EF_UTF8) || (info->exflag&EF_UTF16)) && count&1)
    {
        *_errno() = EINVAL;
        release_ioinfo(info);
        return -1;
    }

    /* If appending, go to EOF */
    if (info->wxflag & WX_APPEND)
        _lseek(fd, 0, FILE_END);

    if (!(info->wxflag & WX_TEXT))
    {
        if (WriteFile(hand, buf, count, &num_written, NULL)
                &&  (num_written == count))
        {
            release_ioinfo(info);
            return num_written;
        }
        TRACE("WriteFile (fd %d, hand %p) failed-last error (%d)\n", fd,
                hand, GetLastError());
        *_errno() = ENOSPC;
    }
    else
    {
        unsigned int i, j, nr_lf, size;
        char *p = NULL;
        const char *q;
        const char *s = buf, *buf_start = buf;

        if (!(info->exflag & (EF_UTF8|EF_UTF16)))
        {
            /* find number of \n */
            for (nr_lf=0, i=0; i<count; i++)
                if (s[i] == '\n')
                    nr_lf++;
            if (nr_lf)
            {
                size = count+nr_lf;
                if ((q = p = malloc(size)))
                {
                    for (s = buf, i = 0, j = 0; i < count; i++)
                    {
                        if (s[i] == '\n')
                            p[j++] = '\r';
                        p[j++] = s[i];
                    }
                }
                else
                {
                    FIXME("Malloc failed\n");
                    nr_lf = 0;
                    size = count;
                    q = buf;
                }
            }
            else
            {
                size = count;
                q = buf;
            }
        }
        else if (info->exflag & EF_UTF16)
        {
            for (nr_lf=0, i=0; i<count; i+=2)
                if (s[i]=='\n' && s[i+1]==0)
                    nr_lf += 2;
            if (nr_lf)
            {
                size = count+nr_lf;
                if ((q = p = malloc(size)))
                {
                    for (s=buf, i=0, j=0; i<count; i++)
                    {
                        if (s[i]=='\n' && s[i+1]==0)
                        {
                            p[j++] = '\r';
                            p[j++] = 0;
                        }
                        p[j++] = s[i++];
                        p[j++] = s[i];
                    }
                }
                else
                {
                    FIXME("Malloc failed\n");
                    nr_lf = 0;
                    size = count;
                    q = buf;
                }
            }
            else
            {
                size = count;
                q = buf;
            }
        }
        else
        {
            DWORD conv_len;

            for(nr_lf=0, i=0; i<count; i+=2)
                if (s[i]=='\n' && s[i+1]==0)
                    nr_lf++;

            conv_len = WideCharToMultiByte(CP_UTF8, 0, (WCHAR*)buf, count/2, NULL, 0, NULL, NULL);
            if(!conv_len) {
                _dosmaperr(GetLastError());
                free(p);
                release_ioinfo(info);
                return -1;
            }

            size = conv_len+nr_lf;
            if((p = malloc(count+nr_lf*2+size)))
            {
                for (s=buf, i=0, j=0; i<count; i++)
                {
                    if (s[i]=='\n' && s[i+1]==0)
                    {
                        p[j++] = '\r';
                        p[j++] = 0;
                    }
                    p[j++] = s[i++];
                    p[j++] = s[i];
                }
                q = p+count+nr_lf*2;
                WideCharToMultiByte(CP_UTF8, 0, (WCHAR*)p, count/2+nr_lf,
                        p+count+nr_lf*2, conv_len+nr_lf, NULL, NULL);
            }
            else
            {
                FIXME("Malloc failed\n");
                nr_lf = 0;
                size = count;
                q = buf;
            }
        }

        if (!WriteFile(hand, q, size, &num_written, NULL))
            num_written = -1;
        release_ioinfo(info);
        if(p)
            free(p);
        if (num_written != size)
        {
            TRACE("WriteFile (fd %d, hand %p) failed-last error (%d), num_written %d\n",
                    fd, hand, GetLastError(), num_written);
            *_errno() = ENOSPC;
            return s - buf_start;
        }
        return count;
    }

    release_ioinfo(info);
    return -1;
}

Referenced by _putw(), fwrite(), msvcrt_flush_buffer(), test__creat(), test_chsize(), and test_file_write_read().

_wsopen()

int CDECL _wsopen	(	const wchar_t *	path,
		int	oflags,
		int	shflags,
			...
	)

Definition at line 1939 of file file.c.

{
  int pmode;
  int fd;

  if (oflags & _O_CREAT)
  {
    __ms_va_list ap;

    __ms_va_start(ap, shflags);
    pmode = va_arg(ap, int);
    __ms_va_end(ap);
  }
  else
    pmode = 0;

  _wsopen_s(&fd, path, oflags, shflags, pmode);
  return fd;
}

Referenced by _wfsopen(), and _wopen().

_wsopen_s()

int CDECL _wsopen_s	(	int *	fd,
		const wchar_t *	path,
		int	oflags,
		int	shflags,
		int	pmode
	)

Definition at line 1778 of file file.c.

{
  DWORD access = 0, creation = 0, attrib;
  SECURITY_ATTRIBUTES sa;
  DWORD sharing, type;
  int wxflag;
  HANDLE hand;

  TRACE("fd*: %p :file (%s) oflags: 0x%04x shflags: 0x%04x pmode: 0x%04x\n",
        fd, debugstr_w(path), oflags, shflags, pmode);

  if (!MSVCRT_CHECK_PMT( fd != NULL )) return EINVAL;

  *fd = -1;
  wxflag = split_oflags(oflags);
  switch (oflags & (_O_RDONLY | _O_WRONLY | _O_RDWR))
  {
  case _O_RDONLY: access |= GENERIC_READ; break;
  case _O_WRONLY: access |= GENERIC_WRITE; break;
  case _O_RDWR:   access |= GENERIC_WRITE | GENERIC_READ; break;
  }

  if (oflags & _O_CREAT)
  {
    if(pmode & ~(_S_IREAD | _S_IWRITE))
      FIXME(": pmode 0x%04x ignored\n", pmode);
    else
      WARN(": pmode 0x%04x ignored\n", pmode);

    if (oflags & _O_EXCL)
      creation = CREATE_NEW;
    else if (oflags & _O_TRUNC)
      creation = CREATE_ALWAYS;
    else
      creation = OPEN_ALWAYS;
  }
  else  /* no _O_CREAT */
  {
    if (oflags & _O_TRUNC)
      creation = TRUNCATE_EXISTING;
    else
      creation = OPEN_EXISTING;
  }

  switch( shflags )
  {
    case _SH_DENYRW:
      sharing = 0L;
      break;
    case _SH_DENYWR:
      sharing = FILE_SHARE_READ;
      break;
    case _SH_DENYRD:
      sharing = FILE_SHARE_WRITE;
      break;
    case _SH_DENYNO:
      sharing = FILE_SHARE_READ | FILE_SHARE_WRITE;
      break;
    default:
      ERR( "Unhandled shflags 0x%x\n", shflags );
      return EINVAL;
  }
  attrib = FILE_ATTRIBUTE_NORMAL;

  if (oflags & _O_TEMPORARY)
  {
      attrib |= FILE_FLAG_DELETE_ON_CLOSE;
      access |= DELETE;
      sharing |= FILE_SHARE_DELETE;
  }

  sa.nLength              = sizeof( SECURITY_ATTRIBUTES );
  sa.lpSecurityDescriptor = NULL;
  sa.bInheritHandle       = !(oflags & _O_NOINHERIT);

  if ((oflags&(_O_WTEXT|_O_U16TEXT|_O_U8TEXT))
          && (creation==OPEN_ALWAYS || creation==OPEN_EXISTING)
          && !(access&GENERIC_READ))
  {
      hand = CreateFileW(path, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE,
              &sa, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
      if (hand != INVALID_HANDLE_VALUE)
      {
          oflags = check_bom(hand, oflags, FALSE);
          CloseHandle(hand);
      }
      else
          oflags &= ~(_O_WTEXT|_O_U16TEXT|_O_U8TEXT);
  }

  hand = CreateFileW(path, access, sharing, &sa, creation, attrib, 0);
  if (hand == INVALID_HANDLE_VALUE)  {
    WARN(":failed-last error (%d)\n",GetLastError());
    _dosmaperr(GetLastError());
    return *_errno();
  }

  if (oflags & (_O_WTEXT | _O_U16TEXT | _O_U8TEXT))
  {
      if ((access & GENERIC_WRITE) && (creation==CREATE_NEW
                  || creation==CREATE_ALWAYS || creation==TRUNCATE_EXISTING
                  || (creation==OPEN_ALWAYS && GetLastError()==ERROR_ALREADY_EXISTS)))
      {
          if (oflags & _O_U8TEXT)
          {
              DWORD written = 0, tmp;

              while(written!=sizeof(utf8_bom) && WriteFile(hand, (char*)utf8_bom+written,
                          sizeof(utf8_bom)-written, &tmp, NULL))
                  written += tmp;
              if (written != sizeof(utf8_bom)) {
                  WARN("error writing BOM\n");
                  CloseHandle(hand);
                  _dosmaperr(GetLastError());
                  return *_errno();
              }
          }
          else
          {
              DWORD written = 0, tmp;

              while(written!=sizeof(utf16_bom) && WriteFile(hand, (char*)utf16_bom+written,
                          sizeof(utf16_bom)-written, &tmp, NULL))
                  written += tmp;
              if (written != sizeof(utf16_bom))
              {
                  WARN("error writing BOM\n");
                  CloseHandle(hand);
                  _dosmaperr(GetLastError());
                  return *_errno();
              }
          }
      }
      else if (access & GENERIC_READ)
          oflags = check_bom(hand, oflags, TRUE);
  }

  type = GetFileType(hand);
  if (type == FILE_TYPE_CHAR)
      wxflag |= WX_TTY;
  else if (type == FILE_TYPE_PIPE)
      wxflag |= WX_PIPE;

  *fd = msvcrt_alloc_fd(hand, wxflag);
  if (*fd == -1)
      return *_errno();

  if (oflags & _O_WTEXT)
      get_ioinfo_nolock(*fd)->exflag |= EF_UTF16|EF_UNK_UNICODE;
  else if (oflags & _O_U16TEXT)
      get_ioinfo_nolock(*fd)->exflag |= EF_UTF16;
  else if (oflags & _O_U8TEXT)
      get_ioinfo_nolock(*fd)->exflag |= EF_UTF8;

  TRACE(":fd (%d) handle (%p)\n", *fd, hand);
  return 0;
}

Referenced by _sopen_s(), and _wsopen().

_wtempnam()

wchar_t* CDECL _wtempnam	(	const wchar_t *	dir,
		const wchar_t *	prefix
	)

Definition at line 2556 of file file.c.

{
  wchar_t tmpbuf[MAX_PATH];

  TRACE("dir (%s) prefix (%s)\n",debugstr_w(dir),debugstr_w(prefix));
  if (GetTempFileNameW(dir,prefix,0,tmpbuf))
  {
    TRACE("got name (%s)\n",debugstr_w(tmpbuf));
    DeleteFileW(tmpbuf);
    return _wcsdup(tmpbuf);
  }
  TRACE("failed (%d)\n",GetLastError());
  return NULL;
}

_wtmpnam()

wchar_t* CDECL _wtmpnam

(

wchar_t *

s

)

Definition at line 3880 of file file.c.

{
    static const wchar_t format[] = {'\\','s','%','s','.',0};
    wchar_t tmpstr[16];
    wchar_t *p;
    int count, size;
    if (!s) {
        thread_data_t *data = msvcrt_get_thread_data();

        if(!data->wtmpnam_buffer)
            data->wtmpnam_buffer = malloc(sizeof(wchar_t[MAX_PATH]));

        s = data->wtmpnam_buffer;
    }

    msvcrt_int_to_base32_w(GetCurrentProcessId(), tmpstr);
    p = s + _snwprintf(s, MAX_PATH, format, tmpstr);
    for (count = 0; count < TMP_MAX; count++)
    {
        size = msvcrt_int_to_base32_w(tmpnam_unique++, tmpstr);
        memcpy(p, tmpstr, size*sizeof(wchar_t));
        p[size] = '\0';
        if (GetFileAttributesW(s) == INVALID_FILE_ATTRIBUTES &&
                GetLastError() == ERROR_FILE_NOT_FOUND)
            break;
    }
    return s;
}

_wunlink()

int CDECL _wunlink

(

const wchar_t *

path

)

Definition at line 815 of file file.c.

{
  TRACE("(%s)\n",debugstr_w(path));
  if(DeleteFileW(path))
    return 0;
  TRACE("failed (%d)\n",GetLastError());
  _dosmaperr(GetLastError());
  return -1;
}

add_std_buffer()

static BOOL add_std_buffer ( FILE *  file )

static

Definition at line 593 of file file.c.

{
    static char buffers[2][BUFSIZ];

    if((file->_file!=STDOUT_FILENO && file->_file!=STDERR_FILENO)
            || (file->_flag & (_IONBF | _IOMYBUF | _USERBUF))
            || !_isatty(file->_file))
        return FALSE;

    file->_ptr = file->_base = buffers[file->_file == STDOUT_FILENO ? 0 : 1];
    file->_bufsiz = file->_cnt = BUFSIZ;
    file->_flag |= _USERBUF;
    return TRUE;
}

Referenced by fputws().

alloc_pioinfo_block()

static BOOL alloc_pioinfo_block ( int  fd )

inlinestatic

Definition at line 191 of file file.c.

{
    ioinfo *block;
    int i;

    if(fd<0 || fd>=MSVCRT_MAX_FILES)
    {
        *_errno() = ENFILE;
        return FALSE;
    }

    block = calloc(MSVCRT_FD_BLOCK_SIZE, sizeof(ioinfo));
    if(!block)
    {
        WARN(":out of memory!\n");
        *_errno() = ENOMEM;
        return FALSE;
    }
    for(i=0; i<MSVCRT_FD_BLOCK_SIZE; i++)
        block[i].handle = INVALID_HANDLE_VALUE;
    if(InterlockedCompareExchangePointer((void**)&__pioinfo[fd/MSVCRT_FD_BLOCK_SIZE], block, NULL))
        free(block);
    return TRUE;
}

Referenced by get_ioinfo_alloc(), and get_ioinfo_alloc_fd().

check_bom()

static int check_bom ( HANDLE  h, int  oflags, BOOL  seek  )

static

Definition at line 1752 of file file.c.

{
    char bom[sizeof(utf8_bom)];
    DWORD r;

    oflags &= ~(_O_WTEXT|_O_U16TEXT|_O_U8TEXT);

    if (!ReadFile(h, bom, sizeof(utf8_bom), &r, NULL))
        return oflags;

    if (r==sizeof(utf8_bom) && !memcmp(bom, utf8_bom, sizeof(utf8_bom))) {
        oflags |= _O_U8TEXT;
    }else if (r>=sizeof(utf16_bom) && !memcmp(bom, utf16_bom, sizeof(utf16_bom))) {
        if (seek && r>2)
            SetFilePointer(h, 2, NULL, FILE_BEGIN);
        oflags |= _O_U16TEXT;
    }else if (seek) {
        SetFilePointer(h, 0, NULL, FILE_BEGIN);
    }

    return oflags;
}

Referenced by _wsopen_s().

clearerr()

void CDECL clearerr

(

FILE *

file

)

Definition at line 1363 of file