Home | History | Annotate | Download | only in opcodes
      1 /* Disassemble WDC 65816 instructions.
      2    Copyright (C) 1995-2016 Free Software Foundation, Inc.
      3 
      4    This file is part of the GNU opcodes library.
      5 
      6    This library is free software; you can redistribute it and/or modify
      7    it under the terms of the GNU General Public License as published by
      8    the Free Software Foundation; either version 3, or (at your option)
      9    any later version.
     10 
     11    It is distributed in the hope that it will be useful, but WITHOUT
     12    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
     13    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
     14    License for more details.
     15 
     16    You should have received a copy of the GNU General Public License
     17    along with this program; if not, write to the Free Software
     18    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
     19    MA 02110-1301, USA.  */
     20 
     21 #include "sysdep.h"
     22 #include <stdio.h>
     23 
     24 #define STATIC_TABLE
     25 #define DEFINE_TABLE
     26 
     27 #include "w65-opc.h"
     28 #include "dis-asm.h"
     29 
     30 static fprintf_ftype fpr;
     31 static void *stream;
     32 static struct disassemble_info *local_info;
     33 
     34 static void
     35 print_operand (int lookup, char *format, int *args)
     36 {
     37   int val;
     38   int c;
     39 
     40   while (*format)
     41     {
     42       switch (c = *format++)
     43 	{
     44 	case '$':
     45 	  val = args[(*format++) - '0'];
     46 	  if (lookup)
     47 	    local_info->print_address_func (val, local_info);
     48 	  else
     49 	    fpr (stream, "0x%x", val);
     50 
     51 	  break;
     52 	default:
     53 	  fpr (stream, "%c", c);
     54 	  break;
     55 	}
     56     }
     57 }
     58 
     59 int
     60 print_insn_w65 (bfd_vma memaddr, struct disassemble_info *info)
     61 {
     62   int status = 0;
     63   unsigned char insn[4];
     64   const struct opinfo *op;
     65   int i;
     66   int X = 0;
     67   int M = 0;
     68   int args[2];
     69 
     70   stream = info->stream;
     71   fpr = info->fprintf_func;
     72   local_info = info;
     73 
     74   for (i = 0; i < 4 && status == 0; i++)
     75     status = info->read_memory_func (memaddr + i, insn + i, 1, info);
     76 
     77   for (op = optable; op->val != insn[0]; op++)
     78     ;
     79 
     80   fpr (stream, "%s", op->name);
     81 
     82   /* Prepare all the posible operand values.  */
     83   {
     84     int size = 1;
     85     int asR_W65_ABS8 = insn[1];
     86     int asR_W65_ABS16 = (insn[2] << 8) + asR_W65_ABS8;
     87     int asR_W65_ABS24 = (insn[3] << 16) + asR_W65_ABS16;
     88     int asR_W65_PCR8 = ((char) (asR_W65_ABS8)) + memaddr + 2;
     89     int asR_W65_PCR16 = ((short) (asR_W65_ABS16)) + memaddr + 3;
     90 
     91     switch (op->amode)
     92       {
     93 	DISASM ();
     94       }
     95 
     96     return size;
     97   }
     98 }
     99