jaroslav@273: /**
jaroslav@273:  * Back 2 Browser Bytecode Translator
jaroslav@273:  * Copyright (C) 2012 Jaroslav Tulach <jaroslav.tulach@apidesign.org>
jaroslav@273:  *
jaroslav@273:  * This program is free software: you can redistribute it and/or modify
jaroslav@273:  * it under the terms of the GNU General Public License as published by
jaroslav@273:  * the Free Software Foundation, version 2 of the License.
jaroslav@273:  *
jaroslav@273:  * This program is distributed in the hope that it will be useful,
jaroslav@273:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
jaroslav@273:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
jaroslav@273:  * GNU General Public License for more details.
jaroslav@273:  *
jaroslav@273:  * You should have received a copy of the GNU General Public License
jaroslav@273:  * along with this program. Look for COPYING file in the top folder.
jaroslav@273:  * If not, see http://opensource.org/licenses/GPL-2.0.
jaroslav@273:  */
jaroslav@273: package org.apidesign.vm4brwsr;
jaroslav@273: 
jaroslav@273: import java.lang.reflect.Method;
jaroslav@297: import java.util.Map;
jaroslav@297: import java.util.WeakHashMap;
jaroslav@273: import javax.script.Invocable;
jaroslav@298: import javax.script.ScriptContext;
jaroslav@273: import javax.script.ScriptEngine;
jaroslav@273: import javax.script.ScriptEngineManager;
jaroslav@273: import org.testng.Assert;
jaroslav@273: import org.testng.ITest;
jaroslav@273: import org.testng.annotations.Factory;
jaroslav@273: import org.testng.annotations.Test;
jaroslav@273: 
jaroslav@273: /** A TestNG {@link Factory} that seeks for {@link Compare} annotations
jaroslav@273:  * in provided class and builds set of tests that compare the computations
jaroslav@273:  * in real as well as JavaScript virtual machines. Use as:<pre>
jaroslav@273:  * {@code @}{@link Factory} public static create() {
jaroslav@273:  *   return @{link CompareVMs}.{@link #create(YourClass.class);
jaroslav@273:  * }</pre>
jaroslav@273:  *
jaroslav@273:  * @author Jaroslav Tulach <jtulach@netbeans.org>
jaroslav@273:  */
jaroslav@273: public final class CompareVMs implements ITest {
jaroslav@280:     private final Run first, second;
jaroslav@273:     private final Method m;
jaroslav@273:     
jaroslav@280:     private CompareVMs(Method m, Run first, Run second) {
jaroslav@273:         this.first = first;
jaroslav@273:         this.second = second;
jaroslav@273:         this.m = m;
jaroslav@273:     }
jaroslav@273: 
jaroslav@273:     public static Object[] create(Class<?> clazz) {
jaroslav@273:         Method[] arr = clazz.getMethods();
jaroslav@273:         Object[] ret = new Object[3 * arr.length];
jaroslav@273:         int cnt = 0;
jaroslav@273:         for (Method m : arr) {
jaroslav@273:             Compare c = m.getAnnotation(Compare.class);
jaroslav@273:             if (c == null) {
jaroslav@273:                 continue;
jaroslav@273:             }
jaroslav@280:             final Run real = new Run(m, false);
jaroslav@280:             final Run js = new Run(m, true);
jaroslav@273:             ret[cnt++] = real;
jaroslav@273:             ret[cnt++] = js;
jaroslav@273:             ret[cnt++] = new CompareVMs(m, real, js);
jaroslav@273:         }
jaroslav@273:         Object[] r = new Object[cnt];
jaroslav@273:         for (int i = 0; i < cnt; i++) {
jaroslav@273:             r[i] = ret[i];
jaroslav@273:         }
jaroslav@273:         return r;
jaroslav@273:     }
jaroslav@273:     
jaroslav@280:     @Test(dependsOnGroups = "run") public void compareResults() throws Throwable {
jaroslav@280:         Object v1 = first.value;
jaroslav@280:         Object v2 = second.value;
jaroslav@280:         if (v1 instanceof Number) {
jaroslav@280:             v1 = ((Number)v1).doubleValue();
jaroslav@280:         }
jaroslav@296:         Assert.assertEquals(v2, v1, "Comparing results");
jaroslav@280:     }
jaroslav@280:     
jaroslav@280:     @Override
jaroslav@280:     public String getTestName() {
jaroslav@280:         return m.getName() + "[Compare]";
jaroslav@280:     }
jaroslav@280:     
jaroslav@280:     public static final class Run implements ITest {
jaroslav@280:         private final Method m;
jaroslav@280:         private final boolean js;
jaroslav@280:         Object value;
jaroslav@297:         private Invocable code;
jaroslav@297:         private CharSequence codeSeq;
jaroslav@297:         private static final Map<Class,Object[]> compiled = new WeakHashMap<Class,Object[]>();
jaroslav@280: 
jaroslav@280:         private Run(Method m, boolean js) {
jaroslav@280:             this.m = m;
jaroslav@280:             this.js = js;
jaroslav@280:         }
jaroslav@280: 
jaroslav@297:         private void compileTheCode(Class<?> clazz) throws Exception {
jaroslav@297:             final Object[] data = compiled.get(clazz);
jaroslav@297:             if (data != null) {
jaroslav@297:                 code = (Invocable) data[0];
jaroslav@297:                 codeSeq = (CharSequence) data[1];
jaroslav@280:                 return;
jaroslav@273:             }
jaroslav@280:             StringBuilder sb = new StringBuilder();
jaroslav@298:             Bck2Brwsr.generate(sb, CompareVMs.class.getClassLoader());
jaroslav@280: 
jaroslav@280:             ScriptEngineManager sem = new ScriptEngineManager();
jaroslav@280:             ScriptEngine js = sem.getEngineByExtension("js");
jaroslav@298:             js.getContext().setAttribute("loader", new BytesLoader(), ScriptContext.ENGINE_SCOPE);
jaroslav@303:             
jaroslav@303:             sb.append("\nfunction initVM() {"
jaroslav@303:                 + "\n  return bck2brwsr("
jaroslav@303:                 + "\n    function(name) { return loader.get(name);}"
jaroslav@303:                 + "\n  );"
jaroslav@303:                 + "\n};");
jaroslav@280: 
jaroslav@280:             Object res = js.eval(sb.toString());
jaroslav@280:             Assert.assertTrue(js instanceof Invocable, "It is invocable object: " + res);
jaroslav@280:             code = (Invocable) js;
jaroslav@280:             codeSeq = sb;
jaroslav@297:             compiled.put(clazz, new Object[] { code, codeSeq });
jaroslav@280:         }
jaroslav@280: 
jaroslav@280:         @Test(groups = "run") public void executeCode() throws Throwable {
jaroslav@273:             if (js) {
jaroslav@273:                 try {
jaroslav@273:                     compileTheCode(m.getDeclaringClass());
jaroslav@303:                     Object vm = code.invokeFunction("initVM");
jaroslav@276:                     Object inst = code.invokeMethod(vm, "loadClass", m.getDeclaringClass().getName());
jaroslav@296:                     value = code.invokeMethod(inst, m.getName() + "__" + computeSignature(m));
jaroslav@273:                 } catch (Exception ex) {
jaroslav@273:                     throw new AssertionError(StaticMethodTest.dumpJS(codeSeq)).initCause(ex);
jaroslav@273:                 }
jaroslav@273:             } else {
jaroslav@273:                 value = m.invoke(m.getDeclaringClass().newInstance());
jaroslav@273:             }
jaroslav@273:         }
jaroslav@280:         @Override
jaroslav@280:         public String getTestName() {
jaroslav@280:             return m.getName() + (js ? "[JavaScript]" : "[Java]");
jaroslav@273:         }
jaroslav@296:         
jaroslav@296:         private static String computeSignature(Method m) {
jaroslav@296:             StringBuilder sb = new StringBuilder();
jaroslav@296:             appendType(sb, m.getReturnType());
jaroslav@296:             for (Class<?> c : m.getParameterTypes()) {
jaroslav@296:                 appendType(sb, c);
jaroslav@296:             }
jaroslav@296:             return sb.toString();
jaroslav@296:         }
jaroslav@296:         
jaroslav@296:         private static void appendType(StringBuilder sb, Class<?> t) {
jaroslav@296:             if (t == null) {
jaroslav@296:                 sb.append('V');
jaroslav@296:                 return;
jaroslav@296:             }
jaroslav@296:             if (t.isPrimitive()) {
jaroslav@296:                 int ch = -1;
jaroslav@296:                 if (t == int.class) {
jaroslav@296:                     ch = 'I';
jaroslav@296:                 }
jaroslav@296:                 if (t == short.class) {
jaroslav@296:                     ch = 'S';
jaroslav@296:                 }
jaroslav@296:                 if (t == byte.class) {
jaroslav@296:                     ch = 'B';
jaroslav@296:                 }
jaroslav@296:                 if (t == boolean.class) {
jaroslav@296:                     ch = 'Z';
jaroslav@296:                 }
jaroslav@296:                 if (t == long.class) {
jaroslav@296:                     ch = 'J';
jaroslav@296:                 }
jaroslav@296:                 if (t == float.class) {
jaroslav@296:                     ch = 'F';
jaroslav@296:                 }
jaroslav@296:                 if (t == double.class) {
jaroslav@296:                     ch = 'D';
jaroslav@296:                 }
jaroslav@296:                 assert ch != -1 : "Unknown primitive type " + t;
jaroslav@296:                 sb.append((char)ch);
jaroslav@296:                 return;
jaroslav@296:             }
jaroslav@296:             if (t.isArray()) {
jaroslav@296:                 sb.append("_3");
jaroslav@296:                 appendType(sb, t.getComponentType());
jaroslav@296:                 return;
jaroslav@296:             }
jaroslav@296:             sb.append('L');
jaroslav@296:             sb.append(t.getName().replace('.', '_'));
jaroslav@296:             sb.append("_2");
jaroslav@296:         }
jaroslav@273:     }
jaroslav@273: }