Thu, 14 Feb 2013 13:22:26 +0100
8008085: Integrate Dynalink source code into Nashorn codebase
Reviewed-by: jlaskey, lagergren, sundar
attila@90 | 1 | /* |
attila@90 | 2 | * Copyright (c) 2010, 2013, Oracle and/or its affiliates. All rights reserved. |
attila@90 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
attila@90 | 4 | * |
attila@90 | 5 | * This code is free software; you can redistribute it and/or modify it |
attila@90 | 6 | * under the terms of the GNU General Public License version 2 only, as |
attila@90 | 7 | * published by the Free Software Foundation. Oracle designates this |
attila@90 | 8 | * particular file as subject to the "Classpath" exception as provided |
attila@90 | 9 | * by Oracle in the LICENSE file that accompanied this code. |
attila@90 | 10 | * |
attila@90 | 11 | * This code is distributed in the hope that it will be useful, but WITHOUT |
attila@90 | 12 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
attila@90 | 13 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
attila@90 | 14 | * version 2 for more details (a copy is included in the LICENSE file that |
attila@90 | 15 | * accompanied this code). |
attila@90 | 16 | * |
attila@90 | 17 | * You should have received a copy of the GNU General Public License version |
attila@90 | 18 | * 2 along with this work; if not, write to the Free Software Foundation, |
attila@90 | 19 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
attila@90 | 20 | * |
attila@90 | 21 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
attila@90 | 22 | * or visit www.oracle.com if you need additional information or have any |
attila@90 | 23 | * questions. |
attila@90 | 24 | */ |
attila@90 | 25 | |
attila@90 | 26 | /* |
attila@90 | 27 | * This file is available under and governed by the GNU General Public |
attila@90 | 28 | * License version 2 only, as published by the Free Software Foundation. |
attila@90 | 29 | * However, the following notice accompanied the original version of this |
attila@90 | 30 | * file, and Oracle licenses the original version of this file under the BSD |
attila@90 | 31 | * license: |
attila@90 | 32 | */ |
attila@90 | 33 | /* |
attila@90 | 34 | Copyright 2009-2013 Attila Szegedi |
attila@90 | 35 | |
attila@90 | 36 | Licensed under both the Apache License, Version 2.0 (the "Apache License") |
attila@90 | 37 | and the BSD License (the "BSD License"), with licensee being free to |
attila@90 | 38 | choose either of the two at their discretion. |
attila@90 | 39 | |
attila@90 | 40 | You may not use this file except in compliance with either the Apache |
attila@90 | 41 | License or the BSD License. |
attila@90 | 42 | |
attila@90 | 43 | If you choose to use this file in compliance with the Apache License, the |
attila@90 | 44 | following notice applies to you: |
attila@90 | 45 | |
attila@90 | 46 | You may obtain a copy of the Apache License at |
attila@90 | 47 | |
attila@90 | 48 | http://www.apache.org/licenses/LICENSE-2.0 |
attila@90 | 49 | |
attila@90 | 50 | Unless required by applicable law or agreed to in writing, software |
attila@90 | 51 | distributed under the License is distributed on an "AS IS" BASIS, |
attila@90 | 52 | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or |
attila@90 | 53 | implied. See the License for the specific language governing |
attila@90 | 54 | permissions and limitations under the License. |
attila@90 | 55 | |
attila@90 | 56 | If you choose to use this file in compliance with the BSD License, the |
attila@90 | 57 | following notice applies to you: |
attila@90 | 58 | |
attila@90 | 59 | Redistribution and use in source and binary forms, with or without |
attila@90 | 60 | modification, are permitted provided that the following conditions are |
attila@90 | 61 | met: |
attila@90 | 62 | * Redistributions of source code must retain the above copyright |
attila@90 | 63 | notice, this list of conditions and the following disclaimer. |
attila@90 | 64 | * Redistributions in binary form must reproduce the above copyright |
attila@90 | 65 | notice, this list of conditions and the following disclaimer in the |
attila@90 | 66 | documentation and/or other materials provided with the distribution. |
attila@90 | 67 | * Neither the name of the copyright holder nor the names of |
attila@90 | 68 | contributors may be used to endorse or promote products derived from |
attila@90 | 69 | this software without specific prior written permission. |
attila@90 | 70 | |
attila@90 | 71 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS |
attila@90 | 72 | IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED |
attila@90 | 73 | TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A |
attila@90 | 74 | PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL COPYRIGHT HOLDER |
attila@90 | 75 | BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
attila@90 | 76 | CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
attila@90 | 77 | SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR |
attila@90 | 78 | BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, |
attila@90 | 79 | WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR |
attila@90 | 80 | OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF |
attila@90 | 81 | ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
attila@90 | 82 | */ |
attila@90 | 83 | |
attila@90 | 84 | package jdk.internal.dynalink.support; |
attila@90 | 85 | |
attila@90 | 86 | import java.lang.invoke.MethodHandles; |
attila@90 | 87 | import java.lang.invoke.MethodHandles.Lookup; |
attila@90 | 88 | import java.lang.invoke.MethodType; |
attila@90 | 89 | import java.lang.ref.WeakReference; |
attila@90 | 90 | import java.util.Arrays; |
attila@90 | 91 | import java.util.Collections; |
attila@90 | 92 | import java.util.List; |
attila@90 | 93 | import java.util.StringTokenizer; |
attila@90 | 94 | import java.util.WeakHashMap; |
attila@90 | 95 | import jdk.internal.dynalink.CallSiteDescriptor; |
attila@90 | 96 | |
attila@90 | 97 | |
attila@90 | 98 | /** |
attila@90 | 99 | * Usable as a default factory for call site descriptor implementations. It is weakly canonicalizing, meaning it will |
attila@90 | 100 | * return the same immutable call site descriptor for identical inputs, i.e. repeated requests for a descriptor |
attila@90 | 101 | * signifying public lookup for "dyn:getProp:color" of type "Object(Object)" will return the same object as long as |
attila@90 | 102 | * a previously created, at least softly reachable one exists. It also uses several different implementations of the |
attila@90 | 103 | * {@link CallSiteDescriptor} internally, and chooses the most space-efficient one based on the input. |
attila@90 | 104 | * @author Attila Szegedi |
attila@90 | 105 | */ |
attila@90 | 106 | public class CallSiteDescriptorFactory { |
attila@90 | 107 | private static final WeakHashMap<CallSiteDescriptor, WeakReference<CallSiteDescriptor>> publicDescs = |
attila@90 | 108 | new WeakHashMap<>(); |
attila@90 | 109 | |
attila@90 | 110 | |
attila@90 | 111 | private CallSiteDescriptorFactory() { |
attila@90 | 112 | } |
attila@90 | 113 | |
attila@90 | 114 | /** |
attila@90 | 115 | * Creates a new call site descriptor instance. The actual underlying class of the instance is dependent on the |
attila@90 | 116 | * passed arguments to be space efficient; i.e. if you only use the public lookup, you'll get back an |
attila@90 | 117 | * implementation that doesn't waste space on storing the lookup object. |
attila@90 | 118 | * @param lookup the lookup that determines access rights at the call site. If your language runtime doesn't have |
attila@90 | 119 | * equivalents of Java access concepts, just use {@link MethodHandles#publicLookup()}. Must not be null. |
attila@90 | 120 | * @param name the name of the method at the call site. Must not be null. |
attila@90 | 121 | * @param methodType the type of the method at the call site. Must not be null. |
attila@90 | 122 | * @return a call site descriptor representing the input. Note that although the method name is "create", it will |
attila@90 | 123 | * in fact return a weakly-referenced canonical instance. |
attila@90 | 124 | */ |
attila@90 | 125 | public static CallSiteDescriptor create(Lookup lookup, String name, MethodType methodType) { |
attila@90 | 126 | name.getClass(); // NPE check |
attila@90 | 127 | methodType.getClass(); // NPE check |
attila@90 | 128 | lookup.getClass(); // NPE check |
attila@90 | 129 | final String[] tokenizedName = tokenizeName(name); |
attila@90 | 130 | if(isPublicLookup(lookup)) { |
attila@90 | 131 | return getCanonicalPublicDescriptor(createPublicCallSiteDescriptor(tokenizedName, methodType)); |
attila@90 | 132 | } else { |
attila@90 | 133 | return new LookupCallSiteDescriptor(tokenizedName, methodType, lookup); |
attila@90 | 134 | } |
attila@90 | 135 | } |
attila@90 | 136 | |
attila@90 | 137 | static CallSiteDescriptor getCanonicalPublicDescriptor(final CallSiteDescriptor desc) { |
attila@90 | 138 | synchronized(publicDescs) { |
attila@90 | 139 | final WeakReference<CallSiteDescriptor> ref = publicDescs.get(desc); |
attila@90 | 140 | if(ref != null) { |
attila@90 | 141 | final CallSiteDescriptor canonical = ref.get(); |
attila@90 | 142 | if(canonical != null) { |
attila@90 | 143 | return canonical; |
attila@90 | 144 | } |
attila@90 | 145 | } |
attila@90 | 146 | publicDescs.put(desc, new WeakReference<>(desc)); |
attila@90 | 147 | } |
attila@90 | 148 | return desc; |
attila@90 | 149 | } |
attila@90 | 150 | |
attila@90 | 151 | private static CallSiteDescriptor createPublicCallSiteDescriptor(String[] tokenizedName, MethodType methodType) { |
attila@90 | 152 | final int l = tokenizedName.length; |
attila@90 | 153 | if(l > 0 && tokenizedName[0] == "dyn") { |
attila@90 | 154 | if(l == 2) { |
attila@90 | 155 | return new UnnamedDynCallSiteDescriptor(tokenizedName[1], methodType); |
attila@90 | 156 | } if (l == 3) { |
attila@90 | 157 | return new NamedDynCallSiteDescriptor(tokenizedName[1], tokenizedName[2], methodType); |
attila@90 | 158 | } |
attila@90 | 159 | } |
attila@90 | 160 | return new DefaultCallSiteDescriptor(tokenizedName, methodType); |
attila@90 | 161 | } |
attila@90 | 162 | |
attila@90 | 163 | private static boolean isPublicLookup(Lookup lookup) { |
attila@90 | 164 | return lookup == MethodHandles.publicLookup(); |
attila@90 | 165 | } |
attila@90 | 166 | |
attila@90 | 167 | /** |
attila@90 | 168 | * Tokenizes the composite name along colons, as well as {@link NameCodec#decode(String) demangles} and interns |
attila@90 | 169 | * the tokens. The first two tokens are not demangled as they are supposed to be the naming scheme and the name of |
attila@90 | 170 | * the operation which can be expected to consist of just alphabetical characters. |
attila@90 | 171 | * @param name the composite name consisting of colon-separated, possibly mangled tokens. |
attila@90 | 172 | * @return an array of tokens |
attila@90 | 173 | */ |
attila@90 | 174 | public static String[] tokenizeName(String name) { |
attila@90 | 175 | final StringTokenizer tok = new StringTokenizer(name, CallSiteDescriptor.TOKEN_DELIMITER); |
attila@90 | 176 | final String[] tokens = new String[tok.countTokens()]; |
attila@90 | 177 | for(int i = 0; i < tokens.length; ++i) { |
attila@90 | 178 | String token = tok.nextToken(); |
attila@90 | 179 | if(i > 1) { |
attila@90 | 180 | token = NameCodec.decode(token); |
attila@90 | 181 | } |
attila@90 | 182 | tokens[i] = token.intern(); |
attila@90 | 183 | } |
attila@90 | 184 | return tokens; |
attila@90 | 185 | } |
attila@90 | 186 | |
attila@90 | 187 | /** |
attila@90 | 188 | * Tokenizes a composite operation name along pipe characters. I.e. if you have a "dyn:getElem|getProp|getMethod" |
attila@90 | 189 | * operation, returns a list of ["getElem", "getProp", "getMethod"]. The tokens are not interned. |
attila@90 | 190 | * @param desc the call site descriptor with the operation |
attila@90 | 191 | * @return a list of tokens |
attila@90 | 192 | */ |
attila@90 | 193 | public static List<String> tokenizeOperators(CallSiteDescriptor desc) { |
attila@90 | 194 | final String ops = desc.getNameToken(CallSiteDescriptor.OPERATOR); |
attila@90 | 195 | final StringTokenizer tok = new StringTokenizer(ops, CallSiteDescriptor.OPERATOR_DELIMITER); |
attila@90 | 196 | final int count = tok.countTokens(); |
attila@90 | 197 | if(count == 1) { |
attila@90 | 198 | return Collections.singletonList(ops); |
attila@90 | 199 | } |
attila@90 | 200 | final String[] tokens = new String[count]; |
attila@90 | 201 | for(int i = 0; i < count; ++i) { |
attila@90 | 202 | tokens[i] = tok.nextToken(); |
attila@90 | 203 | } |
attila@90 | 204 | return Arrays.asList(tokens); |
attila@90 | 205 | } |
attila@90 | 206 | |
attila@90 | 207 | /** |
attila@90 | 208 | * Returns a new call site descriptor that is identical to the passed one, except that it has some parameter types |
attila@90 | 209 | * removed from its method type. |
attila@90 | 210 | * @param desc the original call site descriptor |
attila@90 | 211 | * @param start index of the first parameter to remove |
attila@90 | 212 | * @param end index of the first parameter to not remove |
attila@90 | 213 | * @return a new call site descriptor with modified method type |
attila@90 | 214 | */ |
attila@90 | 215 | public static CallSiteDescriptor dropParameterTypes(CallSiteDescriptor desc, int start, int end) { |
attila@90 | 216 | return desc.changeMethodType(desc.getMethodType().dropParameterTypes(start, end)); |
attila@90 | 217 | } |
attila@90 | 218 | |
attila@90 | 219 | /** |
attila@90 | 220 | * Returns a new call site descriptor that is identical to the passed one, except that it has a single parameter |
attila@90 | 221 | * type changed in its method type. |
attila@90 | 222 | * @param desc the original call site descriptor |
attila@90 | 223 | * @param num index of the parameter to change |
attila@90 | 224 | * @param nptype the new parameter type |
attila@90 | 225 | * @return a new call site descriptor with modified method type |
attila@90 | 226 | */ |
attila@90 | 227 | public static CallSiteDescriptor changeParameterType(CallSiteDescriptor desc, int num, Class<?> nptype) { |
attila@90 | 228 | return desc.changeMethodType(desc.getMethodType().changeParameterType(num, nptype)); |
attila@90 | 229 | } |
attila@90 | 230 | |
attila@90 | 231 | /** |
attila@90 | 232 | * Returns a new call site descriptor that is identical to the passed one, except that it has the return type |
attila@90 | 233 | * changed in its method type. |
attila@90 | 234 | * @param desc the original call site descriptor |
attila@90 | 235 | * @param nrtype the new return type |
attila@90 | 236 | * @return a new call site descriptor with modified method type |
attila@90 | 237 | */ |
attila@90 | 238 | public static CallSiteDescriptor changeReturnType(CallSiteDescriptor desc, Class<?> nrtype) { |
attila@90 | 239 | return desc.changeMethodType(desc.getMethodType().changeReturnType(nrtype)); |
attila@90 | 240 | } |
attila@90 | 241 | |
attila@90 | 242 | /** |
attila@90 | 243 | * Returns a new call site descriptor that is identical to the passed one, except that it has additional parameter |
attila@90 | 244 | * types inserted into its method type. |
attila@90 | 245 | * @param desc the original call site descriptor |
attila@90 | 246 | * @param num index at which the new parameters are inserted |
attila@90 | 247 | * @param ptypesToInsert the new types to insert |
attila@90 | 248 | * @return a new call site descriptor with modified method type |
attila@90 | 249 | */ |
attila@90 | 250 | public static CallSiteDescriptor insertParameterTypes(CallSiteDescriptor desc, int num, Class<?>... ptypesToInsert) { |
attila@90 | 251 | return desc.changeMethodType(desc.getMethodType().insertParameterTypes(num, ptypesToInsert)); |
attila@90 | 252 | } |
attila@90 | 253 | |
attila@90 | 254 | /** |
attila@90 | 255 | * Returns a new call site descriptor that is identical to the passed one, except that it has additional parameter |
attila@90 | 256 | * types inserted into its method type. |
attila@90 | 257 | * @param desc the original call site descriptor |
attila@90 | 258 | * @param num index at which the new parameters are inserted |
attila@90 | 259 | * @param ptypesToInsert the new types to insert |
attila@90 | 260 | * @return a new call site descriptor with modified method type |
attila@90 | 261 | */ |
attila@90 | 262 | public static CallSiteDescriptor insertParameterTypes(CallSiteDescriptor desc, int num, List<Class<?>> ptypesToInsert) { |
attila@90 | 263 | return desc.changeMethodType(desc.getMethodType().insertParameterTypes(num, ptypesToInsert)); |
attila@90 | 264 | } |
attila@90 | 265 | } |