Commit | Line | Data |
---|---|---|
252b5132 RH |
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 | |
d7f1f2b0 ILT |
18 | along with this program; if not, write to the Free Software |
19 | Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
252b5132 RH |
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 | } |