new implementation for class string (implemented by Ari)
[dyninst.git] / pdutil / src / String.C
1 /*
2  * Copyright (c) 1996 Barton P. Miller
3  * 
4  * We provide the Paradyn Parallel Performance Tools (below
5  * described as Paradyn") on an AS IS basis, and do not warrant its
6  * validity or performance.  We reserve the right to update, modify,
7  * or discontinue this software at any time.  We shall have no
8  * obligation to supply such updates or modifications or any other
9  * form of support to you.
10  * 
11  * This license is for research uses.  For such uses, there is no
12  * charge. We define "research use" to mean you may freely use it
13  * inside your organization for whatever purposes you see fit. But you
14  * may not re-distribute Paradyn or parts of Paradyn, in any form
15  * source or binary (including derivatives), electronic or otherwise,
16  * to any other organization or entity without our permission.
17  * 
18  * (for other uses, please contact us at paradyn@cs.wisc.edu)
19  * 
20  * All warranties, including without limitation, any warranty of
21  * merchantability or fitness for a particular purpose, are hereby
22  * excluded.
23  * 
24  * By your use of Paradyn, you understand and agree that we (or any
25  * other person or entity with proprietary rights in Paradyn) are
26  * under no obligation to provide either maintenance services,
27  * update services, notices of latent defects, or correction of
28  * defects for Paradyn.
29  * 
30  * Even if advised of the possibility of such damages, under no
31  * circumstances shall we (or any other person or entity with
32  * proprietary rights in the software licensed hereunder) be liable
33  * to you or any third party for direct, indirect, or consequential
34  * damages of any character regardless of type of action, including,
35  * without limitation, loss of profits, loss of use, loss of good
36  * will, or computer failure or malfunction.  You agree to indemnify
37  * us (and any other person or entity with proprietary rights in the
38  * software licensed hereunder) for any and all liability it may
39  * incur to third parties resulting from your use of Paradyn.
40  */
41
42 // String.C
43
44 #include <assert.h>
45 #include "util/h/String.h"
46
47
48 string_ll::string_ll()
49     : str_(0), len_(0), key_(0) {
50 }
51
52 string_ll::string_ll(const char* str)
53     : str_(STRDUP(str)), len_(STRLEN(str)) {
54    key_ = 0; // lazy key define
55 }
56
57 string_ll::string_ll(const char *str, unsigned len) {
58    // same as above constructor, but copies less than the entire string.
59    // You specifiy the # of chars to copy.
60    assert(len <= strlen(str));
61
62    len_ = len;
63    str_ = new char[len+1];
64    (void) P_memcpy(str_, str, len);
65    str_[len] = '\0';
66
67    //key_ = hashs(str_);
68    key_ = 0; // lazy key define
69 }
70
71 string_ll::string_ll(const string_ll& s)
72     : str_(STRDUP(s.str_)), len_(s.len_), key_(s.key_) {
73    // lazy key define iff "s" lazy key define (as it should be)
74 }
75
76 string_ll::string_ll(int i) {
77    char tempBuffer[40];
78    sprintf(tempBuffer, "%d", i);
79
80    str_ = STRDUP(tempBuffer);
81    len_ = STRLEN(tempBuffer);
82
83 //   key_ = hashs (tempBuffer);
84    key_ = 0; // lazy key define
85 }
86
87 string_ll::string_ll(long l) {
88    char tempBuffer[40];
89    sprintf(tempBuffer, "%ld", l);
90
91    str_ = STRDUP(tempBuffer);
92    len_ = STRLEN(tempBuffer);
93
94 //   key_ = hashs (tempBuffer);
95    key_ = 0; // lazy key define
96 }
97
98 string_ll::string_ll(unsigned u) {
99    char tempBuffer[40];
100    sprintf(tempBuffer, "%u", u);
101
102    str_ = STRDUP(tempBuffer);
103    len_ = STRLEN(tempBuffer);
104
105 //   key_ = hashs (tempBuffer);
106    key_ = 0; // lazy key define
107 }
108
109 string_ll::string_ll(unsigned long ul) {
110    char tempBuffer[40];
111    sprintf(tempBuffer, "%lu", ul);
112
113    str_ = STRDUP(tempBuffer);
114    len_ = STRLEN(tempBuffer);
115
116 //   key_ = hashs (tempBuffer);
117    key_ = 0; // lazy key define
118 }
119
120 string_ll::string_ll(float f) {
121    char tempBuffer[40];
122    sprintf(tempBuffer, "%f", f);
123
124    str_ = STRDUP(tempBuffer);
125    len_ = STRLEN(tempBuffer);
126
127 //   key_ = hashs (tempBuffer);
128    key_ = 0; // lazy key define
129 }
130
131 string_ll::string_ll(double d) {
132    char tempBuffer[40];
133    sprintf(tempBuffer, "%g", d);
134
135    str_ = STRDUP(tempBuffer);
136    len_ = STRLEN(tempBuffer);
137
138    //key_ = hashs (tempBuffer);
139    key_ = 0; // lazy key define
140 }
141
142 string_ll::~string_ll() {
143     delete [] str_; str_ = 0;
144 }
145
146 string_ll&
147 string_ll::operator=(const char* str) {
148     if (str_ == str) {
149         return *this;
150     }
151
152     delete [] str_; str_ = 0;
153
154     str_ = STRDUP(str);
155     len_ = STRLEN(str);
156
157 //    key_ = hashs(str);
158     key_ = 0; // lazy key define
159
160     return *this;
161 }
162
163 string_ll&
164 string_ll::operator=(const string_ll& s) {
165     if (this == &s) {
166         return *this;
167     }
168
169     delete [] str_; str_ = 0;
170
171     str_ = STRDUP(s.str_);
172     len_ = s.len_;
173     key_ = s.key_; // lazy key define iff "s" lazy key define, which is correct
174
175     return *this;
176 }
177
178 string_ll&
179 string_ll::operator+=(const string_ll& s) {
180     unsigned nlen = len_ + s.len_;
181     char*    ptr  = new char[nlen+1];
182     assert(ptr);
183
184     memcpy(ptr, str_, len_);
185     memcpy(&ptr[len_], s.str_, s.len_);
186     ptr[nlen] = '\0';
187
188     delete[] str_; str_ = 0;
189     str_ = ptr;
190     len_ = nlen;
191
192 //    key_ = hashs(str_);
193     key_ = 0;
194
195     return *this;
196 }
197
198 string_ll&
199 string_ll::operator+=(const char *ptr) {
200    // this routine exists as an optimization, sometimes avoiding the need to create
201    // a temporary string, which can be expensive.
202
203    const int ptr_len = P_strlen(ptr);
204    const unsigned nlen = len_ + ptr_len;
205    char *new_ptr = new char[nlen+1];
206    assert(new_ptr);
207
208    memcpy(new_ptr, str_, len_);
209    memcpy(&new_ptr[len_], ptr, ptr_len);
210    new_ptr[nlen] = '\0';
211   
212    delete [] str_;
213    str_ = new_ptr;
214    len_ = nlen;
215
216 //   key_ = hashs(str_);
217    key_ = 0; // lazy key define
218
219    return *this;
220 }
221
222
223 string_ll
224 string_ll::operator+(const string_ll& s) const {
225     string_ll ret = *this;
226     return (ret += s);
227 }
228
229 string_ll
230 string_ll::operator+(const char *ptr) const {
231    string_ll ret = *this;
232    return (ret += ptr);
233 }
234
235 bool
236 string_ll::operator==(const string_ll& s) const {
237    if (&s == this) return true;
238
239    updateKeyIfNeeded(); s.updateKeyIfNeeded();
240    if (key_ != s.key_) return false;
241    if (len_ != s.len_) return false;
242    return STREQ(str_, s.str_);
243 //    return ((&s == this)
244 //        || ((key_ == s.key_)
245 //        && (len_ == s.len_)
246 //        && STREQ(str_, s.str_)));
247 }
248
249 bool
250 string_ll::operator!=(const string_ll& s) const {
251    if (&s == this) return false;
252    if (len_ != s.len_) return true;
253    return STRNE(str_, s.str_);
254 //    return ((!(&s == this)) && (len_ != s.len_)
255 //        || STRNE(str_, s.str_));
256 }
257
258 bool
259 string_ll::operator<=(const string_ll& s) const {
260     return ((&s == this) || STRLE(str_, s.str_));
261 }
262
263 bool
264 string_ll::operator>=(const string_ll& s) const {
265     return ((&s == this) || STRGE(str_, s.str_));
266 }
267
268 bool
269 string_ll::prefix_of(const char* s, unsigned sl) const {
270     return ((len_ > sl) ? false : STREQN(str_, s, len_));
271 }
272
273 bool
274 string_ll::prefix_of(const string_ll& s) const {
275     return ((&s == this) || prefix_of(s.str_, s.len_));
276 }
277
278 bool
279 string_ll::prefixed_by(const char* s, unsigned sl) const {
280     return ((sl > len_) ? false : STREQN(str_, s, sl));
281 }
282
283 bool
284 string_ll::prefixed_by(const string_ll& s) const {
285     return ((&s == this) || prefixed_by(s.str_, s.len_));
286 }
287
288 unsigned
289 string_ll::hashs(const char* str) {
290     if (!str) {
291         return 0;
292     }
293
294     unsigned h = 5381;
295     while (*str) {
296         h = (h << 5) + h + (unsigned) (*str);
297         str++;
298     }
299     return h;
300 }
301
302 unsigned
303 string_ll::STRLEN(const char* str) {
304     return ((str)?(P_strlen(str)):(0));
305 }
306
307 char*
308 string_ll::STRDUP(const char* str) {
309     if (!str) {
310         return 0;
311     }
312
313     unsigned size = P_strlen(str)+1;
314     char*    p    = new char[size];
315
316     (void) P_memcpy(p, str, size);
317     return p;
318 }
319
320 bool
321 string_ll::STREQ(const char* s1, const char* s2) {
322     return ((s1&&s2)?(P_strcmp(s1,s2)==0):(!(s1||s2)));
323 }
324
325 bool
326 string_ll::STREQN(const char* s1, const char* s2, unsigned len) {
327     return ((s1&&s2)?(P_strncmp(s1,s2,len)==0):(!(s1||s2)));
328 }
329
330 bool
331 string_ll::STRNE(const char* s1, const char* s2) {
332     return ((s1&&s2)?(P_strcmp(s1,s2)!=0):(false));
333 }
334
335 bool
336 string_ll::STRLT(const char* s1, const char* s2) {
337     return ((s1&&s2)?(P_strcmp(s1,s2)<0):(false));
338 }
339
340 bool
341 string_ll::STRLE(const char* s1, const char* s2) {
342     return ((s1&&s2)?(P_strcmp(s1,s2)<=0):(!(s1||s2)));
343 }
344
345 bool
346 string_ll::STRGT(const char* s1, const char* s2) {
347     return ((s1&&s2)?(P_strcmp(s1,s2)>0):(false));
348 }
349
350 bool
351 string_ll::STRGE(const char* s1, const char* s2) {
352     return ((s1&&s2)?(P_strcmp(s1,s2)>=0):(!(s1||s2)));
353 }
354
355 ostream& operator<< (ostream &os, const string_ll &s) {
356    return os << s.str_;
357 }
358
359 debug_ostream& operator<< (debug_ostream &os, const string_ll &s) {
360    return os << s.str_;
361 }