view graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/SLScript.java @ 14094:3f27e57439ed

Truffle/Instrumentation: significant rearrangement (including moved class) and extension of the Truffle Instrumentation Framework. New interfaces include DebugContext (which can be attached to the ExecutionContext), through which access is provided to possibly language-specific (a) node instrumentation, (b) debug services manager, (c) notification when programs halt, (d) display of language values, and (e) display of variable identifiers.
author Michael Van De Vanter <michael.van.de.vanter@oracle.com>
date Mon, 03 Feb 2014 20:58:23 -0800
parents 69d2e4baa215
children
line wrap: on
line source

/*
 * Copyright (c) 2012, 2014, Oracle and/or its affiliates. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 */
package com.oracle.truffle.sl;

import java.io.*;

import javax.script.*;

import com.oracle.truffle.api.*;
import com.oracle.truffle.sl.parser.*;
import com.oracle.truffle.sl.runtime.*;

public final class SLScript {

    private final SLContext context;
    private final CallTarget main;

    private SLScript(SLContext context, CallTarget mainFunction) {
        this.context = context;
        this.main = mainFunction;
    }

    public SLContext getContext() {
        return context;
    }

    public CallTarget getMain() {
        return main;
    }

    public Object run(Object... arguments) {
        return main.call(null, new SLArguments(arguments));
    }

    @Override
    public String toString() {
        return main.toString();
    }

    public static SLScript create(SLContext context, Source source) throws ScriptException {
        SLNodeFactory factory = new SLNodeFactory(context);
        Parser parser = new Parser(new Scanner(source.getInputStream()), factory);
        factory.setParser(parser);
        factory.setSource(source);
        String error = parser.ParseErrors();
        if (!error.isEmpty()) {
            throw new ScriptException(String.format("Error(s) parsing script: %s", error));
        }

        CallTarget main = context.getFunctionRegistry().lookup("main");
        if (main == null) {
            throw new ScriptException("No main function found.");
        }
        return new SLScript(context, main);
    }

    public static SLScript create(SLContext context, InputStream input) throws ScriptException {
        SLNodeFactory factory = new SLNodeFactory(context);
        Parser parser = new Parser(new Scanner(input), factory);
        factory.setParser(parser);
        factory.setSource(new Source() {
            public String getName() {
                return "Unknown";
            }

            public String getCode() {
                return null;
            }

            @Override
            public String getPath() {
                // TODO Auto-generated method stub
                return null;
            }

            @Override
            public Reader getReader() {
                // TODO Auto-generated method stub
                return null;
            }

            @Override
            public InputStream getInputStream() {
                // TODO Auto-generated method stub
                return null;
            }

            @Override
            public String getCode(int lineNumber) {
                // TODO Auto-generated method stub
                return null;
            }

            @Override
            public int getLineCount() {
                // TODO Auto-generated method stub
                return 0;
            }

            @Override
            public int getLineNumber(int offset) {
                // TODO Auto-generated method stub
                return 0;
            }

            @Override
            public int getLineStartOffset(int lineNumber) {
                // TODO Auto-generated method stub
                return 0;
            }

            @Override
            public int getLineLength(int lineNumber) {
                // TODO Auto-generated method stub
                return 0;
            }
        });
        String error = parser.ParseErrors();
        if (!error.isEmpty()) {
            throw new ScriptException(String.format("Error(s) parsing script: %s", error));
        }

        CallTarget main = context.getFunctionRegistry().lookup("main");
        if (main == null) {
            throw new ScriptException("No main function found.");
        }
        return new SLScript(context, main);
    }
}