* source/rtl/net.c
* contrib/hbziparc/hbziparc.prg
* contrib/hbct/files.c
* Minor formatting.
* source/rtl/gtxwc/gtxwc.c
! Fix to recent fix. An '!' was missing, Przemek pls check me.
* source/rtl/philes.c
+ HB_PROGNAME() now returns absolute path in *NIX systems, too.
(please test and refine)
* source/lang/msgca.c
! Fixes from xhb.
* contrib/hbziparc/hbziparc.prg
* Minor correction ( = -> := )
* source/rtl/gtwin/gtwin.c
+ Added HB_GTI_CODEPAGE support.
As per MS docs, this works only when non-raster font is used
in the console window. Notice that the accepted CP values are
different from the GTWVT ones (GTWIN being the more "logical"
one, since it's a newer API). Currently, Harbour doesn't try
to hide these interface details.
; TODO: UNICODE and BOX char support for GTWIN mode.
* source/rtl/tbrowse.prg
* Using HB_DISPOUTATBOX() to draw column/header/footer separators.
; NOTE: This may cause problems if someone wants to use native
CP (accented or other special CP specific) chars to draw
these screen elements. Maybe an option should be added,
or some sort of markings in the separator strings to
control that.
Pls REVIEW.
* include/hbextern.ch
* source/rtl/console.c
+ Added HB_DISPOUTATBOX() which is similar to HB_DISPOUTAT(),
but marks the text drawn as HB_GT_ATTR_BOX, so these chars
can be properly displayed as drawing chars, regardless of
the selected codepage. Another difference is that this
function only supports strings to be printed. Other types
don't print anything.
; NOTE: Maybe this function could use a better name, pls
review and decide.
* source/rtl/gtwvt/gtwvt.c
* source/rtl/gtwvt/gtwvt.h
! Fixed not accepting zero as a HB_GTI_CODEPAGE value.
! Fixed HB_GTI_CODEPAGE to change the codepage.
+ Added box char support in Unicode mode.
For chars marked as HB_GT_ATTR_BOX, chars will be
mapped to Unicode according to CP437.
+ Added box char support in non-Unicode mode.
For chars marked as HB_GT_ATTR_BOX, OEM_CHARSET will
always be used.
; NOTE: This way it's possible to use ISO/WIN codepages with
GTWVT, while still being able to use various drawing
chars (lines, blocks, arrows).
; NOTE: The available set of drawing chars depends on the
OS OEM_CHARSET mapping _for non-Unicode Harbour_.
For Unicode Harbour, full CP437 codepage is
always available.
; NOTE: This solution doesn't go as far as (GTWXC) to
graphically draw / emulate these chars.
; TODO: Add HB_GTI_BOXCP support to change hard-wired "EN" CP.
* include/hbapigt.h
* include/hbgtcore.h
! Moved HB_GT_ATTR_* macros to public headers, because they
are needed for public API functions.
* contrib/hbwin/win_reg.prg
+ w32_regRead(): Added second parameter to specify the default
value returned in case the reg entry doesn't exist.
If not specified, NIL will be returned, just like before.
+ GetRegistry(): Added 4th parameter with same purpose as above.
* source/rtl/hbregex.c
* Minor opt.
* contrib/hbwin/win_misc.c
* Added command line option parameter to WIN_RUNDETACHED().
* include/hbapi.h
+ HB_ERRCODE (to replace ERRCODE)
+ HB_SUCCESS (to replace SUCCESS)
+ HB_FAILURE (to replace FAILURE)
+ contrib/hbwin/win_misc.c
* contrib/hbwin/common.mak
* contrib/hbwin/Makefile
+ WIN_SHELLEXECUTE()
WIN_RUNDETACHED()
WIN_LOADRESOURCE()
Added some new Windows API wrappers.
; TODO: Add hb_osEncode() to them.
* source/rtl/diskspac.c
* source/rtl/disksphb.c
! Fixed DISKSPACE() and HB_DISKSPACE() for Darwin.
Previously they had returned erroneous values.
; TOFIX: Probably HB_DISKSPACE() should be implemented for Watcom and CEGCC,
just like DISKSPACE() is.
* source/rtl/filesys.c
! hb_fsGetAttr() to set the returned attribute to zero
in case of error.
* include/hbextern.ch
* source/rtl/philes.c
+ HB_FSETATTR( <cFileName>, @<nAttr> ) -> <lSuccess>
+ HB_FGETATTR( <cFileName>, <nAttr> ) -> <lSuccess>
+ HB_FSETDATETIME( <cFileName>, [<dDate>], [<cTime HH:MM:SS>] ) -> <lSuccess>
* source/rtl/direct.c
! Fixed DIRECTORY() when called with "V" (label) parameter.
Tested under Windows. Please test/correct for other platforms.
On Windows, the dirspec should not contain a filemask in order
to work.
* contrib/hbtip/base64x.c
% HB_BASE64(): Optimized, cleaned.
! HB_BASE64(): Removed second parameter allowing to pass the length of
the string. This could cause GPF if passed incorrectly. Now length
is simply determined using hb_parclen().
; TOFIX: Input string size limit checking.
* include/hbdefs.h
+ HB_SIZEOFARRAY() macro, which does: ( sizeof( var ) / sizeof( *var ) )
To be really precise, f.e. all hb_strncpy() calls should use
'hb_strncpy( d, s, HB_SIZEOFARRAY( d ) );' instead of:
'hb_strncpy( d, s, sizeof( d ) );' (given that 'd' is allocated at compile time).
So that the code adapts to changing character sizes (like UTF-16/32).
It's useful in some other places, too.
* contrib/hbct/dattime2.c
* 0 -> FALSE for BOOL types.
* include/hbextern.ch
* source/rtl/strmatch.c
+ HB_WILDMATCHI(). Case-instenstive, exact match. First
two parameters and return value are the same as for
HB_WILDMATCH().
* include/hbextern.ch
* source/rtl/cdpapi.c
+ HB_CDPSELECT() which does the same as HB_SETCODEPAGE(), but
aligns well with function naming rules and namespace.
HB_SETCODEPAGE() still works, but usage is not recommended.
+ Added HB_CDPUNIID( <cHarbourCP> ) -> <cCPName>
This will return the std CP ID of a Harbour CP, or empty
if the Harbour CP isn't linked.
* include/hbapi.h
* source/rtl/is.c
! Fixed compile error when HB_CDP_SUPPORT_OFF is defined.
+ Added following functions:
hb_charIsDigit()
hb_charIsAlpha()
hb_charIsLower()
hb_charIsUpper()
* include/hbapi.h
- hb_strUpperCopy() removed. Implementation was missing.
* source/rtl/strcase.c
* Minor formatting.
* source/rtl/filesys.c
! hb_fsCurDirBuff() fixed potential buffer overrun by one byte.
* source/rtl/hbrunfun.c
* source/rtl/run.c
! Fixed missing header hbapiitm.h (after previous local change).
* include/hbapi.h
* include/hbset.h
* include/hbapifs.h
* include/set.ch
* source/rtl/hbffind.c
* source/rtl/gete.c
* source/rtl/filesys.c
* source/rtl/hbrunfun.c
* source/rtl/run.c
* source/rtl/philes.c
* source/vm/set.c
* source/vm/cmdarg.c
+ Added file system CP translation.
Set( _SET_FNAMECP[, <cCPID> ] ) -> <cOldCPID>
All operations passing filenames to/from the
OS will convert them to/from the host CP from/to
the FS CP specified using _SET_FNAMECP.
* hb_fsNameConv() extended to deal with CP
conversion, if requested by the app.
+ hb_fsNameConvFrom() (exported) added to deal
with CP conversions for filenames received from OS.
+ hb_fsNameConvTo() (exported) added to deal
with CP conversions for filenames/string sent to the OS.
+ Added hb_setGetFNAMECP() (exported) function.
+ Added hb_setGetFileCPTransTo(), hb_setGetFileCPTransFrom()
(non-exported) functions.
+ hb_fsCurDirBuff() and hb_fsFindNextLow() extended
to use hb_fsNameConvFrom().
+ Added hb_fsBaseDirBuff() to return the base
directory on the C level (based on argv[0]).
+ Added HB_PROGNAME() to return the executable
program name (based on argv[0]).
+ Added HB_DIRBASE() to return the executable
base directory (based on argv[0]).
* Renames done regarding OS/FS CP conversion:
hb_fsNameConvFrom() -> hb_osDecode()
hb_fsNameConvTo() -> hb_osEncode()
hb_setGetFileCPTransTo() -> -
hb_setGetFileCPTransFrom() -> -
hb_setGetFNAMECP() -> hb_setGetOSCODEPAGE()
_SET_FNAMECP -> _SET_OSCODEPAGE
* hb_osDecode()/hb_osEncode() extended to have a second
parameter BOOL * fFree.
Changed all calls to handle the case when fFree is set
to TRUE by hb_osDecode()/hb_osEncode().
+ HB_GETENV(): Added 3rd logical parameter to control wether
to convert the returned value from OS CP to Harbour CP.
The default is TRUE to be in sync with GETE[NV]() and the
rest of core.
* hb_fsNameConv() is now doing OS CP conversion using std APIs,
rather than duplicating such logic. I've traded some speed
for modularity.
* hb_osDecode/hb_osEncode() function declarations moved to hbapi.h
* hb_osDecode/hb_osEncode() function definitions moved to set.c
; NOTE: None of these were extensively tested, and I tend
to make mistakes when dealing with pointers.
It compiles cleanly with BCC, and some basic tests
worked, but bFree = TRUE codepaths are not yet
working so this needs more review.
* source/rtl/teditor.prg
* source/rtl/tpersist.prg
* utils/hbmake/hbmake.prg
* MemoRead() -> hb_MemoRead()
* contrib/hbct/files.c
; TOFIX: Many functions here are possibly not thread safe.
; TOFIX: Calling hb_fsFindClose() at app exit (and thus keeping
the FF handles open for the whole app lifetime) doesn't
play well with server side apps (as the app may run for
months or even longer), and even worse, they
will lock the passed directory so that they cannot be
removed (maybe even renamed), until the app exists.
At least on Windows.
* source/rtl/dirdrive.c
! Fixed to use F_ERROR instead of -1.
* include/hbextern.ch
! Added missing HB_GCSTEP().
* source/vm/extrap.c
+ Added CPU dump code for Windows x64.
+ Enabled module listing for Windows 64-bit platforms.
% Minor cleanup in Windows x86 CPU dump code.
+ Added TODO for Windows IA64 CPU dump.
+ Added TODO for Windows x64 stack walk, with pointers.
+ Added TOFIX regarding displaying module names in Windows x64 mode.
* source/rtl/fstemp.c
! Minor formatting.
* source/rtl/gete.c
* source/rtl/run.c
* source/rtl/hbrunfun.c
* source/vm/cmdarg.c
+ Added CP conversion to:
GETE[NV](), HB_GETENV(), __RUN(), HB_RUN(),
HB_ARGSTRING(), HB_CMDLINE().
; TODO: dbCreateTemp( <cAlias>, <aStruct>, <cRDD>, <cDelimArg>, <nConnection> ) -> <lSuccess>
Generates and opens a new dbf with a temporary filename
in exclusive mode, deletes it automatically when closed.
All indexes created for this table, should ideally have
the temporary flag on, so those get deleted too, when closed.
; TOFIX: hb_regex*() functions will not honor Harbour CP setting,
when case insensitivity is selected.
; TOFIX: hbct / SetFDaTi() to move any local logic into Harbour core
functions and use a simple Harbour API call only.
I'm not sure what is the reason with keeping the logic
duplicated here; if this isn't by intent, this function
could be much simplified.
; TOFIX: Avoid using C level toupper()/tolower()/islower()/isupper()
; TOFIX: hb_regexMatch()'s 3rd parameter has a double meaning.
It controls case-sensitivity (in sync with the documentation),
but it also controls if hb_regexMatch() behaves like
hb_regexLike() (.T.), or hb_regexHas() (.F.). This means
that hb_regexMatch(,, .T.) == hb_regexLike(,, .T.) (case-sensitive) and
hb_regexMatch(,, .F.) == hb_regexHas(,, .F.) (case-insensitive)
Maybe this was the intent of the original developers, but
to me it looks a rather strange behaviour which was added by
accidentally forgetting about the 3rd parameter already being
utilized. This either needs to be fixed, or properly documented.
; NOTE: Noteworthy links:
http://docs.python.org/3.0/whatsnew/3.0.html
- Unicode/text section
- Removed <> (use != instead)
http://sphinx.pocoo.org/
- Documentation format
http://fredeaker.blogspot.com/2007/01/character-encoding-detection.html
- Character encoding detection
340 lines
19 KiB
C
340 lines
19 KiB
C
/*
|
|
* $Id$
|
|
*/
|
|
|
|
/*
|
|
* Harbour Project source code:
|
|
* Header file for the Filesys API
|
|
*
|
|
* Copyright 1999 David G. Holm <dholm@jsd-llc.com>
|
|
* www - http://www.harbour-project.org
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this software; see the file COPYING. If not, write to
|
|
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
|
|
* Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
|
|
*
|
|
* As a special exception, the Harbour Project gives permission for
|
|
* additional uses of the text contained in its release of Harbour.
|
|
*
|
|
* The exception is that, if you link the Harbour libraries with other
|
|
* files to produce an executable, this does not by itself cause the
|
|
* resulting executable to be covered by the GNU General Public License.
|
|
* Your use of that executable is in no way restricted on account of
|
|
* linking the Harbour library code into it.
|
|
*
|
|
* This exception does not however invalidate any other reasons why
|
|
* the executable file might be covered by the GNU General Public License.
|
|
*
|
|
* This exception applies only to the code released by the Harbour
|
|
* Project under the name Harbour. If you copy code from other
|
|
* Harbour Project or Free Software Foundation releases into a copy of
|
|
* Harbour, as the General Public License permits, the exception does
|
|
* not apply to the code that you add in this way. To avoid misleading
|
|
* anyone as to the status of such modified files, you must delete
|
|
* this exception notice from them.
|
|
*
|
|
* If you write modifications of your own for Harbour, it is your choice
|
|
* whether to permit this exception to apply to your modifications.
|
|
* If you do not wish that, delete this exception notice.
|
|
*
|
|
*/
|
|
|
|
#ifndef HB_APIFS_H_
|
|
#define HB_APIFS_H_
|
|
|
|
#include "hbapi.h"
|
|
#include "fileio.ch"
|
|
|
|
HB_EXTERN_BEGIN
|
|
|
|
#define FS_ERROR ( HB_FHANDLE ) F_ERROR
|
|
|
|
/* File locking flags */
|
|
#define FL_LOCK 0x0000 /* Lock a region */
|
|
#define FL_UNLOCK 0x0001 /* Unlock a region */
|
|
#define FL_MASK 0x00FF /* Mask for lock type */
|
|
|
|
/* Extended file locking flags */
|
|
#define FLX_EXCLUSIVE 0x0000 /* Exclusive lock */
|
|
#define FLX_SHARED 0x0100 /* Shared lock */
|
|
#define FLX_WAIT 0x0200 /* Wait for lock until success */
|
|
|
|
/* File inheritance flags */
|
|
#define FO_INHERITED 0x0000 /* Spawned processes can inherit this file handle */
|
|
#define FO_PRIVATE 0x0080 /* Spawned processes can not inherit this file handle */
|
|
|
|
/* Extended file open mode flags */
|
|
#define FXO_TRUNCATE 0x0100 /* Create (truncate if exists) */
|
|
#define FXO_APPEND 0x0200 /* Create (append if exists) */
|
|
#define FXO_UNIQUE 0x0400 /* Create unique file FO_EXCL ??? */
|
|
#define FXO_FORCEEXT 0x0800 /* Force default extension */
|
|
#define FXO_DEFAULTS 0x1000 /* Use SET command defaults */
|
|
#define FXO_DEVICERAW 0x2000 /* Open devices in raw mode */
|
|
/* xHarbour extension */
|
|
#define FXO_SHARELOCK 0x4000 /* emulate DOS SH_DENY* mode in POSIX OS */
|
|
#define FXO_COPYNAME 0x8000 /* copy final szPath into pFilename */
|
|
|
|
/* File attributes flags */
|
|
#define HB_FA_ALL 0x00000000
|
|
|
|
#define HB_FA_READONLY 0x00000001 /* R */
|
|
#define HB_FA_HIDDEN 0x00000002 /* H */
|
|
#define HB_FA_SYSTEM 0x00000004 /* S */
|
|
#define HB_FA_LABEL 0x00000008 /* V */
|
|
#define HB_FA_DIRECTORY 0x00000010 /* D | S_ISDIR() */
|
|
#define HB_FA_ARCHIVE 0x00000020 /* A | S_ISREG() */
|
|
#define HB_FA_DEVICE 0x00000040 /* I | S_ISBLK() */
|
|
#define HB_FA_NORMAL 0x00000080 /* */
|
|
|
|
#define HB_FA_TEMPORARY 0x00000100 /* T | S_ISFIFO()??? */
|
|
#define HB_FA_SPARSE 0x00000200 /* P | S_ISSOCK()??? */
|
|
#define HB_FA_REPARSE 0x00000400 /* L | S_ISLNK() */
|
|
#define HB_FA_COMPRESSED 0x00000800 /* C | S_ISCHR()??? */
|
|
#define HB_FA_OFFLINE 0x00001000 /* O */
|
|
#define HB_FA_NOTINDEXED 0x00002000 /* X */
|
|
#define HB_FA_ENCRYPTED 0x00004000 /* E */
|
|
#define HB_FA_VOLCOMP 0x00008000 /* M volume supports compression. */
|
|
|
|
/* these definitions should be cleared,
|
|
* now they only help to clean lower level code
|
|
*/
|
|
#define HB_FA_FIFO HB_FA_TEMPORARY /* S_ISFIFO() */
|
|
#define HB_FA_FILE HB_FA_ARCHIVE /* S_ISREG() */
|
|
#define HB_FA_BLKDEVICE HB_FA_DEVICE /* S_ISBLK() */
|
|
#define HB_FA_CHRDEVICE HB_FA_COMPRESSED /* S_ISCHR() */
|
|
#define HB_FA_SOCKET HB_FA_SPARSE /* S_ISSOCK() */
|
|
#define HB_FA_LINK HB_FA_REPARSE /* S_ISLNK() */
|
|
|
|
/* POSIX file permission */
|
|
#define HB_FA_SUID 0x08000000 /* set user ID on execution */
|
|
#define HB_FA_SGID 0x04000000 /* set group ID on execution */
|
|
#define HB_FA_SVTX 0x02000000 /* sticky bit */
|
|
#define HB_FA_RUSR 0x01000000 /* read by owner */
|
|
#define HB_FA_WUSR 0x00800000 /* write by owner */
|
|
#define HB_FA_XUSR 0x00400000 /* execute/search by owner */
|
|
#define HB_FA_RGRP 0x00200000 /* read by group */
|
|
#define HB_FA_WGRP 0x00100000 /* write by group */
|
|
#define HB_FA_XGRP 0x00080000 /* execute/search by group */
|
|
#define HB_FA_ROTH 0x00040000 /* read by others */
|
|
#define HB_FA_WOTH 0x00020000 /* write by others */
|
|
#define HB_FA_XOTH 0x00010000 /* execute/search by others */
|
|
|
|
#define HB_FA_UGVS ( HB_FA_SUID | HB_FA_SGID | HB_FA_SVTX )
|
|
#define HB_FA_RWXU ( HB_FA_RUSR | HB_FA_WUSR | HB_FA_XUSR )
|
|
#define HB_FA_RWXG ( HB_FA_RGRP | HB_FA_WGRP | HB_FA_XGRP )
|
|
#define HB_FA_RWXO ( HB_FA_ROTH | HB_FA_WOTH | HB_FA_XOTH )
|
|
|
|
/* macros to convert Harbour attributes to POSIX ones */
|
|
#define HB_FA_POSIX_SID(a) ( ( ( ( a ) & HB_FA_SVTX ) ? S_ISVTX : 0 ) | \
|
|
( ( ( a ) & HB_FA_SGID ) ? S_ISGID : 0 ) | \
|
|
( ( ( a ) & HB_FA_SUID ) ? S_ISUID : 0 ) )
|
|
#define HB_FA_POSIX_OTH(a) ( ( ( ( a ) & HB_FA_XOTH ) ? S_IXOTH : 0 ) | \
|
|
( ( ( a ) & HB_FA_WOTH ) ? S_IWOTH : 0 ) | \
|
|
( ( ( a ) & HB_FA_ROTH ) ? S_IROTH : 0 ) )
|
|
#define HB_FA_POSIX_GRP(a) ( ( ( ( a ) & HB_FA_XGRP ) ? S_IXGRP : 0 ) | \
|
|
( ( ( a ) & HB_FA_WGRP ) ? S_IWGRP : 0 ) | \
|
|
( ( ( a ) & HB_FA_RGRP ) ? S_IRGRP : 0 ) )
|
|
#define HB_FA_POSIX_USR(a) ( ( ( ( a ) & HB_FA_XUSR ) ? S_IXUSR : 0 ) | \
|
|
( ( ( a ) & HB_FA_WUSR ) ? S_IWUSR : 0 ) | \
|
|
( ( ( a ) & HB_FA_RUSR ) ? S_IRUSR : 0 ) )
|
|
|
|
#define HB_FA_POSIX_ATTR(a) ( HB_FA_POSIX_OTH(a) | \
|
|
HB_FA_POSIX_GRP(a) | \
|
|
HB_FA_POSIX_USR(a) | \
|
|
HB_FA_POSIX_SID(a) )
|
|
|
|
extern HB_EXPORT BOOL hb_fsChDir ( BYTE * pszDirName ); /* change working directory */
|
|
extern HB_EXPORT USHORT hb_fsChDrv ( BYTE nDrive ); /* change working drive */
|
|
extern HB_EXPORT void hb_fsClose ( HB_FHANDLE hFileHandle ); /* close a file */
|
|
extern HB_EXPORT void hb_fsCommit ( HB_FHANDLE hFileHandle ); /* commit updates of a file */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsCreate ( BYTE * pszFileName, ULONG ulAttr ); /* create a file */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsCreateEx ( BYTE * pszFilename, ULONG ulAttr, USHORT uiFlags ); /* create a file, with specific open mode */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsCreateTemp ( const BYTE * pszDir, const BYTE * pszPrefix, ULONG ulAttr, BYTE * pszName ); /* create a temporary file from components */
|
|
extern HB_EXPORT BYTE * hb_fsCurDir ( USHORT uiDrive ); /* retrieve a static pointer containing current directory for specified drive */
|
|
extern HB_EXPORT USHORT hb_fsCurDirBuff ( USHORT uiDrive, BYTE * pbyBuffer, ULONG ulLen ); /* copy current directory for given drive into a buffer */
|
|
extern HB_EXPORT void hb_fsBaseDirBuff( BYTE * pbyBuffer ); /* retrieve the base dir of the executable */
|
|
extern HB_EXPORT BYTE hb_fsCurDrv ( void ); /* retrieve current drive number */
|
|
extern HB_EXPORT BOOL hb_fsDelete ( BYTE * pszFileName ); /* delete a file */
|
|
extern HB_EXPORT BOOL hb_fsEof ( HB_FHANDLE hFileHandle ); /* determine if an open file is position at end-of-file */
|
|
extern HB_EXPORT USHORT hb_fsError ( void ); /* retrieve file system error */
|
|
extern HB_EXPORT USHORT hb_fsOsError ( void ); /* retrieve system dependant file system error */
|
|
extern HB_EXPORT BOOL hb_fsFile ( BYTE * pszFileName ); /* determine if a file exists */
|
|
extern HB_EXPORT BOOL hb_fsIsDirectory( BYTE * pFilename );
|
|
extern HB_EXPORT HB_FOFFSET hb_fsFSize ( BYTE * pszFileName, BOOL bUseDirEntry ); /* determine the size of a file */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsExtOpen ( BYTE * pszFileName, BYTE * pDefExt,
|
|
USHORT uiFlags, BYTE * pPaths, PHB_ITEM pError ); /* open a file using default extension and a list of paths */
|
|
extern HB_EXPORT BYTE * hb_fsExtName ( BYTE * pFilename, BYTE * pDefExt,
|
|
USHORT uiExFlags, BYTE * pPaths ); /* convert file name for hb_fsExtOpen, caller must free the returned buffer */
|
|
extern HB_EXPORT USHORT hb_fsIsDrv ( BYTE nDrive ); /* determine if a drive number is a valid drive */
|
|
extern HB_EXPORT BOOL hb_fsIsDevice ( HB_FHANDLE hFileHandle ); /* determine if a file is attached to a device (console?) */
|
|
extern HB_EXPORT BOOL hb_fsLock ( HB_FHANDLE hFileHandle, ULONG ulStart, ULONG ulLength, USHORT uiMode ); /* request a lock on a portion of a file */
|
|
extern HB_EXPORT BOOL hb_fsLockLarge ( HB_FHANDLE hFileHandle, HB_FOFFSET ulStart,
|
|
HB_FOFFSET ulLength, USHORT uiMode ); /* request a lock on a portion of a file using 64bit API */
|
|
extern HB_EXPORT BOOL hb_fsMkDir ( BYTE * pszDirName ); /* create a directory */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsOpen ( BYTE * pszFileName, USHORT uiFlags ); /* open a file */
|
|
extern HB_EXPORT USHORT hb_fsRead ( HB_FHANDLE hFileHandle, BYTE * pBuff, USHORT ulCount ); /* read contents of a file into a buffer (<=64K) */
|
|
extern HB_EXPORT ULONG hb_fsReadLarge ( HB_FHANDLE hFileHandle, BYTE * pBuff, ULONG ulCount ); /* read contents of a file into a buffer (>64K) */
|
|
extern HB_EXPORT ULONG hb_fsReadAt ( HB_FHANDLE hFileHandle, BYTE * pBuff, ULONG ulCount, HB_FOFFSET llOffset ); /* read from given offset contents of a file into a buffer (>64K) */
|
|
extern HB_EXPORT BOOL hb_fsRmDir ( BYTE * pszDirName ); /* remove a directory */
|
|
extern HB_EXPORT BOOL hb_fsRename ( BYTE * pszOldName, BYTE * pszNewName ); /* rename a file */
|
|
extern HB_EXPORT ULONG hb_fsSeek ( HB_FHANDLE hFileHandle, LONG lOffset, USHORT uiMode ); /* reposition an open file */
|
|
extern HB_EXPORT HB_FOFFSET hb_fsSeekLarge ( HB_FHANDLE hFileHandle, HB_FOFFSET llOffset, USHORT uiFlags ); /* reposition an open file using 64bit API */
|
|
extern HB_EXPORT ULONG hb_fsTell ( HB_FHANDLE hFileHandle ); /* retrieve the current position of a file */
|
|
extern HB_EXPORT BOOL hb_fsSetDevMode ( HB_FHANDLE hFileHandle, USHORT uiDevMode ); /* change the device mode of a file (text/binary) */
|
|
extern HB_EXPORT BOOL hb_fsGetFileTime( BYTE * pszFileName, LONG * plJulian, LONG * plMillisec );
|
|
extern HB_EXPORT BOOL hb_fsSetFileTime( BYTE * pszFileName, LONG lJulian, LONG lMillisec );
|
|
extern HB_EXPORT BOOL hb_fsGetAttr ( BYTE * pszFileName, ULONG * pulAttr );
|
|
extern HB_EXPORT BOOL hb_fsSetAttr ( BYTE * pszFileName, ULONG ulAttr );
|
|
extern HB_EXPORT void hb_fsSetError ( USHORT uiError ); /* set the file system DOS error number */
|
|
extern HB_EXPORT void hb_fsSetIOError ( BOOL fResult, USHORT uiOperation ); /* set the file system error number after IO operation */
|
|
extern HB_EXPORT BOOL hb_fsTruncAt ( HB_FHANDLE hFileHandle, HB_FOFFSET llOffset ); /* truncate file to given size */
|
|
extern HB_EXPORT USHORT hb_fsWrite ( HB_FHANDLE hFileHandle, const BYTE * pBuff, USHORT ulCount ); /* write to an open file from a buffer (<=64K) */
|
|
extern HB_EXPORT ULONG hb_fsWriteLarge ( HB_FHANDLE hFileHandle, const BYTE * pBuff, ULONG ulCount ); /* write to an open file from a buffer (>64K) */
|
|
extern HB_EXPORT ULONG hb_fsWriteAt ( HB_FHANDLE hFileHandle, const BYTE * pBuff, ULONG ulCount, HB_FOFFSET llOffset ); /* write to an open file at given offset from a buffer (>64K) */
|
|
extern HB_EXPORT HB_FHANDLE hb_fsPOpen ( BYTE * pFilename, BYTE * pMode );
|
|
extern HB_EXPORT HB_FHANDLE hb_fsGetOsHandle( HB_FHANDLE hFileHandle );
|
|
extern HB_EXPORT USHORT hb_fsGetFError ( void ); /* get FERROR() flag */
|
|
extern HB_EXPORT void hb_fsSetFError ( USHORT uiError ); /* set FERROR() flag */
|
|
extern HB_EXPORT BOOL hb_fsNameExists ( const char * pszFileName ); /* check if a name exists in the filesystem (wildcard chars not accepted). */
|
|
extern HB_EXPORT BOOL hb_fsFileExists ( const char * pszFileName ); /* check if a file exists (wildcard chars not accepted). */
|
|
extern HB_EXPORT BOOL hb_fsDirExists ( const char * pszDirName ); /* check if a directory exists (wildcard chars not accepted). */
|
|
extern HB_EXPORT BOOL hb_fsCopy ( const BYTE * pSource, const BYTE * pDest );
|
|
|
|
#define hb_fsFLock( h, s, l ) hb_fsLock( h, s, l, FL_LOCK )
|
|
#define hb_fsFUnlock( h, s, l ) hb_fsLock( h, s, l, FL_UNLOCK )
|
|
|
|
#if defined( HB_OS_UNIX_COMPATIBLE ) && !defined( HB_USE_SHARELOCKS_OFF )
|
|
# define HB_USE_SHARELOCKS
|
|
# define HB_SHARELOCK_POS 0x7fffffffUL
|
|
# define HB_SHARELOCK_SIZE 0x1UL
|
|
# if defined( HB_USE_BSDLOCKS_OFF )
|
|
# undef HB_USE_BSDLOCKS
|
|
# elif defined( HB_OS_LINUX ) && \
|
|
!defined( __WATCOMC__ ) && !defined( HB_USE_BSDLOCKS )
|
|
/* default usage of BSD locks in *BSD systems for emulating
|
|
* DOS/Windows DENY_* flags has been disabled because tests
|
|
* on FreeBSD 6.2 and MacOSX shows that this implementation
|
|
* can create self deadlock when used simultaneously with
|
|
* POSIX locks - thanks to Phil and Lorenzo for locating the
|
|
* problem and tests [druzus]
|
|
*/
|
|
# define HB_USE_BSDLOCKS
|
|
# endif
|
|
#endif
|
|
|
|
#define HB_MAX_DRIVE_LENGTH 10
|
|
#define HB_MAX_FILE_EXT 10
|
|
|
|
/* Filename support */
|
|
typedef struct
|
|
{
|
|
const char * szPath;
|
|
const char * szName;
|
|
const char * szExtension;
|
|
const char * szDrive;
|
|
char szBuffer[ _POSIX_PATH_MAX + HB_MAX_DRIVE_LENGTH + 4 ];
|
|
} HB_FNAME, * PHB_FNAME, * HB_FNAME_PTR;
|
|
|
|
extern HB_EXPORT PHB_FNAME hb_fsFNameSplit( const char * pszFileName ); /* Split given filename into path, name and extension */
|
|
extern HB_EXPORT char * hb_fsFNameMerge( char * pszFileName, PHB_FNAME pFileName ); /* This function joins path, name and extension into a string with a filename */
|
|
|
|
/* Searchable path support */
|
|
typedef struct _HB_PATHNAMES
|
|
{
|
|
char * szPath;
|
|
struct _HB_PATHNAMES * pNext;
|
|
BOOL fFree;
|
|
} HB_PATHNAMES;
|
|
|
|
extern HB_EXPORT void hb_fsAddSearchPath( const char * szPath, HB_PATHNAMES ** pSearchList );
|
|
extern HB_EXPORT void hb_fsFreeSearchPath( HB_PATHNAMES * pSearchList );
|
|
|
|
extern HB_EXPORT BOOL hb_spFile( BYTE * pFilename, BYTE * pRetPath );
|
|
extern HB_EXPORT HB_FHANDLE hb_spOpen( BYTE * pFilename, USHORT uiFlags );
|
|
extern HB_EXPORT HB_FHANDLE hb_spCreate( BYTE * pFilename, ULONG ulAttr );
|
|
extern HB_EXPORT HB_FHANDLE hb_spCreateEx( BYTE * pFilename, ULONG ulAttr, USHORT uiFlags );
|
|
|
|
/* File Find API structure */
|
|
typedef struct
|
|
{
|
|
char szName[ _POSIX_PATH_MAX + 1 ];
|
|
LONG lDate;
|
|
char szDate[ 9 ]; /* in YYYYMMDD format */
|
|
char szTime[ 9 ]; /* in HH:MM:SS format */
|
|
ULONG attr;
|
|
HB_FOFFSET size;
|
|
|
|
/* Private */
|
|
|
|
const char * pszFileMask;
|
|
ULONG attrmask;
|
|
BOOL bFirst;
|
|
|
|
void * info; /* Pointer to the platform specific find info */
|
|
|
|
} HB_FFIND, * PHB_FFIND;
|
|
|
|
/* File Find API functions */
|
|
extern HB_EXPORT PHB_FFIND hb_fsFindFirst( const char * pszFileName, ULONG ulAttrMask );
|
|
extern HB_EXPORT BOOL hb_fsFindNext( PHB_FFIND ffind );
|
|
extern HB_EXPORT void hb_fsFindClose( PHB_FFIND ffind );
|
|
|
|
/* functions to create, wait and terminate processes */
|
|
HB_FHANDLE hb_fsProcessOpen( const char *pszFilename,
|
|
HB_FHANDLE *phStdin, HB_FHANDLE *phStdout,
|
|
HB_FHANDLE *phStderr,
|
|
BOOL fDetach, ULONG *pulPID );
|
|
int hb_fsProcessValue( HB_FHANDLE hProcess, BOOL fWait );
|
|
BOOL hb_fsProcessClose( HB_FHANDLE hProcess, BOOL fGentle );
|
|
|
|
/* Misc helper functions */
|
|
extern ULONG hb_fsAttrFromRaw( ULONG raw_attr );
|
|
extern ULONG hb_fsAttrToRaw( ULONG ulAttr );
|
|
extern ULONG hb_fsAttrEncode( const char * szAttr );
|
|
extern char * hb_fsAttrDecode( ULONG ulAttr, char * szAttr );
|
|
extern HB_EXPORT BYTE * hb_fsNameConv( BYTE * szFileName, BOOL * pfFree );
|
|
extern HB_EXPORT BOOL hb_fsMaxFilesError( void );
|
|
|
|
/* Harbour file functions with shared file handles and locks
|
|
* (buffers in the future)
|
|
*/
|
|
#ifndef _HB_FILE_INTERNAL_
|
|
typedef void * PHB_FILE;
|
|
#endif
|
|
HB_EXPORT PHB_FILE hb_fileExtOpen( BYTE * pFilename, BYTE * pDefExt,
|
|
USHORT uiExFlags, BYTE * pPaths,
|
|
PHB_ITEM pError );
|
|
HB_EXPORT PHB_FILE hb_fileCreateTemp( const BYTE * pszDir, const BYTE * pszPrefix,
|
|
ULONG ulAttr, BYTE * pszName );
|
|
HB_EXPORT void hb_fileClose( PHB_FILE pFile );
|
|
HB_EXPORT BOOL hb_fileLock( PHB_FILE pFile, HB_FOFFSET ulStart, HB_FOFFSET ulLen, int iType );
|
|
HB_EXPORT ULONG hb_fileReadAt( PHB_FILE pFile, BYTE * buffer, ULONG ulSize, HB_FOFFSET llOffset );
|
|
HB_EXPORT ULONG hb_fileWriteAt( PHB_FILE pFile, const BYTE * buffer, ULONG ulSize, HB_FOFFSET llOffset );
|
|
HB_EXPORT BOOL hb_fileTruncAt( PHB_FILE pFile, HB_FOFFSET llOffset );
|
|
HB_EXPORT HB_FOFFSET hb_fileSize( PHB_FILE pFile );
|
|
HB_EXPORT void hb_fileCommit( PHB_FILE pFile );
|
|
HB_EXPORT HB_FHANDLE hb_fileHandle( PHB_FILE pFile );
|
|
|
|
/* wrapper to fopen() which calls hb_fsNameConv() */
|
|
extern FILE * hb_fopen( const char *path, const char *mode );
|
|
|
|
#ifdef HB_LEGACY_LEVEL
|
|
/* Compatibility. Obsolete. */
|
|
extern HB_EXPORT BYTE * hb_fileNameConv( char * str );
|
|
#endif
|
|
|
|
HB_EXTERN_END
|
|
|
|
#endif /* HB_APIFS_H_ */
|