1/*
2 * Copyright (C) 2006 Apple 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 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 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 <wtf/Platform.h>
28
29#include "JSContextRef.h"
30#include "JSNode.h"
31#include "JSObjectRef.h"
32#include "JSStringRef.h"
33#include <stdio.h>
34#include <stdlib.h>
35#include <wtf/Assertions.h>
36
37static char* createStringWithContentsOfFile(const char* fileName);
38static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception);
39
40int main(int argc, char* argv[])
41{
42    const char *scriptPath = "minidom.js";
43    if (argc > 1) {
44        scriptPath = argv[1];
45    }
46
47    JSGlobalContextRef context = JSGlobalContextCreateInGroup(NULL, NULL);
48    JSObjectRef globalObject = JSContextGetGlobalObject(context);
49
50    JSStringRef printIString = JSStringCreateWithUTF8CString("print");
51    JSObjectSetProperty(context, globalObject, printIString, JSObjectMakeFunctionWithCallback(context, printIString, print), kJSPropertyAttributeNone, NULL);
52    JSStringRelease(printIString);
53
54    JSStringRef node = JSStringCreateWithUTF8CString("Node");
55    JSObjectSetProperty(context, globalObject, node, JSObjectMakeConstructor(context, JSNode_class(context), JSNode_construct), kJSPropertyAttributeNone, NULL);
56    JSStringRelease(node);
57
58    char* scriptUTF8 = createStringWithContentsOfFile(scriptPath);
59    JSStringRef script = JSStringCreateWithUTF8CString(scriptUTF8);
60    JSValueRef exception;
61    JSValueRef result = JSEvaluateScript(context, script, NULL, NULL, 1, &exception);
62    if (result)
63        printf("PASS: Test script executed successfully.\n");
64    else {
65        printf("FAIL: Test script threw exception:\n");
66        JSStringRef exceptionIString = JSValueToStringCopy(context, exception, NULL);
67        size_t exceptionUTF8Size = JSStringGetMaximumUTF8CStringSize(exceptionIString);
68        char* exceptionUTF8 = (char*)malloc(exceptionUTF8Size);
69        JSStringGetUTF8CString(exceptionIString, exceptionUTF8, exceptionUTF8Size);
70        printf("%s\n", exceptionUTF8);
71        free(exceptionUTF8);
72        JSStringRelease(exceptionIString);
73    }
74    JSStringRelease(script);
75    free(scriptUTF8);
76
77    globalObject = 0;
78    JSGlobalContextRelease(context);
79    printf("PASS: Program exited normally.\n");
80    return 0;
81}
82
83static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception)
84{
85    UNUSED_PARAM(object);
86    UNUSED_PARAM(thisObject);
87
88    if (argumentCount > 0) {
89        JSStringRef string = JSValueToStringCopy(context, arguments[0], exception);
90        size_t numChars = JSStringGetMaximumUTF8CStringSize(string);
91        char stringUTF8[numChars];
92        JSStringGetUTF8CString(string, stringUTF8, numChars);
93        printf("%s\n", stringUTF8);
94    }
95
96    return JSValueMakeUndefined(context);
97}
98
99static char* createStringWithContentsOfFile(const char* fileName)
100{
101    char* buffer;
102
103    size_t buffer_size = 0;
104    size_t buffer_capacity = 1024;
105    buffer = (char*)malloc(buffer_capacity);
106
107    FILE* f = fopen(fileName, "r");
108    if (!f) {
109        fprintf(stderr, "Could not open file: %s\n", fileName);
110        free(buffer);
111        return 0;
112    }
113
114    while (!feof(f) && !ferror(f)) {
115        buffer_size += fread(buffer + buffer_size, 1, buffer_capacity - buffer_size, f);
116        if (buffer_size == buffer_capacity) { /* guarantees space for trailing '\0' */
117            buffer_capacity *= 2;
118            buffer = (char*)realloc(buffer, buffer_capacity);
119            ASSERT(buffer);
120        }
121
122        ASSERT(buffer_size < buffer_capacity);
123    }
124    fclose(f);
125    buffer[buffer_size] = '\0';
126
127    return buffer;
128}
129