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

Wed, 15 Aug 2012 13:48:46 -0700

author
jjh
date
Wed, 15 Aug 2012 13:48:46 -0700
changeset 1305
9d47f4850714
parent 1109
3cdfa97e1be9
child 1326
30c36e23f154
permissions
-rw-r--r--

7191449: update copyright year to match last edit in jdk8 langtools repository
Reviewed-by: jjh
Contributed-by: steve.sides@oracle.com

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

mercurial