da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/***********************************************************************
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* This software is part of the ast package *
3e14f97f673e8a630f076077de35afdd43dc1587Roger A. Faulkner* Copyright (c) 1985-2010 AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* and is licensed under the *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Common Public License, Version 1.0 *
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chin* by AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* A copy of the License is available at *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* http://www.opensource.org/licenses/cpl1.0.txt *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Information and Software Systems Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* AT&T Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Florham Park NJ *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Glenn Fowler <gsf@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* David Korn <dgk@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Phong Vo <kpv@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin***********************************************************************/
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef _SFIO_H
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define _SFIO_H 1
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chin#define SFIO_VERSION 20080717L
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* Public header file for the sfio library
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin**
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin** Written by Kiem-Phong Vo
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin*/
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef struct _sfio_s Sfio_t;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef struct _sfdisc_s Sfdisc_t;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if defined(_AST_STD_H) || defined(_PACKAGE_ast) && defined(_SFIO_PRIVATE)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ast_std.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ast_common.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif /* _PACKAGE_ast */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* Sfoff_t should be large enough for largest file address */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define Sfoff_t intmax_t
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define Sflong_t intmax_t
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define Sfulong_t uintmax_t
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define Sfdouble_t _ast_fltmax_t
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef ssize_t (*Sfread_f)_ARG_((Sfio_t*, Void_t*, size_t, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef ssize_t (*Sfwrite_f)_ARG_((Sfio_t*, const Void_t*, size_t, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef Sfoff_t (*Sfseek_f)_ARG_((Sfio_t*, Sfoff_t, int, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef int (*Sfexcept_f)_ARG_((Sfio_t*, int, Void_t*, Sfdisc_t*));
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainztypedef int (*Sfwalk_f)_ARG_((Sfio_t*, Void_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* discipline structure */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstruct _sfdisc_s
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{ Sfread_f readf; /* read function */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfwrite_f writef; /* write function */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfseek_f seekf; /* seek function */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfexcept_f exceptf; /* to handle exceptions */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfdisc_t* disc; /* the continuing discipline */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin};
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <sfio_s.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* formatting environment */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef struct _sffmt_s Sffmt_t;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef int (*Sffmtext_f)_ARG_((Sfio_t*, Void_t*, Sffmt_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chintypedef int (*Sffmtevent_f)_ARG_((Sfio_t*, int, Void_t*, Sffmt_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstruct _sffmt_s
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{ long version;/* version of this structure */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sffmtext_f extf; /* function to process arguments */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sffmtevent_f eventf; /* process events */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* form; /* format string to stack */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin va_list args; /* corresponding arg list */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int fmt; /* format character */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ssize_t size; /* object size */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int flags; /* formatting flags */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int width; /* width of field */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int precis; /* precision required */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int base; /* conversion base */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* t_str; /* type string */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ssize_t n_str; /* length of t_str */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Void_t* mbs; /* multibyte state for format string */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Void_t* none; /* unused for now */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin};
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sffmtversion(fe,type) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ((type) ? ((fe)->version = SFIO_VERSION) : (fe)->version)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_SSHORT 000000010 /* 'hh' flag, char */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_TFLAG 000000020 /* 't' flag, ptrdiff_t */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_ZFLAG 000000040 /* 'z' flag, size_t */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_LEFT 000000100 /* left-justification */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_SIGN 000000200 /* must have a sign */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_BLANK 000000400 /* if not signed, prepend a blank */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_ZERO 000001000 /* zero-padding on the left */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_ALTER 000002000 /* alternate formatting */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_THOUSAND 000004000 /* thousand grouping */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_SKIP 000010000 /* skip assignment in scanf() */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_SHORT 000020000 /* 'h' flag */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_LONG 000040000 /* 'l' flag */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_LLONG 000100000 /* 'll' flag */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_LDOUBLE 000200000 /* 'L' flag */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_VALUE 000400000 /* value is returned */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_ARGPOS 001000000 /* getting arg for $ patterns */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_IFLAG 002000000 /* 'I' flag */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_JFLAG 004000000 /* 'j' flag, intmax_t */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_CENTER 010000000 /* '=' flag, center justification */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFFMT_SET 017777770 /* flags settable on calling extf */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* for sfmutex() call */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFMTX_LOCK 0 /* up mutex count */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFMTX_TRYLOCK 1 /* try to up mutex count */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFMTX_UNLOCK 2 /* down mutex count */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SFMTX_CLRLOCK 3 /* clear mutex count */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* various constants */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef NULL
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define NULL 0
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef EOF
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define EOF (-1)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef SEEK_SET
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SEEK_SET 0
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SEEK_CUR 1
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SEEK_END 2
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* bits for various types of files */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_READ 0000001 /* open for reading */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_WRITE 0000002 /* open for writing */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_STRING 0000004 /* a string stream */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_APPENDWR 0000010 /* file is in append mode only */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_MALLOC 0000020 /* buffer is malloc-ed */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_LINE 0000040 /* line buffering */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SHARE 0000100 /* stream with shared file descriptor */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_EOF 0000200 /* eof was detected */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_ERROR 0000400 /* an error happened */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_STATIC 0001000 /* a stream that cannot be freed */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_IOCHECK 0002000 /* call exceptf before doing IO */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_PUBLIC 0004000 /* SF_SHARE and follow physical seek */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_MTSAFE 0010000 /* need thread safety */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_WHOLE 0020000 /* preserve wholeness of sfwrite/sfputr */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_IOINTR 0040000 /* return on interrupts */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_WCWIDTH 0100000 /* wcwidth display stream */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_FLAGS 0177177 /* PUBLIC FLAGS PASSABLE TO SFNEW() */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SETS 0177163 /* flags passable to sfset() */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef _SF_NO_OBSOLETE
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_BUFCONST 0400000 /* unused flag - for compatibility only */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* for sfgetr/sfreserve to hold a record */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_LOCKR 0000010 /* lock record, stop access to stream */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_LASTR 0000020 /* get the last incomplete record */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* exception events: SF_NEW(0), SF_READ(1), SF_WRITE(2) and the below */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SEEK 3 /* seek error */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_CLOSING 4 /* when stream is about to be closed */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_DPUSH 5 /* when discipline is being pushed */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_DPOP 6 /* when discipline is being popped */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_DPOLL 7 /* see if stream is ready for I/O */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_DBUFFER 8 /* buffer not empty during push or pop */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SYNC 9 /* announcing start/end synchronization */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_PURGE 10 /* a sfpurge() call was issued */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_FINAL 11 /* closing is done except stream free */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_READY 12 /* a polled stream is ready */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_LOCKED 13 /* stream is in a locked state */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_ATEXIT 14 /* process is exiting */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_EVENT 100 /* start of user-defined events */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* for stack and disciplines */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_POPSTACK ((Sfio_t*)0) /* pop the stream stack */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_POPDISC ((Sfdisc_t*)0) /* pop the discipline stack */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* for the notify function and discipline exception */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_NEW 0 /* new stream */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SETFD (-1) /* about to set the file descriptor */
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chin#define SF_MTACCESS (-2) /* starting a multi-threaded stream */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_BUFSIZE 8192 /* default buffer size */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_UNBOUND (-1) /* unbounded buffer size */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* namespace incursion workarounds -- migrate to the new names */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if !_mac_SF_APPEND
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_APPEND SF_APPENDWR /* BSDI sys/stat.h */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if !_mac_SF_CLOSE
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_CLOSE SF_CLOSING /* AIX sys/socket.h */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin_BEGIN_EXTERNS_
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* standard in/out/err streams */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if _BLD_sfio && defined(__EXPORT__)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define extern extern __EXPORT__
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if !_BLD_sfio && defined(__IMPORT__)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define extern extern __IMPORT__
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t _Sfi;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t _Sfmaxr;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfstdin;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfstdout;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfstderr;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if _UWIN
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#undef extern
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t _Sfstdin;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t _Sfstdout;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t _Sfstderr;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#undef extern
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if _BLD_sfio && defined(__EXPORT__)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define extern __EXPORT__
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfnew _ARG_((Sfio_t*, Void_t*, size_t, int, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfopen _ARG_((Sfio_t*, const char*, const char*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfpopen _ARG_((Sfio_t*, const char*, const char*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfstack _ARG_((Sfio_t*, Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfswap _ARG_((Sfio_t*, Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sftmp _ARG_((size_t));
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainzextern int sfwalk _ARG_((Sfwalk_f, Void_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfpurge _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfpoll _ARG_((Sfio_t**, int, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Void_t* sfreserve _ARG_((Sfio_t*, ssize_t, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfresize _ARG_((Sfio_t*, Sfoff_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfsync _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfclrlock _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Void_t* sfsetbuf _ARG_((Sfio_t*, Void_t*, size_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfdisc_t* sfdisc _ARG_((Sfio_t*,Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfraise _ARG_((Sfio_t*, int, Void_t*));
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chinextern int sfnotify _ARG_((void(*)(Sfio_t*, int, void*)));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfset _ARG_((Sfio_t*, int, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfsetfd _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfio_t* sfpool _ARG_((Sfio_t*, Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfread _ARG_((Sfio_t*, Void_t*, size_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfwrite _ARG_((Sfio_t*, const Void_t*, size_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfoff_t sfmove _ARG_((Sfio_t*, Sfio_t*, Sfoff_t, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfclose _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfoff_t sftell _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfoff_t sfseek _ARG_((Sfio_t*, Sfoff_t, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfputr _ARG_((Sfio_t*, const char*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern char* sfgetr _ARG_((Sfio_t*, int, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfnputc _ARG_((Sfio_t*, int, size_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfungetc _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfprintf _ARG_((Sfio_t*, const char*, ...));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern char* sfprints _ARG_((const char*, ...));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfsprintf _ARG_((char*, size_t, const char*, ...));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfvsprintf _ARG_((char*, size_t, const char*, va_list));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfvprintf _ARG_((Sfio_t*, const char*, va_list));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfscanf _ARG_((Sfio_t*, const char*, ...));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfsscanf _ARG_((const char*, const char*, ...));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfvsscanf _ARG_((const char*, const char*, va_list));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfvscanf _ARG_((Sfio_t*, const char*, va_list));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* mutex locking for thread-safety */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfmutex _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* io functions with discipline continuation */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfrd _ARG_((Sfio_t*, Void_t*, size_t, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfwr _ARG_((Sfio_t*, const Void_t*, size_t, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfoff_t sfsk _ARG_((Sfio_t*, Sfoff_t, int, Sfdisc_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfpkrd _ARG_((int, Void_t*, size_t, int, long, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* portable handling of primitive types */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfdlen _ARG_((Sfdouble_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfllen _ARG_((Sflong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfulen _ARG_((Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfputd _ARG_((Sfio_t*, Sfdouble_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfputl _ARG_((Sfio_t*, Sflong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfputu _ARG_((Sfio_t*, Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfputm _ARG_((Sfio_t*, Sfulong_t, Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfputc _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfdouble_t sfgetd _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sflong_t sfgetl _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfulong_t sfgetu _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfulong_t sfgetm _ARG_((Sfio_t*, Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfgetc _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfputd _ARG_((Sfio_t*, Sfdouble_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfputl _ARG_((Sfio_t*, Sflong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfputu _ARG_((Sfio_t*, Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfputm _ARG_((Sfio_t*, Sfulong_t, Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfflsbuf _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sffilbuf _ARG_((Sfio_t*, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfdlen _ARG_((Sfdouble_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfllen _ARG_((Sflong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int _sfulen _ARG_((Sfulong_t));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* miscellaneous function analogues of fast in-line functions */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern Sfoff_t sfsize _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfclrerr _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfeof _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sferror _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sffileno _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern int sfstacked _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfvalue _ARG_((Sfio_t*));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfslen _ARG_((void));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinextern ssize_t sfmaxr _ARG_((ssize_t, int));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#undef extern
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin_END_EXTERNS_
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/* coding long integers in a portable and compact fashion */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SBITS 6
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_UBITS 7
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_BBITS 8
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_SIGN (1 << SF_SBITS)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_MORE (1 << SF_UBITS)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_BYTE (1 << SF_BBITS)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_U1 SF_MORE
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_U2 (SF_U1*SF_U1)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_U3 (SF_U2*SF_U1)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define SF_U4 (SF_U3*SF_U1)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if __cplusplus
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define _SF_(f) (f)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define _SF_(f) ((Sfio_t*)(f))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_putd(f,v) (_sfputd(_SF_(f),(Sfdouble_t)(v)))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_putl(f,v) (_sfputl(_SF_(f),(Sflong_t)(v)))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_putu(f,v) (_sfputu(_SF_(f),(Sfulong_t)(v)))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_putm(f,v,m) (_sfputm(_SF_(f),(Sfulong_t)(v),(Sfulong_t)(m)))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_putc(f,c) (_SF_(f)->_next >= _SF_(f)->_endw ? \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin _sfflsbuf(_SF_(f),(int)((unsigned char)(c))) : \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (int)(*_SF_(f)->_next++ = (unsigned char)(c)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_getc(f) (_SF_(f)->_next >= _SF_(f)->_endr ? _sffilbuf(_SF_(f),0) : \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (int)(*_SF_(f)->_next++) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_dlen(v) (_sfdlen((Sfdouble_t)(v)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_llen(v) (_sfllen((Sflong_t)(v)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_ulen(v) ((Sfulong_t)(v) < SF_U1 ? 1 : (Sfulong_t)(v) < SF_U2 ? 2 : \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (Sfulong_t)(v) < SF_U3 ? 3 : (Sfulong_t)(v) < SF_U4 ? 4 : 5)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_fileno(f) (_SF_(f)->_file)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_eof(f) (_SF_(f)->_flags&SF_EOF)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_error(f) (_SF_(f)->_flags&SF_ERROR)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_clrerr(f) (_SF_(f)->_flags &= ~(SF_ERROR|SF_EOF))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_stacked(f) (_SF_(f)->_push != (Sfio_t*)0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_value(f) (_SF_(f)->_val)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_slen() (_Sfi)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define __sf_maxr(n,s) ((s)?((_Sfi=_Sfmaxr),(_Sfmaxr=(n)),_Sfi):_Sfmaxr)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#if defined(__INLINE__) && !_BLD_sfio
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfputd(Sfio_t* f, Sfdouble_t v) { return __sf_putd(f,v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfputl(Sfio_t* f, Sflong_t v) { return __sf_putl(f,v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfputu(Sfio_t* f, Sfulong_t v) { return __sf_putu(f,v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfputm(Sfio_t* f, Sfulong_t v, Sfulong_t m)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin { return __sf_putm(f,v,m); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfputc(Sfio_t* f, int c) { return __sf_putc(f,c); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfgetc(Sfio_t* f) { return __sf_getc(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfdlen(Sfdouble_t v) { return __sf_dlen(v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfllen(Sflong_t v) { return __sf_llen(v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfulen(Sfulong_t v) { return __sf_ulen(v); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sffileno(Sfio_t* f) { return __sf_fileno(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfeof(Sfio_t* f) { return __sf_eof(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sferror(Sfio_t* f) { return __sf_error(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfclrerr(Sfio_t* f) { return __sf_clrerr(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ int sfstacked(Sfio_t* f) { return __sf_stacked(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ ssize_t sfvalue(Sfio_t* f) { return __sf_value(f); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ ssize_t sfslen() { return __sf_slen(); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin__INLINE__ ssize_t sfmaxr(ssize_t n, int s) { return __sf_maxr(n,s); }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfputd(f,v) ( __sf_putd((f),(v)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfputl(f,v) ( __sf_putl((f),(v)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfputu(f,v) ( __sf_putu((f),(v)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfputm(f,v,m) ( __sf_putm((f),(v),(m)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfputc(f,c) ( __sf_putc((f),(c)) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfgetc(f) ( __sf_getc(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfdlen(v) ( __sf_dlen(v) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfllen(v) ( __sf_llen(v) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfulen(v) ( __sf_ulen(v) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sffileno(f) ( __sf_fileno(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfeof(f) ( __sf_eof(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sferror(f) ( __sf_error(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfclrerr(f) ( __sf_clrerr(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstacked(f) ( __sf_stacked(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfvalue(f) ( __sf_value(f) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfslen() ( __sf_slen() )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfmaxr(n,s) ( __sf_maxr(n,s) )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif /*__INLINE__*/
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#ifndef _SFSTR_H /* GSF's string manipulation stuff */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define _SFSTR_H 1
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstropen() sfnew(0, 0, -1, -1, SF_READ|SF_WRITE|SF_STRING)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrclose(f) sfclose(f)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrseek(f,p,m) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ( (m) == SEEK_SET ? \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (((p) < 0 || (p) > (f)->_size) ? (char*)0 : \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (char*)((f)->_next = (f)->_data+(p)) ) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin : (m) == SEEK_CUR ? \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ((f)->_next += (p), \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (((f)->_next < (f)->_data || (f)->_next > (f)->_data+(f)->_size) ? \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ((f)->_next -= (p), (char*)0) : (char*)(f)->_next ) ) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin : (m) == SEEK_END ? \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ( ((p) > 0 || (f)->_size+(p) < 0) ? (char*)0 : \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (char*)((f)->_next = (f)->_data+(f)->_size+(p)) ) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin : (char*)0 \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrsize(f) ((f)->_size)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrtell(f) ((f)->_next - (f)->_data)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrpend(f) ((f)->_size - sfstrtell())
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrbase(f) ((char*)(f)->_data)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstruse(f) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (sfputc((f),0) < 0 ? (char*)0 : (char*)((f)->_next = (f)->_data) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrrsrv(f,n) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (sfreserve((f),(n),SF_WRITE|SF_LOCKR), sfwrite((f),(f)->_next,0), \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ((f)->_next+(n) <= (f)->_data+(f)->_size ? (char*)(f)->_next : (char*)0) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define sfstrbuf(f,b,n,m) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin (sfsetbuf((f),(b),(n)), ((f)->_flags |= (m) ? SF_MALLOC : 0), \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ((f)->_data == (unsigned char*)(b) ? 0 : -1) \
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin )
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif /* _SFSTR_H */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#endif /* _SFIO_H */