libio/libioP.h

   1 /* Copyright (C) 1993-2016 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, see
  16    <http://www.gnu.org/licenses/>.
  17
  18    As a special exception, if you link the code in this file with
  19    files compiled with a GNU compiler to produce an executable,
  20    that does not cause the resulting executable to be covered by
  21    the GNU Lesser General Public License.  This exception does not
  22    however invalidate any other reasons why the executable file
  23    might be covered by the GNU Lesser General Public License.
  24    This exception applies to code released by its copyright holders
  25    in files containing the exception.  */
  26
  27 /* NOTE: libio is now exclusively used only by glibc since libstdc++ has its
  28    own implementation.  As a result, functions that were implemented for C++
  29    (like *sputn) may no longer have C++ semantics.  This is of course only
  30    relevant for internal callers of these functions since these functions are
  31    not intended for external use otherwise.
  32
  33    FIXME: All of the C++ cruft eventually needs to go away.  */
  34
  35 #include <stddef.h>
  36
  37 #include <errno.h>
  38 #ifndef __set_errno
  39 # define __set_errno(Val) errno = (Val)
  40 #endif
  41 #if defined __GLIBC__ && __GLIBC__ >= 2
  42 # include <libc-lock.h>
  43 #else
  44 /*# include <comthread.h>*/
  45 #endif
  46
  47 #include <math_ldbl_opt.h>
  48
  49 #include "iolibio.h"
  50
  51 /* Control of exported symbols.  Used in glibc.  By default we don't
  52    do anything.  */
  53 #ifndef libc_hidden_proto
  54 # define libc_hidden_proto(name)
  55 #endif
  56 #ifndef libc_hidden_def
  57 # define libc_hidden_def(name)
  58 #endif
  59 #ifndef libc_hidden_weak
  60 # define libc_hidden_weak(name)
  61 #endif
  62
  63 #ifdef __cplusplus
  64 extern "C" {
  65 #endif
  66
  67 #define _IO_seek_set 0
  68 #define _IO_seek_cur 1
  69 #define _IO_seek_end 2
  70
  71 /* THE JUMPTABLE FUNCTIONS.
  72
  73  * The _IO_FILE type is used to implement the FILE type in GNU libc,
  74  * as well as the streambuf class in GNU iostreams for C++.
  75  * These are all the same, just used differently.
  76  * An _IO_FILE (or FILE) object is allows followed by a pointer to
  77  * a jump table (of pointers to functions).  The pointer is accessed
  78  * with the _IO_JUMPS macro.  The jump table has an eccentric format,
  79  * so as to be compatible with the layout of a C++ virtual function table.
  80  * (as implemented by g++).  When a pointer to a streambuf object is
  81  * coerced to an (_IO_FILE*), then _IO_JUMPS on the result just
  82  * happens to point to the virtual function table of the streambuf.
  83  * Thus the _IO_JUMPS function table used for C stdio/libio does
  84  * double duty as the virtual function table for C++ streambuf.
  85  *
  86  * The entries in the _IO_JUMPS function table (and hence also the
  87  * virtual functions of a streambuf) are described below.
  88  * The first parameter of each function entry is the _IO_FILE/streambuf
  89  * object being acted on (i.e. the 'this' parameter).
  90  */
  91
  92 #ifdef _LIBC
  93 # include <shlib-compat.h>
  94 # if !SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_1)
  95    /* Setting this macro disables the use of the _vtable_offset
  96       bias in _IO_JUMPS_FUNCS, below.  That is only needed if we
  97       want to support old binaries (see oldfileops.c).  */
  98 #  define _G_IO_NO_BACKWARD_COMPAT 1
  99 # endif
 100 #endif
 101
 102 #if (!defined _IO_USE_OLD_IO_FILE \
 103      && (!defined _G_IO_NO_BACKWARD_COMPAT || _G_IO_NO_BACKWARD_COMPAT == 0))
 104 # define _IO_JUMPS_OFFSET 1
 105 #else
 106 # define _IO_JUMPS_OFFSET 0
 107 #endif
 108
 109 /* Type of MEMBER in struct type TYPE.  */
 110 #define _IO_MEMBER_TYPE(TYPE, MEMBER) __typeof__ (((TYPE){}).MEMBER)
 111
 112 /* Essentially ((TYPE *) THIS)->MEMBER, but avoiding the aliasing
 113    violation in case THIS has a different pointer type.  */
 114 #define _IO_CAST_FIELD_ACCESS(THIS, TYPE, MEMBER) \
 115   (*(_IO_MEMBER_TYPE (TYPE, MEMBER) *)(((char *) (THIS)) \
 116                                        + offsetof(TYPE, MEMBER)))
 117
 118 #define _IO_JUMPS(THIS) (THIS)->vtable
 119 #define _IO_JUMPS_FILE_plus(THIS) \
 120   _IO_CAST_FIELD_ACCESS ((THIS), struct _IO_FILE_plus, vtable)
 121 #define _IO_WIDE_JUMPS(THIS) \
 122   _IO_CAST_FIELD_ACCESS ((THIS), struct _IO_FILE, _wide_data)->_wide_vtable
 123 #define _IO_CHECK_WIDE(THIS) \
 124   (_IO_CAST_FIELD_ACCESS ((THIS), struct _IO_FILE, _wide_data) != NULL)
 125
 126 #if _IO_JUMPS_OFFSET
 127 # define _IO_JUMPS_FUNC(THIS) \
 128   (IO_validate_vtable                                                   \
 129    (*(struct _IO_jump_t **) ((void *) &_IO_JUMPS_FILE_plus (THIS)       \
 130                              + (THIS)->_vtable_offset)))
 131 # define _IO_vtable_offset(THIS) (THIS)->_vtable_offset
 132 #else
 133 # define _IO_JUMPS_FUNC(THIS) (IO_validate_vtable (_IO_JUMPS_FILE_plus (THIS)))
 134 # define _IO_vtable_offset(THIS) 0
 135 #endif
 136 #define _IO_WIDE_JUMPS_FUNC(THIS) _IO_WIDE_JUMPS(THIS)
 137 #define JUMP_FIELD(TYPE, NAME) TYPE NAME
 138 #define JUMP0(FUNC, THIS) (_IO_JUMPS_FUNC(THIS)->FUNC) (THIS)
 139 #define JUMP1(FUNC, THIS, X1) (_IO_JUMPS_FUNC(THIS)->FUNC) (THIS, X1)
 140 #define JUMP2(FUNC, THIS, X1, X2) (_IO_JUMPS_FUNC(THIS)->FUNC) (THIS, X1, X2)
 141 #define JUMP3(FUNC, THIS, X1,X2,X3) (_IO_JUMPS_FUNC(THIS)->FUNC) (THIS, X1,X2, X3)
 142 #define JUMP_INIT(NAME, VALUE) VALUE
 143 #define JUMP_INIT_DUMMY JUMP_INIT(dummy, 0), JUMP_INIT (dummy2, 0)
 144
 145 #define WJUMP0(FUNC, THIS) (_IO_WIDE_JUMPS_FUNC(THIS)->FUNC) (THIS)
 146 #define WJUMP1(FUNC, THIS, X1) (_IO_WIDE_JUMPS_FUNC(THIS)->FUNC) (THIS, X1)
 147 #define WJUMP2(FUNC, THIS, X1, X2) (_IO_WIDE_JUMPS_FUNC(THIS)->FUNC) (THIS, X1, X2)
 148 #define WJUMP3(FUNC, THIS, X1,X2,X3) (_IO_WIDE_JUMPS_FUNC(THIS)->FUNC) (THIS, X1,X2, X3)
 149
 150 /* The 'finish' function does any final cleaning up of an _IO_FILE object.
 151    It does not delete (free) it, but does everything else to finalize it.
 152    It matches the streambuf::~streambuf virtual destructor.  */
 153 typedef void (*_IO_finish_t) (_IO_FILE *, int); /* finalize */
 154 #define _IO_FINISH(FP) JUMP1 (__finish, FP, 0)
 155 #define _IO_WFINISH(FP) WJUMP1 (__finish, FP, 0)
 156
 157 /* The 'overflow' hook flushes the buffer.
 158    The second argument is a character, or EOF.
 159    It matches the streambuf::overflow virtual function. */
 160 typedef int (*_IO_overflow_t) (_IO_FILE *, int);
 161 #define _IO_OVERFLOW(FP, CH) JUMP1 (__overflow, FP, CH)
 162 #define _IO_WOVERFLOW(FP, CH) WJUMP1 (__overflow, FP, CH)
 163
 164 /* The 'underflow' hook tries to fills the get buffer.
 165    It returns the next character (as an unsigned char) or EOF.  The next
 166    character remains in the get buffer, and the get position is not changed.
 167    It matches the streambuf::underflow virtual function. */
 168 typedef int (*_IO_underflow_t) (_IO_FILE *);
 169 #define _IO_UNDERFLOW(FP) JUMP0 (__underflow, FP)
 170 #define _IO_WUNDERFLOW(FP) WJUMP0 (__underflow, FP)
 171
 172 /* The 'uflow' hook returns the next character in the input stream
 173    (cast to unsigned char), and increments the read position;
 174    EOF is returned on failure.
 175    It matches the streambuf::uflow virtual function, which is not in the
 176    cfront implementation, but was added to C++ by the ANSI/ISO committee. */
 177 #define _IO_UFLOW(FP) JUMP0 (__uflow, FP)
 178 #define _IO_WUFLOW(FP) WJUMP0 (__uflow, FP)
 179
 180 /* The 'pbackfail' hook handles backing up.
 181    It matches the streambuf::pbackfail virtual function. */
 182 typedef int (*_IO_pbackfail_t) (_IO_FILE *, int);
 183 #define _IO_PBACKFAIL(FP, CH) JUMP1 (__pbackfail, FP, CH)
 184 #define _IO_WPBACKFAIL(FP, CH) WJUMP1 (__pbackfail, FP, CH)
 185
 186 /* The 'xsputn' hook writes upto N characters from buffer DATA.
 187    Returns EOF or the number of character actually written.
 188    It matches the streambuf::xsputn virtual function. */
 189 typedef _IO_size_t (*_IO_xsputn_t) (_IO_FILE *FP, const void *DATA,
 190                                     _IO_size_t N);
 191 #define _IO_XSPUTN(FP, DATA, N) JUMP2 (__xsputn, FP, DATA, N)
 192 #define _IO_WXSPUTN(FP, DATA, N) WJUMP2 (__xsputn, FP, DATA, N)
 193
 194 /* The 'xsgetn' hook reads upto N characters into buffer DATA.
 195    Returns the number of character actually read.
 196    It matches the streambuf::xsgetn virtual function. */
 197 typedef _IO_size_t (*_IO_xsgetn_t) (_IO_FILE *FP, void *DATA, _IO_size_t N);
 198 #define _IO_XSGETN(FP, DATA, N) JUMP2 (__xsgetn, FP, DATA, N)
 199 #define _IO_WXSGETN(FP, DATA, N) WJUMP2 (__xsgetn, FP, DATA, N)
 200
 201 /* The 'seekoff' hook moves the stream position to a new position
 202    relative to the start of the file (if DIR==0), the current position
 203    (MODE==1), or the end of the file (MODE==2).
 204    It matches the streambuf::seekoff virtual function.
 205    It is also used for the ANSI fseek function. */
 206 typedef _IO_off64_t (*_IO_seekoff_t) (_IO_FILE *FP, _IO_off64_t OFF, int DIR,
 207                                       int MODE);
 208 #define _IO_SEEKOFF(FP, OFF, DIR, MODE) JUMP3 (__seekoff, FP, OFF, DIR, MODE)
 209 #define _IO_WSEEKOFF(FP, OFF, DIR, MODE) WJUMP3 (__seekoff, FP, OFF, DIR, MODE)
 210
 211 /* The 'seekpos' hook also moves the stream position,
 212    but to an absolute position given by a fpos64_t (seekpos).
 213    It matches the streambuf::seekpos virtual function.
 214    It is also used for the ANSI fgetpos and fsetpos functions.  */
 215 /* The _IO_seek_cur and _IO_seek_end options are not allowed. */
 216 typedef _IO_off64_t (*_IO_seekpos_t) (_IO_FILE *, _IO_off64_t, int);
 217 #define _IO_SEEKPOS(FP, POS, FLAGS) JUMP2 (__seekpos, FP, POS, FLAGS)
 218 #define _IO_WSEEKPOS(FP, POS, FLAGS) WJUMP2 (__seekpos, FP, POS, FLAGS)
 219
 220 /* The 'setbuf' hook gives a buffer to the file.
 221    It matches the streambuf::setbuf virtual function. */
 222 typedef _IO_FILE* (*_IO_setbuf_t) (_IO_FILE *, char *, _IO_ssize_t);
 223 #define _IO_SETBUF(FP, BUFFER, LENGTH) JUMP2 (__setbuf, FP, BUFFER, LENGTH)
 224 #define _IO_WSETBUF(FP, BUFFER, LENGTH) WJUMP2 (__setbuf, FP, BUFFER, LENGTH)
 225
 226 /* The 'sync' hook attempts to synchronize the internal data structures
 227    of the file with the external state.
 228    It matches the streambuf::sync virtual function. */
 229 typedef int (*_IO_sync_t) (_IO_FILE *);
 230 #define _IO_SYNC(FP) JUMP0 (__sync, FP)
 231 #define _IO_WSYNC(FP) WJUMP0 (__sync, FP)
 232
 233 /* The 'doallocate' hook is used to tell the file to allocate a buffer.
 234    It matches the streambuf::doallocate virtual function, which is not
 235    in the ANSI/ISO C++ standard, but is part traditional implementations. */
 236 typedef int (*_IO_doallocate_t) (_IO_FILE *);
 237 #define _IO_DOALLOCATE(FP) JUMP0 (__doallocate, FP)
 238 #define _IO_WDOALLOCATE(FP) WJUMP0 (__doallocate, FP)
 239
 240 /* The following four hooks (sysread, syswrite, sysclose, sysseek, and
 241    sysstat) are low-level hooks specific to this implementation.
 242    There is no correspondence in the ANSI/ISO C++ standard library.
 243    The hooks basically correspond to the Unix system functions
 244    (read, write, close, lseek, and stat) except that a _IO_FILE*
 245    parameter is used instead of an integer file descriptor;  the default
 246    implementation used for normal files just calls those functions.
 247    The advantage of overriding these functions instead of the higher-level
 248    ones (underflow, overflow etc) is that you can leave all the buffering
 249    higher-level functions.  */
 250
 251 /* The 'sysread' hook is used to read data from the external file into
 252    an existing buffer.  It generalizes the Unix read(2) function.
 253    It matches the streambuf::sys_read virtual function, which is
 254    specific to this implementation. */
 255 typedef _IO_ssize_t (*_IO_read_t) (_IO_FILE *, void *, _IO_ssize_t);
 256 #define _IO_SYSREAD(FP, DATA, LEN) JUMP2 (__read, FP, DATA, LEN)
 257 #define _IO_WSYSREAD(FP, DATA, LEN) WJUMP2 (__read, FP, DATA, LEN)
 258
 259 /* The 'syswrite' hook is used to write data from an existing buffer
 260    to an external file.  It generalizes the Unix write(2) function.
 261    It matches the streambuf::sys_write virtual function, which is
 262    specific to this implementation. */
 263 typedef _IO_ssize_t (*_IO_write_t) (_IO_FILE *, const void *, _IO_ssize_t);
 264 #define _IO_SYSWRITE(FP, DATA, LEN) JUMP2 (__write, FP, DATA, LEN)
 265 #define _IO_WSYSWRITE(FP, DATA, LEN) WJUMP2 (__write, FP, DATA, LEN)
 266
 267 /* The 'sysseek' hook is used to re-position an external file.
 268    It generalizes the Unix lseek(2) function.
 269    It matches the streambuf::sys_seek virtual function, which is
 270    specific to this implementation. */
 271 typedef _IO_off64_t (*_IO_seek_t) (_IO_FILE *, _IO_off64_t, int);
 272 #define _IO_SYSSEEK(FP, OFFSET, MODE) JUMP2 (__seek, FP, OFFSET, MODE)
 273 #define _IO_WSYSSEEK(FP, OFFSET, MODE) WJUMP2 (__seek, FP, OFFSET, MODE)
 274
 275 /* The 'sysclose' hook is used to finalize (close, finish up) an
 276    external file.  It generalizes the Unix close(2) function.
 277    It matches the streambuf::sys_close virtual function, which is
 278    specific to this implementation. */
 279 typedef int (*_IO_close_t) (_IO_FILE *); /* finalize */
 280 #define _IO_SYSCLOSE(FP) JUMP0 (__close, FP)
 281 #define _IO_WSYSCLOSE(FP) WJUMP0 (__close, FP)
 282
 283 /* The 'sysstat' hook is used to get information about an external file
 284    into a struct stat buffer.  It generalizes the Unix fstat(2) call.
 285    It matches the streambuf::sys_stat virtual function, which is
 286    specific to this implementation. */
 287 typedef int (*_IO_stat_t) (_IO_FILE *, void *);
 288 #define _IO_SYSSTAT(FP, BUF) JUMP1 (__stat, FP, BUF)
 289 #define _IO_WSYSSTAT(FP, BUF) WJUMP1 (__stat, FP, BUF)
 290
 291 /* The 'showmany' hook can be used to get an image how much input is
 292    available.  In many cases the answer will be 0 which means unknown
 293    but some cases one can provide real information.  */
 294 typedef int (*_IO_showmanyc_t) (_IO_FILE *);
 295 #define _IO_SHOWMANYC(FP) JUMP0 (__showmanyc, FP)
 296 #define _IO_WSHOWMANYC(FP) WJUMP0 (__showmanyc, FP)
 297
 298 /* The 'imbue' hook is used to get information about the currently
 299    installed locales.  */
 300 typedef void (*_IO_imbue_t) (_IO_FILE *, void *);
 301 #define _IO_IMBUE(FP, LOCALE) JUMP1 (__imbue, FP, LOCALE)
 302 #define _IO_WIMBUE(FP, LOCALE) WJUMP1 (__imbue, FP, LOCALE)
 303
 304
 305 #define _IO_CHAR_TYPE char /* unsigned char ? */
 306 #define _IO_INT_TYPE int
 307
 308 struct _IO_jump_t
 309 {
 310     JUMP_FIELD(size_t, __dummy);
 311     JUMP_FIELD(size_t, __dummy2);
 312     JUMP_FIELD(_IO_finish_t, __finish);
 313     JUMP_FIELD(_IO_overflow_t, __overflow);
 314     JUMP_FIELD(_IO_underflow_t, __underflow);
 315     JUMP_FIELD(_IO_underflow_t, __uflow);
 316     JUMP_FIELD(_IO_pbackfail_t, __pbackfail);
 317     /* showmany */
 318     JUMP_FIELD(_IO_xsputn_t, __xsputn);
 319     JUMP_FIELD(_IO_xsgetn_t, __xsgetn);
 320     JUMP_FIELD(_IO_seekoff_t, __seekoff);
 321     JUMP_FIELD(_IO_seekpos_t, __seekpos);
 322     JUMP_FIELD(_IO_setbuf_t, __setbuf);
 323     JUMP_FIELD(_IO_sync_t, __sync);
 324     JUMP_FIELD(_IO_doallocate_t, __doallocate);
 325     JUMP_FIELD(_IO_read_t, __read);
 326     JUMP_FIELD(_IO_write_t, __write);
 327     JUMP_FIELD(_IO_seek_t, __seek);
 328     JUMP_FIELD(_IO_close_t, __close);
 329     JUMP_FIELD(_IO_stat_t, __stat);
 330     JUMP_FIELD(_IO_showmanyc_t, __showmanyc);
 331     JUMP_FIELD(_IO_imbue_t, __imbue);
 332 #if 0
 333     get_column;
 334     set_column;
 335 #endif
 336 };
 337
 338 /* We always allocate an extra word following an _IO_FILE.
 339    This contains a pointer to the function jump table used.
 340    This is for compatibility with C++ streambuf; the word can
 341    be used to smash to a pointer to a virtual function table. */
 342
 343 struct _IO_FILE_plus
 344 {
 345   _IO_FILE file;
 346   const struct _IO_jump_t *vtable;
 347 };
 348
 349 #ifdef _IO_USE_OLD_IO_FILE
 350 /* This structure is used by the compatibility code as if it were an
 351    _IO_FILE_plus, but has enough space to initialize the _mode argument
 352    of an _IO_FILE_complete.  */
 353 struct _IO_FILE_complete_plus
 354 {
 355   struct _IO_FILE_complete file;
 356   const struct _IO_jump_t *vtable;
 357 };
 358 #endif
 359
 360 /* Special file type for fopencookie function.  */
 361 struct _IO_cookie_file
 362 {
 363   struct _IO_FILE_plus __fp;
 364   void *__cookie;
 365   _IO_cookie_io_functions_t __io_functions;
 366 };
 367
 368 _IO_FILE *_IO_fopencookie (void *cookie, const char *mode,
 369                            _IO_cookie_io_functions_t io_functions);
 370
 371
 372 /* Iterator type for walking global linked list of _IO_FILE objects. */
 373
 374 typedef struct _IO_FILE *_IO_ITER;
 375
 376 /* Generic functions */
 377
 378 extern void _IO_switch_to_main_get_area (_IO_FILE *) __THROW;
 379 extern void _IO_switch_to_backup_area (_IO_FILE *) __THROW;
 380 extern int _IO_switch_to_get_mode (_IO_FILE *);
 381 libc_hidden_proto (_IO_switch_to_get_mode)
 382 extern void _IO_init_internal (_IO_FILE *, int) attribute_hidden;
 383 extern int _IO_sputbackc (_IO_FILE *, int) __THROW;
 384 libc_hidden_proto (_IO_sputbackc)
 385 extern int _IO_sungetc (_IO_FILE *) __THROW;
 386 extern void _IO_un_link (struct _IO_FILE_plus *) __THROW;
 387 libc_hidden_proto (_IO_un_link)
 388 extern void _IO_link_in (struct _IO_FILE_plus *) __THROW;
 389 libc_hidden_proto (_IO_link_in)
 390 extern void _IO_doallocbuf (_IO_FILE *) __THROW;
 391 libc_hidden_proto (_IO_doallocbuf)
 392 extern void _IO_unsave_markers (_IO_FILE *) __THROW;
 393 libc_hidden_proto (_IO_unsave_markers)
 394 extern void _IO_setb (_IO_FILE *, char *, char *, int) __THROW;
 395 libc_hidden_proto (_IO_setb)
 396 extern unsigned _IO_adjust_column (unsigned, const char *, int) __THROW;
 397 libc_hidden_proto (_IO_adjust_column)
 398 #define _IO_sputn(__fp, __s, __n) _IO_XSPUTN (__fp, __s, __n)
 399
 400 _IO_ssize_t _IO_least_wmarker (_IO_FILE *, wchar_t *) __THROW;
 401 libc_hidden_proto (_IO_least_wmarker)
 402 extern void _IO_switch_to_main_wget_area (_IO_FILE *) __THROW;
 403 libc_hidden_proto (_IO_switch_to_main_wget_area)
 404 extern void _IO_switch_to_wbackup_area (_IO_FILE *) __THROW;
 405 libc_hidden_proto (_IO_switch_to_wbackup_area)
 406 extern int _IO_switch_to_wget_mode (_IO_FILE *);
 407 libc_hidden_proto (_IO_switch_to_wget_mode)
 408 extern void _IO_wsetb (_IO_FILE *, wchar_t *, wchar_t *, int) __THROW;
 409 libc_hidden_proto (_IO_wsetb)
 410 extern wint_t _IO_sputbackwc (_IO_FILE *, wint_t) __THROW;
 411 libc_hidden_proto (_IO_sputbackwc)
 412 extern wint_t _IO_sungetwc (_IO_FILE *) __THROW;
 413 extern void _IO_wdoallocbuf (_IO_FILE *) __THROW;
 414 libc_hidden_proto (_IO_wdoallocbuf)
 415 extern void _IO_unsave_wmarkers (_IO_FILE *) __THROW;
 416 extern unsigned _IO_adjust_wcolumn (unsigned, const wchar_t *, int) __THROW;
 417 extern _IO_off64_t get_file_offset (_IO_FILE *fp);
 418
 419 /* Marker-related function. */
 420
 421 extern void _IO_init_marker (struct _IO_marker *, _IO_FILE *);
 422 extern void _IO_init_wmarker (struct _IO_marker *, _IO_FILE *);
 423 extern void _IO_remove_marker (struct _IO_marker *) __THROW;
 424 extern int _IO_marker_difference (struct _IO_marker *, struct _IO_marker *)
 425      __THROW;
 426 extern int _IO_marker_delta (struct _IO_marker *) __THROW;
 427 extern int _IO_wmarker_delta (struct _IO_marker *) __THROW;
 428 extern int _IO_seekmark (_IO_FILE *, struct _IO_marker *, int) __THROW;
 429 extern int _IO_seekwmark (_IO_FILE *, struct _IO_marker *, int) __THROW;
 430
 431 /* Functions for iterating global list and dealing with its lock */
 432
 433 extern _IO_ITER _IO_iter_begin (void) __THROW;
 434 libc_hidden_proto (_IO_iter_begin)
 435 extern _IO_ITER _IO_iter_end (void) __THROW;
 436 libc_hidden_proto (_IO_iter_end)
 437 extern _IO_ITER _IO_iter_next (_IO_ITER) __THROW;
 438 libc_hidden_proto (_IO_iter_next)
 439 extern _IO_FILE *_IO_iter_file (_IO_ITER) __THROW;
 440 libc_hidden_proto (_IO_iter_file)
 441 extern void _IO_list_lock (void) __THROW;
 442 libc_hidden_proto (_IO_list_lock)
 443 extern void _IO_list_unlock (void) __THROW;
 444 libc_hidden_proto (_IO_list_unlock)
 445 extern void _IO_list_resetlock (void) __THROW;
 446 libc_hidden_proto (_IO_list_resetlock)
 447
 448 /* Default jumptable functions. */
 449
 450 extern int _IO_default_underflow (_IO_FILE *) __THROW;
 451 extern int _IO_default_uflow (_IO_FILE *);
 452 libc_hidden_proto (_IO_default_uflow)
 453 extern wint_t _IO_wdefault_uflow (_IO_FILE *);
 454 libc_hidden_proto (_IO_wdefault_uflow)
 455 extern int _IO_default_doallocate (_IO_FILE *) __THROW;
 456 libc_hidden_proto (_IO_default_doallocate)
 457 extern int _IO_wdefault_doallocate (_IO_FILE *) __THROW;
 458 libc_hidden_proto (_IO_wdefault_doallocate)
 459 extern void _IO_default_finish (_IO_FILE *, int) __THROW;
 460 libc_hidden_proto (_IO_default_finish)
 461 extern void _IO_wdefault_finish (_IO_FILE *, int) __THROW;
 462 libc_hidden_proto (_IO_wdefault_finish)
 463 extern int _IO_default_pbackfail (_IO_FILE *, int) __THROW;
 464 libc_hidden_proto (_IO_default_pbackfail)
 465 extern wint_t _IO_wdefault_pbackfail (_IO_FILE *, wint_t) __THROW;
 466 libc_hidden_proto (_IO_wdefault_pbackfail)
 467 extern _IO_FILE* _IO_default_setbuf (_IO_FILE *, char *, _IO_ssize_t);
 468 extern _IO_size_t _IO_default_xsputn (_IO_FILE *, const void *, _IO_size_t);
 469 libc_hidden_proto (_IO_default_xsputn)
 470 extern _IO_size_t _IO_wdefault_xsputn (_IO_FILE *, const void *, _IO_size_t);
 471 libc_hidden_proto (_IO_wdefault_xsputn)
 472 extern _IO_size_t _IO_default_xsgetn (_IO_FILE *, void *, _IO_size_t);
 473 libc_hidden_proto (_IO_default_xsgetn)
 474 extern _IO_size_t _IO_wdefault_xsgetn (_IO_FILE *, void *, _IO_size_t);
 475 libc_hidden_proto (_IO_wdefault_xsgetn)
 476 extern _IO_off64_t _IO_default_seekoff (_IO_FILE *, _IO_off64_t, int, int)
 477      __THROW;
 478 extern _IO_off64_t _IO_default_seekpos (_IO_FILE *, _IO_off64_t, int);
 479 extern _IO_ssize_t _IO_default_write (_IO_FILE *, const void *, _IO_ssize_t);
 480 extern _IO_ssize_t _IO_default_read (_IO_FILE *, void *, _IO_ssize_t);
 481 extern int _IO_default_stat (_IO_FILE *, void *) __THROW;
 482 extern _IO_off64_t _IO_default_seek (_IO_FILE *, _IO_off64_t, int) __THROW;
 483 extern int _IO_default_sync (_IO_FILE *) __THROW;
 484 #define _IO_default_close ((_IO_close_t) _IO_default_sync)
 485 extern int _IO_default_showmanyc (_IO_FILE *) __THROW;
 486 extern void _IO_default_imbue (_IO_FILE *, void *) __THROW;
 487
 488 extern const struct _IO_jump_t _IO_file_jumps;
 489 libc_hidden_proto (_IO_file_jumps)
 490 extern const struct _IO_jump_t _IO_file_jumps_mmap attribute_hidden;
 491 extern const struct _IO_jump_t _IO_file_jumps_maybe_mmap attribute_hidden;
 492 extern const struct _IO_jump_t _IO_wfile_jumps;
 493 libc_hidden_proto (_IO_wfile_jumps)
 494 extern const struct _IO_jump_t _IO_wfile_jumps_mmap attribute_hidden;
 495 extern const struct _IO_jump_t _IO_wfile_jumps_maybe_mmap attribute_hidden;
 496 extern const struct _IO_jump_t _IO_old_file_jumps attribute_hidden;
 497 extern const struct _IO_jump_t _IO_streambuf_jumps;
 498 extern const struct _IO_jump_t _IO_old_proc_jumps attribute_hidden;
 499 extern const struct _IO_jump_t _IO_str_jumps attribute_hidden;
 500 extern const struct _IO_jump_t _IO_wstr_jumps attribute_hidden;
 501 extern const struct _IO_codecvt __libio_codecvt attribute_hidden;
 502 extern int _IO_do_write (_IO_FILE *, const char *, _IO_size_t);
 503 libc_hidden_proto (_IO_do_write)
 504 extern int _IO_new_do_write (_IO_FILE *, const char *, _IO_size_t);
 505 extern int _IO_old_do_write (_IO_FILE *, const char *, _IO_size_t);
 506 extern int _IO_wdo_write (_IO_FILE *, const wchar_t *, _IO_size_t);
 507 libc_hidden_proto (_IO_wdo_write)
 508 extern int _IO_flush_all_lockp (int);
 509 extern int _IO_flush_all (void);
 510 libc_hidden_proto (_IO_flush_all)
 511 extern int _IO_cleanup (void);
 512 extern void _IO_flush_all_linebuffered (void);
 513 libc_hidden_proto (_IO_flush_all_linebuffered)
 514 extern int _IO_new_fgetpos (_IO_FILE *, _IO_fpos_t *);
 515 extern int _IO_old_fgetpos (_IO_FILE *, _IO_fpos_t *);
 516 extern int _IO_new_fsetpos (_IO_FILE *, const _IO_fpos_t *);
 517 extern int _IO_old_fsetpos (_IO_FILE *, const _IO_fpos_t *);
 518 extern int _IO_new_fgetpos64 (_IO_FILE *, _IO_fpos64_t *);
 519 extern int _IO_old_fgetpos64 (_IO_FILE *, _IO_fpos64_t *);
 520 extern int _IO_new_fsetpos64 (_IO_FILE *, const _IO_fpos64_t *);
 521 extern int _IO_old_fsetpos64 (_IO_FILE *, const _IO_fpos64_t *);
 522 extern void _IO_old_init (_IO_FILE *fp, int flags) __THROW;
 523
 524
 525 #if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 526 # define _IO_do_flush(_f) \
 527   ((_f)->_mode <= 0                                                           \
 528    ? _IO_do_write(_f, (_f)->_IO_write_base,                                   \
 529                   (_f)->_IO_write_ptr-(_f)->_IO_write_base)                   \
 530    : _IO_wdo_write(_f, (_f)->_wide_data->_IO_write_base,                      \
 531                    ((_f)->_wide_data->_IO_write_ptr                           \
 532                     - (_f)->_wide_data->_IO_write_base)))
 533 #else
 534 # define _IO_do_flush(_f) \
 535   _IO_do_write(_f, (_f)->_IO_write_base,                                      \
 536                (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 537 #endif
 538 #define _IO_old_do_flush(_f) \
 539   _IO_old_do_write(_f, (_f)->_IO_write_base, \
 540                    (_f)->_IO_write_ptr-(_f)->_IO_write_base)
 541 #define _IO_in_put_mode(_fp) ((_fp)->_flags & _IO_CURRENTLY_PUTTING)
 542 #define _IO_mask_flags(fp, f, mask) \
 543        ((fp)->_flags = ((fp)->_flags & ~(mask)) | ((f) & (mask)))
 544 #define _IO_setg(fp, eb, g, eg)  ((fp)->_IO_read_base = (eb),\
 545         (fp)->_IO_read_ptr = (g), (fp)->_IO_read_end = (eg))
 546 #define _IO_wsetg(fp, eb, g, eg)  ((fp)->_wide_data->_IO_read_base = (eb),\
 547         (fp)->_wide_data->_IO_read_ptr = (g), \
 548         (fp)->_wide_data->_IO_read_end = (eg))
 549 #define _IO_setp(__fp, __p, __ep) \
 550        ((__fp)->_IO_write_base = (__fp)->_IO_write_ptr \
 551         = __p, (__fp)->_IO_write_end = (__ep))
 552 #define _IO_wsetp(__fp, __p, __ep) \
 553        ((__fp)->_wide_data->_IO_write_base \
 554         = (__fp)->_wide_data->_IO_write_ptr = __p, \
 555         (__fp)->_wide_data->_IO_write_end = (__ep))
 556 #define _IO_have_backup(fp) ((fp)->_IO_save_base != NULL)
 557 #define _IO_have_wbackup(fp) ((fp)->_wide_data->_IO_save_base != NULL)
 558 #define _IO_in_backup(fp) ((fp)->_flags & _IO_IN_BACKUP)
 559 #define _IO_have_markers(fp) ((fp)->_markers != NULL)
 560 #define _IO_blen(fp) ((fp)->_IO_buf_end - (fp)->_IO_buf_base)
 561 #define _IO_wblen(fp) ((fp)->_wide_data->_IO_buf_end \
 562                        - (fp)->_wide_data->_IO_buf_base)
 563
 564 /* Jumptable functions for files. */
 565
 566 extern int _IO_file_doallocate (_IO_FILE *) __THROW;
 567 libc_hidden_proto (_IO_file_doallocate)
 568 extern _IO_FILE* _IO_file_setbuf (_IO_FILE *, char *, _IO_ssize_t);
 569 libc_hidden_proto (_IO_file_setbuf)
 570 extern _IO_off64_t _IO_file_seekoff (_IO_FILE *, _IO_off64_t, int, int);
 571 libc_hidden_proto (_IO_file_seekoff)
 572 extern _IO_off64_t _IO_file_seekoff_mmap (_IO_FILE *, _IO_off64_t, int, int)
 573      __THROW;
 574 extern _IO_size_t _IO_file_xsputn (_IO_FILE *, const void *, _IO_size_t);
 575 libc_hidden_proto (_IO_file_xsputn)
 576 extern _IO_size_t _IO_file_xsgetn (_IO_FILE *, void *, _IO_size_t);
 577 libc_hidden_proto (_IO_file_xsgetn)
 578 extern int _IO_file_stat (_IO_FILE *, void *) __THROW;
 579 libc_hidden_proto (_IO_file_stat)
 580 extern int _IO_file_close (_IO_FILE *) __THROW;
 581 libc_hidden_proto (_IO_file_close)
 582 extern int _IO_file_close_mmap (_IO_FILE *) __THROW;
 583 extern int _IO_file_underflow (_IO_FILE *);
 584 libc_hidden_proto (_IO_file_underflow)
 585 extern int _IO_file_underflow_mmap (_IO_FILE *);
 586 extern int _IO_file_underflow_maybe_mmap (_IO_FILE *);
 587 extern int _IO_file_overflow (_IO_FILE *, int);
 588 libc_hidden_proto (_IO_file_overflow)
 589 #define _IO_file_is_open(__fp) ((__fp)->_fileno != -1)
 590 extern _IO_FILE* _IO_file_attach (_IO_FILE *, int);
 591 libc_hidden_proto (_IO_file_attach)
 592 extern _IO_FILE* _IO_file_open (_IO_FILE *, const char *, int, int, int, int);
 593 libc_hidden_proto (_IO_file_open)
 594 extern _IO_FILE* _IO_file_fopen (_IO_FILE *, const char *, const char *, int);
 595 libc_hidden_proto (_IO_file_fopen)
 596 extern _IO_ssize_t _IO_file_write (_IO_FILE *, const void *, _IO_ssize_t);
 597 extern _IO_ssize_t _IO_file_read (_IO_FILE *, void *, _IO_ssize_t);
 598 libc_hidden_proto (_IO_file_read)
 599 extern int _IO_file_sync (_IO_FILE *);
 600 libc_hidden_proto (_IO_file_sync)
 601 extern int _IO_file_close_it (_IO_FILE *);
 602 libc_hidden_proto (_IO_file_close_it)
 603 extern _IO_off64_t _IO_file_seek (_IO_FILE *, _IO_off64_t, int) __THROW;
 604 libc_hidden_proto (_IO_file_seek)
 605 extern void _IO_file_finish (_IO_FILE *, int);
 606 libc_hidden_proto (_IO_file_finish)
 607
 608 extern _IO_FILE* _IO_new_file_attach (_IO_FILE *, int);
 609 extern int _IO_new_file_close_it (_IO_FILE *);
 610 extern void _IO_new_file_finish (_IO_FILE *, int);
 611 extern _IO_FILE* _IO_new_file_fopen (_IO_FILE *, const char *, const char *,
 612                                      int);
 613 extern void _IO_no_init (_IO_FILE *, int, int, struct _IO_wide_data *,
 614                          const struct _IO_jump_t *) __THROW;
 615 extern void _IO_new_file_init_internal (struct _IO_FILE_plus *)
 616   __THROW attribute_hidden;
 617 extern _IO_FILE* _IO_new_file_setbuf (_IO_FILE *, char *, _IO_ssize_t);
 618 extern _IO_FILE* _IO_file_setbuf_mmap (_IO_FILE *, char *, _IO_ssize_t);
 619 extern int _IO_new_file_sync (_IO_FILE *);
 620 extern int _IO_new_file_underflow (_IO_FILE *);
 621 extern int _IO_new_file_overflow (_IO_FILE *, int);
 622 extern _IO_off64_t _IO_new_file_seekoff (_IO_FILE *, _IO_off64_t, int, int);
 623 extern _IO_ssize_t _IO_new_file_write (_IO_FILE *, const void *, _IO_ssize_t);
 624 extern _IO_size_t _IO_new_file_xsputn (_IO_FILE *, const void *, _IO_size_t);
 625
 626 extern _IO_FILE* _IO_old_file_setbuf (_IO_FILE *, char *, _IO_ssize_t);
 627 extern _IO_off64_t _IO_old_file_seekoff (_IO_FILE *, _IO_off64_t, int, int);
 628 extern _IO_size_t _IO_old_file_xsputn (_IO_FILE *, const void *, _IO_size_t);
 629 extern int _IO_old_file_underflow (_IO_FILE *);
 630 extern int _IO_old_file_overflow (_IO_FILE *, int);
 631 extern void _IO_old_file_init_internal (struct _IO_FILE_plus *)
 632   __THROW attribute_hidden;
 633 extern _IO_FILE* _IO_old_file_attach (_IO_FILE *, int);
 634 extern _IO_FILE* _IO_old_file_fopen (_IO_FILE *, const char *, const char *);
 635 extern _IO_ssize_t _IO_old_file_write (_IO_FILE *, const void *, _IO_ssize_t);
 636 extern int _IO_old_file_sync (_IO_FILE *);
 637 extern int _IO_old_file_close_it (_IO_FILE *);
 638 extern void _IO_old_file_finish (_IO_FILE *, int);
 639
 640 extern int _IO_wfile_doallocate (_IO_FILE *) __THROW;
 641 extern _IO_size_t _IO_wfile_xsputn (_IO_FILE *, const void *, _IO_size_t);
 642 libc_hidden_proto (_IO_wfile_xsputn)
 643 extern _IO_FILE* _IO_wfile_setbuf (_IO_FILE *, wchar_t *, _IO_ssize_t);
 644 extern wint_t _IO_wfile_sync (_IO_FILE *);
 645 libc_hidden_proto (_IO_wfile_sync)
 646 extern wint_t _IO_wfile_underflow (_IO_FILE *);
 647 libc_hidden_proto (_IO_wfile_underflow)
 648 extern wint_t _IO_wfile_overflow (_IO_FILE *, wint_t);
 649 libc_hidden_proto (_IO_wfile_overflow)
 650 extern _IO_off64_t _IO_wfile_seekoff (_IO_FILE *, _IO_off64_t, int, int);
 651 libc_hidden_proto (_IO_wfile_seekoff)
 652
 653 /* Jumptable functions for proc_files. */
 654 extern _IO_FILE* _IO_proc_open (_IO_FILE *, const char *, const char *)
 655      __THROW;
 656 extern _IO_FILE* _IO_new_proc_open (_IO_FILE *, const char *, const char *)
 657      __THROW;
 658 extern _IO_FILE* _IO_old_proc_open (_IO_FILE *, const char *, const char *);
 659 extern int _IO_proc_close (_IO_FILE *) __THROW;
 660 extern int _IO_new_proc_close (_IO_FILE *) __THROW;
 661 extern int _IO_old_proc_close (_IO_FILE *);
 662
 663 /* Jumptable functions for strfiles. */
 664 extern int _IO_str_underflow (_IO_FILE *) __THROW;
 665 libc_hidden_proto (_IO_str_underflow)
 666 extern int _IO_str_overflow (_IO_FILE *, int) __THROW;
 667 libc_hidden_proto (_IO_str_overflow)
 668 extern int _IO_str_pbackfail (_IO_FILE *, int) __THROW;
 669 libc_hidden_proto (_IO_str_pbackfail)
 670 extern _IO_off64_t _IO_str_seekoff (_IO_FILE *, _IO_off64_t, int, int) __THROW;
 671 libc_hidden_proto (_IO_str_seekoff)
 672 extern void _IO_str_finish (_IO_FILE *, int) __THROW;
 673
 674 /* Other strfile functions */
 675 struct _IO_strfile_;
 676 extern _IO_ssize_t _IO_str_count (_IO_FILE *) __THROW;
 677
 678 /* And the wide character versions.  */
 679 extern void _IO_wstr_init_static (_IO_FILE *, wchar_t *, _IO_size_t, wchar_t *)
 680      __THROW;
 681 extern _IO_ssize_t _IO_wstr_count (_IO_FILE *) __THROW;
 682 extern _IO_wint_t _IO_wstr_overflow (_IO_FILE *, _IO_wint_t) __THROW;
 683 extern _IO_wint_t _IO_wstr_underflow (_IO_FILE *) __THROW;
 684 extern _IO_off64_t _IO_wstr_seekoff (_IO_FILE *, _IO_off64_t, int, int)
 685      __THROW;
 686 extern _IO_wint_t _IO_wstr_pbackfail (_IO_FILE *, _IO_wint_t) __THROW;
 687 extern void _IO_wstr_finish (_IO_FILE *, int) __THROW;
 688
 689 extern int _IO_vasprintf (char **result_ptr, const char *format,
 690                           _IO_va_list args) __THROW;
 691 extern int _IO_vdprintf (int d, const char *format, _IO_va_list arg);
 692 extern int _IO_vsnprintf (char *string, _IO_size_t maxlen,
 693                           const char *format, _IO_va_list args) __THROW;
 694
 695
 696 extern _IO_size_t _IO_getline (_IO_FILE *,char *, _IO_size_t, int, int);
 697 libc_hidden_proto (_IO_getline)
 698 extern _IO_size_t _IO_getline_info (_IO_FILE *,char *, _IO_size_t,
 699                                     int, int, int *);
 700 libc_hidden_proto (_IO_getline_info)
 701 extern _IO_ssize_t _IO_getdelim (char **, _IO_size_t *, int, _IO_FILE *);
 702 extern _IO_size_t _IO_getwline (_IO_FILE *,wchar_t *, _IO_size_t, wint_t, int);
 703 extern _IO_size_t _IO_getwline_info (_IO_FILE *,wchar_t *, _IO_size_t,
 704                                      wint_t, int, wint_t *);
 705
 706 extern struct _IO_FILE_plus *_IO_list_all;
 707 libc_hidden_proto (_IO_list_all)
 708 extern void (*_IO_cleanup_registration_needed) (void);
 709
 710 extern void _IO_str_init_static_internal (struct _IO_strfile_ *, char *,
 711                                           _IO_size_t, char *) __THROW;
 712 extern _IO_off64_t _IO_seekoff_unlocked (_IO_FILE *, _IO_off64_t, int, int)
 713      attribute_hidden;
 714 extern _IO_off64_t _IO_seekpos_unlocked (_IO_FILE *, _IO_off64_t, int)
 715      attribute_hidden;
 716
 717 #ifndef EOF
 718 # define EOF (-1)
 719 #endif
 720 #ifndef NULL
 721 # if defined __GNUG__ && \
 722     (__GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
 723 #  define NULL (__null)
 724 # else
 725 #  if !defined(__cplusplus)
 726 #   define NULL ((void*)0)
 727 #  else
 728 #   define NULL (0)
 729 #  endif
 730 # endif
 731 #endif
 732
 733 #if _G_HAVE_MMAP
 734
 735 # include <unistd.h>
 736 # include <fcntl.h>
 737 # include <sys/mman.h>
 738 # include <sys/param.h>
 739
 740 # if !defined(MAP_ANONYMOUS) && defined(MAP_ANON)
 741 #  define MAP_ANONYMOUS MAP_ANON
 742 # endif
 743
 744 # if !defined(MAP_ANONYMOUS) || !defined(EXEC_PAGESIZE)
 745 #  undef _G_HAVE_MMAP
 746 #  define _G_HAVE_MMAP 0
 747 # endif
 748
 749 #endif /* _G_HAVE_MMAP */
 750
 751 #if _G_HAVE_MMAP
 752
 753 # ifdef _LIBC
 754 /* When using this code in the GNU libc we must not pollute the name space.  */
 755 #  define mmap __mmap
 756 #  define munmap __munmap
 757 #  define ftruncate __ftruncate
 758 # endif
 759 #endif /* _G_HAVE_MMAP */
 760
 761 #ifndef OS_FSTAT
 762 # define OS_FSTAT fstat
 763 #endif
 764 extern int _IO_vscanf (const char *, _IO_va_list) __THROW;
 765
 766 /* _IO_pos_BAD is an _IO_off64_t value indicating error, unknown, or EOF. */
 767 #ifndef _IO_pos_BAD
 768 # define _IO_pos_BAD ((_IO_off64_t) -1)
 769 #endif
 770 /* _IO_pos_adjust adjust an _IO_off64_t by some number of bytes. */
 771 #ifndef _IO_pos_adjust
 772 # define _IO_pos_adjust(pos, delta) ((pos) += (delta))
 773 #endif
 774 /* _IO_pos_0 is an _IO_off64_t value indicating beginning of file. */
 775 #ifndef _IO_pos_0
 776 # define _IO_pos_0 ((_IO_off64_t) 0)
 777 #endif
 778
 779 #ifdef __cplusplus
 780 }
 781 #endif
 782
 783 #ifdef _IO_MTSAFE_IO
 784 /* check following! */
 785 # ifdef _IO_USE_OLD_IO_FILE
 786 #  define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 787        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 788          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 789          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock }
 790 # else
 791 #  if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 792 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 793        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 794          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 795          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock, _IO_pos_BAD,\
 796          NULL, WDP, 0 }
 797 #  else
 798 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 799        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 800          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 801          0, _IO_pos_BAD, 0, 0, { 0 }, &_IO_stdfile_##FD##_lock, _IO_pos_BAD,\
 802          0 }
 803 #  endif
 804 # endif
 805 #else
 806 # ifdef _IO_USE_OLD_IO_FILE
 807 #  define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 808        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 809          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 810          0, _IO_pos_BAD }
 811 # else
 812 #  if defined _LIBC || defined _GLIBCPP_USE_WCHAR_T
 813 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 814        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 815          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 816          0, _IO_pos_BAD, 0, 0, { 0 }, 0, _IO_pos_BAD, \
 817          NULL, WDP, 0 }
 818 #  else
 819 #   define FILEBUF_LITERAL(CHAIN, FLAGS, FD, WDP) \
 820        { _IO_MAGIC+_IO_LINKED+_IO_IS_FILEBUF+FLAGS, \
 821          0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (_IO_FILE *) CHAIN, FD, \
 822          0, _IO_pos_BAD, 0, 0, { 0 }, 0, _IO_pos_BAD, \
 823          0 }
 824 #  endif
 825 # endif
 826 #endif
 827
 828 #define _IO_va_start(args, last) va_start(args, last)
 829
 830 extern struct _IO_fake_stdiobuf _IO_stdin_buf, _IO_stdout_buf, _IO_stderr_buf;
 831
 832 #if 1
 833 # define COERCE_FILE(FILE) /* Nothing */
 834 #else
 835 /* This is part of the kludge for binary compatibility with old stdio. */
 836 # define COERCE_FILE(FILE) \
 837   (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) == _OLD_MAGIC_MASK \
 838     && (FILE) = *(FILE**)&((int*)fp)[1])
 839 #endif
 840
 841 #ifdef EINVAL
 842 # define MAYBE_SET_EINVAL __set_errno (EINVAL)
 843 #else
 844 # define MAYBE_SET_EINVAL /* nothing */
 845 #endif
 846
 847 #ifdef IO_DEBUG
 848 # define CHECK_FILE(FILE, RET) \
 849         if ((FILE) == NULL) { MAYBE_SET_EINVAL; return RET; } \
 850         else { COERCE_FILE(FILE); \
 851                if (((FILE)->_IO_file_flags & _IO_MAGIC_MASK) != _IO_MAGIC) \
 852           { MAYBE_SET_EINVAL; return RET; }}
 853 #else
 854 # define CHECK_FILE(FILE, RET) COERCE_FILE (FILE)
 855 #endif
 856
 857 static inline void
 858 __attribute__ ((__always_inline__))
 859 _IO_acquire_lock_fct (_IO_FILE **p)
 860 {
 861   _IO_FILE *fp = *p;
 862   if ((fp->_flags & _IO_USER_LOCK) == 0)
 863     _IO_funlockfile (fp);
 864 }
 865
 866 static inline void
 867 __attribute__ ((__always_inline__))
 868 _IO_acquire_lock_clear_flags2_fct (_IO_FILE **p)
 869 {
 870   _IO_FILE *fp = *p;
 871   fp->_flags2 &= ~(_IO_FLAGS2_FORTIFY | _IO_FLAGS2_SCANF_STD);
 872   if ((fp->_flags & _IO_USER_LOCK) == 0)
 873     _IO_funlockfile (fp);
 874 }
 875
 876 #if !defined _IO_MTSAFE_IO && IS_IN (libc)
 877 # define _IO_acquire_lock(_fp)                                                \
 878   do {                                                                        \
 879     _IO_FILE *_IO_acquire_lock_file = NULL
 880 # define _IO_acquire_lock_clear_flags2(_fp)                                   \
 881   do {                                                                        \
 882     _IO_FILE *_IO_acquire_lock_file = (_fp)
 883 # define _IO_release_lock(_fp)                                                \
 884     if (_IO_acquire_lock_file != NULL)                                        \
 885       _IO_acquire_lock_file->_flags2 &= ~(_IO_FLAGS2_FORTIFY                  \
 886                                           | _IO_FLAGS2_SCANF_STD);            \
 887   } while (0)
 888 #endif
 889
 890 /* Collect all vtables in a special section for vtable verification.
 891    These symbols cover the extent of this section.  */
 892 symbol_set_declare (__libc_IO_vtables)
 893
 894 /* libio vtables need to carry this attribute so that they pass
 895    validation.  */
 896 #define libio_vtable __attribute__ ((section ("__libc_IO_vtables")))
 897
 898 #ifdef SHARED
 899 /* If equal to &_IO_vtable_check (with pointer guard protection),
 900    unknown vtable pointers are valid.  This function pointer is solely
 901    used as a flag.  */
 902 extern void (*IO_accept_foreign_vtables) (void) attribute_hidden;
 903
 904 /* Assigns the passed function pointer (either NULL or
 905    &_IO_vtable_check) to IO_accept_foreign_vtables.  */
 906 static inline void
 907 IO_set_accept_foreign_vtables (void (*flag) (void))
 908 {
 909 #ifdef PTR_MANGLE
 910   PTR_MANGLE (flag);
 911 #endif
 912   atomic_store_relaxed (&IO_accept_foreign_vtables, flag);
 913 }
 914
 915 #else  /* !SHARED */
 916
 917 /* The statically-linked version does nothing. */
 918 static inline void
 919 IO_set_accept_foreign_vtables (void (*flag) (void))
 920 {
 921 }
 922
 923 #endif
 924
 925 /* Check if unknown vtable pointers are permitted; otherwise,
 926    terminate the process.  */
 927 void _IO_vtable_check (void) attribute_hidden;
 928
 929 /* Perform vtable pointer validation.  If validation fails, terminate
 930    the process.  */
 931 static inline const struct _IO_jump_t *
 932 IO_validate_vtable (const struct _IO_jump_t *vtable)
 933 {
 934   /* Fast path: The vtable pointer is within the __libc_IO_vtables
 935      section.  */
 936   uintptr_t section_length = __stop___libc_IO_vtables - __start___libc_IO_vtables;
 937   const char *ptr = (const char *) vtable;
 938   uintptr_t offset = ptr - __start___libc_IO_vtables;
 939   if (__glibc_unlikely (offset >= section_length))
 940     /* The vtable pointer is not in the expected section.  Use the
 941        slow path, which will terminate the process if necessary.  */
 942     _IO_vtable_check ();
 943   return vtable;
 944 }