libio/libioP.h

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