/* @(#) pf_io.h 98/01/26 1.2 */
/***************************************************************
** Include file for PForth IO
** Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom
** The pForth software code is dedicated to the public domain,
** and any third party may reproduce, distribute and modify
** the pForth software code or any derivative works thereof
** without any compensation or license. The pForth software
** code is provided on an "as is" basis without any warranty
** of any kind, including, without limitation, the implied
** warranties of merchantability and fitness for a particular
** purpose and their equivalents under the laws of any jurisdiction.
***************************************************************/
#define PF_CHAR_XON (0x11)
#define PF_CHAR_XOFF (0x13)
int sdTerminalOut( char c
);
int sdTerminalEcho( char c
);
int sdTerminalFlush( void );
int sdTerminalIn( void );
int sdQueryTerminal( void );
void sdTerminalInit( void );
void sdTerminalTerm( void );
void sdEnableInput( void );
void sdDisableInput( void );
/* Get user prototypes or macros from include file.
** API must match that defined above for the stubs.
/* If your sdTerminalIn echos, define PF_KEY_ECHOS. */
#define sdEnableInput() /* sdTerminalOut( PF_CHAR_XON ) */
#define sdDisableInput() /* sdTerminalOut( PF_CHAR_XOFF ) */
#endif /* PF_NO_CHARIO */
/* Define file access modes. */
/* User can #undef and re#define using PF_USER_FILEIO if needed. */
#define PF_FAM_READ_ONLY (0)
#define PF_FAM_READ_WRITE (1)
#define PF_FAM_WRITE_ONLY (2)
#define PF_FAM_BINARY_FLAG (8)
#define PF_FAM_CREATE_WO ("w")
#define PF_FAM_CREATE_RW ("w+")
#define PF_FAM_OPEN_RO ("r")
#define PF_FAM_OPEN_RW ("r+")
#define PF_FAM_BIN_CREATE_WO ("wb")
#define PF_FAM_BIN_CREATE_RW ("wb+")
#define PF_FAM_BIN_OPEN_RO ("rb")
#define PF_FAM_BIN_OPEN_RW ("rb+")
extern FileStream
*PF_STDIN
;
extern FileStream
*PF_STDOUT
;
/* Prototypes for stubs. */
FileStream
*sdOpenFile( const char *FileName
, const char *Mode
);
cell_t
sdFlushFile( FileStream
* Stream
);
cell_t
sdReadFile( void *ptr
, cell_t Size
, int32_t nItems
, FileStream
* Stream
);
cell_t
sdWriteFile( void *ptr
, cell_t Size
, int32_t nItems
, FileStream
* Stream
);
cell_t
sdSeekFile( FileStream
* Stream
, off_t Position
, int32_t Mode
);
off_t
sdTellFile( FileStream
* Stream
);
cell_t
sdCloseFile( FileStream
* Stream
);
cell_t
sdInputChar( FileStream
*stream
);
** printf() is only used for debugging purposes.
** It is not required for normal operation.
#define PRT(x) /* No printf(). */
/* Get user prototypes or macros from include file.
** API must match that defined above for the stubs.
#define sdDeleteFile remove
#define sdFlushFile fflush
#define sdWriteFile fwrite
#if defined(WIN32) || defined(__NT__)
/* TODO To support 64-bit file offset we probably need fseeki64(). */
#define sdSeekFile fseeko
#define sdTellFile ftello
#define sdCloseFile fclose
#define sdInputChar fgetc
#define PF_STDIN ((FileStream *) stdin)
#define PF_STDOUT ((FileStream *) stdout)
** printf() is only used for debugging purposes.
** It is not required for normal operation.
#define PRT(x) { printf x; sdFlushFile(PF_STDOUT); }
#endif /* PF_NO_FILEIO */
cell_t
ioAccept( char *Target
, cell_t n1
);
void ioType( const char *s
, cell_t n
);