/**

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

 *

 * Copyright 2013-2014 Oracle and/or its affiliates. All rights reserved.

 *

 * Oracle and Java are registered trademarks of Oracle and/or its affiliates.

 * Other names may be trademarks of their respective owners.

 *

 * The contents of this file are subject to the terms of either the GNU

 * General Public License Version 2 only ("GPL") or the Common

 * Development and Distribution License("CDDL") (collectively, the

 * "License"). You may not use this file except in compliance with the

 * License. You can obtain a copy of the License at

 * http://www.netbeans.org/cddl-gplv2.html

 * or nbbuild/licenses/CDDL-GPL-2-CP. See the License for the

 * specific language governing permissions and limitations under the

 * License.  When distributing the software, include this License Header

 * Notice in each file and include the License file at

 * nbbuild/licenses/CDDL-GPL-2-CP.  Oracle designates this

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

 * by Oracle in the GPL Version 2 section of the License file that

 * accompanied this code. If applicable, add the following below the

 * License Header, with the fields enclosed by brackets [] replaced by

 * your own identifying information:

 * "Portions Copyrighted [year] [name of copyright owner]"

 *

 * Contributor(s):

 *

 * The Original Software is NetBeans. The Initial Developer of the Original

 * Software is Oracle. Portions Copyright 2013-2014 Oracle. All Rights Reserved.

 *

 * If you wish your version of this file to be governed by only the CDDL

 * or only the GPL Version 2, indicate your decision by adding

 * "[Contributor] elects to include this software in this distribution

 * under the [CDDL or GPL Version 2] license." If you do not indicate a

 * single choice of license, a recipient has the option to distribute

 * your version of this file under either the CDDL, the GPL Version 2 or

 * to extend the choice of license to its licensees as provided above.

 * However, if you add GPL Version 2 code and therefore, elected the GPL

 * Version 2 license, then the option applies only if the new code is

 * made subject to such option by the copyright holder.

 */

package org.netbeans.html.ko.felix.test;

import java.io.BufferedReader;

import java.io.IOException;

import java.io.InputStreamReader;

import java.lang.reflect.Constructor;

import java.lang.reflect.InvocationTargetException;

import java.lang.reflect.Method;

import java.net.URI;

import java.net.URISyntaxException;

import java.net.URL;

import java.net.URLConnection;

import java.util.ArrayList;

import java.util.Collections;

import java.util.Enumeration;

import java.util.List;

import java.util.Map;

import java.util.concurrent.Callable;

import java.util.concurrent.Executor;

import java.util.concurrent.Executors;

import net.java.html.BrwsrCtx;

import net.java.html.boot.BrowserBuilder;

import net.java.html.js.JavaScriptBody;

import org.netbeans.html.boot.spi.Fn;

import org.netbeans.html.context.spi.Contexts;

import org.netbeans.html.json.spi.Technology;

import org.netbeans.html.json.spi.Transfer;

import org.netbeans.html.json.tck.KnockoutTCK;

import org.openide.util.lookup.ServiceProvider;

import org.osgi.framework.Bundle;

import org.osgi.framework.BundleContext;

import org.osgi.framework.FrameworkUtil;

/**

 *

 * @author Jaroslav Tulach

 */

@ServiceProvider(service = KnockoutTCK.class)

public class KnockoutFelixTCKImpl extends KnockoutTCK implements Callable<Class[]> {

    private static Fn.Presenter browserContext;

    public static Class loadOSGiClass(String name, BundleContext ctx) throws Exception {

        for (Bundle b : ctx.getBundles()) {

            try {

                Class<?> osgiClass = b.loadClass(name);

                if (osgiClass != null && osgiClass.getClassLoader() != ClassLoader.getSystemClassLoader()) {

                    return osgiClass;

                }

            } catch (ClassNotFoundException cnfe) {

                // go on

            }

        }

        throw new IllegalStateException("Cannot load " + name + " from the OSGi container!");

    }

    @Override

    public Class[] call() throws Exception {

        return testClasses();

    }

    public static void start(String callBackClass, URI server, final boolean useAllClassloader) throws Exception {

        final BrowserBuilder bb = BrowserBuilder.newBrowser().loadClass(KnockoutFelixTCKImpl.class).

            loadPage(server.toString()).

            invoke("initialized", callBackClass);

        Executors.newSingleThreadExecutor().submit(new Runnable() {

            @Override

            public void run() {

                try {

                    Bundle[] arr = FrameworkUtil.getBundle(BrowserBuilder.class).getBundleContext().getBundles();

                    if (useAllClassloader) {

                        final ClassLoader osgiClassLoader = new AllBundlesLoader(arr);

                        bb.classloader(osgiClassLoader);

                    }

                    bb.showAndWait();

                } catch (Throwable t) {

                    t.printStackTrace();

                }

            }

        });

    }

    public static void initialized(String... args) throws Exception {

        Bundle bundle = FrameworkUtil.getBundle(KnockoutFelixTCKImpl.class);

        if (bundle == null) {

            throw new IllegalStateException(

                "Should be loaded from a bundle. But was: " + KnockoutFelixTCKImpl.class.getClassLoader()

            );

        }

        Class<?> classpathClass = ClassLoader.getSystemClassLoader().loadClass(args[0]);

        Method m = classpathClass.getMethod("initialized", Class.class, Object.class);

        browserContext = Fn.activePresenter();

        m.invoke(null, KnockoutFelixTCKImpl.class, browserContext);

    }

    @Override

    public BrwsrCtx createContext() {

        try {

            Contexts.Builder cb = Contexts.newBuilder().

                register(Technology.class, (Technology)osgiInstance("KOTech"), 10).

                register(Transfer.class, (Transfer)osgiInstance("KOTransfer"), 10).

                register(Executor.class, (Executor)browserContext, 10);

//        if (fx.areWebSocketsSupported()) {

//            cb.register(WSTransfer.class, fx, 10);

//        }

            return cb.build();

        } catch (Exception ex) {

            throw new IllegalStateException(ex);

        }

    }

    private Object osgiInstance(String simpleName) throws IllegalAccessException, SecurityException, IllegalArgumentException, Exception, NoSuchMethodException, InstantiationException, InvocationTargetException {

        Class<?> fxCls = loadOSGiClass(

                "org.netbeans.html.ko4j." + simpleName,

                FrameworkUtil.getBundle(KnockoutFelixTCKImpl.class).getBundleContext()

        );

        final Constructor<?> cnstr = fxCls.getDeclaredConstructor();

        cnstr.setAccessible(true);

        Object fx = cnstr.newInstance();

        return fx;

    }

    @Override

    public Object createJSON(Map<String, Object> values) {

        Object json = createObj();

        for (Map.Entry<String, Object> entry : values.entrySet()) {

            putObj(json, entry.getKey(), entry.getValue());

        }

        return json;

    }

    @JavaScriptBody(args = {  }, body = "return {};")

    private static native Object createObj();

    @JavaScriptBody(args = { "obj", "prop", "val" }, body = "obj[prop] = val;")

    private static native void putObj(Object obj, String prop, Object val);

    @Override

    @JavaScriptBody(args = { "s", "args" }, body = ""

        + "var f = new Function(s); "

        + "return f.apply(null, args);"

    )

    public native Object executeScript(String script, Object[] arguments);

    @JavaScriptBody(args = {  }, body = 

          "var h;"

        + "if (!!window && !!window.location && !!window.location.href)\n"

        + "  h = window.location.href;\n"

        + "else "

        + "  h = null;"

        + "return h;\n"

    )

    private static native String findBaseURL();

    @Override

    public URI prepareURL(String content, String mimeType, String[] parameters) {

        try {

            final URL baseURL = new URL(findBaseURL());

            StringBuilder sb = new StringBuilder();

            sb.append("/dynamic?mimeType=").append(mimeType);

            for (int i = 0; i < parameters.length; i++) {

                sb.append("&param" + i).append("=").append(parameters[i]);

            }

            String mangle = content.replace("\n", "%0a")

                .replace("\"", "\\\"").replace(" ", "%20");

            sb.append("&content=").append(mangle);

            URL query = new URL(baseURL, sb.toString());

            URLConnection c = query.openConnection();

            BufferedReader br = new BufferedReader(new InputStreamReader(c.getInputStream()));

            URI connectTo = new URI(br.readLine());

            return connectTo;

        } catch (IOException ex) {

            throw new IllegalStateException(ex);

        } catch (URISyntaxException ex) {

            throw new IllegalStateException(ex);

        }

    }

    @Override

    public boolean canFailWebSocketTest() {

        return true;

    }

    private static final class AllBundlesLoader extends ClassLoader {

        private final Bundle[] arr;

        public AllBundlesLoader(Bundle[] arr) {

            super(ClassLoader.getSystemClassLoader().getParent());

            this.arr = arr;

        }

        @Override

        public Class<?> loadClass(String name) throws ClassNotFoundException {

            return loadClass(name, false);

        }

        @Override

        protected Class<?> loadClass(String name, boolean resolve) throws ClassNotFoundException {

            ClassNotFoundException err = null;

            for (Bundle b : arr) {

                try {

                    Class<?> cls = b.loadClass(name);

                    if (FrameworkUtil.getBundle(cls) == b) {

                        return cls;

                    }

                } catch (ClassNotFoundException ex) {

                    err = ex;

                }

            }

            throw err;

        }

        @Override

        protected URL findResource(String name) {

            for (Bundle b : arr) {

                URL r = b.getResource(name);

                if (r != null) {

                    return r;

                }

            }

            return null;

        }

        @Override

        protected Enumeration<URL> findResources(String name) throws IOException {

            List<URL> ret = new ArrayList<URL>();

            for (Bundle b : arr) {

                Enumeration<URL> en = b.getResources(name);

                if (en != null) while (en.hasMoreElements()) {

                    URL u = en.nextElement();

                    ret.add(u);

                }

            }

            return Collections.enumeration(ret);

        }

    }

}