projects / binutils-gdb.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Mon Dec 21 12:40:10 1992 Ian Lance Taylor (ian@cygnus.com)
[binutils-gdb.git] / gdb / rs6000-pinsn.c
diff --git a/gdb/rs6000-pinsn.c b/gdb/rs6000-pinsn.c
index 5ecea533bb9a8f1e66a0166ad32943daf306237d..03261e59421c59047131b2e2b7afbf60b0b5864a 100644 (file)
--- a/gdb/rs6000-pinsn.c
+++ b/gdb/rs6000-pinsn.c
@@ -19,7 +19,7 @@ along with this program; if not, write to the Free Software
 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 
 #include "defs.h"
-#include "rs6k-opcode.h"
+#include "opcode/rs6k.h"
 
 /* Print the rs6k instruction at address MEMADDR in debugged memory,
    on STREAM.  Returns length of the instruction, in bytes.  */
@@ -29,7 +29,7 @@ print_insn (memaddr, stream)
   CORE_ADDR memaddr;
   FILE *stream;
 {
-       int  pop, eop;                  /* primary and extended opcodes */
+       int  pop, eop, probable_eop;    /* primary and extended opcodes */
        int  min, max;
        int  best = -1;                 /* found best opcode index      */
        int  oldbest = -1;
@@ -37,7 +37,6 @@ print_insn (memaddr, stream)
 
        read_memory (memaddr, &the_insn, sizeof (the_insn));
        pop = (unsigned)(the_insn >> 26);
-       eop = ((the_insn) >> 1) & 0x3ff;
        min = 0, max = NOPCODES-1;
 
        while (min < max) {
@@ -55,7 +54,7 @@ print_insn (memaddr, stream)
            min = best;
 
          else {
-           /* opcode matched, check extended opcode. */
+           /* Opcode matched, check extended opcode. */
 
            if (rs6k_ops [best].e_opcode == -1) {
              /* there is no valid extended opcode, what we've got is
@@ -63,12 +62,18 @@ print_insn (memaddr, stream)
              goto insn_found;
            }
 
-           else if (eop < rs6k_ops [best].e_opcode) {
+           /* Largest possible value of extended opcode. */
+           probable_eop = ((the_insn) >> 1) & 0x3ff;
+
+           eop = probable_eop & eopMask [rs6k_ops [best].format];
+
+           if (eop < rs6k_ops [best].e_opcode) {
 
              while (pop == rs6k_ops [best].p_opcode) {
                if (eop == rs6k_ops [best].e_opcode)    /* found it! */
                  goto insn_found;
                --best;
+               eop = probable_eop & eopMask [rs6k_ops [best].format];
              }
              goto not_found;
            }
@@ -79,6 +84,7 @@ print_insn (memaddr, stream)
                if (eop == rs6k_ops [best].e_opcode)    /* found it! */
                  goto insn_found;
                ++best;
+               eop = probable_eop & eopMask [rs6k_ops [best].format];
              }
              goto not_found;
            }
@@ -119,20 +125,19 @@ long      memaddr;
 long   insn_word;
 int    insn_no;
 {
-  char buf [BUFSIZ];
+  char buf [20];
   char *qq = buf;
   char *pp = rs6k_ops[insn_no].opr_ext;
   int tmp;
   int nocomma = 0;                     /* true if no comma needed */
 
-  *qq = '\0';
   if (pp) {
     while (*pp) {
 
       switch ( *pp ) {
        case '.':
          if (insn_word & 0x1)
-          *qq++ = '.';
+           *qq++ = '.';
          break;
 
        case 'l':
@@ -177,9 +182,9 @@ int insn_no;
       ++pp;
     }
   }
+  *qq = '\0';
 
-  /* tab between operator and operand */
-  *qq++ = '\t';
+  fprintf (stream, "%s%s\t", rs6k_ops[insn_no].operator, buf);
 
   /* parse the operand now. */
   pp = rs6k_ops[insn_no].oprnd_format;
@@ -187,21 +192,21 @@ int       insn_no;
   while (1) {
     switch (*pp) {
       case TO  :
-       sprintf (qq, "%d", (insn_word >> 21) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 21) & 0x1f);
        break;
 
       case RT  :
       case RS  :
-       sprintf (qq, "r%d", (insn_word >> 21) & 0x1f);
+       fprintf (stream, "r%d", (insn_word >> 21) & 0x1f);
        break;
 
       case LI  :
        tmp  = (insn_word >> 16) & 0x1f;
        if (tmp > 11) {
-         fprintf (stderr, "Internal error: unknown cond code: 0x%x\n", insn_word);
+         fprintf (stream, "{unknown cond code: 0x%x}", insn_word);
          tmp = 0;
        }
-       sprintf (qq, "%s", cond_code [tmp]);
+       fprintf (stream, "%s", cond_code [tmp]);
        break;
 
       case A2  :
@@ -213,7 +218,7 @@ int insn_no;
        if ((insn_word & 0x2) == 0)     /* if AA not set        */
          tmp += memaddr;
 
-       sprintf (qq, "0x%x", tmp);
+        print_address (tmp, stream);
        break;
 
       case TA24        :
@@ -224,101 +229,99 @@ int      insn_no;
        if ((insn_word & 0x2) == 0)             /* if no AA bit set */
          tmp += memaddr;
 
-       sprintf (qq, "0x%x", tmp);
+        print_address (tmp, stream);
        break;
 
       case LEV :                       /* for svc only */
        if (insn_word & 0x2) {          /* SA is set    */
          nocomma = 1;
-         *qq = '\0';
        }
        else
-          sprintf (qq, "%d", (insn_word >> 5) & 0x7f);
+          fprintf (stream, "%d", (insn_word >> 5) & 0x7f);
        break;
 
       case FL1 :                       /* for svc only */
        if (insn_word & 0x2) {          /* SA is set    */
          nocomma = 1;
-         *qq = '\0';
        }
        else
-          sprintf (qq, "%d", (insn_word >> 12) & 0xf);
+          fprintf (stream, "%d", (insn_word >> 12) & 0xf);
        break;
 
       case FL2 :                       /* for svc only */
        nocomma = 0;
        if (insn_word & 0x2)            /* SA is set    */
-         sprintf (qq, "%d", (insn_word >> 2) & 0x3fff);
+         fprintf (stream, "%d", (insn_word >> 2) & 0x3fff);
        else
-          sprintf (qq, "%d", (insn_word >> 2) & 0x7);
+          fprintf (stream, "%d", (insn_word >> 2) & 0x7);
        break;
 
       case RA  :
        if (nocomma) {
-         sprintf (qq, "r%d)", (insn_word >> 16) & 0x1f);
+         fprintf (stream, "r%d)", (insn_word >> 16) & 0x1f);
          nocomma = 0;
        }
        else
-         sprintf (qq, "r%d", (insn_word >> 16) & 0x1f);
+         fprintf (stream, "r%d", (insn_word >> 16) & 0x1f);
        break;
 
       case RB  :
-       sprintf (qq, "r%d", (insn_word >> 11) & 0x1f);
+       fprintf (stream, "r%d", (insn_word >> 11) & 0x1f);
        break;
 
       case SI  :
        tmp = insn_word & 0xffff;
        if (tmp & 0x8000)
          tmp -= 0x10000;
-       sprintf (qq, "%d", tmp);
+       fprintf (stream, "%d", tmp);
        break;
 
       case UI  :
-       sprintf (qq, "%d", insn_word & 0xffff);
+       fprintf (stream, "%d", insn_word & 0xffff);
        break;
 
       case BF  :
-       sprintf (qq, "%d", (insn_word >> 23) & 0x7);
+       fprintf (stream, "%d", (insn_word >> 23) & 0x7);
        break;
 
       case BFA :
-       sprintf (qq, "%d", (insn_word >> 18) & 0x7);
+       fprintf (stream, "%d", (insn_word >> 18) & 0x7);
        break;
 
       case BT  :
-       sprintf (qq, "%d", (insn_word >> 21) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 21) & 0x1f);
        break;
 
       case BA  :
-       sprintf (qq, "%d", (insn_word >> 16) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 16) & 0x1f);
        break;
 
       case BB  :
-       sprintf (qq, "%d", (insn_word >> 11) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 11) & 0x1f);
        break;
 
       case BO  :
-       sprintf (qq, "%d", (insn_word >> 21) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 21) & 0x1f);
        break;
 
       case BI  :
-       sprintf (qq, "%d", (insn_word >> 16) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 16) & 0x1f);
        break;
 
       case SH  :
-       sprintf (qq, "%d", (insn_word >> 11) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 11) & 0x1f);
        break;
 
       case MB  :
-       sprintf (qq, "0x%x", (insn_word >> 6) & 0x1f);
+       fprintf (stream, "0x%x", (insn_word >> 6) & 0x1f);
        break;
 
       case ME  :
-       sprintf (qq, "0x%x", (insn_word >> 1) & 0x1f);
+       fprintf (stream, "0x%x", (insn_word >> 1) & 0x1f);
        break;
 
       case SPR :
-       sprintf (qq, "%d", (insn_word >> 16) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 16) & 0x1f);
        break;
 
       case DIS :
@@ -326,56 +329,52 @@ int       insn_no;
        tmp = insn_word & 0xffff;
        if (tmp & 0x8000)
          tmp -= 0x10000;
-       sprintf (qq, "%d(", tmp);
+       fprintf (stream, "%d(", tmp);
        break;
 
       case FXM :
-       sprintf (qq, "0x%x", (insn_word >> 12) & 0xff);
+       fprintf (stream, "0x%x", (insn_word >> 12) & 0xff);
        break;
 
       case FRT :
       case FRS :
-       sprintf (qq, "f%d", (insn_word >> 21) & 0x1f);
+       fprintf (stream, "f%d", (insn_word >> 21) & 0x1f);
        break;
 
       case FRA :
-       sprintf (qq, "f%d", (insn_word >> 16) & 0x1f);
+       fprintf (stream, "f%d", (insn_word >> 16) & 0x1f);
        break;
 
       case FRB :
-       sprintf (qq, "f%d", (insn_word >> 11) & 0x1f);
+       fprintf (stream, "f%d", (insn_word >> 11) & 0x1f);
        break;
 
       case FRC :
-       sprintf (qq, "f%d", (insn_word >> 6) & 0x1f);
+       fprintf (stream, "f%d", (insn_word >> 6) & 0x1f);
        break;
 
       case FLM :
-       sprintf (qq, "0x%x", (insn_word >> 17) & 0xff);
+       fprintf (stream, "0x%x", (insn_word >> 17) & 0xff);
        break;
 
       case NB  :
-       sprintf (qq, "%d", (insn_word >> 11) & 0x1f);
+       fprintf (stream, "%d", (insn_word >> 11) & 0x1f);
        break;
 
       case I   :
-       sprintf (qq, "%d", (insn_word >> 12) & 0xf);
+       fprintf (stream, "%d", (insn_word >> 12) & 0xf);
        break;
 
       default  :
-       sprintf (qq, "Unknown operand format identifier %d????", *pp);
-       abort ();
+       fprintf (stream,
+                "{Internal error: Unknown operand format identifier %d}",
+                *pp);
     }
-    while (*qq) ++qq;          /* Walk to end of string printed so far.  */
     ++pp;
 
     if (*pp == '\0')
       break;
     else if (!nocomma)
-      *qq++ = ',';
+      fputc(',', stream);
   }
-  *qq = '\0';
-    
-  fprintf (stream, "0x%08x\t%s%s", 
-       insn_word, rs6k_ops[insn_no].operator, buf);
 }