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
  35 static char* createStringWithContentsOfFile(const char* fileName);
  36 static JSValueRef print(JSContextRef context, JSObjectRef object, JSObjectRef thisObject, size_t argumentCount, const JSValueRef arguments[], JSValueRef* exception);
  37
  38 int 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
  81 static 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
  97 static 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         return 0;
 109     }
 110
 111     while (!feof(f) && !ferror(f)) {
 112         buffer_size += fread(buffer + buffer_size, 1, buffer_capacity - buffer_size, f);
 113         if (buffer_size == buffer_capacity) { /* guarantees space for trailing '\0' */
 114             buffer_capacity *= 2;
 115             buffer = (char*)realloc(buffer, buffer_capacity);
 116             ASSERT(buffer);
 117         }
 118
 119         ASSERT(buffer_size < buffer_capacity);
 120     }
 121     fclose(f);
 122     buffer[buffer_size] = '\0';
 123
 124     return buffer;
 125 }