initial import
[vuplus_webkit] / Source / JavaScriptCore / API / tests / minidom.c
1 /*
2  * Copyright (C) 2006 Apple Computer, Inc.  All rights reserved.
3  * Copyright (C) 2007 Alp Toker <alp@atoker.com>
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
15  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
17  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
18  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
19  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
20  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
21  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
22  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
24  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
25  */
26
27 #include "JSContextRef.h"
28 #include "JSNode.h"
29 #include "JSObjectRef.h"
30 #include "JSStringRef.h"
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <wtf/Assertions.h>
34 #include <wtf/UnusedParam.h>
35
36 static char* createStringWithContentsOfFile(const char* fileName);
37 static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception);
38
39 int main(int argc, char* argv[])
40 {
41     const char *scriptPath = "minidom.js";
42     if (argc > 1) {
43         scriptPath = argv[1];
44     }
45     
46     JSGlobalContextRef context = JSGlobalContextCreateInGroup(NULL, NULL);
47     JSObjectRef globalObject = JSContextGetGlobalObject(context);
48     
49     JSStringRef printIString = JSStringCreateWithUTF8CString("print");
50     JSObjectSetProperty(context, globalObject, printIString, JSObjectMakeFunctionWithCallback(context, printIString, print), kJSPropertyAttributeNone, NULL);
51     JSStringRelease(printIString);
52     
53     JSStringRef node = JSStringCreateWithUTF8CString("Node");
54     JSObjectSetProperty(context, globalObject, node, JSObjectMakeConstructor(context, JSNode_class(context), JSNode_construct), kJSPropertyAttributeNone, NULL);
55     JSStringRelease(node);
56     
57     char* scriptUTF8 = createStringWithContentsOfFile(scriptPath);
58     JSStringRef script = JSStringCreateWithUTF8CString(scriptUTF8);
59     JSValueRef exception;
60     JSValueRef result = JSEvaluateScript(context, script, NULL, NULL, 1, &exception);
61     if (result)
62         printf("PASS: Test script executed successfully.\n");
63     else {
64         printf("FAIL: Test script threw exception:\n");
65         JSStringRef exceptionIString = JSValueToStringCopy(context, exception, NULL);
66         size_t exceptionUTF8Size = JSStringGetMaximumUTF8CStringSize(exceptionIString);
67         char* exceptionUTF8 = (char*)malloc(exceptionUTF8Size);
68         JSStringGetUTF8CString(exceptionIString, exceptionUTF8, exceptionUTF8Size);
69         printf("%s\n", exceptionUTF8);
70         free(exceptionUTF8);
71         JSStringRelease(exceptionIString);
72     }
73     JSStringRelease(script);
74     free(scriptUTF8);
75
76     globalObject = 0;
77     JSGlobalContextRelease(context);
78     printf("PASS: Program exited normally.\n");
79     return 0;
80 }
81
82 static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception)
83 {
84     UNUSED_PARAM(object);
85     UNUSED_PARAM(thisObject);
86
87     if (argumentCount > 0) {
88         JSStringRef string = JSValueToStringCopy(context, arguments[0], exception);
89         size_t numChars = JSStringGetMaximumUTF8CStringSize(string);
90         char stringUTF8[numChars];
91         JSStringGetUTF8CString(string, stringUTF8, numChars);
92         printf("%s\n", stringUTF8);
93     }
94     
95     return JSValueMakeUndefined(context);
96 }
97
98 static char* createStringWithContentsOfFile(const char* fileName)
99 {
100     char* buffer;
101     
102     size_t buffer_size = 0;
103     size_t buffer_capacity = 1024;
104     buffer = (char*)malloc(buffer_capacity);
105     
106     FILE* f = fopen(fileName, "r");
107     if (!f) {
108         fprintf(stderr, "Could not open file: %s\n", fileName);
109         return 0;
110     }
111     
112     while (!feof(f) && !ferror(f)) {
113         buffer_size += fread(buffer + buffer_size, 1, buffer_capacity - buffer_size, f);
114         if (buffer_size == buffer_capacity) { /* guarantees space for trailing '\0' */
115             buffer_capacity *= 2;
116             buffer = (char*)realloc(buffer, buffer_capacity);
117             ASSERT(buffer);
118         }
119         
120         ASSERT(buffer_size < buffer_capacity);
121     }
122     fclose(f);
123     buffer[buffer_size] = '\0';
124     
125     return buffer;
126 }