← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to plugin/pbms/src/cslib/CSString.cc

  • Committer: Monty Taylor
  • Date: 2011-02-13 17:26:39 UTC
  • mfrom: (2157.2.2 give-in-to-pkg-config)
  • mto: This revision was merged to the branch mainline in revision 2166.
  • Revision ID: mordred@inaugust.com-20110213172639-nhy7i72sfhoq13ms
Merged in pkg-config fixes.

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugin/pbms/src/cslib/CSString.cc
 
1
/* Copyright (C) 2008 PrimeBase Technologies GmbH, Germany
 
2
 *
 
3
 * PrimeBase Media Stream for MySQL
 
4
 *
 
5
 * This program is free software; you can redistribute it and/or modify
 
6
 * it under the terms of the GNU General Public License as published by
 
7
 * the Free Software Foundation; either version 2 of the License, or
 
8
 * (at your option) any later version.
 
9
 *
 
10
 * This program 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
 
13
 * GNU General Public License for more details.
 
14
 *
 
15
 * You should have received a copy of the GNU General Public License
 
16
 * along with this program; if not, write to the Free Software
 
17
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
 
18
 *
 
19
 * Original author: Paul McCullagh (H&G2JCtL)
 
20
 * Continued development: Barry Leslie
 
21
 *
 
22
 * 2007-06-15
 
23
 *
 
24
 * CORE SYSTEM STORAGE
 
25
 * Basic storage structures.
 
26
 *
 
27
 */
 
28
 
 
29
#include "CSConfig.h"
 
30
#include <inttypes.h>
 
31
 
 
32
#include <assert.h>
 
33
#include <string.h>
 
34
#include <ctype.h>
 
35
 
 
36
#include "CSGlobal.h"
 
37
#include "CSUTF8.h"
 
38
#include "CSStorage.h"
 
39
#include "CSMemory.h"
 
40
#include "CSString.h"
 
41
#include "CSStrUtil.h"
 
42
#include "CSGlobal.h"
 
43
 
 
44
 
 
45
/*
 
46
 * ---------------------------------------------------------------
 
47
 * Core System String Buffers
 
48
 */
 
49
 
 
50
CSStringBufferImpl::CSStringBufferImpl():
 
51
iBuffer(NULL),
 
52
iGrow(0),
 
53
iSize(0),
 
54
myStrLen(0)
 
55
{
 
56
        iGrow = 20;
 
57
}
 
58
 
 
59
CSStringBufferImpl::CSStringBufferImpl(uint32_t grow):
 
60
iBuffer(NULL),
 
61
iGrow(0),
 
62
iSize(0),
 
63
myStrLen(0)
 
64
{
 
65
        iGrow = grow;
 
66
}
 
67
 
 
68
CSStringBufferImpl::~CSStringBufferImpl()
 
69
{
 
70
        clear();
 
71
}
 
72
 
 
73
void CSStringBufferImpl::clear()
 
74
{
 
75
        if (iBuffer)
 
76
                cs_free(iBuffer);
 
77
        iBuffer = NULL;
 
78
        iSize = 0;
 
79
        myStrLen = 0; 
 
80
}
 
81
 
 
82
void CSStringBufferImpl::append(char ch)
 
83
{
 
84
        if (iSize == myStrLen) {
 
85
                cs_realloc((void **) &iBuffer, iSize + iGrow);
 
86
                iSize += iGrow;
 
87
        }
 
88
        iBuffer[myStrLen] = ch;
 
89
        myStrLen++;
 
90
}
 
91
 
 
92
void CSStringBufferImpl::append(const char *str, size_t len)
 
93
{
 
94
        if (myStrLen + len > iSize) {
 
95
                size_t add = len;
 
96
                
 
97
                if (add < iGrow)
 
98
                        add = iGrow;
 
99
                cs_realloc((void **) &iBuffer, iSize + add);
 
100
                iSize += add;
 
101
        }
 
102
        memcpy(iBuffer + myStrLen, str, len);
 
103
        myStrLen += len;
 
104
}
 
105
 
 
106
void CSStringBufferImpl::append(int value)
 
107
{
 
108
        char buffer[100];
 
109
 
 
110
        snprintf(buffer, 100, "%d", value);
 
111
        append(buffer);
 
112
}
 
113
 
 
114
void CSStringBufferImpl::append(uint32_t value)
 
115
{
 
116
        char buffer[100];
 
117
 
 
118
        snprintf(buffer, 100, "%"PRIu32, value);
 
119
        append(buffer);
 
120
}
 
121
 
 
122
void CSStringBufferImpl::append(uint64_t value)
 
123
{
 
124
        char buffer[100];
 
125
 
 
126
        snprintf(buffer, 100, "%"PRIu64, value);
 
127
        append(buffer);
 
128
}
 
129
 
 
130
char *CSStringBufferImpl::getCString()
 
131
{
 
132
        if (iSize == myStrLen) {
 
133
                cs_realloc((void **) &iBuffer, iSize + 1);
 
134
                iSize++;
 
135
        }
 
136
        iBuffer[myStrLen] = 0;
 
137
        return iBuffer;
 
138
}
 
139
 
 
140
char *CSStringBufferImpl::take()
 
141
{
 
142
        char *buf;
 
143
 
 
144
        cs_realloc((void **) &iBuffer, myStrLen + 1);
 
145
        iSize = myStrLen + 1;
 
146
        iBuffer[myStrLen] = 0;
 
147
 
 
148
        buf = iBuffer;
 
149
        iBuffer = NULL;
 
150
        iSize = 0;
 
151
        myStrLen = 0; 
 
152
        return buf;
 
153
}
 
154
 
 
155
void CSStringBufferImpl::setLength(uint32_t len)
 
156
{
 
157
        if (len > iSize) {
 
158
                cs_realloc((void **) &iBuffer, len + 1);
 
159
                iSize = len+1;
 
160
        }
 
161
        myStrLen = len;
 
162
}
 
163
 
 
164
uint32_t CSStringBufferImpl::ignore(uint32_t pos, char ch)
 
165
{
 
166
        while (pos < myStrLen && iBuffer[pos] == ch)
 
167
                pos++;
 
168
        return pos;
 
169
}
 
170
 
 
171
uint32_t CSStringBufferImpl::find(uint32_t pos, char ch)
 
172
{
 
173
        while (pos < myStrLen && iBuffer[pos] != ch)
 
174
                pos++;
 
175
        return pos;
 
176
}
 
177
 
 
178
uint32_t CSStringBufferImpl::trim(uint32_t pos, char ch)
 
179
{
 
180
        while (pos > 0 && iBuffer[pos-1] == ch)
 
181
                pos--;
 
182
        return pos;
 
183
}
 
184
 
 
185
CSString *CSStringBufferImpl::substr(uint32_t pos, uint32_t len)
 
186
{
 
187
        CSString *s = CSString::newString(iBuffer + pos, len);
 
188
 
 
189
        return s;
 
190
}
 
191
 
 
192
/*
 
193
 * ---------------------------------------------------------------
 
194
 * Generic Strings
 
195
 */
 
196
 
 
197
CSString *CSString::concat(CSString *cat_str)
 
198
{
 
199
        CSString *new_str = NULL;
 
200
        uint32_t len_a, len_b;
 
201
        
 
202
        enter_();
 
203
        len_a = length();
 
204
        len_b = cat_str->length();
 
205
        new_str = clone(len_a + len_b);
 
206
        push_(new_str);
 
207
        
 
208
        for (uint32_t i=0; i<len_b; i++)
 
209
                new_str->setCharAt(len_a+i, cat_str->charAt(i));
 
210
 
 
211
        pop_(new_str);
 
212
        return_(new_str);
 
213
}
 
214
 
 
215
CSString *CSString::concat(const char *cat_str)
 
216
{
 
217
        CSString *new_str = NULL;
 
218
        uint32_t len_a, len_b;
 
219
        
 
220
        enter_();
 
221
        len_a = length();
 
222
        len_b = strlen(cat_str);
 
223
        new_str = clone(len_a + len_b);
 
224
        push_(new_str);
 
225
        
 
226
        for (uint32_t i=0; i<len_b; i++)
 
227
                new_str->setCharAt(len_a+i, cat_str[i]);
 
228
 
 
229
        pop_(new_str);
 
230
        return_(new_str);
 
231
}
 
232
 
 
233
CSString *CSString::toUpper()
 
234
{
 
235
        CSString *new_str = NULL;
 
236
        uint32_t len;
 
237
 
 
238
        enter_();
 
239
        new_str = clone();
 
240
        push_(new_str);
 
241
        
 
242
        len = new_str->length();
 
243
        for (uint32_t i=0; i<len; i++)
 
244
                new_str->setCharAt(i, upperCharAt(i));
 
245
 
 
246
        pop_(new_str);
 
247
        return_(new_str);
 
248
}
 
249
 
 
250
uint32_t CSString::hashKey()
 
251
{
 
252
        register uint32_t h = 0, g;
 
253
        
 
254
        for (uint32_t i=0; i<length(); i++) {
 
255
                h = (h << 4) + (uint32_t) upperCharAt(i);
 
256
                if ((g = (h & 0xF0000000)))
 
257
                        h = (h ^ (g >> 24)) ^ g;
 
258
        }
 
259
 
 
260
        return (h);
 
261
}
 
262
 
 
263
uint32_t CSString::locate(const char *w_cstr, int32_t count)
 
264
{
 
265
        int32_t len = length();
 
266
        int32_t i;
 
267
 
 
268
        if (count >= 0) {
 
269
                i = 0;
 
270
                while (i < len) {
 
271
                        if (startsWith((uint32_t) i, w_cstr)) {
 
272
                                count--;
 
273
                                if (!count)
 
274
                                        return i;
 
275
                        }
 
276
                        i++;
 
277
                }
 
278
        }
 
279
        else {
 
280
                count = -count;
 
281
                i = len - (int32_t) strlen(w_cstr);
 
282
                while (i >= 0) {
 
283
                        if (startsWith((uint32_t) i, w_cstr)) {
 
284
                                count--;
 
285
                                if (!count)
 
286
                                        return i;
 
287
                        }
 
288
                        i--;
 
289
                }
 
290
        }
 
291
        return i;
 
292
}
 
293
 
 
294
uint32_t CSString::locate(uint32_t pos, const char *w_cstr)
 
295
{
 
296
        uint32_t len = length();
 
297
        uint32_t i;
 
298
 
 
299
        if (pos > len)
 
300
                return len;
 
301
        i = pos;
 
302
        while (i < len) {
 
303
                if (startsWith(i, w_cstr))
 
304
                        return i;
 
305
                i++;
 
306
        }
 
307
        return i;
 
308
}
 
309
 
 
310
uint32_t CSString::locate(uint32_t pos, CS_CHAR ch)
 
311
{
 
312
        uint32_t len = length();
 
313
        uint32_t i;
 
314
 
 
315
        if (pos > len)
 
316
                return len;
 
317
        i = pos;
 
318
        while (i < len) {
 
319
                if (charAt(i) == ch)
 
320
                        return i;
 
321
                i++;
 
322
        }
 
323
        return i;
 
324
}
 
325
 
 
326
uint32_t CSString::skip(uint32_t pos, CS_CHAR ch)
 
327
{
 
328
        uint32_t len = length();
 
329
        uint32_t i;
 
330
 
 
331
        if (pos > len)
 
332
                return len;
 
333
        i = pos;
 
334
        while (i < len) {
 
335
                if (charAt(i) != ch)
 
336
                        return i;
 
337
                i++;
 
338
        }
 
339
        return i;
 
340
}
 
341
 
 
342
CSString *CSString::substr(uint32_t index, uint32_t size)
 
343
{
 
344
        return clone(index, size);
 
345
}
 
346
 
 
347
CSString *CSString::substr(uint32_t index)
 
348
{
 
349
        return clone(index, length() - index);
 
350
        
 
351
}
 
352
 
 
353
CSString *CSString::left(const char *w_cstr, int32_t count)
 
354
{
 
355
        uint32_t idx = locate(w_cstr, count);
 
356
 
 
357
        if (idx == (uint32_t)-1)
 
358
                return CSString::newString("");
 
359
        return substr(0, idx);
 
360
}
 
361
 
 
362
CSString *CSString::left(const char *w_cstr)
 
363
{
 
364
        return left(w_cstr, 1);
 
365
}
 
366
 
 
367
CSString *CSString::right(const char *w_cstr, int32_t count)
 
368
{
 
369
        uint32_t idx = locate(w_cstr, count);
 
370
 
 
371
        if (idx == (uint32_t)-1) {
 
372
                return RETAIN(this);
 
373
        }
 
374
        
 
375
        if (idx == length())
 
376
                return newString("");
 
377
                
 
378
        return substr(idx + strlen(w_cstr));
 
379
}
 
380
 
 
381
CSString *CSString::right(const char *w_cstr)
 
382
{
 
383
        return right(w_cstr, 1);
 
384
}
 
385
 
 
386
bool CSString::startsWith(const char *w_str)
 
387
{
 
388
        return startsWith(0, w_str);
 
389
}
 
390
 
 
391
bool CSString::endsWith(const char *w_str)
 
392
{
 
393
        return startsWith(length() - strlen(w_str), w_str);
 
394
}
 
395
 
 
396
uint32_t CSString::nextPos(uint32_t pos)
 
397
{
 
398
        if (pos >= length())
 
399
                return length();
 
400
        return pos + 1;
 
401
}
 
402
 
 
403
CSString *CSString::clone(uint32_t len)
 
404
{
 
405
        return clone(0, len);
 
406
}
 
407
 
 
408
CSString *CSString::clone()
 
409
{
 
410
        return clone(0, length());
 
411
}
 
412
 
 
413
bool CSString::equals(const char *str)
 
414
{
 
415
        uint32_t len = length();
 
416
        uint32_t i;
 
417
        
 
418
        for (i=0; i<len && *str; i++) {
 
419
                if (charAt(i) != *str)
 
420
                        return false;
 
421
                str++;
 
422
        }
 
423
        return i==len && !*str;
 
424
}
 
425
 
 
426
/*
 
427
 * ---------------------------------------------------------------
 
428
 * Standard C String
 
429
 */
 
430
 
 
431
CSString::CSString():
 
432
myCString(NULL),
 
433
myStrLen(0)
 
434
{
 
435
}
 
436
 
 
437
CSString::CSString(const char *cstr):
 
438
myCString(cs_strdup(cstr)),
 
439
myStrLen(strlen(cstr))
 
440
{
 
441
}
 
442
 
 
443
CSString::~CSString()
 
444
{
 
445
        if (myCString)
 
446
                cs_free(myCString);
 
447
}
 
448
 
 
449
const char *CSString::getCString()
 
450
{
 
451
        return myCString;
 
452
}
 
453
 
 
454
CS_CHAR CSString::charAt(uint32_t pos)
 
455
{
 
456
        if (pos < myStrLen)
 
457
                return (CS_CHAR) (unsigned char) myCString[pos];
 
458
        return (CS_CHAR) 0;
 
459
}
 
460
 
 
461
CS_CHAR CSString::upperCharAt(uint32_t pos)
 
462
{
 
463
        if (pos < myStrLen)
 
464
                return (CS_CHAR) (unsigned char) toupper(myCString[pos]);
 
465
        return (CS_CHAR) 0;
 
466
}
 
467
 
 
468
void CSString::setCharAt(uint32_t pos, CS_CHAR ch)
 
469
{
 
470
        if (pos < myStrLen)
 
471
                myCString[pos] = (unsigned char) ch;
 
472
}
 
473
 
 
474
int CSString::compare(const char *val, uint32_t len)
 
475
{
 
476
        const char *pa = myCString, *pb = val;
 
477
        int r = 0;
 
478
        
 
479
        enter_();
 
480
        
 
481
        if (pa && pb) {
 
482
                while (*pa && *pb && len) {
 
483
                        r = toupper(*pa) - toupper(*pb);
 
484
                        if (r != 0)
 
485
                                break;
 
486
                        pa++;
 
487
                        pb++;
 
488
                        len--;
 
489
                }
 
490
                if (len)
 
491
                        r = toupper(*pa) - toupper(*pb);
 
492
        }
 
493
 
 
494
        return_(r);
 
495
}
 
496
 
 
497
int CSString::compare(CSString *val)
 
498
{
 
499
        return compare(val->getCString(), (uint32_t)-1);
 
500
}
 
501
 
 
502
bool CSString::startsWith(uint32_t index, const char *w_str)
 
503
{
 
504
        uint32_t len = strlen(w_str);
 
505
        char *str;
 
506
        
 
507
        if (index > myStrLen)
 
508
                index = myStrLen;
 
509
        str = myCString + index;
 
510
        for (uint32_t i=0; i<len && *str; i++) {
 
511
                if (*str != *w_str)
 
512
                        return false;
 
513
                str++;
 
514
                w_str++;
 
515
        }
 
516
        return (*w_str == 0);
 
517
}
 
518
 
 
519
void CSString::setLength(uint32_t len)
 
520
{
 
521
        cs_realloc((void **) &myCString, len+1);
 
522
        myCString[len] = 0;
 
523
        myStrLen = len;
 
524
}
 
525
 
 
526
CSString *CSString::clone(uint32_t pos, uint32_t len)
 
527
{
 
528
        CSString *str = NULL;
 
529
        
 
530
        enter_();
 
531
        new_(str, CSString());
 
532
        push_(str);
 
533
        
 
534
        str->myCString = (char *) cs_malloc(len + 1);
 
535
        str->myStrLen = len;
 
536
        if (pos > myStrLen)
 
537
                pos = myStrLen;
 
538
        if (len > myStrLen - pos) {
 
539
                /* More space has been allocated than required.
 
540
                 * It may be that this space will be used up.
 
541
                 * Set the zero terminator at the end
 
542
                 * of the space!
 
543
                 */
 
544
                str->myCString[len] = 0;
 
545
                len = myStrLen - pos;
 
546
        }
 
547
        memcpy(str->myCString, myCString+pos, len);
 
548
        str->myCString[len] = 0;
 
549
 
 
550
        pop_(str);
 
551
        return_(str);
 
552
}
 
553
 
 
554
CSObject *CSString::getKey()
 
555
{
 
556
        return (CSObject *) this;
 
557
}
 
558
 
 
559
int CSString::compareKey(CSObject *key)
 
560
{
 
561
        return compare((CSString *) key);
 
562
}
 
563
 
 
564
CSString *CSString::newString(const char *cstr)
 
565
{
 
566
        CSString *str;
 
567
        
 
568
        enter_();
 
569
        new_(str, CSString());
 
570
        push_(str);
 
571
        str->myCString = cs_strdup(cstr);
 
572
        str->myStrLen = strlen(cstr);
 
573
        pop_(str);
 
574
        return_(str);
 
575
}
 
576
 
 
577
CSString *CSString::newString(const char *bytes, uint32_t len)
 
578
{
 
579
        CSString *str;
 
580
        
 
581
        enter_();
 
582
        new_(str, CSString());
 
583
        push_(str);
 
584
        str->myStrLen = len;
 
585
        str->myCString = (char *) cs_malloc(len+1);
 
586
        memcpy(str->myCString, bytes, len);
 
587
        str->myCString[len] = 0;
 
588
        pop_(str);
 
589
        return_(str);
 
590
}
 
591
 
 
592
CSString *CSString::newString(CSStringBuffer *sb)
 
593
{
 
594
        CSString *str;
 
595
        
 
596
        enter_();
 
597
        push_(sb);
 
598
        new_(str, CSString());
 
599
        push_(str);
 
600
        str->myStrLen = sb->length();
 
601
        str->myCString = sb->take();
 
602
        pop_(str);
 
603
        pop_(sb); // pop this do not release it because CSStringBuffer is NOT a CSRefObject. 
 
604
        return_(str);
 
605
}
 
606