package org.apidesign.vm4brwsr;

import java.io.BufferedWriter;

import java.io.FileWriter;

import java.io.IOException;

import java.io.InputStream;

import java.io.Writer;

import java.util.Arrays;

import java.util.HashSet;

import java.util.LinkedList;

import java.util.List;

import java.util.Set;

/** Generator of JavaScript from bytecode of classes on classpath of the VM.

 *

 * @author Jaroslav Tulach <jtulach@netbeans.org>

 */

final class GenJS {

    private GenJS() {}

    public static void main(String... args) throws IOException {

        if (args.length < 2) {

            System.err.println("Usage: java -cp ... -jar ... <file_to_generate_js_code_to> java/lang/Class org/your/App ...");

            return;

        }

        Writer w = new BufferedWriter(new FileWriter(args[0]));

        List<String> classes = Arrays.asList(args).subList(1, args.length);

        compile(w, classes);

        w.close();

    }

    static void compile(Appendable out, String... names) throws IOException {

        compile(out, Arrays.asList(names));

    }

    static void compile(Appendable out, List<String> names) throws IOException {

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

        LinkedList<String> toProcess = new LinkedList<String>(names);

        for (;;) {

            toProcess.removeAll(processed);

            if (toProcess.isEmpty()) {

                break;

            }

            String name = toProcess.getFirst();

            processed.add(name);

            if (name.startsWith("sun/")) {

                continue;

            }

            if (name.startsWith("java/") 

                && !name.equals("java/lang/Object")

                && !name.equals("java/lang/StringBuilder")

                && !name.equals("java/lang/AbstractStringBuilder")

            ) {

                continue;

            }

            InputStream is = GenJS.class.getClassLoader().getResourceAsStream(name + ".class");

            if (is == null) {

                throw new IOException("Can't find class " + name); 

            }

            LinkedList<String> scripts = new LinkedList<String>();

            try {

                ByteCodeToJavaScript.compile(is, out, toProcess, scripts);

            } catch (RuntimeException ex) {

                if (out instanceof CharSequence) {

                    CharSequence seq = (CharSequence)out;

                    int lastBlock = seq.length();

                    while (lastBlock-- >= 0) {

                        if (seq.charAt(lastBlock) == '{') {

                            break;

                        }

                    }

                    throw new IOException("Error while compiling " + name + "\n" 

                        + seq.subSequence(lastBlock + 1, seq.length()), ex

                    );

                } else {

                    throw new IOException("Error while compiling " + name + "\n" 

                        + out, ex

                    );

                }

            }

            for (String resource : scripts) {

                InputStream emul = GenJS.class.getResourceAsStream(resource);

                if (emul == null) {

                    throw new IOException("Can't find " + resource);

                }

                readResource(emul, out);

            }

        }

    }

    private static void readResource(InputStream emul, Appendable out) throws IOException {

        try {

            int state = 0;

            for (;;) {

                int ch = emul.read();

                if (ch == -1) {

                    break;

                }

                if (ch < 0 || ch > 255) {

                    throw new IOException("Invalid char in emulation " + ch);

                }

                switch (state) {

                    case 0: 

                        if (ch == '/') {

                            state = 1;

                        } else {

                            out.append((char)ch);

                        }

                        break;

                    case 1:

                        if (ch == '*') {

                            state = 2;

                        } else {

                            out.append('/').append((char)ch);

                            state = 0;

                        }

                        break;

                    case 2:

                        if (ch == '*') {

                            state = 3;

                        }

                        break;

                    case 3:

                        if (ch == '/') {

                            state = 0;

                        } else {

                            state = 2;

                        }

                        break;

                }

            }

        } finally {

            emul.close();

        }

    }

}