binutils/dyn-string.c

   1 /* An abstract string datatype.
   2    Copyright (C) 1998 Free Software Foundation, Inc.
   3    Contributed by Mark Mitchell (mark@markmitchell.com).
   4
   5    This file is part of GNU CC.
   6
   7    GNU CC is free software; you can redistribute it and/or modify it
   8    under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2, or (at your option)
  10    any later version.
  11
  12    GNU CC is distributed in the hope that it will be useful, but
  13    WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15    General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with GNU CC; see the file COPYING.  If not, write to the Free
  19    Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  20
  21 /* This file lives in at least two places: binutils and gcc.
  22    Don't change one without the other.  */
  23
  24 #include "config.h"
  25 #ifdef IN_GCC
  26 #include "system.h"
  27 #include "gansidecl.h"
  28 #else
  29 #include "ansidecl.h"
  30 #endif
  31 #include "dyn-string.h"
  32
  33 extern char *xmalloc ();
  34 extern char *xrealloc ();
  35
  36 /* Create a new dynamic string capable of holding at least SPACE
  37    characters, including the terminating NUL.  If SPACE is 0, it
  38    will be silently increased to 1.  */
  39
  40 dyn_string_t
  41 dyn_string_new (space)
  42      int space;
  43 {
  44   dyn_string_t result = (dyn_string_t) xmalloc (sizeof (struct dyn_string));
  45
  46   if (space == 0)
  47     /* We need at least one byte in which to store the terminating
  48        NUL.  */
  49     space = 1;
  50
  51   result->allocated = space;
  52   result->s = (char*) xmalloc (space);
  53   result->length = 0;
  54   result->s[0] = '\0';
  55
  56   return result;
  57 }
  58
  59 /* Free the memory used by DS.  */
  60
  61 void
  62 dyn_string_delete (ds)
  63      dyn_string_t ds;
  64 {
  65   free (ds->s);
  66   free (ds);
  67 }
  68
  69 /* Append the NUL-terminated string S to DS, resizing DS if
  70    necessary.  */
  71
  72 dyn_string_t
  73 dyn_string_append (ds, s)
  74      dyn_string_t ds;
  75      char *s;
  76 {
  77   int len = strlen (s);
  78   dyn_string_resize (ds, ds->length + len + 1 /* '\0' */);
  79   strcpy (ds->s + ds->length, s);
  80   ds->length += len;
  81
  82   return ds;
  83 }
  84
  85 /* Increase the capacity of DS so that it can hold at least SPACE
  86    characters, including the terminating NUL.  This function will not
  87    (at present) reduce the capacity of DS.  */
  88
  89 dyn_string_t
  90 dyn_string_resize (ds, space)
  91      dyn_string_t ds;
  92      int space;
  93 {
  94   int new_allocated = ds->allocated;
  95
  96   while (space > new_allocated)
  97     new_allocated *= 2;
  98
  99   if (new_allocated != ds->allocated)
 100     {
 101       /* We actually need more space.  */
 102       ds->allocated = new_allocated;
 103       ds->s = (char*) xrealloc (ds->s, ds->allocated);
 104     }
 105
 106   return ds;
 107 }