minor changes that affect builds from MatN/Andrew
[goodguy/cinelerra.git] / cinelerra-5.1 / guicast / cstrdup.h
1 #ifndef __CSTRDUP_H__
2 #define __CSTRDUP_H__
3
4 #include <stdarg.h>
5 #include <stdint.h>
6 #include <string.h>
7
8 static inline char *cstrcat(int n, ...) {
9   int len = 0;  va_list va;  va_start(va,n);
10   for(int i=0; i<n; ++i) len += strlen(va_arg(va,char*));
11   va_end(va);  char *cp = new char[len+1], *bp = cp;  va_start(va,n);
12   for(int i=0; i<n; ++i) for(char*ap=va_arg(va,char*); *ap; *bp++=*ap++);
13   va_end(va);  *bp = 0;
14   return cp;
15 }
16 static inline char *cstrdup(const char *cp) {
17   return strcpy(new char[strlen(cp)+1],cp);
18 }
19
20 #ifndef lengthof
21 #define lengthof(ary) ((int)(sizeof(ary)/sizeof(ary[0])))
22 #endif
23
24 static inline int butf8(const char *&cp)
25 {
26         const unsigned char *bp = (const unsigned char *)cp;
27         int ret = *bp++;
28         if( ret >= 0x80 ) {
29                 int v = ret - 0xc0;
30                 static const int64_t sz = 0x5433222211111111;
31                 int n = v < 0 ? 0 : (sz >> (v&0x3c)) & 0x0f;
32                 for( int i=n; --i>=0; ret+=*bp++ ) ret <<= 6;
33                 static const uint32_t ofs[6] = {
34                         0x00000000U, 0x00003080U, 0x000E2080U,
35                         0x03C82080U, 0xFA082080U, 0x82082080U
36                 };
37                 ret -= ofs[n];
38         }
39         cp = (const char *)bp;
40         return ret;
41 }
42 static inline int butf8(unsigned int v, char *&cp)
43 {
44         unsigned char *bp = (unsigned char *)cp;
45         if( v >= 0x00000080 ) {
46                 int i = v < 0x00000800 ? 2 : v < 0x00010000 ? 3 :
47                         v < 0x00200000 ? 4 : v < 0x04000000 ? 5 : 6;
48                 int m = 0xff00 >> i;
49                 *bp++ = (v>>(6*--i)) | m;
50                 while( --i >= 0 ) *bp++ = ((v>>(6*i)) & 0x3f) | 0x80;
51         }
52         else
53                 *bp++ = v;
54         int ret = bp - (unsigned char *)cp;
55         cp = (char *)bp;
56         return ret;
57 }
58
59 static inline int bstrcasecmp(const char *ap, const char *bp)
60 { // not really correct, but what was left after MS port
61         int ret, a, b;
62         do {
63                 if( (a=butf8(ap)) >= 'A' && a <= 'Z' ) a += 'a' - 'A';
64                 if( (b=butf8(bp)) >= 'A' && b <= 'Z' ) b += 'a' - 'A';
65         } while( !(ret=a-b) && a && b );
66         return ret;
67 }
68
69 static inline const char *bstrcasestr(const char *src, const char *tgt)
70 {
71         int ssz = strlen(src), tsz = strlen(tgt);
72         const char *cp = tgt;
73         uint32_t wtgt[tsz+1], *tp = wtgt;
74         while( *cp ) {
75                 int wch = butf8(cp);
76                 if( wch >= 'A' && wch <= 'Z' ) wch += 'a' - 'A';
77                 *tp++ = wch;
78         }
79         *tp = 0;
80         for( tsz=tp-wtgt; ssz>=tsz; ++src,--ssz ) {
81                 cp = src;   tp = wtgt;
82                 int ret = 0, wch = 0;
83                 for( int i=tsz; --i>=0 && !ret && (wch=butf8(cp)); ) {
84                         if( wch >= 'A' && wch <= 'Z' ) wch += 'a' - 'A';
85                         ret = wch - *tp++;
86                 }
87                 if( !ret ) return src;
88         }
89         return 0;
90 }
91
92 #endif