Showing the changes to java/pkg/sun/tools/tree/Expression.java (1 of 18352 files). Show all
Unified · Split
| @@ -0,0 +1,775 @@ | ||
| 1 | +/* | |
| 2 | + * Copyright (c) 1994, 2004, Oracle and/or its affiliates. All rights reserved. | |
| 3 | + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. | |
| 4 | + * | |
| 5 | + * This code is free software; you can redistribute it and/or modify it | |
| 6 | + * under the terms of the GNU General Public License version 2 only, as | |
| 7 | + * published by the Free Software Foundation. Oracle designates this | |
| 8 | + * particular file as subject to the "Classpath" exception as provided | |
| 9 | + * by Oracle in the LICENSE file that accompanied this code. | |
| 10 | + * | |
| 11 | + * This code is distributed in the hope that it will be useful, but WITHOUT | |
| 12 | + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 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 sun.tools.tree; | |
| 27 | + | |
| 28 | +import sun.tools.java.*; | |
| 29 | +import sun.tools.asm.Label; | |
| 30 | +import sun.tools.asm.Assembler; | |
| 31 | +import java.io.PrintStream; | |
| 32 | +import java.util.Hashtable; | |
| 33 | + | |
| 34 | +/** | |
| 35 | + * WARNING: The contents of this source file are not part of any | |
| 36 | + * supported API. Code that depends on them does so at its own risk: | |
| 37 | + * they are subject to change or removal without notice. | |
| 38 | + */ | |
| 39 | +public | |
| 40 | +class Expression extends Node { | |
| 41 | + Type type; | |
| 42 | + | |
| 43 | + /** | |
| 44 | + * Constructor | |
| 45 | + */ | |
| 46 | + Expression(int op, long where, Type type) { | |
| 47 | + super(op, where); | |
| 48 | + this.type = type; | |
| 49 | + } | |
| 50 | + | |
| 51 | + /** | |
| 52 | + * Type checking may assign a more complex implementation | |
| 53 | + * to an innocuous-looking expression (like an identifier). | |
| 54 | + * Return that implementation, or the original expression itself | |
| 55 | + * if there is no special implementation. | |
| 56 | + * <p> | |
| 57 | + * This appears at present to be dead code, and is not called | |
| 58 | + * from within javac. Access to the implementation generally | |
| 59 | + * occurs within the same class, and thus uses the underlying | |
| 60 | + * field directly. | |
| 61 | + */ | |
| 62 | + public Expression getImplementation() { | |
| 63 | + return this; | |
| 64 | + } | |
| 65 | + | |
| 66 | + public Type getType() { | |
| 67 | + return type; | |
| 68 | + } | |
| 69 | + | |
| 70 | + /** | |
| 71 | + * Return the precedence of the operator | |
| 72 | + */ | |
| 73 | + int precedence() { | |
| 74 | + return (op < opPrecedence.length) ? opPrecedence[op] : 100; | |
| 75 | + } | |
| 76 | + | |
| 77 | + /** | |
| 78 | + * Order the expression based on precedence | |
| 79 | + */ | |
| 80 | + public Expression order() { | |
| 81 | + return this; | |
| 82 | + } | |
| 83 | + | |
| 84 | + /** | |
| 85 | + * Return true if constant, according to JLS 15.27. | |
| 86 | + * A constant expression must inline away to a literal constant. | |
| 87 | + */ | |
| 88 | + public boolean isConstant() { | |
| 89 | + return false; | |
| 90 | + } | |
| 91 | + | |
| 92 | + /** | |
| 93 | + * Return the constant value. | |
| 94 | + */ | |
| 95 | + public Object getValue() { | |
| 96 | + return null; | |
| 97 | + } | |
| 98 | + | |
| 99 | + /** | |
| 100 | + * Check if the expression is known to be equal to a given value. | |
| 101 | + * Returns false for any expression other than a literal constant, | |
| 102 | + * thus should be called only after simplification (inlining) has | |
| 103 | + * been performed. | |
| 104 | + */ | |
| 105 | + public boolean equals(int i) { | |
| 106 | + return false; | |
| 107 | + } | |
| 108 | + public boolean equals(boolean b) { | |
| 109 | + return false; | |
| 110 | + } | |
| 111 | + public boolean equals(Identifier id) { | |
| 112 | + return false; | |
| 113 | + } | |
| 114 | + public boolean equals(String s) { | |
| 115 | + return false; | |
| 116 | + } | |
| 117 | + | |
| 118 | + /** | |
| 119 | + * Check if the expression must be a null reference. | |
| 120 | + */ | |
| 121 | + public boolean isNull() { | |
| 122 | + return false; | |
| 123 | + } | |
| 124 | + | |
| 125 | + /** | |
| 126 | + * Check if the expression cannot be a null reference. | |
| 127 | + */ | |
| 128 | + public boolean isNonNull() { | |
| 129 | + return false; | |
| 130 | + } | |
| 131 | + | |
| 132 | + /** | |
| 133 | + * Check if the expression is equal to its default static value | |
| 134 | + */ | |
| 135 | + public boolean equalsDefault() { | |
| 136 | + return false; | |
| 137 | + } | |
| 138 | + | |
| 139 | + | |
| 140 | + /** | |
| 141 | + * Convert an expresion to a type | |
| 142 | + */ | |
| 143 | + Type toType(Environment env, Context ctx) { | |
| 144 | + env.error(where, "invalid.type.expr"); | |
| 145 | + return Type.tError; | |
| 146 | + } | |
| 147 | + | |
| 148 | + /** | |
| 149 | + * Convert an expresion to a type in a context where a qualified | |
| 150 | + * type name is expected, e.g., in the prefix of a qualified type | |
| 151 | + * name. | |
| 152 | + */ | |
| 153 | + /*-----------------------------------------------------* | |
| 154 | + Type toQualifiedType(Environment env, Context ctx) { | |
| 155 | + env.error(where, "invalid.type.expr"); | |
| 156 | + return Type.tError; | |
| 157 | + } | |
| 158 | + *-----------------------------------------------------*/ | |
| 159 | + | |
| 160 | + /** | |
| 161 | + * See if this expression fits in the given type. | |
| 162 | + * This is useful because some larger numbers fit into | |
| 163 | + * smaller types. | |
| 164 | + * <p> | |
| 165 | + * If it is an "int" constant expression, inline it, if necessary, | |
| 166 | + * to examine its numerical value. See JLS 5.2 and 15.24. | |
| 167 | + */ | |
| 168 | + public boolean fitsType(Environment env, Context ctx, Type t) { | |
| 169 | + try { | |
| 170 | + if (env.isMoreSpecific(this.type, t)) { | |
| 171 | + return true; | |
| 172 | + } | |
| 173 | + if (this.type.isType(TC_INT) && this.isConstant() && ctx != null) { | |
| 174 | + // Tentative inlining is harmless for constant expressions. | |
| 175 | + Expression n = this.inlineValue(env, ctx); | |
| 176 | + if (n != this && n instanceof ConstantExpression) { | |
| 177 | + return n.fitsType(env, ctx, t); | |
| 178 | + } | |
| 179 | + } | |
| 180 | + return false; | |
| 181 | + } catch (ClassNotFound e) { | |
| 182 | + return false; | |
| 183 | + } | |
| 184 | + } | |
| 185 | + | |
| 186 | + /** @deprecated (for backward compatibility) */ | |
| 187 | + @Deprecated | |
| 188 | + public boolean fitsType(Environment env, Type t) { | |
| 189 | + return fitsType(env, (Context) null, t); | |
| 190 | + } | |
| 191 | + | |
| 192 | + /** | |
| 193 | + * Check an expression | |
| 194 | + */ | |
| 195 | + public Vset checkValue(Environment env, Context ctx, Vset vset, Hashtable exp) { | |
| 196 | + return vset; | |
| 197 | + } | |
| 198 | + public Vset checkInitializer(Environment env, Context ctx, Vset vset, Type t, Hashtable exp) { | |
| 199 | + return checkValue(env, ctx, vset, exp); | |
| 200 | + } | |
| 201 | + public Vset check(Environment env, Context ctx, Vset vset, Hashtable exp) { | |
| 202 | + throw new CompilerError("check failed"); | |
| 203 | + } | |
| 204 | + | |
| 205 | + public Vset checkLHS(Environment env, Context ctx, | |
| 206 | + Vset vset, Hashtable exp) { | |
| 207 | + env.error(where, "invalid.lhs.assignment"); | |
| 208 | + type = Type.tError; | |
| 209 | + return vset; | |
| 210 | + } | |
| 211 | + | |
| 212 | + /** | |
| 213 | + * Return a <code>FieldUpdater</code> object to be used in updating the | |
| 214 | + * value of the location denoted by <code>this</code>, which must be an | |
| 215 | + * expression suitable for the left-hand side of an assignment. | |
| 216 | + * This is used for implementing assignments to private fields for which | |
| 217 | + * an access method is required. Returns null if no access method is | |
| 218 | + * needed, in which case the assignment is handled in the usual way, by | |
| 219 | + * direct access. Only simple assignment expressions are handled here | |
| 220 | + * Assignment operators and pre/post increment/decrement operators are | |
| 221 | + * are handled by 'getUpdater' below. | |
| 222 | + * <p> | |
| 223 | + * Called during the checking phase. | |
| 224 | + */ | |
| 225 | + | |
| 226 | + public FieldUpdater getAssigner(Environment env, Context ctx) { | |
| 227 | + throw new CompilerError("getAssigner lhs"); | |
| 228 | + } | |
| 229 | + | |
| 230 | + /** | |
| 231 | + * Return a <code>FieldUpdater</code> object to be used in updating the value of the | |
| 232 | + * location denoted by <code>this</code>, which must be an expression suitable for the | |
| 233 | + * left-hand side of an assignment. This is used for implementing the assignment | |
| 234 | + * operators and the increment/decrement operators on private fields that require an | |
| 235 | + * access method, e.g., uplevel from an inner class. Returns null if no access method | |
| 236 | + * is needed. | |
| 237 | + * <p> | |
| 238 | + * Called during the checking phase. | |
| 239 | + */ | |
| 240 | + | |
| 241 | + public FieldUpdater getUpdater(Environment env, Context ctx) { | |
| 242 | + throw new CompilerError("getUpdater lhs"); | |
| 243 | + } | |
| 244 | + | |
| 245 | + public Vset checkAssignOp(Environment env, Context ctx, | |
| 246 | + Vset vset, Hashtable exp, Expression outside) { | |
| 247 | + if (outside instanceof IncDecExpression) | |
| 248 | + env.error(where, "invalid.arg", opNames[outside.op]); | |
| 249 | + else | |
| 250 | + env.error(where, "invalid.lhs.assignment"); | |
| 251 | + type = Type.tError; | |
| 252 | + return vset; | |
| 253 | + } | |
| 254 | + | |
| 255 | + /** | |
| 256 | + * Check something that might be an AmbiguousName (refman 6.5.2). | |
| 257 | + * A string of dot-separated identifiers might be, in order of preference: | |
| 258 | + * <nl> | |
| 259 | + * <li> a variable name followed by fields or types | |
| 260 | + * <li> a type name followed by fields or types | |
| 261 | + * <li> a package name followed a type and then fields or types | |
| 262 | + * </nl> | |
| 263 | + * If a type name is found, it rewrites itself as a <tt>TypeExpression</tt>. | |
| 264 | + * If a node decides it can only be a package prefix, it sets its | |
| 265 | + * type to <tt>Type.tPackage</tt>. The caller must detect this | |
| 266 | + * and act appropriately to verify the full package name. | |
| 267 | + * @arg loc the expression containing the ambiguous expression | |
| 268 | + */ | |
| 269 | + public Vset checkAmbigName(Environment env, Context ctx, Vset vset, Hashtable exp, | |
| 270 | + UnaryExpression loc) { | |
| 271 | + return checkValue(env, ctx, vset, exp); | |
| 272 | + } | |
| 273 | + | |
| 274 | + /** | |
| 275 | + * Check a condition. Return a ConditionVars(), which indicates when | |
| 276 | + * which variables are set if the condition is true, and which are set if | |
| 277 | + * the condition is false. | |
| 278 | + */ | |
| 279 | + public ConditionVars checkCondition(Environment env, Context ctx, | |
| 280 | + Vset vset, Hashtable exp) { | |
| 281 | + ConditionVars cvars = new ConditionVars(); | |
| 282 | + checkCondition(env, ctx, vset, exp, cvars); | |
| 283 | + return cvars; | |
| 284 | + } | |
| 285 | + | |
| 286 | + /* | |
| 287 | + * Check a condition. | |
| 288 | + * | |
| 289 | + * cvars is modified so that | |
| 290 | + * cvar.vsTrue indicates variables with a known value if result = true | |
| 291 | + * cvars.vsFalse indicates variables with a known value if !result | |
| 292 | + * | |
| 293 | + * The default action is to simply call checkValue on the expression, and | |
| 294 | + * to see both vsTrue and vsFalse to the result. | |
| 295 | + */ | |
| 296 | + | |
| 297 | + public void checkCondition(Environment env, Context ctx, | |
| 298 | + Vset vset, Hashtable exp, ConditionVars cvars) { | |
| 299 | + cvars.vsTrue = cvars.vsFalse = checkValue(env, ctx, vset, exp); | |
| 300 | + // unshare side effects: | |
| 301 | + cvars.vsFalse = cvars.vsFalse.copy(); | |
| 302 | + } | |
| 303 | + | |
| 304 | + /** | |
| 305 | + * Evaluate. | |
| 306 | + * | |
| 307 | + * Attempt to compute the value of an expression node. If all operands are | |
| 308 | + * literal constants of the same kind (e.g., IntegerExpression nodes), a | |
| 309 | + * new constant node of the proper type is returned representing the value | |
| 310 | + * as computed at compile-time. Otherwise, the original node 'this' is | |
| 311 | + * returned. | |
| 312 | + */ | |
| 313 | + Expression eval() { | |
| 314 | + return this; | |
| 315 | + } | |
| 316 | + | |
| 317 | + /** | |
| 318 | + * Simplify. | |
| 319 | + * | |
| 320 | + * Attempt to simplify an expression node by returning a semantically- | |
| 321 | + * equivalent expression that is presumably less costly to execute. There | |
| 322 | + * is some overlap with the intent of 'eval', as compile-time evaluation of | |
| 323 | + * conditional expressions and the short-circuit boolean operators is | |
| 324 | + * performed here. Other simplifications include logical identities | |
| 325 | + * involving logical negation and comparisons. If no simplification is | |
| 326 | + * possible, the original node 'this' is returned. It is assumed that the | |
| 327 | + * children of the node have previously been recursively simplified and | |
| 328 | + * evaluated. A result of 'null' indicates that the expression may be | |
| 329 | + * elided entirely. | |
| 330 | + */ | |
| 331 | + Expression simplify() { | |
| 332 | + return this; | |
| 333 | + } | |
| 334 | + | |
| 335 | + /** | |
| 336 | + * Inline. | |
| 337 | + * | |
| 338 | + * Recursively simplify each child of an expression node, destructively | |
| 339 | + * replacing the child with the simplified result. Also attempts to | |
| 340 | + * simplify the current node 'this', and returns the simplified result. | |
| 341 | + * | |
| 342 | + * The name 'inline' is somthing of a misnomer, as these methods are | |
| 343 | + * responsible for compile-time expression simplification in general. | |
| 344 | + * The 'eval' and 'simplify' methods apply to a single expression node | |
| 345 | + * only -- it is 'inline' and 'inlineValue' that drive the simplification | |
| 346 | + * of entire expressions. | |
| 347 | + */ | |
| 348 | + public Expression inline(Environment env, Context ctx) { | |
| 349 | + return null; | |
| 350 | + } | |
| 351 | + public Expression inlineValue(Environment env, Context ctx) { | |
| 352 | + return this; | |
| 353 | + } | |
| 354 | + | |
| 355 | + /** | |
| 356 | + * Attempt to evaluate this expression. If this expression | |
| 357 | + * yields a value, append it to the StringBuffer `buffer'. | |
| 358 | + * If this expression cannot be evaluated at this time (for | |
| 359 | + * example if it contains a division by zero, a non-constant | |
| 360 | + * subexpression, or a subexpression which "refuses" to evaluate) | |
| 361 | + * then return `null' to indicate failure. | |
| 362 | + * | |
| 363 | + * It is anticipated that this method will be called to evaluate | |
| 364 | + * concatenations of compile-time constant strings. The call | |
| 365 | + * originates from AddExpression#inlineValue(). | |
| 366 | + * | |
| 367 | + * See AddExpression#inlineValueSB() for detailed comments. | |
| 368 | + */ | |
| 369 | + protected StringBuffer inlineValueSB(Environment env, | |
| 370 | + Context ctx, | |
| 371 | + StringBuffer buffer) { | |
| 372 | + Expression inlined = inlineValue(env, ctx); | |
| 373 | + Object val = inlined.getValue(); | |
| 374 | + | |
| 375 | + if (val == null && !inlined.isNull()){ | |
| 376 | + // This (supposedly constant) expression refuses to yield | |
| 377 | + // a value. This can happen, in particular, when we are | |
| 378 | + // trying to evaluate a division by zero. It can also | |
| 379 | + // happen in cases where isConstant() is able to classify | |
| 380 | + // expressions as constant that the compiler's inlining | |
| 381 | + // mechanisms aren't able to evaluate; this is rare, | |
| 382 | + // and all such cases that we have found so far | |
| 383 | + // (e.g. 4082814, 4106244) have been plugged up. | |
| 384 | + // | |
| 385 | + // We return a null to indicate that we have failed to | |
| 386 | + // evaluate the concatenation. | |
| 387 | + return null; | |
| 388 | + } | |
| 389 | + | |
| 390 | + // For boolean and character expressions, getValue() returns | |
| 391 | + // an Integer. We need to take care, when appending the result | |
| 392 | + // of getValue(), that we preserve the type. | |
| 393 | + // Fix for 4103959, 4102672. | |
| 394 | + if (type == Type.tChar) { | |
| 395 | + buffer.append((char)((Integer)val).intValue()); | |
| 396 | + } else if (type == Type.tBoolean) { | |
| 397 | + buffer.append(((Integer)val).intValue() != 0); | |
| 398 | + } else { | |
| 399 | + buffer.append(val); | |
| 400 | + } | |
| 401 | + | |
| 402 | + return buffer; | |
| 403 | + } | |
| 404 | + | |
| 405 | + public Expression inlineLHS(Environment env, Context ctx) { | |
| 406 | + return null; | |
| 407 | + } | |
| 408 | + | |
| 409 | + /** | |
| 410 | + * The cost of inlining this expression. | |
| 411 | + * This cost controls the inlining of methods, and does not determine | |
| 412 | + * the compile-time simplifications performed by 'inline' and friends. | |
| 413 | + */ | |
| 414 | + public int costInline(int thresh, Environment env, Context ctx) { | |
| 415 | + return 1; | |
| 416 | + } | |
| 417 | + | |
| 418 | + /** | |
| 419 | + * Code | |
| 420 | + */ | |
| 421 | + void codeBranch(Environment env, Context ctx, Assembler asm, Label lbl, boolean whenTrue) { | |
| 422 | + if (type.isType(TC_BOOLEAN)) { | |
| 423 | + codeValue(env, ctx, asm); | |
| 424 | + asm.add(where, whenTrue ? opc_ifne : opc_ifeq, lbl, whenTrue); | |
| 425 | + } else { | |
| 426 | + throw new CompilerError("codeBranch " + opNames[op]); | |
| 427 | + } | |
| 428 | + } | |
| 429 | + public void codeValue(Environment env, Context ctx, Assembler asm) { | |
| 430 | + if (type.isType(TC_BOOLEAN)) { | |
| 431 | + Label l1 = new Label(); | |
| 432 | + Label l2 = new Label(); | |
| 433 | + | |
| 434 | + codeBranch(env, ctx, asm, l1, true); | |
| 435 | + asm.add(true, where, opc_ldc, new Integer(0)); | |
| 436 | + asm.add(true, where, opc_goto, l2); | |
| 437 | + asm.add(l1); | |
| 438 | + asm.add(true, where, opc_ldc, new Integer(1)); | |
| 439 | + asm.add(l2); | |
| 440 | + } else { | |
| 441 | + throw new CompilerError("codeValue"); | |
| 442 | + } | |
| 443 | + } | |
| 444 | + public void code(Environment env, Context ctx, Assembler asm) { | |
| 445 | + codeValue(env, ctx, asm); | |
| 446 | + | |
| 447 | + switch (type.getTypeCode()) { | |
| 448 | + case TC_VOID: | |
| 449 | + break; | |
| 450 | + | |
| 451 | + case TC_DOUBLE: | |
| 452 | + case TC_LONG: | |
| 453 | + asm.add(where, opc_pop2); | |
| 454 | + break; | |
| 455 | + | |
| 456 | + default: | |
| 457 | + asm.add(where, opc_pop); | |
| 458 | + break; | |
| 459 | + } | |
| 460 | + } | |
| 461 | + int codeLValue(Environment env, Context ctx, Assembler asm) { | |
| 462 | + print(System.out); | |
| 463 | + throw new CompilerError("invalid lhs"); | |
| 464 | + } | |
| 465 | + void codeLoad(Environment env, Context ctx, Assembler asm) { | |
| 466 | + print(System.out); | |
| 467 | + throw new CompilerError("invalid load"); | |
| 468 | + } | |
| 469 | + void codeStore(Environment env, Context ctx, Assembler asm) { | |
| 470 | + print(System.out); | |
| 471 | + throw new CompilerError("invalid store"); | |
| 472 | + } | |
| 473 | + | |
| 474 | + /** | |
| 475 | + * Convert this expression to a string. | |
| 476 | + */ | |
| 477 | + void ensureString(Environment env, Context ctx, Assembler asm) | |
| 478 | + throws ClassNotFound, AmbiguousMember | |
| 479 | + { | |
| 480 | + if (type == Type.tString && isNonNull()) { | |
| 481 | + return; | |
| 482 | + } | |
| 483 | + // Make sure it's a non-null string. | |
| 484 | + ClassDefinition sourceClass = ctx.field.getClassDefinition(); | |
| 485 | + ClassDeclaration stClass = env.getClassDeclaration(Type.tString); | |
| 486 | + ClassDefinition stClsDef = stClass.getClassDefinition(env); | |
| 487 | + // FIX FOR 4071548 | |
| 488 | + // We use 'String.valueOf' to do the conversion, in order to | |
| 489 | + // correctly handle null references and efficiently handle | |
| 490 | + // primitive types. For reference types, we force the argument | |
| 491 | + // to be interpreted as of 'Object' type, thus avoiding the | |
| 492 | + // the special-case overloading of 'valueOf' for character arrays. | |
| 493 | + // This special treatment would conflict with JLS 15.17.1.1. | |
| 494 | + if (type.inMask(TM_REFERENCE)) { | |
| 495 | + // Reference type | |
| 496 | + if (type != Type.tString) { | |
| 497 | + // Convert non-string object to string. If object is | |
| 498 | + // a string, we don't need to convert it, except in the | |
| 499 | + // case that it is null, which is handled below. | |
| 500 | + Type argType1[] = {Type.tObject}; | |
| 501 | + MemberDefinition f1 = | |
| 502 | + stClsDef.matchMethod(env, sourceClass, idValueOf, argType1); | |
| 503 | + asm.add(where, opc_invokestatic, f1); | |
| 504 | + } | |
| 505 | + // FIX FOR 4030173 | |
| 506 | + // If the argument was null, then value is "null", but if the | |
| 507 | + // argument was not null, 'toString' was called and could have | |
| 508 | + // returned null. We call 'valueOf' again to make sure that | |
| 509 | + // the result is a non-null string. See JLS 15.17.1.1. The | |
| 510 | + // approach taken here minimizes code size -- open code would | |
| 511 | + // be faster. The 'toString' method for an array class cannot | |
| 512 | + // be overridden, thus we know that it will never return null. | |
| 513 | + if (!type.inMask(TM_ARRAY|TM_NULL)) { | |
| 514 | + Type argType2[] = {Type.tString}; | |
| 515 | + MemberDefinition f2 = | |
| 516 | + stClsDef.matchMethod(env, sourceClass, idValueOf, argType2); | |
| 517 | + asm.add(where, opc_invokestatic, f2); | |
| 518 | + } | |
| 519 | + } else { | |
| 520 | + // Primitive type | |
| 521 | + Type argType[] = {type}; | |
| 522 | + MemberDefinition f = | |
| 523 | + stClsDef.matchMethod(env, sourceClass, idValueOf, argType); | |
| 524 | + asm.add(where, opc_invokestatic, f); | |
| 525 | + } | |
| 526 | + } | |
| 527 | + | |
| 528 | + /** | |
| 529 | + * Convert this expression to a string and append it to the string | |
| 530 | + * buffer on the top of the stack. | |
| 531 | + * If the needBuffer argument is true, the string buffer needs to be | |
| 532 | + * created, initialized, and pushed on the stack, first. | |
| 533 | + */ | |
| 534 | + void codeAppend(Environment env, Context ctx, Assembler asm, | |
| 535 | + ClassDeclaration sbClass, boolean needBuffer) | |
| 536 | + throws ClassNotFound, AmbiguousMember | |
| 537 | + { | |
| 538 | + ClassDefinition sourceClass = ctx.field.getClassDefinition(); | |
| 539 | + ClassDefinition sbClsDef = sbClass.getClassDefinition(env); | |
| 540 | + MemberDefinition f; | |
| 541 | + if (needBuffer) { | |
| 542 | + // need to create the string buffer | |
| 543 | + asm.add(where, opc_new, sbClass); // create the class | |
| 544 | + asm.add(where, opc_dup); | |
| 545 | + if (equals("")) { | |
| 546 | + // make an empty string buffer | |
| 547 | + f = sbClsDef.matchMethod(env, sourceClass, idInit); | |
| 548 | + } else { | |
| 549 | + // optimize by initializing the buffer with the string | |
| 550 | + codeValue(env, ctx, asm); | |
| 551 | + ensureString(env, ctx, asm); | |
| 552 | + Type argType[] = {Type.tString}; | |
| 553 | + f = sbClsDef.matchMethod(env, sourceClass, idInit, argType); | |
| 554 | + } | |
| 555 | + asm.add(where, opc_invokespecial, f); | |
| 556 | + } else { | |
| 557 | + // append this item to the string buffer | |
| 558 | + codeValue(env, ctx, asm); | |
| 559 | + // FIX FOR 4071548 | |
| 560 | + // 'StringBuffer.append' converts its argument as if by | |
| 561 | + // 'valueOf', treating character arrays specially. This | |
| 562 | + // violates JLS 15.17.1.1, which requires that concatenation | |
| 563 | + // convert non-primitive arguments using 'toString'. We force | |
| 564 | + // the treatment of all reference types as type 'Object', thus | |
| 565 | + // invoking an overloading of 'append' that has the required | |
| 566 | + // semantics. | |
| 567 | + Type argType[] = | |
| 568 | + { (type.inMask(TM_REFERENCE) && type != Type.tString) | |
| 569 | + ? Type.tObject | |
| 570 | + : type }; | |
| 571 | + f = sbClsDef.matchMethod(env, sourceClass, idAppend, argType); | |
| 572 | + asm.add(where, opc_invokevirtual, f); | |
| 573 | + } | |
| 574 | + } | |
| 575 | + | |
| 576 | + /** | |
| 577 | + * Code | |
| 578 | + */ | |
| 579 | + void codeDup(Environment env, Context ctx, Assembler asm, int items, int depth) { | |
| 580 | + switch (items) { | |
| 581 | + case 0: | |
| 582 | + return; | |
| 583 | + | |
| 584 | + case 1: | |
| 585 | + switch (depth) { | |
| 586 | + case 0: | |
| 587 | + asm.add(where, opc_dup); | |
| 588 | + return; | |
| 589 | + case 1: | |
| 590 | + asm.add(where, opc_dup_x1); | |
| 591 | + return; | |
| 592 | + case 2: | |
| 593 | + asm.add(where, opc_dup_x2); | |
| 594 | + return; | |
| 595 | + | |
| 596 | + } | |
| 597 | + break; | |
| 598 | + case 2: | |
| 599 | + switch (depth) { | |
| 600 | + case 0: | |
| 601 | + asm.add(where, opc_dup2); | |
| 602 | + return; | |
| 603 | + case 1: | |
| 604 | + asm.add(where, opc_dup2_x1); | |
| 605 | + return; | |
| 606 | + case 2: | |
| 607 | + asm.add(where, opc_dup2_x2); | |
| 608 | + return; | |
| 609 | + | |
| 610 | + } | |
| 611 | + break; | |
| 612 | + } | |
| 613 | + throw new CompilerError("can't dup: " + items + ", " + depth); | |
| 614 | + } | |
| 615 | + | |
| 616 | + void codeConversion(Environment env, Context ctx, Assembler asm, Type f, Type t) { | |
| 617 | + int from = f.getTypeCode(); | |
| 618 | + int to = t.getTypeCode(); | |
| 619 | + | |
| 620 | + switch (to) { | |
| 621 | + case TC_BOOLEAN: | |
| 622 | + if (from != TC_BOOLEAN) { | |
| 623 | + break; | |
| 624 | + } | |
| 625 | + return; | |
| 626 | + case TC_BYTE: | |
| 627 | + if (from != TC_BYTE) { | |
| 628 | + codeConversion(env, ctx, asm, f, Type.tInt); | |
| 629 | + asm.add(where, opc_i2b); | |
| 630 | + } | |
| 631 | + return; | |
| 632 | + case TC_CHAR: | |
| 633 | + if (from != TC_CHAR) { | |
| 634 | + codeConversion(env, ctx, asm, f, Type.tInt); | |
| 635 | + asm.add(where, opc_i2c); | |
| 636 | + } | |
| 637 | + return; | |
| 638 | + case TC_SHORT: | |
| 639 | + if (from != TC_SHORT) { | |
| 640 | + codeConversion(env, ctx, asm, f, Type.tInt); | |
| 641 | + asm.add(where, opc_i2s); | |
| 642 | + } | |
| 643 | + return; | |
| 644 | + case TC_INT: | |
| 645 | + switch (from) { | |
| 646 | + case TC_BYTE: | |
| 647 | + case TC_CHAR: | |
| 648 | + case TC_SHORT: | |
| 649 | + case TC_INT: | |
| 650 | + return; | |
| 651 | + case TC_LONG: | |
| 652 | + asm.add(where, opc_l2i); | |
| 653 | + return; | |
| 654 | + case TC_FLOAT: | |
| 655 | + asm.add(where, opc_f2i); | |
| 656 | + return; | |
| 657 | + case TC_DOUBLE: | |
| 658 | + asm.add(where, opc_d2i); | |
| 659 | + return; | |
| 660 | + } | |
| 661 | + break; | |
| 662 | + case TC_LONG: | |
| 663 | + switch (from) { | |
| 664 | + case TC_BYTE: | |
| 665 | + case TC_CHAR: | |
| 666 | + case TC_SHORT: | |
| 667 | + case TC_INT: | |
| 668 | + asm.add(where, opc_i2l); | |
| 669 | + return; | |
| 670 | + case TC_LONG: | |
| 671 | + return; | |
| 672 | + case TC_FLOAT: | |
| 673 | + asm.add(where, opc_f2l); | |
| 674 | + return; | |
| 675 | + case TC_DOUBLE: | |
| 676 | + asm.add(where, opc_d2l); | |
| 677 | + return; | |
| 678 | + } | |
| 679 | + break; | |
| 680 | + case TC_FLOAT: | |
| 681 | + switch (from) { | |
| 682 | + case TC_BYTE: | |
| 683 | + case TC_CHAR: | |
| 684 | + case TC_SHORT: | |
| 685 | + case TC_INT: | |
| 686 | + asm.add(where, opc_i2f); | |
| 687 | + return; | |
| 688 | + case TC_LONG: | |
| 689 | + asm.add(where, opc_l2f); | |
| 690 | + return; | |
| 691 | + case TC_FLOAT: | |
| 692 | + return; | |
| 693 | + case TC_DOUBLE: | |
| 694 | + asm.add(where, opc_d2f); | |
| 695 | + return; | |
| 696 | + } | |
| 697 | + break; | |
| 698 | + case TC_DOUBLE: | |
| 699 | + switch (from) { | |
| 700 | + case TC_BYTE: | |
| 701 | + case TC_CHAR: | |
| 702 | + case TC_SHORT: | |
| 703 | + case TC_INT: | |
| 704 | + asm.add(where, opc_i2d); | |
| 705 | + return; | |
| 706 | + case TC_LONG: | |
| 707 | + asm.add(where, opc_l2d); | |
| 708 | + return; | |
| 709 | + case TC_FLOAT: | |
| 710 | + asm.add(where, opc_f2d); | |
| 711 | + return; | |
| 712 | + case TC_DOUBLE: | |
| 713 | + return; | |
| 714 | + } | |
| 715 | + break; | |
| 716 | + | |
| 717 | + case TC_CLASS: | |
| 718 | + switch (from) { | |
| 719 | + case TC_NULL: | |
| 720 | + return; | |
| 721 | + case TC_CLASS: | |
| 722 | + case TC_ARRAY: | |
| 723 | + try { | |
| 724 | + if (!env.implicitCast(f, t)) { | |
| 725 | + asm.add(where, opc_checkcast, env.getClassDeclaration(t)); | |
| 726 | + } | |
| 727 | + } catch (ClassNotFound e) { | |
| 728 | + throw new CompilerError(e); | |
| 729 | + } | |
| 730 | + return; | |
| 731 | + } | |
| 732 | + | |
| 733 | + break; | |
| 734 | + | |
| 735 | + case TC_ARRAY: | |
| 736 | + switch (from) { | |
| 737 | + case TC_NULL: | |
| 738 | + return; | |
| 739 | + case TC_CLASS: | |
| 740 | + case TC_ARRAY: | |
| 741 | + try { | |
| 742 | + if (!env.implicitCast(f, t)) { | |
| 743 | + asm.add(where, opc_checkcast, t); | |
| 744 | + } | |
| 745 | + return; | |
| 746 | + } catch (ClassNotFound e) { | |
| 747 | + throw new CompilerError(e); | |
| 748 | + } | |
| 749 | + } | |
| 750 | + break; | |
| 751 | + } | |
| 752 | + throw new CompilerError("codeConversion: " + from + ", " + to); | |
| 753 | + } | |
| 754 | + | |
| 755 | + /** | |
| 756 | + * Check if the first thing is a constructor invocation | |
| 757 | + */ | |
| 758 | + public Expression firstConstructor() { | |
| 759 | + return null; | |
| 760 | + } | |
| 761 | + | |
| 762 | + /** | |
| 763 | + * Create a copy of the expression for method inlining | |
| 764 | + */ | |
| 765 | + public Expression copyInline(Context ctx) { | |
| 766 | + return (Expression)clone(); | |
| 767 | + } | |
| 768 | + | |
| 769 | + /** | |
| 770 | ||
| 771 | + */ | |
| 772 | + public void print(PrintStream out) { | |
| 773 | + out.print(opNames[op]); | |
| 774 | + } | |
| 775 | +} | |