/**

 * Back 2 Browser Bytecode Translator

 * Copyright (C) 2012 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.aot;

import java.io.BufferedReader;

import java.io.File;

import java.io.IOException;

import java.io.InputStream;

import java.io.InputStreamReader;

import java.net.URL;

import java.util.ArrayList;

import java.util.Enumeration;

import java.util.HashSet;

import java.util.List;

import java.util.Set;

import java.util.jar.JarEntry;

import java.util.jar.JarFile;

import java.util.logging.Level;

import java.util.logging.Logger;

import java.util.zip.ZipEntry;

import org.apidesign.vm4brwsr.Bck2Brwsr;

/** Utilities to process JAR files and set a compiler

 * up.

 *

 * @since 0.9

 * @author Jaroslav Tulach

 */

public final class Bck2BrwsrJars {

    private static final Logger LOG = Logger.getLogger(Bck2BrwsrJars.class.getName());

    private Bck2BrwsrJars() {

    }

    /** Creates new compiler pre-configured from the content of 

     * provided JAR file. The compiler will compile all classes.

     * The system understands OSGi manifest entries and will export

     * all packages that are exported in the JAR file. The system

     * also recognizes META-INF/services and makes sure the file names

     * are not mangled.

     * 

     * @param c the compiler to {@link Bck2Brwsr#addClasses(java.lang.String...) add classes},

     *    {@link Bck2Brwsr#addResources(java.lang.String...) add resources} and

     *    {@link Bck2Brwsr#addExported(java.lang.String...) exported objects} to.

     *    Can be <code>null</code> - in such case an 

     *    {@link Bck2Brwsr#newCompiler() empty compiler} is constructed.

     * @param jar the file to process

     * @return newly configured compiler

     * @throws IOException if something goes wrong

     */

    public static Bck2Brwsr configureFrom(Bck2Brwsr c, File jar) throws IOException {

        final JarFile jf = new JarFile(jar);

        List<String> classes = new ArrayList<>();

        List<String> resources = new ArrayList<>();

        Set<String> exported = new HashSet<>();

        listJAR(jf, classes, resources, exported);

        String cp = jf.getManifest().getMainAttributes().getValue("Class-Path"); // NOI18N

        String[] classpath = cp == null ? new String[0] : cp.split(" ");

        class JarRes extends EmulationResources implements Bck2Brwsr.Resources {

            @Override

            public InputStream get(String resource) throws IOException {

                InputStream is = jf.getInputStream(new ZipEntry(resource));

                return is == null ? super.get(resource) : is;

            }

        }

        return Bck2Brwsr.newCompiler()

            .library(classpath)

            .addClasses(classes.toArray(new String[classes.size()]))

            .addExported(exported.toArray(new String[exported.size()]))

            .addResources(resources.toArray(new String[resources.size()]))

            .resources(new JarRes());

    }

    private static void listJAR(

        JarFile j, List<String> classes,

        List<String> resources, Set<String> keep

    ) throws IOException {

        Enumeration<JarEntry> en = j.entries();

        while (en.hasMoreElements()) {

            JarEntry e = en.nextElement();

            final String n = e.getName();

            if (n.endsWith("/")) {

                continue;

            }

            if (n.startsWith("META-INF/maven/")) {

                continue;

            }

            int last = n.lastIndexOf('/');

            String pkg = n.substring(0, last + 1);

            if (pkg.startsWith("java/")) {

                keep.add(pkg);

            }

            if (n.endsWith(".class")) {

                classes.add(n.substring(0, n.length() - 6));

            } else {

                resources.add(n);

                if (n.startsWith("META-INF/services/") && keep != null) {

                    BufferedReader r = new BufferedReader(new InputStreamReader(j.getInputStream(e)));

                    for (;;) {

                        String l = r.readLine();

                        if (l == null) {

                            break;

                        }

                        if (l.startsWith("#")) {

                            continue;

                        }

                        keep.add(l.replace('.', '/'));

                    }

                }

            }

        }

        String exp = j.getManifest().getMainAttributes().getValue("Export-Package");

        if (exp != null && keep != null) {

            for (String def : exp.split(",")) {

                for (String sep : def.split(";")) {

                    keep.add(sep.replace('.', '/') + "/");

                    break;

                }

            }

        }

    }

    static class EmulationResources implements Bck2Brwsr.Resources {

        @Override

        public InputStream get(String name) throws IOException {

            Enumeration<URL> en = Bck2BrwsrJars.class.getClassLoader().getResources(name);

            URL u = null;

            while (en.hasMoreElements()) {

                u = en.nextElement();

            }

            if (u == null) {

                LOG.log(Level.WARNING, "Cannot find {0}", name);

                return null;

            }

            if (u.toExternalForm().contains("/rt.jar!")) {

                LOG.log(Level.WARNING, "{0}No bootdelegation for ", name);

                return null;

            }

            return u.openStream();

        }

    }

}