truffle: graal/com.oracle.truffle.api/src/com/oracle/truffle/api/vm/TruffleVM.java annotate

annotate graal/com.oracle.truffle.api/src/com/oracle/truffle/api/vm/TruffleVM.java @ 21490:3286fb5fea4a

Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop.

author	Jaroslav Tulach <jaroslav.tulach@oracle.com>
date	Tue, 26 May 2015 19:11:36 +0200
parents	bb51b9a142b3
children	31fc2fce38f3

rev	line source
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	1 /*
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	2 * Copyright (c) 2014, Oracle and/or its affiliates. All rights reserved.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	4 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	5 * This code is free software; you can redistribute it and/or modify it
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	6 * under the terms of the GNU General Public License version 2 only, as
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	7 * published by the Free Software Foundation. Oracle designates this
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	8 * particular file as subject to the "Classpath" exception as provided
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	9 * by Oracle in the LICENSE file that accompanied this code.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	10 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	11 * This code is distributed in the hope that it will be useful, but WITHOUT
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	14 * version 2 for more details (a copy is included in the LICENSE file that
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	15 * accompanied this code).
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	16 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	17 * You should have received a copy of the GNU General Public License version
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	18 * 2 along with this work; if not, write to the Free Software Foundation,
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	20 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	22 * or visit www.oracle.com if you need additional information or have any
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	23 * questions.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	24 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	25 package com.oracle.truffle.api.vm;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	26
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	27 import com.oracle.truffle.api.TruffleLanguage;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	28 import com.oracle.truffle.api.TruffleLanguage.Registration;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	29 import com.oracle.truffle.api.TruffleLanguage.Env;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	30 import com.oracle.truffle.api.impl.Accessor;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	31 import com.oracle.truffle.api.source.Source;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	32 import java.io.File;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	33 import java.io.IOException;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	34 import java.io.InputStream;
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	35 import java.io.InputStreamReader;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	36 import java.io.OutputStreamWriter;
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	37 import java.io.Reader;
21481 bb51b9a142b3 Enforcing public, one parameter constructor for each TruffleLanguage by annotation processor and required call to super. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21478 diff changeset	38 import java.lang.reflect.Constructor;
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	39 import java.io.Writer;
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	40 import java.net.URI;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	41 import java.net.URL;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	42 import java.net.URLConnection;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	43 import java.nio.file.Files;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	44 import java.util.ArrayList;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	45 import java.util.Arrays;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	46 import java.util.Collections;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	47 import java.util.Enumeration;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	48 import java.util.HashMap;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	49 import java.util.LinkedHashSet;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	50 import java.util.List;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	51 import java.util.Map;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	52 import java.util.Properties;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	53 import java.util.Set;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	54 import java.util.TreeSet;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	55 import java.util.logging.Level;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	56 import java.util.logging.Logger;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	57
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	58 /**
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	59 * Virtual machine for Truffle based languages. Use {@link #newVM()} to create new isolated virtual
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	60 * machine ready for execution of various languages. All the languages in a single virtual machine
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	61 * see each other exported global symbols and can co-operate. Use {@link #newVM()} multiple times to
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	62 * create different, isolated virtual machines completely separated from each other.
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	63 * <p>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	64 * Once instantiated use {@link #eval(java.net.URI)} with a reference to a file or URL or directly
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	65 * pass code snippet into the virtual machine via {@link #eval(java.lang.String, java.lang.String)}.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	66 * Support for individual languages is initialized on demand - e.g. once a file of certain mime type
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	67 * is about to be processed, its appropriate engine (if found), is initialized. Once an engine gets
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	68 * initialized, it remains so, until the virtual machine isn't garbage collected.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	69 * <p>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	70 * The <code>TruffleVM</code> is single-threaded and tries to enforce that. It records the thread it
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	71 * has been {@link Builder#build() created} by and checks that all subsequent calls are coming from
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	72 * the same thread.
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	73 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	74 public final class TruffleVM {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	75 private static final Logger LOG = Logger.getLogger(TruffleVM.class.getName());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	76 private static final SPIAccessor SPI = new SPIAccessor();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	77 private final Thread initThread;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	78 private final Map<String, Language> langs;
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	79 private final Reader in;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	80 private final Writer err;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	81 private final Writer out;
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	82
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	83 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	84 * Private & temporary only constructor.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	85 */
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	86 private TruffleVM() {
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	87 this.initThread = null;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	88 this.in = null;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	89 this.err = null;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	90 this.out = null;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	91 this.langs = null;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	92 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	93
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	94 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	95 * Real constructor used from the builder.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	96 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	97 * @param out stdout
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	98 * @param err stderr
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	99 * @param in stdin
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	100 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	101 private TruffleVM(Writer out, Writer err, Reader in) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	102 this.out = out;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	103 this.err = err;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	104 this.in = in;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	105 this.initThread = Thread.currentThread();
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	106 this.langs = new HashMap<>();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	107 Enumeration<URL> en;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	108 try {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	109 en = loader().getResources("META-INF/truffle/language");
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	110 } catch (IOException ex) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	111 throw new IllegalStateException("Cannot read list of Truffle languages", ex);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	112 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	113 while (en.hasMoreElements()) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	114 URL u = en.nextElement();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	115 Properties p;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	116 try {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	117 p = new Properties();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	118 try (InputStream is = u.openStream()) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	119 p.load(is);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	120 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	121 } catch (IOException ex) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	122 LOG.log(Level.CONFIG, "Cannot process " + u + " as language definition", ex);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	123 continue;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	124 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	125 Language l = new Language(p);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	126 for (String mimeType : l.getMimeTypes()) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	127 langs.put(mimeType, l);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	128 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	129 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	130 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	131
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	132 static ClassLoader loader() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	133 ClassLoader l = TruffleVM.class.getClassLoader();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	134 if (l == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	135 l = ClassLoader.getSystemClassLoader();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	136 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	137 return l;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	138 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	139
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	140 /**
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	141 * Creation of new Truffle virtual machine. Use the {@link Builder} methods to configure your
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	142 * virtual machine and then create one using {@link Builder#build()}:
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	143 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	144 * <pre>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	145 * {@link TruffleVM} vm = {@link TruffleVM}.{@link TruffleVM#newVM() newVM()}
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	146 * .{@link Builder#stdOut(java.io.Writer) stdOut}({@link Writer yourWriter})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	147 * .{@link Builder#stdErr(java.io.Writer) stdErr}({@link Writer yourWriter})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	148 * .{@link Builder#stdIn(java.io.Reader) stdIn}({@link Reader yourReader})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	149 * .{@link Builder#build() build()};
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	150 * </pre>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	151 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	152 * It searches for {@link Registration languages registered} in the system class loader and
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	153 * makes them available for later evaluation via
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	154 * {@link #eval(java.lang.String, java.lang.String)} methods.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	155 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	156 * @return new, isolated virtual machine with pre-registered languages
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	157 */
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	158 public static TruffleVM.Builder newVM() {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	159 // making Builder non-static inner class is a
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	160 // nasty trick to avoid the Builder class to appear
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	161 // in Javadoc next to TruffleVM class
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	162 TruffleVM vm = new TruffleVM();
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	163 return vm.new Builder();
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	164 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	165
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	166 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	167 * Builder for a new {@link TruffleVM}. Call various configuration methods in a chain and at the
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	168 * end create new {@link TruffleVM virtual machine}:
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	169 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	170 * <pre>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	171 * {@link TruffleVM} vm = {@link TruffleVM}.{@link TruffleVM#newVM() newVM()}
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	172 * .{@link Builder#stdOut(java.io.Writer) stdOut}({@link Writer yourWriter})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	173 * .{@link Builder#stdErr(java.io.Writer) stdErr}({@link Writer yourWriter})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	174 * .{@link Builder#stdIn(java.io.Reader) stdIn}({@link Reader yourReader})
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	175 * .{@link Builder#build() build()};
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	176 * </pre>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	177 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	178 public final class Builder {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	179 private Writer out;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	180 private Writer err;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	181 private Reader in;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	182
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	183 Builder() {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	184 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	185
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	186 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	187 * Changes the defaut output for languages running in <em>to be created</em>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	188 * {@link TruffleVM virtual machine}. The default is to use {@link System#out}.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	189 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	190 * @param w the writer to use as output
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	191 * @return instance of this builder
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	192 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	193 public Builder stdOut(Writer w) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	194 out = w;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	195 return this;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	196 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	197
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	198 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	199 * Changes the error output for languages running in <em>to be created</em>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	200 * {@link TruffleVM virtual machine}. The default is to use {@link System#err}.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	201 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	202 * @param w the writer to use as output
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	203 * @return instance of this builder
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	204 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	205 public Builder stdErr(Writer w) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	206 err = w;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	207 return this;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	208 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	209
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	210 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	211 * Changes the defaut input for languages running in <em>to be created</em>
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	212 * {@link TruffleVM virtual machine}. The default is to use {@link System#out}.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	213 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	214 * @param r the reader to use as input
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	215 * @return instance of this builder
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	216 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	217 public Builder stdIn(Reader r) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	218 in = r;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	219 return this;
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	220 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	221
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	222 /**
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	223 * Creates the {@link TruffleVM Truffle virtual machine}. The configuration is taken from
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	224 * values passed into configuration methods in this class.
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	225 *
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	226 * @return new, isolated virtual machine with pre-registered languages
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	227 */
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	228 public TruffleVM build() {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	229 if (out == null) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	230 out = new OutputStreamWriter(System.out);
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	231 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	232 if (err == null) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	233 err = new OutputStreamWriter(System.err);
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	234 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	235 if (in == null) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	236 in = new InputStreamReader(System.in);
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	237 }
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	238 return new TruffleVM(out, err, in);
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	239 }
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	240 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	241
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	242 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	243 * Descriptions of languages supported in this Truffle virtual machine.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	244 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	245 * @return an immutable map with keys being mimetypes and values the {@link Language
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	246 * descriptions} of associated languages
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	247 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	248 public Map<String, Language> getLanguages() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	249 return Collections.unmodifiableMap(langs);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	250 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	251
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	252 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	253 * Evaluates file located on a given URL. Is equivalent to loading the content of a file and
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	254 * executing it via {@link #eval(java.lang.String, java.lang.String)} with a mime type guess
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	255 * based on the file's extension and/or content.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	256 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	257 * @param location the location of a file to execute
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	258 * @return result of a processing the file, possibly <code>null</code>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	259 * @throws IOException exception to signal I/O problems or problems with processing the file's
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	260 * content
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	261 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	262 public Object eval(URI location) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	263 checkThread();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	264 Source s;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	265 String mimeType;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	266 if (location.getScheme().equals("file")) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	267 File file = new File(location);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	268 s = Source.fromFileName(file.getPath(), true);
21478 2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	269 if (file.getName().endsWith(".c")) {
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	270 mimeType = "text/x-c";
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	271 } else if (file.getName().endsWith(".sl")) {
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	272 mimeType = "application/x-sl";
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	273 } else {
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	274 mimeType = Files.probeContentType(file.toPath());
2dad34a3d7b0 Hardcoding .sl mimetype for now. Should have an API so language implementations can declare their own supported mime types. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21468 diff changeset	275 }
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	276 } else {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	277 URL url = location.toURL();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	278 s = Source.fromURL(url, location.toString());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	279 URLConnection conn = url.openConnection();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	280 mimeType = conn.getContentType();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	281 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	282 TruffleLanguage l = getTruffleLang(mimeType);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	283 if (l == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	284 throw new IOException("No language for " + location + " with mime type " + mimeType + " found. Supported types: " + langs.keySet());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	285 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	286 return SPI.eval(l, s);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	287 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	288
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	289 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	290 * Evaluates code snippet. Chooses a language registered for a given mime type (throws
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	291 * {@link IOException} if there is none). And passes the specified code to it for execution.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	292 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	293 * @param mimeType mime type of the code snippet - chooses the right language
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	294 * @param reader the source of code snippet to execute
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	295 * @return result of an exceution, possibly <code>null</code>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	296 * @throws IOException thrown to signal errors while processing the code
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	297 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	298 public Object eval(String mimeType, Reader reader) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	299 checkThread();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	300 TruffleLanguage l = getTruffleLang(mimeType);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	301 if (l == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	302 throw new IOException("No language for mime type " + mimeType + " found. Supported types: " + langs.keySet());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	303 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	304 return SPI.eval(l, Source.fromReader(reader, mimeType));
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	305 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	306
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	307 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	308 * Evaluates code snippet. Chooses a language registered for a given mime type (throws
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	309 * {@link IOException} if there is none). And passes the specified code to it for execution.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	310 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	311 * @param mimeType mime type of the code snippet - chooses the right language
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	312 * @param code the code snippet to execute
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	313 * @return result of an exceution, possibly <code>null</code>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	314 * @throws IOException thrown to signal errors while processing the code
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	315 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	316 public Object eval(String mimeType, String code) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	317 checkThread();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	318 TruffleLanguage l = getTruffleLang(mimeType);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	319 if (l == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	320 throw new IOException("No language for mime type " + mimeType + " found. Supported types: " + langs.keySet());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	321 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	322 return SPI.eval(l, Source.fromText(code, mimeType));
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	323 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	324
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	325 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	326 * Looks global symbol provided by one of initialized languages up. First of all execute your
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	327 * program via one of your {@link #eval(java.lang.String, java.lang.String)} and then look
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	328 * expected symbol up using this method.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	329 * <p>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	330 * The names of the symbols are language dependant, but for example the Java language bindings
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	331 * follow the specification for method references:
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	332 * <ul>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	333 * <li>"java.lang.Exception::new" is a reference to constructor of {@link Exception}
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	334 * <li>"java.lang.Integer::valueOf" is a reference to static method in {@link Integer} class
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	335 * </ul>
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	336 * Once an symbol is obtained, it remembers values for fast acces and is ready for being
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	337 * invoked.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	338 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	339 * @param globalName the name of the symbol to find
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	340 * @return found symbol or <code>null</code> if it has not been found
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	341 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	342 public Symbol findGlobalSymbol(String globalName) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	343 checkThread();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	344 Object obj = null;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	345 Object global = null;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	346 for (Language dl : langs.values()) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	347 TruffleLanguage l = dl.getImpl();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	348 obj = SPI.findExportedSymbol(l, globalName);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	349 if (obj != null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	350 global = SPI.languageGlobal(l);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	351 break;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	352 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	353 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	354 return obj == null ? null : new Symbol(obj, global);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	355 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	356
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	357 private void checkThread() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	358 if (initThread != Thread.currentThread()) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	359 throw new IllegalStateException("TruffleVM created on " + initThread.getName() + " but used on " + Thread.currentThread().getName());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	360 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	361 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	362
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	363 private TruffleLanguage getTruffleLang(String mimeType) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	364 checkThread();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	365 Language l = langs.get(mimeType);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	366 return l == null ? null : l.getImpl();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	367 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	368
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	369 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	370 * Represents {@link TruffleVM#findGlobalSymbol(java.lang.String) global symbol} provided by one
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	371 * of the initialized languages in {@link TruffleVM Truffle virtual machine}.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	372 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	373 public class Symbol {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	374 private final Object obj;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	375 private final Object global;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	376
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	377 Symbol(Object obj, Object global) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	378 this.obj = obj;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	379 this.global = global;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	380 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	381
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	382 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	383 * Invokes the symbol. If the symbol represents a function, then it should be invoked with
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	384 * provided arguments. If the symbol represents a field, then first argument (if provided)
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	385 * should set the value to the field; the return value should be the actual value of the
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	386 * field when the <code>invoke</code> method returns.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	387 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	388 * @param thiz this/self in language that support such concept; use <code>null</code> to let
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	389 * the language use default this/self or ignore the value
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	390 * @param args arguments to pass when invoking the symbol
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	391 * @return the value returned by invoking the symbol
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	392 * @throws IOException signals problem during execution
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	393 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	394 public Object invoke(Object thiz, Object... args) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	395 List<Object> arr = new ArrayList<>();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	396 if (thiz == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	397 if (global != null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	398 arr.add(global);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	399 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	400 } else {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	401 arr.add(thiz);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	402 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	403 arr.addAll(Arrays.asList(args));
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	404 return SPI.invoke(obj, arr.toArray());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	405 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	406 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	407
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	408 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	409 * Description of a language registered in {@link TruffleVM Truffle virtual machine}. Languages
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	410 * are registered by {@link Registration} annotation which stores necessary information into a
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	411 * descriptor inside of the language's JAR file. When a new {@link TruffleVM} is created, it
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	412 * reads all available descritors and creates {@link Language} objects to represent them. One
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	413 * can obtain a {@link #getName() name} or list of supported {@link #getMimeTypes() mimetypes}
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	414 * for each language. The actual language implementation is not initialized until
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	415 * {@link TruffleVM#eval(java.lang.String, java.lang.String) a code is evaluated} in it.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	416 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	417 public final class Language {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	418 private final Properties props;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	419 private TruffleLanguage impl;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	420
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	421 Language(Properties props) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	422 this.props = props;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	423 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	424
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	425 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	426 * Mimetypes recognized by the language.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	427 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	428 * @return returns immutable set of recognized mimetypes
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	429 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	430 public Set<String> getMimeTypes() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	431 TreeSet<String> ts = new TreeSet<>();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	432 for (int i = 0;; i++) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	433 String mt = props.getProperty("mimeType." + i);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	434 if (mt == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	435 break;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	436 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	437 ts.add(mt);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	438 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	439 return Collections.unmodifiableSet(ts);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	440 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	441
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	442 /**
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	443 * Human readable name of the language. Think of C, Ruby, JS, etc.
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	444 *
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	445 * @return string giving the language a name
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	446 */
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	447 public String getName() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	448 return props.getProperty("name");
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	449 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	450
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	451 TruffleLanguage getImpl() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	452 if (impl == null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	453 String n = props.getProperty("className");
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	454 try {
21481 bb51b9a142b3 Enforcing public, one parameter constructor for each TruffleLanguage by annotation processor and required call to super. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21478 diff changeset	455 Class<?> langClazz = Class.forName(n, true, loader());
bb51b9a142b3 Enforcing public, one parameter constructor for each TruffleLanguage by annotation processor and required call to super. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21478 diff changeset	456 Constructor<?> constructor = langClazz.getConstructor(Env.class);
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	457 impl = SPI.attachEnv(TruffleVM.this, constructor, out, err, in);
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	458 } catch (Exception ex) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	459 throw new IllegalStateException("Cannot initialize " + getName() + " language with implementation " + n, ex);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	460 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	461 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	462 return impl;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	463 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	464
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	465 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	466 public String toString() {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	467 return "[" + getName() + " for " + getMimeTypes() + "]";
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	468 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	469 } // end of Language
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	470
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	471 private static class SPIAccessor extends Accessor {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	472 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	473 public Object importSymbol(TruffleVM vm, TruffleLanguage ownLang, String globalName) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	474 Set<Language> uniqueLang = new LinkedHashSet<>(vm.langs.values());
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	475 for (Language dl : uniqueLang) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	476 TruffleLanguage l = dl.getImpl();
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	477 if (l == ownLang) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	478 continue;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	479 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	480 Object obj = SPI.findExportedSymbol(l, globalName);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	481 if (obj != null) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	482 return obj;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	483 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	484 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	485 return null;
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	486 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	487
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	488 @Override
21490 3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	489 public TruffleLanguage attachEnv(TruffleVM vm, Constructor<?> langClazz, Writer stdOut, Writer stdErr, Reader stdIn) {
3286fb5fea4a Introducing standard I/O and error into Env and using TruffleVM to execute SL test cases. Adding SLTckTest to verify SL language interop. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: 21481 diff changeset	490 return super.attachEnv(vm, langClazz, stdOut, stdErr, stdIn);
21468 99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	491 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	492
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	493 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	494 public Object eval(TruffleLanguage l, Source s) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	495 return super.eval(l, s);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	496 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	497
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	498 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	499 public Object findExportedSymbol(TruffleLanguage l, String globalName) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	500 return super.findExportedSymbol(l, globalName);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	501 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	502
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	503 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	504 public Object languageGlobal(TruffleLanguage l) {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	505 return super.languageGlobal(l);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	506 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	507
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	508 @Override
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	509 public Object invoke(Object obj, Object[] args) throws IOException {
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	510 return super.invoke(obj, args);
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	511 }
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	512 } // end of SPIAccessor
99942eac9c6d Introducing TruffleVM - a central place to invoke code in any registered TruffleLanguage. Jaroslav Tulach <jaroslav.tulach@oracle.com> parents: diff changeset	513 }

Mercurial > hg > truffle

annotate graal/com.oracle.truffle.api/src/com/oracle/truffle/api/vm/TruffleVM.java @ 21490:3286fb5fea4a