1 /* Function declarations for libiberty.
3 Copyright (C) 1997-2015 Free Software Foundation, Inc.
5 Note - certain prototypes declared in this header file are for
6 functions whoes implementation copyright does not belong to the
7 FSF. Those prototypes are present in this file for reference
8 purposes only and their presence in this file should not construed
9 as an indication of ownership by the FSF of the implementation of
10 those functions in any way or form whatsoever.
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2, or (at your option)
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software
24 Foundation, Inc., 51 Franklin Street - Fifth Floor,
25 Boston, MA 02110-1301, USA.
27 Written by Cygnus Support, 1994.
29 The libiberty library provides a number of functions which are
30 missing on some operating systems. We do not declare those here,
31 to avoid conflicts with the system header files on operating
32 systems that do support those functions. In this file we only
33 declare those functions which are specific to libiberty. */
44 /* Get a definition for size_t. */
46 /* Get a definition for va_list. */
51 /* If the OS supports it, ensure that the supplied stream is setup to
52 avoid any multi-threaded locking. Otherwise leave the FILE pointer
53 unchanged. If the stream is NULL do nothing. */
55 extern void unlock_stream (FILE *);
57 /* If the OS supports it, ensure that the standard I/O streams, stdin,
58 stdout and stderr are setup to avoid any multi-threaded locking.
59 Otherwise do nothing. */
61 extern void unlock_std_streams (void);
63 /* Open and return a FILE pointer. If the OS supports it, ensure that
64 the stream is setup to avoid any multi-threaded locking. Otherwise
65 return the FILE pointer unchanged. */
67 extern FILE *fopen_unlocked (const char *, const char *);
68 extern FILE *fdopen_unlocked (int, const char *);
69 extern FILE *freopen_unlocked (const char *, const char *, FILE *);
71 /* Build an argument vector from a string. Allocates memory using
72 malloc. Use freeargv to free the vector. */
74 extern char **buildargv (const char *) ATTRIBUTE_MALLOC;
76 /* Free a vector returned by buildargv. */
78 extern void freeargv (char **);
80 /* Duplicate an argument vector. Allocates memory using malloc. Use
81 freeargv to free the vector. */
83 extern char **dupargv (char **) ATTRIBUTE_MALLOC;
85 /* Expand "@file" arguments in argv. */
87 extern void expandargv (int *, char ***);
89 /* Write argv to an @-file, inserting necessary quoting. */
91 extern int writeargv (char **, FILE *);
93 /* Return the number of elements in argv. */
95 extern int countargv (char**);
97 /* Return the last component of a path name. Note that we can't use a
98 prototype here because the parameter is declared inconsistently
99 across different systems, sometimes as "char *" and sometimes as
102 /* HAVE_DECL_* is a three-state macro: undefined, 0 or 1. If it is
103 undefined, we haven't run the autoconf check so provide the
104 declaration without arguments. If it is 0, we checked and failed
105 to find the declaration so provide a fully prototyped one. If it
106 is 1, we found it so don't provide any declaration at all. */
107 #if !HAVE_DECL_BASENAME
108 #if defined (__GNU_LIBRARY__ ) || defined (__linux__) \
109 || defined (__FreeBSD__) || defined (__OpenBSD__) || defined (__NetBSD__) \
110 || defined (__CYGWIN__) || defined (__CYGWIN32__) || defined (__MINGW32__) \
111 || defined (__DragonFly__) || defined (HAVE_DECL_BASENAME)
112 extern char *basename (const char *) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_NONNULL(1);
114 /* Do not allow basename to be used if there is no prototype seen. We
115 either need to use the above prototype or have one from
116 autoconf which would result in HAVE_DECL_BASENAME being set. */
117 #define basename basename_cannot_be_used_without_a_prototype
121 /* A well-defined basename () that is always compiled in. */
123 extern const char *lbasename (const char *) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_NONNULL(1);
125 /* Same, but assumes DOS semantics (drive name, backslash is also a
126 dir separator) regardless of host. */
128 extern const char *dos_lbasename (const char *) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_NONNULL(1);
130 /* Same, but assumes Unix semantics (absolute paths always start with
131 a slash, only forward slash is accepted as dir separator)
132 regardless of host. */
134 extern const char *unix_lbasename (const char *) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_NONNULL(1);
136 /* A well-defined realpath () that is always compiled in. */
138 extern char *lrealpath (const char *);
140 /* Concatenate an arbitrary number of strings. You must pass NULL as
141 the last argument of this function, to terminate the list of
142 strings. Allocates memory using xmalloc. */
144 extern char *concat (const char *, ...) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_SENTINEL;
146 /* Concatenate an arbitrary number of strings. You must pass NULL as
147 the last argument of this function, to terminate the list of
148 strings. Allocates memory using xmalloc. The first argument is
149 not one of the strings to be concatenated, but if not NULL is a
150 pointer to be freed after the new string is created, similar to the
151 way xrealloc works. */
153 extern char *reconcat (char *, const char *, ...) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_SENTINEL;
155 /* Determine the length of concatenating an arbitrary number of
156 strings. You must pass NULL as the last argument of this function,
157 to terminate the list of strings. */
159 extern unsigned long concat_length (const char *, ...) ATTRIBUTE_SENTINEL;
161 /* Concatenate an arbitrary number of strings into a SUPPLIED area of
162 memory. You must pass NULL as the last argument of this function,
163 to terminate the list of strings. The supplied memory is assumed
164 to be large enough. */
166 extern char *concat_copy (char *, const char *, ...) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_NONNULL(1) ATTRIBUTE_SENTINEL;
168 /* Concatenate an arbitrary number of strings into a GLOBAL area of
169 memory. You must pass NULL as the last argument of this function,
170 to terminate the list of strings. The supplied memory is assumed
171 to be large enough. */
173 extern char *concat_copy2 (const char *, ...) ATTRIBUTE_RETURNS_NONNULL ATTRIBUTE_SENTINEL;
175 /* This is the global area used by concat_copy2. */
177 extern char *libiberty_concat_ptr;
179 /* Concatenate an arbitrary number of strings. You must pass NULL as
180 the last argument of this function, to terminate the list of
181 strings. Allocates memory using alloca. The arguments are
183 #define ACONCAT(ACONCAT_PARAMS) \
184 (libiberty_concat_ptr = (char *) alloca (concat_length ACONCAT_PARAMS + 1), \
185 concat_copy2 ACONCAT_PARAMS)
187 /* Check whether two file descriptors refer to the same file. */
189 extern int fdmatch (int fd1, int fd2);
191 /* Return the position of the first bit set in the argument. */
192 /* Prototypes vary from system to system, so we only provide a
193 prototype on systems where we know that we need it. */
194 #if defined (HAVE_DECL_FFS) && !HAVE_DECL_FFS
198 /* Get the working directory. The result is cached, so don't call
199 chdir() between calls to getpwd(). */
201 extern char * getpwd (void);
203 /* Get the current time. */
204 /* Prototypes vary from system to system, so we only provide a
205 prototype on systems where we know that we need it. */
207 /* Forward declaration to avoid #include <sys/time.h>. */
209 extern int gettimeofday (struct timeval *, void *);
212 /* Get the amount of time the process has run, in microseconds. */
214 extern long get_run_time (void);
216 /* Generate a relocated path to some installation directory. Allocates
217 return value using malloc. */
219 extern char *make_relative_prefix (const char *, const char *,
220 const char *) ATTRIBUTE_MALLOC;
222 /* Generate a relocated path to some installation directory without
223 attempting to follow any soft links. Allocates
224 return value using malloc. */
226 extern char *make_relative_prefix_ignore_links (const char *, const char *,
227 const char *) ATTRIBUTE_MALLOC;
229 /* Choose a temporary directory to use for scratch files. */
231 extern char *choose_temp_base (void) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
233 /* Return a temporary file name or NULL if unable to create one. */
235 extern char *make_temp_file (const char *) ATTRIBUTE_MALLOC;
237 /* Remove a link to a file unless it is special. */
239 extern int unlink_if_ordinary (const char *);
241 /* Allocate memory filled with spaces. Allocates using malloc. */
243 extern const char *spaces (int count);
245 /* Return the maximum error number for which strerror will return a
248 extern int errno_max (void);
250 /* Return the name of an errno value (e.g., strerrno (EINVAL) returns
253 extern const char *strerrno (int);
255 /* Given the name of an errno value, return the value. */
257 extern int strtoerrno (const char *);
259 /* ANSI's strerror(), but more robust. */
261 extern char *xstrerror (int) ATTRIBUTE_RETURNS_NONNULL;
263 /* Return the maximum signal number for which strsignal will return a
266 extern int signo_max (void);
268 /* Return a signal message string for a signal number
269 (e.g., strsignal (SIGHUP) returns something like "Hangup"). */
270 /* This is commented out as it can conflict with one in system headers.
271 We still document its existence though. */
273 /*extern const char *strsignal (int);*/
275 /* Return the name of a signal number (e.g., strsigno (SIGHUP) returns
278 extern const char *strsigno (int);
280 /* Given the name of a signal, return its number. */
282 extern int strtosigno (const char *);
284 /* Register a function to be run by xexit. Returns 0 on success. */
286 extern int xatexit (void (*fn) (void));
288 /* Exit, calling all the functions registered with xatexit. */
290 extern void xexit (int status) ATTRIBUTE_NORETURN;
292 /* Set the program name used by xmalloc. */
294 extern void xmalloc_set_program_name (const char *);
296 /* Report an allocation failure. */
297 extern void xmalloc_failed (size_t) ATTRIBUTE_NORETURN;
299 /* Allocate memory without fail. If malloc fails, this will print a
300 message to stderr (using the name set by xmalloc_set_program_name,
301 if any) and then call xexit. */
303 extern void *xmalloc (size_t) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
305 /* Reallocate memory without fail. This works like xmalloc. Note,
306 realloc type functions are not suitable for attribute malloc since
307 they may return the same address across multiple calls. */
309 extern void *xrealloc (void *, size_t) ATTRIBUTE_RETURNS_NONNULL;
311 /* Allocate memory without fail and set it to zero. This works like
314 extern void *xcalloc (size_t, size_t) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
316 /* Copy a string into a memory buffer without fail. */
318 extern char *xstrdup (const char *) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
320 /* Copy at most N characters from string into a buffer without fail. */
322 extern char *xstrndup (const char *, size_t) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
324 /* Copy an existing memory buffer to a new memory buffer without fail. */
326 extern void *xmemdup (const void *, size_t, size_t) ATTRIBUTE_MALLOC ATTRIBUTE_RETURNS_NONNULL;
328 /* Physical memory routines. Return values are in BYTES. */
329 extern double physmem_total (void);
330 extern double physmem_available (void);
332 /* Compute the 32-bit CRC of a block of memory. */
333 extern unsigned int xcrc32 (const unsigned char *, int, unsigned int);
335 /* These macros provide a K&R/C89/C++-friendly way of allocating structures
336 with nice encapsulation. The XDELETE*() macros are technically
337 superfluous, but provided here for symmetry. Using them consistently
338 makes it easier to update client code to use different allocators such
339 as new/delete and new[]/delete[]. */
341 /* Scalar allocators. */
343 #define XALLOCA(T) ((T *) alloca (sizeof (T)))
344 #define XNEW(T) ((T *) xmalloc (sizeof (T)))
345 #define XCNEW(T) ((T *) xcalloc (1, sizeof (T)))
346 #define XDUP(T, P) ((T *) xmemdup ((P), sizeof (T), sizeof (T)))
347 #define XDELETE(P) free ((void*) (P))
349 /* Array allocators. */
351 #define XALLOCAVEC(T, N) ((T *) alloca (sizeof (T) * (N)))
352 #define XNEWVEC(T, N) ((T *) xmalloc (sizeof (T) * (N)))
353 #define XCNEWVEC(T, N) ((T *) xcalloc ((N), sizeof (T)))
354 #define XDUPVEC(T, P, N) ((T *) xmemdup ((P), sizeof (T) * (N), sizeof (T) * (N)))
355 #define XRESIZEVEC(T, P, N) ((T *) xrealloc ((void *) (P), sizeof (T) * (N)))
356 #define XDELETEVEC(P) free ((void*) (P))
358 /* Allocators for variable-sized structures and raw buffers. */
360 #define XALLOCAVAR(T, S) ((T *) alloca ((S)))
361 #define XNEWVAR(T, S) ((T *) xmalloc ((S)))
362 #define XCNEWVAR(T, S) ((T *) xcalloc (1, (S)))
363 #define XDUPVAR(T, P, S1, S2) ((T *) xmemdup ((P), (S1), (S2)))
364 #define XRESIZEVAR(T, P, S) ((T *) xrealloc ((P), (S)))
366 /* Type-safe obstack allocator. */
368 #define XOBNEW(O, T) ((T *) obstack_alloc ((O), sizeof (T)))
369 #define XOBNEWVEC(O, T, N) ((T *) obstack_alloc ((O), sizeof (T) * (N)))
370 #define XOBNEWVAR(O, T, S) ((T *) obstack_alloc ((O), (S)))
371 #define XOBFINISH(O, T) ((T) obstack_finish ((O)))
373 /* hex character manipulation routines */
375 #define _hex_array_size 256
377 extern const unsigned char _hex_value[_hex_array_size];
378 extern void hex_init (void);
379 #define hex_p(c) (hex_value (c) != _hex_bad)
380 /* If you change this, note well: Some code relies on side effects in
381 the argument being performed exactly once. */
382 #define hex_value(c) ((unsigned int) _hex_value[(unsigned char) (c)])
384 /* Flags for pex_init. These are bits to be or'ed together. */
386 /* Record subprocess times, if possible. */
387 #define PEX_RECORD_TIMES 0x1
389 /* Use pipes for communication between processes, if possible. */
390 #define PEX_USE_PIPES 0x2
392 /* Save files used for communication between processes. */
393 #define PEX_SAVE_TEMPS 0x4
395 /* Prepare to execute one or more programs, with standard output of
396 each program fed to standard input of the next.
398 PNAME The name of the program to report in error messages.
399 TEMPBASE A base name to use for temporary files; may be NULL to
401 Returns NULL on error. */
403 extern struct pex_obj *pex_init (int flags, const char *pname,
404 const char *tempbase) ATTRIBUTE_RETURNS_NONNULL;
406 /* Flags for pex_run. These are bits to be or'ed together. */
408 /* Last program in pipeline. Standard output of program goes to
409 OUTNAME, or, if OUTNAME is NULL, to standard output of caller. Do
410 not set this if you want to call pex_read_output. After this is
411 set, pex_run may no longer be called with the same struct
415 /* Search for program in executable search path. */
416 #define PEX_SEARCH 0x2
418 /* OUTNAME is a suffix. */
419 #define PEX_SUFFIX 0x4
421 /* Send program's standard error to standard output. */
422 #define PEX_STDERR_TO_STDOUT 0x8
424 /* Input file should be opened in binary mode. This flag is ignored
426 #define PEX_BINARY_INPUT 0x10
428 /* Output file should be opened in binary mode. This flag is ignored
429 on Unix. For proper behaviour PEX_BINARY_INPUT and
430 PEX_BINARY_OUTPUT have to match appropriately--i.e., a call using
431 PEX_BINARY_OUTPUT should be followed by a call using
433 #define PEX_BINARY_OUTPUT 0x20
435 /* Capture stderr to a pipe. The output can be read by
436 calling pex_read_err and reading from the returned
437 FILE object. This flag may be specified only for
438 the last program in a pipeline.
440 This flag is supported only on Unix and Windows. */
441 #define PEX_STDERR_TO_PIPE 0x40
443 /* Capture stderr in binary mode. This flag is ignored
445 #define PEX_BINARY_ERROR 0x80
447 /* Append stdout to existing file instead of truncating it. */
448 #define PEX_STDOUT_APPEND 0x100
450 /* Thes same as PEX_STDOUT_APPEND, but for STDERR. */
451 #define PEX_STDERR_APPEND 0x200
453 /* Execute one program. Returns NULL on success. On error returns an
454 error string (typically just the name of a system call); the error
455 string is statically allocated.
457 OBJ Returned by pex_init.
461 EXECUTABLE The program to execute.
463 ARGV NULL terminated array of arguments to pass to the program.
465 OUTNAME Sets the output file name as follows:
467 PEX_SUFFIX set (OUTNAME may not be NULL):
468 TEMPBASE parameter to pex_init not NULL:
469 Output file name is the concatenation of TEMPBASE
472 Output file name is a random file name ending in
476 Output file name is OUTNAME.
477 OUTNAME NULL, TEMPBASE not NULL:
478 Output file name is randomly chosen using
480 OUTNAME NULL, TEMPBASE NULL:
481 Output file name is randomly chosen.
483 If PEX_LAST is not set, the output file name is the
484 name to use for a temporary file holding stdout, if
485 any (there will not be a file if PEX_USE_PIPES is set
486 and the system supports pipes). If a file is used, it
487 will be removed when no longer needed unless
488 PEX_SAVE_TEMPS is set.
490 If PEX_LAST is set, and OUTNAME is not NULL, standard
491 output is written to the output file name. The file
492 will not be removed. If PEX_LAST and PEX_SUFFIX are
493 both set, TEMPBASE may not be NULL.
495 ERRNAME If not NULL, this is the name of a file to which
496 standard error is written. If NULL, standard error of
497 the program is standard error of the caller.
499 ERR On an error return, *ERR is set to an errno value, or
500 to 0 if there is no relevant errno.
503 extern const char *pex_run (struct pex_obj *obj, int flags,
504 const char *executable, char * const *argv,
505 const char *outname, const char *errname,
508 /* As for pex_run (), but takes an extra parameter to enable the
509 environment for the child process to be specified.
511 ENV The environment for the child process, specified as
512 an array of character pointers. Each element of the
513 array should point to a string of the form VAR=VALUE,
514 with the exception of the last element which must be
518 extern const char *pex_run_in_environment (struct pex_obj *obj, int flags,
519 const char *executable,
523 const char *errname, int *err);
525 /* Return a stream for a temporary file to pass to the first program
526 in the pipeline as input. The file name is chosen as for pex_run.
527 pex_run closes the file automatically; don't close it yourself. */
529 extern FILE *pex_input_file (struct pex_obj *obj, int flags,
530 const char *in_name);
532 /* Return a stream for a pipe connected to the standard input of the
533 first program in the pipeline. You must have passed
534 `PEX_USE_PIPES' to `pex_init'. Close the returned stream
537 extern FILE *pex_input_pipe (struct pex_obj *obj, int binary);
539 /* Read the standard output of the last program to be executed.
540 pex_run can not be called after this. BINARY should be non-zero if
541 the file should be opened in binary mode; this is ignored on Unix.
542 Returns NULL on error. Don't call fclose on the returned FILE; it
543 will be closed by pex_free. */
545 extern FILE *pex_read_output (struct pex_obj *, int binary);
547 /* Read the standard error of the last program to be executed.
548 pex_run can not be called after this. BINARY should be non-zero if
549 the file should be opened in binary mode; this is ignored on Unix.
550 Returns NULL on error. Don't call fclose on the returned FILE; it
551 will be closed by pex_free. */
553 extern FILE *pex_read_err (struct pex_obj *, int binary);
555 /* Return exit status of all programs in VECTOR. COUNT indicates the
556 size of VECTOR. The status codes in the vector are in the order of
557 the calls to pex_run. Returns 0 on error, 1 on success. */
559 extern int pex_get_status (struct pex_obj *, int count, int *vector);
561 /* Return times of all programs in VECTOR. COUNT indicates the size
562 of VECTOR. struct pex_time is really just struct timeval, but that
563 is not portable to all systems. Returns 0 on error, 1 on
568 unsigned long user_seconds;
569 unsigned long user_microseconds;
570 unsigned long system_seconds;
571 unsigned long system_microseconds;
574 extern int pex_get_times (struct pex_obj *, int count,
575 struct pex_time *vector);
577 /* Clean up a pex_obj. If you have not called pex_get_times or
578 pex_get_status, this will try to kill the subprocesses. */
580 extern void pex_free (struct pex_obj *);
582 /* Just execute one program. Return value is as for pex_run.
583 FLAGS Combination of PEX_SEARCH and PEX_STDERR_TO_STDOUT.
584 EXECUTABLE As for pex_run.
586 PNAME As for pex_init.
587 OUTNAME As for pex_run when PEX_LAST is set.
588 ERRNAME As for pex_run.
589 STATUS Set to exit status on success.
593 extern const char *pex_one (int flags, const char *executable,
594 char * const *argv, const char *pname,
595 const char *outname, const char *errname,
596 int *status, int *err);
598 /* pexecute and pwait are the old pexecute interface, still here for
599 backward compatibility. Don't use these for new code. Instead,
600 use pex_init/pex_run/pex_get_status/pex_free, or pex_one. */
602 /* Definitions used by the pexecute routine. */
604 #define PEXECUTE_FIRST 1
605 #define PEXECUTE_LAST 2
606 #define PEXECUTE_ONE (PEXECUTE_FIRST + PEXECUTE_LAST)
607 #define PEXECUTE_SEARCH 4
608 #define PEXECUTE_VERBOSE 8
610 /* Execute a program. */
612 extern int pexecute (const char *, char * const *, const char *,
613 const char *, char **, char **, int);
615 /* Wait for pexecute to finish. */
617 extern int pwait (int, int *, int);
619 #if !HAVE_DECL_ASPRINTF
620 /* Like sprintf but provides a pointer to malloc'd storage, which must
621 be freed by the caller. */
623 extern int asprintf (char **, const char *, ...) ATTRIBUTE_PRINTF_2;
626 /* Like asprintf but allocates memory without fail. This works like
629 extern char *xasprintf (const char *, ...) ATTRIBUTE_MALLOC ATTRIBUTE_PRINTF_1;
631 #if !HAVE_DECL_VASPRINTF
632 /* Like vsprintf but provides a pointer to malloc'd storage, which
633 must be freed by the caller. */
635 extern int vasprintf (char **, const char *, va_list) ATTRIBUTE_PRINTF(2,0);
638 /* Like vasprintf but allocates memory without fail. This works like
641 extern char *xvasprintf (const char *, va_list) ATTRIBUTE_MALLOC ATTRIBUTE_PRINTF(1,0);
643 #if defined(HAVE_DECL_SNPRINTF) && !HAVE_DECL_SNPRINTF
644 /* Like sprintf but prints at most N characters. */
645 extern int snprintf (char *, size_t, const char *, ...) ATTRIBUTE_PRINTF_3;
648 #if defined(HAVE_DECL_VSNPRINTF) && !HAVE_DECL_VSNPRINTF
649 /* Like vsprintf but prints at most N characters. */
650 extern int vsnprintf (char *, size_t, const char *, va_list) ATTRIBUTE_PRINTF(3,0);
653 #if defined (HAVE_DECL_STRNLEN) && !HAVE_DECL_STRNLEN
654 extern size_t strnlen (const char *, size_t);
657 #if defined(HAVE_DECL_STRVERSCMP) && !HAVE_DECL_STRVERSCMP
658 /* Compare version strings. */
659 extern int strverscmp (const char *, const char *);
662 /* Set the title of a process */
663 extern void setproctitle (const char *name, ...);
665 /* Increase stack limit if possible. */
666 extern void stack_limit_increase (unsigned long);
668 #define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0]))
670 /* Drastically simplified alloca configurator. If we're using GCC,
671 we use __builtin_alloca; otherwise we use the C alloca. The C
672 alloca is always available. You can override GCC by defining
673 USE_C_ALLOCA yourself. The canonical autoconf macro C_ALLOCA is
674 also set/unset as it is often used to indicate whether code needs
675 to call alloca(0). */
676 extern void *C_alloca (size_t) ATTRIBUTE_MALLOC;
678 #if GCC_VERSION >= 2000 && !defined USE_C_ALLOCA
679 # define alloca(x) __builtin_alloca(x)
681 # define ASTRDUP(X) \
682 (__extension__ ({ const char *const libiberty_optr = (X); \
683 const unsigned long libiberty_len = strlen (libiberty_optr) + 1; \
684 char *const libiberty_nptr = (char *const) alloca (libiberty_len); \
685 (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len); }))
687 # define alloca(x) C_alloca(x)
689 # define USE_C_ALLOCA 1
692 extern const char *libiberty_optr;
693 extern char *libiberty_nptr;
694 extern unsigned long libiberty_len;
695 # define ASTRDUP(X) \
696 (libiberty_optr = (X), \
697 libiberty_len = strlen (libiberty_optr) + 1, \
698 libiberty_nptr = (char *) alloca (libiberty_len), \
699 (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len))
707 #endif /* ! defined (LIBIBERTY_H) */