diff options
| -rw-r--r-- | graftest/Makefile | 23 | ||||
| -rw-r--r-- | graftest/blob2c.c | 117 | ||||
| -rw-r--r-- | graftest/graftest.c | 537 |
3 files changed, 677 insertions, 0 deletions
diff --git a/graftest/Makefile b/graftest/Makefile new file mode 100644 index 0000000..e16ae6d --- /dev/null +++ b/graftest/Makefile @@ -0,0 +1,23 @@ +HOSTCC=gcc +CC=gcc + +CFLAGS=-Wall -O2 +HOSTCFLAGS=-Wall -O2 + +all: rom.c + gcc -O2 -Wall -o graftest graftest.c rom.c `pkg-config sdl2 --cflags --libs` + +rom.c: blob2c jumpmanjr.rom + ./blob2c jumpmanjr.rom > rom.c 2> rom.h + +blob2c: blob2c.c + $(HOSTCC) $(HOSTCFLAGS) -o blob2c blob2c.c + +jumpmanjr.rom: + ln -s ../jumpmanjr.rom . + +test: all + ./graftest + +clean: + rm -f *.o graftest core blob2c jumpmanjr.rom rom.h rom.c diff --git a/graftest/blob2c.c b/graftest/blob2c.c new file mode 100644 index 0000000..779b79f --- /dev/null +++ b/graftest/blob2c.c @@ -0,0 +1,117 @@ +#include <stdio.h> +#include <stdlib.h> +#include <unistd.h> +#include <string.h> +#include <errno.h> +#include <ctype.h> + +/* since we're emitting C source, the comments containing the + ASCII dump better not contain C comment markers! */ +void fixasc(char *asc, int len) { + int j; + + for(j=0; j<(len-1); j++) { + /* slash-star or slash-slash become slash-dot */ + if(asc[j] == '/' && (asc[j+1] == '*' || asc[j+1] == '/')) + asc[j+1] = '.'; + /* star-slash becomes dot-slash */ + else if(asc[j] == '*' && asc[j+1] == '/') + asc[j] = '.'; + } +} + +int main(int argc, char **argv) { + int i, j, count = 0; + char *p, asc[9]; + FILE *in; + + if(argc != 2) { + fprintf(stderr, + "#error usage: %s blobfile >blobfile.c 2>blobfile.h\n", argv[0]); + exit(1); + } + + if( !(in = fopen(argv[1], "rb")) ) { + fprintf(stderr, "/* %s: %s */\n", argv[1], strerror(errno)); + exit(1); + } + + printf("/* C source created by blob2c from input file %s */\n\n", argv[1]); + fprintf(stderr, + "/* C header created by blob2c from input file %s */\n\n", argv[1]); + + for(p = argv[1]; *p; p++) + if(!isalnum(*p)) *p = '_'; + + fprintf(stderr, + "#ifndef %s_H\n" + "#define %s_H\n\n", + argv[1], argv[1]); + + /* start array definition */ + printf("unsigned char %s[] = {", argv[1]); + + asc[8] = '\0'; + + /* read/process each input byte in loop, until EOF */ + while( (i = getc(in)) != EOF ) { + if(count) putchar(','); + + if(count % 8 == 0) { + if(count) { + /* fix & print ASCII dump */ + fixasc(asc, 8); + printf(" /* %s */", asc); + } + + /* start next line */ + printf("\n\t/* %6d */ ", count); + } + + /* store this byte of ASCII dump */ + asc[count % 8] = isprint(i) ? i : '.'; + + /* print this byte of hex data */ + printf("0x%02x", i); + + count++; + } + + /* fix ASCII dump for last line */ + i = count % 8; + if(!i) i = 8; + fixasc(asc, i); + asc[i] = '\0'; + + /* line it up with the previous lines */ + j = (8 - i) * 5; + for(i=0; i<j; i++) + putchar(' '); + + /* print it */ + printf(" /* %s */", asc); + + /* end of array definition */ + printf("\n}; /* %s */\n\n", argv[1]); + + /* array_len definition */ + printf("int %s_len = %d;\n", argv[1], count); + + /* check for read errors */ + i = 0; + if(ferror(in)) { + fprintf(stderr, "#error %s: %s\n", argv[1], strerror(errno)); + i = 1; + } + + fclose(in); + + /* extern declarations to stderr */ + fprintf(stderr, + "extern unsigned char %s[];\nextern int %s_len;\n", + argv[1], argv[1]); + + fprintf(stderr, "\n#endif /* %s_H */\n", argv[1]); + + return i; +} diff --git a/graftest/graftest.c b/graftest/graftest.c new file mode 100644 index 0000000..64d2565 --- /dev/null +++ b/graftest/graftest.c @@ -0,0 +1,537 @@ +#include "SDL.h" + +/* rom.h and rom.c are generated from jumpmanjr.rom */ +#include "rom.h" + +/* this table taken from the atari++ 1.80 source (and modified), + atari++/gtia.cpp */ +int colortable[256] = { + 0x000000, + 0x363636, + 0x515151, + 0x666666, + 0x787878, + 0x888888, + 0x979797, + 0xa5a5a5, + 0xb2b2b2, + 0xbebebe, + 0xcacaca, + 0xd5d5d5, + 0xe0e0e0, + 0xebebeb, + 0xf5f5f5, + 0xffffff, + 0x6a2b00, + 0x7c4900, + 0x8c5f00, + 0x9b7200, + 0xa88300, + 0xb59221, + 0xc1a043, + 0xcdae5a, + 0xd8ba6e, + 0xe3c67f, + 0xedd28f, + 0xf7dc9d, + 0xffe7ab, + 0xfff1b7, + 0xfffbc3, + 0xffffcf, + 0x7f0000, + 0x8e2900, + 0x9d4700, + 0xaa5e00, + 0xb7711e, + 0xc38241, + 0xcf9159, + 0xdaa06d, + 0xe4ad7e, + 0xefba8e, + 0xf9c69c, + 0xffd1aa, + 0xffdcb6, + 0xffe7c3, + 0xfff1ce, + 0xfffbd9, + 0x830000, + 0x920000, + 0xa12a06, + 0xae4837, + 0xba5f51, + 0xc67266, + 0xd28378, + 0xdd9288, + 0xe7a097, + 0xf2ada5, + 0xfbbab2, + 0xffc6bf, + 0xffd1ca, + 0xffdcd6, + 0xffe7e0, + 0xfff1eb, + 0x79000c, + 0x890038, + 0x980052, + 0xa53567, + 0xb24f79, + 0xbf6589, + 0xca7798, + 0xd687a6, + 0xe196b3, + 0xeba4bf, + 0xf5b1cb, + 0xffbed6, + 0xffc9e1, + 0xffd5eb, + 0xffe0f5, + 0xffeaff, + 0x5e0053, + 0x710068, + 0x82007a, + 0x912a8a, + 0x9f4899, + 0xad5fa6, + 0xb972b3, + 0xc583c0, + 0xd192cb, + 0xdca0d6, + 0xe6ade1, + 0xf1baec, + 0xfbc6f6, + 0xffd1ff, + 0xffdcff, + 0xffe7ff, + 0x2a0073, + 0x480084, + 0x5e0093, + 0x7130a1, + 0x824cae, + 0x9262bb, + 0xa075c7, + 0xad85d2, + 0xba94dd, + 0xc6a2e8, + 0xd1b0f2, + 0xdcbcfc, + 0xe7c8ff, + 0xf1d3ff, + 0xfbdeff, + 0xffe9ff, + 0x000082, + 0x000091, + 0x26219f, + 0x4642ad, + 0x5d5ab9, + 0x706ec5, + 0x817fd1, + 0x908fdc, + 0x9f9de6, + 0xacabf1, + 0xb9b7fb, + 0xc5c3ff, + 0xd0cfff, + 0xdbdaff, + 0xe6e5ff, + 0xf0efff, + 0x000081, + 0x001d91, + 0x00409f, + 0x0058ac, + 0x2e6cb9, + 0x4b7ec5, + 0x618dd1, + 0x739cdc, + 0x84a9e6, + 0x93b6f0, + 0xa1c2fa, + 0xafceff, + 0xbbd9ff, + 0xc7e4ff, + 0xd3eeff, + 0xddf8ff, + 0x001f71, + 0x004182, + 0x005992, + 0x006da0, + 0x007ead, + 0x288eba, + 0x479cc6, + 0x5eaad1, + 0x71b7dc, + 0x82c3e7, + 0x91cef1, + 0x9fdafb, + 0xade4ff, + 0xb9efff, + 0xc5f9ff, + 0xd1ffff, + 0x004150, + 0x005965, + 0x006c77, + 0x007e88, + 0x008e97, + 0x1c9ca5, + 0x3faab2, + 0x58b6be, + 0x6cc2ca, + 0x7dced5, + 0x8dd9e0, + 0x9be4ea, + 0xa9eef4, + 0xb6f8fe, + 0xc2ffff, + 0xceffff, + 0x005200, + 0x006734, + 0x00794f, + 0x008964, + 0x009877, + 0x35a687, + 0x50b396, + 0x65bfa4, + 0x77cbb1, + 0x87d6bd, + 0x96e1c9, + 0xa4ebd5, + 0xb1f5df, + 0xbeffea, + 0xcafff4, + 0xd5fffe, + 0x005800, + 0x006c00, + 0x007e00, + 0x208d33, + 0x429c4e, + 0x5aaa64, + 0x6db676, + 0x7fc286, + 0x8ece95, + 0x9dd9a3, + 0xaae4b1, + 0xb7eebd, + 0xc3f8c9, + 0xcfffd4, + 0xdaffdf, + 0xe4ffea, + 0x005500, + 0x1f6900, + 0x417b00, + 0x598b00, + 0x6d9a1a, + 0x7ea73e, + 0x8eb457, + 0x9cc06b, + 0xaacc7d, + 0xb7d78c, + 0xc3e29b, + 0xceeca9, + 0xd9f6b5, + 0xe4ffc2, + 0xeeffcd, + 0xf8ffd8, + 0x434600, + 0x5b5d00, + 0x6e7000, + 0x7f8100, + 0x8f9100, + 0x9d9f20, + 0xabac42, + 0xb8b959, + 0xc4c56d, + 0xcfd17e, + 0xdadc8e, + 0xe5e69d, + 0xeff0aa, + 0xf9fab7, + 0xffffc3, + 0xffffcf, + 0x6a2b00, + 0x7c4900, + 0x8c5f00, + 0x9b7200, + 0xa88300, + 0xb59221, + 0xc1a043, + 0xcdae5a, + 0xd8ba6e, + 0xe3c67f, + 0xedd28f, + 0xf7dc9d, + 0xffe7ab, + 0xfff1b7, + 0xfffbc3, + 0xffffcf +}; + +/* this table taken from the atari800 source, + atari800-2.0.3/src/colours.c */ +/* +int colortable[256] = { + 0x2d2d2d, 0x3b3b3b, 0x494949, 0x575757, + 0x656565, 0x737373, 0x818181, 0x8f8f8f, + 0x9d9d9d, 0xababab, 0xb9b9b9, 0xc7c7c7, + 0xd5d5d5, 0xe3e3e3, 0xf1f1f1, 0xffffff, + 0x5c2300, 0x6a3100, 0x783f00, 0x864d0a, + 0x945b18, 0xa26926, 0xb07734, 0xbe8542, + 0xcc9350, 0xdaa15e, 0xe8af6c, 0xf6bd7a, + 0xffcb88, 0xffd996, 0xffe7a4, 0xfff5b2, + 0x691409, 0x772217, 0x853025, 0x933e33, + 0xa14c41, 0xaf5a4f, 0xbd685d, 0xcb766b, + 0xd98479, 0xe79287, 0xf5a095, 0xffaea3, + 0xffbcb1, 0xffcabf, 0xffd8cd, 0xffe6db, + 0x6c0a38, 0x7a1846, 0x882654, 0x963462, + 0xa44270, 0xb2507e, 0xc05e8c, 0xce6c9a, + 0xdc7aa8, 0xea88b6, 0xf896c4, 0xffa4d2, + 0xffb2e0, 0xffc0ee, 0xffcefc, 0xffdcff, + 0x640565, 0x721373, 0x802181, 0x8e2f8f, + 0x9c3d9d, 0xaa4bab, 0xb859b9, 0xc667c7, + 0xd475d5, 0xe283e3, 0xf091f1, 0xfe9fff, + 0xffadff, 0xffbbff, 0xffc9ff, 0xffd7ff, + 0x520789, 0x601597, 0x6e23a5, 0x7c31b3, + 0x8a3fc1, 0x984dcf, 0xa65bdd, 0xb469eb, + 0xc277f9, 0xd085ff, 0xde93ff, 0xeca1ff, + 0xfaafff, 0xffbdff, 0xffcbff, 0xffd9ff, + 0x3a109c, 0x481eaa, 0x562cb8, 0x643ac6, + 0x7248d4, 0x8056e2, 0x8e64f0, 0x9c72fe, + 0xaa80ff, 0xb88eff, 0xc69cff, 0xd4aaff, + 0xe2b8ff, 0xf0c6ff, 0xfed4ff, 0xffe2ff, + 0x1f1e9c, 0x2d2caa, 0x3b3ab8, 0x4948c6, + 0x5756d4, 0x6564e2, 0x7372f0, 0x8180fe, + 0x8f8eff, 0x9d9cff, 0xabaaff, 0xb9b8ff, + 0xc7c6ff, 0xd5d4ff, 0xe3e2ff, 0xf1f0ff, + 0x072e89, 0x153c97, 0x234aa5, 0x3158b3, + 0x3f66c1, 0x4d74cf, 0x5b82dd, 0x6990eb, + 0x779ef9, 0x85acff, 0x93baff, 0xa1c8ff, + 0xafd6ff, 0xbde4ff, 0xcbf2ff, 0xd9ffff, + 0x003e65, 0x034c73, 0x115a81, 0x1f688f, + 0x2d769d, 0x3b84ab, 0x4992b9, 0x57a0c7, + 0x65aed5, 0x73bce3, 0x81caf1, 0x8fd8ff, + 0x9de6ff, 0xabf4ff, 0xb9ffff, 0xc7ffff, + 0x004b38, 0x005946, 0x096754, 0x177562, + 0x258370, 0x33917e, 0x419f8c, 0x4fad9a, + 0x5dbba8, 0x6bc9b6, 0x79d7c4, 0x87e5d2, + 0x95f3e0, 0xa3ffee, 0xb1fffc, 0xbfffff, + 0x005209, 0x006017, 0x0c6e25, 0x1a7c33, + 0x288a41, 0x36984f, 0x44a65d, 0x52b46b, + 0x60c279, 0x6ed087, 0x7cde95, 0x8aeca3, + 0x98fab1, 0xa6ffbf, 0xb4ffcd, 0xc2ffdb, + 0x005300, 0x0b6100, 0x196f00, 0x277d0a, + 0x358b18, 0x439926, 0x51a734, 0x5fb542, + 0x6dc350, 0x7bd15e, 0x89df6c, 0x97ed7a, + 0xa5fb88, 0xb3ff96, 0xc1ffa4, 0xcfffb2, + 0x134e00, 0x215c00, 0x2f6a00, 0x3d7800, + 0x4b8600, 0x59940b, 0x67a219, 0x75b027, + 0x83be35, 0x91cc43, 0x9fda51, 0xade85f, + 0xbbf66d, 0xc9ff7b, 0xd7ff89, 0xe5ff97, + 0x2d4300, 0x3b5100, 0x495f00, 0x576d00, + 0x657b00, 0x738901, 0x81970f, 0x8fa51d, + 0x9db32b, 0xabc139, 0xb9cf47, 0xc7dd55, + 0xd5eb63, 0xe3f971, 0xf1ff7f, 0xffff8d, + 0x463300, 0x544100, 0x624f00, 0x705d00, + 0x7e6b00, 0x8c790b, 0x9a8719, 0xa89527, + 0xb6a335, 0xc4b143, 0xd2bf51, 0xe0cd5f, + 0xeedb6d, 0xfce97b, 0xfff789, 0xffff97 +}; +*/ + +/* load address of the ROM image */ +#define ROM_START 0x8000 + +/* address within ROM where the level descriptors starts */ +#define LEVEL_BASE 0xa000 + +/* size of each level descriptor in the ROM */ +#define LEVEL_SIZE 0x40 + +Uint32 texture_pixels[160 * 200]; +Uint8 color_regs[4]; + +Uint8 peek(int addr) { + return jumpmanjr_rom[addr - ROM_START]; +} + +Uint16 dpeek(int addr) { + return (peek(addr) | (peek(addr + 1) << 8)); +} + +Uint8 *romptr(int addr) { + return jumpmanjr_rom + (addr - ROM_START); +} + +int getdelta(Uint8 d) { + return (d < 128) ? (d) : (d - 256); +} + +void clear_pixels(void) { + memset(texture_pixels, 0, sizeof(texture_pixels)); +} + +void draw_shape(int shapeaddr, int xpos, int ypos) { + int w = 0, xoffs = 0, yoffs = 0, c = 0; + Uint8 *p = romptr(shapeaddr); + ypos *= 2; + + fprintf(stderr, "draw_shape(%04x, %d, %d);\n", shapeaddr, xpos, ypos); + + while(1) { + if(*p == 0xff) break; + + w = *p++; + xoffs = *p++; + yoffs = 2 * (*p++); + for(c = 0; c < w; c++) { + Uint8 reg = *p++; + fprintf(stderr, "drawing pixel reg %d at %d, %d\n", reg, xpos + xoffs, ypos + yoffs); + texture_pixels[xpos + xoffs + c + (160 * (ypos + yoffs))] = colortable[color_regs[reg]]; + texture_pixels[xpos + xoffs + c + (160 * (ypos + yoffs + 1))] = colortable[color_regs[reg]]; + } + } +} + +void draw_shapes(int shapeaddr, int dx, int dy, int xpos, int ypos, int copies) { + fprintf(stderr, "draw_shapes(%04x, %d, %d, %d, %d, %d);\n", shapeaddr, dx, dy, xpos, ypos, copies); + while(copies--) { + draw_shape(shapeaddr, xpos, ypos); + xpos += dx; + ypos += dy; + } +} + +void draw_map(int addr) { + Uint8 *p = romptr(addr); + int shapeaddr = 0, dx = 0, dy = 0, xpos = 0, ypos = 0, copies = 0; + + clear_pixels(); + + while(1) { + switch(*p) { + case 0xff: /* end opcode */ + return; + + case 0xfe: /* set shape */ + shapeaddr = p[1] | ( p[2] << 8); + p += 3; + break; + + case 0xfd: /* set delta */ + dx = getdelta(p[1]); + dy = getdelta(p[2]); + p += 3; + break; + + case 0xfc: /* jump */ + p = romptr(p[1] | ( p[2] << 8)); + break; + + default: /* draw shape */ + xpos = p[0]; + ypos = p[1]; + copies = p[2]; + draw_shapes(shapeaddr, dx, dy, xpos, ypos, copies); + p += 3; + } + } + +} + +void render_level(int levelnum) { + int leveldesc = LEVEL_BASE + LEVEL_SIZE * levelnum; + int mapaddr = dpeek(leveldesc + 22); + + color_regs[0] = 0; + color_regs[1] = peek(leveldesc + 47); + color_regs[2] = peek(leveldesc + 48); + color_regs[3] = peek(leveldesc + 49); + + fprintf(stderr, "leveldesc %04x, mapaddr %04x\n", leveldesc, mapaddr); + draw_map(mapaddr); + /* + while(1) { + fprintf(stderr, "%04x\n", *p); + if(*p == 0xff) return; + p++; + } + */ +} + +int main(int argc, char **argv) { + int lev = 0, done = 0, fullscreen = 0; + SDL_Window *window; + SDL_Renderer *renderer; + SDL_Texture *texture; + SDL_Event event; + + if(SDL_Init(SDL_INIT_VIDEO) < 0) { + SDL_LogError(SDL_LOG_CATEGORY_APPLICATION, "Couldn't initialize SDL: %s", SDL_GetError()); + return 3; + } + + if(SDL_CreateWindowAndRenderer(320, 200, 0, &window, &renderer)) { + SDL_LogError(SDL_LOG_CATEGORY_APPLICATION, "Couldn't create window and renderer: %s", SDL_GetError()); + return 3; + } + + texture = SDL_CreateTexture(renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, 160, 200); + + SDL_RenderSetLogicalSize(renderer, 320, 200); + + render_level(lev); + while(!done) { + Uint32 start, end, now; + + start = SDL_GetTicks(); + end = start + 167; // NTSC timing + + if(SDL_PollEvent(&event)) { + if(event.type == SDL_QUIT) { + break; + } + + if(event.type == SDL_KEYDOWN) { + switch(event.key.keysym.sym) { + case SDLK_SPACE: + lev++; + if(lev == 12) lev = 0; + render_level(lev); + break; + + case SDLK_ESCAPE: + done = 1; + break; + + case SDLK_RETURN: + fullscreen = !fullscreen; + SDL_SetWindowFullscreen(window, fullscreen ? SDL_WINDOW_FULLSCREEN_DESKTOP : 0); + break; + + default: + break; + } + } + } + + SDL_SetRenderDrawColor(renderer, 0x00, 0x00, 0x00, 0x00); + SDL_RenderClear(renderer); + + SDL_UpdateTexture(texture, NULL, texture_pixels, 160 * 4); + SDL_RenderCopy(renderer, texture, NULL, NULL); + SDL_RenderPresent(renderer); + + now = SDL_GetTicks(); + if(now < end) { + SDL_Delay(end - now); + // fprintf(stderr, "frame took %d ms\n", now - start); + } else { + // fprintf(stderr, "!! frame took too long, %d ms\n", now - end); + } + } + + SDL_DestroyTexture(texture); + SDL_DestroyRenderer(renderer); + SDL_DestroyWindow(window); + + SDL_Quit(); + + return 0; +} |