opcodes/w65-dis.c

   1 /* Disassemble WDC 65816 instructions.
   2    Copyright (C) 1995-2018 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 "disassemble.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 }