new file mode 100644
--- /dev/null
+++ b/jdisa/main.c
@@ -0,0 +1,705 @@
+/**
+ * jdisa
+ *
+ * ByteCode Disassembler
+ * See http://java.sun.com/docs/books/jvms/second_edition/html/VMSpecTOC.doc.html
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <ctype.h>
+
+#define BUF_SIZE 1023
+
+typedef unsigned char uchar_t;
+
+typedef uchar_t u1[1];
+typedef uchar_t u2[2];
+typedef uchar_t u4[4];
+typedef uchar_t u8[8];
+
+struct Header {
+ u4 magic;
+ u2 minor_version;
+ u2 major_version;
+ u2 constant_pool_count;
+};
+
+typedef struct Header Header;
+
+int main (int argc, char **argv)
+{
+ FILE *f;
+ uchar_t buffer[BUF_SIZE];
+ int i;
+ size_t num;
+ int OPCODE;
+ Header *cf;
+
+ if (argc != 2) {
+ fprintf (stderr, "Usage: %s <FILE>\n", argv[0]);
+ return EXIT_FAILURE;
+ }
+
+ if ((f = fopen (argv[1], "r")) == NULL) {
+ perror ("FOPEN");
+ return EXIT_FAILURE;
+ }
+
+ if ((cf = malloc (sizeof (Header))) == NULL)
+ return EXIT_FAILURE;
+ if ((num = fread (cf, 1, sizeof (Header), f)) < 1)
+ return EXIT_FAILURE;
+
+ printf (" MAGIC: %2X%2X%2X%2X\n", cf->magic[0], cf->magic[1], cf->magic[2], cf->magic[3]);
+ printf ("VERSION: %02d.%02d\n", cf->major_version[1], cf->major_version[0]);
+ printf ("POOLCTN: %2d:%2d\n", cf->constant_pool_count[1], cf->constant_pool_count[0]);
+
+ if (cf != NULL)
+ free (cf);
+
+ OPCODE = 1;
+ while (!feof (f)) {
+ num = fread (buffer, 1, sizeof (buffer), f);
+ for (i = 0; i < num; i++) {
+ if (OPCODE) {
+ switch (buffer[i]) {
+ case 50:
+ printf ("aaload ");
+ break;
+ case 83:
+ printf ("aastore ");
+ break;
+ case 1:
+ printf ("aconst_null ");
+ break;
+ case 25:
+ printf ("aload ");
+ break;
+ case 42:
+ printf ("aload_0 ");
+ break;
+ case 43:
+ printf ("aload_1 ");
+ break;
+ case 44:
+ printf ("aload_2 ");
+ break;
+ case 45:
+ printf ("aload_3 ");
+ break;
+ case 189:
+ printf ("anewarray ");
+ break;
+ case 176:
+ printf ("areturn ");
+ break;
+ case 190:
+ printf ("arraylength ");
+ break;
+ case 58:
+ printf ("astore ");
+ break;
+ case 75:
+ printf ("astore_0 ");
+ break;
+ case 76:
+ printf ("astore_1 ");
+ break;
+ case 77:
+ printf ("astore_2 ");
+ break;
+ case 78:
+ printf ("astore_3 ");
+ break;
+ case 191:
+ printf ("athrow ");
+ break;
+ case 51:
+ printf ("baload ");
+ break;
+ case 84:
+ printf ("bastore ");
+ break;
+ case 16:
+ printf ("bipush ");
+ break;
+ case 52:
+ printf ("caload ");
+ break;
+ case 85:
+ printf ("castore ");
+ break;
+ case 192:
+ printf ("checkcast ");
+ break;
+ case 144:
+ printf ("d2f ");
+ break;
+ case 142:
+ printf ("d2i ");
+ break;
+ case 143:
+ printf ("d2l ");
+ break;
+ case 99:
+ printf ("dadd ");
+ break;
+ case 49:
+ printf ("daload ");
+ break;
+ case 82:
+ printf ("dastore ");
+ break;
+ case 152:
+ printf ("dcmp ");
+ break;
+ case 14:
+ printf ("dconst_0 ");
+ break;
+ case 15:
+ printf ("dconst_1 ");
+ break;
+ case 111:
+ printf ("ddiv ");
+ break;
+ case 24:
+ printf ("dload ");
+ break;
+ case 38:
+ printf ("dload_0 ");
+ break;
+ case 39:
+ printf ("dload_1 ");
+ break;
+ case 40:
+ printf ("dload_2 ");
+ break;
+ case 41:
+ printf ("dload_3 ");
+ break;
+ case 107:
+ printf ("dmul ");
+ break;
+ case 119:
+ printf ("dneg ");
+ break;
+ case 115:
+ printf ("drem ");
+ break;
+ case 175:
+ printf ("dreturn ");
+ break;
+ case 57:
+ printf ("dstore ");
+ break;
+ case 71:
+ printf ("dstore_0 ");
+ break;
+ case 72:
+ printf ("dstore_1 ");
+ break;
+ case 73:
+ printf ("dstore_2 ");
+ break;
+ case 74:
+ printf ("dstore_3 ");
+ break;
+ case 103:
+ printf ("dsub ");
+ break;
+ case 89:
+ printf ("dup ");
+ break;
+ case 90:
+ printf ("dup_x1 ");
+ break;
+ case 91:
+ printf ("dup_x2 ");
+ break;
+ case 92:
+ printf ("dup2 ");
+ break;
+ case 93:
+ printf ("dup2_x1 ");
+ break;
+ case 94:
+ printf ("dup2_x2 ");
+ break;
+ case 141:
+ printf ("f2d ");
+ break;
+ case 139:
+ printf ("f2i ");
+ break;
+ case 140:
+ printf ("f2l ");
+ break;
+ case 98:
+ printf ("fadd ");
+ break;
+ case 48:
+ printf ("faload ");
+ break;
+ case 81:
+ printf ("fastore ");
+ break;
+ case 150:
+ printf ("fcmpg ");
+ break;
+ case 149:
+ printf ("fcmpl ");
+ break;
+ case 11:
+ printf ("fconst_0 ");
+ break;
+ case 12:
+ printf ("fconst_1 ");
+ break;
+ case 13:
+ printf ("fconst_2 ");
+ break;
+ case 110:
+ printf ("fdiv ");
+ break;
+ case 23:
+ printf ("fload ");
+ break;
+ case 34:
+ printf ("fload_0 ");
+ break;
+ case 35:
+ printf ("fload_1 ");
+ break;
+ case 36:
+ printf ("fload_2 ");
+ break;
+ case 37:
+ printf ("fload_3 ");
+ break;
+ case 106:
+ printf ("fmul ");
+ break;
+ case 118:
+ printf ("fneg ");
+ break;
+ case 114:
+ printf ("frem ");
+ break;
+ case 174:
+ printf ("freturn ");
+ break;
+ case 56:
+ printf ("fstore ");
+ break;
+ case 67:
+ printf ("fstore_0 ");
+ break;
+ case 68:
+ printf ("fstore_1 ");
+ break;
+ case 69:
+ printf ("fstore_2 ");
+ break;
+ case 70:
+ printf ("fstore_3 ");
+ break;
+ case 102:
+ printf ("fsub ");
+ break;
+ case 180:
+ printf ("getfield ");
+ break;
+ case 178:
+ printf ("getstatic ");
+ break;
+ case 167:
+ printf ("goto ");
+ break;
+ case 200:
+ printf ("goto_w ");
+ break;
+ case 145:
+ printf ("i2b ");
+ break;
+ case 146:
+ printf ("i2c ");
+ break;
+ case 135:
+ printf ("i2d ");
+ break;
+ case 134:
+ printf ("i2f ");
+ break;
+ case 133:
+ printf ("i2l ");
+ break;
+ case 147:
+ printf ("i2s ");
+ break;
+ case 96:
+ printf ("iadd ");
+ break;
+ case 46:
+ printf ("iaload ");
+ break;
+ case 126:
+ printf ("iand ");
+ break;
+ case 79:
+ printf ("iastore ");
+ break;
+ case 2:
+ printf ("iconst_m1 ");
+ break;
+ case 3:
+ printf ("iconst_0 ");
+ break;
+ case 4:
+ printf ("iconst_1 ");
+ break;
+ case 5:
+ printf ("iconst_2 ");
+ break;
+ case 6:
+ printf ("iconst_3 ");
+ break;
+ case 7:
+ printf ("iconst_4 ");
+ break;
+ case 8:
+ printf ("iconst_5 ");
+ break;
+ case 108:
+ printf ("idiv ");
+ break;
+ case 165:
+ printf ("if_acmpeq ");
+ break;
+ case 166:
+ printf ("if_acmpne ");
+ break;
+ case 159:
+ printf ("if_icmpeq ");
+ break;
+ case 160:
+ printf ("if_icmpne ");
+ break;
+ case 161:
+ printf ("if_icmplt ");
+ break;
+ case 162:
+ printf ("if_icmpge ");
+ break;
+ case 163:
+ printf ("if_icmpgt ");
+ break;
+ case 164:
+ printf ("if_icmple ");
+ break;
+ case 153:
+ printf ("ifeq ");
+ break;
+ case 154:
+ printf ("ifne ");
+ break;
+ case 155:
+ printf ("iflt ");
+ break;
+ case 156:
+ printf ("ifge ");
+ break;
+ case 157:
+ printf ("ifgt ");
+ break;
+ case 158:
+ printf ("ifle ");
+ break;
+ case 199:
+ printf ("ifnonnull ");
+ break;
+ case 198:
+ printf ("ifnull ");
+ break;
+ case 132:
+ printf ("iinc %d %d\n", buffer[i + 1], buffer[i + 2]);
+ i += 2;
+ continue;
+ break;
+ case 21:
+ printf ("iload ");
+ break;
+ case 26:
+ printf ("iload_0 ");
+ break;
+ case 27:
+ printf ("iload_1 ");
+ break;
+ case 28:
+ printf ("iload_2 ");
+ break;
+ case 29:
+ printf ("iload_3 ");
+ break;
+ case 104:
+ printf ("imul ");
+ break;
+ case 116:
+ printf ("ineg ");
+ break;
+ case 193:
+ printf ("instanceof ");
+ break;
+ case 185:
+ printf ("invokeinterface ");
+ break;
+ case 183:
+ printf ("invokespecial ");
+ break;
+ case 184:
+ printf ("invokestatic ");
+ break;
+ case 182:
+ printf ("invokevirtual ");
+ break;
+ case 128:
+ printf ("ior ");
+ break;
+ case 112:
+ printf ("irem ");
+ break;
+ case 172:
+ printf ("ireturn ");
+ break;
+ case 120:
+ printf ("ishl ");
+ break;
+ case 122:
+ printf ("ishr ");
+ break;
+ case 54:
+ printf ("istore ");
+ break;
+ case 59:
+ printf ("istore_0 ");
+ break;
+ case 60:
+ printf ("istore_1 ");
+ break;
+ case 61:
+ printf ("istore_2 ");
+ break;
+ case 62:
+ printf ("istore_3 ");
+ break;
+ case 100:
+ printf ("isub ");
+ break;
+ case 124:
+ printf ("iushr ");
+ break;
+ case 130:
+ printf ("ixor ");
+ break;
+ case 168:
+ printf ("jsr ");
+ break;
+ case 201:
+ printf ("jsr_w ");
+ break;
+ case 138:
+ printf ("l2d ");
+ break;
+ case 137:
+ printf ("l2f ");
+ break;
+ case 136:
+ printf ("l2i ");
+ break;
+ case 97:
+ printf ("ladd ");
+ break;
+ case 47:
+ printf ("laload ");
+ break;
+ case 127:
+ printf ("land ");
+ break;
+ case 80:
+ printf ("lastore ");
+ break;
+ case 148:
+ printf ("lcmd ");
+ break;
+ case 9:
+ printf ("lconst_0 ");
+ break;
+ case 10:
+ printf ("lconst_1 ");
+ break;
+ case 18:
+ printf ("ldc ");
+ break;
+ case 19:
+ printf ("ldc_w ");
+ break;
+ case 20:
+ printf ("ldc2_w ");
+ break;
+ case 109:
+ printf ("ldiv ");
+ break;
+ case 22:
+ printf ("lload ");
+ break;
+ case 30:
+ printf ("lload_0 ");
+ break;
+ case 31:
+ printf ("lload_1 ");
+ break;
+ case 32:
+ printf ("lload_2 ");
+ break;
+ case 33:
+ printf ("lload_3 ");
+ break;
+ case 105:
+ printf ("lmul ");
+ break;
+ case 117:
+ printf ("lneg ");
+ break;
+ case 171:
+ printf ("lookupswitch ");
+ break;
+ case 129:
+ printf ("lor ");
+ break;
+ case 113:
+ printf ("lrem ");
+ break;
+ case 173:
+ printf ("lreturn ");
+ break;
+ case 121:
+ printf ("lshl ");
+ break;
+ case 123:
+ printf ("lshr ");
+ break;
+ case 55:
+ printf ("lstore ");
+ break;
+ case 63:
+ printf ("lstore_0 ");
+ break;
+ case 64:
+ printf ("lstore_1 ");
+ break;
+ case 65:
+ printf ("lstore_2 ");
+ break;
+ case 66:
+ printf ("lstore_3 ");
+ break;
+ case 101:
+ printf ("lsub ");
+ break;
+ case 125:
+ printf ("lushr ");
+ break;
+ case 131:
+ printf ("lxor ");
+ break;
+ case 194:
+ printf ("monitorenter ");
+ break;
+ case 195:
+ printf ("monitorexit ");
+ break;
+ case 197:
+ printf ("multianewarray ");
+ break;
+ case 187:
+ printf ("new ");
+ break;
+ case 188:
+ printf ("newarray ");
+ break;
+ case 0:
+ printf ("nop ");
+ break;
+ case 87:
+ printf ("pop ");
+ break;
+ case 88:
+ printf ("pop2 ");
+ break;
+ case 181:
+ printf ("putfield ");
+ break;
+ case 179:
+ printf ("putstatic ");
+ break;
+ case 169:
+ printf ("ret ");
+ break;
+ case 177:
+ printf ("return ");
+ break;
+ case 53:
+ printf ("saload ");
+ break;
+ case 86:
+ printf ("sastore ");
+ break;
+ case 17:
+ printf ("sipush ");
+ break;
+ case 95:
+ printf ("swap ");
+ break;
+ case 170:
+ printf ("tableswitch ");
+ break;
+ case 196:
+ printf ("wide ");
+ break;
+ case 202: /* reserved item */
+ printf ("breakpoint ");
+ break;
+ case 254: /* reserved item */
+ printf ("impdep1 ");
+ break;
+ case 255: /* reserved item */
+ printf ("impdep2 ");
+ break;
+ default:
+ printf ("OPCODE %02X(%d) ", buffer[i], buffer[i]);
+ }
+ OPCODE = 0;
+ } else
+ switch (buffer[i]) {
+ case '\0':
+ case '>':
+ case '<':
+ printf ("\n");
+ OPCODE = 1;
+ break;
+ default:
+ if (isprint (buffer[i]))
+ printf ("%c", buffer[i]);
+ else
+ printf ("%02X ", buffer[i]);
+ }
+ }
+ }
+
+ printf ("\n");
+
+ if (f != NULL)
+ fclose (f);
+
+ return EXIT_SUCCESS;
+}