samples/Main.asm

changeset 1524
3f4320a01539
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/samples/Main.asm	Fri Sep 04 17:17:44 2015 +0530
     1.3 @@ -0,0 +1,103 @@
     1.4 +/*
     1.5 + * Copyright (c) 2015, Oracle and/or its affiliates. All rights reserved.
     1.6 + *
     1.7 + * Redistribution and use in source and binary forms, with or without
     1.8 + * modification, are permitted provided that the following conditions
     1.9 + * are met:
    1.10 + *
    1.11 + *   - Redistributions of source code must retain the above copyright
    1.12 + *     notice, this list of conditions and the following disclaimer.
    1.13 + *
    1.14 + *   - Redistributions in binary form must reproduce the above copyright
    1.15 + *     notice, this list of conditions and the following disclaimer in the
    1.16 + *     documentation and/or other materials provided with the distribution.
    1.17 + *
    1.18 + *   - Neither the name of Oracle nor the names of its
    1.19 + *     contributors may be used to endorse or promote products derived
    1.20 + *     from this software without specific prior written permission.
    1.21 + *
    1.22 + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
    1.23 + * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
    1.24 + * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
    1.25 + * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR
    1.26 + * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
    1.27 + * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
    1.28 + * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
    1.29 + * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
    1.30 + * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
    1.31 + * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
    1.32 + * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    1.33 + */
    1.34 +
    1.35 +// Simple sample to demonstrate openjdk asmtools assembler with
    1.36 +// nashorn dynalink linker in a invokedynamic instruction.
    1.37 +//
    1.38 +// To assemble this file, use the following command:
    1.39 +//
    1.40 +//    java -cp <asmtools.jar> org.openjdk.asmtools.Main jasm Main.asm
    1.41 +//
    1.42 +// See also: https://wiki.openjdk.java.net/display/CodeTools/asmtools
    1.43 +//
    1.44 +// NOTE: Uses nashorn internals and so *may* break with later nashorn!
    1.45 +
    1.46 +super public class Main
    1.47 +	version 52:0
    1.48 +{
    1.49 +
    1.50 +
    1.51 +public Method "<init>":"()V"
    1.52 +	stack 1 locals 1
    1.53 +{
    1.54 +		aload_0;
    1.55 +		invokespecial	Method java/lang/Object."<init>":"()V";
    1.56 +		return;
    1.57 +}
    1.58 +
    1.59 +public static Method main:"([Ljava/lang/String;)V"
    1.60 +	stack 2 locals 2
    1.61 +{
    1.62 +                // List l = new ArrayList();
    1.63 +		new	class java/util/ArrayList;
    1.64 +		dup;
    1.65 +		invokespecial	Method java/util/ArrayList."<init>":"()V";
    1.66 +		astore_1;
    1.67 +		aload_1;
    1.68 +
    1.69 +                // l.add("hello");
    1.70 +		ldc	String "hello";
    1.71 +		invokeinterface	InterfaceMethod java/util/List.add:"(Ljava/lang/Object;)Z",  2;
    1.72 +		pop;
    1.73 +
    1.74 +                // l.add("world");
    1.75 +		aload_1;
    1.76 +		ldc	String "world";
    1.77 +		invokeinterface	InterfaceMethod java/util/List.add:"(Ljava/lang/Object;)Z",  2;
    1.78 +		pop;
    1.79 +
    1.80 +                // printLength(l);
    1.81 +		aload_1;
    1.82 +		invokestatic	Method printLength:"(Ljava/lang/Object;)V";
    1.83 +
    1.84 +                // printLength(args); // args is argument of main method
    1.85 +		aload_0;
    1.86 +		invokestatic	Method printLength:"(Ljava/lang/Object;)V";
    1.87 +		return;
    1.88 +}
    1.89 +
    1.90 +private static Method printLength:"(Ljava/lang/Object;)V"
    1.91 +	stack 2 locals 1
    1.92 +{
    1.93 +		getstatic	Field java/lang/System.out:"Ljava/io/PrintStream;";
    1.94 +		aload_0;
    1.95 +
    1.96 +                // Using nashorn embedded dynalink linker with the following invokedynamic
    1.97 +                // 'length' property on a bean - arrays, lists supported
    1.98 +
    1.99 +                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;
   1.100 +
   1.101 +                // print 'length' value
   1.102 +		invokevirtual	Method java/io/PrintStream.println:"(Ljava/lang/Object;)V";
   1.103 +		return;
   1.104 +}
   1.105 +
   1.106 +} // end Class Main

mercurial