jdisa/main.c
author Markus Brökers <mbroeker@largo.homelinux.org>
Tue, 17 Aug 2010 14:47:41 +0200
changeset 138 dff18d1ac2af
parent 95 d2a071bd1a60
permissions -rw-r--r--
Compatibility: We support Linux and BSD

/**
 * 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;
}