libio/libioP.h

   1 /* Copyright (C) 1993, 1997, 1998 Free Software Foundation, Inc.
   2    This file is part of the GNU IO Library.
   3
   4    This library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU General Public License as
   6    published by the Free Software Foundation; either version 2, or (at
   7    your option) any later version.
   8
   9    This library is distributed in the hope that it will be useful, but
  10    WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this library; see the file COPYING.  If not, write to
  16    the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
  17    MA 02111-1307, USA.
  18
  19    As a special exception, if you link this library with files
  20    compiled with a GNU compiler to produce an executable, this does
  21    not cause the resulting executable to be covered by the GNU General
  22    Public License.  This exception does not however invalidate any
  23    other reasons why the executable file might be covered by the GNU
  24    General Public License.  */
  25
  26 #include <errno.h>
  27 #ifndef __set_errno
  28 # define __set_errno(Val) errno = (Val)
  29 #endif
  30 #if defined __GLIBC__ && __GLIBC__ >= 2
  31 # include <bits/libc-lock.h>
  32 #else
  33 /*# include <comthread.h>*/
  34 #endif
  35
  36 #include "iolibio.h"
  37
  38 #ifdef __cplusplus
  39 extern "C" {
  40 #endif
  41
  42 #define _IO_seek_set 0
  43 #define _IO_seek_cur 1
  44 #define _IO_seek_end 2
  45
  46 /* THE JUMPTABLE FUNCTIONS.
  47
  48  * The _IO_FILE type is used to implement the FILE type in GNU libc,
  49  * as well as the streambuf class in GNU iostreams for C++.
  50  * These are all the same, just used differently.
  51  * An _IO_FILE (or FILE) object is allows followed by a pointer to
  52  * a jump table (of pointers to functions).  The pointer is accessed
  53  * with the _IO_JUMPS macro.  The jump table has a eccentric format,
  54  * so as to be compatible with the layout of a C++ virtual function table.
  55  * (as implemented by g++).  When a pointer to a streambuf object is
  56  * coerced to an (_IO_FILE*), then _IO_JUMPS on the result just
  57  * happens to point to the virtual function table of the streambuf.
  58  * Thus the _IO_JUMPS function table used for C stdio/libio does
  59  * double duty as the virtual function table for C++ streambuf.
  60  *
  61  * The entries in the _IO_JUMPS function table (and hence also the
  62  * virtual functions of a streambuf) are described below.
  63  * The first parameter of each function entry is the _IO_FILE/streambuf
  64  * object being acted on (i.e. the 'this' parameter).
  65  */
  66
  67 #if (!defined _IO_USE_OLD_IO_FILE \
  68      && (!defined _G_IO_NO_BACKWARD_COMPAT || _G_IO_NO_BACKWARD_COMPAT == 0))
  69 # define _IO_JUMPS_OFFSET 1
  70 #endif
  71
  72 #define _IO_JUMPS(THIS) ((struct _IO_FILE_plus *) (THIS))->vtable
  73 #if _IO_JUMPS_OFFSET
  74 # define _IO_JUMPS_FUNC(THIS) \
  75  (*(struct _IO_jump_t **) ((void *) &((struct _IO_FILE_plus *) (THIS))->vtable\
  76                            + (THIS)->_vtable_offset))
  77 #else
  78 # define _IO_JUMPS_FUNC(THIS) _IO_JUMPS(THIS)
  79 #endif
  80 #ifdef _G_USING_THUNKS
  81 # define JUMP_FIELD(TYPE, NAME) TYPE NAME
  82 # define JUMP0(FUNC, THIS) _IO_JUMPS_FUNC(THIS)->FUNC (THIS)
  83 # define JUMP1(FUNC, THIS, X1) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1)
  84 # define JUMP2(FUNC, THIS, X1, X2) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1, X2)
  85 # define JUMP3(FUNC, THIS, X1,X2,X3) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1,X2, X3)
  86 # define JUMP_INIT(NAME, VALUE) VALUE
  87 # define JUMP_INIT_DUMMY JUMP_INIT(dummy, 0), JUMP_INIT (dummy2, 0)
  88 #else
  89 /* These macros will change when we re-implement vtables to use "thunks"! */
  90 # define JUMP_FIELD(TYPE, NAME) struct { short delta1, delta2; TYPE pfn; } NAME
  91 # define JUMP0(FUNC, THIS) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS)
  92 # define JUMP1(FUNC, THIS, X1) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1)
  93 # define JUMP2(FUNC, THIS, X1, X2) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1, X2)
  94 # define JUMP3(FUNC, THIS, X1,X2,X3) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1,X2,X3)
  95 # define JUMP_INIT(NAME, VALUE) {0, 0, VALUE}
  96 # define JUMP_INIT_DUMMY JUMP_INIT(dummy, 0)
  97 #endif
  98
  99 /* The 'finish' function does any final cleaning up of an _IO_FILE object.
 100    It does not delete (free) it, but does everything else to finalize it/
 101    It matches the streambuf::~streambuf virtual destructor.  */
 102 typedef void (*_IO_finish_t) __P ((_IO_FILE *, int)); /* finalize */
 103 #define _IO_FINISH(FP) JUMP1 (__finish, FP, 0)
 104
 105 /* The 'overflow' hook flushes the buffer.
 106    The second argument is a character, or EOF.
 107    It matches the streambuf::overflow virtual function. */
 108 typedef int (*_IO_overflow_t) __P ((_IO_FILE *, int));
 109 #define _IO_OVERFLOW(FP, CH) JUMP1 (__overflow, FP, CH)
 110
 111 /* The 'underflow' hook tries to fills the get buffer.
 112    It returns the next character (as an unsigned char) or EOF.  The next
 113    character remains in the get buffer, and the get position is not changed.
 114    It matches the streambuf::underflow virtual function. */
 115 typedef int (*_IO_underflow_t) __P ((_IO_FILE *));
 116 #define _IO_UNDERFLOW(FP) JUMP0 (__underflow, FP)
 117
 118 /* The 'uflow' hook returns the next character in the input stream
 119    (cast to unsigned char), and increments the read position;
 120    EOF is returned on failure.
 121    It matches the streambuf::uflow virtual function, which is not in the
 122    cfront implementation, but was added to C++ by the ANSI/ISO committee. */
 123 #define _IO_UFLOW(FP) JUMP0 (__uflow, FP)
 124
 125 /* The 'pbackfail' hook handles backing up.
 126    It matches the streambuf::pbackfail virtual function. */
 127 typedef int (*_IO_pbackfail_t) __P ((_IO_FILE *, int));
 128 #define _IO_PBACKFAIL(FP, CH) JUMP1 (__pbackfail, FP, CH)
 129
 130 /* The 'xsputn' hook writes upto N characters from buffer DATA.
 131    Returns the number of character actually written.
 132    It matches the streambuf::xsputn virtual function. */
 133 typedef _IO_size_t (*_IO_xsputn_t) __P ((_IO_FILE *FP, const void *DATA,
 134                                          _IO_size_t N));
 135 #define _IO_XSPUTN(FP, DATA, N) JUMP2 (__xsputn, FP, DATA, N)
 136
 137 /* The 'xsgetn' hook reads upto N characters into buffer DATA.
 138    Returns the number of character actually read.
 139    It matches the streambuf::xsgetn virtual function. */
 140 typedef _IO_size_t (*_IO_xsgetn_t) __P ((_IO_FILE *FP, void *DATA,
 141                                          _IO_size_t N));
 142 #define _IO_XSGETN(FP, DATA, N) JUMP2 (__xsgetn, FP, DATA, N)
 143
 144 /* The 'seekoff' hook moves the stream position to a new position
 145    relative to the start of the file (if DIR==0), the current position
 146    (MODE==1), or the end of the file (MODE==2).
 147    It matches the streambuf::seekoff virtual function.
 148    It is also used for the ANSI fseek function. */
 149 typedef _IO_fpos64_t (*_IO_seekoff_t) __P ((_IO_FILE *FP, _IO_off64_t OFF,
 150                                           int DIR, int MODE));
 151 #define _IO_SEEKOFF(FP, OFF, DIR, MODE) JUMP3 (__seekoff, FP, OFF, DIR, MODE)
 152
 153 /* The 'seekpos' hook also moves the stream position,
 154    but to an absolute position given by a fpos64_t (seekpos).
 155    It matches the streambuf::seekpos virtual function.
 156    It is also used for the ANSI fgetpos and fsetpos functions.  */
 157 /* The _IO_seek_cur and _IO_seek_end options are not allowed. */
 158 typedef _IO_fpos64_t (*_IO_seekpos_t) __P ((_IO_FILE *, _IO_fpos64_t, int));
 159 #define _IO_SEEKPOS(FP, POS, FLAGS) JUMP2 (__seekpos, FP, POS, FLAGS)
 160
 161 /* The 'setbuf' hook gives a buffer to the file.
 162    It matches the streambuf::setbuf virtual function. */
 163 typedef _IO_FILE* (*_IO_setbuf_t) __P ((_IO_FILE *, char *, _IO_ssize_t));
 164 #define _IO_SETBUF(FP, BUFFER, LENGTH) JUMP2 (__setbuf, FP, BUFFER, LENGTH)
 165
 166 /* The 'sync' hook attempts to synchronize the internal data structures
 167    of the file with the external state.
 168    It matches the streambuf::sync virtual function. */
 169 typedef int (*_IO_sync_t) __P ((_IO_FILE *));
 170 #define _IO_SYNC(FP) JUMP0 (__sync, FP)
 171
 172 /* The 'doallocate' hook is used to tell the file to allocate a buffer.
 173    It matches the streambuf::doallocate virtual function, which is not
 174    in the ANSI/ISO C++ standard, but is part traditional implementations. */
 175 typedef int (*_IO_doallocate_t) __P ((_IO_FILE *));
 176 #define _IO_DOALLOCATE(FP) JUMP0 (__doallocate, FP)
 177
 178 /* The following four hooks (sysread, syswrite, sysclose, sysseek, and
 179    sysstat) are low-level hooks specific to this implementation.
 180    There is no correspondence in the ANSI/ISO C++ standard library.
 181    The hooks basically correspond to the Unix system functions
 182    (read, write, close, lseek, and stat) except that a _IO_FILE*
 183    parameter is used instead of a integer file descriptor;  the default
 184    implementation used for normal files just calls those functions.
 185    The advantage of overriding these functions instead of the higher-level
 186    ones (underflow, overflow etc) is that you can leave all the buffering
 187    higher-level functions.  */
 188
 189 /* The 'sysread' hook is used to read data from the external file into
 190    an existing buffer.  It generalizes the Unix read(2) function.
 191    It matches the streambuf::sys_read virtual function, which is
 192    specific to this implementation. */
 193 typedef _IO_ssize_t (*_IO_read_t) __P ((_IO_FILE *, void *, _IO_ssize_t));
 194 #define _IO_SYSREAD(FP, DATA, LEN) JUMP2 (__read, FP, DATA, LEN)
 195
 196 /* The 'syswrite' hook is used to write data from an existing buffer
 197    to an external file.  It generalizes the Unix write(2) function.
 198    It matches the streambuf::sys_write virtual function, which is
 199    specific to this implementation. */
 200 typedef _IO_ssize_t (*_IO_write_t) __P ((_IO_FILE *,const void *,_IO_ssize_t));
 201 #define _IO_SYSWRITE(FP, DATA, LEN) JUMP2 (__write, FP, DATA, LEN)
 202
 203 /* The 'sysseek' hook is used to re-position an external file.
 204    It generalizes the Unix lseek(2) function.
 205    It matches the streambuf::sys_seek virtual function, which is
 206    specific to this implementation. */
 207 typedef _IO_fpos64_t (*_IO_seek_t) __P ((_IO_FILE *, _IO_off64_t, int));
 208 #define _IO_SYSSEEK(FP, OFFSET, MODE) JUMP2 (__seek, FP, OFFSET, MODE)
 209
 210 /* The 'sysclose' hook is used to finalize (close, finish up) an
 211    external file.  It generalizes the Unix close(2) function.
 212    It matches the streambuf::sys_close virtual function, which is
 213    specific to this implementation. */
 214 typedef int (*_IO_close_t) __P ((_IO_FILE *)); /* finalize */
 215 #define _IO_SYSCLOSE(FP) JUMP0 (__close, FP)
 216
 217 /* The 'sysstat' hook is used to get information about an external file
 218    into a struct stat buffer.  It generalizes the Unix fstat(2) call.
 219    It matches the streambuf::sys_stat virtual function, which is
 220    specific to this implementation. */
 221 typedef int (*_IO_stat_t) __P ((_IO_FILE *, void *));
 222 #define _IO_SYSSTAT(FP, BUF) JUMP1 (__stat, FP, BUF)
 223
 224 /* The 'showmany' hook can be used to get an image how much input is
 225    available.  In many cases the answer will be 0 which means unknown
 226    but some cases one can provide real information.  */
 227 typedef int (*_IO_showmanyc_t) __P ((_IO_FILE *));
 228 #define _IO_SHOWMANYC(FP) JUMP0 (__showmanyc, FP)
 229
 230 /* The 'imbue' hook is used to get information about the currently
 231    installed locales.  */
 232 typedef void (*_IO_imbue_t) __P ((_IO_FILE *, void *));
 233 #define _IO_IMBUE(FP, LOCALE) JUMP1 (__imbue, FP, LOCALE)
 234
 235
 236 #define _IO_CHAR_TYPE char /* unsigned char ? */
 237 #define _IO_INT_TYPE int
 238
 239 struct _IO_jump_t
 240 {
 241     JUMP_FIELD(_G_size_t, __dummy);
 242 #ifdef _G_USING_THUNKS
 243     JUMP_FIELD(_G_size_t, __dummy2);
 244 #endif
 245     JUMP_FIELD(_IO_finish_t, __finish);
 246     JUMP_FIELD(_IO_overflow_t, __overflow);
 247     JUMP_FIELD(_IO_underflow_t, __underflow);
 248     JUMP_FIELD(_IO_underflow_t, __uflow);
 249     JUMP_FIELD(_IO_pbackfail_t, __pbackfail);
 250     /* showmany */
 251     JUMP_FIELD(_IO_xsputn_t, __xsputn);
 252     JUMP_FIELD(_IO_xsgetn_t, __xsgetn);
 253     JUMP_FIELD(_IO_seekoff_t, __seekoff);
 254     JUMP_FIELD(_IO_seekpos_t, __seekpos);
 255     JUMP_FIELD(_IO_setbuf_t, __setbuf);
 256     JUMP_FIELD(_IO_sync_t, __sync);
 257     JUMP_FIELD(_IO_doallocate_t, __doallocate);
 258     JUMP_FIELD(_IO_read_t, __read);
 259     JUMP_FIELD(_IO_write_t, __write);
 260     JUMP_FIELD(_IO_seek_t, __seek);
 261     JUMP_FIELD(_IO_close_t, __close);
 262     JUMP_FIELD(_IO_stat_t, __stat);
 263     JUMP_FIELD(_IO_showmanyc_t, __showmanyc);
 264     JUMP_FIELD(_IO_imbue_t, __imbue);
 265 #if 0
 266     get_column;
 267     set_column;
 268 #endif
 269 };
 270
 271 /* We always allocate an extra word following an _IO_FILE.
 272    This contains a pointer to the function jump table used.
 273    This is for compatibility with C++ streambuf; the word can
 274    be used to smash to a pointer to a virtual function table. */
 275
 276 struct _IO_FILE_plus
 277 {
 278   _IO_FILE file;
 279   const struct _IO_jump_t *vtable;
 280 };
 281
 282 /* Generic functions */
 283
 284 extern _IO_fpos64_t _IO_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 285 extern _IO_fpos64_t _IO_seekpos __P ((_IO_FILE *, _IO_fpos64_t, int));
 286
 287 extern void _IO_switch_to_main_get_area __P ((_IO_FILE *));
 288 extern void _IO_switch_to_backup_area __P ((_IO_FILE *));
 289 extern int _IO_switch_to_get_mode __P ((_IO_FILE *));
 290 extern void _IO_init __P ((_IO_FILE *, int));
 291 extern int _IO_sputbackc __P ((_IO_FILE *, int));
 292 extern int _IO_sungetc __P ((_IO_FILE *));
 293 extern void _IO_un_link __P ((_IO_FILE *));
 294 extern void _IO_link_in __P ((_IO_FILE *));
 295 extern void _IO_doallocbuf __P ((_IO_FILE *));
 296 extern void _IO_unsave_markers __P ((_IO_FILE *));
 297 extern void _IO_setb __P ((_IO_FILE *, char *, char *, int));
 298 extern unsigned _IO_adjust_column __P ((unsigned, const char *, int));
 299 #define _IO_sputn(__fp, __s, __n) _IO_XSPUTN (__fp, __s, __n)
 300
 301 /* Marker-related function. */
 302
 303 extern void _IO_init_marker __P ((struct _IO_marker *, _IO_FILE *));
 304 extern void _IO_remove_marker __P ((struct _IO_marker *));
 305 extern int _IO_marker_difference __P ((struct _IO_marker *,
 306                                        struct _IO_marker *));
 307 extern int _IO_marker_delta __P ((struct _IO_marker *));
 308 extern int _IO_seekmark __P ((_IO_FILE *, struct _IO_marker *, int));
 309
 310 /* Default jumptable functions. */
 311
 312 extern int _IO_default_underflow __P ((_IO_FILE *));
 313 extern int _IO_default_uflow __P ((_IO_FILE *));
 314 extern int _IO_default_doallocate __P ((_IO_FILE *));
 315 extern void _IO_default_finish __P ((_IO_FILE *, int));
 316 extern int _IO_default_pbackfail __P ((_IO_FILE *, int));
 317 extern _IO_FILE* _IO_default_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 318 extern _IO_size_t _IO_default_xsputn __P ((_IO_FILE *, const void *,
 319                                            _IO_size_t));
 320 extern _IO_size_t _IO_default_xsgetn __P ((_IO_FILE *, void *, _IO_size_t));
 321 extern _IO_fpos64_t _IO_default_seekoff __P ((_IO_FILE *,
 322                                               _IO_off64_t, int, int));
 323 extern _IO_fpos64_t _IO_default_seekpos __P ((_IO_FILE *,
 324                                               _IO_fpos64_t, int));
 325 extern _IO_ssize_t _IO_default_write __P ((_IO_FILE *, const void *,
 326                                            _IO_ssize_t));
 327 extern _IO_ssize_t _IO_default_read __P ((_IO_FILE *, void *, _IO_ssize_t));
 328 extern int _IO_default_stat __P ((_IO_FILE *, void *));
 329 extern _IO_fpos64_t _IO_default_seek __P ((_IO_FILE *, _IO_off64_t, int));
 330 extern int _IO_default_sync __P ((_IO_FILE *));
 331 #define _IO_default_close ((_IO_close_t) _IO_default_sync)
 332 extern int _IO_default_showmanyc __P ((_IO_FILE *));
 333 extern void _IO_default_imbue __P ((_IO_FILE *, void *));
 334
 335 extern struct _IO_jump_t _IO_file_jumps;
 336 extern struct _IO_jump_t _IO_new_file_jumps;
 337 extern struct _IO_jump_t _IO_old_file_jumps;
 338 extern struct _IO_jump_t _IO_streambuf_jumps;
 339 extern struct _IO_jump_t _IO_proc_jumps;
 340 extern struct _IO_jump_t _IO_str_jumps;
 341 extern int _IO_do_write __P ((_IO_FILE *, const char *, _IO_size_t));
 342 extern int _IO_old_do_write __P ((_IO_FILE *, const char *, _IO_size_t));
 343 extern int _IO_flush_all __P ((void));
 344 extern void _IO_cleanup __P ((void));
 345 extern void _IO_flush_all_linebuffered __P ((void));
 346
 347 #define _IO_do_flush(_f) \
 348   _IO_do_write(_f, (_f)->_IO_write_base, \
 349                (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 350 #define _IO_old_do_flush(_f) \
 351   _IO_old_do_write(_f, (_f)->_IO_write_base, \
 352                    (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 353 #define _IO_in_put_mode(_fp) ((_fp)->_flags & _IO_CURRENTLY_PUTTING)
 354 #define _IO_mask_flags(fp, f, mask) \
 355        ((fp)->_flags = ((fp)->_flags & ~(mask)) | ((f) & (mask)))
 356 #define _IO_setg(fp, eb, g, eg)  ((fp)->_IO_read_base = (eb),\
 357         (fp)->_IO_read_ptr = (g), (fp)->_IO_read_end = (eg))
 358 #define _IO_setp(__fp, __p, __ep) \
 359        ((__fp)->_IO_write_base = (__fp)->_IO_write_ptr = __p, (__fp)->_IO_write_end = (__ep))
 360 #define _IO_have_backup(fp) ((fp)->_IO_save_base != NULL)
 361 #define _IO_in_backup(fp) ((fp)->_flags & _IO_IN_BACKUP)
 362 #define _IO_have_markers(fp) ((fp)->_markers != NULL)
 363 #define _IO_blen(fp) ((fp)->_IO_buf_end - (fp)->_IO_buf_base)
 364
 365 /* Jumptable functions for files. */
 366
 367 extern int _IO_file_doallocate __P ((_IO_FILE *));
 368 extern _IO_FILE* _IO_file_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 369 extern _IO_fpos64_t _IO_file_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 370 extern _IO_size_t _IO_file_xsputn __P ((_IO_FILE *, const void *, _IO_size_t));
 371 extern int _IO_file_stat __P ((_IO_FILE *, void *));
 372 extern int _IO_file_close __P ((_IO_FILE *));
 373 extern int _IO_file_underflow __P ((_IO_FILE *));
 374 extern int _IO_file_overflow __P ((_IO_FILE *, int));
 375 #define _IO_file_is_open(__fp) ((__fp)->_fileno >= 0)
 376 extern void _IO_file_init __P ((_IO_FILE *));
 377 extern _IO_FILE* _IO_file_attach __P ((_IO_FILE *, int));
 378 extern _IO_FILE* _IO_file_open __P ((_IO_FILE *, const char *, int, int,
 379                                      int, int));
 380 extern _IO_FILE* _IO_file_fopen __P ((_IO_FILE *, const char *, const char *,
 381                                       int));
 382 extern _IO_ssize_t _IO_file_write __P ((_IO_FILE *, const void *,
 383                                         _IO_ssize_t));
 384 extern _IO_ssize_t _IO_file_read __P ((_IO_FILE *, void *, _IO_ssize_t));
 385 extern int _IO_file_sync __P ((_IO_FILE *));
 386 extern int _IO_file_close_it __P ((_IO_FILE *));
 387 extern _IO_fpos64_t _IO_file_seek __P ((_IO_FILE *, _IO_off64_t, int));
 388 extern void _IO_file_finish __P ((_IO_FILE *, int));
 389
 390 extern _IO_FILE* _IO_old_file_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 391 extern _IO_fpos64_t _IO_old_file_seekoff __P ((_IO_FILE *, _IO_off64_t, int,
 392                                                int));
 393 extern _IO_size_t _IO_old_file_xsputn __P ((_IO_FILE *, const void *,
 394                                             _IO_size_t));
 395 extern int _IO_old_file_underflow __P ((_IO_FILE *));
 396 extern int _IO_old_file_overflow __P ((_IO_FILE *, int));
 397 extern void _IO_old_file_init __P ((_IO_FILE *));
 398 extern _IO_FILE* _IO_old_file_attach __P ((_IO_FILE *, int));
 399 extern _IO_FILE* _IO_old_file_fopen __P ((_IO_FILE *, const char *,
 400                                           const char *));
 401 extern _IO_ssize_t _IO_old_file_write __P ((_IO_FILE *, const void *,
 402                                             _IO_ssize_t));
 403 extern int _IO_old_file_sync __P ((_IO_FILE *));
 404 extern int _IO_old_file_close_it __P ((_IO_FILE *));
 405 extern void _IO_old_file_finish __P ((_IO_FILE *, int));
 406
 407 /* Jumptable functions for proc_files. */
 408 extern _IO_FILE* _IO_proc_open __P ((_IO_FILE *, const char *, const char *));
 409 extern int _IO_proc_close __P ((_IO_FILE *));
 410
 411 /* Jumptable functions for strfiles. */
 412 extern int _IO_str_underflow __P ((_IO_FILE *));
 413 extern int _IO_str_overflow __P ((_IO_FILE *, int));
 414 extern int _IO_str_pbackfail __P ((_IO_FILE *, int));
 415 extern _IO_fpos64_t _IO_str_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 416 extern void _IO_str_finish __P ((_IO_FILE *, int));
 417
 418 /* Other strfile functions */
 419 extern void _IO_str_init_static __P ((_IO_FILE *, char *, int, char *));
 420 extern void _IO_str_init_readonly __P ((_IO_FILE *, const char *, int));
 421 extern _IO_ssize_t _IO_str_count __P ((_IO_FILE *));
 422
 423 extern int _IO_vasprintf __P ((char **result_ptr, __const char *format,
 424                                _IO_va_list args));
 425 extern int _IO_vdprintf __P ((int d, __const char *format, _IO_va_list arg));
 426 extern int _IO_vsnprintf __P ((char *string, _IO_size_t maxlen,
 427                                __const char *format, _IO_va_list args));
 428
 429
 430 extern _IO_size_t _IO_getline __P ((_IO_FILE *,char *, _IO_size_t, int, int));
 431 extern _IO_size_t _IO_getline_info __P ((_IO_FILE *,char *, _IO_size_t,
 432                                          int, int, int *));
 433 extern _IO_ssize_t _IO_getdelim __P ((char **, _IO_size_t *, int, _IO_FILE *));
 434 extern double _IO_strtod __P ((const char *, char **));
 435 extern char *_IO_dtoa __P ((double __d, int __mode, int __ndigits,
 436                             int *__decpt, int *__sign, char **__rve));
 437 extern int _IO_outfloat __P ((double __value, _IO_FILE *__sb, int __type,
 438                               int __width, int __precision, int __flags,
 439                               int __sign_mode, int __fill));
 440
 441 extern _IO_FILE *_IO_list_all;
 442 extern void (*_IO_cleanup_registration_needed) __P ((void));
 443
 444 #ifndef EOF
 445 # define EOF (-1)
 446 #endif
 447 #ifndef NULL
 448 # if defined __GNUG__ && \
 449     (__GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
 450 #  define NULL (__null)
 451 # else
 452 #  if !defined(__cplusplus)
 453 #   define NULL ((void*)0)
 454 #  else
 455 #   define NULL (0)
 456 #  endif
 457 # endif
 458 #endif
 459
 460 #if _G_HAVE_MMAP
 461
 462 # include <unistd.h>
 463 # include <fcntl.h>
 464 # include <sys/mman.h>
 465 # include <sys/param.h>
 466
 467 # if !defined(MAP_ANONYMOUS) && defined(MAP_ANON)
 468 #  define MAP_ANONYMOUS MAP_ANON
 469 # endif
 470
 471 # if !defined(MAP_ANONYMOUS) || !defined(EXEC_PAGESIZE)
 472 #  undef _G_HAVE_MMAP
 473 #  define _G_HAVE_MMAP 0
 474 # endif
 475
 476 #endif /* _G_HAVE_MMAP */
 477
 478 #if _G_HAVE_MMAP
 479
 480 # ifdef _LIBC
 481 /* When using this code in the GNU libc we must not pollute the name space.  */
 482 #  define mmap __mmap
 483 #  define munmap __munmap
 484 #  define ftruncate __ftruncate
 485 # endif
 486
 487 # define ROUND_TO_PAGE(_S) \
 488        (((_S) + EXEC_PAGESIZE - 1) & ~(EXEC_PAGESIZE - 1))
 489
 490 # define FREE_BUF(_B, _S) \
 491        munmap ((_B), ROUND_TO_PAGE (_S))
 492 # define ALLOC_BUF(_B, _S, _R) \
 493        do {                                                                   \
 494           (_B) = (char *) mmap (0, ROUND_TO_PAGE (_S),                        \
 495                                 PROT_READ | PROT_WRITE,                       \
 496                                 MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);          \
 497           if ((_B) == (char *) -1)                                            \
 498             return (_R);                                                      \
 499        } while (0)
 500
 501 #else /* _G_HAVE_MMAP */
 502
 503 # define FREE_BUF(_B, _S) \
 504        free(_B)
 505 # define ALLOC_BUF(_B, _S, _R) \
 506        do {                                                                   \
 507           (_B) = (char*)malloc(_S);                                           \
 508           if ((_B) == NULL)                                                   \
 509             return (_R);                                                      \
 510        } while (0)
 511
 512 #endif /* _G_HAVE_MMAP */
 513
 514 #ifndef OS_FSTAT
 515 # define OS_FSTAT fstat
 516 #endif
 517 struct stat;
 518 extern _IO_ssize_t _IO_read __P ((int, void *, _IO_size_t));
 519 extern _IO_ssize_t _IO_write __P ((int, const void *, _IO_size_t));
 520 extern _IO_off64_t _IO_lseek __P ((int, _IO_off64_t, int));
 521 extern int _IO_close __P ((int));
 522 extern int _IO_fstat __P ((int, struct stat *));
 523 extern int _IO_vscanf __P ((const char *, _IO_va_list));
 524
 525 /* Operations on _IO_fpos64_t.
 526    Normally, these are trivial, but we provide hooks for configurations
 527    where an _IO_fpos64_t is a struct.
 528    Note that _IO_off64_t must be an integral type. */
 529
 530 /* _IO_pos_BAD is an _IO_fpos64_t value indicating error, unknown, or EOF. */
 531 #ifndef _IO_pos_BAD
 532 # define _IO_pos_BAD ((_IO_fpos64_t) -1)
 533 #endif
 534 /* _IO_pos_as_off converts an _IO_fpos64_t value to an _IO_off64_t value. */
 535 #ifndef _IO_pos_as_off
 536 # define _IO_pos_as_off(__pos) ((_IO_off64_t) (__pos))
 537 #endif
 538 /* _IO_pos_adjust adjust an _IO_fpos64_t by some number of bytes. */
 539 #ifndef _IO_pos_adjust
 540 # define _IO_pos_adjust(__pos, __delta) ((__pos) += (__delta))
 541 #endif
 542 /* _IO_pos_0 is an _IO_fpos64_t value indicating beginning of file. */
 543 #ifndef _IO_pos_0
 544 # define _IO_pos_0 ((_IO_fpos64_t) 0)
 545 #endif
 546
 547 #ifdef __cplusplus
 548 }
 549 #endif
 550
 551 #ifdef _IO_MTSAFE_IO
 552 /* check following! */
 553 # define FILEBUF_LITERAL(CHAIN, FLAGS, FD) \
 554        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 555          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CHAIN, FD, \
 556            0, 0, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock }
 557 #else
 558 /* check following! */
 559 # define FILEBUF_LITERAL(CHAIN, FLAGS, FD) \
 560        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 561            0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CHAIN, FD }
 562 #endif
 563
 564 /* VTABLE_LABEL defines NAME as of the CLASS class.
 565    CNLENGTH is strlen(#CLASS).  */
 566 #ifdef __GNUC__
 567 # if _G_VTABLE_LABEL_HAS_LENGTH
 568 #  define VTABLE_LABEL(NAME, CLASS, CNLENGTH) \
 569   extern char NAME[] asm (_G_VTABLE_LABEL_PREFIX #CNLENGTH #CLASS);
 570 # else
 571 #  define VTABLE_LABEL(NAME, CLASS, CNLENGTH) \
 572   extern char NAME[] asm (_G_VTABLE_LABEL_PREFIX #CLASS);
 573 # endif
 574 #endif /* __GNUC__ */
 575
 576 #if !defined(builtinbuf_vtable) && defined(__cplusplus)
 577 # ifdef __GNUC__
 578 VTABLE_LABEL(builtinbuf_vtable, builtinbuf, 10)
 579 # else
 580 #  if _G_VTABLE_LABEL_HAS_LENGTH
 581 #   define builtinbuf_vtable _G_VTABLE_LABEL_PREFIX_ID##10builtinbuf
 582 #  else
 583 #   define builtinbuf_vtable _G_VTABLE_LABEL_PREFIX_ID##builtinbuf
 584 #  endif
 585 # endif
 586 #endif /* !defined(builtinbuf_vtable) && defined(__cplusplus) */
 587
 588 #if defined(__STDC__) || defined(__cplusplus)
 589 # define _IO_va_start(args, last) va_start(args, last)
 590 #else
 591 # define _IO_va_start(args, last) va_start(args)
 592 #endif
 593
 594 extern struct _IO_fake_stdiobuf _IO_stdin_buf, _IO_stdout_buf, _IO_stderr_buf;
 595
 596 #if 1
 597 # define COERCE_FILE(FILE) /* Nothing */
 598 #else
 599 /* This is part of the kludge for binary compatibility with old stdio. */
 600 # define COERCE_FILE(FILE) \
 601   (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) == _OLD_MAGIC_MASK \
 602     && (FILE) = *(FILE**)&((int*)fp)[1])
 603 #endif
 604
 605 #ifdef EINVAL
 606 # define MAYBE_SET_EINVAL __set_errno (EINVAL)
 607 #else
 608 # define MAYBE_SET_EINVAL /* nothing */
 609 #endif
 610
 611 #ifdef IO_DEBUG
 612 # define CHECK_FILE(FILE, RET) \
 613         if ((FILE) == NULL) { MAYBE_SET_EINVAL; return RET; } \
 614         else { COERCE_FILE(FILE); \
 615                if (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) != _IO_MAGIC) \
 616           { MAYBE_SET_EINVAL; return RET; }}
 617 #else
 618 # define CHECK_FILE(FILE, RET) COERCE_FILE (FILE)
 619 #endif