• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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 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 General Public License for more details.
14 
15    You should have received a copy of the GNU 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
384