d3dcompiler: Add a trace to D3DAssemble.
[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 static jsstr_t *empty_str, *nan_str;
70
71 jsstr_t *jsstr_nan(void)
72 {
73     return jsstr_addref(nan_str);
74 }
75
76 jsstr_t *jsstr_empty(void)
77 {
78     return jsstr_addref(empty_str);
79 }
80
81 BOOL init_strings(void)
82 {
83     static const WCHAR NaNW[] = { 'N','a','N',0 };
84
85     if(!(empty_str = jsstr_alloc_buf(0)))
86         return FALSE;
87     if(!(nan_str = jsstr_alloc(NaNW)))
88         return FALSE;
89     return TRUE;
90 }
91
92 void free_strings(void)
93 {
94     jsstr_release(empty_str);
95     jsstr_release(nan_str);
96 }