aboutsummaryrefslogtreecommitdiff
path: root/system/d52
diff options
context:
space:
mode:
Diffstat (limited to 'system/d52')
-rw-r--r--system/d52/20-fix-format-security-error.patch12
-rw-r--r--system/d52/README5
-rw-r--r--system/d52/d52.1239
-rw-r--r--system/d52/d52.SlackBuild88
-rw-r--r--system/d52/d52.info10
-rw-r--r--system/d52/d52.pod143
-rw-r--r--system/d52/slack-desc19
-rw-r--r--system/d52/tests/test.asm60
-rw-r--r--system/d52/tests/test.ctl125
-rw-r--r--system/d52/tests/test.d52102
-rw-r--r--system/d52/tests/test.hex4
11 files changed, 807 insertions, 0 deletions
diff --git a/system/d52/20-fix-format-security-error.patch b/system/d52/20-fix-format-security-error.patch
new file mode 100644
index 0000000000000..c7ed896ade814
--- /dev/null
+++ b/system/d52/20-fix-format-security-error.patch
@@ -0,0 +1,12 @@
+diff -Nur -x '*.orig' -x '*~' d52-3.4.1/d52pass2.c d52-3.4.1.new/d52pass2.c
+--- d52-3.4.1/d52pass2.c 2007-09-02 15:31:16.000000000 +0000
++++ d52-3.4.1.new/d52pass2.c 2011-11-08 02:22:21.000000000 +0000
+@@ -932,7 +932,7 @@
+ }
+ else if (dir < 0x80)
+ {
+- kcnt += fprintf(fp, rbname[dir].dent);
++ kcnt += fprintf(fp, "%s",rbname[dir].dent);
+ dirregs[dir] |= 1;
+ }
+ else
diff --git a/system/d52/README b/system/d52/README
new file mode 100644
index 0000000000000..a609a2d832f7a
--- /dev/null
+++ b/system/d52/README
@@ -0,0 +1,5 @@
+d52 (disassembler for 8051/8052, 8041/8048, and Z80 object code)
+
+d52 is a 8051/8052 command line disassembler for Linux and Windows with
+C source code that is distributed under GNU General Public License. Also
+included are d48 and dz80.
diff --git a/system/d52/d52.1 b/system/d52/d52.1
new file mode 100644
index 0000000000000..257dd3e6c097e
--- /dev/null
+++ b/system/d52/d52.1
@@ -0,0 +1,239 @@
+.\" Automatically generated by Pod::Man 2.27 (Pod::Simple 3.28)
+.\"
+.\" Standard preamble:
+.\" ========================================================================
+.de Sp \" Vertical space (when we can't use .PP)
+.if t .sp .5v
+.if n .sp
+..
+.de Vb \" Begin verbatim text
+.ft CW
+.nf
+.ne \\$1
+..
+.de Ve \" End verbatim text
+.ft R
+.fi
+..
+.\" Set up some character translations and predefined strings. \*(-- will
+.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
+.\" double quote, and \*(R" will give a right double quote. \*(C+ will
+.\" give a nicer C++. Capital omega is used to do unbreakable dashes and
+.\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff,
+.\" nothing in troff, for use with C<>.
+.tr \(*W-
+.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
+.ie n \{\
+. ds -- \(*W-
+. ds PI pi
+. if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
+. if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
+. ds L" ""
+. ds R" ""
+. ds C` ""
+. ds C' ""
+'br\}
+.el\{\
+. ds -- \|\(em\|
+. ds PI \(*p
+. ds L" ``
+. ds R" ''
+. ds C`
+. ds C'
+'br\}
+.\"
+.\" Escape single quotes in literal strings from groff's Unicode transform.
+.ie \n(.g .ds Aq \(aq
+.el .ds Aq '
+.\"
+.\" If the F register is turned on, we'll generate index entries on stderr for
+.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
+.\" entries marked with X<> in POD. Of course, you'll have to process the
+.\" output yourself in some meaningful fashion.
+.\"
+.\" Avoid warning from groff about undefined register 'F'.
+.de IX
+..
+.nr rF 0
+.if \n(.g .if rF .nr rF 1
+.if (\n(rF:(\n(.g==0)) \{
+. if \nF \{
+. de IX
+. tm Index:\\$1\t\\n%\t"\\$2"
+..
+. if !\nF==2 \{
+. nr % 0
+. nr F 2
+. \}
+. \}
+.\}
+.rr rF
+.\"
+.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
+.\" Fear. Run. Save yourself. No user-serviceable parts.
+. \" fudge factors for nroff and troff
+.if n \{\
+. ds #H 0
+. ds #V .8m
+. ds #F .3m
+. ds #[ \f1
+. ds #] \fP
+.\}
+.if t \{\
+. ds #H ((1u-(\\\\n(.fu%2u))*.13m)
+. ds #V .6m
+. ds #F 0
+. ds #[ \&
+. ds #] \&
+.\}
+. \" simple accents for nroff and troff
+.if n \{\
+. ds ' \&
+. ds ` \&
+. ds ^ \&
+. ds , \&
+. ds ~ ~
+. ds /
+.\}
+.if t \{\
+. ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
+. ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
+. ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
+. ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
+. ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
+. ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
+.\}
+. \" troff and (daisy-wheel) nroff accents
+.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
+.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
+.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
+.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
+.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
+.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
+.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
+.ds ae a\h'-(\w'a'u*4/10)'e
+.ds Ae A\h'-(\w'A'u*4/10)'E
+. \" corrections for vroff
+.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
+.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
+. \" for low resolution devices (crt and lpr)
+.if \n(.H>23 .if \n(.V>19 \
+\{\
+. ds : e
+. ds 8 ss
+. ds o a
+. ds d- d\h'-1'\(ga
+. ds D- D\h'-1'\(hy
+. ds th \o'bp'
+. ds Th \o'LP'
+. ds ae ae
+. ds Ae AE
+.\}
+.rm #[ #] #H #V #F C
+.\" ========================================================================
+.\"
+.IX Title "D52 1"
+.TH D52 1 "2014-01-17" "3.3.6" "SlackBuilds.org"
+.\" For nroff, turn off justification. Always turn off hyphenation; it makes
+.\" way too many mistakes in technical documents.
+.if n .ad l
+.nh
+.SH "NAME"
+d52 \- disassembler for Intel 8052/8051/8031/etc
+.PP
+d48 \- disassembler for Intel 8048 and 8041
+.PP
+dz80 \- disassembler for Zilog Z80, Intel 8080 and 8085
+.SH "SYNOPSIS"
+.IX Header "SYNOPSIS"
+d52 \fIoptions\fR \fBfilename\fR
+.SH "DESCRIPTION"
+.IX Header "DESCRIPTION"
+Full documentation may be found in \fI/usr/doc/d52\-3.4.1/d52manual.html\fR
+and \fI/usr/doc/d52\-3.4.1/dz80\-d48addendum.html\fR.
+.SH "OPTIONS"
+.IX Header "OPTIONS"
+Options may be entered Unix style (\-d) or \s-1DOS\s0 style (/b).
+.PP
+Options may be entered in a freeform fashion as long as a dash (\-) or
+a slash (/) precedes any option that precedes the filename.
+Examples:
+.PP
+.Vb 3
+\& d52 filename bd
+\& d52 \-d filename x100
+\& d52 /h filename d \-x100
+.Ve
+.SS "Common Options"
+.IX Subsection "Common Options"
+These options are supported by d52, d48, and dz80.
+.IP "\fB\-b\fR" 4
+.IX Item "-b"
+disassemble file with .bin extension.
+.IP "\fB\-h\fR" 4
+.IX Item "-h"
+disassemble file with .hex extension. If neither 'b' nor 'h' is specified, first search for a .hex file, and if not found, then a .bin file
+.IP "\fB\-a\fR" 4
+.IX Item "-a"
+use ascii macro instead of db/defb for text.
+.IP "\fB\-d\fR" 4
+.IX Item "-d"
+include address and data in the comment field.
+.IP "\fB\-n\fR" 4
+.IX Item "-n"
+use C style for hexadecimal operands
+.IP "\fB\-p\fR" 4
+.IX Item "-p"
+put dot '.' at beginning of pseudo ops
+.IP "\fB\-s\fR" 4
+.IX Item "-s"
+use 'defb' and 'defw' instead of 'db' and 'dw' for binary data.
+.IP "\fB\-u\fR" 4
+.IX Item "-u"
+output labels, symbols, and mnemonics in upper case.
+.SS "D52 Options"
+.IX Subsection "D52 Options"
+.IP "\fB\-i\fR" 4
+.IX Item "-i"
+put statement in output file to include 'sfr52.inc'.
+.IP "\fB\-k\fR" 4
+.IX Item "-k"
+disassemble for Keil A51 (obsolete).
+.IP "\fB\-x\fR" 4
+.IX Item "-x"
+add a hexadecimal offset to file addresses.
+.IP "\fB\-z[filename]\fR" 4
+.IX Item "-z[filename]"
+read cycle count file. Cycle count files are installed to /usr/share/d52/ in this build.
+See /usr/doc/d52\-3.4.1/cycle_counting.htm for more information.
+.IP "\fB\-t\fR" 4
+.IX Item "-t"
+trace and analyze code before disassembly. will overwrite any existing ctl file for the file being disassembled.
+.SS "D48 Options"
+.IX Subsection "D48 Options"
+.IP "\fB\-1\fR" 4
+.IX Item "-1"
+disassemble 8041 code (note, this is the numeral one, not the lowercase letter L).
+.SS "\s-1DZ80\s0 Options"
+.IX Subsection "DZ80 Options"
+.IP "\fB\-c\fR" 4
+.IX Item "-c"
+disassemble \s-1CP/M \s0.com file (implies \-x100).
+.IP "\fB\-t\fR" 4
+.IX Item "-t"
+trace and analyze code before disassembly. will overwrite any existing ctl file for the file being disassembled.
+.IP "\fB\-x\fR" 4
+.IX Item "-x"
+add a hexadecimal offset to file addresses.
+.IP "\fB\-80\fR" 4
+.IX Item "-80"
+generate 8080 mnemonics.
+.IP "\fB\-85\fR" 4
+.IX Item "-85"
+generate 8085 mnemonics.
+.SH "AUTHOR"
+.IX Header "AUTHOR"
+d52, d48, and dz80 are copyright (C) 1995\-2007 by J. L. Post.
+.PP
+This man page was written by B. Watson for the SlackBuilds.org project. It
+may be used by anyone.
diff --git a/system/d52/d52.SlackBuild b/system/d52/d52.SlackBuild
new file mode 100644
index 0000000000000..19747701bda43
--- /dev/null
+++ b/system/d52/d52.SlackBuild
@@ -0,0 +1,88 @@
+#!/bin/sh
+
+# Slackware build script for d52
+
+# Written by B. Watson (yalhcru@gmail.com)
+
+# Licensed under the WTFPL. See http://www.wtfpl.net/txt/copying/ for details.
+
+PRGNAM=d52
+VERSION=${VERSION:-3.4.1}
+BUILD=${BUILD:-1}
+TAG=${TAG:-_SBo}
+
+if [ -z "$ARCH" ]; then
+ case "$( uname -m )" in
+ i?86) ARCH=i486 ;;
+ arm*) ARCH=arm ;;
+ *) ARCH=$( uname -m ) ;;
+ esac
+fi
+
+CWD=$(pwd)
+TMP=${TMP:-/tmp/SBo}
+PKG=$TMP/package-$PRGNAM
+OUTPUT=${OUTPUT:-/tmp}
+
+if [ "$ARCH" = "i486" ]; then
+ SLKCFLAGS="-O2 -march=i486 -mtune=i686"
+ LIBDIRSUFFIX=""
+elif [ "$ARCH" = "i686" ]; then
+ SLKCFLAGS="-O2 -march=i686 -mtune=i686"
+ LIBDIRSUFFIX=""
+elif [ "$ARCH" = "x86_64" ]; then
+ SLKCFLAGS="-O2 -fPIC"
+ LIBDIRSUFFIX="64"
+else
+ SLKCFLAGS="-O2"
+ LIBDIRSUFFIX=""
+fi
+
+ZIPVER=${VERSION//./}
+BINS="dz80 d48 $PRGNAM"
+
+set -e
+
+rm -rf $PKG
+mkdir -p $TMP $PKG $OUTPUT
+cd $TMP
+rm -rf $PRGNAM-$VERSION.orig
+tar xvf $CWD/${PRGNAM}_$VERSION.orig.tar.gz
+cd $PRGNAM-$VERSION.orig
+chown -R root:root .
+find -L . \
+ \( -perm 777 -o -perm 775 -o -perm 750 -o -perm 711 -o -perm 555 \
+ -o -perm 511 \) -exec chmod 755 {} \; -o \
+ \( -perm 666 -o -perm 664 -o -perm 640 -o -perm 600 -o -perm 444 \
+ -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \;
+
+# Patch from Debian, fix minor security flaw
+patch -p1 < $CWD/20-fix-format-security-error.patch
+
+make CFLAGS="$SLKCFLAGS"
+mkdir -p $PKG/usr/bin
+install -s -m0755 $BINS $PKG/usr/bin
+
+# just keep the HTML doc
+rm cyclefiles/cycle_counting.doc cyclefiles/cycle_counting.rtf
+
+mkdir -p $PKG/usr/share/$PRGNAM
+cp -a cyclefiles/* $PKG/usr/share/$PRGNAM
+
+# man page written for this build
+mkdir -p $PKG/usr/man/man1
+gzip -9c < $CWD/$PRGNAM.1 > $PKG/usr/man/man1/$PRGNAM.1.gz
+ln -s $PRGNAM.1.gz $PKG/usr/man/man1/d48.1.gz
+ln -s $PRGNAM.1.gz $PKG/usr/man/man1/dz80.1.gz
+
+# tests/* came from an older release of d52. Still useful IMO.
+mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION
+cp -a $CWD/tests/* COPYING README *.html $PKG/usr/doc/$PRGNAM-$VERSION
+mv $PKG/usr/share/$PRGNAM/*.htm $PKG/usr/doc/$PRGNAM-$VERSION
+cat $CWD/$PRGNAM.SlackBuild > $PKG/usr/doc/$PRGNAM-$VERSION/$PRGNAM.SlackBuild
+
+mkdir -p $PKG/install
+cat $CWD/slack-desc > $PKG/install/slack-desc
+
+cd $PKG
+/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.${PKGTYPE:-tgz}
diff --git a/system/d52/d52.info b/system/d52/d52.info
new file mode 100644
index 0000000000000..fc92cfb8c9e5f
--- /dev/null
+++ b/system/d52/d52.info
@@ -0,0 +1,10 @@
+PRGNAM="d52"
+VERSION="3.4.1"
+HOMEPAGE="http://packages.debian.org/sid/d52"
+DOWNLOAD="http://ftp.debian.org/debian/pool/main/d/d52/d52_3.4.1.orig.tar.gz"
+MD5SUM="0d6fefeb3f30922d1c5046569f2ad665"
+DOWNLOAD_x86_64=""
+MD5SUM_x86_64=""
+REQUIRES=""
+MAINTAINER="B. Watson"
+EMAIL="yalhcru@gmail.com"
diff --git a/system/d52/d52.pod b/system/d52/d52.pod
new file mode 100644
index 0000000000000..8f2502ebc6666
--- /dev/null
+++ b/system/d52/d52.pod
@@ -0,0 +1,143 @@
+# pod source for d52 man page
+# pod2man -s1 -r3.4.1 --stderr -nD52 -cSlackBuilds.org < d52.pod > d52.1
+
+=pod
+
+=head1 NAME
+
+d52 - disassembler for Intel 8052/8051/8031/etc
+
+d48 - disassembler for Intel 8048 and 8041
+
+dz80 - disassembler for Zilog Z80, Intel 8080 and 8085
+
+=head1 SYNOPSIS
+
+d52 I<options> B<filename>
+
+=head1 DESCRIPTION
+
+Full documentation may be found in I</usr/doc/d52-3.4.1/d52manual.html>
+and I</usr/doc/d52-3.4.1/dz80-d48addendum.html>.
+
+=head1 OPTIONS
+
+Options may be entered Unix style (-d) or DOS style (/b).
+
+Options may be entered in a freeform fashion as long as a dash (-) or
+a slash (/) precedes any option that precedes the filename.
+Examples:
+
+ d52 filename bd
+ d52 -d filename x100
+ d52 /h filename d -x100
+
+=head2 Common Options
+
+These options are supported by d52, d48, and dz80.
+
+=over
+
+=item B<-b>
+
+disassemble file with .bin extension.
+
+=item B<-h>
+
+disassemble file with .hex extension. If neither 'b' nor 'h' is specified, first search for a .hex file, and if not found, then a .bin file
+
+=item B<-a>
+
+use ascii macro instead of db/defb for text.
+
+=item B<-d>
+
+include address and data in the comment field.
+
+=item B<-n>
+
+use C style for hexadecimal operands
+
+=item B<-p>
+
+put dot '.' at beginning of pseudo ops
+
+=item B<-s>
+
+use 'defb' and 'defw' instead of 'db' and 'dw' for binary data.
+
+=item B<-u>
+
+output labels, symbols, and mnemonics in upper case.
+
+=back
+
+=head2 D52 Options
+
+=over
+
+=item B<-i>
+
+put statement in output file to include 'sfr52.inc'.
+
+=item B<-k>
+
+disassemble for Keil A51 (obsolete).
+
+=item B<-x>
+
+add a hexadecimal offset to file addresses.
+
+=item B<-z[filename]>
+
+read cycle count file. Cycle count files are installed to /usr/share/d52/ in this build.
+See /usr/doc/d52-3.4.1/cycle_counting.htm for more information.
+
+=item B<-t>
+
+trace and analyze code before disassembly. will overwrite any existing ctl file for the file being disassembled.
+
+=back
+
+=head2 D48 Options
+
+=over
+
+=item B<-1>
+
+disassemble 8041 code (note, this is the numeral one, not the lowercase letter L).
+
+=back
+
+=head2 DZ80 Options
+
+=over
+
+=item B<-c>
+
+disassemble CP/M .com file (implies -x100).
+
+=item B<-t>
+
+trace and analyze code before disassembly. will overwrite any existing ctl file for the file being disassembled.
+
+=item B<-x>
+
+add a hexadecimal offset to file addresses.
+
+=item B<-80>
+
+generate 8080 mnemonics.
+
+=item B<-85>
+
+generate 8085 mnemonics.
+
+=back
+
+=head1 AUTHOR
+
+d52, d48, and dz80 are copyright (C) 1995-2007 by J. L. Post.
+
+This man page was written by B. Watson for the SlackBuilds.org project. It
+may be used by anyone.
diff --git a/system/d52/slack-desc b/system/d52/slack-desc
new file mode 100644
index 0000000000000..70305205abf1a
--- /dev/null
+++ b/system/d52/slack-desc
@@ -0,0 +1,19 @@
+# HOW TO EDIT THIS FILE:
+# The "handy ruler" below makes it easier to edit a package description.
+# Line up the first '|' above the ':' following the base package name, and
+# the '|' on the right side marks the last column you can put a character in.
+# You must make exactly 11 lines for the formatting to be correct. It's also
+# customary to leave one space after the ':' except on otherwise blank lines.
+
+ |-----handy-ruler------------------------------------------------------|
+d52: d52 (disassembler for 8051/8052, 8041/8048, and Z80 object code)
+d52:
+d52: d52 is a 8051/8052 command line disassembler for Linux and Windows
+d52: with C source code that is distributed under GNU General Public
+d52: License. Also included are d48 and dz80.
+d52:
+d52:
+d52:
+d52:
+d52:
+d52:
diff --git a/system/d52/tests/test.asm b/system/d52/tests/test.asm
new file mode 100644
index 0000000000000..7313e33c0f737
--- /dev/null
+++ b/system/d52/tests/test.asm
@@ -0,0 +1,60 @@
+;
+; Test file for D52.
+; This, with the associated test.ctl file, demonstrates the
+; use of control file directives.
+;
+accum equ 0e0h
+;
+ org 0
+;
+start: nop
+ ajmp main
+ ljmp subrt
+;
+main: rr a
+ inc accum
+ inc 12h
+ inc @r0
+ inc @r1
+ inc r0
+ jbc acc.3,label
+ acall subrt
+ lcall subrt
+label: rrc a
+ dec a
+ dec 10h
+ dec @r0
+ dec @r1
+ dec r0
+ cjne a,#12h,label
+ mov dptr,#vectbl
+ jmp @a+dptr
+;
+subrt: nop
+ nop
+ nop
+ nop
+ nop
+ ret
+;
+vectbl: dw subrt
+ dw 0
+;
+mesg: db 'This is text',0
+;
+bindat: db 0,1,2,3
+wordat: dw 10h,20h,30h
+;
+; random junk to fake out the disassembler
+;
+ db 80h,29h,44h,33h
+;
+; valid code:
+;
+delay: mov r0,#5
+delay1: clr 20h
+ djnz r0,delay1
+ ret
+;
+ end
+;
diff --git a/system/d52/tests/test.ctl b/system/d52/tests/test.ctl
new file mode 100644
index 0000000000000..1a6731b362b60
--- /dev/null
+++ b/system/d52/tests/test.ctl
@@ -0,0 +1,125 @@
+;
+; TEST.CTL - Sample Control File for D52
+;
+; Control codes allowed in the CTL file:
+;
+; A - Address Specifies that the word entry is the address of
+; something for which a label should be generated.
+;
+; B - Byte binary Eight bit binary data (db).
+;
+; C - Code Executable code that must be analyzed.
+;
+; F - SFR label Specify name for SFR.
+;
+; I - Ignore Treat as uninitialized space. Will not be dis-
+; assembled as anything unless some other valid
+; code reaches it.
+;
+; K - SFR bit Specify name for SFR bit.
+;
+; L - Label Generate a label for this address.
+;
+; M - Memory Generate a label for bit addressable memory.
+;
+; P - Patch Add inline code (macro, for example)
+;
+; R - Register Specify name for register
+; (instead of rb2r5 for example).
+;
+; S - Symbol Generate a symbol for this value.
+;
+; T - Text ASCII text (db).
+;
+; W - Word binary Sixteen bit binary data (dw).
+;
+; X - Operand name Specify special name for operand.
+;
+; # - Comment Add header comment to output file.
+;
+; ! - Inline comment Add comment to end of line.
+;
+; example labels:
+;
+l 0000 start
+l 0006 main
+l 0016 loop
+l 0024 subrtn
+l 002a vectbl
+l 002e message
+;
+; example symbol:
+;
+s 12 counter
+;
+; example ascii text:
+;
+t 002e-003a
+;
+; example register names:
+;
+r 10 reg0
+r 12 reg2
+;
+; example SFR name:
+;
+f e0 accum
+;
+; example SFR bit name:
+;
+k e3 abit3
+;
+; example memory bit name:
+;
+m 20 membit
+;
+; example operand name:
+;
+x 004a five
+;
+; example header comments:
+;
+# 0024 This is a subroutine.\n
+# 002e 't' directive for ascii text\n
+# 003b \nData - 'b' and 'w' directives\n
+# 003f
+;
+; example inline comments:
+;
+! 0007 note sfr bit def only affects indirect addressing
+! 001d do the loop
+! 0024 do nothing routine
+! 0025 these nops would not be disassembled
+! 0026 without the 'c' directive
+! 003b binary data
+! 003f word data
+# 0049 would get junk from 45h to 48h if not for the 'i' directive\n
+! 0049 example of operand name 'x' directive
+! 004b 'm' bit addressable memory directive
+;
+; example address table:
+;
+a 002a-002d
+;
+; example force disassembly of code (nops):
+;
+c 0025-0029
+;
+; example code to ignore:
+;
+i 0045-0048
+;
+; example binary data:
+;
+b 003b-003e
+;
+; example word data:
+;
+w 003f-0044
+;
+; example patch code:
+;
+p 0003 include "myfile.inc"\n;
+;
+; end of control file
+;
diff --git a/system/d52/tests/test.d52 b/system/d52/tests/test.d52
new file mode 100644
index 0000000000000..3809b2be2bbe4
--- /dev/null
+++ b/system/d52/tests/test.d52
@@ -0,0 +1,102 @@
+;
+; D52 V3.3.6 8052 Disassembly of test.hex
+; 01/23/05 12:15
+;
+ org 0
+;
+start: nop ; 0000 00 .
+ ajmp main ; 0001 01 06 ..
+;
+ include "myfile.inc"
+;
+ ljmp subrtn ; 0003 02 00 24 ..$
+;
+main: rr a ; 0006 03 .
+ inc accum ; 0007 05 e0 .` ; note sfr bit def only affects indirect addressing
+ inc reg2 ; 0009 05 12 ..
+ inc @r0 ; 000b 06 .
+ inc @r1 ; 000c 07 .
+ inc r0 ; 000d 08 .
+ jbc abit3,loop ; 000e 10 e3 05 .c.
+ acall subrtn ; 0011 11 24 .$
+ lcall subrtn ; 0013 12 00 24 ..$
+loop: rrc a ; 0016 13 .
+ dec a ; 0017 14 .
+ dec reg0 ; 0018 15 10 ..
+ dec @r0 ; 001a 16 .
+ dec @r1 ; 001b 17 .
+ dec r0 ; 001c 18 .
+ cjne a,#counter,loop ; 001d b4 12 f6 4.v ; do the loop
+ mov dptr,#vectbl ; 0020 90 00 2a ..*
+ jmp @a+dptr ; 0023 73 s
+;
+; This is a subroutine.
+;
+subrtn: nop ; 0024 00 . ; do nothing routine
+ nop ; 0025 00 . ; these nops would not be disassembled
+ nop ; 0026 00 . ; without the 'c' directive
+ nop ; 0027 00 .
+ nop ; 0028 00 .
+ ret ; 0029 22 "
+;
+vectbl: dw subrtn ; 002a 00 24 .$
+ dw start ; 002c 00 00 ..
+;
+; 't' directive for ascii text
+;
+message: db 'This is text' ; 002e
+ db 0 ; 003a .
+;
+; Data - 'b' and 'w' directives
+;
+ db 0 ; 003b . ; binary data
+ db 1,2,3 ; 003c ...
+;
+ dw 10h ; 003f 00 10 .. ; word data
+ dw 20h ; 0041 00 20 .
+ dw 30h ; 0043 00 30 .0
+;
+;
+; would get junk from 45h to 48h if not for the 'i' directive
+;
+ org 49h
+;
+ mov r0,#five ; 0049 78 05 x. ; example of operand name 'x' directive
+X004b: clr membit ; 004b c2 20 B ; 'm' bit addressable memory directive
+ djnz r0,X004b ; 004d d8 fc X|
+ ret ; 004f 22 "
+;
+; Register/Memory Equates
+;
+reg0 equ 10h
+reg2 equ 12h
+;
+; SFR Equates
+;
+accum equ 0e0h
+;
+; SFR bit Equates
+;
+abit3 equ 0e3h
+;
+; Memory bit Equates
+;
+membit equ 20h
+;
+; Symbol equates
+;
+; These are symbols from the control
+; file that are referenced in the code
+;
+counter equ 12h
+;
+; Operand symbol equates
+;
+; These are operand symbols from the control
+; file that are referenced in the code
+;
+five equ 5
+;
+ end
+;
+
diff --git a/system/d52/tests/test.hex b/system/d52/tests/test.hex
new file mode 100644
index 0000000000000..ade6d930510a2
--- /dev/null
+++ b/system/d52/tests/test.hex
@@ -0,0 +1,4 @@
+:200000000001060200240305E0051206070810E305112412002413141510161718B412F6EF
+:2000200090002A7300000000002200240000546869732069732074657874000001020300CE
+:100040001000200030802944337805C220D8FC22DB
+:00005001AF
generated by cgit v1.2.3 (git 2.26.2) at 2024-12-22 04:03:43 +0000