]> git.sur5r.net Git - cc65/blob - src/common/strbuf.c
More instruction set stuff
[cc65] / src / common / strbuf.c
1 /*****************************************************************************/
2 /*                                                                           */
3 /*                                 strbuf.c                                  */
4 /*                                                                           */
5 /*                       Variable sized string buffers                       */
6 /*                                                                           */
7 /*                                                                           */
8 /*                                                                           */
9 /* (C) 2001-2002 Ullrich von Bassewitz                                       */
10 /*               Wacholderweg 14                                             */
11 /*               D-70597 Stuttgart                                           */
12 /* EMail:        uz@musoftware.de                                            */
13 /*                                                                           */
14 /*                                                                           */
15 /* This software is provided 'as-is', without any expressed or implied       */
16 /* warranty.  In no event will the authors be held liable for any damages    */
17 /* arising from the use of this software.                                    */
18 /*                                                                           */
19 /* Permission is granted to anyone to use this software for any purpose,     */
20 /* including commercial applications, and to alter it and redistribute it    */
21 /* freely, subject to the following restrictions:                            */
22 /*                                                                           */
23 /* 1. The origin of this software must not be misrepresented; you must not   */
24 /*    claim that you wrote the original software. If you use this software   */
25 /*    in a product, an acknowledgment in the product documentation would be  */
26 /*    appreciated but is not required.                                       */
27 /* 2. Altered source versions must be plainly marked as such, and must not   */
28 /*    be misrepresented as being the original software.                      */
29 /* 3. This notice may not be removed or altered from any source              */
30 /*    distribution.                                                          */
31 /*                                                                           */
32 /*****************************************************************************/
33
34
35
36 #include <string.h>
37
38 /* common */
39 #include "xmalloc.h"
40 #include "strbuf.h"
41
42
43
44 /*****************************************************************************/
45 /*                                   Data                                    */
46 /*****************************************************************************/
47
48
49
50 /* An empty string buf */
51 const StrBuf EmptyStrBuf = STATIC_STRBUF_INITIALIZER;
52
53
54
55 /*****************************************************************************/
56 /*                                   Code                                    */
57 /*****************************************************************************/
58
59
60
61 StrBuf* InitStrBuf (StrBuf* B)
62 /* Initialize a string buffer */
63 {
64     B->Allocated = 0;
65     B->Len       = 0;
66     B->Index     = 0;
67     B->Buf       = 0;
68     return B;
69 }
70
71
72
73 void DoneStrBuf (StrBuf* B)
74 /* Free the data of a string buffer (but not the struct itself) */
75 {
76     xfree (B->Buf);
77 }
78
79
80
81 StrBuf* NewStrBuf (void)
82 /* Allocate, initialize and return a new StrBuf */
83 {
84     /* Allocate a new string buffer */
85     StrBuf* B = xmalloc (sizeof (StrBuf));
86
87     /* Initialize the struct... */
88     InitStrBuf (B);
89
90     /* ...and return it */
91     return B;
92 }
93
94
95
96 void FreeStrBuf (StrBuf* B)
97 /* Free a string buffer */
98 {
99     DoneStrBuf (B);
100     xfree (B);
101 }
102
103
104
105 void SB_Realloc (StrBuf* B, unsigned NewSize)
106 /* Reallocate the string buffer space, make sure at least NewSize bytes are
107  * available.
108  */
109 {
110     /* Get the current size, use a minimum of 8 bytes */
111     unsigned NewAllocated = B->Allocated;
112     if (NewAllocated == 0) {
113         NewAllocated = 8;
114     }
115
116     /* Round up to the next power of two */
117     while (NewAllocated < NewSize) {
118         NewAllocated *= 2;
119     }
120
121     /* Reallocate the buffer */
122     B->Buf       = xrealloc (B->Buf, NewAllocated);
123     B->Allocated = NewAllocated;
124 }
125
126
127
128 #if !defined(HAVE_INLINE)
129 char SB_At (const StrBuf* B, unsigned Index)
130 /* Get a character from the buffer */
131 {
132     PRECONDITION (Index < B->Len);
133     return B->Buf[Index];
134 }
135 #endif
136
137
138
139 void SB_Terminate (StrBuf* B)
140 /* Zero terminate the given string buffer. NOTE: The terminating zero is not
141  * accounted for in B->Len, if you want that, you have to use AppendChar!
142  */
143 {
144     unsigned NewLen = B->Len + 1;
145     if (NewLen > B->Allocated) {
146         SB_Realloc (B, NewLen);
147     }
148     B->Buf[B->Len] = '\0';
149 }
150
151
152
153 void SB_CopyBuf (StrBuf* Target, const char* Buf, unsigned Size)
154 /* Copy Buf to Target, discarding the old contents of Target */
155 {
156     if (Target->Allocated < Size) {
157         SB_Realloc (Target, Size);
158     }
159     memcpy (Target->Buf, Buf, Size);
160     Target->Len = Size;
161 }
162
163
164
165 #if !defined(HAVE_INLINE)
166 void SB_CopyStr (StrBuf* Target, const char* S)
167 /* Copy S to Target, discarding the old contents of Target */
168 {
169     SB_CopyBuf (Target, S, strlen (S));
170 }
171 #endif
172
173
174
175 #if !defined(HAVE_INLINE)
176 void SB_Copy (StrBuf* Target, const StrBuf* Source)
177 /* Copy Source to Target, discarding the old contents of Target */
178 {
179     SB_CopyBuf (Target, Source->Buf, Source->Len);
180 }
181 #endif
182
183
184
185 void SB_AppendChar (StrBuf* B, char C)
186 /* Append a character to a string buffer */
187 {
188     unsigned NewLen = B->Len + 1;
189     if (NewLen > B->Allocated) {
190         SB_Realloc (B, NewLen);
191     }
192     B->Buf[B->Len] = C;
193     B->Len = NewLen;
194 }
195
196
197
198 void SB_AppendBuf (StrBuf* B, const char* S, unsigned Size)
199 /* Append a character buffer to the end of the string buffer */
200 {
201     unsigned NewLen = B->Len + Size;
202     if (NewLen > B->Allocated) {
203         SB_Realloc (B, NewLen);
204     }
205     memcpy (B->Buf + B->Len, S, Size);
206     B->Len = NewLen;
207 }
208
209
210
211 #if !defined(HAVE_INLINE)
212 void SB_AppendStr (StrBuf* B, const char* S)
213 /* Append a string to the end of the string buffer */
214 {
215     SB_AppendBuf (B, S, strlen (S));
216 }
217 #endif
218
219
220
221 #if !defined(HAVE_INLINE)
222 void SB_Append (StrBuf* Target, const StrBuf* Source)
223 /* Append the contents of Source to Target */
224 {
225     SB_AppendBuf (Target, Source->Buf, Source->Len);
226 }
227 #endif
228
229
230
231 #if !defined(HAVE_INLINE)
232 void SB_Cut (StrBuf* B, unsigned Len)
233 /* Cut the contents of B at the given length. If the current length of the
234  * buffer is smaller than Len, nothing will happen.
235  */
236 {
237     if (Len < B->Len) {
238         B->Len = Len;
239     }
240 }
241 #endif
242
243
244
245 void SB_Slice (StrBuf* Target, const StrBuf* Source, unsigned Start, unsigned Len)
246 /* Copy a slice from Source into Target. The current contents of Target are
247  * destroyed. If Start is greater than the length of Source, or if Len
248  * characters aren't available, the result will be a buffer with less than Len
249  * bytes.
250  */
251 {
252     /* Calculate the length of the resulting buffer */
253     if (Start >= Source->Len) {
254         /* Target will be empty */
255         SB_Clear (Target);
256         return;
257     } else if (Start + Len > Source->Len) {
258         Len = (Start + Len) - Source->Len;
259     }
260
261     /* Make sure we have enough room in the target string buffer */
262     if (Len > Target->Allocated) {
263         SB_Realloc (Target, Len);
264     }
265
266     /* Copy the slice */
267     memcpy (Target->Buf, Source->Buf + Start, Len);
268     Target->Len = Len;
269 }
270
271
272