sundar@1524: /*
sundar@1524:  * Copyright (c) 2015, Oracle and/or its affiliates. All rights reserved.
sundar@1524:  *
sundar@1524:  * Redistribution and use in source and binary forms, with or without
sundar@1524:  * modification, are permitted provided that the following conditions
sundar@1524:  * are met:
sundar@1524:  *
sundar@1524:  *   - Redistributions of source code must retain the above copyright
sundar@1524:  *     notice, this list of conditions and the following disclaimer.
sundar@1524:  *
sundar@1524:  *   - Redistributions in binary form must reproduce the above copyright
sundar@1524:  *     notice, this list of conditions and the following disclaimer in the
sundar@1524:  *     documentation and/or other materials provided with the distribution.
sundar@1524:  *
sundar@1524:  *   - Neither the name of Oracle nor the names of its
sundar@1524:  *     contributors may be used to endorse or promote products derived
sundar@1524:  *     from this software without specific prior written permission.
sundar@1524:  *
sundar@1524:  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
sundar@1524:  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
sundar@1524:  * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
sundar@1524:  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR
sundar@1524:  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
sundar@1524:  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
sundar@1524:  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
sundar@1524:  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
sundar@1524:  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
sundar@1524:  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
sundar@1524:  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
sundar@1524:  */
sundar@1524: 
sundar@1524: // Simple sample to demonstrate openjdk asmtools assembler with
sundar@1524: // nashorn dynalink linker in a invokedynamic instruction.
sundar@1524: //
sundar@1524: // To assemble this file, use the following command:
sundar@1524: //
sundar@1524: //    java -cp <asmtools.jar> org.openjdk.asmtools.Main jasm Main.asm
sundar@1524: //
sundar@1524: // See also: https://wiki.openjdk.java.net/display/CodeTools/asmtools
sundar@1524: //
sundar@1524: // NOTE: Uses nashorn internals and so *may* break with later nashorn!
sundar@1524: 
sundar@1524: super public class Main
sundar@1524: 	version 52:0
sundar@1524: {
sundar@1524: 
sundar@1524: 
sundar@1524: public Method "<init>":"()V"
sundar@1524: 	stack 1 locals 1
sundar@1524: {
sundar@1524: 		aload_0;
sundar@1524: 		invokespecial	Method java/lang/Object."<init>":"()V";
sundar@1524: 		return;
sundar@1524: }
sundar@1524: 
sundar@1524: public static Method main:"([Ljava/lang/String;)V"
sundar@1524: 	stack 2 locals 2
sundar@1524: {
sundar@1524:                 // List l = new ArrayList();
sundar@1524: 		new	class java/util/ArrayList;
sundar@1524: 		dup;
sundar@1524: 		invokespecial	Method java/util/ArrayList."<init>":"()V";
sundar@1524: 		astore_1;
sundar@1524: 		aload_1;
sundar@1524: 
sundar@1524:                 // l.add("hello");
sundar@1524: 		ldc	String "hello";
sundar@1524: 		invokeinterface	InterfaceMethod java/util/List.add:"(Ljava/lang/Object;)Z",  2;
sundar@1524: 		pop;
sundar@1524: 
sundar@1524:                 // l.add("world");
sundar@1524: 		aload_1;
sundar@1524: 		ldc	String "world";
sundar@1524: 		invokeinterface	InterfaceMethod java/util/List.add:"(Ljava/lang/Object;)Z",  2;
sundar@1524: 		pop;
sundar@1524: 
sundar@1524:                 // printLength(l);
sundar@1524: 		aload_1;
sundar@1524: 		invokestatic	Method printLength:"(Ljava/lang/Object;)V";
sundar@1524: 
sundar@1524:                 // printLength(args); // args is argument of main method
sundar@1524: 		aload_0;
sundar@1524: 		invokestatic	Method printLength:"(Ljava/lang/Object;)V";
sundar@1524: 		return;
sundar@1524: }
sundar@1524: 
sundar@1524: private static Method printLength:"(Ljava/lang/Object;)V"
sundar@1524: 	stack 2 locals 1
sundar@1524: {
sundar@1524: 		getstatic	Field java/lang/System.out:"Ljava/io/PrintStream;";
sundar@1524: 		aload_0;
sundar@1524: 
sundar@1524:                 // Using nashorn embedded dynalink linker with the following invokedynamic
sundar@1524:                 // 'length' property on a bean - arrays, lists supported
sundar@1524: 
sundar@1524:                 invokedynamic   InvokeDynamic REF_invokeStatic:jdk/nashorn/internal/runtime/linker/Bootstrap.bootstrap:"(Ljava/lang/invoke/MethodHandles$Lookup;Ljava/lang/String;Ljava/lang/invoke/MethodType;I)Ljava/lang/invoke/CallSite;":"dyn:getProp|getElem|getMethod:length":"(Ljava/lang/Object;)Ljava/lang/Object;" int 0;
sundar@1524: 
sundar@1524:                 // print 'length' value
sundar@1524: 		invokevirtual	Method java/io/PrintStream.println:"(Ljava/lang/Object;)V";
sundar@1524: 		return;
sundar@1524: }
sundar@1524: 
sundar@1524: } // end Class Main