jsstr.c File Reference

#include <assert.h>
#include "jscript.h"
#include "wine/debug.h"

Include dependency graph for jsstr.c:

Go to the source code of this file.

Macros
#define	JSSTR_SHORT_STRING_LENGTH   8
#define	JSSTR_MAX_ROPE_DEPTH   100
#define	TMP_BUF_SIZE   256

Functions
const char *	debugstr_jsstr (jsstr_t *str)
void	jsstr_free (jsstr_t *str)
static void	jsstr_init (jsstr_t *str, unsigned len, jsstr_tag_t tag)
jsstr_t *	jsstr_alloc_buf (unsigned len, WCHAR **buf)
jsstr_t *	jsstr_alloc_len (const WCHAR *buf, unsigned len)
static void	jsstr_rope_extract (jsstr_rope_t *str, unsigned off, unsigned len, WCHAR *buf)
void	jsstr_extract (jsstr_t *str, unsigned off, unsigned len, WCHAR *buf)
static int	jsstr_cmp_str (jsstr_t *jsstr, const WCHAR *str, unsigned len)
static int	ropes_cmp (jsstr_rope_t *left, jsstr_rope_t *right)
static const WCHAR *	jsstr_try_flat (jsstr_t *str)
int	jsstr_cmp (jsstr_t *str1, jsstr_t *str2)
jsstr_t *	jsstr_concat (jsstr_t *str1, jsstr_t *str2)
	C_ASSERT (sizeof(jsstr_heap_t)<=sizeof(jsstr_rope_t))
const WCHAR *	jsstr_rope_flatten (jsstr_rope_t *str)
jsstr_t *	jsstr_nan (void)
jsstr_t *	jsstr_empty (void)
jsstr_t *	jsstr_undefined (void)
jsstr_t *	jsstr_null_bstr (void)
BOOL	is_null_bstr (jsstr_t *str)
BOOL	init_strings (void)
void	free_strings (void)

Variables
static jsstr_t *	empty_str
static jsstr_t *	nan_str
static jsstr_t *	undefined_str
static jsstr_t *	null_bstr_str

Macro Definition Documentation

JSSTR_MAX_ROPE_DEPTH

#define JSSTR_MAX_ROPE_DEPTH   100

Definition at line 35 of file jsstr.c.

JSSTR_SHORT_STRING_LENGTH

#define JSSTR_SHORT_STRING_LENGTH   8

Definition at line 30 of file jsstr.c.

TMP_BUF_SIZE

#define TMP_BUF_SIZE   256

Definition at line 154 of file jsstr.c.

Function Documentation

C_ASSERT()

C_ASSERT

(

sizeof(jsstr_heap_t)<=sizeof(jsstr_rope_t)

)

debugstr_jsstr()

const char * debugstr_jsstr

(

jsstr_t *

str

)

Definition at line 37 of file jsstr.c.

{
    return jsstr_is_inline(str) ? debugstr_wn(jsstr_as_inline(str)->buf, jsstr_length(str))
        : jsstr_is_heap(str) ? debugstr_wn(jsstr_as_heap(str)->buf, jsstr_length(str))
        : wine_dbg_sprintf("%s...", debugstr_jsstr(jsstr_as_rope(str)->left));
}

Referenced by array_join(), debugstr_jsstr(), debugstr_jsval(), dump_instr_arg(), interp_obj_prop(), interp_regexp(), interp_str(), interp_throw_type(), JSGlobal_decodeURI(), JSGlobal_encodeURI(), String_idx_get(), and String_replace().

free_strings()

void free_strings

(

void

)

Definition at line 325 of file jsstr.c.

{
    if(empty_str)
        jsstr_release(empty_str);
    if(nan_str)
        jsstr_release(nan_str);
    if(undefined_str)
        jsstr_release(undefined_str);
    if(null_bstr_str)
        jsstr_release(null_bstr_str);
}

Referenced by DllMain().

init_strings()

BOOL init_strings

(

void

)

Definition at line 308 of file jsstr.c.

{
    static const WCHAR NaNW[] = { 'N','a','N',0 };
    static const WCHAR undefinedW[] = {'u','n','d','e','f','i','n','e','d',0};
    WCHAR *ptr;
 
    if(!(empty_str = jsstr_alloc_buf(0, &ptr)))
        return FALSE;
    if(!(nan_str = jsstr_alloc(NaNW)))
        return FALSE;
    if(!(undefined_str = jsstr_alloc(undefinedW)))
        return FALSE;
    if(!(null_bstr_str = jsstr_alloc_buf(0, &ptr)))
        return FALSE;
     return TRUE;
}

Referenced by DllMain().

is_null_bstr()

BOOL is_null_bstr

(

jsstr_t *

str

)

Definition at line 303 of file jsstr.c.

{
    return str == null_bstr_str;
}

Referenced by jsval_to_variant(), and variant_change_type().

jsstr_alloc_buf()

jsstr_t * jsstr_alloc_buf	(	unsigned	len,
		WCHAR **	buf
	)

Definition at line 69 of file jsstr.c.

{
    jsstr_inline_t *ret;
 
    if(len > JSSTR_MAX_LENGTH)
        return NULL;
 
    ret = heap_alloc(FIELD_OFFSET(jsstr_inline_t, buf[len+1]));
    if(!ret)
        return NULL;
 
    jsstr_init(&ret->str, len, JSSTR_INLINE);
    ret->buf[len] = 0;
    *buf = ret->buf;
    return &ret->str;
}

Referenced by array_join(), Date_toLocaleDateString(), Date_toLocaleString(), Date_toLocaleTimeString(), do_attribute_tag_format(), do_attributeless_tag_format(), Error_toString(), init_strings(), JSGlobal_decodeURI(), JSGlobal_decodeURIComponent(), JSGlobal_encodeURI(), JSGlobal_encodeURIComponent(), JSGlobal_escape(), JSGlobal_unescape(), jsstr_alloc_len(), jsstr_concat(), jsstr_substr(), NativeFunction_toString(), number_to_exponential(), number_to_fixed(), Object_toString(), RegExp_toString(), String_concat(), String_toLowerCase(), String_toUpperCase(), and StringConstr_fromCharCode().

jsstr_alloc_len()

jsstr_t * jsstr_alloc_len	(	const WCHAR *	buf,
		unsigned	len
	)

Definition at line 86 of file jsstr.c.

{
    jsstr_t *ret;
    WCHAR *ptr;
 
    ret = jsstr_alloc_buf(len, &ptr);
    if(ret)
        memcpy(ptr, buf, len*sizeof(WCHAR));
 
    return ret;
}

Referenced by compiler_alloc_string_len(), create_match_array(), interp_forin(), InterpretedFunction_toString(), JSON_stringify(), jsstr_alloc(), rep_call(), String_replace(), String_split(), String_trim(), and variant_to_jsval().

jsstr_cmp()

int jsstr_cmp	(	jsstr_t *	str1,
		jsstr_t *	str2
	)

Definition at line 189 of file jsstr.c.

{
    unsigned len1 = jsstr_length(str1);
    unsigned len2 = jsstr_length(str2);
    const WCHAR *str;
    int ret;
 
    str = jsstr_try_flat(str2);
    if(str) {
        ret = jsstr_cmp_str(str1, str, min(len1, len2));
        return ret || len1 == len2 ? ret : -1;
    }
 
    str = jsstr_try_flat(str1);
    if(str) {
        ret = jsstr_cmp_str(str2, str, min(len1, len2));
        return ret || len1 == len2 ? -ret : 1;
    }
 
    return ropes_cmp(jsstr_as_rope(str1), jsstr_as_rope(str2));
}

Referenced by jsstr_eq(), less_eval(), and sort_cmp().

jsstr_cmp_str()

static int jsstr_cmp_str ( jsstr_t *  jsstr, const WCHAR *  str, unsigned  len  )

static

Definition at line 128 of file jsstr.c.

{
    int ret;
 
    switch(jsstr_tag(jsstr)) {
    case JSSTR_INLINE:
        ret = memcmp(jsstr_as_inline(jsstr)->buf, str, len*sizeof(WCHAR));
        return ret || jsstr_length(jsstr) == len ? ret : 1;
    case JSSTR_HEAP:
        ret = memcmp(jsstr_as_heap(jsstr)->buf, str, len*sizeof(WCHAR));
        return ret || jsstr_length(jsstr) == len ? ret : 1;
    case JSSTR_ROPE: {
        jsstr_rope_t *rope = jsstr_as_rope(jsstr);
        unsigned left_len = jsstr_length(rope->left);
 
        ret = jsstr_cmp_str(rope->left, str, min(len, left_len));
        if(ret || len <= left_len)
            return ret;
        return jsstr_cmp_str(rope->right, str+left_len, len-left_len);
    }
    }
 
    assert(0);
    return 0;
}

Referenced by jsstr_cmp(), and jsstr_cmp_str().

jsstr_concat()

jsstr_t * jsstr_concat	(	jsstr_t *	str1,
		jsstr_t *	str2
	)

Definition at line 211 of file jsstr.c.

{
    unsigned len1, len2;
    jsstr_t *ret;
    WCHAR *ptr;
 
    len1 = jsstr_length(str1);
    if(!len1)
        return jsstr_addref(str2);
 
    len2 = jsstr_length(str2);
    if(!len2)
        return jsstr_addref(str1);
 
    if(len1 + len2 >= JSSTR_SHORT_STRING_LENGTH) {
        unsigned depth, depth2;
        jsstr_rope_t *rope;
 
        depth = jsstr_is_rope(str1) ? jsstr_as_rope(str1)->depth : 0;
        depth2 = jsstr_is_rope(str2) ? jsstr_as_rope(str2)->depth : 0;
        if(depth2 > depth)
            depth = depth2;
 
        if(depth++ < JSSTR_MAX_ROPE_DEPTH) {
            if(len1+len2 > JSSTR_MAX_LENGTH)
                return NULL;
 
            rope = heap_alloc(sizeof(*rope));
            if(!rope)
                return NULL;
 
            jsstr_init(&rope->str, len1+len2, JSSTR_ROPE);
            rope->left = jsstr_addref(str1);
            rope->right = jsstr_addref(str2);
            rope->depth = depth;
            return &rope->str;
        }
    }
 
    ret = jsstr_alloc_buf(len1+len2, &ptr);
    if(!ret)
        return NULL;
 
    jsstr_flush(str1, ptr);
    jsstr_flush(str2, ptr+len1);
    return ret;
 
}

Referenced by add_eval(), and String_concat().

jsstr_empty()

jsstr_t * jsstr_empty

(

void

)

Definition at line 288 of file jsstr.c.

{
    return jsstr_addref(empty_str);
}

Referenced by array_join(), create_match_array(), create_string_constr(), error_constr(), JScriptParse_InitNew(), RegExp_exec(), rep_call(), run_exec(), String_charAt(), and StringConstr_value().

jsstr_extract()

void jsstr_extract	(	jsstr_t *	str,
		unsigned	off,
		unsigned	len,
		WCHAR *	buf
	)

Definition at line 113 of file jsstr.c.

{
    switch(jsstr_tag(str)) {
    case JSSTR_INLINE:
        memcpy(buf, jsstr_as_inline(str)->buf+off, len*sizeof(WCHAR));
        return;
    case JSSTR_HEAP:
        memcpy(buf, jsstr_as_heap(str)->buf+off, len*sizeof(WCHAR));
        return;
    case JSSTR_ROPE:
        jsstr_rope_extract(jsstr_as_rope(str), off, len, buf);
        return;
    }
}

Referenced by JSON_stringify(), jsstr_rope_extract(), jsstr_substr(), and String_charCodeAt().

jsstr_free()

void jsstr_free

(

jsstr_t *

str

)

Definition at line 44 of file jsstr.c.

{
    switch(jsstr_tag(str)) {
    case JSSTR_HEAP:
        heap_free(jsstr_as_heap(str)->buf);
        break;
    case JSSTR_ROPE: {
        jsstr_rope_t *rope = jsstr_as_rope(str);
        jsstr_release(rope->left);
        jsstr_release(rope->right);
        break;
    }
    case JSSTR_INLINE:
        break;
    }
 
    heap_free(str);
}

Referenced by jsstr_release().

jsstr_init()

static void jsstr_init ( jsstr_t *  str, unsigned  len, jsstr_tag_t  tag  )

inlinestatic

Definition at line 63 of file jsstr.c.

{
    str->length_flags = len << JSSTR_LENGTH_SHIFT | tag;
    str->ref = 1;
}

Referenced by jsstr_alloc_buf(), and jsstr_concat().

jsstr_nan()

jsstr_t * jsstr_nan

(

void

)

Definition at line 283 of file jsstr.c.

{
    return jsstr_addref(nan_str);
}

Referenced by create_utc_string(), date_to_string(), Date_toLocaleDateString(), Date_toLocaleString(), Date_toLocaleTimeString(), Date_toTimeString(), dateobj_to_date_string(), and double_to_string().

jsstr_null_bstr()

jsstr_t * jsstr_null_bstr

(

void

)

Definition at line 298 of file jsstr.c.

{
    return jsstr_addref(null_bstr_str);
}

Referenced by variant_to_jsval().

jsstr_rope_extract()

static void jsstr_rope_extract ( jsstr_rope_t *  str, unsigned  off, unsigned  len, WCHAR *  buf  )

static

Definition at line 98 of file jsstr.c.

{
    unsigned left_len = jsstr_length(str->left);
 
    if(left_len <= off) {
        jsstr_extract(str->right, off-left_len, len, buf);
    }else if(left_len >= len+off) {
        jsstr_extract(str->left, off, len, buf);
    }else {
        left_len -= off;
        jsstr_extract(str->left, off, left_len, buf);
        jsstr_extract(str->right, 0, len-left_len, buf+left_len);
    }
}

Referenced by jsstr_extract(), and ropes_cmp().

jsstr_rope_flatten()

const WCHAR * jsstr_rope_flatten

(

jsstr_rope_t *

str

)

Definition at line 262 of file jsstr.c.

{
    WCHAR *buf;
 
    buf = heap_alloc((jsstr_length(&str->str)+1) * sizeof(WCHAR));
    if(!buf)
        return NULL;
 
    jsstr_flush(str->left, buf);
    jsstr_flush(str->right, buf+jsstr_length(str->left));
    buf[jsstr_length(&str->str)] = 0;
 
    /* Trasform to heap string */
    jsstr_release(str->left);
    jsstr_release(str->right);
    str->str.length_flags |= JSSTR_FLAG_FLAT;
    return jsstr_as_heap(&str->str)->buf = buf;
}

Referenced by jsstr_flatten().

jsstr_try_flat()

static const WCHAR * jsstr_try_flat ( jsstr_t *  str )

inlinestatic

Definition at line 182 of file jsstr.c.

{
    return jsstr_is_inline(str) ? jsstr_as_inline(str)->buf
        : jsstr_is_heap(str) ? jsstr_as_heap(str)->buf
        : NULL;
}

Referenced by jsstr_cmp().

jsstr_undefined()

jsstr_t * jsstr_undefined

(

void

)

Definition at line 293 of file jsstr.c.

{
    return jsstr_addref(undefined_str);
}

Referenced by do_attribute_tag_format(), interp_typeofid(), interp_typeofident(), JSGlobal_decodeURI(), JSGlobal_decodeURIComponent(), JSGlobal_encodeURI(), JSGlobal_encodeURIComponent(), JSGlobal_escape(), JSGlobal_unescape(), RegExp_test(), and to_string().

ropes_cmp()

static int ropes_cmp ( jsstr_rope_t *  left, jsstr_rope_t *  right  )

static

Definition at line 156 of file jsstr.c.

{
    WCHAR left_buf[TMP_BUF_SIZE], right_buf[TMP_BUF_SIZE];
    unsigned left_len = jsstr_length(&left->str);
    unsigned right_len = jsstr_length(&right->str);
    unsigned cmp_off = 0, cmp_size;
    int ret;
 
    /* FIXME: We can avoid temporary buffers here. */
    while(cmp_off < min(left_len, right_len)) {
        cmp_size = min(left_len, right_len) - cmp_off;
        if(cmp_size > TMP_BUF_SIZE)
            cmp_size = TMP_BUF_SIZE;
 
        jsstr_rope_extract(left, cmp_off, cmp_size, left_buf);
        jsstr_rope_extract(right, cmp_off, cmp_size, right_buf);
        ret = memcmp(left_buf, right_buf, cmp_size);
        if(ret)
            return ret;
 
        cmp_off += cmp_size;
    }
 
    return left_len - right_len;
}

Referenced by jsstr_cmp().

Variable Documentation

empty_str

jsstr_t* empty_str

static

Definition at line 281 of file jsstr.c.

Referenced by free_strings(), init_strings(), and jsstr_empty().

nan_str

jsstr_t * nan_str

static

Definition at line 281 of file jsstr.c.

Referenced by free_strings(), init_strings(), and jsstr_nan().

null_bstr_str

jsstr_t * null_bstr_str

static

Definition at line 281 of file jsstr.c.

Referenced by free_strings(), init_strings(), is_null_bstr(), and jsstr_null_bstr().

undefined_str

jsstr_t * undefined_str

static

Definition at line 281 of file jsstr.c.

Referenced by free_strings(), init_strings(), and jsstr_undefined().