2 * Copyright (C) 2006 Apple Computer, Inc. All rights reserved.
3 * Copyright (C) 2007 Alp Toker <alp@atoker.com>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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.
27 #include "JSContextRef.h"
29 #include "JSObjectRef.h"
30 #include "JSStringRef.h"
33 #include <wtf/Assertions.h>
34 #include <wtf/UnusedParam.h>
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);
39 int main(int argc, char* argv[])
41 const char *scriptPath = "minidom.js";
46 JSGlobalContextRef context = JSGlobalContextCreateInGroup(NULL, NULL);
47 JSObjectRef globalObject = JSContextGetGlobalObject(context);
49 JSStringRef printIString = JSStringCreateWithUTF8CString("print");
50 JSObjectSetProperty(context, globalObject, printIString, JSObjectMakeFunctionWithCallback(context, printIString, print), kJSPropertyAttributeNone, NULL);
51 JSStringRelease(printIString);
53 JSStringRef node = JSStringCreateWithUTF8CString("Node");
54 JSObjectSetProperty(context, globalObject, node, JSObjectMakeConstructor(context, JSNode_class(context), JSNode_construct), kJSPropertyAttributeNone, NULL);
55 JSStringRelease(node);
57 char* scriptUTF8 = createStringWithContentsOfFile(scriptPath);
58 JSStringRef script = JSStringCreateWithUTF8CString(scriptUTF8);
60 JSValueRef result = JSEvaluateScript(context, script, NULL, NULL, 1, &exception);
62 printf("PASS: Test script executed successfully.\n");
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);
71 JSStringRelease(exceptionIString);
73 JSStringRelease(script);
77 JSGlobalContextRelease(context);
78 printf("PASS: Program exited normally.\n");
82 static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception)
85 UNUSED_PARAM(thisObject);
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);
95 return JSValueMakeUndefined(context);
98 static char* createStringWithContentsOfFile(const char* fileName)
102 size_t buffer_size = 0;
103 size_t buffer_capacity = 1024;
104 buffer = (char*)malloc(buffer_capacity);
106 FILE* f = fopen(fileName, "r");
108 fprintf(stderr, "Could not open file: %s\n", fileName);
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);
120 ASSERT(buffer_size < buffer_capacity);
123 buffer[buffer_size] = '\0';