/*

 * Copyright (c) 2007, 2014, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.  Oracle designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Oracle in the LICENSE file that accompanied this code.

 *

 * This code 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

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

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

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

package com.sun.tools.javap;

import java.io.EOFException;

import java.io.FileNotFoundException;

import java.io.FilterInputStream;

import java.io.InputStream;

import java.io.IOException;

import java.io.OutputStream;

import java.io.PrintWriter;

import java.io.Reader;

import java.io.StringWriter;

import java.io.Writer;

import java.net.URI;

import java.security.DigestInputStream;

import java.security.MessageDigest;

import java.security.NoSuchAlgorithmException;

import java.text.MessageFormat;

import java.util.ArrayList;

import java.util.Arrays;

import java.util.EnumSet;

import java.util.HashMap;

import java.util.Iterator;

import java.util.List;

import java.util.Locale;

import java.util.Map;

import java.util.MissingResourceException;

import java.util.ResourceBundle;

import javax.lang.model.element.Modifier;

import javax.lang.model.element.NestingKind;

import javax.tools.Diagnostic;

import javax.tools.DiagnosticListener;

import javax.tools.JavaFileManager;

import javax.tools.JavaFileObject;

import javax.tools.StandardJavaFileManager;

import javax.tools.StandardLocation;

import com.sun.tools.classfile.*;

import java.net.URISyntaxException;

import java.net.URL;

import java.net.URLConnection;

/**

 *  "Main" class for javap, normally accessed from the command line

 *  via Main, or from JSR199 via DisassemblerTool.

 *

 *  <p><b>This is NOT part of any supported API.

 *  If you write code that depends on this, you do so at your own risk.

 *  This code and its internal interfaces are subject to change or

 *  deletion without notice.</b>

 */

public class JavapTask implements DisassemblerTool.DisassemblerTask, Messages {

    public class BadArgs extends Exception {

        static final long serialVersionUID = 8765093759964640721L;

        BadArgs(String key, Object... args) {

            super(JavapTask.this.getMessage(key, args));

            this.key = key;

            this.args = args;

        }

        BadArgs showUsage(boolean b) {

            showUsage = b;

            return this;

        }

        final String key;

        final Object[] args;

        boolean showUsage;

    }

    static abstract class Option {

        Option(boolean hasArg, String... aliases) {

            this.hasArg = hasArg;

            this.aliases = aliases;

        }

        boolean matches(String opt) {

            for (String a: aliases) {

                if (a.equals(opt))

                    return true;

            }

            return false;

        }

        boolean ignoreRest() {

            return false;

        }

        abstract void process(JavapTask task, String opt, String arg) throws BadArgs;

        final boolean hasArg;

        final String[] aliases;

    }

    static final Option[] recognizedOptions = {

        new Option(false, "-help", "--help", "-?") {

            void process(JavapTask task, String opt, String arg) {

                task.options.help = true;

            }

        },

        new Option(false, "-version") {

            void process(JavapTask task, String opt, String arg) {

                task.options.version = true;

            }

        },

        new Option(false, "-fullversion") {

            void process(JavapTask task, String opt, String arg) {

                task.options.fullVersion = true;

            }

        },

        new Option(false, "-v", "-verbose", "-all") {

            void process(JavapTask task, String opt, String arg) {

                task.options.verbose = true;

                task.options.showDescriptors = true;

                task.options.showFlags = true;

                task.options.showAllAttrs = true;

            }

        },

        new Option(false, "-l") {

            void process(JavapTask task, String opt, String arg) {

                task.options.showLineAndLocalVariableTables = true;

            }

        },

        new Option(false, "-public") {

            void process(JavapTask task, String opt, String arg) {

                task.options.accessOptions.add(opt);

                task.options.showAccess = AccessFlags.ACC_PUBLIC;

            }

        },

        new Option(false, "-protected") {

            void process(JavapTask task, String opt, String arg) {

                task.options.accessOptions.add(opt);

                task.options.showAccess = AccessFlags.ACC_PROTECTED;

            }

        },

        new Option(false, "-package") {

            void process(JavapTask task, String opt, String arg) {

                task.options.accessOptions.add(opt);

                task.options.showAccess = 0;

            }

        },

        new Option(false, "-p", "-private") {

            void process(JavapTask task, String opt, String arg) {

                if (!task.options.accessOptions.contains("-p") &&

                        !task.options.accessOptions.contains("-private")) {

                    task.options.accessOptions.add(opt);

                }

                task.options.showAccess = AccessFlags.ACC_PRIVATE;

            }

        },

        new Option(false, "-c") {

            void process(JavapTask task, String opt, String arg) {

                task.options.showDisassembled = true;

            }

        },

        new Option(false, "-s") {

            void process(JavapTask task, String opt, String arg) {

                task.options.showDescriptors = true;

            }

        },

        new Option(false, "-sysinfo") {

            void process(JavapTask task, String opt, String arg) {

                task.options.sysInfo = true;

            }

        },

        new Option(false, "-XDdetails") {

            void process(JavapTask task, String opt, String arg) {

                task.options.details = EnumSet.allOf(InstructionDetailWriter.Kind.class);

            }

        },

        new Option(false, "-XDdetails:") {

            @Override

            boolean matches(String opt) {

                int sep = opt.indexOf(":");

                return sep != -1 && super.matches(opt.substring(0, sep + 1));

            }

            void process(JavapTask task, String opt, String arg) throws BadArgs {

                int sep = opt.indexOf(":");

                for (String v: opt.substring(sep + 1).split("[,: ]+")) {

                    if (!handleArg(task, v))

                        throw task.new BadArgs("err.invalid.arg.for.option", v);

                }

            }

            boolean handleArg(JavapTask task, String arg) {

                if (arg.length() == 0)

                    return true;

                if (arg.equals("all")) {

                    task.options.details = EnumSet.allOf(InstructionDetailWriter.Kind.class);

                    return true;

                }

                boolean on = true;

                if (arg.startsWith("-")) {

                    on = false;

                    arg = arg.substring(1);

                }

                for (InstructionDetailWriter.Kind k: InstructionDetailWriter.Kind.values()) {

                    if (arg.equalsIgnoreCase(k.option)) {

                        if (on)

                            task.options.details.add(k);

                        else

                            task.options.details.remove(k);

                        return true;

                    }

                }

                return false;

            }

        },

        new Option(false, "-constants") {

            void process(JavapTask task, String opt, String arg) {

                task.options.showConstants = true;

            }

        },

        new Option(false, "-XDinner") {

            void process(JavapTask task, String opt, String arg) {

                task.options.showInnerClasses = true;

            }

        },

        new Option(false, "-XDindent:") {

            @Override

            boolean matches(String opt) {

                int sep = opt.indexOf(":");

                return sep != -1 && super.matches(opt.substring(0, sep + 1));

            }

            void process(JavapTask task, String opt, String arg) throws BadArgs {

                int sep = opt.indexOf(":");

                try {

                    int i = Integer.valueOf(opt.substring(sep + 1));

                    if (i > 0) // silently ignore invalid values

                        task.options.indentWidth = i;

                } catch (NumberFormatException e) {

                }

            }

        },

        new Option(false, "-XDtab:") {

            @Override

            boolean matches(String opt) {

                int sep = opt.indexOf(":");

                return sep != -1 && super.matches(opt.substring(0, sep + 1));

            }

            void process(JavapTask task, String opt, String arg) throws BadArgs {

                int sep = opt.indexOf(":");

                try {

                    int i = Integer.valueOf(opt.substring(sep + 1));

                    if (i > 0) // silently ignore invalid values

                        task.options.tabColumn = i;

                } catch (NumberFormatException e) {

                }

            }

        }

    };

    public JavapTask() {

        context = new Context();

        context.put(Messages.class, this);

        options = Options.instance(context);

        attributeFactory = new Attribute.Factory();

    }

    public JavapTask(Writer out,

            JavaFileManager fileManager,

            DiagnosticListener<? super JavaFileObject> diagnosticListener) {

        this();

        this.log = getPrintWriterForWriter(out);

        this.fileManager = fileManager;

        this.diagnosticListener = diagnosticListener;

    }

    public JavapTask(Writer out,

            JavaFileManager fileManager,

            DiagnosticListener<? super JavaFileObject> diagnosticListener,

            Iterable<String> options,

            Iterable<String> classes) {

        this(out, fileManager, diagnosticListener);

        this.classes = new ArrayList<>();

        for (String classname: classes) {

            classname.getClass(); // null-check

            this.classes.add(classname);

        }

        try {

            if (options != null)

                handleOptions(options, false);

        } catch (BadArgs e) {

            throw new IllegalArgumentException(e.getMessage());

        }

    }

    public void setLocale(Locale locale) {

        if (locale == null)

            locale = Locale.getDefault();

        task_locale = locale;

    }

    public void setLog(Writer log) {

        this.log = getPrintWriterForWriter(log);

    }

    public void setLog(OutputStream s) {

        setLog(getPrintWriterForStream(s));

    }

    private static PrintWriter getPrintWriterForStream(OutputStream s) {

        return new PrintWriter(s == null ? System.err : s, true);

    }

    private static PrintWriter getPrintWriterForWriter(Writer w) {

        if (w == null)

            return getPrintWriterForStream(null);

        else if (w instanceof PrintWriter)

            return (PrintWriter) w;

        else

            return new PrintWriter(w, true);

    }

    public void setDiagnosticListener(DiagnosticListener<? super JavaFileObject> dl) {

        diagnosticListener = dl;

    }

    public void setDiagnosticListener(OutputStream s) {

        setDiagnosticListener(getDiagnosticListenerForStream(s));

    }

    private DiagnosticListener<JavaFileObject> getDiagnosticListenerForStream(OutputStream s) {

        return getDiagnosticListenerForWriter(getPrintWriterForStream(s));

    }

    private DiagnosticListener<JavaFileObject> getDiagnosticListenerForWriter(Writer w) {

        final PrintWriter pw = getPrintWriterForWriter(w);

        return new DiagnosticListener<JavaFileObject> () {

            public void report(Diagnostic<? extends JavaFileObject> diagnostic) {

                switch (diagnostic.getKind()) {

                    case ERROR:

                        pw.print(getMessage("err.prefix"));

                        break;

                    case WARNING:

                        pw.print(getMessage("warn.prefix"));

                        break;

                    case NOTE:

                        pw.print(getMessage("note.prefix"));

                        break;

                }

                pw.print(" ");

                pw.println(diagnostic.getMessage(null));

            }

        };

    }

    /** Result codes.

     */

    static final int

        EXIT_OK = 0,        // Compilation completed with no errors.

        EXIT_ERROR = 1,     // Completed but reported errors.

        EXIT_CMDERR = 2,    // Bad command-line arguments

        EXIT_SYSERR = 3,    // System error or resource exhaustion.

        EXIT_ABNORMAL = 4;  // Compiler terminated abnormally

    int run(String[] args) {

        try {

            handleOptions(args);

            // the following gives consistent behavior with javac

            if (classes == null || classes.size() == 0) {

                if (options.help || options.version || options.fullVersion)

                    return EXIT_OK;

                else

                    return EXIT_CMDERR;

            }

            try {

                return run();

            } finally {

                if (defaultFileManager != null) {

                    try {

                        defaultFileManager.close();

                        defaultFileManager = null;

                    } catch (IOException e) {

                        throw new InternalError(e);

                    }

                }

            }

        } catch (BadArgs e) {

            reportError(e.key, e.args);

            if (e.showUsage) {

                printLines(getMessage("main.usage.summary", progname));

            }

            return EXIT_CMDERR;

        } catch (InternalError e) {

            Object[] e_args;

            if (e.getCause() == null)

                e_args = e.args;

            else {

                e_args = new Object[e.args.length + 1];

                e_args[0] = e.getCause();

                System.arraycopy(e.args, 0, e_args, 1, e.args.length);

            }

            reportError("err.internal.error", e_args);

            return EXIT_ABNORMAL;

        } finally {

            log.flush();

        }

    }

    public void handleOptions(String[] args) throws BadArgs {

        handleOptions(Arrays.asList(args), true);

    }

    private void handleOptions(Iterable<String> args, boolean allowClasses) throws BadArgs {

        if (log == null) {

            log = getPrintWriterForStream(System.out);

            if (diagnosticListener == null)

              diagnosticListener = getDiagnosticListenerForStream(System.err);

        } else {

            if (diagnosticListener == null)

              diagnosticListener = getDiagnosticListenerForWriter(log);

        }

        if (fileManager == null)

            fileManager = getDefaultFileManager(diagnosticListener, log);

        Iterator<String> iter = args.iterator();

        boolean noArgs = !iter.hasNext();

        while (iter.hasNext()) {

            String arg = iter.next();

            if (arg.startsWith("-"))

                handleOption(arg, iter);

            else if (allowClasses) {

                if (classes == null)

                    classes = new ArrayList<>();

                classes.add(arg);

                while (iter.hasNext())

                    classes.add(iter.next());

            } else

                throw new BadArgs("err.unknown.option", arg).showUsage(true);

        }

        if (options.accessOptions.size() > 1) {

            StringBuilder sb = new StringBuilder();

            for (String opt: options.accessOptions) {

                if (sb.length() > 0)

                    sb.append(" ");

                sb.append(opt);

            }

            throw new BadArgs("err.incompatible.options", sb);

        }

        if ((classes == null || classes.size() == 0) &&

                !(noArgs || options.help || options.version || options.fullVersion)) {

            throw new BadArgs("err.no.classes.specified");

        }

        if (noArgs || options.help)

            showHelp();