1 /* Function declarations for libiberty.
2 
3    Copyright 2001, 2002, 2005 Free Software Foundation, Inc.
4 
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.
11 
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)
15    any later version.
16 
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.
21 
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.
26 
27    Written by Cygnus Support, 1994.
28 
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.  */
34 
35 #ifndef LIBIBERTY_H
36 #define LIBIBERTY_H
37 
38 #ifdef __cplusplus
39 extern "C" {
40 #endif
41 
42 #include "ansidecl.h"
43 
44 /* Get a definition for size_t.  */
45 #include <stddef.h>
46 /* Get a definition for va_list.  */
47 #include <stdarg.h>
48 
49 #include <stdio.h>
50 
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.  */
54 
55 extern void unlock_stream (FILE *);
56 
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.  */
60 
61 extern void unlock_std_streams (void);
62 
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.  */
66 
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 *);
70 
71 /* Build an argument vector from a string.  Allocates memory using
72    malloc.  Use freeargv to free the vector.  */
73 
74 extern char **buildargv (const char *) ATTRIBUTE_MALLOC;
75 
76 /* Free a vector returned by buildargv.  */
77 
78 extern void freeargv (char **);
79 
80 /* Duplicate an argument vector. Allocates memory using malloc.  Use
81    freeargv to free the vector.  */
82 
83 extern char **dupargv (char **) ATTRIBUTE_MALLOC;
84 
85 /* Expand "@file" arguments in argv.  */
86 
87 extern void expandargv PARAMS ((int *, char ***));
88 
89 /* Return the last component of a path name.  Note that we can't use a
90    prototype here because the parameter is declared inconsistently
91    across different systems, sometimes as "char *" and sometimes as
92    "const char *" */
93 
94 /* HAVE_DECL_* is a three-state macro: undefined, 0 or 1.  If it is
95    undefined, we haven't run the autoconf check so provide the
96    declaration without arguments.  If it is 0, we checked and failed
97    to find the declaration so provide a fully prototyped one.  If it
98    is 1, we found it so don't provide any declaration at all.  */
99 #if !HAVE_DECL_BASENAME
100 #if defined (__GNU_LIBRARY__ ) || defined (__linux__) || defined (__FreeBSD__) || defined (__OpenBSD__) || defined(__NetBSD__) || defined (__CYGWIN__) || defined (__CYGWIN32__) || defined (__MINGW32__) || defined (HAVE_DECL_BASENAME)
101 extern char *basename (const char *);
102 #else
103 /* Do not allow basename to be used if there is no prototype seen.  We
104    either need to use the above prototype or have one from
105    autoconf which would result in HAVE_DECL_BASENAME being set.  */
106 #define basename basename_cannot_be_used_without_a_prototype
107 #endif
108 #endif
109 
110 /* A well-defined basename () that is always compiled in.  */
111 
112 extern const char *lbasename (const char *);
113 
114 /* A well-defined realpath () that is always compiled in.  */
115 
116 extern char *lrealpath (const char *);
117 
118 /* Concatenate an arbitrary number of strings.  You must pass NULL as
119    the last argument of this function, to terminate the list of
120    strings.  Allocates memory using xmalloc.  */
121 
122 extern char *concat (const char *, ...) ATTRIBUTE_MALLOC ATTRIBUTE_SENTINEL;
123 
124 /* Concatenate an arbitrary number of strings.  You must pass NULL as
125    the last argument of this function, to terminate the list of
126    strings.  Allocates memory using xmalloc.  The first argument is
127    not one of the strings to be concatenated, but if not NULL is a
128    pointer to be freed after the new string is created, similar to the
129    way xrealloc works.  */
130 
131 extern char *reconcat (char *, const char *, ...) ATTRIBUTE_MALLOC ATTRIBUTE_SENTINEL;
132 
133 /* Determine the length of concatenating an arbitrary number of
134    strings.  You must pass NULL as the last argument of this function,
135    to terminate the list of strings.  */
136 
137 extern unsigned long concat_length (const char *, ...) ATTRIBUTE_SENTINEL;
138 
139 /* Concatenate an arbitrary number of strings into a SUPPLIED area of
140    memory.  You must pass NULL as the last argument of this function,
141    to terminate the list of strings.  The supplied memory is assumed
142    to be large enough.  */
143 
144 extern char *concat_copy (char *, const char *, ...) ATTRIBUTE_SENTINEL;
145 
146 /* Concatenate an arbitrary number of strings into a GLOBAL area of
147    memory.  You must pass NULL as the last argument of this function,
148    to terminate the list of strings.  The supplied memory is assumed
149    to be large enough.  */
150 
151 extern char *concat_copy2 (const char *, ...) ATTRIBUTE_SENTINEL;
152 
153 /* This is the global area used by concat_copy2.  */
154 
155 extern char *libiberty_concat_ptr;
156 
157 /* Concatenate an arbitrary number of strings.  You must pass NULL as
158    the last argument of this function, to terminate the list of
159    strings.  Allocates memory using alloca.  The arguments are
160    evaluated twice!  */
161 #define ACONCAT(ACONCAT_PARAMS) \
162   (libiberty_concat_ptr = (char *) alloca (concat_length ACONCAT_PARAMS + 1), \
163    concat_copy2 ACONCAT_PARAMS)
164 
165 /* Check whether two file descriptors refer to the same file.  */
166 
167 extern int fdmatch (int fd1, int fd2);
168 
169 /* Return the position of the first bit set in the argument.  */
170 /* Prototypes vary from system to system, so we only provide a
171    prototype on systems where we know that we need it.  */
172 #if defined (HAVE_DECL_FFS) && !HAVE_DECL_FFS
173 extern int ffs(int);
174 #endif
175 
176 /* Get the working directory.  The result is cached, so don't call
177    chdir() between calls to getpwd().  */
178 
179 extern char * getpwd (void);
180 
181 /* Get the current time.  */
182 /* Prototypes vary from system to system, so we only provide a
183    prototype on systems where we know that we need it.  */
184 #ifdef __MINGW32__
185 /* Forward declaration to avoid #include <sys/time.h>.   */
186 struct timeval;
187 extern int gettimeofday (struct timeval *, void *);
188 #endif
189 
190 /* Get the amount of time the process has run, in microseconds.  */
191 
192 extern long get_run_time (void);
193 
194 /* Generate a relocated path to some installation directory.  Allocates
195    return value using malloc.  */
196 
197 extern char *make_relative_prefix (const char *, const char *,
198                                    const char *) ATTRIBUTE_MALLOC;
199 
200 /* Choose a temporary directory to use for scratch files.  */
201 
202 extern char *choose_temp_base (void) ATTRIBUTE_MALLOC;
203 
204 /* Return a temporary file name or NULL if unable to create one.  */
205 
206 extern char *make_temp_file (const char *) ATTRIBUTE_MALLOC;
207 
208 /* Remove a link to a file unless it is special. */
209 
210 extern int unlink_if_ordinary (const char *);
211 
212 /* Allocate memory filled with spaces.  Allocates using malloc.  */
213 
214 extern const char *spaces (int count);
215 
216 /* Return the maximum error number for which strerror will return a
217    string.  */
218 
219 extern int errno_max (void);
220 
221 /* Return the name of an errno value (e.g., strerrno (EINVAL) returns
222    "EINVAL").  */
223 
224 extern const char *strerrno (int);
225 
226 /* Given the name of an errno value, return the value.  */
227 
228 extern int strtoerrno (const char *);
229 
230 /* ANSI's strerror(), but more robust.  */
231 
232 extern char *xstrerror (int);
233 
234 /* Return the maximum signal number for which strsignal will return a
235    string.  */
236 
237 extern int signo_max (void);
238 
239 /* Return a signal message string for a signal number
240    (e.g., strsignal (SIGHUP) returns something like "Hangup").  */
241 /* This is commented out as it can conflict with one in system headers.
242    We still document its existence though.  */
243 
244 /*extern const char *strsignal (int);*/
245 
246 /* Return the name of a signal number (e.g., strsigno (SIGHUP) returns
247    "SIGHUP").  */
248 
249 extern const char *strsigno (int);
250 
251 /* Given the name of a signal, return its number.  */
252 
253 extern int strtosigno (const char *);
254 
255 /* Register a function to be run by xexit.  Returns 0 on success.  */
256 
257 extern int xatexit (void (*fn) (void));
258 
259 /* Exit, calling all the functions registered with xatexit.  */
260 
261 extern void xexit (int status) ATTRIBUTE_NORETURN;
262 
263 /* Set the program name used by xmalloc.  */
264 
265 extern void xmalloc_set_program_name (const char *);
266 
267 /* Report an allocation failure.  */
268 extern void xmalloc_failed (size_t) ATTRIBUTE_NORETURN;
269 
270 /* Allocate memory without fail.  If malloc fails, this will print a
271    message to stderr (using the name set by xmalloc_set_program_name,
272    if any) and then call xexit.  */
273 
274 extern void *xmalloc (size_t) ATTRIBUTE_MALLOC;
275 
276 /* Reallocate memory without fail.  This works like xmalloc.  Note,
277    realloc type functions are not suitable for attribute malloc since
278    they may return the same address across multiple calls. */
279 
280 extern void *xrealloc (void *, size_t);
281 
282 /* Allocate memory without fail and set it to zero.  This works like
283    xmalloc.  */
284 
285 extern void *xcalloc (size_t, size_t) ATTRIBUTE_MALLOC;
286 
287 /* Copy a string into a memory buffer without fail.  */
288 
289 extern char *xstrdup (const char *) ATTRIBUTE_MALLOC;
290 
291 /* Copy at most N characters from string into a buffer without fail.  */
292 
293 extern char *xstrndup (const char *, size_t) ATTRIBUTE_MALLOC;
294 
295 /* Copy an existing memory buffer to a new memory buffer without fail.  */
296 
297 extern void *xmemdup (const void *, size_t, size_t) ATTRIBUTE_MALLOC;
298 
299 /* Physical memory routines.  Return values are in BYTES.  */
300 extern double physmem_total (void);
301 extern double physmem_available (void);
302 
303 
304 /* These macros provide a K&R/C89/C++-friendly way of allocating structures
305    with nice encapsulation.  The XDELETE*() macros are technically
306    superfluous, but provided here for symmetry.  Using them consistently
307    makes it easier to update client code to use different allocators such
308    as new/delete and new[]/delete[].  */
309 
310 /* Scalar allocators.  */
311 
312 #define XNEW(T)			((T *) xmalloc (sizeof (T)))
313 #define XCNEW(T)		((T *) xcalloc (1, sizeof (T)))
314 #define XDELETE(P)		free ((void*) (P))
315 
316 /* Array allocators.  */
317 
318 #define XNEWVEC(T, N)		((T *) xmalloc (sizeof (T) * (N)))
319 #define XCNEWVEC(T, N)		((T *) xcalloc ((N), sizeof (T)))
320 #define XRESIZEVEC(T, P, N)	((T *) xrealloc ((void *) (P), sizeof (T) * (N)))
321 #define XDELETEVEC(P)		free ((void*) (P))
322 
323 /* Allocators for variable-sized structures and raw buffers.  */
324 
325 #define XNEWVAR(T, S)		((T *) xmalloc ((S)))
326 #define XCNEWVAR(T, S)		((T *) xcalloc (1, (S)))
327 #define XRESIZEVAR(T, P, S)	((T *) xrealloc ((P), (S)))
328 
329 /* Type-safe obstack allocator.  */
330 
331 #define XOBNEW(O, T)		((T *) obstack_alloc ((O), sizeof (T)))
332 #define XOBFINISH(O, T)         ((T) obstack_finish ((O)))
333 
334 /* hex character manipulation routines */
335 
336 #define _hex_array_size 256
337 #define _hex_bad	99
338 extern const unsigned char _hex_value[_hex_array_size];
339 extern void hex_init (void);
340 #define hex_p(c)	(hex_value (c) != _hex_bad)
341 /* If you change this, note well: Some code relies on side effects in
342    the argument being performed exactly once.  */
343 #define hex_value(c)	((unsigned int) _hex_value[(unsigned char) (c)])
344 
345 /* Flags for pex_init.  These are bits to be or'ed together.  */
346 
347 /* Record subprocess times, if possible.  */
348 #define PEX_RECORD_TIMES	0x1
349 
350 /* Use pipes for communication between processes, if possible.  */
351 #define PEX_USE_PIPES		0x2
352 
353 /* Save files used for communication between processes.  */
354 #define PEX_SAVE_TEMPS		0x4
355 
356 /* Prepare to execute one or more programs, with standard output of
357    each program fed to standard input of the next.
358    FLAGS	As above.
359    PNAME	The name of the program to report in error messages.
360    TEMPBASE	A base name to use for temporary files; may be NULL to
361    		use a random name.
362    Returns NULL on error.  */
363 
364 extern struct pex_obj *pex_init (int flags, const char *pname,
365 				 const char *tempbase);
366 
367 /* Flags for pex_run.  These are bits to be or'ed together.  */
368 
369 /* Last program in pipeline.  Standard output of program goes to
370    OUTNAME, or, if OUTNAME is NULL, to standard output of caller.  Do
371    not set this if you want to call pex_read_output.  After this is
372    set, pex_run may no longer be called with the same struct
373    pex_obj.  */
374 #define PEX_LAST		0x1
375 
376 /* Search for program in executable search path.  */
377 #define PEX_SEARCH		0x2
378 
379 /* OUTNAME is a suffix.  */
380 #define PEX_SUFFIX		0x4
381 
382 /* Send program's standard error to standard output.  */
383 #define PEX_STDERR_TO_STDOUT	0x8
384 
385 /* Input file should be opened in binary mode.  This flag is ignored
386    on Unix.  */
387 #define PEX_BINARY_INPUT	0x10
388 
389 /* Output file should be opened in binary mode.  This flag is ignored
390    on Unix.  For proper behaviour PEX_BINARY_INPUT and
391    PEX_BINARY_OUTPUT have to match appropriately--i.e., a call using
392    PEX_BINARY_OUTPUT should be followed by a call using
393    PEX_BINARY_INPUT.  */
394 #define PEX_BINARY_OUTPUT	0x20
395 
396 /* Execute one program.  Returns NULL on success.  On error returns an
397    error string (typically just the name of a system call); the error
398    string is statically allocated.
399 
400    OBJ		Returned by pex_init.
401 
402    FLAGS	As above.
403 
404    EXECUTABLE	The program to execute.
405 
406    ARGV		NULL terminated array of arguments to pass to the program.
407 
408    OUTNAME	Sets the output file name as follows:
409 
410 		PEX_SUFFIX set (OUTNAME may not be NULL):
411 		  TEMPBASE parameter to pex_init not NULL:
412 		    Output file name is the concatenation of TEMPBASE
413 		    and OUTNAME.
414 		  TEMPBASE is NULL:
415 		    Output file name is a random file name ending in
416 		    OUTNAME.
417 		PEX_SUFFIX not set:
418 		  OUTNAME not NULL:
419 		    Output file name is OUTNAME.
420 		  OUTNAME NULL, TEMPBASE not NULL:
421 		    Output file name is randomly chosen using
422 		    TEMPBASE.
423 		  OUTNAME NULL, TEMPBASE NULL:
424 		    Output file name is randomly chosen.
425 
426 		If PEX_LAST is not set, the output file name is the
427    		name to use for a temporary file holding stdout, if
428    		any (there will not be a file if PEX_USE_PIPES is set
429    		and the system supports pipes).  If a file is used, it
430    		will be removed when no longer needed unless
431    		PEX_SAVE_TEMPS is set.
432 
433 		If PEX_LAST is set, and OUTNAME is not NULL, standard
434    		output is written to the output file name.  The file
435    		will not be removed.  If PEX_LAST and PEX_SUFFIX are
436    		both set, TEMPBASE may not be NULL.
437 
438    ERRNAME	If not NULL, this is the name of a file to which
439 		standard error is written.  If NULL, standard error of
440 		the program is standard error of the caller.
441 
442    ERR		On an error return, *ERR is set to an errno value, or
443    		to 0 if there is no relevant errno.
444 */
445 
446 extern const char *pex_run (struct pex_obj *obj, int flags,
447 			    const char *executable, char * const *argv,
448 			    const char *outname, const char *errname,
449 			    int *err);
450 
451 /* Return a `FILE' pointer FP for the standard input of the first
452    program in the pipeline; FP is opened for writing.  You must have
453    passed `PEX_USE_PIPES' to the `pex_init' call that returned OBJ.
454    You must close FP yourself with `fclose' to indicate that the
455    pipeline's input is complete.
456 
457    The file descriptor underlying FP is marked not to be inherited by
458    child processes.
459 
460    This call is not supported on systems which do not support pipes;
461    it returns with an error.  (We could implement it by writing a
462    temporary file, but then you would need to write all your data and
463    close FP before your first call to `pex_run' -- and that wouldn't
464    work on systems that do support pipes: the pipe would fill up, and
465    you would block.  So there isn't any easy way to conceal the
466    differences between the two types of systems.)
467 
468    If you call both `pex_write_input' and `pex_read_output', be
469    careful to avoid deadlock.  If the output pipe fills up, so that
470    each program in the pipeline is waiting for the next to read more
471    data, and you fill the input pipe by writing more data to FP, then
472    there is no way to make progress: the only process that could read
473    data from the output pipe is you, but you are blocked on the input
474    pipe.  */
475 
476 extern FILE *pex_write_input (struct pex_obj *obj, int binary);
477 
478 /* Return a stream for a temporary file to pass to the first program
479    in the pipeline as input.  The file name is chosen as for pex_run.
480    pex_run closes the file automatically; don't close it yourself.  */
481 
482 extern FILE *pex_input_file (struct pex_obj *obj, int flags,
483                              const char *in_name);
484 
485 /* Return a stream for a pipe connected to the standard input of the
486    first program in the pipeline.  You must have passed
487    `PEX_USE_PIPES' to `pex_init'.  Close the returned stream
488    yourself.  */
489 
490 extern FILE *pex_input_pipe (struct pex_obj *obj, int binary);
491 
492 /* Read the standard output of the last program to be executed.
493    pex_run can not be called after this.  BINARY should be non-zero if
494    the file should be opened in binary mode; this is ignored on Unix.
495    Returns NULL on error.  Don't call fclose on the returned FILE; it
496    will be closed by pex_free.  */
497 
498 extern FILE *pex_read_output (struct pex_obj *, int binary);
499 
500 /* Return exit status of all programs in VECTOR.  COUNT indicates the
501    size of VECTOR.  The status codes in the vector are in the order of
502    the calls to pex_run.  Returns 0 on error, 1 on success.  */
503 
504 extern int pex_get_status (struct pex_obj *, int count, int *vector);
505 
506 /* Return times of all programs in VECTOR.  COUNT indicates the size
507    of VECTOR.  struct pex_time is really just struct timeval, but that
508    is not portable to all systems.  Returns 0 on error, 1 on
509    success.  */
510 
511 struct pex_time
512 {
513   unsigned long user_seconds;
514   unsigned long user_microseconds;
515   unsigned long system_seconds;
516   unsigned long system_microseconds;
517 };
518 
519 extern int pex_get_times (struct pex_obj *, int count,
520 			  struct pex_time *vector);
521 
522 /* Clean up a pex_obj.  */
523 
524 extern void pex_free (struct pex_obj *);
525 
526 /* Just execute one program.  Return value is as for pex_run.
527    FLAGS	Combination of PEX_SEARCH and PEX_STDERR_TO_STDOUT.
528    EXECUTABLE	As for pex_run.
529    ARGV		As for pex_run.
530    PNAME	As for pex_init.
531    OUTNAME	As for pex_run when PEX_LAST is set.
532    ERRNAME	As for pex_run.
533    STATUS	Set to exit status on success.
534    ERR		As for pex_run.
535 */
536 
537 extern const char *pex_one (int flags, const char *executable,
538 			    char * const *argv, const char *pname,
539 			    const char *outname, const char *errname,
540 			    int *status, int *err);
541 
542 /* pexecute and pwait are the old pexecute interface, still here for
543    backward compatibility.  Don't use these for new code.  Instead,
544    use pex_init/pex_run/pex_get_status/pex_free, or pex_one.  */
545 
546 /* Definitions used by the pexecute routine.  */
547 
548 #define PEXECUTE_FIRST   1
549 #define PEXECUTE_LAST    2
550 #define PEXECUTE_ONE     (PEXECUTE_FIRST + PEXECUTE_LAST)
551 #define PEXECUTE_SEARCH  4
552 #define PEXECUTE_VERBOSE 8
553 
554 /* Execute a program.  */
555 
556 extern int pexecute (const char *, char * const *, const char *,
557                      const char *, char **, char **, int);
558 
559 /* Wait for pexecute to finish.  */
560 
561 extern int pwait (int, int *, int);
562 
563 #if !HAVE_DECL_ASPRINTF
564 /* Like sprintf but provides a pointer to malloc'd storage, which must
565    be freed by the caller.  */
566 
567 extern int asprintf (char **, const char *, ...) ATTRIBUTE_PRINTF_2;
568 #endif
569 
570 #if !HAVE_DECL_VASPRINTF
571 /* Like vsprintf but provides a pointer to malloc'd storage, which
572    must be freed by the caller.  */
573 
574 extern int vasprintf (char **, const char *, va_list) ATTRIBUTE_PRINTF(2,0);
575 #endif
576 
577 #if defined(HAVE_DECL_SNPRINTF) && !HAVE_DECL_SNPRINTF
578 /* Like sprintf but prints at most N characters.  */
579 extern int snprintf (char *, size_t, const char *, ...) ATTRIBUTE_PRINTF_3;
580 #endif
581 
582 #if defined(HAVE_DECL_VSNPRINTF) && !HAVE_DECL_VSNPRINTF
583 /* Like vsprintf but prints at most N characters.  */
584 extern int vsnprintf (char *, size_t, const char *, va_list) ATTRIBUTE_PRINTF(3,0);
585 #endif
586 
587 #if defined(HAVE_DECL_STRVERSCMP) && !HAVE_DECL_STRVERSCMP
588 /* Compare version strings.  */
589 extern int strverscmp (const char *, const char *);
590 #endif
591 
592 #define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0]))
593 
594 /* Drastically simplified alloca configurator.  If we're using GCC,
595    we use __builtin_alloca; otherwise we use the C alloca.  The C
596    alloca is always available.  You can override GCC by defining
597    USE_C_ALLOCA yourself.  The canonical autoconf macro C_ALLOCA is
598    also set/unset as it is often used to indicate whether code needs
599    to call alloca(0).  */
600 extern void *C_alloca (size_t) ATTRIBUTE_MALLOC;
601 #undef alloca
602 #if GCC_VERSION >= 2000 && !defined USE_C_ALLOCA
603 # define alloca(x) __builtin_alloca(x)
604 # undef C_ALLOCA
605 # define ASTRDUP(X) \
606   (__extension__ ({ const char *const libiberty_optr = (X); \
607    const unsigned long libiberty_len = strlen (libiberty_optr) + 1; \
608    char *const libiberty_nptr = (char *const) alloca (libiberty_len); \
609    (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len); }))
610 #else
611 # define alloca(x) C_alloca(x)
612 # undef USE_C_ALLOCA
613 # define USE_C_ALLOCA 1
614 # undef C_ALLOCA
615 # define C_ALLOCA 1
616 extern const char *libiberty_optr;
617 extern char *libiberty_nptr;
618 extern unsigned long libiberty_len;
619 # define ASTRDUP(X) \
620   (libiberty_optr = (X), \
621    libiberty_len = strlen (libiberty_optr) + 1, \
622    libiberty_nptr = (char *) alloca (libiberty_len), \
623    (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len))
624 #endif
625 
626 #ifdef __cplusplus
627 }
628 #endif
629 
630 
631 #endif /* ! defined (LIBIBERTY_H) */
632