mirror of
https://github.com/gbdev/rgbds.git
synced 2025-11-20 10:12:06 +00:00
Compare commits
241 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
83348100f3 | ||
|
|
57bf32f35a | ||
|
|
0030e0371a | ||
|
|
42400ec6a0 | ||
|
|
2e793fb7dc | ||
|
|
ac69e9863e | ||
|
|
59c065cf31 | ||
|
|
729683fb1f | ||
|
|
ed6e4c4769 | ||
|
|
d92c284b85 | ||
|
|
26af7fcffe | ||
|
|
f7f697c267 | ||
|
|
554b5292de | ||
|
|
a7393d7e45 | ||
|
|
fe9e4f0583 | ||
|
|
362aea22bd | ||
|
|
9bc6083e49 | ||
|
|
2b5ad9dc38 | ||
|
|
5679c7066b | ||
|
|
4395ed893a | ||
|
|
0d80f60fcc | ||
|
|
7097b9885e | ||
|
|
f2c207cb44 | ||
|
|
be50f2d302 | ||
|
|
fa767f3228 | ||
|
|
5cfa15f963 | ||
|
|
23584a584f | ||
|
|
53fa608161 | ||
|
|
1154a173cc | ||
|
|
ca3e55cc45 | ||
|
|
206275df57 | ||
|
|
3d8396b86f | ||
|
|
77546e9c58 | ||
|
|
540f8597d4 | ||
|
|
e3109af2f8 | ||
|
|
cf99f33dd6 | ||
|
|
0b6438ae0a | ||
|
|
928b347dfc | ||
|
|
ce21cfad4e | ||
|
|
dda3a066be | ||
|
|
a6a47ff66d | ||
|
|
bfcef01211 | ||
|
|
07861b3b4a | ||
|
|
24439003f3 | ||
|
|
3c43cc14d9 | ||
|
|
52081f32f0 | ||
|
|
6e5a28226b | ||
|
|
2783a36b17 | ||
|
|
2c3afc833f | ||
|
|
0f3b708dce | ||
|
|
7eb9101d43 | ||
|
|
032e698f46 | ||
|
|
63103c050d | ||
|
|
7e107ab41a | ||
|
|
a009a372c5 | ||
|
|
5f299bfe6c | ||
|
|
07cc4fb8fd | ||
|
|
720ae59af8 | ||
|
|
e63e801e9c | ||
|
|
2abdc9c59d | ||
|
|
be200593d6 | ||
|
|
43228f16f0 | ||
|
|
f14b061ea7 | ||
|
|
f431b384a2 | ||
|
|
7e3720b627 | ||
|
|
e9ed81074b | ||
|
|
e16af28676 | ||
|
|
25be5c6561 | ||
|
|
e4b4e427f1 | ||
|
|
2138bb46fd | ||
|
|
ec5eb4f9ff | ||
|
|
b31632b51d | ||
|
|
e50e3e5a23 | ||
|
|
f63339472e | ||
|
|
43fd1ee024 | ||
|
|
d61a0a8a8f | ||
|
|
ec44b554e8 | ||
|
|
01a710a47d | ||
|
|
ff2ba7290c | ||
|
|
53842cd07d | ||
|
|
85ff75d2d3 | ||
|
|
adef2e18cc | ||
|
|
5ba8405dfa | ||
|
|
f0d4750ebc | ||
|
|
eed098ac8e | ||
|
|
64dbcc0912 | ||
|
|
5947ca10dc | ||
|
|
d1ed4fbded | ||
|
|
22d4a10cb6 | ||
|
|
dfb99618f5 | ||
|
|
6b21e02c95 | ||
|
|
011c2c953b | ||
|
|
8eb1a42e31 | ||
|
|
c51aac0c20 | ||
|
|
6feaba2343 | ||
|
|
0867476bde | ||
|
|
fa962b9470 | ||
|
|
b8642bf3af | ||
|
|
317b206fa8 | ||
|
|
469e3e7c86 | ||
|
|
9193710ff9 | ||
|
|
263c9222ab | ||
|
|
947d767c64 | ||
|
|
82cf3eb48f | ||
|
|
a75c15ec46 | ||
|
|
3dcfe2b9f6 | ||
|
|
523b7538f0 | ||
|
|
bc2f885d29 | ||
|
|
bd00b9ab59 | ||
|
|
4f86a12539 | ||
|
|
7e2457c9be | ||
|
|
7993d3455d | ||
|
|
c9daf80f11 | ||
|
|
5a7faa7dff | ||
|
|
7b8d4de35c | ||
|
|
c7fe281c86 | ||
|
|
fa8f25a4de | ||
|
|
7c2cae7a32 | ||
|
|
92b81b1d5a | ||
|
|
42b5be24b4 | ||
|
|
14fea5f659 | ||
|
|
1e16a0ff85 | ||
|
|
7adf1dd502 | ||
|
|
0588e42520 | ||
|
|
2eb748278b | ||
|
|
1ab93a194e | ||
|
|
1b05c43b97 | ||
|
|
e4cbf773f6 | ||
|
|
b07c04cd74 | ||
|
|
9be7c4c849 | ||
|
|
6d1c60b0a6 | ||
|
|
c485ad94f2 | ||
|
|
998cfe1bdd | ||
|
|
5ee058f217 | ||
|
|
38372c59ed | ||
|
|
420ea638a7 | ||
|
|
951c9b66f4 | ||
|
|
0a66e14307 | ||
|
|
b40c567aee | ||
|
|
547abfefc1 | ||
|
|
06f0472f81 | ||
|
|
defd4f589e | ||
|
|
dc4a98048d | ||
|
|
efaa6d9ff7 | ||
|
|
ab19dab899 | ||
|
|
e86a70d2cb | ||
|
|
a91187d8dc | ||
|
|
0b5e074591 | ||
|
|
f8531ed410 | ||
|
|
0a8401741d | ||
|
|
a079a69b7c | ||
|
|
d86cb41972 | ||
|
|
95cd960b3b | ||
|
|
bed43d2530 | ||
|
|
c02b04f7d2 | ||
|
|
2339f0fbae | ||
|
|
6e0aca47d4 | ||
|
|
a8c603a7e8 | ||
|
|
97a31c8fc0 | ||
|
|
c3c31138dd | ||
|
|
fbb825af3b | ||
|
|
280ca83acd | ||
|
|
2e9c68f8c3 | ||
|
|
330a39596c | ||
|
|
e241137508 | ||
|
|
deb44eaeef | ||
|
|
338c176b37 | ||
|
|
1a15ee5363 | ||
|
|
2ea2e47231 | ||
|
|
31294d6d9d | ||
|
|
6c10ca62ad | ||
|
|
49809f6caf | ||
|
|
81675bc4c7 | ||
|
|
37b615f070 | ||
|
|
6438ae2591 | ||
|
|
33ae6d8ca3 | ||
|
|
ebc9a4b786 | ||
|
|
e195076793 | ||
|
|
b14beeff10 | ||
|
|
db54c2ebd6 | ||
|
|
eadaa47770 | ||
|
|
b5e7855afd | ||
|
|
ce7d1d5d49 | ||
|
|
64a3929f4e | ||
|
|
1c1a4e6ac9 | ||
|
|
cc3aa969b8 | ||
|
|
7055301616 | ||
|
|
bbf24916e6 | ||
|
|
261503c7c8 | ||
|
|
b924f58bb0 | ||
|
|
ac78c37f9d | ||
|
|
c8d9ae21e6 | ||
|
|
5281704f62 | ||
|
|
fd4327327c | ||
|
|
d81d128a04 | ||
|
|
d067f31678 | ||
|
|
d02294505c | ||
|
|
eb4bbb3e0b | ||
|
|
2ab10a95e4 | ||
|
|
bc60b85785 | ||
|
|
9d0203a4ee | ||
|
|
a18b65de21 | ||
|
|
1c47ffcce8 | ||
|
|
bbf60c7197 | ||
|
|
60c3a7e2f3 | ||
|
|
5702995978 | ||
|
|
483d94f88b | ||
|
|
9b4d16b0d8 | ||
|
|
a3e95f99d2 | ||
|
|
e3a31d7e59 | ||
|
|
d9f5ce339a | ||
|
|
361f1ac50b | ||
|
|
4f8cf84ed4 | ||
|
|
c75b9d4d55 | ||
|
|
cd2af0204e | ||
|
|
91241b44da | ||
|
|
1d174f37da | ||
|
|
2777044f70 | ||
|
|
e5e64b8cec | ||
|
|
8534f3a148 | ||
|
|
bdc6401eba | ||
|
|
21d0b402d3 | ||
|
|
a305649557 | ||
|
|
3b0e207036 | ||
|
|
83eddb4c4e | ||
|
|
57997756b6 | ||
|
|
ab66b28fdf | ||
|
|
116569f54d | ||
|
|
2b839fec37 | ||
|
|
513d451710 | ||
|
|
9399ba36f9 | ||
|
|
ef3a486845 | ||
|
|
f0e5c5ccc8 | ||
|
|
9b4959cb75 | ||
|
|
dca82e6d95 | ||
|
|
871c5ed360 | ||
|
|
635014b74d | ||
|
|
7ad634febd | ||
|
|
1e1339467e | ||
|
|
9e24c26468 | ||
|
|
b2d523acde |
7
.gitignore
vendored
Normal file
7
.gitignore
vendored
Normal file
@@ -0,0 +1,7 @@
|
||||
rgbasm
|
||||
rgblink
|
||||
rgbfix
|
||||
rgbgfx
|
||||
*.o
|
||||
*.exe
|
||||
*.html
|
||||
13
.travis-deps.sh
Executable file
13
.travis-deps.sh
Executable file
@@ -0,0 +1,13 @@
|
||||
#!/bin/sh
|
||||
|
||||
if [ $TRAVIS_OS_NAME = "osx" ]; then
|
||||
brew update
|
||||
brew install libpng pkg-config
|
||||
else # linux
|
||||
sudo apt-get -qq update
|
||||
sudo apt-get install -y -q bison flex libpng-dev pkg-config
|
||||
fi
|
||||
|
||||
echo "Dependencies:"
|
||||
yacc --version
|
||||
flex --version
|
||||
16
.travis.yml
Normal file
16
.travis.yml
Normal file
@@ -0,0 +1,16 @@
|
||||
language: c
|
||||
sudo: required
|
||||
install:
|
||||
- ./.travis-deps.sh
|
||||
os:
|
||||
- linux
|
||||
- osx
|
||||
compiler:
|
||||
- clang
|
||||
- gcc
|
||||
script:
|
||||
- make
|
||||
- sudo make install
|
||||
after_success:
|
||||
- pushd test/asm/ && ./test.sh && popd
|
||||
- pushd test/link/ && ./test.sh && popd
|
||||
6
GNUmakefile
Normal file
6
GNUmakefile
Normal file
@@ -0,0 +1,6 @@
|
||||
# GNU Make 3.x doesn't support the "!=" shell syntax, so here's an alternative
|
||||
|
||||
PKG_CONFIG = pkg-config
|
||||
PNGFLAGS = $(shell ${PKG_CONFIG} --cflags libpng)
|
||||
|
||||
include Makefile
|
||||
25
LICENSE
25
LICENSE
@@ -1,25 +0,0 @@
|
||||
rgbasm and rgblink are derived from Justin Lloyd's RGBDS, which is
|
||||
released under the following license:
|
||||
|
||||
DO WHATEVER PUBLIC LICENSE*
|
||||
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
|
||||
|
||||
0. You can do whatever you want to with the work.
|
||||
1. You cannot stop anybody from doing whatever they want to with the work.
|
||||
2. You cannot revoke anybody elses DO WHATEVER PUBLIC LICENSE in the work.
|
||||
|
||||
This program is free software. It comes without any warranty, to
|
||||
the extent permitted by applicable law. You can redistribute it
|
||||
and/or modify it under the terms of the DO WHATEVER PUBLIC LICENSE
|
||||
|
||||
Software originally created by Justin Lloyd @ http://otakunozoku.com/
|
||||
|
||||
|
||||
rgbfix was rewritten from scratch by Anthony J. Bentley, and is released
|
||||
under the ISC license; see the source file for the text of the license.
|
||||
|
||||
extern/err.c is derived from the Musl C library, http://www.musl-libc.org,
|
||||
and is released under the MIT license.
|
||||
|
||||
extern/strl.c is derived from the OpenBSD Project, http://www.openbsd.org,
|
||||
and is released under the BSD license.
|
||||
74
LICENSE.md
Normal file
74
LICENSE.md
Normal file
@@ -0,0 +1,74 @@
|
||||
# Original code
|
||||
|
||||
Copyright (C) 1997 Carsten Sorensen <surfsmurf@matilde.demon.co.uk>
|
||||
|
||||
The ASMotor package (xAsm, xLink, RGBFix, examples and documentation) is
|
||||
freeware and distributed as is. The author retains his copyright and right to
|
||||
modify the specifications and operation of the software without notice.
|
||||
|
||||
In other words this means I encourage you to...
|
||||
|
||||
- use it for whatever purpose even professional work without me charging you a
|
||||
penny
|
||||
- copy it to another person (wholly or in part, though I'm sure he'd appreciate
|
||||
the whole package) in whatever form you find suitable
|
||||
- mass-distribute the ASMotor package if it is complete (xAsm, xLink, RGBFix and
|
||||
documentation).
|
||||
- contact me if you have any problems
|
||||
|
||||
This also means you can't...
|
||||
|
||||
- blame me for loss of profit, data, sleep, food or other nasty things through
|
||||
the use or distribution of ASMotor. If you choose to use ASMotor you do so at
|
||||
your own risk.
|
||||
- expect me to be able to help you should you have a problem related or not to
|
||||
ASMotor.
|
||||
|
||||
# Otaku no Zoku's modifications
|
||||
|
||||
Copyright (C) 1999 Justin Lloyd <jlloyd@imf.la> (?)
|
||||
|
||||
```
|
||||
DO WHATEVER PUBLIC LICENSE*
|
||||
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
|
||||
|
||||
0. You can do whatever you want to with the work.
|
||||
1. You cannot stop anybody from doing whatever they want to with the work.
|
||||
2. You cannot revoke anybody elses DO WHATEVER PUBLIC LICENSE in the work.
|
||||
|
||||
This program is free software. It comes without any warranty, to
|
||||
the extent permitted by applicable law. You can redistribute it
|
||||
and/or modify it under the terms of the DO WHATEVER PUBLIC LICENSE
|
||||
|
||||
Software originally created by Justin Lloyd @ http://otakunozoku.com/
|
||||
```
|
||||
|
||||
# rgbds-linux
|
||||
|
||||
Copyright (C) 2009 Vegard Nossum <vegard.nossum@gmail.com>
|
||||
|
||||
# Current
|
||||
|
||||
rgbasm and rgblink are derived from Justin Lloyd's RGBDS.
|
||||
|
||||
rgbfix was rewritten from scratch by Anthony J. Bentley, and is released
|
||||
under the ISC license; see the source file for the text of the license.
|
||||
|
||||
rgbgfx was written by stag019, and is released under the ISC license.
|
||||
|
||||
Some files of rgblink were written by Antonio Niño Díaz, and they are relased
|
||||
under the ISC license. The affected files have the appropriate license in the
|
||||
header of the file.
|
||||
|
||||
The UTF-8 decoder in src/asm/charmap.c was written by Björn Höhrmann and is
|
||||
released under the MIT license. The remainder of charmap.c was written by
|
||||
stag019, and is released under the ISC license.
|
||||
|
||||
extern/err.c is derived from the Musl C library, http://www.musl-libc.org,
|
||||
and is released under the MIT license.
|
||||
|
||||
extern/reallocarray.c is derived from the OpenBSD Project,
|
||||
http://www.openbsd.org, and is released under the ISC license.
|
||||
|
||||
extern/strl.c is derived from the OpenBSD Project, http://www.openbsd.org,
|
||||
and is released under the BSD license.
|
||||
144
Makefile
144
Makefile
@@ -1,20 +1,25 @@
|
||||
.POSIX:
|
||||
PKG_CONFIG = pkg-config
|
||||
WARNFLAGS = -Wall -Werror
|
||||
PNGFLAGS != ${PKG_CONFIG} --cflags libpng
|
||||
REALCFLAGS = ${CFLAGS} ${WARNFLAGS} ${PNGFLAGS} -Iinclude -g \
|
||||
-std=c99 -D_POSIX_C_SOURCE=200809L
|
||||
|
||||
REALCFLAGS = ${CFLAGS} -Wall -Iinclude -Iinclude/asm/gameboy -g -std=c99
|
||||
LFLAGS := --nounistd
|
||||
|
||||
YACC := yacc
|
||||
FLEX := flex
|
||||
RM := rm -rf
|
||||
|
||||
# User-defined variables
|
||||
PREFIX = /usr/local
|
||||
BINPREFIX = ${PREFIX}/bin
|
||||
MANPREFIX = ${PREFIX}/man
|
||||
Q = @
|
||||
PREFIX = /usr/local
|
||||
bindir = ${PREFIX}/bin
|
||||
mandir = ${PREFIX}/man
|
||||
Q = @
|
||||
STRIP = -s
|
||||
BINMODE = 555
|
||||
MANMODE = 444
|
||||
|
||||
yacc_pre := \
|
||||
src/asm/yaccprt1.y\
|
||||
src/asm/gameboy/yaccprt2.y\
|
||||
src/asm/yaccprt3.y\
|
||||
src/asm/gameboy/yaccprt4.y
|
||||
|
||||
rgbasm_obj := \
|
||||
rgbasm_obj = \
|
||||
src/asm/asmy.o \
|
||||
src/asm/charmap.o \
|
||||
src/asm/fstack.o \
|
||||
@@ -25,45 +30,63 @@ rgbasm_obj := \
|
||||
src/asm/output.o \
|
||||
src/asm/rpn.o \
|
||||
src/asm/symbol.o \
|
||||
src/asm/gameboy/locallex.o \
|
||||
src/asm/locallex.o \
|
||||
src/extern/err.o \
|
||||
src/extern/reallocarray.o \
|
||||
src/extern/strlcpy.o \
|
||||
src/extern/strlcat.o
|
||||
|
||||
rgblink_obj := \
|
||||
rgblink_obj = \
|
||||
src/link/assign.o \
|
||||
src/link/lexer.o \
|
||||
src/link/library.o \
|
||||
src/link/main.o \
|
||||
src/link/mapfile.o \
|
||||
src/link/object.o \
|
||||
src/link/output.o \
|
||||
src/link/patch.o \
|
||||
src/link/parser.o \
|
||||
src/link/script.o \
|
||||
src/link/symbol.o \
|
||||
src/extern/err.o
|
||||
|
||||
rgbfix_obj := \
|
||||
rgbfix_obj = \
|
||||
src/fix/main.o \
|
||||
src/extern/err.o
|
||||
|
||||
all: rgbasm rgblink rgbfix
|
||||
rgbgfx_obj = \
|
||||
src/gfx/gb.o \
|
||||
src/gfx/main.o \
|
||||
src/gfx/makepng.o \
|
||||
src/extern/err.o
|
||||
|
||||
all: rgbasm rgblink rgbfix rgbgfx
|
||||
|
||||
clean:
|
||||
$Qrm -rf rgbds.html
|
||||
$Qrm -rf rgbasm rgbasm.exe ${rgbasm_obj} rgbasm.html
|
||||
$Qrm -rf rgblink rgblink.exe ${rgblink_obj} rgblink.html
|
||||
$Qrm -rf rgbfix rgbfix.exe ${rgbfix_obj} rgbfix.html
|
||||
$Qrm -rf src/asm/asmy.c src/asm/asmy.h src/asm/asmy.y
|
||||
$Q${RM} rgbds.7.html gbz80.7.html rgbds.5.html
|
||||
$Q${RM} rgbasm rgbasm.exe ${rgbasm_obj} rgbasm.1.html rgbasm.5.html
|
||||
$Q${RM} rgblink rgblink.exe ${rgblink_obj} rgblink.1.html rgblink.5.html
|
||||
$Q${RM} rgbfix rgbfix.exe ${rgbfix_obj} rgbfix.1.html
|
||||
$Q${RM} rgbgfx rgbgfx.exe ${rgbgfx_obj} rgbgfx.1.html
|
||||
$Q${RM} src/asm/asmy.c src/asm/asmy.h
|
||||
$Q${RM} src/link/lexer.c src/link/parser.c src/link/parser.h
|
||||
|
||||
install: all
|
||||
$Qmkdir -p ${BINPREFIX}
|
||||
$Qinstall -s -m 555 rgbasm ${BINPREFIX}/rgbasm
|
||||
$Qinstall -s -m 555 rgbfix ${BINPREFIX}/rgbfix
|
||||
$Qinstall -s -m 555 rgblink ${BINPREFIX}/rgblink
|
||||
$Qmkdir -p ${MANPREFIX}/man1 ${MANPREFIX}/man7
|
||||
$Qinstall -m 444 src/rgbds.7 ${MANPREFIX}/man7/rgbds.7
|
||||
$Qinstall -m 444 src/asm/rgbasm.1 ${MANPREFIX}/man1/rgbasm.1
|
||||
$Qinstall -m 444 src/fix/rgbfix.1 ${MANPREFIX}/man1/rgbfix.1
|
||||
$Qinstall -m 444 src/link/rgblink.1 ${MANPREFIX}/man1/rgblink.1
|
||||
$Qmkdir -p ${DESTDIR}${bindir}
|
||||
$Qinstall ${STRIP} -m ${BINMODE} rgbasm ${DESTDIR}${bindir}/rgbasm
|
||||
$Qinstall ${STRIP} -m ${BINMODE} rgbfix ${DESTDIR}${bindir}/rgbfix
|
||||
$Qinstall ${STRIP} -m ${BINMODE} rgblink ${DESTDIR}${bindir}/rgblink
|
||||
$Qinstall ${STRIP} -m ${BINMODE} rgbgfx ${DESTDIR}${bindir}/rgbgfx
|
||||
$Qmkdir -p ${DESTDIR}${mandir}/man1 ${DESTDIR}${mandir}/man5 ${DESTDIR}${mandir}/man7
|
||||
$Qinstall -m ${MANMODE} src/rgbds.7 ${DESTDIR}${mandir}/man7/rgbds.7
|
||||
$Qinstall -m ${MANMODE} src/gbz80.7 ${DESTDIR}${mandir}/man7/gbz80.7
|
||||
$Qinstall -m ${MANMODE} src/rgbds.5 ${DESTDIR}${mandir}/man7/rgbds.5
|
||||
$Qinstall -m ${MANMODE} src/asm/rgbasm.1 ${DESTDIR}${mandir}/man1/rgbasm.1
|
||||
$Qinstall -m ${MANMODE} src/asm/rgbasm.5 ${DESTDIR}${mandir}/man1/rgbasm.5
|
||||
$Qinstall -m ${MANMODE} src/fix/rgbfix.1 ${DESTDIR}${mandir}/man1/rgbfix.1
|
||||
$Qinstall -m ${MANMODE} src/link/rgblink.1 ${DESTDIR}${mandir}/man1/rgblink.1
|
||||
$Qinstall -m ${MANMODE} src/link/rgblink.5 ${DESTDIR}${mandir}/man5/rgblink.5
|
||||
$Qinstall -m ${MANMODE} src/gfx/rgbgfx.1 ${DESTDIR}${mandir}/man1/rgbgfx.1
|
||||
|
||||
rgbasm: ${rgbasm_obj}
|
||||
$Q${CC} ${REALCFLAGS} -o $@ ${rgbasm_obj} -lm
|
||||
@@ -74,42 +97,61 @@ rgblink: ${rgblink_obj}
|
||||
rgbfix: ${rgbfix_obj}
|
||||
$Q${CC} ${REALCFLAGS} -o $@ ${rgbfix_obj}
|
||||
|
||||
rgbgfx: ${rgbgfx_obj}
|
||||
$Q${CC} ${REALCFLAGS} -o $@ ${rgbgfx_obj} `${PKG_CONFIG} --libs libpng`
|
||||
|
||||
.y.c:
|
||||
$Q${YACC} -d ${YFLAGS} -o $@ $<
|
||||
|
||||
.l.o:
|
||||
$Q${RM} $*.c
|
||||
$Q${FLEX} ${LFLAGS} -o $*.c $<
|
||||
$Q${CC} ${REALCFLAGS} -c -o $@ $*.c
|
||||
$Q${RM} $*.c
|
||||
|
||||
.c.o:
|
||||
$Q${CC} ${REALCFLAGS} -c -o $@ $<
|
||||
|
||||
src/asm/gameboy/locallex.o src/asm/globlex.o src/asm/lexer.o: src/asm/asmy.h
|
||||
src/asm/locallex.o src/asm/globlex.o src/asm/lexer.o: src/asm/asmy.h
|
||||
src/asm/asmy.h: src/asm/asmy.c
|
||||
|
||||
src/asm/asmy.y: ${yacc_pre}
|
||||
$Qcat ${yacc_pre} > $@
|
||||
|
||||
src/link/lexer.o : src/link/parser.h
|
||||
src/link/parser.h : src/link/parser.c
|
||||
|
||||
# Below is a target for the project maintainer to easily create win32 exes.
|
||||
# This is not for Windows users!
|
||||
# If you're building on Windows with Cygwin or Mingw, just follow the Unix
|
||||
# install instructions instead.
|
||||
mingw:
|
||||
$Qenv PATH=/usr/local/mingw32/bin:/bin:/usr/bin:/usr/local/bin \
|
||||
make CC=gcc CFLAGS="-I/usr/local/mingw32/include \
|
||||
-D__progname=\\\"\\\" \
|
||||
-D_Noreturn='__attribute__((noreturn))' ${CFLAGS}"
|
||||
$Qmv rgbasm rgbasm.exe
|
||||
$Qmv rgblink rgblink.exe
|
||||
$Qmv rgbfix rgbfix.exe
|
||||
$Q${RM} win32 win64
|
||||
$Qmkdir win32 win64
|
||||
$Qenv make clean
|
||||
$Qenv PKG_CONFIG_PATH=/usr/i686-w64-mingw32/sys-root/mingw/lib/pkgconfig/ \
|
||||
make CC=i686-w64-mingw32-gcc YACC=bison WARNFLAGS= -j
|
||||
$Qmv rgbasm win32/rgbasm.exe
|
||||
$Qmv rgblink win32/rgblink.exe
|
||||
$Qmv rgbfix win32/rgbfix.exe
|
||||
$Qmv rgbgfx win32/rgbgfx.exe
|
||||
$Qenv make clean
|
||||
$Qenv PKG_CONFIG_PATH=/usr/x86_64-w64-mingw32/sys-root/mingw/lib/pkgconfig/ \
|
||||
make CC=x86_64-w64-mingw32-gcc YACC=bison WARNFLAGS= -j
|
||||
$Qmv rgbasm win64/rgbasm.exe
|
||||
$Qmv rgblink win64/rgblink.exe
|
||||
$Qmv rgbfix win64/rgbfix.exe
|
||||
$Qmv rgbgfx win64/rgbgfx.exe
|
||||
$Qenv make clean
|
||||
|
||||
# Below is a target for the project maintainer to easily create web manuals.
|
||||
# It relies on mandoc: http://mdocml.bsd.lv
|
||||
MANDOC = -Thtml -Ios=General -Oman=/rgbds/manual/%N/ \
|
||||
-Ostyle=/rgbds/manual/manual.css
|
||||
MANDOC = -Thtml -Ios=General -Oman=%N.%S.html -Ostyle=manual.css
|
||||
|
||||
wwwman:
|
||||
$Qmandoc ${MANDOC} src/rgbds.7 | sed s/OpenBSD/General/ > rgbds.html
|
||||
$Qmandoc ${MANDOC} src/asm/rgbasm.1 | sed s/OpenBSD/General/ > \
|
||||
rgbasm.html
|
||||
$Qmandoc ${MANDOC} src/fix/rgbfix.1 | sed s/OpenBSD/General/ > \
|
||||
rgbfix.html
|
||||
$Qmandoc ${MANDOC} src/link/rgblink.1 | sed s/OpenBSD/General/ > \
|
||||
rgblink.html
|
||||
$Qmandoc ${MANDOC} src/rgbds.7 > rgbds.7.html
|
||||
$Qmandoc ${MANDOC} src/gbz80.7 > gbz80.7.html
|
||||
$Qmandoc ${MANDOC} src/rgbds.5 > rgbds.5.html
|
||||
$Qmandoc ${MANDOC} src/asm/rgbasm.1 > rgbasm.1.html
|
||||
$Qmandoc ${MANDOC} src/asm/rgbasm.5 > rgbasm.5.html
|
||||
$Qmandoc ${MANDOC} src/fix/rgbfix.1 > rgbfix.1.html
|
||||
$Qmandoc ${MANDOC} src/link/rgblink.1 > rgblink.1.html
|
||||
$Qmandoc ${MANDOC} src/link/rgblink.5 > rgblink.5.html
|
||||
$Qmandoc ${MANDOC} src/gfx/rgbgfx.1 > rgbgfx.1.html
|
||||
|
||||
58
README
58
README
@@ -1,58 +0,0 @@
|
||||
----------------
|
||||
RGBDS README
|
||||
----------------
|
||||
|
||||
RGBDS (Rednex Game Boy Development System) is a free assembler/linker package
|
||||
for the Game Boy and Game Boy Color. It consists of:
|
||||
|
||||
- rgbasm (assembler)
|
||||
- rgblink (linker)
|
||||
- rgbfix (checksum/header fixer)
|
||||
|
||||
rgbds-linux is a fork of the original RGBDS which aims to make the programs
|
||||
more like other UNIX tools.
|
||||
|
||||
|
||||
Installing RGBDS (UNIX)
|
||||
=========================
|
||||
|
||||
To build the programs on a UNIX or UNIX-like system, just run in your terminal:
|
||||
|
||||
make
|
||||
|
||||
Then to install the compiled programs and manual pages, run (with appropriate
|
||||
privileges):
|
||||
|
||||
make install
|
||||
|
||||
After installation, you can read the manuals with the man(1) command. E.g.,
|
||||
|
||||
man 1 rgbasm
|
||||
|
||||
|
||||
Note: the variables described below can affect installation behavior when given
|
||||
on the make command line. For example, to install rgbds in your home directory
|
||||
instead of systemwide, run the following:
|
||||
|
||||
mkdir -p $HOME/{bin,man/man1,man/man7}
|
||||
make install PREFIX=$HOME
|
||||
|
||||
|
||||
PREFIX: Location where RGBDS will be installed. Defaults to /usr/local.
|
||||
|
||||
BINPREFIX: Location where the RGBDS programs will be installed. Defaults
|
||||
to ${PREFIX}/bin.
|
||||
|
||||
MANPREFIX: Location where the RGBDS man pages will be installed. Defaults
|
||||
to ${PREFIX}/man.
|
||||
|
||||
Q: Whether to quiet the build or not. To make the build more verbose, clear
|
||||
this variable. Defaults to @.
|
||||
|
||||
|
||||
Installing RGBDS (Windows)
|
||||
============================
|
||||
|
||||
Windows builds are available here: http://anthony.bentley.name/rgbds/
|
||||
|
||||
Copy the .exe files to C:\Windows\ or similar.
|
||||
158
README.md
Normal file
158
README.md
Normal file
@@ -0,0 +1,158 @@
|
||||
# RGBDS
|
||||
|
||||
RGBDS (Rednex Game Boy Development System) is a free assembler/linker package
|
||||
for the Game Boy and Game Boy Color. It consists of:
|
||||
|
||||
- rgbasm (assembler)
|
||||
- rgblink (linker)
|
||||
- rgbfix (checksum/header fixer)
|
||||
- rgbgfx (PNG‐to‐Game Boy graphics converter)
|
||||
|
||||
This is a fork of the original RGBDS which aims to make the programs more like
|
||||
other UNIX tools.
|
||||
|
||||
This toolchain is maintained on [GitHub](https://github.com/rednex/rgbds), as
|
||||
well as its [documentation](https://github.com/rednex/rednex.github.io).
|
||||
|
||||
The documentation of this toolchain can be viewed online
|
||||
[here](https://rednex.github.io/), it is generated from the man pages found in
|
||||
this repository.
|
||||
|
||||
## 1. Installing RGBDS
|
||||
|
||||
### 1.1 Windows
|
||||
|
||||
Windows builds are available in the releases page on GitHub:
|
||||
|
||||
https://github.com/rednex/rgbds/releases
|
||||
|
||||
Copy the `.exe` files to `C:\Windows\` or similar.
|
||||
|
||||
If you require the latest version in development, it should be possible to
|
||||
compile RGBDS with MinGW or Cygwin by following the instructions to build it
|
||||
on UNIX systems.
|
||||
|
||||
### 1.2 macOS
|
||||
|
||||
You can build RGBDS by following the instructions below. However, if you would
|
||||
prefer not to build RGBDS yourself, you may also install it using
|
||||
[Homebrew](http://brew.sh/).
|
||||
|
||||
To install the latest release, use:
|
||||
|
||||
```sh
|
||||
brew install rgbds
|
||||
```
|
||||
|
||||
To install RGBDS with all of the current changes in development (as seen on the
|
||||
`master` branch on GitHub), use:
|
||||
|
||||
```sh
|
||||
brew install rgbds --HEAD
|
||||
```
|
||||
|
||||
### 1.3 Other UNIX-like systems
|
||||
|
||||
No official binaries of RGBDS are distributed for these systems, you must follow
|
||||
the simple instructions below to compile and install it.
|
||||
|
||||
|
||||
## 2. Building RGBDS from source
|
||||
|
||||
RGBDS can be built in UNIX-like systems by following the instructions below.
|
||||
|
||||
### 2.1 Dependencies
|
||||
|
||||
RGBDS requires yacc, flex, libpng and pkg-config to be installed.
|
||||
|
||||
On macOS, install the latter two with [Homebrew](http://brew.sh/):
|
||||
|
||||
```sh
|
||||
brew install libpng pkg-config
|
||||
```
|
||||
|
||||
On other Unixes, use the built-in package manager. For example, on Debian or
|
||||
Ubuntu:
|
||||
|
||||
```sh
|
||||
sudo apt-get install byacc flex pkg-config libpng-dev
|
||||
```
|
||||
|
||||
You can test if libpng and pkg-config are installed by running
|
||||
`pkg-config --cflags libpng`: if the output is a path, then you're good, and if
|
||||
it outputs an error then you need to install them via a package manager.
|
||||
|
||||
### 2.2 Build process
|
||||
|
||||
To build the programs, run in your terminal:
|
||||
|
||||
```sh
|
||||
make
|
||||
```
|
||||
|
||||
Then, to install the compiled programs and manual pages, run (with appropriate
|
||||
privileges, e.g, with `sudo`):
|
||||
|
||||
|
||||
```sh
|
||||
make install
|
||||
```
|
||||
|
||||
After installation, you can read the manuals with the `man` command. E.g.,
|
||||
|
||||
```sh
|
||||
man 7 rgbds
|
||||
```
|
||||
|
||||
There are some variables in the Makefile that can be redefined by the user. The
|
||||
variables described below can affect installation behavior when given on the
|
||||
make command line. For example, to install RGBDS in your home directory instead
|
||||
of systemwide, run the following:
|
||||
|
||||
```sh
|
||||
mkdir -p $HOME/{bin,man/man1,man/man7}
|
||||
make install PREFIX=$HOME
|
||||
```
|
||||
|
||||
To do a verbose build, run:
|
||||
|
||||
```sh
|
||||
make Q=
|
||||
```
|
||||
|
||||
This is the complete list of user-defined variables:
|
||||
|
||||
- `PREFIX`: Location where RGBDS will be installed. Defaults to `/usr/local`.
|
||||
|
||||
- `bindir`: Location where the binaries will be installed. Defaults to `${PREFIX}/bin`.
|
||||
|
||||
- `mandir`: Location where the manpages will be installed. Defaults to `${PREFIX}/man`.
|
||||
|
||||
- `DESTDIR`: This is prepended to all paths during the installation. It is
|
||||
mainly used for packaging.
|
||||
|
||||
- `Q`: Whether to quiet the build or not. To make the build more verbose, clear
|
||||
this variable. Defaults to `@`.
|
||||
|
||||
- `STRIP`: Whether to strip the installed binaries of debug symbols or not.
|
||||
Defaults to `-s`.
|
||||
|
||||
- `BINMODE`: Permissions of the installed binaries. Defaults to `555`.
|
||||
|
||||
- `MANMODE`: Permissions of the installed manpages. Defaults to `444`.
|
||||
|
||||
## 3 History
|
||||
|
||||
- Around 1997, Carsten Sorensen (AKA SurfSmurf) writes ASMotor as a
|
||||
general-purpose assembler/linker system for DOS/Win32
|
||||
|
||||
- Around 1999, Justin Lloyd (AKA Otaku no Zoku) adapts ASMotor to read and
|
||||
produce GBZ80 assembly/machine code, and releases this version as RGBDS.
|
||||
|
||||
- 2009, Vegard Nossum adapts the code to be more UNIX-like and releases this
|
||||
version as rgbds-linux on [GitHub](https://github.com/vegard/rgbds-linux).
|
||||
|
||||
- 2010, Anthony J. Bentley forks that repository. The fork becomes the reference
|
||||
implementation of rgbds.
|
||||
|
||||
- 2017, Bentley's repository is moved to a neutral name.
|
||||
129
doc/asm.htm
129
doc/asm.htm
@@ -1,129 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm</title>
|
||||
<link rel="stylesheet" type="text/css" href="./style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>xAsm Documentation</h1>
|
||||
<h2>Table of Contents</h2>
|
||||
<h3>General stuff</h3>
|
||||
<ul>
|
||||
<li><a href="asm/history.htm">History</a>
|
||||
<li><a href="asm/usage.htm">Usage</a>
|
||||
<li><a href="asm/opt.htm">Changing options while assembling</a>
|
||||
<li><a href="asm/popo.htm">The option stack</a>
|
||||
<li><a href="asm/syntax.htm">Syntax and comments</a>
|
||||
<li><a href="asm/section.htm">Sections</a>
|
||||
</ul>
|
||||
|
||||
<h3>Symbols</h3>
|
||||
<ul>
|
||||
<li><a href="asm/symbols.htm">Symbols</a>
|
||||
<li><a href="asm/export.htm">Exporting and importing symbols</a>
|
||||
<li><a href="asm/purge.htm">Purging symbols</a>
|
||||
<li><a href="asm/presym.htm">Predeclared symbols</a>
|
||||
</ul>
|
||||
|
||||
<h3>The macrolanguage</h3>
|
||||
<ul>
|
||||
<li><a href="asm/print.htm">Printing out things during assembling</a>
|
||||
<li><a href="asm/rept.htm">Automatically repeating blocks of code</a>
|
||||
<li><a href="asm/fail.htm">Aborting the assembly process</a>
|
||||
<li><a href="asm/include.htm">Including other sourcefiles</a>
|
||||
<li><a href="asm/if.htm">Conditional assembling</a>
|
||||
<li><a href="asm/expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="asm/expr_fix.htm">Fixed-point expressions and functions</a>
|
||||
<li><a href="asm/expr_str.htm">String expressions, functions and formatting</a>
|
||||
<li><a href="asm/miscfunc.htm">Other functions</a>
|
||||
</ul>
|
||||
|
||||
<h3>Other ways than mnemonics to define data</h3>
|
||||
<ul>
|
||||
<li><a href="asm/db.htm">Defining constant data</a>
|
||||
<li><a href="asm/ds.htm">Declaring variables in a RAM section</a>
|
||||
<li><a href="asm/incbin.htm">Including binary files</a>
|
||||
</ul>
|
||||
|
||||
<h3>Target specific information</h3>
|
||||
<ul>
|
||||
<li><a href="asm/trg_gb.htm">The Gameboy</a>
|
||||
</ul>
|
||||
|
||||
<h3>Alphabetical list of the macro-language instructions and functions</h3>
|
||||
<ul>
|
||||
<li><a href="asm/presym.htm">@</a>
|
||||
<li><a href="asm/presym.htm">__DATE__</a>
|
||||
<li><a href="asm/presym.htm">__LINE__</a>
|
||||
<li><a href="asm/presym.htm">__TIME__</a>
|
||||
<li><a href="asm/presym.htm">_NARG</a>
|
||||
<li><a href="asm/presym.htm">_PI</a>
|
||||
<li><a href="asm/presym.htm">_RS</a>
|
||||
<li><a href="asm/expr_fix.htm">ACOS</a>
|
||||
<li><a href="asm/expr_fix.htm">ASIN</a>
|
||||
<li><a href="asm/expr_fix.htm">ATAN</a>
|
||||
<li><a href="asm/expr_fix.htm">ATAN2</a>
|
||||
<li><a href="asm/miscfunc.htm">BANK</a>
|
||||
<li><a href="asm/expr_fix.htm">COS</a>
|
||||
<li><a href="asm/db.htm">DB</a>
|
||||
<li><a href="asm/miscfunc.htm">DEF</a>
|
||||
<li><a href="asm/expr_fix.htm">DIV</a>
|
||||
<li><a href="asm/ds.htm">DS</a>
|
||||
<li><a href="asm/db.htm">DW</a>
|
||||
<li><a href="asm/if.htm">ELSE</a>
|
||||
<li><a href="asm/if.htm">ENDC</a>
|
||||
<li><a href="asm/macro.htm">ENDM</a>
|
||||
<li><a href="asm/rept.htm">ENDR</a>
|
||||
<li><a href="asm/equ.htm">EQU</a>
|
||||
<li><a href="asm/equs.htm">EQUS</a>
|
||||
<li><a href="asm/export.htm">EXPORT</a>
|
||||
<li><a href="asm/fail.htm">FAIL</a>
|
||||
<li><a href="asm/export.htm">GLOBAL</a>
|
||||
<li><a href="asm/section.htm">HRAM</a>
|
||||
<li><a href="asm/if.htm">IF</a>
|
||||
<li><a href="asm/export.htm">IMPORT</a>
|
||||
<li><a href="asm/incbin.htm">INCBIN</a>
|
||||
<li><a href="asm/include.htm">INCLUDE</a>
|
||||
<li><a href="asm/macro.htm">MACRO</a>
|
||||
<li><a href="asm/expr_fix.htm">MUL</a>
|
||||
<li><a href="asm/opt.htm">OPT</a>
|
||||
<li><a href="asm/popo.htm">POPO</a>
|
||||
<li><a href="asm/pops.htm">POPS</a>
|
||||
<li><a href="asm/print.htm">PRINTF</a>
|
||||
<li><a href="asm/print.htm">PRINTT</a>
|
||||
<li><a href="asm/print.htm">PRINTV</a>
|
||||
<li><a href="asm/purge.htm">PURGE</a>
|
||||
<li><a href="asm/popo.htm">PUSHO</a>
|
||||
<li><a href="asm/pops.htm">PUSHS</a>
|
||||
<li><a href="asm/rept.htm">REPT</a>
|
||||
<li><a href="asm/rs.htm">RB</a>
|
||||
<li><a href="asm/section.htm">ROM0</a>
|
||||
<li><a href="asm/section.htm">ROMX</a>
|
||||
<li><a href="asm/rs.htm">RSRESET</a>
|
||||
<li><a href="asm/rs.htm">RSSET</a>
|
||||
<li><a href="asm/rs.htm">RW</a>
|
||||
<li><a href="asm/section.htm">SECTION</a>
|
||||
<li><a href="asm/set.htm">SET</a>
|
||||
<li><a href="asm/shift.htm">SHIFT</a>
|
||||
<li><a href="asm/expr_fix.htm">SIN</a>
|
||||
<li><a href="asm/section.htm">SRAM</a>
|
||||
<li><a href="asm/expr_str.htm">STRCAT</a>
|
||||
<li><a href="asm/expr_str.htm">STRCMP</a>
|
||||
<li><a href="asm/expr_str.htm">STRIN</a>
|
||||
<li><a href="asm/expr_str.htm">STRLEN</a>
|
||||
<li><a href="asm/expr_str.htm">STRLWR</a>
|
||||
<li><a href="asm/expr_str.htm">STRSUB</a>
|
||||
<li><a href="asm/expr_str.htm">STRUPR</a>
|
||||
<li><a href="asm/expr_fix.htm">TAN</a>
|
||||
<li><a href="asm/section.htm">VRAM</a>
|
||||
<li><a href="asm/section.htm">WRAM0</a>
|
||||
<li><a href="asm/section.htm">WRAMX</a>
|
||||
<li><a href="asm/fail.htm">WARN</a>
|
||||
<li><a href="asm/export.htm">XDEF</a>
|
||||
<li><a href="asm/export.htm">XREF</a>
|
||||
</ul>
|
||||
|
||||
<p>Last updated 20 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,26 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm DB, DW</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>DB, DW</h1>
|
||||
<p><dfn>DB</dfn> defines a list of bytes that will be stored in the final image. Ideal for tables and text.</p>
|
||||
<pre>DB 1,2,3,4,"This is a string"</pre>
|
||||
<p>Alternatively you can use <dfn>DW</dfn> to store a list of words. Strings are not allowed as arguments to DW.</p>
|
||||
<p>You can also use DB and DW without arguments. This works exactly like “DS 1” and “DS 2” respectively. Consequently DB and DW can be used in a WRAM0/WRAMX/HRAM/VRAM/SRAM section.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="expr_fix.htm">Fixed-point expressions and functions</a>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
<li><a href="ds.htm">Declaring variables in a RAM section</a>
|
||||
<li><a href="miscfunc.htm">Other functions</a>
|
||||
</ul>
|
||||
|
||||
<hr>
|
||||
<p>Last updated 02 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,20 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm DS</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>DS</h1>
|
||||
<p><dfn>DS</dfn> allocates a number of bytes. The content is undefined. This is the preferred method of allocationg space in a <a href="section.htm">RAM section</a>. You can however also use DB and DW without any arguments.</p>
|
||||
<pre>DS str_SIZEOF ;allocate str_SIZEOF bytes</pre>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="db.htm">Defining constant data (DB/DW)</a>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 02 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,21 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm EQU</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>EQU</h1>
|
||||
<p>EQUates are constant symbols. They can for example be used for things such as bit-definitions of hardware-registers.</p>
|
||||
<pre>DONUT_ISGOOD EQU $01
|
||||
DONUT_ISBAD EQU $02</pre>
|
||||
<p>Note that a colon (:) following the label-name is not allowed. EQUates can be <a href="export.htm">exported and imported</a>. They don't change their value during the link process.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,27 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm EQUS</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>EQUS</h1>
|
||||
<p>EQUS is used to define string-symbols. Wherever the assembler meets a string symbol its name is replaced with its value. If you are familiar with C you can think of it as the same as #define.</p>
|
||||
<pre>COUNTREG EQUS "[hl+]"
|
||||
|
||||
ld a,COUNTREG</pre>
|
||||
<p>(Note that : following the label-name is not allowed.)</p>
|
||||
<p>This will be interpreted as:</p>
|
||||
<pre> ld a,[hl+]</pre>
|
||||
<p>String-symbols can also be used to define small one-line macros:</p>
|
||||
<pre>PUSHA EQUS "push af\npush bc\npush de\npush hl\n"</pre>
|
||||
<p>Note that a colon (:) following the label-name is not allowed. String equates can't be exported or imported.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,35 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm EXPORT/XREF, IMPORT/XDEF, GLOBAL</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>EXPORT/XREF, IMPORT/XDEF, GLOBAL</h1>
|
||||
<p>Importing and exporting of symbols is a feature that is very useful when your project spans many source-files and for example you need to jump to a routine defined in another file.</p>
|
||||
<table>
|
||||
<caption>Import/export commands</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Command</th>
|
||||
<th scope="col">Meaning</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>IMPORT (or XREF) <i>label</i>[,<i>label</i>,...]</td>
|
||||
<td>This instructs the assembler to define label as if it were present
|
||||
in the current file but leave the address calculation to the linker.</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>EXPORT (or XDEF) <i>label</i>[,<i>label</i>,...]</td>
|
||||
<td>The assembler will make <i>label</i> accessible to other files during the link process.</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>GLOBAL <i>label</i>[,<i>label</i>,...]</td>
|
||||
<td>If <i>label</i> is defined during the assembly it will be exported, if not it will be imported. Handy (very!) for include-files.</td>
|
||||
</tr>
|
||||
</table>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body></html>
|
||||
@@ -1,76 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Fixed-point expression</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Fixed‐point Expressions</h1>
|
||||
<p>Fixed point constants are basically normal 32-bit constants where the upper 16 bits are used for the integer part and the lower 16 bits are used for the fraction (65536ths). This means that you can use them in normal integer expression and indeed some integer operators like plus and minus don't care whether the operands are integer or fixed-point. You can easily convert a fixed-point number to an integer by shifting it right 16 bits. It follows that you can convert an integer to a fixed-point number by shifting it left.</p>
|
||||
<p>Some things are different for fixed-point math though. Which is why you have the following functions to use:</p>
|
||||
|
||||
<table>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Name</th>
|
||||
<th scope="col">Operation</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>DIV(x,y)</td>
|
||||
<td>x/y</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>MUL(x,y)</td>
|
||||
<td>x*y</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>SIN(x)</td>
|
||||
<td>sin(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>COS(x)</td>
|
||||
<td>cos(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>TAN(x)</td>
|
||||
<td>tan(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ASIN(x)</td>
|
||||
<td>sin<SUP>-1</SUP>(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ACOS(x)</td>
|
||||
<td>cos<SUP>-1</SUP>(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ATAN(x)</td>
|
||||
<td>tan<SUP>-1</SUP>(x)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>ATAN2(x,y)</td>
|
||||
<td>(x,y) angle</td>
|
||||
</tr>
|
||||
</table>
|
||||
<p>These functions are extremely useful for automatic generation of various tables. A circle has 65536.0 degrees. Sine values are between [-1.0;1.0]</p>
|
||||
<pre>; --
|
||||
; -- Generate a 256 byte sine table with values between 0 and 128
|
||||
; --
|
||||
ANGLE SET 0.0
|
||||
REPT 256
|
||||
DB (MUL(64.0,SIN(ANGLE))+64.0)>>16
|
||||
ANGLE SET ANGLE+256.0
|
||||
ENDR</pre>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="symbols.htm">Symbols</a>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
<li><a href="miscfunc.htm">Other functions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,92 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Integer/Boolean expressions</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Integer and Boolean expressions</h1>
|
||||
<p>An expression can be composed of many things. Expressions are always evaluated using signed 32-bit math.</p>
|
||||
<p>The most basic expression is just a single number.</p>
|
||||
<h2>Numeric Formats</h2>
|
||||
<p>xAsm has a number of numeric formats.</p>
|
||||
<ul>
|
||||
<li>Hexadecimal: $0123456789ABCDEF. Case-insensitive
|
||||
<li>Decimal: 0123456789
|
||||
<li>Octal: &01234567
|
||||
<li>Binary: %01
|
||||
<li>Fixedpoint (16.16): 01234.56789
|
||||
<li>Character constant: "ABYZ"
|
||||
<li>Gameboy graphics: `0123
|
||||
</ul>
|
||||
<p>The last one, Gameboy graphics, is quite interesting and useful. The values are actually pixel values and it converts the “chunky” data to “planar” data as used in the Gameboy.</p>
|
||||
<pre>DW `01012323</pre>
|
||||
<p>Admittedly an expression with just a single number is quite boring. To spice things up a bit there’s a few operators you can use to perform calculations between numbers.</p>
|
||||
<h2>Operators</h2>
|
||||
<p>A great number of operators you can use in expressions are available (listed in order of precedence):</p>
|
||||
<table>
|
||||
<caption>Operators</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Operator</th>
|
||||
<th scope="col">Meaning</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>( )</td>
|
||||
<td>Precedence override</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>FUNC()</td>
|
||||
<td>Functioncall</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>~ + -</td>
|
||||
<td>Unary not/plus/minus</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>* / %</td>
|
||||
<td>Multiply/divide/modulo</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td><< >></td>
|
||||
<td>Shift left/right</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>& | ^</td>
|
||||
<td>Binary and/or/xor</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>+ -</td>
|
||||
<td>Add/subtract</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>!= == <= >= < ></td>
|
||||
<td>Boolean comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>&& ||</td>
|
||||
<td>Boolean and/or</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>!</td>
|
||||
<td>Unary Boolean not</td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
<p>The result of the boolean operators is zero if when FALSE and non-zero when TRUE. Thus it is legal to use an integer as the condition for <a href="if.htm">IF</a> blocks. You can use symbols instead of numbers in your expression if you wish.</p>
|
||||
|
||||
<p>An expression is said to be constant when it doesn't change its value during linking. This basically means that you can't use labels in those expressions. The instructions in the macro-language all require expressions that are constant.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="symbols.htm">Symbols</a>
|
||||
<li><a href="expr_fix.htm">Fixed-point expressions and functions</a>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
<li><a href="miscfunc.htm">Other functions</a>
|
||||
</ul>
|
||||
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,114 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm String expressions</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>String Expressions</h1>
|
||||
<p>The most basic string expression is any number of characters contained in double quotes ("for instance"). As in C the escape character is <b>\</b> and there is a number of commands you can use within a string:</p>
|
||||
<table>
|
||||
<caption>Escape characters:</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Character sequence</th>
|
||||
<th scope="col">Meaning</th>
|
||||
<th scope="col">Notes</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>\\</td>
|
||||
<td>Backslash</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\"</td>
|
||||
<td>Double-quote</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\{</td>
|
||||
<td>Curly bracket left</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\}</td>
|
||||
<td>Curly bracket right</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\n</td>
|
||||
<td>Newline ($0A)</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\t</td>
|
||||
<td>Tab ($09)</td>
|
||||
<td></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\1-\9</td>
|
||||
<td>Macroargument</td>
|
||||
<td>Only in macros</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>\@</td>
|
||||
<td>Labelname suffix</td>
|
||||
<td>Only in macros and repts</td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
<p>A funky feature is <b>{symbol}</b> withing a string. This will examine the type of the symbol and insert its value accordingly. If symbol is a string symbol the symbols value is simply copied. If it's a numeric symbol the value is converted to hexadecimal notation and inserted as a string.</p>
|
||||
<p><strong>HINT:</strong> The <b>{symbol}</b> construct can also be used outside strings. The symbols value is again inserted as a string. This is just a short way of doing "{symbol}".</p>
|
||||
<p>Whenever the macro-language expects a string you can actually use a string expression. This consists of one or more of these function. Yes, you can nest them. Note that some of these functions actually return an integer and can be used as part of an integer expression!</p>
|
||||
<table>
|
||||
<caption>String functions:</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Name</th>
|
||||
<th scope="col">Operation</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>STRLEN(<i>stringexpr</i>)</td>
|
||||
<td>Returns the number of characters in <i>string</i></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRCAT(<i>stringexpr1,stringexpr2</i>)</td>
|
||||
<td>Appends <i>stringexpr2</i> to <i>stringexpr1</i>.</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRCMP(<i>stringexpr1,stringexpr2</i>)</td>
|
||||
<td>Returns negative if <i>stringexpr1</i> is alphabetically less than <i>stringexpr2</i><BR>Zero if they match<BR>Positive if greater than</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRIN(<i>haystack,needle</i>)</td>
|
||||
<td>Returns <i>needle</i>s position within <i>haystack</i> or zero if it's not present</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRSUB(<i>stringexpr,pos,count</i>)</td>
|
||||
<td>Returns a substring of <i>stringexpr</i> starting at <i>pos</i> (first character is position 1) and with <i>count</i> characters</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRUPR(<i>stringexpr</i>)</td>
|
||||
<td>Converts all characters in <i>string</i> to capitals and returns the new string</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>STRLWR(<i>string</i>)</td>
|
||||
<td>Converts all characters in <i>string</i> to lower case and returns the new string</td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="symbols.htm">Symbols</a>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="expr_fix.htm">Fixed-point expressions and functions</a>
|
||||
<li><a href="miscfunc.htm">Other functions</a>
|
||||
</ul>
|
||||
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,20 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm FAIL, WARN</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>FAIL, WARN</h1>
|
||||
<p>FAIL and WARN can be used to terminate the assembling process if you wish to do so. This is especially useful for macros that get an invalid argument. FAIL and WARN take a string as the only argument and they will print this string out as a normal error with a linenumber.</p>
|
||||
<p>FAIL stops assembling immediately while WARN continues after printing the errormessage.</p>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,224 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm History</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>xAsm History</h1>
|
||||
<table>
|
||||
<caption>The history of xAsm</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Version</th>
|
||||
<th scope="col">Dated</th>
|
||||
<th scope="col">Release notes</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>1.0</td>
|
||||
<td>1 Oct. 96</td>
|
||||
<td>First release</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.01</td>
|
||||
<td>1 Dec. 96</td>
|
||||
<td><ul>
|
||||
<li>Fixed bug in <a href="incbin.htm">INCBIN</a> (sometimes reported the section full)</li>
|
||||
<li>Added <a href="miscfunc.htm">DEF()</a> function
|
||||
</ul></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.02</td>
|
||||
<td>12 Feb. 97</td>
|
||||
<td><ul>
|
||||
<li>Added <a href="expr_str.htm">STRLEN(), STRCAT(), STRIN(), STRCMP(), STRSUB(), STRUPR() and STRLWR()</a> functions</li>
|
||||
<li><a href="export.htm">IMPORT/EXPORT/GLOBAL</a> takes multiple arguments now</li>
|
||||
<li><a href="section.htm">HRAM</a> sectiontype added</li>
|
||||
<li>ORG like features added to <a href="section.htm">SECTION</a></li>
|
||||
<li><a href="trg_gb.htm">LDIO</a> mnemonic added</li>
|
||||
</ul></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.03</td>
|
||||
<td>23 Mar. 97</td>
|
||||
<td><ul>
|
||||
<li>The <a href="section.htm">HRAM section</a> was 128 bytes long instead of 127. potentially thrashing the interrupt enable register if you filled the HRAM.</li>
|
||||
<li>The <a href="miscfunc.htm">BANK() function</a>, when used on a symbol defined in the current sourcefile, returned the wrong bank ID. (reported by Harry P. Mulder)</li>
|
||||
<li>The <a href="miscfunc.htm">BANK() function</a> didn't check whether the argument was a properly defined symbol. (reported by Harry P. Mulder)</li>
|
||||
<li>Completely new lexical analyser module. This fixed several linenumber bugs and other macro/if/rept related bugs. Also fixed a bug which made it possible to have equated symbols with the same name as a reserved keyword (if you get a "parse error" with this release on some of your sources, this is probably what is going on)</li>
|
||||
<li><a href="fail.htm">FAIL and WARN</a> commands.</li>
|
||||
<li><a href="presym.htm">__LINE__, __FILE__, __TIME__, __DATE__</a> predefined symbols added.</li>
|
||||
</ul>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.04</td>
|
||||
<td>03 July 1997</td>
|
||||
<td><ul><li>First ASMotor release</li>
|
||||
<li><a href="presym.htm">__TIME__ and __DATE__</a> give todays date instead of when the assembler was compiled.</li>
|
||||
<li>Sometimes the first line of a file wouldn't assemble correctly. Reported by Jeff Frohwein.</li>
|
||||
<li>Unrolling multiline <a href="equs.htm">string symbols</a> left the linecounter in a sorry state. Jeff Frohwein again.</li>
|
||||
<li><a href="db.htm">DB and DW</a> can now (officially ;-) be used in BSS/HRAM/VRAM sections without any arguments to reserve a byte or a word respectively. Reported/suggested/inspired by Mr. Frohwein.</li>
|
||||
<li>The character # can now be used as part of a <a href="symbols.htm">symbol name</A>. Jeff....</li>
|
||||
<li>The <a href="rs.htm">RS</a> counter "_RS" is now defined from the very start of the assembly process instead of after the first RSSET or RSRESET.</li>
|
||||
<li>Bug fixed: You couldn't use \0-\9 and \@ in <a href="expr_str.htm">{} constructs</a></li>
|
||||
<li><a href="purge.htm">PURGE</a> pseudo-op added. Purges a symbol from the symboltable and memory. Use with extreme caution! Inspired by Harry P. Mulder</li>
|
||||
<li><a href="macro.htm">MACRO</a> parameter passing method changed drastically. Read (and re-read) the manual for details. Suggested by Harry P. Mulder.</li>
|
||||
</ul>
|
||||
</td>
|
||||
<tr>
|
||||
<td>1.05</td>
|
||||
<td>20 July 1997</td>
|
||||
<td><B>RGBDS fixes:</B><BR>
|
||||
RGBAsm supports the LDD and LDI syntax plus [HLD] and [HLI]. LDH is
|
||||
synonymous with LDIO.<BR>
|
||||
<B>General fixes:</B><BR>
|
||||
There was a bug in the macro parameter passing. Any whitespace after the
|
||||
last parameter would be appended to the last parameter. Reported by Jeff Frohwein.<BR>
|
||||
A section stack has been implemented. Look up <a href="pops.htm">POPS and PUSHS</A>. Jeff Frohweins doing again.<BR>
|
||||
<a href="opt.htm">OPT</A> command added for defining and changing some options while assembling.<BR>
|
||||
You can now define which characters are used for the <a href="expr_int.htm">Gameboy graphics
|
||||
integer (`)</A> using the <a href="usage.htm">commandline</A> or the new <a href="opt.htm">OPT</A> command. Cool idea by (surprise surprise) Jeff Frohwein.<BR>
|
||||
Also, an option stack has been added. Look up <a href="popo.htm">POPO and PUSHO</A> in the
|
||||
manual.<BR>
|
||||
Fixed yet another line number bug reported by Jeff Frohwein (when will this guy leave me alone? ;)<BR>
|
||||
</td>
|
||||
<tr>
|
||||
<td>1.06</td>
|
||||
<td>22 July 1997</td>
|
||||
<td><B>General fixes:</B><BR>
|
||||
The lamest typo bug of all time has been fixed. RGBAsm would output a word defined with DW as 4 bytes instead of 2. Jeff Frohwein reported this.<BR>
|
||||
The first line of an included file didn't assemble correctly.<BR>
|
||||
<a href="usage.htm">-b option</A> added for setting the characters used for binary constants.<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>21 September 1997</td>
|
||||
<td><B>General fixes:</B><BR>
|
||||
A crash occured if you tried to use a macro symbol in an expression.
|
||||
(Jeff Frohwein)<BR>
|
||||
You couldn't use STRCMP, STRLEN and STRIN in relocatable expressions. (Harry
|
||||
P. Mulder)<BR>
|
||||
Relocatable symbols are no longer allowed as arguments to the DEF function.<BR>
|
||||
Bug fixed in the assembler where it would sometimes write out too many bytes
|
||||
for HRAM section definitions.<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>02 July 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
DQ directive added for defining 32-bit data constants. See operation of DW & DB.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>05 July 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Allow only a part of a binary file to be included instead of the whole thing.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>10 June 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Added output of file dependency information for each file included/assembled. Enabled with a command line option.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Added ORG directive to allow anonymous sections.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Added ability to output error information in either RGBDS or Microsoft Developer Studio format.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Added pseudo-instructions to handle NE (not equal), EQ (equal), and LT (less than) on JR/JP/CALL instructions
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Added STRTRIM, STRLTRIM, STRRTRIM directives to allow trimming of white space from strings in macro arguments.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Bug Fix:</B>
|
||||
<BR>
|
||||
When an "unknown symbol" error was reported during the link phase the undefined symbol was not given.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.08</td>
|
||||
<td>?? ???? 1999</td>
|
||||
<td>
|
||||
<B>Bug Fix:</B>
|
||||
<BR>
|
||||
Declaring a symbol as GLOBAL in a header file and then referencing it in code but never defining it would crash the linker.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.09</td>
|
||||
<td>08 February 2000</td>
|
||||
<td>
|
||||
<B>Feature:</B>
|
||||
<BR>
|
||||
Can now use a command line option to set the number format between a slightly tweaked Motorola/RGBDS format and Zilog.
|
||||
<BR>
|
||||
Hex numbers can now be represented as $FF or FFh.
|
||||
<BR>
|
||||
Octal as &77 or 77o.
|
||||
<BR>
|
||||
Binary as %10010110 or 10010110b.
|
||||
<BR>
|
||||
Gameboy graphics numbers as `1001 or 1001g.
|
||||
<BR>
|
||||
Decimal numbers remain unchanged.
|
||||
<BR>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
</TABLE>
|
||||
|
||||
<BR><HR>
|
||||
<FONT SIZE="-1"><I><P ALIGN=RIGHT>Last updated 21 September 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</A></P></I></FONT>
|
||||
@@ -1,24 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm IF, ELSE, ENDC</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>IF, ELSE, ENDC</h1>
|
||||
<p>These three commands is used to conditionally assemble parts of your file. It is a powerful feature commonly used in macros.</p>
|
||||
<pre>IF 2+2==4
|
||||
PRINTT "2+2==4\n"
|
||||
ELSE
|
||||
PRINTT "2+2!=4\n"
|
||||
ENDC</pre>
|
||||
<p>The ELSE block is optional. IF/ELSE/ENDC-blocks can be nested.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,22 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm INCBIN</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>INCBIN</h1>
|
||||
<p>You probably have some graphics you’d like to include. Use <dfn>INCBIN</dfn> to include a raw binary file as it is. If the file isn’t found in the current directory the <a href="usage.htm">include-path</a> list will be searched.</p>
|
||||
<pre>INCBIN "titlepic.bin"
|
||||
INCBIN "sprites\\hero.bin"</pre>
|
||||
<p>You can also include only part of a file with <b>INCBIN</b>. The example below includes 256 bytes from <i>data.bin</i> starting from position 78.</p>
|
||||
<pre>INCBIN "data.bin",78,256</pre>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,19 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm INCLUDE</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>INCLUDE</h1>
|
||||
<p>Use INCLUDE to process another assembler-file and then return to the current file when done. If the file isn't found in the current directory the <a href="usage.htm">include-path</a> list will be searched. You may nest <b>INCLUDE</b> calls infinitely (or until you run out of memory whichever comes first).</p>
|
||||
<pre>INCLUDE "irq.inc"</pre>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,22 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Labels</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Labels</h1>
|
||||
<p>One of the assembler’s main tasks is to keep track of addresses for you so you dor’t have to remember obscure numbers but can make do with a meaningful name, a label.</p>
|
||||
<p>This can be done in a number of ways:</p>
|
||||
<pre>GlobalLabel
|
||||
AnotherGlobal:
|
||||
.locallabel
|
||||
.yet_a_local:
|
||||
ThisWillBeExported:: ;note the two colons</pre>
|
||||
<p>This is very similar to other assemblers. Local labels are only accessible within the scope they are defined. A scope starts after a global label and ends at the next global label. You may or may not have seen the <b>::</b> feature before. It declares a normal global label but does an <a href="export.htm">EXPORT</a> at the same time.</p>
|
||||
<p>Labels will normally change their value during the <a href="../link.htm">link process</a> and are thus <em>not</em> constant.</p>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,60 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm MACRO/ENDM</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>MACRO, ENDM</h1>
|
||||
<p>One of the best features of an assembler is the ability to write macros for it. Macros also provide a method of passing arguments to them and they can then react to the input using IF-constructs.</p>
|
||||
<pre>MyMacro: MACRO
|
||||
ld a,80
|
||||
call MyFunc
|
||||
ENDM</pre>
|
||||
<p>The above example is a very simple macro. You execute the macro by typing its name.</p>
|
||||
<pre> add a,b
|
||||
ld sp,hl
|
||||
MyMacro ;This will be expanded
|
||||
sub a,87</pre>
|
||||
<p>When the assembler meets MyMacro it will insert the macrodefinition (the text enclosed in <b>MACRO/ENDM</b>).</p>
|
||||
<p id="labelsuffix">Suppose your macro contains a loop.</p>
|
||||
<pre>LoopyMacro: MACRO
|
||||
xor a,a
|
||||
.loop ld [hl+],a
|
||||
dec c
|
||||
jr nz,.loop
|
||||
ENDM</pre>
|
||||
<p>This is fine. That is, if you only use the macro once per <a href="labels.htm">scope</a>. To get around this problem there is a special label string equate called <b>\@</b> that you can append to your labels and it will then expand to a unique string.</p>
|
||||
<p><b>\@</b> also works in <a href="rept.htm">REPT-blocks</a> should you have any loops there.</p>
|
||||
<pre>LoopyMacro: MACRO
|
||||
xor a,a
|
||||
.loop\@ ld [hl+],a
|
||||
dec c
|
||||
jr nz,.loop\@
|
||||
ENDM</pre>
|
||||
<h2>Arguments</h2>
|
||||
<p>I’d like <i>LoopyMacro</i> a lot better if I didn’t have to pre-load the registers with values and <em>then</em> call it. What I’d like is the ability to pass it arguments and it then loaded the registers itself.</p>
|
||||
<p>And I can do that. In macros you can get the arguments by using the special macro string equates <b>\1</b> through <b>\9</b>, <b>\1</b> being the first argument specified on the calling of the macro.</p>
|
||||
<pre>LoopyMacro: MACRO
|
||||
ld hl,\1
|
||||
ld c,\2
|
||||
xor a,a
|
||||
.loop\@ ld [hl+],a
|
||||
dec c
|
||||
jr nz,.loop\@
|
||||
ENDM</pre>
|
||||
<p>Now I can call the macro specifying two arguments. The first being the address and the second being a bytecount. The macro will then reset all bytes in this range.</p>
|
||||
<pre> LoopyMacro MyVars,54</pre>
|
||||
<p>You can specify up to nine arguments when calling a macro. Arguments are passed as string equates. There’s no need to enclose them in quotes. Parameter passing has changed a bit since v1.03 in that an expression will not be evaluated first but passed directly. This means that it’s probably a very good idea to use brackets around \1–\9 if you perform further calculations on them. For instance if you pass 1+2 as the first argument and then do <code> PRINTV \1*2</code>
|
||||
you will get the value 5 on screen and not 6 as you might have expected.</p>
|
||||
<p>Note that a colon (:) following the macro-name is required. Macros can't be exported or imported. It's valid to call a macro from a macro (yes, even the same one).</p>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="shift.htm">SHIFT</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 02 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,38 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Other functions</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Other functions</h1>
|
||||
<p>There's a few other functions that do various useful things:</p>
|
||||
<table>
|
||||
<caption>Other functions</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Name</th>
|
||||
<th scope="col">Operation</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>BANK(<i>label</i>)</td>
|
||||
<td>Gameboy ONLY: Returns the bank number <i>label</i> is in. The link will have to resolve this so it can't be used when the expression has to be constant</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>DEF(<i>label</i>)</td>
|
||||
<td>Returns TRUE if <i>label</i> has been defined</td>
|
||||
</tr>
|
||||
</table>
|
||||
<h1>See alse:</h1>
|
||||
<ul>
|
||||
<li><a href="section.htm">Sections</a>
|
||||
<li><a href="symbols.htm">Symbols</a>
|
||||
<li><a href="presym.htm">Predeclared symbols</a>
|
||||
<li><a href="if.htm">Conditional assembling</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,27 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm OPT</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>OPT</h1>
|
||||
<p>OPT can be used to change <I>some</I> of the options during assembling you source instead of defining them on the commandline.</p>
|
||||
<p>OPT takes a comma-seperated list of options as its argument:</p>
|
||||
|
||||
<pre> PUSHO
|
||||
OPT g.oOX ;Set the GB graphics constants to use these characters
|
||||
DW `..ooOOXX
|
||||
POPO
|
||||
DW `00112233</pre>
|
||||
<p>The options that OPT can modify are currently: <b>b, e and g</b></p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="usage.htm">Usage</a>
|
||||
<li><a href="popo.htm">The option stack</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 20 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,18 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm POPO, PUSHO</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>POPO, PUSHO</h1>
|
||||
<p>POPO and PUSHO provide the interface to the option stack. PUSHO will push the current set of options on the option stack. POPO can then later be used to restore them. Useful if you want to change some options in an include file and you don't want to destroy the options set by the program that included your file. The stacks number of entries is limited only by the amount of memory in your machine.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="opt.htm">Changing options while assembling</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 20 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,18 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm POPS, PUSHS</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>POPS, PUSHS</h1>
|
||||
<p>POPS and PUSHS provide the interface to the section stack. PUSHS will push the current section context on the section stack. POPS can then later be used to restore it. Useful for defining sections in included files when you don't want to destroy the section context for the program that included your file. The stacks number of entries is limited only by the amount of memory in your machine.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="section.htm">Sections</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 18 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,63 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Predeclared symbols</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Predeclared symbols</h1>
|
||||
<table>
|
||||
<caption>Symbols</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Name</th>
|
||||
<th scope="col">Contents</th>
|
||||
<th scope="col">Type</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>@</td>
|
||||
<td>PC value</td>
|
||||
<td>EQU</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>_PI</td>
|
||||
<td>Fixed point ¶</td>
|
||||
<td>EQU</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>_RS</td>
|
||||
<td>_RS counter</td>
|
||||
<td>SET</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>_NARG</td>
|
||||
<td>Number of arguments passed to macro</td>
|
||||
<td>EQU</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>__LINE__</td>
|
||||
<td>The current linenumber</td>
|
||||
<td>EQU</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>__FILE__</td>
|
||||
<td>The current filename</td>
|
||||
<td>EQUS</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>__DATE__</td>
|
||||
<td>Todays date</td>
|
||||
<td>EQUS</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>__TIME__</td>
|
||||
<td>The current time</td>
|
||||
<td>EQUS</td>
|
||||
</tr>
|
||||
</table>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,29 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm PRINTT, PRINTV, PRINTF</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>PRINTT, PRINTV, PRINTF</h1>
|
||||
<p>These three instructions type text and values to stdout. Useful for debugging macros or wherever you may feel the need to tell yourself some important information.</p>
|
||||
<pre>PRINTT "I'm the greatest programmer in the whole wide world\n"
|
||||
PRINTV (2+3)/5
|
||||
PRINTF MUL(3.14,3987.0)</pre>
|
||||
<ul>
|
||||
<li><dfn>PRINTT</dfn> prints out a string</li>
|
||||
<li><dfn>PRINTV</dfn> prints out an integer value or, as in the example, the result of a calculation. Unsurprisingly you can also print out a <a href="symbols.htm">constant symbols</a> value</li>
|
||||
<li><dfn>PRINTF</dfn> prints out a fixed point value.</li>
|
||||
</ul>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="asm/expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="asm/expr_fix.htm">Fixed-point expressions and functions</a>
|
||||
<li><a href="asm/expr_str.htm">String expressions, functions and formatting</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,18 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm PURGE</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>PURGE</h1>
|
||||
<p>The PURGE command allows you to completely remove a symbol from the symbol table as if it had never existed. USE WITH EXTREME CAUTION!!! I can’t stress this enough but you <em>seriously</em> need to know what you are doing. DON’T purge symbol that you use in expressions the linker needs to calculate. In fact, it’s probably not even safe to purge anything other than string symbols and macros.</p>
|
||||
<pre>Kamikaze EQUS "I don't want to live anymore"
|
||||
AOLer EQUS "Me too"
|
||||
PURGE Kamikaze,AOLer</pre>
|
||||
<p>Note that string symbols that are part of a PURGE command WILL NOT BE EXPANDED as the ONLY exception to this rule.</p>
|
||||
<hr>
|
||||
<p>Last updated 02 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,32 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm REPT, ENDR</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>REPT, ENDR</h1>
|
||||
<p>Suppose you’re feeling lazy and you want to unroll a time consuming loop. <dfn>REPT</dfn> is here for that purpose. Everything between REPT and ENDR will be repeated a number of times just as if you done a copy/paste operation yourself</p>
|
||||
<pre>REPT 4
|
||||
add a,c
|
||||
ENDR</pre>
|
||||
<p>This will assemble <code>add a,c</code> four times.</p>
|
||||
<p>You can also use REPT to generate tables on the fly:</p>
|
||||
<pre>; --
|
||||
; -- Generate a 256 byte sine table with values between 0 and 128
|
||||
; --
|
||||
ANGLE SET 0.0
|
||||
REPT 256
|
||||
DB (MUL(64.0,SIN(ANGLE))+64.0)>>16
|
||||
ANGLE SET ANGLE+256.0
|
||||
ENDR</pre>
|
||||
<p>REPT is also very useful in recursive macros and as in macros you can also use the special label operator \@. REPT-blocks can be nested.<p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="macro.htm#labelsuffix">\@</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,76 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm RSSET, RSRESET, RB, RW</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>RSSET, RERESET, RB, RW</h1>
|
||||
<p>The <dfn>RS</dfn> group of commands is a handy way of defining structures:</p>
|
||||
<pre> RSRESET
|
||||
str_pStuff RW 1
|
||||
str_tData RB 256
|
||||
str_bCount RB 1
|
||||
str_SIZEOF RB 0</pre>
|
||||
<p>The example defines four <a href="equ.htm">equated</a> symbols:</p>
|
||||
<table>
|
||||
<caption>Defined symbols</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Name</th>
|
||||
<th scope="col">Value</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>str_pStuff</td>
|
||||
<td>0</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>str_tData</td>
|
||||
<td>2</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>str_bCount</td>
|
||||
<td>258</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>str_SIZEOF</td>
|
||||
<td>259</td>
|
||||
</tr>
|
||||
</table>
|
||||
<p>There are four commands in the RS group of commands:</p>
|
||||
<table>
|
||||
<caption>RS related commands</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Command</th>
|
||||
<th scope="col">Meaning</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>RSRESET</td>
|
||||
<td>Resets the <a href="presym.htm">_RS</a> counter to zero</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>RSSET <i>constexpr</i></td>
|
||||
<td>Sets the <a href="presym.htm">_RS</a> counter to <i>constexpr</i></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>RB <i>constexpr</i></td>
|
||||
<td>Sets the preceding symbol to <a href="presym.htm">_RS</a> and adds <i>constexpr</i> to _RS</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>RW <i>constexpr</i></td>
|
||||
<td>Sets the preceding symbol to <a href="presym.htm">_RS</a> and adds <i>constexpr*2</i> to _RS</td>
|
||||
</tr>
|
||||
</table>
|
||||
<p>Note that a colon (:) following the symbol-name is not allowed. RS symbols can be exported and imported. They don't change their value during the link process.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,70 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm SECTION</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>SECTION</h1>
|
||||
<p>Before you can start writing code you must define a section. This tells the assembler what kind of data follows and if it is code where to put it.</p>
|
||||
<pre>SECTION "CoolStuff",ROMX</pre>
|
||||
<p>This switches to the section called <b>"CoolStuff"</b> (or creates it if it doesn't already exits) and it defines it as a code section. All sections within a sourcefile must be identified by a <em>unique</em> name.</p>
|
||||
|
||||
<p>Possible section types are as follows:
|
||||
|
||||
<dl>
|
||||
<dt>ROM0</dt>
|
||||
<dd>A ROM section. Mapped to memory at $0000–$3fff.</dd>
|
||||
|
||||
<dt>ROMX</dt>
|
||||
<dd>A banked ROM section. Mapped to memory at $4000–$7fff. Valid banks range from 1 to 511.</dd>
|
||||
|
||||
<dt>VRAM</dt>
|
||||
<dd>A banked video RAM section. Mapped to memory at $8000–$9fff. Can only allocate memory, not fill it. Valid banks range from 0 to 1.</dd>
|
||||
|
||||
<dt>SRAM</dt>
|
||||
<dd>A banked external (save) RAM section. Mapped to memory at $a000–$bfff. Can only allocate memory, not fill it. Valid banks range from 0 to 3.</dd>
|
||||
|
||||
<dt>WRAM0</dt>
|
||||
<dd>A general-purpose RAM section. Mapped to memory at $c000–$cfff. Can only allocate memory, not fill it.</dd>
|
||||
|
||||
<dt>WRAMX</dt>
|
||||
<dd>A banked general-purpose RAM section. Mapped to memory at $d000–$dfff. Can only allocate memory, not fill it. Valid banks range from 1 to 7.</dd>
|
||||
|
||||
<dt>HRAM</dt>
|
||||
<dd>A high RAM section. Mapped to memory at $ff80–$fffe. Can only allocate memory, not fill it. NOTE WELL: if you use this method of allocating HRAM the assembler will NOT choose the short addressingmode in the LD instruction because the actual address calculation is done by the linker! If you find this undesirable you can use <a href="rs.htm">RSSET/RB/RW</a> instead or use the LDIO mnemonic. The address calculation is then done by the assembler.</dd>
|
||||
</dl>
|
||||
|
||||
<p>The following deprecated section names are aliases for some of the above sections:
|
||||
|
||||
<dl>
|
||||
<dt>HOME</dt>
|
||||
<dd>Alias for ROM0.</dd>
|
||||
|
||||
<dt>CODE</dt>
|
||||
<dt>DATA</dt>
|
||||
<dd>Alias for ROMX.</dd>
|
||||
|
||||
<dt>BSS</dt>
|
||||
<dd>Alias for WRAM0.</dd>
|
||||
</dl>
|
||||
|
||||
<p>Due to quite a lot of emails requesting an ORG directive you can now add an address to the sectiontype for the Gameboy:</p>
|
||||
<pre>SECTION "CoolStuff",ROM0[$1234]</pre>
|
||||
<p>This will force the section to address $1234. This also works with the other sectiontypes. For ROMX sections the linker will then place the section in any bank at the address you specify. If you also want to specify the bank you can do:</p>
|
||||
<pre>SECTION "CoolStuff",ROMX[$4567],BANK[3]</pre>
|
||||
<p>And if you only want to force the section into a certain bank, and not it's position within the bank, that's also possible:</p>
|
||||
<pre>SECTION "CoolStuff",ROMX,BANK[7]</pre>
|
||||
<p><strong>HINT:</strong> If you think this is a lot of typing for doing a simple ORG type thing you can quite easily write an intelligent macro (called ORG for example) that uses <a href="expr_str.htm">\@</a> for the sectionname and determines correct sectiontype etc as arguments for SECTION</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="../link.htm">xLink</a> documentation
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
<li><a href="expr_str.htm">String expressions, functions and formatting</a>
|
||||
<li><a href="pops.htm">POPS and PUSHS:</a> The section stack.
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 18 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,22 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm SET</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>SET</h1>
|
||||
<p>SETs are like <a href="equ.htm">EQUates</a> also constant symbols in the sense that their values are defined during the assembly process. These symbols are normally used in macros.</p>
|
||||
<pre>KINKYCOUNT SET 2
|
||||
KINKYCOUNT SET DONUT_ISGOOD+KINKYCOUNT</pre>
|
||||
<p>Note that a colon (:) following the label-name is not allowed. SETs can be exported and imported but the result is undefined and might change in a later release. Alternatively you can use = as a synonym for SET.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="expr_int.htm">Integer and Boolean expressions</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
|
||||
@@ -1,19 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm SHIFT</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>SHIFT</h1>
|
||||
<p><dfn>SHIFT</dfn> is a special command only available in <a href="macro.htm">macros</a>. Very useful in <a href="rept.htm">REPT-blocks</a>. It will "shift" the arguments by one "to the left". <b>\1</b> will get <b>\2</b>'s value, <b>\2</b> will get <b>\3</b>'s value and so forth.</p>
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="macro.htm">Macros</a>
|
||||
<li><a href="rept.htm">Automatically repeating blocks of code</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,31 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Symbols</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>xAsm Symbols</h1>
|
||||
<p>xAsm supports several types of symbols:</p>
|
||||
<ul>
|
||||
<li><a href="labels.htm">Label</a>. Used to assign a memory location with a name
|
||||
<li><a href="equ.htm">EQUate</a>. Give a constant a name.
|
||||
<li><a href="set.htm">SET</a>. Same as EQUate but with a subtle difference. You can change the value of a SET during assembling.
|
||||
<li><a href="rs.htm">Structures (the RS group)</a>. Define a structure easily.
|
||||
<li><a href="equs.htm">String equate (EQUS)</a>. Give an often used string a name. Can also be used as a mini-macro. Much like #define in C.
|
||||
<li><a href="macro.htm">MACROs</a>. A block of code or pseudo instructions that you invoke like any other mnemonic. You can give them arguments too! Life is good.
|
||||
</ul>
|
||||
|
||||
<p><strong>A symbol cannot have the same name as a reserved keyword.</strong></p>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="presym.htm">Predeclared symbols</a>
|
||||
<li><a href="export.htm">Importing and exporting symbols</a>
|
||||
<li><a href="purge.htm">Purging symbols</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 02 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,23 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Syntax</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
|
||||
<body>
|
||||
<h1>xAsm Syntax</h1>
|
||||
<p>The syntax line‐based, just as in any other assembler. Meaning that you do one instruction or pseudo‐op per line:</p>
|
||||
<pre>[label] [instruction] [;comment]</pre>
|
||||
<p>Example:</p>
|
||||
<pre>John: ld a,87 ;Weee</pre>
|
||||
<p>A comment can also be an asterisk (*) followed by the comment if the asterisk is the first character on the line:</p>
|
||||
<pre>********************************
|
||||
* These are full line comments *
|
||||
********************************</pre>
|
||||
<p>All pseudo‐ops, mnemonics and registers (reserved keywords) are <em>case‐insensitive</em> and all labels are <em>case‐sensitive</em>.</p>
|
||||
<hr>
|
||||
<p>Last updated 21 June 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,102 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Gameboy</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>Gameboy</h1>
|
||||
<p>The full GB-Z80 instruction-set is implemented with a few modifications to the original Zilog syntax. This is due to a Bison problem but in my opinion the syntax is better than the original one.</p>
|
||||
<h2>Instructions</h2>
|
||||
<ul>
|
||||
<li>ADC
|
||||
<li>ADD
|
||||
<li>AND
|
||||
<li>BIT
|
||||
<li>CALL
|
||||
<li>CCF
|
||||
<li>CP
|
||||
<li>CPL
|
||||
<li>DAA
|
||||
<li>DEC
|
||||
<li>DI
|
||||
<li>EI
|
||||
<li>EX
|
||||
<li>HALT
|
||||
<li>INC
|
||||
<li>JP
|
||||
<li>JR
|
||||
<li>LD
|
||||
<li>LDD
|
||||
<li>LDI
|
||||
<li>LDH/LDIO (see note below)
|
||||
<li>NOP
|
||||
<li>OR
|
||||
<li>POP
|
||||
<li>PUSH
|
||||
<li>RES
|
||||
<li>RET
|
||||
<li>RETI
|
||||
<li>RL
|
||||
<li>RLA
|
||||
<li>RLC
|
||||
<li>RLCA
|
||||
<li>RR
|
||||
<li>RRA
|
||||
<li>RRC
|
||||
<li>RRCA
|
||||
<li>RST
|
||||
<li>SBC
|
||||
<li>SCF
|
||||
<li>SET
|
||||
<li>SLA
|
||||
<li>SRA
|
||||
<li>SRL
|
||||
<li>STOP
|
||||
<li>SUB
|
||||
<li>SWAP
|
||||
<li>XOR
|
||||
</ul>
|
||||
<p>Note that you can use both
|
||||
<pre> OR A,B
|
||||
OR B</pre>
|
||||
<h2>Addressingmodes</h2>
|
||||
<p>Indirect addressing has been changed to [ ] instead of ( ):</p>
|
||||
<ul>
|
||||
<li> A
|
||||
<li> B
|
||||
<li> C
|
||||
<li> D
|
||||
<li> E
|
||||
<li> H
|
||||
<li> L
|
||||
<li> AF
|
||||
<li> BC
|
||||
<li> DE
|
||||
<li> HL
|
||||
<li> SP
|
||||
<li> [BC]
|
||||
<li> [DE]
|
||||
<li> [HL]
|
||||
<li> [HL-]/[HLI]
|
||||
<li> [HL+]/[HLD]
|
||||
<li> [SP]
|
||||
<li> n8 (8 bit expression)
|
||||
<li> n16 (16 bit expression)
|
||||
<li> n3 (3 bit CONSTANT expression)
|
||||
<li> [n16]/[$FF00+n8]
|
||||
<li> [$FF00+C]/[C]
|
||||
</ul>
|
||||
<p>The assembler will intelligently decide between <b>[n16]</b> and <b>[$FF00+n8]</b> in the LD instruction. Note however that if you use any <a href="symbols.htm">constant symbols</a> in the expression they had better be defined before the instruction or your symbol-table may become mangled. Also worth noting is that it will only ever select the short $FF00 mode when you use constant symbols. NOT if you use symbols defined in a <a href="section.htm">HRAM section</a>. As this defies the whole point of implementing the HRAM sectiontype I've added the LDIO mnemonic. It works like the LD instruction but it will ALWAYS generate the $FF00+ form and it will also automatically logically AND the expression with $FF if it is relocatable. Which is what you want. Trust me ;)</p>
|
||||
<h2>Conditioncodes</h2>
|
||||
<ul>
|
||||
<li> C
|
||||
<li> NC
|
||||
<li> Z
|
||||
<li> NZ
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 20 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,30 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xAsm Usage</title>
|
||||
<link rel="stylesheet" type="text/css" href="../style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>xAsm Usage</h1>
|
||||
<pre>C:\>xAsm [options] asmfile</pre>
|
||||
<p>Options are preceded by a hyphen (-) and go as follows:</p>
|
||||
<pre> o<b>objectfile</b> : Write an <a href="../rgb0.htm">object-file</a> for <a href="../link.htm">xLink</a>
|
||||
i<b>path</b> : Add an extra include-path
|
||||
h : Short help text
|
||||
e<b>(l|b)</b> : Change endianness (CAUTION!)
|
||||
g<b>ASCI</b> : Change the four characters used for Gameboy graphics
|
||||
constants (default is <b>0123</b>)
|
||||
b<b>AS</b> : Change the two characters used for binary constants
|
||||
(default is <b>01</b>)
|
||||
z<b>HX</b> : Set the byte value (hex format) used for uninitialised data (default is ? for random)
|
||||
</pre>
|
||||
|
||||
<h1>See also:</h1>
|
||||
<ul>
|
||||
<li><a href="opt.htm">Changing options while assembling</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<p>Last updated 08 October 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
116
doc/geninfo.htm
116
doc/geninfo.htm
@@ -1,116 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>General Information</title>
|
||||
<link rel="stylesheet" type="text/css" href="./style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1><abbr title="Rednex Game Boy Development System">RGBDS</abbr>—ASMotor General Information</h1>
|
||||
<h2>Table of Contents</h2>
|
||||
<ul>
|
||||
<li><a href="#license">License</a>
|
||||
<li><a href="#Author">The Author</a>
|
||||
<li><a href="#Introduction">Introduction</a>
|
||||
<li><a href="#Installation">Installation</a>
|
||||
<li><a href="#Documentation">The Documentation</a>
|
||||
<li><a href="#History">History</a>
|
||||
</ul>
|
||||
<h2 id="license">License</h2>
|
||||
<p>The <dfn>ASMotor</dfn> package (<a href="asm.htm">xAsm</a>, <a href="link.htm">xLink</a>, <a href="fix.htm">RGBFix</a>, examples and <a href="#Documentation">documentation</a>) is freeware and distributed as is. The author retains his copyright and right to modify the specifications and operation of the software without notice.
|
||||
<p>In other words this means I encourage you to…
|
||||
<ul>
|
||||
<li>use it for whatever purpose even professional work without me charging you a penny
|
||||
<li>copy it to another person (wholly or in part, though I’m sure he’d appreciate the whole package) in
|
||||
whatever form you find suitable
|
||||
<li>mass-distribute the ASMotor package if it is complete (<a href="asm.htm">xAsm</a>, <a href="link.htm">xLink</a>, <a href="fix.htm">RGBFix</a> and documentation).
|
||||
<li>contact me if you have any problems
|
||||
</ul>
|
||||
<p>This also means you can’t…
|
||||
<ul>
|
||||
<li>blame me for loss of profit, data, sleep, food or other nasty things through the use or distribution of ASMotor. If
|
||||
you choose to use ASMotor you do so at your own risk.
|
||||
<li>expect me to be able to help you should you have a problem related or not to ASMotor.
|
||||
</ul>
|
||||
<h2 id="Author">The Author</h2>
|
||||
<p>Any questions? Write me!
|
||||
<h3>Address</h3>
|
||||
<p>
|
||||
Carsten Sorensen<br>
|
||||
1 Spring Court<br>
|
||||
Guildford<br>
|
||||
Surrey GU2 6QW<br>
|
||||
United Kingdom<br>
|
||||
<h3 id="Email">e-mail:</h3>
|
||||
<ul>
|
||||
<li><a href="mailto:surfsmurf@matilde.demon.co.uk">surfsmurf@matilde.demon.co.uk</a> (private)
|
||||
<li><a href="mailto:csorensen@ea.com">csorensen@ea.com</a> (work)
|
||||
</ul>
|
||||
<p>Get the latest version from my web page at <a href="http://www.matilde.demon.co.uk">http://www.matilde.demon.co.uk</a>
|
||||
<h2 id="History">History</h2>
|
||||
<table>
|
||||
<caption>The history of ASMotor</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th>Version</th>
|
||||
<th>Dated</th>
|
||||
<th>Release notes</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>1.0</td>
|
||||
<td>03 July 1997</td>
|
||||
<td>First release</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.01</td>
|
||||
<td>20 July 1997</td>
|
||||
<td><p>RGBDS fixes:</p>
|
||||
<ul>
|
||||
<li>RGBFix can now also truncate the ROM-images to a valid size.
|
||||
<li>RGBAsm supports the LDD and LDI syntax plus [HLD] and [HLI]. LDH is synonymous with LDIO.
|
||||
<li>Example filenames have been changed to adhere to Jeff Frohweins proposed standard.
|
||||
</ul>
|
||||
<p>General fixes:</p>
|
||||
<ul>
|
||||
<li>RGBLink knows about big and little endian. Plus it can do range checking on intermediate results in an expression. This is necessary to support
|
||||
different types of CPUs.
|
||||
<li>RGBLink <em>didn’t</em> know about the special PC symbol “@” so if you used it more than once per sourcefile in an expression the linker had to resolve, things would go horribly wrong.
|
||||
<li>There was a bug in the macro parameter passing. Any whitespace after the last parameter would be appended to the last parameter. Reported by Jeff Frohwein.
|
||||
<li>A section stack has been implemented. Look up POPS and PUSHS in the
|
||||
manual. Jeff Frohwein’s doing again.
|
||||
<li>OPT command added for defining and changing some options while assembling.
|
||||
<li>You can now define which characters are used for the Gameboy graphics integer (`) using the commandline or the new OPT command. Cool idea by (surprise surprise) Jeff Frohwein.
|
||||
<li>Also, an option stack has been added. Look up POPO and PUSHO in the manual.
|
||||
<li>Fixed yet another line number bug reported by Jeff Frohwein (when will this guy leave me alone? ;)
|
||||
</ul>
|
||||
</td>
|
||||
<tr>
|
||||
<td>1.02</td>
|
||||
<td>22 July 1997</td>
|
||||
<td><p>General fixes:</p>
|
||||
<ul>
|
||||
<li>The lamest typo bug of all time has been fixed. RGBAsm would output a word defined with DW as 4 bytes instead of 2. Jeff Frohwein reported this.
|
||||
<li>The first line of an included file didn’t assemble correctly.
|
||||
<li>-b option added for setting the characters used for binary constants.
|
||||
</ul>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.10</td>
|
||||
<td>21 Sep 1997</td>
|
||||
<td><p>General fixes:</p>
|
||||
<ul>
|
||||
<li>The assembler would crash if you tried to use a macro symbol in an expression. (Jeff Frohwein)
|
||||
<li>You couldn’t use STRCMP, STRLEN and STRIN in relocatable expressions. (Harry P. Mulder)
|
||||
<li>Relocatable symbols are no longer allowed as arguments to the DEF function.
|
||||
<li>Finally! A librarian and smart linking has been added.
|
||||
<li>Bug fixed in the assembler where it would sometimes write out too many bytes for HRAM section definitions.
|
||||
<li>-z options (set fill value used for uninitialised data) added to the
|
||||
assembler and linker.
|
||||
<li>The assembler will now read in any type of ASCII file on any type of OS.
|
||||
</ul>
|
||||
</table>
|
||||
<p>Last updated 08 October 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,20 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>RGBDS—ASMotor Documentation</title>
|
||||
<link rel="stylesheet" type="text/css" href="./style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1><abbr title="Rednex Game Boy Development System">RGBDS</abbr>—ASMotor v1.10 Documentation</h1>
|
||||
<h2>Table of Contents</h2>
|
||||
<ul>
|
||||
<li><a href="geninfo.htm">ASMotor General Information</a>
|
||||
<li><a href="asm.htm">xASM Documentation</a>
|
||||
<li><a href="link.htm">xLink Documentation</a>
|
||||
<li><a href="fix.htm">RGBFix Documentation</a>
|
||||
<li><a href="rgb0.htm">The RGB0-2 ObjectFileFormat</a>
|
||||
</ul>
|
||||
<p>Last updated 21 September 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
118
doc/link.htm
118
doc/link.htm
@@ -1,118 +0,0 @@
|
||||
<!DOCTYPE HTML PUBliC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>xLink</title>
|
||||
<link rel="stylesheet" type="text/css" href="./style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>xLink Documentation</h1>
|
||||
<h2>Table of Contents</h2>
|
||||
<ul>
|
||||
<li><a href="#history"> History</a>
|
||||
<li><a href="#usage"> Usage</a>
|
||||
<li><a href="#linkfile"> The Linkfile</a>
|
||||
<li><a href="#operationtg"> Operation for Gameboy</a>
|
||||
<li><a href="#smallmode"> Operation for Gameboy small mode</a>
|
||||
<li><a href="#psion2"> Operation for Psion2 relocatable modules</a>
|
||||
</ul>
|
||||
<hr>
|
||||
<h2 id="history">History</h2>
|
||||
<table>
|
||||
<caption>The history of xLink</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Version</th>
|
||||
<th scope="col">Dated</th>
|
||||
<th scope="col">Release notes</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>1.0</td>
|
||||
<td>1 Oct. 96</td>
|
||||
<td>First release (RGBDS)</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.01</td>
|
||||
<td>3 Dec. 96</td>
|
||||
<td>
|
||||
<ul>
|
||||
<li>BANK() didn't work. Fixed.</li>
|
||||
<li>Sections were quite often output in the wrong order. Fixed.</li>
|
||||
</ul>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.02</td>
|
||||
<td>12 Feb. 97</td>
|
||||
<td><a href="#usage">-s switch and mapfile option</A> added</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.03</td>
|
||||
<td>23 Mar. 97</td>
|
||||
<td>
|
||||
<ul>
|
||||
<li><a href="#usage">Mapfile</A> now shows BSS, VRAM and HRAM areas</li>
|
||||
<li>There was a bug regarding <a href="#operation">fixed HOME sections.</a>
|
||||
</ul></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.04</td>
|
||||
<td>03 July 1997</td>
|
||||
<td>First ASMotor release. Supports big-endian CPUs as well. <a href="#usage">Usage</a> changed to allow for different output fileformats</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>1.05</td>
|
||||
<td>20 July 1997</td>
|
||||
<td>
|
||||
<ul>
|
||||
<li>We can now do range checking on intermediate results in an expression. This is necessary to support different types of CPUs.</li>
|
||||
<li>RGBLink DIDN’T know about the special PC symbol "@" so if you used it more than once per sourcefile in an expression the linker had to resolve, things would go horribly wrong.</li>
|
||||
</ul>
|
||||
</td>
|
||||
<tr>
|
||||
<td>1.06</td>
|
||||
<td>21 September 1997</td>
|
||||
<td><ul><li>Smart linking and library support added
|
||||
<li>Program renamed to xLink
|
||||
</ul>
|
||||
</td>
|
||||
</table>
|
||||
<h2 id="usage">Usage</h2>
|
||||
<pre> xlink [options] linkfile</pre>
|
||||
<p>Options are preceded by a hyphen (-) and go as follows:
|
||||
<pre> h : Short help text
|
||||
m<b>mapfile</b> : Write a mapfile
|
||||
t : Output target:
|
||||
tg : Gameboy <a href="#operationtg">ROM image</a> (default)
|
||||
ts : Gameboy <a href="#smallmode">Small mode (32kB)</a> ROM image
|
||||
tp : <a href="#psion2">Psion2</a> relocatable module
|
||||
z<b>HX</b> : Set the byte value (hex format) used for uninitialised data (default is ? for random)
|
||||
</pre>
|
||||
<h2 id="linkfile">The Linkfile</h2>
|
||||
<p>A linkfile is used to tell <B>xLink</B> which objects to include and what the outputname should be. It is in plain ASCII-format.
|
||||
<pre> # Linkfile for foobar.gb
|
||||
|
||||
[Objects]
|
||||
foo.obj
|
||||
bar.obj
|
||||
|
||||
[Libraries]
|
||||
mylib.lib
|
||||
|
||||
[Output]
|
||||
foobar.gb</pre>
|
||||
<p>A line starting with # is ignored.
|
||||
<p>If you use libraries they will only be included if one of the objects actually reference them. This works on a SECTION level and not on a module level. This means that when you write libraries you can put each subroutine in its own SECTION so only the relevant bits are included.
|
||||
<h2 id="operationtg">Operation for Gameboy (-tg)</h2>
|
||||
<p><a href="asm.htm#sections">Sections</a> created with <b>ROM0</b> in the assembler are placed in the GB bank #0 (the fixed bank $0000-$3FFF) in the order they are loaded from the objectfiles specified in the linkfile. So you want the first file in the linkfile to contain your header. <b>ROMX</b> sections are placed in <em>any bank other than #0</em>. This means you have absolutely <em>no</em> control over which sections goes where. This insures minimal slack (unused bytes) at the end of each bank in the image.
|
||||
<p>Currently the linker doesn't calculate the GB checksums.
|
||||
You must use <a href="fix.htm">RGBFix</a> to do this.
|
||||
|
||||
<h3 id="smallmode">Operation for Gameboy small mode (-ts)</h3>
|
||||
<p>Small mode forces all <b>ROMX</b> sections to be of type <b>ROM0</b> and increases the <b>ROM0</b> section size from 16kB to 32kB. This also means that <b>ROM0/ROMX</b> sections are written to the final image in the order you have specified on the command line.
|
||||
<p>Currently the linker doesn't calculate the GB checksums. You must use <a href="fix.htm">RGBFix</a> to do this.
|
||||
|
||||
<hr>
|
||||
<p>Last updated 08 October 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
210
doc/rgb0.htm
210
doc/rgb0.htm
@@ -1,210 +0,0 @@
|
||||
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
||||
<html>
|
||||
<head>
|
||||
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
|
||||
<title>RGB? Fileformat</title>
|
||||
<link rel="stylesheet" type="text/css" href="./style.css">
|
||||
</head>
|
||||
<body>
|
||||
<h1>The RGB ObjectFileFormats</h1>
|
||||
<h2>Table of Contents</h2>
|
||||
<ul>
|
||||
<li><a href="#background">Background</A>
|
||||
<li><a href="#filestructure">FileStructure</A>
|
||||
<li><a href="#rpn">Rpn Data</A>
|
||||
</ul>
|
||||
<h2 id="background">Background</h2>
|
||||
<p>I developed the RGB0 fileformat mainly because I needed a suitable dataformat to hold the output from <a href="asm.htm">xAsm</a> that was powerful to accomodate all the features I needed and also would make it easy for me to add new ones. The reason for documenting it is so people can write converters between it and other formats. Perhaps even develop other compilers for it?</p>
|
||||
<p>The RGB1 fileformat saw the light of day with the V1.02 of the old RGBDS release because of the addition of fixed sections.</p>
|
||||
<p>The RGB2 fileformat emerged because I needed to add support for big endian CPUs.</p>
|
||||
<h2 id="filestructure">FileStructure</h2>
|
||||
<ul>
|
||||
<li><dfn>LONG</dfn> is a 32‐bit integer stored in little‐endian format (Intel)
|
||||
<li><dfn>BYTE</dfn> is an 8‐bit integer
|
||||
<li><dfn>STRING</dfn> is a 0‐terminated string of <b>BYTE</b>
|
||||
</ul>
|
||||
<p>Down to business...</p>
|
||||
<pre>
|
||||
; There's a header...
|
||||
|
||||
BYTE ID[4] ;"RGB0", "RGB1", "RGB2"
|
||||
LONG NumberOfSymbols ;The number of symbols used in this file
|
||||
LONG NumberOfSections ;The number of sections used in this file
|
||||
|
||||
; Now for some symbols
|
||||
|
||||
REPT NumberOfSymbols ;<b>NumberOfSymbols</b> symboldefs follow
|
||||
STRING Name ;The name of this symbol
|
||||
BYTE Type ;0 = LOCAL symbol only used in this file
|
||||
;1 = IMPORT this symbol from elsewhere
|
||||
;2 = EXPORT this symbol to other objects
|
||||
IF Type != 1
|
||||
LONG SectionID ;The section number in which this symbol
|
||||
;is defined. If -1 this symbol is an EQUate
|
||||
LONG Value ;The symbols value. If SectionID!=-1 it's the
|
||||
;offset into that section
|
||||
ENDC
|
||||
ENDR
|
||||
|
||||
; And I'll be... Sections!
|
||||
|
||||
REPT NumberOfSections
|
||||
LONG Size ;Size in bytes of this section
|
||||
BYTE Type ;0 = WRAM0
|
||||
;1 = VRAM
|
||||
;2 = ROMX
|
||||
;3 = ROM0
|
||||
;4 = HRAM
|
||||
LONG Org ;Only present in RGB1. Address to fix this
|
||||
;section at. -1 if the linker should
|
||||
;decide (normal operation)
|
||||
LONG Bank ;Only present in RGB1. Bank to load this
|
||||
;section into. -1 if the linker should
|
||||
;decide (normal operation). This field is
|
||||
;only valid for ROMX sections.
|
||||
IF Type==ROMX || Type==ROM0
|
||||
BYTE Data[Size]
|
||||
LONG NumberOfPatches
|
||||
|
||||
; These types of sections may have patches
|
||||
|
||||
REPT NumberOfPatches
|
||||
STRING SourceFile ;The name of the sourcefile (for
|
||||
;printing an errormessage)
|
||||
LONG Line ;The line of the sourcefile
|
||||
LONG Offset ;Offset into the section where patch
|
||||
;should be applied
|
||||
BYTE Type ;0 = BYTE patch
|
||||
;1 = little endian WORD patch
|
||||
;2 = little endianLONG patch
|
||||
;3 = big endian WORD patch (RGB2 and later)
|
||||
;4 = big endianLONG patch (RGB2 and later)
|
||||
LONG RPNSize
|
||||
BYTE RPN[RPNSize] ;RPN definition below
|
||||
ENDR
|
||||
ENDC
|
||||
ENDR</pre>
|
||||
<h2 id="rpn">Rpn Data</h2>
|
||||
<p>Expressions in the objectfile are stored as <abbr title="Reverse Polish Notation">RPN</abbr>. This is an expression of the form “2 5 +”. This will first push the value “2” to the stack. Then “5”. The “+” operator pops two arguments from the stack, adds them, and then pushes the result on the stack, effectively replacing the two top arguments with their sum. In the RGB format RPN expressions are stored as <b>BYTE</b>s with some bytes being special prefixes for integers and symbols.</p>
|
||||
<table>
|
||||
<caption>RPN Expressions</caption>
|
||||
<thead>
|
||||
<tr>
|
||||
<th scope="col">Byte value</th>
|
||||
<th scope="col">Meaning</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>$00</td>
|
||||
<td>+ operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$01</td>
|
||||
<td>- operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$02</td>
|
||||
<td>* operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$03</td>
|
||||
<td>/ operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$04</td>
|
||||
<td>% operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$05</td>
|
||||
<td>unary -</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$06</td>
|
||||
<td>| operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$07</td>
|
||||
<td>& operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$08</td>
|
||||
<td>^ operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$09</td>
|
||||
<td>unary ~</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0A</td>
|
||||
<td>&& comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0B</td>
|
||||
<td>|| comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0C</td>
|
||||
<td>unary !</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0D</td>
|
||||
<td>== comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0E</td>
|
||||
<td>!= comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$0F</td>
|
||||
<td>> comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$10</td>
|
||||
<td>< comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$11</td>
|
||||
<td>>= comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$12</td>
|
||||
<td><= comparison</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$13</td>
|
||||
<td><< operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$14</td>
|
||||
<td>>> operator</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$15</td>
|
||||
<td>BANK() function for Gameboy, a symbol ID follows</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$16</td>
|
||||
<td>HRAMCheck for Gameboy, check if value is in HRAM and logically and it with 0xFF</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$17</td>
|
||||
<td>ZeroPageCheck for PC-Engine, check if value is in ZP (0x2000-0x20FF) and logically and it with 0xFF</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$18</td>
|
||||
<td>RangeCheck. LOW and HIGH signed LONGs follow. Checks a value to see if within the range [LOW;HIGH]. If not, generate an error.
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$80</td>
|
||||
<td>LONG integer follows</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>$81</td>
|
||||
<td>Symbol ID follows</td>
|
||||
</tr>
|
||||
</table>
|
||||
<hr>
|
||||
<p>Last updated 18 July 1997 by <a href="mailto:surfsmurf@matilde.demon.co.uk">Carsten Sorensen</a></p>
|
||||
</body>
|
||||
</html>
|
||||
@@ -6,16 +6,17 @@
|
||||
*
|
||||
*/
|
||||
|
||||
#ifndef ASMOTOR_ASM_ASM_H
|
||||
#define ASMOTOR_ASM_ASM_H
|
||||
#ifndef RGBDS_ASM_ASM_H
|
||||
#define RGBDS_ASM_ASM_H
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdbool.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/symbol.h"
|
||||
|
||||
#include "localasm.h"
|
||||
#include "asm/localasm.h"
|
||||
|
||||
extern SLONG nLineNo;
|
||||
extern ULONG nTotalLines;
|
||||
@@ -26,9 +27,9 @@ extern char tzCurrentFileName[_MAX_PATH + 1];
|
||||
extern struct Section *pCurrentSection;
|
||||
extern struct sSymbol *tHashedSymbols[HASHSIZE];
|
||||
extern struct sSymbol *pPCSymbol;
|
||||
extern UBYTE oDontExpandStrings;
|
||||
extern bool oDontExpandStrings;
|
||||
|
||||
#define MAXMACROARGS 9
|
||||
#define MAXINCPATHS 16
|
||||
#define MAXMACROARGS 256
|
||||
#define MAXINCPATHS 128
|
||||
|
||||
#endif /* // ASM_H */
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
#ifndef ASMOTOR_ASM_CHARMAP_H
|
||||
#define ASMOTOR_ASM_CHARMAP_H
|
||||
#ifndef RGBDS_ASM_CHARMAP_H
|
||||
#define RGBDS_ASM_CHARMAP_H
|
||||
|
||||
#define MAXCHARMAPS 512
|
||||
#define CHARMAPLENGTH 8
|
||||
#define CHARMAPLENGTH 16
|
||||
|
||||
struct Charmap {
|
||||
int count;
|
||||
|
||||
@@ -6,13 +6,13 @@
|
||||
*
|
||||
*/
|
||||
|
||||
#ifndef ASMOTOR_ASM_FSTACK_H
|
||||
#define ASMOTOR_ASM_FSTACK_H
|
||||
#ifndef RGBDS_ASM_FSTACK_H
|
||||
#define RGBDS_ASM_FSTACK_H
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#include "asm/asm.h"
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/lexer.h"
|
||||
|
||||
struct sContext {
|
||||
|
||||
@@ -1,135 +0,0 @@
|
||||
/* GB Z80 instruction groups
|
||||
|
||||
n3 = 3-bit
|
||||
n = 8-bit
|
||||
nn = 16-bit
|
||||
|
||||
*ADC A,n : 0xCE
|
||||
*ADC A,r : 0x88|r
|
||||
*ADD A,n : 0xC6
|
||||
*ADD A,r : 0x80|r
|
||||
*ADD HL,ss : 0x09|(ss<<4)
|
||||
*ADD SP,n : 0xE8
|
||||
*AND A,n : 0xE6
|
||||
*AND A,r : 0xA0|r
|
||||
*BIT n3,r : 0xCB 0x40|(n3<<3)|r
|
||||
*CALL cc,nn : 0xC4|(cc<<3)
|
||||
*CALL nn : 0xCD
|
||||
*CCF : 0x3F
|
||||
*CP A,n : 0xFE
|
||||
*CP A,r : 0xB8|r
|
||||
*CPL : 0x2F
|
||||
*DAA : 0x27
|
||||
*DEC r : 0x05|(r<<3)
|
||||
*DEC ss : 0x0B|(ss<<4)
|
||||
*DI : 0xF3
|
||||
*EI : 0xFB
|
||||
*EX HL,(SP) : 0xE3
|
||||
*HALT : 0x76
|
||||
*INC r : 0x04|(r<<3)
|
||||
*INC ss : 0x03|(ss<<4)
|
||||
*JP (HL) : 0xE9
|
||||
*JP cc,nn : 0xC2|(cc<<3)
|
||||
*JP nn : 0xC3|(cc<<3)
|
||||
*JR n : 0x18
|
||||
*JR cc,n : 0x20|(cc<<3)
|
||||
*LD (nn),SP : 0x08
|
||||
*LD ($FF00+C),A : 0xE2
|
||||
*LD ($FF00+n),A : 0xE0
|
||||
*LD (nn),A : 0xEA
|
||||
*LD (rr),A : 0x02|(rr<<4)
|
||||
*LD A,($FF00+C) : 0xF2
|
||||
*LD A,($FF00+n) : 0xF0
|
||||
*LD A,(nn) : 0xFA
|
||||
*LD A,(rr) : 0x0A|(rr<<4)
|
||||
*LD HL,(SP+n) : 0xF8
|
||||
*LD SP,HL : 0xF9
|
||||
*LD r,n : 0x06|(r<<3)
|
||||
*LD r,r' : 0x40|(r<<3)|r' // NOTE: LD (HL),(HL) not allowed
|
||||
*LD ss,nn : 0x01|(ss<<4)
|
||||
*NOP : 0x00
|
||||
*OR A,n : 0xF6
|
||||
*OR A,r : 0xB0|r
|
||||
*POP tt : 0xC1|(tt<<4)
|
||||
*PUSH tt : 0xC5|(tt<<4)
|
||||
*RES n3,r : 0xCB 0x80|(n3<<3)|r
|
||||
*RET : 0xC9
|
||||
*RET cc : 0xC0|(cc<<3)
|
||||
*RETI : 0xD9
|
||||
*RL r : 0xCB 0x10|r
|
||||
*RLA : 0x17
|
||||
*RLC r : 0xCB 0x00|r
|
||||
*RLCA : 0x07
|
||||
*RR r : 0xCB 0x18|r
|
||||
*RRA : 0x1F
|
||||
*RRC r : 0xCB 0x08|r
|
||||
*RRCA : 0x0F
|
||||
*RST n : 0xC7|n
|
||||
*SBC A,n : 0xDE
|
||||
*SBC A,r : 0x98|r
|
||||
*SCF : 0x37
|
||||
*SET n3,r : 0xCB 0xC0|(n8<<3)|r
|
||||
*SLA r : 0xCB 0x20|r
|
||||
*SRA r : 0xCB 0x28|r
|
||||
*SRL r : 0xCB 0x38|r
|
||||
*STOP : 0x10
|
||||
*SUB A,n : 0xD6
|
||||
*SUB A,r : 0x90|r
|
||||
*SWAP r : 0xCB 0x30|r
|
||||
*XOR A,n : 0xEE
|
||||
*XOR A,r : 0xA8|r
|
||||
|
||||
*/
|
||||
|
||||
#define MAXSECTIONSIZE 0x4000
|
||||
|
||||
#define NAME_DB "db"
|
||||
#define NAME_DW "dw"
|
||||
#define NAME_RB "rb"
|
||||
#define NAME_RW "rw"
|
||||
|
||||
/* "r" defs */
|
||||
|
||||
enum {
|
||||
REG_B = 0,
|
||||
REG_C,
|
||||
REG_D,
|
||||
REG_E,
|
||||
REG_H,
|
||||
REG_L,
|
||||
REG_HL_IND,
|
||||
REG_A
|
||||
};
|
||||
/* "rr" defs */
|
||||
|
||||
enum {
|
||||
REG_BC_IND = 0,
|
||||
REG_DE_IND,
|
||||
REG_HL_INDINC,
|
||||
REG_HL_INDDEC,
|
||||
};
|
||||
/* "ss" defs */
|
||||
|
||||
enum {
|
||||
REG_BC = 0,
|
||||
REG_DE,
|
||||
REG_HL,
|
||||
REG_SP
|
||||
};
|
||||
/* "tt" defs */
|
||||
|
||||
/*
|
||||
#define REG_BC 0
|
||||
#define REG_DE 1
|
||||
#define REG_HL 2
|
||||
*/
|
||||
#define REG_AF 3
|
||||
|
||||
/* "cc" defs */
|
||||
|
||||
enum {
|
||||
CC_NZ = 0,
|
||||
CC_Z,
|
||||
CC_NC,
|
||||
CC_C
|
||||
};
|
||||
@@ -1,9 +1,9 @@
|
||||
#ifndef ASMOTOR_ASM_LEXER_H
|
||||
#define ASMOTOR_ASM_LEXER_H
|
||||
#ifndef RGBDS_ASM_LEXER_H
|
||||
#define RGBDS_ASM_LEXER_H
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
|
||||
#define LEXHASHSIZE (1 << 11)
|
||||
#define MAXSTRLEN 255
|
||||
@@ -59,9 +59,7 @@ extern void yyunputbytes(ULONG count);
|
||||
|
||||
extern YY_BUFFER_STATE pCurrentBuffer;
|
||||
|
||||
#ifdef __GNUC__
|
||||
extern void strupr(char *s);
|
||||
extern void strlwr(char *s);
|
||||
#endif
|
||||
extern void upperstring(char *s);
|
||||
extern void lowerstring(char *s);
|
||||
|
||||
#endif
|
||||
|
||||
134
include/asm/localasm.h
Normal file
134
include/asm/localasm.h
Normal file
@@ -0,0 +1,134 @@
|
||||
/* GB Z80 instruction groups
|
||||
|
||||
n3 = 3-bit
|
||||
n = 8-bit
|
||||
nn = 16-bit
|
||||
|
||||
* ADC A,n : 0xCE
|
||||
* ADC A,r : 0x88|r
|
||||
* ADD A,n : 0xC6
|
||||
* ADD A,r : 0x80|r
|
||||
* ADD HL,ss : 0x09|(ss<<4)
|
||||
* ADD SP,n : 0xE8
|
||||
* AND A,n : 0xE6
|
||||
* AND A,r : 0xA0|r
|
||||
* BIT n3,r : 0xCB 0x40|(n3<<3)|r
|
||||
* CALL cc,nn : 0xC4|(cc<<3)
|
||||
* CALL nn : 0xCD
|
||||
* CCF : 0x3F
|
||||
* CP A,n : 0xFE
|
||||
* CP A,r : 0xB8|r
|
||||
* CPL : 0x2F
|
||||
* DAA : 0x27
|
||||
* DEC r : 0x05|(r<<3)
|
||||
* DEC ss : 0x0B|(ss<<4)
|
||||
* DI : 0xF3
|
||||
* EI : 0xFB
|
||||
* HALT : 0x76
|
||||
* INC r : 0x04|(r<<3)
|
||||
* INC ss : 0x03|(ss<<4)
|
||||
* JP HL : 0xE9
|
||||
* JP cc,nn : 0xC2|(cc<<3)
|
||||
* JP nn : 0xC3|(cc<<3)
|
||||
* JR n : 0x18
|
||||
* JR cc,n : 0x20|(cc<<3)
|
||||
* LD (nn),SP : 0x08
|
||||
* LD ($FF00+C),A : 0xE2
|
||||
* LD ($FF00+n),A : 0xE0
|
||||
* LD (nn),A : 0xEA
|
||||
* LD (rr),A : 0x02|(rr<<4) // HL+ and HL- included
|
||||
* LD A,($FF00+C) : 0xF2
|
||||
* LD A,($FF00+n) : 0xF0
|
||||
* LD A,(nn) : 0xFA
|
||||
* LD A,(rr) : 0x0A|(rr<<4) // HL+ and HL- included
|
||||
* LD HL,SP+n : 0xF8
|
||||
* LD SP,HL : 0xF9
|
||||
* LD r,n : 0x06|(r<<3)
|
||||
* LD r,r' : 0x40|(r<<3)|r' // NOTE: LD (HL),(HL) not allowed
|
||||
* LD ss,nn : 0x01|(ss<<4)
|
||||
* NOP : 0x00
|
||||
* OR A,n : 0xF6
|
||||
* OR A,r : 0xB0|r
|
||||
* POP tt : 0xC1|(tt<<4)
|
||||
* PUSH tt : 0xC5|(tt<<4)
|
||||
* RES n3,r : 0xCB 0x80|(n3<<3)|r
|
||||
* RET : 0xC9
|
||||
* RET cc : 0xC0|(cc<<3)
|
||||
* RETI : 0xD9
|
||||
* RL r : 0xCB 0x10|r
|
||||
* RLA : 0x17
|
||||
* RLC r : 0xCB 0x00|r
|
||||
* RLCA : 0x07
|
||||
* RR r : 0xCB 0x18|r
|
||||
* RRA : 0x1F
|
||||
* RRC r : 0xCB 0x08|r
|
||||
* RRCA : 0x0F
|
||||
* RST n : 0xC7|n
|
||||
* SBC A,n : 0xDE
|
||||
* SBC A,r : 0x98|r
|
||||
* SCF : 0x37
|
||||
* SET n3,r : 0xCB 0xC0|(n8<<3)|r
|
||||
* SLA r : 0xCB 0x20|r
|
||||
* SRA r : 0xCB 0x28|r
|
||||
* SRL r : 0xCB 0x38|r
|
||||
* STOP : 0x10 0x00
|
||||
* SUB A,n : 0xD6
|
||||
* SUB A,r : 0x90|r
|
||||
* SWAP r : 0xCB 0x30|r
|
||||
* XOR A,n : 0xEE
|
||||
* XOR A,r : 0xA8|r
|
||||
|
||||
*/
|
||||
|
||||
#define MAXSECTIONSIZE 0x4000
|
||||
|
||||
#define NAME_DB "db"
|
||||
#define NAME_DW "dw"
|
||||
#define NAME_RB "rb"
|
||||
#define NAME_RW "rw"
|
||||
|
||||
/* "r" defs */
|
||||
|
||||
enum {
|
||||
REG_B = 0,
|
||||
REG_C,
|
||||
REG_D,
|
||||
REG_E,
|
||||
REG_H,
|
||||
REG_L,
|
||||
REG_HL_IND,
|
||||
REG_A
|
||||
};
|
||||
/* "rr" defs */
|
||||
|
||||
enum {
|
||||
REG_BC_IND = 0,
|
||||
REG_DE_IND,
|
||||
REG_HL_INDINC,
|
||||
REG_HL_INDDEC,
|
||||
};
|
||||
/* "ss" defs */
|
||||
|
||||
enum {
|
||||
REG_BC = 0,
|
||||
REG_DE,
|
||||
REG_HL,
|
||||
REG_SP
|
||||
};
|
||||
/* "tt" defs */
|
||||
|
||||
/*
|
||||
#define REG_BC 0
|
||||
#define REG_DE 1
|
||||
#define REG_HL 2
|
||||
*/
|
||||
#define REG_AF 3
|
||||
|
||||
/* "cc" defs */
|
||||
|
||||
enum {
|
||||
CC_NZ = 0,
|
||||
CC_Z,
|
||||
CC_NC,
|
||||
CC_C
|
||||
};
|
||||
@@ -1,13 +1,17 @@
|
||||
#ifndef ASMOTOR_MAIN_H
|
||||
#define ASMOTOR_MAIN_H
|
||||
#ifndef RGBDS_MAIN_H
|
||||
#define RGBDS_MAIN_H
|
||||
|
||||
#include <stdbool.h>
|
||||
#include "extern/stdnoreturn.h"
|
||||
|
||||
struct sOptions {
|
||||
char gbgfx[4];
|
||||
char binary[2];
|
||||
SLONG fillchar;
|
||||
bool verbose;
|
||||
bool haltnop;
|
||||
bool exportall;
|
||||
bool warnings; /* true to enable warnings, false to disable them. */
|
||||
//-1 == random
|
||||
};
|
||||
|
||||
@@ -22,8 +26,9 @@ extern void opt_Push(void);
|
||||
extern void opt_Pop(void);
|
||||
extern void opt_Parse(char *s);
|
||||
|
||||
void fatalerror(const char *fmt, ...);
|
||||
noreturn void fatalerror(const char *fmt, ...);
|
||||
void yyerror(const char *fmt, ...);
|
||||
void warning(const char *fmt, ...);
|
||||
|
||||
#define YY_FATAL_ERROR fatalerror
|
||||
|
||||
|
||||
@@ -1,59 +1,5 @@
|
||||
#ifndef ASMOTOR_ASM_LINK_H
|
||||
#define ASMOTOR_ASM_LINK_H
|
||||
|
||||
/* RGB0 .obj format:
|
||||
*
|
||||
* Header
|
||||
* Symbols
|
||||
* Sections
|
||||
*
|
||||
* Header:
|
||||
* "RGB0"
|
||||
* LONG NumberOfSymbols
|
||||
* LONG NumberOfSections
|
||||
*
|
||||
* Symbols:
|
||||
* Symbol[NumberOfSymbols]
|
||||
*
|
||||
* Symbol:
|
||||
* char Name (NULL terminated)
|
||||
* char nType
|
||||
* if( nType!=SYM_IMPORT )
|
||||
* {
|
||||
* LONG SectionID
|
||||
* LONG Offset
|
||||
* }
|
||||
*
|
||||
* Sections:
|
||||
* Section[NumberOfSections]
|
||||
*
|
||||
* Section:
|
||||
* LONG SizeInBytes
|
||||
* char Type
|
||||
* if( Type!=WRAM0 )
|
||||
* {
|
||||
* char Data[SizeInBytes]
|
||||
* Patches
|
||||
* }
|
||||
*
|
||||
* Patches:
|
||||
* LONG NumberOfPatches
|
||||
* Patch[NumberOfPatches]
|
||||
*
|
||||
* Patch:
|
||||
* char Filename NULL-terminated
|
||||
* LONG LineNo
|
||||
* LONG Offset
|
||||
* char Type
|
||||
* LONG RpnByteSize
|
||||
* Rpn[RpnByteSize]
|
||||
*
|
||||
* Rpn:
|
||||
* Operators: 0x00-0x7F
|
||||
* Constants: 0x80 0x00000000
|
||||
* Symbols : 0x81 0x00000000
|
||||
*
|
||||
*/
|
||||
#ifndef RGBDS_ASM_LINK_H
|
||||
#define RGBDS_ASM_LINK_H
|
||||
|
||||
enum {
|
||||
RPN_ADD = 0,
|
||||
@@ -86,10 +32,6 @@ enum {
|
||||
|
||||
RPN_HRAM,
|
||||
|
||||
RPN_PCEZP,
|
||||
|
||||
RPN_RANGECHECK,
|
||||
|
||||
RPN_CONST = 0x80,
|
||||
RPN_SYM = 0x81
|
||||
};
|
||||
@@ -101,7 +43,8 @@ enum {
|
||||
SECT_ROM0,
|
||||
SECT_HRAM,
|
||||
SECT_WRAMX,
|
||||
SECT_SRAM
|
||||
SECT_SRAM,
|
||||
SECT_OAM
|
||||
};
|
||||
|
||||
enum {
|
||||
@@ -113,8 +56,6 @@ enum {
|
||||
enum {
|
||||
PATCH_BYTE = 0,
|
||||
PATCH_WORD_L,
|
||||
PATCH_LONG_L,
|
||||
PATCH_WORD_B,
|
||||
PATCH_LONG_B
|
||||
PATCH_LONG_L
|
||||
};
|
||||
#endif
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#ifndef ASMOTOR_ASM_MATH_H
|
||||
#define ASMOTOR_ASM_MATH_H
|
||||
#ifndef RGBDS_ASM_MATH_H
|
||||
#define RGBDS_ASM_MATH_H
|
||||
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
|
||||
void math_DefinePI(void);
|
||||
void math_Print(SLONG i);
|
||||
@@ -14,5 +14,8 @@ SLONG math_ATan(SLONG i);
|
||||
SLONG math_ATan2(SLONG i, SLONG j);
|
||||
SLONG math_Mul(SLONG i, SLONG j);
|
||||
SLONG math_Div(SLONG i, SLONG j);
|
||||
SLONG math_Round(SLONG i);
|
||||
SLONG math_Ceil(SLONG i);
|
||||
SLONG math_Floor(SLONG i);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
#ifndef ASMOTOR_ASM_OUTPUT_H
|
||||
#define ASMOTOR_ASM_OUTPUT_H
|
||||
#ifndef RGBDS_ASM_OUTPUT_H
|
||||
#define RGBDS_ASM_OUTPUT_H
|
||||
|
||||
#include "asm/rpn.h"
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
|
||||
struct Section {
|
||||
char *pzName;
|
||||
@@ -10,6 +10,7 @@ struct Section {
|
||||
ULONG nPC;
|
||||
ULONG nOrg;
|
||||
ULONG nBank;
|
||||
ULONG nAlign;
|
||||
struct Section *pNext;
|
||||
struct Patch *pPatches;
|
||||
struct Charmap *charmap;
|
||||
@@ -20,6 +21,7 @@ void out_PrepPass2(void);
|
||||
void out_SetFileName(char *s);
|
||||
void out_NewSection(char *pzName, ULONG secttype);
|
||||
void out_NewAbsSection(char *pzName, ULONG secttype, SLONG org, SLONG bank);
|
||||
void out_NewAlignedSection(char *pzName, ULONG secttype, SLONG alignment, SLONG bank);
|
||||
void out_AbsByte(int b);
|
||||
void out_AbsByteGroup(char *s, int length);
|
||||
void out_RelByte(struct Expression * expr);
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef ASMOTOR_ASM_RPN_H
|
||||
#define ASMOTOR_ASM_RPN_H
|
||||
#ifndef RGBDS_ASM_RPN_H
|
||||
#define RGBDS_ASM_RPN_H
|
||||
|
||||
struct Expression {
|
||||
SLONG nVal;
|
||||
@@ -15,68 +15,67 @@ ULONG rpn_isPCRelative(struct Expression * expr);
|
||||
void rpn_Symbol(struct Expression * expr, char *tzSym);
|
||||
void rpn_Number(struct Expression * expr, ULONG i);
|
||||
void rpn_LOGNOT(struct Expression * expr, struct Expression * src1);
|
||||
void
|
||||
void
|
||||
rpn_LOGOR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGAND(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGEQU(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGGT(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGLT(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGGE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGLE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_LOGNE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_ADD(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_SUB(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_XOR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_OR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_AND(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_SHL(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_SHR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_MUL(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_DIV(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void
|
||||
void
|
||||
rpn_MOD(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2);
|
||||
void rpn_HIGH(struct Expression * expr, struct Expression * src);
|
||||
void rpn_LOW(struct Expression * expr, struct Expression * src);
|
||||
void rpn_UNNEG(struct Expression * expr, struct Expression * src);
|
||||
void rpn_UNNOT(struct Expression * expr, struct Expression * src);
|
||||
UWORD rpn_PopByte(struct Expression * expr);
|
||||
void rpn_Bank(struct Expression * expr, char *tzSym);
|
||||
void rpn_Reset(struct Expression * expr);
|
||||
int
|
||||
rpn_RangeCheck(struct Expression * expr, struct Expression * src, SLONG low,
|
||||
SLONG high);
|
||||
void rpn_CheckHRAM(struct Expression * expr, struct Expression * src1);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#ifndef ASMOTOR_SYMBOL_H
|
||||
#define ASMOTOR_SYMBOL_H
|
||||
#ifndef RGBDS_SYMBOL_H
|
||||
#define RGBDS_SYMBOL_H
|
||||
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
|
||||
#define HASHSIZE (1 << 16)
|
||||
#define MAXSYMLEN 256
|
||||
@@ -36,6 +36,7 @@ struct sSymbol {
|
||||
* not be changed during linking */
|
||||
|
||||
ULONG calchash(char *s);
|
||||
void sym_SetExportAll(BBOOL set);
|
||||
void sym_PrepPass1(void);
|
||||
void sym_PrepPass2(void);
|
||||
void sym_AddLocalReloc(char *tzSym);
|
||||
@@ -53,7 +54,6 @@ void sym_AddEqu(char *tzSym, SLONG value);
|
||||
void sym_AddSet(char *tzSym, SLONG value);
|
||||
void sym_Init(void);
|
||||
ULONG sym_GetConstantValue(char *s);
|
||||
void sym_Import(char *tzSym);
|
||||
ULONG sym_isConstant(char *s);
|
||||
struct sSymbol *sym_FindSymbol(char *tzName);
|
||||
void sym_Global(char *tzSym);
|
||||
@@ -70,5 +70,6 @@ ULONG sym_GetDefinedValue(char *s);
|
||||
ULONG sym_isDefined(char *tzName);
|
||||
void sym_Purge(char *tzName);
|
||||
ULONG sym_isConstDefined(char *tzName);
|
||||
int sym_IsRelocDiffDefined(char *tzSym1, char *tzSym2);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,15 +0,0 @@
|
||||
#ifndef ASMOTOR_ASM_TYPES_H
|
||||
#define ASMOTOR_ASM_TYPES_H
|
||||
|
||||
#ifndef _MAX_PATH
|
||||
#define _MAX_PATH 512
|
||||
#endif
|
||||
|
||||
typedef unsigned char UBYTE;
|
||||
typedef signed char SBYTE;
|
||||
typedef unsigned short UWORD;
|
||||
typedef signed short SWORD;
|
||||
typedef unsigned long ULONG;
|
||||
typedef signed long SLONG;
|
||||
|
||||
#endif
|
||||
40
include/extern/err.h
vendored
40
include/extern/err.h
vendored
@@ -1,26 +1,3 @@
|
||||
/*
|
||||
* Copyright © 2005-2013 Rich Felker, et al.
|
||||
*
|
||||
* Permission is hereby granted, free of charge, to any person obtaining
|
||||
* a copy of this software and associated documentation files (the
|
||||
* "Software"), to deal in the Software without restriction, including
|
||||
* without limitation the rights to use, copy, modify, merge, publish,
|
||||
* distribute, sublicense, and/or sell copies of the Software, and to
|
||||
* permit persons to whom the Software is furnished to do so, subject to
|
||||
* the following conditions:
|
||||
*
|
||||
* The above copyright notice and this permission notice shall be
|
||||
* included in all copies or substantial portions of the Software.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
||||
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
||||
* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
||||
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
||||
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||||
*/
|
||||
|
||||
#ifndef EXTERN_ERR_H
|
||||
#define EXTERN_ERR_H
|
||||
|
||||
@@ -29,6 +6,7 @@
|
||||
#else
|
||||
|
||||
#include <stdarg.h>
|
||||
#include "extern/stdnoreturn.h"
|
||||
|
||||
#define warn rgbds_warn
|
||||
#define vwarn rgbds_vwarn
|
||||
@@ -40,23 +18,15 @@
|
||||
#define errx rgbds_errx
|
||||
#define verrx rgbds_verrx
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
void warn(const char *, ...);
|
||||
void vwarn(const char *, va_list);
|
||||
void warnx(const char *, ...);
|
||||
void vwarnx(const char *, va_list);
|
||||
|
||||
void err(int, const char *, ...);
|
||||
void verr(int, const char *, va_list);
|
||||
void errx(int, const char *, ...);
|
||||
void verrx(int, const char *, va_list);
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
noreturn void err(int, const char *, ...);
|
||||
noreturn void verr(int, const char *, va_list);
|
||||
noreturn void errx(int, const char *, ...);
|
||||
noreturn void verrx(int, const char *, va_list);
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
14
include/extern/reallocarray.h
vendored
Normal file
14
include/extern/reallocarray.h
vendored
Normal file
@@ -0,0 +1,14 @@
|
||||
#ifndef EXTERN_REALLOCARRAY_H
|
||||
#define EXTERN_REALLOCARRAY_H
|
||||
|
||||
#ifdef REALLOCARRAY_IN_LIBC
|
||||
#include <stdlib.h>
|
||||
#else
|
||||
|
||||
#define reallocarray rgbds_reallocarray
|
||||
|
||||
void *reallocarray(void *, size_t, size_t);
|
||||
|
||||
#endif
|
||||
|
||||
#endif
|
||||
16
include/extern/stdnoreturn.h
vendored
Normal file
16
include/extern/stdnoreturn.h
vendored
Normal file
@@ -0,0 +1,16 @@
|
||||
#if __STDC_VERSION__ >= 201112L
|
||||
/* C11 or newer */
|
||||
#define noreturn _Noreturn
|
||||
#elif __cplusplus >= 201103L
|
||||
/* C++11 or newer */
|
||||
#define noreturn [[noreturn]]
|
||||
#elif __GNUC__ > 2 || (__GNUC__ == 2 && (__GNUC_MINOR__ >= 5))
|
||||
/* GCC 2.5 or newer */
|
||||
#define noreturn __attribute__ ((noreturn))
|
||||
#elif _MSC_VER >= 1310
|
||||
/* MS Visual Studio 2003/.NET Framework 1.1 or newer */
|
||||
#define noreturn _declspec( noreturn)
|
||||
#else
|
||||
/* unsupported, but no need to throw a fit */
|
||||
#define noreturn
|
||||
#endif
|
||||
30
include/gfx/gb.h
Normal file
30
include/gfx/gb.h
Normal file
@@ -0,0 +1,30 @@
|
||||
/*
|
||||
* Copyright © 2013 stag019 <stag019@gmail.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#ifndef RGBDS_GFX_GB_H
|
||||
#define RGBDS_GFX_GB_H
|
||||
|
||||
#include <stdint.h>
|
||||
#include "gfx/main.h"
|
||||
|
||||
void png_to_gb(struct PNGImage png, struct GBImage *gb);
|
||||
void output_file(struct Options opts, struct GBImage gb);
|
||||
int get_tile_index(uint8_t *tile, uint8_t **tiles, int num_tiles, int tile_size);
|
||||
void create_tilemap(struct Options opts, struct GBImage *gb, struct Tilemap *tilemap);
|
||||
void output_tilemap_file(struct Options opts, struct Tilemap tilemap);
|
||||
void output_palette_file(struct Options opts, struct PNGImage png);
|
||||
|
||||
#endif
|
||||
75
include/gfx/main.h
Normal file
75
include/gfx/main.h
Normal file
@@ -0,0 +1,75 @@
|
||||
/*
|
||||
* Copyright © 2013 stag019 <stag019@gmail.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#ifndef RGBDS_GFX_MAIN_H
|
||||
#define RGBDS_GFX_MAIN_H
|
||||
|
||||
#include <png.h>
|
||||
#include <stdbool.h>
|
||||
#include <stdint.h>
|
||||
|
||||
#include "extern/err.h"
|
||||
|
||||
struct Options {
|
||||
bool debug;
|
||||
bool verbose;
|
||||
bool hardfix;
|
||||
bool fix;
|
||||
bool horizontal;
|
||||
bool unique;
|
||||
int trim;
|
||||
char *mapfile;
|
||||
bool mapout;
|
||||
char *palfile;
|
||||
bool palout;
|
||||
char *outfile;
|
||||
char *infile;
|
||||
};
|
||||
|
||||
struct PNGImage {
|
||||
png_struct *png;
|
||||
png_info *info;
|
||||
png_byte **data;
|
||||
int width;
|
||||
int height;
|
||||
png_byte depth;
|
||||
png_byte type;
|
||||
bool horizontal;
|
||||
int trim;
|
||||
char *mapfile;
|
||||
bool mapout;
|
||||
char *palfile;
|
||||
bool palout;
|
||||
};
|
||||
|
||||
struct GBImage {
|
||||
uint8_t *data;
|
||||
int size;
|
||||
bool horizontal;
|
||||
int trim;
|
||||
};
|
||||
|
||||
struct Tilemap {
|
||||
uint8_t *data;
|
||||
int size;
|
||||
};
|
||||
|
||||
int depth, colors;
|
||||
|
||||
#include "gfx/makepng.h"
|
||||
#include "gfx/gb.h"
|
||||
|
||||
#endif
|
||||
28
include/gfx/makepng.h
Normal file
28
include/gfx/makepng.h
Normal file
@@ -0,0 +1,28 @@
|
||||
/*
|
||||
* Copyright © 2013 stag019 <stag019@gmail.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#ifndef RGBDS_GFX_PNG_H
|
||||
#define RGBDS_GFX_PNG_H
|
||||
|
||||
#include "gfx/main.h"
|
||||
|
||||
void input_png_file(struct Options opts, struct PNGImage *img);
|
||||
void get_text(struct PNGImage *png);
|
||||
void set_text(struct PNGImage *png);
|
||||
void output_png_file(struct Options opts, struct PNGImage *png);
|
||||
void free_png_data(struct PNGImage *png);
|
||||
|
||||
#endif
|
||||
@@ -1,17 +1,33 @@
|
||||
#ifndef ASMOTOR_LINK_ASSIGN_H
|
||||
#define ASMOTOR_LINK_ASSIGN_H
|
||||
#ifndef RGBDS_LINK_ASSIGN_H
|
||||
#define RGBDS_LINK_ASSIGN_H
|
||||
|
||||
#include "link/types.h"
|
||||
#include "mylink.h"
|
||||
#include "types.h"
|
||||
|
||||
enum eBankCount {
|
||||
BANK_COUNT_ROM0 = 1,
|
||||
BANK_COUNT_ROMX = 511,
|
||||
BANK_COUNT_WRAM0 = 1,
|
||||
BANK_COUNT_WRAMX = 7,
|
||||
BANK_COUNT_VRAM = 2,
|
||||
BANK_COUNT_OAM = 1,
|
||||
BANK_COUNT_HRAM = 1,
|
||||
BANK_COUNT_SRAM = 16
|
||||
};
|
||||
|
||||
enum eBankDefine {
|
||||
BANK_ROM0 = 0,
|
||||
BANK_WRAM0 = 512,
|
||||
BANK_WRAMX,
|
||||
BANK_VRAM = 520,
|
||||
BANK_HRAM = 522,
|
||||
BANK_SRAM = 523
|
||||
BANK_ROM0 = 0,
|
||||
BANK_ROMX = BANK_ROM0 + BANK_COUNT_ROM0,
|
||||
BANK_WRAM0 = BANK_ROMX + BANK_COUNT_ROMX,
|
||||
BANK_WRAMX = BANK_WRAM0 + BANK_COUNT_WRAM0,
|
||||
BANK_VRAM = BANK_WRAMX + BANK_COUNT_WRAMX,
|
||||
BANK_OAM = BANK_VRAM + BANK_COUNT_VRAM,
|
||||
BANK_HRAM = BANK_OAM + BANK_COUNT_OAM,
|
||||
BANK_SRAM = BANK_HRAM + BANK_COUNT_HRAM
|
||||
};
|
||||
#define MAXBANKS 527
|
||||
|
||||
#define MAXBANKS (BANK_COUNT_ROM0 + BANK_COUNT_ROMX + BANK_COUNT_WRAM0 + BANK_COUNT_WRAMX \
|
||||
+ BANK_COUNT_VRAM + BANK_COUNT_OAM + BANK_COUNT_HRAM + BANK_COUNT_SRAM)
|
||||
|
||||
extern SLONG area_Avail(SLONG bank);
|
||||
extern void AssignSections(void);
|
||||
@@ -19,4 +35,16 @@ extern void CreateSymbolTable(void);
|
||||
extern SLONG MaxBankUsed;
|
||||
extern SLONG MaxAvail[MAXBANKS];
|
||||
|
||||
int
|
||||
IsSectionNameInUse(const char *name);
|
||||
|
||||
void
|
||||
SetLinkerscriptName(char *tzLinkerscriptFile);
|
||||
|
||||
int
|
||||
IsSectionSameTypeBankAndFloating(const char *name, enum eSectionType type, int bank);
|
||||
|
||||
unsigned int
|
||||
AssignSectionAddressAndBankByName(const char *name, unsigned int address, int bank);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef ASMOTOR_LINK_LIBRARY_H
|
||||
#define ASMOTOR_LINK_LIBRARY_H
|
||||
#ifndef RGBDS_LINK_LIBRARY_H
|
||||
#define RGBDS_LINK_LIBRARY_H
|
||||
|
||||
extern void AddNeededModules(void);
|
||||
|
||||
|
||||
@@ -1,9 +1,9 @@
|
||||
#ifndef ASMOTOR_LINK_MAIN_H
|
||||
#define ASMOTOR_LINK_MAIN_H
|
||||
#ifndef RGBDS_LINK_MAIN_H
|
||||
#define RGBDS_LINK_MAIN_H
|
||||
|
||||
#include "link/types.h"
|
||||
#include "types.h"
|
||||
|
||||
extern SLONG fillchar;
|
||||
extern char smartlinkstartsymbol[256];
|
||||
extern char *smartlinkstartsymbol;
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef ASMOTOR_LINK_MAPFILE_H
|
||||
#define ASMOTOR_LINK_MAPFILE_H
|
||||
#ifndef RGBDS_LINK_MAPFILE_H
|
||||
#define RGBDS_LINK_MAPFILE_H
|
||||
|
||||
extern void SetMapfileName(char *name);
|
||||
extern void SetSymfileName(char *name);
|
||||
|
||||
@@ -1,15 +1,18 @@
|
||||
#ifndef ASMOTOR_LINK_LINK_H
|
||||
#define ASMOTOR_LINK_LINK_H
|
||||
#ifndef RGBDS_LINK_LINK_H
|
||||
#define RGBDS_LINK_LINK_H
|
||||
|
||||
#ifndef _MAX_PATH
|
||||
#define _MAX_PATH 512
|
||||
#endif
|
||||
|
||||
#include "link/types.h"
|
||||
#include "types.h"
|
||||
|
||||
extern SLONG options;
|
||||
#define OPT_SMALL 0x01
|
||||
#define OPT_TINY 0x01
|
||||
#define OPT_SMART_C_LINK 0x02
|
||||
#define OPT_OVERLAY 0x04
|
||||
#define OPT_CONTWRAM 0x08
|
||||
#define OPT_DMG_MODE 0x10
|
||||
|
||||
enum eRpnData {
|
||||
RPN_ADD = 0,
|
||||
@@ -42,10 +45,6 @@ enum eRpnData {
|
||||
|
||||
RPN_HRAM,
|
||||
|
||||
RPN_PCEZP,
|
||||
|
||||
RPN_RANGECHECK,
|
||||
|
||||
RPN_CONST = 0x80,
|
||||
RPN_SYM = 0x81
|
||||
};
|
||||
@@ -57,14 +56,17 @@ enum eSectionType {
|
||||
SECT_ROM0,
|
||||
SECT_HRAM,
|
||||
SECT_WRAMX,
|
||||
SECT_SRAM
|
||||
SECT_SRAM,
|
||||
SECT_OAM
|
||||
};
|
||||
|
||||
struct sSection {
|
||||
SLONG nBank;
|
||||
SLONG nOrg;
|
||||
SLONG nAlign;
|
||||
BBOOL oAssigned;
|
||||
|
||||
char *pzName;
|
||||
SLONG nByteSize;
|
||||
enum eSectionType Type;
|
||||
UBYTE *pData;
|
||||
@@ -92,9 +94,7 @@ struct sSymbol {
|
||||
enum ePatchType {
|
||||
PATCH_BYTE = 0,
|
||||
PATCH_WORD_L,
|
||||
PATCH_LONG_L,
|
||||
PATCH_WORD_B,
|
||||
PATCH_LONG_B
|
||||
PATCH_LONG_L
|
||||
};
|
||||
|
||||
struct sPatch {
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef ASMOTOR_LINK_OBJECT_H
|
||||
#define ASMOTOR_LINK_OBJECT_H
|
||||
#ifndef RGBDS_LINK_OBJECT_H
|
||||
#define RGBDS_LINK_OBJECT_H
|
||||
|
||||
extern void obj_Readfile(char *tzObjectfile);
|
||||
|
||||
|
||||
@@ -1,7 +1,8 @@
|
||||
#ifndef ASMOTOR_LINK_OUTPUT_H
|
||||
#define ASMOTOR_LINK_OUTPUT_H
|
||||
#ifndef RGBDS_LINK_OUTPUT_H
|
||||
#define RGBDS_LINK_OUTPUT_H
|
||||
|
||||
void out_Setname(char *tzOutputfile);
|
||||
void out_SetOverlayname(char *tzOverlayfile);
|
||||
void Output(void);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#ifndef ASMOTOR_LINK_PATCH_H
|
||||
#define ASMOTOR_LINK_PATCH_H
|
||||
#ifndef RGBDS_LINK_PATCH_H
|
||||
#define RGBDS_LINK_PATCH_H
|
||||
|
||||
#include "link/types.h"
|
||||
#include "types.h"
|
||||
|
||||
void Patch(void);
|
||||
extern SLONG nPC;
|
||||
|
||||
37
include/link/script.h
Normal file
37
include/link/script.h
Normal file
@@ -0,0 +1,37 @@
|
||||
/*
|
||||
* Copyright (C) 2017 Antonio Nino Diaz <antonio_nd@outlook.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#ifndef RGBDS_LINK_SCRIPT_H
|
||||
#define RGBDS_LINK_SCRIPT_H
|
||||
|
||||
#include "extern/stdnoreturn.h"
|
||||
|
||||
noreturn void script_fatalerror(const char *fmt, ...);
|
||||
|
||||
void script_Parse(const char *path);
|
||||
|
||||
void script_IncludeFile(const char *path);
|
||||
int script_IncludeDepthGet(void);
|
||||
void script_IncludePop(void);
|
||||
|
||||
void script_InitSections(void);
|
||||
void script_SetCurrentSectionType(const char *type, unsigned int bank);
|
||||
void script_SetAddress(unsigned int addr);
|
||||
void script_SetAlignment(unsigned int alignment);
|
||||
void script_OutputSection(const char *section_name);
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,10 +1,10 @@
|
||||
#ifndef ASMOTOR_LINK_SYMBOL_H
|
||||
#define ASMOTOR_LINK_SYMBOL_H
|
||||
#ifndef RGBDS_LINK_SYMBOL_H
|
||||
#define RGBDS_LINK_SYMBOL_H
|
||||
|
||||
#include "link/types.h"
|
||||
#include "types.h"
|
||||
|
||||
void sym_Init(void);
|
||||
void sym_CreateSymbol(char *tzName, SLONG nValue, SBYTE nBank);
|
||||
void sym_CreateSymbol(char *tzName, SLONG nValue, SLONG nBank);
|
||||
SLONG sym_GetValue(char *tzName);
|
||||
SLONG sym_GetBank(char *tzName);
|
||||
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef ASMOTOR_LINK_TYPES_H
|
||||
#define ASMOTOR_LINK_TYPES_H
|
||||
#ifndef RGBDS_TYPES_H
|
||||
#define RGBDS_TYPES_H
|
||||
|
||||
#ifndef _MAX_PATH
|
||||
#define _MAX_PATH 512
|
||||
1
src/asm/.gitignore
vendored
1
src/asm/.gitignore
vendored
@@ -1,3 +1,2 @@
|
||||
asmy.c
|
||||
asmy.h
|
||||
asmy.y
|
||||
|
||||
1682
src/asm/asmy.y
Normal file
1682
src/asm/asmy.y
Normal file
File diff suppressed because it is too large
Load Diff
@@ -1,3 +1,57 @@
|
||||
/*
|
||||
* UTF-8 decoder copyright © 2008–2009 Björn Höhrmann <bjoern@hoehrmann.de>
|
||||
* http://bjoern.hoehrmann.de/utf-8/decoder/dfa/
|
||||
*
|
||||
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
* of this software and associated documentation files (the "Software"), to
|
||||
* deal in the Software without restriction, including without limitation the
|
||||
* rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
||||
* sell copies of the Software, and to permit persons to whom the Software is
|
||||
* furnished to do so, subject to the following conditions:
|
||||
*
|
||||
* The above copyright notice and this permission notice shall be included in
|
||||
* all copies or substantial portions of the Software.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
||||
* IN THE SOFTWARE.
|
||||
*/
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
static const uint8_t utf8d[] = {
|
||||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, // 00..1f
|
||||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, // 20..3f
|
||||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, // 40..5f
|
||||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, // 60..7f
|
||||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9, // 80..9f
|
||||
7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, // a0..bf
|
||||
8,8,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2, // c0..df
|
||||
0xa,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x4,0x3,0x3, // e0..ef
|
||||
0xb,0x6,0x6,0x6,0x5,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8, // f0..ff
|
||||
0x0,0x1,0x2,0x3,0x5,0x8,0x7,0x1,0x1,0x1,0x4,0x6,0x1,0x1,0x1,0x1, // s0..s0
|
||||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,1, // s1..s2
|
||||
1,2,1,1,1,1,1,2,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1, // s3..s4
|
||||
1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,1,1,1,1,1, // s5..s6
|
||||
1,3,1,1,1,1,1,3,1,3,1,1,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1, // s7..s8
|
||||
};
|
||||
|
||||
uint32_t
|
||||
decode(uint32_t* state, uint32_t* codep, uint32_t byte) {
|
||||
uint32_t type = utf8d[byte];
|
||||
|
||||
*codep = (*state != 0) ?
|
||||
(byte & 0x3fu) | (*codep << 6) :
|
||||
(0xff >> type) & (byte);
|
||||
|
||||
*state = utf8d[256 + *state*16 + type];
|
||||
return *state;
|
||||
}
|
||||
|
||||
/*
|
||||
* Copyright © 2013 stag019 <stag019@gmail.com>
|
||||
*
|
||||
@@ -28,122 +82,95 @@ struct Charmap globalCharmap = {0};
|
||||
extern struct Section *pCurrentSection;
|
||||
|
||||
int
|
||||
readUTF8Char(char *destination, char *source)
|
||||
readUTF8Char(char *dest, char *src)
|
||||
{
|
||||
int size;
|
||||
UBYTE first;
|
||||
first = source[0];
|
||||
uint32_t state;
|
||||
uint32_t codep;
|
||||
int i;
|
||||
|
||||
if(first >= 0xFC)
|
||||
{
|
||||
size = 6;
|
||||
for (i = 0, state = 0;; i++) {
|
||||
if (decode(&state, &codep, (uint8_t)src[i]) == 1) {
|
||||
fatalerror("invalid UTF-8 character");
|
||||
}
|
||||
|
||||
dest[i] = src[i];
|
||||
|
||||
i++;
|
||||
if (state == 0) {
|
||||
dest[i] = '\0';
|
||||
return i;
|
||||
}
|
||||
dest[i] = src[i];
|
||||
}
|
||||
else if(first >= 0xF8)
|
||||
{
|
||||
size = 5;
|
||||
}
|
||||
else if(first >= 0xF0)
|
||||
{
|
||||
size = 4;
|
||||
}
|
||||
else if(first >= 0xE0)
|
||||
{
|
||||
size = 3;
|
||||
}
|
||||
else if(first >= 0xC0)
|
||||
{
|
||||
size = 2;
|
||||
}
|
||||
else if(first != '\0')
|
||||
{
|
||||
size = 1;
|
||||
}
|
||||
else
|
||||
{
|
||||
size = 0;
|
||||
}
|
||||
strncpy(destination, source, size);
|
||||
destination[size] = 0;
|
||||
return size;
|
||||
}
|
||||
|
||||
int
|
||||
charmap_Add(char *input, UBYTE output)
|
||||
{
|
||||
int i, input_length;
|
||||
char temp1i[CHARMAPLENGTH + 1], temp2i[CHARMAPLENGTH + 1], temp1o = 0, temp2o = 0;
|
||||
int i;
|
||||
size_t input_length;
|
||||
char temp1i[CHARMAPLENGTH + 1], temp2i[CHARMAPLENGTH + 1], temp1o = 0,
|
||||
temp2o = 0;
|
||||
|
||||
struct Charmap *charmap;
|
||||
|
||||
if(pCurrentSection)
|
||||
{
|
||||
if(pCurrentSection -> charmap)
|
||||
{
|
||||
charmap = pCurrentSection -> charmap;
|
||||
}
|
||||
else
|
||||
{
|
||||
if((charmap = (struct Charmap *) calloc(1, sizeof(struct Charmap))) == NULL)
|
||||
{
|
||||
if (pCurrentSection) {
|
||||
if (pCurrentSection->charmap) {
|
||||
charmap = pCurrentSection->charmap;
|
||||
} else {
|
||||
if ((charmap = calloc(1, sizeof(struct Charmap))) ==
|
||||
NULL) {
|
||||
fatalerror("Not enough memory for charmap");
|
||||
}
|
||||
pCurrentSection -> charmap = charmap;
|
||||
pCurrentSection->charmap = charmap;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
} else {
|
||||
charmap = &globalCharmap;
|
||||
}
|
||||
|
||||
if(nPass == 2)
|
||||
{
|
||||
return charmap -> count;
|
||||
if (nPass == 2) {
|
||||
return charmap->count;
|
||||
}
|
||||
|
||||
if(charmap -> count > MAXCHARMAPS || strlen(input) > CHARMAPLENGTH)
|
||||
{
|
||||
if (charmap->count > MAXCHARMAPS || strlen(input) > CHARMAPLENGTH) {
|
||||
return -1;
|
||||
}
|
||||
|
||||
input_length = strlen(input);
|
||||
if(input_length > 1)
|
||||
{
|
||||
if (input_length > 1) {
|
||||
i = 0;
|
||||
while(i < charmap -> count + 1)
|
||||
{
|
||||
if(input_length > strlen(charmap -> input[i]))
|
||||
{
|
||||
memcpy(temp1i, charmap -> input[i], CHARMAPLENGTH + 1);
|
||||
memcpy(charmap -> input[i], input, input_length);
|
||||
temp1o = charmap -> output[i];
|
||||
charmap -> output[i] = output;
|
||||
while (i < charmap->count + 1) {
|
||||
if (input_length > strlen(charmap->input[i])) {
|
||||
memcpy(temp1i, charmap->input[i],
|
||||
CHARMAPLENGTH + 1);
|
||||
memcpy(charmap->input[i], input, input_length);
|
||||
temp1o = charmap->output[i];
|
||||
charmap->output[i] = output;
|
||||
i++;
|
||||
break;
|
||||
}
|
||||
i++;
|
||||
}
|
||||
while(i < charmap -> count + 1)
|
||||
{
|
||||
memcpy(temp2i, charmap -> input[i], CHARMAPLENGTH + 1);
|
||||
memcpy(charmap -> input[i], temp1i, CHARMAPLENGTH + 1);
|
||||
while (i < charmap->count + 1) {
|
||||
memcpy(temp2i, charmap->input[i], CHARMAPLENGTH + 1);
|
||||
memcpy(charmap->input[i], temp1i, CHARMAPLENGTH + 1);
|
||||
memcpy(temp1i, temp2i, CHARMAPLENGTH + 1);
|
||||
temp2o = charmap -> output[i];
|
||||
charmap -> output[i] = temp1o;
|
||||
temp2o = charmap->output[i];
|
||||
charmap->output[i] = temp1o;
|
||||
temp1o = temp2o;
|
||||
i++;
|
||||
}
|
||||
memcpy(charmap -> input[charmap -> count + 1], temp1i, CHARMAPLENGTH + 1);
|
||||
charmap -> output[charmap -> count + 1] = temp1o;
|
||||
memcpy(charmap->input[charmap->count + 1], temp1i,
|
||||
CHARMAPLENGTH + 1);
|
||||
charmap->output[charmap->count + 1] = temp1o;
|
||||
} else {
|
||||
memcpy(charmap->input[charmap->count], input, input_length);
|
||||
charmap->output[charmap->count] = output;
|
||||
}
|
||||
else
|
||||
{
|
||||
memcpy(charmap -> input[charmap -> count], input, input_length);
|
||||
charmap -> output[charmap -> count] = output;
|
||||
}
|
||||
return ++charmap -> count;
|
||||
return ++charmap->count;
|
||||
}
|
||||
|
||||
int
|
||||
int
|
||||
charmap_Convert(char **input)
|
||||
{
|
||||
struct Charmap *charmap;
|
||||
@@ -152,47 +179,35 @@ charmap_Convert(char **input)
|
||||
char *buffer;
|
||||
int i, j, length;
|
||||
|
||||
if(pCurrentSection && pCurrentSection -> charmap)
|
||||
{
|
||||
charmap = pCurrentSection -> charmap;
|
||||
}
|
||||
else
|
||||
{
|
||||
if (pCurrentSection && pCurrentSection->charmap) {
|
||||
charmap = pCurrentSection->charmap;
|
||||
} else {
|
||||
charmap = &globalCharmap;
|
||||
}
|
||||
|
||||
if((buffer = (char *) malloc(strlen(*input))) == NULL)
|
||||
{
|
||||
if ((buffer = malloc(strlen(*input))) == NULL) {
|
||||
fatalerror("Not enough memory for buffer");
|
||||
}
|
||||
|
||||
length = 0;
|
||||
while(**input)
|
||||
{
|
||||
while (**input) {
|
||||
j = 0;
|
||||
for(i = 0; i < charmap -> count; i++)
|
||||
{
|
||||
j = strlen(charmap -> input[i]);
|
||||
if(memcmp(*input, charmap -> input[i], j) == 0)
|
||||
{
|
||||
outchar[0] = charmap -> output[i];
|
||||
for (i = 0; i < charmap->count; i++) {
|
||||
j = strlen(charmap->input[i]);
|
||||
if (memcmp(*input, charmap->input[i], j) == 0) {
|
||||
outchar[0] = charmap->output[i];
|
||||
outchar[1] = 0;
|
||||
break;
|
||||
}
|
||||
j = 0;
|
||||
}
|
||||
if(!j)
|
||||
{
|
||||
if (!j) {
|
||||
j = readUTF8Char(outchar, *input);
|
||||
}
|
||||
if(!outchar[0])
|
||||
{
|
||||
if (!outchar[0]) {
|
||||
buffer[length++] = 0;
|
||||
}
|
||||
else
|
||||
{
|
||||
for(i = 0; outchar[i]; i++)
|
||||
{
|
||||
} else {
|
||||
for (i = 0; outchar[i]; i++) {
|
||||
buffer[length++] = outchar[i];
|
||||
}
|
||||
}
|
||||
@@ -201,4 +216,3 @@ charmap_Convert(char **input)
|
||||
*input = buffer;
|
||||
return length;
|
||||
}
|
||||
|
||||
|
||||
126
src/asm/fstack.c
126
src/asm/fstack.c
@@ -1,8 +1,5 @@
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
* FileStack routines
|
||||
*/
|
||||
|
||||
#include <errno.h>
|
||||
@@ -13,7 +10,7 @@
|
||||
|
||||
#include "asm/symbol.h"
|
||||
#include "asm/fstack.h"
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/main.h"
|
||||
#include "asm/lexer.h"
|
||||
#include "extern/err.h"
|
||||
@@ -23,13 +20,6 @@
|
||||
#define PATH_MAX 256
|
||||
#endif
|
||||
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* VARIABLES
|
||||
*
|
||||
*/
|
||||
|
||||
struct sContext *pFileStack;
|
||||
struct sSymbol *pCurrentMacro;
|
||||
YY_BUFFER_STATE CurrentFlexHandle;
|
||||
@@ -55,13 +45,9 @@ ULONG ulMacroReturnValue;
|
||||
#define STAT_isREPTBlock 3
|
||||
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Context push and pop
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
pushcontext(void)
|
||||
{
|
||||
struct sContext **ppFileStack;
|
||||
@@ -98,7 +84,7 @@ pushcontext(void)
|
||||
fatalerror("No memory for context");
|
||||
}
|
||||
|
||||
int
|
||||
int
|
||||
popcontext(void)
|
||||
{
|
||||
struct sContext *pLastFile, **ppLastFile;
|
||||
@@ -162,19 +148,16 @@ popcontext(void)
|
||||
return (1);
|
||||
}
|
||||
|
||||
int
|
||||
int
|
||||
yywrap(void)
|
||||
{
|
||||
return (popcontext());
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Dump the context stack to stderr
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Dump the context stack to stderr
|
||||
*/
|
||||
void
|
||||
fstk_Dump(void)
|
||||
{
|
||||
struct sContext *pLastFile;
|
||||
@@ -189,17 +172,22 @@ fstk_Dump(void)
|
||||
|
||||
fprintf(stderr, "%s(%ld)", tzCurrentFileName, nLineNo);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Extra includepath stuff
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Extra includepath stuff
|
||||
*/
|
||||
void
|
||||
fstk_AddIncludePath(char *s)
|
||||
{
|
||||
strcpy(IncludePaths[NextIncPath++], s);
|
||||
if (NextIncPath == MAXINCPATHS) {
|
||||
fatalerror("Too many include directories passed from command line");
|
||||
return;
|
||||
}
|
||||
|
||||
if (strlcpy(IncludePaths[NextIncPath++], s, _MAX_PATH) >= _MAX_PATH) {
|
||||
fatalerror("Include path too long '%s'",s);
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
FILE *
|
||||
@@ -214,7 +202,7 @@ fstk_FindFile(char *fname)
|
||||
}
|
||||
|
||||
for (i = 0; i < NextIncPath; ++i) {
|
||||
if (strlcpy(path, IncludePaths[i], sizeof path) >=
|
||||
if (strlcpy(path, IncludePaths[i], sizeof path) >=
|
||||
sizeof path) {
|
||||
continue;
|
||||
}
|
||||
@@ -230,13 +218,10 @@ fstk_FindFile(char *fname)
|
||||
errno = ENOENT;
|
||||
return NULL;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Set up an include file for parsing
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Set up an include file for parsing
|
||||
*/
|
||||
void
|
||||
fstk_RunInclude(char *tzFileName)
|
||||
{
|
||||
@@ -262,14 +247,11 @@ fstk_RunInclude(char *tzFileName)
|
||||
yyunput('\n');
|
||||
nLineNo -= 1;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Set up a macro for parsing
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Set up a macro for parsing
|
||||
*/
|
||||
ULONG
|
||||
fstk_RunMacro(char *s)
|
||||
{
|
||||
struct sSymbol *sym;
|
||||
@@ -281,6 +263,8 @@ fstk_RunMacro(char *s)
|
||||
sym_UseNewMacroArgs();
|
||||
nCurrentStatus = STAT_isMacro;
|
||||
strcpy(tzCurrentFileName, s);
|
||||
if (sym->pMacro == NULL)
|
||||
return 0;
|
||||
pCurrentMacro = sym;
|
||||
CurrentFlexHandle =
|
||||
yy_scan_bytes(pCurrentMacro->pMacro,
|
||||
@@ -290,14 +274,11 @@ fstk_RunMacro(char *s)
|
||||
} else
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Set up a macroargument for parsing
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set up a macroargument for parsing
|
||||
*/
|
||||
void
|
||||
fstk_RunMacroArg(SLONG s)
|
||||
{
|
||||
char *sym;
|
||||
@@ -316,14 +297,11 @@ fstk_RunMacroArg(SLONG s)
|
||||
} else
|
||||
fatalerror("No such macroargument");
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Set up a stringequate for parsing
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set up a stringequate for parsing
|
||||
*/
|
||||
void
|
||||
fstk_RunString(char *s)
|
||||
{
|
||||
struct sSymbol *pSym;
|
||||
@@ -338,14 +316,11 @@ fstk_RunString(char *s)
|
||||
} else
|
||||
yyerror("No such string symbol '%s'", s);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Set up a repeat block for parsing
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set up a repeat block for parsing
|
||||
*/
|
||||
void
|
||||
fstk_RunRept(ULONG count)
|
||||
{
|
||||
if (count) {
|
||||
@@ -362,19 +337,18 @@ fstk_RunRept(ULONG count)
|
||||
yy_switch_to_buffer(CurrentFlexHandle);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - FSTACK.C (FileStack routines)
|
||||
*
|
||||
* Initialize the filestack routines
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Initialize the filestack routines
|
||||
*/
|
||||
void
|
||||
fstk_Init(char *s)
|
||||
{
|
||||
char tzFileName[_MAX_PATH + 1];
|
||||
|
||||
sym_AddString("__FILE__", s);
|
||||
char tzSymFileName[_MAX_PATH + 1 + 2];
|
||||
snprintf(tzSymFileName, sizeof(tzSymFileName), "\"%s\"", s);
|
||||
sym_AddString("__FILE__", tzSymFileName);
|
||||
|
||||
strcpy(tzFileName, s);
|
||||
pFileStack = NULL;
|
||||
|
||||
@@ -1,41 +0,0 @@
|
||||
%token T_SECT_WRAM0 T_SECT_VRAM T_SECT_ROMX T_SECT_ROM0 T_SECT_HRAM T_SECT_WRAMX T_SECT_SRAM
|
||||
|
||||
%token T_Z80_ADC T_Z80_ADD T_Z80_AND
|
||||
%token T_Z80_BIT
|
||||
%token T_Z80_CALL T_Z80_CCF T_Z80_CP T_Z80_CPL
|
||||
%token T_Z80_DAA T_Z80_DEC T_Z80_DI
|
||||
%token T_Z80_EI T_Z80_EX
|
||||
%token T_Z80_HALT
|
||||
%token T_Z80_INC
|
||||
%token T_Z80_JP T_Z80_JR
|
||||
%token T_Z80_LD
|
||||
%token T_Z80_LDI
|
||||
%token T_Z80_LDD
|
||||
%token T_Z80_LDIO
|
||||
%token T_Z80_NOP
|
||||
%token T_Z80_OR
|
||||
%token T_Z80_POP T_Z80_PUSH
|
||||
%token T_Z80_RES T_Z80_RET T_Z80_RETI T_Z80_RST
|
||||
%token T_Z80_RL T_Z80_RLA T_Z80_RLC T_Z80_RLCA
|
||||
%token T_Z80_RR T_Z80_RRA T_Z80_RRC T_Z80_RRCA
|
||||
%token T_Z80_SBC T_Z80_SCF T_Z80_STOP
|
||||
%token T_Z80_SLA T_Z80_SRA T_Z80_SRL T_Z80_SUB T_Z80_SWAP
|
||||
%token T_Z80_XOR
|
||||
|
||||
%token T_MODE_A T_MODE_B T_MODE_C T_MODE_C_IND T_MODE_D T_MODE_E T_MODE_H T_MODE_L
|
||||
%token T_MODE_AF
|
||||
%token T_MODE_BC T_MODE_BC_IND
|
||||
%token T_MODE_DE T_MODE_DE_IND
|
||||
%token T_MODE_SP T_MODE_SP_IND
|
||||
%token T_MODE_HL T_MODE_HL_IND T_MODE_HL_INDDEC T_MODE_HL_INDINC
|
||||
%token T_CC_NZ T_CC_Z T_CC_NC
|
||||
|
||||
%type <nConstValue> reg_r
|
||||
%type <nConstValue> reg_ss
|
||||
%type <nConstValue> reg_rr
|
||||
%type <nConstValue> reg_tt
|
||||
%type <nConstValue> ccode
|
||||
%type <sVal> op_a_n
|
||||
%type <nConstValue> op_a_r
|
||||
%type <nConstValue> op_hl_ss
|
||||
%type <sVal> op_mem_ind
|
||||
@@ -1,557 +0,0 @@
|
||||
section:
|
||||
T_POP_SECTION string ',' sectiontype
|
||||
{
|
||||
out_NewSection($2,$4);
|
||||
}
|
||||
| T_POP_SECTION string ',' sectiontype '[' const ']'
|
||||
{
|
||||
if( $6>=0 && $6<0x10000 )
|
||||
out_NewAbsSection($2,$4,$6,-1);
|
||||
else
|
||||
yyerror("Address $%x not 16-bit", $6);
|
||||
}
|
||||
| T_POP_SECTION string ',' sectiontype ',' T_OP_BANK '[' const ']'
|
||||
{
|
||||
if( $4==SECT_ROMX ) {
|
||||
if( $8>=1 && $8<=0x1ff )
|
||||
out_NewAbsSection($2,$4,-1,$8);
|
||||
else
|
||||
yyerror("ROM bank value $%x out of range (1 to $1ff)", $8);
|
||||
} else if ($4 == SECT_SRAM) {
|
||||
if ($8 >= 0 && $8 <= 3) {
|
||||
out_NewAbsSection($2, $4, -1, $8);
|
||||
} else {
|
||||
yyerror("SRAM bank value $%x out of range (0 to 3)", $8);
|
||||
}
|
||||
} else if ($4 == SECT_WRAMX) {
|
||||
if ($8 >= 1 && $8 <= 7) {
|
||||
out_NewAbsSection($2, $4, -1, $8);
|
||||
} else {
|
||||
yyerror("WRAMX bank value $%x out of range (1 to 7)", $8);
|
||||
}
|
||||
} else if ($4 == SECT_VRAM) {
|
||||
if ($8 >= 0 && $8 <= 1) {
|
||||
out_NewAbsSection($2, $4, -1, $8);
|
||||
} else {
|
||||
yyerror("VRAM bank value $%x out of range (0 to 1)", $8);
|
||||
}
|
||||
} else {
|
||||
yyerror("BANK only allowed for ROMX, WRAMX, SRAM, or VRAM sections");
|
||||
}
|
||||
}
|
||||
| T_POP_SECTION string ',' sectiontype '[' const ']' ',' T_OP_BANK '[' const ']'
|
||||
{
|
||||
if( $4==SECT_ROMX ) {
|
||||
if( $6>=0 && $6<0x10000 ) {
|
||||
if( $11>=1 && $11<=0x1ff )
|
||||
out_NewAbsSection($2,$4,$6,$11);
|
||||
else
|
||||
yyerror("ROM bank value $%x out of range (1 to $1ff)", $11);
|
||||
} else
|
||||
yyerror("Address $%x not 16-bit", $6);
|
||||
} else if ($4 == SECT_SRAM) {
|
||||
if ($6 >= 0 && $6 < 0x10000) {
|
||||
if ($11 >= 0 && $11 <= 3) {
|
||||
out_NewAbsSection($2, $4, $6, $11);
|
||||
} else {
|
||||
yyerror("SRAM bank value $%x out of range (0 to 3)", $11);
|
||||
}
|
||||
} else {
|
||||
yyerror("Address $%x not 16-bit", $6);
|
||||
}
|
||||
} else if ($4 == SECT_WRAMX) {
|
||||
if ($6 >= 0 && $6 < 0x10000) {
|
||||
if ($11 >= 1 && $11 <= 7) {
|
||||
out_NewAbsSection($2, $4, $6, $11);
|
||||
} else {
|
||||
yyerror("WRAMX bank value $%x out of range (1 to 7)", $11);
|
||||
}
|
||||
} else {
|
||||
yyerror("Address $%x not 16-bit", $6);
|
||||
}
|
||||
} else if ($4 == SECT_VRAM) {
|
||||
if ($6 >= 0 && $6 < 0x10000) {
|
||||
if ($11 >= 0 && $11 <= 1) {
|
||||
out_NewAbsSection($2,$4,$6,$11);
|
||||
} else {
|
||||
yyerror("VRAM bank value $%x out of range (0 to 1)", $11);
|
||||
}
|
||||
} else {
|
||||
yyerror("Address $%x not 16-bit", $6);
|
||||
}
|
||||
} else {
|
||||
yyerror("BANK only allowed for ROMX, WRAMX, SRAM, or VRAM sections");
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
sectiontype:
|
||||
T_SECT_WRAM0 { $$=SECT_WRAM0; }
|
||||
| T_SECT_VRAM { $$=SECT_VRAM; }
|
||||
| T_SECT_ROMX { $$=SECT_ROMX; }
|
||||
| T_SECT_ROM0 { $$=SECT_ROM0; }
|
||||
| T_SECT_HRAM { $$=SECT_HRAM; }
|
||||
| T_SECT_WRAMX { $$=SECT_WRAMX; }
|
||||
| T_SECT_SRAM { $$=SECT_SRAM; }
|
||||
;
|
||||
|
||||
|
||||
cpu_command : z80_adc
|
||||
| z80_add
|
||||
| z80_and
|
||||
| z80_bit
|
||||
| z80_call
|
||||
| z80_ccf
|
||||
| z80_cp
|
||||
| z80_cpl
|
||||
| z80_daa
|
||||
| z80_dec
|
||||
| z80_di
|
||||
| z80_ei
|
||||
| z80_ex
|
||||
| z80_halt
|
||||
| z80_inc
|
||||
| z80_jp
|
||||
| z80_jr
|
||||
| z80_ld
|
||||
| z80_ldd
|
||||
| z80_ldi
|
||||
| z80_ldio
|
||||
| z80_nop
|
||||
| z80_or
|
||||
| z80_pop
|
||||
| z80_push
|
||||
| z80_res
|
||||
| z80_ret
|
||||
| z80_reti
|
||||
| z80_rl
|
||||
| z80_rla
|
||||
| z80_rlc
|
||||
| z80_rlca
|
||||
| z80_rr
|
||||
| z80_rra
|
||||
| z80_rrc
|
||||
| z80_rrca
|
||||
| z80_rst
|
||||
| z80_sbc
|
||||
| z80_scf
|
||||
| z80_set
|
||||
| z80_sla
|
||||
| z80_sra
|
||||
| z80_srl
|
||||
| z80_stop
|
||||
| z80_sub
|
||||
| z80_swap
|
||||
| z80_xor
|
||||
;
|
||||
|
||||
z80_adc : T_Z80_ADC op_a_n { out_AbsByte(0xCE); out_RelByte(&$2); }
|
||||
| T_Z80_ADC op_a_r { out_AbsByte(0x88|$2); }
|
||||
;
|
||||
|
||||
z80_add : T_Z80_ADD op_a_n { out_AbsByte(0xC6); out_RelByte(&$2); }
|
||||
| T_Z80_ADD op_a_r { out_AbsByte(0x80|$2); }
|
||||
| T_Z80_ADD op_hl_ss { out_AbsByte(0x09|($2<<4)); }
|
||||
| T_Z80_ADD T_MODE_SP comma const_8bit
|
||||
{ out_AbsByte(0xE8); out_RelByte(&$4); }
|
||||
|
||||
;
|
||||
|
||||
z80_and : T_Z80_AND op_a_n { out_AbsByte(0xE6); out_RelByte(&$2); }
|
||||
| T_Z80_AND op_a_r { out_AbsByte(0xA0|$2); }
|
||||
;
|
||||
|
||||
z80_bit : T_Z80_BIT const_3bit comma reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x40|($2<<3)|$4); }
|
||||
;
|
||||
|
||||
z80_call : T_Z80_CALL const_16bit
|
||||
{ out_AbsByte(0xCD); out_RelWord(&$2); }
|
||||
| T_Z80_CALL ccode comma const_16bit
|
||||
{ out_AbsByte(0xC4|($2<<3)); out_RelWord(&$4); }
|
||||
;
|
||||
|
||||
z80_ccf : T_Z80_CCF
|
||||
{ out_AbsByte(0x3F); }
|
||||
;
|
||||
|
||||
z80_cp : T_Z80_CP op_a_n { out_AbsByte(0xFE); out_RelByte(&$2); }
|
||||
| T_Z80_CP op_a_r { out_AbsByte(0xB8|$2); }
|
||||
;
|
||||
|
||||
z80_cpl : T_Z80_CPL { out_AbsByte(0x2F); }
|
||||
;
|
||||
|
||||
z80_daa : T_Z80_DAA { out_AbsByte(0x27); }
|
||||
;
|
||||
|
||||
z80_dec : T_Z80_DEC reg_r
|
||||
{ out_AbsByte(0x05|($2<<3)); }
|
||||
| T_Z80_DEC reg_ss
|
||||
{ out_AbsByte(0x0B|($2<<4)); }
|
||||
;
|
||||
|
||||
z80_di : T_Z80_DI
|
||||
{ out_AbsByte(0xF3); }
|
||||
;
|
||||
|
||||
z80_ei : T_Z80_EI
|
||||
{ out_AbsByte(0xFB); }
|
||||
;
|
||||
|
||||
z80_ex : T_Z80_EX T_MODE_HL comma T_MODE_SP_IND
|
||||
{ out_AbsByte(0xE3); }
|
||||
| T_Z80_EX T_MODE_SP_IND comma T_MODE_HL
|
||||
{ out_AbsByte(0xE3); }
|
||||
;
|
||||
|
||||
z80_halt: T_Z80_HALT
|
||||
{
|
||||
out_AbsByte(0x76);
|
||||
if (haltnop) {
|
||||
out_AbsByte(0x00);
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
z80_inc : T_Z80_INC reg_r
|
||||
{ out_AbsByte(0x04|($2<<3)); }
|
||||
| T_Z80_INC reg_ss
|
||||
{ out_AbsByte(0x03|($2<<4)); }
|
||||
;
|
||||
|
||||
z80_jp : T_Z80_JP const_16bit
|
||||
{ out_AbsByte(0xC3); out_RelWord(&$2); }
|
||||
| T_Z80_JP ccode comma const_16bit
|
||||
{ out_AbsByte(0xC2|($2<<3)); out_RelWord(&$4); }
|
||||
| T_Z80_JP T_MODE_HL_IND
|
||||
{ out_AbsByte(0xE9); }
|
||||
| T_Z80_JP T_MODE_HL
|
||||
{ out_AbsByte(0xE9); }
|
||||
;
|
||||
|
||||
z80_jr : T_Z80_JR const_PCrel
|
||||
{ out_AbsByte(0x18); out_PCRelByte(&$2); }
|
||||
| T_Z80_JR ccode comma const_PCrel
|
||||
{ out_AbsByte(0x20|($2<<3)); out_PCRelByte(&$4); }
|
||||
;
|
||||
|
||||
z80_ldi : T_Z80_LDI T_MODE_HL_IND comma T_MODE_A
|
||||
{ out_AbsByte(0x02|(2<<4)); }
|
||||
| T_Z80_LDI T_MODE_A comma T_MODE_HL
|
||||
{ out_AbsByte(0x0A|(2<<4)); }
|
||||
;
|
||||
|
||||
z80_ldd : T_Z80_LDD T_MODE_HL_IND comma T_MODE_A
|
||||
{ out_AbsByte(0x02|(3<<4)); }
|
||||
| T_Z80_LDD T_MODE_A comma T_MODE_HL
|
||||
{ out_AbsByte(0x0A|(3<<4)); }
|
||||
;
|
||||
|
||||
z80_ldio : T_Z80_LDIO T_MODE_A comma op_mem_ind
|
||||
{
|
||||
rpn_CheckHRAM(&$4,&$4);
|
||||
|
||||
if( (!rpn_isReloc(&$4))
|
||||
&& ($4.nVal<0 || ($4.nVal>0xFF && $4.nVal<0xFF00) || $4.nVal>0xFFFF) )
|
||||
{
|
||||
yyerror("Source address $%x not in HRAM ($FF00 to $FFFE)", $4.nVal);
|
||||
}
|
||||
|
||||
out_AbsByte(0xF0);
|
||||
$4.nVal&=0xFF;
|
||||
out_RelByte(&$4);
|
||||
}
|
||||
| T_Z80_LDIO op_mem_ind comma T_MODE_A
|
||||
{
|
||||
rpn_CheckHRAM(&$2,&$2);
|
||||
|
||||
if( (!rpn_isReloc(&$2))
|
||||
&& ($2.nVal<0 || ($2.nVal>0xFF && $2.nVal<0xFF00) || $2.nVal>0xFFFF) )
|
||||
{
|
||||
yyerror("Destination address $%x not in HRAM ($FF00 to $FFFE)", $2.nVal);
|
||||
}
|
||||
|
||||
out_AbsByte(0xE0);
|
||||
$2.nVal&=0xFF;
|
||||
out_RelByte(&$2);
|
||||
}
|
||||
;
|
||||
|
||||
z80_ld : z80_ld_mem
|
||||
| z80_ld_cind
|
||||
| z80_ld_rr
|
||||
| z80_ld_ss
|
||||
| z80_ld_hl
|
||||
| z80_ld_sp
|
||||
| z80_ld_r
|
||||
| z80_ld_a
|
||||
;
|
||||
|
||||
z80_ld_hl : T_Z80_LD T_MODE_HL comma '[' T_MODE_SP const_8bit ']'
|
||||
{ out_AbsByte(0xF8); out_RelByte(&$6); }
|
||||
| T_Z80_LD T_MODE_HL comma T_MODE_SP const_8bit
|
||||
{ out_AbsByte(0xF8); out_RelByte(&$5); }
|
||||
| T_Z80_LD T_MODE_HL comma const_16bit
|
||||
{ out_AbsByte(0x01|(REG_HL<<4)); out_RelWord(&$4); }
|
||||
;
|
||||
z80_ld_sp : T_Z80_LD T_MODE_SP comma T_MODE_HL
|
||||
{ out_AbsByte(0xF9); }
|
||||
| T_Z80_LD T_MODE_SP comma const_16bit
|
||||
{ out_AbsByte(0x01|(REG_SP<<4)); out_RelWord(&$4); }
|
||||
;
|
||||
|
||||
z80_ld_mem : T_Z80_LD op_mem_ind comma T_MODE_SP
|
||||
{ out_AbsByte(0x08); out_RelWord(&$2); }
|
||||
| T_Z80_LD op_mem_ind comma T_MODE_A
|
||||
{
|
||||
if( (!rpn_isReloc(&$2)) && $2.nVal>=0xFF00)
|
||||
{
|
||||
out_AbsByte(0xE0);
|
||||
out_AbsByte($2.nVal&0xFF);
|
||||
}
|
||||
else
|
||||
{
|
||||
out_AbsByte(0xEA);
|
||||
out_RelWord(&$2);
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
z80_ld_cind : T_Z80_LD T_MODE_C_IND comma T_MODE_A
|
||||
{ out_AbsByte(0xE2); }
|
||||
;
|
||||
|
||||
z80_ld_rr : T_Z80_LD reg_rr comma T_MODE_A
|
||||
{ out_AbsByte(0x02|($2<<4)); }
|
||||
;
|
||||
|
||||
z80_ld_r : T_Z80_LD reg_r comma const_8bit
|
||||
{ out_AbsByte(0x06|($2<<3)); out_RelByte(&$4); }
|
||||
| T_Z80_LD reg_r comma reg_r
|
||||
{
|
||||
if( ($2==REG_HL_IND) && ($4==REG_HL_IND) )
|
||||
{
|
||||
yyerror("LD [HL],[HL] not a valid instruction");
|
||||
}
|
||||
else
|
||||
out_AbsByte(0x40|($2<<3)|$4);
|
||||
}
|
||||
;
|
||||
|
||||
z80_ld_a : T_Z80_LD reg_r comma T_MODE_C_IND
|
||||
{
|
||||
if( $2==REG_A )
|
||||
out_AbsByte(0xF2);
|
||||
else
|
||||
{
|
||||
yyerror("Destination operand must be A");
|
||||
}
|
||||
}
|
||||
| T_Z80_LD reg_r comma reg_rr
|
||||
{
|
||||
if( $2==REG_A )
|
||||
out_AbsByte(0x0A|($4<<4));
|
||||
else
|
||||
{
|
||||
yyerror("Destination operand must be A");
|
||||
}
|
||||
}
|
||||
| T_Z80_LD reg_r comma op_mem_ind
|
||||
{
|
||||
if( $2==REG_A )
|
||||
{
|
||||
if( (!rpn_isReloc(&$4)) && $4.nVal>=0xFF00 )
|
||||
{
|
||||
out_AbsByte(0xF0);
|
||||
out_AbsByte($4.nVal&0xFF);
|
||||
}
|
||||
else
|
||||
{
|
||||
out_AbsByte(0xFA);
|
||||
out_RelWord(&$4);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
yyerror("Destination operand must be A");
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
z80_ld_ss : T_Z80_LD reg_ss comma const_16bit
|
||||
{ out_AbsByte(0x01|($2<<4)); out_RelWord(&$4); }
|
||||
;
|
||||
|
||||
z80_nop : T_Z80_NOP
|
||||
{ out_AbsByte(0x00); }
|
||||
;
|
||||
|
||||
z80_or : T_Z80_OR op_a_n
|
||||
{ out_AbsByte(0xF6); out_RelByte(&$2); }
|
||||
| T_Z80_OR op_a_r
|
||||
{ out_AbsByte(0xB0|$2); }
|
||||
;
|
||||
|
||||
z80_pop : T_Z80_POP reg_tt
|
||||
{ out_AbsByte(0xC1|($2<<4)); }
|
||||
;
|
||||
|
||||
z80_push : T_Z80_PUSH reg_tt
|
||||
{ out_AbsByte(0xC5|($2<<4)); }
|
||||
;
|
||||
|
||||
z80_res : T_Z80_RES const_3bit comma reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x80|($2<<3)|$4); }
|
||||
;
|
||||
|
||||
z80_ret : T_Z80_RET
|
||||
{ out_AbsByte(0xC9); }
|
||||
| T_Z80_RET ccode
|
||||
{ out_AbsByte(0xC0|($2<<3)); }
|
||||
;
|
||||
|
||||
z80_reti : T_Z80_RETI
|
||||
{ out_AbsByte(0xD9); }
|
||||
;
|
||||
|
||||
z80_rl : T_Z80_RL reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x10|$2); }
|
||||
;
|
||||
|
||||
z80_rla : T_Z80_RLA
|
||||
{ out_AbsByte(0x17); }
|
||||
;
|
||||
|
||||
z80_rlc : T_Z80_RLC reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x00|$2); }
|
||||
;
|
||||
|
||||
z80_rlca : T_Z80_RLCA
|
||||
{ out_AbsByte(0x07); }
|
||||
;
|
||||
|
||||
z80_rr : T_Z80_RR reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x18|$2); }
|
||||
;
|
||||
|
||||
z80_rra : T_Z80_RRA
|
||||
{ out_AbsByte(0x1F); }
|
||||
;
|
||||
|
||||
z80_rrc : T_Z80_RRC reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x08|$2); }
|
||||
;
|
||||
|
||||
z80_rrca : T_Z80_RRCA
|
||||
{ out_AbsByte(0x0F); }
|
||||
;
|
||||
|
||||
z80_rst : T_Z80_RST const_8bit
|
||||
{
|
||||
if( rpn_isReloc(&$2) )
|
||||
{
|
||||
yyerror("Address for RST must be absolute");
|
||||
}
|
||||
else if( ($2.nVal&0x38)!=$2.nVal )
|
||||
{
|
||||
yyerror("Invalid address $%x for RST", $2.nVal);
|
||||
}
|
||||
else
|
||||
out_AbsByte(0xC7|$2.nVal);
|
||||
}
|
||||
;
|
||||
|
||||
z80_sbc : T_Z80_SBC op_a_n { out_AbsByte(0xDE); out_RelByte(&$2); }
|
||||
| T_Z80_SBC op_a_r { out_AbsByte(0x98|$2); }
|
||||
;
|
||||
|
||||
z80_scf : T_Z80_SCF
|
||||
{ out_AbsByte(0x37); }
|
||||
;
|
||||
|
||||
z80_set : T_POP_SET const_3bit comma reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0xC0|($2<<3)|$4); }
|
||||
;
|
||||
|
||||
z80_sla : T_Z80_SLA reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x20|$2); }
|
||||
;
|
||||
|
||||
z80_sra : T_Z80_SRA reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x28|$2); }
|
||||
;
|
||||
|
||||
z80_srl : T_Z80_SRL reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x38|$2); }
|
||||
;
|
||||
|
||||
z80_stop : T_Z80_STOP
|
||||
{ out_AbsByte(0x10); out_AbsByte(0x00); }
|
||||
;
|
||||
|
||||
z80_sub : T_Z80_SUB op_a_n { out_AbsByte(0xD6); out_RelByte(&$2); }
|
||||
| T_Z80_SUB op_a_r { out_AbsByte(0x90|$2); }
|
||||
;
|
||||
|
||||
z80_swap : T_Z80_SWAP reg_r
|
||||
{ out_AbsByte(0xCB); out_AbsByte(0x30|$2); }
|
||||
;
|
||||
|
||||
z80_xor : T_Z80_XOR op_a_n { out_AbsByte(0xEE); out_RelByte(&$2); }
|
||||
| T_Z80_XOR op_a_r { out_AbsByte(0xA8|$2); }
|
||||
;
|
||||
|
||||
op_mem_ind : '[' const_16bit ']' { $$ = $2; }
|
||||
;
|
||||
|
||||
op_hl_ss : reg_ss { $$ = $1; }
|
||||
| T_MODE_HL comma reg_ss { $$ = $3; }
|
||||
;
|
||||
|
||||
op_a_r : reg_r { $$ = $1; }
|
||||
| T_MODE_A comma reg_r { $$ = $3; }
|
||||
;
|
||||
|
||||
op_a_n : const_8bit { $$ = $1; }
|
||||
| T_MODE_A comma const_8bit { $$ = $3; }
|
||||
;
|
||||
|
||||
comma : ','
|
||||
;
|
||||
|
||||
ccode : T_CC_NZ { $$ = CC_NZ; }
|
||||
| T_CC_Z { $$ = CC_Z; }
|
||||
| T_CC_NC { $$ = CC_NC; }
|
||||
| T_MODE_C { $$ = CC_C; }
|
||||
;
|
||||
|
||||
reg_r : T_MODE_B { $$ = REG_B; }
|
||||
| T_MODE_C { $$ = REG_C; }
|
||||
| T_MODE_D { $$ = REG_D; }
|
||||
| T_MODE_E { $$ = REG_E; }
|
||||
| T_MODE_H { $$ = REG_H; }
|
||||
| T_MODE_L { $$ = REG_L; }
|
||||
| T_MODE_HL_IND { $$ = REG_HL_IND; }
|
||||
| T_MODE_A { $$ = REG_A; }
|
||||
;
|
||||
|
||||
reg_tt : T_MODE_BC { $$ = REG_BC; }
|
||||
| T_MODE_DE { $$ = REG_DE; }
|
||||
| T_MODE_HL { $$ = REG_HL; }
|
||||
| T_MODE_AF { $$ = REG_AF; }
|
||||
;
|
||||
|
||||
reg_ss : T_MODE_BC { $$ = REG_BC; }
|
||||
| T_MODE_DE { $$ = REG_DE; }
|
||||
| T_MODE_HL { $$ = REG_HL; }
|
||||
| T_MODE_SP { $$ = REG_SP; }
|
||||
;
|
||||
|
||||
reg_rr : T_MODE_BC_IND { $$ = REG_BC_IND; }
|
||||
| T_MODE_DE_IND { $$ = REG_DE_IND; }
|
||||
| T_MODE_HL_INDINC { $$ = REG_HL_INDINC; }
|
||||
| T_MODE_HL_INDDEC { $$ = REG_HL_INDDEC; }
|
||||
;
|
||||
|
||||
%%
|
||||
@@ -7,16 +7,17 @@
|
||||
|
||||
#include "asmy.h"
|
||||
|
||||
#include <stdbool.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <math.h>
|
||||
#include <string.h>
|
||||
|
||||
UBYTE oDontExpandStrings = 0;
|
||||
bool oDontExpandStrings = false;
|
||||
SLONG nGBGfxID = -1;
|
||||
SLONG nBinaryID = -1;
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
gbgfx2bin(char ch)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -30,7 +31,7 @@ gbgfx2bin(char ch)
|
||||
return (0);
|
||||
}
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
binary2bin(char ch)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -44,7 +45,7 @@ binary2bin(char ch)
|
||||
return (0);
|
||||
}
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
char2bin(char ch)
|
||||
{
|
||||
if (ch >= 'a' && ch <= 'f')
|
||||
@@ -61,7 +62,7 @@ char2bin(char ch)
|
||||
|
||||
typedef SLONG(*x2bin) (char ch);
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
ascii2bin(char *s)
|
||||
{
|
||||
SLONG radix = 10;
|
||||
@@ -96,7 +97,7 @@ ascii2bin(char *s)
|
||||
|
||||
while (*s != '\0') {
|
||||
c = convertfunc(*s++);
|
||||
result = result * 2 + ((c & 1) << 8) + ((c & 2) >> 1);
|
||||
result = result * 2 + ((c & 2) << 7) + (c & 1);
|
||||
}
|
||||
} else {
|
||||
while (*s != '\0')
|
||||
@@ -106,7 +107,7 @@ ascii2bin(char *s)
|
||||
return (result);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
ParseFixedPoint(char *s, ULONG size)
|
||||
{
|
||||
//char dest[256];
|
||||
@@ -132,7 +133,7 @@ ParseFixedPoint(char *s, ULONG size)
|
||||
return (1);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
ParseNumber(char *s, ULONG size)
|
||||
{
|
||||
char dest[256];
|
||||
@@ -144,7 +145,7 @@ ParseNumber(char *s, ULONG size)
|
||||
return (1);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
ParseSymbol(char *src, ULONG size)
|
||||
{
|
||||
char dest[MAXSYMLEN + 1];
|
||||
@@ -160,7 +161,7 @@ ParseSymbol(char *src, ULONG size)
|
||||
if (*src == '@')
|
||||
marg = sym_FindMacroArg(-1);
|
||||
else if (*src >= '0' && *src <= '9')
|
||||
marg = sym_FindMacroArg(*src);
|
||||
marg = sym_FindMacroArg(*src - '0');
|
||||
else {
|
||||
fatalerror("Malformed ID");
|
||||
return (0);
|
||||
@@ -184,7 +185,7 @@ ParseSymbol(char *src, ULONG size)
|
||||
|
||||
dest[copied] = 0;
|
||||
|
||||
if (oDontExpandStrings == 0 && sym_isString(dest)) {
|
||||
if (!oDontExpandStrings && sym_isString(dest)) {
|
||||
char *s;
|
||||
|
||||
yyskipbytes(size_backup);
|
||||
@@ -202,7 +203,7 @@ ParseSymbol(char *src, ULONG size)
|
||||
}
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
PutMacroArg(char *src, ULONG size)
|
||||
{
|
||||
char *s;
|
||||
@@ -220,12 +221,11 @@ PutMacroArg(char *src, ULONG size)
|
||||
return (0);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
PutUniqueArg(char *src, ULONG size)
|
||||
{
|
||||
char *s;
|
||||
|
||||
src = src;
|
||||
yyskipbytes(size);
|
||||
if ((s = sym_FindMacroArg(-1)) != NULL) {
|
||||
yyunputstr(s);
|
||||
@@ -267,7 +267,11 @@ struct sLexInitString staticstrings[] = {
|
||||
{"def", T_OP_DEF},
|
||||
|
||||
{"bank", T_OP_BANK},
|
||||
{"align", T_OP_ALIGN},
|
||||
|
||||
{"round", T_OP_ROUND},
|
||||
{"ceil", T_OP_CEIL},
|
||||
{"floor", T_OP_FLOOR},
|
||||
{"div", T_OP_FDIV},
|
||||
{"mul", T_OP_FMUL},
|
||||
{"sin", T_OP_SIN},
|
||||
@@ -278,6 +282,9 @@ struct sLexInitString staticstrings[] = {
|
||||
{"atan", T_OP_ATAN},
|
||||
{"atan2", T_OP_ATAN2},
|
||||
|
||||
{"high", T_OP_HIGH},
|
||||
{"low", T_OP_LOW},
|
||||
|
||||
{"strcmp", T_OP_STRCMP},
|
||||
{"strin", T_OP_STRIN},
|
||||
{"strsub", T_OP_STRSUB},
|
||||
@@ -298,9 +305,6 @@ struct sLexInitString staticstrings[] = {
|
||||
{"ds", T_POP_DS},
|
||||
{NAME_DB, T_POP_DB},
|
||||
{NAME_DW, T_POP_DW},
|
||||
#ifdef NAME_DL
|
||||
{NAME_DL, T_POP_DL},
|
||||
#endif
|
||||
{"section", T_POP_SECTION},
|
||||
{"purge", T_POP_PURGE},
|
||||
|
||||
@@ -328,22 +332,22 @@ struct sLexInitString staticstrings[] = {
|
||||
{"endc", T_POP_ENDC},
|
||||
|
||||
{"wram0", T_SECT_WRAM0},
|
||||
{"bss", T_SECT_WRAM0}, /* deprecated */
|
||||
{"vram", T_SECT_VRAM},
|
||||
{"code", T_SECT_ROMX}, /* deprecated */
|
||||
{"data", T_SECT_ROMX}, /* deprecated */
|
||||
{"romx", T_SECT_ROMX},
|
||||
{"home", T_SECT_ROM0}, /* deprecated */
|
||||
{"rom0", T_SECT_ROM0},
|
||||
{"hram", T_SECT_HRAM},
|
||||
{"wramx", T_SECT_WRAMX},
|
||||
{"sram", T_SECT_SRAM},
|
||||
{"oam", T_SECT_OAM},
|
||||
|
||||
/* Deprecated section type names */
|
||||
{"home", T_SECT_HOME},
|
||||
{"code", T_SECT_CODE},
|
||||
{"data", T_SECT_DATA},
|
||||
{"bss", T_SECT_BSS},
|
||||
|
||||
{NAME_RB, T_POP_RB},
|
||||
{NAME_RW, T_POP_RW},
|
||||
#ifdef NAME_RL
|
||||
{NAME_RL, T_POP_RL},
|
||||
#endif
|
||||
{"equ", T_POP_EQU},
|
||||
{"equs", T_POP_EQUS},
|
||||
|
||||
@@ -385,7 +389,7 @@ struct sLexFloat tMacroUniqueToken = {
|
||||
T_LEX_MACROUNIQUE
|
||||
};
|
||||
|
||||
void
|
||||
void
|
||||
setuplex(void)
|
||||
{
|
||||
ULONG id;
|
||||
|
||||
@@ -1,4 +1,3 @@
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
@@ -7,7 +6,7 @@
|
||||
|
||||
#include "asm/asm.h"
|
||||
#include "asm/lexer.h"
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/main.h"
|
||||
#include "asm/rpn.h"
|
||||
#include "asm/fstack.h"
|
||||
@@ -40,9 +39,8 @@ ULONG tFloatingChars[256];
|
||||
ULONG nFloating;
|
||||
enum eLexerState lexerstate = LEX_STATE_NORMAL;
|
||||
|
||||
#ifdef __GNUC__
|
||||
void
|
||||
strupr(char *s)
|
||||
void
|
||||
upperstring(char *s)
|
||||
{
|
||||
while (*s) {
|
||||
*s = toupper(*s);
|
||||
@@ -50,28 +48,28 @@ strupr(char *s)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
strlwr(char *s)
|
||||
void
|
||||
lowerstring(char *s)
|
||||
{
|
||||
while (*s) {
|
||||
*s = tolower(*s);
|
||||
s += 1;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
void
|
||||
|
||||
void
|
||||
yyskipbytes(ULONG count)
|
||||
{
|
||||
pLexBuffer += count;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yyunputbytes(ULONG count)
|
||||
{
|
||||
pLexBuffer -= count;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yyunput(char c)
|
||||
{
|
||||
if (pLexBuffer <= pLexBufferRealStart)
|
||||
@@ -80,7 +78,7 @@ yyunput(char c)
|
||||
*(--pLexBuffer) = c;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yyunputstr(char *s)
|
||||
{
|
||||
int i, len;
|
||||
@@ -94,26 +92,26 @@ yyunputstr(char *s)
|
||||
*(--pLexBuffer) = s[i];
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yy_switch_to_buffer(YY_BUFFER_STATE buf)
|
||||
{
|
||||
pCurrentBuffer = buf;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yy_set_state(enum eLexerState i)
|
||||
{
|
||||
lexerstate = i;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yy_delete_buffer(YY_BUFFER_STATE buf)
|
||||
{
|
||||
free(buf->pBufferStart - SAFETYMARGIN);
|
||||
free(buf);
|
||||
}
|
||||
|
||||
YY_BUFFER_STATE
|
||||
YY_BUFFER_STATE
|
||||
yy_scan_bytes(char *mem, ULONG size)
|
||||
{
|
||||
YY_BUFFER_STATE pBuffer;
|
||||
@@ -134,7 +132,7 @@ yy_scan_bytes(char *mem, ULONG size)
|
||||
return (NULL);
|
||||
}
|
||||
|
||||
YY_BUFFER_STATE
|
||||
YY_BUFFER_STATE
|
||||
yy_create_buffer(FILE * f)
|
||||
{
|
||||
YY_BUFFER_STATE pBuffer;
|
||||
@@ -221,7 +219,7 @@ lex_CheckCharacterRange(UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatDeleteRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -232,7 +230,7 @@ lex_FloatDeleteRange(ULONG id, UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatAddRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -243,7 +241,7 @@ lex_FloatAddRange(ULONG id, UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatDeleteFirstRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -254,7 +252,7 @@ lex_FloatDeleteFirstRange(ULONG id, UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatAddFirstRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -265,7 +263,7 @@ lex_FloatAddFirstRange(ULONG id, UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatDeleteSecondRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -276,7 +274,7 @@ lex_FloatDeleteSecondRange(ULONG id, UWORD start, UWORD end)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_FloatAddSecondRange(ULONG id, UWORD start, UWORD end)
|
||||
{
|
||||
lex_CheckCharacterRange(start, end);
|
||||
@@ -304,7 +302,7 @@ lexgetfloat(ULONG nFloatMask)
|
||||
return (&tLexFloat[i]);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
lexcalchash(char *s)
|
||||
{
|
||||
ULONG hash = 0;
|
||||
@@ -316,7 +314,7 @@ lexcalchash(char *s)
|
||||
return (hash % LEXHASHSIZE);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_Init(void)
|
||||
{
|
||||
ULONG i;
|
||||
@@ -335,7 +333,7 @@ lex_Init(void)
|
||||
nFloating = 0;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
lex_AddStrings(struct sLexInitString * lex)
|
||||
{
|
||||
while (lex->tzName) {
|
||||
@@ -353,7 +351,7 @@ lex_AddStrings(struct sLexInitString * lex)
|
||||
(*ppHash)->nToken = lex->nToken;
|
||||
(*ppHash)->pNext = NULL;
|
||||
|
||||
strupr((*ppHash)->tzName);
|
||||
upperstring((*ppHash)->tzName);
|
||||
|
||||
if ((*ppHash)->nNameLength > nLexMaxLength)
|
||||
nLexMaxLength = (*ppHash)->nNameLength;
|
||||
@@ -437,10 +435,10 @@ yylex_GetLongestFixed()
|
||||
size_t
|
||||
CopyMacroArg(char *dest, size_t maxLength, char c)
|
||||
{
|
||||
int i;
|
||||
size_t i;
|
||||
char *s;
|
||||
int argNum;
|
||||
|
||||
|
||||
switch (c) {
|
||||
case '1':
|
||||
case '2':
|
||||
@@ -567,6 +565,15 @@ yylex_ReadQuotedString()
|
||||
case '"':
|
||||
ch = '"';
|
||||
break;
|
||||
case ',':
|
||||
ch = ',';
|
||||
break;
|
||||
case '{':
|
||||
ch = '{';
|
||||
break;
|
||||
case '}':
|
||||
ch = '}';
|
||||
break;
|
||||
default:
|
||||
maxLength = MAXSTRLEN - index;
|
||||
length = CopyMacroArg(&yylval.tzString[index], maxLength, ch);
|
||||
@@ -700,6 +707,15 @@ yylex_MACROARGS()
|
||||
case '\\':
|
||||
ch = '\\';
|
||||
break;
|
||||
case ',':
|
||||
ch = ',';
|
||||
break;
|
||||
case '{':
|
||||
ch = '{';
|
||||
break;
|
||||
case '}':
|
||||
ch = '}';
|
||||
break;
|
||||
default:
|
||||
maxLength = MAXSTRLEN - index;
|
||||
length = CopyMacroArg(&yylval.tzString[index], maxLength, ch);
|
||||
@@ -708,7 +724,7 @@ yylex_MACROARGS()
|
||||
index += length;
|
||||
else
|
||||
fatalerror("Illegal character escape '%c'", ch);
|
||||
|
||||
|
||||
ch = 0;
|
||||
break;
|
||||
}
|
||||
@@ -741,7 +757,7 @@ yylex_MACROARGS()
|
||||
return 0;
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
yylex(void)
|
||||
{
|
||||
switch (lexerstate) {
|
||||
|
||||
@@ -2,7 +2,7 @@
|
||||
#include "asm/lexer.h"
|
||||
#include "asm/rpn.h"
|
||||
|
||||
#include "../asmy.h"
|
||||
#include "asmy.h"
|
||||
|
||||
struct sLexInitString localstrings[] = {
|
||||
{"adc", T_Z80_ADC},
|
||||
@@ -17,7 +17,6 @@ struct sLexInitString localstrings[] = {
|
||||
{"dec", T_Z80_DEC},
|
||||
{"di", T_Z80_DI},
|
||||
{"ei", T_Z80_EI},
|
||||
{"ex", T_Z80_EX},
|
||||
{"halt", T_Z80_HALT},
|
||||
{"inc", T_Z80_INC},
|
||||
{"jp", T_Z80_JP},
|
||||
@@ -60,30 +59,31 @@ struct sLexInitString localstrings[] = {
|
||||
{"nz", T_CC_NZ},
|
||||
{"z", T_CC_Z},
|
||||
{"nc", T_CC_NC},
|
||||
/* { "c", T_MODE_C }, */
|
||||
/* { "c", T_TOKEN_C }, */
|
||||
|
||||
{"[bc]", T_MODE_BC_IND},
|
||||
{"[de]", T_MODE_DE_IND},
|
||||
{"[hl]", T_MODE_HL_IND},
|
||||
{"[hl+]", T_MODE_HL_INDINC},
|
||||
{"[hl-]", T_MODE_HL_INDDEC},
|
||||
{"[hli]", T_MODE_HL_INDINC},
|
||||
{"[hld]", T_MODE_HL_INDDEC},
|
||||
{"hl", T_MODE_HL},
|
||||
{"af", T_MODE_AF},
|
||||
{"[bc]", T_MODE_BC_IND},
|
||||
{"bc", T_MODE_BC},
|
||||
{"[de]", T_MODE_DE_IND},
|
||||
{"de", T_MODE_DE},
|
||||
{"[sp]", T_MODE_SP_IND},
|
||||
{"af", T_MODE_AF},
|
||||
{"bc", T_MODE_BC},
|
||||
{"de", T_MODE_DE},
|
||||
{"hl", T_MODE_HL},
|
||||
{"sp", T_MODE_SP},
|
||||
{"a", T_MODE_A},
|
||||
{"b", T_MODE_B},
|
||||
{"[$ff00+c]", T_MODE_C_IND},
|
||||
{"[c]", T_MODE_C_IND},
|
||||
{"c", T_MODE_C},
|
||||
{"d", T_MODE_D},
|
||||
{"e", T_MODE_E},
|
||||
{"h", T_MODE_H},
|
||||
{"l", T_MODE_L},
|
||||
{"[$ff00+c]", T_MODE_C_IND},
|
||||
|
||||
{"a", T_TOKEN_A},
|
||||
{"b", T_TOKEN_B},
|
||||
{"c", T_TOKEN_C},
|
||||
{"d", T_TOKEN_D},
|
||||
{"e", T_TOKEN_E},
|
||||
{"h", T_TOKEN_H},
|
||||
{"l", T_TOKEN_L},
|
||||
|
||||
{NULL, 0}
|
||||
};
|
||||
259
src/asm/main.c
259
src/asm/main.c
@@ -1,14 +1,5 @@
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
*/
|
||||
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <math.h>
|
||||
#include <stdarg.h>
|
||||
#include <stdbool.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
@@ -20,18 +11,14 @@
|
||||
#include "asm/output.h"
|
||||
#include "asm/main.h"
|
||||
#include "extern/err.h"
|
||||
#include "extern/reallocarray.h"
|
||||
|
||||
int yyparse(void);
|
||||
void setuplex(void);
|
||||
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* VARIABLES
|
||||
*
|
||||
*/
|
||||
|
||||
bool haltnop;
|
||||
int cldefines_index;
|
||||
int cldefines_size;
|
||||
char **cldefines;
|
||||
|
||||
clock_t nStartClock, nEndClock;
|
||||
SLONG nLineNo;
|
||||
@@ -40,10 +27,7 @@ ULONG nTotalLines, nPass, nPC, nIFDepth, nErrors;
|
||||
extern int yydebug;
|
||||
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* Option stack
|
||||
*
|
||||
*/
|
||||
|
||||
struct sOptions DefaultOptions;
|
||||
@@ -56,7 +40,7 @@ struct sOptionStackEntry {
|
||||
|
||||
struct sOptionStackEntry *pOptionStack = NULL;
|
||||
|
||||
void
|
||||
void
|
||||
opt_SetCurrentOptions(struct sOptions * pOpt)
|
||||
{
|
||||
if (nGBGfxID != -1) {
|
||||
@@ -119,7 +103,7 @@ opt_SetCurrentOptions(struct sOptions * pOpt)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
opt_Parse(char *s)
|
||||
{
|
||||
struct sOptions newopt;
|
||||
@@ -168,7 +152,7 @@ opt_Parse(char *s)
|
||||
opt_SetCurrentOptions(&newopt);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
opt_Push(void)
|
||||
{
|
||||
struct sOptionStackEntry *pOpt;
|
||||
@@ -181,7 +165,7 @@ opt_Push(void)
|
||||
fatalerror("No memory for option stack");
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
opt_Pop(void)
|
||||
{
|
||||
if (pOptionStack) {
|
||||
@@ -194,25 +178,61 @@ opt_Pop(void)
|
||||
} else
|
||||
fatalerror("No entries in the option stack");
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* Error handling
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
opt_AddDefine(char *s)
|
||||
{
|
||||
char *value, *equals;
|
||||
if(cldefines_index >= cldefines_size)
|
||||
{
|
||||
cldefines_size *= 2;
|
||||
cldefines = reallocarray(cldefines, cldefines_size,
|
||||
2 * sizeof(void *));
|
||||
if(!cldefines)
|
||||
{
|
||||
fatalerror("No memory for command line defines");
|
||||
}
|
||||
}
|
||||
equals = strchr(s, '=');
|
||||
if(equals)
|
||||
{
|
||||
*equals = '\0';
|
||||
value = equals + 1;
|
||||
}
|
||||
else
|
||||
{
|
||||
value = "1";
|
||||
}
|
||||
cldefines[cldefines_index++] = s;
|
||||
cldefines[cldefines_index++] = value;
|
||||
}
|
||||
|
||||
void
|
||||
opt_ParseDefines()
|
||||
{
|
||||
int i;
|
||||
|
||||
for(i = 0; i < cldefines_index; i += 2)
|
||||
{
|
||||
sym_AddString(cldefines[i], cldefines[i + 1]);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Error handling
|
||||
*/
|
||||
void
|
||||
verror(const char *fmt, va_list args)
|
||||
{
|
||||
fprintf(stderr, "ERROR:\t");
|
||||
fprintf(stderr, "ERROR: ");
|
||||
fstk_Dump();
|
||||
fprintf(stderr, " :\n\t");
|
||||
fprintf(stderr, ":\n\t");
|
||||
vfprintf(stderr, fmt, args);
|
||||
fprintf(stderr, "\n");
|
||||
nErrors += 1;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
yyerror(const char *fmt, ...)
|
||||
{
|
||||
va_list args;
|
||||
@@ -221,7 +241,7 @@ yyerror(const char *fmt, ...)
|
||||
va_end(args);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
fatalerror(const char *fmt, ...)
|
||||
{
|
||||
va_list args;
|
||||
@@ -230,28 +250,35 @@ fatalerror(const char *fmt, ...)
|
||||
va_end(args);
|
||||
exit(5);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* Help text
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
PrintUsage(void)
|
||||
void
|
||||
warning(const char *fmt, ...)
|
||||
{
|
||||
printf("Usage: rgbasm [-v] [-h] [-b chars] [-g chars] [-i path] [-o outfile] [-p pad_value]\n"
|
||||
" file\n");
|
||||
if (!CurrentOptions.warnings)
|
||||
return;
|
||||
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
|
||||
fprintf(stderr, "warning: ");
|
||||
fstk_Dump();
|
||||
fprintf(stderr, ":\n\t");
|
||||
vfprintf(stderr, fmt, args);
|
||||
fprintf(stderr, "\n");
|
||||
|
||||
va_end(args);
|
||||
}
|
||||
|
||||
static void
|
||||
usage(void)
|
||||
{
|
||||
printf(
|
||||
"Usage: rgbasm [-hvE] [-b chars] [-Dname[=value]] [-g chars] [-i path]\n"
|
||||
" [-o outfile] [-p pad_value] file.asm\n");
|
||||
exit(1);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MAIN.C
|
||||
*
|
||||
* main
|
||||
*
|
||||
*/
|
||||
|
||||
int
|
||||
int
|
||||
main(int argc, char *argv[])
|
||||
{
|
||||
int ch;
|
||||
@@ -261,10 +288,16 @@ main(int argc, char *argv[])
|
||||
|
||||
char *tzMainfile;
|
||||
|
||||
haltnop = true;
|
||||
cldefines_size = 32;
|
||||
cldefines = reallocarray(cldefines, cldefines_size,
|
||||
2 * sizeof(void *));
|
||||
if(!cldefines)
|
||||
{
|
||||
fatalerror("No memory for command line defines");
|
||||
}
|
||||
|
||||
if (argc == 1)
|
||||
PrintUsage();
|
||||
usage();
|
||||
|
||||
/* yydebug=1; */
|
||||
|
||||
@@ -276,12 +309,15 @@ main(int argc, char *argv[])
|
||||
DefaultOptions.binary[1] = '1';
|
||||
DefaultOptions.fillchar = 0;
|
||||
DefaultOptions.verbose = false;
|
||||
DefaultOptions.haltnop = true;
|
||||
DefaultOptions.exportall = false;
|
||||
DefaultOptions.warnings = true;
|
||||
|
||||
opt_SetCurrentOptions(&DefaultOptions);
|
||||
|
||||
newopt = CurrentOptions;
|
||||
|
||||
while ((ch = getopt(argc, argv, "b:g:hi:o:p:v")) != -1) {
|
||||
while ((ch = getopt(argc, argv, "b:D:g:hi:o:p:vEw")) != -1) {
|
||||
switch (ch) {
|
||||
case 'b':
|
||||
if (strlen(optarg) == 2) {
|
||||
@@ -292,6 +328,9 @@ main(int argc, char *argv[])
|
||||
"option 'b'");
|
||||
}
|
||||
break;
|
||||
case 'D':
|
||||
opt_AddDefine(optarg);
|
||||
break;
|
||||
case 'g':
|
||||
if (strlen(optarg) == 4) {
|
||||
newopt.gbgfx[0] = optarg[1];
|
||||
@@ -304,7 +343,7 @@ main(int argc, char *argv[])
|
||||
}
|
||||
break;
|
||||
case 'h':
|
||||
haltnop = false;
|
||||
newopt.haltnop = false;
|
||||
break;
|
||||
case 'i':
|
||||
fstk_AddIncludePath(optarg);
|
||||
@@ -325,8 +364,14 @@ main(int argc, char *argv[])
|
||||
case 'v':
|
||||
newopt.verbose = true;
|
||||
break;
|
||||
case 'E':
|
||||
newopt.exportall = true;
|
||||
break;
|
||||
case 'w':
|
||||
newopt.warnings = false;
|
||||
break;
|
||||
default:
|
||||
PrintUsage();
|
||||
usage();
|
||||
}
|
||||
}
|
||||
argc -= optind;
|
||||
@@ -336,6 +381,9 @@ main(int argc, char *argv[])
|
||||
|
||||
DefaultOptions = CurrentOptions;
|
||||
|
||||
if (argc == 0)
|
||||
usage();
|
||||
|
||||
tzMainfile = argv[argc - 1];
|
||||
|
||||
setuplex();
|
||||
@@ -353,7 +401,10 @@ main(int argc, char *argv[])
|
||||
nPass = 1;
|
||||
nErrors = 0;
|
||||
sym_PrepPass1();
|
||||
sym_SetExportAll(CurrentOptions.exportall);
|
||||
fstk_Init(tzMainfile);
|
||||
opt_ParseDefines();
|
||||
|
||||
if (CurrentOptions.verbose) {
|
||||
printf("Pass 1...\n");
|
||||
}
|
||||
@@ -361,59 +412,49 @@ main(int argc, char *argv[])
|
||||
yy_set_state(LEX_STATE_NORMAL);
|
||||
opt_SetCurrentOptions(&DefaultOptions);
|
||||
|
||||
if (yyparse() == 0 && nErrors == 0) {
|
||||
if (nIFDepth == 0) {
|
||||
nTotalLines = 0;
|
||||
nLineNo = 1;
|
||||
nIFDepth = 0;
|
||||
nPC = 0;
|
||||
nPass = 2;
|
||||
nErrors = 0;
|
||||
sym_PrepPass2();
|
||||
out_PrepPass2();
|
||||
fstk_Init(tzMainfile);
|
||||
yy_set_state(LEX_STATE_NORMAL);
|
||||
opt_SetCurrentOptions(&DefaultOptions);
|
||||
|
||||
if (CurrentOptions.verbose) {
|
||||
printf("Pass 2...\n");
|
||||
}
|
||||
|
||||
if (yyparse() == 0 && nErrors == 0) {
|
||||
double timespent;
|
||||
|
||||
nEndClock = clock();
|
||||
timespent =
|
||||
((double) (nEndClock - nStartClock))
|
||||
/ (double) CLOCKS_PER_SEC;
|
||||
if (CurrentOptions.verbose) {
|
||||
printf
|
||||
("Success! %ld lines in %d.%02d seconds ",
|
||||
nTotalLines, (int) timespent,
|
||||
((int) (timespent * 100.0)) % 100);
|
||||
if (timespent == 0)
|
||||
printf
|
||||
("(INFINITY lines/minute)\n");
|
||||
else
|
||||
printf("(%d lines/minute)\n",
|
||||
(int) (60 / timespent *
|
||||
nTotalLines));
|
||||
}
|
||||
out_WriteObject();
|
||||
} else {
|
||||
printf
|
||||
("Assembly aborted in pass 2 (%ld errors)!\n",
|
||||
nErrors);
|
||||
//sym_PrintSymbolTable();
|
||||
exit(5);
|
||||
}
|
||||
} else {
|
||||
errx(1, "Unterminated IF construct (%ld levels)!",
|
||||
nIFDepth);
|
||||
}
|
||||
} else {
|
||||
errx(1, "Assembly aborted in pass 1 (%ld errors)!",
|
||||
nErrors);
|
||||
if (yyparse() != 0 || nErrors != 0) {
|
||||
errx(1, "Assembly aborted in pass 1 (%ld errors)!", nErrors);
|
||||
}
|
||||
|
||||
if (nIFDepth != 0) {
|
||||
errx(1, "Unterminated IF construct (%ld levels)!", nIFDepth);
|
||||
}
|
||||
|
||||
nTotalLines = 0;
|
||||
nLineNo = 1;
|
||||
nIFDepth = 0;
|
||||
nPC = 0;
|
||||
nPass = 2;
|
||||
nErrors = 0;
|
||||
sym_PrepPass2();
|
||||
out_PrepPass2();
|
||||
fstk_Init(tzMainfile);
|
||||
yy_set_state(LEX_STATE_NORMAL);
|
||||
opt_SetCurrentOptions(&DefaultOptions);
|
||||
opt_ParseDefines();
|
||||
|
||||
if (CurrentOptions.verbose) {
|
||||
printf("Pass 2...\n");
|
||||
}
|
||||
|
||||
if (yyparse() != 0 || nErrors != 0) {
|
||||
errx(1, "Assembly aborted in pass 2 (%ld errors)!", nErrors);
|
||||
}
|
||||
|
||||
double timespent;
|
||||
|
||||
nEndClock = clock();
|
||||
timespent = ((double)(nEndClock - nStartClock))
|
||||
/ (double)CLOCKS_PER_SEC;
|
||||
if (CurrentOptions.verbose) {
|
||||
printf("Success! %ld lines in %d.%02d seconds ", nTotalLines,
|
||||
(int) timespent, ((int) (timespent * 100.0)) % 100);
|
||||
if (timespent == 0)
|
||||
printf("(INFINITY lines/minute)\n");
|
||||
else
|
||||
printf("(%d lines/minute)\n",
|
||||
(int) (60 / timespent * nTotalLines));
|
||||
}
|
||||
out_WriteObject();
|
||||
return 0;
|
||||
}
|
||||
|
||||
150
src/asm/math.c
150
src/asm/math.c
@@ -1,14 +1,11 @@
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
* Fixedpoint math routines
|
||||
*/
|
||||
|
||||
#include <math.h>
|
||||
#include <stdio.h>
|
||||
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/mymath.h"
|
||||
#include "asm/symbol.h"
|
||||
|
||||
@@ -19,25 +16,18 @@
|
||||
#endif
|
||||
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Define the _PI symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
math_DefinePI(void)
|
||||
{
|
||||
sym_AddEqu("_PI", double2fix(PI));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Print a fixed point value
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Print a fixed point value
|
||||
*/
|
||||
void
|
||||
math_Print(SLONG i)
|
||||
{
|
||||
if (i >= 0)
|
||||
@@ -47,112 +37,112 @@ math_Print(SLONG i)
|
||||
printf("-%ld.%05ld", (-i) >> 16,
|
||||
((SLONG) (fix2double(-i) * 100000 + 0.5)) % 100000);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate sine
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate sine
|
||||
*/
|
||||
SLONG
|
||||
math_Sin(SLONG i)
|
||||
{
|
||||
return (double2fix(sin(fix2double(i) * 2 * PI / 65536)));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate cosine
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate cosine
|
||||
*/
|
||||
SLONG
|
||||
math_Cos(SLONG i)
|
||||
{
|
||||
return (double2fix(cos(fix2double(i) * 2 * PI / 65536)));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate tangent
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate tangent
|
||||
*/
|
||||
SLONG
|
||||
math_Tan(SLONG i)
|
||||
{
|
||||
return (double2fix(tan(fix2double(i) * 2 * PI / 65536)));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate sine^-1
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate arcsine
|
||||
*/
|
||||
SLONG
|
||||
math_ASin(SLONG i)
|
||||
{
|
||||
return (double2fix(asin(fix2double(i)) / 2 / PI * 65536));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate cosine^-1
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate arccosine
|
||||
*/
|
||||
SLONG
|
||||
math_ACos(SLONG i)
|
||||
{
|
||||
return (double2fix(acos(fix2double(i)) / 2 / PI * 65536));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate tangent^-1
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate arctangent
|
||||
*/
|
||||
SLONG
|
||||
math_ATan(SLONG i)
|
||||
{
|
||||
return (double2fix(atan(fix2double(i)) / 2 / PI * 65536));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Calculate atan2
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Calculate atan2
|
||||
*/
|
||||
SLONG
|
||||
math_ATan2(SLONG i, SLONG j)
|
||||
{
|
||||
return (double2fix
|
||||
(atan2(fix2double(i), fix2double(j)) / 2 / PI * 65536));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Multiplication
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Multiplication
|
||||
*/
|
||||
SLONG
|
||||
math_Mul(SLONG i, SLONG j)
|
||||
{
|
||||
return (double2fix(fix2double(i) * fix2double(j)));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - MATH.C (Fixedpoint math routines)
|
||||
*
|
||||
* Division
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
/*
|
||||
* Division
|
||||
*/
|
||||
SLONG
|
||||
math_Div(SLONG i, SLONG j)
|
||||
{
|
||||
return (double2fix(fix2double(i) / fix2double(j)));
|
||||
}
|
||||
|
||||
/*
|
||||
* Round
|
||||
*/
|
||||
SLONG
|
||||
math_Round(SLONG i)
|
||||
{
|
||||
return double2fix(round(fix2double(i)));
|
||||
}
|
||||
|
||||
/*
|
||||
* Ceil
|
||||
*/
|
||||
SLONG
|
||||
math_Ceil(SLONG i)
|
||||
{
|
||||
return double2fix(ceil(fix2double(i)));
|
||||
}
|
||||
|
||||
/*
|
||||
* Floor
|
||||
*/
|
||||
SLONG
|
||||
math_Floor(SLONG i)
|
||||
{
|
||||
return double2fix(floor(fix2double(i)));
|
||||
}
|
||||
|
||||
489
src/asm/output.c
489
src/asm/output.c
@@ -1,8 +1,5 @@
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
* Outputs an objectfile
|
||||
*/
|
||||
|
||||
#include <errno.h>
|
||||
@@ -22,13 +19,6 @@
|
||||
|
||||
#define SECTIONCHUNK 0x4000
|
||||
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Internal structures
|
||||
*
|
||||
*/
|
||||
|
||||
void out_SetCurrentSection(struct Section * pSect);
|
||||
|
||||
struct Patch {
|
||||
@@ -52,12 +42,6 @@ struct SectionStackEntry {
|
||||
struct Section *pSection;
|
||||
struct SectionStackEntry *pNext;
|
||||
};
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* VARIABLES
|
||||
*
|
||||
*/
|
||||
|
||||
struct PatchSymbol *tHashedPatchSymbols[HASHSIZE];
|
||||
struct Section *pSectionList = NULL, *pCurrentSection = NULL;
|
||||
@@ -67,13 +51,9 @@ char *tzObjectname;
|
||||
struct SectionStackEntry *pSectionStack = NULL;
|
||||
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Section stack routines
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
out_PushSection(void)
|
||||
{
|
||||
struct SectionStackEntry *pSect;
|
||||
@@ -86,7 +66,7 @@ out_PushSection(void)
|
||||
fatalerror("No memory for section stack");
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
out_PopSection(void)
|
||||
{
|
||||
if (pSectionStack) {
|
||||
@@ -99,14 +79,11 @@ out_PopSection(void)
|
||||
} else
|
||||
fatalerror("No entries in the section stack");
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Count the number of symbols used in this object
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Count the number of symbols used in this object
|
||||
*/
|
||||
ULONG
|
||||
countsymbols(void)
|
||||
{
|
||||
struct PatchSymbol *pSym;
|
||||
@@ -121,14 +98,11 @@ countsymbols(void)
|
||||
|
||||
return (count);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Count the number of sections used in this object
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Count the number of sections used in this object
|
||||
*/
|
||||
ULONG
|
||||
countsections(void)
|
||||
{
|
||||
struct Section *pSect;
|
||||
@@ -143,14 +117,11 @@ countsections(void)
|
||||
|
||||
return (count);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Count the number of patches used in this object
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Count the number of patches used in this object
|
||||
*/
|
||||
ULONG
|
||||
countpatches(struct Section * pSect)
|
||||
{
|
||||
struct Patch *pPatch;
|
||||
@@ -164,14 +135,11 @@ countpatches(struct Section * pSect)
|
||||
|
||||
return (r);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write a long to a file (little-endian)
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Write a long to a file (little-endian)
|
||||
*/
|
||||
void
|
||||
fputlong(ULONG i, FILE * f)
|
||||
{
|
||||
fputc(i, f);
|
||||
@@ -179,28 +147,22 @@ fputlong(ULONG i, FILE * f)
|
||||
fputc(i >> 16, f);
|
||||
fputc(i >> 24, f);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write a NULL-terminated string to a file
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Write a NULL-terminated string to a file
|
||||
*/
|
||||
void
|
||||
fputstring(char *s, FILE * f)
|
||||
{
|
||||
while (*s)
|
||||
fputc(*s++, f);
|
||||
fputc(0, f);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Return a sections ID
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Return a section's ID
|
||||
*/
|
||||
ULONG
|
||||
getsectid(struct Section * pSect)
|
||||
{
|
||||
struct Section *sec;
|
||||
@@ -218,14 +180,11 @@ getsectid(struct Section * pSect)
|
||||
fatalerror("INTERNAL: Unknown section");
|
||||
return ((ULONG) - 1);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write a patch to a file
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Write a patch to a file
|
||||
*/
|
||||
void
|
||||
writepatch(struct Patch * pPatch, FILE * f)
|
||||
{
|
||||
fputstring(pPatch->tzFilename, f);
|
||||
@@ -235,27 +194,24 @@ writepatch(struct Patch * pPatch, FILE * f)
|
||||
fputlong(pPatch->nRPNSize, f);
|
||||
fwrite(pPatch->pRPN, 1, pPatch->nRPNSize, f);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write a section to a file
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Write a section to a file
|
||||
*/
|
||||
void
|
||||
writesection(struct Section * pSect, FILE * f)
|
||||
{
|
||||
//printf("SECTION: %s, ID: %d\n", pSect->pzName, getsectid(pSect));
|
||||
fputstring(pSect->pzName, f);
|
||||
|
||||
fputlong(pSect->nPC, f);
|
||||
|
||||
fputc(pSect->nType, f);
|
||||
|
||||
fputlong(pSect->nOrg, f);
|
||||
//RGB1 addition
|
||||
fputlong(pSect->nBank, f);
|
||||
fputlong(pSect->nAlign, f);
|
||||
|
||||
fputlong(pSect->nBank, f);
|
||||
//RGB1 addition
|
||||
|
||||
if ((pSect->nType == SECT_ROM0)
|
||||
if ((pSect->nType == SECT_ROM0)
|
||||
|| (pSect->nType == SECT_ROMX)) {
|
||||
struct Patch *pPatch;
|
||||
|
||||
@@ -269,14 +225,11 @@ writesection(struct Section * pSect, FILE * f)
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write a symbol to a file
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Write a symbol to a file
|
||||
*/
|
||||
void
|
||||
writesymbol(struct sSymbol * pSym, FILE * f)
|
||||
{
|
||||
char symname[MAXSYMLEN * 2 + 1];
|
||||
@@ -290,25 +243,27 @@ writesymbol(struct sSymbol * pSym, FILE * f)
|
||||
offset = 0;
|
||||
sectid = -1;
|
||||
type = SYM_IMPORT;
|
||||
} else if (pSym->nType & SYMF_EXPORT) {
|
||||
/* Symbol should be exported */
|
||||
strcpy(symname, pSym->tzName);
|
||||
type = SYM_EXPORT;
|
||||
offset = pSym->nValue;
|
||||
if (pSym->nType & SYMF_CONST)
|
||||
sectid = -1;
|
||||
else
|
||||
sectid = getsectid(pSym->pSection);
|
||||
} else {
|
||||
/* Symbol is local to this file */
|
||||
if (pSym->nType & SYMF_LOCAL) {
|
||||
strcpy(symname, pSym->pScope->tzName);
|
||||
strcat(symname, pSym->tzName);
|
||||
} else
|
||||
strcpy(symname, pSym->tzName);
|
||||
type = SYM_LOCAL;
|
||||
offset = pSym->nValue;
|
||||
sectid = getsectid(pSym->pSection);
|
||||
|
||||
if (pSym->nType & SYMF_EXPORT) {
|
||||
/* Symbol should be exported */
|
||||
type = SYM_EXPORT;
|
||||
offset = pSym->nValue;
|
||||
if (pSym->nType & SYMF_CONST)
|
||||
sectid = -1;
|
||||
else
|
||||
sectid = getsectid(pSym->pSection);
|
||||
} else {
|
||||
/* Symbol is local to this file */
|
||||
type = SYM_LOCAL;
|
||||
offset = pSym->nValue;
|
||||
sectid = getsectid(pSym->pSection);
|
||||
}
|
||||
}
|
||||
|
||||
fputstring(symname, f);
|
||||
@@ -319,14 +274,11 @@ writesymbol(struct sSymbol * pSym, FILE * f)
|
||||
fputlong(offset, f);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Add a symbol to the object
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Add a symbol to the object
|
||||
*/
|
||||
ULONG
|
||||
addsymbol(struct sSymbol * pSym)
|
||||
{
|
||||
struct PatchSymbol *pPSym, **ppPSym;
|
||||
@@ -355,14 +307,11 @@ addsymbol(struct sSymbol * pSym)
|
||||
|
||||
return pPSym->ID;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Add all exported symbols to the object
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add all exported symbols to the object
|
||||
*/
|
||||
void
|
||||
addexports(void)
|
||||
{
|
||||
int i;
|
||||
@@ -378,13 +327,10 @@ addexports(void)
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Allocate a new patchstructure and link it into the list
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Allocate a new patchstructure and link it into the list
|
||||
*/
|
||||
struct Patch *
|
||||
allocpatch(void)
|
||||
{
|
||||
@@ -401,14 +347,11 @@ allocpatch(void)
|
||||
|
||||
return (pPatch);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Create a new patch (includes the rpn expr)
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Create a new patch (includes the rpn expr)
|
||||
*/
|
||||
void
|
||||
createpatch(ULONG type, struct Expression * expr)
|
||||
{
|
||||
struct Patch *pPatch;
|
||||
@@ -445,7 +388,10 @@ createpatch(ULONG type, struct Expression * expr)
|
||||
rpnexpr[rpnptr++] = value >> 16;
|
||||
rpnexpr[rpnptr++] = value >> 24;
|
||||
} else {
|
||||
symptr = addsymbol(sym_FindSymbol(tzSym));
|
||||
struct sSymbol *sym;
|
||||
if ((sym = sym_FindSymbol(tzSym)) == NULL)
|
||||
break;
|
||||
symptr = addsymbol(sym);
|
||||
rpnexpr[rpnptr++] = RPN_SYM;
|
||||
rpnexpr[rpnptr++] = symptr & 0xFF;
|
||||
rpnexpr[rpnptr++] = symptr >> 8;
|
||||
@@ -453,15 +399,19 @@ createpatch(ULONG type, struct Expression * expr)
|
||||
rpnexpr[rpnptr++] = symptr >> 24;
|
||||
}
|
||||
break;
|
||||
case RPN_BANK:
|
||||
case RPN_BANK: {
|
||||
struct sSymbol *sym;
|
||||
symptr = 0;
|
||||
while ((tzSym[symptr++] = rpn_PopByte(expr)) != 0);
|
||||
symptr = addsymbol(sym_FindSymbol(tzSym));
|
||||
if ((sym = sym_FindSymbol(tzSym)) == NULL)
|
||||
break;
|
||||
symptr = addsymbol(sym);
|
||||
rpnexpr[rpnptr++] = RPN_BANK;
|
||||
rpnexpr[rpnptr++] = symptr & 0xFF;
|
||||
rpnexpr[rpnptr++] = symptr >> 8;
|
||||
rpnexpr[rpnptr++] = symptr >> 16;
|
||||
rpnexpr[rpnptr++] = symptr >> 24;
|
||||
}
|
||||
break;
|
||||
default:
|
||||
rpnexpr[rpnptr++] = rpndata;
|
||||
@@ -473,14 +423,11 @@ createpatch(ULONG type, struct Expression * expr)
|
||||
pPatch->nRPNSize = rpnptr;
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* A quick check to see if we have an initialized section
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* A quick check to see if we have an initialized section
|
||||
*/
|
||||
void
|
||||
checksection(void)
|
||||
{
|
||||
if (pCurrentSection)
|
||||
@@ -488,15 +435,12 @@ checksection(void)
|
||||
else
|
||||
fatalerror("Code generation before SECTION directive");
|
||||
}
|
||||
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* A quick check to see if we have an initialized section that can contain
|
||||
* this much initialized data
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
checkcodesection(SLONG size)
|
||||
{
|
||||
checksection();
|
||||
@@ -505,33 +449,36 @@ checkcodesection(SLONG size)
|
||||
errx(1, "Section '%s' cannot contain code or data (not a "
|
||||
"ROM0 or ROMX)", pCurrentSection->pzName);
|
||||
}
|
||||
if (pCurrentSection->nPC + size <= MAXSECTIONSIZE) {
|
||||
if (((pCurrentSection->nPC % SECTIONCHUNK) >
|
||||
((pCurrentSection->nPC + size) % SECTIONCHUNK))
|
||||
&& (pCurrentSection->nType == SECT_ROM0
|
||||
|| pCurrentSection->nType == SECT_ROMX)) {
|
||||
if ((pCurrentSection->tData =
|
||||
(UBYTE *) realloc(pCurrentSection->tData,
|
||||
((pCurrentSection->nPC +
|
||||
size) / SECTIONCHUNK +
|
||||
1) * SECTIONCHUNK)) != NULL) {
|
||||
return;
|
||||
} else
|
||||
fatalerror
|
||||
("Not enough memory to expand section");
|
||||
}
|
||||
return;
|
||||
} else
|
||||
errx(1, "Section '%s' is too big", pCurrentSection->pzName);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Write an objectfile
|
||||
*
|
||||
*/
|
||||
if (pCurrentSection->nPC + size > MAXSECTIONSIZE) {
|
||||
/*
|
||||
* N.B.: This check is not sufficient to ensure the section
|
||||
* will fit, because there can be multiple sections of this
|
||||
* type. The definitive check must be done at the linking
|
||||
* stage.
|
||||
*/
|
||||
errx(1, "Section '%s' is too big (old size %d + %d > %d)",
|
||||
pCurrentSection->pzName, pCurrentSection->nPC, size,
|
||||
MAXSECTIONSIZE);
|
||||
}
|
||||
if (((pCurrentSection->nPC % SECTIONCHUNK) >
|
||||
((pCurrentSection->nPC + size) % SECTIONCHUNK)) &&
|
||||
(pCurrentSection->nType == SECT_ROM0 ||
|
||||
pCurrentSection->nType == SECT_ROMX)) {
|
||||
pCurrentSection->tData = realloc(pCurrentSection->tData,
|
||||
((pCurrentSection->nPC + size) / SECTIONCHUNK + 1) *
|
||||
SECTIONCHUNK);
|
||||
|
||||
void
|
||||
if (pCurrentSection->tData == NULL) {
|
||||
err(1, "Could not expand section");
|
||||
}
|
||||
}
|
||||
return;
|
||||
}
|
||||
|
||||
/*
|
||||
* Write an objectfile
|
||||
*/
|
||||
void
|
||||
out_WriteObject(void)
|
||||
{
|
||||
FILE *f;
|
||||
@@ -542,7 +489,7 @@ out_WriteObject(void)
|
||||
struct PatchSymbol *pSym;
|
||||
struct Section *pSect;
|
||||
|
||||
fwrite("RGB2", 1, 4, f);
|
||||
fwrite("RGB4", 1, 4, f);
|
||||
fputlong(countsymbols(), f);
|
||||
fputlong(countsections(), f);
|
||||
|
||||
@@ -561,14 +508,11 @@ out_WriteObject(void)
|
||||
fclose(f);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Prepare for pass #2
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Prepare for pass #2
|
||||
*/
|
||||
void
|
||||
out_PrepPass2(void)
|
||||
{
|
||||
struct Section *pSect;
|
||||
@@ -581,14 +525,11 @@ out_PrepPass2(void)
|
||||
pCurrentSection = NULL;
|
||||
pSectionStack = NULL;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Set the objectfilename
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set the objectfilename
|
||||
*/
|
||||
void
|
||||
out_SetFileName(char *s)
|
||||
{
|
||||
tzObjectname = s;
|
||||
@@ -599,16 +540,12 @@ out_SetFileName(char *s)
|
||||
pCurrentSection = NULL;
|
||||
pPatchSymbols = NULL;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Find a section by name and type. If it doesn't exist, create it
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Find a section by name and type. If it doesn't exist, create it
|
||||
*/
|
||||
struct Section *
|
||||
out_FindSection(char *pzName, ULONG secttype, SLONG org,
|
||||
SLONG bank)
|
||||
out_FindSection(char *pzName, ULONG secttype, SLONG org, SLONG bank, SLONG alignment)
|
||||
{
|
||||
struct Section *pSect, **ppSect;
|
||||
|
||||
@@ -619,7 +556,8 @@ out_FindSection(char *pzName, ULONG secttype, SLONG org,
|
||||
if (strcmp(pzName, pSect->pzName) == 0) {
|
||||
if (secttype == pSect->nType
|
||||
&& ((ULONG) org) == pSect->nOrg
|
||||
&& ((ULONG) bank) == pSect->nBank) {
|
||||
&& ((ULONG) bank) == pSect->nBank
|
||||
&& ((ULONG) alignment == pSect->nAlign)) {
|
||||
return (pSect);
|
||||
} else
|
||||
fatalerror
|
||||
@@ -636,6 +574,7 @@ out_FindSection(char *pzName, ULONG secttype, SLONG org,
|
||||
pSect->nPC = 0;
|
||||
pSect->nOrg = org;
|
||||
pSect->nBank = bank;
|
||||
pSect->nAlign = alignment;
|
||||
pSect->pNext = NULL;
|
||||
pSect->pPatches = NULL;
|
||||
pSect->charmap = NULL;
|
||||
@@ -652,14 +591,11 @@ out_FindSection(char *pzName, ULONG secttype, SLONG org,
|
||||
|
||||
return (NULL);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Set the current section
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set the current section
|
||||
*/
|
||||
void
|
||||
out_SetCurrentSection(struct Section * pSect)
|
||||
{
|
||||
pCurrentSection = pSect;
|
||||
@@ -668,38 +604,41 @@ out_SetCurrentSection(struct Section * pSect)
|
||||
pPCSymbol->nValue = nPC;
|
||||
pPCSymbol->pSection = pCurrentSection;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Set the current section by name and type
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set the current section by name and type
|
||||
*/
|
||||
void
|
||||
out_NewSection(char *pzName, ULONG secttype)
|
||||
{
|
||||
out_SetCurrentSection(out_FindSection(pzName, secttype, -1, -1));
|
||||
out_SetCurrentSection(out_FindSection(pzName, secttype, -1, -1, 1));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Set the current section by name and type
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set the current section by name and type
|
||||
*/
|
||||
void
|
||||
out_NewAbsSection(char *pzName, ULONG secttype, SLONG org, SLONG bank)
|
||||
{
|
||||
out_SetCurrentSection(out_FindSection(pzName, secttype, org, bank));
|
||||
out_SetCurrentSection(out_FindSection(pzName, secttype, org, bank, 1));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output an absolute byte
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set the current section by name and type, using a given byte alignment
|
||||
*/
|
||||
void
|
||||
out_NewAlignedSection(char *pzName, ULONG secttype, SLONG alignment, SLONG bank)
|
||||
{
|
||||
if (alignment < 0 || alignment > 16) {
|
||||
yyerror("Alignment must be between 0-16 bits.");
|
||||
}
|
||||
out_SetCurrentSection(out_FindSection(pzName, secttype, -1, bank, 1 << alignment));
|
||||
}
|
||||
|
||||
/*
|
||||
* Output an absolute byte
|
||||
*/
|
||||
void
|
||||
out_AbsByte(int b)
|
||||
{
|
||||
checkcodesection(1);
|
||||
@@ -712,21 +651,18 @@ out_AbsByte(int b)
|
||||
pPCSymbol->nValue += 1;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
out_AbsByteGroup(char *s, int length)
|
||||
{
|
||||
checkcodesection(length);
|
||||
while (length--)
|
||||
out_AbsByte(*s++);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Skip this many bytes
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Skip this many bytes
|
||||
*/
|
||||
void
|
||||
out_Skip(int skip)
|
||||
{
|
||||
checksection();
|
||||
@@ -741,29 +677,24 @@ out_Skip(int skip)
|
||||
out_AbsByte(CurrentOptions.fillchar);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a NULL terminated string (excluding the NULL-character)
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output a NULL terminated string (excluding the NULL-character)
|
||||
*/
|
||||
void
|
||||
out_String(char *s)
|
||||
{
|
||||
checkcodesection(strlen(s));
|
||||
while (*s)
|
||||
out_AbsByte(*s++);
|
||||
}
|
||||
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a relocatable byte. Checking will be done to see if it
|
||||
* is an absolute value in disguise.
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
out_RelByte(struct Expression * expr)
|
||||
{
|
||||
checkcodesection(1);
|
||||
@@ -780,14 +711,11 @@ out_RelByte(struct Expression * expr)
|
||||
|
||||
rpn_Reset(expr);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output an absolute word
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output an absolute word
|
||||
*/
|
||||
void
|
||||
out_AbsWord(int b)
|
||||
{
|
||||
checkcodesection(2);
|
||||
@@ -800,15 +728,12 @@ out_AbsWord(int b)
|
||||
nPC += 2;
|
||||
pPCSymbol->nValue += 2;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a relocatable word. Checking will be done to see if
|
||||
* is an absolute value in disguise.
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output a relocatable word. Checking will be done to see if
|
||||
* it's an absolute value in disguise.
|
||||
*/
|
||||
void
|
||||
out_RelWord(struct Expression * expr)
|
||||
{
|
||||
ULONG b;
|
||||
@@ -828,14 +753,11 @@ out_RelWord(struct Expression * expr)
|
||||
out_AbsWord(expr->nVal);
|
||||
rpn_Reset(expr);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output an absolute longword
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output an absolute longword
|
||||
*/
|
||||
void
|
||||
out_AbsLong(SLONG b)
|
||||
{
|
||||
checkcodesection(sizeof(SLONG));
|
||||
@@ -849,15 +771,12 @@ out_AbsLong(SLONG b)
|
||||
nPC += 4;
|
||||
pPCSymbol->nValue += 4;
|
||||
}
|
||||
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a relocatable longword. Checking will be done to see if
|
||||
* is an absolute value in disguise.
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
out_RelLong(struct Expression * expr)
|
||||
{
|
||||
SLONG b;
|
||||
@@ -879,14 +798,11 @@ out_RelLong(struct Expression * expr)
|
||||
out_AbsLong(expr->nVal);
|
||||
rpn_Reset(expr);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a PC-relative byte
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output a PC-relative byte
|
||||
*/
|
||||
void
|
||||
out_PCRelByte(struct Expression * expr)
|
||||
{
|
||||
SLONG b = expr->nVal;
|
||||
@@ -899,14 +815,11 @@ out_PCRelByte(struct Expression * expr)
|
||||
out_AbsByte(b);
|
||||
rpn_Reset(expr);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - OUTPUT.C - Outputs an objectfile
|
||||
*
|
||||
* Output a binary file
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Output a binary file
|
||||
*/
|
||||
void
|
||||
out_BinaryFile(char *s)
|
||||
{
|
||||
FILE *f;
|
||||
@@ -937,7 +850,7 @@ out_BinaryFile(char *s)
|
||||
fclose(f);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
out_BinaryFileSlice(char *s, SLONG start_pos, SLONG length)
|
||||
{
|
||||
FILE *f;
|
||||
|
||||
@@ -1,4 +1,18 @@
|
||||
.Dd $Mdocdate$
|
||||
.\" Copyright © 2010 Anthony J. Bentley <anthony@anjbe.name>
|
||||
.\"
|
||||
.\" Permission to use, copy, modify, and distribute this software for any
|
||||
.\" purpose with or without fee is hereby granted, provided that the above
|
||||
.\" copyright notice and this permission notice appear in all copies.
|
||||
.\"
|
||||
.\" THE SOFTWARE IS PROVIDED “AS IS” AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
.\" WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
.\" MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
.\" ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
.\" WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
.\" ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
.\" OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
.\"
|
||||
.Dd April 17, 2017
|
||||
.Dt RGBASM 1
|
||||
.Os RGBDS Manual
|
||||
.Sh NAME
|
||||
@@ -6,9 +20,9 @@
|
||||
.Nd Game Boy assembler
|
||||
.Sh SYNOPSIS
|
||||
.Nm rgbasm
|
||||
.Op Fl v
|
||||
.Op Fl h
|
||||
.Op Fl Ehvw
|
||||
.Op Fl b Ar chars
|
||||
.Op Fl D Ar name Ns Op = Ns Ar value
|
||||
.Op Fl g Ar chars
|
||||
.Op Fl i Ar path
|
||||
.Op Fl o Ar outfile
|
||||
@@ -23,6 +37,14 @@ Its arguments are as follows:
|
||||
.It Fl b Ar chars
|
||||
Change the two characters used for binary constants.
|
||||
The defaults are 01.
|
||||
.It Fl D Ar name Ns Op = Ns Ar value
|
||||
Add string symbol to the compiled source code. This is equivalent to
|
||||
.Ar name
|
||||
.Cm EQUS
|
||||
.Qq Ar "value"
|
||||
in code. If a value is not specified, a value of 1 is given.
|
||||
.It Fl E
|
||||
Export all labels, including unreferenced and local labels.
|
||||
.It Fl g Ar chars
|
||||
Change the four characters used for binary constants.
|
||||
The defaults are 0123.
|
||||
@@ -46,11 +68,13 @@ When padding an image, pad with this value.
|
||||
The default is 0x00.
|
||||
.It Fl v
|
||||
Be verbose.
|
||||
.It Fl w
|
||||
Disable warning output.
|
||||
.El
|
||||
.Sh EXAMPLES
|
||||
Assembling a basic source file is simple:
|
||||
.Pp
|
||||
.D1 $ rgbasm \-o bar.o foo.asm
|
||||
.D1 $ rgbasm -o bar.o foo.asm
|
||||
.Pp
|
||||
The resulting object file is not yet a usable ROM image \(em it must first be
|
||||
run through
|
||||
@@ -58,11 +82,16 @@ run through
|
||||
and
|
||||
.Xr rgbfix 1 .
|
||||
.Sh SEE ALSO
|
||||
.Xr rgbds 7 ,
|
||||
.Xr rgbasm 5 ,
|
||||
.Xr rgbfix 1 ,
|
||||
.Xr rgblink 1 ,
|
||||
.Xr rgbds 5 ,
|
||||
.Xr rgbds 7 ,
|
||||
.Xr gbz80 7
|
||||
.Pp
|
||||
.Lk https://rednex.github.io/rgbds/asm.htm rgbasm assembly commands
|
||||
.Sh HISTORY
|
||||
.Nm
|
||||
was originally written by Carsten S\(/orensen as part of the ASMotor package,
|
||||
and was later packaged in RGBDS by Justin Lloyd.
|
||||
and was later packaged in RGBDS by Justin Lloyd. It is now maintained by a
|
||||
number of contributors at https://github.com/rednex/rgbds.
|
||||
|
||||
1008
src/asm/rgbasm.5
Normal file
1008
src/asm/rgbasm.5
Normal file
File diff suppressed because it is too large
Load Diff
207
src/asm/rpn.c
207
src/asm/rpn.c
@@ -1,21 +1,18 @@
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
* Controls RPN expressions for objectfiles
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
#include "asm/mylink.h"
|
||||
#include "asm/types.h"
|
||||
#include "types.h"
|
||||
#include "asm/symbol.h"
|
||||
#include "asm/asm.h"
|
||||
#include "asm/main.h"
|
||||
#include "asm/rpn.h"
|
||||
|
||||
void
|
||||
void
|
||||
mergetwoexpressions(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -29,50 +26,27 @@ mergetwoexpressions(struct Expression * expr, struct Expression * src1,
|
||||
#define joinexpr() mergetwoexpressions(expr,src1,src2)
|
||||
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* VARIABLES
|
||||
*
|
||||
*/
|
||||
|
||||
//UBYTE rpnexpr[2048];
|
||||
//ULONG rpnptr = 0;
|
||||
//ULONG rpnoutptr = 0;
|
||||
//ULONG reloc = 0;
|
||||
//ULONG pcrel = 0;
|
||||
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Add a byte to the RPN expression
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
pushbyte(struct Expression * expr, int b)
|
||||
{
|
||||
expr->tRPN[expr->nRPNLength++] = b & 0xFF;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Reset the RPN module
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Reset the RPN module
|
||||
*/
|
||||
void
|
||||
rpn_Reset(struct Expression * expr)
|
||||
{
|
||||
expr->nRPNLength = expr->nRPNOut = expr->isReloc = expr->isPCRel = 0;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Returns the next rpn byte in expression
|
||||
*
|
||||
*/
|
||||
|
||||
UWORD
|
||||
/*
|
||||
* Returns the next rpn byte in expression
|
||||
*/
|
||||
UWORD
|
||||
rpn_PopByte(struct Expression * expr)
|
||||
{
|
||||
if (expr->nRPNOut == expr->nRPNLength) {
|
||||
@@ -80,38 +54,29 @@ rpn_PopByte(struct Expression * expr)
|
||||
} else
|
||||
return (expr->tRPN[expr->nRPNOut++]);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Determine if the current expression is relocatable
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Determine if the current expression is relocatable
|
||||
*/
|
||||
ULONG
|
||||
rpn_isReloc(struct Expression * expr)
|
||||
{
|
||||
return (expr->isReloc);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Determine if the current expression can be pc-relative
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Determine if the current expression can be pc-relative
|
||||
*/
|
||||
ULONG
|
||||
rpn_isPCRelative(struct Expression * expr)
|
||||
{
|
||||
return (expr->isPCRel);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - RPN.C - Controls RPN expressions for objectfiles
|
||||
*
|
||||
* Add symbols, constants and operators to expression
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add symbols, constants and operators to expression
|
||||
*/
|
||||
void
|
||||
rpn_Number(struct Expression * expr, ULONG i)
|
||||
{
|
||||
rpn_Reset(expr);
|
||||
@@ -123,7 +88,7 @@ rpn_Number(struct Expression * expr, ULONG i)
|
||||
expr->nVal = i;
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_Symbol(struct Expression * expr, char *tzSym)
|
||||
{
|
||||
if (!sym_isConstant(tzSym)) {
|
||||
@@ -145,18 +110,15 @@ rpn_Symbol(struct Expression * expr, char *tzSym)
|
||||
rpn_Number(expr, sym_GetConstantValue(tzSym));
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_Bank(struct Expression * expr, char *tzSym)
|
||||
{
|
||||
if (!sym_isConstant(tzSym)) {
|
||||
struct sSymbol *psym;
|
||||
|
||||
rpn_Reset(expr);
|
||||
|
||||
psym = sym_FindSymbol(tzSym);
|
||||
if (nPass == 2 && psym == NULL) {
|
||||
yyerror("'%s' not defined", tzSym);
|
||||
}
|
||||
/* Check that the symbol exists by evaluating and discarding the value. */
|
||||
sym_GetValue(tzSym);
|
||||
|
||||
expr->isReloc = 1;
|
||||
pushbyte(expr, RPN_BANK);
|
||||
while (*tzSym)
|
||||
@@ -166,42 +128,21 @@ rpn_Bank(struct Expression * expr, char *tzSym)
|
||||
yyerror("BANK argument must be a relocatable identifier");
|
||||
}
|
||||
|
||||
int
|
||||
rpn_RangeCheck(struct Expression * expr, struct Expression * src, SLONG low,
|
||||
SLONG high)
|
||||
{
|
||||
*expr = *src;
|
||||
|
||||
if (rpn_isReloc(src)) {
|
||||
pushbyte(expr, RPN_RANGECHECK);
|
||||
pushbyte(expr, low);
|
||||
pushbyte(expr, low >> 8);
|
||||
pushbyte(expr, low >> 16);
|
||||
pushbyte(expr, low >> 24);
|
||||
pushbyte(expr, high);
|
||||
pushbyte(expr, high >> 8);
|
||||
pushbyte(expr, high >> 16);
|
||||
pushbyte(expr, high >> 24);
|
||||
return (1);
|
||||
} else {
|
||||
return (expr->nVal >= low && expr->nVal <= high);
|
||||
}
|
||||
}
|
||||
void
|
||||
void
|
||||
rpn_CheckHRAM(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
pushbyte(expr, RPN_HRAM);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGNOT(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
pushbyte(expr, RPN_LOGUNNOT);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGOR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -210,7 +151,7 @@ rpn_LOGOR(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGOR);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGAND(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -219,7 +160,47 @@ rpn_LOGAND(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGAND);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_HIGH(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
|
||||
expr->nVal = (expr->nVal >> 8) & 0xFF;
|
||||
|
||||
pushbyte(expr, RPN_CONST);
|
||||
pushbyte(expr, 8);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
|
||||
pushbyte(expr, RPN_SHR);
|
||||
|
||||
pushbyte(expr, RPN_CONST);
|
||||
pushbyte(expr, 0xFF);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
|
||||
pushbyte(expr, RPN_AND);
|
||||
}
|
||||
|
||||
void
|
||||
rpn_LOW(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
|
||||
expr->nVal = expr->nVal & 0xFF;
|
||||
|
||||
pushbyte(expr, RPN_CONST);
|
||||
pushbyte(expr, 0xFF);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
pushbyte(expr, 0);
|
||||
|
||||
pushbyte(expr, RPN_AND);
|
||||
}
|
||||
|
||||
void
|
||||
rpn_LOGEQU(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -228,7 +209,7 @@ rpn_LOGEQU(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGEQ);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGGT(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -237,7 +218,7 @@ rpn_LOGGT(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGGT);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGLT(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -246,7 +227,7 @@ rpn_LOGLT(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGLT);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGGE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -255,7 +236,7 @@ rpn_LOGGE(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGGE);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGLE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -264,7 +245,7 @@ rpn_LOGLE(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGLE);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_LOGNE(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -273,7 +254,7 @@ rpn_LOGNE(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_LOGNE);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_ADD(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -282,7 +263,7 @@ rpn_ADD(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_ADD);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_SUB(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -291,7 +272,7 @@ rpn_SUB(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_SUB);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_XOR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -300,7 +281,7 @@ rpn_XOR(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_XOR);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_OR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -309,7 +290,7 @@ rpn_OR(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_OR);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_AND(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -318,7 +299,7 @@ rpn_AND(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_AND);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_SHL(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -327,7 +308,7 @@ rpn_SHL(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_SHL);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_SHR(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -336,7 +317,7 @@ rpn_SHR(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_SHR);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_MUL(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
@@ -345,25 +326,31 @@ rpn_MUL(struct Expression * expr, struct Expression * src1,
|
||||
pushbyte(expr, RPN_MUL);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_DIV(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
joinexpr();
|
||||
if (src2->nVal == 0) {
|
||||
fatalerror("division by zero");
|
||||
}
|
||||
expr->nVal = (expr->nVal / src2->nVal);
|
||||
pushbyte(expr, RPN_DIV);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_MOD(struct Expression * expr, struct Expression * src1,
|
||||
struct Expression * src2)
|
||||
{
|
||||
joinexpr();
|
||||
if (src2->nVal == 0) {
|
||||
fatalerror("division by zero");
|
||||
}
|
||||
expr->nVal = (expr->nVal % src2->nVal);
|
||||
pushbyte(expr, RPN_MOD);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_UNNEG(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
@@ -371,7 +358,7 @@ rpn_UNNEG(struct Expression * expr, struct Expression * src)
|
||||
pushbyte(expr, RPN_UNSUB);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
rpn_UNNOT(struct Expression * expr, struct Expression * src)
|
||||
{
|
||||
*expr = *src;
|
||||
|
||||
507
src/asm/symbol.c
507
src/asm/symbol.c
@@ -1,11 +1,7 @@
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable and macroargs stuff
|
||||
*
|
||||
* INCLUDES
|
||||
*
|
||||
* Symboltable and macroargs stuff
|
||||
*/
|
||||
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <assert.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
@@ -16,13 +12,7 @@
|
||||
#include "asm/main.h"
|
||||
#include "asm/mymath.h"
|
||||
#include "asm/output.h"
|
||||
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* VARIABLES
|
||||
*
|
||||
*/
|
||||
#include "extern/err.h"
|
||||
|
||||
struct sSymbol *tHashedSymbols[HASHSIZE];
|
||||
struct sSymbol *pScope = NULL;
|
||||
@@ -32,13 +22,15 @@ char *currentmacroargs[MAXMACROARGS + 1];
|
||||
char *newmacroargs[MAXMACROARGS + 1];
|
||||
char SavedTIME[256];
|
||||
char SavedDATE[256];
|
||||
char SavedTIMESTAMP_ISO8601_LOCAL[256];
|
||||
char SavedTIMESTAMP_ISO8601_UTC[256];
|
||||
bool exportall;
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
Callback_NARG(struct sSymbol * sym)
|
||||
{
|
||||
ULONG i = 0;
|
||||
|
||||
sym = sym;
|
||||
while (currentmacroargs[i] && i < MAXMACROARGS)
|
||||
i += 1;
|
||||
|
||||
@@ -46,13 +38,9 @@ Callback_NARG(struct sSymbol * sym)
|
||||
}
|
||||
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Get the nValue field of a symbol
|
||||
*
|
||||
*/
|
||||
|
||||
SLONG
|
||||
SLONG
|
||||
getvaluefield(struct sSymbol * sym)
|
||||
{
|
||||
if (sym->Callback) {
|
||||
@@ -60,14 +48,11 @@ getvaluefield(struct sSymbol * sym)
|
||||
} else
|
||||
return (sym->nValue);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Calculate the hash value for a string
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Calculate the hash value for a string
|
||||
*/
|
||||
ULONG
|
||||
calchash(char *s)
|
||||
{
|
||||
ULONG hash = 5381;
|
||||
@@ -77,13 +62,10 @@ calchash(char *s)
|
||||
|
||||
return (hash % HASHSIZE);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Create a new symbol by name
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Create a new symbol by name
|
||||
*/
|
||||
struct sSymbol *
|
||||
createsymbol(char *s)
|
||||
{
|
||||
@@ -112,12 +94,8 @@ createsymbol(char *s)
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Find a symbol by name and scope
|
||||
*
|
||||
*/
|
||||
|
||||
struct sSymbol *
|
||||
findsymbol(char *s, struct sSymbol * scope)
|
||||
{
|
||||
@@ -136,13 +114,10 @@ findsymbol(char *s, struct sSymbol * scope)
|
||||
}
|
||||
return (NULL);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Find the pointer to a symbol by name and scope
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Find the pointer to a symbol by name and scope
|
||||
*/
|
||||
struct sSymbol **
|
||||
findpsymbol(char *s, struct sSymbol * scope)
|
||||
{
|
||||
@@ -161,13 +136,10 @@ findpsymbol(char *s, struct sSymbol * scope)
|
||||
}
|
||||
return (NULL);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Find a symbol by name and scope
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Find a symbol by name and scope
|
||||
*/
|
||||
struct sSymbol *
|
||||
sym_FindSymbol(char *tzName)
|
||||
{
|
||||
@@ -180,14 +152,11 @@ sym_FindSymbol(char *tzName)
|
||||
|
||||
return (findsymbol(tzName, pscope));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Purge a symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Purge a symbol
|
||||
*/
|
||||
void
|
||||
sym_Purge(char *tzName)
|
||||
{
|
||||
struct sSymbol **ppSym;
|
||||
@@ -214,14 +183,11 @@ sym_Purge(char *tzName)
|
||||
yyerror("'%s' not defined", tzName);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Determine if a symbol has been defined
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Determine if a symbol has been defined
|
||||
*/
|
||||
ULONG
|
||||
sym_isConstDefined(char *tzName)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -245,7 +211,7 @@ sym_isConstDefined(char *tzName)
|
||||
return (0);
|
||||
}
|
||||
|
||||
ULONG
|
||||
ULONG
|
||||
sym_isDefined(char *tzName)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -262,14 +228,11 @@ sym_isDefined(char *tzName)
|
||||
else
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Determine if the symbol is a constant
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Determine if the symbol is a constant
|
||||
*/
|
||||
ULONG
|
||||
sym_isConstant(char *s)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -285,13 +248,10 @@ sym_isConstant(char *s)
|
||||
}
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Get a string equate's value
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Get a string equate's value
|
||||
*/
|
||||
char *
|
||||
sym_GetStringValue(char *tzSym)
|
||||
{
|
||||
@@ -305,14 +265,11 @@ sym_GetStringValue(char *tzSym)
|
||||
|
||||
return (NULL);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Return a constant symbols value
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Return a constant symbols value
|
||||
*/
|
||||
ULONG
|
||||
sym_GetConstantValue(char *s)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -334,14 +291,11 @@ sym_GetConstantValue(char *s)
|
||||
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Return a symbols value... "estimated" if not defined yet
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Return a symbols value... "estimated" if not defined yet
|
||||
*/
|
||||
ULONG
|
||||
sym_GetValue(char *s)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -376,14 +330,11 @@ sym_GetValue(char *s)
|
||||
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Return a defined symbols value... aborts if not defined yet
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* Return a defined symbols value... aborts if not defined yet
|
||||
*/
|
||||
ULONG
|
||||
sym_GetDefinedValue(char *s)
|
||||
{
|
||||
struct sSymbol *psym, *pscope;
|
||||
@@ -408,14 +359,11 @@ sym_GetDefinedValue(char *s)
|
||||
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Macro argument stuff
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Macro argument stuff
|
||||
*/
|
||||
void
|
||||
sym_ShiftCurrentMacroArgs(void)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -433,12 +381,13 @@ sym_FindMacroArg(SLONG i)
|
||||
if (i == -1)
|
||||
i = MAXMACROARGS + 1;
|
||||
|
||||
assert(i-1 >= 0 &&
|
||||
i-1 < sizeof currentmacroargs / sizeof *currentmacroargs);
|
||||
assert(i-1 >= 0);
|
||||
assert((size_t)(i-1) < sizeof(currentmacroargs)/sizeof(*currentmacroargs));
|
||||
|
||||
return (currentmacroargs[i - 1]);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_UseNewMacroArgs(void)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -449,7 +398,7 @@ sym_UseNewMacroArgs(void)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_SaveCurrentMacroArgs(char *save[])
|
||||
{
|
||||
SLONG i;
|
||||
@@ -458,7 +407,7 @@ sym_SaveCurrentMacroArgs(char *save[])
|
||||
save[i] = currentmacroargs[i];
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_RestoreCurrentMacroArgs(char *save[])
|
||||
{
|
||||
SLONG i;
|
||||
@@ -467,7 +416,7 @@ sym_RestoreCurrentMacroArgs(char *save[])
|
||||
currentmacroargs[i] = save[i];
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_FreeCurrentMacroArgs(void)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -478,7 +427,7 @@ sym_FreeCurrentMacroArgs(void)
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_AddNewMacroArg(char *s)
|
||||
{
|
||||
SLONG i = 0;
|
||||
@@ -492,10 +441,10 @@ sym_AddNewMacroArg(char *s)
|
||||
else
|
||||
newmacroargs[i] = NULL;
|
||||
} else
|
||||
yyerror("A maximum of 9 arguments allowed");
|
||||
yyerror("A maximum of %d arguments allowed", MAXMACROARGS);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_SetMacroArgID(ULONG nMacroCount)
|
||||
{
|
||||
char s[256];
|
||||
@@ -504,7 +453,7 @@ sym_SetMacroArgID(ULONG nMacroCount)
|
||||
newmacroargs[MAXMACROARGS] = strdup(s);
|
||||
}
|
||||
|
||||
void
|
||||
void
|
||||
sym_UseCurrentMacroArgs(void)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -512,26 +461,20 @@ sym_UseCurrentMacroArgs(void)
|
||||
for (i = 1; i <= MAXMACROARGS; i += 1)
|
||||
sym_AddNewMacroArg(sym_FindMacroArg(i));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Find a macro by name
|
||||
*
|
||||
*/
|
||||
|
||||
/*
|
||||
* Find a macro by name
|
||||
*/
|
||||
struct sSymbol *
|
||||
sym_FindMacro(char *s)
|
||||
{
|
||||
return (findsymbol(s, NULL));
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Add an equated symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add an equated symbol
|
||||
*/
|
||||
void
|
||||
sym_AddEqu(char *tzSym, SLONG value)
|
||||
{
|
||||
if ((nPass == 1)
|
||||
@@ -553,14 +496,20 @@ sym_AddEqu(char *tzSym, SLONG value)
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Add a string equated symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add a string equated symbol.
|
||||
*
|
||||
* If the desired symbol is a string it needs to be passed to this function with
|
||||
* quotes inside the string, like sym_AddString("name", "\"test\"), or the
|
||||
* assembler won't be able to use it with DB and similar. This is equivalent as
|
||||
* ``` name EQUS "\"test\"" ```
|
||||
*
|
||||
* If the desired symbol is a register or a number, just the terminator quotes
|
||||
* of the string are enough: sym_AddString("M_PI", "3.1415"). This is the same
|
||||
* as ``` M_PI EQUS "3.1415" ```
|
||||
*/
|
||||
void
|
||||
sym_AddString(char *tzSym, char *tzValue)
|
||||
{
|
||||
struct sSymbol *nsym;
|
||||
@@ -582,14 +531,11 @@ sym_AddString(char *tzSym, char *tzValue)
|
||||
nsym->pScope = NULL;
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* check if symbol is a string equated symbol
|
||||
*
|
||||
*/
|
||||
|
||||
ULONG
|
||||
/*
|
||||
* check if symbol is a string equated symbol
|
||||
*/
|
||||
ULONG
|
||||
sym_isString(char *tzSym)
|
||||
{
|
||||
struct sSymbol *pSym;
|
||||
@@ -600,14 +546,11 @@ sym_isString(char *tzSym)
|
||||
}
|
||||
return (0);
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Alter a SET symbols value
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Alter a SET symbols value
|
||||
*/
|
||||
void
|
||||
sym_AddSet(char *tzSym, SLONG value)
|
||||
{
|
||||
struct sSymbol *nsym;
|
||||
@@ -622,14 +565,11 @@ sym_AddSet(char *tzSym, SLONG value)
|
||||
nsym->pScope = NULL;
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Add a local (.name) relocatable symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add a local (.name) relocatable symbol
|
||||
*/
|
||||
void
|
||||
sym_AddLocalReloc(char *tzSym)
|
||||
{
|
||||
if ((nPass == 1)
|
||||
@@ -649,6 +589,9 @@ sym_AddLocalReloc(char *tzSym)
|
||||
nsym->nValue = nPC;
|
||||
nsym->nType |=
|
||||
SYMF_RELOC | SYMF_LOCAL | SYMF_DEFINED;
|
||||
if (exportall) {
|
||||
nsym->nType |= SYMF_EXPORT;
|
||||
}
|
||||
nsym->pScope = pScope;
|
||||
nsym->pSection = pCurrentSection;
|
||||
}
|
||||
@@ -656,14 +599,11 @@ sym_AddLocalReloc(char *tzSym)
|
||||
fatalerror("Local label in main scope");
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Add a relocatable symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add a relocatable symbol
|
||||
*/
|
||||
void
|
||||
sym_AddReloc(char *tzSym)
|
||||
{
|
||||
if ((nPass == 1)
|
||||
@@ -681,21 +621,63 @@ sym_AddReloc(char *tzSym)
|
||||
if (nsym) {
|
||||
nsym->nValue = nPC;
|
||||
nsym->nType |= SYMF_RELOC | SYMF_DEFINED;
|
||||
if (exportall) {
|
||||
nsym->nType |= SYMF_EXPORT;
|
||||
}
|
||||
nsym->pScope = NULL;
|
||||
nsym->pSection = pCurrentSection;
|
||||
}
|
||||
}
|
||||
pScope = findsymbol(tzSym, NULL);
|
||||
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Export a symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Check if the subtraction of two symbols is defined. That is, either both
|
||||
* symbols are defined and the result is a constant, or both symbols are
|
||||
* relocatable and belong to the same section.
|
||||
*
|
||||
* It returns 1 if the difference is defined, 0 if not.
|
||||
*/
|
||||
int
|
||||
sym_IsRelocDiffDefined(char *tzSym1, char *tzSym2)
|
||||
{
|
||||
/* Do nothing the first pass. */
|
||||
if (nPass != 2)
|
||||
return 1;
|
||||
|
||||
struct sSymbol *nsym1, *nsym2;
|
||||
|
||||
/* Do the symbols exist? */
|
||||
if ((nsym1 = sym_FindSymbol(tzSym1)) == NULL)
|
||||
fatalerror("Symbol \"%s\" isn't defined.", tzSym1);
|
||||
if ((nsym2 = sym_FindSymbol(tzSym2)) == NULL)
|
||||
fatalerror("Symbol \"%s\" isn't defined.", tzSym2);
|
||||
|
||||
int s1reloc = (nsym1->nType & SYMF_RELOC) != 0;
|
||||
int s2reloc = (nsym2->nType & SYMF_RELOC) != 0;
|
||||
|
||||
/* Both are non-relocatable */
|
||||
if (!s1reloc && !s2reloc) return 1;
|
||||
|
||||
/* One of them relocatable, the other one not. */
|
||||
if (s1reloc ^ s2reloc) return 0;
|
||||
|
||||
/* Both of them are relocatable. Make sure they are defined (internal
|
||||
* coherency with sym_AddReloc and sym_AddLocalReloc). */
|
||||
if (!(nsym1->nType & SYMF_DEFINED))
|
||||
fatalerror("Relocatable symbol \"%s\" isn't defined.", tzSym1);
|
||||
if (!(nsym2->nType & SYMF_DEFINED))
|
||||
fatalerror("Relocatable symbol \"%s\" isn't defined.", tzSym2);
|
||||
|
||||
/* Both of them must be in the same section for the difference to be
|
||||
* defined. */
|
||||
return nsym1->pSection == nsym2->pSection;
|
||||
}
|
||||
|
||||
/*
|
||||
* Export a symbol
|
||||
*/
|
||||
void
|
||||
sym_Export(char *tzSym)
|
||||
{
|
||||
if (nPass == 1) {
|
||||
@@ -718,35 +700,11 @@ sym_Export(char *tzSym)
|
||||
}
|
||||
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Import a symbol
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
sym_Import(char *tzSym)
|
||||
{
|
||||
if (nPass == 1) {
|
||||
/* only import symbols in pass 1 */
|
||||
struct sSymbol *nsym;
|
||||
|
||||
if (findsymbol(tzSym, NULL)) {
|
||||
yyerror("'%s' already defined", tzSym);
|
||||
}
|
||||
if ((nsym = createsymbol(tzSym)) != NULL)
|
||||
nsym->nType |= SYMF_IMPORT;
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Globalize a symbol (export if defined, import if not)
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
void
|
||||
sym_Global(char *tzSym)
|
||||
{
|
||||
if (nPass == 2) {
|
||||
@@ -767,14 +725,11 @@ sym_Global(char *tzSym)
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Add a macro definition
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Add a macro definition
|
||||
*/
|
||||
void
|
||||
sym_AddMacro(char *tzSym)
|
||||
{
|
||||
if ((nPass == 1)
|
||||
@@ -798,26 +753,27 @@ sym_AddMacro(char *tzSym)
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Prepare for pass #1
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Set whether to export all relocable symbols by default
|
||||
*/
|
||||
void sym_SetExportAll(BBOOL set) {
|
||||
exportall = set;
|
||||
}
|
||||
|
||||
/*
|
||||
* Prepare for pass #1
|
||||
*/
|
||||
void
|
||||
sym_PrepPass1(void)
|
||||
{
|
||||
sym_Init();
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Prepare for pass #2
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
/*
|
||||
* Prepare for pass #2
|
||||
*/
|
||||
void
|
||||
sym_PrepPass2(void)
|
||||
{
|
||||
SLONG i;
|
||||
@@ -842,24 +798,25 @@ sym_PrepPass2(void)
|
||||
|
||||
sym_AddString("__TIME__", SavedTIME);
|
||||
sym_AddString("__DATE__", SavedDATE);
|
||||
sym_AddString("__ISO_8601_LOCAL__", SavedTIMESTAMP_ISO8601_LOCAL);
|
||||
sym_AddString("__ISO_8601_UTC__", SavedTIMESTAMP_ISO8601_UTC);
|
||||
sym_AddSet("_RS", 0);
|
||||
|
||||
sym_AddEqu("_NARG", 0);
|
||||
p_NARGSymbol = findsymbol("_NARG", NULL);
|
||||
p_NARGSymbol->Callback = Callback_NARG;
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* Initialise the symboltable
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
math_DefinePI();
|
||||
}
|
||||
|
||||
/*
|
||||
* Initialize the symboltable
|
||||
*/
|
||||
void
|
||||
sym_Init(void)
|
||||
{
|
||||
SLONG i;
|
||||
time_t tod;
|
||||
time_t now;
|
||||
|
||||
for (i = 0; i < MAXMACROARGS; i += 1) {
|
||||
currentmacroargs[i] = NULL;
|
||||
@@ -877,86 +834,34 @@ sym_Init(void)
|
||||
|
||||
sym_AddSet("_RS", 0);
|
||||
|
||||
if (time(&tod) != -1) {
|
||||
struct tm *tptr;
|
||||
if (time(&now) != -1) {
|
||||
struct tm *time_local = localtime(&now);
|
||||
|
||||
tptr = localtime(&tod);
|
||||
strftime(SavedTIME, sizeof(SavedTIME), "%H:%M:%S", tptr);
|
||||
strftime(SavedDATE, sizeof(SavedDATE), "%d %B %Y", tptr);
|
||||
sym_AddString("__TIME__", SavedTIME);
|
||||
sym_AddString("__DATE__", SavedDATE);
|
||||
strftime(SavedTIME, sizeof(SavedTIME), "\"%H:%M:%S\"", time_local);
|
||||
strftime(SavedDATE, sizeof(SavedDATE), "\"%d %B %Y\"", time_local);
|
||||
strftime(SavedTIMESTAMP_ISO8601_LOCAL,
|
||||
sizeof(SavedTIMESTAMP_ISO8601_LOCAL), "\"%FT%T%z\"", time_local);
|
||||
|
||||
struct tm *time_utc = gmtime(&now);
|
||||
strftime(SavedTIMESTAMP_ISO8601_UTC,
|
||||
sizeof(SavedTIMESTAMP_ISO8601_UTC), "\"%FT%TZ\"", time_utc);
|
||||
} else {
|
||||
warnx("Couldn't determine current time.");
|
||||
/* The '?' have to be escaped or they will be treated as
|
||||
* trigraphs... */
|
||||
strcpy(SavedTIME, "\"\?\?:\?\?:\?\?\"");
|
||||
strcpy(SavedDATE, "\"\?\? \?\?\? \?\?\?\?\"");
|
||||
strcpy(SavedTIMESTAMP_ISO8601_LOCAL, "\"\?\?\?\?-\?\?-\?\?T\?\?:\?\?:\?\?+\?\?\?\?\"");
|
||||
strcpy(SavedTIMESTAMP_ISO8601_UTC, "\"\?\?\?\?-\?\?-\?\?T\?\?:\?\?:\?\?Z\"");
|
||||
}
|
||||
|
||||
sym_AddString("__TIME__", SavedTIME);
|
||||
sym_AddString("__DATE__", SavedDATE);
|
||||
sym_AddString("__ISO_8601_LOCAL__", SavedTIMESTAMP_ISO8601_LOCAL);
|
||||
sym_AddString("__ISO_8601_UTC__", SavedTIMESTAMP_ISO8601_UTC);
|
||||
|
||||
pScope = NULL;
|
||||
|
||||
math_DefinePI();
|
||||
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* DEBUG: Print the symbol table
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
sym_PrintSymbolTable(void)
|
||||
{
|
||||
ULONG i;
|
||||
|
||||
for (i = 0; i < HASHSIZE; i += 1) {
|
||||
struct sSymbol *sym = tHashedSymbols[i];
|
||||
|
||||
if (sym != NULL)
|
||||
printf("\nHashTable #%ld:\n", i);
|
||||
|
||||
while (sym != NULL) {
|
||||
if (sym->nType & SYMF_LOCAL)
|
||||
printf("LOCAL : '%s%s' - %08lX\n",
|
||||
sym->pScope->tzName, sym->tzName,
|
||||
getvaluefield(sym));
|
||||
else if (sym->nType & (SYMF_MACRO | SYMF_STRING)) {
|
||||
ULONG i = 0;
|
||||
|
||||
printf("MACRO : '%s'\n\"", sym->tzName);
|
||||
while (i < sym->ulMacroSize) {
|
||||
if (sym->pMacro[i] == '\n') {
|
||||
printf("\n");
|
||||
i += 1;
|
||||
} else
|
||||
printf("%c", sym->pMacro[i++]);
|
||||
}
|
||||
printf("\"\n");
|
||||
} else if (sym->nType & SYMF_EXPORT)
|
||||
printf("EXPORT: '%s' - %08lX\n", sym->tzName,
|
||||
getvaluefield(sym));
|
||||
else if (sym->nType & SYMF_IMPORT)
|
||||
printf("IMPORT: '%s'\n", sym->tzName);
|
||||
else if (sym->nType & SYMF_EQU)
|
||||
printf("EQU : '%s' - %08lX\n", sym->tzName,
|
||||
getvaluefield(sym));
|
||||
else if (sym->nType & SYMF_SET)
|
||||
printf("SET : '%s' - %08lX\n", sym->tzName,
|
||||
getvaluefield(sym));
|
||||
else
|
||||
printf("SYMBOL: '%s' - %08lX\n", sym->tzName,
|
||||
getvaluefield(sym));
|
||||
|
||||
sym = sym->pNext;
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* RGBAsm - SYMBOL.C - Symboltable stuff
|
||||
*
|
||||
* DEBUG: Dump the macroargs
|
||||
*
|
||||
*/
|
||||
|
||||
void
|
||||
sym_DumpMacroArgs(void)
|
||||
{
|
||||
ULONG i;
|
||||
|
||||
for (i = 0; i < MAXMACROARGS; i += 1)
|
||||
printf("CurrentArg%ld: %s\n", i + 1, currentmacroargs[i]);
|
||||
}
|
||||
|
||||
@@ -1,454 +0,0 @@
|
||||
%{
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <ctype.h>
|
||||
#include <errno.h>
|
||||
#include <stdbool.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <strings.h>
|
||||
|
||||
#include "asm/symbol.h"
|
||||
#include "asm/asm.h"
|
||||
#include "asm/charmap.h"
|
||||
#include "asm/output.h"
|
||||
#include "asm/mylink.h"
|
||||
#include "asm/fstack.h"
|
||||
#include "asm/mymath.h"
|
||||
#include "asm/rpn.h"
|
||||
#include "asm/main.h"
|
||||
#include "asm/lexer.h"
|
||||
|
||||
extern bool haltnop;
|
||||
|
||||
char *tzNewMacro;
|
||||
ULONG ulNewMacroSize;
|
||||
|
||||
size_t symvaluetostring(char *dest, size_t maxLength, char *sym)
|
||||
{
|
||||
size_t length;
|
||||
|
||||
if (sym_isString(sym)) {
|
||||
char *src = sym_GetStringValue(sym);
|
||||
size_t i;
|
||||
|
||||
for (i = 0; src[i] != 0; i++) {
|
||||
if (i >= maxLength) {
|
||||
fatalerror("Symbol value too long to fit buffer");
|
||||
}
|
||||
dest[i] = src[i];
|
||||
}
|
||||
|
||||
length = i;
|
||||
} else {
|
||||
ULONG value = sym_GetConstantValue(sym);
|
||||
int fullLength = snprintf(dest, maxLength + 1, "$%lX", value);
|
||||
|
||||
if (fullLength < 0) {
|
||||
fatalerror("snprintf encoding error");
|
||||
} else {
|
||||
length = (size_t)fullLength;
|
||||
|
||||
if (length > maxLength) {
|
||||
fatalerror("Symbol value too long to fit buffer");
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return length;
|
||||
}
|
||||
|
||||
ULONG str2int( char *s )
|
||||
{
|
||||
ULONG r=0;
|
||||
while( *s )
|
||||
{
|
||||
r<<=8;
|
||||
r|=(UBYTE)(*s++);
|
||||
}
|
||||
return( r );
|
||||
}
|
||||
|
||||
ULONG str2int2( char *s, int length )
|
||||
{
|
||||
int i;
|
||||
ULONG r=0;
|
||||
i = (length - 4 < 0 ? 0 : length - 4);
|
||||
while(i < length)
|
||||
{
|
||||
r<<=8;
|
||||
r|=(UBYTE)(s[i]);
|
||||
i++;
|
||||
|
||||
}
|
||||
return( r );
|
||||
}
|
||||
|
||||
ULONG isWhiteSpace( char s )
|
||||
{
|
||||
return( s==' ' || s=='\t' || s=='\0' || s=='\n' );
|
||||
}
|
||||
|
||||
ULONG isRept( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"REPT",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[4]) );
|
||||
}
|
||||
|
||||
ULONG isEndr( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"Endr",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[4]) );
|
||||
}
|
||||
|
||||
void copyrept( void )
|
||||
{
|
||||
SLONG level=1, len, instring=0;
|
||||
char *src=pCurrentBuffer->pBuffer;
|
||||
|
||||
while( *src && level )
|
||||
{
|
||||
if( instring==0 )
|
||||
{
|
||||
if( isRept(src) )
|
||||
{
|
||||
level+=1;
|
||||
src+=4;
|
||||
}
|
||||
else if( isEndr(src) )
|
||||
{
|
||||
level-=1;
|
||||
src+=4;
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\"' )
|
||||
instring=1;
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\\' )
|
||||
{
|
||||
src+=2;
|
||||
}
|
||||
else if( *src=='\"' )
|
||||
{
|
||||
src+=1;
|
||||
instring=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
len=src-pCurrentBuffer->pBuffer-4;
|
||||
|
||||
src=pCurrentBuffer->pBuffer;
|
||||
ulNewMacroSize=len;
|
||||
|
||||
if ((tzNewMacro = malloc(ulNewMacroSize + 1)) != NULL) {
|
||||
ULONG i;
|
||||
|
||||
tzNewMacro[ulNewMacroSize]=0;
|
||||
for( i=0; i<ulNewMacroSize; i+=1 )
|
||||
{
|
||||
if( (tzNewMacro[i]=src[i])=='\n' )
|
||||
nLineNo+=1;
|
||||
}
|
||||
} else
|
||||
fatalerror( "No mem for REPT block" );
|
||||
|
||||
yyskipbytes( ulNewMacroSize+4 );
|
||||
|
||||
}
|
||||
|
||||
ULONG isMacro( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"MACRO",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[5]) );
|
||||
}
|
||||
|
||||
ULONG isEndm( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"Endm",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[4]) );
|
||||
}
|
||||
|
||||
void copymacro( void )
|
||||
{
|
||||
SLONG level=1, len, instring=0;
|
||||
char *src=pCurrentBuffer->pBuffer;
|
||||
|
||||
while( *src && level )
|
||||
{
|
||||
if( instring==0 )
|
||||
{
|
||||
if( isMacro(src) )
|
||||
{
|
||||
level+=1;
|
||||
src+=4;
|
||||
}
|
||||
else if( isEndm(src) )
|
||||
{
|
||||
level-=1;
|
||||
src+=4;
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\"' )
|
||||
instring=1;
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\\' )
|
||||
{
|
||||
src+=2;
|
||||
}
|
||||
else if( *src=='\"' )
|
||||
{
|
||||
src+=1;
|
||||
instring=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
len=src-pCurrentBuffer->pBuffer-4;
|
||||
|
||||
src=pCurrentBuffer->pBuffer;
|
||||
ulNewMacroSize=len;
|
||||
|
||||
if( (tzNewMacro=(char *)malloc(ulNewMacroSize+2))!=NULL )
|
||||
{
|
||||
ULONG i;
|
||||
|
||||
tzNewMacro[ulNewMacroSize]='\n';
|
||||
tzNewMacro[ulNewMacroSize+1]=0;
|
||||
for( i=0; i<ulNewMacroSize; i+=1 )
|
||||
{
|
||||
if( (tzNewMacro[i]=src[i])=='\n' )
|
||||
nLineNo+=1;
|
||||
}
|
||||
}
|
||||
else
|
||||
fatalerror( "No mem for MACRO definition" );
|
||||
|
||||
yyskipbytes( ulNewMacroSize+4 );
|
||||
}
|
||||
|
||||
ULONG isIf( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"If",2)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[2]) );
|
||||
}
|
||||
|
||||
ULONG isElse( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"Else",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[4]) );
|
||||
}
|
||||
|
||||
ULONG isEndc( char *s )
|
||||
{
|
||||
return( (strncasecmp(s,"Endc",4)==0) && isWhiteSpace(*(s-1)) && isWhiteSpace(s[4]) );
|
||||
}
|
||||
|
||||
void if_skip_to_else( void )
|
||||
{
|
||||
SLONG level=1, len, instring=0;
|
||||
char *src=pCurrentBuffer->pBuffer;
|
||||
|
||||
while( *src && level )
|
||||
{
|
||||
if( *src=='\n' )
|
||||
nLineNo+=1;
|
||||
|
||||
if( instring==0 )
|
||||
{
|
||||
if( isIf(src) )
|
||||
{
|
||||
level+=1;
|
||||
src+=2;
|
||||
}
|
||||
else if( level==1 && isElse(src) )
|
||||
{
|
||||
level-=1;
|
||||
src+=4;
|
||||
}
|
||||
else if( isEndc(src) )
|
||||
{
|
||||
level-=1;
|
||||
if( level!=0 )
|
||||
src+=4;
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\"' )
|
||||
instring=1;
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\\' )
|
||||
{
|
||||
src+=2;
|
||||
}
|
||||
else if( *src=='\"' )
|
||||
{
|
||||
src+=1;
|
||||
instring=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
len=src-pCurrentBuffer->pBuffer;
|
||||
|
||||
yyskipbytes( len );
|
||||
yyunput( '\n' );
|
||||
nLineNo-=1;
|
||||
}
|
||||
|
||||
void if_skip_to_endc( void )
|
||||
{
|
||||
SLONG level=1, len, instring=0;
|
||||
char *src=pCurrentBuffer->pBuffer;
|
||||
|
||||
while( *src && level )
|
||||
{
|
||||
if( *src=='\n' )
|
||||
nLineNo+=1;
|
||||
|
||||
if( instring==0 )
|
||||
{
|
||||
if( isIf(src) )
|
||||
{
|
||||
level+=1;
|
||||
src+=2;
|
||||
}
|
||||
else if( isEndc(src) )
|
||||
{
|
||||
level-=1;
|
||||
if( level!=0 )
|
||||
src+=4;
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\"' )
|
||||
instring=1;
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if( *src=='\\' )
|
||||
{
|
||||
src+=2;
|
||||
}
|
||||
else if( *src=='\"' )
|
||||
{
|
||||
src+=1;
|
||||
instring=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
src+=1;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
len=src-pCurrentBuffer->pBuffer;
|
||||
|
||||
yyskipbytes( len );
|
||||
yyunput( '\n' );
|
||||
nLineNo-=1;
|
||||
}
|
||||
|
||||
%}
|
||||
|
||||
%union
|
||||
{
|
||||
char tzSym[MAXSYMLEN + 1];
|
||||
char tzString[MAXSTRLEN + 1];
|
||||
struct Expression sVal;
|
||||
SLONG nConstValue;
|
||||
}
|
||||
|
||||
%type <sVal> relocconst
|
||||
%type <nConstValue> const
|
||||
%type <nConstValue> const_3bit
|
||||
%type <sVal> const_8bit
|
||||
%type <sVal> const_16bit
|
||||
%type <sVal> const_PCrel
|
||||
%type <nConstValue> sectiontype
|
||||
|
||||
%type <tzString> string
|
||||
|
||||
%token <nConstValue> T_NUMBER
|
||||
%token <tzString> T_STRING
|
||||
|
||||
%left T_OP_LOGICNOT
|
||||
%left T_OP_LOGICOR T_OP_LOGICAND T_OP_LOGICEQU
|
||||
%left T_OP_LOGICGT T_OP_LOGICLT T_OP_LOGICGE T_OP_LOGICLE T_OP_LOGICNE
|
||||
%left T_OP_ADD T_OP_SUB
|
||||
%left T_OP_OR T_OP_XOR T_OP_AND
|
||||
%left T_OP_SHL T_OP_SHR
|
||||
%left T_OP_MUL T_OP_DIV T_OP_MOD
|
||||
%left T_OP_NOT
|
||||
%left T_OP_DEF
|
||||
%left T_OP_BANK
|
||||
%left T_OP_SIN
|
||||
%left T_OP_COS
|
||||
%left T_OP_TAN
|
||||
%left T_OP_ASIN
|
||||
%left T_OP_ACOS
|
||||
%left T_OP_ATAN
|
||||
%left T_OP_ATAN2
|
||||
%left T_OP_FDIV
|
||||
%left T_OP_FMUL
|
||||
|
||||
%left T_OP_STRCMP
|
||||
%left T_OP_STRIN
|
||||
%left T_OP_STRSUB
|
||||
%left T_OP_STRLEN
|
||||
%left T_OP_STRCAT
|
||||
%left T_OP_STRUPR
|
||||
%left T_OP_STRLWR
|
||||
|
||||
%left NEG /* negation--unary minus */
|
||||
|
||||
%token <tzSym> T_LABEL
|
||||
%token <tzSym> T_ID
|
||||
%token <tzSym> T_POP_EQU
|
||||
%token <tzSym> T_POP_SET
|
||||
%token <tzSym> T_POP_EQUS
|
||||
|
||||
%token T_POP_INCLUDE T_POP_PRINTF T_POP_PRINTT T_POP_PRINTV T_POP_IF T_POP_ELSE T_POP_ENDC
|
||||
%token T_POP_IMPORT T_POP_EXPORT T_POP_GLOBAL
|
||||
%token T_POP_DB T_POP_DS T_POP_DW T_POP_DL
|
||||
%token T_POP_SECTION
|
||||
%token T_POP_RB
|
||||
%token T_POP_RW
|
||||
%token T_POP_RL
|
||||
%token T_POP_MACRO
|
||||
%token T_POP_ENDM
|
||||
%token T_POP_RSRESET T_POP_RSSET
|
||||
%token T_POP_INCBIN T_POP_REPT
|
||||
%token T_POP_CHARMAP
|
||||
%token T_POP_SHIFT
|
||||
%token T_POP_ENDR
|
||||
%token T_POP_FAIL
|
||||
%token T_POP_WARN
|
||||
%token T_POP_PURGE
|
||||
%token T_POP_POPS
|
||||
%token T_POP_PUSHS
|
||||
%token T_POP_POPO
|
||||
%token T_POP_PUSHO
|
||||
%token T_POP_OPT
|
||||
@@ -1,552 +0,0 @@
|
||||
%start asmfile
|
||||
|
||||
%%
|
||||
|
||||
asmfile : lines lastline
|
||||
;
|
||||
|
||||
lastline : /* empty */
|
||||
| line
|
||||
{ nLineNo+=1; nTotalLines+=1; }
|
||||
;
|
||||
|
||||
lines : /* empty */
|
||||
| lines line '\n'
|
||||
{ nLineNo+=1; nTotalLines+=1; }
|
||||
;
|
||||
|
||||
line : /* empty */
|
||||
| label
|
||||
| label cpu_command
|
||||
| label macro
|
||||
| label simple_pseudoop
|
||||
| pseudoop
|
||||
;
|
||||
|
||||
label : /* empty */
|
||||
| T_LABEL { if( $1[0]=='.' )
|
||||
sym_AddLocalReloc($1);
|
||||
else
|
||||
sym_AddReloc($1);
|
||||
}
|
||||
| T_LABEL ':' { if( $1[0]=='.' )
|
||||
sym_AddLocalReloc($1);
|
||||
else
|
||||
sym_AddReloc($1);
|
||||
}
|
||||
| T_LABEL ':' ':' { sym_AddReloc($1); sym_Export($1); }
|
||||
;
|
||||
|
||||
macro : T_ID
|
||||
{
|
||||
yy_set_state( LEX_STATE_MACROARGS );
|
||||
}
|
||||
macroargs
|
||||
{
|
||||
yy_set_state( LEX_STATE_NORMAL );
|
||||
|
||||
if( !fstk_RunMacro($1) )
|
||||
{
|
||||
yyerror("Macro '%s' not defined", $1);
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
macroargs : /* empty */
|
||||
| macroarg
|
||||
| macroarg ',' macroargs
|
||||
;
|
||||
|
||||
macroarg : T_STRING
|
||||
{ sym_AddNewMacroArg( $1 ); }
|
||||
;
|
||||
|
||||
pseudoop : equ
|
||||
| set
|
||||
| rb
|
||||
| rw
|
||||
| rl
|
||||
| equs
|
||||
| macrodef
|
||||
;
|
||||
|
||||
simple_pseudoop : include
|
||||
| printf
|
||||
| printt
|
||||
| printv
|
||||
| if
|
||||
| else
|
||||
| endc
|
||||
| import
|
||||
| export
|
||||
| global
|
||||
| db
|
||||
| dw
|
||||
| dl
|
||||
| ds
|
||||
| section
|
||||
| rsreset
|
||||
| rsset
|
||||
| incbin
|
||||
| charmap
|
||||
| rept
|
||||
| shift
|
||||
| fail
|
||||
| warn
|
||||
| purge
|
||||
| pops
|
||||
| pushs
|
||||
| popo
|
||||
| pusho
|
||||
| opt
|
||||
;
|
||||
|
||||
opt : T_POP_OPT
|
||||
{
|
||||
yy_set_state( LEX_STATE_MACROARGS );
|
||||
}
|
||||
opt_list
|
||||
{
|
||||
yy_set_state( LEX_STATE_NORMAL );
|
||||
}
|
||||
;
|
||||
|
||||
opt_list : opt_list_entry
|
||||
| opt_list_entry ',' opt_list
|
||||
;
|
||||
|
||||
opt_list_entry : T_STRING
|
||||
{
|
||||
opt_Parse($1);
|
||||
}
|
||||
;
|
||||
|
||||
popo : T_POP_POPO
|
||||
{ opt_Pop(); }
|
||||
;
|
||||
|
||||
pusho : T_POP_PUSHO
|
||||
{ opt_Push(); }
|
||||
;
|
||||
|
||||
pops : T_POP_POPS
|
||||
{ out_PopSection(); }
|
||||
;
|
||||
|
||||
pushs : T_POP_PUSHS
|
||||
{ out_PushSection(); }
|
||||
;
|
||||
|
||||
fail : T_POP_FAIL string
|
||||
{ fatalerror("%s", $2); }
|
||||
;
|
||||
|
||||
warn : T_POP_WARN string
|
||||
{ yyerror("%s", $2); }
|
||||
;
|
||||
|
||||
shift : T_POP_SHIFT
|
||||
{ sym_ShiftCurrentMacroArgs(); }
|
||||
;
|
||||
|
||||
rept : T_POP_REPT const
|
||||
{
|
||||
copyrept();
|
||||
fstk_RunRept( $2 );
|
||||
}
|
||||
;
|
||||
|
||||
macrodef : T_LABEL ':' T_POP_MACRO
|
||||
{
|
||||
copymacro();
|
||||
sym_AddMacro($1);
|
||||
}
|
||||
;
|
||||
|
||||
equs : T_LABEL T_POP_EQUS string
|
||||
{ sym_AddString( $1, $3 ); }
|
||||
;
|
||||
|
||||
rsset : T_POP_RSSET const
|
||||
{ sym_AddSet( "_RS", $2 ); }
|
||||
;
|
||||
|
||||
rsreset : T_POP_RSRESET
|
||||
{ sym_AddSet( "_RS", 0 ); }
|
||||
;
|
||||
|
||||
rl : T_LABEL T_POP_RL const
|
||||
{
|
||||
sym_AddEqu( $1, sym_GetConstantValue("_RS") );
|
||||
sym_AddSet( "_RS", sym_GetConstantValue("_RS")+4*$3 );
|
||||
}
|
||||
;
|
||||
|
||||
rw : T_LABEL T_POP_RW const
|
||||
{
|
||||
sym_AddEqu( $1, sym_GetConstantValue("_RS") );
|
||||
sym_AddSet( "_RS", sym_GetConstantValue("_RS")+2*$3 );
|
||||
}
|
||||
;
|
||||
|
||||
rb : T_LABEL T_POP_RB const
|
||||
{
|
||||
sym_AddEqu( $1, sym_GetConstantValue("_RS") );
|
||||
sym_AddSet( "_RS", sym_GetConstantValue("_RS")+$3 );
|
||||
}
|
||||
;
|
||||
|
||||
ds : T_POP_DS const
|
||||
{ out_Skip( $2 ); }
|
||||
;
|
||||
|
||||
db : T_POP_DB constlist_8bit
|
||||
;
|
||||
|
||||
dw : T_POP_DW constlist_16bit
|
||||
;
|
||||
|
||||
dl : T_POP_DL constlist_32bit
|
||||
;
|
||||
|
||||
purge : T_POP_PURGE
|
||||
{
|
||||
oDontExpandStrings=1;
|
||||
}
|
||||
purge_list
|
||||
{
|
||||
oDontExpandStrings=0;
|
||||
}
|
||||
;
|
||||
|
||||
purge_list : purge_list_entry
|
||||
| purge_list_entry ',' purge_list
|
||||
;
|
||||
|
||||
purge_list_entry : T_ID { sym_Purge($1); }
|
||||
;
|
||||
|
||||
import : T_POP_IMPORT import_list
|
||||
;
|
||||
|
||||
import_list : import_list_entry
|
||||
| import_list_entry ',' import_list
|
||||
;
|
||||
|
||||
import_list_entry : T_ID { sym_Import($1); }
|
||||
;
|
||||
|
||||
export : T_POP_EXPORT export_list
|
||||
;
|
||||
|
||||
export_list : export_list_entry
|
||||
| export_list_entry ',' export_list
|
||||
;
|
||||
|
||||
export_list_entry : T_ID { sym_Export($1); }
|
||||
;
|
||||
|
||||
global : T_POP_GLOBAL global_list
|
||||
;
|
||||
|
||||
global_list : global_list_entry
|
||||
| global_list_entry ',' global_list
|
||||
;
|
||||
|
||||
global_list_entry : T_ID { sym_Global($1); }
|
||||
;
|
||||
|
||||
equ : T_LABEL T_POP_EQU const
|
||||
{ sym_AddEqu( $1, $3 ); }
|
||||
;
|
||||
|
||||
set : T_LABEL T_POP_SET const
|
||||
{ sym_AddSet( $1, $3 ); }
|
||||
;
|
||||
|
||||
include : T_POP_INCLUDE string
|
||||
{
|
||||
fstk_RunInclude($2);
|
||||
}
|
||||
;
|
||||
|
||||
incbin : T_POP_INCBIN string
|
||||
{ out_BinaryFile( $2 ); }
|
||||
| T_POP_INCBIN string ',' const ',' const
|
||||
{
|
||||
out_BinaryFileSlice( $2, $4, $6 );
|
||||
}
|
||||
;
|
||||
|
||||
charmap : T_POP_CHARMAP string ',' string
|
||||
{
|
||||
if(charmap_Add($2, $4[0] & 0xFF) == -1)
|
||||
{
|
||||
fprintf(stderr, "Error parsing charmap. Either you've added too many (%i), or the input character length is too long (%i)' : %s\n", MAXCHARMAPS, CHARMAPLENGTH, strerror(errno));
|
||||
yyerror("Error parsing charmap.");
|
||||
}
|
||||
}
|
||||
| T_POP_CHARMAP string ',' const
|
||||
{
|
||||
if(charmap_Add($2, $4 & 0xFF) == -1)
|
||||
{
|
||||
fprintf(stderr, "Error parsing charmap. Either you've added too many (%i), or the input character length is too long (%i)' : %s\n", MAXCHARMAPS, CHARMAPLENGTH, strerror(errno));
|
||||
yyerror("Error parsing charmap.");
|
||||
}
|
||||
}
|
||||
;
|
||||
|
||||
printt : T_POP_PRINTT string
|
||||
{
|
||||
if( nPass==1 )
|
||||
printf( "%s", $2 );
|
||||
}
|
||||
;
|
||||
|
||||
printv : T_POP_PRINTV const
|
||||
{
|
||||
if( nPass==1 )
|
||||
printf( "$%lX", $2 );
|
||||
}
|
||||
;
|
||||
|
||||
printf : T_POP_PRINTF const
|
||||
{
|
||||
if( nPass==1 )
|
||||
math_Print( $2 );
|
||||
}
|
||||
;
|
||||
|
||||
if : T_POP_IF const
|
||||
{
|
||||
nIFDepth+=1;
|
||||
if( !$2 )
|
||||
{
|
||||
if_skip_to_else(); /* will continue parsing just after ELSE or just at ENDC keyword */
|
||||
}
|
||||
}
|
||||
|
||||
else : T_POP_ELSE
|
||||
{
|
||||
if_skip_to_endc(); /* will continue parsing just at ENDC keyword */
|
||||
}
|
||||
;
|
||||
|
||||
endc : T_POP_ENDC
|
||||
{
|
||||
nIFDepth-=1;
|
||||
}
|
||||
;
|
||||
|
||||
const_3bit : const
|
||||
{
|
||||
if( ($1<0) || ($1>7) )
|
||||
{
|
||||
yyerror("Immediate value must be 3-bit");
|
||||
}
|
||||
else
|
||||
$$=$1&0x7;
|
||||
}
|
||||
;
|
||||
|
||||
constlist_8bit : constlist_8bit_entry
|
||||
| constlist_8bit_entry ',' constlist_8bit
|
||||
;
|
||||
|
||||
constlist_8bit_entry : { out_Skip( 1 ); }
|
||||
| const_8bit { out_RelByte( &$1 ); }
|
||||
| string { char *s; int length; s = $1; length = charmap_Convert(&s); out_AbsByteGroup(s, length); free(s); }
|
||||
;
|
||||
|
||||
constlist_16bit : constlist_16bit_entry
|
||||
| constlist_16bit_entry ',' constlist_16bit
|
||||
;
|
||||
|
||||
constlist_16bit_entry : { out_Skip( 2 ); }
|
||||
| const_16bit { out_RelWord( &$1 ); }
|
||||
;
|
||||
|
||||
|
||||
constlist_32bit : constlist_32bit_entry
|
||||
| constlist_32bit_entry ',' constlist_32bit
|
||||
;
|
||||
|
||||
constlist_32bit_entry : { out_Skip( 4 ); }
|
||||
| relocconst { out_RelLong( &$1 ); }
|
||||
;
|
||||
|
||||
|
||||
const_PCrel : relocconst
|
||||
{
|
||||
$$ = $1;
|
||||
if( !rpn_isPCRelative(&$1) )
|
||||
yyerror("Expression must be PC-relative");
|
||||
}
|
||||
;
|
||||
|
||||
const_8bit : relocconst
|
||||
{
|
||||
if( (!rpn_isReloc(&$1)) && (($1.nVal<-128) || ($1.nVal>255)) )
|
||||
{
|
||||
yyerror("Expression must be 8-bit");
|
||||
}
|
||||
$$=$1;
|
||||
}
|
||||
;
|
||||
|
||||
const_16bit : relocconst
|
||||
{
|
||||
if( (!rpn_isReloc(&$1)) && (($1.nVal<-32768) || ($1.nVal>65535)) )
|
||||
{
|
||||
yyerror("Expression must be 16-bit");
|
||||
}
|
||||
$$=$1;
|
||||
}
|
||||
;
|
||||
|
||||
|
||||
relocconst : T_ID
|
||||
{ rpn_Symbol(&$$,$1); $$.nVal = sym_GetValue($1); }
|
||||
| T_NUMBER
|
||||
{ rpn_Number(&$$,$1); $$.nVal = $1; }
|
||||
| string
|
||||
{ char *s; int length; ULONG r; s = $1; length = charmap_Convert(&s); r = str2int2(s, length); free(s); rpn_Number(&$$,r); $$.nVal=r; }
|
||||
| T_OP_LOGICNOT relocconst %prec NEG
|
||||
{ rpn_LOGNOT(&$$,&$2); }
|
||||
| relocconst T_OP_LOGICOR relocconst
|
||||
{ rpn_LOGOR(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICAND relocconst
|
||||
{ rpn_LOGAND(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICEQU relocconst
|
||||
{ rpn_LOGEQU(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICGT relocconst
|
||||
{ rpn_LOGGT(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICLT relocconst
|
||||
{ rpn_LOGLT(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICGE relocconst
|
||||
{ rpn_LOGGE(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICLE relocconst
|
||||
{ rpn_LOGLE(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_LOGICNE relocconst
|
||||
{ rpn_LOGNE(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_ADD relocconst
|
||||
{ rpn_ADD(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_SUB relocconst
|
||||
{ rpn_SUB(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_XOR relocconst
|
||||
{ rpn_XOR(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_OR relocconst
|
||||
{ rpn_OR(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_AND relocconst
|
||||
{ rpn_AND(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_SHL relocconst
|
||||
{ rpn_SHL(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_SHR relocconst
|
||||
{ rpn_SHR(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_MUL relocconst
|
||||
{ rpn_MUL(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_DIV relocconst
|
||||
{ rpn_DIV(&$$,&$1,&$3); }
|
||||
| relocconst T_OP_MOD relocconst
|
||||
{ rpn_MOD(&$$,&$1,&$3); }
|
||||
| T_OP_ADD relocconst %prec NEG
|
||||
{ $$ = $2; }
|
||||
| T_OP_SUB relocconst %prec NEG
|
||||
{ rpn_UNNEG(&$$,&$2); }
|
||||
| T_OP_NOT relocconst %prec NEG
|
||||
{ rpn_UNNOT(&$$,&$2); }
|
||||
| T_OP_BANK '(' T_ID ')'
|
||||
{ rpn_Bank(&$$,$3); $$.nVal = 0; }
|
||||
| T_OP_DEF '(' T_ID ')'
|
||||
{ rpn_Number(&$$,sym_isConstDefined($3)); }
|
||||
| T_OP_FDIV '(' const ',' const ')' { rpn_Number(&$$,math_Div($3,$5)); }
|
||||
| T_OP_FMUL '(' const ',' const ')' { rpn_Number(&$$,math_Mul($3,$5)); }
|
||||
| T_OP_SIN '(' const ')' { rpn_Number(&$$,math_Sin($3)); }
|
||||
| T_OP_COS '(' const ')' { rpn_Number(&$$,math_Cos($3)); }
|
||||
| T_OP_TAN '(' const ')' { rpn_Number(&$$,math_Tan($3)); }
|
||||
| T_OP_ASIN '(' const ')' { rpn_Number(&$$,math_ASin($3)); }
|
||||
| T_OP_ACOS '(' const ')' { rpn_Number(&$$,math_ACos($3)); }
|
||||
| T_OP_ATAN '(' const ')' { rpn_Number(&$$,math_ATan($3)); }
|
||||
| T_OP_ATAN2 '(' const ',' const ')' { rpn_Number(&$$,math_ATan2($3,$5)); }
|
||||
| T_OP_STRCMP '(' string ',' string ')' { rpn_Number(&$$,strcmp($3,$5)); }
|
||||
| T_OP_STRIN '(' string ',' string ')'
|
||||
{
|
||||
char *p;
|
||||
if( (p=strstr($3,$5))!=NULL )
|
||||
{
|
||||
rpn_Number(&$$,p-$3+1);
|
||||
}
|
||||
else
|
||||
{
|
||||
rpn_Number(&$$,0);
|
||||
}
|
||||
}
|
||||
| T_OP_STRLEN '(' string ')' { rpn_Number(&$$,strlen($3)); }
|
||||
| '(' relocconst ')'
|
||||
{ $$ = $2; }
|
||||
;
|
||||
|
||||
const : T_ID { $$ = sym_GetConstantValue($1); }
|
||||
| T_NUMBER { $$ = $1; }
|
||||
| string { $$ = str2int($1); }
|
||||
| T_OP_LOGICNOT const %prec NEG { $$ = !$2; }
|
||||
| const T_OP_LOGICOR const { $$ = $1 || $3; }
|
||||
| const T_OP_LOGICAND const { $$ = $1 && $3; }
|
||||
| const T_OP_LOGICEQU const { $$ = $1 == $3; }
|
||||
| const T_OP_LOGICGT const { $$ = $1 > $3; }
|
||||
| const T_OP_LOGICLT const { $$ = $1 < $3; }
|
||||
| const T_OP_LOGICGE const { $$ = $1 >= $3; }
|
||||
| const T_OP_LOGICLE const { $$ = $1 <= $3; }
|
||||
| const T_OP_LOGICNE const { $$ = $1 != $3; }
|
||||
| const T_OP_ADD const { $$ = $1 + $3; }
|
||||
| const T_OP_SUB const { $$ = $1 - $3; }
|
||||
| T_ID T_OP_SUB T_ID { $$ = sym_GetDefinedValue($1) - sym_GetDefinedValue($3); }
|
||||
| const T_OP_XOR const { $$ = $1 ^ $3; }
|
||||
| const T_OP_OR const { $$ = $1 | $3; }
|
||||
| const T_OP_AND const { $$ = $1 & $3; }
|
||||
| const T_OP_SHL const { $$ = $1 << $3; }
|
||||
| const T_OP_SHR const { $$ = $1 >> $3; }
|
||||
| const T_OP_MUL const { $$ = $1 * $3; }
|
||||
| const T_OP_DIV const { $$ = $1 / $3; }
|
||||
| const T_OP_MOD const { $$ = $1 % $3; }
|
||||
| T_OP_ADD const %prec NEG { $$ = +$2; }
|
||||
| T_OP_SUB const %prec NEG { $$ = -$2; }
|
||||
| T_OP_NOT const %prec NEG { $$ = 0xFFFFFFFF^$2; }
|
||||
| T_OP_FDIV '(' const ',' const ')' { $$ = math_Div($3,$5); }
|
||||
| T_OP_FMUL '(' const ',' const ')' { $$ = math_Mul($3,$5); }
|
||||
| T_OP_SIN '(' const ')' { $$ = math_Sin($3); }
|
||||
| T_OP_COS '(' const ')' { $$ = math_Cos($3); }
|
||||
| T_OP_TAN '(' const ')' { $$ = math_Tan($3); }
|
||||
| T_OP_ASIN '(' const ')' { $$ = math_ASin($3); }
|
||||
| T_OP_ACOS '(' const ')' { $$ = math_ACos($3); }
|
||||
| T_OP_ATAN '(' const ')' { $$ = math_ATan($3); }
|
||||
| T_OP_ATAN2 '(' const ',' const ')' { $$ = math_ATan2($3,$5); }
|
||||
| T_OP_DEF '(' T_ID ')' { $$ = sym_isConstDefined($3); }
|
||||
| T_OP_STRCMP '(' string ',' string ')' { $$ = strcmp( $3, $5 ); }
|
||||
| T_OP_STRIN '(' string ',' string ')'
|
||||
{
|
||||
char *p;
|
||||
if( (p=strstr($3,$5))!=NULL )
|
||||
{
|
||||
$$ = p-$3+1;
|
||||
}
|
||||
else
|
||||
{
|
||||
$$ = 0;
|
||||
}
|
||||
}
|
||||
| T_OP_STRLEN '(' string ')' { $$ = strlen($3); }
|
||||
| '(' const ')' { $$ = $2; }
|
||||
;
|
||||
|
||||
string : T_STRING
|
||||
{ strcpy($$,$1); }
|
||||
| T_OP_STRSUB '(' string ',' const ',' const ')'
|
||||
{ strncpy($$,$3+$5-1,$7); $$[$7]=0; }
|
||||
| T_OP_STRCAT '(' string ',' string ')'
|
||||
{ strcpy($$,$3); strcat($$,$5); }
|
||||
| T_OP_STRUPR '(' string ')'
|
||||
{ strcpy($$,$3); strupr($$); }
|
||||
| T_OP_STRLWR '(' string ')'
|
||||
{ strcpy($$,$3); strlwr($$); }
|
||||
;
|
||||
38
src/extern/err.c
vendored
38
src/extern/err.c
vendored
@@ -26,36 +26,46 @@
|
||||
#include <stdlib.h>
|
||||
#include "extern/err.h"
|
||||
|
||||
#ifndef __MINGW32__
|
||||
char *__progname;
|
||||
#endif
|
||||
|
||||
void rgbds_vwarn(const char *fmt, va_list ap)
|
||||
{
|
||||
fprintf (stderr, "%s: ", __progname);
|
||||
fprintf (stderr, "warning");
|
||||
if (fmt) {
|
||||
vfprintf(stderr, fmt, ap);
|
||||
fputs (": ", stderr);
|
||||
vfprintf(stderr, fmt, ap);
|
||||
}
|
||||
putc('\n', stderr);
|
||||
perror(0);
|
||||
}
|
||||
|
||||
void rgbds_vwarnx(const char *fmt, va_list ap)
|
||||
{
|
||||
fprintf (stderr, "%s: ", __progname);
|
||||
if (fmt) vfprintf(stderr, fmt, ap);
|
||||
fprintf (stderr, "warning");
|
||||
if (fmt) {
|
||||
fputs (": ", stderr);
|
||||
vfprintf(stderr, fmt, ap);
|
||||
}
|
||||
putc('\n', stderr);
|
||||
}
|
||||
|
||||
_Noreturn void rgbds_verr(int status, const char *fmt, va_list ap)
|
||||
noreturn void rgbds_verr(int status, const char *fmt, va_list ap)
|
||||
{
|
||||
vwarn(fmt, ap);
|
||||
fprintf (stderr, "error");
|
||||
if (fmt) {
|
||||
fputs (": ", stderr);
|
||||
vfprintf(stderr, fmt, ap);
|
||||
}
|
||||
putc('\n', stderr);
|
||||
exit(status);
|
||||
}
|
||||
|
||||
_Noreturn void rgbds_verrx(int status, const char *fmt, va_list ap)
|
||||
noreturn void rgbds_verrx(int status, const char *fmt, va_list ap)
|
||||
{
|
||||
vwarnx(fmt, ap);
|
||||
fprintf (stderr, "error");
|
||||
if (fmt) {
|
||||
fputs (": ", stderr);
|
||||
vfprintf(stderr, fmt, ap);
|
||||
}
|
||||
putc('\n', stderr);
|
||||
exit(status);
|
||||
}
|
||||
|
||||
@@ -75,7 +85,7 @@ void rgbds_warnx(const char *fmt, ...)
|
||||
va_end(ap);
|
||||
}
|
||||
|
||||
_Noreturn void rgbds_err(int status, const char *fmt, ...)
|
||||
noreturn void rgbds_err(int status, const char *fmt, ...)
|
||||
{
|
||||
va_list ap;
|
||||
va_start(ap, fmt);
|
||||
@@ -83,7 +93,7 @@ _Noreturn void rgbds_err(int status, const char *fmt, ...)
|
||||
va_end(ap);
|
||||
}
|
||||
|
||||
_Noreturn void rgbds_errx(int status, const char *fmt, ...)
|
||||
noreturn void rgbds_errx(int status, const char *fmt, ...)
|
||||
{
|
||||
va_list ap;
|
||||
va_start(ap, fmt);
|
||||
|
||||
38
src/extern/reallocarray.c
vendored
Normal file
38
src/extern/reallocarray.c
vendored
Normal file
@@ -0,0 +1,38 @@
|
||||
/* $OpenBSD: reallocarray.c,v 1.2 2014/12/08 03:45:00 bcook Exp $ */
|
||||
/*
|
||||
* Copyright (c) 2008 Otto Moerbeek <otto@drijf.net>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#include <sys/types.h>
|
||||
#include <errno.h>
|
||||
#include <stdint.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
/*
|
||||
* This is sqrt(SIZE_MAX+1), as s1*s2 <= SIZE_MAX
|
||||
* if both s1 < MUL_NO_OVERFLOW and s2 < MUL_NO_OVERFLOW
|
||||
*/
|
||||
#define MUL_NO_OVERFLOW ((size_t)1 << (sizeof(size_t) * 4))
|
||||
|
||||
void *
|
||||
rgbds_reallocarray(void *optr, size_t nmemb, size_t size)
|
||||
{
|
||||
if ((nmemb >= MUL_NO_OVERFLOW || size >= MUL_NO_OVERFLOW) &&
|
||||
nmemb > 0 && SIZE_MAX / nmemb < size) {
|
||||
errno = ENOMEM;
|
||||
return NULL;
|
||||
}
|
||||
return realloc(optr, size * nmemb);
|
||||
}
|
||||
48
src/extern/strlcat.c
vendored
48
src/extern/strlcat.c
vendored
@@ -1,7 +1,7 @@
|
||||
/* $OpenBSD: strlcat.c,v 1.13 2005/08/08 08:05:37 espie Exp $ */
|
||||
/* $OpenBSD: strlcat.c,v 1.14 2015/01/15 03:54:12 millert Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
|
||||
* Copyright (c) 1998, 2015 Todd C. Miller <Todd.Miller@courtesan.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
@@ -20,36 +20,36 @@
|
||||
#include <string.h>
|
||||
|
||||
/*
|
||||
* Appends src to string dst of size siz (unlike strncat, siz is the
|
||||
* full size of dst, not space left). At most siz-1 characters
|
||||
* will be copied. Always NUL terminates (unless siz <= strlen(dst)).
|
||||
* Returns strlen(src) + MIN(siz, strlen(initial dst)).
|
||||
* If retval >= siz, truncation occurred.
|
||||
* Appends src to string dst of size dsize (unlike strncat, dsize is the
|
||||
* full size of dst, not space left). At most dsize-1 characters
|
||||
* will be copied. Always NUL terminates (unless dsize <= strlen(dst)).
|
||||
* Returns strlen(src) + MIN(dsize, strlen(initial dst)).
|
||||
* If retval >= dsize, truncation occurred.
|
||||
*/
|
||||
size_t
|
||||
rgbds_strlcat(char *dst, const char *src, size_t siz)
|
||||
rgbds_strlcat(char *dst, const char *src, size_t dsize)
|
||||
{
|
||||
char *d = dst;
|
||||
const char *s = src;
|
||||
size_t n = siz;
|
||||
const char *odst = dst;
|
||||
const char *osrc = src;
|
||||
size_t n = dsize;
|
||||
size_t dlen;
|
||||
|
||||
/* Find the end of dst and adjust bytes left but don't go past end */
|
||||
while (n-- != 0 && *d != '\0')
|
||||
d++;
|
||||
dlen = d - dst;
|
||||
n = siz - dlen;
|
||||
/* Find the end of dst and adjust bytes left but don't go past end. */
|
||||
while (n-- != 0 && *dst != '\0')
|
||||
dst++;
|
||||
dlen = dst - odst;
|
||||
n = dsize - dlen;
|
||||
|
||||
if (n == 0)
|
||||
return(dlen + strlen(s));
|
||||
while (*s != '\0') {
|
||||
if (n != 1) {
|
||||
*d++ = *s;
|
||||
if (n-- == 0)
|
||||
return(dlen + strlen(src));
|
||||
while (*src != '\0') {
|
||||
if (n != 0) {
|
||||
*dst++ = *src;
|
||||
n--;
|
||||
}
|
||||
s++;
|
||||
src++;
|
||||
}
|
||||
*d = '\0';
|
||||
*dst = '\0';
|
||||
|
||||
return(dlen + (s - src)); /* count does not include NUL */
|
||||
return(dlen + (src - osrc)); /* count does not include NUL */
|
||||
}
|
||||
|
||||
37
src/extern/strlcpy.c
vendored
37
src/extern/strlcpy.c
vendored
@@ -1,7 +1,7 @@
|
||||
/* $OpenBSD: strlcpy.c,v 1.11 2006/05/05 15:27:38 millert Exp $ */
|
||||
/* $OpenBSD: strlcpy.c,v 1.12 2015/01/15 03:54:12 millert Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
|
||||
* Copyright (c) 1998, 2015 Todd C. Miller <Todd.Miller@courtesan.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
@@ -20,32 +20,31 @@
|
||||
#include <string.h>
|
||||
|
||||
/*
|
||||
* Copy src to string dst of size siz. At most siz-1 characters
|
||||
* will be copied. Always NUL terminates (unless siz == 0).
|
||||
* Returns strlen(src); if retval >= siz, truncation occurred.
|
||||
* Copy string src to buffer dst of size dsize. At most dsize-1
|
||||
* chars will be copied. Always NUL terminates (unless dsize == 0).
|
||||
* Returns strlen(src); if retval >= dsize, truncation occurred.
|
||||
*/
|
||||
size_t
|
||||
rgbds_strlcpy(char *dst, const char *src, size_t siz)
|
||||
rgbds_strlcpy(char *dst, const char *src, size_t dsize)
|
||||
{
|
||||
char *d = dst;
|
||||
const char *s = src;
|
||||
size_t n = siz;
|
||||
const char *osrc = src;
|
||||
size_t nleft = dsize;
|
||||
|
||||
/* Copy as many bytes as will fit */
|
||||
if (n != 0) {
|
||||
while (--n != 0) {
|
||||
if ((*d++ = *s++) == '\0')
|
||||
/* Copy as many bytes as will fit. */
|
||||
if (nleft != 0) {
|
||||
while (--nleft != 0) {
|
||||
if ((*dst++ = *src++) == '\0')
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Not enough room in dst, add NUL and traverse rest of src */
|
||||
if (n == 0) {
|
||||
if (siz != 0)
|
||||
*d = '\0'; /* NUL-terminate dst */
|
||||
while (*s++)
|
||||
/* Not enough room in dst, add NUL and traverse rest of src. */
|
||||
if (nleft == 0) {
|
||||
if (dsize != 0)
|
||||
*dst = '\0'; /* NUL-terminate dst */
|
||||
while (*src++)
|
||||
;
|
||||
}
|
||||
|
||||
return(s - src - 1); /* count does not include NUL */
|
||||
return(src - osrc - 1); /* count does not include NUL */
|
||||
}
|
||||
|
||||
@@ -14,7 +14,6 @@
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <stdbool.h>
|
||||
#include <stdint.h>
|
||||
#include <stdio.h>
|
||||
@@ -27,10 +26,10 @@
|
||||
static void
|
||||
usage(void)
|
||||
{
|
||||
printf("usage: rgbfix [-Ccjsv] [-i game_id] [-k licensee_str] "
|
||||
"[-l licensee_id]\n" " [-m mbc_type] [-n rom_version] "
|
||||
"[-p pad_value] [-r ram_size]\n"
|
||||
" [-t title_str] file.gb\n");
|
||||
printf(
|
||||
"usage: rgbfix [-Ccjsv] [-i game_id] [-k licensee_str] [-l licensee_id]\n"
|
||||
" [-m mbc_type] [-n rom_version] [-p pad_value] [-r ram_size]\n"
|
||||
" [-t title_str] file\n");
|
||||
exit(1);
|
||||
}
|
||||
|
||||
@@ -41,17 +40,6 @@ main(int argc, char *argv[])
|
||||
int ch;
|
||||
char *ep;
|
||||
|
||||
/*
|
||||
* Open the ROM file
|
||||
*/
|
||||
|
||||
if (argc < 2)
|
||||
usage();
|
||||
|
||||
if ((rom = fopen(argv[argc - 1], "rb+")) == NULL) {
|
||||
err(1, "Error opening file %s", argv[argc - 1]);
|
||||
}
|
||||
|
||||
/*
|
||||
* Parse command-line options
|
||||
*/
|
||||
@@ -71,15 +59,15 @@ main(int argc, char *argv[])
|
||||
bool resize = false;
|
||||
bool setversion = false;
|
||||
|
||||
char *title = NULL; /* game title in ASCII */
|
||||
char *id = NULL; /* game ID in ASCII */
|
||||
char *newlicensee = NULL; /* new licensee ID, two ASCII characters */
|
||||
char *title; /* game title in ASCII */
|
||||
char *id; /* game ID in ASCII */
|
||||
char *newlicensee; /* new licensee ID, two ASCII characters */
|
||||
|
||||
int licensee = -1; /* old licensee ID */
|
||||
int cartridge = -1; /* cartridge hardware ID */
|
||||
int ramsize = -1; /* RAM size ID */
|
||||
int version = -1; /* mask ROM version number */
|
||||
int padvalue = -1; /* to pad the rom with if it changes size */
|
||||
int licensee; /* old licensee ID */
|
||||
int cartridge; /* cartridge hardware ID */
|
||||
int ramsize; /* RAM size ID */
|
||||
int version; /* mask ROM version number */
|
||||
int padvalue; /* to pad the rom with if it changes size */
|
||||
|
||||
while ((ch = getopt(argc, argv, "Cci:jk:l:m:n:p:sr:t:v")) != -1) {
|
||||
switch (ch) {
|
||||
@@ -198,6 +186,20 @@ main(int argc, char *argv[])
|
||||
}
|
||||
}
|
||||
|
||||
argc -= optind;
|
||||
argv += optind;
|
||||
|
||||
if (argc == 0)
|
||||
usage();
|
||||
|
||||
/*
|
||||
* Open the ROM file
|
||||
*/
|
||||
|
||||
if ((rom = fopen(argv[argc - 1], "rb+")) == NULL) {
|
||||
err(1, "Error opening file %s", argv[argc - 1]);
|
||||
}
|
||||
|
||||
/*
|
||||
* Write changes to ROM
|
||||
*/
|
||||
@@ -351,7 +353,8 @@ main(int argc, char *argv[])
|
||||
*/
|
||||
|
||||
/* We will pad the ROM to match the size given in the header. */
|
||||
int romsize, newsize, headbyte;
|
||||
long romsize, newsize;
|
||||
int headbyte;
|
||||
uint8_t *buf;
|
||||
fseek(rom, 0, SEEK_END);
|
||||
romsize = ftell(rom);
|
||||
|
||||
@@ -1,4 +1,18 @@
|
||||
.Dd $Mdocdate$
|
||||
.\" Copyright © 2010 Anthony J. Bentley <anthony@anjbe.name>
|
||||
.\"
|
||||
.\" Permission to use, copy, modify, and distribute this software for any
|
||||
.\" purpose with or without fee is hereby granted, provided that the above
|
||||
.\" copyright notice and this permission notice appear in all copies.
|
||||
.\"
|
||||
.\" THE SOFTWARE IS PROVIDED “AS IS” AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
.\" WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
.\" MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
.\" ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
.\" WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
.\" ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
.\" OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
.\"
|
||||
.Dd April 16, 2017
|
||||
.Dt RGBFIX 1
|
||||
.Os RGBDS Manual
|
||||
.Sh NAME
|
||||
@@ -41,7 +55,7 @@ flag are set,
|
||||
takes precedence.
|
||||
.It Fl i Ar game_id
|
||||
Set the game ID string
|
||||
.Pq Ad 0x13F No Ns \(en Ns Ad 0x142
|
||||
.Pq Ad 0x13F Ns \(en Ns Ad 0x142
|
||||
to a given string of exactly 4 characters.
|
||||
If both this and the title are set, the game ID will overwrite the
|
||||
overlapping portion of the title.
|
||||
@@ -51,7 +65,7 @@ Set the non-Japanese region flag:
|
||||
= 1.
|
||||
.It Fl k Ar licensee_str
|
||||
Set the new licensee string
|
||||
.Pq Ad 0x144 No Ns \(en Ns Ad 0x145
|
||||
.Pq Ad 0x144 Ns \(en Ns Ad 0x145
|
||||
to a given string, truncated to at most two characters.
|
||||
.It Fl l Ar licensee_id
|
||||
Set the old licensee code,
|
||||
@@ -84,20 +98,23 @@ Set the SGB flag:
|
||||
= 3.
|
||||
.It Fl t Ar title
|
||||
Set the title string
|
||||
.Pq Ad 0x134 No Ns \(en Ns Ad 0x143
|
||||
.Pq Ad 0x134 Ns \(en Ns Ad 0x143
|
||||
to a given string, truncated to at most 16 characters.
|
||||
It is recommended to use 15 characters instead, to avoid clashing with the CGB
|
||||
flag
|
||||
.Pq Fl c No or Fl C .
|
||||
.Po Fl c
|
||||
or
|
||||
.Fl C
|
||||
.Pc .
|
||||
If both this and the game ID are set, the game ID will overwrite the
|
||||
overlapping portion of the title.
|
||||
.It Fl v
|
||||
Validate the header and fix checksums: the Nintendo character area
|
||||
.Pq Ad 0x104 No Ns \(en Ns Ad 0x133 ,
|
||||
.Pq Ad 0x104 Ns \(en Ns Ad 0x133 ,
|
||||
the header checksum
|
||||
.Pq Ad 0x14D ,
|
||||
and the global checksum
|
||||
.Pq Ad 0x14E No Ns \(en Ns Ad 0x14F .
|
||||
.Pq Ad 0x14E Ns \(en Ns Ad 0x14F .
|
||||
.El
|
||||
.Sh EXAMPLES
|
||||
Most values in the ROM header are only cosmetic.
|
||||
@@ -109,7 +126,7 @@ It is a good idea to pad the image to a valid size as well
|
||||
The following will make a plain, no-color Game Boy game without checking for
|
||||
a valid size:
|
||||
.Pp
|
||||
.D1 $ rgbfix \-v foo.gb
|
||||
.D1 $ rgbfix -v foo.gb
|
||||
.Pp
|
||||
The following will make a SGB-enabled, color-enabled game with a title of
|
||||
.Dq foobar ,
|
||||
@@ -119,21 +136,21 @@ The Game Boy itself does not use the title, but some emulators or ROM managers
|
||||
might.
|
||||
.Pc
|
||||
.Pp
|
||||
.D1 $ rgbfix \-vcs \-l 0x33 \-p 0 \-t foobar baz.gb
|
||||
.D1 $ rgbfix -vcs -l 0x33 -p 0 -t foobar baz.gb
|
||||
.Pp
|
||||
The following will duplicate the header
|
||||
.Pq sans global checksum
|
||||
of the game
|
||||
.Dq Survival Kids :
|
||||
.Pp
|
||||
.D1 $ rgbfix \-cjsv \-k A4 \-l 0x33 \-m 0x1B \-p 0xFF \-r 3 \-t SURVIVALKIDAVKE SurvivalKids.gbc
|
||||
.D1 $ rgbfix -cjsv -k A4 -l 0x33 -m 0x1B -p 0xFF -r 3 -t SURVIVALKIDAVKE \
|
||||
SurvivalKids.gbc
|
||||
.Sh SEE ALSO
|
||||
.Xr rgbds 7 ,
|
||||
.Xr rgbasm 1 ,
|
||||
.Xr rgblink 1 ,
|
||||
.Xr gbz80 7
|
||||
.Xr rgbds 7
|
||||
.Sh HISTORY
|
||||
.Nm
|
||||
was originally released by Carsten S\(/orensen as a standalone program called
|
||||
gbfix.
|
||||
It was later integrated with the ASMotor package, which became RGBDS.
|
||||
gbfix, and was later packaged in RGBDS by Justin Lloyd. It is now maintained by
|
||||
a number of contributors at https://github.com/rednex/rgbds.
|
||||
|
||||
1824
src/gbz80.7
Normal file
1824
src/gbz80.7
Normal file
File diff suppressed because it is too large
Load Diff
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user