177 lines
6 KiB
C
177 lines
6 KiB
C
/***
|
|
*close.c - close file handle for Windows NT
|
|
*
|
|
* Copyright (c) 1989-2001, Microsoft Corporation. All rights reserved.
|
|
*
|
|
*Purpose:
|
|
* defines _close() - close a file handle
|
|
*
|
|
*Revision History:
|
|
* 06-09-89 PHG Module created, based on asm version
|
|
* 03-12-90 GJF Made calling type _CALLTYPE2 (for now), added #include
|
|
* <cruntime.h> and fixed the copyright. Also, cleaned up
|
|
* the formatting a bit.
|
|
* 04-03-90 GJF Now CALLTYPE1.
|
|
* 07-24-90 SBM Removed '32' from API names
|
|
* 08-14-90 SBM Compiles cleanly with -W3
|
|
* 09-28-90 GJF New-style function declarator.
|
|
* 12-04-90 GJF Appended Win32 version onto the source with #ifdef-s.
|
|
* It is enough different that there is little point in
|
|
* trying to more closely merge the two versions.
|
|
* 12-04-90 SRW Changed to include <oscalls.h> instead of <doscalls.h>
|
|
* 12-06-90 SRW Changed to use _osfile and _osfhnd instead of _osfinfo
|
|
* 01-16-91 GJF ANSI naming.
|
|
* 02-07-91 SRW Changed to call _get_osfhandle [_WIN32_]
|
|
* 04-09-91 PNT Added _MAC_ conditional
|
|
* 07-17-91 GJF Syntax error in multi-thread build [_WIN32_]
|
|
* 02-13-92 GJF Replaced _nfile by _nhandle for Win32.
|
|
* 02-21-92 GJF Removed bogus _unlock_fh() call.
|
|
* 03-22-93 GJF Check for STDOUT and STDERR being mapped to the same
|
|
* OS file handle. Also, purged Cruiser support.
|
|
* 04-06-93 SKS Replace _CRTAPI* with __cdecl
|
|
* 09-06-94 CFW Replace MTHREAD with _MT.
|
|
* 02-15-95 GJF Appended Mac version of source file (somewhat cleaned
|
|
* up), with appropriate #ifdef-s.
|
|
* 06-11-95 GJF Replaced _osfile[] with _osfile() (macro referencing
|
|
* field in ioinfo struct).
|
|
* 06-26-95 GJF Added check that the file handle is open.
|
|
* 07-08-96 GJF Replaced defined(_WIN32) with !defined(_MAC), and
|
|
* defined(_M_M68K) || defined(_M_MPPC) with
|
|
* defined(_MAC). Also, detab-ed and cleaned up the
|
|
* format a bit.
|
|
* 07-23-96 GJF Reset the lowio info even when CloseHandle fails.
|
|
* Specifically check for underlying OS HANDLE value of
|
|
* INVALID_HANDLE_VALUE.
|
|
* 08-01-96 RDK For PMac, if file with _O_TEMPORARY flag, try to delete
|
|
* after the close.
|
|
* 12-17-97 GJF Exception-safe locking.
|
|
* 02-07-98 GJF Changes for Win64: changed long cast to intptr_t cast.
|
|
* 05-17-99 PML Remove all Macintosh support.
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#include <cruntime.h>
|
|
#include <oscalls.h>
|
|
#include <io.h>
|
|
#include <mtdll.h>
|
|
#include <errno.h>
|
|
#include <stdlib.h>
|
|
#include <msdos.h>
|
|
#include <internal.h>
|
|
|
|
/***
|
|
*int _close(fh) - close a file handle
|
|
*
|
|
*Purpose:
|
|
* Closes the file associated with the file handle fh.
|
|
*
|
|
*Entry:
|
|
* int fh - file handle to close
|
|
*
|
|
*Exit:
|
|
* returns 0 if successful, -1 (and sets errno) if fails
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#ifdef _MT
|
|
|
|
/* define normal version that locks/unlocks, validates fh */
|
|
|
|
int __cdecl _close (
|
|
int fh
|
|
)
|
|
{
|
|
int r; /* return value */
|
|
|
|
/* validate file handle */
|
|
if ( ((unsigned)fh >= (unsigned)_nhandle) ||
|
|
!(_osfile(fh) & FOPEN) )
|
|
{
|
|
/* bad file handle, set errno and abort */
|
|
errno = EBADF;
|
|
_doserrno = 0;
|
|
return -1;
|
|
}
|
|
|
|
_lock_fh(fh); /* lock file */
|
|
|
|
__try {
|
|
if ( _osfile(fh) & FOPEN )
|
|
r = _close_lk(fh);
|
|
else {
|
|
errno = EBADF;
|
|
r = -1;
|
|
}
|
|
}
|
|
__finally {
|
|
_unlock_fh(fh); /* unlock the file */
|
|
}
|
|
|
|
return r;
|
|
}
|
|
|
|
/* now define version that doesn't lock/unlock, validate fh */
|
|
int __cdecl _close_lk (
|
|
int fh
|
|
)
|
|
{
|
|
DWORD dosretval;
|
|
|
|
#else
|
|
|
|
/* now define normal version */
|
|
int __cdecl _close (
|
|
int fh
|
|
)
|
|
{
|
|
DWORD dosretval;
|
|
|
|
/* validate file handle */
|
|
if ( ((unsigned)fh >= (unsigned)_nhandle) ||
|
|
!(_osfile(fh) & FOPEN) )
|
|
{
|
|
/* bad file handle, set errno and abort */
|
|
errno = EBADF;
|
|
_doserrno = 0; /* no o.s. error */
|
|
return -1;
|
|
}
|
|
#endif
|
|
/*
|
|
* Close the underlying OS file handle. Special cases:
|
|
* 1. If _get_osfhandle(fh) is INVALID_HANDLE_VALUE, don't try
|
|
* to actually close it. Just reset the lowio info so the
|
|
* handle can be reused. The standard handles are setup like
|
|
* this in Windows app, or a background app.
|
|
* 2. If fh is STDOUT or STDERR, and if STDOUT and STDERR are
|
|
* mapped to the same OS file handle, skip the CloseHandle
|
|
* is skipped (without error). STDOUT and STDERR are the only
|
|
* handles for which this support is provided. Other handles
|
|
* are mapped to the same OS file handle only at the
|
|
* programmer's risk.
|
|
*/
|
|
if ( (_get_osfhandle(fh) == (intptr_t)INVALID_HANDLE_VALUE) ||
|
|
( ((fh == 1) || (fh == 2)) &&
|
|
(_get_osfhandle(1) == _get_osfhandle(2)) ) ||
|
|
CloseHandle( (HANDLE)_get_osfhandle(fh) ) )
|
|
{
|
|
|
|
dosretval = 0L;
|
|
}
|
|
else
|
|
dosretval = GetLastError();
|
|
|
|
_free_osfhnd(fh);
|
|
|
|
_osfile(fh) = 0; /* clear file flags */
|
|
|
|
if (dosretval) {
|
|
/* OS error */
|
|
_dosmaperr(dosretval);
|
|
return -1;
|
|
}
|
|
|
|
return 0; /* good return */
|
|
}
|