/*

 * Copyright (c) 2006, 2018, 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.

 *

 * 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 jnlp.converter.parser;

import java.net.URL;

import java.util.Properties;

import java.util.ArrayList;

import java.util.Arrays;

import java.util.Enumeration;

import java.util.LinkedList;

import java.util.List;

import java.util.concurrent.CopyOnWriteArrayList;

import jnlp.converter.HTTPHelper;

/**

 * This class contains information about the codebase and properties, i.e., how

 * to locate the classes and optional-packages

 */

public class ResourcesDesc implements ResourceType {

    private final List<ResourceType> _list;

    private volatile JNLPDesc _parent = null;

    /**

     * Create empty resource list

     */

    public ResourcesDesc() {

        _list = new CopyOnWriteArrayList<>();

    }

    public JNLPDesc getParent() {

        return _parent;

    }

    void setParent(JNLPDesc parent) {

        _parent = parent;

        for (int i = 0; i < _list.size(); i++) {

            Object o = _list.get(i);

            if (o instanceof JREDesc) {

                JREDesc jredesc = (JREDesc) o;

                if (jredesc.getNestedResources() != null) {

                    jredesc.getNestedResources().setParent(parent);

                }

            }

        }

    }

    public void addResource(ResourceType rd) {

        if (rd != null) {

            _list.add(rd);

        }

    }

    boolean isEmpty() {

        return _list.isEmpty();

    }

    public JARDesc[] getLocalJarDescs() {

        ArrayList<JARDesc> jds = new ArrayList<>(_list.size());

        for (ResourceType rt : _list) {

            if (rt instanceof JARDesc) {

                jds.add((JARDesc) rt);

            }

        }

        return jds.toArray(new JARDesc[jds.size()]);

    }

    public JREDesc getJreDesc() {

        for (ResourceType rt : _list) {

            if (rt instanceof JREDesc) {

                return (JREDesc)rt;

            }

        }

        return null;

    }

    public ExtensionDesc[] getExtensionDescs() throws Exception {

        final ArrayList<ExtensionDesc> extList = new ArrayList<>();

        visit(new ResourceVisitor() {

            @Override

            public void visitExtensionDesc(ExtensionDesc ed) throws Exception {

              // add all extensiondesc recursively

                addExtToList(extList);

            }

        });

        return extList.toArray(new ExtensionDesc[extList.size()]);

    }

    public JARDesc[] getAllJarDescs() throws Exception {

        List<JARDesc> jarList = new ArrayList<>();

        addJarsToList(jarList);

        return jarList.toArray(new JARDesc[jarList.size()]);

    }

    /**

     * Add to a list of all the ExtensionDesc. This method goes recusivly through

     * all ExtensionDesc

     */

    private void addExtToList(final List<ExtensionDesc> list) throws Exception {

        // Iterate through list an add ext jnlp to the list.

        visit(new ResourceVisitor() {

            @Override

            public void visitExtensionDesc(ExtensionDesc ed) throws Exception {

                if (ed.getExtensionDesc() != null) {

                    ed.getExtensionDesc().getMainJar();

                    ResourcesDesc rd = ed.getExtensionDesc().getResourcesDesc();

                    if (rd != null) {

                        rd.addExtToList(list);

                    }

                }

                list.add(ed);

            }

        });

    }

    private void addJarsToList(final List<JARDesc> list) throws Exception {

        // Iterate through list an add resources to the list.

        // The ordering of resources are preserved

        visit(new ResourceVisitor() {

            @Override

            public void visitJARDesc(JARDesc jd) {

                list.add(jd);

            }

            @Override

            public void visitExtensionDesc(ExtensionDesc ed) throws Exception {

                if (ed.getExtensionDesc() != null) {

                    ResourcesDesc rd = ed.getExtensionDesc().getResourcesDesc();

                    if (rd != null) {

                        rd.addJarsToList(list);

                    }

                }

            }

        });

    }

    /**

     * Get all the resources needed when a specific resource is requested.

     * Returns null if no resource was found

     */

    public JARDesc[] getResource(final URL location) throws Exception {

        final JARDesc[] resources = new JARDesc[1];

        // Find the given resource

        visit(new ResourceVisitor() {

            @Override

            public void visitJARDesc(JARDesc jd) {

                if (GeneralUtil.sameURLs(jd.getLocation(), location)) {

                    resources[0] = jd;

                }

            }

        });

        // Found no resource?

        if (resources[0] == null) {

            return null;

        }

        // No part, so just one resource

        return resources;

    }

    /* Returns the Expected Main Jar

     *    first jar with attribute main="true"

     *    else first jar if none has that attribute

     *    will look in extensions, and nested resource blocks if matching

     */

    protected JARDesc getMainJar() throws Exception {

        // Normal trick to get around final arguments to inner classes

        final JARDesc[] results = new JARDesc[2];

        visit(new ResourceVisitor() {

            @Override

            public void visitJARDesc(JARDesc jd) {

                if (jd.isJavaFile()) {

                    // Keep track of first Java File

                    if (results[0] == null || results[0].isNativeLib()) {

                        results[0] = jd;

                    }

                    // Keep tack of Java File marked main

                    if (jd.isMainJarFile()) {

                        results[1] = jd;

                    }

                } else if (jd.isNativeLib()) {

                    // if jnlp extension has only native lib

                    if (results[0] == null) {

                        results[0] = jd;

                    }

                }

            }

            @Override

            public void visitExtensionDesc(ExtensionDesc ed) throws Exception {

            // only check if no main yet and it is not an installer

                if (results[1] == null && !ed.isInstaller()) {

                    JNLPDesc extLd = ed.getExtensionDesc();

                    if (extLd != null && extLd.isLibrary()) {

                        ResourcesDesc rd = extLd.getResourcesDesc();

                        if (rd != null) {

                          // look for main jar in extension resource

                            rd.visit(this);

                        }

                    }

                }

            }

        });

        // Default is the first, if none is specified as main. This might

        // return NULL if there is no JAR resources.

        JARDesc first = results[0];

        JARDesc main = results[1];

        // if main is null then return first;

        // libraries have no such thing as a main jar, so return first;

        // otherwise return main

        // only returns null if there are no jars.

        return (main == null) ? first : main;

    }

    /*

     *  Get the properties defined for this object

     */

    public Properties getResourceProperties() throws Exception {

        final Properties props = new Properties();

        visit(new ResourceVisitor() {

            @Override

            public void visitPropertyDesc(PropertyDesc pd) {

                props.setProperty(pd.getKey(), pd.getValue());

            }

            @Override

            public void visitExtensionDesc(ExtensionDesc ed) throws Exception {

                JNLPDesc jnlpd = ed.getExtensionDesc();

                ResourcesDesc rd = jnlpd.getResourcesDesc();

                if (rd != null) {

                    Properties extProps = rd.getResourceProperties();

                    Enumeration e = extProps.propertyNames();

                    while (e.hasMoreElements()) {

                        String key = (String) e.nextElement();

                        String value = extProps.getProperty(key);

                        props.setProperty(key, value);

                    }

                }

            }

        });

        return props;

    }

    /*

     *  Get the properties defined for this object, in the right order.

     */

    public List<Property> getResourcePropertyList() throws Exception {

        final LinkedList<Property> propList = new LinkedList<>();

        visit(new ResourceVisitor() {

            @Override

            public void visitPropertyDesc(PropertyDesc pd) {

                propList.add(new Property(pd.getKey(), pd.getValue()));

            }

        });

        return propList;

    }

    /**

     * visitor dispatch

     */

    @Override

    public void visit(ResourceVisitor rv) throws Exception {

        for (int i = 0; i < _list.size(); i++) {

            ResourceType rt = _list.get(i);

            rt.visit(rv);

        }

    }

    public void addNested(ResourcesDesc nested) throws Exception {

        if (nested != null) {

            nested.visit(new ResourceVisitor() {

                @Override

                public void visitJARDesc(JARDesc jd) {

                    _list.add(jd);

                }

                @Override

                public void visitPropertyDesc(PropertyDesc pd) {

                    _list.add(pd);

                }

                @Override

                public void visitExtensionDesc(ExtensionDesc ed) {

                    _list.add(ed);

                }

            });

        }

    }

    public static class JARDesc implements ResourceType {

        private URL _location;

        private String _locationString;

        private String _version;

        private boolean _isNativeLib;

        private boolean _isMainFile;  // Only used for Java JAR files (a main JAR file is implicitly eager)

        private ResourcesDesc _parent;   // Back-pointer to the Resources that contains this JAR

        public JARDesc(URL location, String version, boolean isMainFile, boolean isNativeLib, ResourcesDesc parent) {

            _location = location;

            _locationString = GeneralUtil.toNormalizedString(location);

            _version = version;

            _isMainFile = isMainFile;

            _isNativeLib = isNativeLib;

            _parent = parent;

        }

        /**

         * Type of JAR resource

         */

        public boolean isNativeLib() {

            return _isNativeLib;

        }

        public boolean isJavaFile() {

            return !_isNativeLib;

        }

        /**

         * Returns URL/version for JAR file

         */

        public URL getVersionLocation() throws Exception {

            if (getVersion() == null) {

                return _location;

            } else {

                return GeneralUtil.getEmbeddedVersionURL(getLocation(), getVersion());

            }

        }

        public URL getLocation() {

            return _location;

        }

        public String getVersion() {

            return _version;

        }

        public String getName() {

            // File can be separated by '/' or '\\'

            int index;

            int index1 = _locationString.lastIndexOf('/');

            int index2 = _locationString.lastIndexOf('\\');

            if (index1 >= index2) {

                index = index1;

            } else {

                index = index2;

            }

            if (index != -1) {

                return _locationString.substring(index + 1, _locationString.length());

            }

            return null;

        }

        /**

         * Returns if this is the main JAR file

         */

        public boolean isMainJarFile() {

            return _isMainFile;

        }

        /**

         * Get parent LaunchDesc

         */

        public ResourcesDesc getParent() {

            return _parent;

        }

        /**

         * Visitor dispatch

         */

        public void visit(ResourceVisitor rv) {

            rv.visitJARDesc(this);

        }

    }

    public static class PropertyDesc implements ResourceType {

        private String _key;

        private String _value;

        public PropertyDesc(String key, String value) {

            _key = key;

            _value = value;

        }

        // Accessors

        public String getKey() {

            return _key;

        }

        public String getValue() {

            return _value;

        }

        /**

         * Visitor dispatch

         */

        public void visit(ResourceVisitor rv) {

            rv.visitPropertyDesc(this);

        }

    }

    public static class JREDesc implements ResourceType {

        private String _version;

        private long _maxHeap;

        private long _minHeap;

        private String _vmargs;

        private ResourcesDesc _resourceDesc;

        private JNLPDesc _extensioDesc;

        private String _archList;

        /*

         * Constructor to create new instance based on the requirements from JNLP file.

         */

        public JREDesc(String version, long minHeap, long maxHeap, String vmargs,

                       ResourcesDesc resourcesDesc, String archList) {

            _version = version;

            _maxHeap = maxHeap;

            _minHeap = minHeap;

            _vmargs = vmargs;

            _resourceDesc = resourcesDesc;

            _extensioDesc = null;

            _archList = archList;

        }

        public String[] getArchList() {

            return GeneralUtil.getStringList(_archList);

        }

        public String getVersion() {

            return _version;

        }

        public long getMinHeap() {

            return _minHeap;

        }

        public long getMaxHeap() {

            return _maxHeap;

        }

        public String getVmArgs() {

            return _vmargs;

        }

        public String[] getVmArgsList() {

            return GeneralUtil.getStringList(_vmargs);

        }

        public ResourcesDesc getNestedResources() {

            return _resourceDesc;

        }

        public JNLPDesc getExtensionDesc() {

            return _extensioDesc;

        }

        public void setExtensionDesc(JNLPDesc ld) {

            _extensioDesc = ld;

        }

        /* visitor dispatch */

        public void visit(ResourceVisitor rv) {

            rv.visitJREDesc(this);

        }

    }

    public static class Property implements Cloneable {

        public static final String JNLP_VERSION_ENABLED = "jnlp.versionEnabled";

        String key;

        String value;

        public Property(String spec) {

            spec = spec.trim();

            if (!spec.startsWith("-D") || spec.length() < 3) {

                throw new IllegalArgumentException("Property invalid");

            }

            int endKey = spec.indexOf("=");

            if (endKey < 0) {

                // it's legal to have no assignment

                this.key = spec.substring(2); // skip "-D"

                this.value = "";

            } else {

                this.key = spec.substring(2, endKey);

                this.value = spec.substring(endKey + 1);

            }

        }

        public static Property createProperty(String spec) {

            Property prop = null;

            try {

                prop = new Property(spec);