src/share/classes/com/sun/tools/javac/jvm/Code.java

Mon, 10 Dec 2012 16:21:26 +0000

author
vromero
date
Mon, 10 Dec 2012 16:21:26 +0000
changeset 1442
fcf89720ae71
parent 1374
c002fdee76fd
child 1444
170e486632d9
permissions
-rw-r--r--

8003967: detect and remove all mutable implicit static enum fields in langtools
Reviewed-by: jjg

duke@1 1 /*
jjg@1326 2 * Copyright (c) 1999, 2012, Oracle and/or its affiliates. All rights reserved.
duke@1 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@1 4 *
duke@1 5 * This code is free software; you can redistribute it and/or modify it
duke@1 6 * under the terms of the GNU General Public License version 2 only, as
ohair@554 7 * published by the Free Software Foundation. Oracle designates this
duke@1 8 * particular file as subject to the "Classpath" exception as provided
ohair@554 9 * by Oracle in the LICENSE file that accompanied this code.
duke@1 10 *
duke@1 11 * This code is distributed in the hope that it will be useful, but WITHOUT
duke@1 12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@1 13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@1 14 * version 2 for more details (a copy is included in the LICENSE file that
duke@1 15 * accompanied this code).
duke@1 16 *
duke@1 17 * You should have received a copy of the GNU General Public License version
duke@1 18 * 2 along with this work; if not, write to the Free Software Foundation,
duke@1 19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@1 20 *
ohair@554 21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
ohair@554 22 * or visit www.oracle.com if you need additional information or have any
ohair@554 23 * questions.
duke@1 24 */
duke@1 25
duke@1 26 package com.sun.tools.javac.jvm;
duke@1 27
duke@1 28 import com.sun.tools.javac.code.*;
duke@1 29 import com.sun.tools.javac.code.Symbol.*;
duke@1 30 import com.sun.tools.javac.util.*;
duke@1 31 import com.sun.tools.javac.util.JCDiagnostic.DiagnosticPosition;
duke@1 32
jjg@1374 33 import static com.sun.tools.javac.code.TypeTag.BOT;
jjg@1374 34 import static com.sun.tools.javac.code.TypeTag.INT;
duke@1 35 import static com.sun.tools.javac.jvm.ByteCodes.*;
duke@1 36 import static com.sun.tools.javac.jvm.UninitializedType.*;
duke@1 37 import static com.sun.tools.javac.jvm.ClassWriter.StackMapTableFrame;
duke@1 38
duke@1 39 /** An internal structure that corresponds to the code attribute of
duke@1 40 * methods in a classfile. The class also provides some utility operations to
duke@1 41 * generate bytecode instructions.
duke@1 42 *
jjg@581 43 * <p><b>This is NOT part of any supported API.
jjg@581 44 * If you write code that depends on this, you do so at your own risk.
duke@1 45 * This code and its internal interfaces are subject to change or
duke@1 46 * deletion without notice.</b>
duke@1 47 */
duke@1 48 public class Code {
duke@1 49
duke@1 50 public final boolean debugCode;
duke@1 51 public final boolean needStackMap;
duke@1 52
duke@1 53 public enum StackMapFormat {
duke@1 54 NONE,
duke@1 55 CLDC {
jjg@113 56 Name getAttributeName(Names names) {
duke@1 57 return names.StackMap;
duke@1 58 }
duke@1 59 },
duke@1 60 JSR202 {
jjg@113 61 Name getAttributeName(Names names) {
duke@1 62 return names.StackMapTable;
duke@1 63 }
duke@1 64 };
jjg@113 65 Name getAttributeName(Names names) {
duke@1 66 return names.empty;
duke@1 67 }
duke@1 68 }
duke@1 69
duke@1 70 final Types types;
duke@1 71 final Symtab syms;
duke@1 72
duke@1 73 /*---------- classfile fields: --------------- */
duke@1 74
duke@1 75 /** The maximum stack size.
duke@1 76 */
duke@1 77 public int max_stack = 0;
duke@1 78
duke@1 79 /** The maximum number of local variable slots.
duke@1 80 */
duke@1 81 public int max_locals = 0;
duke@1 82
duke@1 83 /** The code buffer.
duke@1 84 */
duke@1 85 public byte[] code = new byte[64];
duke@1 86
duke@1 87 /** the current code pointer.
duke@1 88 */
duke@1 89 public int cp = 0;
duke@1 90
duke@1 91 /** Check the code against VM spec limits; if
duke@1 92 * problems report them and return true.
duke@1 93 */
duke@1 94 public boolean checkLimits(DiagnosticPosition pos, Log log) {
duke@1 95 if (cp > ClassFile.MAX_CODE) {
duke@1 96 log.error(pos, "limit.code");
duke@1 97 return true;
duke@1 98 }
duke@1 99 if (max_locals > ClassFile.MAX_LOCALS) {
duke@1 100 log.error(pos, "limit.locals");
duke@1 101 return true;
duke@1 102 }
duke@1 103 if (max_stack > ClassFile.MAX_STACK) {
duke@1 104 log.error(pos, "limit.stack");
duke@1 105 return true;
duke@1 106 }
duke@1 107 return false;
duke@1 108 }
duke@1 109
duke@1 110 /** A buffer for expression catch data. Each enter is a vector
duke@1 111 * of four unsigned shorts.
duke@1 112 */
duke@1 113 ListBuffer<char[]> catchInfo = new ListBuffer<char[]>();
duke@1 114
duke@1 115 /** A buffer for line number information. Each entry is a vector
duke@1 116 * of two unsigned shorts.
duke@1 117 */
duke@1 118 List<char[]> lineInfo = List.nil(); // handled in stack fashion
duke@1 119
duke@1 120 /** The CharacterRangeTable
duke@1 121 */
duke@1 122 public CRTable crt;
duke@1 123
duke@1 124 /*---------- internal fields: --------------- */
duke@1 125
jjg@1326 126 /** Are we generating code with jumps &ge; 32K?
duke@1 127 */
duke@1 128 public boolean fatcode;
duke@1 129
duke@1 130 /** Code generation enabled?
duke@1 131 */
duke@1 132 private boolean alive = true;
duke@1 133
duke@1 134 /** The current machine state (registers and stack).
duke@1 135 */
duke@1 136 State state;
duke@1 137
duke@1 138 /** Is it forbidden to compactify code, because something is
duke@1 139 * pointing to current location?
duke@1 140 */
duke@1 141 private boolean fixedPc = false;
duke@1 142
duke@1 143 /** The next available register.
duke@1 144 */
duke@1 145 public int nextreg = 0;
duke@1 146
duke@1 147 /** A chain for jumps to be resolved before the next opcode is emitted.
duke@1 148 * We do this lazily to avoid jumps to jumps.
duke@1 149 */
duke@1 150 Chain pendingJumps = null;
duke@1 151
duke@1 152 /** The position of the currently statement, if we are at the
duke@1 153 * start of this statement, NOPOS otherwise.
duke@1 154 * We need this to emit line numbers lazily, which we need to do
duke@1 155 * because of jump-to-jump optimization.
duke@1 156 */
duke@1 157 int pendingStatPos = Position.NOPOS;
duke@1 158
duke@1 159 /** Set true when a stackMap is needed at the current PC. */
duke@1 160 boolean pendingStackMap = false;
duke@1 161
duke@1 162 /** The stack map format to be generated. */
duke@1 163 StackMapFormat stackMap;
duke@1 164
duke@1 165 /** Switch: emit variable debug info.
duke@1 166 */
duke@1 167 boolean varDebugInfo;
duke@1 168
duke@1 169 /** Switch: emit line number info.
duke@1 170 */
duke@1 171 boolean lineDebugInfo;
duke@1 172
duke@1 173 /** Emit line number info if map supplied
duke@1 174 */
duke@1 175 Position.LineMap lineMap;
duke@1 176
duke@1 177 /** The constant pool of the current class.
duke@1 178 */
duke@1 179 final Pool pool;
duke@1 180
duke@1 181 final MethodSymbol meth;
duke@1 182
duke@1 183 /** Construct a code object, given the settings of the fatcode,
duke@1 184 * debugging info switches and the CharacterRangeTable.
duke@1 185 */
duke@1 186 public Code(MethodSymbol meth,
duke@1 187 boolean fatcode,
duke@1 188 Position.LineMap lineMap,
duke@1 189 boolean varDebugInfo,
duke@1 190 StackMapFormat stackMap,
duke@1 191 boolean debugCode,
duke@1 192 CRTable crt,
duke@1 193 Symtab syms,
duke@1 194 Types types,
duke@1 195 Pool pool) {
duke@1 196 this.meth = meth;
duke@1 197 this.fatcode = fatcode;
duke@1 198 this.lineMap = lineMap;
duke@1 199 this.lineDebugInfo = lineMap != null;
duke@1 200 this.varDebugInfo = varDebugInfo;
duke@1 201 this.crt = crt;
duke@1 202 this.syms = syms;
duke@1 203 this.types = types;
duke@1 204 this.debugCode = debugCode;
duke@1 205 this.stackMap = stackMap;
duke@1 206 switch (stackMap) {
duke@1 207 case CLDC:
duke@1 208 case JSR202:
duke@1 209 this.needStackMap = true;
duke@1 210 break;
duke@1 211 default:
duke@1 212 this.needStackMap = false;
duke@1 213 }
duke@1 214 state = new State();
duke@1 215 lvar = new LocalVar[20];
duke@1 216 this.pool = pool;
duke@1 217 }
duke@1 218
duke@1 219
duke@1 220 /* **************************************************************************
duke@1 221 * Typecodes & related stuff
duke@1 222 ****************************************************************************/
duke@1 223
duke@1 224 /** Given a type, return its type code (used implicitly in the
duke@1 225 * JVM architecture).
duke@1 226 */
duke@1 227 public static int typecode(Type type) {
jjg@1374 228 switch (type.getTag()) {
duke@1 229 case BYTE: return BYTEcode;
duke@1 230 case SHORT: return SHORTcode;
duke@1 231 case CHAR: return CHARcode;
duke@1 232 case INT: return INTcode;
duke@1 233 case LONG: return LONGcode;
duke@1 234 case FLOAT: return FLOATcode;
duke@1 235 case DOUBLE: return DOUBLEcode;
duke@1 236 case BOOLEAN: return BYTEcode;
duke@1 237 case VOID: return VOIDcode;
duke@1 238 case CLASS:
duke@1 239 case ARRAY:
duke@1 240 case METHOD:
duke@1 241 case BOT:
duke@1 242 case TYPEVAR:
duke@1 243 case UNINITIALIZED_THIS:
duke@1 244 case UNINITIALIZED_OBJECT:
duke@1 245 return OBJECTcode;
jjg@1374 246 default: throw new AssertionError("typecode " + type.getTag());
duke@1 247 }
duke@1 248 }
duke@1 249
duke@1 250 /** Collapse type code for subtypes of int to INTcode.
duke@1 251 */
duke@1 252 public static int truncate(int tc) {
duke@1 253 switch (tc) {
duke@1 254 case BYTEcode: case SHORTcode: case CHARcode: return INTcode;
duke@1 255 default: return tc;
duke@1 256 }
duke@1 257 }
duke@1 258
duke@1 259 /** The width in bytes of objects of the type.
duke@1 260 */
duke@1 261 public static int width(int typecode) {
duke@1 262 switch (typecode) {
duke@1 263 case LONGcode: case DOUBLEcode: return 2;
duke@1 264 case VOIDcode: return 0;
duke@1 265 default: return 1;
duke@1 266 }
duke@1 267 }
duke@1 268
duke@1 269 public static int width(Type type) {
duke@1 270 return type == null ? 1 : width(typecode(type));
duke@1 271 }
duke@1 272
duke@1 273 /** The total width taken up by a vector of objects.
duke@1 274 */
duke@1 275 public static int width(List<Type> types) {
duke@1 276 int w = 0;
duke@1 277 for (List<Type> l = types; l.nonEmpty(); l = l.tail)
duke@1 278 w = w + width(l.head);
duke@1 279 return w;
duke@1 280 }
duke@1 281
duke@1 282 /** Given a type, return its code for allocating arrays of that type.
duke@1 283 */
duke@1 284 public static int arraycode(Type type) {
jjg@1374 285 switch (type.getTag()) {
duke@1 286 case BYTE: return 8;
duke@1 287 case BOOLEAN: return 4;
duke@1 288 case SHORT: return 9;
duke@1 289 case CHAR: return 5;
duke@1 290 case INT: return 10;
duke@1 291 case LONG: return 11;
duke@1 292 case FLOAT: return 6;
duke@1 293 case DOUBLE: return 7;
duke@1 294 case CLASS: return 0;
duke@1 295 case ARRAY: return 1;
duke@1 296 default: throw new AssertionError("arraycode " + type);
duke@1 297 }
duke@1 298 }
duke@1 299
duke@1 300
duke@1 301 /* **************************************************************************
duke@1 302 * Emit code
duke@1 303 ****************************************************************************/
duke@1 304
duke@1 305 /** The current output code pointer.
duke@1 306 */
duke@1 307 public int curPc() {
duke@1 308 if (pendingJumps != null) resolvePending();
duke@1 309 if (pendingStatPos != Position.NOPOS) markStatBegin();
duke@1 310 fixedPc = true;
duke@1 311 return cp;
duke@1 312 }
duke@1 313
duke@1 314 /** Emit a byte of code.
duke@1 315 */
duke@1 316 private void emit1(int od) {
duke@1 317 if (!alive) return;
jjg@1339 318 code = ArrayUtils.ensureCapacity(code, cp);
duke@1 319 code[cp++] = (byte)od;
duke@1 320 }
duke@1 321
duke@1 322 /** Emit two bytes of code.
duke@1 323 */
duke@1 324 private void emit2(int od) {
duke@1 325 if (!alive) return;
duke@1 326 if (cp + 2 > code.length) {
duke@1 327 emit1(od >> 8);
duke@1 328 emit1(od);
duke@1 329 } else {
duke@1 330 code[cp++] = (byte)(od >> 8);
duke@1 331 code[cp++] = (byte)od;
duke@1 332 }
duke@1 333 }
duke@1 334
duke@1 335 /** Emit four bytes of code.
duke@1 336 */
duke@1 337 public void emit4(int od) {
duke@1 338 if (!alive) return;
duke@1 339 if (cp + 4 > code.length) {
duke@1 340 emit1(od >> 24);
duke@1 341 emit1(od >> 16);
duke@1 342 emit1(od >> 8);
duke@1 343 emit1(od);
duke@1 344 } else {
duke@1 345 code[cp++] = (byte)(od >> 24);
duke@1 346 code[cp++] = (byte)(od >> 16);
duke@1 347 code[cp++] = (byte)(od >> 8);
duke@1 348 code[cp++] = (byte)od;
duke@1 349 }
duke@1 350 }
duke@1 351
duke@1 352 /** Emit an opcode.
duke@1 353 */
duke@1 354 private void emitop(int op) {
duke@1 355 if (pendingJumps != null) resolvePending();
duke@1 356 if (alive) {
duke@1 357 if (pendingStatPos != Position.NOPOS)
duke@1 358 markStatBegin();
duke@1 359 if (pendingStackMap) {
duke@1 360 pendingStackMap = false;
duke@1 361 emitStackMap();
duke@1 362 }
duke@1 363 if (debugCode)
duke@1 364 System.err.println("emit@" + cp + " stack=" +
duke@1 365 state.stacksize + ": " +
duke@1 366 mnem(op));
duke@1 367 emit1(op);
duke@1 368 }
duke@1 369 }
duke@1 370
duke@1 371 void postop() {
jjg@816 372 Assert.check(alive || state.stacksize == 0);
duke@1 373 }
duke@1 374
duke@1 375 /** Emit a multinewarray instruction.
duke@1 376 */
duke@1 377 public void emitMultianewarray(int ndims, int type, Type arrayType) {
duke@1 378 emitop(multianewarray);
duke@1 379 if (!alive) return;
duke@1 380 emit2(type);
duke@1 381 emit1(ndims);
duke@1 382 state.pop(ndims);
duke@1 383 state.push(arrayType);
duke@1 384 }
duke@1 385
duke@1 386 /** Emit newarray.
duke@1 387 */
duke@1 388 public void emitNewarray(int elemcode, Type arrayType) {
duke@1 389 emitop(newarray);
duke@1 390 if (!alive) return;
duke@1 391 emit1(elemcode);
duke@1 392 state.pop(1); // count
duke@1 393 state.push(arrayType);
duke@1 394 }
duke@1 395
duke@1 396 /** Emit anewarray.
duke@1 397 */
duke@1 398 public void emitAnewarray(int od, Type arrayType) {
duke@1 399 emitop(anewarray);
duke@1 400 if (!alive) return;
duke@1 401 emit2(od);
duke@1 402 state.pop(1);
duke@1 403 state.push(arrayType);
duke@1 404 }
duke@1 405
duke@1 406 /** Emit an invokeinterface instruction.
duke@1 407 */
duke@1 408 public void emitInvokeinterface(int meth, Type mtype) {
duke@1 409 int argsize = width(mtype.getParameterTypes());
duke@1 410 emitop(invokeinterface);
duke@1 411 if (!alive) return;
duke@1 412 emit2(meth);
duke@1 413 emit1(argsize + 1);
duke@1 414 emit1(0);
duke@1 415 state.pop(argsize + 1);
duke@1 416 state.push(mtype.getReturnType());
duke@1 417 }
duke@1 418
duke@1 419 /** Emit an invokespecial instruction.
duke@1 420 */
duke@1 421 public void emitInvokespecial(int meth, Type mtype) {
duke@1 422 int argsize = width(mtype.getParameterTypes());
duke@1 423 emitop(invokespecial);
duke@1 424 if (!alive) return;
duke@1 425 emit2(meth);
duke@1 426 Symbol sym = (Symbol)pool.pool[meth];
duke@1 427 state.pop(argsize);
duke@1 428 if (sym.isConstructor())
duke@1 429 state.markInitialized((UninitializedType)state.peek());
duke@1 430 state.pop(1);
duke@1 431 state.push(mtype.getReturnType());
duke@1 432 }
duke@1 433
duke@1 434 /** Emit an invokestatic instruction.
duke@1 435 */
duke@1 436 public void emitInvokestatic(int meth, Type mtype) {
duke@1 437 int argsize = width(mtype.getParameterTypes());
duke@1 438 emitop(invokestatic);
duke@1 439 if (!alive) return;
duke@1 440 emit2(meth);
duke@1 441 state.pop(argsize);
duke@1 442 state.push(mtype.getReturnType());
duke@1 443 }
duke@1 444
duke@1 445 /** Emit an invokevirtual instruction.
duke@1 446 */
duke@1 447 public void emitInvokevirtual(int meth, Type mtype) {
duke@1 448 int argsize = width(mtype.getParameterTypes());
duke@1 449 emitop(invokevirtual);
duke@1 450 if (!alive) return;
duke@1 451 emit2(meth);
duke@1 452 state.pop(argsize + 1);
duke@1 453 state.push(mtype.getReturnType());
duke@1 454 }
duke@1 455
jrose@267 456 /** Emit an invokedynamic instruction.
jrose@267 457 */
jrose@267 458 public void emitInvokedynamic(int desc, Type mtype) {
jrose@267 459 // N.B. this format is under consideration by the JSR 292 EG
jrose@267 460 int argsize = width(mtype.getParameterTypes());
jrose@267 461 emitop(invokedynamic);
jrose@267 462 if (!alive) return;
jrose@267 463 emit2(desc);
jrose@267 464 emit2(0);
jrose@267 465 state.pop(argsize);
jrose@267 466 state.push(mtype.getReturnType());
jrose@267 467 }
jrose@267 468
duke@1 469 /** Emit an opcode with no operand field.
duke@1 470 */
duke@1 471 public void emitop0(int op) {
duke@1 472 emitop(op);
duke@1 473 if (!alive) return;
duke@1 474 switch (op) {
duke@1 475 case aaload: {
duke@1 476 state.pop(1);// index
duke@1 477 Type a = state.stack[state.stacksize-1];
duke@1 478 state.pop(1);
mcimadamore@989 479 //sometimes 'null type' is treated as a one-dimensional array type
mcimadamore@989 480 //see Gen.visitLiteral - we should handle this case accordingly
jjg@1374 481 Type stackType = a.hasTag(BOT) ?
mcimadamore@989 482 syms.objectType :
mcimadamore@989 483 types.erasure(types.elemtype(a));
mcimadamore@989 484 state.push(stackType); }
duke@1 485 break;
duke@1 486 case goto_:
duke@1 487 markDead();
duke@1 488 break;
duke@1 489 case nop:
duke@1 490 case ineg:
duke@1 491 case lneg:
duke@1 492 case fneg:
duke@1 493 case dneg:
duke@1 494 break;
duke@1 495 case aconst_null:
duke@1 496 state.push(syms.botType);
duke@1 497 break;
duke@1 498 case iconst_m1:
duke@1 499 case iconst_0:
duke@1 500 case iconst_1:
duke@1 501 case iconst_2:
duke@1 502 case iconst_3:
duke@1 503 case iconst_4:
duke@1 504 case iconst_5:
duke@1 505 case iload_0:
duke@1 506 case iload_1:
duke@1 507 case iload_2:
duke@1 508 case iload_3:
duke@1 509 state.push(syms.intType);
duke@1 510 break;
duke@1 511 case lconst_0:
duke@1 512 case lconst_1:
duke@1 513 case lload_0:
duke@1 514 case lload_1:
duke@1 515 case lload_2:
duke@1 516 case lload_3:
duke@1 517 state.push(syms.longType);
duke@1 518 break;
duke@1 519 case fconst_0:
duke@1 520 case fconst_1:
duke@1 521 case fconst_2:
duke@1 522 case fload_0:
duke@1 523 case fload_1:
duke@1 524 case fload_2:
duke@1 525 case fload_3:
duke@1 526 state.push(syms.floatType);
duke@1 527 break;
duke@1 528 case dconst_0:
duke@1 529 case dconst_1:
duke@1 530 case dload_0:
duke@1 531 case dload_1:
duke@1 532 case dload_2:
duke@1 533 case dload_3:
duke@1 534 state.push(syms.doubleType);
duke@1 535 break;
duke@1 536 case aload_0:
duke@1 537 state.push(lvar[0].sym.type);
duke@1 538 break;
duke@1 539 case aload_1:
duke@1 540 state.push(lvar[1].sym.type);
duke@1 541 break;
duke@1 542 case aload_2:
duke@1 543 state.push(lvar[2].sym.type);
duke@1 544 break;
duke@1 545 case aload_3:
duke@1 546 state.push(lvar[3].sym.type);
duke@1 547 break;
duke@1 548 case iaload:
duke@1 549 case baload:
duke@1 550 case caload:
duke@1 551 case saload:
duke@1 552 state.pop(2);
duke@1 553 state.push(syms.intType);
duke@1 554 break;
duke@1 555 case laload:
duke@1 556 state.pop(2);
duke@1 557 state.push(syms.longType);
duke@1 558 break;
duke@1 559 case faload:
duke@1 560 state.pop(2);
duke@1 561 state.push(syms.floatType);
duke@1 562 break;
duke@1 563 case daload:
duke@1 564 state.pop(2);
duke@1 565 state.push(syms.doubleType);
duke@1 566 break;
duke@1 567 case istore_0:
duke@1 568 case istore_1:
duke@1 569 case istore_2:
duke@1 570 case istore_3:
duke@1 571 case fstore_0:
duke@1 572 case fstore_1:
duke@1 573 case fstore_2:
duke@1 574 case fstore_3:
duke@1 575 case astore_0:
duke@1 576 case astore_1:
duke@1 577 case astore_2:
duke@1 578 case astore_3:
duke@1 579 case pop:
duke@1 580 case lshr:
duke@1 581 case lshl:
duke@1 582 case lushr:
duke@1 583 state.pop(1);
duke@1 584 break;
duke@1 585 case areturn:
duke@1 586 case ireturn:
duke@1 587 case freturn:
jjg@816 588 Assert.check(state.nlocks == 0);
duke@1 589 state.pop(1);
duke@1 590 markDead();
duke@1 591 break;
duke@1 592 case athrow:
duke@1 593 state.pop(1);
duke@1 594 markDead();
duke@1 595 break;
duke@1 596 case lstore_0:
duke@1 597 case lstore_1:
duke@1 598 case lstore_2:
duke@1 599 case lstore_3:
duke@1 600 case dstore_0:
duke@1 601 case dstore_1:
duke@1 602 case dstore_2:
duke@1 603 case dstore_3:
duke@1 604 case pop2:
duke@1 605 state.pop(2);
duke@1 606 break;
duke@1 607 case lreturn:
duke@1 608 case dreturn:
jjg@816 609 Assert.check(state.nlocks == 0);
duke@1 610 state.pop(2);
duke@1 611 markDead();
duke@1 612 break;
duke@1 613 case dup:
duke@1 614 state.push(state.stack[state.stacksize-1]);
duke@1 615 break;
duke@1 616 case return_:
jjg@816 617 Assert.check(state.nlocks == 0);
duke@1 618 markDead();
duke@1 619 break;
duke@1 620 case arraylength:
duke@1 621 state.pop(1);
duke@1 622 state.push(syms.intType);
duke@1 623 break;
duke@1 624 case isub:
duke@1 625 case iadd:
duke@1 626 case imul:
duke@1 627 case idiv:
duke@1 628 case imod:
duke@1 629 case ishl:
duke@1 630 case ishr:
duke@1 631 case iushr:
duke@1 632 case iand:
duke@1 633 case ior:
duke@1 634 case ixor:
duke@1 635 state.pop(1);
duke@1 636 // state.pop(1);
duke@1 637 // state.push(syms.intType);
duke@1 638 break;
duke@1 639 case aastore:
duke@1 640 state.pop(3);
duke@1 641 break;
duke@1 642 case land:
duke@1 643 case lor:
duke@1 644 case lxor:
duke@1 645 case lmod:
duke@1 646 case ldiv:
duke@1 647 case lmul:
duke@1 648 case lsub:
duke@1 649 case ladd:
duke@1 650 state.pop(2);
duke@1 651 break;
duke@1 652 case lcmp:
duke@1 653 state.pop(4);
duke@1 654 state.push(syms.intType);
duke@1 655 break;
duke@1 656 case l2i:
duke@1 657 state.pop(2);
duke@1 658 state.push(syms.intType);
duke@1 659 break;
duke@1 660 case i2l:
duke@1 661 state.pop(1);
duke@1 662 state.push(syms.longType);
duke@1 663 break;
duke@1 664 case i2f:
duke@1 665 state.pop(1);
duke@1 666 state.push(syms.floatType);
duke@1 667 break;
duke@1 668 case i2d:
duke@1 669 state.pop(1);
duke@1 670 state.push(syms.doubleType);
duke@1 671 break;
duke@1 672 case l2f:
duke@1 673 state.pop(2);
duke@1 674 state.push(syms.floatType);
duke@1 675 break;
duke@1 676 case l2d:
duke@1 677 state.pop(2);
duke@1 678 state.push(syms.doubleType);
duke@1 679 break;
duke@1 680 case f2i:
duke@1 681 state.pop(1);
duke@1 682 state.push(syms.intType);
duke@1 683 break;
duke@1 684 case f2l:
duke@1 685 state.pop(1);
duke@1 686 state.push(syms.longType);
duke@1 687 break;
duke@1 688 case f2d:
duke@1 689 state.pop(1);
duke@1 690 state.push(syms.doubleType);
duke@1 691 break;
duke@1 692 case d2i:
duke@1 693 state.pop(2);
duke@1 694 state.push(syms.intType);
duke@1 695 break;
duke@1 696 case d2l:
duke@1 697 state.pop(2);
duke@1 698 state.push(syms.longType);
duke@1 699 break;
duke@1 700 case d2f:
duke@1 701 state.pop(2);
duke@1 702 state.push(syms.floatType);
duke@1 703 break;
duke@1 704 case tableswitch:
duke@1 705 case lookupswitch:
duke@1 706 state.pop(1);
duke@1 707 // the caller is responsible for patching up the state
duke@1 708 break;
duke@1 709 case dup_x1: {
duke@1 710 Type val1 = state.pop1();
duke@1 711 Type val2 = state.pop1();
duke@1 712 state.push(val1);
duke@1 713 state.push(val2);
duke@1 714 state.push(val1);
duke@1 715 break;
duke@1 716 }
duke@1 717 case bastore:
duke@1 718 state.pop(3);
duke@1 719 break;
duke@1 720 case int2byte:
duke@1 721 case int2char:
duke@1 722 case int2short:
duke@1 723 break;
duke@1 724 case fmul:
duke@1 725 case fadd:
duke@1 726 case fsub:
duke@1 727 case fdiv:
duke@1 728 case fmod:
duke@1 729 state.pop(1);
duke@1 730 break;
duke@1 731 case castore:
duke@1 732 case iastore:
duke@1 733 case fastore:
duke@1 734 case sastore:
duke@1 735 state.pop(3);
duke@1 736 break;
duke@1 737 case lastore:
duke@1 738 case dastore:
duke@1 739 state.pop(4);
duke@1 740 break;
duke@1 741 case dup2:
duke@1 742 if (state.stack[state.stacksize-1] != null) {
duke@1 743 Type value1 = state.pop1();
duke@1 744 Type value2 = state.pop1();
duke@1 745 state.push(value2);
duke@1 746 state.push(value1);
duke@1 747 state.push(value2);
duke@1 748 state.push(value1);
duke@1 749 } else {
duke@1 750 Type value = state.pop2();
duke@1 751 state.push(value);
duke@1 752 state.push(value);
duke@1 753 }
duke@1 754 break;
duke@1 755 case dup2_x1:
duke@1 756 if (state.stack[state.stacksize-1] != null) {
duke@1 757 Type value1 = state.pop1();
duke@1 758 Type value2 = state.pop1();
duke@1 759 Type value3 = state.pop1();
duke@1 760 state.push(value2);
duke@1 761 state.push(value1);
duke@1 762 state.push(value3);
duke@1 763 state.push(value2);
duke@1 764 state.push(value1);
duke@1 765 } else {
duke@1 766 Type value1 = state.pop2();
duke@1 767 Type value2 = state.pop1();
duke@1 768 state.push(value1);
duke@1 769 state.push(value2);
duke@1 770 state.push(value1);
duke@1 771 }
duke@1 772 break;
duke@1 773 case dup2_x2:
duke@1 774 if (state.stack[state.stacksize-1] != null) {
duke@1 775 Type value1 = state.pop1();
duke@1 776 Type value2 = state.pop1();
duke@1 777 if (state.stack[state.stacksize-1] != null) {
duke@1 778 // form 1
duke@1 779 Type value3 = state.pop1();
duke@1 780 Type value4 = state.pop1();
duke@1 781 state.push(value2);
duke@1 782 state.push(value1);
duke@1 783 state.push(value4);
duke@1 784 state.push(value3);
duke@1 785 state.push(value2);
duke@1 786 state.push(value1);
duke@1 787 } else {
duke@1 788 // form 3
duke@1 789 Type value3 = state.pop2();
duke@1 790 state.push(value2);
duke@1 791 state.push(value1);
duke@1 792 state.push(value3);
duke@1 793 state.push(value2);
duke@1 794 state.push(value1);
duke@1 795 }
duke@1 796 } else {
duke@1 797 Type value1 = state.pop2();
duke@1 798 if (state.stack[state.stacksize-1] != null) {
duke@1 799 // form 2
duke@1 800 Type value2 = state.pop1();
duke@1 801 Type value3 = state.pop1();
duke@1 802 state.push(value1);
duke@1 803 state.push(value3);
duke@1 804 state.push(value2);
duke@1 805 state.push(value1);
duke@1 806 } else {
duke@1 807 // form 4
duke@1 808 Type value2 = state.pop2();
duke@1 809 state.push(value1);
duke@1 810 state.push(value2);
duke@1 811 state.push(value1);
duke@1 812 }
duke@1 813 }
duke@1 814 break;
duke@1 815 case dup_x2: {
duke@1 816 Type value1 = state.pop1();
duke@1 817 if (state.stack[state.stacksize-1] != null) {
duke@1 818 // form 1
duke@1 819 Type value2 = state.pop1();
duke@1 820 Type value3 = state.pop1();
duke@1 821 state.push(value1);
duke@1 822 state.push(value3);
duke@1 823 state.push(value2);
duke@1 824 state.push(value1);
duke@1 825 } else {
duke@1 826 // form 2
duke@1 827 Type value2 = state.pop2();
duke@1 828 state.push(value1);
duke@1 829 state.push(value2);
duke@1 830 state.push(value1);
duke@1 831 }
duke@1 832 }
duke@1 833 break;
duke@1 834 case fcmpl:
duke@1 835 case fcmpg:
duke@1 836 state.pop(2);
duke@1 837 state.push(syms.intType);
duke@1 838 break;
duke@1 839 case dcmpl:
duke@1 840 case dcmpg:
duke@1 841 state.pop(4);
duke@1 842 state.push(syms.intType);
duke@1 843 break;
duke@1 844 case swap: {
duke@1 845 Type value1 = state.pop1();
duke@1 846 Type value2 = state.pop1();
duke@1 847 state.push(value1);
duke@1 848 state.push(value2);
duke@1 849 break;
duke@1 850 }
duke@1 851 case dadd:
duke@1 852 case dsub:
duke@1 853 case dmul:
duke@1 854 case ddiv:
duke@1 855 case dmod:
duke@1 856 state.pop(2);
duke@1 857 break;
duke@1 858 case ret:
duke@1 859 markDead();
duke@1 860 break;
duke@1 861 case wide:
duke@1 862 // must be handled by the caller.
duke@1 863 return;
duke@1 864 case monitorenter:
duke@1 865 case monitorexit:
duke@1 866 state.pop(1);
duke@1 867 break;
duke@1 868
duke@1 869 default:
duke@1 870 throw new AssertionError(mnem(op));
duke@1 871 }
duke@1 872 postop();
duke@1 873 }
duke@1 874
duke@1 875 /** Emit an opcode with a one-byte operand field.
duke@1 876 */
duke@1 877 public void emitop1(int op, int od) {
duke@1 878 emitop(op);
duke@1 879 if (!alive) return;
duke@1 880 emit1(od);
duke@1 881 switch (op) {
duke@1 882 case bipush:
duke@1 883 state.push(syms.intType);
duke@1 884 break;
duke@1 885 case ldc1:
duke@1 886 state.push(typeForPool(pool.pool[od]));
duke@1 887 break;
duke@1 888 default:
duke@1 889 throw new AssertionError(mnem(op));
duke@1 890 }
duke@1 891 postop();
duke@1 892 }
duke@1 893
duke@1 894 /** The type of a constant pool entry. */
duke@1 895 private Type typeForPool(Object o) {
duke@1 896 if (o instanceof Integer) return syms.intType;
duke@1 897 if (o instanceof Float) return syms.floatType;
duke@1 898 if (o instanceof String) return syms.stringType;
duke@1 899 if (o instanceof Long) return syms.longType;
duke@1 900 if (o instanceof Double) return syms.doubleType;
duke@1 901 if (o instanceof ClassSymbol) return syms.classType;
duke@1 902 if (o instanceof Type.ArrayType) return syms.classType;
mcimadamore@1336 903 if (o instanceof Type.MethodType) return syms.methodTypeType;
mcimadamore@1336 904 if (o instanceof Pool.MethodHandle) return syms.methodHandleType;
duke@1 905 throw new AssertionError(o);
duke@1 906 }
duke@1 907
duke@1 908 /** Emit an opcode with a one-byte operand field;
duke@1 909 * widen if field does not fit in a byte.
duke@1 910 */
duke@1 911 public void emitop1w(int op, int od) {
duke@1 912 if (od > 0xFF) {
duke@1 913 emitop(wide);
duke@1 914 emitop(op);
duke@1 915 emit2(od);
duke@1 916 } else {
duke@1 917 emitop(op);
duke@1 918 emit1(od);
duke@1 919 }
duke@1 920 if (!alive) return;
duke@1 921 switch (op) {
duke@1 922 case iload:
duke@1 923 state.push(syms.intType);
duke@1 924 break;
duke@1 925 case lload:
duke@1 926 state.push(syms.longType);
duke@1 927 break;
duke@1 928 case fload:
duke@1 929 state.push(syms.floatType);
duke@1 930 break;
duke@1 931 case dload:
duke@1 932 state.push(syms.doubleType);
duke@1 933 break;
duke@1 934 case aload:
duke@1 935 state.push(lvar[od].sym.type);
duke@1 936 break;
duke@1 937 case lstore:
duke@1 938 case dstore:
duke@1 939 state.pop(2);
duke@1 940 break;
duke@1 941 case istore:
duke@1 942 case fstore:
duke@1 943 case astore:
duke@1 944 state.pop(1);
duke@1 945 break;
duke@1 946 case ret:
duke@1 947 markDead();
duke@1 948 break;
duke@1 949 default:
duke@1 950 throw new AssertionError(mnem(op));
duke@1 951 }
duke@1 952 postop();
duke@1 953 }
duke@1 954
duke@1 955 /** Emit an opcode with two one-byte operand fields;
duke@1 956 * widen if either field does not fit in a byte.
duke@1 957 */
duke@1 958 public void emitop1w(int op, int od1, int od2) {
duke@1 959 if (od1 > 0xFF || od2 < -128 || od2 > 127) {
duke@1 960 emitop(wide);
duke@1 961 emitop(op);
duke@1 962 emit2(od1);
duke@1 963 emit2(od2);
duke@1 964 } else {
duke@1 965 emitop(op);
duke@1 966 emit1(od1);
duke@1 967 emit1(od2);
duke@1 968 }
duke@1 969 if (!alive) return;
duke@1 970 switch (op) {
duke@1 971 case iinc:
duke@1 972 break;
duke@1 973 default:
duke@1 974 throw new AssertionError(mnem(op));
duke@1 975 }
duke@1 976 }
duke@1 977
duke@1 978 /** Emit an opcode with a two-byte operand field.
duke@1 979 */
duke@1 980 public void emitop2(int op, int od) {
duke@1 981 emitop(op);
duke@1 982 if (!alive) return;
duke@1 983 emit2(od);
duke@1 984 switch (op) {
duke@1 985 case getstatic:
duke@1 986 state.push(((Symbol)(pool.pool[od])).erasure(types));
duke@1 987 break;
duke@1 988 case putstatic:
duke@1 989 state.pop(((Symbol)(pool.pool[od])).erasure(types));
duke@1 990 break;
duke@1 991 case new_:
duke@1 992 state.push(uninitializedObject(((Symbol)(pool.pool[od])).erasure(types), cp-3));
duke@1 993 break;
duke@1 994 case sipush:
duke@1 995 state.push(syms.intType);
duke@1 996 break;
duke@1 997 case if_acmp_null:
duke@1 998 case if_acmp_nonnull:
duke@1 999 case ifeq:
duke@1 1000 case ifne:
duke@1 1001 case iflt:
duke@1 1002 case ifge:
duke@1 1003 case ifgt:
duke@1 1004 case ifle:
duke@1 1005 state.pop(1);
duke@1 1006 break;
duke@1 1007 case if_icmpeq:
duke@1 1008 case if_icmpne:
duke@1 1009 case if_icmplt:
duke@1 1010 case if_icmpge:
duke@1 1011 case if_icmpgt:
duke@1 1012 case if_icmple:
duke@1 1013 case if_acmpeq:
duke@1 1014 case if_acmpne:
duke@1 1015 state.pop(2);
duke@1 1016 break;
duke@1 1017 case goto_:
duke@1 1018 markDead();
duke@1 1019 break;
duke@1 1020 case putfield:
duke@1 1021 state.pop(((Symbol)(pool.pool[od])).erasure(types));
duke@1 1022 state.pop(1); // object ref
duke@1 1023 break;
duke@1 1024 case getfield:
duke@1 1025 state.pop(1); // object ref
duke@1 1026 state.push(((Symbol)(pool.pool[od])).erasure(types));
duke@1 1027 break;
duke@1 1028 case checkcast: {
duke@1 1029 state.pop(1); // object ref
duke@1 1030 Object o = pool.pool[od];
duke@1 1031 Type t = (o instanceof Symbol)
duke@1 1032 ? ((Symbol)o).erasure(types)
duke@1 1033 : types.erasure(((Type)o));
duke@1 1034 state.push(t);
duke@1 1035 break; }
duke@1 1036 case ldc2w:
duke@1 1037 state.push(typeForPool(pool.pool[od]));
duke@1 1038 break;
duke@1 1039 case instanceof_:
duke@1 1040 state.pop(1);
duke@1 1041 state.push(syms.intType);
duke@1 1042 break;
duke@1 1043 case ldc2:
duke@1 1044 state.push(typeForPool(pool.pool[od]));
duke@1 1045 break;
duke@1 1046 case jsr:
duke@1 1047 break;
duke@1 1048 default:
duke@1 1049 throw new AssertionError(mnem(op));
duke@1 1050 }
duke@1 1051 // postop();
duke@1 1052 }
duke@1 1053
duke@1 1054 /** Emit an opcode with a four-byte operand field.
duke@1 1055 */
duke@1 1056 public void emitop4(int op, int od) {
duke@1 1057 emitop(op);
duke@1 1058 if (!alive) return;
duke@1 1059 emit4(od);
duke@1 1060 switch (op) {
duke@1 1061 case goto_w:
duke@1 1062 markDead();
duke@1 1063 break;
duke@1 1064 case jsr_w:
duke@1 1065 break;
duke@1 1066 default:
duke@1 1067 throw new AssertionError(mnem(op));
duke@1 1068 }
duke@1 1069 // postop();
duke@1 1070 }
duke@1 1071
duke@1 1072 /** Align code pointer to next `incr' boundary.
duke@1 1073 */
duke@1 1074 public void align(int incr) {
duke@1 1075 if (alive)
duke@1 1076 while (cp % incr != 0) emitop0(nop);
duke@1 1077 }
duke@1 1078
jjg@1326 1079 /** Place a byte into code at address pc.
jjg@1326 1080 * Pre: {@literal pc + 1 <= cp }.
duke@1 1081 */
duke@1 1082 private void put1(int pc, int op) {
duke@1 1083 code[pc] = (byte)op;
duke@1 1084 }
duke@1 1085
jjg@1326 1086 /** Place two bytes into code at address pc.
jjg@1326 1087 * Pre: {@literal pc + 2 <= cp }.
duke@1 1088 */
duke@1 1089 private void put2(int pc, int od) {
duke@1 1090 // pre: pc + 2 <= cp
duke@1 1091 put1(pc, od >> 8);
duke@1 1092 put1(pc+1, od);
duke@1 1093 }
duke@1 1094
jjg@1326 1095 /** Place four bytes into code at address pc.
jjg@1326 1096 * Pre: {@literal pc + 4 <= cp }.
duke@1 1097 */
duke@1 1098 public void put4(int pc, int od) {
duke@1 1099 // pre: pc + 4 <= cp
duke@1 1100 put1(pc , od >> 24);
duke@1 1101 put1(pc+1, od >> 16);
duke@1 1102 put1(pc+2, od >> 8);
duke@1 1103 put1(pc+3, od);
duke@1 1104 }
duke@1 1105
duke@1 1106 /** Return code byte at position pc as an unsigned int.
duke@1 1107 */
duke@1 1108 private int get1(int pc) {
duke@1 1109 return code[pc] & 0xFF;
duke@1 1110 }
duke@1 1111
duke@1 1112 /** Return two code bytes at position pc as an unsigned int.
duke@1 1113 */
duke@1 1114 private int get2(int pc) {
duke@1 1115 return (get1(pc) << 8) | get1(pc+1);
duke@1 1116 }
duke@1 1117
duke@1 1118 /** Return four code bytes at position pc as an int.
duke@1 1119 */
duke@1 1120 public int get4(int pc) {
duke@1 1121 // pre: pc + 4 <= cp
duke@1 1122 return
duke@1 1123 (get1(pc) << 24) |
duke@1 1124 (get1(pc+1) << 16) |
duke@1 1125 (get1(pc+2) << 8) |
duke@1 1126 (get1(pc+3));
duke@1 1127 }
duke@1 1128
duke@1 1129 /** Is code generation currently enabled?
duke@1 1130 */
duke@1 1131 public boolean isAlive() {
duke@1 1132 return alive || pendingJumps != null;
duke@1 1133 }
duke@1 1134
duke@1 1135 /** Switch code generation on/off.
duke@1 1136 */
duke@1 1137 public void markDead() {
duke@1 1138 alive = false;
duke@1 1139 }
duke@1 1140
duke@1 1141 /** Declare an entry point; return current code pointer
duke@1 1142 */
duke@1 1143 public int entryPoint() {
duke@1 1144 int pc = curPc();
duke@1 1145 alive = true;
duke@1 1146 pendingStackMap = needStackMap;
duke@1 1147 return pc;
duke@1 1148 }
duke@1 1149
duke@1 1150 /** Declare an entry point with initial state;
duke@1 1151 * return current code pointer
duke@1 1152 */
duke@1 1153 public int entryPoint(State state) {
duke@1 1154 int pc = curPc();
duke@1 1155 alive = true;
duke@1 1156 this.state = state.dup();
jjg@816 1157 Assert.check(state.stacksize <= max_stack);
duke@1 1158 if (debugCode) System.err.println("entry point " + state);
duke@1 1159 pendingStackMap = needStackMap;
duke@1 1160 return pc;
duke@1 1161 }
duke@1 1162
duke@1 1163 /** Declare an entry point with initial state plus a pushed value;
duke@1 1164 * return current code pointer
duke@1 1165 */
duke@1 1166 public int entryPoint(State state, Type pushed) {
duke@1 1167 int pc = curPc();
duke@1 1168 alive = true;
duke@1 1169 this.state = state.dup();
jjg@816 1170 Assert.check(state.stacksize <= max_stack);
duke@1 1171 this.state.push(pushed);
duke@1 1172 if (debugCode) System.err.println("entry point " + state);
duke@1 1173 pendingStackMap = needStackMap;
duke@1 1174 return pc;
duke@1 1175 }
duke@1 1176
duke@1 1177
duke@1 1178 /**************************************************************************
duke@1 1179 * Stack map generation
duke@1 1180 *************************************************************************/
duke@1 1181
duke@1 1182 /** An entry in the stack map. */
duke@1 1183 static class StackMapFrame {
duke@1 1184 int pc;
duke@1 1185 Type[] locals;
duke@1 1186 Type[] stack;
duke@1 1187 }
duke@1 1188
duke@1 1189 /** A buffer of cldc stack map entries. */
duke@1 1190 StackMapFrame[] stackMapBuffer = null;
duke@1 1191
duke@1 1192 /** A buffer of compressed StackMapTable entries. */
duke@1 1193 StackMapTableFrame[] stackMapTableBuffer = null;
duke@1 1194 int stackMapBufferSize = 0;
duke@1 1195
duke@1 1196 /** The last PC at which we generated a stack map. */
duke@1 1197 int lastStackMapPC = -1;
duke@1 1198
duke@1 1199 /** The last stack map frame in StackMapTable. */
duke@1 1200 StackMapFrame lastFrame = null;
duke@1 1201
duke@1 1202 /** The stack map frame before the last one. */
duke@1 1203 StackMapFrame frameBeforeLast = null;
duke@1 1204
duke@1 1205 /** Emit a stack map entry. */
duke@1 1206 public void emitStackMap() {
duke@1 1207 int pc = curPc();
duke@1 1208 if (!needStackMap) return;
duke@1 1209
duke@1 1210
duke@1 1211
duke@1 1212 switch (stackMap) {
duke@1 1213 case CLDC:
duke@1 1214 emitCLDCStackMap(pc, getLocalsSize());
duke@1 1215 break;
duke@1 1216 case JSR202:
duke@1 1217 emitStackMapFrame(pc, getLocalsSize());
duke@1 1218 break;
duke@1 1219 default:
duke@1 1220 throw new AssertionError("Should have chosen a stackmap format");
duke@1 1221 }
duke@1 1222 // DEBUG code follows
duke@1 1223 if (debugCode) state.dump(pc);
duke@1 1224 }
duke@1 1225
duke@1 1226 private int getLocalsSize() {
duke@1 1227 int nextLocal = 0;
duke@1 1228 for (int i=max_locals-1; i>=0; i--) {
duke@1 1229 if (state.defined.isMember(i) && lvar[i] != null) {
duke@1 1230 nextLocal = i + width(lvar[i].sym.erasure(types));
duke@1 1231 break;
duke@1 1232 }
duke@1 1233 }
duke@1 1234 return nextLocal;
duke@1 1235 }
duke@1 1236
duke@1 1237 /** Emit a CLDC stack map frame. */
duke@1 1238 void emitCLDCStackMap(int pc, int localsSize) {
duke@1 1239 if (lastStackMapPC == pc) {
duke@1 1240 // drop existing stackmap at this offset
duke@1 1241 stackMapBuffer[--stackMapBufferSize] = null;
duke@1 1242 }
duke@1 1243 lastStackMapPC = pc;
duke@1 1244
duke@1 1245 if (stackMapBuffer == null) {
duke@1 1246 stackMapBuffer = new StackMapFrame[20];
jjg@1339 1247 } else {
jjg@1339 1248 stackMapBuffer = ArrayUtils.ensureCapacity(stackMapBuffer, stackMapBufferSize);
duke@1 1249 }
duke@1 1250 StackMapFrame frame =
duke@1 1251 stackMapBuffer[stackMapBufferSize++] = new StackMapFrame();
duke@1 1252 frame.pc = pc;
duke@1 1253
duke@1 1254 frame.locals = new Type[localsSize];
duke@1 1255 for (int i=0; i<localsSize; i++) {
duke@1 1256 if (state.defined.isMember(i) && lvar[i] != null) {
duke@1 1257 Type vtype = lvar[i].sym.type;
duke@1 1258 if (!(vtype instanceof UninitializedType))
duke@1 1259 vtype = types.erasure(vtype);
duke@1 1260 frame.locals[i] = vtype;
duke@1 1261 }
duke@1 1262 }
duke@1 1263 frame.stack = new Type[state.stacksize];
duke@1 1264 for (int i=0; i<state.stacksize; i++)
duke@1 1265 frame.stack[i] = state.stack[i];
duke@1 1266 }
duke@1 1267
duke@1 1268 void emitStackMapFrame(int pc, int localsSize) {
duke@1 1269 if (lastFrame == null) {
duke@1 1270 // first frame
duke@1 1271 lastFrame = getInitialFrame();
duke@1 1272 } else if (lastFrame.pc == pc) {
duke@1 1273 // drop existing stackmap at this offset
duke@1 1274 stackMapTableBuffer[--stackMapBufferSize] = null;
duke@1 1275 lastFrame = frameBeforeLast;
duke@1 1276 frameBeforeLast = null;
duke@1 1277 }
duke@1 1278
duke@1 1279 StackMapFrame frame = new StackMapFrame();
duke@1 1280 frame.pc = pc;
duke@1 1281
duke@1 1282 int localCount = 0;
duke@1 1283 Type[] locals = new Type[localsSize];
duke@1 1284 for (int i=0; i<localsSize; i++, localCount++) {
duke@1 1285 if (state.defined.isMember(i) && lvar[i] != null) {
duke@1 1286 Type vtype = lvar[i].sym.type;
duke@1 1287 if (!(vtype instanceof UninitializedType))
duke@1 1288 vtype = types.erasure(vtype);
duke@1 1289 locals[i] = vtype;
duke@1 1290 if (width(vtype) > 1) i++;
duke@1 1291 }
duke@1 1292 }
duke@1 1293 frame.locals = new Type[localCount];
duke@1 1294 for (int i=0, j=0; i<localsSize; i++, j++) {
jjg@816 1295 Assert.check(j < localCount);
duke@1 1296 frame.locals[j] = locals[i];
duke@1 1297 if (width(locals[i]) > 1) i++;
duke@1 1298 }
duke@1 1299
duke@1 1300 int stackCount = 0;
duke@1 1301 for (int i=0; i<state.stacksize; i++) {
duke@1 1302 if (state.stack[i] != null) {
duke@1 1303 stackCount++;
duke@1 1304 }
duke@1 1305 }
duke@1 1306 frame.stack = new Type[stackCount];
duke@1 1307 stackCount = 0;
duke@1 1308 for (int i=0; i<state.stacksize; i++) {
duke@1 1309 if (state.stack[i] != null) {
mcimadamore@747 1310 frame.stack[stackCount++] = types.erasure(state.stack[i]);
duke@1 1311 }
duke@1 1312 }
duke@1 1313
duke@1 1314 if (stackMapTableBuffer == null) {
duke@1 1315 stackMapTableBuffer = new StackMapTableFrame[20];
jjg@1339 1316 } else {
jjg@1339 1317 stackMapTableBuffer = ArrayUtils.ensureCapacity(
jjg@1339 1318 stackMapTableBuffer,
jjg@1339 1319 stackMapBufferSize);
duke@1 1320 }
duke@1 1321 stackMapTableBuffer[stackMapBufferSize++] =
duke@1 1322 StackMapTableFrame.getInstance(frame, lastFrame.pc, lastFrame.locals, types);
duke@1 1323
duke@1 1324 frameBeforeLast = lastFrame;
duke@1 1325 lastFrame = frame;
duke@1 1326 }
duke@1 1327
duke@1 1328 StackMapFrame getInitialFrame() {
duke@1 1329 StackMapFrame frame = new StackMapFrame();
duke@1 1330 List<Type> arg_types = ((MethodType)meth.externalType(types)).argtypes;
duke@1 1331 int len = arg_types.length();
duke@1 1332 int count = 0;
duke@1 1333 if (!meth.isStatic()) {
duke@1 1334 Type thisType = meth.owner.type;
duke@1 1335 frame.locals = new Type[len+1];
duke@1 1336 if (meth.isConstructor() && thisType != syms.objectType) {
duke@1 1337 frame.locals[count++] = UninitializedType.uninitializedThis(thisType);
duke@1 1338 } else {
duke@1 1339 frame.locals[count++] = types.erasure(thisType);
duke@1 1340 }
duke@1 1341 } else {
duke@1 1342 frame.locals = new Type[len];
duke@1 1343 }
duke@1 1344 for (Type arg_type : arg_types) {
duke@1 1345 frame.locals[count++] = types.erasure(arg_type);
duke@1 1346 }
duke@1 1347 frame.pc = -1;
duke@1 1348 frame.stack = null;
duke@1 1349 return frame;
duke@1 1350 }
duke@1 1351
duke@1 1352
duke@1 1353 /**************************************************************************
duke@1 1354 * Operations having to do with jumps
duke@1 1355 *************************************************************************/
duke@1 1356
duke@1 1357 /** A chain represents a list of unresolved jumps. Jump locations
duke@1 1358 * are sorted in decreasing order.
duke@1 1359 */
duke@1 1360 public static class Chain {
duke@1 1361
duke@1 1362 /** The position of the jump instruction.
duke@1 1363 */
duke@1 1364 public final int pc;
duke@1 1365
duke@1 1366 /** The machine state after the jump instruction.
duke@1 1367 * Invariant: all elements of a chain list have the same stacksize
duke@1 1368 * and compatible stack and register contents.
duke@1 1369 */
duke@1 1370 Code.State state;
duke@1 1371
duke@1 1372 /** The next jump in the list.
duke@1 1373 */
duke@1 1374 public final Chain next;
duke@1 1375
duke@1 1376 /** Construct a chain from its jump position, stacksize, previous
duke@1 1377 * chain, and machine state.
duke@1 1378 */
duke@1 1379 public Chain(int pc, Chain next, Code.State state) {
duke@1 1380 this.pc = pc;
duke@1 1381 this.next = next;
duke@1 1382 this.state = state;
duke@1 1383 }
duke@1 1384 }
duke@1 1385
duke@1 1386 /** Negate a branch opcode.
duke@1 1387 */
duke@1 1388 public static int negate(int opcode) {
duke@1 1389 if (opcode == if_acmp_null) return if_acmp_nonnull;
duke@1 1390 else if (opcode == if_acmp_nonnull) return if_acmp_null;
duke@1 1391 else return ((opcode + 1) ^ 1) - 1;
duke@1 1392 }
duke@1 1393
duke@1 1394 /** Emit a jump instruction.
duke@1 1395 * Return code pointer of instruction to be patched.
duke@1 1396 */
duke@1 1397 public int emitJump(int opcode) {
duke@1 1398 if (fatcode) {
duke@1 1399 if (opcode == goto_ || opcode == jsr) {
duke@1 1400 emitop4(opcode + goto_w - goto_, 0);
duke@1 1401 } else {
duke@1 1402 emitop2(negate(opcode), 8);
duke@1 1403 emitop4(goto_w, 0);
duke@1 1404 alive = true;
duke@1 1405 pendingStackMap = needStackMap;
duke@1 1406 }
duke@1 1407 return cp - 5;
duke@1 1408 } else {
duke@1 1409 emitop2(opcode, 0);
duke@1 1410 return cp - 3;
duke@1 1411 }
duke@1 1412 }
duke@1 1413
duke@1 1414 /** Emit a branch with given opcode; return its chain.
duke@1 1415 * branch differs from jump in that jsr is treated as no-op.
duke@1 1416 */
duke@1 1417 public Chain branch(int opcode) {
duke@1 1418 Chain result = null;
duke@1 1419 if (opcode == goto_) {
duke@1 1420 result = pendingJumps;
duke@1 1421 pendingJumps = null;
duke@1 1422 }
duke@1 1423 if (opcode != dontgoto && isAlive()) {
duke@1 1424 result = new Chain(emitJump(opcode),
duke@1 1425 result,
duke@1 1426 state.dup());
duke@1 1427 fixedPc = fatcode;
duke@1 1428 if (opcode == goto_) alive = false;
duke@1 1429 }
duke@1 1430 return result;
duke@1 1431 }
duke@1 1432
duke@1 1433 /** Resolve chain to point to given target.
duke@1 1434 */
duke@1 1435 public void resolve(Chain chain, int target) {
duke@1 1436 boolean changed = false;
duke@1 1437 State newState = state;
duke@1 1438 for (; chain != null; chain = chain.next) {
jjg@816 1439 Assert.check(state != chain.state
jjg@816 1440 && (target > chain.pc || state.stacksize == 0));
duke@1 1441 if (target >= cp) {
duke@1 1442 target = cp;
duke@1 1443 } else if (get1(target) == goto_) {
duke@1 1444 if (fatcode) target = target + get4(target + 1);
duke@1 1445 else target = target + get2(target + 1);
duke@1 1446 }
duke@1 1447 if (get1(chain.pc) == goto_ &&
duke@1 1448 chain.pc + 3 == target && target == cp && !fixedPc) {
duke@1 1449 // If goto the next instruction, the jump is not needed:
duke@1 1450 // compact the code.
duke@1 1451 cp = cp - 3;
duke@1 1452 target = target - 3;
duke@1 1453 if (chain.next == null) {
duke@1 1454 // This is the only jump to the target. Exit the loop
duke@1 1455 // without setting new state. The code is reachable
duke@1 1456 // from the instruction before goto_.
duke@1 1457 alive = true;
duke@1 1458 break;
duke@1 1459 }
duke@1 1460 } else {
duke@1 1461 if (fatcode)
duke@1 1462 put4(chain.pc + 1, target - chain.pc);
duke@1 1463 else if (target - chain.pc < Short.MIN_VALUE ||
duke@1 1464 target - chain.pc > Short.MAX_VALUE)
duke@1 1465 fatcode = true;
duke@1 1466 else
duke@1 1467 put2(chain.pc + 1, target - chain.pc);
jjg@816 1468 Assert.check(!alive ||
duke@1 1469 chain.state.stacksize == newState.stacksize &&
jjg@816 1470 chain.state.nlocks == newState.nlocks);
duke@1 1471 }
duke@1 1472 fixedPc = true;
duke@1 1473 if (cp == target) {
duke@1 1474 changed = true;
duke@1 1475 if (debugCode)
duke@1 1476 System.err.println("resolving chain state=" + chain.state);
duke@1 1477 if (alive) {
duke@1 1478 newState = chain.state.join(newState);
duke@1 1479 } else {
duke@1 1480 newState = chain.state;
duke@1 1481 alive = true;
duke@1 1482 }
duke@1 1483 }
duke@1 1484 }
jjg@816 1485 Assert.check(!changed || state != newState);
duke@1 1486 if (state != newState) {
duke@1 1487 setDefined(newState.defined);
duke@1 1488 state = newState;
duke@1 1489 pendingStackMap = needStackMap;
duke@1 1490 }
duke@1 1491 }
duke@1 1492
duke@1 1493 /** Resolve chain to point to current code pointer.
duke@1 1494 */
duke@1 1495 public void resolve(Chain chain) {
jjg@816 1496 Assert.check(
duke@1 1497 !alive ||
duke@1 1498 chain==null ||
duke@1 1499 state.stacksize == chain.state.stacksize &&
jjg@816 1500 state.nlocks == chain.state.nlocks);
duke@1 1501 pendingJumps = mergeChains(chain, pendingJumps);
duke@1 1502 }
duke@1 1503
duke@1 1504 /** Resolve any pending jumps.
duke@1 1505 */
duke@1 1506 public void resolvePending() {
duke@1 1507 Chain x = pendingJumps;
duke@1 1508 pendingJumps = null;
duke@1 1509 resolve(x, cp);
duke@1 1510 }
duke@1 1511
duke@1 1512 /** Merge the jumps in of two chains into one.
duke@1 1513 */
duke@1 1514 public static Chain mergeChains(Chain chain1, Chain chain2) {
duke@1 1515 // recursive merge sort
duke@1 1516 if (chain2 == null) return chain1;
duke@1 1517 if (chain1 == null) return chain2;
jjg@816 1518 Assert.check(
duke@1 1519 chain1.state.stacksize == chain2.state.stacksize &&
jjg@816 1520 chain1.state.nlocks == chain2.state.nlocks);
duke@1 1521 if (chain1.pc < chain2.pc)
duke@1 1522 return new Chain(
duke@1 1523 chain2.pc,
duke@1 1524 mergeChains(chain1, chain2.next),
duke@1 1525 chain2.state);
duke@1 1526 return new Chain(
duke@1 1527 chain1.pc,
duke@1 1528 mergeChains(chain1.next, chain2),
duke@1 1529 chain1.state);
duke@1 1530 }
duke@1 1531
duke@1 1532
duke@1 1533 /* **************************************************************************
duke@1 1534 * Catch clauses
duke@1 1535 ****************************************************************************/
duke@1 1536
duke@1 1537 /** Add a catch clause to code.
duke@1 1538 */
duke@1 1539 public void addCatch(
duke@1 1540 char startPc, char endPc, char handlerPc, char catchType) {
mcimadamore@1109 1541 catchInfo.append(new char[]{startPc, endPc, handlerPc, catchType});
mcimadamore@1109 1542 }
mcimadamore@1109 1543
mcimadamore@1109 1544
mcimadamore@1109 1545 public void compressCatchTable() {
mcimadamore@1109 1546 ListBuffer<char[]> compressedCatchInfo = ListBuffer.lb();
mcimadamore@1109 1547 List<Integer> handlerPcs = List.nil();
mcimadamore@1109 1548 for (char[] catchEntry : catchInfo.elems) {
mcimadamore@1109 1549 handlerPcs = handlerPcs.prepend((int)catchEntry[2]);
mcimadamore@1109 1550 }
mcimadamore@1109 1551 for (char[] catchEntry : catchInfo.elems) {
mcimadamore@1109 1552 int startpc = catchEntry[0];
mcimadamore@1109 1553 int endpc = catchEntry[1];
mcimadamore@1109 1554 if (startpc == endpc ||
mcimadamore@1109 1555 (startpc == (endpc - 1) &&
mcimadamore@1109 1556 handlerPcs.contains(startpc))) {
mcimadamore@1109 1557 continue;
mcimadamore@1109 1558 } else {
mcimadamore@1109 1559 compressedCatchInfo.append(catchEntry);
mcimadamore@1109 1560 }
mcimadamore@1109 1561 }
mcimadamore@1109 1562 catchInfo = compressedCatchInfo;
duke@1 1563 }
duke@1 1564
duke@1 1565
duke@1 1566 /* **************************************************************************
duke@1 1567 * Line numbers
duke@1 1568 ****************************************************************************/
duke@1 1569
duke@1 1570 /** Add a line number entry.
duke@1 1571 */
duke@1 1572 public void addLineNumber(char startPc, char lineNumber) {
duke@1 1573 if (lineDebugInfo) {
duke@1 1574 if (lineInfo.nonEmpty() && lineInfo.head[0] == startPc)
duke@1 1575 lineInfo = lineInfo.tail;
duke@1 1576 if (lineInfo.isEmpty() || lineInfo.head[1] != lineNumber)
duke@1 1577 lineInfo = lineInfo.prepend(new char[]{startPc, lineNumber});
duke@1 1578 }
duke@1 1579 }
duke@1 1580
duke@1 1581 /** Mark beginning of statement.
duke@1 1582 */
duke@1 1583 public void statBegin(int pos) {
duke@1 1584 if (pos != Position.NOPOS) {
duke@1 1585 pendingStatPos = pos;
duke@1 1586 }
duke@1 1587 }
duke@1 1588
duke@1 1589 /** Force stat begin eagerly
duke@1 1590 */
duke@1 1591 public void markStatBegin() {
duke@1 1592 if (alive && lineDebugInfo) {
duke@1 1593 int line = lineMap.getLineNumber(pendingStatPos);
duke@1 1594 char cp1 = (char)cp;
duke@1 1595 char line1 = (char)line;
duke@1 1596 if (cp1 == cp && line1 == line)
duke@1 1597 addLineNumber(cp1, line1);
duke@1 1598 }
duke@1 1599 pendingStatPos = Position.NOPOS;
duke@1 1600 }
duke@1 1601
duke@1 1602
duke@1 1603 /* **************************************************************************
duke@1 1604 * Simulated VM machine state
duke@1 1605 ****************************************************************************/
duke@1 1606
duke@1 1607 class State implements Cloneable {
duke@1 1608 /** The set of registers containing values. */
duke@1 1609 Bits defined;
duke@1 1610
duke@1 1611 /** The (types of the) contents of the machine stack. */
duke@1 1612 Type[] stack;
duke@1 1613
duke@1 1614 /** The first stack position currently unused. */
duke@1 1615 int stacksize;
duke@1 1616
duke@1 1617 /** The numbers of registers containing locked monitors. */
duke@1 1618 int[] locks;
duke@1 1619 int nlocks;
duke@1 1620
duke@1 1621 State() {
duke@1 1622 defined = new Bits();
duke@1 1623 stack = new Type[16];
duke@1 1624 }
duke@1 1625
duke@1 1626 State dup() {
duke@1 1627 try {
duke@1 1628 State state = (State)super.clone();
duke@1 1629 state.defined = defined.dup();
duke@1 1630 state.stack = stack.clone();
duke@1 1631 if (locks != null) state.locks = locks.clone();
duke@1 1632 if (debugCode) {
duke@1 1633 System.err.println("duping state " + this);
duke@1 1634 dump();
duke@1 1635 }
duke@1 1636 return state;
duke@1 1637 } catch (CloneNotSupportedException ex) {
duke@1 1638 throw new AssertionError(ex);
duke@1 1639 }
duke@1 1640 }
duke@1 1641
duke@1 1642 void lock(int register) {
duke@1 1643 if (locks == null) {
duke@1 1644 locks = new int[20];
jjg@1339 1645 } else {
jjg@1339 1646 locks = ArrayUtils.ensureCapacity(locks, nlocks);
duke@1 1647 }
duke@1 1648 locks[nlocks] = register;
duke@1 1649 nlocks++;
duke@1 1650 }
duke@1 1651
duke@1 1652 void unlock(int register) {
duke@1 1653 nlocks--;
jjg@816 1654 Assert.check(locks[nlocks] == register);
duke@1 1655 locks[nlocks] = -1;
duke@1 1656 }
duke@1 1657
duke@1 1658 void push(Type t) {
duke@1 1659 if (debugCode) System.err.println(" pushing " + t);
jjg@1374 1660 switch (t.getTag()) {
jjg@1374 1661 case VOID:
duke@1 1662 return;
jjg@1374 1663 case BYTE:
jjg@1374 1664 case CHAR:
jjg@1374 1665 case SHORT:
jjg@1374 1666 case BOOLEAN:
duke@1 1667 t = syms.intType;
duke@1 1668 break;
duke@1 1669 default:
duke@1 1670 break;
duke@1 1671 }
jjg@1339 1672 stack = ArrayUtils.ensureCapacity(stack, stacksize+2);
duke@1 1673 stack[stacksize++] = t;
duke@1 1674 switch (width(t)) {
duke@1 1675 case 1:
duke@1 1676 break;
duke@1 1677 case 2:
duke@1 1678 stack[stacksize++] = null;
duke@1 1679 break;
duke@1 1680 default:
duke@1 1681 throw new AssertionError(t);
duke@1 1682 }
duke@1 1683 if (stacksize > max_stack)
duke@1 1684 max_stack = stacksize;
duke@1 1685 }
duke@1 1686
duke@1 1687 Type pop1() {
duke@1 1688 if (debugCode) System.err.println(" popping " + 1);
duke@1 1689 stacksize--;
duke@1 1690 Type result = stack[stacksize];
duke@1 1691 stack[stacksize] = null;
jjg@816 1692 Assert.check(result != null && width(result) == 1);
duke@1 1693 return result;
duke@1 1694 }
duke@1 1695
duke@1 1696 Type peek() {
duke@1 1697 return stack[stacksize-1];
duke@1 1698 }
duke@1 1699
duke@1 1700 Type pop2() {
duke@1 1701 if (debugCode) System.err.println(" popping " + 2);
duke@1 1702 stacksize -= 2;
duke@1 1703 Type result = stack[stacksize];
duke@1 1704 stack[stacksize] = null;
jjg@816 1705 Assert.check(stack[stacksize+1] == null
jjg@816 1706 && result != null && width(result) == 2);
duke@1 1707 return result;
duke@1 1708 }
duke@1 1709
duke@1 1710 void pop(int n) {
duke@1 1711 if (debugCode) System.err.println(" popping " + n);
duke@1 1712 while (n > 0) {
duke@1 1713 stack[--stacksize] = null;
duke@1 1714 n--;
duke@1 1715 }
duke@1 1716 }
duke@1 1717
duke@1 1718 void pop(Type t) {
duke@1 1719 pop(width(t));
duke@1 1720 }
duke@1 1721
duke@1 1722 /** Force the top of the stack to be treated as this supertype
duke@1 1723 * of its current type. */
duke@1 1724 void forceStackTop(Type t) {
duke@1 1725 if (!alive) return;
jjg@1374 1726 switch (t.getTag()) {
duke@1 1727 case CLASS:
duke@1 1728 case ARRAY:
duke@1 1729 int width = width(t);
duke@1 1730 Type old = stack[stacksize-width];
jjg@816 1731 Assert.check(types.isSubtype(types.erasure(old),
jjg@816 1732 types.erasure(t)));
duke@1 1733 stack[stacksize-width] = t;
duke@1 1734 break;
duke@1 1735 default:
duke@1 1736 }
duke@1 1737 }
duke@1 1738
duke@1 1739 void markInitialized(UninitializedType old) {
duke@1 1740 Type newtype = old.initializedType();
duke@1 1741 for (int i=0; i<stacksize; i++)
duke@1 1742 if (stack[i] == old) stack[i] = newtype;
duke@1 1743 for (int i=0; i<lvar.length; i++) {
duke@1 1744 LocalVar lv = lvar[i];
duke@1 1745 if (lv != null && lv.sym.type == old) {
duke@1 1746 VarSymbol sym = lv.sym;
duke@1 1747 sym = sym.clone(sym.owner);
duke@1 1748 sym.type = newtype;
duke@1 1749 LocalVar newlv = lvar[i] = new LocalVar(sym);
duke@1 1750 // should the following be initialized to cp?
duke@1 1751 newlv.start_pc = lv.start_pc;
duke@1 1752 }
duke@1 1753 }
duke@1 1754 }
duke@1 1755
duke@1 1756 State join(State other) {
duke@1 1757 defined = defined.andSet(other.defined);
jjg@816 1758 Assert.check(stacksize == other.stacksize
jjg@816 1759 && nlocks == other.nlocks);
duke@1 1760 for (int i=0; i<stacksize; ) {
duke@1 1761 Type t = stack[i];
duke@1 1762 Type tother = other.stack[i];
duke@1 1763 Type result =
duke@1 1764 t==tother ? t :
duke@1 1765 types.isSubtype(t, tother) ? tother :
duke@1 1766 types.isSubtype(tother, t) ? t :
duke@1 1767 error();
duke@1 1768 int w = width(result);
duke@1 1769 stack[i] = result;
jjg@816 1770 if (w == 2) Assert.checkNull(stack[i+1]);
duke@1 1771 i += w;
duke@1 1772 }
duke@1 1773 return this;
duke@1 1774 }
duke@1 1775
duke@1 1776 Type error() {
duke@1 1777 throw new AssertionError("inconsistent stack types at join point");
duke@1 1778 }
duke@1 1779
duke@1 1780 void dump() {
duke@1 1781 dump(-1);
duke@1 1782 }
duke@1 1783
duke@1 1784 void dump(int pc) {
duke@1 1785 System.err.print("stackMap for " + meth.owner + "." + meth);
duke@1 1786 if (pc == -1)
duke@1 1787 System.out.println();
duke@1 1788 else
duke@1 1789 System.out.println(" at " + pc);
duke@1 1790 System.err.println(" stack (from bottom):");
duke@1 1791 for (int i=0; i<stacksize; i++)
duke@1 1792 System.err.println(" " + i + ": " + stack[i]);
duke@1 1793
duke@1 1794 int lastLocal = 0;
duke@1 1795 for (int i=max_locals-1; i>=0; i--) {
duke@1 1796 if (defined.isMember(i)) {
duke@1 1797 lastLocal = i;
duke@1 1798 break;
duke@1 1799 }
duke@1 1800 }
duke@1 1801 if (lastLocal >= 0)
duke@1 1802 System.err.println(" locals:");
duke@1 1803 for (int i=0; i<=lastLocal; i++) {
duke@1 1804 System.err.print(" " + i + ": ");
duke@1 1805 if (defined.isMember(i)) {
duke@1 1806 LocalVar var = lvar[i];
duke@1 1807 if (var == null) {
duke@1 1808 System.err.println("(none)");
duke@1 1809 } else if (var.sym == null)
duke@1 1810 System.err.println("UNKNOWN!");
duke@1 1811 else
duke@1 1812 System.err.println("" + var.sym + " of type " +
duke@1 1813 var.sym.erasure(types));
duke@1 1814 } else {
duke@1 1815 System.err.println("undefined");
duke@1 1816 }
duke@1 1817 }
duke@1 1818 if (nlocks != 0) {
duke@1 1819 System.err.print(" locks:");
duke@1 1820 for (int i=0; i<nlocks; i++) {
duke@1 1821 System.err.print(" " + locks[i]);
duke@1 1822 }
duke@1 1823 System.err.println();
duke@1 1824 }
duke@1 1825 }
duke@1 1826 }
duke@1 1827
vromero@1442 1828 static final Type jsrReturnValue = new Type(INT, null);
duke@1 1829
duke@1 1830
duke@1 1831 /* **************************************************************************
duke@1 1832 * Local variables
duke@1 1833 ****************************************************************************/
duke@1 1834
duke@1 1835 /** A live range of a local variable. */
duke@1 1836 static class LocalVar {
duke@1 1837 final VarSymbol sym;
duke@1 1838 final char reg;
duke@1 1839 char start_pc = Character.MAX_VALUE;
duke@1 1840 char length = Character.MAX_VALUE;
duke@1 1841 LocalVar(VarSymbol v) {
duke@1 1842 this.sym = v;
duke@1 1843 this.reg = (char)v.adr;
duke@1 1844 }
duke@1 1845 public LocalVar dup() {
duke@1 1846 return new LocalVar(sym);
duke@1 1847 }
duke@1 1848 public String toString() {
duke@1 1849 return "" + sym + " in register " + ((int)reg) + " starts at pc=" + ((int)start_pc) + " length=" + ((int)length);
duke@1 1850 }
duke@1 1851 };
duke@1 1852
duke@1 1853 /** Local variables, indexed by register. */
duke@1 1854 LocalVar[] lvar;
duke@1 1855
duke@1 1856 /** Add a new local variable. */
duke@1 1857 private void addLocalVar(VarSymbol v) {
duke@1 1858 int adr = v.adr;
jjg@1339 1859 lvar = ArrayUtils.ensureCapacity(lvar, adr+1);
jjg@816 1860 Assert.checkNull(lvar[adr]);
duke@1 1861 if (pendingJumps != null) resolvePending();
duke@1 1862 lvar[adr] = new LocalVar(v);
duke@1 1863 state.defined.excl(adr);
duke@1 1864 }
duke@1 1865
duke@1 1866 /** Set the current variable defined state. */
duke@1 1867 public void setDefined(Bits newDefined) {
duke@1 1868 if (alive && newDefined != state.defined) {
duke@1 1869 Bits diff = state.defined.dup().xorSet(newDefined);
duke@1 1870 for (int adr = diff.nextBit(0);
duke@1 1871 adr >= 0;
duke@1 1872 adr = diff.nextBit(adr+1)) {
duke@1 1873 if (adr >= nextreg)
duke@1 1874 state.defined.excl(adr);
duke@1 1875 else if (state.defined.isMember(adr))
duke@1 1876 setUndefined(adr);
duke@1 1877 else
duke@1 1878 setDefined(adr);
duke@1 1879 }
duke@1 1880 }
duke@1 1881 }
duke@1 1882
duke@1 1883 /** Mark a register as being (possibly) defined. */
duke@1 1884 public void setDefined(int adr) {
duke@1 1885 LocalVar v = lvar[adr];
duke@1 1886 if (v == null) {
duke@1 1887 state.defined.excl(adr);
duke@1 1888 } else {
duke@1 1889 state.defined.incl(adr);
duke@1 1890 if (cp < Character.MAX_VALUE) {
duke@1 1891 if (v.start_pc == Character.MAX_VALUE)
duke@1 1892 v.start_pc = (char)cp;
duke@1 1893 }
duke@1 1894 }
duke@1 1895 }
duke@1 1896
duke@1 1897 /** Mark a register as being undefined. */
duke@1 1898 public void setUndefined(int adr) {
duke@1 1899 state.defined.excl(adr);
duke@1 1900 if (adr < lvar.length &&
duke@1 1901 lvar[adr] != null &&
duke@1 1902 lvar[adr].start_pc != Character.MAX_VALUE) {
duke@1 1903 LocalVar v = lvar[adr];
duke@1 1904 char length = (char)(curPc() - v.start_pc);
duke@1 1905 if (length > 0 && length < Character.MAX_VALUE) {
duke@1 1906 lvar[adr] = v.dup();
duke@1 1907 v.length = length;
duke@1 1908 putVar(v);
duke@1 1909 } else {
duke@1 1910 v.start_pc = Character.MAX_VALUE;
duke@1 1911 }
duke@1 1912 }
duke@1 1913 }
duke@1 1914
duke@1 1915 /** End the scope of a variable. */
duke@1 1916 private void endScope(int adr) {
duke@1 1917 LocalVar v = lvar[adr];
duke@1 1918 if (v != null) {
duke@1 1919 lvar[adr] = null;
duke@1 1920 if (v.start_pc != Character.MAX_VALUE) {
duke@1 1921 char length = (char)(curPc() - v.start_pc);
duke@1 1922 if (length < Character.MAX_VALUE) {
duke@1 1923 v.length = length;
duke@1 1924 putVar(v);
duke@1 1925 }
duke@1 1926 }
duke@1 1927 }
duke@1 1928 state.defined.excl(adr);
duke@1 1929 }
duke@1 1930
duke@1 1931 /** Put a live variable range into the buffer to be output to the
duke@1 1932 * class file.
duke@1 1933 */
duke@1 1934 void putVar(LocalVar var) {
duke@1 1935 if (!varDebugInfo) return;
duke@1 1936 if ((var.sym.flags() & Flags.SYNTHETIC) != 0) return;
duke@1 1937 if (varBuffer == null)
duke@1 1938 varBuffer = new LocalVar[20];
jjg@1339 1939 else
jjg@1339 1940 varBuffer = ArrayUtils.ensureCapacity(varBuffer, varBufferSize);
duke@1 1941 varBuffer[varBufferSize++] = var;
duke@1 1942 }
duke@1 1943
duke@1 1944 /** Previously live local variables, to be put into the variable table. */
duke@1 1945 LocalVar[] varBuffer;
duke@1 1946 int varBufferSize;
duke@1 1947
duke@1 1948 /** Create a new local variable address and return it.
duke@1 1949 */
duke@1 1950 private int newLocal(int typecode) {
duke@1 1951 int reg = nextreg;
duke@1 1952 int w = width(typecode);
duke@1 1953 nextreg = reg + w;
duke@1 1954 if (nextreg > max_locals) max_locals = nextreg;
duke@1 1955 return reg;
duke@1 1956 }
duke@1 1957
duke@1 1958 private int newLocal(Type type) {
duke@1 1959 return newLocal(typecode(type));
duke@1 1960 }
duke@1 1961
duke@1 1962 public int newLocal(VarSymbol v) {
duke@1 1963 int reg = v.adr = newLocal(v.erasure(types));
duke@1 1964 addLocalVar(v);
duke@1 1965 return reg;
duke@1 1966 }
duke@1 1967
duke@1 1968 /** Start a set of fresh registers.
duke@1 1969 */
duke@1 1970 public void newRegSegment() {
duke@1 1971 nextreg = max_locals;
duke@1 1972 }
duke@1 1973
jjg@1326 1974 /** End scopes of all variables with registers &ge; first.
duke@1 1975 */
duke@1 1976 public void endScopes(int first) {
duke@1 1977 int prevNextReg = nextreg;
duke@1 1978 nextreg = first;
duke@1 1979 for (int i = nextreg; i < prevNextReg; i++) endScope(i);
duke@1 1980 }
duke@1 1981
duke@1 1982 /**************************************************************************
duke@1 1983 * static tables
duke@1 1984 *************************************************************************/
duke@1 1985
duke@1 1986 public static String mnem(int opcode) {
duke@1 1987 return Mneumonics.mnem[opcode];
duke@1 1988 }
duke@1 1989
duke@1 1990 private static class Mneumonics {
duke@1 1991 private final static String[] mnem = new String[ByteCodeCount];
duke@1 1992 static {
duke@1 1993 mnem[nop] = "nop";
duke@1 1994 mnem[aconst_null] = "aconst_null";
duke@1 1995 mnem[iconst_m1] = "iconst_m1";
duke@1 1996 mnem[iconst_0] = "iconst_0";
duke@1 1997 mnem[iconst_1] = "iconst_1";
duke@1 1998 mnem[iconst_2] = "iconst_2";
duke@1 1999 mnem[iconst_3] = "iconst_3";
duke@1 2000 mnem[iconst_4] = "iconst_4";
duke@1 2001 mnem[iconst_5] = "iconst_5";
duke@1 2002 mnem[lconst_0] = "lconst_0";
duke@1 2003 mnem[lconst_1] = "lconst_1";
duke@1 2004 mnem[fconst_0] = "fconst_0";
duke@1 2005 mnem[fconst_1] = "fconst_1";
duke@1 2006 mnem[fconst_2] = "fconst_2";
duke@1 2007 mnem[dconst_0] = "dconst_0";
duke@1 2008 mnem[dconst_1] = "dconst_1";
duke@1 2009 mnem[bipush] = "bipush";
duke@1 2010 mnem[sipush] = "sipush";
duke@1 2011 mnem[ldc1] = "ldc1";
duke@1 2012 mnem[ldc2] = "ldc2";
duke@1 2013 mnem[ldc2w] = "ldc2w";
duke@1 2014 mnem[iload] = "iload";
duke@1 2015 mnem[lload] = "lload";
duke@1 2016 mnem[fload] = "fload";
duke@1 2017 mnem[dload] = "dload";
duke@1 2018 mnem[aload] = "aload";
duke@1 2019 mnem[iload_0] = "iload_0";
duke@1 2020 mnem[lload_0] = "lload_0";
duke@1 2021 mnem[fload_0] = "fload_0";
duke@1 2022 mnem[dload_0] = "dload_0";
duke@1 2023 mnem[aload_0] = "aload_0";
duke@1 2024 mnem[iload_1] = "iload_1";
duke@1 2025 mnem[lload_1] = "lload_1";
duke@1 2026 mnem[fload_1] = "fload_1";
duke@1 2027 mnem[dload_1] = "dload_1";
duke@1 2028 mnem[aload_1] = "aload_1";
duke@1 2029 mnem[iload_2] = "iload_2";
duke@1 2030 mnem[lload_2] = "lload_2";
duke@1 2031 mnem[fload_2] = "fload_2";
duke@1 2032 mnem[dload_2] = "dload_2";
duke@1 2033 mnem[aload_2] = "aload_2";
duke@1 2034 mnem[iload_3] = "iload_3";
duke@1 2035 mnem[lload_3] = "lload_3";
duke@1 2036 mnem[fload_3] = "fload_3";
duke@1 2037 mnem[dload_3] = "dload_3";
duke@1 2038 mnem[aload_3] = "aload_3";
duke@1 2039 mnem[iaload] = "iaload";
duke@1 2040 mnem[laload] = "laload";
duke@1 2041 mnem[faload] = "faload";
duke@1 2042 mnem[daload] = "daload";
duke@1 2043 mnem[aaload] = "aaload";
duke@1 2044 mnem[baload] = "baload";
duke@1 2045 mnem[caload] = "caload";
duke@1 2046 mnem[saload] = "saload";
duke@1 2047 mnem[istore] = "istore";
duke@1 2048 mnem[lstore] = "lstore";
duke@1 2049 mnem[fstore] = "fstore";
duke@1 2050 mnem[dstore] = "dstore";
duke@1 2051 mnem[astore] = "astore";
duke@1 2052 mnem[istore_0] = "istore_0";
duke@1 2053 mnem[lstore_0] = "lstore_0";
duke@1 2054 mnem[fstore_0] = "fstore_0";
duke@1 2055 mnem[dstore_0] = "dstore_0";
duke@1 2056 mnem[astore_0] = "astore_0";
duke@1 2057 mnem[istore_1] = "istore_1";
duke@1 2058 mnem[lstore_1] = "lstore_1";
duke@1 2059 mnem[fstore_1] = "fstore_1";
duke@1 2060 mnem[dstore_1] = "dstore_1";
duke@1 2061 mnem[astore_1] = "astore_1";
duke@1 2062 mnem[istore_2] = "istore_2";
duke@1 2063 mnem[lstore_2] = "lstore_2";
duke@1 2064 mnem[fstore_2] = "fstore_2";
duke@1 2065 mnem[dstore_2] = "dstore_2";
duke@1 2066 mnem[astore_2] = "astore_2";
duke@1 2067 mnem[istore_3] = "istore_3";
duke@1 2068 mnem[lstore_3] = "lstore_3";
duke@1 2069 mnem[fstore_3] = "fstore_3";
duke@1 2070 mnem[dstore_3] = "dstore_3";
duke@1 2071 mnem[astore_3] = "astore_3";
duke@1 2072 mnem[iastore] = "iastore";
duke@1 2073 mnem[lastore] = "lastore";
duke@1 2074 mnem[fastore] = "fastore";
duke@1 2075 mnem[dastore] = "dastore";
duke@1 2076 mnem[aastore] = "aastore";
duke@1 2077 mnem[bastore] = "bastore";
duke@1 2078 mnem[castore] = "castore";
duke@1 2079 mnem[sastore] = "sastore";
duke@1 2080 mnem[pop] = "pop";
duke@1 2081 mnem[pop2] = "pop2";
duke@1 2082 mnem[dup] = "dup";
duke@1 2083 mnem[dup_x1] = "dup_x1";
duke@1 2084 mnem[dup_x2] = "dup_x2";
duke@1 2085 mnem[dup2] = "dup2";
duke@1 2086 mnem[dup2_x1] = "dup2_x1";
duke@1 2087 mnem[dup2_x2] = "dup2_x2";
duke@1 2088 mnem[swap] = "swap";
duke@1 2089 mnem[iadd] = "iadd";
duke@1 2090 mnem[ladd] = "ladd";
duke@1 2091 mnem[fadd] = "fadd";
duke@1 2092 mnem[dadd] = "dadd";
duke@1 2093 mnem[isub] = "isub";
duke@1 2094 mnem[lsub] = "lsub";
duke@1 2095 mnem[fsub] = "fsub";
duke@1 2096 mnem[dsub] = "dsub";
duke@1 2097 mnem[imul] = "imul";
duke@1 2098 mnem[lmul] = "lmul";
duke@1 2099 mnem[fmul] = "fmul";
duke@1 2100 mnem[dmul] = "dmul";
duke@1 2101 mnem[idiv] = "idiv";
duke@1 2102 mnem[ldiv] = "ldiv";
duke@1 2103 mnem[fdiv] = "fdiv";
duke@1 2104 mnem[ddiv] = "ddiv";
duke@1 2105 mnem[imod] = "imod";
duke@1 2106 mnem[lmod] = "lmod";
duke@1 2107 mnem[fmod] = "fmod";
duke@1 2108 mnem[dmod] = "dmod";
duke@1 2109 mnem[ineg] = "ineg";
duke@1 2110 mnem[lneg] = "lneg";
duke@1 2111 mnem[fneg] = "fneg";
duke@1 2112 mnem[dneg] = "dneg";
duke@1 2113 mnem[ishl] = "ishl";
duke@1 2114 mnem[lshl] = "lshl";
duke@1 2115 mnem[ishr] = "ishr";
duke@1 2116 mnem[lshr] = "lshr";
duke@1 2117 mnem[iushr] = "iushr";
duke@1 2118 mnem[lushr] = "lushr";
duke@1 2119 mnem[iand] = "iand";
duke@1 2120 mnem[land] = "land";
duke@1 2121 mnem[ior] = "ior";
duke@1 2122 mnem[lor] = "lor";
duke@1 2123 mnem[ixor] = "ixor";
duke@1 2124 mnem[lxor] = "lxor";
duke@1 2125 mnem[iinc] = "iinc";
duke@1 2126 mnem[i2l] = "i2l";
duke@1 2127 mnem[i2f] = "i2f";
duke@1 2128 mnem[i2d] = "i2d";
duke@1 2129 mnem[l2i] = "l2i";
duke@1 2130 mnem[l2f] = "l2f";
duke@1 2131 mnem[l2d] = "l2d";
duke@1 2132 mnem[f2i] = "f2i";
duke@1 2133 mnem[f2l] = "f2l";
duke@1 2134 mnem[f2d] = "f2d";
duke@1 2135 mnem[d2i] = "d2i";
duke@1 2136 mnem[d2l] = "d2l";
duke@1 2137 mnem[d2f] = "d2f";
duke@1 2138 mnem[int2byte] = "int2byte";
duke@1 2139 mnem[int2char] = "int2char";
duke@1 2140 mnem[int2short] = "int2short";
duke@1 2141 mnem[lcmp] = "lcmp";
duke@1 2142 mnem[fcmpl] = "fcmpl";
duke@1 2143 mnem[fcmpg] = "fcmpg";
duke@1 2144 mnem[dcmpl] = "dcmpl";
duke@1 2145 mnem[dcmpg] = "dcmpg";
duke@1 2146 mnem[ifeq] = "ifeq";
duke@1 2147 mnem[ifne] = "ifne";
duke@1 2148 mnem[iflt] = "iflt";
duke@1 2149 mnem[ifge] = "ifge";
duke@1 2150 mnem[ifgt] = "ifgt";
duke@1 2151 mnem[ifle] = "ifle";
duke@1 2152 mnem[if_icmpeq] = "if_icmpeq";
duke@1 2153 mnem[if_icmpne] = "if_icmpne";
duke@1 2154 mnem[if_icmplt] = "if_icmplt";
duke@1 2155 mnem[if_icmpge] = "if_icmpge";
duke@1 2156 mnem[if_icmpgt] = "if_icmpgt";
duke@1 2157 mnem[if_icmple] = "if_icmple";
duke@1 2158 mnem[if_acmpeq] = "if_acmpeq";
duke@1 2159 mnem[if_acmpne] = "if_acmpne";
duke@1 2160 mnem[goto_] = "goto_";
duke@1 2161 mnem[jsr] = "jsr";
duke@1 2162 mnem[ret] = "ret";
duke@1 2163 mnem[tableswitch] = "tableswitch";
duke@1 2164 mnem[lookupswitch] = "lookupswitch";
duke@1 2165 mnem[ireturn] = "ireturn";
duke@1 2166 mnem[lreturn] = "lreturn";
duke@1 2167 mnem[freturn] = "freturn";
duke@1 2168 mnem[dreturn] = "dreturn";
duke@1 2169 mnem[areturn] = "areturn";
duke@1 2170 mnem[return_] = "return_";
duke@1 2171 mnem[getstatic] = "getstatic";
duke@1 2172 mnem[putstatic] = "putstatic";
duke@1 2173 mnem[getfield] = "getfield";
duke@1 2174 mnem[putfield] = "putfield";
duke@1 2175 mnem[invokevirtual] = "invokevirtual";
duke@1 2176 mnem[invokespecial] = "invokespecial";
duke@1 2177 mnem[invokestatic] = "invokestatic";
duke@1 2178 mnem[invokeinterface] = "invokeinterface";
jrose@267 2179 mnem[invokedynamic] = "invokedynamic";
duke@1 2180 mnem[new_] = "new_";
duke@1 2181 mnem[newarray] = "newarray";
duke@1 2182 mnem[anewarray] = "anewarray";
duke@1 2183 mnem[arraylength] = "arraylength";
duke@1 2184 mnem[athrow] = "athrow";
duke@1 2185 mnem[checkcast] = "checkcast";
duke@1 2186 mnem[instanceof_] = "instanceof_";
duke@1 2187 mnem[monitorenter] = "monitorenter";
duke@1 2188 mnem[monitorexit] = "monitorexit";
duke@1 2189 mnem[wide] = "wide";
duke@1 2190 mnem[multianewarray] = "multianewarray";
duke@1 2191 mnem[if_acmp_null] = "if_acmp_null";
duke@1 2192 mnem[if_acmp_nonnull] = "if_acmp_nonnull";
duke@1 2193 mnem[goto_w] = "goto_w";
duke@1 2194 mnem[jsr_w] = "jsr_w";
duke@1 2195 mnem[breakpoint] = "breakpoint";
duke@1 2196 }
duke@1 2197 }
duke@1 2198 }

mercurial