Home | History | Annotate | Line # | Download | only in vax
db_disasm.c revision 1.1 
      1  1.1  ragge #include <sys/param.h>
      2  1.1  ragge #include <sys/proc.h>
      3  1.1  ragge #include <sys/reboot.h>
      4  1.1  ragge 
      5  1.1  ragge #include <ddb/db_variables.h>
      6  1.1  ragge 
      7  1.1  ragge #include <machine/db_machdep.h>
      8  1.1  ragge 
      9  1.1  ragge 
     10  1.1  ragge 
     11  1.1  ragge struct vax_insn {
     12  1.1  ragge 	char	*insn;
     13  1.1  ragge 	int 	nargs;
     14  1.1  ragge } instr[] = {
     15  1.1  ragge 	"halt",	0,
     16  1.1  ragge 	"nop",	0,
     17  1.1  ragge 	"rei",	0,
     18  1.1  ragge 	"bpt",	0,
     19  1.1  ragge 	"ret",	0,
     20  1.1  ragge 	"rsb",	0,
     21  1.1  ragge 	"ldpctx",	0,
     22  1.1  ragge 	"svpctx",	0,
     23  1.1  ragge 	"cvtps",	4,
     24  1.1  ragge 	"cvtsp",	4,
     25  1.1  ragge 	"index",	6,
     26  1.1  ragge 	"crc",	4,
     27  1.1  ragge 	"prober",	3,
     28  1.1  ragge 	"probew",	3,
     29  1.1  ragge 	"insque",	2,
     30  1.1  ragge 	"remque",	2,
     31  1.1  ragge 	"",	-1,
     32  1.1  ragge 	"",	-1,
     33  1.1  ragge 	"",	-1,
     34  1.1  ragge 	"",	-1,
     35  1.1  ragge 	"",	-1,
     36  1.1  ragge 	"",	-1,
     37  1.1  ragge 	"",	-1,
     38  1.1  ragge 	"",	-1,
     39  1.1  ragge 	"",	-1,
     40  1.1  ragge 	"",	-1,
     41  1.1  ragge 	"",	-1,
     42  1.1  ragge 	"",	-1,
     43  1.1  ragge 	"",	-1,
     44  1.1  ragge 	"",	-1,
     45  1.1  ragge 	"",	-1,
     46  1.1  ragge 	"",	-1,
     47  1.1  ragge 	"",	-1,
     48  1.1  ragge 	"",	-1,
     49  1.1  ragge 	"",	-1,
     50  1.1  ragge 	"",	-1,
     51  1.1  ragge 	"",	-1,
     52  1.1  ragge 	"",	-1,
     53  1.1  ragge 	"",	-1,
     54  1.1  ragge 	"",	-1,
     55  1.1  ragge 	"",	-1,
     56  1.1  ragge 	"",	-1,
     57  1.1  ragge 	"",	-1,
     58  1.1  ragge 	"",	-1,
     59  1.1  ragge 	"",	-1,
     60  1.1  ragge 	"",	-1,
     61  1.1  ragge 	"",	-1,
     62  1.1  ragge 	"",	-1,
     63  1.1  ragge 	"",	-1,
     64  1.1  ragge 	"",	-1,
     65  1.1  ragge 	"",	-1,
     66  1.1  ragge 	"",	-1,
     67  1.1  ragge 	"",	-1,
     68  1.1  ragge 	"",	-1,
     69  1.1  ragge 	"",	-1,
     70  1.1  ragge 	"",	-1,
     71  1.1  ragge 	"",	-1,
     72  1.1  ragge 	"",	-1,
     73  1.1  ragge 	"",	-1,
     74  1.1  ragge 	"",	-1,
     75  1.1  ragge 	"",	-1,
     76  1.1  ragge 	"",	-1,
     77  1.1  ragge 	"",	-1,
     78  1.1  ragge 	"",	-1,
     79  1.1  ragge 	"",	-1,
     80  1.1  ragge 	"",	-1,
     81  1.1  ragge 	"",	-1,
     82  1.1  ragge 	"",	-1,
     83  1.1  ragge 	"",	-1,
     84  1.1  ragge 	"",	-1,
     85  1.1  ragge 	"",	-1,
     86  1.1  ragge 	"",	-1,
     87  1.1  ragge 	"",	-1,
     88  1.1  ragge 	"",	-1,
     89  1.1  ragge 	"",	-1,
     90  1.1  ragge 	"",	-1,
     91  1.1  ragge 	"",	-1,
     92  1.1  ragge 	"",	-1,
     93  1.1  ragge 	"",	-1,
     94  1.1  ragge 	"",	-1,
     95  1.1  ragge 	"",	-1,
     96  1.1  ragge 	"",	-1,
     97  1.1  ragge 	"",	-1,
     98  1.1  ragge 	"",	-1,
     99  1.1  ragge 	"",	-1,
    100  1.1  ragge 	"",	-1,
    101  1.1  ragge 	"",	-1,
    102  1.1  ragge 	"",	-1,
    103  1.1  ragge 	"",	-1,
    104  1.1  ragge 	"",	-1,
    105  1.1  ragge 	"",	-1,
    106  1.1  ragge 	"",	-1,
    107  1.1  ragge 	"",	-1,
    108  1.1  ragge 	"",	-1,
    109  1.1  ragge 	"",	-1,
    110  1.1  ragge 	"",	-1,
    111  1.1  ragge 	"",	-1,
    112  1.1  ragge 	"",	-1,
    113  1.1  ragge 	"",	-1,
    114  1.1  ragge 	"",	-1,
    115  1.1  ragge 	"",	-1,
    116  1.1  ragge 	"",	-1,
    117  1.1  ragge 	"",	-1,
    118  1.1  ragge 	"",	-1,
    119  1.1  ragge 	"",	-1,
    120  1.1  ragge 	"",	-1,
    121  1.1  ragge 	"",	-1,
    122  1.1  ragge 	"",	-1,
    123  1.1  ragge 	"",	-1,
    124  1.1  ragge 	"",	-1,
    125  1.1  ragge 	"",	-1,
    126  1.1  ragge 	"",	-1,
    127  1.1  ragge 	"",	-1,
    128  1.1  ragge 	"",	-1,
    129  1.1  ragge 	"",	-1,
    130  1.1  ragge 	"",	-1,
    131  1.1  ragge 	"",	-1,
    132  1.1  ragge 	"",	-1,
    133  1.1  ragge 	"",	-1,
    134  1.1  ragge 	"",	-1,
    135  1.1  ragge 	"",	-1,
    136  1.1  ragge 	"",	-1,
    137  1.1  ragge 	"",	-1,
    138  1.1  ragge 	"",	-1,
    139  1.1  ragge 	"",	-1,
    140  1.1  ragge 	"",	-1,
    141  1.1  ragge 	"",	-1,
    142  1.1  ragge 	"",	-1,
    143  1.1  ragge 	"",	-1,
    144  1.1  ragge 	"",	-1,
    145  1.1  ragge 	"",	-1,
    146  1.1  ragge 	"",	-1,
    147  1.1  ragge 	"",	-1,
    148  1.1  ragge 	"",	-1,
    149  1.1  ragge 	"",	-1,
    150  1.1  ragge 	"",	-1,
    151  1.1  ragge 	"",	-1,
    152  1.1  ragge 	"",	-1,
    153  1.1  ragge 	"",	-1,
    154  1.1  ragge 	"",	-1,
    155  1.1  ragge 	"",	-1,
    156  1.1  ragge 	"",	-1,
    157  1.1  ragge 	"",	-1,
    158  1.1  ragge 	"",	-1,
    159  1.1  ragge 	"",	-1,
    160  1.1  ragge 	"",	-1,
    161  1.1  ragge 	"",	-1,
    162  1.1  ragge 	"",	-1,
    163  1.1  ragge 	"",	-1,
    164  1.1  ragge 	"",	-1,
    165  1.1  ragge 	"",	-1,
    166  1.1  ragge 	"",	-1,
    167  1.1  ragge 	"",	-1,
    168  1.1  ragge 	"",	-1,
    169  1.1  ragge 	"",	-1,
    170  1.1  ragge 	"",	-1,
    171  1.1  ragge 	"",	-1,
    172  1.1  ragge 	"",	-1,
    173  1.1  ragge 	"",	-1,
    174  1.1  ragge 	"",	-1,
    175  1.1  ragge 	"",	-1,
    176  1.1  ragge 	"",	-1,
    177  1.1  ragge 	"",	-1,
    178  1.1  ragge 	"",	-1,
    179  1.1  ragge 	"",	-1,
    180  1.1  ragge 	"",	-1,
    181  1.1  ragge 	"",	-1,
    182  1.1  ragge 	"",	-1,
    183  1.1  ragge 	"",	-1,
    184  1.1  ragge 	"",	-1,
    185  1.1  ragge 	"",	-1,
    186  1.1  ragge 	"",	-1,
    187  1.1  ragge 	"",	-1,
    188  1.1  ragge 	"",	-1,
    189  1.1  ragge 	"",	-1,
    190  1.1  ragge 	"",	-1,
    191  1.1  ragge 	"",	-1,
    192  1.1  ragge 	"",	-1,
    193  1.1  ragge 	"",	-1,
    194  1.1  ragge 	"",	-1,
    195  1.1  ragge 	"",	-1,
    196  1.1  ragge 	"",	-1,
    197  1.1  ragge 	"",	-1,
    198  1.1  ragge 	"",	-1,
    199  1.1  ragge 	"",	-1,
    200  1.1  ragge 	"",	-1,
    201  1.1  ragge 	"",	-1,
    202  1.1  ragge 	"",	-1,
    203  1.1  ragge 	"",	-1,
    204  1.1  ragge 	"",	-1,
    205  1.1  ragge 	"",	-1,
    206  1.1  ragge 	"",	-1,
    207  1.1  ragge 	"",	-1,
    208  1.1  ragge 	"",	-1,
    209  1.1  ragge 	"",	-1,
    210  1.1  ragge 	"",	-1,
    211  1.1  ragge 	"",	-1,
    212  1.1  ragge 	"",	-1,
    213  1.1  ragge 	"",	-1,
    214  1.1  ragge 	"",	-1,
    215  1.1  ragge 	"",	-1,
    216  1.1  ragge 	"",	-1,
    217  1.1  ragge 	"",	-1,
    218  1.1  ragge 	"",	-1,
    219  1.1  ragge 	"",	-1,
    220  1.1  ragge 	"",	-1,
    221  1.1  ragge 	"",	-1,
    222  1.1  ragge 	"",	-1,
    223  1.1  ragge 	"",	-1,
    224  1.1  ragge 	"",	-1,
    225  1.1  ragge 	"",	-1,
    226  1.1  ragge 	"",	-1,
    227  1.1  ragge 	"",	-1,
    228  1.1  ragge 	"",	-1,
    229  1.1  ragge 	"",	-1,
    230  1.1  ragge 	"",	-1,
    231  1.1  ragge 	"",	-1,
    232  1.1  ragge 	"",	-1,
    233  1.1  ragge 	"",	-1,
    234  1.1  ragge 	"",	-1,
    235  1.1  ragge 	"",	-1,
    236  1.1  ragge 	"",	-1,
    237  1.1  ragge 	"",	-1,
    238  1.1  ragge 	"",	-1,
    239  1.1  ragge 	"",	-1,
    240  1.1  ragge 	"",	-1,
    241  1.1  ragge 	"",	-1,
    242  1.1  ragge 	"",	-1,
    243  1.1  ragge 	"",	-1,
    244  1.1  ragge 	"",	-1,
    245  1.1  ragge 	"",	-1,
    246  1.1  ragge 	"",	-1,
    247  1.1  ragge 	"",	-1,
    248  1.1  ragge 	"",	-1,
    249  1.1  ragge 	"",	-1,
    250  1.1  ragge 	"",	-1,
    251  1.1  ragge 	"",	-1,
    252  1.1  ragge 	"",	-1,
    253  1.1  ragge 	"",	-1,
    254  1.1  ragge 	"",	-1,
    255  1.1  ragge 	"",	-1,
    256  1.1  ragge 	"",	-1,
    257  1.1  ragge 	"",	-1,
    258  1.1  ragge 	"",	-1,
    259  1.1  ragge 	"",	-1,
    260  1.1  ragge 	"",	-1,
    261  1.1  ragge 	"",	-1,
    262  1.1  ragge 	"",	-1,
    263  1.1  ragge 	"",	-1,
    264  1.1  ragge 	"",	-1,
    265  1.1  ragge 	"",	-1,
    266  1.1  ragge 	"",	-1,
    267  1.1  ragge 	"",	-1,
    268  1.1  ragge 	"",	-1,
    269  1.1  ragge 	"",	-1,
    270  1.1  ragge 	"",	-1,
    271  1.1  ragge 	"",	-1,
    272  1.1  ragge 	"",	-1,
    273  1.1  ragge 	"",	-1,
    274  1.1  ragge 	"",	-1,
    275  1.1  ragge 	"",	-1,
    276  1.1  ragge 	"",	-1,
    277  1.1  ragge 	"",	-1,
    278  1.1  ragge 	"",	-1,
    279  1.1  ragge 	"",	-1,
    280  1.1  ragge 	"",	-1,
    281  1.1  ragge 	"",	-1,
    282  1.1  ragge 	"",	-1,
    283  1.1  ragge 	"",	-1,
    284  1.1  ragge 	"",	-1,
    285  1.1  ragge 	"",	-1,
    286  1.1  ragge 	"",	-1,
    287  1.1  ragge };
    288  1.1  ragge 
    289  1.1  ragge 
    290  1.1  ragge /*
    291  1.1  ragge  * Disassemble instruction at 'loc'.  'altfmt' specifies an
    292  1.1  ragge  * (optional) alternate format.  Return address of start of
    293  1.1  ragge  * next instruction.
    294  1.1  ragge  */
    295  1.1  ragge db_addr_t
    296  1.1  ragge db_disasm(loc, altfmt)
    297  1.1  ragge         db_addr_t       loc;
    298  1.1  ragge         boolean_t       altfmt;
    299  1.1  ragge {
    300  1.1  ragge 	char *i_pl;
    301  1.1  ragge 	int inr, i;
    302  1.1  ragge 
    303  1.1  ragge 	i_pl = loc;
    304  1.1  ragge 	inr = *i_pl;
    305  1.1  ragge 
    306  1.1  ragge 	if (instr[*i_pl].nargs < 0) {
    307  1.1  ragge 		printf("Ok{nd instruktion: %2x",*i_pl&0xff);
    308  1.1  ragge 		i_pl++;
    309  1.1  ragge 	} else {
    310  1.1  ragge 		printf("\t%s\t",instr[inr].insn);
    311  1.1  ragge 		i_pl++;
    312  1.1  ragge 		for (i=0;i<instr[inr].nargs;i++) {
    313  1.1  ragge 			i_pl = argprint(i_pl);
    314  1.1  ragge 			if (i<instr[inr].nargs-1)
    315  1.1  ragge 				printf(",");
    316  1.1  ragge 		}
    317  1.1  ragge 	}
    318  1.1  ragge 
    319  1.1  ragge 
    320  1.1  ragge 
    321  1.1  ragge         return i_pl;
    322  1.1  ragge }
    323  1.1  ragge 
    324  1.1  ragge argprint(plats)
    325  1.1  ragge 	char *plats;
    326  1.1  ragge {
    327  1.1  ragge 	switch (*plats&0xf0) {
    328  1.1  ragge 	case 0x00:
    329  1.1  ragge 	case 0x10:
    330  1.1  ragge 	case 0x20:
    331  1.1  ragge 	case 0x30:
    332  1.1  ragge 		printf("$%x",*plats++);
    333  1.1  ragge 		break;
    334  1.1  ragge 
    335  1.1  ragge 	case 0xe0:
    336  1.1  ragge 		if (*plats++&15 == 15) {
    337  1.1  ragge 			printf("%8x",*(unsigned *)plats + plats);
    338  1.1  ragge 			plats += 4;
    339  1.1  ragge 		} else {
    340  1.1  ragge 			printf("Oinpl. s{tt.");
    341  1.1  ragge 		}
    342  1.1  ragge 		break;
    343  1.1  ragge 	default:
    344  1.1  ragge 		printf("Oinpl. s{tt.");
    345  1.1  ragge 	}
    346  1.1  ragge 	return plats;
    347  1.1  ragge }
    348