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     jsstr_flush(str1, ret->str);
  87     jsstr_flush(str2, ret->str+len1);
  88     return ret;
  89 }
  90
  91 static jsstr_t *empty_str, *nan_str, *undefined_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 jsstr_t *jsstr_undefined(void)
 104 {
 105     return jsstr_addref(undefined_str);
 106 }
 107
 108 BOOL init_strings(void)
 109 {
 110     static const WCHAR NaNW[] = { 'N','a','N',0 };
 111     static const WCHAR undefinedW[] = {'u','n','d','e','f','i','n','e','d',0};
 112
 113     if(!(empty_str = jsstr_alloc_buf(0)))
 114         return FALSE;
 115     if(!(nan_str = jsstr_alloc(NaNW)))
 116         return FALSE;
 117     if(!(undefined_str = jsstr_alloc(undefinedW)))
 118         return FALSE;
 119     return TRUE;
 120 }
 121
 122 void free_strings(void)
 123 {
 124     jsstr_release(empty_str);
 125     jsstr_release(nan_str);
 126     jsstr_release(undefined_str);
 127 }