/**

 * Back 2 Browser Bytecode Translator

 * Copyright (C) 2012-2015 Jaroslav Tulach <jaroslav.tulach@apidesign.org>

 *

 * This program is free software: you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation, version 2 of the License.

 *

 * This program is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 * GNU General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program. Look for COPYING file in the top folder.

 * If not, see http://opensource.org/licenses/GPL-2.0.

 */

package org.apidesign.bck2brwsr.launcher;

import java.io.File;

import java.io.IOException;

import java.io.InputStreamReader;

import java.io.Reader;

import java.net.MalformedURLException;

import java.net.URISyntaxException;

import java.net.URL;

import java.util.HashSet;

import java.util.Set;

import java.util.logging.Level;

import java.util.regex.Pattern;

/**

 * Lightweight server to launch Bck2Brwsr applications and tests.

 * Supports execution in native browser as well as Java's internal 

 * execution engine.

 */

final class Bck2BrwsrLauncher extends BaseHTTPLauncher {

    private Set<String> testClasses = new HashSet<String>();

    public Bck2BrwsrLauncher(String cmd) {

        super(cmd);

    }

    @Override

    String harnessResource() {

        return "org/apidesign/bck2brwsr/launcher/harness.xhtml";

    }

    @Override

    Object compileJar(URL jar, URL precompiled) throws IOException {

        if (precompiled != null) {

            LOG.log(Level.INFO, "Found precompiled JAR version of {0} at {1}. Using.", new Object[]{jar, precompiled});

            return precompiled.openStream();

        }

        File f;

        try {

            f = new File(jar.toURI());

        } catch (URISyntaxException ex) {

            throw new IOException(ex);

        }

        final String precompile = System.getProperty("vmtest.precompiled");

        if (precompile != null && Pattern.compile(precompile).matcher(jar.toString()).find()) {

            throw new IOException("Compilation of " + jar + " forbidden");

        }

        LOG.log(Level.INFO, "No precompiled version for {0} found. Compiling.", jar);

        return CompileCP.compileJAR(f, testClasses);

    }

    @Override

    public InvocationContext createInvocation(Class<?> clazz, String method) {

        testClasses.add(clazz.getName().replace('.', '/'));

        return super.createInvocation(clazz, method);

    }

    @Override String compileFromClassPath(URL f, Res loader) throws IOException {

        return CompileCP.compileFromClassPath(f, loader);

    }

    @Override

    void generateBck2BrwsrJS(StringBuilder sb, final Res loader) throws IOException {

        String b2b = System.getProperty("bck2brwsr.js");

        if (b2b != null) {

            LOG.log(Level.INFO, "Serving bck2brwsr.js from {0}", b2b);

            URL bu;

            try {

                bu = new URL(b2b);

            } catch (MalformedURLException ex) {

                File f = new File(b2b);

                if (f.exists()) {

                    bu = f.toURI().toURL();

                } else {

                    throw ex;

                }

            }

            try (Reader r = new InputStreamReader(bu.openStream())) {

                char[] arr = new char[4096];

                for (;;) {

                   int len = r.read(arr);

                   if (len == -1) {

                       break;

                   }

                   sb.append(arr, 0, len);

                }

            }

        } else {

            LOG.log(Level.INFO, "Generating bck2brwsr.js from scratch", b2b);

            CompileCP.compileVM(sb, loader);

        }

        sb.append(

              "(function WrapperVM(global) {\n"

            + "  var cache = {};\n"

            + "  var empty = {};\n"

            + "  function ldCls(res, skip) {\n"

            + "    var c = cache[res];\n"

            + "    if (c) {\n"

            + "      if (c[skip] === empty) return null;\n"

            + "      if (c[skip]) return c[skip];\n"

            + "    } else {\n"

            + "      cache[res] = c = new Array();\n"

            + "    }\n"

            + "    var request = new XMLHttpRequest();\n"

            + "    request.open('GET', '/classes/' + res + '?skip=' + skip, false);\n"

            + "    request.send();\n"

            + "    if (request.status !== 200) {\n"

            + "      c[skip] = null;\n"

            + "      return null;\n"

            + "    }\n"

            + "    var arr = eval(request.responseText);\n"

            + "    if (arr === null) c[skip] = empty;\n"

            + "    else c[skip] = arr;\n"

            + "    return arr;\n"

            + "  }\n"

            + "  var prevvm = global.bck2brwsr;\n"

            + "  global.bck2brwsr = function() {\n"

            + "    var args = Array.prototype.slice.apply(arguments);\n"

            + "    args.unshift(ldCls);\n"

            + "    return prevvm.apply(null, args);\n"

            + "  };\n"

            + "  global.bck2brwsr.register = prevvm.register;\n"

            + "})(this);\n"

        );

        LOG.log(Level.INFO, "Serving bck2brwsr.js", b2b);

    }

}