src/share/classes/java/lang/invoke/LambdaForm.java
Index Unified diffs Context diffs Sdiffs Patch New Old Previous File Next File jdk Sdiff src/share/classes/java/lang/invoke

src/share/classes/java/lang/invoke/LambdaForm.java

Print this page
rev 9490 : 8037210: Get rid of char-based descriptions 'J' of basic types
Reviewed-by: jrose, ?
rev 9491 : [mq]: meth-btype.1


  13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14  * version 2 for more details (a copy is included in the LICENSE file that
  15  * accompanied this code).
  16  *
  17  * You should have received a copy of the GNU General Public License version
  18  * 2 along with this work; if not, write to the Free Software Foundation,
  19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  20  *
  21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  22  * or visit www.oracle.com if you need additional information or have any
  23  * questions.
  24  */
  25 
  26 package java.lang.invoke;
  27 
  28 import java.lang.annotation.*;
  29 import java.lang.reflect.Method;
  30 import java.util.Map;
  31 import java.util.List;
  32 import java.util.Arrays;
  33 import java.util.ArrayList;
  34 import java.util.HashMap;
  35 import java.util.concurrent.ConcurrentHashMap;
  36 import sun.invoke.util.Wrapper;



  37 import static java.lang.invoke.MethodHandleStatics.*;
  38 import static java.lang.invoke.MethodHandleNatives.Constants.*;
  39 import java.lang.reflect.Field;
  40 import java.util.Objects;
  41 
  42 /**
  43  * The symbolic, non-executable form of a method handle's invocation semantics.
  44  * It consists of a series of names.
  45  * The first N (N=arity) names are parameters,
  46  * while any remaining names are temporary values.
  47  * Each temporary specifies the application of a function to some arguments.
  48  * The functions are method handles, while the arguments are mixes of
  49  * constant values and local names.
  50  * The result of the lambda is defined as one of the names, often the last one.
  51  * <p>
  52  * Here is an approximate grammar:
  53  * <blockquote><pre>{@code
  54  * LambdaForm = "(" ArgName* ")=>{" TempName* Result "}"
  55  * ArgName = "a" N ":" T
  56  * TempName = "t" N ":" T "=" Function "(" Argument* ");"
  57  * Function = ConstantValue
  58  * Argument = NameRef | ConstantValue
  59  * Result = NameRef | "void"
  60  * NameRef = "a" N | "t" N


 113  * (a0:L, a1:L)=>{ t2:L = BoundMethodHandle#argument(a0);
 114  *                 t3:L = Class#cast(t2,a1); t3 }
 115  *     == invoker for identity method handle which performs cast
 116  * }</pre></blockquote>
 117  * <p>
 118  * @author John Rose, JSR 292 EG
 119  */
 120 class LambdaForm {
 121     final int arity;
 122     final int result;
 123     @Stable final Name[] names;
 124     final String debugName;
 125     MemberName vmentry;   // low-level behavior, or null if not yet prepared
 126     private boolean isCompiled;
 127 
 128     // Caches for common structural transforms:
 129     LambdaForm[] bindCache;
 130 
 131     public static final int VOID_RESULT = -1, LAST_RESULT = -2;
 132 










































































































 133     LambdaForm(String debugName,
 134                int arity, Name[] names, int result) {
 135         assert(namesOK(arity, names));
 136         this.arity = arity;
 137         this.result = fixResult(result, names);
 138         this.names = names.clone();
 139         this.debugName = debugName;
 140         normalize();
 141     }
 142 
 143     LambdaForm(String debugName,
 144                int arity, Name[] names) {
 145         this(debugName,
 146              arity, names, LAST_RESULT);
 147     }
 148 
 149     LambdaForm(String debugName,
 150                Name[] formals, Name[] temps, Name result) {
 151         this(debugName,
 152              formals.length, buildNames(formals, temps, result), LAST_RESULT);
 153     }
 154 
 155     private static Name[] buildNames(Name[] formals, Name[] temps, Name result) {
 156         int arity = formals.length;
 157         int length = arity + temps.length + (result == null ? 0 : 1);
 158         Name[] names = Arrays.copyOf(formals, length);
 159         System.arraycopy(temps, 0, names, arity, temps.length);
 160         if (result != null)
 161             names[length - 1] = result;
 162         return names;
 163     }
 164 
 165     private LambdaForm(String sig) {
 166         // Make a blank lambda form, which returns a constant zero or null.
 167         // It is used as a template for managing the invocation of similar forms that are non-empty.
 168         // Called only from getPreparedForm.
 169         assert(isValidSignature(sig));
 170         this.arity = signatureArity(sig);
 171         this.result = (signatureReturn(sig) == 'V' ? -1 : arity);
 172         this.names = buildEmptyNames(arity, sig);
 173         this.debugName = "LF.zero";
 174         assert(nameRefsAreLegal());
 175         assert(isEmpty());
 176         assert(sig.equals(basicTypeSignature()));
 177     }
 178 
 179     private static Name[] buildEmptyNames(int arity, String basicTypeSignature) {
 180         assert(isValidSignature(basicTypeSignature));
 181         int resultPos = arity + 1;  // skip '_'
 182         if (arity < 0 || basicTypeSignature.length() != resultPos+1)
 183             throw new IllegalArgumentException("bad arity for "+basicTypeSignature);
 184         int numRes = (basicTypeSignature.charAt(resultPos) == 'V' ? 0 : 1);
 185         Name[] names = arguments(numRes, basicTypeSignature.substring(0, arity));
 186         for (int i = 0; i < numRes; i++) {
 187             names[arity + i] = constantZero(arity + i, basicTypeSignature.charAt(resultPos + i));

 188         }
 189         return names;
 190     }
 191 
 192     private static int fixResult(int result, Name[] names) {
 193         if (result >= 0) {
 194             if (names[result].type == 'V')
 195                 return -1;
 196         } else if (result == LAST_RESULT) {
 197             return names.length - 1;
 198         }
 199         return result;
 200     }
 201 
































 202     private static boolean namesOK(int arity, Name[] names) {
 203         for (int i = 0; i < names.length; i++) {
 204             Name n = names[i];
 205             assert(n != null) : "n is null";
 206             if (i < arity)
 207                 assert( n.isParam()) : n + " is not param at " + i;
 208             else
 209                 assert(!n.isParam()) : n + " is param at " + i;
 210         }
 211         return true;
 212     }
 213 
 214     /** Renumber and/or replace params so that they are interned and canonically numbered. */
 215     private void normalize() {
 216         Name[] oldNames = null;
 217         int changesStart = 0;
 218         for (int i = 0; i < names.length; i++) {
 219             Name n = names[i];
 220             if (!n.initIndex(i)) {
 221                 if (oldNames == null) {


 277             for (Object arg : n.arguments) {
 278                 if (arg instanceof Name) {
 279                     Name n2 = (Name) arg;
 280                     int i2 = n2.index;
 281                     assert(0 <= i2 && i2 < names.length) : n.debugString() + ": 0 <= i2 && i2 < names.length: 0 <= " + i2 + " < " + names.length;
 282                     assert(names[i2] == n2) : Arrays.asList("-1-", i, "-2-", n.debugString(), "-3-", i2, "-4-", n2.debugString(), "-5-", names[i2].debugString(), "-6-", this);
 283                     assert(i2 < i);  // ref must come after def!
 284                 }
 285             }
 286         }
 287         return true;
 288     }
 289 
 290     /** Invoke this form on the given arguments. */
 291     // final Object invoke(Object... args) throws Throwable {
 292     //     // NYI: fit this into the fast path?
 293     //     return interpretWithArguments(args);
 294     // }
 295 
 296     /** Report the return type. */
 297     char returnType() {
 298         if (result < 0)  return 'V';
 299         Name n = names[result];
 300         return n.type;
 301     }
 302 
 303     /** Report the N-th argument type. */
 304     char parameterType(int n) {
 305         assert(n < arity);
 306         return names[n].type;
 307     }
 308 
 309     /** Report the arity. */
 310     int arity() {
 311         return arity;
 312     }
 313 
 314     /** Return the method type corresponding to my basic type signature. */
 315     MethodType methodType() {
 316         return signatureType(basicTypeSignature());
 317     }
 318     /** Return ABC_Z, where the ABC are parameter type characters, and Z is the return type character. */
 319     final String basicTypeSignature() {
 320         StringBuilder buf = new StringBuilder(arity() + 3);
 321         for (int i = 0, a = arity(); i < a; i++)
 322             buf.append(parameterType(i));
 323         return buf.append('_').append(returnType()).toString();
 324     }
 325     static int signatureArity(String sig) {
 326         assert(isValidSignature(sig));
 327         return sig.indexOf('_');
 328     }
 329     static char signatureReturn(String sig) {
 330         return sig.charAt(signatureArity(sig)+1);
 331     }
 332     static boolean isValidSignature(String sig) {
 333         int arity = sig.indexOf('_');
 334         if (arity < 0)  return false;  // must be of the form *_*
 335         int siglen = sig.length();
 336         if (siglen != arity + 2)  return false;  // *_X
 337         for (int i = 0; i < siglen; i++) {
 338             if (i == arity)  continue;  // skip '_'
 339             char c = sig.charAt(i);
 340             if (c == 'V')
 341                 return (i == siglen - 1 && arity == siglen - 2);
 342             if (ALL_TYPES.indexOf(c) < 0)  return false; // must be [LIJFD]
 343         }
 344         return true;  // [LIJFD]*_[LIJFDV]
 345     }
 346     static Class<?> typeClass(char t) {
 347         switch (t) {
 348         case 'I': return int.class;
 349         case 'J': return long.class;
 350         case 'F': return float.class;
 351         case 'D': return double.class;
 352         case 'L': return Object.class;
 353         case 'V': return void.class;
 354         default: assert false;
 355         }
 356         return null;
 357     }
 358     static MethodType signatureType(String sig) {
 359         Class<?>[] ptypes = new Class<?>[signatureArity(sig)];
 360         for (int i = 0; i < ptypes.length; i++)
 361             ptypes[i] = typeClass(sig.charAt(i));
 362         Class<?> rtype = typeClass(signatureReturn(sig));
 363         return MethodType.methodType(rtype, ptypes);
 364     }
 365 
 366     /*
 367      * Code generation issues:
 368      *
 369      * Compiled LFs should be reusable in general.
 370      * The biggest issue is how to decide when to pull a name into
 371      * the bytecode, versus loading a reified form from the MH data.
 372      *
 373      * For example, an asType wrapper may require execution of a cast
 374      * after a call to a MH.  The target type of the cast can be placed
 375      * as a constant in the LF itself.  This will force the cast type
 376      * to be compiled into the bytecodes and native code for the MH.
 377      * Or, the target type of the cast can be erased in the LF, and
 378      * loaded from the MH data.  (Later on, if the MH as a whole is
 379      * inlined, the data will flow into the inlined instance of the LF,
 380      * as a constant, and the end result will be an optimal cast.)
 381      *
 382      * This erasure of cast types can be done with any use of


 526         LambdaForm prep =  mtype.form().cachedLambdaForm(MethodTypeForm.LF_INTERPRET);
 527         if (prep != null)  return prep;
 528         assert(isValidSignature(sig));
 529         prep = new LambdaForm(sig);
 530         prep.vmentry = InvokerBytecodeGenerator.generateLambdaFormInterpreterEntryPoint(sig);
 531         //LambdaForm prep2 = PREPARED_FORMS.putIfAbsent(sig.intern(), prep);
 532         return mtype.form().setCachedLambdaForm(MethodTypeForm.LF_INTERPRET, prep);
 533     }
 534 
 535     // The next few routines are called only from assert expressions
 536     // They verify that the built-in invokers process the correct raw data types.
 537     private static boolean argumentTypesMatch(String sig, Object[] av) {
 538         int arity = signatureArity(sig);
 539         assert(av.length == arity) : "av.length == arity: av.length=" + av.length + ", arity=" + arity;
 540         assert(av[0] instanceof MethodHandle) : "av[0] not instace of MethodHandle: " + av[0];
 541         MethodHandle mh = (MethodHandle) av[0];
 542         MethodType mt = mh.type();
 543         assert(mt.parameterCount() == arity-1);
 544         for (int i = 0; i < av.length; i++) {
 545             Class<?> pt = (i == 0 ? MethodHandle.class : mt.parameterType(i-1));
 546             assert(valueMatches(sig.charAt(i), pt, av[i]));
 547         }
 548         return true;
 549     }
 550     private static boolean valueMatches(char tc, Class<?> type, Object x) {
 551         // The following line is needed because (...)void method handles can use non-void invokers
 552         if (type == void.class)  tc = 'V';   // can drop any kind of value
 553         assert tc == basicType(type) : tc + " == basicType(" + type + ")=" + basicType(type);
 554         switch (tc) {
 555         case 'I': assert checkInt(type, x)   : "checkInt(" + type + "," + x +")";   break;
 556         case 'J': assert x instanceof Long   : "instanceof Long: " + x;             break;
 557         case 'F': assert x instanceof Float  : "instanceof Float: " + x;            break;
 558         case 'D': assert x instanceof Double : "instanceof Double: " + x;           break;
 559         case 'L': assert checkRef(type, x)   : "checkRef(" + type + "," + x + ")";  break;
 560         case 'V': break;  // allow anything here; will be dropped
 561         default:  assert(false);
 562         }
 563         return true;
 564     }
 565     private static boolean returnTypesMatch(String sig, Object[] av, Object res) {
 566         MethodHandle mh = (MethodHandle) av[0];
 567         return valueMatches(signatureReturn(sig), mh.type().returnType(), res);
 568     }
 569     private static boolean checkInt(Class<?> type, Object x) {
 570         assert(x instanceof Integer);
 571         if (type == int.class)  return true;
 572         Wrapper w = Wrapper.forBasicType(type);
 573         assert(w.isSubwordOrInt());
 574         Object x1 = Wrapper.INT.wrap(w.wrap(x));
 575         return x.equals(x1);
 576     }
 577     private static boolean checkRef(Class<?> type, Object x) {
 578         assert(!type.isPrimitive());
 579         if (x == null)  return true;
 580         if (type.isInterface())  return true;


 719                 if (i+1 < arity)  buf.append(",");
 720                 continue;
 721             }
 722             buf.append("=").append(n.exprString());
 723             buf.append(";");
 724         }
 725         buf.append(result < 0 ? "void" : names[result]).append("}");
 726         if (TRACE_INTERPRETER) {
 727             // Extra verbosity:
 728             buf.append(":").append(basicTypeSignature());
 729             buf.append("/").append(vmentry);
 730         }
 731         return buf.toString();
 732     }
 733 
 734     /**
 735      * Apply immediate binding for a Name in this form indicated by its position relative to the form.
 736      * The first parameter to a LambdaForm, a0:L, always represents the form's method handle, so 0 is not
 737      * accepted as valid.
 738      */
 739     LambdaForm bindImmediate(int pos, char basicType, Object value) {
 740         // must be an argument, and the types must match
 741         assert pos > 0 && pos < arity && names[pos].type == basicType && Name.typesMatch(basicType, value);
 742 
 743         int arity2 = arity - 1;
 744         Name[] names2 = new Name[names.length - 1];
 745         for (int r = 0, w = 0; r < names.length; ++r, ++w) { // (r)ead from names, (w)rite to names2
 746             Name n = names[r];
 747             if (n.isParam()) {
 748                 if (n.index == pos) {
 749                     // do not copy over the argument that is to be replaced with a literal,
 750                     // but adjust the write index
 751                     --w;
 752                 } else {
 753                     names2[w] = new Name(w, n.type);
 754                 }
 755             } else {
 756                 Object[] arguments2 = new Object[n.arguments.length];
 757                 for (int i = 0; i < n.arguments.length; ++i) {
 758                     Object arg = n.arguments[i];
 759                     if (arg instanceof Name) {


 765                             arguments2[i] = names2[ni];
 766                         } else {
 767                             // replacement position passed
 768                             arguments2[i] = names2[ni - 1];
 769                         }
 770                     } else {
 771                         arguments2[i] = arg;
 772                     }
 773                 }
 774                 names2[w] = new Name(n.function, arguments2);
 775                 names2[w].initIndex(w);
 776             }
 777         }
 778 
 779         int result2 = result == -1 ? -1 : result - 1;
 780         return new LambdaForm(debugName, arity2, names2, result2);
 781     }
 782 
 783     LambdaForm bind(int namePos, BoundMethodHandle.SpeciesData oldData) {
 784         Name name = names[namePos];
 785         BoundMethodHandle.SpeciesData newData = oldData.extendWithType(name.type);
 786         return bind(name, newData.getterName(names[0], oldData.fieldCount()), oldData, newData);
 787     }
 788     LambdaForm bind(Name name, Name binding,
 789                     BoundMethodHandle.SpeciesData oldData,
 790                     BoundMethodHandle.SpeciesData newData) {
 791         int pos = name.index;
 792         assert(name.isParam());
 793         assert(!binding.isParam());
 794         assert(name.type == binding.type);
 795         assert(0 <= pos && pos < arity && names[pos] == name);
 796         assert(binding.function.memberDeclaringClassOrNull() == newData.clazz);
 797         assert(oldData.getters.length == newData.getters.length-1);
 798         if (bindCache != null) {
 799             LambdaForm form = bindCache[pos];
 800             if (form != null) {
 801                 assert(form.contains(binding)) : "form << " + form + " >> does not contain binding << " + binding + " >>";
 802                 return form;
 803             }
 804         } else {
 805             bindCache = new LambdaForm[arity];
 806         }


 857         if (result2 == pos)
 858             result2 = insPos;
 859         else if (result2 > pos && result2 <= insPos)
 860             result2 -= 1;
 861 
 862         return bindCache[pos] = new LambdaForm(debugName, arity2, names2, result2);
 863     }
 864 
 865     boolean contains(Name name) {
 866         int pos = name.index();
 867         if (pos >= 0) {
 868             return pos < names.length && name.equals(names[pos]);
 869         }
 870         for (int i = arity; i < names.length; i++) {
 871             if (name.equals(names[i]))
 872                 return true;
 873         }
 874         return false;
 875     }
 876 
 877     LambdaForm addArguments(int pos, char... types) {
 878         assert(pos <= arity);
 879         int length = names.length;
 880         int inTypes = types.length;
 881         Name[] names2 = Arrays.copyOf(names, length + inTypes);
 882         int arity2 = arity + inTypes;
 883         int result2 = result;
 884         if (result2 >= arity)
 885             result2 += inTypes;
 886         // names array has MH in slot 0; skip it.
 887         int argpos = pos + 1;
 888         // Note:  The LF constructor will rename names2[argpos...].
 889         // Make space for new arguments (shift temporaries).
 890         System.arraycopy(names, argpos, names2, argpos + inTypes, length - argpos);
 891         for (int i = 0; i < inTypes; i++) {
 892             names2[argpos + i] = new Name(types[i]);
 893         }
 894         return new LambdaForm(debugName, arity2, names2, result2);
 895     }
 896 
 897     LambdaForm addArguments(int pos, List<Class<?>> types) {
 898         char[] basicTypes = new char[types.size()];
 899         for (int i = 0; i < basicTypes.length; i++)
 900             basicTypes[i] = basicType(types.get(i));
 901         return addArguments(pos, basicTypes);
 902     }
 903 
 904     LambdaForm permuteArguments(int skip, int[] reorder, char[] types) {
 905         // Note:  When inArg = reorder[outArg], outArg is fed by a copy of inArg.
 906         // The types are the types of the new (incoming) arguments.
 907         int length = names.length;
 908         int inTypes = types.length;
 909         int outArgs = reorder.length;
 910         assert(skip+outArgs == arity);
 911         assert(permutedTypesMatch(reorder, types, names, skip));
 912         int pos = 0;
 913         // skip trivial first part of reordering:
 914         while (pos < outArgs && reorder[pos] == pos)  pos += 1;
 915         Name[] names2 = new Name[length - outArgs + inTypes];
 916         System.arraycopy(names, 0, names2, 0, skip+pos);
 917         // copy the body:
 918         int bodyLength = length - arity;
 919         System.arraycopy(names, skip+outArgs, names2, skip+inTypes, bodyLength);
 920         int arity2 = names2.length - bodyLength;
 921         int result2 = result;
 922         if (result2 >= 0) {
 923             if (result2 < skip+outArgs) {
 924                 // return the corresponding inArg


 943         }
 944         // some names are unused, but must be filled in
 945         for (int i = skip+pos; i < arity2; i++) {
 946             if (names2[i] == null)
 947                 names2[i] = argument(i, types[i - skip]);
 948         }
 949         for (int j = arity; j < names.length; j++) {
 950             int i = j - arity + arity2;
 951             // replace names2[i] by names[j]
 952             Name n = names[j];
 953             Name n2 = names2[i];
 954             if (n != n2) {
 955                 for (int k = i+1; k < names2.length; k++) {
 956                     names2[k] = names2[k].replaceName(n, n2);
 957                 }
 958             }
 959         }
 960         return new LambdaForm(debugName, arity2, names2, result2);
 961     }
 962 
 963     static boolean permutedTypesMatch(int[] reorder, char[] types, Name[] names, int skip) {
 964         int inTypes = types.length;
 965         int outArgs = reorder.length;
 966         for (int i = 0; i < outArgs; i++) {
 967             assert(names[skip+i].isParam());
 968             assert(names[skip+i].type == types[reorder[i]]);
 969         }
 970         return true;
 971     }
 972 
 973     static class NamedFunction {
 974         final MemberName member;
 975         @Stable MethodHandle resolvedHandle;
 976         @Stable MethodHandle invoker;
 977 
 978         NamedFunction(MethodHandle resolvedHandle) {
 979             this(resolvedHandle.internalMemberName(), resolvedHandle);
 980         }
 981         NamedFunction(MemberName member, MethodHandle resolvedHandle) {
 982             this.member = member;
 983             //resolvedHandle = eraseSubwordTypes(resolvedHandle);


1027             return this.member != null && this.member.equals(that.member);
1028         }
1029 
1030         @Override
1031         public int hashCode() {
1032             if (member != null)
1033                 return member.hashCode();
1034             return super.hashCode();
1035         }
1036 
1037         // Put the predefined NamedFunction invokers into the table.
1038         static void initializeInvokers() {
1039             for (MemberName m : MemberName.getFactory().getMethods(NamedFunction.class, false, null, null, null)) {
1040                 if (!m.isStatic() || !m.isPackage())  continue;
1041                 MethodType type = m.getMethodType();
1042                 if (type.equals(INVOKER_METHOD_TYPE) &&
1043                     m.getName().startsWith("invoke_")) {
1044                     String sig = m.getName().substring("invoke_".length());
1045                     int arity = LambdaForm.signatureArity(sig);
1046                     MethodType srcType = MethodType.genericMethodType(arity);
1047                     if (LambdaForm.signatureReturn(sig) == 'V')
1048                         srcType = srcType.changeReturnType(void.class);
1049                     MethodTypeForm typeForm = srcType.form();
1050                     typeForm.namedFunctionInvoker = DirectMethodHandle.make(m);
1051                 }
1052             }
1053         }
1054 
1055         // The following are predefined NamedFunction invokers.  The system must build
1056         // a separate invoker for each distinct signature.
1057         /** void return type invokers. */
1058         @Hidden
1059         static Object invoke__V(MethodHandle mh, Object[] a) throws Throwable {
1060             assert(a.length == 0);
1061             mh.invokeBasic();
1062             return null;
1063         }
1064         @Hidden
1065         static Object invoke_L_V(MethodHandle mh, Object[] a) throws Throwable {
1066             assert(a.length == 1);
1067             mh.invokeBasic(a[0]);


1117             assert(a.length == 4);
1118             return mh.invokeBasic(a[0], a[1], a[2], a[3]);
1119         }
1120         @Hidden
1121         static Object invoke_LLLLL_L(MethodHandle mh, Object[] a) throws Throwable {
1122             assert(a.length == 5);
1123             return mh.invokeBasic(a[0], a[1], a[2], a[3], a[4]);
1124         }
1125 
1126         static final MethodType INVOKER_METHOD_TYPE =
1127             MethodType.methodType(Object.class, MethodHandle.class, Object[].class);
1128 
1129         private static MethodHandle computeInvoker(MethodTypeForm typeForm) {
1130             MethodHandle mh = typeForm.namedFunctionInvoker;
1131             if (mh != null)  return mh;
1132             MemberName invoker = InvokerBytecodeGenerator.generateNamedFunctionInvoker(typeForm);  // this could take a while
1133             mh = DirectMethodHandle.make(invoker);
1134             MethodHandle mh2 = typeForm.namedFunctionInvoker;
1135             if (mh2 != null)  return mh2;  // benign race
1136             if (!mh.type().equals(INVOKER_METHOD_TYPE))
1137                 throw new InternalError(mh.debugString());
1138             return typeForm.namedFunctionInvoker = mh;
1139         }
1140 
1141         @Hidden
1142         Object invokeWithArguments(Object... arguments) throws Throwable {
1143             // If we have a cached invoker, call it right away.
1144             // NOTE: The invoker always returns a reference value.
1145             if (TRACE_INTERPRETER)  return invokeWithArgumentsTracing(arguments);
1146             assert(checkArgumentTypes(arguments, methodType()));
1147             return invoker().invokeBasic(resolvedHandle(), arguments);
1148         }
1149 
1150         @Hidden
1151         Object invokeWithArgumentsTracing(Object[] arguments) throws Throwable {
1152             Object rval;
1153             try {
1154                 traceInterpreter("[ call", this, arguments);
1155                 if (invoker == null) {
1156                     traceInterpreter("| getInvoker", this);
1157                     invoker();


1176             return invoker = computeInvoker(methodType().form());
1177         }
1178 
1179         private static boolean checkArgumentTypes(Object[] arguments, MethodType methodType) {
1180             if (true)  return true;  // FIXME
1181             MethodType dstType = methodType.form().erasedType();
1182             MethodType srcType = dstType.basicType().wrap();
1183             Class<?>[] ptypes = new Class<?>[arguments.length];
1184             for (int i = 0; i < arguments.length; i++) {
1185                 Object arg = arguments[i];
1186                 Class<?> ptype = arg == null ? Object.class : arg.getClass();
1187                 // If the dest. type is a primitive we keep the
1188                 // argument type.
1189                 ptypes[i] = dstType.parameterType(i).isPrimitive() ? ptype : Object.class;
1190             }
1191             MethodType argType = MethodType.methodType(srcType.returnType(), ptypes).wrap();
1192             assert(argType.isConvertibleTo(srcType)) : "wrong argument types: cannot convert " + argType + " to " + srcType;
1193             return true;
1194         }
1195 
1196         String basicTypeSignature() {
1197             //return LambdaForm.basicTypeSignature(resolvedHandle.type());
1198             return LambdaForm.basicTypeSignature(methodType());
1199         }
1200 
1201         MethodType methodType() {
1202             if (resolvedHandle != null)
1203                 return resolvedHandle.type();
1204             else
1205                 // only for certain internal LFs during bootstrapping
1206                 return member.getInvocationType();
1207         }
1208 
1209         MemberName member() {
1210             assert(assertMemberIsConsistent());
1211             return member;
1212         }
1213 
1214         // Called only from assert.
1215         private boolean assertMemberIsConsistent() {
1216             if (resolvedHandle instanceof DirectMethodHandle) {
1217                 MemberName m = resolvedHandle.internalMemberName();
1218                 assert(m.equals(member));
1219             }
1220             return true;
1221         }
1222 
1223         Class<?> memberDeclaringClassOrNull() {
1224             return (member == null) ? null : member.getDeclaringClass();
1225         }
1226 
1227         char returnType() {
1228             return basicType(methodType().returnType());
1229         }
1230 
1231         char parameterType(int n) {
1232             return basicType(methodType().parameterType(n));
1233         }
1234 
1235         int arity() {
1236             //int siglen = member.getMethodType().parameterCount();
1237             //if (!member.isStatic())  siglen += 1;
1238             //return siglen;
1239             return methodType().parameterCount();
1240         }
1241 
1242         public String toString() {
1243             if (member == null)  return String.valueOf(resolvedHandle);
1244             return member.getDeclaringClass().getSimpleName()+"."+member.getName();
1245         }
1246     }
1247 
1248     void resolve() {
1249         for (Name n : names) n.resolve();
1250     }
1251 
1252     public static char basicType(Class<?> type) {
1253         char c = Wrapper.basicTypeChar(type);
1254         if ("ZBSC".indexOf(c) >= 0)  c = 'I';
1255         assert("LIJFDV".indexOf(c) >= 0);
1256         return c;
1257     }
1258     public static char[] basicTypes(List<Class<?>> types) {
1259         char[] btypes = new char[types.size()];
1260         for (int i = 0; i < btypes.length; i++) {
1261             btypes[i] = basicType(types.get(i));
1262         }
1263         return btypes;
1264     }

1265     public static String basicTypeSignature(MethodType type) {
1266         char[] sig = new char[type.parameterCount() + 2];
1267         int sigp = 0;
1268         for (Class<?> pt : type.parameterList()) {
1269             sig[sigp++] = basicType(pt);
1270         }
1271         sig[sigp++] = '_';
1272         sig[sigp++] = basicType(type.returnType());
1273         assert(sigp == sig.length);
1274         return String.valueOf(sig);
1275     }




























1276 
1277     static final class Name {
1278         final char type;
1279         private short index;
1280         final NamedFunction function;
1281         @Stable final Object[] arguments;
1282 
1283         private Name(int index, char type, NamedFunction function, Object[] arguments) {
1284             this.index = (short)index;
1285             this.type = type;
1286             this.function = function;
1287             this.arguments = arguments;
1288             assert(this.index == index);
1289         }
1290         Name(MethodHandle function, Object... arguments) {
1291             this(new NamedFunction(function), arguments);
1292         }
1293         Name(MethodType functionType, Object... arguments) {
1294             this(new NamedFunction(functionType), arguments);
1295             assert(arguments[0] instanceof Name && ((Name)arguments[0]).type == 'L');
1296         }
1297         Name(MemberName function, Object... arguments) {
1298             this(new NamedFunction(function), arguments);
1299         }
1300         Name(NamedFunction function, Object... arguments) {
1301             this(-1, function.returnType(), function, arguments = arguments.clone());
1302             assert(arguments.length == function.arity()) : "arity mismatch: arguments.length=" + arguments.length + " == function.arity()=" + function.arity() + " in " + debugString();
1303             for (int i = 0; i < arguments.length; i++)
1304                 assert(typesMatch(function.parameterType(i), arguments[i])) : "types don't match: function.parameterType(" + i + ")=" + function.parameterType(i) + ", arguments[" + i + "]=" + arguments[i] + " in " + debugString();
1305         }
1306         Name(int index, char type) {

1307             this(index, type, null, null);
1308         }
1309         Name(char type) {
1310             this(-1, type);
1311         }
1312 
1313         char type() { return type; }
1314         int index() { return index; }
1315         boolean initIndex(int i) {
1316             if (index != i) {
1317                 if (index != -1)  return false;
1318                 index = (short)i;
1319             }
1320             return true;
1321         }
1322 


1323 
1324         void resolve() {
1325             if (function != null)
1326                 function.resolve();
1327         }
1328 
1329         Name newIndex(int i) {
1330             if (initIndex(i))  return this;
1331             return cloneWithIndex(i);
1332         }
1333         Name cloneWithIndex(int i) {
1334             Object[] newArguments = (arguments == null) ? null : arguments.clone();
1335             return new Name(i, type, function, newArguments);
1336         }
1337         Name replaceName(Name oldName, Name newName) {  // FIXME: use replaceNames uniformly
1338             if (oldName == newName)  return this;
1339             @SuppressWarnings("LocalVariableHidesMemberVariable")
1340             Object[] arguments = this.arguments;
1341             if (arguments == null)  return this;
1342             boolean replaced = false;


1380                 }
1381             }
1382             if (!replaced)  return this;
1383             return new Name(function, arguments);
1384         }
1385         void internArguments() {
1386             @SuppressWarnings("LocalVariableHidesMemberVariable")
1387             Object[] arguments = this.arguments;
1388             for (int j = 0; j < arguments.length; j++) {
1389                 if (arguments[j] instanceof Name) {
1390                     Name n = (Name) arguments[j];
1391                     if (n.isParam() && n.index < INTERNED_ARGUMENT_LIMIT)
1392                         arguments[j] = internArgument(n);
1393                 }
1394             }
1395         }
1396         boolean isParam() {
1397             return function == null;
1398         }
1399         boolean isConstantZero() {
1400             return !isParam() && arguments.length == 0 && function.equals(constantZero(0, type).function);
1401         }
1402 
1403         public String toString() {
1404             return (isParam()?"a":"t")+(index >= 0 ? index : System.identityHashCode(this))+":"+type;
1405         }
1406         public String debugString() {
1407             String s = toString();
1408             return (function == null) ? s : s + "=" + exprString();
1409         }
1410         public String exprString() {
1411             if (function == null)  return "null";
1412             StringBuilder buf = new StringBuilder(function.toString());
1413             buf.append("(");
1414             String cma = "";
1415             for (Object a : arguments) {
1416                 buf.append(cma); cma = ",";
1417                 if (a instanceof Name || a instanceof Integer)
1418                     buf.append(a);
1419                 else
1420                     buf.append("(").append(a).append(")");
1421             }
1422             buf.append(")");
1423             return buf.toString();
1424         }
1425 
1426         private static boolean typesMatch(char parameterType, Object object) {
1427             if (object instanceof Name) {
1428                 return ((Name)object).type == parameterType;
1429             }
1430             switch (parameterType) {
1431                 case 'I':  return object instanceof Integer;
1432                 case 'J':  return object instanceof Long;
1433                 case 'F':  return object instanceof Float;
1434                 case 'D':  return object instanceof Double;
1435             }
1436             assert(parameterType == 'L');
1437             return true;
1438         }
1439 
1440         /**
1441          * Does this Name precede the given binding node in some canonical order?
1442          * This predicate is used to order data bindings (via insertion sort)
1443          * with some stability.
1444          */
1445         boolean isSiblingBindingBefore(Name binding) {
1446             assert(!binding.isParam());
1447             if (isParam())  return true;
1448             if (function.equals(binding.function) &&
1449                 arguments.length == binding.arguments.length) {
1450                 boolean sawInt = false;
1451                 for (int i = 0; i < arguments.length; i++) {
1452                     Object a1 = arguments[i];
1453                     Object a2 = binding.arguments[i];
1454                     if (!a1.equals(a2)) {
1455                         if (a1 instanceof Integer && a2 instanceof Integer) {
1456                             if (sawInt)  continue;


1493         }
1494 
1495         public boolean equals(Name that) {
1496             if (this == that)  return true;
1497             if (isParam())
1498                 // each parameter is a unique atom
1499                 return false;  // this != that
1500             return
1501                 //this.index == that.index &&
1502                 this.type == that.type &&
1503                 this.function.equals(that.function) &&
1504                 Arrays.equals(this.arguments, that.arguments);
1505         }
1506         @Override
1507         public boolean equals(Object x) {
1508             return x instanceof Name && equals((Name)x);
1509         }
1510         @Override
1511         public int hashCode() {
1512             if (isParam())
1513                 return index | (type << 8);
1514             return function.hashCode() ^ Arrays.hashCode(arguments);
1515         }
1516     }
1517 
1518     /** Return the index of the last name which contains n as an argument.
1519      *  Return -1 if the name is not used.  Return names.length if it is the return value.
1520      */
1521     int lastUseIndex(Name n) {
1522         int ni = n.index, nmax = names.length;
1523         assert(names[ni] == n);
1524         if (result == ni)  return nmax;  // live all the way beyond the end
1525         for (int i = nmax; --i > ni; ) {
1526             if (names[i].lastUseIndex(n) >= 0)
1527                 return i;
1528         }
1529         return -1;
1530     }
1531 
1532     /** Return the number of times n is used as an argument or return value. */
1533     int useCount(Name n) {
1534         int ni = n.index, nmax = names.length;
1535         int end = lastUseIndex(n);
1536         if (end < 0)  return 0;
1537         int count = 0;
1538         if (end == nmax) { count++; end--; }
1539         int beg = n.index() + 1;
1540         if (beg < arity)  beg = arity;
1541         for (int i = beg; i <= end; i++) {
1542             count += names[i].useCount(n);
1543         }
1544         return count;
1545     }
1546 
1547     static Name argument(int which, char type) {
1548         int tn = ALL_TYPES.indexOf(type);
1549         if (tn < 0 || which >= INTERNED_ARGUMENT_LIMIT)


1550             return new Name(which, type);
1551         return INTERNED_ARGUMENTS[tn][which];
1552     }
1553     static Name internArgument(Name n) {
1554         assert(n.isParam()) : "not param: " + n;
1555         assert(n.index < INTERNED_ARGUMENT_LIMIT);
1556         return argument(n.index, n.type);
1557     }
1558     static Name[] arguments(int extra, String types) {
1559         int length = types.length();
1560         Name[] names = new Name[length + extra];
1561         for (int i = 0; i < length; i++)
1562             names[i] = argument(i, types.charAt(i));
1563         return names;
1564     }
1565     static Name[] arguments(int extra, char... types) {
1566         int length = types.length;
1567         Name[] names = new Name[length + extra];
1568         for (int i = 0; i < length; i++)
1569             names[i] = argument(i, types[i]);
1570         return names;
1571     }


1573         int length = types.size();
1574         Name[] names = new Name[length + extra];
1575         for (int i = 0; i < length; i++)
1576             names[i] = argument(i, basicType(types.get(i)));
1577         return names;
1578     }
1579     static Name[] arguments(int extra, Class<?>... types) {
1580         int length = types.length;
1581         Name[] names = new Name[length + extra];
1582         for (int i = 0; i < length; i++)
1583             names[i] = argument(i, basicType(types[i]));
1584         return names;
1585     }
1586     static Name[] arguments(int extra, MethodType types) {
1587         int length = types.parameterCount();
1588         Name[] names = new Name[length + extra];
1589         for (int i = 0; i < length; i++)
1590             names[i] = argument(i, basicType(types.parameterType(i)));
1591         return names;
1592     }
1593     static final String ALL_TYPES = "LIJFD";  // omit V, not an argument type
1594     static final int INTERNED_ARGUMENT_LIMIT = 10;
1595     private static final Name[][] INTERNED_ARGUMENTS
1596             = new Name[ALL_TYPES.length()][INTERNED_ARGUMENT_LIMIT];
1597     static {
1598         for (int tn = 0; tn < ALL_TYPES.length(); tn++) {
1599             for (int i = 0; i < INTERNED_ARGUMENTS[tn].length; i++) {
1600                 char type = ALL_TYPES.charAt(tn);
1601                 INTERNED_ARGUMENTS[tn][i] = new Name(i, type);
1602             }
1603         }
1604     }
1605 
1606     private static final MemberName.Factory IMPL_NAMES = MemberName.getFactory();
1607 
1608     static Name constantZero(int which, char type) {
1609         return CONSTANT_ZERO[ALL_TYPES.indexOf(type)].newIndex(which);
1610     }
1611     private static final Name[] CONSTANT_ZERO
1612             = new Name[ALL_TYPES.length()];
1613     static {
1614         for (int tn = 0; tn < ALL_TYPES.length(); tn++) {
1615             char bt = ALL_TYPES.charAt(tn);
1616             Wrapper wrap = Wrapper.forBasicType(bt);
1617             MemberName zmem = new MemberName(LambdaForm.class, "zero"+bt, MethodType.methodType(wrap.primitiveType()), REF_invokeStatic);




















1618             try {
1619                 zmem = IMPL_NAMES.resolveOrFail(REF_invokeStatic, zmem, null, NoSuchMethodException.class);

1620             } catch (IllegalAccessException|NoSuchMethodException ex) {
1621                 throw newInternalError(ex);
1622             }
1623             NamedFunction zcon = new NamedFunction(zmem);
1624             Name n = new Name(zcon).newIndex(0);
1625             assert(n.type == ALL_TYPES.charAt(tn));
1626             CONSTANT_ZERO[tn] = n;
1627             assert(n.isConstantZero());









































1628         }
1629     }
1630 
1631     // Avoid appealing to ValueConversions at bootstrap time:
1632     private static int zeroI() { return 0; }
1633     private static long zeroJ() { return 0; }
1634     private static float zeroF() { return 0; }
1635     private static double zeroD() { return 0; }
1636     private static Object zeroL() { return null; }
1637 
1638     // Put this last, so that previous static inits can run before.
1639     static {
1640         if (USE_PREDEFINED_INTERPRET_METHODS)
1641             PREPARED_FORMS.putAll(computeInitialPreparedForms());
1642     }

1643 
1644     /**
1645      * Internal marker for byte-compiled LambdaForms.
1646      */
1647     /*non-public*/
1648     @Target(ElementType.METHOD)
1649     @Retention(RetentionPolicy.RUNTIME)
1650     @interface Compiled {
1651     }
1652 
1653     /**
1654      * Internal marker for LambdaForm interpreter frames.
1655      */
1656     /*non-public*/
1657     @Target(ElementType.METHOD)
1658     @Retention(RetentionPolicy.RUNTIME)
1659     @interface Hidden {
1660     }
1661 
1662 


1673         Object[] abc = { "a", "bc" };
1674         List<?> lst = (List<?>) MethodHandle.linkToStatic(abc, asList_MN);
1675         System.out.println("lst="+lst);
1676         MemberName toString_MN = new MemberName(Object.class.getMethod("toString"));
1677         String s1 = (String) MethodHandle.linkToVirtual(lst, toString_MN);
1678         toString_MN = new MemberName(Object.class.getMethod("toString"), true);
1679         String s2 = (String) MethodHandle.linkToSpecial(lst, toString_MN);
1680         System.out.println("[s1,s2,lst]="+Arrays.asList(s1, s2, lst.toString()));
1681         MemberName toArray_MN = new MemberName(List.class.getMethod("toArray"));
1682         Object[] arr = (Object[]) MethodHandle.linkToInterface(lst, toArray_MN);
1683         System.out.println("toArray="+Arrays.toString(arr));
1684     }
1685     static { try { testMethodHandleLinkers(); } catch (Throwable ex) { throw new RuntimeException(ex); } }
1686     // Requires these definitions in MethodHandle:
1687     static final native Object linkToStatic(Object x1, MemberName mn) throws Throwable;
1688     static final native Object linkToVirtual(Object x1, MemberName mn) throws Throwable;
1689     static final native Object linkToSpecial(Object x1, MemberName mn) throws Throwable;
1690     static final native Object linkToInterface(Object x1, MemberName mn) throws Throwable;
1691  */
1692 
1693     static { NamedFunction.initializeInvokers(); }














1694 
1695     // The following hack is necessary in order to suppress TRACE_INTERPRETER
1696     // during execution of the static initializes of this class.
1697     // Turning on TRACE_INTERPRETER too early will cause
1698     // stack overflows and other misbehavior during attempts to trace events
1699     // that occur during LambdaForm.<clinit>.
1700     // Therefore, do not move this line higher in this file, and do not remove.
1701     private static final boolean TRACE_INTERPRETER = MethodHandleStatics.TRACE_INTERPRETER;
1702 }


  13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14  * version 2 for more details (a copy is included in the LICENSE file that
  15  * accompanied this code).
  16  *
  17  * You should have received a copy of the GNU General Public License version
  18  * 2 along with this work; if not, write to the Free Software Foundation,
  19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  20  *
  21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  22  * or visit www.oracle.com if you need additional information or have any
  23  * questions.
  24  */
  25 
  26 package java.lang.invoke;
  27 
  28 import java.lang.annotation.*;
  29 import java.lang.reflect.Method;
  30 import java.util.Map;
  31 import java.util.List;
  32 import java.util.Arrays;

  33 import java.util.HashMap;
  34 import java.util.concurrent.ConcurrentHashMap;
  35 import sun.invoke.util.Wrapper;
  36 import java.lang.reflect.Field;
  37 
  38 import static java.lang.invoke.LambdaForm.BasicType.*;
  39 import static java.lang.invoke.MethodHandleStatics.*;
  40 import static java.lang.invoke.MethodHandleNatives.Constants.*;


  41 
  42 /**
  43  * The symbolic, non-executable form of a method handle's invocation semantics.
  44  * It consists of a series of names.
  45  * The first N (N=arity) names are parameters,
  46  * while any remaining names are temporary values.
  47  * Each temporary specifies the application of a function to some arguments.
  48  * The functions are method handles, while the arguments are mixes of
  49  * constant values and local names.
  50  * The result of the lambda is defined as one of the names, often the last one.
  51  * <p>
  52  * Here is an approximate grammar:
  53  * <blockquote><pre>{@code
  54  * LambdaForm = "(" ArgName* ")=>{" TempName* Result "}"
  55  * ArgName = "a" N ":" T
  56  * TempName = "t" N ":" T "=" Function "(" Argument* ");"
  57  * Function = ConstantValue
  58  * Argument = NameRef | ConstantValue
  59  * Result = NameRef | "void"
  60  * NameRef = "a" N | "t" N


 113  * (a0:L, a1:L)=>{ t2:L = BoundMethodHandle#argument(a0);
 114  *                 t3:L = Class#cast(t2,a1); t3 }
 115  *     == invoker for identity method handle which performs cast
 116  * }</pre></blockquote>
 117  * <p>
 118  * @author John Rose, JSR 292 EG
 119  */
 120 class LambdaForm {
 121     final int arity;
 122     final int result;
 123     @Stable final Name[] names;
 124     final String debugName;
 125     MemberName vmentry;   // low-level behavior, or null if not yet prepared
 126     private boolean isCompiled;
 127 
 128     // Caches for common structural transforms:
 129     LambdaForm[] bindCache;
 130 
 131     public static final int VOID_RESULT = -1, LAST_RESULT = -2;
 132 
 133     enum BasicType {
 134         L_TYPE('L', Object.class, Wrapper.OBJECT),  // all reference types
 135         I_TYPE('I', int.class,    Wrapper.INT),
 136         J_TYPE('J', long.class,   Wrapper.LONG),
 137         F_TYPE('F', float.class,  Wrapper.FLOAT),
 138         D_TYPE('D', double.class, Wrapper.DOUBLE),  // all primitive types
 139         V_TYPE('V', void.class,   Wrapper.VOID);    // not valid in all contexts
 140 
 141         static final BasicType[] ALL_TYPES = BasicType.values();
 142         static final BasicType[] ARG_TYPES = Arrays.copyOf(ALL_TYPES, ALL_TYPES.length-1);
 143 
 144         static final int ARG_TYPE_LIMIT = ARG_TYPES.length;
 145         static final int TYPE_LIMIT = ALL_TYPES.length;
 146 
 147         private final char btChar;
 148         private final Class<?> btClass;
 149         private final Wrapper btWrapper;
 150 
 151         private BasicType(char btChar, Class<?> btClass, Wrapper wrapper) {
 152             this.btChar = btChar;
 153             this.btClass = btClass;
 154             this.btWrapper = wrapper;
 155         }
 156 
 157         char basicTypeChar() {
 158             return btChar;
 159         }
 160         Class<?> basicTypeClass() {
 161             return btClass;
 162         }
 163         Wrapper basicTypeWrapper() {
 164             return btWrapper;
 165         }
 166         int basicTypeSlots() {
 167             return btWrapper.stackSlots();
 168         }
 169 
 170         static BasicType basicType(byte type) {
 171             return ALL_TYPES[type];
 172         }
 173         static BasicType basicType(char type) {
 174             switch (type) {
 175                 case 'L': return L_TYPE;
 176                 case 'I': return I_TYPE;
 177                 case 'J': return J_TYPE;
 178                 case 'F': return F_TYPE;
 179                 case 'D': return D_TYPE;
 180                 case 'V': return V_TYPE;
 181                 // all subword types are represented as ints
 182                 case 'Z':
 183                 case 'B':
 184                 case 'S':
 185                 case 'C':
 186                     return I_TYPE;
 187                 default:
 188                     throw newInternalError("Unknown type char: '"+type+"'");
 189             }
 190         }
 191         static BasicType basicType(Wrapper type) {
 192             char c = type.basicTypeChar();
 193             return basicType(c);
 194         }
 195         static BasicType basicType(Class<?> type) {
 196             if (!type.isPrimitive())  return L_TYPE;
 197             return basicType(Wrapper.forPrimitiveType(type));
 198         }
 199 
 200         static char basicTypeChar(Class<?> type) {
 201             return basicType(type).btChar;
 202         }
 203         static BasicType[] basicTypes(List<Class<?>> types) {
 204             BasicType[] btypes = new BasicType[types.size()];
 205             for (int i = 0; i < btypes.length; i++) {
 206                 btypes[i] = basicType(types.get(i));
 207             }
 208             return btypes;
 209         }
 210         static BasicType[] basicTypes(String types) {
 211             BasicType[] btypes = new BasicType[types.length()];
 212             for (int i = 0; i < btypes.length; i++) {
 213                 btypes[i] = basicType(types.charAt(i));
 214             }
 215             return btypes;
 216         }
 217         static boolean isBasicTypeChar(char c) {
 218             return "LIJFDV".indexOf(c) >= 0;
 219         }
 220         static boolean isArgBasicTypeChar(char c) {
 221             return "LIJFD".indexOf(c) >= 0;
 222         }
 223 
 224         static { assert(checkBasicType()); }
 225         private static boolean checkBasicType() {
 226             for (int i = 0; i < ARG_TYPE_LIMIT; i++) {
 227                 assert ARG_TYPES[i].ordinal() == i;
 228                 assert ARG_TYPES[i] == ALL_TYPES[i];
 229             }
 230             for (int i = 0; i < TYPE_LIMIT; i++) {
 231                 assert ALL_TYPES[i].ordinal() == i;
 232             }
 233             assert ALL_TYPES[TYPE_LIMIT - 1] == V_TYPE;
 234             assert !Arrays.asList(ARG_TYPES).contains(V_TYPE);
 235             return true;
 236         }
 237     }
 238 
 239     LambdaForm(String debugName,
 240                int arity, Name[] names, int result) {
 241         assert(namesOK(arity, names));
 242         this.arity = arity;
 243         this.result = fixResult(result, names);
 244         this.names = names.clone();
 245         this.debugName = fixDebugName(debugName);
 246         normalize();
 247     }
 248 
 249     LambdaForm(String debugName,
 250                int arity, Name[] names) {
 251         this(debugName,
 252              arity, names, LAST_RESULT);
 253     }
 254 
 255     LambdaForm(String debugName,
 256                Name[] formals, Name[] temps, Name result) {
 257         this(debugName,
 258              formals.length, buildNames(formals, temps, result), LAST_RESULT);
 259     }
 260 
 261     private static Name[] buildNames(Name[] formals, Name[] temps, Name result) {
 262         int arity = formals.length;
 263         int length = arity + temps.length + (result == null ? 0 : 1);
 264         Name[] names = Arrays.copyOf(formals, length);
 265         System.arraycopy(temps, 0, names, arity, temps.length);
 266         if (result != null)
 267             names[length - 1] = result;
 268         return names;
 269     }
 270 
 271     private LambdaForm(String sig) {
 272         // Make a blank lambda form, which returns a constant zero or null.
 273         // It is used as a template for managing the invocation of similar forms that are non-empty.
 274         // Called only from getPreparedForm.
 275         assert(isValidSignature(sig));
 276         this.arity = signatureArity(sig);
 277         this.result = (signatureReturn(sig) == V_TYPE ? -1 : arity);
 278         this.names = buildEmptyNames(arity, sig);
 279         this.debugName = "LF.zero";
 280         assert(nameRefsAreLegal());
 281         assert(isEmpty());
 282         assert(sig.equals(basicTypeSignature())) : sig + " != " + basicTypeSignature();
 283     }
 284 
 285     private static Name[] buildEmptyNames(int arity, String basicTypeSignature) {
 286         assert(isValidSignature(basicTypeSignature));
 287         int resultPos = arity + 1;  // skip '_'
 288         if (arity < 0 || basicTypeSignature.length() != resultPos+1)
 289             throw new IllegalArgumentException("bad arity for "+basicTypeSignature);
 290         int numRes = (basicType(basicTypeSignature.charAt(resultPos)) == V_TYPE ? 0 : 1);
 291         Name[] names = arguments(numRes, basicTypeSignature.substring(0, arity));
 292         for (int i = 0; i < numRes; i++) {
 293             Name zero = new Name(constantZero(basicType(basicTypeSignature.charAt(resultPos + i))));
 294             names[arity + i] = zero.newIndex(arity + i);
 295         }
 296         return names;
 297     }
 298 
 299     private static int fixResult(int result, Name[] names) {
 300         if (result == LAST_RESULT)
 301             result = names.length - 1;  // might still be void
 302         if (result >= 0 && names[result].type == V_TYPE)
 303             result = VOID_RESULT;


 304         return result;
 305     }
 306 
 307     private static String fixDebugName(String debugName) {
 308         if (DEBUG_NAME_COUNTERS != null) {
 309             int under = debugName.indexOf('_');
 310             int length = debugName.length();
 311             if (under < 0)  under = length;
 312             String debugNameStem = debugName.substring(0, under);
 313             Integer ctr;
 314             synchronized (DEBUG_NAME_COUNTERS) {
 315                 ctr = DEBUG_NAME_COUNTERS.get(debugNameStem);
 316                 if (ctr == null)  ctr = 0;
 317                 DEBUG_NAME_COUNTERS.put(debugNameStem, ctr+1);
 318             }
 319             StringBuilder buf = new StringBuilder(debugNameStem);
 320             buf.append('_');
 321             int leadingZero = buf.length();
 322             buf.append((int) ctr);
 323             for (int i = buf.length() - leadingZero; i < 3; i++)
 324                 buf.insert(leadingZero, '0');
 325             if (under < length) {
 326                 ++under;    // skip "_"
 327                 while (under < length && Character.isDigit(debugName.charAt(under))) {
 328                     ++under;
 329                 }
 330                 if (under < length && debugName.charAt(under) == '_')  ++under;
 331                 if (under < length)
 332                     buf.append('_').append(debugName, under, length);
 333             }
 334             return buf.toString();
 335         }
 336         return debugName;
 337     }
 338 
 339     private static boolean namesOK(int arity, Name[] names) {
 340         for (int i = 0; i < names.length; i++) {
 341             Name n = names[i];
 342             assert(n != null) : "n is null";
 343             if (i < arity)
 344                 assert( n.isParam()) : n + " is not param at " + i;
 345             else
 346                 assert(!n.isParam()) : n + " is param at " + i;
 347         }
 348         return true;
 349     }
 350 
 351     /** Renumber and/or replace params so that they are interned and canonically numbered. */
 352     private void normalize() {
 353         Name[] oldNames = null;
 354         int changesStart = 0;
 355         for (int i = 0; i < names.length; i++) {
 356             Name n = names[i];
 357             if (!n.initIndex(i)) {
 358                 if (oldNames == null) {


 414             for (Object arg : n.arguments) {
 415                 if (arg instanceof Name) {
 416                     Name n2 = (Name) arg;
 417                     int i2 = n2.index;
 418                     assert(0 <= i2 && i2 < names.length) : n.debugString() + ": 0 <= i2 && i2 < names.length: 0 <= " + i2 + " < " + names.length;
 419                     assert(names[i2] == n2) : Arrays.asList("-1-", i, "-2-", n.debugString(), "-3-", i2, "-4-", n2.debugString(), "-5-", names[i2].debugString(), "-6-", this);
 420                     assert(i2 < i);  // ref must come after def!
 421                 }
 422             }
 423         }
 424         return true;
 425     }
 426 
 427     /** Invoke this form on the given arguments. */
 428     // final Object invoke(Object... args) throws Throwable {
 429     //     // NYI: fit this into the fast path?
 430     //     return interpretWithArguments(args);
 431     // }
 432 
 433     /** Report the return type. */
 434     BasicType returnType() {
 435         if (result < 0)  return V_TYPE;
 436         Name n = names[result];
 437         return n.type;
 438     }
 439 
 440     /** Report the N-th argument type. */
 441     BasicType parameterType(int n) {
 442         assert(n < arity);
 443         return names[n].type;
 444     }
 445 
 446     /** Report the arity. */
 447     int arity() {
 448         return arity;
 449     }
 450 
 451     /** Return the method type corresponding to my basic type signature. */
 452     MethodType methodType() {
 453         return signatureType(basicTypeSignature());
 454     }
 455     /** Return ABC_Z, where the ABC are parameter type characters, and Z is the return type character. */
 456     final String basicTypeSignature() {
 457         StringBuilder buf = new StringBuilder(arity() + 3);
 458         for (int i = 0, a = arity(); i < a; i++)
 459             buf.append(parameterType(i).basicTypeChar());
 460         return buf.append('_').append(returnType().basicTypeChar()).toString();
 461     }
 462     static int signatureArity(String sig) {
 463         assert(isValidSignature(sig));
 464         return sig.indexOf('_');
 465     }
 466     static BasicType signatureReturn(String sig) {
 467         return basicType(sig.charAt(signatureArity(sig)+1));
 468     }
 469     static boolean isValidSignature(String sig) {
 470         int arity = sig.indexOf('_');
 471         if (arity < 0)  return false;  // must be of the form *_*
 472         int siglen = sig.length();
 473         if (siglen != arity + 2)  return false;  // *_X
 474         for (int i = 0; i < siglen; i++) {
 475             if (i == arity)  continue;  // skip '_'
 476             char c = sig.charAt(i);
 477             if (c == 'V')
 478                 return (i == siglen - 1 && arity == siglen - 2);
 479             if (!isArgBasicTypeChar(c))  return false; // must be [LIJFD]
 480         }
 481         return true;  // [LIJFD]*_[LIJFDV]
 482     }












 483     static MethodType signatureType(String sig) {
 484         Class<?>[] ptypes = new Class<?>[signatureArity(sig)];
 485         for (int i = 0; i < ptypes.length; i++)
 486             ptypes[i] = basicType(sig.charAt(i)).btClass;
 487         Class<?> rtype = signatureReturn(sig).btClass;
 488         return MethodType.methodType(rtype, ptypes);
 489     }
 490 
 491     /*
 492      * Code generation issues:
 493      *
 494      * Compiled LFs should be reusable in general.
 495      * The biggest issue is how to decide when to pull a name into
 496      * the bytecode, versus loading a reified form from the MH data.
 497      *
 498      * For example, an asType wrapper may require execution of a cast
 499      * after a call to a MH.  The target type of the cast can be placed
 500      * as a constant in the LF itself.  This will force the cast type
 501      * to be compiled into the bytecodes and native code for the MH.
 502      * Or, the target type of the cast can be erased in the LF, and
 503      * loaded from the MH data.  (Later on, if the MH as a whole is
 504      * inlined, the data will flow into the inlined instance of the LF,
 505      * as a constant, and the end result will be an optimal cast.)
 506      *
 507      * This erasure of cast types can be done with any use of


 651         LambdaForm prep =  mtype.form().cachedLambdaForm(MethodTypeForm.LF_INTERPRET);
 652         if (prep != null)  return prep;
 653         assert(isValidSignature(sig));
 654         prep = new LambdaForm(sig);
 655         prep.vmentry = InvokerBytecodeGenerator.generateLambdaFormInterpreterEntryPoint(sig);
 656         //LambdaForm prep2 = PREPARED_FORMS.putIfAbsent(sig.intern(), prep);
 657         return mtype.form().setCachedLambdaForm(MethodTypeForm.LF_INTERPRET, prep);
 658     }
 659 
 660     // The next few routines are called only from assert expressions
 661     // They verify that the built-in invokers process the correct raw data types.
 662     private static boolean argumentTypesMatch(String sig, Object[] av) {
 663         int arity = signatureArity(sig);
 664         assert(av.length == arity) : "av.length == arity: av.length=" + av.length + ", arity=" + arity;
 665         assert(av[0] instanceof MethodHandle) : "av[0] not instace of MethodHandle: " + av[0];
 666         MethodHandle mh = (MethodHandle) av[0];
 667         MethodType mt = mh.type();
 668         assert(mt.parameterCount() == arity-1);
 669         for (int i = 0; i < av.length; i++) {
 670             Class<?> pt = (i == 0 ? MethodHandle.class : mt.parameterType(i-1));
 671             assert(valueMatches(basicType(sig.charAt(i)), pt, av[i]));
 672         }
 673         return true;
 674     }
 675     private static boolean valueMatches(BasicType tc, Class<?> type, Object x) {
 676         // The following line is needed because (...)void method handles can use non-void invokers
 677         if (type == void.class)  tc = V_TYPE;   // can drop any kind of value
 678         assert tc == basicType(type) : tc + " == basicType(" + type + ")=" + basicType(type);
 679         switch (tc) {
 680         case I_TYPE: assert checkInt(type, x)   : "checkInt(" + type + "," + x +")";   break;
 681         case J_TYPE: assert x instanceof Long   : "instanceof Long: " + x;             break;
 682         case F_TYPE: assert x instanceof Float  : "instanceof Float: " + x;            break;
 683         case D_TYPE: assert x instanceof Double : "instanceof Double: " + x;           break;
 684         case L_TYPE: assert checkRef(type, x)   : "checkRef(" + type + "," + x + ")";  break;
 685         case V_TYPE: break;  // allow anything here; will be dropped
 686         default:  assert(false);
 687         }
 688         return true;
 689     }
 690     private static boolean returnTypesMatch(String sig, Object[] av, Object res) {
 691         MethodHandle mh = (MethodHandle) av[0];
 692         return valueMatches(signatureReturn(sig), mh.type().returnType(), res);
 693     }
 694     private static boolean checkInt(Class<?> type, Object x) {
 695         assert(x instanceof Integer);
 696         if (type == int.class)  return true;
 697         Wrapper w = Wrapper.forBasicType(type);
 698         assert(w.isSubwordOrInt());
 699         Object x1 = Wrapper.INT.wrap(w.wrap(x));
 700         return x.equals(x1);
 701     }
 702     private static boolean checkRef(Class<?> type, Object x) {
 703         assert(!type.isPrimitive());
 704         if (x == null)  return true;
 705         if (type.isInterface())  return true;


 844                 if (i+1 < arity)  buf.append(",");
 845                 continue;
 846             }
 847             buf.append("=").append(n.exprString());
 848             buf.append(";");
 849         }
 850         buf.append(result < 0 ? "void" : names[result]).append("}");
 851         if (TRACE_INTERPRETER) {
 852             // Extra verbosity:
 853             buf.append(":").append(basicTypeSignature());
 854             buf.append("/").append(vmentry);
 855         }
 856         return buf.toString();
 857     }
 858 
 859     /**
 860      * Apply immediate binding for a Name in this form indicated by its position relative to the form.
 861      * The first parameter to a LambdaForm, a0:L, always represents the form's method handle, so 0 is not
 862      * accepted as valid.
 863      */
 864     LambdaForm bindImmediate(int pos, BasicType basicType, Object value) {
 865         // must be an argument, and the types must match
 866         assert pos > 0 && pos < arity && names[pos].type == basicType && Name.typesMatch(basicType, value);
 867 
 868         int arity2 = arity - 1;
 869         Name[] names2 = new Name[names.length - 1];
 870         for (int r = 0, w = 0; r < names.length; ++r, ++w) { // (r)ead from names, (w)rite to names2
 871             Name n = names[r];
 872             if (n.isParam()) {
 873                 if (n.index == pos) {
 874                     // do not copy over the argument that is to be replaced with a literal,
 875                     // but adjust the write index
 876                     --w;
 877                 } else {
 878                     names2[w] = new Name(w, n.type);
 879                 }
 880             } else {
 881                 Object[] arguments2 = new Object[n.arguments.length];
 882                 for (int i = 0; i < n.arguments.length; ++i) {
 883                     Object arg = n.arguments[i];
 884                     if (arg instanceof Name) {


 890                             arguments2[i] = names2[ni];
 891                         } else {
 892                             // replacement position passed
 893                             arguments2[i] = names2[ni - 1];
 894                         }
 895                     } else {
 896                         arguments2[i] = arg;
 897                     }
 898                 }
 899                 names2[w] = new Name(n.function, arguments2);
 900                 names2[w].initIndex(w);
 901             }
 902         }
 903 
 904         int result2 = result == -1 ? -1 : result - 1;
 905         return new LambdaForm(debugName, arity2, names2, result2);
 906     }
 907 
 908     LambdaForm bind(int namePos, BoundMethodHandle.SpeciesData oldData) {
 909         Name name = names[namePos];
 910         BoundMethodHandle.SpeciesData newData = oldData.extendWith(name.type);
 911         return bind(name, new Name(newData.getterFunction(oldData.fieldCount()), names[0]), oldData, newData);
 912     }
 913     LambdaForm bind(Name name, Name binding,
 914                     BoundMethodHandle.SpeciesData oldData,
 915                     BoundMethodHandle.SpeciesData newData) {
 916         int pos = name.index;
 917         assert(name.isParam());
 918         assert(!binding.isParam());
 919         assert(name.type == binding.type);
 920         assert(0 <= pos && pos < arity && names[pos] == name);
 921         assert(binding.function.memberDeclaringClassOrNull() == newData.clazz);
 922         assert(oldData.getters.length == newData.getters.length-1);
 923         if (bindCache != null) {
 924             LambdaForm form = bindCache[pos];
 925             if (form != null) {
 926                 assert(form.contains(binding)) : "form << " + form + " >> does not contain binding << " + binding + " >>";
 927                 return form;
 928             }
 929         } else {
 930             bindCache = new LambdaForm[arity];
 931         }


 982         if (result2 == pos)
 983             result2 = insPos;
 984         else if (result2 > pos && result2 <= insPos)
 985             result2 -= 1;
 986 
 987         return bindCache[pos] = new LambdaForm(debugName, arity2, names2, result2);
 988     }
 989 
 990     boolean contains(Name name) {
 991         int pos = name.index();
 992         if (pos >= 0) {
 993             return pos < names.length && name.equals(names[pos]);
 994         }
 995         for (int i = arity; i < names.length; i++) {
 996             if (name.equals(names[i]))
 997                 return true;
 998         }
 999         return false;
1000     }
1001 
1002     LambdaForm addArguments(int pos, BasicType... types) {
1003         assert(pos <= arity);
1004         int length = names.length;
1005         int inTypes = types.length;
1006         Name[] names2 = Arrays.copyOf(names, length + inTypes);
1007         int arity2 = arity + inTypes;
1008         int result2 = result;
1009         if (result2 >= arity)
1010             result2 += inTypes;
1011         // names array has MH in slot 0; skip it.
1012         int argpos = pos + 1;
1013         // Note:  The LF constructor will rename names2[argpos...].
1014         // Make space for new arguments (shift temporaries).
1015         System.arraycopy(names, argpos, names2, argpos + inTypes, length - argpos);
1016         for (int i = 0; i < inTypes; i++) {
1017             names2[argpos + i] = new Name(types[i]);
1018         }
1019         return new LambdaForm(debugName, arity2, names2, result2);
1020     }
1021 
1022     LambdaForm addArguments(int pos, List<Class<?>> types) {
1023         return addArguments(pos, basicTypes(types));



1024     }
1025 
1026     LambdaForm permuteArguments(int skip, int[] reorder, BasicType[] types) {
1027         // Note:  When inArg = reorder[outArg], outArg is fed by a copy of inArg.
1028         // The types are the types of the new (incoming) arguments.
1029         int length = names.length;
1030         int inTypes = types.length;
1031         int outArgs = reorder.length;
1032         assert(skip+outArgs == arity);
1033         assert(permutedTypesMatch(reorder, types, names, skip));
1034         int pos = 0;
1035         // skip trivial first part of reordering:
1036         while (pos < outArgs && reorder[pos] == pos)  pos += 1;
1037         Name[] names2 = new Name[length - outArgs + inTypes];
1038         System.arraycopy(names, 0, names2, 0, skip+pos);
1039         // copy the body:
1040         int bodyLength = length - arity;
1041         System.arraycopy(names, skip+outArgs, names2, skip+inTypes, bodyLength);
1042         int arity2 = names2.length - bodyLength;
1043         int result2 = result;
1044         if (result2 >= 0) {
1045             if (result2 < skip+outArgs) {
1046                 // return the corresponding inArg


1065         }
1066         // some names are unused, but must be filled in
1067         for (int i = skip+pos; i < arity2; i++) {
1068             if (names2[i] == null)
1069                 names2[i] = argument(i, types[i - skip]);
1070         }
1071         for (int j = arity; j < names.length; j++) {
1072             int i = j - arity + arity2;
1073             // replace names2[i] by names[j]
1074             Name n = names[j];
1075             Name n2 = names2[i];
1076             if (n != n2) {
1077                 for (int k = i+1; k < names2.length; k++) {
1078                     names2[k] = names2[k].replaceName(n, n2);
1079                 }
1080             }
1081         }
1082         return new LambdaForm(debugName, arity2, names2, result2);
1083     }
1084 
1085     static boolean permutedTypesMatch(int[] reorder, BasicType[] types, Name[] names, int skip) {
1086         int inTypes = types.length;
1087         int outArgs = reorder.length;
1088         for (int i = 0; i < outArgs; i++) {
1089             assert(names[skip+i].isParam());
1090             assert(names[skip+i].type == types[reorder[i]]);
1091         }
1092         return true;
1093     }
1094 
1095     static class NamedFunction {
1096         final MemberName member;
1097         @Stable MethodHandle resolvedHandle;
1098         @Stable MethodHandle invoker;
1099 
1100         NamedFunction(MethodHandle resolvedHandle) {
1101             this(resolvedHandle.internalMemberName(), resolvedHandle);
1102         }
1103         NamedFunction(MemberName member, MethodHandle resolvedHandle) {
1104             this.member = member;
1105             //resolvedHandle = eraseSubwordTypes(resolvedHandle);


1149             return this.member != null && this.member.equals(that.member);
1150         }
1151 
1152         @Override
1153         public int hashCode() {
1154             if (member != null)
1155                 return member.hashCode();
1156             return super.hashCode();
1157         }
1158 
1159         // Put the predefined NamedFunction invokers into the table.
1160         static void initializeInvokers() {
1161             for (MemberName m : MemberName.getFactory().getMethods(NamedFunction.class, false, null, null, null)) {
1162                 if (!m.isStatic() || !m.isPackage())  continue;
1163                 MethodType type = m.getMethodType();
1164                 if (type.equals(INVOKER_METHOD_TYPE) &&
1165                     m.getName().startsWith("invoke_")) {
1166                     String sig = m.getName().substring("invoke_".length());
1167                     int arity = LambdaForm.signatureArity(sig);
1168                     MethodType srcType = MethodType.genericMethodType(arity);
1169                     if (LambdaForm.signatureReturn(sig) == V_TYPE)
1170                         srcType = srcType.changeReturnType(void.class);
1171                     MethodTypeForm typeForm = srcType.form();
1172                     typeForm.namedFunctionInvoker = DirectMethodHandle.make(m);
1173                 }
1174             }
1175         }
1176 
1177         // The following are predefined NamedFunction invokers.  The system must build
1178         // a separate invoker for each distinct signature.
1179         /** void return type invokers. */
1180         @Hidden
1181         static Object invoke__V(MethodHandle mh, Object[] a) throws Throwable {
1182             assert(a.length == 0);
1183             mh.invokeBasic();
1184             return null;
1185         }
1186         @Hidden
1187         static Object invoke_L_V(MethodHandle mh, Object[] a) throws Throwable {
1188             assert(a.length == 1);
1189             mh.invokeBasic(a[0]);


1239             assert(a.length == 4);
1240             return mh.invokeBasic(a[0], a[1], a[2], a[3]);
1241         }
1242         @Hidden
1243         static Object invoke_LLLLL_L(MethodHandle mh, Object[] a) throws Throwable {
1244             assert(a.length == 5);
1245             return mh.invokeBasic(a[0], a[1], a[2], a[3], a[4]);
1246         }
1247 
1248         static final MethodType INVOKER_METHOD_TYPE =
1249             MethodType.methodType(Object.class, MethodHandle.class, Object[].class);
1250 
1251         private static MethodHandle computeInvoker(MethodTypeForm typeForm) {
1252             MethodHandle mh = typeForm.namedFunctionInvoker;
1253             if (mh != null)  return mh;
1254             MemberName invoker = InvokerBytecodeGenerator.generateNamedFunctionInvoker(typeForm);  // this could take a while
1255             mh = DirectMethodHandle.make(invoker);
1256             MethodHandle mh2 = typeForm.namedFunctionInvoker;
1257             if (mh2 != null)  return mh2;  // benign race
1258             if (!mh.type().equals(INVOKER_METHOD_TYPE))
1259                 throw newInternalError(mh.debugString());
1260             return typeForm.namedFunctionInvoker = mh;
1261         }
1262 
1263         @Hidden
1264         Object invokeWithArguments(Object... arguments) throws Throwable {
1265             // If we have a cached invoker, call it right away.
1266             // NOTE: The invoker always returns a reference value.
1267             if (TRACE_INTERPRETER)  return invokeWithArgumentsTracing(arguments);
1268             assert(checkArgumentTypes(arguments, methodType()));
1269             return invoker().invokeBasic(resolvedHandle(), arguments);
1270         }
1271 
1272         @Hidden
1273         Object invokeWithArgumentsTracing(Object[] arguments) throws Throwable {
1274             Object rval;
1275             try {
1276                 traceInterpreter("[ call", this, arguments);
1277                 if (invoker == null) {
1278                     traceInterpreter("| getInvoker", this);
1279                     invoker();


1298             return invoker = computeInvoker(methodType().form());
1299         }
1300 
1301         private static boolean checkArgumentTypes(Object[] arguments, MethodType methodType) {
1302             if (true)  return true;  // FIXME
1303             MethodType dstType = methodType.form().erasedType();
1304             MethodType srcType = dstType.basicType().wrap();
1305             Class<?>[] ptypes = new Class<?>[arguments.length];
1306             for (int i = 0; i < arguments.length; i++) {
1307                 Object arg = arguments[i];
1308                 Class<?> ptype = arg == null ? Object.class : arg.getClass();
1309                 // If the dest. type is a primitive we keep the
1310                 // argument type.
1311                 ptypes[i] = dstType.parameterType(i).isPrimitive() ? ptype : Object.class;
1312             }
1313             MethodType argType = MethodType.methodType(srcType.returnType(), ptypes).wrap();
1314             assert(argType.isConvertibleTo(srcType)) : "wrong argument types: cannot convert " + argType + " to " + srcType;
1315             return true;
1316         }
1317 





1318         MethodType methodType() {
1319             if (resolvedHandle != null)
1320                 return resolvedHandle.type();
1321             else
1322                 // only for certain internal LFs during bootstrapping
1323                 return member.getInvocationType();
1324         }
1325 
1326         MemberName member() {
1327             assert(assertMemberIsConsistent());
1328             return member;
1329         }
1330 
1331         // Called only from assert.
1332         private boolean assertMemberIsConsistent() {
1333             if (resolvedHandle instanceof DirectMethodHandle) {
1334                 MemberName m = resolvedHandle.internalMemberName();
1335                 assert(m.equals(member));
1336             }
1337             return true;
1338         }
1339 
1340         Class<?> memberDeclaringClassOrNull() {
1341             return (member == null) ? null : member.getDeclaringClass();
1342         }
1343 
1344         BasicType returnType() {
1345             return basicType(methodType().returnType());
1346         }
1347 
1348         BasicType parameterType(int n) {
1349             return basicType(methodType().parameterType(n));
1350         }
1351 
1352         int arity() {



1353             return methodType().parameterCount();
1354         }
1355 
1356         public String toString() {
1357             if (member == null)  return String.valueOf(resolvedHandle);
1358             return member.getDeclaringClass().getSimpleName()+"."+member.getName();
1359         }

1360 
1361         public boolean isIdentity() {
1362             return this.equals(identity(returnType()));
1363         }
1364 
1365         public boolean isConstantZero() {
1366             return this.equals(constantZero(returnType()));



1367         }






1368     }
1369 
1370     public static String basicTypeSignature(MethodType type) {
1371         char[] sig = new char[type.parameterCount() + 2];
1372         int sigp = 0;
1373         for (Class<?> pt : type.parameterList()) {
1374             sig[sigp++] = basicTypeChar(pt);
1375         }
1376         sig[sigp++] = '_';
1377         sig[sigp++] = basicTypeChar(type.returnType());
1378         assert(sigp == sig.length);
1379         return String.valueOf(sig);
1380     }
1381     public static String shortenSignature(String signature) {
1382         // Hack to make signatures more readable when they show up in method names.
1383         final int NO_CHAR = -1, MIN_RUN = 3;
1384         int c0, c1 = NO_CHAR, c1reps = 0;
1385         StringBuilder buf = null;
1386         int len = signature.length();
1387         if (len < MIN_RUN)  return signature;
1388         for (int i = 0; i <= len; i++) {
1389             // shift in the next char:
1390             c0 = c1; c1 = (i == len ? NO_CHAR : signature.charAt(i));
1391             if (c1 == c0) { ++c1reps; continue; }
1392             // shift in the next count:
1393             int c0reps = c1reps; c1reps = 1;
1394             // end of a  character run
1395             if (c0reps < MIN_RUN) {
1396                 if (buf != null) {
1397                     while (--c0reps >= 0)
1398                         buf.append((char)c0);
1399                 }
1400                 continue;
1401             }
1402             // found three or more in a row
1403             if (buf == null)
1404                 buf = new StringBuilder().append(signature, 0, i - c0reps);
1405             buf.append((char)c0).append(c0reps);
1406         }
1407         return (buf == null) ? signature : buf.toString();
1408     }
1409 
1410     static final class Name {
1411         final BasicType type;
1412         private short index;
1413         final NamedFunction function;
1414         @Stable final Object[] arguments;
1415 
1416         private Name(int index, BasicType type, NamedFunction function, Object[] arguments) {
1417             this.index = (short)index;
1418             this.type = type;
1419             this.function = function;
1420             this.arguments = arguments;
1421             assert(this.index == index);
1422         }
1423         Name(MethodHandle function, Object... arguments) {
1424             this(new NamedFunction(function), arguments);
1425         }
1426         Name(MethodType functionType, Object... arguments) {
1427             this(new NamedFunction(functionType), arguments);
1428             assert(arguments[0] instanceof Name && ((Name)arguments[0]).type == L_TYPE);
1429         }
1430         Name(MemberName function, Object... arguments) {
1431             this(new NamedFunction(function), arguments);
1432         }
1433         Name(NamedFunction function, Object... arguments) {
1434             this(-1, function.returnType(), function, arguments = arguments.clone());
1435             assert(arguments.length == function.arity()) : "arity mismatch: arguments.length=" + arguments.length + " == function.arity()=" + function.arity() + " in " + debugString();
1436             for (int i = 0; i < arguments.length; i++)
1437                 assert(typesMatch(function.parameterType(i), arguments[i])) : "types don't match: function.parameterType(" + i + ")=" + function.parameterType(i) + ", arguments[" + i + "]=" + arguments[i] + " in " + debugString();
1438         }
1439         /** Create a raw parameter of the given type, with an expected index. */
1440         Name(int index, BasicType type) {
1441             this(index, type, null, null);
1442         }
1443         /** Create a raw parameter of the given type. */
1444         Name(BasicType type) { this(-1, type); }

1445 
1446         BasicType type() { return type; }
1447         int index() { return index; }
1448         boolean initIndex(int i) {
1449             if (index != i) {
1450                 if (index != -1)  return false;
1451                 index = (short)i;
1452             }
1453             return true;
1454         }
1455         char typeChar() {
1456             return type.btChar;
1457         }
1458 
1459         void resolve() {
1460             if (function != null)
1461                 function.resolve();
1462         }
1463 
1464         Name newIndex(int i) {
1465             if (initIndex(i))  return this;
1466             return cloneWithIndex(i);
1467         }
1468         Name cloneWithIndex(int i) {
1469             Object[] newArguments = (arguments == null) ? null : arguments.clone();
1470             return new Name(i, type, function, newArguments);
1471         }
1472         Name replaceName(Name oldName, Name newName) {  // FIXME: use replaceNames uniformly
1473             if (oldName == newName)  return this;
1474             @SuppressWarnings("LocalVariableHidesMemberVariable")
1475             Object[] arguments = this.arguments;
1476             if (arguments == null)  return this;
1477             boolean replaced = false;


1515                 }
1516             }
1517             if (!replaced)  return this;
1518             return new Name(function, arguments);
1519         }
1520         void internArguments() {
1521             @SuppressWarnings("LocalVariableHidesMemberVariable")
1522             Object[] arguments = this.arguments;
1523             for (int j = 0; j < arguments.length; j++) {
1524                 if (arguments[j] instanceof Name) {
1525                     Name n = (Name) arguments[j];
1526                     if (n.isParam() && n.index < INTERNED_ARGUMENT_LIMIT)
1527                         arguments[j] = internArgument(n);
1528                 }
1529             }
1530         }
1531         boolean isParam() {
1532             return function == null;
1533         }
1534         boolean isConstantZero() {
1535             return !isParam() && arguments.length == 0 && function.isConstantZero();
1536         }
1537 
1538         public String toString() {
1539             return (isParam()?"a":"t")+(index >= 0 ? index : System.identityHashCode(this))+":"+typeChar();
1540         }
1541         public String debugString() {
1542             String s = toString();
1543             return (function == null) ? s : s + "=" + exprString();
1544         }
1545         public String exprString() {
1546             if (function == null)  return toString();
1547             StringBuilder buf = new StringBuilder(function.toString());
1548             buf.append("(");
1549             String cma = "";
1550             for (Object a : arguments) {
1551                 buf.append(cma); cma = ",";
1552                 if (a instanceof Name || a instanceof Integer)
1553                     buf.append(a);
1554                 else
1555                     buf.append("(").append(a).append(")");
1556             }
1557             buf.append(")");
1558             return buf.toString();
1559         }
1560 
1561         static boolean typesMatch(BasicType parameterType, Object object) {
1562             if (object instanceof Name) {
1563                 return ((Name)object).type == parameterType;
1564             }
1565             switch (parameterType) {
1566                 case I_TYPE:  return object instanceof Integer;
1567                 case J_TYPE:  return object instanceof Long;
1568                 case F_TYPE:  return object instanceof Float;
1569                 case D_TYPE:  return object instanceof Double;
1570             }
1571             assert(parameterType == L_TYPE);
1572             return true;
1573         }
1574 
1575         /**
1576          * Does this Name precede the given binding node in some canonical order?
1577          * This predicate is used to order data bindings (via insertion sort)
1578          * with some stability.
1579          */
1580         boolean isSiblingBindingBefore(Name binding) {
1581             assert(!binding.isParam());
1582             if (isParam())  return true;
1583             if (function.equals(binding.function) &&
1584                 arguments.length == binding.arguments.length) {
1585                 boolean sawInt = false;
1586                 for (int i = 0; i < arguments.length; i++) {
1587                     Object a1 = arguments[i];
1588                     Object a2 = binding.arguments[i];
1589                     if (!a1.equals(a2)) {
1590                         if (a1 instanceof Integer && a2 instanceof Integer) {
1591                             if (sawInt)  continue;


1628         }
1629 
1630         public boolean equals(Name that) {
1631             if (this == that)  return true;
1632             if (isParam())
1633                 // each parameter is a unique atom
1634                 return false;  // this != that
1635             return
1636                 //this.index == that.index &&
1637                 this.type == that.type &&
1638                 this.function.equals(that.function) &&
1639                 Arrays.equals(this.arguments, that.arguments);
1640         }
1641         @Override
1642         public boolean equals(Object x) {
1643             return x instanceof Name && equals((Name)x);
1644         }
1645         @Override
1646         public int hashCode() {
1647             if (isParam())
1648                 return index | (type.ordinal() << 8);
1649             return function.hashCode() ^ Arrays.hashCode(arguments);
1650         }
1651     }
1652 
1653     /** Return the index of the last name which contains n as an argument.
1654      *  Return -1 if the name is not used.  Return names.length if it is the return value.
1655      */
1656     int lastUseIndex(Name n) {
1657         int ni = n.index, nmax = names.length;
1658         assert(names[ni] == n);
1659         if (result == ni)  return nmax;  // live all the way beyond the end
1660         for (int i = nmax; --i > ni; ) {
1661             if (names[i].lastUseIndex(n) >= 0)
1662                 return i;
1663         }
1664         return -1;
1665     }
1666 
1667     /** Return the number of times n is used as an argument or return value. */
1668     int useCount(Name n) {
1669         int ni = n.index, nmax = names.length;
1670         int end = lastUseIndex(n);
1671         if (end < 0)  return 0;
1672         int count = 0;
1673         if (end == nmax) { count++; end--; }
1674         int beg = n.index() + 1;
1675         if (beg < arity)  beg = arity;
1676         for (int i = beg; i <= end; i++) {
1677             count += names[i].useCount(n);
1678         }
1679         return count;
1680     }
1681 
1682     static Name argument(int which, char type) {
1683         return argument(which, basicType(type));
1684     }
1685     static Name argument(int which, BasicType type) {
1686         if (which >= INTERNED_ARGUMENT_LIMIT)
1687             return new Name(which, type);
1688         return INTERNED_ARGUMENTS[type.ordinal()][which];
1689     }
1690     static Name internArgument(Name n) {
1691         assert(n.isParam()) : "not param: " + n;
1692         assert(n.index < INTERNED_ARGUMENT_LIMIT);
1693         return argument(n.index, n.type);
1694     }
1695     static Name[] arguments(int extra, String types) {
1696         int length = types.length();
1697         Name[] names = new Name[length + extra];
1698         for (int i = 0; i < length; i++)
1699             names[i] = argument(i, types.charAt(i));
1700         return names;
1701     }
1702     static Name[] arguments(int extra, char... types) {
1703         int length = types.length;
1704         Name[] names = new Name[length + extra];
1705         for (int i = 0; i < length; i++)
1706             names[i] = argument(i, types[i]);
1707         return names;
1708     }


1710         int length = types.size();
1711         Name[] names = new Name[length + extra];
1712         for (int i = 0; i < length; i++)
1713             names[i] = argument(i, basicType(types.get(i)));
1714         return names;
1715     }
1716     static Name[] arguments(int extra, Class<?>... types) {
1717         int length = types.length;
1718         Name[] names = new Name[length + extra];
1719         for (int i = 0; i < length; i++)
1720             names[i] = argument(i, basicType(types[i]));
1721         return names;
1722     }
1723     static Name[] arguments(int extra, MethodType types) {
1724         int length = types.parameterCount();
1725         Name[] names = new Name[length + extra];
1726         for (int i = 0; i < length; i++)
1727             names[i] = argument(i, basicType(types.parameterType(i)));
1728         return names;
1729     }

1730     static final int INTERNED_ARGUMENT_LIMIT = 10;
1731     private static final Name[][] INTERNED_ARGUMENTS
1732             = new Name[ARG_TYPE_LIMIT][INTERNED_ARGUMENT_LIMIT];
1733     static {
1734         for (BasicType type : BasicType.ARG_TYPES) {
1735             int ord = type.ordinal();
1736             for (int i = 0; i < INTERNED_ARGUMENTS[ord].length; i++) {
1737                 INTERNED_ARGUMENTS[ord][i] = new Name(i, type);
1738             }
1739         }
1740     }
1741 
1742     private static final MemberName.Factory IMPL_NAMES = MemberName.getFactory();
1743 
1744     static LambdaForm identityForm(BasicType type) {
1745         return LF_identityForm[type.ordinal()];
1746     }
1747     static LambdaForm zeroForm(BasicType type) {
1748         return LF_zeroForm[type.ordinal()];
1749     }
1750     static NamedFunction identity(BasicType type) {
1751         return NF_identity[type.ordinal()];
1752     }
1753     static NamedFunction constantZero(BasicType type) {
1754         return NF_zero[type.ordinal()];
1755     }
1756     private static final LambdaForm[] LF_identityForm = new LambdaForm[TYPE_LIMIT];
1757     private static final LambdaForm[] LF_zeroForm = new LambdaForm[TYPE_LIMIT];
1758     private static final NamedFunction[] NF_identity = new NamedFunction[TYPE_LIMIT];
1759     private static final NamedFunction[] NF_zero = new NamedFunction[TYPE_LIMIT];
1760     private static void createIdentityForms() {
1761         for (BasicType type : BasicType.ALL_TYPES) {
1762             int ord = type.ordinal();
1763             char btChar = type.basicTypeChar();
1764             boolean isVoid = (type == V_TYPE);
1765             Class<?> btClass = type.btClass;
1766             MethodType zeType = MethodType.methodType(btClass);
1767             MethodType idType = isVoid ? zeType : zeType.appendParameterTypes(btClass);
1768 
1769             // Look up some symbolic names.  It might not be necessary to have these,
1770             // but if we need to emit direct references to bytecodes, it helps.
1771             // Zero is built from a call to an identity function with a constant zero input.
1772             MemberName idMem = new MemberName(LambdaForm.class, "identity_"+btChar, idType, REF_invokeStatic);
1773             MemberName zeMem = new MemberName(LambdaForm.class, "zero_"+btChar, zeType, REF_invokeStatic);
1774             try {
1775                 zeMem = IMPL_NAMES.resolveOrFail(REF_invokeStatic, zeMem, null, NoSuchMethodException.class);
1776                 idMem = IMPL_NAMES.resolveOrFail(REF_invokeStatic, idMem, null, NoSuchMethodException.class);
1777             } catch (IllegalAccessException|NoSuchMethodException ex) {
1778                 throw newInternalError(ex);
1779             }
1780 
1781             NamedFunction idFun = new NamedFunction(idMem);
1782             LambdaForm idForm;
1783             if (isVoid) {
1784                 Name[] idNames = new Name[] { argument(0, L_TYPE) };
1785                 idForm = new LambdaForm(idMem.getName(), 1, idNames, VOID_RESULT);
1786             } else {
1787                 Name[] idNames = new Name[] { argument(0, L_TYPE), argument(1, type) };
1788                 idForm = new LambdaForm(idMem.getName(), 2, idNames, 1);
1789             }
1790             LF_identityForm[ord] = idForm;
1791             NF_identity[ord] = idFun;
1792 
1793             NamedFunction zeFun = new NamedFunction(zeMem);
1794             LambdaForm zeForm;
1795             if (isVoid) {
1796                 zeForm = idForm;
1797             } else {
1798                 Object zeValue = Wrapper.forBasicType(btChar).zero();
1799                 Name[] zeNames = new Name[] { argument(0, L_TYPE), new Name(idFun, zeValue) };
1800                 zeForm = new LambdaForm(zeMem.getName(), 1, zeNames, 1);
1801             }
1802             LF_zeroForm[ord] = zeForm;
1803             NF_zero[ord] = zeFun;
1804 
1805             assert(idFun.isIdentity());
1806             assert(zeFun.isConstantZero());
1807             assert(new Name(zeFun).isConstantZero());
1808         }
1809 
1810         // Do this in a separate pass, so that SimpleMethodHandle.make can see the tables.
1811         for (BasicType type : BasicType.ALL_TYPES) {
1812             int ord = type.ordinal();
1813             NamedFunction idFun = NF_identity[ord];
1814             LambdaForm idForm = LF_identityForm[ord];
1815             MemberName idMem = idFun.member;
1816             idFun.resolvedHandle = SimpleMethodHandle.make(idMem.getInvocationType(), idForm);
1817 
1818             NamedFunction zeFun = NF_zero[ord];
1819             LambdaForm zeForm = LF_zeroForm[ord];
1820             MemberName zeMem = zeFun.member;
1821             zeFun.resolvedHandle = SimpleMethodHandle.make(zeMem.getInvocationType(), zeForm);
1822 
1823             assert(idFun.isIdentity());
1824             assert(zeFun.isConstantZero());
1825             assert(new Name(zeFun).isConstantZero());
1826         }
1827     }
1828 
1829     // Avoid appealing to ValueConversions at bootstrap time:
1830     private static int identity_I(int x) { return x; }
1831     private static long identity_J(long x) { return x; }
1832     private static float identity_F(float x) { return x; }
1833     private static double identity_D(double x) { return x; }
1834     private static Object identity_L(Object x) { return x; }
1835     private static void identity_V() { return; }  // same as zeroV, but that's OK
1836     private static int zero_I() { return 0; }
1837     private static long zero_J() { return 0; }
1838     private static float zero_F() { return 0; }
1839     private static double zero_D() { return 0; }
1840     private static Object zero_L() { return null; }
1841     private static void zero_V() { return; }
1842 
1843     /**
1844      * Internal marker for byte-compiled LambdaForms.
1845      */
1846     /*non-public*/
1847     @Target(ElementType.METHOD)
1848     @Retention(RetentionPolicy.RUNTIME)
1849     @interface Compiled {
1850     }
1851 
1852     /**
1853      * Internal marker for LambdaForm interpreter frames.
1854      */
1855     /*non-public*/
1856     @Target(ElementType.METHOD)
1857     @Retention(RetentionPolicy.RUNTIME)
1858     @interface Hidden {
1859     }
1860 
1861 


1872         Object[] abc = { "a", "bc" };
1873         List<?> lst = (List<?>) MethodHandle.linkToStatic(abc, asList_MN);
1874         System.out.println("lst="+lst);
1875         MemberName toString_MN = new MemberName(Object.class.getMethod("toString"));
1876         String s1 = (String) MethodHandle.linkToVirtual(lst, toString_MN);
1877         toString_MN = new MemberName(Object.class.getMethod("toString"), true);
1878         String s2 = (String) MethodHandle.linkToSpecial(lst, toString_MN);
1879         System.out.println("[s1,s2,lst]="+Arrays.asList(s1, s2, lst.toString()));
1880         MemberName toArray_MN = new MemberName(List.class.getMethod("toArray"));
1881         Object[] arr = (Object[]) MethodHandle.linkToInterface(lst, toArray_MN);
1882         System.out.println("toArray="+Arrays.toString(arr));
1883     }
1884     static { try { testMethodHandleLinkers(); } catch (Throwable ex) { throw new RuntimeException(ex); } }
1885     // Requires these definitions in MethodHandle:
1886     static final native Object linkToStatic(Object x1, MemberName mn) throws Throwable;
1887     static final native Object linkToVirtual(Object x1, MemberName mn) throws Throwable;
1888     static final native Object linkToSpecial(Object x1, MemberName mn) throws Throwable;
1889     static final native Object linkToInterface(Object x1, MemberName mn) throws Throwable;
1890  */
1891 
1892     private static final HashMap<String,Integer> DEBUG_NAME_COUNTERS;
1893     static {
1894         if (debugEnabled())
1895             DEBUG_NAME_COUNTERS = new HashMap<>();
1896         else
1897             DEBUG_NAME_COUNTERS = null;
1898     }
1899 
1900     // Put this last, so that previous static inits can run before.
1901     static {
1902         createIdentityForms();
1903         if (USE_PREDEFINED_INTERPRET_METHODS)
1904             PREPARED_FORMS.putAll(computeInitialPreparedForms());
1905         NamedFunction.initializeInvokers();
1906     }
1907 
1908     // The following hack is necessary in order to suppress TRACE_INTERPRETER
1909     // during execution of the static initializes of this class.
1910     // Turning on TRACE_INTERPRETER too early will cause
1911     // stack overflows and other misbehavior during attempts to trace events
1912     // that occur during LambdaForm.<clinit>.
1913     // Therefore, do not move this line higher in this file, and do not remove.
1914     private static final boolean TRACE_INTERPRETER = MethodHandleStatics.TRACE_INTERPRETER;
1915 }
src/share/classes/java/lang/invoke/LambdaForm.java
Index Unified diffs Context diffs Sdiffs Patch New Old Previous File Next File