ddraw/tests: Add basic tests for DrawIndexedPrimitiveStrided.
[wine] / dlls / jscript / jsstr.c
1 /*
2  * Copyright 2012 Jacek Caban for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include "jscript.h"
20
21 #include "wine/debug.h"
22
23 const char *debugstr_jsstr(jsstr_t *str)
24 {
25     return debugstr_wn(str->str, jsstr_length(str));
26 }
27
28 jsstr_t *jsstr_alloc_buf(unsigned len)
29 {
30     jsstr_t *ret;
31
32     if(len > JSSTR_MAX_LENGTH)
33         return NULL;
34
35     ret = heap_alloc(FIELD_OFFSET(jsstr_t, str[len+1]));
36     if(!ret)
37         return NULL;
38
39     ret->length_flags = len << JSSTR_LENGTH_SHIFT;
40     ret->ref = 1;
41     ret->str[len] = 0;
42     return ret;
43 }
44
45 jsstr_t *jsstr_alloc_len(const WCHAR *buf, unsigned len)
46 {
47     jsstr_t *ret;
48
49     ret = jsstr_alloc_buf(len);
50     if(ret)
51         memcpy(ret->str, buf, len*sizeof(WCHAR));
52
53     return ret;
54 }
55
56 int jsstr_cmp(jsstr_t *str1, jsstr_t *str2)
57 {
58     int len1 = jsstr_length(str1);
59     int len2 = jsstr_length(str2);
60     int ret;
61
62     ret = memcmp(str1->str, str2->str, min(len1, len2)*sizeof(WCHAR));
63     if(!ret)
64         ret = len1 - len2;
65
66     return ret;
67 }
68
69 jsstr_t *jsstr_concat(jsstr_t *str1, jsstr_t *str2)
70 {
71     unsigned len1, len2;
72     jsstr_t *ret;
73
74     len1 = jsstr_length(str1);
75     if(!len1)
76         return jsstr_addref(str2);
77
78     len2 = jsstr_length(str2);
79     if(!len2)
80         return jsstr_addref(str1);
81
82     ret = jsstr_alloc_buf(len1+len2);
83     if(!ret)
84         return NULL;
85
86     memcpy(ret->str, str1->str, len1*sizeof(WCHAR));
87     memcpy(ret->str+len1, str2->str, len2*sizeof(WCHAR));
88     return ret;
89 }
90
91 static jsstr_t *empty_str, *nan_str;
92
93 jsstr_t *jsstr_nan(void)
94 {
95     return jsstr_addref(nan_str);
96 }
97
98 jsstr_t *jsstr_empty(void)
99 {
100     return jsstr_addref(empty_str);
101 }
102
103 BOOL init_strings(void)
104 {
105     static const WCHAR NaNW[] = { 'N','a','N',0 };
106
107     if(!(empty_str = jsstr_alloc_buf(0)))
108         return FALSE;
109     if(!(nan_str = jsstr_alloc(NaNW)))
110         return FALSE;
111     return TRUE;
112 }
113
114 void free_strings(void)
115 {
116     jsstr_release(empty_str);
117     jsstr_release(nan_str);
118 }