Hojun-Cho/tinyboy-emulator
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add print

Browse Source
This commit is contained in:
Hojun-Cho 2024-07-25 16:36:22 +09:00 committed by Hojun Choi
parent d82b0a8ccd
commit db41ae86e3
8 changed files with 265 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Makefile
View File

@ -1,4 +1,3 @@
CC=tcc
CFLAGS= -Wall -g -Wextra -g
all: gb

4
cpu.c
View File

@ -1,5 +1,5 @@
#include "gb.h"
#include <stdio.h>
#include "print.h"
#define BC() ((u16)r[rB] << 8 | r[rC])
#define DE() ((u16)r[rD] << 8 | r[rE])
@ -36,7 +36,7 @@ Var cpuvars[] = {ARR(r), VAR(ime), VAR(pc), VAR(curpc), VAR(sp), VAR(halt),
void
state(void)
{
printf("A:%02X F:%02X B:%02X C:%02X D:%02X E:%02X H:%02X L:%02X SP:%04X "
print("A:%02X F:%02X B:%02X C:%02X D:%02X E:%02X H:%02X L:%02X SP:%04X "
"PC:%04X PCMEM:%02X,%02X,%02X,%02X\n",
r[rA],
r[rF],

19
error.c
View File

@ -1,30 +1,29 @@
#include "gb.h"
#include <stdarg.h>
#include <stdio.h>
#include "print.h"
#include <stdlib.h>
#include <string.h>
void
panic(const char* fmt, ...)
panic(char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
fprintf(stderr, "panic:");
vfprintf(stderr, fmt, ap);
fprintf(stderr, "\n");
fprint(2, "panic:");
vfprint(2, fmt, ap);
fprint(2, "\n");
exit(1);
}
void
error(const char* fmt, ...)
error(char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
fprintf(stderr, "panic:");
vfprintf(stderr, fmt, ap);
fprintf(stderr, "\n");
fprint(2, "panic:");
vfprint(2, fmt, ap);
fprint(2, "\n");
}
void*

23
gb.c
View File

@ -1,5 +1,4 @@
#include "gb.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
@ -66,8 +65,9 @@ loadsave(const char *file)
static void
loadrom(const char* file)
{
int rc;
int feat;
FILE* f;
int fd;
long sz;
static u8 mbctab[31] = { 0, 1, 1, 1, -1, 2, 2, -1, 0, 0, -1, 6, 6, 6, -1, 3,
3, 3, 3, 3, -1, 4, 4, 4, -1, 5, 5, 5, 5, 5, 5 };
@ -78,19 +78,18 @@ loadrom(const char* file)
0, 0, FEATRAM, FEATRAM|FEATBAT, 0, FEATRAM, FEATRAM|FEATBAT,
};
f = fopen(file, "r");
if (f == nil)
fd = open(file, O_RDONLY);
if (fd == nil)
panic("can't open %s", file);
fseek(f, 0, SEEK_END);
sz = ftell(f);
if (sz < 0 || sz > 32 * 1024 * 1024)
panic("bad size %d", sz);
fseek(f, 0, SEEK_SET);
sz = lseek(fd, 0, SEEK_END);
if(sz <= 0 || sz > 32*1024*1024)
panic("invalid file size %d", sz);
lseek(fd, 0, SEEK_SET);
nrom = sz;
rom = xalloc(nrom);
if (fread(rom, 1, nrom, f) != nrom)
panic("siz is different %z", nrom);
fclose(f);
if((rc = read(fd, rom, nrom)) != nrom)
panic("rom size is not matched %d\n", rc);
close(fd);
if (rom[0x147] > 0x1F)
panic("bad cartidge type %d\n", rom[0x147]);
mbc = mbctab[rom[0x147]];

4
gb.h
View File

@ -245,8 +245,8 @@ writeback(void);
/* error */
void
error(const char*, ...);
error(char*, ...);
void
panic(const char*, ...);
panic(char*, ...);
void*
xalloc(long);

222
print.c Normal file
View File

@ -0,0 +1,222 @@
#include "print.h"
#include <stdio.h>
#include <errno.h>
#include <string.h>
#include <unistd.h>
#include <assert.h>
enum
{
FlagLong = 1<<0,
FlagLongLong = 1<<1,
FlagUnsigned = 1<<2,
};
static char*
printstr(char *dst, char *edst, char *s, int sz)
{
int l, n, isneg;
isneg = 0;
if(sz < 0){
sz = -sz;
isneg = 1;
}
if(dst >= edst)
return dst;
n = l = strlen(s);
if(n < sz)
n = sz;
if(n >= edst - dst)
n = (edst - dst) - 1;
if(l > n)
l = n;
if(isneg){
memmove(dst, s, l);
if(n - l)
memset(dst + l, ' ', n - l);
}else{
if(n - l)
memset(dst, ' ', n - l);
memmove(dst + n - l, s, l);
}
return dst + n;
}
char*
vseprint(char *dst, char *edst, char *fmt, va_list arg)
{
int fl, sz, sign, base;
char *p, *w;
char cbuf[2];
w = dst;
for(p = fmt; *p && w < edst - 1; p++){
switch(*p){
default:
*w++ = *p;
break;
case '%':
sign = 1;
fl = sz = 0;
for(p++; *p; p++){
switch(*p){
case '-': sign = -1; break;
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
sz = sz * 10 + *p - '0';
break;
case 'l': if(fl & FlagLong)fl |= FlagLongLong;break;
case 'u': fl |= FlagUnsigned; break;
case 'i': case 'd':
base = 10; goto num;
case 'o': base = 8; goto num;
case 'p': case 'x': case 'X':
base = 16;
goto num;
num:
{
static char digits[] = "0123456789abcdef";
char buf[30], *p;
int neg, zero;
unsigned long long luv;
if(fl & FlagLongLong){
if(fl & FlagUnsigned)
luv = va_arg(arg, unsigned long long);
else
luv = va_arg(arg, long long);
}else{
if(fl & FlagLong){
if(fl & FlagUnsigned)
luv = va_arg(arg, unsigned long);
else
luv = va_arg(arg, long);
}else{
if(fl & FlagUnsigned)
luv = va_arg(arg, unsigned int);
else
luv = va_arg(arg, int);
}
}
p = buf + sizeof(buf);
neg = zero = 0;
if((fl & FlagUnsigned) == 0 && (long long)luv < 0){
neg = 1;
luv = -luv;
}
if(luv == 0)
zero = 1;
*--p = 0;
while(luv){
*--p = digits[luv % base];
luv /= base;
}
if(base == 16){
*--p = 'x';
*--p = '0';
}
if(base == 8 || zero)
*--p = '0';
w = printstr(w, edst,p, sz * sign);
goto break2;
}
case 'c':
cbuf[0] = va_arg(arg, int);
cbuf[1] = 0;
w = printstr(w, edst, cbuf, sz * sign);
goto break2;
case 's':
w = printstr(w, edst, va_arg(arg, char*), sz*sign);
goto break2;
case 'r':
w = printstr(w, edst, strerror(errno), sz*sign);
goto break2;
default:
p = "error";
goto break2;
}
}
break2:
break;
}
}
assert(w < edst);
*w = 0;
return dst;
}
char*
vsnprint(char *dst, unsigned int n, char *fmt, va_list arg)
{
return vseprint(dst, dst + n, fmt, arg);
}
char*
snprint(char *dst, unsigned int n, char *fmt, ...)
{
va_list arg;
va_start(arg, fmt);
vsnprint(dst, n, fmt, arg);
va_end(arg);
return dst;
}
char*
seprint(char* dst, char* edst, char* fmt, ...)
{
va_list arg;
va_start(arg, fmt);
vseprint(dst, edst, fmt, arg);
va_end(arg);
return dst;
}
int
vfprint(int fd, char *fmt, va_list arg)
{
char buf[1024];
vseprint(buf, buf + sizeof buf, fmt, arg);
return write(fd, buf, strlen(buf));
}
int
vprint(char *fmt, va_list arg)
{
return vfprint(1, fmt, arg);
}
int
fprint(int fd, char *fmt, ...)
{
int n;
va_list arg;
va_start(arg, fmt);
n = vfprint(fd, fmt, arg);
va_end(arg);
return n;
}
int
print(char *fmt, ...)
{
int n;
va_list arg;
va_start(arg, fmt);
n = vprint(fmt, arg);
va_end(arg);
return n;
}
char*
strecpy(char *dst, char *edst, char *src)
{
*printstr(dst, edst, src, 0) = 0;
return dst;
}

11
print.h Normal file
View File

@ -0,0 +1,11 @@
#include <stdarg.h>
char* vseprint(char *dst, char *edst, char *fmt, va_list arg);
char* vsnprint(char *dst, unsigned int n, char *fmt, va_list arg);
char* snprint(char *dst, unsigned int n, char *fmt, ...);
char* seprint(char* dst, char* edst, char* fmt, ...);
int vfprint(int fd, char *fmt, va_list arg);
int vprint(char *fmt, va_list arg);
int fprint(int fd, char *fmt, ...);
int print(char *fmt, ...);
char* strecpy(char *dst, char *edst, char *src);

2
save.c
View File

@ -88,7 +88,7 @@ getvars(Var *v)
n = v->n;
q = v->a;
while(n--){
l |= fgetc(fp);
l = fgetc(fp);
l |= fgetc(fp) << 8;
l |= fgetc(fp) << 16;
l |= fgetc(fp) << 24;