perl5.git.perl.org Git - perl5.git/blame_incremental

... / ...

Commit	Line	Data
	1	/* -- buffer-read-only: t --
	2	*
	3	* reentr.h
	4	*
	5	* Copyright (C) 2002, 2003, 2005, 2006, 2007 by Larry Wall and others
	6	*
	7	* You may distribute under the terms of either the GNU General Public
	8	* License or the Artistic License, as specified in the README file.
	9	*
	10	* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
	11	* This file is built by regen/reentr.pl from data in regen/reentr.pl.
	12	* Any changes made here will be lost!
	13	*/
	14
	15	#ifndef REENTR_H
	16	#define REENTR_H
	17
	18	/* If compiling for a threaded perl, we will macro-wrap the system/library
	19	* interfaces (e.g. getpwent()) which have threaded versions
	20	* (e.g. getpwent_r()), which will handle things correctly for
	21	* the Perl interpreter, but otherwise (for XS) the wrapping does
	22	* not take place. See L<perlxs/Thread-aware system interfaces>.
	23	*/
	24
	25	#ifndef PERL_REENTR_API
	26	# if defined(PERL_CORE) \|\| defined(PERL_EXT)
	27	# define PERL_REENTR_API 1
	28	# else
	29	# define PERL_REENTR_API 0
	30	# endif
	31	#endif
	32
	33	#ifdef USE_REENTRANT_API
	34
	35	/* Deprecations: some platforms have the said reentrant interfaces
	36	* but they are declared obsolete and are not to be used. Often this
	37	* means that the platform has threadsafed the interfaces (hopefully).
	38	* All this is OS version dependent, so we are of course fooling ourselves.
	39	* If you know of more deprecations on some platforms, please add your own
	40	* (by editing reentr.pl, mind!) */
	41
	42	#ifdef __hpux
	43	# undef HAS_CRYPT_R
	44	# undef HAS_DRAND48_R
	45	# undef HAS_ENDGRENT_R
	46	# undef HAS_ENDPWENT_R
	47	# undef HAS_GETGRENT_R
	48	# undef HAS_GETPWENT_R
	49	# undef HAS_SETLOCALE_R
	50	# undef HAS_SRAND48_R
	51	# undef HAS_STRERROR_R
	52	# define NETDB_R_OBSOLETE
	53	#endif
	54
	55	#if defined(__osf__) && defined(__alpha) /* Tru64 aka Digital UNIX */
	56	# undef HAS_CRYPT_R
	57	# undef HAS_STRERROR_R
	58	# define NETDB_R_OBSOLETE
	59	#endif
	60
	61	/*
	62	* As of OpenBSD 3.7, reentrant functions are now working, they just are
	63	* incompatible with everyone else. To make OpenBSD happy, we have to
	64	* memzero out certain structures before calling the functions.
	65	*/
	66	#if defined(__OpenBSD__)
	67	# define REENTR_MEMZERO(a,b) memzero(a,b)
	68	#else
	69	# define REENTR_MEMZERO(a,b) 0
	70	#endif
	71
	72	#ifdef NETDB_R_OBSOLETE
	73	# undef HAS_ENDHOSTENT_R
	74	# undef HAS_ENDNETENT_R
	75	# undef HAS_ENDPROTOENT_R
	76	# undef HAS_ENDSERVENT_R
	77	# undef HAS_GETHOSTBYADDR_R
	78	# undef HAS_GETHOSTBYNAME_R
	79	# undef HAS_GETHOSTENT_R
	80	# undef HAS_GETNETBYADDR_R
	81	# undef HAS_GETNETBYNAME_R
	82	# undef HAS_GETNETENT_R
	83	# undef HAS_GETPROTOBYNAME_R
	84	# undef HAS_GETPROTOBYNUMBER_R
	85	# undef HAS_GETPROTOENT_R
	86	# undef HAS_GETSERVBYNAME_R
	87	# undef HAS_GETSERVBYPORT_R
	88	# undef HAS_GETSERVENT_R
	89	# undef HAS_SETHOSTENT_R
	90	# undef HAS_SETNETENT_R
	91	# undef HAS_SETPROTOENT_R
	92	# undef HAS_SETSERVENT_R
	93	#endif
	94
	95	#ifdef I_PWD
	96	# include <pwd.h>
	97	#endif
	98	#ifdef I_GRP
	99	# include <grp.h>
	100	#endif
	101	#ifdef I_NETDB
	102	# include <netdb.h>
	103	#endif
	104	#ifdef I_STDLIB
	105	# include <stdlib.h> /* drand48_data */
	106	#endif
	107	#ifdef I_CRYPT
	108	# ifdef I_CRYPT
	109	# include <crypt.h>
	110	# endif
	111	#endif
	112	#ifdef HAS_GETSPNAM_R
	113	# ifdef I_SHADOW
	114	# include <shadow.h>
	115	# endif
	116	#endif
	117
	118	#define REENTRANT_PROTO_B_B 1
	119	#define REENTRANT_PROTO_B_BI 2
	120	#define REENTRANT_PROTO_B_BW 3
	121	#define REENTRANT_PROTO_B_CCD 4
	122	#define REENTRANT_PROTO_B_CCS 5
	123	#define REENTRANT_PROTO_B_IBI 6
	124	#define REENTRANT_PROTO_B_IBW 7
	125	#define REENTRANT_PROTO_B_SB 8
	126	#define REENTRANT_PROTO_B_SBI 9
	127	#define REENTRANT_PROTO_I_BI 10
	128	#define REENTRANT_PROTO_I_BW 11
	129	#define REENTRANT_PROTO_I_CCSBWR 12
	130	#define REENTRANT_PROTO_I_CCSD 13
	131	#define REENTRANT_PROTO_I_CII 14
	132	#define REENTRANT_PROTO_I_CIISD 15
	133	#define REENTRANT_PROTO_I_CSBI 16
	134	#define REENTRANT_PROTO_I_CSBIR 17
	135	#define REENTRANT_PROTO_I_CSBWR 18
	136	#define REENTRANT_PROTO_I_CSBWRE 19
	137	#define REENTRANT_PROTO_I_CSD 20
	138	#define REENTRANT_PROTO_I_CWISBWRE 21
	139	#define REENTRANT_PROTO_I_CWISD 22
	140	#define REENTRANT_PROTO_I_D 23
	141	#define REENTRANT_PROTO_I_H 24
	142	#define REENTRANT_PROTO_I_IBI 25
	143	#define REENTRANT_PROTO_I_IBW 26
	144	#define REENTRANT_PROTO_I_ICBI 27
	145	#define REENTRANT_PROTO_I_ICSBWR 28
	146	#define REENTRANT_PROTO_I_ICSD 29
	147	#define REENTRANT_PROTO_I_ID 30
	148	#define REENTRANT_PROTO_I_IISD 31
	149	#define REENTRANT_PROTO_I_ISBWR 32
	150	#define REENTRANT_PROTO_I_ISD 33
	151	#define REENTRANT_PROTO_I_LISBI 34
	152	#define REENTRANT_PROTO_I_LISD 35
	153	#define REENTRANT_PROTO_I_LS 36
	154	#define REENTRANT_PROTO_I_SB 37
	155	#define REENTRANT_PROTO_I_SBI 38
	156	#define REENTRANT_PROTO_I_SBIE 39
	157	#define REENTRANT_PROTO_I_SBIH 40
	158	#define REENTRANT_PROTO_I_SBIR 41
	159	#define REENTRANT_PROTO_I_SBWR 42
	160	#define REENTRANT_PROTO_I_SBWRE 43
	161	#define REENTRANT_PROTO_I_SD 44
	162	#define REENTRANT_PROTO_I_ST 45
	163	#define REENTRANT_PROTO_I_St 46
	164	#define REENTRANT_PROTO_I_TISD 47
	165	#define REENTRANT_PROTO_I_TS 48
	166	#define REENTRANT_PROTO_I_TSBI 49
	167	#define REENTRANT_PROTO_I_TSBIR 50
	168	#define REENTRANT_PROTO_I_TSBWR 51
	169	#define REENTRANT_PROTO_I_TSR 52
	170	#define REENTRANT_PROTO_I_TsISBWRE 53
	171	#define REENTRANT_PROTO_I_UISBWRE 54
	172	#define REENTRANT_PROTO_I_iS 55
	173	#define REENTRANT_PROTO_I_lS 56
	174	#define REENTRANT_PROTO_I_uISBWRE 57
	175	#define REENTRANT_PROTO_S_CBI 58
	176	#define REENTRANT_PROTO_S_CCSBI 59
	177	#define REENTRANT_PROTO_S_CIISBIE 60
	178	#define REENTRANT_PROTO_S_CSBI 61
	179	#define REENTRANT_PROTO_S_CSBIE 62
	180	#define REENTRANT_PROTO_S_CWISBIE 63
	181	#define REENTRANT_PROTO_S_CWISBWIE 64
	182	#define REENTRANT_PROTO_S_ICSBI 65
	183	#define REENTRANT_PROTO_S_ISBI 66
	184	#define REENTRANT_PROTO_S_LISBI 67
	185	#define REENTRANT_PROTO_S_SBI 68
	186	#define REENTRANT_PROTO_S_SBIE 69
	187	#define REENTRANT_PROTO_S_SBW 70
	188	#define REENTRANT_PROTO_S_TISBI 71
	189	#define REENTRANT_PROTO_S_TSBI 72
	190	#define REENTRANT_PROTO_S_TSBIE 73
	191	#define REENTRANT_PROTO_S_TWISBIE 74
	192	#define REENTRANT_PROTO_V_D 75
	193	#define REENTRANT_PROTO_V_H 76
	194	#define REENTRANT_PROTO_V_ID 77
	195
	196	/* Defines for indicating which special features are supported. */
	197
	198	/* The getgrent getgrgid getgrnam using buffer? */
	199
	200	#if defined(HAS_GETGRENT_R) && (GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIR \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_S_SBW \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_S_SBI \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBI \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIH)
	201	# define GETGRENT_R_HAS_BUFFER
	202	#else
	203	# undef GETGRENT_R_HAS_BUFFER
	204	#endif
	205	#if defined(HAS_GETGRGID_R) && (GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBWR \|\| GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBIR \|\| GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBI \|\| GETGRGID_R_PROTO == REENTRANT_PROTO_S_TSBI)
	206	# define GETGRGID_R_HAS_BUFFER
	207	#else
	208	# undef GETGRGID_R_HAS_BUFFER
	209	#endif
	210	#if defined(HAS_GETGRNAM_R) && (GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR \|\| GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR \|\| GETGRNAM_R_PROTO == REENTRANT_PROTO_S_CBI \|\| GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBI \|\| GETGRNAM_R_PROTO == REENTRANT_PROTO_S_CSBI)
	211	# define GETGRNAM_R_HAS_BUFFER
	212	#else
	213	# undef GETGRNAM_R_HAS_BUFFER
	214	#endif
	215
	216	/* Any of the getgrent getgrgid getgrnam using buffer? */
	217
	218	#if (defined(GETGRENT_R_HAS_BUFFER) \|\| defined(GETGRGID_R_HAS_BUFFER) \|\| defined(GETGRNAM_R_HAS_BUFFER))
	219	# define USE_GRENT_BUFFER
	220	#else
	221	# undef USE_GRENT_BUFFER
	222	#endif
	223
	224	/* The getgrent getgrgid getgrnam using ptr? */
	225
	226	#if defined(HAS_GETGRENT_R) && (GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIR)
	227	# define GETGRENT_R_HAS_PTR
	228	#else
	229	# undef GETGRENT_R_HAS_PTR
	230	#endif
	231	#if defined(HAS_GETGRGID_R) && (GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBWR \|\| GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBIR)
	232	# define GETGRGID_R_HAS_PTR
	233	#else
	234	# undef GETGRGID_R_HAS_PTR
	235	#endif
	236	#if defined(HAS_GETGRNAM_R) && (GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR \|\| GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR)
	237	# define GETGRNAM_R_HAS_PTR
	238	#else
	239	# undef GETGRNAM_R_HAS_PTR
	240	#endif
	241
	242	/* Any of the getgrent getgrgid getgrnam using ptr? */
	243
	244	#if (defined(GETGRENT_R_HAS_PTR) \|\| defined(GETGRGID_R_HAS_PTR) \|\| defined(GETGRNAM_R_HAS_PTR))
	245	# define USE_GRENT_PTR
	246	#else
	247	# undef USE_GRENT_PTR
	248	#endif
	249
	250	/* The getpwent getpwnam getpwuid using ptr? */
	251
	252	#if defined(HAS_GETPWENT_R) && (GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIR)
	253	# define GETPWENT_R_HAS_PTR
	254	#else
	255	# undef GETPWENT_R_HAS_PTR
	256	#endif
	257	#if defined(HAS_GETPWNAM_R) && (GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR \|\| GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR)
	258	# define GETPWNAM_R_HAS_PTR
	259	#else
	260	# undef GETPWNAM_R_HAS_PTR
	261	#endif
	262	#if defined(HAS_GETPWUID_R) && (GETPWUID_R_PROTO == REENTRANT_PROTO_I_TSBWR \|\| GETPWUID_R_PROTO == REENTRANT_PROTO_I_TSBIR)
	263	# define GETPWUID_R_HAS_PTR
	264	#else
	265	# undef GETPWUID_R_HAS_PTR
	266	#endif
	267
	268	/* Any of the getpwent getpwnam getpwuid using ptr? */
	269
	270	#if (defined(GETPWENT_R_HAS_PTR) \|\| defined(GETPWNAM_R_HAS_PTR) \|\| defined(GETPWUID_R_HAS_PTR))
	271	# define USE_PWENT_PTR
	272	#else
	273	# undef USE_PWENT_PTR
	274	#endif
	275
	276	/* The getspent getspnam using ptr? */
	277
	278	#if defined(HAS_GETSPNAM_R) && (GETSPNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR)
	279	# define GETSPNAM_R_HAS_PTR
	280	#else
	281	# undef GETSPNAM_R_HAS_PTR
	282	#endif
	283
	284	/* Any of the getspent getspnam using ptr? */
	285
	286	#if (defined(GETSPENT_R_HAS_PTR) \|\| defined(GETSPNAM_R_HAS_PTR))
	287	# define USE_SPENT_PTR
	288	#else
	289	# undef USE_SPENT_PTR
	290	#endif
	291
	292	/* The getgrent getgrgid getgrnam setgrent endgrent using fptr? */
	293
	294	#if defined(HAS_GETGRENT_R) && (GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIH)
	295	# define GETGRENT_R_HAS_FPTR
	296	#else
	297	# undef GETGRENT_R_HAS_FPTR
	298	#endif
	299	#if defined(HAS_SETGRENT_R) && (SETGRENT_R_PROTO == REENTRANT_PROTO_I_H \|\| SETGRENT_R_PROTO == REENTRANT_PROTO_V_H)
	300	# define SETGRENT_R_HAS_FPTR
	301	#else
	302	# undef SETGRENT_R_HAS_FPTR
	303	#endif
	304	#if defined(HAS_ENDGRENT_R) && (ENDGRENT_R_PROTO == REENTRANT_PROTO_I_H \|\| ENDGRENT_R_PROTO == REENTRANT_PROTO_V_H)
	305	# define ENDGRENT_R_HAS_FPTR
	306	#else
	307	# undef ENDGRENT_R_HAS_FPTR
	308	#endif
	309
	310	/* Any of the getgrent getgrgid getgrnam setgrent endgrent using fptr? */
	311
	312	#if (defined(GETGRENT_R_HAS_FPTR) \|\| defined(GETGRGID_R_HAS_FPTR) \|\| defined(GETGRNAM_R_HAS_FPTR) \|\| defined(SETGRENT_R_HAS_FPTR) \|\| defined(ENDGRENT_R_HAS_FPTR))
	313	# define USE_GRENT_FPTR
	314	#else
	315	# undef USE_GRENT_FPTR
	316	#endif
	317
	318	/* The getpwent getpwnam getpwuid setpwent endpwent using fptr? */
	319
	320	#if defined(HAS_GETPWENT_R) && (GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIH)
	321	# define GETPWENT_R_HAS_FPTR
	322	#else
	323	# undef GETPWENT_R_HAS_FPTR
	324	#endif
	325	#if defined(HAS_SETPWENT_R) && (SETPWENT_R_PROTO == REENTRANT_PROTO_I_H \|\| SETPWENT_R_PROTO == REENTRANT_PROTO_V_H)
	326	# define SETPWENT_R_HAS_FPTR
	327	#else
	328	# undef SETPWENT_R_HAS_FPTR
	329	#endif
	330	#if defined(HAS_ENDPWENT_R) && (ENDPWENT_R_PROTO == REENTRANT_PROTO_I_H \|\| ENDPWENT_R_PROTO == REENTRANT_PROTO_V_H)
	331	# define ENDPWENT_R_HAS_FPTR
	332	#else
	333	# undef ENDPWENT_R_HAS_FPTR
	334	#endif
	335
	336	/* Any of the getpwent getpwnam getpwuid setpwent endpwent using fptr? */
	337
	338	#if (defined(GETPWENT_R_HAS_FPTR) \|\| defined(GETPWNAM_R_HAS_FPTR) \|\| defined(GETPWUID_R_HAS_FPTR) \|\| defined(SETPWENT_R_HAS_FPTR) \|\| defined(ENDPWENT_R_HAS_FPTR))
	339	# define USE_PWENT_FPTR
	340	#else
	341	# undef USE_PWENT_FPTR
	342	#endif
	343
	344	/* The getpwent getpwgid getpwnam using buffer? */
	345
	346	#if defined(HAS_GETPWENT_R) && (GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIR \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_S_SBW \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_S_SBI \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBI \|\| GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIH)
	347	# define GETPWENT_R_HAS_BUFFER
	348	#else
	349	# undef GETPWENT_R_HAS_BUFFER
	350	#endif
	351	#if defined(HAS_GETPWNAM_R) && (GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR \|\| GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR \|\| GETPWNAM_R_PROTO == REENTRANT_PROTO_S_CSBI \|\| GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBI)
	352	# define GETPWNAM_R_HAS_BUFFER
	353	#else
	354	# undef GETPWNAM_R_HAS_BUFFER
	355	#endif
	356
	357	/* Any of the getpwent getpwgid getpwnam using buffer? */
	358
	359	#if (defined(GETPWENT_R_HAS_BUFFER) \|\| defined(GETPWGID_R_HAS_BUFFER) \|\| defined(GETPWNAM_R_HAS_BUFFER))
	360	# define USE_PWENT_BUFFER
	361	#else
	362	# undef USE_PWENT_BUFFER
	363	#endif
	364
	365	/* The gethostent gethostbyaddr gethostbyname using ptr? */
	366
	367	#if defined(HAS_GETHOSTENT_R) && (GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBWRE)
	368	# define GETHOSTENT_R_HAS_PTR
	369	#else
	370	# undef GETHOSTENT_R_HAS_PTR
	371	#endif
	372	#if defined(HAS_GETHOSTBYADDR_R) && (GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISBWRE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_TsISBWRE)
	373	# define GETHOSTBYADDR_R_HAS_PTR
	374	#else
	375	# undef GETHOSTBYADDR_R_HAS_PTR
	376	#endif
	377	#if defined(HAS_GETHOSTBYNAME_R) && (GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE)
	378	# define GETHOSTBYNAME_R_HAS_PTR
	379	#else
	380	# undef GETHOSTBYNAME_R_HAS_PTR
	381	#endif
	382
	383	/* Any of the gethostent gethostbyaddr gethostbyname using ptr? */
	384
	385	#if (defined(GETHOSTENT_R_HAS_PTR) \|\| defined(GETHOSTBYADDR_R_HAS_PTR) \|\| defined(GETHOSTBYNAME_R_HAS_PTR))
	386	# define USE_HOSTENT_PTR
	387	#else
	388	# undef USE_HOSTENT_PTR
	389	#endif
	390
	391	/* The getnetent getnetbyaddr getnetbyname using ptr? */
	392
	393	#if defined(HAS_GETNETENT_R) && (GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBWRE)
	394	# define GETNETENT_R_HAS_PTR
	395	#else
	396	# undef GETNETENT_R_HAS_PTR
	397	#endif
	398	#if defined(HAS_GETNETBYADDR_R) && (GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_UISBWRE \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_uISBWRE)
	399	# define GETNETBYADDR_R_HAS_PTR
	400	#else
	401	# undef GETNETBYADDR_R_HAS_PTR
	402	#endif
	403	#if defined(HAS_GETNETBYNAME_R) && (GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE)
	404	# define GETNETBYNAME_R_HAS_PTR
	405	#else
	406	# undef GETNETBYNAME_R_HAS_PTR
	407	#endif
	408
	409	/* Any of the getnetent getnetbyaddr getnetbyname using ptr? */
	410
	411	#if (defined(GETNETENT_R_HAS_PTR) \|\| defined(GETNETBYADDR_R_HAS_PTR) \|\| defined(GETNETBYNAME_R_HAS_PTR))
	412	# define USE_NETENT_PTR
	413	#else
	414	# undef USE_NETENT_PTR
	415	#endif
	416
	417	/* The getprotoent getprotobyname getprotobynumber using ptr? */
	418
	419	#if defined(HAS_GETPROTOENT_R) && (GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SBWR)
	420	# define GETPROTOENT_R_HAS_PTR
	421	#else
	422	# undef GETPROTOENT_R_HAS_PTR
	423	#endif
	424	#if defined(HAS_GETPROTOBYNAME_R) && (GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWR)
	425	# define GETPROTOBYNAME_R_HAS_PTR
	426	#else
	427	# undef GETPROTOBYNAME_R_HAS_PTR
	428	#endif
	429	#if defined(HAS_GETPROTOBYNUMBER_R) && (GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_I_ISBWR)
	430	# define GETPROTOBYNUMBER_R_HAS_PTR
	431	#else
	432	# undef GETPROTOBYNUMBER_R_HAS_PTR
	433	#endif
	434
	435	/* Any of the getprotoent getprotobyname getprotobynumber using ptr? */
	436
	437	#if (defined(GETPROTOENT_R_HAS_PTR) \|\| defined(GETPROTOBYNAME_R_HAS_PTR) \|\| defined(GETPROTOBYNUMBER_R_HAS_PTR))
	438	# define USE_PROTOENT_PTR
	439	#else
	440	# undef USE_PROTOENT_PTR
	441	#endif
	442
	443	/* The getservent getservbyname getservbyport using ptr? */
	444
	445	#if defined(HAS_GETSERVENT_R) && (GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SBWR)
	446	# define GETSERVENT_R_HAS_PTR
	447	#else
	448	# undef GETSERVENT_R_HAS_PTR
	449	#endif
	450	#if defined(HAS_GETSERVBYNAME_R) && (GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_I_CCSBWR)
	451	# define GETSERVBYNAME_R_HAS_PTR
	452	#else
	453	# undef GETSERVBYNAME_R_HAS_PTR
	454	#endif
	455	#if defined(HAS_GETSERVBYPORT_R) && (GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_I_ICSBWR)
	456	# define GETSERVBYPORT_R_HAS_PTR
	457	#else
	458	# undef GETSERVBYPORT_R_HAS_PTR
	459	#endif
	460
	461	/* Any of the getservent getservbyname getservbyport using ptr? */
	462
	463	#if (defined(GETSERVENT_R_HAS_PTR) \|\| defined(GETSERVBYNAME_R_HAS_PTR) \|\| defined(GETSERVBYPORT_R_HAS_PTR))
	464	# define USE_SERVENT_PTR
	465	#else
	466	# undef USE_SERVENT_PTR
	467	#endif
	468
	469	/* The gethostent gethostbyaddr gethostbyname using buffer? */
	470
	471	#if defined(HAS_GETHOSTENT_R) && (GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBWRE \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBIE \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_S_SBIE \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_S_SBI \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBI)
	472	# define GETHOSTENT_R_HAS_BUFFER
	473	#else
	474	# undef GETHOSTENT_R_HAS_BUFFER
	475	#endif
	476	#if defined(HAS_GETHOSTBYADDR_R) && (GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISBWRE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBWIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TWISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CIISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CSBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TSBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_TsISBWRE)
	477	# define GETHOSTBYADDR_R_HAS_BUFFER
	478	#else
	479	# undef GETHOSTBYADDR_R_HAS_BUFFER
	480	#endif
	481	#if defined(HAS_GETHOSTBYNAME_R) && (GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE \|\| GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBIE)
	482	# define GETHOSTBYNAME_R_HAS_BUFFER
	483	#else
	484	# undef GETHOSTBYNAME_R_HAS_BUFFER
	485	#endif
	486
	487	/* Any of the gethostent gethostbyaddr gethostbyname using buffer? */
	488
	489	#if (defined(GETHOSTENT_R_HAS_BUFFER) \|\| defined(GETHOSTBYADDR_R_HAS_BUFFER) \|\| defined(GETHOSTBYNAME_R_HAS_BUFFER))
	490	# define USE_HOSTENT_BUFFER
	491	#else
	492	# undef USE_HOSTENT_BUFFER
	493	#endif
	494
	495	/* The getnetent getnetbyaddr getnetbyname using buffer? */
	496
	497	#if defined(HAS_GETNETENT_R) && (GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBWRE \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBIE \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_S_SBIE \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_S_SBI \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBI)
	498	# define GETNETENT_R_HAS_BUFFER
	499	#else
	500	# undef GETNETENT_R_HAS_BUFFER
	501	#endif
	502	#if defined(HAS_GETNETBYADDR_R) && (GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_UISBWRE \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_LISBI \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_TISBI \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_LISBI \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_uISBWRE)
	503	# define GETNETBYADDR_R_HAS_BUFFER
	504	#else
	505	# undef GETNETBYADDR_R_HAS_BUFFER
	506	#endif
	507	#if defined(HAS_GETNETBYNAME_R) && (GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE \|\| GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBI \|\| GETNETBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBI)
	508	# define GETNETBYNAME_R_HAS_BUFFER
	509	#else
	510	# undef GETNETBYNAME_R_HAS_BUFFER
	511	#endif
	512
	513	/* Any of the getnetent getnetbyaddr getnetbyname using buffer? */
	514
	515	#if (defined(GETNETENT_R_HAS_BUFFER) \|\| defined(GETNETBYADDR_R_HAS_BUFFER) \|\| defined(GETNETBYNAME_R_HAS_BUFFER))
	516	# define USE_NETENT_BUFFER
	517	#else
	518	# undef USE_NETENT_BUFFER
	519	#endif
	520
	521	/* The getprotoent getprotobyname getprotobynumber using buffer? */
	522
	523	#if defined(HAS_GETPROTOENT_R) && (GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SBI \|\| GETPROTOENT_R_PROTO == REENTRANT_PROTO_S_SBI)
	524	# define GETPROTOENT_R_HAS_BUFFER
	525	#else
	526	# undef GETPROTOENT_R_HAS_BUFFER
	527	#endif
	528	#if defined(HAS_GETPROTOBYNAME_R) && (GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWR \|\| GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBI)
	529	# define GETPROTOBYNAME_R_HAS_BUFFER
	530	#else
	531	# undef GETPROTOBYNAME_R_HAS_BUFFER
	532	#endif
	533	#if defined(HAS_GETPROTOBYNUMBER_R) && (GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_I_ISBWR \|\| GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_S_ISBI)
	534	# define GETPROTOBYNUMBER_R_HAS_BUFFER
	535	#else
	536	# undef GETPROTOBYNUMBER_R_HAS_BUFFER
	537	#endif
	538
	539	/* Any of the getprotoent getprotobyname getprotobynumber using buffer? */
	540
	541	#if (defined(GETPROTOENT_R_HAS_BUFFER) \|\| defined(GETPROTOBYNAME_R_HAS_BUFFER) \|\| defined(GETPROTOBYNUMBER_R_HAS_BUFFER))
	542	# define USE_PROTOENT_BUFFER
	543	#else
	544	# undef USE_PROTOENT_BUFFER
	545	#endif
	546
	547	/* The getservent getservbyname getservbyport using buffer? */
	548
	549	#if defined(HAS_GETSERVENT_R) && (GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SBWR \|\| GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SBI \|\| GETSERVENT_R_PROTO == REENTRANT_PROTO_S_SBI)
	550	# define GETSERVENT_R_HAS_BUFFER
	551	#else
	552	# undef GETSERVENT_R_HAS_BUFFER
	553	#endif
	554	#if defined(HAS_GETSERVBYNAME_R) && (GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_I_CCSBWR \|\| GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_S_CCSBI)
	555	# define GETSERVBYNAME_R_HAS_BUFFER
	556	#else
	557	# undef GETSERVBYNAME_R_HAS_BUFFER
	558	#endif
	559	#if defined(HAS_GETSERVBYPORT_R) && (GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_I_ICSBWR \|\| GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_S_ICSBI)
	560	# define GETSERVBYPORT_R_HAS_BUFFER
	561	#else
	562	# undef GETSERVBYPORT_R_HAS_BUFFER
	563	#endif
	564
	565	/* Any of the getservent getservbyname getservbyport using buffer? */
	566
	567	#if (defined(GETSERVENT_R_HAS_BUFFER) \|\| defined(GETSERVBYNAME_R_HAS_BUFFER) \|\| defined(GETSERVBYPORT_R_HAS_BUFFER))
	568	# define USE_SERVENT_BUFFER
	569	#else
	570	# undef USE_SERVENT_BUFFER
	571	#endif
	572
	573	/* The gethostent gethostbyaddr gethostbyname using errno? */
	574
	575	#if defined(HAS_GETHOSTENT_R) && (GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBWRE \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBIE \|\| GETHOSTENT_R_PROTO == REENTRANT_PROTO_S_SBIE)
	576	# define GETHOSTENT_R_HAS_ERRNO
	577	#else
	578	# undef GETHOSTENT_R_HAS_ERRNO
	579	#endif
	580	#if defined(HAS_GETHOSTBYADDR_R) && (GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISBWRE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBWIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TWISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CIISBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CSBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TSBIE \|\| GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_TsISBWRE)
	581	# define GETHOSTBYADDR_R_HAS_ERRNO
	582	#else
	583	# undef GETHOSTBYADDR_R_HAS_ERRNO
	584	#endif
	585	#if defined(HAS_GETHOSTBYNAME_R) && (GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE \|\| GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBIE)
	586	# define GETHOSTBYNAME_R_HAS_ERRNO
	587	#else
	588	# undef GETHOSTBYNAME_R_HAS_ERRNO
	589	#endif
	590
	591	/* Any of the gethostent gethostbyaddr gethostbyname using errno? */
	592
	593	#if (defined(GETHOSTENT_R_HAS_ERRNO) \|\| defined(GETHOSTBYADDR_R_HAS_ERRNO) \|\| defined(GETHOSTBYNAME_R_HAS_ERRNO))
	594	# define USE_HOSTENT_ERRNO
	595	#else
	596	# undef USE_HOSTENT_ERRNO
	597	#endif
	598
	599	/* The getnetent getnetbyaddr getnetbyname using errno? */
	600
	601	#if defined(HAS_GETNETENT_R) && (GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBWRE \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBIE \|\| GETNETENT_R_PROTO == REENTRANT_PROTO_S_SBIE)
	602	# define GETNETENT_R_HAS_ERRNO
	603	#else
	604	# undef GETNETENT_R_HAS_ERRNO
	605	#endif
	606	#if defined(HAS_GETNETBYADDR_R) && (GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_UISBWRE \|\| GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_uISBWRE)
	607	# define GETNETBYADDR_R_HAS_ERRNO
	608	#else
	609	# undef GETNETBYADDR_R_HAS_ERRNO
	610	#endif
	611	#if defined(HAS_GETNETBYNAME_R) && (GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE)
	612	# define GETNETBYNAME_R_HAS_ERRNO
	613	#else
	614	# undef GETNETBYNAME_R_HAS_ERRNO
	615	#endif
	616
	617	/* Any of the getnetent getnetbyaddr getnetbyname using errno? */
	618
	619	#if (defined(GETNETENT_R_HAS_ERRNO) \|\| defined(GETNETBYADDR_R_HAS_ERRNO) \|\| defined(GETNETBYNAME_R_HAS_ERRNO))
	620	# define USE_NETENT_ERRNO
	621	#else
	622	# undef USE_NETENT_ERRNO
	623	#endif
	624
	625
	626	typedef struct {
	627	#ifdef HAS_ASCTIME_R
	628	char* _asctime_buffer;
	629	size_t _asctime_size;
	630	#endif /* HAS_ASCTIME_R */
	631	#ifdef HAS_CRYPT_R
	632	#if CRYPT_R_PROTO == REENTRANT_PROTO_B_CCD
	633	CRYPTD* _crypt_data;
	634	#else
	635	struct crypt_data *_crypt_struct_buffer;
	636	#endif
	637	#endif /* HAS_CRYPT_R */
	638	#ifdef HAS_CTIME_R
	639	char* _ctime_buffer;
	640	size_t _ctime_size;
	641	#endif /* HAS_CTIME_R */
	642	#ifdef HAS_DRAND48_R
	643	struct drand48_data _drand48_struct;
	644	double _drand48_double;
	645	#endif /* HAS_DRAND48_R */
	646	#ifdef HAS_GETGRNAM_R
	647	struct group _grent_struct;
	648	char* _grent_buffer;
	649	size_t _grent_size;
	650	# ifdef USE_GRENT_PTR
	651	struct group* _grent_ptr;
	652	# endif
	653	# ifdef USE_GRENT_FPTR
	654	FILE* _grent_fptr;
	655	# endif
	656	#endif /* HAS_GETGRNAM_R */
	657	#ifdef HAS_GETHOSTBYNAME_R
	658	struct hostent _hostent_struct;
	659	# if GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	660	struct hostent_data _hostent_data;
	661	# else
	662	char* _hostent_buffer;
	663	size_t _hostent_size;
	664	# endif
	665	# ifdef USE_HOSTENT_PTR
	666	struct hostent* _hostent_ptr;
	667	# endif
	668	# ifdef USE_HOSTENT_ERRNO
	669	int _hostent_errno;
	670	# endif
	671	#endif /* HAS_GETHOSTBYNAME_R */
	672	#ifdef HAS_GETLOGIN_R
	673	char* _getlogin_buffer;
	674	size_t _getlogin_size;
	675	#endif /* HAS_GETLOGIN_R */
	676	#ifdef HAS_GETNETBYNAME_R
	677	struct netent _netent_struct;
	678	# if GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	679	struct netent_data _netent_data;
	680	# else
	681	char* _netent_buffer;
	682	size_t _netent_size;
	683	# endif
	684	# ifdef USE_NETENT_PTR
	685	struct netent* _netent_ptr;
	686	# endif
	687	# ifdef USE_NETENT_ERRNO
	688	int _netent_errno;
	689	# endif
	690	#endif /* HAS_GETNETBYNAME_R */
	691	#ifdef HAS_GETPROTOBYNAME_R
	692	struct protoent _protoent_struct;
	693	# if GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	694	struct protoent_data _protoent_data;
	695	# else
	696	char* _protoent_buffer;
	697	size_t _protoent_size;
	698	# endif
	699	# ifdef USE_PROTOENT_PTR
	700	struct protoent* _protoent_ptr;
	701	# endif
	702	# ifdef USE_PROTOENT_ERRNO
	703	int _protoent_errno;
	704	# endif
	705	#endif /* HAS_GETPROTOBYNAME_R */
	706	#ifdef HAS_GETPWNAM_R
	707	struct passwd _pwent_struct;
	708	char* _pwent_buffer;
	709	size_t _pwent_size;
	710	# ifdef USE_PWENT_PTR
	711	struct passwd* _pwent_ptr;
	712	# endif
	713	# ifdef USE_PWENT_FPTR
	714	FILE* _pwent_fptr;
	715	# endif
	716	#endif /* HAS_GETPWNAM_R */
	717	#ifdef HAS_GETSERVBYNAME_R
	718	struct servent _servent_struct;
	719	# if GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_I_CCSD
	720	struct servent_data _servent_data;
	721	# else
	722	char* _servent_buffer;
	723	size_t _servent_size;
	724	# endif
	725	# ifdef USE_SERVENT_PTR
	726	struct servent* _servent_ptr;
	727	# endif
	728	# ifdef USE_SERVENT_ERRNO
	729	int _servent_errno;
	730	# endif
	731	#endif /* HAS_GETSERVBYNAME_R */
	732	#ifdef HAS_GETSPNAM_R
	733	struct spwd _spent_struct;
	734	char* _spent_buffer;
	735	size_t _spent_size;
	736	# ifdef USE_SPENT_PTR
	737	struct spwd* _spent_ptr;
	738	# endif
	739	# ifdef USE_SPENT_FPTR
	740	FILE* _spent_fptr;
	741	# endif
	742	#endif /* HAS_GETSPNAM_R */
	743	#ifdef HAS_RANDOM_R
	744	struct random_data _random_struct;
	745	# if RANDOM_R_PROTO == REENTRANT_PROTO_I_iS
	746	int _random_retval;
	747	# endif
	748	# if RANDOM_R_PROTO == REENTRANT_PROTO_I_lS
	749	long _random_retval;
	750	# endif
	751	# if RANDOM_R_PROTO == REENTRANT_PROTO_I_St
	752	int32_t _random_retval;
	753	# endif
	754	#endif /* HAS_RANDOM_R */
	755	#ifdef HAS_READDIR_R
	756	struct dirent* _readdir_struct;
	757	size_t _readdir_size;
	758	# if READDIR_R_PROTO == REENTRANT_PROTO_I_TSR
	759	struct dirent* _readdir_ptr;
	760	# endif
	761	#endif /* HAS_READDIR_R */
	762	#ifdef HAS_READDIR64_R
	763	struct dirent64* _readdir64_struct;
	764	size_t _readdir64_size;
	765	# if READDIR64_R_PROTO == REENTRANT_PROTO_I_TSR
	766	struct dirent64* _readdir64_ptr;
	767	# endif
	768	#endif /* HAS_READDIR64_R */
	769	#ifdef HAS_SETLOCALE_R
	770	char* _setlocale_buffer;
	771	size_t _setlocale_size;
	772	#endif /* HAS_SETLOCALE_R */
	773	#ifdef HAS_SRANDOM_R
	774	struct random_data _srandom_struct;
	775	#endif /* HAS_SRANDOM_R */
	776	#ifdef HAS_STRERROR_R
	777	char* _strerror_buffer;
	778	size_t _strerror_size;
	779	#endif /* HAS_STRERROR_R */
	780	#ifdef HAS_TTYNAME_R
	781	char* _ttyname_buffer;
	782	size_t _ttyname_size;
	783	#endif /* HAS_TTYNAME_R */
	784
	785	int dummy; /* cannot have empty structs */
	786	} REENTR;
	787
	788	/* The wrappers. */
	789
	790	#ifdef HAS_ASCTIME_R
	791	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	792	# undef asctime
	793	# if !defined(asctime) && ASCTIME_R_PROTO == REENTRANT_PROTO_B_SB
	794	# define asctime(a) asctime_r(a, PL_reentrant_buffer->_asctime_buffer)
	795	# endif
	796	# if !defined(asctime) && ASCTIME_R_PROTO == REENTRANT_PROTO_B_SBI
	797	# define asctime(a) asctime_r(a, PL_reentrant_buffer->_asctime_buffer, PL_reentrant_buffer->_asctime_size)
	798	# endif
	799	# if !defined(asctime) && ASCTIME_R_PROTO == REENTRANT_PROTO_I_SB
	800	# define asctime(a) (asctime_r(a, PL_reentrant_buffer->_asctime_buffer) == 0 ? PL_reentrant_buffer->_asctime_buffer : 0)
	801	# endif
	802	# if !defined(asctime) && ASCTIME_R_PROTO == REENTRANT_PROTO_I_SBI
	803	# define asctime(a) (asctime_r(a, PL_reentrant_buffer->_asctime_buffer, PL_reentrant_buffer->_asctime_size) == 0 ? PL_reentrant_buffer->_asctime_buffer : 0)
	804	# endif
	805	# endif
	806	#endif /* HAS_ASCTIME_R */
	807
	808	#ifdef HAS_CRYPT_R
	809	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	810	# undef crypt
	811	# if !defined(crypt) && CRYPT_R_PROTO == REENTRANT_PROTO_B_CCS
	812	# define crypt(a, b) crypt_r(a, b, PL_reentrant_buffer->_crypt_struct_buffer)
	813	# endif
	814	# if !defined(crypt) && CRYPT_R_PROTO == REENTRANT_PROTO_B_CCD
	815	# define crypt(a, b) crypt_r(a, b, &PL_reentrant_buffer->_crypt_data)
	816	# endif
	817	# endif
	818	#endif /* HAS_CRYPT_R */
	819
	820	#ifdef HAS_CTERMID_R
	821	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	822	# undef ctermid
	823	# if !defined(ctermid) && CTERMID_R_PROTO == REENTRANT_PROTO_B_B
	824	# define ctermid(a) ctermid_r(a)
	825	# endif
	826	# endif
	827	#endif /* HAS_CTERMID_R */
	828
	829	#ifdef HAS_CTIME_R
	830	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	831	# undef ctime
	832	# if !defined(ctime) && CTIME_R_PROTO == REENTRANT_PROTO_B_SB
	833	# define ctime(a) ctime_r(a, PL_reentrant_buffer->_ctime_buffer)
	834	# endif
	835	# if !defined(ctime) && CTIME_R_PROTO == REENTRANT_PROTO_B_SBI
	836	# define ctime(a) ctime_r(a, PL_reentrant_buffer->_ctime_buffer, PL_reentrant_buffer->_ctime_size)
	837	# endif
	838	# if !defined(ctime) && CTIME_R_PROTO == REENTRANT_PROTO_I_SB
	839	# define ctime(a) (ctime_r(a, PL_reentrant_buffer->_ctime_buffer) == 0 ? PL_reentrant_buffer->_ctime_buffer : 0)
	840	# endif
	841	# if !defined(ctime) && CTIME_R_PROTO == REENTRANT_PROTO_I_SBI
	842	# define ctime(a) (ctime_r(a, PL_reentrant_buffer->_ctime_buffer, PL_reentrant_buffer->_ctime_size) == 0 ? PL_reentrant_buffer->_ctime_buffer : 0)
	843	# endif
	844	# endif
	845	#endif /* HAS_CTIME_R */
	846
	847	#ifdef HAS_DRAND48_R
	848	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	849	# undef drand48
	850	# if !defined(drand48) && DRAND48_R_PROTO == REENTRANT_PROTO_I_ST
	851	# define drand48() (drand48_r(&PL_reentrant_buffer->_drand48_struct, &PL_reentrant_buffer->_drand48_double) == 0 ? PL_reentrant_buffer->_drand48_double : 0)
	852	# endif
	853	# endif
	854	#endif /* HAS_DRAND48_R */
	855
	856	#ifdef HAS_ENDGRENT_R
	857	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	858	# undef endgrent
	859	# if !defined(endgrent) && ENDGRENT_R_PROTO == REENTRANT_PROTO_I_H
	860	# define endgrent() (endgrent_r(&PL_reentrant_buffer->_grent_fptr) == 0 ? 1 : 0)
	861	# endif
	862	# if !defined(endgrent) && ENDGRENT_R_PROTO == REENTRANT_PROTO_V_H
	863	# define endgrent() endgrent_r(&PL_reentrant_buffer->_grent_fptr)
	864	# endif
	865	# endif
	866	#endif /* HAS_ENDGRENT_R */
	867
	868	#ifdef HAS_ENDHOSTENT_R
	869	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	870	# undef endhostent
	871	# if !defined(endhostent) && ENDHOSTENT_R_PROTO == REENTRANT_PROTO_I_D
	872	# define endhostent() (endhostent_r(&PL_reentrant_buffer->_hostent_data) == 0 ? 1 : 0)
	873	# endif
	874	# if !defined(endhostent) && ENDHOSTENT_R_PROTO == REENTRANT_PROTO_V_D
	875	# define endhostent() endhostent_r(&PL_reentrant_buffer->_hostent_data)
	876	# endif
	877	# endif
	878	#endif /* HAS_ENDHOSTENT_R */
	879
	880	#ifdef HAS_ENDNETENT_R
	881	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	882	# undef endnetent
	883	# if !defined(endnetent) && ENDNETENT_R_PROTO == REENTRANT_PROTO_I_D
	884	# define endnetent() (endnetent_r(&PL_reentrant_buffer->_netent_data) == 0 ? 1 : 0)
	885	# endif
	886	# if !defined(endnetent) && ENDNETENT_R_PROTO == REENTRANT_PROTO_V_D
	887	# define endnetent() endnetent_r(&PL_reentrant_buffer->_netent_data)
	888	# endif
	889	# endif
	890	#endif /* HAS_ENDNETENT_R */
	891
	892	#ifdef HAS_ENDPROTOENT_R
	893	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	894	# undef endprotoent
	895	# if !defined(endprotoent) && ENDPROTOENT_R_PROTO == REENTRANT_PROTO_I_D
	896	# define endprotoent() (endprotoent_r(&PL_reentrant_buffer->_protoent_data) == 0 ? 1 : 0)
	897	# endif
	898	# if !defined(endprotoent) && ENDPROTOENT_R_PROTO == REENTRANT_PROTO_V_D
	899	# define endprotoent() endprotoent_r(&PL_reentrant_buffer->_protoent_data)
	900	# endif
	901	# endif
	902	#endif /* HAS_ENDPROTOENT_R */
	903
	904	#ifdef HAS_ENDPWENT_R
	905	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	906	# undef endpwent
	907	# if !defined(endpwent) && ENDPWENT_R_PROTO == REENTRANT_PROTO_I_H
	908	# define endpwent() (endpwent_r(&PL_reentrant_buffer->_pwent_fptr) == 0 ? 1 : 0)
	909	# endif
	910	# if !defined(endpwent) && ENDPWENT_R_PROTO == REENTRANT_PROTO_V_H
	911	# define endpwent() endpwent_r(&PL_reentrant_buffer->_pwent_fptr)
	912	# endif
	913	# endif
	914	#endif /* HAS_ENDPWENT_R */
	915
	916	#ifdef HAS_ENDSERVENT_R
	917	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	918	# undef endservent
	919	# if !defined(endservent) && ENDSERVENT_R_PROTO == REENTRANT_PROTO_I_D
	920	# define endservent() (endservent_r(&PL_reentrant_buffer->_servent_data) == 0 ? 1 : 0)
	921	# endif
	922	# if !defined(endservent) && ENDSERVENT_R_PROTO == REENTRANT_PROTO_V_D
	923	# define endservent() endservent_r(&PL_reentrant_buffer->_servent_data)
	924	# endif
	925	# endif
	926	#endif /* HAS_ENDSERVENT_R */
	927
	928	#ifdef HAS_GETGRENT_R
	929	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	930	# undef getgrent
	931	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBWR
	932	# define getgrent() ((PL_reentrant_retint = getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	933	# endif
	934	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIR
	935	# define getgrent() ((PL_reentrant_retint = getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	936	# endif
	937	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_S_SBW
	938	# define getgrent() (getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size) ? &PL_reentrant_buffer->_grent_struct : ((errno == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	939	# endif
	940	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_S_SBI
	941	# define getgrent() (getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size) ? &PL_reentrant_buffer->_grent_struct : ((errno == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	942	# endif
	943	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBI
	944	# define getgrent() ((PL_reentrant_retint = getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size)) == 0 ? &PL_reentrant_buffer->_grent_struct : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	945	# endif
	946	# if !defined(getgrent) && GETGRENT_R_PROTO == REENTRANT_PROTO_I_SBIH
	947	# define getgrent() ((PL_reentrant_retint = getgrent_r(&PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_fptr)) == 0 ? &PL_reentrant_buffer->_grent_struct : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrent") : 0))
	948	# endif
	949	# endif
	950	#endif /* HAS_GETGRENT_R */
	951
	952	#ifdef HAS_GETGRGID_R
	953	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	954	# undef getgrgid
	955	# if !defined(getgrgid) && GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBWR
	956	# define getgrgid(a) ((PL_reentrant_retint = getgrgid_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrgid", a) : 0))
	957	# endif
	958	# if !defined(getgrgid) && GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBIR
	959	# define getgrgid(a) ((PL_reentrant_retint = getgrgid_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrgid", a) : 0))
	960	# endif
	961	# if !defined(getgrgid) && GETGRGID_R_PROTO == REENTRANT_PROTO_I_TSBI
	962	# define getgrgid(a) ((PL_reentrant_retint = getgrgid_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size)) == 0 ? &PL_reentrant_buffer->_grent_struct : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrgid", a) : 0))
	963	# endif
	964	# if !defined(getgrgid) && GETGRGID_R_PROTO == REENTRANT_PROTO_S_TSBI
	965	# define getgrgid(a) (getgrgid_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size) ? &PL_reentrant_buffer->_grent_struct : ((errno == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrgid", a) : 0))
	966	# endif
	967	# endif
	968	#endif /* HAS_GETGRGID_R */
	969
	970	#ifdef HAS_GETGRNAM_R
	971	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	972	# undef getgrnam
	973	# if !defined(getgrnam) && GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR
	974	# define getgrnam(a) ((PL_reentrant_retint = getgrnam_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrnam", a) : 0))
	975	# endif
	976	# if !defined(getgrnam) && GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR
	977	# define getgrnam(a) ((PL_reentrant_retint = getgrnam_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size, &PL_reentrant_buffer->_grent_ptr)) == 0 ? PL_reentrant_buffer->_grent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrnam", a) : 0))
	978	# endif
	979	# if !defined(getgrnam) && GETGRNAM_R_PROTO == REENTRANT_PROTO_S_CBI
	980	# define getgrnam(a) (getgrnam_r(a, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size) ? PL_reentrant_buffer->_grent_buffer : ((errno == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrnam", a) : 0))
	981	# endif
	982	# if !defined(getgrnam) && GETGRNAM_R_PROTO == REENTRANT_PROTO_I_CSBI
	983	# define getgrnam(a) ((PL_reentrant_retint = getgrnam_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size)) == 0 ? &PL_reentrant_buffer->_grent_struct : ((PL_reentrant_retint == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrnam", a) : 0))
	984	# endif
	985	# if !defined(getgrnam) && GETGRNAM_R_PROTO == REENTRANT_PROTO_S_CSBI
	986	# define getgrnam(a) (getgrnam_r(a, &PL_reentrant_buffer->_grent_struct, PL_reentrant_buffer->_grent_buffer, PL_reentrant_buffer->_grent_size) ? &PL_reentrant_buffer->_grent_struct : ((errno == ERANGE) ? (struct group *) Perl_reentrant_retry("getgrnam", a) : 0))
	987	# endif
	988	# endif
	989	#endif /* HAS_GETGRNAM_R */
	990
	991	#ifdef HAS_GETHOSTBYADDR_R
	992	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	993	# undef gethostbyaddr
	994	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISBWRE
	995	# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	996	# endif
	997	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBWIE
	998	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	999	# endif
	1000	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBIE
	1001	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1002	# endif
	1003	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TWISBIE
	1004	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1005	# endif
	1006	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CIISBIE
	1007	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1008	# endif
	1009	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CSBIE
	1010	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? 1 : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1011	# endif
	1012	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TSBIE
	1013	# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? 1 : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1014	# endif
	1015	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISD
	1016	# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1017	# endif
	1018	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CIISD
	1019	# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1020	# endif
	1021	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CII
	1022	# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c)) == 0 ? 1 : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1023	# endif
	1024	# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_TsISBWRE
	1025	# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
	1026	# endif
	1027	# endif
	1028	#endif /* HAS_GETHOSTBYADDR_R */
	1029
	1030	#ifdef HAS_GETHOSTBYNAME_R
	1031	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1032	# undef gethostbyname
	1033	# if !defined(gethostbyname) && GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE
	1034	# define gethostbyname(a) ((PL_reentrant_retint = gethostbyname_r(a, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyname", a) : 0))
	1035	# endif
	1036	# if !defined(gethostbyname) && GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBIE
	1037	# define gethostbyname(a) (gethostbyname_r(a, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyname", a) : 0))
	1038	# endif
	1039	# if !defined(gethostbyname) && GETHOSTBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	1040	# define gethostbyname(a) ((PL_reentrant_retint = gethostbyname_r(a, &PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyname", a) : 0))
	1041	# endif
	1042	# endif
	1043	#endif /* HAS_GETHOSTBYNAME_R */
	1044
	1045	#ifdef HAS_GETHOSTENT_R
	1046	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1047	# undef gethostent
	1048	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBWRE
	1049	# define gethostent() ((PL_reentrant_retint = gethostent_r(&PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1050	# endif
	1051	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBIE
	1052	# define gethostent() ((PL_reentrant_retint = gethostent_r(&PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1053	# endif
	1054	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_S_SBIE
	1055	# define gethostent() (gethostent_r(&PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1056	# endif
	1057	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_S_SBI
	1058	# define gethostent() (gethostent_r(&PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1059	# endif
	1060	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SBI
	1061	# define gethostent() ((PL_reentrant_retint = gethostent_r(&PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1062	# endif
	1063	# if !defined(gethostent) && GETHOSTENT_R_PROTO == REENTRANT_PROTO_I_SD
	1064	# define gethostent() ((PL_reentrant_retint = gethostent_r(&PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostent") : 0))
	1065	# endif
	1066	# endif
	1067	#endif /* HAS_GETHOSTENT_R */
	1068
	1069	#ifdef HAS_GETLOGIN_R
	1070	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1071	# undef getlogin
	1072	# if !defined(getlogin) && GETLOGIN_R_PROTO == REENTRANT_PROTO_I_BW
	1073	# define getlogin() ((PL_reentrant_retint = getlogin_r(PL_reentrant_buffer->_getlogin_buffer, PL_reentrant_buffer->_getlogin_size)) == 0 ? PL_reentrant_buffer->_getlogin_buffer : ((PL_reentrant_retint == ERANGE) ? (char *) Perl_reentrant_retry("getlogin") : 0))
	1074	# endif
	1075	# if !defined(getlogin) && GETLOGIN_R_PROTO == REENTRANT_PROTO_I_BI
	1076	# define getlogin() ((PL_reentrant_retint = getlogin_r(PL_reentrant_buffer->_getlogin_buffer, PL_reentrant_buffer->_getlogin_size)) == 0 ? PL_reentrant_buffer->_getlogin_buffer : ((PL_reentrant_retint == ERANGE) ? (char *) Perl_reentrant_retry("getlogin") : 0))
	1077	# endif
	1078	# if !defined(getlogin) && GETLOGIN_R_PROTO == REENTRANT_PROTO_B_BW
	1079	# define getlogin() getlogin_r(PL_reentrant_buffer->_getlogin_buffer, PL_reentrant_buffer->_getlogin_size)
	1080	# endif
	1081	# if !defined(getlogin) && GETLOGIN_R_PROTO == REENTRANT_PROTO_B_BI
	1082	# define getlogin() getlogin_r(PL_reentrant_buffer->_getlogin_buffer, PL_reentrant_buffer->_getlogin_size)
	1083	# endif
	1084	# endif
	1085	#endif /* HAS_GETLOGIN_R */
	1086
	1087	#ifdef HAS_GETNETBYADDR_R
	1088	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1089	# undef getnetbyaddr
	1090	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_UISBWRE
	1091	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1092	# endif
	1093	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_LISBI
	1094	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1095	# endif
	1096	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_TISBI
	1097	# define getnetbyaddr(a, b) (getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1098	# endif
	1099	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_LISBI
	1100	# define getnetbyaddr(a, b) (getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1101	# endif
	1102	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_TISD
	1103	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1104	# endif
	1105	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_LISD
	1106	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1107	# endif
	1108	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_IISD
	1109	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1110	# endif
	1111	# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_uISBWRE
	1112	# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
	1113	# endif
	1114	# endif
	1115	#endif /* HAS_GETNETBYADDR_R */
	1116
	1117	#ifdef HAS_GETNETBYNAME_R
	1118	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1119	# undef getnetbyname
	1120	# if !defined(getnetbyname) && GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWRE
	1121	# define getnetbyname(a) ((PL_reentrant_retint = getnetbyname_r(a, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyname", a) : 0))
	1122	# endif
	1123	# if !defined(getnetbyname) && GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBI
	1124	# define getnetbyname(a) ((PL_reentrant_retint = getnetbyname_r(a, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyname", a) : 0))
	1125	# endif
	1126	# if !defined(getnetbyname) && GETNETBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBI
	1127	# define getnetbyname(a) (getnetbyname_r(a, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyname", a) : 0))
	1128	# endif
	1129	# if !defined(getnetbyname) && GETNETBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	1130	# define getnetbyname(a) ((PL_reentrant_retint = getnetbyname_r(a, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyname", a) : 0))
	1131	# endif
	1132	# endif
	1133	#endif /* HAS_GETNETBYNAME_R */
	1134
	1135	#ifdef HAS_GETNETENT_R
	1136	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1137	# undef getnetent
	1138	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBWRE
	1139	# define getnetent() ((PL_reentrant_retint = getnetent_r(&PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1140	# endif
	1141	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBIE
	1142	# define getnetent() ((PL_reentrant_retint = getnetent_r(&PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_errno)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1143	# endif
	1144	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_S_SBIE
	1145	# define getnetent() (getnetent_r(&PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_errno) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1146	# endif
	1147	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_S_SBI
	1148	# define getnetent() (getnetent_r(&PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1149	# endif
	1150	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_I_SBI
	1151	# define getnetent() ((PL_reentrant_retint = getnetent_r(&PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1152	# endif
	1153	# if !defined(getnetent) && GETNETENT_R_PROTO == REENTRANT_PROTO_I_SD
	1154	# define getnetent() ((PL_reentrant_retint = getnetent_r(&PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetent") : 0))
	1155	# endif
	1156	# endif
	1157	#endif /* HAS_GETNETENT_R */
	1158
	1159	#ifdef HAS_GETPROTOBYNAME_R
	1160	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1161	# undef getprotobyname
	1162	# if !defined(getprotobyname) && GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_I_CSBWR
	1163	# define getprotobyname(a) ((PL_reentrant_retint = getprotobyname_r(a, &PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size, &PL_reentrant_buffer->_protoent_ptr)) == 0 ? PL_reentrant_buffer->_protoent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobyname", a) : 0))
	1164	# endif
	1165	# if !defined(getprotobyname) && GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_S_CSBI
	1166	# define getprotobyname(a) (getprotobyname_r(a, &PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size) ? &PL_reentrant_buffer->_protoent_struct : ((errno == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobyname", a) : 0))
	1167	# endif
	1168	# if !defined(getprotobyname) && GETPROTOBYNAME_R_PROTO == REENTRANT_PROTO_I_CSD
	1169	# define getprotobyname(a) (REENTR_MEMZERO(&PL_reentrant_buffer->_protoent_data, sizeof(PL_reentrant_buffer->_protoent_data)),(PL_reentrant_retint = getprotobyname_r(a, &PL_reentrant_buffer->_protoent_struct, &PL_reentrant_buffer->_protoent_data)) == 0 ? &PL_reentrant_buffer->_protoent_struct : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobyname", a) : 0))
	1170	# endif
	1171	# endif
	1172	#endif /* HAS_GETPROTOBYNAME_R */
	1173
	1174	#ifdef HAS_GETPROTOBYNUMBER_R
	1175	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1176	# undef getprotobynumber
	1177	# if !defined(getprotobynumber) && GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_I_ISBWR
	1178	# define getprotobynumber(a) ((PL_reentrant_retint = getprotobynumber_r(a, &PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size, &PL_reentrant_buffer->_protoent_ptr)) == 0 ? PL_reentrant_buffer->_protoent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobynumber", a) : 0))
	1179	# endif
	1180	# if !defined(getprotobynumber) && GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_S_ISBI
	1181	# define getprotobynumber(a) (getprotobynumber_r(a, &PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size) ? &PL_reentrant_buffer->_protoent_struct : ((errno == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobynumber", a) : 0))
	1182	# endif
	1183	# if !defined(getprotobynumber) && GETPROTOBYNUMBER_R_PROTO == REENTRANT_PROTO_I_ISD
	1184	# define getprotobynumber(a) (REENTR_MEMZERO(&PL_reentrant_buffer->_protoent_data, sizeof(PL_reentrant_buffer->_protoent_data)),(PL_reentrant_retint = getprotobynumber_r(a, &PL_reentrant_buffer->_protoent_struct, &PL_reentrant_buffer->_protoent_data)) == 0 ? &PL_reentrant_buffer->_protoent_struct : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotobynumber", a) : 0))
	1185	# endif
	1186	# endif
	1187	#endif /* HAS_GETPROTOBYNUMBER_R */
	1188
	1189	#ifdef HAS_GETPROTOENT_R
	1190	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1191	# undef getprotoent
	1192	# if !defined(getprotoent) && GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SBWR
	1193	# define getprotoent() ((PL_reentrant_retint = getprotoent_r(&PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size, &PL_reentrant_buffer->_protoent_ptr)) == 0 ? PL_reentrant_buffer->_protoent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotoent") : 0))
	1194	# endif
	1195	# if !defined(getprotoent) && GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SBI
	1196	# define getprotoent() ((PL_reentrant_retint = getprotoent_r(&PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size)) == 0 ? &PL_reentrant_buffer->_protoent_struct : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotoent") : 0))
	1197	# endif
	1198	# if !defined(getprotoent) && GETPROTOENT_R_PROTO == REENTRANT_PROTO_S_SBI
	1199	# define getprotoent() (getprotoent_r(&PL_reentrant_buffer->_protoent_struct, PL_reentrant_buffer->_protoent_buffer, PL_reentrant_buffer->_protoent_size) ? &PL_reentrant_buffer->_protoent_struct : ((errno == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotoent") : 0))
	1200	# endif
	1201	# if !defined(getprotoent) && GETPROTOENT_R_PROTO == REENTRANT_PROTO_I_SD
	1202	# define getprotoent() (REENTR_MEMZERO(&PL_reentrant_buffer->_protoent_data, sizeof(PL_reentrant_buffer->_protoent_data)),(PL_reentrant_retint = getprotoent_r(&PL_reentrant_buffer->_protoent_struct, &PL_reentrant_buffer->_protoent_data)) == 0 ? &PL_reentrant_buffer->_protoent_struct : ((PL_reentrant_retint == ERANGE) ? (struct protoent *) Perl_reentrant_retry("getprotoent") : 0))
	1203	# endif
	1204	# endif
	1205	#endif /* HAS_GETPROTOENT_R */
	1206
	1207	#ifdef HAS_GETPWENT_R
	1208	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1209	# undef getpwent
	1210	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBWR
	1211	# define getpwent() ((PL_reentrant_retint = getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1212	# endif
	1213	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIR
	1214	# define getpwent() ((PL_reentrant_retint = getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1215	# endif
	1216	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_S_SBW
	1217	# define getpwent() (getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size) ? &PL_reentrant_buffer->_pwent_struct : ((errno == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1218	# endif
	1219	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_S_SBI
	1220	# define getpwent() (getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size) ? &PL_reentrant_buffer->_pwent_struct : ((errno == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1221	# endif
	1222	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBI
	1223	# define getpwent() ((PL_reentrant_retint = getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size)) == 0 ? &PL_reentrant_buffer->_pwent_struct : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1224	# endif
	1225	# if !defined(getpwent) && GETPWENT_R_PROTO == REENTRANT_PROTO_I_SBIH
	1226	# define getpwent() ((PL_reentrant_retint = getpwent_r(&PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_fptr)) == 0 ? &PL_reentrant_buffer->_pwent_struct : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwent") : 0))
	1227	# endif
	1228	# endif
	1229	#endif /* HAS_GETPWENT_R */
	1230
	1231	#ifdef HAS_GETPWNAM_R
	1232	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1233	# undef getpwnam
	1234	# if !defined(getpwnam) && GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR
	1235	# define getpwnam(a) ((PL_reentrant_retint = getpwnam_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwnam", a) : 0))
	1236	# endif
	1237	# if !defined(getpwnam) && GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBIR
	1238	# define getpwnam(a) ((PL_reentrant_retint = getpwnam_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwnam", a) : 0))
	1239	# endif
	1240	# if !defined(getpwnam) && GETPWNAM_R_PROTO == REENTRANT_PROTO_S_CSBI
	1241	# define getpwnam(a) (getpwnam_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size) ? &PL_reentrant_buffer->_pwent_struct : ((errno == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwnam", a) : 0))
	1242	# endif
	1243	# if !defined(getpwnam) && GETPWNAM_R_PROTO == REENTRANT_PROTO_I_CSBI
	1244	# define getpwnam(a) ((PL_reentrant_retint = getpwnam_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size)) == 0 ? &PL_reentrant_buffer->_pwent_struct : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwnam", a) : 0))
	1245	# endif
	1246	# endif
	1247	#endif /* HAS_GETPWNAM_R */
	1248
	1249	#ifdef HAS_GETPWUID_R
	1250	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1251	# undef getpwuid
	1252	# if !defined(getpwuid) && GETPWUID_R_PROTO == REENTRANT_PROTO_I_TSBWR
	1253	# define getpwuid(a) ((PL_reentrant_retint = getpwuid_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwuid", a) : 0))
	1254	# endif
	1255	# if !defined(getpwuid) && GETPWUID_R_PROTO == REENTRANT_PROTO_I_TSBIR
	1256	# define getpwuid(a) ((PL_reentrant_retint = getpwuid_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size, &PL_reentrant_buffer->_pwent_ptr)) == 0 ? PL_reentrant_buffer->_pwent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwuid", a) : 0))
	1257	# endif
	1258	# if !defined(getpwuid) && GETPWUID_R_PROTO == REENTRANT_PROTO_I_TSBI
	1259	# define getpwuid(a) ((PL_reentrant_retint = getpwuid_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size)) == 0 ? &PL_reentrant_buffer->_pwent_struct : ((PL_reentrant_retint == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwuid", a) : 0))
	1260	# endif
	1261	# if !defined(getpwuid) && GETPWUID_R_PROTO == REENTRANT_PROTO_S_TSBI
	1262	# define getpwuid(a) (getpwuid_r(a, &PL_reentrant_buffer->_pwent_struct, PL_reentrant_buffer->_pwent_buffer, PL_reentrant_buffer->_pwent_size) ? &PL_reentrant_buffer->_pwent_struct : ((errno == ERANGE) ? (struct passwd *) Perl_reentrant_retry("getpwuid", a) : 0))
	1263	# endif
	1264	# endif
	1265	#endif /* HAS_GETPWUID_R */
	1266
	1267	#ifdef HAS_GETSERVBYNAME_R
	1268	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1269	# undef getservbyname
	1270	# if !defined(getservbyname) && GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_I_CCSBWR
	1271	# define getservbyname(a, b) ((PL_reentrant_retint = getservbyname_r(a, b, &PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size, &PL_reentrant_buffer->_servent_ptr)) == 0 ? PL_reentrant_buffer->_servent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyname", a, b) : 0))
	1272	# endif
	1273	# if !defined(getservbyname) && GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_S_CCSBI
	1274	# define getservbyname(a, b) (getservbyname_r(a, b, &PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size) ? &PL_reentrant_buffer->_servent_struct : ((errno == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyname", a, b) : 0))
	1275	# endif
	1276	# if !defined(getservbyname) && GETSERVBYNAME_R_PROTO == REENTRANT_PROTO_I_CCSD
	1277	# define getservbyname(a, b) (REENTR_MEMZERO(&PL_reentrant_buffer->_servent_data, sizeof(PL_reentrant_buffer->_servent_data)),(PL_reentrant_retint = getservbyname_r(a, b, &PL_reentrant_buffer->_servent_struct, &PL_reentrant_buffer->_servent_data)) == 0 ? &PL_reentrant_buffer->_servent_struct : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyname", a, b) : 0))
	1278	# endif
	1279	# endif
	1280	#endif /* HAS_GETSERVBYNAME_R */
	1281
	1282	#ifdef HAS_GETSERVBYPORT_R
	1283	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1284	# undef getservbyport
	1285	# if !defined(getservbyport) && GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_I_ICSBWR
	1286	# define getservbyport(a, b) ((PL_reentrant_retint = getservbyport_r(a, b, &PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size, &PL_reentrant_buffer->_servent_ptr)) == 0 ? PL_reentrant_buffer->_servent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyport", a, b) : 0))
	1287	# endif
	1288	# if !defined(getservbyport) && GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_S_ICSBI
	1289	# define getservbyport(a, b) (getservbyport_r(a, b, &PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size) ? &PL_reentrant_buffer->_servent_struct : ((errno == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyport", a, b) : 0))
	1290	# endif
	1291	# if !defined(getservbyport) && GETSERVBYPORT_R_PROTO == REENTRANT_PROTO_I_ICSD
	1292	# define getservbyport(a, b) (REENTR_MEMZERO(&PL_reentrant_buffer->_servent_data, sizeof(PL_reentrant_buffer->_servent_data)),(PL_reentrant_retint = getservbyport_r(a, b, &PL_reentrant_buffer->_servent_struct, &PL_reentrant_buffer->_servent_data)) == 0 ? &PL_reentrant_buffer->_servent_struct : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservbyport", a, b) : 0))
	1293	# endif
	1294	# endif
	1295	#endif /* HAS_GETSERVBYPORT_R */
	1296
	1297	#ifdef HAS_GETSERVENT_R
	1298	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1299	# undef getservent
	1300	# if !defined(getservent) && GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SBWR
	1301	# define getservent() ((PL_reentrant_retint = getservent_r(&PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size, &PL_reentrant_buffer->_servent_ptr)) == 0 ? PL_reentrant_buffer->_servent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservent") : 0))
	1302	# endif
	1303	# if !defined(getservent) && GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SBI
	1304	# define getservent() ((PL_reentrant_retint = getservent_r(&PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size)) == 0 ? &PL_reentrant_buffer->_servent_struct : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservent") : 0))
	1305	# endif
	1306	# if !defined(getservent) && GETSERVENT_R_PROTO == REENTRANT_PROTO_S_SBI
	1307	# define getservent() (getservent_r(&PL_reentrant_buffer->_servent_struct, PL_reentrant_buffer->_servent_buffer, PL_reentrant_buffer->_servent_size) ? &PL_reentrant_buffer->_servent_struct : ((errno == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservent") : 0))
	1308	# endif
	1309	# if !defined(getservent) && GETSERVENT_R_PROTO == REENTRANT_PROTO_I_SD
	1310	# define getservent() (REENTR_MEMZERO(&PL_reentrant_buffer->_servent_data, sizeof(PL_reentrant_buffer->_servent_data)),(PL_reentrant_retint = getservent_r(&PL_reentrant_buffer->_servent_struct, &PL_reentrant_buffer->_servent_data)) == 0 ? &PL_reentrant_buffer->_servent_struct : ((PL_reentrant_retint == ERANGE) ? (struct servent *) Perl_reentrant_retry("getservent") : 0))
	1311	# endif
	1312	# endif
	1313	#endif /* HAS_GETSERVENT_R */
	1314
	1315	#ifdef HAS_GETSPNAM_R
	1316	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1317	# undef getspnam
	1318	# if !defined(getspnam) && GETSPNAM_R_PROTO == REENTRANT_PROTO_I_CSBWR
	1319	# define getspnam(a) ((PL_reentrant_retint = getspnam_r(a, &PL_reentrant_buffer->_spent_struct, PL_reentrant_buffer->_spent_buffer, PL_reentrant_buffer->_spent_size, &PL_reentrant_buffer->_spent_ptr)) == 0 ? PL_reentrant_buffer->_spent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct spwd *) Perl_reentrant_retry("getspnam", a) : 0))
	1320	# endif
	1321	# if !defined(getspnam) && GETSPNAM_R_PROTO == REENTRANT_PROTO_S_CSBI
	1322	# define getspnam(a) (getspnam_r(a, &PL_reentrant_buffer->_spent_struct, PL_reentrant_buffer->_spent_buffer, PL_reentrant_buffer->_spent_size) ? &PL_reentrant_buffer->_spent_struct : ((errno == ERANGE) ? (struct spwd *) Perl_reentrant_retry("getspnam", a) : 0))
	1323	# endif
	1324	# endif
	1325	#endif /* HAS_GETSPNAM_R */
	1326
	1327	#ifdef HAS_RANDOM_R
	1328	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1329	# undef random
	1330	# if !defined(random) && RANDOM_R_PROTO == REENTRANT_PROTO_I_iS
	1331	# define random() (random_r(&PL_reentrant_buffer->_random_retval, &PL_reentrant_buffer->_random_struct) == 0 ? PL_reentrant_buffer->_random_retval : 0)
	1332	# endif
	1333	# if !defined(random) && RANDOM_R_PROTO == REENTRANT_PROTO_I_lS
	1334	# define random() (random_r(&PL_reentrant_buffer->_random_retval, &PL_reentrant_buffer->_random_struct) == 0 ? PL_reentrant_buffer->_random_retval : 0)
	1335	# endif
	1336	# if !defined(random) && RANDOM_R_PROTO == REENTRANT_PROTO_I_St
	1337	# define random() (random_r(&PL_reentrant_buffer->_random_struct, &PL_reentrant_buffer->_random_retval) == 0 ? PL_reentrant_buffer->_random_retval : 0)
	1338	# endif
	1339	# endif
	1340	#endif /* HAS_RANDOM_R */
	1341
	1342	#ifdef HAS_READDIR_R
	1343	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1344	# undef readdir
	1345	# if !defined(readdir) && READDIR_R_PROTO == REENTRANT_PROTO_I_TSR
	1346	# define readdir(a) (readdir_r(a, PL_reentrant_buffer->_readdir_struct, &PL_reentrant_buffer->_readdir_ptr) == 0 ? PL_reentrant_buffer->_readdir_ptr : 0)
	1347	# endif
	1348	# if !defined(readdir) && READDIR_R_PROTO == REENTRANT_PROTO_I_TS
	1349	# define readdir(a) (readdir_r(a, PL_reentrant_buffer->_readdir_struct) == 0 ? PL_reentrant_buffer->_readdir_struct : 0)
	1350	# endif
	1351	# endif
	1352	#endif /* HAS_READDIR_R */
	1353
	1354	#ifdef HAS_READDIR64_R
	1355	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1356	# undef readdir64
	1357	# if !defined(readdir64) && READDIR64_R_PROTO == REENTRANT_PROTO_I_TSR
	1358	# define readdir64(a) (readdir64_r(a, PL_reentrant_buffer->_readdir64_struct, &PL_reentrant_buffer->_readdir64_ptr) == 0 ? PL_reentrant_buffer->_readdir64_ptr : 0)
	1359	# endif
	1360	# if !defined(readdir64) && READDIR64_R_PROTO == REENTRANT_PROTO_I_TS
	1361	# define readdir64(a) (readdir64_r(a, PL_reentrant_buffer->_readdir64_struct) == 0 ? PL_reentrant_buffer->_readdir64_struct : 0)
	1362	# endif
	1363	# endif
	1364	#endif /* HAS_READDIR64_R */
	1365
	1366	#ifdef HAS_SETGRENT_R
	1367	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1368	# undef setgrent
	1369	# if !defined(setgrent) && SETGRENT_R_PROTO == REENTRANT_PROTO_I_H
	1370	# define setgrent() (setgrent_r(&PL_reentrant_buffer->_grent_fptr) == 0 ? 1 : 0)
	1371	# endif
	1372	# if !defined(setgrent) && SETGRENT_R_PROTO == REENTRANT_PROTO_V_H
	1373	# define setgrent() setgrent_r(&PL_reentrant_buffer->_grent_fptr)
	1374	# endif
	1375	# endif
	1376	#endif /* HAS_SETGRENT_R */
	1377
	1378	#ifdef HAS_SETHOSTENT_R
	1379	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1380	# undef sethostent
	1381	# if !defined(sethostent) && SETHOSTENT_R_PROTO == REENTRANT_PROTO_I_ID
	1382	# define sethostent(a) (sethostent_r(a, &PL_reentrant_buffer->_hostent_data) == 0 ? 1 : 0)
	1383	# endif
	1384	# if !defined(sethostent) && SETHOSTENT_R_PROTO == REENTRANT_PROTO_V_ID
	1385	# define sethostent(a) sethostent_r(a, &PL_reentrant_buffer->_hostent_data)
	1386	# endif
	1387	# endif
	1388	#endif /* HAS_SETHOSTENT_R */
	1389
	1390	#ifdef HAS_SETLOCALE_R
	1391	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1392	# undef setlocale
	1393	# if !defined(setlocale) && SETLOCALE_R_PROTO == REENTRANT_PROTO_I_ICBI
	1394	# define setlocale(a, b) (setlocale_r(a, b, PL_reentrant_buffer->_setlocale_buffer, PL_reentrant_buffer->_setlocale_size) == 0 ? PL_reentrant_buffer->_setlocale_buffer : 0)
	1395	# endif
	1396	# endif
	1397	#endif /* HAS_SETLOCALE_R */
	1398
	1399	#ifdef HAS_SETNETENT_R
	1400	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1401	# undef setnetent
	1402	# if !defined(setnetent) && SETNETENT_R_PROTO == REENTRANT_PROTO_I_ID
	1403	# define setnetent(a) (setnetent_r(a, &PL_reentrant_buffer->_netent_data) == 0 ? 1 : 0)
	1404	# endif
	1405	# if !defined(setnetent) && SETNETENT_R_PROTO == REENTRANT_PROTO_V_ID
	1406	# define setnetent(a) setnetent_r(a, &PL_reentrant_buffer->_netent_data)
	1407	# endif
	1408	# endif
	1409	#endif /* HAS_SETNETENT_R */
	1410
	1411	#ifdef HAS_SETPROTOENT_R
	1412	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1413	# undef setprotoent
	1414	# if !defined(setprotoent) && SETPROTOENT_R_PROTO == REENTRANT_PROTO_I_ID
	1415	# define setprotoent(a) (setprotoent_r(a, &PL_reentrant_buffer->_protoent_data) == 0 ? 1 : 0)
	1416	# endif
	1417	# if !defined(setprotoent) && SETPROTOENT_R_PROTO == REENTRANT_PROTO_V_ID
	1418	# define setprotoent(a) setprotoent_r(a, &PL_reentrant_buffer->_protoent_data)
	1419	# endif
	1420	# endif
	1421	#endif /* HAS_SETPROTOENT_R */
	1422
	1423	#ifdef HAS_SETPWENT_R
	1424	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1425	# undef setpwent
	1426	# if !defined(setpwent) && SETPWENT_R_PROTO == REENTRANT_PROTO_I_H
	1427	# define setpwent() (setpwent_r(&PL_reentrant_buffer->_pwent_fptr) == 0 ? 1 : 0)
	1428	# endif
	1429	# if !defined(setpwent) && SETPWENT_R_PROTO == REENTRANT_PROTO_V_H
	1430	# define setpwent() setpwent_r(&PL_reentrant_buffer->_pwent_fptr)
	1431	# endif
	1432	# endif
	1433	#endif /* HAS_SETPWENT_R */
	1434
	1435	#ifdef HAS_SETSERVENT_R
	1436	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1437	# undef setservent
	1438	# if !defined(setservent) && SETSERVENT_R_PROTO == REENTRANT_PROTO_I_ID
	1439	# define setservent(a) (setservent_r(a, &PL_reentrant_buffer->_servent_data) == 0 ? 1 : 0)
	1440	# endif
	1441	# if !defined(setservent) && SETSERVENT_R_PROTO == REENTRANT_PROTO_V_ID
	1442	# define setservent(a) setservent_r(a, &PL_reentrant_buffer->_servent_data)
	1443	# endif
	1444	# endif
	1445	#endif /* HAS_SETSERVENT_R */
	1446
	1447	#ifdef HAS_SRAND48_R
	1448	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1449	# undef srand48
	1450	# if !defined(srand48) && SRAND48_R_PROTO == REENTRANT_PROTO_I_LS
	1451	# define srand48(a) (srand48_r(a, &PL_reentrant_buffer->_drand48_struct) == 0 ? &PL_reentrant_buffer->_drand48_struct : 0)
	1452	# endif
	1453	# endif
	1454	#endif /* HAS_SRAND48_R */
	1455
	1456	#ifdef HAS_SRANDOM_R
	1457	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1458	# undef srandom
	1459	# if !defined(srandom) && SRANDOM_R_PROTO == REENTRANT_PROTO_I_TS
	1460	# define srandom(a) (srandom_r(a, &PL_reentrant_buffer->_srandom_struct) == 0 ? &PL_reentrant_buffer->_srandom_struct : 0)
	1461	# endif
	1462	# endif
	1463	#endif /* HAS_SRANDOM_R */
	1464
	1465	#ifdef HAS_STRERROR_R
	1466	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1467	# undef strerror
	1468	# if !defined(strerror) && STRERROR_R_PROTO == REENTRANT_PROTO_I_IBW
	1469	# define strerror(a) (strerror_r(a, PL_reentrant_buffer->_strerror_buffer, PL_reentrant_buffer->_strerror_size) == 0 ? PL_reentrant_buffer->_strerror_buffer : 0)
	1470	# endif
	1471	# if !defined(strerror) && STRERROR_R_PROTO == REENTRANT_PROTO_I_IBI
	1472	# define strerror(a) (strerror_r(a, PL_reentrant_buffer->_strerror_buffer, PL_reentrant_buffer->_strerror_size) == 0 ? PL_reentrant_buffer->_strerror_buffer : 0)
	1473	# endif
	1474	# if !defined(strerror) && STRERROR_R_PROTO == REENTRANT_PROTO_B_IBW
	1475	# define strerror(a) strerror_r(a, PL_reentrant_buffer->_strerror_buffer, PL_reentrant_buffer->_strerror_size)
	1476	# endif
	1477	# endif
	1478	#endif /* HAS_STRERROR_R */
	1479
	1480	#ifdef HAS_TMPNAM_R
	1481	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1482	# undef tmpnam
	1483	# if !defined(tmpnam) && TMPNAM_R_PROTO == REENTRANT_PROTO_B_B
	1484	# define tmpnam(a) tmpnam_r(a)
	1485	# endif
	1486	# endif
	1487	#endif /* HAS_TMPNAM_R */
	1488
	1489	#ifdef HAS_TTYNAME_R
	1490	# if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
	1491	# undef ttyname
	1492	# if !defined(ttyname) && TTYNAME_R_PROTO == REENTRANT_PROTO_I_IBW
	1493	# define ttyname(a) (ttyname_r(a, PL_reentrant_buffer->_ttyname_buffer, PL_reentrant_buffer->_ttyname_size) == 0 ? PL_reentrant_buffer->_ttyname_buffer : 0)
	1494	# endif
	1495	# if !defined(ttyname) && TTYNAME_R_PROTO == REENTRANT_PROTO_I_IBI
	1496	# define ttyname(a) (ttyname_r(a, PL_reentrant_buffer->_ttyname_buffer, PL_reentrant_buffer->_ttyname_size) == 0 ? PL_reentrant_buffer->_ttyname_buffer : 0)
	1497	# endif
	1498	# if !defined(ttyname) && TTYNAME_R_PROTO == REENTRANT_PROTO_B_IBI
	1499	# define ttyname(a) ttyname_r(a, PL_reentrant_buffer->_ttyname_buffer, PL_reentrant_buffer->_ttyname_size)
	1500	# endif
	1501	# endif
	1502	#endif /* HAS_TTYNAME_R */
	1503
	1504
	1505
	1506	#endif /* USE_REENTRANT_API */
	1507
	1508	#endif
	1509
	1510	/* ex: set ro: */