| /* |
| * Copyright (c) 1994, 2003, Oracle and/or its affiliates. All rights reserved. |
| * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| * |
| * This code is free software; you can redistribute it and/or modify it |
| * under the terms of the GNU General Public License version 2 only, as |
| * published by the Free Software Foundation. Oracle designates this |
| * particular file as subject to the "Classpath" exception as provided |
| * by Oracle in the LICENSE file that accompanied this code. |
| * |
| * This code is distributed in the hope that it will be useful, but WITHOUT |
| * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
| * version 2 for more details (a copy is included in the LICENSE file that |
| * accompanied this code). |
| * |
| * You should have received a copy of the GNU General Public License version |
| * 2 along with this work; if not, write to the Free Software Foundation, |
| * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
| * |
| * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
| * or visit www.oracle.com if you need additional information or have any |
| * questions. |
| */ |
| |
| package sun.tools.tree; |
| |
| import sun.tools.java.*; |
| import sun.tools.asm.Assembler; |
| import java.io.PrintStream; |
| import java.util.Hashtable; |
| |
| /** |
| * WARNING: The contents of this source file are not part of any |
| * supported API. Code that depends on them does so at its own risk: |
| * they are subject to change or removal without notice. |
| */ |
| public |
| class MethodExpression extends NaryExpression { |
| Identifier id; |
| ClassDefinition clazz; // The class in which the called method is defined |
| MemberDefinition field; |
| Expression implementation; |
| |
| private boolean isSuper; // Set if qualified by 'super' or '<class>.super'. |
| |
| /** |
| * constructor |
| */ |
| public MethodExpression(long where, Expression right, Identifier id, Expression args[]) { |
| super(METHOD, where, Type.tError, right, args); |
| this.id = id; |
| } |
| public MethodExpression(long where, Expression right, MemberDefinition field, Expression args[]) { |
| super(METHOD, where, field.getType().getReturnType(), right, args); |
| this.id = field.getName(); |
| this.field = field; |
| this.clazz = field.getClassDefinition(); |
| } |
| |
| // This is a hack used only within certain access methods generated by |
| // 'SourceClass.getAccessMember'. It allows an 'invokespecial' instruction |
| // to be forced even though 'super' does not appear within the call. |
| // Such access methods are needed for access to protected methods when using |
| // the qualified '<class>.super.<method>(...)' notation. |
| public MethodExpression(long where, Expression right, |
| MemberDefinition field, Expression args[], boolean forceSuper) { |
| this(where, right, field, args); |
| this.isSuper = forceSuper; |
| } |
| |
| public Expression getImplementation() { |
| if (implementation != null) |
| return implementation; |
| return this; |
| } |
| |
| /** |
| * Check expression type |
| */ |
| public Vset checkValue(Environment env, Context ctx, Vset vset, Hashtable<Object, Object> exp) { |
| ClassDeclaration c = null; |
| boolean isArray = false; |
| boolean staticRef = false; |
| |
| // Access method to use if required. |
| MemberDefinition implMethod = null; |
| |
| ClassDefinition ctxClass = ctx.field.getClassDefinition(); |
| |
| // When calling a constructor, we may need to add an |
| // additional argument to transmit the outer instance link. |
| Expression args[] = this.args; |
| if (id.equals(idInit)){ |
| ClassDefinition conCls = ctxClass; |
| try { |
| Expression conOuter = null; |
| if (right instanceof SuperExpression) { |
| // outer.super(...) |
| conCls = conCls.getSuperClass().getClassDefinition(env); |
| conOuter = ((SuperExpression)right).outerArg; |
| } else if (right instanceof ThisExpression) { |
| // outer.this(...) |
| conOuter = ((ThisExpression)right).outerArg; |
| } |
| args = NewInstanceExpression. |
| insertOuterLink(env, ctx, where, conCls, conOuter, args); |
| } catch (ClassNotFound ee) { |
| // the same error is handled elsewhere |
| } |
| } |
| |
| Type argTypes[] = new Type[args.length]; |
| |
| // The effective accessing class, for access checking. |
| // This is normally the immediately enclosing class. |
| ClassDefinition sourceClass = ctxClass; |
| |
| try { |
| if (right == null) { |
| staticRef = ctx.field.isStatic(); |
| // Find the first outer scope that mentions the method. |
| ClassDefinition cdef = ctxClass; |
| MemberDefinition m = null; |
| for (; cdef != null; cdef = cdef.getOuterClass()) { |
| m = cdef.findAnyMethod(env, id); |
| if (m != null) { |
| break; |
| } |
| } |
| if (m == null) { |
| // this is the scope for error diagnosis |
| c = ctx.field.getClassDeclaration(); |
| } else { |
| // found the innermost scope in which m occurs |
| c = cdef.getClassDeclaration(); |
| |
| // Maybe an inherited method hides an apparent method. |
| // Keep looking at enclosing scopes to find out. |
| if (m.getClassDefinition() != cdef) { |
| ClassDefinition cdef2 = cdef; |
| while ((cdef2 = cdef2.getOuterClass()) != null) { |
| MemberDefinition m2 = cdef2.findAnyMethod(env, id); |
| if (m2 != null && m2.getClassDefinition() == cdef2) { |
| env.error(where, "inherited.hides.method", |
| id, cdef.getClassDeclaration(), |
| cdef2.getClassDeclaration()); |
| break; |
| } |
| } |
| } |
| } |
| } else { |
| if (id.equals(idInit)) { |
| int thisN = ctx.getThisNumber(); |
| if (!ctx.field.isConstructor()) { |
| env.error(where, "invalid.constr.invoke"); |
| return vset.addVar(thisN); |
| } |
| // As a consequence of the DA/DU rules in the JLS (draft of |
| // forthcoming 2e), all variables are both definitely assigned |
| // and definitely unassigned in unreachable code. Normally, this |
| // correctly suppresses DA/DU-related errors in such code. |
| // The use of the DA status of the 'this' variable for the extra |
| // check below on correct constructor usage, however, does not quite |
| // fit into this DA/DU scheme. The current representation of |
| // Vsets for unreachable dead-ends, does not allow 'clearVar' |
| // to work, as the DA/DU bits (all on) are implicitly represented |
| // by the fact that the Vset is a dead-end. The DA/DU status |
| // of the 'this' variable is supposed to be temporarily |
| // cleared at the beginning of a constructor and during the |
| // checking of constructor arguments (see below in this method). |
| // Since 'clearVar' has no effect on dead-ends, we may |
| // find the 'this' variable in an erroneously definitely-assigned state. |
| // As a workaround, we suppress the following error message when |
| // the Vset is a dead-end, i.e., when we are in unreachable code. |
| // Unfortunately, the special-case treatment of reachability for |
| // if-then and if-then-else allows unreachable code in some circumstances, |
| // thus it is possible that no error message will be emitted at all. |
| // While this behavior is strictly incorrect (thus we call this a |
| // workaround), the problematic code is indeed unreachable and will |
| // not be executed. In fact, it will be entirely omitted from the |
| // translated program, and can cause no harm at runtime. A correct |
| // solution would require modifying the representation of the DA/DU |
| // analysis to use finite Vsets only, restricting the universe |
| // of variables about which assertions are made (even in unreachable |
| // code) to variables that are actually in scope. Alternatively, the |
| // Vset extension and the dead-end marker (currently a reserved value |
| // of the extension) could be represented orthogonally. In either case, |
| // 'clearVar' could then be made to work on (non-canonical) dead ends. |
| // See file 'Vset.java'. |
| if (!vset.isReallyDeadEnd() && vset.testVar(thisN)) { |
| env.error(where, "constr.invoke.not.first"); |
| return vset; |
| } |
| vset = vset.addVar(thisN); |
| if (right instanceof SuperExpression) { |
| // supers require this specific kind of checking |
| vset = right.checkAmbigName(env, ctx, vset, exp, this); |
| } else { |
| vset = right.checkValue(env, ctx, vset, exp); |
| } |
| } else { |
| vset = right.checkAmbigName(env, ctx, vset, exp, this); |
| if (right.type == Type.tPackage) { |
| FieldExpression.reportFailedPackagePrefix(env, right); |
| return vset; |
| } |
| if (right instanceof TypeExpression) { |
| staticRef = true; |
| } |
| } |
| if (right.type.isType(TC_CLASS)) { |
| c = env.getClassDeclaration(right.type); |
| } else if (right.type.isType(TC_ARRAY)) { |
| isArray = true; |
| c = env.getClassDeclaration(Type.tObject); |
| } else { |
| if (!right.type.isType(TC_ERROR)) { |
| env.error(where, "invalid.method.invoke", right.type); |
| } |
| return vset; |
| } |
| |
| // Normally, the effective accessing class is the innermost |
| // class surrounding the current method call, but, for calls |
| // of the form '<class>.super.<method>(...)', it is <class>. |
| // This allows access to protected members of a superclass |
| // from within a class nested within one of its subclasses. |
| // Otherwise, for example, the call below to 'matchMethod' |
| // may fail due to the rules for visibility of inaccessible |
| // members. For consistency, we treat qualified 'this' in |
| // the same manner, as error diagnostics will be affected. |
| // QUERY: Are there subtle unexplored language issues here? |
| if (right instanceof FieldExpression) { |
| Identifier id = ((FieldExpression)right).id; |
| if (id == idThis) { |
| sourceClass = ((FieldExpression)right).clazz; |
| } else if (id == idSuper) { |
| isSuper = true; |
| sourceClass = ((FieldExpression)right).clazz; |
| } |
| } else if (right instanceof SuperExpression) { |
| isSuper = true; |
| } |
| |
| // Fix for 4158650. When we extend a protected inner |
| // class in a different package, we may not have access |
| // to the type of our superclass. Allow the call to |
| // the superclass constructor from within our constructor |
| // Note that this check does not apply to constructor |
| // calls in new instance expressions -- those are part |
| // of NewInstanceExpression#check(). |
| if (id != idInit) { |
| // Required by JLS 6.6.1. Fixes 4143715. |
| // (See also 4094658.) |
| if (!FieldExpression.isTypeAccessible(where, env, |
| right.type, |
| sourceClass)) { |
| ClassDeclaration cdecl = |
| sourceClass.getClassDeclaration(); |
| if (staticRef) { |
| env.error(where, "no.type.access", |
| id, right.type.toString(), cdecl); |
| } else { |
| env.error(where, "cant.access.member.type", |
| id, right.type.toString(), cdecl); |
| } |
| } |
| } |
| } |
| |
| // Compose a list of argument types |
| boolean hasErrors = false; |
| |
| // "this" is not defined during argument checking |
| if (id.equals(idInit)) { |
| vset = vset.clearVar(ctx.getThisNumber()); |
| } |
| |
| for (int i = 0 ; i < args.length ; i++) { |
| vset = args[i].checkValue(env, ctx, vset, exp); |
| argTypes[i] = args[i].type; |
| hasErrors = hasErrors || argTypes[i].isType(TC_ERROR); |
| } |
| |
| // "this" is defined after the constructor invocation |
| if (id.equals(idInit)) { |
| vset = vset.addVar(ctx.getThisNumber()); |
| } |
| |
| // Check if there are any type errors in the arguments |
| if (hasErrors) { |
| return vset; |
| } |
| |
| // Get the method field, given the argument types |
| clazz = c.getClassDefinition(env); |
| |
| if (field == null) { |
| |
| field = clazz.matchMethod(env, sourceClass, id, argTypes); |
| |
| if (field == null) { |
| if (id.equals(idInit)) { |
| if (diagnoseMismatch(env, args, argTypes)) |
| return vset; |
| String sig = clazz.getName().getName().toString(); |
| sig = Type.tMethod(Type.tError, argTypes).typeString(sig, false, false); |
| env.error(where, "unmatched.constr", sig, c); |
| return vset; |
| } |
| String sig = id.toString(); |
| sig = Type.tMethod(Type.tError, argTypes).typeString(sig, false, false); |
| if (clazz.findAnyMethod(env, id) == null) { |
| if (ctx.getField(env, id) != null) { |
| env.error(where, "invalid.method", id, c); |
| } else { |
| env.error(where, "undef.meth", sig, c); |
| } |
| } else if (diagnoseMismatch(env, args, argTypes)) { |
| } else { |
| env.error(where, "unmatched.meth", sig, c); |
| } |
| return vset; |
| } |
| |
| } |
| |
| type = field.getType().getReturnType(); |
| |
| // Make sure that static references are allowed |
| if (staticRef && !field.isStatic()) { |
| env.error(where, "no.static.meth.access", |
| field, field.getClassDeclaration()); |
| return vset; |
| } |
| |
| if (field.isProtected() |
| && !(right == null) |
| && !(right instanceof SuperExpression |
| // Extension of JLS 6.6.2 for qualified 'super'. |
| || (right instanceof FieldExpression && |
| ((FieldExpression)right).id == idSuper)) |
| && !sourceClass.protectedAccess(env, field, right.type)) { |
| env.error(where, "invalid.protected.method.use", |
| field.getName(), field.getClassDeclaration(), |
| right.type); |
| return vset; |
| } |
| |
| // In <class>.super.<method>(), we cannot simply evaluate |
| // <class>.super to an object reference (as we would for |
| // <class>.super.<field>) and then perform an 'invokespecial'. |
| // An 'invokespecial' must be performed from within (a subclass of) |
| // the class in which the target method is located. |
| if (right instanceof FieldExpression && |
| ((FieldExpression)right).id == idSuper) { |
| if (!field.isPrivate()) { |
| // The private case is handled below. |
| // Use an access method unless the effective accessing class |
| // (the class qualifying the 'super') is the same as the |
| // immediately enclosing class, i.e., the qualification was |
| // unnecessary. |
| if (sourceClass != ctxClass) { |
| implMethod = sourceClass.getAccessMember(env, ctx, field, true); |
| } |
| } |
| } |
| |
| // Access method for private field if not in the same class. |
| if (implMethod == null && field.isPrivate()) { |
| ClassDefinition cdef = field.getClassDefinition(); |
| if (cdef != ctxClass) { |
| implMethod = cdef.getAccessMember(env, ctx, field, false); |
| } |
| } |
| |
| // Make sure that we are not invoking an abstract method |
| if (field.isAbstract() && (right != null) && (right.op == SUPER)) { |
| env.error(where, "invoke.abstract", field, field.getClassDeclaration()); |
| return vset; |
| } |
| |
| if (field.reportDeprecated(env)) { |
| if (field.isConstructor()) { |
| env.error(where, "warn.constr.is.deprecated", field); |
| } else { |
| env.error(where, "warn.meth.is.deprecated", |
| field, field.getClassDefinition()); |
| } |
| } |
| |
| // Check for recursive constructor |
| if (field.isConstructor() && ctx.field.equals(field)) { |
| env.error(where, "recursive.constr", field); |
| } |
| |
| // When a package-private class defines public or protected |
| // members, those members may sometimes be accessed from |
| // outside of the package in public subclasses. In these |
| // cases, we need to massage the method call to refer to |
| // to an accessible subclass rather than the package-private |
| // parent class. Part of fix for 4135692. |
| |
| // Find out if the class which contains this method |
| // call has access to the class which declares the |
| // public or protected method referent. |
| // We don't perform this translation on constructor calls. |
| if (sourceClass == ctxClass) { |
| ClassDefinition declarer = field.getClassDefinition(); |
| if (!field.isConstructor() && |
| declarer.isPackagePrivate() && |
| !declarer.getName().getQualifier() |
| .equals(sourceClass.getName().getQualifier())) { |
| |
| //System.out.println("The access of member " + |
| // field + " declared in class " + |
| // declarer + |
| // " is not allowed by the VM from class " + |
| // accessor + |
| // ". Replacing with an access of class " + |
| // clazz); |
| |
| // We cannot make this access at the VM level. |
| // Construct a member which will stand for this |
| // method in clazz and set `field' to refer to it. |
| field = |
| MemberDefinition.makeProxyMember(field, clazz, env); |
| } |
| } |
| |
| sourceClass.addDependency(field.getClassDeclaration()); |
| if (sourceClass != ctxClass) { |
| ctxClass.addDependency(field.getClassDeclaration()); |
| } |
| |
| } catch (ClassNotFound ee) { |
| env.error(where, "class.not.found", ee.name, ctx.field); |
| return vset; |
| |
| } catch (AmbiguousMember ee) { |
| env.error(where, "ambig.field", id, ee.field1, ee.field2); |
| return vset; |
| } |
| |
| // Make sure it is qualified |
| if ((right == null) && !field.isStatic()) { |
| right = ctx.findOuterLink(env, where, field); |
| vset = right.checkValue(env, ctx, vset, exp); |
| } |
| |
| // Cast arguments |
| argTypes = field.getType().getArgumentTypes(); |
| for (int i = 0 ; i < args.length ; i++) { |
| args[i] = convert(env, ctx, argTypes[i], args[i]); |
| } |
| |
| if (field.isConstructor()) { |
| MemberDefinition m = field; |
| if (implMethod != null) { |
| m = implMethod; |
| } |
| int nargs = args.length; |
| Expression[] newargs = args; |
| if (nargs > this.args.length) { |
| // Argument was added above. |
| // Maintain the model for hidden outer args in outer.super(...): |
| Expression rightI; |
| if (right instanceof SuperExpression) { |
| rightI = new SuperExpression(right.where, ctx); |
| ((SuperExpression)right).outerArg = args[0]; |
| } else if (right instanceof ThisExpression) { |
| rightI = new ThisExpression(right.where, ctx); |
| } else { |
| throw new CompilerError("this.init"); |
| } |
| if (implMethod != null) { |
| // Need dummy argument for access method. |
| // Dummy argument follows outer instance link. |
| // Leave 'this.args' equal to 'newargs' but |
| // without the outer instance link. |
| newargs = new Expression[nargs+1]; |
| this.args = new Expression[nargs]; |
| newargs[0] = args[0]; // outer instance |
| this.args[0] = newargs[1] = new NullExpression(where); // dummy argument |
| for (int i = 1 ; i < nargs ; i++) { |
| this.args[i] = newargs[i+1] = args[i]; |
| } |
| } else { |
| // Strip outer instance link from 'this.args'. |
| // ASSERT(this.arg.length == nargs-1); |
| for (int i = 1 ; i < nargs ; i++) { |
| this.args[i-1] = args[i]; |
| } |
| } |
| implementation = new MethodExpression(where, rightI, m, newargs); |
| implementation.type = type; // Is this needed? |
| } else { |
| // No argument was added. |
| if (implMethod != null) { |
| // Need dummy argument for access method. |
| // Dummy argument is first, as there is no outer instance link. |
| newargs = new Expression[nargs+1]; |
| newargs[0] = new NullExpression(where); |
| for (int i = 0 ; i < nargs ; i++) { |
| newargs[i+1] = args[i]; |
| } |
| } |
| implementation = new MethodExpression(where, right, m, newargs); |
| } |
| } else { |
| // Have ordinary method. |
| // Argument should have been added only for a constructor. |
| if (args.length > this.args.length) { |
| throw new CompilerError("method arg"); |
| } |
| if (implMethod != null) { |
| //System.out.println("Calling " + field + " via " + implMethod); |
| Expression oldargs[] = this.args; |
| if (field.isStatic()) { |
| Expression call = new MethodExpression(where, null, implMethod, oldargs); |
| implementation = new CommaExpression(where, right, call); |
| } else { |
| // Access method needs an explicit 'this' pointer. |
| int nargs = oldargs.length; |
| Expression newargs[] = new Expression[nargs+1]; |
| newargs[0] = right; |
| for (int i = 0; i < nargs; i++) { |
| newargs[i+1] = oldargs[i]; |
| } |
| implementation = new MethodExpression(where, null, implMethod, newargs); |
| } |
| } |
| } |
| |
| // Follow super() by variable initializations |
| if (ctx.field.isConstructor() && |
| field.isConstructor() && (right != null) && (right.op == SUPER)) { |
| Expression e = makeVarInits(env, ctx); |
| if (e != null) { |
| if (implementation == null) |
| implementation = (Expression)this.clone(); |
| implementation = new CommaExpression(where, implementation, e); |
| } |
| } |
| |
| // Throw the declared exceptions. |
| ClassDeclaration exceptions[] = field.getExceptions(env); |
| if (isArray && (field.getName() == idClone) && |
| (field.getType().getArgumentTypes().length == 0)) { |
| /* Arrays pretend that they have "public Object clone()" that doesn't |
| * throw anything, according to the language spec. |
| */ |
| exceptions = new ClassDeclaration[0]; |
| /* See if there's a bogus catch for it, to issue a warning. */ |
| for (Context p = ctx; p != null; p = p.prev) { |
| if (p.node != null && p.node.op == TRY) { |
| ((TryStatement) p.node).arrayCloneWhere = where; |
| } |
| } |
| } |
| for (int i = 0 ; i < exceptions.length ; i++) { |
| if (exp.get(exceptions[i]) == null) { |
| exp.put(exceptions[i], this); |
| } |
| } |
| |
| // Mark all blank finals as definitely assigned following 'this(...)'. |
| // Correctness follows inductively from the requirement that all blank finals |
| // be definitely assigned at the completion of every constructor. |
| if (ctx.field.isConstructor() && |
| field.isConstructor() && (right != null) && (right.op == THIS)) { |
| ClassDefinition cls = field.getClassDefinition(); |
| for (MemberDefinition f = cls.getFirstMember() ; f != null ; f = f.getNextMember()) { |
| if (f.isVariable() && f.isBlankFinal() && !f.isStatic()) { |
| // Static variables should also be considered defined as well, but this |
| // is handled in 'SourceClass.checkMembers', and we should not interfere. |
| vset = vset.addVar(ctx.getFieldNumber(f)); |
| } |
| } |
| } |
| |
| return vset; |
| } |
| |
| /** |
| * Check void expression |
| */ |
| public Vset check(Environment env, Context ctx, Vset vset, Hashtable<Object, Object> exp) { |
| return checkValue(env, ctx, vset, exp); |
| } |
| |
| /** |
| * We're about to report a "unmatched method" error. |
| * Try to issue a better diagnostic by comparing the actual argument types |
| * with the method (or methods) available. |
| * In particular, if there is an argument which fails to match <em>any</em> |
| * method, we report a type mismatch error against that particular argument. |
| * The diagnostic will report a target type taken from one of the methods. |
| * <p> |
| * Return false if we couldn't think of anything smart to say. |
| */ |
| boolean diagnoseMismatch(Environment env, Expression args[], |
| Type argTypes[]) throws ClassNotFound { |
| Type margType[] = new Type[1]; |
| boolean saidSomething = false; |
| int start = 0; |
| while (start < argTypes.length) { |
| int code = clazz.diagnoseMismatch(env, id, argTypes, start, margType); |
| String opName = (id.equals(idInit)) ? "constructor" : opNames[op]; |
| if (code == -2) { |
| env.error(where, "wrong.number.args", opName); |
| saidSomething = true; |
| } |
| if (code < 0) break; |
| int i = code >> 2; |
| boolean castOK = (code & 2) != 0; |
| boolean ambig = (code & 1) != 0; |
| Type targetType = margType[0]; |
| |
| // At least one argument is offensive to all overloadings. |
| // targetType is one of the argument types it does not match. |
| String ttype = ""+targetType; |
| |
| // The message might be slightly misleading, if there are other |
| // argument types that also would match. Hint at this: |
| //if (ambig) ttype = "{"+ttype+";...}"; |
| |
| if (castOK) |
| env.error(args[i].where, "explicit.cast.needed", opName, argTypes[i], ttype); |
| else |
| env.error(args[i].where, "incompatible.type", opName, argTypes[i], ttype); |
| saidSomething = true; |
| start = i+1; // look for other bad arguments, too |
| } |
| return saidSomething; |
| } |
| |
| /** |
| * Inline |
| */ |
| static final int MAXINLINECOST = Statement.MAXINLINECOST; |
| |
| private |
| Expression inlineMethod(Environment env, Context ctx, Statement s, boolean valNeeded) { |
| if (env.dump()) { |
| System.out.println("INLINE METHOD " + field + " in " + ctx.field); |
| } |
| LocalMember v[] = LocalMember.copyArguments(ctx, field); |
| Statement body[] = new Statement[v.length + 2]; |
| |
| int n = 0; |
| if (field.isStatic()) { |
| body[0] = new ExpressionStatement(where, right); |
| } else { |
| if ((right != null) && (right.op == SUPER)) { |
| right = new ThisExpression(right.where, ctx); |
| } |
| body[0] = new VarDeclarationStatement(where, v[n++], right); |
| } |
| for (int i = 0 ; i < args.length ; i++) { |
| body[i + 1] = new VarDeclarationStatement(where, v[n++], args[i]); |
| } |
| //System.out.print("BEFORE:"); s.print(System.out); System.out.println(); |
| // Note: If !valNeeded, then all returns in the body of the method |
| // change to void returns. |
| body[body.length - 1] = (s != null) ? s.copyInline(ctx, valNeeded) : null; |
| //System.out.print("COPY:"); body[body.length - 1].print(System.out); System.out.println(); |
| LocalMember.doneWithArguments(ctx, v); |
| |
| // Make sure the type matches what the return statements are returning. |
| Type type = valNeeded ? this.type : Type.tVoid; |
| Expression e = new InlineMethodExpression(where, type, field, new CompoundStatement(where, body)); |
| return valNeeded ? e.inlineValue(env, ctx) : e.inline(env, ctx); |
| } |
| |
| public Expression inline(Environment env, Context ctx) { |
| if (implementation != null) |
| return implementation.inline(env, ctx); |
| try { |
| if (right != null) { |
| right = field.isStatic() ? right.inline(env, ctx) : right.inlineValue(env, ctx); |
| } |
| for (int i = 0 ; i < args.length ; i++) { |
| args[i] = args[i].inlineValue(env, ctx); |
| } |
| |
| // ctxClass is the current class trying to inline this method |
| ClassDefinition ctxClass = ctx.field.getClassDefinition(); |
| |
| Expression e = this; |
| if (env.opt() && field.isInlineable(env, clazz.isFinal()) && |
| |
| // Don't inline if a qualified non-static method: the call |
| // itself might throw NullPointerException as a side effect |
| ((right == null) || (right.op==THIS) || field.isStatic()) && |
| |
| // We only allow the inlining if the current class can access |
| // the field, the field's class, and right's declared type. |
| ctxClass.permitInlinedAccess(env, |
| field.getClassDeclaration()) && |
| ctxClass.permitInlinedAccess(env, field) && |
| (right==null || ctxClass.permitInlinedAccess(env, |
| env.getClassDeclaration(right.type))) && |
| |
| ((id == null) || !id.equals(idInit)) && |
| (!ctx.field.isInitializer()) && ctx.field.isMethod() && |
| (ctx.getInlineMemberContext(field) == null)) { |
| Statement s = (Statement)field.getValue(env); |
| if ((s == null) || |
| (s.costInline(MAXINLINECOST, env, ctx) < MAXINLINECOST)) { |
| e = inlineMethod(env, ctx, s, false); |
| } |
| } |
| return e; |
| |
| } catch (ClassNotFound e) { |
| throw new CompilerError(e); |
| } |
| } |
| |
| public Expression inlineValue(Environment env, Context ctx) { |
| if (implementation != null) |
| return implementation.inlineValue(env, ctx); |
| try { |
| if (right != null) { |
| right = field.isStatic() ? right.inline(env, ctx) : right.inlineValue(env, ctx); |
| } |
| if (field.getName().equals(idInit)) { |
| ClassDefinition refc = field.getClassDefinition(); |
| UplevelReference r = refc.getReferencesFrozen(); |
| if (r != null) { |
| r.willCodeArguments(env, ctx); |
| } |
| } |
| for (int i = 0 ; i < args.length ; i++) { |
| args[i] = args[i].inlineValue(env, ctx); |
| } |
| |
| // ctxClass is the current class trying to inline this method |
| ClassDefinition ctxClass = ctx.field.getClassDefinition(); |
| |
| if (env.opt() && field.isInlineable(env, clazz.isFinal()) && |
| |
| // Don't inline if a qualified non-static method: the call |
| // itself might throw NullPointerException as a side effect |
| ((right == null) || (right.op==THIS) || field.isStatic()) && |
| |
| // We only allow the inlining if the current class can access |
| // the field, the field's class, and right's declared type. |
| ctxClass.permitInlinedAccess(env, |
| field.getClassDeclaration()) && |
| ctxClass.permitInlinedAccess(env, field) && |
| (right==null || ctxClass.permitInlinedAccess(env, |
| env.getClassDeclaration(right.type))) && |
| |
| (!ctx.field.isInitializer()) && ctx.field.isMethod() && |
| (ctx.getInlineMemberContext(field) == null)) { |
| Statement s = (Statement)field.getValue(env); |
| if ((s == null) || |
| (s.costInline(MAXINLINECOST, env, ctx) < MAXINLINECOST)) { |
| return inlineMethod(env, ctx, s, true); |
| } |
| } |
| return this; |
| } catch (ClassNotFound e) { |
| throw new CompilerError(e); |
| } |
| } |
| |
| public Expression copyInline(Context ctx) { |
| if (implementation != null) |
| return implementation.copyInline(ctx); |
| return super.copyInline(ctx); |
| } |
| |
| public int costInline(int thresh, Environment env, Context ctx) { |
| if (implementation != null) |
| return implementation.costInline(thresh, env, ctx); |
| |
| // for now, don't allow calls to super() to be inlined. We may fix |
| // this later |
| if ((right != null) && (right.op == SUPER)) { |
| return thresh; |
| } |
| return super.costInline(thresh, env, ctx); |
| } |
| |
| /* |
| * Grab all instance initializer code from the class definition, |
| * and return as one bolus. Note that we are assuming the |
| * the relevant fields have already been checked. |
| * (See the pre-pass in SourceClass.checkMembers which ensures this.) |
| */ |
| private Expression makeVarInits(Environment env, Context ctx) { |
| // insert instance initializers |
| ClassDefinition clazz = ctx.field.getClassDefinition(); |
| Expression e = null; |
| for (MemberDefinition f = clazz.getFirstMember() ; f != null ; f = f.getNextMember()) { |
| if ((f.isVariable() || f.isInitializer()) && !f.isStatic()) { |
| try { |
| f.check(env); |
| } catch (ClassNotFound ee) { |
| env.error(f.getWhere(), "class.not.found", ee.name, |
| f.getClassDefinition()); |
| } |
| Expression val = null; |
| if (f.isUplevelValue()) { |
| if (f != clazz.findOuterMember()) { |
| // it's too early to accumulate these |
| continue; |
| } |
| IdentifierExpression arg = |
| new IdentifierExpression(where, f.getName()); |
| if (!arg.bind(env, ctx)) { |
| throw new CompilerError("bind "+arg.id); |
| } |
| val = arg; |
| } else if (f.isInitializer()) { |
| Statement s = (Statement)f.getValue(); |
| val = new InlineMethodExpression(where, Type.tVoid, f, s); |
| } else { |
| val = (Expression)f.getValue(); |
| } |
| // append all initializers to "e": |
| // This section used to check for variables which were |
| // initialized to their default values and elide such |
| // initialization. This is specifically disallowed by |
| // JLS 12.5 numeral 4, which requires a textual ordering |
| // on the execution of initializers. |
| if ((val != null)) { // && !val.equals(0)) { |
| long p = f.getWhere(); |
| val = val.copyInline(ctx); |
| Expression init = val; |
| if (f.isVariable()) { |
| Expression v = new ThisExpression(p, ctx); |
| v = new FieldExpression(p, v, f); |
| init = new AssignExpression(p, v, val); |
| } |
| e = (e == null) ? init : new CommaExpression(p, e, init); |
| } |
| } |
| } |
| return e; |
| } |
| |
| /** |
| * Code |
| */ |
| public void codeValue(Environment env, Context ctx, Assembler asm) { |
| if (implementation != null) |
| throw new CompilerError("codeValue"); |
| int i = 0; // argument index |
| if (field.isStatic()) { |
| if (right != null) { |
| right.code(env, ctx, asm); |
| } |
| } else if (right == null) { |
| asm.add(where, opc_aload, 0); |
| } else if (right.op == SUPER) { |
| // 'super.<method>(...)', 'super(...)', or '<expr>.super(...)' |
| /***** |
| isSuper = true; |
| *****/ |
| right.codeValue(env, ctx, asm); |
| if (idInit.equals(id)) { |
| // 'super(...)' or '<expr>.super(...)' only |
| ClassDefinition refc = field.getClassDefinition(); |
| UplevelReference r = refc.getReferencesFrozen(); |
| if (r != null) { |
| // When calling a constructor for a class with |
| // embedded uplevel references, add extra arguments. |
| if (r.isClientOuterField()) { |
| // the extra arguments are inserted after this one |
| args[i++].codeValue(env, ctx, asm); |
| } |
| r.codeArguments(env, ctx, asm, where, field); |
| } |
| } |
| } else { |
| right.codeValue(env, ctx, asm); |
| /***** |
| if (right.op == FIELD && |
| ((FieldExpression)right).id == idSuper) { |
| // '<class>.super.<method>(...)' |
| isSuper = true; |
| } |
| *****/ |
| } |
| |
| for ( ; i < args.length ; i++) { |
| args[i].codeValue(env, ctx, asm); |
| } |
| |
| if (field.isStatic()) { |
| asm.add(where, opc_invokestatic, field); |
| } else if (field.isConstructor() || field.isPrivate() || isSuper) { |
| asm.add(where, opc_invokespecial, field); |
| } else if (field.getClassDefinition().isInterface()) { |
| asm.add(where, opc_invokeinterface, field); |
| } else { |
| asm.add(where, opc_invokevirtual, field); |
| } |
| |
| if (right != null && right.op == SUPER && idInit.equals(id)) { |
| // 'super(...)' or '<expr>.super(...)' |
| ClassDefinition refc = ctx.field.getClassDefinition(); |
| UplevelReference r = refc.getReferencesFrozen(); |
| if (r != null) { |
| // After calling a superclass constructor in a class with |
| // embedded uplevel references, initialize uplevel fields. |
| r.codeInitialization(env, ctx, asm, where, field); |
| } |
| } |
| } |
| |
| /** |
| * Check if the first thing is a constructor invocation |
| */ |
| public Expression firstConstructor() { |
| return id.equals(idInit) ? this : null; |
| } |
| |
| /** |
| * Print |
| */ |
| public void print(PrintStream out) { |
| out.print("(" + opNames[op]); |
| if (right != null) { |
| out.print(" "); |
| right.print(out); |
| } |
| out.print(" " + ((id == null) ? idInit : id)); |
| for (int i = 0 ; i < args.length ; i++) { |
| out.print(" "); |
| if (args[i] != null) { |
| args[i].print(out); |
| } else { |
| out.print("<null>"); |
| } |
| } |
| out.print(")"); |
| if (implementation != null) { |
| out.print("/IMPL="); |
| implementation.print(out); |
| } |
| } |
| } |