diff options
Diffstat (limited to 'gdb/gould-tdep.c')
| -rw-r--r-- | gdb/gould-tdep.c | 330 |
1 files changed, 165 insertions, 165 deletions
diff --git a/gdb/gould-tdep.c b/gdb/gould-tdep.c index 1916cc2..3c70165 100644 --- a/gdb/gould-tdep.c +++ b/gdb/gould-tdep.c @@ -61,170 +61,170 @@ /* OBSOLETE CORE_ADDR memaddr; */ /* OBSOLETE FILE *stream; */ /* OBSOLETE { */ -/* OBSOLETE unsigned char buffer[MAXLEN]; */ -/* OBSOLETE register int i; */ -/* OBSOLETE register char *d; */ -/* OBSOLETE register int bestmask; */ -/* OBSOLETE unsigned best; */ -/* OBSOLETE int temp, index, bestlen; */ -/* OBSOLETE */ -/* OBSOLETE read_memory (memaddr, buffer, MAXLEN); */ -/* OBSOLETE */ -/* OBSOLETE bestmask = 0; */ -/* OBSOLETE index = -1; */ -/* OBSOLETE best = 0xffffffff; */ -/* OBSOLETE for (i = 0; i < NOPCODES; i++) */ -/* OBSOLETE { */ -/* OBSOLETE register unsigned int opcode = gld_opcodes[i].opcode; */ -/* OBSOLETE register unsigned int mask = gld_opcodes[i].mask; */ -/* OBSOLETE register unsigned int len = gld_opcodes[i].length; */ -/* OBSOLETE register unsigned int test; */ -/* OBSOLETE */ -/* OBSOLETE /* Get possible opcode bytes into integer *x/ */ -/* OBSOLETE test = buffer[0] << 24; */ -/* OBSOLETE test |= buffer[1] << 16; */ -/* OBSOLETE test |= buffer[2] << 8; */ -/* OBSOLETE test |= buffer[3]; */ -/* OBSOLETE */ -/* OBSOLETE /* Mask with opcode and see if match *x/ */ -/* OBSOLETE if ((opcode & mask) == (test & mask)) */ -/* OBSOLETE { */ -/* OBSOLETE /* See if second or third match *x/ */ -/* OBSOLETE if (index >= 0) */ -/* OBSOLETE { */ -/* OBSOLETE /* Take new one if it looks good *x/ */ -/* OBSOLETE if (bestlen == MAXLEN && len == MAXLEN) */ -/* OBSOLETE { */ -/* OBSOLETE /* See if lower bits matched *x/ */ -/* OBSOLETE if (((bestmask & 3) == 0) && */ -/* OBSOLETE ((mask & 3) != 0)) */ -/* OBSOLETE { */ -/* OBSOLETE bestmask = mask; */ -/* OBSOLETE bestlen = len; */ -/* OBSOLETE best = test; */ -/* OBSOLETE index = i; */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE /* First match, save it *x/ */ -/* OBSOLETE bestmask = mask; */ -/* OBSOLETE bestlen = len; */ -/* OBSOLETE best = test; */ -/* OBSOLETE index = i; */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Handle undefined instructions. *x/ */ -/* OBSOLETE if (index < 0) */ -/* OBSOLETE { */ -/* OBSOLETE fprintf (stream, "undefined 0%o",(buffer[0]<<8)+buffer[1]); */ -/* OBSOLETE return 2; */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Print instruction name *x/ */ -/* OBSOLETE fprintf (stream, "%-12s", gld_opcodes[index].name); */ -/* OBSOLETE */ -/* OBSOLETE /* Adjust if short instruction *x/ */ -/* OBSOLETE if (gld_opcodes[index].length < 4) */ -/* OBSOLETE { */ -/* OBSOLETE best >>= 16; */ -/* OBSOLETE i = 0; */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE i = 16; */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Dump out instruction arguments *x/ */ -/* OBSOLETE for (d = gld_opcodes[index].args; *d; ++d) */ -/* OBSOLETE { */ -/* OBSOLETE switch (*d) */ -/* OBSOLETE { */ -/* OBSOLETE case 'f': */ -/* OBSOLETE fprintf (stream, "%d", (best >> (7 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'r': */ -/* OBSOLETE fprintf (stream, "r%d", (best >> (7 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'R': */ -/* OBSOLETE fprintf (stream, "r%d", (best >> (4 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'b': */ -/* OBSOLETE fprintf (stream, "b%d", (best >> (7 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'B': */ -/* OBSOLETE fprintf (stream, "b%d", (best >> (4 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'v': */ -/* OBSOLETE fprintf (stream, "b%d", (best >> (7 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'V': */ -/* OBSOLETE fprintf (stream, "b%d", (best >> (4 + i)) & 7); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'X': */ -/* OBSOLETE temp = (best >> 20) & 7; */ -/* OBSOLETE if (temp) */ -/* OBSOLETE fprintf (stream, "r%d", temp); */ -/* OBSOLETE else */ -/* OBSOLETE putc ('0', stream); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'A': */ -/* OBSOLETE temp = (best >> 16) & 7; */ -/* OBSOLETE if (temp) */ -/* OBSOLETE fprintf (stream, "(b%d)", temp); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'S': */ -/* OBSOLETE fprintf (stream, "#%d", best & 0x1f); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'I': */ -/* OBSOLETE fprintf (stream, "#%x", best & 0xffff); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'O': */ -/* OBSOLETE fprintf (stream, "%x", best & 0xffff); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'h': */ -/* OBSOLETE fprintf (stream, "%d", best & 0xfffe); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'd': */ -/* OBSOLETE fprintf (stream, "%d", best & 0xfffc); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'T': */ -/* OBSOLETE fprintf (stream, "%d", (best >> 8) & 0xff); */ -/* OBSOLETE break; */ -/* OBSOLETE case 'N': */ -/* OBSOLETE fprintf (stream, "%d", best & 0xff); */ -/* OBSOLETE break; */ -/* OBSOLETE default: */ -/* OBSOLETE putc (*d, stream); */ -/* OBSOLETE break; */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Return length of instruction *x/ */ -/* OBSOLETE return (gld_opcodes[index].length); */ +/* OBSOLETE unsigned char buffer[MAXLEN]; */ +/* OBSOLETE register int i; */ +/* OBSOLETE register char *d; */ +/* OBSOLETE register int bestmask; */ +/* OBSOLETE unsigned best; */ +/* OBSOLETE int temp, index, bestlen; */ +/* OBSOLETE */ +/* OBSOLETE read_memory (memaddr, buffer, MAXLEN); */ +/* OBSOLETE */ +/* OBSOLETE bestmask = 0; */ +/* OBSOLETE index = -1; */ +/* OBSOLETE best = 0xffffffff; */ +/* OBSOLETE for (i = 0; i < NOPCODES; i++) */ +/* OBSOLETE { */ +/* OBSOLETE register unsigned int opcode = gld_opcodes[i].opcode; */ +/* OBSOLETE register unsigned int mask = gld_opcodes[i].mask; */ +/* OBSOLETE register unsigned int len = gld_opcodes[i].length; */ +/* OBSOLETE register unsigned int test; */ +/* OBSOLETE */ +/* OBSOLETE /* Get possible opcode bytes into integer *x/ */ +/* OBSOLETE test = buffer[0] << 24; */ +/* OBSOLETE test |= buffer[1] << 16; */ +/* OBSOLETE test |= buffer[2] << 8; */ +/* OBSOLETE test |= buffer[3]; */ +/* OBSOLETE */ +/* OBSOLETE /* Mask with opcode and see if match *x/ */ +/* OBSOLETE if ((opcode & mask) == (test & mask)) */ +/* OBSOLETE { */ +/* OBSOLETE /* See if second or third match *x/ */ +/* OBSOLETE if (index >= 0) */ +/* OBSOLETE { */ +/* OBSOLETE /* Take new one if it looks good *x/ */ +/* OBSOLETE if (bestlen == MAXLEN && len == MAXLEN) */ +/* OBSOLETE { */ +/* OBSOLETE /* See if lower bits matched *x/ */ +/* OBSOLETE if (((bestmask & 3) == 0) && */ +/* OBSOLETE ((mask & 3) != 0)) */ +/* OBSOLETE { */ +/* OBSOLETE bestmask = mask; */ +/* OBSOLETE bestlen = len; */ +/* OBSOLETE best = test; */ +/* OBSOLETE index = i; */ +/* OBSOLETE } */ +/* OBSOLETE } */ +/* OBSOLETE } */ +/* OBSOLETE else */ +/* OBSOLETE { */ +/* OBSOLETE /* First match, save it *x/ */ +/* OBSOLETE bestmask = mask; */ +/* OBSOLETE bestlen = len; */ +/* OBSOLETE best = test; */ +/* OBSOLETE index = i; */ +/* OBSOLETE } */ +/* OBSOLETE } */ +/* OBSOLETE } */ +/* OBSOLETE */ +/* OBSOLETE /* Handle undefined instructions. *x/ */ +/* OBSOLETE if (index < 0) */ +/* OBSOLETE { */ +/* OBSOLETE fprintf (stream, "undefined 0%o",(buffer[0]<<8)+buffer[1]); */ +/* OBSOLETE return 2; */ +/* OBSOLETE } */ +/* OBSOLETE */ +/* OBSOLETE /* Print instruction name *x/ */ +/* OBSOLETE fprintf (stream, "%-12s", gld_opcodes[index].name); */ +/* OBSOLETE */ +/* OBSOLETE /* Adjust if short instruction *x/ */ +/* OBSOLETE if (gld_opcodes[index].length < 4) */ +/* OBSOLETE { */ +/* OBSOLETE best >>= 16; */ +/* OBSOLETE i = 0; */ +/* OBSOLETE } */ +/* OBSOLETE else */ +/* OBSOLETE { */ +/* OBSOLETE i = 16; */ +/* OBSOLETE } */ +/* OBSOLETE */ +/* OBSOLETE /* Dump out instruction arguments *x/ */ +/* OBSOLETE for (d = gld_opcodes[index].args; *d; ++d) */ +/* OBSOLETE { */ +/* OBSOLETE switch (*d) */ +/* OBSOLETE { */ +/* OBSOLETE case 'f': */ +/* OBSOLETE fprintf (stream, "%d", (best >> (7 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'r': */ +/* OBSOLETE fprintf (stream, "r%d", (best >> (7 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'R': */ +/* OBSOLETE fprintf (stream, "r%d", (best >> (4 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'b': */ +/* OBSOLETE fprintf (stream, "b%d", (best >> (7 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'B': */ +/* OBSOLETE fprintf (stream, "b%d", (best >> (4 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'v': */ +/* OBSOLETE fprintf (stream, "b%d", (best >> (7 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'V': */ +/* OBSOLETE fprintf (stream, "b%d", (best >> (4 + i)) & 7); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'X': */ +/* OBSOLETE temp = (best >> 20) & 7; */ +/* OBSOLETE if (temp) */ +/* OBSOLETE fprintf (stream, "r%d", temp); */ +/* OBSOLETE else */ +/* OBSOLETE putc ('0', stream); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'A': */ +/* OBSOLETE temp = (best >> 16) & 7; */ +/* OBSOLETE if (temp) */ +/* OBSOLETE fprintf (stream, "(b%d)", temp); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'S': */ +/* OBSOLETE fprintf (stream, "#%d", best & 0x1f); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'I': */ +/* OBSOLETE fprintf (stream, "#%x", best & 0xffff); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'O': */ +/* OBSOLETE fprintf (stream, "%x", best & 0xffff); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'h': */ +/* OBSOLETE fprintf (stream, "%d", best & 0xfffe); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'd': */ +/* OBSOLETE fprintf (stream, "%d", best & 0xfffc); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'T': */ +/* OBSOLETE fprintf (stream, "%d", (best >> 8) & 0xff); */ +/* OBSOLETE break; */ +/* OBSOLETE case 'N': */ +/* OBSOLETE fprintf (stream, "%d", best & 0xff); */ +/* OBSOLETE break; */ +/* OBSOLETE default: */ +/* OBSOLETE putc (*d, stream); */ +/* OBSOLETE break; */ +/* OBSOLETE } */ +/* OBSOLETE } */ +/* OBSOLETE */ +/* OBSOLETE /* Return length of instruction *x/ */ +/* OBSOLETE return (gld_opcodes[index].length); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE /* */ /* OBSOLETE * Find the number of arguments to a function. */ /* OBSOLETE *x/ */ /* OBSOLETE findarg(frame) */ -/* OBSOLETE struct frame_info *frame; */ +/* OBSOLETE struct frame_info *frame; */ /* OBSOLETE { */ -/* OBSOLETE register struct symbol *func; */ -/* OBSOLETE register unsigned pc; */ +/* OBSOLETE register struct symbol *func; */ +/* OBSOLETE register unsigned pc; */ /* OBSOLETE */ /* OBSOLETE #ifdef notdef */ -/* OBSOLETE /* find starting address of frame function *x/ */ -/* OBSOLETE pc = get_pc_function_start (frame->pc); */ +/* OBSOLETE /* find starting address of frame function *x/ */ +/* OBSOLETE pc = get_pc_function_start (frame->pc); */ /* OBSOLETE */ -/* OBSOLETE /* find function symbol info *x/ */ -/* OBSOLETE func = find_pc_function (pc); */ +/* OBSOLETE /* find function symbol info *x/ */ +/* OBSOLETE func = find_pc_function (pc); */ /* OBSOLETE */ -/* OBSOLETE /* call blockframe code to look for match *x/ */ -/* OBSOLETE if (func != NULL) */ +/* OBSOLETE /* call blockframe code to look for match *x/ */ +/* OBSOLETE if (func != NULL) */ /* OBSOLETE return (func->value.block->nsyms / sizeof(int)); */ /* OBSOLETE #endif */ /* OBSOLETE */ @@ -251,15 +251,15 @@ /* OBSOLETE /* Setup toplevel frame structure *x/ */ /* OBSOLETE frame->pc = read_pc(); */ /* OBSOLETE frame->next_frame = 0; */ -/* OBSOLETE frame->frame = read_register (SP_REGNUM); /* Br2 *x/ */ +/* OBSOLETE frame->frame = read_register (SP_REGNUM); /* Br2 *x/ */ /* OBSOLETE */ /* OBSOLETE /* Search for this frame (start at current Br2) *x/ */ /* OBSOLETE do */ /* OBSOLETE { */ -/* OBSOLETE pointer = framechain(frame); */ -/* OBSOLETE frame->next_frame = frame->frame; */ -/* OBSOLETE frame->frame = pointer; */ -/* OBSOLETE frame->pc = FRAME_SAVED_PC(frame); */ +/* OBSOLETE pointer = framechain(frame); */ +/* OBSOLETE frame->next_frame = frame->frame; */ +/* OBSOLETE frame->frame = pointer; */ +/* OBSOLETE frame->pc = FRAME_SAVED_PC(frame); */ /* OBSOLETE } */ /* OBSOLETE while (frame->next_frame != thisframe); */ /* OBSOLETE #endif */ @@ -268,7 +268,7 @@ /* OBSOLETE */ /* OBSOLETE /* stop gap for now, end at __base3 *x/ */ /* OBSOLETE if (thisframe->pc == 0) */ -/* OBSOLETE return 0; */ +/* OBSOLETE return 0; */ /* OBSOLETE */ /* OBSOLETE return pointer; */ /* OBSOLETE } */ @@ -289,21 +289,21 @@ /* OBSOLETE */ /* OBSOLETE /* If no stack given, read register Br1 "(sp)" *x/ */ /* OBSOLETE if (!frame->frame) */ -/* OBSOLETE prevsp = read_register (SP_REGNUM); */ +/* OBSOLETE prevsp = read_register (SP_REGNUM); */ /* OBSOLETE else */ -/* OBSOLETE prevsp = frame->frame; */ +/* OBSOLETE prevsp = frame->frame; */ /* OBSOLETE */ /* OBSOLETE /* Check function header, case #2 *x/ */ /* OBSOLETE value = read_memory_integer (func, 4); */ /* OBSOLETE if (value) */ /* OBSOLETE { */ -/* OBSOLETE /* 32bit call push value stored in function header *x/ */ -/* OBSOLETE prevsp += value; */ +/* OBSOLETE /* 32bit call push value stored in function header *x/ */ +/* OBSOLETE prevsp += value; */ /* OBSOLETE } */ /* OBSOLETE else */ /* OBSOLETE { */ -/* OBSOLETE /* read half-word from suabr at start of function *x/ */ -/* OBSOLETE prevsp += read_memory_integer (func + 10, 2); */ +/* OBSOLETE /* read half-word from suabr at start of function *x/ */ +/* OBSOLETE prevsp += read_memory_integer (func + 10, 2); */ /* OBSOLETE } */ /* OBSOLETE */ /* OBSOLETE return (prevsp); */ |