Delete w65 directory.
This commit is contained in:
parent
4b3aa33818
commit
de0a1e42d0
|
@ -1,3 +1,7 @@
|
||||||
|
2002-07-17 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
|
* w65/: Delete directory.
|
||||||
|
|
||||||
2002-07-16 Andrew Cagney <ac131313@redhat.com>
|
2002-07-16 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
* configure.in (extra_subdirs): Mark fr30-*-* as obsolete.
|
* configure.in (extra_subdirs): Mark fr30-*-* as obsolete.
|
||||||
|
|
|
@ -1,156 +0,0 @@
|
||||||
2002-06-16 Andrew Cagney <ac131313@redhat.com>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
|
|
||||||
2002-06-08 Andrew Cagney <cagney@redhat.com>
|
|
||||||
|
|
||||||
* interp.c: Include "gdb/callback.h" and "gdb/remote-sim.h".
|
|
||||||
|
|
||||||
Tue May 23 21:39:23 2000 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
|
|
||||||
Thu Sep 2 18:15:53 1999 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
|
|
||||||
1999-05-08 Felix Lee <flee@cygnus.com>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
|
|
||||||
Sun Apr 26 15:31:55 1998 Tom Tromey <tromey@creche>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
* config.in: Ditto.
|
|
||||||
|
|
||||||
Sun Apr 26 15:19:08 1998 Tom Tromey <tromey@cygnus.com>
|
|
||||||
|
|
||||||
* acconfig.h: New file.
|
|
||||||
* configure.in: Reverted change of Apr 24; use sinclude again.
|
|
||||||
Don't call AC_C_CROSS.
|
|
||||||
|
|
||||||
Fri Apr 24 14:16:40 1998 Tom Tromey <tromey@creche>
|
|
||||||
|
|
||||||
* configure: Regenerated to track ../common/aclocal.m4 changes.
|
|
||||||
* config.in: Ditto.
|
|
||||||
|
|
||||||
Fri Apr 24 11:17:46 1998 Tom Tromey <tromey@cygnus.com>
|
|
||||||
|
|
||||||
* acconfig.h: Removed.
|
|
||||||
* configure.in: Call CY_GNU_GETTEXT.
|
|
||||||
* Makefile.in (INTLLIBS): New macro.
|
|
||||||
(INTLDEPS): Likewise.
|
|
||||||
($(RUN_PROG)): Depend on INTLDEPS; link against INTLLIBS.
|
|
||||||
(top_builddir): New macro.
|
|
||||||
|
|
||||||
Wed Apr 22 14:29:50 1998 Michael Meissner <meissner@cygnus.com>
|
|
||||||
|
|
||||||
* configure: Regenerate with autoconf 2.12.1.
|
|
||||||
|
|
||||||
Tue Feb 17 12:52:24 1998 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* run.c (main): Pass length into sim_fetch_register.
|
|
||||||
|
|
||||||
* interp.c (sim_store_register, sim_fetch_register): Pass in
|
|
||||||
length parameter. Return -1.
|
|
||||||
|
|
||||||
Tue Aug 26 10:43:11 1997 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* interp.c (sim_kill): Delete.
|
|
||||||
(sim_create_inferior): Add ABFD argument. Set PC from same.
|
|
||||||
|
|
||||||
Mon Aug 25 16:34:33 1997 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* interp.c (sim_open): Add ABFD argument. Change ARGV to PARGV.
|
|
||||||
|
|
||||||
Tue May 20 10:24:54 1997 Andrew Cagney <cagney@b1.cygnus.com>
|
|
||||||
|
|
||||||
* interp.c (sim_open): Add callback argument.
|
|
||||||
|
|
||||||
Tue Apr 15 14:55:10 1997 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* Makefile.in (INSTALL): Set to @INSTALL@.
|
|
||||||
(INSTALL_XFORM, INSTALL_XFORM1): Remove.
|
|
||||||
(install): Depend upon installdirs. Use $(program_transform_name)
|
|
||||||
directly, rather than using $(INSTALL_XFORM) and
|
|
||||||
$(INSTALL_XFORM1).
|
|
||||||
(installdirs): New target.
|
|
||||||
|
|
||||||
Mon Apr 14 16:30:02 1997 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* Makefile.in (INSTALL): Change install.sh to install-sh.
|
|
||||||
|
|
||||||
Wed Apr 2 15:40:30 1997 Doug Evans <dje@canuck.cygnus.com>
|
|
||||||
|
|
||||||
* interp.c (sim_open): New arg `kind'. `name is now `argv'.
|
|
||||||
|
|
||||||
Thu Oct 3 16:17:59 1996 Jason Molenda (crash@godzilla.cygnus.co.jp)
|
|
||||||
|
|
||||||
* Makefile.in (mostlyclean): Move config.log to distclean.
|
|
||||||
|
|
||||||
Wed Jun 26 12:30:45 1996 Jason Molenda (crash@godzilla.cygnus.co.jp)
|
|
||||||
|
|
||||||
* Makefile.in (bindir, libdir, datadir, mandir, infodir, includedir,
|
|
||||||
INSTALL_PROGRAM, INSTALL_DATA): Use autoconf-set values.
|
|
||||||
(docdir): Removed.
|
|
||||||
* configure.in (AC_PREREQ): autoconf 2.5 or higher.
|
|
||||||
(AC_PROG_INSTALL): Added.
|
|
||||||
* configure: Rebuilt.
|
|
||||||
|
|
||||||
Wed Feb 21 12:17:04 1996 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* configure: Regenerate with autoconf 2.7.
|
|
||||||
|
|
||||||
Thu Oct 19 21:44:14 1995 Fred Fish <fnf@cygnus.com>
|
|
||||||
|
|
||||||
* Makefile.in: Remove tabs from otherwise empty line.
|
|
||||||
Confuses many older non-GNU versions of "make".
|
|
||||||
|
|
||||||
Tue Oct 10 11:13:01 1995 Fred Fish <fnf@cygnus.com>
|
|
||||||
|
|
||||||
* Makefile.in (BISONFLAGS): Remove macro.
|
|
||||||
|
|
||||||
Wed Sep 20 13:35:43 1995 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* Makefile.in (maintainer-clean): New synonym for realclean.
|
|
||||||
|
|
||||||
Fri Sep 8 14:03:32 1995 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* configure.in: Convert to use autoconf.
|
|
||||||
* configure: New file, built by autoconf.
|
|
||||||
* acconfig.h: New file.
|
|
||||||
* config.in: New file, built by autoheader.
|
|
||||||
* Makefile.in: Various changes for new configure script. Also:
|
|
||||||
(INSTALL): Go up two levels, not one.
|
|
||||||
(ALLOCA, MALLOC, OPCODES): Remove.
|
|
||||||
(gencode): Use $(CC_FOR_BUILD).
|
|
||||||
(case.o): Remove.
|
|
||||||
(run.o, interp.o): Depend upon config.h.
|
|
||||||
* interp.c: Include "config.h". Don't include "sysdep.h".
|
|
||||||
Include <stdlib.h>, <time.h>, and <unistd.h> if they exist.
|
|
||||||
* run.c: Include "config.h". Don't include "sysdep.h". Include
|
|
||||||
<stdlib.h> if it exists. Include "getopt.h". Declare printf if
|
|
||||||
necessary.
|
|
||||||
|
|
||||||
Thu Aug 3 10:45:37 1995 Fred Fish <fnf@cygnus.com>
|
|
||||||
|
|
||||||
* Update all FSF addresses except those in COPYING* files.
|
|
||||||
|
|
||||||
Wed Jul 5 16:12:53 1995 J.T. Conklin <jtc@rtl.cygnus.com>
|
|
||||||
|
|
||||||
* w65.mt: Removed.
|
|
||||||
|
|
||||||
Wed May 24 16:31:38 1995 Jim Wilson <wilson@chestnut.cygnus.com>
|
|
||||||
|
|
||||||
* configure.in: Fix typo in last change.
|
|
||||||
|
|
||||||
Mon Mar 27 10:32:34 1995 J.T. Conklin <jtc@rtl.cygnus.com>
|
|
||||||
|
|
||||||
* run.c: parse arguments with getopt().
|
|
||||||
|
|
||||||
Tue Feb 28 17:31:36 1995 Ian Lance Taylor <ian@cygnus.com>
|
|
||||||
|
|
||||||
* configure.in: Use ../../bfd/hosts/std-host.h if specific
|
|
||||||
host unavailable.
|
|
||||||
|
|
||||||
* Started ChangeLog.
|
|
|
@ -1,247 +0,0 @@
|
||||||
# Makefile for GNU binary-file utilities
|
|
||||||
# Copyright (C) 1992, 93, 94, 95, 96, 97, 1998 Free Software Foundation, Inc.
|
|
||||||
|
|
||||||
# This file is part of GNU binutils.
|
|
||||||
|
|
||||||
# This program is free software; you can redistribute it and/or modify
|
|
||||||
# it under the terms of the GNU General Public License as published by
|
|
||||||
# the Free Software Foundation; either version 2 of the License, or
|
|
||||||
# (at your option) any later version.
|
|
||||||
#
|
|
||||||
# This program is distributed in the hope that it will be useful,
|
|
||||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
# GNU General Public License for more details.
|
|
||||||
#
|
|
||||||
# You should have received a copy of the GNU General Public License
|
|
||||||
# along with this program; if not, write to the Free Software
|
|
||||||
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
||||||
|
|
||||||
VPATH = @srcdir@
|
|
||||||
srcdir = @srcdir@
|
|
||||||
|
|
||||||
prefix = @prefix@
|
|
||||||
exec_prefix = @exec_prefix@
|
|
||||||
|
|
||||||
host_alias = @host_alias@
|
|
||||||
target_alias = @target_alias@
|
|
||||||
program_transform_name = @program_transform_name@
|
|
||||||
bindir = @bindir@
|
|
||||||
libdir = @libdir@
|
|
||||||
tooldir = $(exec_prefix)/$(target_alias)
|
|
||||||
|
|
||||||
datadir = @datadir@
|
|
||||||
mandir = @mandir@
|
|
||||||
man1dir = $(mandir)/man1
|
|
||||||
man2dir = $(mandir)/man2
|
|
||||||
man3dir = $(mandir)/man3
|
|
||||||
man4dir = $(mandir)/man4
|
|
||||||
man5dir = $(mandir)/man5
|
|
||||||
man6dir = $(mandir)/man6
|
|
||||||
man7dir = $(mandir)/man7
|
|
||||||
man8dir = $(mandir)/man8
|
|
||||||
man9dir = $(mandir)/man9
|
|
||||||
infodir = @infodir@
|
|
||||||
includedir = @includedir@
|
|
||||||
|
|
||||||
# This can be referenced by the gettext configuration code.
|
|
||||||
top_builddir = ..
|
|
||||||
|
|
||||||
SHELL = /bin/sh
|
|
||||||
|
|
||||||
INSTALL = @INSTALL@
|
|
||||||
INSTALL_PROGRAM = @INSTALL_PROGRAM@
|
|
||||||
INSTALL_DATA = @INSTALL_DATA@
|
|
||||||
|
|
||||||
AR = @AR@
|
|
||||||
AR_FLAGS = qv
|
|
||||||
CC = @CC@
|
|
||||||
CFLAGS = @CFLAGS@
|
|
||||||
MAKEINFO = makeinfo
|
|
||||||
TEXI2DVI = texi2dvi
|
|
||||||
RANLIB = @RANLIB@
|
|
||||||
TEXI2ROFF=texi2roff
|
|
||||||
MAKEOVERRIDES=
|
|
||||||
CC_FOR_BUILD = @CC_FOR_BUILD@
|
|
||||||
|
|
||||||
HDEFINES = @HDEFINES@
|
|
||||||
TDEFINES =
|
|
||||||
|
|
||||||
# Comment these out if using lex.
|
|
||||||
# Distribution version
|
|
||||||
|
|
||||||
# Distribution name
|
|
||||||
|
|
||||||
# Where to find texinfo.tex to format docn with TeX
|
|
||||||
TEXIDIR = $(srcdir)/../texinfo
|
|
||||||
|
|
||||||
# These should all be the same program too.
|
|
||||||
RUN_PROG=run
|
|
||||||
SIM_LIB=libsim.a
|
|
||||||
ADDL_LIBS=
|
|
||||||
|
|
||||||
PROGS = $(RUN_PROG)
|
|
||||||
LIBS= $(SIM_LIB)
|
|
||||||
|
|
||||||
DISTSTUFF = $(PROGS) $(LIBS)
|
|
||||||
|
|
||||||
BASEDIR = $(srcdir)/../..
|
|
||||||
BFDDIR = $(BASEDIR)/bfd
|
|
||||||
INCDIR = $(BASEDIR)/include
|
|
||||||
GDBDIR = $(BASEDIR)/gdb
|
|
||||||
INCLUDES = -I. -I$(srcdir) -I../../bfd -I$(BFDDIR) -I$(INCDIR) -I$(GDBDIR)
|
|
||||||
|
|
||||||
#### host and target dependant Makefile fragments come in here.
|
|
||||||
###
|
|
||||||
|
|
||||||
ALL_CFLAGS = $(INCLUDES) $(HDEFINES) $(TDEFINES) $(CFLAGS)
|
|
||||||
|
|
||||||
.c.o:
|
|
||||||
$(CC) -c $(ALL_CFLAGS) $<
|
|
||||||
|
|
||||||
LIBIBERTY = ../../libiberty/libiberty.a
|
|
||||||
|
|
||||||
BFD = ../../bfd/libbfd.a
|
|
||||||
|
|
||||||
INTLLIBS = @INTLLIBS@
|
|
||||||
INTLDEPS = @INTLDEPS@
|
|
||||||
|
|
||||||
RUNTEST = runtest
|
|
||||||
RUNTESTFLAGS =
|
|
||||||
FLAGS_TO_PASS = \
|
|
||||||
"CC=$(CC)" \
|
|
||||||
"CFLAGS=$(CFLAGS)" \
|
|
||||||
"RUNTEST=$(RUNTEST)" \
|
|
||||||
"RUNTESTFLAGS=$(RUNTESTFLAGS)"
|
|
||||||
|
|
||||||
#
|
|
||||||
## The rules
|
|
||||||
|
|
||||||
all: $(LIBS) $(PROGS)
|
|
||||||
|
|
||||||
|
|
||||||
$(RUN_PROG): $(LIBS) run.o $(BFD) $(INTLDEPS)
|
|
||||||
$(CC) $(CFLAGS) $(LDFLAGS) -o $(RUN_PROG) run.o $(SIM_LIB) $(BFD) $(INTLLIBS) $(LIBIBERTY)
|
|
||||||
|
|
||||||
$(SIM_LIB): case.o interp.o
|
|
||||||
rm -f $(SIM_LIB)
|
|
||||||
$(AR) $(AR_FLAGS) $(SIM_LIB) case.o interp.o
|
|
||||||
$(RANLIB) $(SIM_LIB)
|
|
||||||
|
|
||||||
case.c: gencode
|
|
||||||
./gencode -c >case.c ; \
|
|
||||||
if [ -x /usr/latest/bin/indent ] ; then \
|
|
||||||
/usr/latest/bin/indent case.c ; \
|
|
||||||
fi
|
|
||||||
|
|
||||||
optable:gencode
|
|
||||||
./gencode >optable
|
|
||||||
./gencode -a >$(srcdir)/../../opcodes/w65-opc.h
|
|
||||||
|
|
||||||
gencode:gencode.c
|
|
||||||
$(CC_FOR_BUILD) -o gencode $<
|
|
||||||
|
|
||||||
run.o:run.c config.h
|
|
||||||
interp.o:interp.c config.h
|
|
||||||
|
|
||||||
|
|
||||||
######################################################################
|
|
||||||
|
|
||||||
mostlyclean:
|
|
||||||
-rm -f *.o *~ \#* core binutils.?? binutils.??? case.c
|
|
||||||
|
|
||||||
clean: mostlyclean
|
|
||||||
-rm -f $(PROGS) *.o *.a
|
|
||||||
|
|
||||||
distclean:
|
|
||||||
-rm -f Makefile config.status sysdep.h *.o *~ \#* core y.* \
|
|
||||||
binutils.?? binutils.??s binutils.aux binutils.log \
|
|
||||||
binutils.toc gencode run config.log
|
|
||||||
-rm -f $(PROGS) config.h stamp-h
|
|
||||||
|
|
||||||
maintainer-clean realclean: clean distclean
|
|
||||||
-rm -f $(DISTSTUFF) TAGS
|
|
||||||
|
|
||||||
etags tags: TAGS
|
|
||||||
|
|
||||||
TAGS: force
|
|
||||||
etags $(INCDIR)/*.h $(srcdir)/*.[hc]
|
|
||||||
|
|
||||||
install: all installdirs
|
|
||||||
for i in $(PROGS) ; do \
|
|
||||||
n=`echo $$i | sed -e 's/.new//' | sed '$(program_transform_name)'`; \
|
|
||||||
$(INSTALL_PROGRAM) $$i $(bindir)/$$n; \
|
|
||||||
done
|
|
||||||
|
|
||||||
installdirs:
|
|
||||||
$(SHELL) $(srcdir)/../../mkinstalldirs $(bindir)
|
|
||||||
|
|
||||||
install-info:
|
|
||||||
|
|
||||||
clean-info:
|
|
||||||
-rm -rf *.info*
|
|
||||||
|
|
||||||
# Making a dist:
|
|
||||||
# cvs rtag binutils-x-yy ld+utils
|
|
||||||
# cvs co -r binutils-x-yy ld+utils
|
|
||||||
# cd {HERE}; make dist [-f Makefile.in]
|
|
||||||
|
|
||||||
dist: $(DIST_NAME).tar.z
|
|
||||||
|
|
||||||
diststuff: $(DISTSTUFF)
|
|
||||||
|
|
||||||
$(DIST_NAME).tar.z:
|
|
||||||
cd ../..; rm -f $(DIST_NAME); ln -s devo $(DIST_NAME)
|
|
||||||
make diststuff -f Makefile.in
|
|
||||||
cd ../ld; make diststuff -f Makefile.in
|
|
||||||
cd ../gprof; make diststuff -f Makefile.in
|
|
||||||
cd ../texinfo; mv texinfo.tex ..; rm -rf *; mv ../texinfo.tex .
|
|
||||||
# Take out texinfo from configurable dirs
|
|
||||||
mv ../configure.in tmp; \
|
|
||||||
sed -e '/^host_tools=/s/texinfo //' <tmp >../configure.in; rm tmp
|
|
||||||
cd ..; chmod og=u `find . -print`
|
|
||||||
cd ../..; tar chf - $(DIST_NAME) | gzip >$(DIST_NAME).tar.z
|
|
||||||
rm -rf ../../$(DIST_NAME)
|
|
||||||
|
|
||||||
|
|
||||||
# Dummy target to force execution of dependent targets.
|
|
||||||
#
|
|
||||||
force:
|
|
||||||
|
|
||||||
# Target to uncomment host-specific lines in this makefile. Such lines must
|
|
||||||
# have the following string beginning in column 1: #__<hostname>__#
|
|
||||||
# Original Makefile is backed up as 'Makefile.old'.
|
|
||||||
#
|
|
||||||
# Invoke with: make make HOST=xxx
|
|
||||||
#
|
|
||||||
make:
|
|
||||||
-@if test $(HOST)x = x ; then \
|
|
||||||
echo 'Specify "make make HOST=???"'; \
|
|
||||||
exit 1; \
|
|
||||||
fi ; \
|
|
||||||
grep -s "^#The next line was generated by 'make make'" Makefile; \
|
|
||||||
if test $$? = 0 ; then \
|
|
||||||
echo "Makefile has already been processed with 'make make'";\
|
|
||||||
exit 1; \
|
|
||||||
fi ; \
|
|
||||||
mv -f Makefile Makefile.old; \
|
|
||||||
echo "#The next line was generated by 'make make'" >Makefile ; \
|
|
||||||
echo "HOST=$(HOST)" >>Makefile ; \
|
|
||||||
echo >>Makefile ; \
|
|
||||||
sed "s/^#__$(HOST)__#//" < Makefile.old >>Makefile
|
|
||||||
|
|
||||||
Makefile: Makefile.in config.status
|
|
||||||
CONFIG_FILES=Makefile CONFIG_HEADERS= $(SHELL) ./config.status
|
|
||||||
|
|
||||||
config.h: stamp-h ; @true
|
|
||||||
stamp-h: config.in config.status
|
|
||||||
CONFIG_FILES= CONFIG_HEADERS=config.h:config.in $(SHELL) ./config.status
|
|
||||||
|
|
||||||
config.status: configure
|
|
||||||
$(SHELL) ./config.status --recheck
|
|
||||||
|
|
||||||
### Local Variables: ***
|
|
||||||
### mode:fundamental ***
|
|
||||||
### page-delimiter: "^#" ***
|
|
||||||
### End: ***
|
|
||||||
### end of file
|
|
|
@ -1,18 +0,0 @@
|
||||||
|
|
||||||
/* Define to 1 if NLS is requested. */
|
|
||||||
#undef ENABLE_NLS
|
|
||||||
|
|
||||||
/* Define as 1 if you have catgets and don't want to use GNU gettext. */
|
|
||||||
#undef HAVE_CATGETS
|
|
||||||
|
|
||||||
/* Define as 1 if you have gettext and don't want to use GNU gettext. */
|
|
||||||
#undef HAVE_GETTEXT
|
|
||||||
|
|
||||||
/* Define as 1 if you have the stpcpy function. */
|
|
||||||
#undef HAVE_STPCPY
|
|
||||||
|
|
||||||
/* Define if your locale.h file contains LC_MESSAGES. */
|
|
||||||
#undef HAVE_LC_MESSAGES
|
|
||||||
|
|
||||||
/* Whether printf must be declared even if <stdio.h> is included. */
|
|
||||||
#undef NEED_DECLARATION_PRINTF
|
|
|
@ -1,131 +0,0 @@
|
||||||
/* config.in. Generated automatically from configure.in by autoheader. */
|
|
||||||
|
|
||||||
/* Define if using alloca.c. */
|
|
||||||
#undef C_ALLOCA
|
|
||||||
|
|
||||||
/* Define to empty if the keyword does not work. */
|
|
||||||
#undef const
|
|
||||||
|
|
||||||
/* Define to one of _getb67, GETB67, getb67 for Cray-2 and Cray-YMP systems.
|
|
||||||
This function is required for alloca.c support on those systems. */
|
|
||||||
#undef CRAY_STACKSEG_END
|
|
||||||
|
|
||||||
/* Define if you have alloca, as a function or macro. */
|
|
||||||
#undef HAVE_ALLOCA
|
|
||||||
|
|
||||||
/* Define if you have <alloca.h> and it should be used (not on Ultrix). */
|
|
||||||
#undef HAVE_ALLOCA_H
|
|
||||||
|
|
||||||
/* Define if you have a working `mmap' system call. */
|
|
||||||
#undef HAVE_MMAP
|
|
||||||
|
|
||||||
/* Define as __inline if that's what the C compiler calls it. */
|
|
||||||
#undef inline
|
|
||||||
|
|
||||||
/* Define to `long' if <sys/types.h> doesn't define. */
|
|
||||||
#undef off_t
|
|
||||||
|
|
||||||
/* Define if you need to in order for stat and other things to work. */
|
|
||||||
#undef _POSIX_SOURCE
|
|
||||||
|
|
||||||
/* Define to `unsigned' if <sys/types.h> doesn't define. */
|
|
||||||
#undef size_t
|
|
||||||
|
|
||||||
/* If using the C implementation of alloca, define if you know the
|
|
||||||
direction of stack growth for your system; otherwise it will be
|
|
||||||
automatically deduced at run-time.
|
|
||||||
STACK_DIRECTION > 0 => grows toward higher addresses
|
|
||||||
STACK_DIRECTION < 0 => grows toward lower addresses
|
|
||||||
STACK_DIRECTION = 0 => direction of growth unknown
|
|
||||||
*/
|
|
||||||
#undef STACK_DIRECTION
|
|
||||||
|
|
||||||
/* Define if you have the ANSI C header files. */
|
|
||||||
#undef STDC_HEADERS
|
|
||||||
|
|
||||||
/* Define to 1 if NLS is requested. */
|
|
||||||
#undef ENABLE_NLS
|
|
||||||
|
|
||||||
/* Define as 1 if you have gettext and don't want to use GNU gettext. */
|
|
||||||
#undef HAVE_GETTEXT
|
|
||||||
|
|
||||||
/* Define as 1 if you have the stpcpy function. */
|
|
||||||
#undef HAVE_STPCPY
|
|
||||||
|
|
||||||
/* Define if your locale.h file contains LC_MESSAGES. */
|
|
||||||
#undef HAVE_LC_MESSAGES
|
|
||||||
|
|
||||||
/* Whether printf must be declared even if <stdio.h> is included. */
|
|
||||||
#undef NEED_DECLARATION_PRINTF
|
|
||||||
|
|
||||||
/* Define if you have the __argz_count function. */
|
|
||||||
#undef HAVE___ARGZ_COUNT
|
|
||||||
|
|
||||||
/* Define if you have the __argz_next function. */
|
|
||||||
#undef HAVE___ARGZ_NEXT
|
|
||||||
|
|
||||||
/* Define if you have the __argz_stringify function. */
|
|
||||||
#undef HAVE___ARGZ_STRINGIFY
|
|
||||||
|
|
||||||
/* Define if you have the dcgettext function. */
|
|
||||||
#undef HAVE_DCGETTEXT
|
|
||||||
|
|
||||||
/* Define if you have the getcwd function. */
|
|
||||||
#undef HAVE_GETCWD
|
|
||||||
|
|
||||||
/* Define if you have the getpagesize function. */
|
|
||||||
#undef HAVE_GETPAGESIZE
|
|
||||||
|
|
||||||
/* Define if you have the munmap function. */
|
|
||||||
#undef HAVE_MUNMAP
|
|
||||||
|
|
||||||
/* Define if you have the putenv function. */
|
|
||||||
#undef HAVE_PUTENV
|
|
||||||
|
|
||||||
/* Define if you have the setenv function. */
|
|
||||||
#undef HAVE_SETENV
|
|
||||||
|
|
||||||
/* Define if you have the setlocale function. */
|
|
||||||
#undef HAVE_SETLOCALE
|
|
||||||
|
|
||||||
/* Define if you have the stpcpy function. */
|
|
||||||
#undef HAVE_STPCPY
|
|
||||||
|
|
||||||
/* Define if you have the strcasecmp function. */
|
|
||||||
#undef HAVE_STRCASECMP
|
|
||||||
|
|
||||||
/* Define if you have the strchr function. */
|
|
||||||
#undef HAVE_STRCHR
|
|
||||||
|
|
||||||
/* Define if you have the <argz.h> header file. */
|
|
||||||
#undef HAVE_ARGZ_H
|
|
||||||
|
|
||||||
/* Define if you have the <limits.h> header file. */
|
|
||||||
#undef HAVE_LIMITS_H
|
|
||||||
|
|
||||||
/* Define if you have the <locale.h> header file. */
|
|
||||||
#undef HAVE_LOCALE_H
|
|
||||||
|
|
||||||
/* Define if you have the <malloc.h> header file. */
|
|
||||||
#undef HAVE_MALLOC_H
|
|
||||||
|
|
||||||
/* Define if you have the <nl_types.h> header file. */
|
|
||||||
#undef HAVE_NL_TYPES_H
|
|
||||||
|
|
||||||
/* Define if you have the <stdlib.h> header file. */
|
|
||||||
#undef HAVE_STDLIB_H
|
|
||||||
|
|
||||||
/* Define if you have the <string.h> header file. */
|
|
||||||
#undef HAVE_STRING_H
|
|
||||||
|
|
||||||
/* Define if you have the <sys/param.h> header file. */
|
|
||||||
#undef HAVE_SYS_PARAM_H
|
|
||||||
|
|
||||||
/* Define if you have the <time.h> header file. */
|
|
||||||
#undef HAVE_TIME_H
|
|
||||||
|
|
||||||
/* Define if you have the <unistd.h> header file. */
|
|
||||||
#undef HAVE_UNISTD_H
|
|
||||||
|
|
||||||
/* Define if you have the <values.h> header file. */
|
|
||||||
#undef HAVE_VALUES_H
|
|
File diff suppressed because it is too large
Load Diff
|
@ -1,48 +0,0 @@
|
||||||
dnl Process this file with autoconf to produce a configure script.
|
|
||||||
sinclude(../common/aclocal.m4)
|
|
||||||
AC_PREREQ(2.5)dnl
|
|
||||||
AC_INIT(Makefile.in)
|
|
||||||
|
|
||||||
AC_CONFIG_HEADER(config.h:config.in)
|
|
||||||
|
|
||||||
AC_CONFIG_AUX_DIR(`cd $srcdir;pwd`/../..)
|
|
||||||
AC_CANONICAL_SYSTEM
|
|
||||||
AC_ARG_PROGRAM
|
|
||||||
AC_PROG_CC
|
|
||||||
AC_PROG_INSTALL
|
|
||||||
|
|
||||||
. ${srcdir}/../../bfd/configure.host
|
|
||||||
|
|
||||||
AC_SUBST(CFLAGS)
|
|
||||||
AC_SUBST(HDEFINES)
|
|
||||||
AR=${AR-ar}
|
|
||||||
AC_SUBST(AR)
|
|
||||||
AC_PROG_RANLIB
|
|
||||||
|
|
||||||
# Put a plausible default for CC_FOR_BUILD in Makefile.
|
|
||||||
if test "x$cross_compiling" = "xno"; then
|
|
||||||
CC_FOR_BUILD='$(CC)'
|
|
||||||
else
|
|
||||||
CC_FOR_BUILD=gcc
|
|
||||||
fi
|
|
||||||
AC_SUBST(CC_FOR_BUILD)
|
|
||||||
|
|
||||||
dnl We don't use gettext, but bfd does. So we do the appropriate checks
|
|
||||||
dnl to see if there are intl libraries we should link against.
|
|
||||||
ALL_LINGUAS=
|
|
||||||
CY_GNU_GETTEXT
|
|
||||||
|
|
||||||
AC_CHECK_HEADERS(stdlib.h time.h unistd.h)
|
|
||||||
|
|
||||||
AC_MSG_CHECKING([whether printf must be declared])
|
|
||||||
AC_CACHE_VAL(sim_cv_decl_needed_printf,
|
|
||||||
[AC_TRY_COMPILE([#include <stdio.h>],
|
|
||||||
[int (*pfn) = (int (*)) printf],
|
|
||||||
sim_cv_decl_needed_printf=no, sim_cv_decl_needed_printf=yes)])
|
|
||||||
AC_MSG_RESULT($sim_cv_decl_needed_printf)
|
|
||||||
if test $sim_cv_decl_needed_printf = yes; then
|
|
||||||
AC_DEFINE(NEED_DECLARATION_PRINTF)
|
|
||||||
fi
|
|
||||||
|
|
||||||
AC_OUTPUT(Makefile,
|
|
||||||
[case x$CONFIG_HEADERS in xconfig.h:config.in) echo > stamp-h ;; esac])
|
|
|
@ -1,991 +0,0 @@
|
||||||
/* Program to write out opcode tables for the W65816 and friends
|
|
||||||
Copyright (C) 1995 Free Software Foundation, Inc.
|
|
||||||
Written by Steve Chamberlain sac@cygnus.com
|
|
||||||
|
|
||||||
|
|
||||||
GDB is free software; you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU General Public License as published by
|
|
||||||
the Free Software Foundation; either version 2, or (at your option)
|
|
||||||
any later version.
|
|
||||||
|
|
||||||
GDB is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU General Public License
|
|
||||||
along with this program; if not, write to the Free Software
|
|
||||||
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
||||||
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
|
|
||||||
|
|
||||||
struct opinfo
|
|
||||||
{
|
|
||||||
int code;
|
|
||||||
char *opcode;
|
|
||||||
char *mode;
|
|
||||||
int clocks;
|
|
||||||
int cpu;
|
|
||||||
struct ainfo *ai;
|
|
||||||
struct oinfo *oi;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define W16_ONLY 1
|
|
||||||
#define C02_ONLY 2
|
|
||||||
|
|
||||||
struct ainfo
|
|
||||||
{
|
|
||||||
char *name;
|
|
||||||
char *enumname;
|
|
||||||
char *disasmstring;
|
|
||||||
char *sizer;
|
|
||||||
char *reloc0;
|
|
||||||
char *howlval;
|
|
||||||
|
|
||||||
/* If addr val could be reg addr - used for disasssmbly of
|
|
||||||
args into reg names - you want lda <0x10 to turn into lda <r0
|
|
||||||
but you don't want lda #0x10 to do the same. */
|
|
||||||
char regflag;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define GET_M 1
|
|
||||||
#define SPECIAL_CASE 2
|
|
||||||
#define COP_GET 3
|
|
||||||
#define G2_GET 4
|
|
||||||
#define BRANCH 5
|
|
||||||
#define GET_X 6
|
|
||||||
#define STANDARD_PC_GET 7
|
|
||||||
#define PUSH_16 8
|
|
||||||
#define PUSH_8 9
|
|
||||||
#define PUSH_X 10
|
|
||||||
#define PUSH_M 11
|
|
||||||
#define POP_16 12
|
|
||||||
#define POP_8 13
|
|
||||||
#define POP_X 14
|
|
||||||
#define POP_M 15
|
|
||||||
#define STORE_M 16
|
|
||||||
#define STORE_X 17
|
|
||||||
struct oinfo
|
|
||||||
{
|
|
||||||
char *name;
|
|
||||||
int howsrc;
|
|
||||||
char *howto;
|
|
||||||
};
|
|
||||||
struct oinfo olist[] =
|
|
||||||
{
|
|
||||||
{"adc", GET_M, "{ int old_acc = GET_A; int old_src =src; src = old_src + old_acc + GET_CBIT; SET_NBIT_M(src); SET_VBIT_M(old_src, old_acc, src); SET_CBIT_M(src); SET_ZBIT_M(src); SET_A(src);}"},
|
|
||||||
{"and", GET_M, "src = GET_A & src; SET_NBIT_M(src); SET_ZBIT_M(src);SET_A(src);"},
|
|
||||||
{"asl", G2_GET, " src <<=1; SET_CBIT_M(src); SET_ZBIT_M(src);SET_NBIT_M(src);"},
|
|
||||||
{"bcc", BRANCH, "GET_CBIT==0"},
|
|
||||||
{"bcs", BRANCH, "GET_CBIT==1"},
|
|
||||||
{"beq", BRANCH, "GET_ZBIT==1"},
|
|
||||||
{"bit", GET_M, "SET_NBIT_M(src); SET_VBIT((src >> (GET_MBIT ? 6:14 ) &1)); SET_ZBIT_M (GET_A & src);"},
|
|
||||||
{"bmi", BRANCH, "GET_NBIT==1"},
|
|
||||||
{"bne", BRANCH, "GET_ZBIT==0"},
|
|
||||||
{"bpl", BRANCH, "GET_NBIT==0"},
|
|
||||||
{"bra", BRANCH, "1"},
|
|
||||||
{"brk", SPECIAL_CASE,
|
|
||||||
"\
|
|
||||||
{\
|
|
||||||
if (GET_E == 1) \
|
|
||||||
{ PUSH16(GET_PC + 1); PUSH8 (GET_P | BFLAG); SET_P (GET_P | IFLAG); SET_ONLY_PC(fetch16 (0xfffe));}\
|
|
||||||
else \
|
|
||||||
{ PUSH8 (GET_PBR_LOW); PUSH16 (GET_PC); PUSH8(GET_P); SET_P(GET_P |IFLAG); SET_PBRPC(fetch16 (0xffe6));};\
|
|
||||||
}"},
|
|
||||||
{"brl", BRANCH, "1"},
|
|
||||||
{"bvc", BRANCH, "GET_VBIT==0"},
|
|
||||||
{"bvs", BRANCH, "GET_VBIT==1"},
|
|
||||||
{"clc", SPECIAL_CASE, "SET_CBIT(0);"},
|
|
||||||
{"cld", SPECIAL_CASE, "SET_DBIT(0);"},
|
|
||||||
{"cli", SPECIAL_CASE, "SET_IBIT(0);"},
|
|
||||||
{"clv", SPECIAL_CASE, "SET_VBIT(0);"},
|
|
||||||
{"cmp", GET_M, "src = GET_A - src; SET_ZBIT_M(src); SET_CBIT_M(~src); SET_NBIT_M(src);"},
|
|
||||||
{"cop", COP_GET,
|
|
||||||
"\
|
|
||||||
{\
|
|
||||||
if (GET_E == 1) \
|
|
||||||
{ PUSH16(GET_PC + 1); PUSH8 (GET_P | BFLAG); SET_P ((GET_P | IFLAG) & ~DFLAG); SET_ONLY_PC(fetch16 (0xfff4));}\
|
|
||||||
else \
|
|
||||||
{ PUSH8 (GET_PBR_LOW); PUSH16 (GET_PC); PUSH8(GET_P); SET_P((GET_P |IFLAG) & ~DFLAG); SET_PBRPC(fetch16 (0xffe4));};\
|
|
||||||
}"},
|
|
||||||
{"cpx", GET_X, "src = GET_X - src; SET_NBIT_X(src); SET_ZBIT_X(src); SET_CBIT_X(~src);"},
|
|
||||||
{"cpy", GET_X, "src = GET_Y - src; SET_NBIT_X(src); SET_ZBIT_X(src); SET_CBIT_X(~src);"},
|
|
||||||
{"dec", G2_GET, "src --; SET_NBIT_M(src); SET_ZBIT_M(src); "},
|
|
||||||
{"dex", SPECIAL_CASE, "SET_X(GET_X -1); SET_NBIT_X(GET_X); SET_ZBIT_X(GET_X);"},
|
|
||||||
{"dey", SPECIAL_CASE, "SET_Y(GET_Y -1); SET_NBIT_X(GET_Y); SET_ZBIT_X(GET_Y);"},
|
|
||||||
{"eor", GET_M, "src = GET_A ^ src; SET_NBIT_M(src); SET_ZBIT_M(src);SET_A(src); "},
|
|
||||||
{"inc", G2_GET, "src ++; SET_NBIT_M(src); SET_ZBIT_M(src); "},
|
|
||||||
{"inx", SPECIAL_CASE, "SET_X(GET_X +1); SET_NBIT_X(GET_X); SET_ZBIT_X(GET_X);"},
|
|
||||||
{"iny", SPECIAL_CASE, "SET_Y(GET_Y +1); SET_NBIT_X(GET_Y); SET_ZBIT_X(GET_Y);"},
|
|
||||||
{"jmp", STANDARD_PC_GET, "SET_ONLY_PC(lval);"},
|
|
||||||
{"jsr", STANDARD_PC_GET, "if (l) { PUSH8(GET_PBR_LOW);} PUSH16(GET_PC); SET_ONLY_PC(lval);\n"},
|
|
||||||
{"lda", GET_M, "SET_A(src); SET_NBIT_M(GET_A); SET_ZBIT_M(GET_A);"},
|
|
||||||
{"ldx", GET_X, "SET_X(src);SET_NBIT_X(GET_X); SET_ZBIT_X(GET_X);"},
|
|
||||||
{"ldy", GET_X, "SET_Y(src);SET_NBIT_X(GET_Y); SET_ZBIT_X(GET_Y);"},
|
|
||||||
{"lsr", G2_GET,
|
|
||||||
"SET_CBIT(src & 1); \
|
|
||||||
SET_NBIT(0); \
|
|
||||||
src = src >> 1; \
|
|
||||||
SET_ZBIT_M(src);"},
|
|
||||||
{"mvn", SPECIAL_CASE,
|
|
||||||
"{ int dst_bank; int src_bank; dst_bank = fetch8 ( GET_PC)<<16; INC_PC(1); src_bank = fetch8 (GET_PC)<<16; INC_PC(1);\
|
|
||||||
do { store8 ( dst_bank + GET_X, fetch8 (src_bank + GET_Y)); SET_X(GET_X+1); SET_Y(GET_Y+1); SET_A((GET_A-1) & 0xffff); } while (GET_A != 0xffff);}"},
|
|
||||||
{"mvp", SPECIAL_CASE,
|
|
||||||
"{ int dst_bank; int src_bank; dst_bank = fetch8 ( GET_PBRPC)<<16; INC_PC(1); src_bank = fetch8 (GET_PBRPC)<<16; INC_PC(1);\
|
|
||||||
do { store8 ( dst_bank + GET_X, fetch8 (src_bank + GET_Y)); SET_X(GET_X-1); SET_Y(GET_Y-1); SET_A((GET_A-1) & 0xffff); } while (GET_A != 0xffff);}"},
|
|
||||||
|
|
||||||
{"nop", SPECIAL_CASE, ""},
|
|
||||||
{"ora", GET_M, "SET_A(GET_A | src); SET_NBIT_M(GET_A); SET_ZBIT_M(GET_A);"},
|
|
||||||
{"pea", PUSH_16, "src = fetch16(GET_PBRPC); INC_PC(2);"},
|
|
||||||
{"pei", PUSH_16, "src = fetch16(fetch8(GET_PBRPC) + GET_D); INC_PC(1);"},
|
|
||||||
{"per", PUSH_16, "src = fetch16(GET_PBRPC) + GET_PC+2; INC_PC(2);"},
|
|
||||||
{"pha", PUSH_M, "src = GET_A;"},
|
|
||||||
{"phb", PUSH_8, "src = GET_DBR_LOW;"},
|
|
||||||
{"phd", PUSH_16, "src = GET_DPR;"},
|
|
||||||
{"phk", PUSH_8, "src = GET_PBR_LOW;"},
|
|
||||||
{"php", PUSH_8, "src = GET_P;"},
|
|
||||||
{"phx", PUSH_X, "src = GET_X;"},
|
|
||||||
{"phy", PUSH_X, "src = GET_Y;"},
|
|
||||||
{"pla", POP_M, "SET_A( src); SET_NBIT_M(GET_A);SET_ZBIT_M(GET_A);"},
|
|
||||||
{"plb", POP_8, "SET_DBR_LOW(src);SET_NBIT_8(src); SET_ZBIT_8(src);"},
|
|
||||||
{"pld", POP_16, "SET_DPR(src);SET_NBIT_16(src); SET_ZBIT_16(src);"},
|
|
||||||
{"plp", POP_8, "SET_P(src); RETHINK;"},
|
|
||||||
{"plx", POP_X, "SET_X(src);SET_NBIT_X(src);SET_ZBIT_X(src);"},
|
|
||||||
{"ply", POP_X, "SET_Y(src);SET_NBIT_X(src);SET_ZBIT_X(src);"},
|
|
||||||
{"rep", COP_GET, "SET_P(GET_P & ~src); RETHINK;"},
|
|
||||||
{"rol", G2_GET, "src = (src << 1) | GET_CBIT; SET_CBIT((src >> (GET_MBIT ? 7 : 15)) &1); SET_ZBIT_M(src);"},
|
|
||||||
{"ror", G2_GET, "{ int t = src; src = (src>>1) | (GET_CBIT<<((GET_MBIT ? 8:16)-1));SET_NBIT_M(src);SET_ZBIT_M(src); SET_CBIT(t&1);}"},
|
|
||||||
{"rti", SPECIAL_CASE, "{ int t; POP16(t); SET_ONLY_PC(t); if (GET_E==0) { POP8(t); SET_PBR(t);} POP8(t);SET_P(t);}"},
|
|
||||||
{"rtl", SPECIAL_CASE, "{ int t; POP24(t); SET_PBRPC(t);}"},
|
|
||||||
{"rts", SPECIAL_CASE, "{ int t; POP16(t); SET_ONLY_PC(t);}"},
|
|
||||||
{"sbc", GET_M,
|
|
||||||
"{ int old_acc = GET_A & AMASK; int old_src = src & AMASK; src = old_acc - old_src - !GET_CBIT; SET_A(src);\
|
|
||||||
SET_CBIT(!(src>>(GET_MBIT?8:16) &1)); SET_VBIT_M(old_src,old_acc, src); SET_ZBIT_M(src); SET_NBIT_M(src);}"},
|
|
||||||
{"sec", SPECIAL_CASE, "SET_CBIT(1);"},
|
|
||||||
{"sed", SPECIAL_CASE, "SET_DBIT(1);"},
|
|
||||||
{"sei", SPECIAL_CASE, "SET_IBIT(1);"},
|
|
||||||
{"sep", COP_GET, "SET_P(GET_P | src);RETHINK;"},
|
|
||||||
{"sta", STORE_M, "src = GET_A;"},
|
|
||||||
{"stp", SPECIAL_CASE, "abort();"},
|
|
||||||
{"stx", STORE_X, "src = GET_X;"},
|
|
||||||
{"sty", STORE_X, "src = GET_Y;"},
|
|
||||||
{"stz", STORE_M, "src = 0;"},
|
|
||||||
{"tax", SPECIAL_CASE, "SET_X(GET_A); SET_NBIT_X(GET_A);SET_ZBIT_X(GET_A);"},
|
|
||||||
{"tay", SPECIAL_CASE, "SET_Y(GET_A); SET_NBIT_X(GET_A);SET_ZBIT_X(GET_A);"},
|
|
||||||
{"tcd", SPECIAL_CASE, "SET_DPR(GET_A); SET_NBIT_X(GET_A); SET_ZBIT_X(GET_A);"},
|
|
||||||
{"tcs", SPECIAL_CASE, "SET_S(GET_A);"},
|
|
||||||
{"tdc", SPECIAL_CASE, "SET_A(GET_DPR); SET_NBIT_M(GET_A); SET_ZBIT_M(GET_A);"},
|
|
||||||
{"trb", G2_GET, "SET_ZBIT_M(src & GET_A); src = src & ~GET_A; "},
|
|
||||||
{"tsb", G2_GET, "SET_ZBIT_M(src & GET_A); src = src | GET_A;"},
|
|
||||||
{"tsc", SPECIAL_CASE, "SET_A(GET_S); SET_NBIT_16(GET_A); SET_ZBIT_16(GET_A);"},
|
|
||||||
{"tsx", SPECIAL_CASE, "SET_X(GET_S); SET_NBIT_X(GET_X); SET_ZBIT_X(GET_X);"},
|
|
||||||
{"txa", SPECIAL_CASE, "SET_A(GET_X); SET_NBIT_M(GET_A); SET_ZBIT_M(GET_A);"},
|
|
||||||
{"txs", SPECIAL_CASE, "SET_S(GET_X);"},
|
|
||||||
{"txy", SPECIAL_CASE, "SET_Y(GET_X); SET_NBIT_X(GET_Y); SET_ZBIT_X(GET_Y);"},
|
|
||||||
{"tya", SPECIAL_CASE, "SET_A(GET_Y); SET_NBIT_M(GET_A); SET_ZBIT_M(GET_A);"},
|
|
||||||
{"tyx", SPECIAL_CASE, "SET_X(GET_Y); SET_NBIT_X(GET_X); SET_ZBIT_X(GET_X);"},
|
|
||||||
{"wai", SPECIAL_CASE, "wai();INC_PC(-1);"},
|
|
||||||
{"wdm", SPECIAL_CASE, "SET_A(wdm(GET_A, GET_X));"},
|
|
||||||
{"xba", SPECIAL_CASE,
|
|
||||||
"if (GET_XBIT==0) { SET_A(((GET_A >> 8) & 0xff) | ((GET_A & 0xff)<<8));} else { int t = GET_A; SET_A(GET_B); SET_B(t);}; SET_NBIT_8(GET_A); SET_ZBIT_8(GET_A);"},
|
|
||||||
{"xce", SPECIAL_CASE, "{ int t = GET_E; SET_E(GET_CBIT); SET_CBIT(GET_E);if (GET_E) { SET_MBIT(1); SET_XBIT(1);}}; goto top;"},
|
|
||||||
0};
|
|
||||||
|
|
||||||
struct ainfo alist[] =
|
|
||||||
{
|
|
||||||
{"#a", "IMMTOA", "#$0", "M==0 ? 2:1", "M==0 ? %sR_W65_ABS16 : %sR_W65_ABS8", "lval = GET_PBRPC; INC_PC(GET_MBIT ? 1:2); ", 0},
|
|
||||||
{"#c", "IMMCOP", "#$0", "1", "%sR_W65_ABS8", "lval = GET_PBRPC; INC_PC(1); ", 0},
|
|
||||||
{"#i", "IMMTOI", "#$0", "X==0 ? 2:1", "X==0 ? %sR_W65_ABS16 : %sR_W65_ABS8", "lval = GET_PBRPC; INC_PC(GET_XBIT ? 1:2);", 0},
|
|
||||||
{"A", "ACC", "a", "0", 0, "*FAIL**", 0},
|
|
||||||
{"r", "PC_REL", "$0", "1", "%sR_W65_PCR8", "lval = GET_PBR_HIGH + (0xffff &(fetch8sext(GET_PBRPC) + GET_PC + 1)); INC_PC(1);", 0},
|
|
||||||
{"rl", "PC_REL_LONG", "$0", "2", "%sR_W65_PCR16", "lval = GET_PBR_HIGH + (0xffff & (fetch16 (GET_PBRPC) + GET_PC + 2)); INC_PC(2);", 0},
|
|
||||||
{"i", "IMPLIED", "", "0", "", 0},
|
|
||||||
{"s", "STACK", "", "0", "", 0},
|
|
||||||
{"d", "DIR", "<$0", "1", "%sR_W65_ABS8", "lval = fetch8(GET_PBRPC) + GET_D; INC_PC(1);", 1},
|
|
||||||
{"d,x", "DIR_IDX_X", "<$0,x", "1", "%sR_W65_ABS8", "lval = fetch8(GET_PBRPC) + GET_X+ GET_D; INC_PC(1);", 1},
|
|
||||||
{"d,y", "DIR_IDX_Y", "<$0,y", "1", "%sR_W65_ABS8", "lval = fetch8(GET_PBRPC) + GET_Y + GET_D; INC_PC(1);", 1},
|
|
||||||
{"(d)", "DIR_IND", "(<$0)", "1", "%sR_W65_ABS8", "lval = GET_DBR_HIGH + (0xffff & fetch16(fetch8(GET_PBRPC) + GET_D));INC_PC(1);",1},
|
|
||||||
{"(d,x)", "DIR_IDX_IND_X", "(<$0,x)", "1", "%sR_W65_ABS8", "lval = GET_DBR_HIGH + (0xffff & (fetch8 (GET_PBRPC) + GET_D + GET_X)) ; INC_PC(1);",1},
|
|
||||||
{"(d),y", "DIR_IND_IDX_Y", "(<$0),y", "1", "%sR_W65_ABS8", "lval = fetch16(fetch8(GET_PBRPC) + GET_D) + GET_Y + GET_DBR_HIGH;INC_PC(1);",1},
|
|
||||||
{"[d]", "DIR_IND_LONG", "[$0]", "1", "%sR_W65_ABS8", "lval = fetch24(GET_D + fetch8(GET_PBRPC));INC_PC(1);",1},
|
|
||||||
|
|
||||||
{"[d],y", "DIR_IND_IDX_Y_LONG", "[$0],y", "1", "%sR_W65_ABS8", "lval = fetch24(fetch8(GET_PBRPC) + GET_D) + GET_Y;INC_PC(1);",1},
|
|
||||||
|
|
||||||
{"a", "ABS", "!$0", "2", "%sR_W65_ABS16", "lval = fetch16(GET_PBRPC) + GET_DBR_HIGH; INC_PC(2) ; ",1},
|
|
||||||
{"a,x", "ABS_IDX_X", "!$0,x", "2", "%sR_W65_ABS16", "lval = fetch16(GET_PBRPC) + GET_DBR_HIGH + GET_X; INC_PC(2); ",1},
|
|
||||||
{"a,y", "ABS_IDX_Y", "!$0,y", "2", "%sR_W65_ABS16", "lval = fetch16(GET_PBRPC) + GET_DBR_HIGH + GET_Y; INC_PC(2); ", 1},
|
|
||||||
{"al", "ABS_LONG", ">$0", "3", "%sR_W65_ABS24", "lval = fetch24(GET_PBRPC); INC_PC(3);\nl=1;\n", 1},
|
|
||||||
{"[a]", "ABS_IND_LONG", "[>$0]", "2", "%sR_W65_ABS16", "lval = fetch24(fetch16(GET_PBRPC)); INC_PC(2);", 1},
|
|
||||||
{"al,x", "ABS_LONG_IDX_X", ">$0,x", "3", "%sR_W65_ABS24", "lval = fetch24(GET_PBRPC) + GET_X; INC_PC(3);", 1},
|
|
||||||
{"d,s", "STACK_REL", "$0,s", "1", "%sR_W65_ABS8", "lval = fetch8(GET_PBRPC) + GET_S; INC_PC(1);", 0},
|
|
||||||
{"(d,s),y", "STACK_REL_INDX_IDX", "($0,s),y", "1", "%sR_W65_ABS8", "lval = fetch16(fetch8(GET_PBRPC) + GET_S) + GET_DBR_HIGH + GET_Y;INC_PC(1);",0},
|
|
||||||
{"(a)", "ABS_IND", "($0)", "2", "%sR_W65_ABS16", "lval = fetch16(GET_PBRPC) + GET_DBR_HIGH; INC_PC(2);", 1},
|
|
||||||
{"(a,x)", "ABS_IND_IDX", "($0,x)", "2", "%sR_W65_ABS16",
|
|
||||||
"lval = fetch16((0xffff & (fetch16(GET_PBRPC) + GET_X )) + GET_PBR_HIGH) + GET_PBR_HIGH;INC_PC(2);",1},
|
|
||||||
{"xyz", "BLOCK_MOVE", "", "2", "", 0},
|
|
||||||
0};
|
|
||||||
|
|
||||||
|
|
||||||
struct opinfo optable[257] =
|
|
||||||
{
|
|
||||||
{0x00, "brk", "s"},
|
|
||||||
{0x01, "ora", "(d,x)"},
|
|
||||||
{0x02, "cop", "#c"},
|
|
||||||
{0x03, "ora", "d,s"},
|
|
||||||
{0x04, "tsb", "d"},
|
|
||||||
{0x05, "ora", "d"},
|
|
||||||
{0x06, "asl", "d"},
|
|
||||||
{0x07, "ora", "[d]"},
|
|
||||||
{0x08, "php", "s"},
|
|
||||||
{0x09, "ora", "#a"},
|
|
||||||
{0x0a, "asl", "A"},
|
|
||||||
{0x0b, "phd", "s"},
|
|
||||||
{0x0c, "tsb", "a"},
|
|
||||||
{0x0d, "ora", "a"},
|
|
||||||
{0x0e, "asl", "a"},
|
|
||||||
{0x0f, "ora", "al"},
|
|
||||||
{0x10, "bpl", "r"},
|
|
||||||
{0x11, "ora", "(d),y"},
|
|
||||||
{0x12, "ora", "(d)"},
|
|
||||||
{0x13, "ora", "(d,s),y"},
|
|
||||||
{0x14, "trb", "d"},
|
|
||||||
{0x15, "ora", "d,x"},
|
|
||||||
{0x16, "asl", "d,x"},
|
|
||||||
{0x17, "ora", "[d],y"},
|
|
||||||
{0x18, "clc", "i"},
|
|
||||||
{0x19, "ora", "a,y"},
|
|
||||||
{0x1a, "inc", "A"},
|
|
||||||
{0x1b, "tcs", "i"},
|
|
||||||
{0x1c, "trb", "a"},
|
|
||||||
{0x1d, "ora", "a,x"},
|
|
||||||
{0x1e, "asl", "a,x"},
|
|
||||||
{0x1f, "ora", "al,x"},
|
|
||||||
{0x20, "jsr", "a"},
|
|
||||||
{0x21, "and", "(d,x)"},
|
|
||||||
{0x22, "jsr", "al"},
|
|
||||||
{0x23, "and", "d,s"},
|
|
||||||
{0x24, "bit", "(d)"},
|
|
||||||
{0x25, "and", "d"},
|
|
||||||
{0x26, "rol", "d"},
|
|
||||||
{0x27, "and", "[d]"},
|
|
||||||
{0x28, "plp", "s"},
|
|
||||||
{0x29, "and", "#a"},
|
|
||||||
{0x2a, "rol", "A"},
|
|
||||||
{0x2b, "pld", "s"},
|
|
||||||
{0x2c, "bit", "a"},
|
|
||||||
{0x2d, "and", "a"},
|
|
||||||
{0x2e, "rol", "a"},
|
|
||||||
{0x2f, "and", "al"},
|
|
||||||
{0x30, "bmi", "r"},
|
|
||||||
{0x31, "and", "(d),y"},
|
|
||||||
{0x32, "and", "(d)"},
|
|
||||||
{0x33, "and", "(d,s),y"},
|
|
||||||
{0x34, "bit", "(d,x)"},
|
|
||||||
{0x35, "and", "d,x"},
|
|
||||||
{0x36, "rol", "d,x"},
|
|
||||||
{0x37, "and", "[d],y"},
|
|
||||||
{0x38, "sec", "i"},
|
|
||||||
{0x39, "and", "a,y"},
|
|
||||||
{0x3a, "dec", "A"},
|
|
||||||
{0x3b, "tsc", "i"},
|
|
||||||
{0x3c, "bit", "a,x"},
|
|
||||||
{0x3d, "and", "a,x"},
|
|
||||||
{0x3e, "rol", "a,x"},
|
|
||||||
{0x3f, "and", "al,x"},
|
|
||||||
{0x40, "rti", "s"},
|
|
||||||
{0x41, "eor", "(d,x)"},
|
|
||||||
{0x42, "wdm", "i"},
|
|
||||||
{0x43, "eor", "d,s"},
|
|
||||||
{0x44, "mvp", "xyz"},
|
|
||||||
{0x45, "eor", "d"},
|
|
||||||
{0x46, "lsr", "d"},
|
|
||||||
{0x47, "eor", "[d]"},
|
|
||||||
{0x48, "pha", "s"},
|
|
||||||
{0x49, "eor", "#a"},
|
|
||||||
{0x4a, "lsr", "A"},
|
|
||||||
{0x4b, "phk", "s"},
|
|
||||||
{0x4c, "jmp", "a"},
|
|
||||||
{0x4d, "eor", "a"},
|
|
||||||
{0x4e, "lsr", "a"},
|
|
||||||
{0x4f, "eor", "al"},
|
|
||||||
{0x50, "bvc", "r"},
|
|
||||||
{0x51, "eor", "(d),y"},
|
|
||||||
{0x52, "eor", "(d)"},
|
|
||||||
{0x53, "eor", "(d,s),y"},
|
|
||||||
{0x54, "mvn", "xyz"},
|
|
||||||
{0x55, "eor", "d,x"},
|
|
||||||
{0x56, "lsr", "d,x"},
|
|
||||||
{0x57, "eor", "[d],y"},
|
|
||||||
{0x58, "cli", "i"},
|
|
||||||
{0x59, "eor", "a,y"},
|
|
||||||
{0x5a, "phy", "s"},
|
|
||||||
{0x5b, "tcd", "i"},
|
|
||||||
{0x5c, "jmp", "al"},
|
|
||||||
{0x5d, "eor", "a,x"},
|
|
||||||
{0x5e, "lsr", "a,x"},
|
|
||||||
{0x5f, "eor", "al,x"},
|
|
||||||
{0x60, "rts", "s"},
|
|
||||||
{0x61, "adc", "(d,x)"},
|
|
||||||
{0x62, "per", "rl"},
|
|
||||||
{0x63, "adc", "d,s"},
|
|
||||||
{0x64, "stz", "d"},
|
|
||||||
{0x65, "adc", "d"},
|
|
||||||
{0x66, "ror", "d"},
|
|
||||||
{0x67, "adc", "[d]"},
|
|
||||||
{0x68, "pla", "s"},
|
|
||||||
{0x69, "adc", "#a"},
|
|
||||||
{0x6a, "ror", "A"},
|
|
||||||
{0x6b, "rtl", "s"},
|
|
||||||
{0x6c, "jmp", "(a)"},
|
|
||||||
{0x6d, "adc", "a"},
|
|
||||||
{0x6e, "ror", "a"},
|
|
||||||
{0x6f, "adc", "al"},
|
|
||||||
{0x70, "bvs", "r"},
|
|
||||||
{0x71, "adc", "(d),y"},
|
|
||||||
{0x72, "adc", "(d)"},
|
|
||||||
{0x73, "adc", "(d,s),y"},
|
|
||||||
{0x74, "stz", "d,x"},
|
|
||||||
{0x75, "adc", "d,x"},
|
|
||||||
{0x76, "ror", "d,x"},
|
|
||||||
{0x77, "adc", "[d],y"},
|
|
||||||
{0x78, "sei", "i"},
|
|
||||||
{0x79, "adc", "a,y"},
|
|
||||||
{0x7a, "ply", "s"},
|
|
||||||
{0x7b, "tdc", "i"},
|
|
||||||
{0x7c, "jmp", "(a,x)"},
|
|
||||||
{0x7d, "adc", "a,x"},
|
|
||||||
{0x7e, "ror", "a,x"},
|
|
||||||
{0x7f, "adc", "al,x"},
|
|
||||||
{0x80, "bra", "r"},
|
|
||||||
{0x81, "sta", "(d,x)"},
|
|
||||||
{0x82, "brl", "rl"},
|
|
||||||
{0x83, "sta", "d,s"},
|
|
||||||
{0x84, "sty", "d"},
|
|
||||||
{0x85, "sta", "d"},
|
|
||||||
{0x86, "stx", "d"},
|
|
||||||
{0x87, "sta", "[d]"},
|
|
||||||
{0x88, "dey", "i"},
|
|
||||||
{0x89, "bit", "#a"},
|
|
||||||
{0x8a, "txa", "i"},
|
|
||||||
{0x8b, "phb", "s"},
|
|
||||||
{0x8c, "sty", "a"},
|
|
||||||
{0x8d, "sta", "a"},
|
|
||||||
{0x8e, "stx", "a"},
|
|
||||||
{0x8f, "sta", "al"},
|
|
||||||
{0x90, "bcc", "r"},
|
|
||||||
{0x91, "sta", "(d),y"},
|
|
||||||
{0x92, "sta", "(d)"},
|
|
||||||
{0x93, "sta", "(d,s),y"},
|
|
||||||
{0x94, "sty", "d,x"},
|
|
||||||
{0x95, "sta", "d,x"},
|
|
||||||
{0x96, "stx", "d,x"},
|
|
||||||
{0x97, "sta", "[d],y"},
|
|
||||||
{0x98, "tya", "i"},
|
|
||||||
{0x99, "sta", "a,y"},
|
|
||||||
{0x9a, "txs", "i"},
|
|
||||||
{0x9b, "txy", "i"},
|
|
||||||
{0x9c, "stz", "a"},
|
|
||||||
{0x9d, "sta", "a,x"},
|
|
||||||
{0x9e, "stz", "a,x"},
|
|
||||||
{0x9f, "sta", "al,x"},
|
|
||||||
{0xa0, "ldy", "#i"},
|
|
||||||
{0xa1, "lda", "(d,x)"},
|
|
||||||
{0xa2, "ldx", "#i"},
|
|
||||||
{0xa3, "lda", "d,s"},
|
|
||||||
{0xa4, "ldy", "d"},
|
|
||||||
{0xa5, "lda", "d"},
|
|
||||||
{0xa6, "ldx", "d"},
|
|
||||||
{0xa7, "lda", "[d]"},
|
|
||||||
{0xa8, "tay", "i"},
|
|
||||||
{0xa9, "lda", "#a"},
|
|
||||||
{0xaa, "tax", "i"},
|
|
||||||
{0xab, "plb", "s"},
|
|
||||||
{0xac, "ldy", "a"},
|
|
||||||
{0xad, "lda", "a"},
|
|
||||||
{0xae, "ldx", "a"},
|
|
||||||
{0xaf, "lda", "al"},
|
|
||||||
{0xb0, "bcs", "r"},
|
|
||||||
{0xb1, "lda", "(d),y"},
|
|
||||||
{0xb2, "lda", "(d)"},
|
|
||||||
{0xb3, "lda", "(d,s),y"},
|
|
||||||
{0xb4, "ldy", "d,x"},
|
|
||||||
{0xb5, "lda", "d,x"},
|
|
||||||
{0xb6, "ldx", "d,y"},
|
|
||||||
{0xb7, "lda", "[d],y"},
|
|
||||||
{0xb8, "clv", "i"},
|
|
||||||
{0xb9, "lda", "a,y"},
|
|
||||||
{0xba, "tsx", "i"},
|
|
||||||
{0xbb, "tyx", "i"},
|
|
||||||
{0xbc, "ldy", "a,x"},
|
|
||||||
{0xbd, "lda", "a,x"},
|
|
||||||
{0xbe, "ldx", "a,y"},
|
|
||||||
{0xbf, "lda", "al,x"},
|
|
||||||
{0xc0, "cpy", "#i"},
|
|
||||||
{0xc1, "cmp", "(d,x)"},
|
|
||||||
{0xc2, "rep", "#c"},
|
|
||||||
{0xc3, "cmp", "d,s"},
|
|
||||||
{0xc4, "cpy", "d"},
|
|
||||||
{0xc5, "cmp", "d"},
|
|
||||||
{0xc6, "dec", "d"},
|
|
||||||
{0xc7, "cmp", "[d]"},
|
|
||||||
{0xc8, "iny", "i"},
|
|
||||||
{0xc9, "cmp", "#a"},
|
|
||||||
{0xca, "dex", "i"},
|
|
||||||
{0xcb, "wai", "i"},
|
|
||||||
{0xcc, "cpy", "a"},
|
|
||||||
{0xcd, "cmp", "a"},
|
|
||||||
{0xce, "dec", "a"},
|
|
||||||
{0xcf, "cmp", "al"},
|
|
||||||
{0xd0, "bne", "r"},
|
|
||||||
{0xd1, "cmp", "(d),y"},
|
|
||||||
{0xd2, "cmp", "(d)"},
|
|
||||||
{0xd3, "cmp", "(d,s),y"},
|
|
||||||
{0xd4, "pei", "d"},
|
|
||||||
{0xd5, "cmp", "d,x"},
|
|
||||||
{0xd6, "dec", "d,x"},
|
|
||||||
{0xd7, "cmp", "[d],y"},
|
|
||||||
{0xd8, "cld", "i"},
|
|
||||||
{0xd9, "cmp", "a,y"},
|
|
||||||
{0xda, "phx", "s"},
|
|
||||||
{0xdb, "stp", "i"},
|
|
||||||
{0xdc, "jmp", "[a]"},
|
|
||||||
{0xdd, "cmp", "a,x"},
|
|
||||||
{0xde, "dec", "a,x"},
|
|
||||||
{0xdf, "cmp", "al,x"},
|
|
||||||
{0xe0, "cpx", "#i"},
|
|
||||||
{0xe1, "sbc", "(d,x)"},
|
|
||||||
{0xe2, "sep", "#c"},
|
|
||||||
{0xe3, "sbc", "d,s"},
|
|
||||||
{0xe4, "cpx", "d"},
|
|
||||||
{0xe5, "sbc", "d"},
|
|
||||||
{0xe6, "inc", "d"},
|
|
||||||
{0xe7, "sbc", "[d]"},
|
|
||||||
{0xe8, "inx", "i"},
|
|
||||||
{0xe9, "sbc", "#a"},
|
|
||||||
{0xea, "nop", "i"},
|
|
||||||
{0xeb, "xba", "i"},
|
|
||||||
{0xec, "cpx", "a"},
|
|
||||||
{0xed, "sbc", "a"},
|
|
||||||
{0xee, "inc", "a"},
|
|
||||||
{0xef, "sbc", "al"},
|
|
||||||
{0xf0, "beq", "r"},
|
|
||||||
{0xf1, "sbc", "(d),y"},
|
|
||||||
{0xf2, "sbc", "(d)"},
|
|
||||||
{0xf3, "sbc", "(d,s),y"},
|
|
||||||
{0xf4, "pea", "a"},
|
|
||||||
{0xf5, "sbc", "d,x"},
|
|
||||||
{0xf6, "inc", "d,x"},
|
|
||||||
{0xf7, "sbc", "[d],y"},
|
|
||||||
{0xf8, "sed", "i"},
|
|
||||||
{0xf9, "sbc", "a,y"},
|
|
||||||
{0xfa, "plx", "s"},
|
|
||||||
{0xfb, "xce", "i"},
|
|
||||||
{0xfc, "jsr", "(a,x)"},
|
|
||||||
{0xfd, "sbc", "a,x"},
|
|
||||||
{0xfe, "inc", "a,x"},
|
|
||||||
{0xff, "sbc", "al,x"},
|
|
||||||
0};
|
|
||||||
|
|
||||||
|
|
||||||
int pfunc(a,b)
|
|
||||||
struct opinfo *a;
|
|
||||||
struct opinfo *b;
|
|
||||||
{
|
|
||||||
return strcmp(a->mode, b->mode);
|
|
||||||
|
|
||||||
}
|
|
||||||
static void
|
|
||||||
dump_table ()
|
|
||||||
{
|
|
||||||
int x;
|
|
||||||
int y;
|
|
||||||
printf (" |");
|
|
||||||
for (x = 0; x < 16; x++)
|
|
||||||
{
|
|
||||||
printf (" %x |", x);
|
|
||||||
}
|
|
||||||
printf ("\n");
|
|
||||||
printf (" |");
|
|
||||||
for (x = 0; x < 16; x++)
|
|
||||||
{
|
|
||||||
printf ("-------|");
|
|
||||||
}
|
|
||||||
printf ("\n");
|
|
||||||
|
|
||||||
for (y = 0; y < 16; y++)
|
|
||||||
{
|
|
||||||
printf ("%x |", y);
|
|
||||||
for (x = 0; x < 16; x++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = &optable[y * 16 + x];
|
|
||||||
if (p->opcode)
|
|
||||||
{
|
|
||||||
printf ("%-7s", p->opcode);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("*******");
|
|
||||||
}
|
|
||||||
printf ("|");
|
|
||||||
}
|
|
||||||
printf ("\n");
|
|
||||||
printf (" |");
|
|
||||||
|
|
||||||
for (x = 0; x < 16; x++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = &optable[y * 16 + x];
|
|
||||||
if (p->mode)
|
|
||||||
{
|
|
||||||
printf ("%-7s", p->mode);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("*******");
|
|
||||||
}
|
|
||||||
printf ("|");
|
|
||||||
}
|
|
||||||
printf ("\n");
|
|
||||||
printf (" |");
|
|
||||||
for (x = 0; x < 16; x++)
|
|
||||||
{
|
|
||||||
printf ("-------|");
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
printf ("\n");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
dt ()
|
|
||||||
{
|
|
||||||
#if 0
|
|
||||||
int i;
|
|
||||||
for (i = 0; i < 256; i++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = &optable[i];
|
|
||||||
printf ("/* %02x */ ", i);
|
|
||||||
if (p->opcode)
|
|
||||||
printf ("{\"%s\",\"%s\",%d,%d},", p->opcode->name, p->addr->name);
|
|
||||||
|
|
||||||
printf ("\n");
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
}
|
|
||||||
static
|
|
||||||
void
|
|
||||||
init_table ()
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
for (i = 0; i < 256; i++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = optable + i;
|
|
||||||
struct ainfo *a;
|
|
||||||
struct oinfo *o;
|
|
||||||
for (a = alist; a->name; a++)
|
|
||||||
{
|
|
||||||
if (strcmp (a->name, p->mode) == 0)
|
|
||||||
{
|
|
||||||
p->ai = a;
|
|
||||||
goto done;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
printf ("bad %x\n", i);
|
|
||||||
done:;
|
|
||||||
for (o = olist; o->name; o++)
|
|
||||||
{
|
|
||||||
if (strcmp (o->name, p->opcode) == 0)
|
|
||||||
{
|
|
||||||
p->oi = o;
|
|
||||||
goto doneo;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
printf ("bad %x\n", i);
|
|
||||||
doneo:;
|
|
||||||
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Dump the opcodes sorted by name */
|
|
||||||
static
|
|
||||||
void
|
|
||||||
assembler_table (as)
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
struct oinfo *o;
|
|
||||||
struct ainfo *a;
|
|
||||||
int n = 0;
|
|
||||||
/* Step through the sorted list of opnames */
|
|
||||||
printf (" /* WDC 65816 Assembler opcode table */\n");
|
|
||||||
printf (" /* (generated by the program sim/w65/gencode -a) */\n");
|
|
||||||
|
|
||||||
for (a = alist; a->name; a++)
|
|
||||||
{
|
|
||||||
printf ("#define ADDR_%-20s%d\t /* %-7s */\n", a->enumname, ++n, a->name);
|
|
||||||
}
|
|
||||||
|
|
||||||
printf ("struct opinfo {\n\tint val;\n\tint code;\n\tchar *name;\n\tint amode;\n};\n");
|
|
||||||
|
|
||||||
printf ("struct opinfo optable[257]={\n");
|
|
||||||
if (as)
|
|
||||||
{
|
|
||||||
i = 1;
|
|
||||||
for (o = olist; o->name; o++)
|
|
||||||
{
|
|
||||||
printf ("#define O_%s %d\n", o->name, i++);
|
|
||||||
}
|
|
||||||
|
|
||||||
qsort (optable, 256, sizeof (struct opinfo), pfunc);
|
|
||||||
|
|
||||||
printf ("#ifdef DEFINE_TABLE\n");
|
|
||||||
for (o = olist; o->name; o++)
|
|
||||||
{
|
|
||||||
|
|
||||||
for (i = 0; i < 256; i++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = optable + i;
|
|
||||||
|
|
||||||
if (p->oi == o)
|
|
||||||
{
|
|
||||||
/* This opcode is of the right name */
|
|
||||||
printf ("\t{0x%02X,\tO_%s,\t\"%s\",\tADDR_%s},\n", p->code, p->oi->name, p->oi->name, p->ai->enumname);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
for (i = 0; i < 256; i++)
|
|
||||||
{
|
|
||||||
struct opinfo *p = optable + i;
|
|
||||||
printf ("\t{0x%02X,\t\"%s\",\tADDR_%s},\n", i, p->oi->name, p->ai->enumname);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
printf ("0};\n");
|
|
||||||
printf ("#endif\n");
|
|
||||||
|
|
||||||
|
|
||||||
/* Generate the operand disassembly case list */
|
|
||||||
|
|
||||||
printf ("#define DISASM()\\\n");
|
|
||||||
{
|
|
||||||
struct ainfo *a;
|
|
||||||
for (a = alist; a->name; a++)
|
|
||||||
{
|
|
||||||
printf (" case ADDR_%s:\\\n\t", a->enumname);
|
|
||||||
if (strcmp (a->enumname, "BLOCK_MOVE") == 0)
|
|
||||||
{
|
|
||||||
printf ("args[0] = (asR_W65_ABS16 >>8) &0xff;\\\n");
|
|
||||||
printf ("\targs[1] = ( asR_W65_ABS16 & 0xff);\\\n");
|
|
||||||
printf ("\tprint_operand (0,\"\t$0,$1\",args);\\\n");
|
|
||||||
}
|
|
||||||
else if (a->reloc0 == 0)
|
|
||||||
{
|
|
||||||
printf ("print_operand (0, \"\t%s\", 0);\\\n", a->disasmstring );
|
|
||||||
}
|
|
||||||
else if (strlen (a->reloc0))
|
|
||||||
{
|
|
||||||
printf ("args[0] = ");
|
|
||||||
printf (a->reloc0, "as","as");
|
|
||||||
printf (";\\\n");
|
|
||||||
printf ("\tprint_operand (%d, \"\t%s\", args);\\\n",
|
|
||||||
a->regflag,
|
|
||||||
a->disasmstring);
|
|
||||||
}
|
|
||||||
|
|
||||||
printf ("\tsize += %s;\\\n\tbreak;\\\n", a->sizer);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
printf ("\n");
|
|
||||||
|
|
||||||
/* Generate the operand size and type case list */
|
|
||||||
|
|
||||||
printf ("#define GETINFO(size,type,pcrel)\\\n");
|
|
||||||
{
|
|
||||||
struct ainfo *a;
|
|
||||||
for (a = alist; a->name; a++)
|
|
||||||
{
|
|
||||||
printf ("\tcase ADDR_%s: ", a->enumname);
|
|
||||||
printf ("size = %s;type=", a->sizer);
|
|
||||||
if (a->reloc0 && strlen (a->reloc0))
|
|
||||||
{
|
|
||||||
printf (a->reloc0, "", "");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
printf ("-1");
|
|
||||||
printf (";pcrel=%d;", a->name[0] == 'P');
|
|
||||||
printf ("break;\\\n");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
printf ("\n");
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/* Write out examples of each opcode */
|
|
||||||
static
|
|
||||||
void
|
|
||||||
test_table ()
|
|
||||||
{
|
|
||||||
struct opinfo *o;
|
|
||||||
for (o = optable; o->opcode; o++)
|
|
||||||
{
|
|
||||||
printf ("\t%s\t", o->opcode);
|
|
||||||
printf (o->ai->disasmstring, 0x6543210, 0x6543210);
|
|
||||||
printf ("\n");
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
op_table ()
|
|
||||||
{
|
|
||||||
struct opinfo *o;
|
|
||||||
int i = 0;
|
|
||||||
/* Write four optables, M=0,1 X=0,1 */
|
|
||||||
|
|
||||||
for (o = optable; o->opcode; o++)
|
|
||||||
{
|
|
||||||
printf ("{0x%02x, \"%s\", \"%s\"\t},\n",
|
|
||||||
i++,
|
|
||||||
o->opcode,
|
|
||||||
o->mode);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int worked_out_lval;
|
|
||||||
static void
|
|
||||||
genfetch (amode, size)
|
|
||||||
struct ainfo *amode;
|
|
||||||
int size;
|
|
||||||
{
|
|
||||||
if (amode->howlval)
|
|
||||||
{
|
|
||||||
if (strcmp (amode->name, "A") == 0)
|
|
||||||
{
|
|
||||||
/* Can't get the lval for the accumulator */
|
|
||||||
printf ("src = GET_A;\n");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("%s\n", amode->howlval);
|
|
||||||
worked_out_lval = 1;
|
|
||||||
if (size == 0)
|
|
||||||
{
|
|
||||||
printf ("src = fetch16 (lval);\n");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("src = fetch8 (lval);\n");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
genstore (amode, size)
|
|
||||||
struct ainfo *amode;
|
|
||||||
int size;
|
|
||||||
{
|
|
||||||
if (amode->howlval)
|
|
||||||
{
|
|
||||||
if (strcmp (amode->name, "A") == 0)
|
|
||||||
{
|
|
||||||
/* Can't get the lval for the accumulator */
|
|
||||||
printf ("SET_A (src);\n");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
if (!worked_out_lval)
|
|
||||||
printf ("%s\n", amode->howlval);
|
|
||||||
if (size == 0)
|
|
||||||
{
|
|
||||||
printf ("store16(lval, src);\n");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("store8(lval, src);\n");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
/* Generate the code to simulate the instructions */
|
|
||||||
static void
|
|
||||||
code_table ()
|
|
||||||
{
|
|
||||||
struct opinfo *o;
|
|
||||||
int x, m;
|
|
||||||
printf("#include \"interp.h\"\n");
|
|
||||||
|
|
||||||
for (x = 0; x < 2; x++) {
|
|
||||||
for (m = 0; m < 2; m++) {
|
|
||||||
printf("ifunc_X%d_M%d() {\n",x,m);
|
|
||||||
printf("#undef GET_MBIT\n");
|
|
||||||
printf("#undef GET_XBIT\n");
|
|
||||||
printf("#define GET_XBIT %d\n", x);
|
|
||||||
printf("#define GET_MBIT %d\n", m);
|
|
||||||
printf("STARTFUNC();\n");
|
|
||||||
printf("do { register opcode = fetch8(GET_PBRPC); insts++; INC_PC(1);\n");
|
|
||||||
printf ("switch (opcode) {\n");
|
|
||||||
for (o = optable; o->opcode; o++)
|
|
||||||
{
|
|
||||||
printf (" /* %s %s */\n", o->opcode, o->ai->name);
|
|
||||||
printf ("case 0x%02x:\n", o->code);
|
|
||||||
printf ("{\n");
|
|
||||||
printf ("int l ;\n");
|
|
||||||
printf ("register int src;\n");
|
|
||||||
printf ("register int lval;\n");
|
|
||||||
worked_out_lval = 0;
|
|
||||||
switch (o->oi->howsrc)
|
|
||||||
{
|
|
||||||
case POP_M:
|
|
||||||
if (m == 0)
|
|
||||||
printf ("POP16 (src);");
|
|
||||||
else
|
|
||||||
printf ("POP8(src);");
|
|
||||||
break;
|
|
||||||
case POP_X:
|
|
||||||
if (x == 0)
|
|
||||||
printf ("POP16 (src);");
|
|
||||||
else
|
|
||||||
printf ("POP8 (src);");
|
|
||||||
break;
|
|
||||||
case POP_8:
|
|
||||||
printf ("POP8 (src);");
|
|
||||||
break;
|
|
||||||
case POP_16:
|
|
||||||
printf ("POP16 (src);");
|
|
||||||
break;
|
|
||||||
|
|
||||||
case STANDARD_PC_GET:
|
|
||||||
printf ("%s\n", o->ai->howlval);
|
|
||||||
break;
|
|
||||||
|
|
||||||
case GET_M:
|
|
||||||
genfetch (o->ai, m);
|
|
||||||
break;
|
|
||||||
case G2_GET:
|
|
||||||
genfetch (o->ai, m);
|
|
||||||
break;
|
|
||||||
case GET_X:
|
|
||||||
genfetch (o->ai, x);
|
|
||||||
break;
|
|
||||||
case BRANCH:
|
|
||||||
printf ("%s", o->ai->howlval);
|
|
||||||
break;
|
|
||||||
case COP_GET:
|
|
||||||
genfetch(o->ai,1);
|
|
||||||
break;
|
|
||||||
case STORE_X:
|
|
||||||
case STORE_M:
|
|
||||||
;
|
|
||||||
}
|
|
||||||
|
|
||||||
switch (o->oi->howsrc)
|
|
||||||
{
|
|
||||||
case BRANCH:
|
|
||||||
printf ("if (%s) { SET_ONLY_PC(lval);} ", o->oi->howto);
|
|
||||||
break;
|
|
||||||
case SPECIAL_CASE:
|
|
||||||
case GET_M:
|
|
||||||
case GET_X:
|
|
||||||
case STORE_X:
|
|
||||||
case STANDARD_PC_GET:
|
|
||||||
case G2_GET:
|
|
||||||
case PUSH_16:
|
|
||||||
case PUSH_8:
|
|
||||||
case PUSH_M:
|
|
||||||
case PUSH_X:
|
|
||||||
case POP_16:
|
|
||||||
case POP_8:
|
|
||||||
case POP_M:
|
|
||||||
case POP_X:
|
|
||||||
case COP_GET:
|
|
||||||
case STORE_M:
|
|
||||||
printf ("%s", o->oi->howto);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
switch (o->oi->howsrc)
|
|
||||||
{
|
|
||||||
case STORE_M:
|
|
||||||
genstore (o->ai, m);
|
|
||||||
break;
|
|
||||||
case STORE_X:
|
|
||||||
genstore (o->ai, x);
|
|
||||||
break;
|
|
||||||
case PUSH_M:
|
|
||||||
if (m == 0)
|
|
||||||
printf ("PUSH16 (src);");
|
|
||||||
else
|
|
||||||
printf ("PUSH8(src);");
|
|
||||||
break;
|
|
||||||
case PUSH_X:
|
|
||||||
if (x == 0)
|
|
||||||
printf ("PUSH16 (src);");
|
|
||||||
else
|
|
||||||
printf ("PUSH8 (src);");
|
|
||||||
break;
|
|
||||||
case PUSH_8:
|
|
||||||
printf ("PUSH8 (src);");
|
|
||||||
break;
|
|
||||||
case PUSH_16:
|
|
||||||
printf ("PUSH16 (src);");
|
|
||||||
break;
|
|
||||||
case G2_GET:
|
|
||||||
genstore (o->ai, x, m);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
printf ("}\n");
|
|
||||||
|
|
||||||
printf ("break;\n");
|
|
||||||
}
|
|
||||||
printf ("}\n}\n");
|
|
||||||
printf("while (!saved_state.exception);\n");
|
|
||||||
printf("#undef GET_MBIT\n");
|
|
||||||
printf("#undef GET_XBIT\n");
|
|
||||||
printf("#define GET_MBIT (the_mbit)\n");
|
|
||||||
printf("#define GET_XBIT (the_xbit)\n");
|
|
||||||
|
|
||||||
printf("ENDFUNC();\n");
|
|
||||||
printf("}");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
main (ac, av)
|
|
||||||
char **av;
|
|
||||||
{
|
|
||||||
init_table ();
|
|
||||||
|
|
||||||
if (ac > 1)
|
|
||||||
{
|
|
||||||
if (av[1][1] == 'a')
|
|
||||||
{
|
|
||||||
assembler_table (1);
|
|
||||||
}
|
|
||||||
if (av[1][1] == 't')
|
|
||||||
{
|
|
||||||
test_table ();
|
|
||||||
}
|
|
||||||
if (av[1][1] == 'o')
|
|
||||||
{
|
|
||||||
op_table ();
|
|
||||||
}
|
|
||||||
if (av[1][1] == 'c')
|
|
||||||
{
|
|
||||||
code_table ();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else
|
|
||||||
dump_table ();
|
|
||||||
|
|
||||||
dt ();
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
388
sim/w65/interp.c
388
sim/w65/interp.c
|
@ -1,388 +0,0 @@
|
||||||
/* Simulator for the WDC 65816 architecture.
|
|
||||||
|
|
||||||
Written by Steve Chamberlain of Cygnus Support.
|
|
||||||
sac@cygnus.com
|
|
||||||
|
|
||||||
This file is part of W65 sim
|
|
||||||
|
|
||||||
|
|
||||||
THIS SOFTWARE IS NOT COPYRIGHTED
|
|
||||||
|
|
||||||
Cygnus offers the following for use in the public domain. Cygnus
|
|
||||||
makes no warranty with regard to the software or it's performance
|
|
||||||
and the user accepts the software "AS IS" with all faults.
|
|
||||||
|
|
||||||
CYGNUS DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD TO
|
|
||||||
THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
||||||
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <signal.h>
|
|
||||||
#ifdef HAVE_STDLIB_H
|
|
||||||
#include <stdlib.h>
|
|
||||||
#endif
|
|
||||||
#ifdef HAVE_TIME_H
|
|
||||||
#include <time.h>
|
|
||||||
#endif
|
|
||||||
#ifdef HAVE_UNISTD_H
|
|
||||||
#include <unistd.h>
|
|
||||||
#endif
|
|
||||||
#include <sys/param.h>
|
|
||||||
#include "bfd.h"
|
|
||||||
#include "gdb/callback.h"
|
|
||||||
#include "gdb/remote-sim.h"
|
|
||||||
#include "../../newlib/libc/sys/w65/sys/syscall.h"
|
|
||||||
|
|
||||||
#include "interp.h"
|
|
||||||
|
|
||||||
saved_state_type saved_state;
|
|
||||||
|
|
||||||
int
|
|
||||||
get_now ()
|
|
||||||
{
|
|
||||||
return time ((long *) 0);
|
|
||||||
}
|
|
||||||
void
|
|
||||||
control_c (sig, code, scp, addr)
|
|
||||||
int sig;
|
|
||||||
int code;
|
|
||||||
char *scp;
|
|
||||||
char *addr;
|
|
||||||
{
|
|
||||||
saved_state.exception = SIGINT;
|
|
||||||
}
|
|
||||||
|
|
||||||
wai ()
|
|
||||||
{
|
|
||||||
saved_state.exception = SIGTRAP;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
wdm (acc, x)
|
|
||||||
int acc;
|
|
||||||
int x;
|
|
||||||
|
|
||||||
{
|
|
||||||
int cycles;
|
|
||||||
/* The x points to where the registers live, acc has code */
|
|
||||||
|
|
||||||
#define R(arg) (x + arg * 2)
|
|
||||||
unsigned R0 = R(0);
|
|
||||||
unsigned R4 = R(4);
|
|
||||||
unsigned R5 = R(5);
|
|
||||||
unsigned R6 = R(6);
|
|
||||||
unsigned R7 = R(7);
|
|
||||||
unsigned R8 = R(8);
|
|
||||||
unsigned char *memory = saved_state.memory;
|
|
||||||
int a1 = fetch16 (R (4));
|
|
||||||
switch (a1)
|
|
||||||
{
|
|
||||||
case SYS_write:
|
|
||||||
{
|
|
||||||
int file = fetch16 (R5);
|
|
||||||
unsigned char *buf = fetch24 (R6) + memory;
|
|
||||||
int len = fetch16 (R8);
|
|
||||||
int res = write (file, buf, len);
|
|
||||||
store16 (R0, res);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
case 0:
|
|
||||||
printf ("%c", acc);
|
|
||||||
fflush (stdout);
|
|
||||||
break;
|
|
||||||
case 1:
|
|
||||||
saved_state.exception = SIGTRAP;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
saved_state.exception = SIGILL;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_resume (step, insignal)
|
|
||||||
int step;
|
|
||||||
int insignal;
|
|
||||||
{
|
|
||||||
void (*prev) ();
|
|
||||||
register unsigned char *memory;
|
|
||||||
if (step)
|
|
||||||
{
|
|
||||||
saved_state.exception = SIGTRAP;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
saved_state.exception = 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
prev = signal (SIGINT, control_c);
|
|
||||||
do
|
|
||||||
{
|
|
||||||
int x = (saved_state.p >> 4) & 1;
|
|
||||||
int m = (saved_state.p >> 5) & 1;
|
|
||||||
if (x == 0 && m == 0)
|
|
||||||
{
|
|
||||||
ifunc_X0_M0 ();
|
|
||||||
}
|
|
||||||
else if (x == 0 && m == 1)
|
|
||||||
{
|
|
||||||
ifunc_X0_M1 ();
|
|
||||||
}
|
|
||||||
else if (x == 1 && m == 0)
|
|
||||||
{
|
|
||||||
ifunc_X1_M0 ();
|
|
||||||
}
|
|
||||||
else if (x == 1 && m == 1)
|
|
||||||
{
|
|
||||||
ifunc_X1_M1 ();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
while (saved_state.exception == 0);
|
|
||||||
|
|
||||||
signal (SIGINT, prev);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
init_pointers ()
|
|
||||||
{
|
|
||||||
if (!saved_state.memory)
|
|
||||||
{
|
|
||||||
saved_state.memory = calloc (64 * 1024, NUMSEGS);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_write (addr, buffer, size)
|
|
||||||
SIM_ADDR addr;
|
|
||||||
unsigned char *buffer;
|
|
||||||
int size;
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
init_pointers ();
|
|
||||||
|
|
||||||
for (i = 0; i < size; i++)
|
|
||||||
{
|
|
||||||
saved_state.memory[(addr + i) & MMASK] = buffer[i];
|
|
||||||
}
|
|
||||||
return size;
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_read (addr, buffer, size)
|
|
||||||
SIM_ADDR addr;
|
|
||||||
unsigned char *buffer;
|
|
||||||
int size;
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
|
|
||||||
init_pointers ();
|
|
||||||
|
|
||||||
for (i = 0; i < size; i++)
|
|
||||||
{
|
|
||||||
buffer[i] = saved_state.memory[(addr + i) & MMASK];
|
|
||||||
}
|
|
||||||
return size;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
struct
|
|
||||||
{
|
|
||||||
unsigned int *ptr;
|
|
||||||
int size;
|
|
||||||
}
|
|
||||||
rinfo[] =
|
|
||||||
|
|
||||||
{
|
|
||||||
&saved_state.r[0], 2,
|
|
||||||
&saved_state.r[1], 2,
|
|
||||||
&saved_state.r[2], 2,
|
|
||||||
&saved_state.r[3], 2,
|
|
||||||
&saved_state.r[4], 2,
|
|
||||||
&saved_state.r[5], 2,
|
|
||||||
&saved_state.r[6], 2,
|
|
||||||
&saved_state.r[7], 2,
|
|
||||||
&saved_state.r[8], 2,
|
|
||||||
&saved_state.r[9], 2,
|
|
||||||
&saved_state.r[10], 2,
|
|
||||||
&saved_state.r[11], 2,
|
|
||||||
&saved_state.r[12], 2,
|
|
||||||
&saved_state.r[13], 2,
|
|
||||||
&saved_state.r[14], 2,
|
|
||||||
&saved_state.r[15], 4,
|
|
||||||
&saved_state.pc, 4,
|
|
||||||
&saved_state.a, 4,
|
|
||||||
&saved_state.x, 4,
|
|
||||||
&saved_state.y, 4,
|
|
||||||
&saved_state.dbr, 4,
|
|
||||||
&saved_state.d, 4,
|
|
||||||
&saved_state.s, 4,
|
|
||||||
&saved_state.p, 4,
|
|
||||||
&saved_state.ticks, 4,
|
|
||||||
&saved_state.cycles, 4,
|
|
||||||
&saved_state.insts, 4,
|
|
||||||
0
|
|
||||||
};
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_store_register (rn, value, length)
|
|
||||||
int rn;
|
|
||||||
unsigned char *value;
|
|
||||||
int length;
|
|
||||||
{
|
|
||||||
unsigned int val;
|
|
||||||
int i;
|
|
||||||
val = 0;
|
|
||||||
for (i = 0; i < rinfo[rn].size; i++)
|
|
||||||
{
|
|
||||||
val |= (*value++) << (i * 8);
|
|
||||||
}
|
|
||||||
|
|
||||||
*(rinfo[rn].ptr) = val;
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_fetch_register (rn, buf, length)
|
|
||||||
int rn;
|
|
||||||
unsigned char *buf;
|
|
||||||
int length;
|
|
||||||
{
|
|
||||||
unsigned int val = *(rinfo[rn].ptr);
|
|
||||||
int i;
|
|
||||||
|
|
||||||
for (i = 0; i < rinfo[rn].size; i++)
|
|
||||||
{
|
|
||||||
*buf++ = val;
|
|
||||||
val = val >> 8;
|
|
||||||
}
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
sim_reg_size (n)
|
|
||||||
{
|
|
||||||
return rinfo[n].size;
|
|
||||||
}
|
|
||||||
int
|
|
||||||
sim_trace ()
|
|
||||||
{
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_stop_reason (reason, sigrc)
|
|
||||||
enum sim_stop *reason;
|
|
||||||
int *sigrc;
|
|
||||||
{
|
|
||||||
*reason = sim_stopped;
|
|
||||||
*sigrc = saved_state.exception;
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_set_pc (x)
|
|
||||||
SIM_ADDR x;
|
|
||||||
{
|
|
||||||
saved_state.pc = x;
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_info (verbose)
|
|
||||||
int verbose;
|
|
||||||
{
|
|
||||||
double timetaken = (double) saved_state.ticks;
|
|
||||||
double virttime = saved_state.cycles / 2.0e6;
|
|
||||||
|
|
||||||
printf ("\n\n# instructions executed %10d\n", saved_state.insts);
|
|
||||||
printf ("# cycles %10d\n", saved_state.cycles);
|
|
||||||
printf ("# real time taken %10.4f\n", timetaken);
|
|
||||||
printf ("# virtual time taken %10.4f\n", virttime);
|
|
||||||
|
|
||||||
if (timetaken != 0)
|
|
||||||
{
|
|
||||||
printf ("# cycles/second %10d\n", (int) (saved_state.cycles / timetaken));
|
|
||||||
printf ("# simulation ratio %10.4f\n", virttime / timetaken);
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_open (kind, cb, abfd, argv)
|
|
||||||
SIM_OPEN_KIND kind;
|
|
||||||
host_callback *cb;
|
|
||||||
struct _bfd *abfd;
|
|
||||||
char **argv;
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#undef fetch8
|
|
||||||
fetch8func (x)
|
|
||||||
{
|
|
||||||
if (x & ~MMASK)
|
|
||||||
{
|
|
||||||
saved_state.exception = SIGBUS;
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return saved_state.memory[x];
|
|
||||||
}
|
|
||||||
|
|
||||||
fetch8 (x)
|
|
||||||
{
|
|
||||||
return fetch8func(x);
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_close (quitting)
|
|
||||||
int quitting;
|
|
||||||
{
|
|
||||||
/* nothing to do */
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
sim_load (prog, from_tty)
|
|
||||||
char *prog;
|
|
||||||
int from_tty;
|
|
||||||
{
|
|
||||||
/* Return nonzero so gdb will handle it. */
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_create_inferior (abfd, argv, env)
|
|
||||||
struct _bfd *abfd;
|
|
||||||
char **argv;
|
|
||||||
char **env;
|
|
||||||
{
|
|
||||||
SIM_ADDR start_address;
|
|
||||||
int pc;
|
|
||||||
if (abfd != NULL)
|
|
||||||
start_address = bfd_get_start_address (abfd);
|
|
||||||
else
|
|
||||||
start_address = 0; /*??*/
|
|
||||||
/* ??? We assume this is a 4 byte quantity. */
|
|
||||||
pc = start_address;
|
|
||||||
sim_store_register (16, (unsigned char *) &pc);
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
sim_set_callbacks (ptr)
|
|
||||||
struct host_callback_struct *ptr;
|
|
||||||
{
|
|
||||||
|
|
||||||
}
|
|
194
sim/w65/interp.h
194
sim/w65/interp.h
|
@ -1,194 +0,0 @@
|
||||||
#define fetch8(x) fetch8func((cycles++,(x)))
|
|
||||||
#define NFAKES 16
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
unsigned a;
|
|
||||||
unsigned x;
|
|
||||||
unsigned y;
|
|
||||||
unsigned pc; /* Keep pbr in there too */
|
|
||||||
unsigned dbr;
|
|
||||||
unsigned d;
|
|
||||||
unsigned s;
|
|
||||||
unsigned p;
|
|
||||||
unsigned e;
|
|
||||||
unsigned char *memory;
|
|
||||||
unsigned int exception;
|
|
||||||
unsigned int ticks;
|
|
||||||
unsigned int cycles;
|
|
||||||
unsigned int insts;
|
|
||||||
unsigned int r[NFAKES];
|
|
||||||
}
|
|
||||||
saved_state_type;
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#define GET_P \
|
|
||||||
((GET_NBIT << 7) \
|
|
||||||
| (GET_VBIT << 6) \
|
|
||||||
| (GET_MBIT << 5) \
|
|
||||||
| (GET_XBIT << 4) \
|
|
||||||
| (GET_DBIT << 3) \
|
|
||||||
| (GET_IBIT << 2) \
|
|
||||||
| (GET_ZBIT << 1) \
|
|
||||||
| (GET_CBIT << 0))
|
|
||||||
|
|
||||||
#define SET_P(_bits) \
|
|
||||||
{ int bits = _bits; \
|
|
||||||
SET_NBIT((bits>>7)&1); \
|
|
||||||
SET_VBIT((bits>>6)&1); \
|
|
||||||
SET_MBIT((bits>>5)&1); \
|
|
||||||
SET_XBIT((bits>>4)&1); \
|
|
||||||
SET_DBIT((bits>>3)&1); \
|
|
||||||
SET_IBIT((bits>>2)&1); \
|
|
||||||
SET_ZBIT((bits>>1)&1); \
|
|
||||||
SET_CBIT((bits>>0)&1); }
|
|
||||||
|
|
||||||
#define BFLAG (1<<4)
|
|
||||||
#define DFLAG (1<<3)
|
|
||||||
|
|
||||||
#define GET_A (the_a)
|
|
||||||
#define GET_E (the_e)
|
|
||||||
#define GET_B (the_b)
|
|
||||||
#define GET_CBIT (the_cbit)
|
|
||||||
#define GET_D (the_d)
|
|
||||||
#define GET_DBIT (the_dbit)
|
|
||||||
#define GET_DBR_HIGH (the_dbr)
|
|
||||||
#define GET_DBR_LOW (the_dbr >> 16)
|
|
||||||
#define GET_DPR (the_dpr)
|
|
||||||
#define GET_IBIT (the_ibit)
|
|
||||||
#define GET_MBIT (the_mbit)
|
|
||||||
#define SET_XBIT(x) { the_xbit = x; }
|
|
||||||
#define GET_NBIT (the_nbit)
|
|
||||||
#define GET_PBRPC (the_pc)
|
|
||||||
#define GET_PBR_HIGH (the_pc & 0xff0000)
|
|
||||||
#define GET_PBR_LOW (the_pc >> 16)
|
|
||||||
#define GET_PC (the_pc & 0xffff)
|
|
||||||
#define GET_S (the_s)
|
|
||||||
#define GET_VBIT (the_vbit)
|
|
||||||
#define GET_X (the_x)
|
|
||||||
#define GET_XBIT (the_xbit)
|
|
||||||
#define GET_Y (the_y)
|
|
||||||
#define GET_ZBIT (the_zbit)
|
|
||||||
#define IFLAG (1<<2)
|
|
||||||
#define INC_PC(x) {the_pc += x;}
|
|
||||||
#define POP16(x) { int _xx; POP8(x); POP8(_xx); x+= _xx<<8;}
|
|
||||||
#define POP24(x) { int _xx; POP8(x); POP8(_xx); x += _xx << 8; POP8(_xx); x += _xx << 16; }
|
|
||||||
#define POP8(x) { SET_S(GET_S +1); x = fetch8(GET_S);}
|
|
||||||
#define PUSH16(x) { int _xx = x;PUSH8(_xx >> 8); PUSH8(_xx);}
|
|
||||||
#define PUSH8(x) { store8(GET_S, x); SET_S(GET_S-1);}
|
|
||||||
#define SET_A(x) { the_a = x & AMASK; }
|
|
||||||
#define SET_B(x) { the_b = x;}
|
|
||||||
#define SET_CBIT(x) { the_cbit = x;}
|
|
||||||
#define SET_CBIT_M(x) { the_cbit = (x & (GET_MBIT ? 0x100: 0x10000)) != 0;}
|
|
||||||
#define SET_CBIT_X(x) { the_cbit = (x & (GET_XBIT ? 0x100: 0x10000)) != 0;}
|
|
||||||
#define SET_D(x) {the_d = x;}
|
|
||||||
#define SET_DBIT(x) { the_dbit= x;}
|
|
||||||
#define SET_DBR_LOW(x) {the_dbr = (x<<16);}
|
|
||||||
#define SET_DPR(x) { the_dpr = x;}
|
|
||||||
#define SET_E(x) { the_e = x;}
|
|
||||||
#define SET_IBIT(x) { the_ibit = x;}
|
|
||||||
#define SET_MBIT(x) { the_mbit = x; }
|
|
||||||
#define SET_NBIT(x) { the_nbit = x;}
|
|
||||||
#define SET_NBIT_16(x) { the_nbit= ( ((x) & (0x8000)) != 0);}
|
|
||||||
#define SET_NBIT_8(x) { the_nbit= ( ((x) & (0x80)) != 0);}
|
|
||||||
#define SET_NBIT_M(x) { if (GET_MBIT) { SET_NBIT_8(x); } else { SET_NBIT_16(x);}}
|
|
||||||
#define SET_NBIT_X(x) { if (GET_XBIT) { SET_NBIT_8(x); } else { SET_NBIT_16(x);}}
|
|
||||||
#define SET_PBR(x) { the_pc = (the_pc & 0xffff) + ((x)<<16);}
|
|
||||||
#define SET_PBRPC(x) { the_pc = x;}
|
|
||||||
#define SET_ONLY_PC(x) { the_pc = (the_pc & 0xff0000) + ((x ) & 0xffff);}
|
|
||||||
#define SET_S(x) {the_s = x; }
|
|
||||||
#define SET_VBIT_16(x) {the_vbit = ((((int)x) < -0x8000) || (((int)x) > 0x7fff));}
|
|
||||||
#define SET_VBIT_8(x) {the_vbit = ((((int)x) < -0x80) || (((int)x) > 0x7f));}
|
|
||||||
/*#define SET_VBIT_M(x) { if(GET_MBIT) {SET_VBIT_8(x);}else {SET_VBIT_16(x);}}*/
|
|
||||||
#define SET_ZBIT_16(x) { the_zbit = ((x & 0xffff) == 0);}
|
|
||||||
#define SET_ZBIT_8(x) { the_zbit = ((x & 0xff) == 0);}
|
|
||||||
#define SET_ZBIT_M(x) { if(GET_MBIT) {SET_ZBIT_8(x);}else {SET_ZBIT_16(x);}}
|
|
||||||
#define SET_ZBIT_X(x) { if(GET_XBIT) {SET_ZBIT_8(x);}else {SET_ZBIT_16(x);}}
|
|
||||||
#define SET_VBIT(x) { the_vbit = x; }
|
|
||||||
#define SET_ZBIT(x) { the_zbit = x; }
|
|
||||||
#define SET_X(x) { the_x = (x) & (GET_XBIT ? 0xff : 0xffff);}
|
|
||||||
#define SET_Y(x) { the_y = (x) & (GET_XBIT ? 0xff : 0xffff);}
|
|
||||||
|
|
||||||
#define AMASK ( GET_MBIT ? 0xff : 0xffff)
|
|
||||||
#define SMASK ( GET_MBIT ? 0x80 : 0x8000)
|
|
||||||
#define SET_VBIT_M(s1,acc,d) ( the_vbit = ((s1 ^ acc) & (acc ^ d) & SMASK )!=0)
|
|
||||||
|
|
||||||
/*#define fetch8(x) (memory[x&MMASK])*/
|
|
||||||
#define fetch16(x) (fetch8(x) + (fetch8((x)+1)<<8))
|
|
||||||
#define fetch24(x) (fetch8(x) + (fetch8((x)+1)<<8) + (fetch8((x)+2)<<16))
|
|
||||||
#define fetch8sext(x) ((char)fetch8(x))
|
|
||||||
#define fetch16sext(x) ((short)fetch16(x))
|
|
||||||
#define store8(x,y) {memory[x&MMASK]=y;}
|
|
||||||
#define store16(x,y) { store8(x,y); store8(x+1,y>>8);}
|
|
||||||
#define SEXTM(x) (GET_MBIT ? ((char)x): ((short)x))
|
|
||||||
|
|
||||||
|
|
||||||
#define STARTFUNC() \
|
|
||||||
register unsigned char *memory;\
|
|
||||||
int the_s; \
|
|
||||||
int the_b; \
|
|
||||||
int the_x; \
|
|
||||||
int the_d; \
|
|
||||||
int the_y; \
|
|
||||||
int the_dbr; \
|
|
||||||
int the_pc; \
|
|
||||||
int the_nbit; \
|
|
||||||
int the_vbit; \
|
|
||||||
int the_z; \
|
|
||||||
int the_mbit; \
|
|
||||||
int the_ibit; \
|
|
||||||
int the_xbit; \
|
|
||||||
int the_zbit; \
|
|
||||||
int the_cbit; \
|
|
||||||
int the_dbit; \
|
|
||||||
int the_dpr; \
|
|
||||||
int the_e; \
|
|
||||||
int the_a; \
|
|
||||||
int tick_start = get_now ();\
|
|
||||||
int cycles = 0; \
|
|
||||||
int insts = 0; \
|
|
||||||
\
|
|
||||||
SET_E (saved_state.e); \
|
|
||||||
SET_P (saved_state.p); \
|
|
||||||
SET_A (saved_state.a); \
|
|
||||||
SET_X (saved_state.x); \
|
|
||||||
SET_Y (saved_state.y); \
|
|
||||||
SET_ONLY_PC (saved_state.pc); \
|
|
||||||
SET_PBR (saved_state.pc >> 16); \
|
|
||||||
SET_DBR_LOW (saved_state.dbr); \
|
|
||||||
SET_D (saved_state.d); \
|
|
||||||
SET_S (saved_state.s); \
|
|
||||||
memory = saved_state.memory ; \
|
|
||||||
{ int k; for (k = 0; k < NFAKES; k++) \
|
|
||||||
store16(0x10 + k * 2, saved_state.r[k]); }\
|
|
||||||
\
|
|
||||||
top: \
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#define ENDFUNC() \
|
|
||||||
rethink: \
|
|
||||||
saved_state.ticks += get_now () - tick_start;\
|
|
||||||
saved_state.cycles += cycles; \
|
|
||||||
saved_state.insts += insts; \
|
|
||||||
{ int k; for (k = 0; k < NFAKES; k++) \
|
|
||||||
saved_state.r[k] = fetch16(0x10 + k * 2); }\
|
|
||||||
\
|
|
||||||
saved_state.e = GET_E; \
|
|
||||||
saved_state.p = GET_P; \
|
|
||||||
saved_state.a = GET_A; \
|
|
||||||
saved_state.x = GET_X; \
|
|
||||||
saved_state.y = GET_Y; \
|
|
||||||
saved_state.pc = GET_PBRPC; \
|
|
||||||
saved_state.dbr = GET_DBR_LOW; \
|
|
||||||
saved_state.d = GET_D; \
|
|
||||||
saved_state.s = GET_S; \
|
|
||||||
\
|
|
||||||
return 0; \
|
|
||||||
|
|
||||||
|
|
||||||
extern saved_state_type saved_state;
|
|
||||||
|
|
||||||
#define MMASK 0xfffff
|
|
||||||
#define NUMSEGS 16
|
|
||||||
#define RETHINK goto rethink;
|
|
131
sim/w65/run.c
131
sim/w65/run.c
|
@ -1,131 +0,0 @@
|
||||||
/* run front end support for W65
|
|
||||||
Copyright (C) 1995 Free Software Foundation, Inc.
|
|
||||||
|
|
||||||
This file is part of W65 SIM
|
|
||||||
|
|
||||||
GNU CC is free software; you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU General Public License as published by
|
|
||||||
the Free Software Foundation; either version 2, or (at your option)
|
|
||||||
any later version.
|
|
||||||
|
|
||||||
GNU CC is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU General Public License
|
|
||||||
along with this program; if not, write to the Free Software
|
|
||||||
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
||||||
|
|
||||||
|
|
||||||
/* Steve Chamberlain
|
|
||||||
sac@cygnus.com */
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#ifdef HAVE_STDLIB_H
|
|
||||||
#include <stdlib.h>
|
|
||||||
#endif
|
|
||||||
#include "getopt.h"
|
|
||||||
#include "bfd.h"
|
|
||||||
|
|
||||||
#ifdef NEED_DECLARATION_PRINTF
|
|
||||||
extern int printf ();
|
|
||||||
#endif
|
|
||||||
|
|
||||||
void usage();
|
|
||||||
extern int optind;
|
|
||||||
|
|
||||||
int
|
|
||||||
main (ac, av)
|
|
||||||
int ac;
|
|
||||||
char **av;
|
|
||||||
{
|
|
||||||
bfd *abfd;
|
|
||||||
bfd_vma start_address;
|
|
||||||
asection *s;
|
|
||||||
int i;
|
|
||||||
int verbose = 0;
|
|
||||||
int trace = 0;
|
|
||||||
char *name = "";
|
|
||||||
|
|
||||||
while ((i = getopt (ac, av, "tv")) != EOF)
|
|
||||||
switch (i)
|
|
||||||
{
|
|
||||||
case 't':
|
|
||||||
trace = 1;
|
|
||||||
break;
|
|
||||||
case 'v':
|
|
||||||
verbose = 1;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
usage();
|
|
||||||
}
|
|
||||||
ac -= optind;
|
|
||||||
av += optind;
|
|
||||||
|
|
||||||
if (ac != 1)
|
|
||||||
usage();
|
|
||||||
|
|
||||||
name = *av;
|
|
||||||
|
|
||||||
if (verbose)
|
|
||||||
{
|
|
||||||
printf ("run %s\n", name);
|
|
||||||
}
|
|
||||||
abfd = bfd_openr (name, "coff-w65");
|
|
||||||
if (abfd)
|
|
||||||
{
|
|
||||||
|
|
||||||
if (bfd_check_format (abfd, bfd_object))
|
|
||||||
{
|
|
||||||
|
|
||||||
for (s = abfd->sections; s; s = s->next)
|
|
||||||
{
|
|
||||||
unsigned char *buffer = malloc (bfd_section_size (abfd, s));
|
|
||||||
bfd_get_section_contents (abfd,
|
|
||||||
s,
|
|
||||||
buffer,
|
|
||||||
0,
|
|
||||||
bfd_section_size (abfd, s));
|
|
||||||
sim_write (s->vma, buffer, bfd_section_size (abfd, s));
|
|
||||||
free (buffer);
|
|
||||||
}
|
|
||||||
|
|
||||||
start_address = bfd_get_start_address (abfd);
|
|
||||||
sim_set_pc (start_address);
|
|
||||||
if (trace)
|
|
||||||
{
|
|
||||||
int done = 0;
|
|
||||||
while (!done)
|
|
||||||
{
|
|
||||||
done = sim_trace ();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
sim_resume (0, 0);
|
|
||||||
}
|
|
||||||
if (verbose)
|
|
||||||
sim_info (printf, 0);
|
|
||||||
|
|
||||||
/* Find out what was in r0 and return that */
|
|
||||||
{
|
|
||||||
unsigned char b[4];
|
|
||||||
sim_fetch_register(0, b, 4);
|
|
||||||
return b[3];
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
usage()
|
|
||||||
{
|
|
||||||
fprintf (stderr, "usage: run [-tv] program\n");
|
|
||||||
exit (1);
|
|
||||||
}
|
|
Loading…
Reference in New Issue