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
36static char* createStringWithContentsOfFile(const char* fileName);
37static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception);
38
39int 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
82static 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
98static 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}
127