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
35static char* createStringWithContentsOfFile(const char* fileName);
36static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception);
37
38int main(int argc, char* argv[])
39{
40    const char *scriptPath = "minidom.js";
41    if (argc > 1) {
42        scriptPath = argv[1];
43    }
44
45    JSGlobalContextRef context = JSGlobalContextCreateInGroup(NULL, NULL);
46    JSObjectRef globalObject = JSContextGetGlobalObject(context);
47
48    JSStringRef printIString = JSStringCreateWithUTF8CString("print");
49    JSObjectSetProperty(context, globalObject, printIString, JSObjectMakeFunctionWithCallback(context, printIString, print), kJSPropertyAttributeNone, NULL);
50    JSStringRelease(printIString);
51
52    JSStringRef node = JSStringCreateWithUTF8CString("Node");
53    JSObjectSetProperty(context, globalObject, node, JSObjectMakeConstructor(context, JSNode_class(context), JSNode_construct), kJSPropertyAttributeNone, NULL);
54    JSStringRelease(node);
55
56    char* scriptUTF8 = createStringWithContentsOfFile(scriptPath);
57    JSStringRef script = JSStringCreateWithUTF8CString(scriptUTF8);
58    JSValueRef exception;
59    JSValueRef result = JSEvaluateScript(context, script, NULL, NULL, 1, &exception);
60    if (result)
61        printf("PASS: Test script executed successfully.\n");
62    else {
63        printf("FAIL: Test script threw exception:\n");
64        JSStringRef exceptionIString = JSValueToStringCopy(context, exception, NULL);
65        size_t exceptionUTF8Size = JSStringGetMaximumUTF8CStringSize(exceptionIString);
66        char* exceptionUTF8 = (char*)malloc(exceptionUTF8Size);
67        JSStringGetUTF8CString(exceptionIString, exceptionUTF8, exceptionUTF8Size);
68        printf("%s\n", exceptionUTF8);
69        free(exceptionUTF8);
70        JSStringRelease(exceptionIString);
71    }
72    JSStringRelease(script);
73    free(scriptUTF8);
74
75    globalObject = 0;
76    JSGlobalContextRelease(context);
77    printf("PASS: Program exited normally.\n");
78    return 0;
79}
80
81static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception)
82{
83    UNUSED_PARAM(object);
84    UNUSED_PARAM(thisObject);
85
86    if (argumentCount > 0) {
87        JSStringRef string = JSValueToStringCopy(context, arguments[0], exception);
88        size_t numChars = JSStringGetMaximumUTF8CStringSize(string);
89        char stringUTF8[numChars];
90        JSStringGetUTF8CString(string, stringUTF8, numChars);
91        printf("%s\n", stringUTF8);
92    }
93
94    return JSValueMakeUndefined(context);
95}
96
97static char* createStringWithContentsOfFile(const char* fileName)
98{
99    char* buffer;
100
101    size_t buffer_size = 0;
102    size_t buffer_capacity = 1024;
103    buffer = (char*)malloc(buffer_capacity);
104
105    FILE* f = fopen(fileName, "r");
106    if (!f) {
107        fprintf(stderr, "Could not open file: %s\n", fileName);
108        free(buffer);
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}
127