libstdc++-v3/libio/libioP.h

   1 /* Copyright (C) 1993, 1997, 1998, 1999, 2000 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
  28 #ifndef __set_errno
  29 # define __set_errno(Val) errno = (Val)
  30 #endif
  31 #if defined __GLIBC__ && __GLIBC__ >= 2
  32 # include <bits/libc-lock.h>
  33 #else
  34 /*# include <comthread.h>*/
  35 #endif
  36
  37 #include "iolibio.h"
  38
  39 #ifdef __cplusplus
  40 extern "C" {
  41 #endif
  42
  43 #define _IO_seek_set 0
  44 #define _IO_seek_cur 1
  45 #define _IO_seek_end 2
  46
  47 /* THE JUMPTABLE FUNCTIONS.
  48
  49  * The _IO_FILE type is used to implement the FILE type in GNU libc,
  50  * as well as the streambuf class in GNU iostreams for C++.
  51  * These are all the same, just used differently.
  52  * An _IO_FILE (or FILE) object is allows followed by a pointer to
  53  * a jump table (of pointers to functions).  The pointer is accessed
  54  * with the _IO_JUMPS macro.  The jump table has a eccentric format,
  55  * so as to be compatible with the layout of a C++ virtual function table.
  56  * (as implemented by g++).  When a pointer to a streambuf object is
  57  * coerced to an (_IO_FILE*), then _IO_JUMPS on the result just
  58  * happens to point to the virtual function table of the streambuf.
  59  * Thus the _IO_JUMPS function table used for C stdio/libio does
  60  * double duty as the virtual function table for C++ streambuf.
  61  *
  62  * The entries in the _IO_JUMPS function table (and hence also the
  63  * virtual functions of a streambuf) are described below.
  64  * The first parameter of each function entry is the _IO_FILE/streambuf
  65  * object being acted on (i.e. the 'this' parameter).
  66  */
  67
  68 #if (!defined _IO_USE_OLD_IO_FILE \
  69      && (!defined _G_IO_NO_BACKWARD_COMPAT || _G_IO_NO_BACKWARD_COMPAT == 0))
  70 # define _IO_JUMPS_OFFSET 1
  71 #endif
  72
  73 #define _IO_JUMPS(THIS) (THIS)->vtable
  74 #define _IO_WIDE_JUMPS(THIS) ((struct _IO_FILE *) (THIS))->_wide_data->_wide_vtable
  75 #define _IO_CHECK_WIDE(THIS) (((struct _IO_FILE *) (THIS))->_wide_data != NULL)
  76
  77 #if _IO_JUMPS_OFFSET
  78 # define _IO_JUMPS_FUNC(THIS) \
  79  (*(struct _IO_jump_t **) ((void *) &_IO_JUMPS ((struct _IO_FILE_plus *) (THIS)) \
  80                            + (THIS)->_vtable_offset))
  81 #else
  82 # define _IO_JUMPS_FUNC(THIS) _IO_JUMPS ((struct _IO_FILE_plus *) (THIS))
  83 #endif
  84 #define _IO_WIDE_JUMPS_FUNC(THIS) _IO_WIDE_JUMPS(THIS)
  85 #if _G_USING_THUNKS
  86 # define JUMP_FIELD(TYPE, NAME) TYPE NAME
  87 # define JUMP0(FUNC, THIS) _IO_JUMPS_FUNC(THIS)->FUNC (THIS)
  88 # define JUMP1(FUNC, THIS, X1) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1)
  89 # define JUMP2(FUNC, THIS, X1, X2) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1, X2)
  90 # define JUMP3(FUNC, THIS, X1,X2,X3) _IO_JUMPS_FUNC(THIS)->FUNC (THIS, X1,X2, X3)
  91 # define JUMP_INIT(NAME, VALUE) VALUE
  92 # define JUMP_INIT_DUMMY JUMP_INIT(dummy, 0), JUMP_INIT (dummy2, 0)
  93
  94 # define WJUMP0(FUNC, THIS) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC (THIS)
  95 # define WJUMP1(FUNC, THIS, X1) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC (THIS, X1)
  96 # define WJUMP2(FUNC, THIS, X1, X2) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC (THIS, X1, X2)
  97 # define WJUMP3(FUNC, THIS, X1,X2,X3) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC (THIS, X1,X2, X3)
  98 #else
  99 /* These macros will change when we re-implement vtables to use "thunks"! */
 100 # define JUMP_FIELD(TYPE, NAME) struct { short delta1, delta2; TYPE pfn; } NAME
 101 # define JUMP0(FUNC, THIS) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS)
 102 # define JUMP1(FUNC, THIS, X1) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1)
 103 # define JUMP2(FUNC, THIS, X1, X2) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1, X2)
 104 # define JUMP3(FUNC, THIS, X1,X2,X3) _IO_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1,X2,X3)
 105 # define JUMP_INIT(NAME, VALUE) {0, 0, VALUE}
 106 # define JUMP_INIT_DUMMY JUMP_INIT(dummy, 0)
 107
 108 # define WJUMP0(FUNC, THIS) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC.pfn (THIS)
 109 # define WJUMP1(FUNC, THIS, X1) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1)
 110 # define WJUMP2(FUNC, THIS, X1, X2) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1, X2)
 111 # define WJUMP3(FUNC, THIS, X1,X2,X3) _IO_WIDE_JUMPS_FUNC(THIS)->FUNC.pfn (THIS, X1,X2,X3)
 112 #endif
 113
 114 /* The 'finish' function does any final cleaning up of an _IO_FILE object.
 115    It does not delete (free) it, but does everything else to finalize it.
 116    It matches the streambuf::~streambuf virtual destructor.  */
 117 typedef void (*_IO_finish_t) __PMT ((_IO_FILE *, int)); /* finalize */
 118 #define _IO_FINISH(FP) JUMP1 (__finish, FP, 0)
 119 #define _IO_WFINISH(FP) WJUMP1 (__finish, FP, 0)
 120
 121 /* The 'overflow' hook flushes the buffer.
 122    The second argument is a character, or EOF.
 123    It matches the streambuf::overflow virtual function. */
 124 typedef int (*_IO_overflow_t) __PMT ((_IO_FILE *, int));
 125 #define _IO_OVERFLOW(FP, CH) JUMP1 (__overflow, FP, CH)
 126 #define _IO_WOVERFLOW(FP, CH) WJUMP1 (__overflow, FP, CH)
 127
 128 /* The 'underflow' hook tries to fills the get buffer.
 129    It returns the next character (as an unsigned char) or EOF.  The next
 130    character remains in the get buffer, and the get position is not changed.
 131    It matches the streambuf::underflow virtual function. */
 132 typedef int (*_IO_underflow_t) __PMT ((_IO_FILE *));
 133 #define _IO_UNDERFLOW(FP) JUMP0 (__underflow, FP)
 134 #define _IO_WUNDERFLOW(FP) WJUMP0 (__underflow, FP)
 135
 136 /* The 'uflow' hook returns the next character in the input stream
 137    (cast to unsigned char), and increments the read position;
 138    EOF is returned on failure.
 139    It matches the streambuf::uflow virtual function, which is not in the
 140    cfront implementation, but was added to C++ by the ANSI/ISO committee. */
 141 #define _IO_UFLOW(FP) JUMP0 (__uflow, FP)
 142 #define _IO_WUFLOW(FP) WJUMP0 (__uflow, FP)
 143
 144 /* The 'pbackfail' hook handles backing up.
 145    It matches the streambuf::pbackfail virtual function. */
 146 typedef int (*_IO_pbackfail_t) __PMT ((_IO_FILE *, int));
 147 #define _IO_PBACKFAIL(FP, CH) JUMP1 (__pbackfail, FP, CH)
 148 #define _IO_WPBACKFAIL(FP, CH) WJUMP1 (__pbackfail, FP, CH)
 149
 150 /* The 'xsputn' hook writes upto N characters from buffer DATA.
 151    Returns the number of character actually written.
 152    It matches the streambuf::xsputn virtual function. */
 153 typedef _IO_size_t (*_IO_xsputn_t) __PMT ((_IO_FILE *FP, const void *DATA,
 154                                            _IO_size_t N));
 155 #define _IO_XSPUTN(FP, DATA, N) JUMP2 (__xsputn, FP, DATA, N)
 156 #define _IO_WXSPUTN(FP, DATA, N) WJUMP2 (__xsputn, FP, DATA, N)
 157
 158 /* The 'xsgetn' hook reads upto N characters into buffer DATA.
 159    Returns the number of character actually read.
 160    It matches the streambuf::xsgetn virtual function. */
 161 typedef _IO_size_t (*_IO_xsgetn_t) __PMT ((_IO_FILE *FP, void *DATA,
 162                                            _IO_size_t N));
 163 #define _IO_XSGETN(FP, DATA, N) JUMP2 (__xsgetn, FP, DATA, N)
 164 #define _IO_WXSGETN(FP, DATA, N) WJUMP2 (__xsgetn, FP, DATA, N)
 165
 166 /* The 'seekoff' hook moves the stream position to a new position
 167    relative to the start of the file (if DIR==0), the current position
 168    (MODE==1), or the end of the file (MODE==2).
 169    It matches the streambuf::seekoff virtual function.
 170    It is also used for the ANSI fseek function. */
 171 typedef _IO_off64_t (*_IO_seekoff_t) __PMT ((_IO_FILE *FP, _IO_off64_t OFF,
 172                                              int DIR, int MODE));
 173 #define _IO_SEEKOFF(FP, OFF, DIR, MODE) JUMP3 (__seekoff, FP, OFF, DIR, MODE)
 174 #define _IO_WSEEKOFF(FP, OFF, DIR, MODE) WJUMP3 (__seekoff, FP, OFF, DIR, MODE)
 175
 176 /* The 'seekpos' hook also moves the stream position,
 177    but to an absolute position given by a fpos64_t (seekpos).
 178    It matches the streambuf::seekpos virtual function.
 179    It is also used for the ANSI fgetpos and fsetpos functions.  */
 180 /* The _IO_seek_cur and _IO_seek_end options are not allowed. */
 181 typedef _IO_off64_t (*_IO_seekpos_t) __PMT ((_IO_FILE *, _IO_off64_t, int));
 182 #define _IO_SEEKPOS(FP, POS, FLAGS) JUMP2 (__seekpos, FP, POS, FLAGS)
 183 #define _IO_WSEEKPOS(FP, POS, FLAGS) WJUMP2 (__seekpos, FP, POS, FLAGS)
 184
 185 /* The 'setbuf' hook gives a buffer to the file.
 186    It matches the streambuf::setbuf virtual function. */
 187 typedef _IO_FILE* (*_IO_setbuf_t) __PMT ((_IO_FILE *, char *, _IO_ssize_t));
 188 #define _IO_SETBUF(FP, BUFFER, LENGTH) JUMP2 (__setbuf, FP, BUFFER, LENGTH)
 189 #define _IO_WSETBUF(FP, BUFFER, LENGTH) WJUMP2 (__setbuf, FP, BUFFER, LENGTH)
 190
 191 /* The 'sync' hook attempts to synchronize the internal data structures
 192    of the file with the external state.
 193    It matches the streambuf::sync virtual function. */
 194 typedef int (*_IO_sync_t) __PMT ((_IO_FILE *));
 195 #define _IO_SYNC(FP) JUMP0 (__sync, FP)
 196 #define _IO_WSYNC(FP) WJUMP0 (__sync, FP)
 197
 198 /* The 'doallocate' hook is used to tell the file to allocate a buffer.
 199    It matches the streambuf::doallocate virtual function, which is not
 200    in the ANSI/ISO C++ standard, but is part traditional implementations. */
 201 typedef int (*_IO_doallocate_t) __PMT ((_IO_FILE *));
 202 #define _IO_DOALLOCATE(FP) JUMP0 (__doallocate, FP)
 203 #define _IO_WDOALLOCATE(FP) WJUMP0 (__doallocate, FP)
 204
 205 /* The following four hooks (sysread, syswrite, sysclose, sysseek, and
 206    sysstat) are low-level hooks specific to this implementation.
 207    There is no correspondence in the ANSI/ISO C++ standard library.
 208    The hooks basically correspond to the Unix system functions
 209    (read, write, close, lseek, and stat) except that a _IO_FILE*
 210    parameter is used instead of a integer file descriptor;  the default
 211    implementation used for normal files just calls those functions.
 212    The advantage of overriding these functions instead of the higher-level
 213    ones (underflow, overflow etc) is that you can leave all the buffering
 214    higher-level functions.  */
 215
 216 /* The 'sysread' hook is used to read data from the external file into
 217    an existing buffer.  It generalizes the Unix read(2) function.
 218    It matches the streambuf::sys_read virtual function, which is
 219    specific to this implementation. */
 220 typedef _IO_ssize_t (*_IO_read_t) __PMT ((_IO_FILE *, void *, _IO_ssize_t));
 221 #define _IO_SYSREAD(FP, DATA, LEN) JUMP2 (__read, FP, DATA, LEN)
 222 #define _IO_WSYSREAD(FP, DATA, LEN) WJUMP2 (__read, FP, DATA, LEN)
 223
 224 /* The 'syswrite' hook is used to write data from an existing buffer
 225    to an external file.  It generalizes the Unix write(2) function.
 226    It matches the streambuf::sys_write virtual function, which is
 227    specific to this implementation. */
 228 typedef _IO_ssize_t (*_IO_write_t) __PMT ((_IO_FILE *, const void *,
 229                                            _IO_ssize_t));
 230 #define _IO_SYSWRITE(FP, DATA, LEN) JUMP2 (__write, FP, DATA, LEN)
 231 #define _IO_WSYSWRITE(FP, DATA, LEN) WJUMP2 (__write, FP, DATA, LEN)
 232
 233 /* The 'sysseek' hook is used to re-position an external file.
 234    It generalizes the Unix lseek(2) function.
 235    It matches the streambuf::sys_seek virtual function, which is
 236    specific to this implementation. */
 237 typedef _IO_off64_t (*_IO_seek_t) __PMT ((_IO_FILE *, _IO_off64_t, int));
 238 #define _IO_SYSSEEK(FP, OFFSET, MODE) JUMP2 (__seek, FP, OFFSET, MODE)
 239 #define _IO_WSYSSEEK(FP, OFFSET, MODE) WJUMP2 (__seek, FP, OFFSET, MODE)
 240
 241 /* The 'sysclose' hook is used to finalize (close, finish up) an
 242    external file.  It generalizes the Unix close(2) function.
 243    It matches the streambuf::sys_close virtual function, which is
 244    specific to this implementation. */
 245 typedef int (*_IO_close_t) __PMT ((_IO_FILE *)); /* finalize */
 246 #define _IO_SYSCLOSE(FP) JUMP0 (__close, FP)
 247 #define _IO_WSYSCLOSE(FP) WJUMP0 (__close, FP)
 248
 249 /* The 'sysstat' hook is used to get information about an external file
 250    into a struct stat buffer.  It generalizes the Unix fstat(2) call.
 251    It matches the streambuf::sys_stat virtual function, which is
 252    specific to this implementation. */
 253 typedef int (*_IO_stat_t) __PMT ((_IO_FILE *, void *));
 254 #define _IO_SYSSTAT(FP, BUF) JUMP1 (__stat, FP, BUF)
 255 #define _IO_WSYSSTAT(FP, BUF) WJUMP1 (__stat, FP, BUF)
 256
 257 /* The 'showmany' hook can be used to get an image how much input is
 258    available.  In many cases the answer will be 0 which means unknown
 259    but some cases one can provide real information.  */
 260 typedef int (*_IO_showmanyc_t) __PMT ((_IO_FILE *));
 261 #define _IO_SHOWMANYC(FP) JUMP0 (__showmanyc, FP)
 262 #define _IO_WSHOWMANYC(FP) WJUMP0 (__showmanyc, FP)
 263
 264 /* The 'imbue' hook is used to get information about the currently
 265    installed locales.  */
 266 typedef void (*_IO_imbue_t) __PMT ((_IO_FILE *, void *));
 267 #define _IO_IMBUE(FP, LOCALE) JUMP1 (__imbue, FP, LOCALE)
 268 #define _IO_WIMBUE(FP, LOCALE) WJUMP1 (__imbue, FP, LOCALE)
 269
 270
 271 #define _IO_CHAR_TYPE char /* unsigned char ? */
 272 #define _IO_INT_TYPE int
 273
 274 struct _IO_jump_t
 275 {
 276     JUMP_FIELD(_G_size_t, __dummy);
 277 #if _G_USING_THUNKS
 278     JUMP_FIELD(_G_size_t, __dummy2);
 279 #endif
 280     JUMP_FIELD(_IO_finish_t, __finish);
 281     JUMP_FIELD(_IO_overflow_t, __overflow);
 282     JUMP_FIELD(_IO_underflow_t, __underflow);
 283     JUMP_FIELD(_IO_underflow_t, __uflow);
 284     JUMP_FIELD(_IO_pbackfail_t, __pbackfail);
 285     /* showmany */
 286     JUMP_FIELD(_IO_xsputn_t, __xsputn);
 287     JUMP_FIELD(_IO_xsgetn_t, __xsgetn);
 288     JUMP_FIELD(_IO_seekoff_t, __seekoff);
 289     JUMP_FIELD(_IO_seekpos_t, __seekpos);
 290     JUMP_FIELD(_IO_setbuf_t, __setbuf);
 291     JUMP_FIELD(_IO_sync_t, __sync);
 292     JUMP_FIELD(_IO_doallocate_t, __doallocate);
 293     JUMP_FIELD(_IO_read_t, __read);
 294     JUMP_FIELD(_IO_write_t, __write);
 295     JUMP_FIELD(_IO_seek_t, __seek);
 296     JUMP_FIELD(_IO_close_t, __close);
 297     JUMP_FIELD(_IO_stat_t, __stat);
 298     JUMP_FIELD(_IO_showmanyc_t, __showmanyc);
 299     JUMP_FIELD(_IO_imbue_t, __imbue);
 300 #if 0
 301     get_column;
 302     set_column;
 303 #endif
 304 };
 305
 306 /* We always allocate an extra word following an _IO_FILE.
 307    This contains a pointer to the function jump table used.
 308    This is for compatibility with C++ streambuf; the word can
 309    be used to smash to a pointer to a virtual function table. */
 310
 311 struct _IO_FILE_plus
 312 {
 313   _IO_FILE file;
 314   const struct _IO_jump_t *vtable;
 315 };
 316
 317 /* Special file type for fopencookie function.  */
 318 struct _IO_cookie_file
 319 {
 320   struct _IO_FILE_plus __fp;
 321   void *__cookie;
 322   _IO_cookie_io_functions_t __io_functions;
 323 };
 324
 325 /* Iterator type for walking global linked list of _IO_FILE objects. */
 326
 327 typedef struct _IO_FILE *_IO_ITER;
 328
 329 /* Generic functions */
 330
 331 extern void _IO_switch_to_main_get_area __P ((_IO_FILE *));
 332 extern void _IO_switch_to_backup_area __P ((_IO_FILE *));
 333 extern int _IO_switch_to_get_mode __P ((_IO_FILE *));
 334 extern void _IO_init __P ((_IO_FILE *, int));
 335 extern int _IO_sputbackc __P ((_IO_FILE *, int));
 336 extern int _IO_sungetc __P ((_IO_FILE *));
 337 extern void _IO_un_link __P ((struct _IO_FILE_plus *));
 338 extern void _IO_link_in __P ((struct _IO_FILE_plus *));
 339 extern void _IO_doallocbuf __P ((_IO_FILE *));
 340 extern void _IO_unsave_markers __P ((_IO_FILE *));
 341 extern void _IO_setb __P ((_IO_FILE *, char *, char *, int));
 342 extern unsigned _IO_adjust_column __P ((unsigned, const char *, int));
 343 #define _IO_sputn(__fp, __s, __n) _IO_XSPUTN (__fp, __s, __n)
 344
 345 extern void _IO_switch_to_main_wget_area __P ((_IO_FILE *));
 346 extern void _IO_switch_to_wbackup_area __P ((_IO_FILE *));
 347 extern int _IO_switch_to_wget_mode __P ((_IO_FILE *));
 348 extern void _IO_wsetb __P ((_IO_FILE *, wchar_t *, wchar_t *, int));
 349 extern wint_t _IO_sputbackwc __P ((_IO_FILE *, wint_t));
 350 extern wint_t _IO_sungetwc __P ((_IO_FILE *));
 351 extern void _IO_wdoallocbuf __P ((_IO_FILE *));
 352 extern void _IO_unsave_wmarkers __P ((_IO_FILE *));
 353 extern unsigned _IO_adjust_wcolumn __P ((unsigned, const wchar_t *, int));
 354
 355 /* Marker-related function. */
 356
 357 extern void _IO_init_marker __P ((struct _IO_marker *, _IO_FILE *));
 358 extern void _IO_init_wmarker __P ((struct _IO_marker *, _IO_FILE *));
 359 extern void _IO_remove_marker __P ((struct _IO_marker *));
 360 extern int _IO_marker_difference __P ((struct _IO_marker *,
 361                                        struct _IO_marker *));
 362 extern int _IO_marker_delta __P ((struct _IO_marker *));
 363 extern int _IO_wmarker_delta __P ((struct _IO_marker *));
 364 extern int _IO_seekmark __P ((_IO_FILE *, struct _IO_marker *, int));
 365 extern int _IO_seekwmark __P ((_IO_FILE *, struct _IO_marker *, int));
 366
 367 /* Functions for iterating global list and dealing with
 368    its lock */
 369
 370 extern _IO_ITER _IO_iter_begin __P ((void));
 371 extern _IO_ITER _IO_iter_end __P ((void));
 372 extern _IO_ITER _IO_iter_next __P ((_IO_ITER));
 373 extern _IO_FILE *_IO_iter_file __P ((_IO_ITER));
 374 extern void _IO_list_lock __P ((void));
 375 extern void _IO_list_unlock __P ((void));
 376 extern void _IO_list_resetlock __P ((void));
 377
 378 /* Default jumptable functions. */
 379
 380 extern int _IO_default_underflow __P ((_IO_FILE *));
 381 extern int _IO_default_uflow __P ((_IO_FILE *));
 382 extern wint_t _IO_wdefault_uflow __P ((_IO_FILE *));
 383 extern int _IO_default_doallocate __P ((_IO_FILE *));
 384 extern int _IO_wdefault_doallocate __P ((_IO_FILE *));
 385 extern void _IO_default_finish __P ((_IO_FILE *, int));
 386 extern void _IO_wdefault_finish __P ((_IO_FILE *, int));
 387 extern int _IO_default_pbackfail __P ((_IO_FILE *, int));
 388 extern wint_t _IO_wdefault_pbackfail __P ((_IO_FILE *, wint_t));
 389 extern _IO_FILE* _IO_default_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 390 extern _IO_FILE* _IO_wdefault_setbuf __P ((_IO_FILE *, wchar_t *,
 391                                            _IO_ssize_t));
 392 extern _IO_size_t _IO_default_xsputn __P ((_IO_FILE *, const void *,
 393                                            _IO_size_t));
 394 extern _IO_size_t _IO_wdefault_xsputn __P ((_IO_FILE *, const void *,
 395                                             _IO_size_t));
 396 extern _IO_size_t _IO_default_xsgetn __P ((_IO_FILE *, void *, _IO_size_t));
 397 extern _IO_size_t _IO_wdefault_xsgetn __P ((_IO_FILE *, void *, _IO_size_t));
 398 extern _IO_off64_t _IO_default_seekoff __P ((_IO_FILE *,
 399                                              _IO_off64_t, int, int));
 400 extern _IO_off64_t _IO_default_seekpos __P ((_IO_FILE *, _IO_off64_t, int));
 401 extern _IO_ssize_t _IO_default_write __P ((_IO_FILE *, const void *,
 402                                            _IO_ssize_t));
 403 extern _IO_ssize_t _IO_default_read __P ((_IO_FILE *, void *, _IO_ssize_t));
 404 extern int _IO_default_stat __P ((_IO_FILE *, void *));
 405 extern _IO_off64_t _IO_default_seek __P ((_IO_FILE *, _IO_off64_t, int));
 406 extern int _IO_default_sync __P ((_IO_FILE *));
 407 #define _IO_default_close ((_IO_close_t) _IO_default_sync)
 408 extern int _IO_default_showmanyc __P ((_IO_FILE *));
 409 extern void _IO_default_imbue __P ((_IO_FILE *, void *));
 410
 411 extern struct _IO_jump_t _IO_file_jumps;
 412 extern struct _IO_jump_t _IO_wfile_jumps;
 413 extern struct _IO_jump_t _IO_old_file_jumps;
 414 extern struct _IO_jump_t _IO_streambuf_jumps;
 415 extern struct _IO_jump_t _IO_proc_jumps;
 416 extern struct _IO_jump_t _IO_old_proc_jumps;
 417 extern struct _IO_jump_t _IO_str_jumps;
 418 extern struct _IO_jump_t _IO_wstr_jumps;
 419 extern struct _IO_codecvt __libio_codecvt;
 420 extern int _IO_do_write __P ((_IO_FILE *, const char *, _IO_size_t));
 421 extern int _IO_new_do_write __P ((_IO_FILE *, const char *, _IO_size_t));
 422 extern int _IO_old_do_write __P ((_IO_FILE *, const char *, _IO_size_t));
 423 extern int _IO_wdo_write __P ((_IO_FILE *, const wchar_t *, _IO_size_t));
 424 extern int _IO_flush_all __P ((void));
 425 extern int _IO_cleanup __P ((void));
 426 extern void _IO_flush_all_linebuffered __P ((void));
 427 extern int _IO_new_fgetpos __P ((_IO_FILE *, _IO_fpos_t *));
 428 extern int _IO_old_fgetpos __P ((_IO_FILE *, _IO_fpos_t *));
 429 extern int _IO_new_fsetpos __P ((_IO_FILE *, const _IO_fpos_t *));
 430 extern int _IO_old_fsetpos __P ((_IO_FILE *, const _IO_fpos_t *));
 431 extern int _IO_new_fgetpos64 __P ((_IO_FILE *, _IO_fpos64_t *));
 432 extern int _IO_old_fgetpos64 __P ((_IO_FILE *, _IO_fpos64_t *));
 433 extern int _IO_new_fsetpos64 __P ((_IO_FILE *, const _IO_fpos64_t *));
 434 extern int _IO_old_fsetpos64 __P ((_IO_FILE *, const _IO_fpos64_t *));
 435
 436
 437 #if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 438 # define _IO_do_flush(_f) \
 439   ((_f)->_mode <= 0                                                           \
 440    ? _IO_do_write(_f, (_f)->_IO_write_base,                                   \
 441                   (_f)->_IO_write_ptr-(_f)->_IO_write_base)                   \
 442    : _IO_wdo_write(_f, (_f)->_wide_data->_IO_write_base,                      \
 443                    ((_f)->_wide_data->_IO_write_ptr                           \
 444                     - (_f)->_wide_data->_IO_write_base)))
 445 #else
 446 # define _IO_do_flush(_f) \
 447    _IO_do_write(_f, (_f)->_IO_write_base,                                     \
 448                 (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 449 #endif
 450 #define _IO_old_do_flush(_f) \
 451   _IO_old_do_write(_f, (_f)->_IO_write_base, \
 452                    (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 453 #define _IO_in_put_mode(_fp) ((_fp)->_flags & _IO_CURRENTLY_PUTTING)
 454 #define _IO_mask_flags(fp, f, mask) \
 455        ((fp)->_flags = ((fp)->_flags & ~(mask)) | ((f) & (mask)))
 456 #define _IO_setg(fp, eb, g, eg)  ((fp)->_IO_read_base = (eb),\
 457         (fp)->_IO_read_ptr = (g), (fp)->_IO_read_end = (eg))
 458 #define _IO_wsetg(fp, eb, g, eg)  ((fp)->_wide_data->_IO_read_base = (eb),\
 459         (fp)->_wide_data->_IO_read_ptr = (g), \
 460         (fp)->_wide_data->_IO_read_end = (eg))
 461 #define _IO_setp(__fp, __p, __ep) \
 462        ((__fp)->_IO_write_base = (__fp)->_IO_write_ptr \
 463         = __p, (__fp)->_IO_write_end = (__ep))
 464 #define _IO_wsetp(__fp, __p, __ep) \
 465        ((__fp)->_wide_data->_IO_write_base \
 466         = (__fp)->_wide_data->_IO_write_ptr = __p, \
 467         (__fp)->_wide_data->_IO_write_end = (__ep))
 468 #define _IO_have_backup(fp) ((fp)->_IO_save_base != NULL)
 469 #define _IO_have_wbackup(fp) ((fp)->_wide_data->_IO_save_base != NULL)
 470 #define _IO_in_backup(fp) ((fp)->_flags & _IO_IN_BACKUP)
 471 #define _IO_have_markers(fp) ((fp)->_markers != NULL)
 472 #define _IO_blen(fp) ((fp)->_IO_buf_end - (fp)->_IO_buf_base)
 473 #define _IO_wblen(fp) ((fp)->_wide_data->_IO_buf_end \
 474                        - (fp)->_wide_data->_IO_buf_base)
 475
 476 /* Jumptable functions for files. */
 477
 478 extern int _IO_file_doallocate __P ((_IO_FILE *));
 479 extern _IO_FILE* _IO_file_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 480 extern _IO_off64_t _IO_file_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 481 extern _IO_size_t _IO_file_xsputn __P ((_IO_FILE *, const void *, _IO_size_t));
 482 extern _IO_size_t _IO_file_xsgetn __P ((_IO_FILE *, void *, _IO_size_t));
 483 extern int _IO_file_stat __P ((_IO_FILE *, void *));
 484 extern int _IO_file_close __P ((_IO_FILE *));
 485 extern int _IO_file_underflow __P ((_IO_FILE *));
 486 extern int _IO_file_overflow __P ((_IO_FILE *, int));
 487 #define _IO_file_is_open(__fp) ((__fp)->_fileno != -1)
 488 extern void _IO_file_init __P ((struct _IO_FILE_plus *));
 489 extern _IO_FILE* _IO_file_attach __P ((_IO_FILE *, int));
 490 extern _IO_FILE* _IO_file_open __P ((_IO_FILE *, const char *, int, int,
 491                                      int, int));
 492 extern _IO_FILE* _IO_file_fopen __P ((_IO_FILE *, const char *, const char *,
 493                                       int));
 494 extern _IO_ssize_t _IO_file_write __P ((_IO_FILE *, const void *,
 495                                         _IO_ssize_t));
 496 extern _IO_ssize_t _IO_file_read __P ((_IO_FILE *, void *, _IO_ssize_t));
 497 extern int _IO_file_sync __P ((_IO_FILE *));
 498 extern int _IO_file_close_it __P ((_IO_FILE *));
 499 extern _IO_off64_t _IO_file_seek __P ((_IO_FILE *, _IO_off64_t, int));
 500 extern void _IO_file_finish __P ((_IO_FILE *, int));
 501
 502 extern _IO_FILE* _IO_new_file_attach __P ((_IO_FILE *, int));
 503 extern int _IO_new_file_close_it __P ((_IO_FILE *));
 504 extern void _IO_new_file_finish __P ((_IO_FILE *, int));
 505 extern _IO_FILE* _IO_new_file_fopen __P ((_IO_FILE *, const char *, const char *,
 506                                           int));
 507 extern void _IO_no_init __P ((_IO_FILE *, int, int, struct _IO_wide_data *,
 508                               struct _IO_jump_t *));
 509 extern void _IO_new_file_init __P ((struct _IO_FILE_plus *));
 510 extern _IO_FILE* _IO_new_file_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 511 extern int _IO_new_file_sync __P ((_IO_FILE *));
 512 extern int _IO_new_file_underflow __P ((_IO_FILE *));
 513 extern int _IO_new_file_overflow __P ((_IO_FILE *, int));
 514 extern _IO_off64_t _IO_new_file_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 515 extern _IO_ssize_t _IO_new_file_write __P ((_IO_FILE *, const void *,
 516                                             _IO_ssize_t));
 517 extern _IO_size_t _IO_new_file_xsputn __P ((_IO_FILE *, const void *, _IO_size_t));
 518
 519 extern _IO_FILE* _IO_old_file_setbuf __P ((_IO_FILE *, char *, _IO_ssize_t));
 520 extern _IO_off64_t _IO_old_file_seekoff __P ((_IO_FILE *, _IO_off64_t, int,
 521                                               int));
 522 extern _IO_size_t _IO_old_file_xsputn __P ((_IO_FILE *, const void *,
 523                                             _IO_size_t));
 524 extern int _IO_old_file_underflow __P ((_IO_FILE *));
 525 extern int _IO_old_file_overflow __P ((_IO_FILE *, int));
 526 extern void _IO_old_file_init __P ((struct _IO_FILE_plus *));
 527 extern _IO_FILE* _IO_old_file_attach __P ((_IO_FILE *, int));
 528 extern _IO_FILE* _IO_old_file_fopen __P ((_IO_FILE *, const char *,
 529                                           const char *));
 530 extern _IO_ssize_t _IO_old_file_write __P ((_IO_FILE *, const void *,
 531                                             _IO_ssize_t));
 532 extern int _IO_old_file_sync __P ((_IO_FILE *));
 533 extern int _IO_old_file_close_it __P ((_IO_FILE *));
 534 extern void _IO_old_file_finish __P ((_IO_FILE *, int));
 535
 536 extern int _IO_wfile_doallocate __P ((_IO_FILE *));
 537 extern _IO_size_t _IO_wfile_xsputn __P ((_IO_FILE *, const void *,
 538                                          _IO_size_t));
 539 extern _IO_FILE* _IO_wfile_setbuf __P ((_IO_FILE *, wchar_t *, _IO_ssize_t));
 540 extern wint_t _IO_wfile_sync __P ((_IO_FILE *));
 541 extern wint_t _IO_wfile_underflow __P ((_IO_FILE *));
 542 extern wint_t _IO_wfile_overflow __P ((_IO_FILE *, wint_t));
 543 extern _IO_off64_t _IO_wfile_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 544
 545 /* Jumptable functions for proc_files. */
 546 extern _IO_FILE* _IO_proc_open __P ((_IO_FILE *, const char *, const char *));
 547 extern _IO_FILE* _IO_new_proc_open __P ((_IO_FILE *, const char *, const char *));
 548 extern _IO_FILE* _IO_old_proc_open __P ((_IO_FILE *, const char *, const char *));
 549 extern int _IO_proc_close __P ((_IO_FILE *));
 550 extern int _IO_new_proc_close __P ((_IO_FILE *));
 551 extern int _IO_old_proc_close __P ((_IO_FILE *));
 552
 553 /* Jumptable functions for strfiles. */
 554 extern int _IO_str_underflow __P ((_IO_FILE *));
 555 extern int _IO_str_overflow __P ((_IO_FILE *, int));
 556 extern int _IO_str_pbackfail __P ((_IO_FILE *, int));
 557 extern _IO_off64_t _IO_str_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 558 extern void _IO_str_finish __P ((_IO_FILE *, int));
 559
 560 /* Other strfile functions */
 561 struct _IO_strfile_;
 562 extern void _IO_str_init_static __P ((struct _IO_strfile_ *, char *, int, char *));
 563 extern void _IO_str_init_readonly __P ((struct _IO_strfile_ *, const char *, int));
 564 extern _IO_ssize_t _IO_str_count __P ((_IO_FILE *));
 565
 566 /* And the wide character versions.  */
 567 extern void _IO_wstr_init_static __P ((_IO_FILE *, wchar_t *, int, wchar_t *));
 568 extern void _IO_wstr_init_readonly __P ((_IO_FILE *, const char *, int));
 569 extern _IO_ssize_t _IO_wstr_count __P ((_IO_FILE *));
 570 extern _IO_wint_t _IO_wstr_overflow __P ((_IO_FILE *, _IO_wint_t));
 571 extern _IO_wint_t _IO_wstr_underflow __P ((_IO_FILE *));
 572 extern _IO_off64_t _IO_wstr_seekoff __P ((_IO_FILE *, _IO_off64_t, int, int));
 573 extern _IO_wint_t _IO_wstr_pbackfail __P ((_IO_FILE *, _IO_wint_t));
 574 extern void _IO_wstr_finish __P ((_IO_FILE *, int));
 575
 576 extern int _IO_vasprintf __P ((char **result_ptr, __const char *format,
 577                                _IO_va_list args));
 578 extern int _IO_vdprintf __P ((int d, __const char *format, _IO_va_list arg));
 579 extern int _IO_vsnprintf __P ((char *string, _IO_size_t maxlen,
 580                                __const char *format, _IO_va_list args));
 581
 582
 583 extern _IO_size_t _IO_getline __P ((_IO_FILE *,char *, _IO_size_t, int, int));
 584 extern _IO_size_t _IO_getline_info __P ((_IO_FILE *,char *, _IO_size_t,
 585                                          int, int, int *));
 586 extern _IO_ssize_t _IO_getdelim __P ((char **, _IO_size_t *, int, _IO_FILE *));
 587 extern _IO_size_t _IO_getwline __P ((_IO_FILE *,wchar_t *, _IO_size_t, wint_t,
 588                                      int));
 589 extern _IO_size_t _IO_getwline_info __P ((_IO_FILE *,wchar_t *, _IO_size_t,
 590                                           wint_t, int, wint_t *));
 591 extern double _IO_strtod __P ((const char *, char **));
 592 extern char *_IO_dtoa __P ((double __d, int __mode, int __ndigits,
 593                             int *__decpt, int *__sign, char **__rve));
 594 extern int _IO_outfloat __P ((double __value, _IO_FILE *__sb, int __type,
 595                               int __width, int __precision, int __flags,
 596                               int __sign_mode, int __fill));
 597
 598 extern struct _IO_FILE_plus *_IO_list_all;
 599 extern void (*_IO_cleanup_registration_needed) __PMT ((void));
 600
 601 #ifndef EOF
 602 # define EOF (-1)
 603 #endif
 604 #ifndef NULL
 605 # if defined __GNUG__ && \
 606     (__GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
 607 #  define NULL (__null)
 608 # else
 609 #  if !defined(__cplusplus)
 610 #   define NULL ((void*)0)
 611 #  else
 612 #   define NULL (0)
 613 #  endif
 614 # endif
 615 #endif
 616
 617 #if _G_HAVE_MMAP
 618
 619 #ifdef __cplusplus
 620 }
 621 #endif
 622
 623 # include <unistd.h>
 624 # include <fcntl.h>
 625 # include <sys/mman.h>
 626 # include <sys/param.h>
 627
 628 #ifdef __cplusplus
 629 extern "C" {
 630 #endif
 631
 632 # if !defined(MAP_ANONYMOUS) && defined(MAP_ANON)
 633 #  define MAP_ANONYMOUS MAP_ANON
 634 # endif
 635
 636 # if !defined(MAP_ANONYMOUS) || !defined(EXEC_PAGESIZE)
 637 #  undef _G_HAVE_MMAP
 638 #  define _G_HAVE_MMAP 0
 639 # endif
 640
 641 #endif /* _G_HAVE_MMAP */
 642
 643 #if _G_HAVE_MMAP
 644
 645 # ifdef _LIBC
 646 /* When using this code in the GNU libc we must not pollute the name space.  */
 647 #  define mmap __mmap
 648 #  define munmap __munmap
 649 #  define ftruncate __ftruncate
 650 # endif
 651
 652 # define ROUND_TO_PAGE(_S) \
 653        (((_S) + EXEC_PAGESIZE - 1) & ~(EXEC_PAGESIZE - 1))
 654
 655 # define FREE_BUF(_B, _S) \
 656        munmap ((_B), ROUND_TO_PAGE (_S))
 657 # define ALLOC_BUF(_B, _S, _R) \
 658        do {                                                                   \
 659           (_B) = (char *) mmap (0, ROUND_TO_PAGE (_S),                        \
 660                                 PROT_READ | PROT_WRITE,                       \
 661                                 MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);          \
 662           if ((_B) == (char *) MAP_FAILED)                                    \
 663             return (_R);                                                      \
 664        } while (0)
 665 # define ALLOC_WBUF(_B, _S, _R) \
 666        do {                                                                   \
 667           (_B) = (wchar_t *) mmap (0, ROUND_TO_PAGE (_S),                     \
 668                                    PROT_READ | PROT_WRITE,                    \
 669                                    MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);       \
 670           if ((_B) == (wchar_t *) MAP_FAILED)                                 \
 671             return (_R);                                                      \
 672        } while (0)
 673
 674 #else /* _G_HAVE_MMAP */
 675
 676 # define FREE_BUF(_B, _S) \
 677        free(_B)
 678 # define ALLOC_BUF(_B, _S, _R) \
 679        do {                                                                   \
 680           (_B) = (char*)malloc(_S);                                           \
 681           if ((_B) == NULL)                                                   \
 682             return (_R);                                                      \
 683        } while (0)
 684 # define ALLOC_WBUF(_B, _S, _R) \
 685        do {                                                                   \
 686           (_B) = (wchar_t *)malloc(_S);                                       \
 687           if ((_B) == NULL)                                                   \
 688             return (_R);                                                      \
 689        } while (0)
 690
 691 #endif /* _G_HAVE_MMAP */
 692
 693 #ifndef OS_FSTAT
 694 # define OS_FSTAT fstat
 695 #endif
 696 struct stat;
 697 extern _IO_ssize_t _IO_read __P ((int, void *, _IO_size_t));
 698 extern _IO_ssize_t _IO_write __P ((int, const void *, _IO_size_t));
 699 extern _IO_off64_t _IO_lseek __P ((int, _IO_off64_t, int));
 700 extern int _IO_close __P ((int));
 701 extern int _IO_fstat __P ((int, struct stat *));
 702 extern int _IO_vscanf __P ((const char *, _IO_va_list));
 703
 704 /* _IO_pos_BAD is an _IO_off64_t value indicating error, unknown, or EOF. */
 705 #ifndef _IO_pos_BAD
 706 # define _IO_pos_BAD ((_IO_off64_t) -1)
 707 #endif
 708 /* _IO_pos_adjust adjust an _IO_off64_t by some number of bytes. */
 709 #ifndef _IO_pos_adjust
 710 # define _IO_pos_adjust(pos, delta) ((pos) += (delta))
 711 #endif
 712 /* _IO_pos_0 is an _IO_off64_t value indicating beginning of file. */
 713 #ifndef _IO_pos_0
 714 # define _IO_pos_0 ((_IO_off64_t) 0)
 715 #endif
 716
 717 #ifdef __cplusplus
 718 }
 719 #endif
 720
 721 #ifdef _IO_MTSAFE_IO
 722 /* check following! */
 723 # ifdef _IO_USE_OLD_IO_FILE
 724 #  define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 725        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 726          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 727          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock }
 728 # else
 729 #  if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 730 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 731        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 732          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 733          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock, _IO_pos_BAD,\
 734          NULL, WDP, 0 }
 735 #  else
 736 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 737        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 738          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 739          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock, _IO_pos_BAD,\
 740          0 }
 741 #  endif
 742 # endif
 743 #else
 744 # ifdef _IO_USE_OLD_IO_FILE
 745 #  define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 746        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 747          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 748          0, _IO_pos_BAD }
 749 # else
 750 #  if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 751 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 752        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 753          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 754          0, _IO_pos_BAD, 0, 0, { 0 }, 0, _IO_pos_BAD, \
 755          NULL, WDP, 0 }
 756 #  else
 757 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 758        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 759          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 760          0, _IO_pos_BAD, 0, 0, { 0 }, 0, _IO_pos_BAD, \
 761          0 }
 762 #  endif
 763 # endif
 764 #endif
 765
 766 /* VTABLE_LABEL defines NAME as of the CLASS class.
 767    CNLENGTH is strlen(#CLASS).  */
 768 #ifdef __GNUC__
 769 # if _G_VTABLE_LABEL_HAS_LENGTH
 770 #  define VTABLE_LABEL(NAME, CLASS, CNLENGTH) \
 771   extern char NAME[] asm (_G_VTABLE_LABEL_PREFIX #CNLENGTH #CLASS);
 772 # else
 773 #  define VTABLE_LABEL(NAME, CLASS, CNLENGTH) \
 774   extern char NAME[] asm (_G_VTABLE_LABEL_PREFIX #CLASS);
 775 # endif
 776 #endif /* __GNUC__ */
 777
 778 #if !defined(builtinbuf_vtable) && defined(__cplusplus)
 779 # ifdef __GNUC__
 780 VTABLE_LABEL(builtinbuf_vtable, builtinbuf, 10)
 781 # else
 782 #  if _G_VTABLE_LABEL_HAS_LENGTH
 783 #   define builtinbuf_vtable _G_VTABLE_LABEL_PREFIX_ID##10builtinbuf
 784 #  else
 785 #   define builtinbuf_vtable _G_VTABLE_LABEL_PREFIX_ID##builtinbuf
 786 #  endif
 787 # endif
 788 #endif /* !defined(builtinbuf_vtable) && defined(__cplusplus) */
 789
 790 #if defined(__STDC__) || defined(__cplusplus)
 791 # define _IO_va_start(args, last) va_start(args, last)
 792 #else
 793 # define _IO_va_start(args, last) va_start(args)
 794 #endif
 795
 796 extern struct _IO_fake_stdiobuf _IO_stdin_buf, _IO_stdout_buf, _IO_stderr_buf;
 797
 798 #if 1
 799 # define COERCE_FILE(FILE) /* Nothing */
 800 #else
 801 /* This is part of the kludge for binary compatibility with old stdio. */
 802 # define COERCE_FILE(FILE) \
 803   (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) == _OLD_MAGIC_MASK \
 804     && (FILE) = *(FILE**)&((int*)fp)[1])
 805 #endif
 806
 807 #ifdef EINVAL
 808 # define MAYBE_SET_EINVAL __set_errno (EINVAL)
 809 #else
 810 # define MAYBE_SET_EINVAL /* nothing */
 811 #endif
 812
 813 #ifdef IO_DEBUG
 814 # define CHECK_FILE(FILE, RET) \
 815         if ((FILE) == NULL) { MAYBE_SET_EINVAL; return RET; } \
 816         else { COERCE_FILE(FILE); \
 817                if (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) != _IO_MAGIC) \
 818           { MAYBE_SET_EINVAL; return RET; }}
 819 #else
 820 # define CHECK_FILE(FILE, RET) COERCE_FILE (FILE)
 821 #endif