Commit | Line | Data |
---|---|---|
f240aacb LC |
1 | /* A GNU-like <stdlib.h>. |
2 | ||
3 | Copyright (C) 1995, 2001-2004, 2006-2009 Free Software Foundation, Inc. | |
4 | ||
5 | This program is free software: you can redistribute it and/or modify | |
6 | it under the terms of the GNU Lesser General Public License as published by | |
7 | the Free Software Foundation; either version 3 of the License, or | |
8 | (at your option) any later version. | |
9 | ||
10 | This program is distributed in the hope that it will be useful, | |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 | GNU Lesser General Public License for more details. | |
14 | ||
15 | You should have received a copy of the GNU Lesser General Public License | |
16 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
17 | ||
18 | #if __GNUC__ >= 3 | |
19 | @PRAGMA_SYSTEM_HEADER@ | |
20 | #endif | |
21 | ||
22 | #if defined __need_malloc_and_calloc | |
23 | /* Special invocation convention inside glibc header files. */ | |
24 | ||
25 | #@INCLUDE_NEXT@ @NEXT_STDLIB_H@ | |
26 | ||
27 | #else | |
28 | /* Normal invocation convention. */ | |
29 | ||
30 | #ifndef _GL_STDLIB_H | |
31 | ||
32 | /* The include_next requires a split double-inclusion guard. */ | |
33 | #@INCLUDE_NEXT@ @NEXT_STDLIB_H@ | |
34 | ||
35 | #ifndef _GL_STDLIB_H | |
36 | #define _GL_STDLIB_H | |
37 | ||
38 | ||
39 | /* Solaris declares getloadavg() in <sys/loadavg.h>. */ | |
40 | #if @GNULIB_GETLOADAVG@ && @HAVE_SYS_LOADAVG_H@ | |
41 | # include <sys/loadavg.h> | |
42 | #endif | |
43 | ||
44 | /* OSF/1 5.1 declares 'struct random_data' in <random.h>, which is included | |
45 | from <stdlib.h> if _REENTRANT is defined. Include it always. */ | |
46 | #if @HAVE_RANDOM_H@ | |
47 | # include <random.h> | |
48 | #endif | |
49 | ||
50 | #if @GNULIB_RANDOM_R@ || !@HAVE_STRUCT_RANDOM_DATA@ | |
51 | # include <stdint.h> | |
52 | #endif | |
53 | ||
54 | #if !@HAVE_STRUCT_RANDOM_DATA@ | |
55 | struct random_data | |
56 | { | |
57 | int32_t *fptr; /* Front pointer. */ | |
58 | int32_t *rptr; /* Rear pointer. */ | |
59 | int32_t *state; /* Array of state values. */ | |
60 | int rand_type; /* Type of random number generator. */ | |
61 | int rand_deg; /* Degree of random number generator. */ | |
62 | int rand_sep; /* Distance between front and rear. */ | |
63 | int32_t *end_ptr; /* Pointer behind state table. */ | |
64 | }; | |
65 | #endif | |
66 | ||
67 | /* The definition of GL_LINK_WARNING is copied here. */ | |
68 | ||
69 | ||
70 | /* Some systems do not define EXIT_*, despite otherwise supporting C89. */ | |
71 | #ifndef EXIT_SUCCESS | |
72 | # define EXIT_SUCCESS 0 | |
73 | #endif | |
74 | /* Tandem/NSK and other platforms that define EXIT_FAILURE as -1 interfere | |
75 | with proper operation of xargs. */ | |
76 | #ifndef EXIT_FAILURE | |
77 | # define EXIT_FAILURE 1 | |
78 | #elif EXIT_FAILURE != 1 | |
79 | # undef EXIT_FAILURE | |
80 | # define EXIT_FAILURE 1 | |
81 | #endif | |
82 | ||
83 | ||
84 | #ifdef __cplusplus | |
85 | extern "C" { | |
86 | #endif | |
87 | ||
88 | ||
89 | #if @GNULIB_MALLOC_POSIX@ | |
90 | # if !@HAVE_MALLOC_POSIX@ | |
91 | # undef malloc | |
92 | # define malloc rpl_malloc | |
93 | extern void * malloc (size_t size); | |
94 | # endif | |
95 | #elif defined GNULIB_POSIXCHECK | |
96 | # undef malloc | |
97 | # define malloc(s) \ | |
98 | (GL_LINK_WARNING ("malloc is not POSIX compliant everywhere - " \ | |
99 | "use gnulib module malloc-posix for portability"), \ | |
100 | malloc (s)) | |
101 | #endif | |
102 | ||
103 | ||
104 | #if @GNULIB_REALLOC_POSIX@ | |
105 | # if !@HAVE_REALLOC_POSIX@ | |
106 | # undef realloc | |
107 | # define realloc rpl_realloc | |
108 | extern void * realloc (void *ptr, size_t size); | |
109 | # endif | |
110 | #elif defined GNULIB_POSIXCHECK | |
111 | # undef realloc | |
112 | # define realloc(p,s) \ | |
113 | (GL_LINK_WARNING ("realloc is not POSIX compliant everywhere - " \ | |
114 | "use gnulib module realloc-posix for portability"), \ | |
115 | realloc (p, s)) | |
116 | #endif | |
117 | ||
118 | ||
119 | #if @GNULIB_CALLOC_POSIX@ | |
120 | # if !@HAVE_CALLOC_POSIX@ | |
121 | # undef calloc | |
122 | # define calloc rpl_calloc | |
123 | extern void * calloc (size_t nmemb, size_t size); | |
124 | # endif | |
125 | #elif defined GNULIB_POSIXCHECK | |
126 | # undef calloc | |
127 | # define calloc(n,s) \ | |
128 | (GL_LINK_WARNING ("calloc is not POSIX compliant everywhere - " \ | |
129 | "use gnulib module calloc-posix for portability"), \ | |
130 | calloc (n, s)) | |
131 | #endif | |
132 | ||
133 | ||
134 | #if @GNULIB_ATOLL@ | |
135 | # if !@HAVE_ATOLL@ | |
136 | /* Parse a signed decimal integer. | |
137 | Returns the value of the integer. Errors are not detected. */ | |
138 | extern long long atoll (const char *string); | |
139 | # endif | |
140 | #elif defined GNULIB_POSIXCHECK | |
141 | # undef atoll | |
142 | # define atoll(s) \ | |
143 | (GL_LINK_WARNING ("atoll is unportable - " \ | |
144 | "use gnulib module atoll for portability"), \ | |
145 | atoll (s)) | |
146 | #endif | |
147 | ||
148 | ||
149 | #if @GNULIB_GETLOADAVG@ | |
150 | # if !@HAVE_DECL_GETLOADAVG@ | |
151 | /* Store max(NELEM,3) load average numbers in LOADAVG[]. | |
152 | The three numbers are the load average of the last 1 minute, the last 5 | |
153 | minutes, and the last 15 minutes, respectively. | |
154 | LOADAVG is an array of NELEM numbers. */ | |
155 | extern int getloadavg (double loadavg[], int nelem); | |
156 | # endif | |
157 | #elif defined GNULIB_POSIXCHECK | |
158 | # undef getloadavg | |
159 | # define getloadavg(l,n) \ | |
160 | (GL_LINK_WARNING ("getloadavg is not portable - " \ | |
161 | "use gnulib module getloadavg for portability"), \ | |
162 | getloadavg (l, n)) | |
163 | #endif | |
164 | ||
165 | ||
166 | #if @GNULIB_GETSUBOPT@ | |
167 | /* Assuming *OPTIONP is a comma separated list of elements of the form | |
168 | "token" or "token=value", getsubopt parses the first of these elements. | |
169 | If the first element refers to a "token" that is member of the given | |
170 | NULL-terminated array of tokens: | |
171 | - It replaces the comma with a NUL byte, updates *OPTIONP to point past | |
172 | the first option and the comma, sets *VALUEP to the value of the | |
173 | element (or NULL if it doesn't contain an "=" sign), | |
174 | - It returns the index of the "token" in the given array of tokens. | |
175 | Otherwise it returns -1, and *OPTIONP and *VALUEP are undefined. | |
176 | For more details see the POSIX:2001 specification. | |
177 | http://www.opengroup.org/susv3xsh/getsubopt.html */ | |
178 | # if !@HAVE_GETSUBOPT@ | |
179 | extern int getsubopt (char **optionp, char *const *tokens, char **valuep); | |
180 | # endif | |
181 | #elif defined GNULIB_POSIXCHECK | |
182 | # undef getsubopt | |
183 | # define getsubopt(o,t,v) \ | |
184 | (GL_LINK_WARNING ("getsubopt is unportable - " \ | |
185 | "use gnulib module getsubopt for portability"), \ | |
186 | getsubopt (o, t, v)) | |
187 | #endif | |
188 | ||
189 | ||
190 | #if @GNULIB_MKDTEMP@ | |
191 | # if !@HAVE_MKDTEMP@ | |
192 | /* Create a unique temporary directory from TEMPLATE. | |
193 | The last six characters of TEMPLATE must be "XXXXXX"; | |
194 | they are replaced with a string that makes the directory name unique. | |
195 | Returns TEMPLATE, or a null pointer if it cannot get a unique name. | |
196 | The directory is created mode 700. */ | |
197 | extern char * mkdtemp (char * /*template*/); | |
198 | # endif | |
199 | #elif defined GNULIB_POSIXCHECK | |
200 | # undef mkdtemp | |
201 | # define mkdtemp(t) \ | |
202 | (GL_LINK_WARNING ("mkdtemp is unportable - " \ | |
203 | "use gnulib module mkdtemp for portability"), \ | |
204 | mkdtemp (t)) | |
205 | #endif | |
206 | ||
207 | ||
208 | #if @GNULIB_MKSTEMP@ | |
209 | # if @REPLACE_MKSTEMP@ | |
210 | /* Create a unique temporary file from TEMPLATE. | |
211 | The last six characters of TEMPLATE must be "XXXXXX"; | |
212 | they are replaced with a string that makes the file name unique. | |
213 | The file is then created, ensuring it didn't exist before. | |
214 | The file is created read-write (mask at least 0600 & ~umask), but it may be | |
215 | world-readable and world-writable (mask 0666 & ~umask), depending on the | |
216 | implementation. | |
217 | Returns the open file descriptor if successful, otherwise -1 and errno | |
218 | set. */ | |
219 | # define mkstemp rpl_mkstemp | |
220 | extern int mkstemp (char * /*template*/); | |
221 | # else | |
222 | /* On MacOS X 10.3, only <unistd.h> declares mkstemp. */ | |
223 | # include <unistd.h> | |
224 | # endif | |
225 | #elif defined GNULIB_POSIXCHECK | |
226 | # undef mkstemp | |
227 | # define mkstemp(t) \ | |
228 | (GL_LINK_WARNING ("mkstemp is unportable - " \ | |
229 | "use gnulib module mkstemp for portability"), \ | |
230 | mkstemp (t)) | |
231 | #endif | |
232 | ||
233 | ||
234 | #if @GNULIB_PUTENV@ | |
235 | # if @REPLACE_PUTENV@ | |
236 | # undef putenv | |
237 | # define putenv rpl_putenv | |
238 | extern int putenv (char *string); | |
239 | # endif | |
240 | #endif | |
241 | ||
242 | ||
243 | #if @GNULIB_RANDOM_R@ | |
244 | # if !@HAVE_RANDOM_R@ | |
245 | ||
246 | # ifndef RAND_MAX | |
247 | # define RAND_MAX 2147483647 | |
248 | # endif | |
249 | ||
250 | int srandom_r (unsigned int seed, struct random_data *rand_state); | |
251 | int initstate_r (unsigned int seed, char *buf, size_t buf_size, | |
252 | struct random_data *rand_state); | |
253 | int setstate_r (char *arg_state, struct random_data *rand_state); | |
254 | int random_r (struct random_data *buf, int32_t *result); | |
255 | # endif | |
256 | #elif defined GNULIB_POSIXCHECK | |
257 | # undef random_r | |
258 | # define random_r(b,r) \ | |
259 | (GL_LINK_WARNING ("random_r is unportable - " \ | |
260 | "use gnulib module random_r for portability"), \ | |
261 | random_r (b,r)) | |
262 | # undef initstate_r | |
263 | # define initstate_r(s,b,sz,r) \ | |
264 | (GL_LINK_WARNING ("initstate_r is unportable - " \ | |
265 | "use gnulib module random_r for portability"), \ | |
266 | initstate_r (s,b,sz,r)) | |
267 | # undef srandom_r | |
268 | # define srandom_r(s,r) \ | |
269 | (GL_LINK_WARNING ("srandom_r is unportable - " \ | |
270 | "use gnulib module random_r for portability"), \ | |
271 | srandom_r (s,r)) | |
272 | # undef setstate_r | |
273 | # define setstate_r(a,r) \ | |
274 | (GL_LINK_WARNING ("setstate_r is unportable - " \ | |
275 | "use gnulib module random_r for portability"), \ | |
276 | setstate_r (a,r)) | |
277 | #endif | |
278 | ||
279 | ||
280 | #if @GNULIB_RPMATCH@ | |
281 | # if !@HAVE_RPMATCH@ | |
282 | /* Test a user response to a question. | |
283 | Return 1 if it is affirmative, 0 if it is negative, or -1 if not clear. */ | |
284 | extern int rpmatch (const char *response); | |
285 | # endif | |
286 | #elif defined GNULIB_POSIXCHECK | |
287 | # undef rpmatch | |
288 | # define rpmatch(r) \ | |
289 | (GL_LINK_WARNING ("rpmatch is unportable - " \ | |
290 | "use gnulib module rpmatch for portability"), \ | |
291 | rpmatch (r)) | |
292 | #endif | |
293 | ||
294 | ||
295 | #if @GNULIB_SETENV@ | |
296 | # if !@HAVE_SETENV@ | |
297 | /* Set NAME to VALUE in the environment. | |
298 | If REPLACE is nonzero, overwrite an existing value. */ | |
299 | extern int setenv (const char *name, const char *value, int replace); | |
300 | # endif | |
301 | #endif | |
302 | ||
303 | ||
304 | #if @GNULIB_UNSETENV@ | |
305 | # if @HAVE_UNSETENV@ | |
306 | # if @VOID_UNSETENV@ | |
307 | /* On some systems, unsetenv() returns void. | |
308 | This is the case for MacOS X 10.3, FreeBSD 4.8, NetBSD 1.6, OpenBSD 3.4. */ | |
309 | # define unsetenv(name) ((unsetenv)(name), 0) | |
310 | # endif | |
311 | # else | |
312 | /* Remove the variable NAME from the environment. */ | |
313 | extern int unsetenv (const char *name); | |
314 | # endif | |
315 | #endif | |
316 | ||
317 | ||
318 | #if @GNULIB_STRTOD@ | |
319 | # if @REPLACE_STRTOD@ | |
320 | # define strtod rpl_strtod | |
321 | # endif | |
322 | # if !@HAVE_STRTOD@ || @REPLACE_STRTOD@ | |
323 | /* Parse a double from STRING, updating ENDP if appropriate. */ | |
324 | extern double strtod (const char *str, char **endp); | |
325 | # endif | |
326 | #elif defined GNULIB_POSIXCHECK | |
327 | # undef strtod | |
328 | # define strtod(s, e) \ | |
329 | (GL_LINK_WARNING ("strtod is unportable - " \ | |
330 | "use gnulib module strtod for portability"), \ | |
331 | strtod (s, e)) | |
332 | #endif | |
333 | ||
334 | ||
335 | #if @GNULIB_STRTOLL@ | |
336 | # if !@HAVE_STRTOLL@ | |
337 | /* Parse a signed integer whose textual representation starts at STRING. | |
338 | The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, | |
339 | it may be decimal or octal (with prefix "0") or hexadecimal (with prefix | |
340 | "0x"). | |
341 | If ENDPTR is not NULL, the address of the first byte after the integer is | |
342 | stored in *ENDPTR. | |
343 | Upon overflow, the return value is LLONG_MAX or LLONG_MIN, and errno is set | |
344 | to ERANGE. */ | |
345 | extern long long strtoll (const char *string, char **endptr, int base); | |
346 | # endif | |
347 | #elif defined GNULIB_POSIXCHECK | |
348 | # undef strtoll | |
349 | # define strtoll(s,e,b) \ | |
350 | (GL_LINK_WARNING ("strtoll is unportable - " \ | |
351 | "use gnulib module strtoll for portability"), \ | |
352 | strtoll (s, e, b)) | |
353 | #endif | |
354 | ||
355 | ||
356 | #if @GNULIB_STRTOULL@ | |
357 | # if !@HAVE_STRTOULL@ | |
358 | /* Parse an unsigned integer whose textual representation starts at STRING. | |
359 | The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, | |
360 | it may be decimal or octal (with prefix "0") or hexadecimal (with prefix | |
361 | "0x"). | |
362 | If ENDPTR is not NULL, the address of the first byte after the integer is | |
363 | stored in *ENDPTR. | |
364 | Upon overflow, the return value is ULLONG_MAX, and errno is set to | |
365 | ERANGE. */ | |
366 | extern unsigned long long strtoull (const char *string, char **endptr, int base); | |
367 | # endif | |
368 | #elif defined GNULIB_POSIXCHECK | |
369 | # undef strtoull | |
370 | # define strtoull(s,e,b) \ | |
371 | (GL_LINK_WARNING ("strtoull is unportable - " \ | |
372 | "use gnulib module strtoull for portability"), \ | |
373 | strtoull (s, e, b)) | |
374 | #endif | |
375 | ||
376 | ||
377 | #ifdef __cplusplus | |
378 | } | |
379 | #endif | |
380 | ||
381 | #endif /* _GL_STDLIB_H */ | |
382 | #endif /* _GL_STDLIB_H */ | |
383 | #endif |