git.saurik.com Git - apple/javascriptcore.git/blame_incremental

... / ...

Commit	Line	Data
	1	// -- mode: c++; c-basic-offset: 4 --
	2	/*
	3	* Copyright (C) 2006, 2007 Apple Inc. All rights reserved.
	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 "config.h"
	28	#include "JSBase.h"
	29
	30	#include "APICast.h"
	31	#include <kjs/ExecState.h>
	32	#include <kjs/JSGlobalObject.h>
	33	#include <kjs/JSLock.h>
	34	#include <kjs/interpreter.h>
	35	#include <kjs/object.h>
	36
	37	using namespace KJS;
	38
	39	JSValueRef JSEvaluateScript(JSContextRef ctx, JSStringRef script, JSObjectRef thisObject, JSStringRef sourceURL, int startingLineNumber, JSValueRef* exception)
	40	{
	41	JSLock lock;
	42	ExecState* exec = toJS(ctx);
	43	JSObject* jsThisObject = toJS(thisObject);
	44	UString::Rep* scriptRep = toJS(script);
	45	UString::Rep* sourceURLRep = sourceURL ? toJS(sourceURL) : &UString::Rep::null;
	46	// Interpreter::evaluate sets "this" to the global object if it is NULL
	47	Completion completion = Interpreter::evaluate(exec->dynamicGlobalObject()->globalExec(), UString(sourceURLRep), startingLineNumber, UString(scriptRep), jsThisObject);
	48
	49	if (completion.complType() == Throw) {
	50	if (exception)
	51	*exception = toRef(completion.value());
	52	return 0;
	53	}
	54
	55	if (completion.value())
	56	return toRef(completion.value());
	57
	58	// happens, for example, when the only statement is an empty (';') statement
	59	return toRef(jsUndefined());
	60	}
	61
	62	bool JSCheckScriptSyntax(JSContextRef ctx, JSStringRef script, JSStringRef sourceURL, int startingLineNumber, JSValueRef* exception)
	63	{
	64	JSLock lock;
	65
	66	ExecState* exec = toJS(ctx);
	67	UString::Rep* scriptRep = toJS(script);
	68	UString::Rep* sourceURLRep = sourceURL ? toJS(sourceURL) : &UString::Rep::null;
	69	Completion completion = Interpreter::checkSyntax(exec->dynamicGlobalObject()->globalExec(), UString(sourceURLRep), startingLineNumber, UString(scriptRep));
	70	if (completion.complType() == Throw) {
	71	if (exception)
	72	*exception = toRef(completion.value());
	73	return false;
	74	}
	75
	76	return true;
	77	}
	78
	79	void JSGarbageCollect(JSContextRef)
	80	{
	81	JSLock lock;
	82	if (!Collector::isBusy())
	83	Collector::collect();
	84	// FIXME: Perhaps we should trigger a second mark and sweep
	85	// once the garbage collector is done if this is called when
	86	// the collector is busy.
	87	}