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 39extern "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 55extern 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 61extern 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 67extern FILE *fopen_unlocked (const char *, const char *); 68extern FILE *fdopen_unlocked (int, const char *); 69extern 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 74extern char **buildargv (const char *) ATTRIBUTE_MALLOC; 75 76/* Free a vector returned by buildargv. */ 77 78extern void freeargv (char **); 79 80/* Duplicate an argument vector. Allocates memory using malloc. Use 81 freeargv to free the vector. */ 82 83extern char **dupargv (char **) ATTRIBUTE_MALLOC; 84 85/* Expand "@file" arguments in argv. */ 86 87extern 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) 101extern 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 112extern const char *lbasename (const char *); 113 114/* A well-defined realpath () that is always compiled in. */ 115 116extern 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 122extern 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 131extern 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 137extern 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 144extern 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 151extern char *concat_copy2 (const char *, ...) ATTRIBUTE_SENTINEL; 152 153/* This is the global area used by concat_copy2. */ 154 155extern 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 167extern 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 173extern 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 179extern 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>. */ 186struct timeval; 187extern int gettimeofday (struct timeval *, void *); 188#endif 189 190/* Get the amount of time the process has run, in microseconds. */ 191 192extern long get_run_time (void); 193 194/* Generate a relocated path to some installation directory. Allocates 195 return value using malloc. */ 196 197extern char *make_relative_prefix (const char *, const char *, 198 const char *) ATTRIBUTE_MALLOC; 199 200/* Generate a relocated path to some installation directory without 201 attempting to follow any soft links. Allocates 202 return value using malloc. */ 203 204extern char *make_relative_prefix_ignore_links (const char *, const char *, 205 const char *) ATTRIBUTE_MALLOC; 206 207/* Choose a temporary directory to use for scratch files. */ 208 209extern char *choose_temp_base (void) ATTRIBUTE_MALLOC; 210 211/* Return a temporary file name or NULL if unable to create one. */ 212 213extern char *make_temp_file (const char *) ATTRIBUTE_MALLOC; 214 215/* Remove a link to a file unless it is special. */ 216 217extern int unlink_if_ordinary (const char *); 218 219/* Allocate memory filled with spaces. Allocates using malloc. */ 220 221extern const char *spaces (int count); 222 223/* Return the maximum error number for which strerror will return a 224 string. */ 225 226extern int errno_max (void); 227 228/* Return the name of an errno value (e.g., strerrno (EINVAL) returns 229 "EINVAL"). */ 230 231extern const char *strerrno (int); 232 233/* Given the name of an errno value, return the value. */ 234 235extern int strtoerrno (const char *); 236 237/* ANSI's strerror(), but more robust. */ 238 239extern char *xstrerror (int); 240 241/* Return the maximum signal number for which strsignal will return a 242 string. */ 243 244extern int signo_max (void); 245 246/* Return a signal message string for a signal number 247 (e.g., strsignal (SIGHUP) returns something like "Hangup"). */ 248/* This is commented out as it can conflict with one in system headers. 249 We still document its existence though. */ 250 251/*extern const char *strsignal (int);*/ 252 253/* Return the name of a signal number (e.g., strsigno (SIGHUP) returns 254 "SIGHUP"). */ 255 256extern const char *strsigno (int); 257 258/* Given the name of a signal, return its number. */ 259 260extern int strtosigno (const char *); 261 262/* Register a function to be run by xexit. Returns 0 on success. */ 263 264extern int xatexit (void (*fn) (void)); 265 266/* Exit, calling all the functions registered with xatexit. */ 267 268extern void xexit (int status) ATTRIBUTE_NORETURN; 269 270/* Set the program name used by xmalloc. */ 271 272extern void xmalloc_set_program_name (const char *); 273 274/* Report an allocation failure. */ 275extern void xmalloc_failed (size_t) ATTRIBUTE_NORETURN; 276 277/* Allocate memory without fail. If malloc fails, this will print a 278 message to stderr (using the name set by xmalloc_set_program_name, 279 if any) and then call xexit. */ 280 281extern void *xmalloc (size_t) ATTRIBUTE_MALLOC; 282 283/* Reallocate memory without fail. This works like xmalloc. Note, 284 realloc type functions are not suitable for attribute malloc since 285 they may return the same address across multiple calls. */ 286 287extern void *xrealloc (void *, size_t); 288 289/* Allocate memory without fail and set it to zero. This works like 290 xmalloc. */ 291 292extern void *xcalloc (size_t, size_t) ATTRIBUTE_MALLOC; 293 294/* Copy a string into a memory buffer without fail. */ 295 296extern char *xstrdup (const char *) ATTRIBUTE_MALLOC; 297 298/* Copy at most N characters from string into a buffer without fail. */ 299 300extern char *xstrndup (const char *, size_t) ATTRIBUTE_MALLOC; 301 302/* Copy an existing memory buffer to a new memory buffer without fail. */ 303 304extern void *xmemdup (const void *, size_t, size_t) ATTRIBUTE_MALLOC; 305 306/* Physical memory routines. Return values are in BYTES. */ 307extern double physmem_total (void); 308extern double physmem_available (void); 309 310 311/* These macros provide a K&R/C89/C++-friendly way of allocating structures 312 with nice encapsulation. The XDELETE*() macros are technically 313 superfluous, but provided here for symmetry. Using them consistently 314 makes it easier to update client code to use different allocators such 315 as new/delete and new[]/delete[]. */ 316 317/* Scalar allocators. */ 318 319#define XNEW(T) ((T *) xmalloc (sizeof (T))) 320#define XCNEW(T) ((T *) xcalloc (1, sizeof (T))) 321#define XDELETE(P) free ((void*) (P)) 322 323/* Array allocators. */ 324 325#define XNEWVEC(T, N) ((T *) xmalloc (sizeof (T) * (N))) 326#define XCNEWVEC(T, N) ((T *) xcalloc ((N), sizeof (T))) 327#define XRESIZEVEC(T, P, N) ((T *) xrealloc ((void *) (P), sizeof (T) * (N))) 328#define XDELETEVEC(P) free ((void*) (P)) 329 330/* Allocators for variable-sized structures and raw buffers. */ 331 332#define XNEWVAR(T, S) ((T *) xmalloc ((S))) 333#define XCNEWVAR(T, S) ((T *) xcalloc (1, (S))) 334#define XRESIZEVAR(T, P, S) ((T *) xrealloc ((P), (S))) 335 336/* Type-safe obstack allocator. */ 337 338#define XOBNEW(O, T) ((T *) obstack_alloc ((O), sizeof (T))) 339#define XOBFINISH(O, T) ((T) obstack_finish ((O))) 340 341/* hex character manipulation routines */ 342 343#define _hex_array_size 256 344#define _hex_bad 99 345extern const unsigned char _hex_value[_hex_array_size]; 346extern void hex_init (void); 347#define hex_p(c) (hex_value (c) != _hex_bad) 348/* If you change this, note well: Some code relies on side effects in 349 the argument being performed exactly once. */ 350#define hex_value(c) ((unsigned int) _hex_value[(unsigned char) (c)]) 351 352/* Flags for pex_init. These are bits to be or'ed together. */ 353 354/* Record subprocess times, if possible. */ 355#define PEX_RECORD_TIMES 0x1 356 357/* Use pipes for communication between processes, if possible. */ 358#define PEX_USE_PIPES 0x2 359 360/* Save files used for communication between processes. */ 361#define PEX_SAVE_TEMPS 0x4 362 363/* Prepare to execute one or more programs, with standard output of 364 each program fed to standard input of the next. 365 FLAGS As above. 366 PNAME The name of the program to report in error messages. 367 TEMPBASE A base name to use for temporary files; may be NULL to 368 use a random name. 369 Returns NULL on error. */ 370 371extern struct pex_obj *pex_init (int flags, const char *pname, 372 const char *tempbase); 373 374/* Flags for pex_run. These are bits to be or'ed together. */ 375 376/* Last program in pipeline. Standard output of program goes to 377 OUTNAME, or, if OUTNAME is NULL, to standard output of caller. Do 378 not set this if you want to call pex_read_output. After this is 379 set, pex_run may no longer be called with the same struct 380 pex_obj. */ 381#define PEX_LAST 0x1 382 383/* Search for program in executable search path. */ 384#define PEX_SEARCH 0x2 385 386/* OUTNAME is a suffix. */ 387#define PEX_SUFFIX 0x4 388 389/* Send program's standard error to standard output. */ 390#define PEX_STDERR_TO_STDOUT 0x8 391 392/* Input file should be opened in binary mode. This flag is ignored 393 on Unix. */ 394#define PEX_BINARY_INPUT 0x10 395 396/* Output file should be opened in binary mode. This flag is ignored 397 on Unix. For proper behaviour PEX_BINARY_INPUT and 398 PEX_BINARY_OUTPUT have to match appropriately--i.e., a call using 399 PEX_BINARY_OUTPUT should be followed by a call using 400 PEX_BINARY_INPUT. */ 401#define PEX_BINARY_OUTPUT 0x20 402 403/* Capture stderr to a pipe. The output can be read by 404 calling pex_read_err and reading from the returned 405 FILE object. This flag may be specified only for 406 the last program in a pipeline. 407 408 This flag is supported only on Unix and Windows. */ 409#define PEX_STDERR_TO_PIPE 0x40 410 411/* Capture stderr in binary mode. This flag is ignored 412 on Unix. */ 413#define PEX_BINARY_ERROR 0x80 414 415 416/* Execute one program. Returns NULL on success. On error returns an 417 error string (typically just the name of a system call); the error 418 string is statically allocated. 419 420 OBJ Returned by pex_init. 421 422 FLAGS As above. 423 424 EXECUTABLE The program to execute. 425 426 ARGV NULL terminated array of arguments to pass to the program. 427 428 OUTNAME Sets the output file name as follows: 429 430 PEX_SUFFIX set (OUTNAME may not be NULL): 431 TEMPBASE parameter to pex_init not NULL: 432 Output file name is the concatenation of TEMPBASE 433 and OUTNAME. 434 TEMPBASE is NULL: 435 Output file name is a random file name ending in 436 OUTNAME. 437 PEX_SUFFIX not set: 438 OUTNAME not NULL: 439 Output file name is OUTNAME. 440 OUTNAME NULL, TEMPBASE not NULL: 441 Output file name is randomly chosen using 442 TEMPBASE. 443 OUTNAME NULL, TEMPBASE NULL: 444 Output file name is randomly chosen. 445 446 If PEX_LAST is not set, the output file name is the 447 name to use for a temporary file holding stdout, if 448 any (there will not be a file if PEX_USE_PIPES is set 449 and the system supports pipes). If a file is used, it 450 will be removed when no longer needed unless 451 PEX_SAVE_TEMPS is set. 452 453 If PEX_LAST is set, and OUTNAME is not NULL, standard 454 output is written to the output file name. The file 455 will not be removed. If PEX_LAST and PEX_SUFFIX are 456 both set, TEMPBASE may not be NULL. 457 458 ERRNAME If not NULL, this is the name of a file to which 459 standard error is written. If NULL, standard error of 460 the program is standard error of the caller. 461 462 ERR On an error return, *ERR is set to an errno value, or 463 to 0 if there is no relevant errno. 464*/ 465 466extern const char *pex_run (struct pex_obj *obj, int flags, 467 const char *executable, char * const *argv, 468 const char *outname, const char *errname, 469 int *err); 470 471/* As for pex_run (), but takes an extra parameter to enable the 472 environment for the child process to be specified. 473 474 ENV The environment for the child process, specified as 475 an array of character pointers. Each element of the 476 array should point to a string of the form VAR=VALUE, 477 with the exception of the last element which must be 478 a null pointer. 479*/ 480 481extern const char *pex_run_in_environment (struct pex_obj *obj, int flags, 482 const char *executable, 483 char * const *argv, 484 char * const *env, 485 const char *outname, 486 const char *errname, int *err); 487 488/* Return a `FILE' pointer FP for the standard input of the first 489 program in the pipeline; FP is opened for writing. You must have 490 passed `PEX_USE_PIPES' to the `pex_init' call that returned OBJ. 491 You must close FP yourself with `fclose' to indicate that the 492 pipeline's input is complete. 493 494 The file descriptor underlying FP is marked not to be inherited by 495 child processes. 496 497 This call is not supported on systems which do not support pipes; 498 it returns with an error. (We could implement it by writing a 499 temporary file, but then you would need to write all your data and 500 close FP before your first call to `pex_run' -- and that wouldn't 501 work on systems that do support pipes: the pipe would fill up, and 502 you would block. So there isn't any easy way to conceal the 503 differences between the two types of systems.) 504 505 If you call both `pex_write_input' and `pex_read_output', be 506 careful to avoid deadlock. If the output pipe fills up, so that 507 each program in the pipeline is waiting for the next to read more 508 data, and you fill the input pipe by writing more data to FP, then 509 there is no way to make progress: the only process that could read 510 data from the output pipe is you, but you are blocked on the input 511 pipe. */ 512 513extern FILE *pex_write_input (struct pex_obj *obj, int binary); 514 515/* Return a stream for a temporary file to pass to the first program 516 in the pipeline as input. The file name is chosen as for pex_run. 517 pex_run closes the file automatically; don't close it yourself. */ 518 519extern FILE *pex_input_file (struct pex_obj *obj, int flags, 520 const char *in_name); 521 522/* Return a stream for a pipe connected to the standard input of the 523 first program in the pipeline. You must have passed 524 `PEX_USE_PIPES' to `pex_init'. Close the returned stream 525 yourself. */ 526 527extern FILE *pex_input_pipe (struct pex_obj *obj, int binary); 528 529/* Read the standard output of the last program to be executed. 530 pex_run can not be called after this. BINARY should be non-zero if 531 the file should be opened in binary mode; this is ignored on Unix. 532 Returns NULL on error. Don't call fclose on the returned FILE; it 533 will be closed by pex_free. */ 534 535extern FILE *pex_read_output (struct pex_obj *, int binary); 536 537/* Read the standard error of the last program to be executed. 538 pex_run can not be called after this. BINARY should be non-zero if 539 the file should be opened in binary mode; this is ignored on Unix. 540 Returns NULL on error. Don't call fclose on the returned FILE; it 541 will be closed by pex_free. */ 542 543extern FILE *pex_read_err (struct pex_obj *, int binary); 544 545/* Return exit status of all programs in VECTOR. COUNT indicates the 546 size of VECTOR. The status codes in the vector are in the order of 547 the calls to pex_run. Returns 0 on error, 1 on success. */ 548 549extern int pex_get_status (struct pex_obj *, int count, int *vector); 550 551/* Return times of all programs in VECTOR. COUNT indicates the size 552 of VECTOR. struct pex_time is really just struct timeval, but that 553 is not portable to all systems. Returns 0 on error, 1 on 554 success. */ 555 556struct pex_time 557{ 558 unsigned long user_seconds; 559 unsigned long user_microseconds; 560 unsigned long system_seconds; 561 unsigned long system_microseconds; 562}; 563 564extern int pex_get_times (struct pex_obj *, int count, 565 struct pex_time *vector); 566 567/* Clean up a pex_obj. */ 568 569extern void pex_free (struct pex_obj *); 570 571/* Just execute one program. Return value is as for pex_run. 572 FLAGS Combination of PEX_SEARCH and PEX_STDERR_TO_STDOUT. 573 EXECUTABLE As for pex_run. 574 ARGV As for pex_run. 575 PNAME As for pex_init. 576 OUTNAME As for pex_run when PEX_LAST is set. 577 ERRNAME As for pex_run. 578 STATUS Set to exit status on success. 579 ERR As for pex_run. 580*/ 581 582extern const char *pex_one (int flags, const char *executable, 583 char * const *argv, const char *pname, 584 const char *outname, const char *errname, 585 int *status, int *err); 586 587/* pexecute and pwait are the old pexecute interface, still here for 588 backward compatibility. Don't use these for new code. Instead, 589 use pex_init/pex_run/pex_get_status/pex_free, or pex_one. */ 590 591/* Definitions used by the pexecute routine. */ 592 593#define PEXECUTE_FIRST 1 594#define PEXECUTE_LAST 2 595#define PEXECUTE_ONE (PEXECUTE_FIRST + PEXECUTE_LAST) 596#define PEXECUTE_SEARCH 4 597#define PEXECUTE_VERBOSE 8 598 599/* Execute a program. */ 600 601extern int pexecute (const char *, char * const *, const char *, 602 const char *, char **, char **, int); 603 604/* Wait for pexecute to finish. */ 605 606extern int pwait (int, int *, int); 607 608#if !HAVE_DECL_ASPRINTF 609/* Like sprintf but provides a pointer to malloc'd storage, which must 610 be freed by the caller. */ 611 612extern int asprintf (char **, const char *, ...) ATTRIBUTE_PRINTF_2; 613#endif 614 615#if !HAVE_DECL_VASPRINTF 616/* Like vsprintf but provides a pointer to malloc'd storage, which 617 must be freed by the caller. */ 618 619extern int vasprintf (char **, const char *, va_list) ATTRIBUTE_PRINTF(2,0); 620#endif 621 622#if defined(HAVE_DECL_SNPRINTF) && !HAVE_DECL_SNPRINTF 623/* Like sprintf but prints at most N characters. */ 624extern int snprintf (char *, size_t, const char *, ...) ATTRIBUTE_PRINTF_3; 625#endif 626 627#if defined(HAVE_DECL_VSNPRINTF) && !HAVE_DECL_VSNPRINTF 628/* Like vsprintf but prints at most N characters. */ 629extern int vsnprintf (char *, size_t, const char *, va_list) ATTRIBUTE_PRINTF(3,0); 630#endif 631 632#if defined(HAVE_DECL_STRVERSCMP) && !HAVE_DECL_STRVERSCMP 633/* Compare version strings. */ 634extern int strverscmp (const char *, const char *); 635#endif 636 637#define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0])) 638 639/* Drastically simplified alloca configurator. If we're using GCC, 640 we use __builtin_alloca; otherwise we use the C alloca. The C 641 alloca is always available. You can override GCC by defining 642 USE_C_ALLOCA yourself. The canonical autoconf macro C_ALLOCA is 643 also set/unset as it is often used to indicate whether code needs 644 to call alloca(0). */ 645extern void *C_alloca (size_t) ATTRIBUTE_MALLOC; 646#undef alloca 647#if GCC_VERSION >= 2000 && !defined USE_C_ALLOCA 648# define alloca(x) __builtin_alloca(x) 649# undef C_ALLOCA 650# define ASTRDUP(X) \ 651 (__extension__ ({ const char *const libiberty_optr = (X); \ 652 const unsigned long libiberty_len = strlen (libiberty_optr) + 1; \ 653 char *const libiberty_nptr = (char *const) alloca (libiberty_len); \ 654 (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len); })) 655#else 656# define alloca(x) C_alloca(x) 657# undef USE_C_ALLOCA 658# define USE_C_ALLOCA 1 659# undef C_ALLOCA 660# define C_ALLOCA 1 661extern const char *libiberty_optr; 662extern char *libiberty_nptr; 663extern unsigned long libiberty_len; 664# define ASTRDUP(X) \ 665 (libiberty_optr = (X), \ 666 libiberty_len = strlen (libiberty_optr) + 1, \ 667 libiberty_nptr = (char *) alloca (libiberty_len), \ 668 (char *) memcpy (libiberty_nptr, libiberty_optr, libiberty_len)) 669#endif 670 671#ifdef __cplusplus 672} 673#endif 674 675 676#endif /* ! defined (LIBIBERTY_H) */ 677