Subversion Repositories Kolibri OS

Rev

Rev 4921 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4349 Serge 1
/* This header file provides the reentrancy.  */
2
 
3
/* WARNING: All identifiers here must begin with an underscore.  This file is
4
   included by stdio.h and others and we therefore must only use identifiers
5
   in the namespace allotted to us.  */
6
 
7
#ifndef _SYS_REENT_H_
8
#ifdef __cplusplus
9
extern "C" {
10
#endif
11
#define _SYS_REENT_H_
12
 
13
#include <_ansi.h>
4921 Serge 14
#include 
4349 Serge 15
#include 
16
 
17
#define _NULL 0
18
 
19
#ifndef __Long
20
#if __LONG_MAX__ == 2147483647L
21
#define __Long long
22
typedef unsigned __Long __ULong;
23
#elif __INT_MAX__ == 2147483647
24
#define __Long int
25
typedef unsigned __Long __ULong;
26
#endif
27
#endif
28
 
29
#if !defined( __Long)
30
#include 
31
#endif
32
 
33
#ifndef __Long
34
#define __Long __int32_t
35
typedef __uint32_t __ULong;
36
#endif
37
 
38
struct _reent;
39
 
40
/*
41
 * If _REENT_SMALL is defined, we make struct _reent as small as possible,
42
 * by having nearly everything possible allocated at first use.
43
 */
44
 
45
struct _Bigint
46
{
47
  struct _Bigint *_next;
48
  int _k, _maxwds, _sign, _wds;
49
  __ULong _x[1];
50
};
51
 
52
/* needed by reentrant structure */
53
struct __tm
54
{
55
  int   __tm_sec;
56
  int   __tm_min;
57
  int   __tm_hour;
58
  int   __tm_mday;
59
  int   __tm_mon;
60
  int   __tm_year;
61
  int   __tm_wday;
62
  int   __tm_yday;
63
  int   __tm_isdst;
64
};
65
 
66
/*
67
 * atexit() support.
68
 */
69
 
70
#define	_ATEXIT_SIZE 32	/* must be at least 32 to guarantee ANSI conformance */
71
 
72
struct _on_exit_args {
73
	void *  _fnargs[_ATEXIT_SIZE];	        /* user fn args */
74
	void *	_dso_handle[_ATEXIT_SIZE];
75
	/* Bitmask is set if user function takes arguments.  */
76
	__ULong _fntypes;           	        /* type of exit routine -
77
				   Must have at least _ATEXIT_SIZE bits */
78
	/* Bitmask is set if function was registered via __cxa_atexit.  */
79
	__ULong _is_cxa;
80
};
81
 
82
#ifdef _REENT_SMALL
83
struct _atexit {
84
	struct	_atexit *_next;			/* next in list */
85
	int	_ind;				/* next index in this table */
86
	void	(*_fns[_ATEXIT_SIZE])(void);	/* the table itself */
87
        struct _on_exit_args * _on_exit_args_ptr;
88
};
4921 Serge 89
# define _ATEXIT_INIT {_NULL, 0, {_NULL}, _NULL}
4349 Serge 90
#else
91
struct _atexit {
92
	struct	_atexit *_next;			/* next in list */
93
	int	_ind;				/* next index in this table */
94
	/* Some entries may already have been called, and will be NULL.  */
95
	void	(*_fns[_ATEXIT_SIZE])(void);	/* the table itself */
96
        struct _on_exit_args _on_exit_args;
97
};
4921 Serge 98
# define _ATEXIT_INIT {_NULL, 0, {_NULL}, {{_NULL}, {_NULL}, 0, 0}}
4349 Serge 99
#endif
100
 
4921 Serge 101
#ifdef _REENT_GLOBAL_ATEXIT
102
# define _REENT_INIT_ATEXIT
103
#else
104
# define _REENT_INIT_ATEXIT \
105
  _NULL, _ATEXIT_INIT,
106
#endif
107
 
4349 Serge 108
/*
109
 * Stdio buffers.
110
 *
111
 * This and __FILE are defined here because we need them for struct _reent,
112
 * but we don't want stdio.h included when stdlib.h is.
113
 */
114
 
115
struct __sbuf {
116
	unsigned char *_base;
117
	int	_size;
118
};
119
 
120
/*
121
 * Stdio state variables.
122
 *
123
 * The following always hold:
124
 *
125
 *	if (_flags&(__SLBF|__SWR)) == (__SLBF|__SWR),
126
 *		_lbfsize is -_bf._size, else _lbfsize is 0
127
 *	if _flags&__SRD, _w is 0
128
 *	if _flags&__SWR, _r is 0
129
 *
130
 * This ensures that the getc and putc macros (or inline functions) never
131
 * try to write or read from a file that is in `read' or `write' mode.
132
 * (Moreover, they can, and do, automatically switch from read mode to
133
 * write mode, and back, on "r+" and "w+" files.)
134
 *
135
 * _lbfsize is used only to make the inline line-buffered output stream
136
 * code as compact as possible.
137
 *
138
 * _ub, _up, and _ur are used when ungetc() pushes back more characters
139
 * than fit in the current _bf, or when ungetc() pushes back a character
140
 * that does not match the previous one in _bf.  When this happens,
141
 * _ub._base becomes non-nil (i.e., a stream has ungetc() data iff
142
 * _ub._base!=NULL) and _up and _ur save the current values of _p and _r.
143
 */
144
 
145
#ifdef _REENT_SMALL
146
/*
147
 * struct __sFILE_fake is the start of a struct __sFILE, with only the
148
 * minimal fields allocated.  In __sinit() we really allocate the 3
149
 * standard streams, etc., and point away from this fake.
150
 */
151
struct __sFILE_fake {
152
  unsigned char *_p;	/* current position in (some) buffer */
153
  int	_r;		/* read space left for getc() */
154
  int	_w;		/* write space left for putc() */
155
  short	_flags;		/* flags, below; this FILE is free if 0 */
156
  short	_file;		/* fileno, if Unix descriptor, else -1 */
157
  struct __sbuf _bf;	/* the buffer (at least 1 byte, if !NULL) */
158
  int	_lbfsize;	/* 0 or -_bf._size, for inline putc */
159
 
160
  struct _reent *_data;
161
};
162
 
163
/* Following is needed both in libc/stdio and libc/stdlib so we put it
164
 * here instead of libc/stdio/local.h where it was previously. */
165
 
166
extern _VOID   _EXFUN(__sinit,(struct _reent *));
167
 
168
# define _REENT_SMALL_CHECK_INIT(ptr)		\
169
  do						\
170
    {						\
171
      if ((ptr) && !(ptr)->__sdidinit)		\
172
	__sinit (ptr);				\
173
    }						\
174
  while (0)
175
#else
176
# define _REENT_SMALL_CHECK_INIT(ptr) /* nothing */
177
#endif
178
 
179
struct __sFILE {
180
  unsigned char *_p;	/* current position in (some) buffer */
181
  int	_r;		/* read space left for getc() */
182
  int	_w;		/* write space left for putc() */
183
  short	_flags;		/* flags, below; this FILE is free if 0 */
184
  short	_file;		/* fileno, if Unix descriptor, else -1 */
185
  struct __sbuf _bf;	/* the buffer (at least 1 byte, if !NULL) */
186
  int	_lbfsize;	/* 0 or -_bf._size, for inline putc */
187
 
188
#ifdef _REENT_SMALL
189
  struct _reent *_data;
190
#endif
191
 
192
  /* operations */
193
  _PTR	_cookie;	/* cookie passed to io functions */
194
 
195
  _READ_WRITE_RETURN_TYPE _EXFNPTR(_read, (struct _reent *, _PTR,
4921 Serge 196
					   char *, _READ_WRITE_BUFSIZE_TYPE));
4349 Serge 197
  _READ_WRITE_RETURN_TYPE _EXFNPTR(_write, (struct _reent *, _PTR,
4921 Serge 198
					    const char *,
199
					    _READ_WRITE_BUFSIZE_TYPE));
4349 Serge 200
  _fpos_t _EXFNPTR(_seek, (struct _reent *, _PTR, _fpos_t, int));
201
  int _EXFNPTR(_close, (struct _reent *, _PTR));
202
 
203
  /* separate buffer for long sequences of ungetc() */
204
  struct __sbuf _ub;	/* ungetc buffer */
205
  unsigned char *_up;	/* saved _p when _p is doing ungetc data */
206
  int	_ur;		/* saved _r when _r is counting ungetc data */
207
 
208
  /* tricks to meet minimum requirements even when malloc() fails */
209
  unsigned char _ubuf[3];	/* guarantee an ungetc() buffer */
210
  unsigned char _nbuf[1];	/* guarantee a getc() buffer */
211
 
212
  /* separate buffer for fgetline() when line crosses buffer boundary */
213
  struct __sbuf _lb;	/* buffer for fgetline() */
214
 
215
  /* Unix stdio files get aligned to block boundaries on fseek() */
216
  int	_blksize;	/* stat.st_blksize (may be != _bf._size) */
4921 Serge 217
  _off_t _offset;	/* current lseek offset */
4349 Serge 218
 
219
#ifndef _REENT_SMALL
220
  struct _reent *_data;	/* Here for binary compatibility? Remove? */
221
#endif
222
 
223
#ifndef __SINGLE_THREAD__
224
  _flock_t _lock;	/* for thread-safety locking */
225
#endif
226
  _mbstate_t _mbstate;	/* for wide char stdio functions. */
227
  int   _flags2;        /* for future use */
228
};
229
 
230
#ifdef __CUSTOM_FILE_IO__
231
 
232
/* Get custom _FILE definition.  */
233
#include 
234
 
235
#else /* !__CUSTOM_FILE_IO__ */
236
#ifdef __LARGE64_FILES
237
struct __sFILE64 {
238
  unsigned char *_p;	/* current position in (some) buffer */
239
  int	_r;		/* read space left for getc() */
240
  int	_w;		/* write space left for putc() */
241
  short	_flags;		/* flags, below; this FILE is free if 0 */
242
  short	_file;		/* fileno, if Unix descriptor, else -1 */
243
  struct __sbuf _bf;	/* the buffer (at least 1 byte, if !NULL) */
244
  int	_lbfsize;	/* 0 or -_bf._size, for inline putc */
245
 
246
  struct _reent *_data;
247
 
248
  /* operations */
249
  _PTR	_cookie;	/* cookie passed to io functions */
250
 
251
  _READ_WRITE_RETURN_TYPE _EXFNPTR(_read, (struct _reent *, _PTR,
4921 Serge 252
					   char *, _READ_WRITE_BUFSIZE_TYPE));
4349 Serge 253
  _READ_WRITE_RETURN_TYPE _EXFNPTR(_write, (struct _reent *, _PTR,
4921 Serge 254
					    const char *,
255
					    _READ_WRITE_BUFSIZE_TYPE));
4349 Serge 256
  _fpos_t _EXFNPTR(_seek, (struct _reent *, _PTR, _fpos_t, int));
257
  int _EXFNPTR(_close, (struct _reent *, _PTR));
258
 
259
  /* separate buffer for long sequences of ungetc() */
260
  struct __sbuf _ub;	/* ungetc buffer */
261
  unsigned char *_up;	/* saved _p when _p is doing ungetc data */
262
  int	_ur;		/* saved _r when _r is counting ungetc data */
263
 
264
  /* tricks to meet minimum requirements even when malloc() fails */
265
  unsigned char _ubuf[3];	/* guarantee an ungetc() buffer */
266
  unsigned char _nbuf[1];	/* guarantee a getc() buffer */
267
 
268
  /* separate buffer for fgetline() when line crosses buffer boundary */
269
  struct __sbuf _lb;	/* buffer for fgetline() */
270
 
271
  /* Unix stdio files get aligned to block boundaries on fseek() */
272
  int	_blksize;	/* stat.st_blksize (may be != _bf._size) */
273
  int   _flags2;        /* for future use */
274
 
275
  _off64_t _offset;     /* current lseek offset */
276
  _fpos64_t _EXFNPTR(_seek64, (struct _reent *, _PTR, _fpos64_t, int));
277
 
278
#ifndef __SINGLE_THREAD__
279
  _flock_t _lock;	/* for thread-safety locking */
280
#endif
281
  _mbstate_t _mbstate;	/* for wide char stdio functions. */
282
};
283
typedef struct __sFILE64 __FILE;
284
#else
285
typedef struct __sFILE   __FILE;
286
#endif /* __LARGE64_FILES */
287
#endif /* !__CUSTOM_FILE_IO__ */
288
 
289
struct _glue
290
{
291
  struct _glue *_next;
292
  int _niobs;
293
  __FILE *_iobs;
294
};
295
 
296
/*
297
 * rand48 family support
298
 *
299
 * Copyright (c) 1993 Martin Birgmeier
300
 * All rights reserved.
301
 *
302
 * You may redistribute unmodified or modified versions of this source
303
 * code provided that the above copyright notice and this and the
304
 * following conditions are retained.
305
 *
306
 * This software is provided ``as is'', and comes with no warranties
307
 * of any kind. I shall in no event be liable for anything that happens
308
 * to anyone/anything when using this software.
309
 */
310
#define        _RAND48_SEED_0  (0x330e)
311
#define        _RAND48_SEED_1  (0xabcd)
312
#define        _RAND48_SEED_2  (0x1234)
313
#define        _RAND48_MULT_0  (0xe66d)
314
#define        _RAND48_MULT_1  (0xdeec)
315
#define        _RAND48_MULT_2  (0x0005)
316
#define        _RAND48_ADD     (0x000b)
317
struct _rand48 {
318
  unsigned short _seed[3];
319
  unsigned short _mult[3];
320
  unsigned short _add;
321
#ifdef _REENT_SMALL
322
  /* Put this in here as well, for good luck.  */
323
  __extension__ unsigned long long _rand_next;
324
#endif
325
};
326
 
327
/* How big the some arrays are.  */
328
#define _REENT_EMERGENCY_SIZE 25
329
#define _REENT_ASCTIME_SIZE 26
330
#define _REENT_SIGNAL_SIZE 24
331
 
332
/*
333
 * struct _reent
334
 *
335
 * This structure contains *all* globals needed by the library.
336
 * It's raison d'etre is to facilitate threads by making all library routines
337
 * reentrant.  IE: All state information is contained here.
338
 */
339
 
340
#ifdef _REENT_SMALL
341
 
342
struct _mprec
343
{
344
  /* used by mprec routines */
345
  struct _Bigint *_result;
346
  int _result_k;
347
  struct _Bigint *_p5s;
348
  struct _Bigint **_freelist;
349
};
350
 
351
 
352
struct _misc_reent
353
{
354
  /* miscellaneous reentrant data */
355
  char *_strtok_last;
356
  _mbstate_t _mblen_state;
357
  _mbstate_t _wctomb_state;
358
  _mbstate_t _mbtowc_state;
359
  char _l64a_buf[8];
360
  int _getdate_err;
361
  _mbstate_t _mbrlen_state;
362
  _mbstate_t _mbrtowc_state;
363
  _mbstate_t _mbsrtowcs_state;
364
  _mbstate_t _wcrtomb_state;
365
  _mbstate_t _wcsrtombs_state;
366
};
367
 
4921 Serge 368
/* This version of _reent is laid out with "int"s in pairs, to help
4349 Serge 369
 * ports with 16-bit int's but 32-bit pointers, align nicely.  */
370
struct _reent
371
{
372
  /* As an exception to the above put _errno first for binary
373
     compatibility with non _REENT_SMALL targets.  */
374
  int _errno;			/* local copy of errno */
375
 
376
  /* FILE is a big struct and may change over time.  To try to achieve binary
377
     compatibility with future versions, put stdin,stdout,stderr here.
378
     These are pointers into member __sf defined below.  */
379
  __FILE *_stdin, *_stdout, *_stderr;	/* XXX */
380
 
381
  int  _inc;			/* used by tmpnam */
382
 
383
  char *_emergency;
384
 
385
  int __sdidinit;		/* 1 means stdio has been init'd */
386
 
387
  int _current_category;	/* unused */
388
  _CONST char *_current_locale;	/* unused */
389
 
390
  struct _mprec *_mp;
391
 
392
  void _EXFNPTR(__cleanup, (struct _reent *));
393
 
394
  int _gamma_signgam;
395
 
396
  /* used by some fp conversion routines */
397
  int _cvtlen;			/* should be size_t */
398
  char *_cvtbuf;
399
 
400
  struct _rand48 *_r48;
401
  struct __tm *_localtime_buf;
402
  char *_asctime_buf;
403
 
404
  /* signal info */
405
  void (**(_sig_func))(int);
406
 
4921 Serge 407
# ifndef _REENT_GLOBAL_ATEXIT
4349 Serge 408
  /* atexit stuff */
409
  struct _atexit *_atexit;
410
  struct _atexit _atexit0;
4921 Serge 411
# endif
4349 Serge 412
 
413
  struct _glue __sglue;			/* root of glue chain */
414
  __FILE *__sf;			        /* file descriptors */
415
  struct _misc_reent *_misc;            /* strtok, multibyte states */
416
  char *_signal_buf;                    /* strsignal */
417
};
418
 
419
extern const struct __sFILE_fake __sf_fake_stdin;
420
extern const struct __sFILE_fake __sf_fake_stdout;
421
extern const struct __sFILE_fake __sf_fake_stderr;
422
 
423
# define _REENT_INIT(var) \
424
  { 0, \
425
    (__FILE *)&__sf_fake_stdin, \
426
    (__FILE *)&__sf_fake_stdout, \
427
    (__FILE *)&__sf_fake_stderr, \
428
    0, \
429
    _NULL, \
430
    0, \
431
    0, \
432
    "C", \
433
    _NULL, \
434
    _NULL, \
435
    0, \
436
    0, \
437
    _NULL, \
438
    _NULL, \
439
    _NULL, \
440
    _NULL, \
441
    _NULL, \
4921 Serge 442
    _REENT_INIT_ATEXIT \
4349 Serge 443
    {_NULL, 0, _NULL}, \
444
    _NULL, \
445
    _NULL, \
446
    _NULL \
447
  }
448
 
6099 serge 449
#define _REENT_INIT_PTR_ZEROED(var) \
450
  { (var)->_stdin = (__FILE *)&__sf_fake_stdin; \
4349 Serge 451
    (var)->_stdout = (__FILE *)&__sf_fake_stdout; \
452
    (var)->_stderr = (__FILE *)&__sf_fake_stderr; \
453
    (var)->_current_locale = "C"; \
454
  }
455
 
456
/* Only built the assert() calls if we are built with debugging.  */
457
#if DEBUG
458
#include 
459
#define __reent_assert(x) assert(x)
460
#else
461
#define __reent_assert(x) ((void)0)
462
#endif
463
 
464
#ifdef __CUSTOM_FILE_IO__
465
#error Custom FILE I/O and _REENT_SMALL not currently supported.
466
#endif
467
 
468
/* Generic _REENT check macro.  */
469
#define _REENT_CHECK(var, what, type, size, init) do { \
470
  struct _reent *_r = (var); \
471
  if (_r->what == NULL) { \
472
    _r->what = (type)malloc(size); \
473
    __reent_assert(_r->what); \
474
    init; \
475
  } \
476
} while (0)
477
 
478
#define _REENT_CHECK_TM(var) \
479
  _REENT_CHECK(var, _localtime_buf, struct __tm *, sizeof *((var)->_localtime_buf), \
480
    /* nothing */)
481
 
482
#define _REENT_CHECK_ASCTIME_BUF(var) \
483
  _REENT_CHECK(var, _asctime_buf, char *, _REENT_ASCTIME_SIZE, \
484
    memset((var)->_asctime_buf, 0, _REENT_ASCTIME_SIZE))
485
 
486
/* Handle the dynamically allocated rand48 structure. */
487
#define _REENT_INIT_RAND48(var) do { \
488
  struct _reent *_r = (var); \
489
  _r->_r48->_seed[0] = _RAND48_SEED_0; \
490
  _r->_r48->_seed[1] = _RAND48_SEED_1; \
491
  _r->_r48->_seed[2] = _RAND48_SEED_2; \
492
  _r->_r48->_mult[0] = _RAND48_MULT_0; \
493
  _r->_r48->_mult[1] = _RAND48_MULT_1; \
494
  _r->_r48->_mult[2] = _RAND48_MULT_2; \
495
  _r->_r48->_add = _RAND48_ADD; \
496
  _r->_r48->_rand_next = 1; \
497
} while (0)
498
#define _REENT_CHECK_RAND48(var) \
499
  _REENT_CHECK(var, _r48, struct _rand48 *, sizeof *((var)->_r48), _REENT_INIT_RAND48((var)))
500
 
501
#define _REENT_INIT_MP(var) do { \
502
  struct _reent *_r = (var); \
503
  _r->_mp->_result_k = 0; \
504
  _r->_mp->_result = _r->_mp->_p5s = _NULL; \
505
  _r->_mp->_freelist = _NULL; \
506
} while (0)
507
#define _REENT_CHECK_MP(var) \
508
  _REENT_CHECK(var, _mp, struct _mprec *, sizeof *((var)->_mp), _REENT_INIT_MP(var))
509
 
510
#define _REENT_CHECK_EMERGENCY(var) \
511
  _REENT_CHECK(var, _emergency, char *, _REENT_EMERGENCY_SIZE, /* nothing */)
512
 
513
#define _REENT_INIT_MISC(var) do { \
514
  struct _reent *_r = (var); \
515
  _r->_misc->_strtok_last = _NULL; \
516
  _r->_misc->_mblen_state.__count = 0; \
517
  _r->_misc->_mblen_state.__value.__wch = 0; \
518
  _r->_misc->_wctomb_state.__count = 0; \
519
  _r->_misc->_wctomb_state.__value.__wch = 0; \
520
  _r->_misc->_mbtowc_state.__count = 0; \
521
  _r->_misc->_mbtowc_state.__value.__wch = 0; \
522
  _r->_misc->_mbrlen_state.__count = 0; \
523
  _r->_misc->_mbrlen_state.__value.__wch = 0; \
524
  _r->_misc->_mbrtowc_state.__count = 0; \
525
  _r->_misc->_mbrtowc_state.__value.__wch = 0; \
526
  _r->_misc->_mbsrtowcs_state.__count = 0; \
527
  _r->_misc->_mbsrtowcs_state.__value.__wch = 0; \
528
  _r->_misc->_wcrtomb_state.__count = 0; \
529
  _r->_misc->_wcrtomb_state.__value.__wch = 0; \
530
  _r->_misc->_wcsrtombs_state.__count = 0; \
531
  _r->_misc->_wcsrtombs_state.__value.__wch = 0; \
532
  _r->_misc->_l64a_buf[0] = '\0'; \
533
  _r->_misc->_getdate_err = 0; \
534
} while (0)
535
#define _REENT_CHECK_MISC(var) \
536
  _REENT_CHECK(var, _misc, struct _misc_reent *, sizeof *((var)->_misc), _REENT_INIT_MISC(var))
537
 
538
#define _REENT_CHECK_SIGNAL_BUF(var) \
539
  _REENT_CHECK(var, _signal_buf, char *, _REENT_SIGNAL_SIZE, /* nothing */)
540
 
541
#define _REENT_SIGNGAM(ptr)	((ptr)->_gamma_signgam)
542
#define _REENT_RAND_NEXT(ptr)	((ptr)->_r48->_rand_next)
543
#define _REENT_RAND48_SEED(ptr)	((ptr)->_r48->_seed)
544
#define _REENT_RAND48_MULT(ptr)	((ptr)->_r48->_mult)
545
#define _REENT_RAND48_ADD(ptr)	((ptr)->_r48->_add)
546
#define _REENT_MP_RESULT(ptr)	((ptr)->_mp->_result)
547
#define _REENT_MP_RESULT_K(ptr)	((ptr)->_mp->_result_k)
548
#define _REENT_MP_P5S(ptr)	((ptr)->_mp->_p5s)
549
#define _REENT_MP_FREELIST(ptr)	((ptr)->_mp->_freelist)
550
#define _REENT_ASCTIME_BUF(ptr)	((ptr)->_asctime_buf)
551
#define _REENT_TM(ptr)		((ptr)->_localtime_buf)
552
#define _REENT_EMERGENCY(ptr)	((ptr)->_emergency)
553
#define _REENT_STRTOK_LAST(ptr)	((ptr)->_misc->_strtok_last)
554
#define _REENT_MBLEN_STATE(ptr)	((ptr)->_misc->_mblen_state)
555
#define _REENT_MBTOWC_STATE(ptr)((ptr)->_misc->_mbtowc_state)
556
#define _REENT_WCTOMB_STATE(ptr)((ptr)->_misc->_wctomb_state)
557
#define _REENT_MBRLEN_STATE(ptr) ((ptr)->_misc->_mbrlen_state)
558
#define _REENT_MBRTOWC_STATE(ptr) ((ptr)->_misc->_mbrtowc_state)
559
#define _REENT_MBSRTOWCS_STATE(ptr) ((ptr)->_misc->_mbsrtowcs_state)
560
#define _REENT_WCRTOMB_STATE(ptr) ((ptr)->_misc->_wcrtomb_state)
561
#define _REENT_WCSRTOMBS_STATE(ptr) ((ptr)->_misc->_wcsrtombs_state)
562
#define _REENT_L64A_BUF(ptr)    ((ptr)->_misc->_l64a_buf)
563
#define _REENT_GETDATE_ERR_P(ptr) (&((ptr)->_misc->_getdate_err))
564
#define _REENT_SIGNAL_BUF(ptr)  ((ptr)->_signal_buf)
565
 
566
#else /* !_REENT_SMALL */
567
 
568
struct _reent
569
{
570
  int _errno;			/* local copy of errno */
571
 
572
  /* FILE is a big struct and may change over time.  To try to achieve binary
573
     compatibility with future versions, put stdin,stdout,stderr here.
574
     These are pointers into member __sf defined below.  */
575
  __FILE *_stdin, *_stdout, *_stderr;
576
 
577
  int  _inc;			/* used by tmpnam */
578
  char _emergency[_REENT_EMERGENCY_SIZE];
579
 
580
  int _current_category;	/* used by setlocale */
581
  _CONST char *_current_locale;
582
 
583
  int __sdidinit;		/* 1 means stdio has been init'd */
584
 
585
  void _EXFNPTR(__cleanup, (struct _reent *));
586
 
587
  /* used by mprec routines */
588
  struct _Bigint *_result;
589
  int _result_k;
590
  struct _Bigint *_p5s;
591
  struct _Bigint **_freelist;
592
 
593
  /* used by some fp conversion routines */
594
  int _cvtlen;			/* should be size_t */
595
  char *_cvtbuf;
596
 
597
  union
598
    {
599
      struct
600
        {
601
          unsigned int _unused_rand;
602
          char * _strtok_last;
603
          char _asctime_buf[_REENT_ASCTIME_SIZE];
604
          struct __tm _localtime_buf;
605
          int _gamma_signgam;
606
          __extension__ unsigned long long _rand_next;
607
          struct _rand48 _r48;
608
          _mbstate_t _mblen_state;
609
          _mbstate_t _mbtowc_state;
610
          _mbstate_t _wctomb_state;
611
          char _l64a_buf[8];
612
          char _signal_buf[_REENT_SIGNAL_SIZE];
613
          int _getdate_err;
614
          _mbstate_t _mbrlen_state;
615
          _mbstate_t _mbrtowc_state;
616
          _mbstate_t _mbsrtowcs_state;
617
          _mbstate_t _wcrtomb_state;
618
          _mbstate_t _wcsrtombs_state;
619
	  int _h_errno;
620
        } _reent;
621
  /* Two next two fields were once used by malloc.  They are no longer
622
     used. They are used to preserve the space used before so as to
623
     allow addition of new reent fields and keep binary compatibility.   */
624
      struct
625
        {
626
#define _N_LISTS 30
627
          unsigned char * _nextf[_N_LISTS];
628
          unsigned int _nmalloc[_N_LISTS];
629
        } _unused;
630
    } _new;
631
 
4921 Serge 632
# ifndef _REENT_GLOBAL_ATEXIT
4349 Serge 633
  /* atexit stuff */
634
  struct _atexit *_atexit;	/* points to head of LIFO stack */
635
  struct _atexit _atexit0;	/* one guaranteed table, required by ANSI */
4921 Serge 636
# endif
4349 Serge 637
 
638
  /* signal info */
639
  void (**(_sig_func))(int);
640
 
641
  /* These are here last so that __FILE can grow without changing the offsets
642
     of the above members (on the off chance that future binary compatibility
643
     would be broken otherwise).  */
644
  struct _glue __sglue;		/* root of glue chain */
645
  __FILE __sf[3];  		/* first three file descriptors */
646
};
647
 
648
#define _REENT_INIT(var) \
649
  { 0, \
650
    &(var).__sf[0], \
651
    &(var).__sf[1], \
652
    &(var).__sf[2], \
653
    0, \
654
    "", \
655
    0, \
656
    "C", \
657
    0, \
658
    _NULL, \
659
    _NULL, \
660
    0, \
661
    _NULL, \
662
    _NULL, \
663
    0, \
664
    _NULL, \
665
    { \
666
      { \
667
        0, \
668
        _NULL, \
669
        "", \
670
        {0, 0, 0, 0, 0, 0, 0, 0, 0}, \
671
        0, \
672
        1, \
673
        { \
674
          {_RAND48_SEED_0, _RAND48_SEED_1, _RAND48_SEED_2}, \
675
          {_RAND48_MULT_0, _RAND48_MULT_1, _RAND48_MULT_2}, \
676
          _RAND48_ADD \
677
        }, \
678
        {0, {0}}, \
679
        {0, {0}}, \
680
        {0, {0}}, \
681
        "", \
682
        "", \
683
        0, \
684
        {0, {0}}, \
685
        {0, {0}}, \
686
        {0, {0}}, \
687
        {0, {0}}, \
688
        {0, {0}} \
689
      } \
690
    }, \
4921 Serge 691
    _REENT_INIT_ATEXIT \
4349 Serge 692
    _NULL, \
693
    {_NULL, 0, _NULL} \
694
  }
695
 
6099 serge 696
#define _REENT_INIT_PTR_ZEROED(var) \
697
  { (var)->_stdin = &(var)->__sf[0]; \
4349 Serge 698
    (var)->_stdout = &(var)->__sf[1]; \
699
    (var)->_stderr = &(var)->__sf[2]; \
700
    (var)->_current_locale = "C"; \
701
    (var)->_new._reent._rand_next = 1; \
702
    (var)->_new._reent._r48._seed[0] = _RAND48_SEED_0; \
703
    (var)->_new._reent._r48._seed[1] = _RAND48_SEED_1; \
704
    (var)->_new._reent._r48._seed[2] = _RAND48_SEED_2; \
705
    (var)->_new._reent._r48._mult[0] = _RAND48_MULT_0; \
706
    (var)->_new._reent._r48._mult[1] = _RAND48_MULT_1; \
707
    (var)->_new._reent._r48._mult[2] = _RAND48_MULT_2; \
708
    (var)->_new._reent._r48._add = _RAND48_ADD; \
709
  }
710
 
711
#define _REENT_CHECK_RAND48(ptr)	/* nothing */
712
#define _REENT_CHECK_MP(ptr)		/* nothing */
713
#define _REENT_CHECK_TM(ptr)		/* nothing */
714
#define _REENT_CHECK_ASCTIME_BUF(ptr)	/* nothing */
715
#define _REENT_CHECK_EMERGENCY(ptr)	/* nothing */
716
#define _REENT_CHECK_MISC(ptr)	        /* nothing */
717
#define _REENT_CHECK_SIGNAL_BUF(ptr)	/* nothing */
718
 
719
#define _REENT_SIGNGAM(ptr)	((ptr)->_new._reent._gamma_signgam)
720
#define _REENT_RAND_NEXT(ptr)	((ptr)->_new._reent._rand_next)
721
#define _REENT_RAND48_SEED(ptr)	((ptr)->_new._reent._r48._seed)
722
#define _REENT_RAND48_MULT(ptr)	((ptr)->_new._reent._r48._mult)
723
#define _REENT_RAND48_ADD(ptr)	((ptr)->_new._reent._r48._add)
724
#define _REENT_MP_RESULT(ptr)	((ptr)->_result)
725
#define _REENT_MP_RESULT_K(ptr)	((ptr)->_result_k)
726
#define _REENT_MP_P5S(ptr)	((ptr)->_p5s)
727
#define _REENT_MP_FREELIST(ptr)	((ptr)->_freelist)
728
#define _REENT_ASCTIME_BUF(ptr)	((ptr)->_new._reent._asctime_buf)
729
#define _REENT_TM(ptr)		(&(ptr)->_new._reent._localtime_buf)
730
#define _REENT_EMERGENCY(ptr)	((ptr)->_emergency)
731
#define _REENT_STRTOK_LAST(ptr)	((ptr)->_new._reent._strtok_last)
732
#define _REENT_MBLEN_STATE(ptr)	((ptr)->_new._reent._mblen_state)
733
#define _REENT_MBTOWC_STATE(ptr)((ptr)->_new._reent._mbtowc_state)
734
#define _REENT_WCTOMB_STATE(ptr)((ptr)->_new._reent._wctomb_state)
735
#define _REENT_MBRLEN_STATE(ptr)((ptr)->_new._reent._mbrlen_state)
736
#define _REENT_MBRTOWC_STATE(ptr)((ptr)->_new._reent._mbrtowc_state)
737
#define _REENT_MBSRTOWCS_STATE(ptr)((ptr)->_new._reent._mbsrtowcs_state)
738
#define _REENT_WCRTOMB_STATE(ptr)((ptr)->_new._reent._wcrtomb_state)
739
#define _REENT_WCSRTOMBS_STATE(ptr)((ptr)->_new._reent._wcsrtombs_state)
740
#define _REENT_L64A_BUF(ptr)    ((ptr)->_new._reent._l64a_buf)
741
#define _REENT_SIGNAL_BUF(ptr)  ((ptr)->_new._reent._signal_buf)
742
#define _REENT_GETDATE_ERR_P(ptr) (&((ptr)->_new._reent._getdate_err))
743
 
744
#endif /* !_REENT_SMALL */
745
 
6099 serge 746
#define _REENT_INIT_PTR(var) \
747
  { memset((var), 0, sizeof(*(var))); \
748
    _REENT_INIT_PTR_ZEROED(var); \
749
  }
750
 
4349 Serge 751
/* This value is used in stdlib/misc.c.  reent/reent.c has to know it
752
   as well to make sure the freelist is correctly free'd.  Therefore
753
   we define it here, rather than in stdlib/misc.c, as before. */
754
#define _Kmax (sizeof (size_t) << 3)
755
 
756
/*
757
 * All references to struct _reent are via this pointer.
758
 * Internally, newlib routines that need to reference it should use _REENT.
759
 */
760
 
761
#ifndef __ATTRIBUTE_IMPURE_PTR__
762
#define __ATTRIBUTE_IMPURE_PTR__
763
#endif
764
 
765
extern struct _reent *_impure_ptr __ATTRIBUTE_IMPURE_PTR__;
766
extern struct _reent *_CONST _global_impure_ptr __ATTRIBUTE_IMPURE_PTR__;
767
 
768
void _reclaim_reent _PARAMS ((struct _reent *));
769
 
770
/* #define _REENT_ONLY define this to get only reentrant routines */
771
 
4921 Serge 772
#if defined(__DYNAMIC_REENT__) && !defined(__SINGLE_THREAD__)
773
#ifndef __getreent
4349 Serge 774
static inline struct _reent *__getreent(void)
775
{
776
    struct _reent *ent;
777
    __asm__ __volatile__(
778
    "movl %%fs:16, %0"
779
    :"=r"(ent));
780
    return ent;
781
};
4921 Serge 782
#endif
783
# define _REENT (__getreent())
784
#else /* __SINGLE_THREAD__ || !__DYNAMIC_REENT__ */
785
# define _REENT _impure_ptr
786
#endif /* __SINGLE_THREAD__ || !__DYNAMIC_REENT__ */
4349 Serge 787
 
788
#define _GLOBAL_REENT _global_impure_ptr
789
 
4921 Serge 790
#ifdef _REENT_GLOBAL_ATEXIT
791
extern struct _atexit *_global_atexit; /* points to head of LIFO stack */
792
# define _GLOBAL_ATEXIT _global_atexit
793
#else
794
# define _GLOBAL_ATEXIT (_GLOBAL_REENT->_atexit)
795
#endif
796
 
4349 Serge 797
#ifdef __cplusplus
798
}
799
#endif
800
#endif /* _SYS_REENT_H_ */