libiberty/choose-temp.c

   1 /* Utility to pick a temporary filename prefix.
   2    Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
   3
   4 This file is part of the libiberty library.
   5 Libiberty is free software; you can redistribute it and/or
   6 modify it under the terms of the GNU Library General Public
   7 License as published by the Free Software Foundation; either
   8 version 2 of the License, or (at your option) any later version.
   9
  10 Libiberty 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 GNU
  13 Library General Public License for more details.
  14
  15 You should have received a copy of the GNU Library General Public
  16 License along with libiberty; see the file COPYING.LIB.  If not,
  17 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18 Boston, MA 02111-1307, USA.  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #include "config.h"
  22 #endif
  23
  24 #include <stdio.h>      /* May get P_tmpdir.  */
  25 #ifdef HAVE_STDLIB_H
  26 #include <stdlib.h>
  27 #endif
  28 #ifdef HAVE_STRING_H
  29 #include <string.h>
  30 #endif
  31
  32 #include "libiberty.h"
  33 extern char *choose_tmpdir PARAMS ((void));
  34
  35 /* Name of temporary file.
  36    mktemp requires 6 trailing X's.  */
  37 #define TEMP_FILE "ccXXXXXX"
  38 #define TEMP_FILE_LEN (sizeof(TEMP_FILE) - 1)
  39
  40 /* Return a prefix for temporary file names or NULL if unable to find one.
  41    The current directory is chosen if all else fails so the program is
  42    exited if a temporary directory can't be found (mktemp fails).
  43    The buffer for the result is obtained with xmalloc.
  44
  45    This function is provided for backwards compatability only.  It use
  46    is not recommended.  */
  47
  48 char *
  49 choose_temp_base ()
  50 {
  51   const char *base = choose_tmpdir ();
  52   char *temp_filename;
  53   int len;
  54
  55   len = strlen (base);
  56   temp_filename = xmalloc (len + TEMP_FILE_LEN + 1);
  57   strcpy (temp_filename, base);
  58   strcpy (temp_filename + len, TEMP_FILE);
  59
  60   mktemp (temp_filename);
  61   if (strlen (temp_filename) == 0)
  62     abort ();
  63   return temp_filename;
  64 }