jaroslav@644: /**
jaroslav@644:  * Back 2 Browser Bytecode Translator
jaroslav@644:  * Copyright (C) 2012 Jaroslav Tulach <jaroslav.tulach@apidesign.org>
jaroslav@644:  *
jaroslav@644:  * This program is free software: you can redistribute it and/or modify
jaroslav@644:  * it under the terms of the GNU General Public License as published by
jaroslav@644:  * the Free Software Foundation, version 2 of the License.
jaroslav@644:  *
jaroslav@644:  * This program is distributed in the hope that it will be useful,
jaroslav@644:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
jaroslav@644:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
jaroslav@644:  * GNU General Public License for more details.
jaroslav@644:  *
jaroslav@644:  * You should have received a copy of the GNU General Public License
jaroslav@644:  * along with this program. Look for COPYING file in the top folder.
jaroslav@644:  * If not, see http://opensource.org/licenses/GPL-2.0.
jaroslav@644:  */
jaroslav@644: package org.apidesign.vm4brwsr;
jaroslav@644: 
jaroslav@672: import java.io.ByteArrayInputStream;
jaroslav@644: import java.io.IOException;
jaroslav@706: import java.io.InputStream;
jaroslav@644: import java.net.URL;
jaroslav@644: import org.apidesign.bck2brwsr.core.JavaScriptBody;
jaroslav@706: import org.apidesign.bck2brwsr.emul.zip.FastJar;
jaroslav@644: 
jaroslav@644: /** Conversion from classpath to load function.
jaroslav@644:  *
jaroslav@644:  * @author Jaroslav Tulach <jtulach@netbeans.org>
jaroslav@644:  */
jaroslav@644: final class Zips {
jaroslav@706:     private final FastJar fj;
jaroslav@706: 
jaroslav@706:     private Zips(String path, byte[] zipData) throws IOException {
jaroslav@715:         long bef = timeNow();
jaroslav@706:         fj = new FastJar(zipData);
jaroslav@706:         for (FastJar.Entry e : fj.list()) {
jaroslav@706:             putRes(e.name, e);
jaroslav@706:         }
jaroslav@715:         log("Iterating thru " + path + " took " + (timeNow() - bef) + "ms");
jaroslav@644:     }
jaroslav@644:     
jaroslav@644:     public static void init() {
jaroslav@644:     }
jaroslav@729:     @JavaScriptBody(args = { "arr" }, body = "return arr.length;")
jaroslav@729:     private static native int length(Object arr);
jaroslav@729:     @JavaScriptBody(args = { "arr", "index" }, body = "return arr[index];")
jaroslav@729:     private static native Object at(Object arr, int index);
jaroslav@729:     @JavaScriptBody(args = { "arr", "index", "value" }, body = "arr[index] = value; return value;")
jaroslav@729:     private static native Object set(Object arr, int index, Object value);
jaroslav@644:     
jaroslav@729:     public static byte[] loadFromCp(Object classpath, String res) 
jaroslav@729:     throws IOException, ClassNotFoundException {
jaroslav@729:         for (int i = 0; i < length(classpath); i++) {
jaroslav@729:             Object c = at(classpath, i);
jaroslav@644:             if (c instanceof String) {
jaroslav@644:                 try {
jaroslav@672:                     String url = (String)c;
jaroslav@672:                     final Zips z = toZip(url);
jaroslav@729:                     c = set(classpath, i, z);
jaroslav@672:                     final byte[] man = z.findRes("META-INF/MANIFEST.MF");
jaroslav@672:                     if (man != null) {
jaroslav@702:                         String mainClass = processClassPathAttr(man, url, classpath);
jaroslav@743: //                        if (mainClass != null) {
jaroslav@743: //                            Class.forName(mainClass);
jaroslav@743: //                        }
jaroslav@672:                     }
jaroslav@743:                 } catch (IOException ex) {
jaroslav@729:                     set(classpath, i, ex);
jaroslav@746:                     log("Cannot load " + c + " - " + ex.getClass().getName() + ":" + ex.getMessage());
jaroslav@644:                 }
jaroslav@644:             }
jaroslav@729:             if (res != null) {
jaroslav@729:                 byte[] checkRes;
jaroslav@729:                 if (c instanceof Zips) {
jaroslav@729:                     checkRes = ((Zips)c).findRes(res);
jaroslav@729:                 } else {
jaroslav@729:                     checkRes = callFunction(c, res);
jaroslav@729:                 }
jaroslav@729:                 if (checkRes != null) {
jaroslav@729:                     return checkRes;
jaroslav@644:                 }
jaroslav@644:             }
jaroslav@644:         }
jaroslav@644:         return null;
jaroslav@644:     }
jaroslav@706:     
jaroslav@729:     @JavaScriptBody(args = { "fn", "res" }, body = 
jaroslav@729:         "if (typeof fn === 'function') return fn(res);\n"
jaroslav@729:       + "return null;"
jaroslav@729:     )
jaroslav@729:     private static native byte[] callFunction(Object fn, String res);
jaroslav@729:     
jaroslav@706:     @JavaScriptBody(args = { "msg" }, body = "console.log(msg.toString());")
jaroslav@706:     private static native void log(String msg);
jaroslav@706: 
jaroslav@706:     private byte[] findRes(String res) throws IOException {
jaroslav@706:         Object arr = findResImpl(res);
jaroslav@706:         if (arr instanceof FastJar.Entry) {
jaroslav@715:             long bef = timeNow();
jaroslav@706:             InputStream zip = fj.getInputStream((FastJar.Entry)arr);
jaroslav@706:             arr = readFully(new byte[512], zip);
jaroslav@706:             putRes(res, arr);
jaroslav@715:             log("Reading " + res + " took " + (timeNow() - bef) + "ms");
jaroslav@706:         }
jaroslav@706:         return (byte[]) arr;
jaroslav@706:     }
jaroslav@644: 
jaroslav@644:     @JavaScriptBody(args = { "res" }, body = "var r = this[res]; return r ? r : null;")
jaroslav@706:     private native Object findResImpl(String res);
jaroslav@644: 
jaroslav@644:     @JavaScriptBody(args = { "res", "arr" }, body = "this[res] = arr;")
jaroslav@706:     private native void putRes(String res, Object arr);
jaroslav@644:     
jaroslav@644:     private static Zips toZip(String path) throws IOException {
jaroslav@644:         URL u = new URL(path);
jaroslav@706:         byte[] zipData = (byte[]) u.getContent(new Class[] { byte[].class });
jaroslav@706:         return new Zips(path, zipData);
jaroslav@644:     }
jaroslav@644: 
jaroslav@729:     private static String processClassPathAttr(final byte[] man, String url, Object classpath) throws IOException {
jaroslav@702:         try (ParseMan is = new ParseMan(new ByteArrayInputStream(man))) {
jaroslav@672:             String cp = is.toString();
jaroslav@702:             if (cp != null) {
jaroslav@702:                 cp = cp.trim();
jaroslav@702:                 for (int p = 0; p < cp.length();) {
jaroslav@702:                     int n = cp.indexOf(' ', p);
jaroslav@702:                     if (n == -1) {
jaroslav@702:                         n = cp.length();
jaroslav@702:                     }
jaroslav@702:                     String el = cp.substring(p, n);
jaroslav@702:                     URL u = new URL(new URL(url), el);
jaroslav@702:                     classpath = addToArray(classpath, u.toString());
jaroslav@702:                     p = n + 1;
jaroslav@702:                 }
jaroslav@672:             }
jaroslav@702:             return is.getMainClass();
jaroslav@672:         }
jaroslav@672:     }
jaroslav@672: 
jaroslav@729:     private static Object addToArray(Object arr, String value) {
jaroslav@729:         final int last = length(arr);
jaroslav@729:         Object ret = enlargeArray(arr, last + 1);
jaroslav@729:         set(ret, last, value);
jaroslav@672:         return ret;
jaroslav@672:     }
jaroslav@672: 
jaroslav@729:     @JavaScriptBody(args = { "arr", "len" }, body = "while (arr.length < len) arr.push(null); return arr;")
jaroslav@729:     private static native Object enlargeArray(Object arr, int len);
jaroslav@644:     @JavaScriptBody(args = { "arr", "len" }, body = "while (arr.length < len) arr.push(0);")
jaroslav@729:     private static native void enlargeBytes(byte[] arr, int len);
jaroslav@644: 
jaroslav@644:     @JavaScriptBody(args = { "arr", "len" }, body = "arr.splice(len, arr.length - len);")
jaroslav@644:     private static native void sliceArray(byte[] arr, int len);
jaroslav@706: 
jaroslav@706:     private static Object readFully(byte[] arr, InputStream zip) throws IOException {
jaroslav@706:         int offset = 0;
jaroslav@706:         for (;;) {
jaroslav@706:             int len = zip.read(arr, offset, arr.length - offset);
jaroslav@706:             if (len == -1) {
jaroslav@706:                 break;
jaroslav@706:             }
jaroslav@706:             offset += len;
jaroslav@706:             if (offset == arr.length) {
jaroslav@729:                 enlargeBytes(arr, arr.length + 4096);
jaroslav@706:             }
jaroslav@706:         }
jaroslav@706:         sliceArray(arr, offset);
jaroslav@706:         return arr;
jaroslav@706:     }
jaroslav@706: 
jaroslav@715:     private static long timeNow() {
jaroslav@715:         double time = m();
jaroslav@715:         if (time >= 0) {
jaroslav@715:             return (long)time;
jaroslav@715:         }
jaroslav@715:         return org.apidesign.bck2brwsr.emul.lang.System.currentTimeMillis();
jaroslav@706:     }
jaroslav@715:     @JavaScriptBody(args = {}, body = 
jaroslav@715:         "if (typeof window.performance === 'undefined') return -1;\n"
jaroslav@715:       + "if (typeof window.performance.now === 'undefined') return -1;\n"
jaroslav@715:       + "return window.performance.now();"
jaroslav@715:     )
jaroslav@706:     private static native double m();
jaroslav@644:     
jaroslav@644:     
jaroslav@644: }