1/* Disassemble WDC 65816 instructions.
2   Copyright (C) 1995-2017 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
30static fprintf_ftype fpr;
31static void *stream;
32static struct disassemble_info *local_info;
33
34static void
35print_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
59int
60print_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