pokecrystal/tools/pokemon_animation_graphics.c

191 lines
3.9 KiB
C
Raw Normal View History

2016-08-25 01:56:07 +00:00
#include <unistd.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
static void usage(void) {
printf("Usage: pokemon_animation_graphics [-o outfile] [-t mapfile] 2bpp_file dimensions_file\n");
exit(1);
}
struct Tilemap {
uint8_t* data;
int size;
};
struct Graphic {
uint8_t* data;
int size;
};
void transpose_tiles(uint8_t* tiles, int width, int size, int tile_size) {
int i;
int j;
uint8_t* new_tiles;
new_tiles = malloc(size);
for (i = 0; i < size; i++) {
j = i / tile_size * width * tile_size;
j = j % size + tile_size * (j / size) + i % tile_size;
new_tiles[j] = tiles[i];
}
memcpy(tiles, new_tiles, size);
free(new_tiles);
}
int get_tile_index(uint8_t* tile, uint8_t* tiles, int num_tiles) {
int i;
int j;
for (i = 0; i < num_tiles; i++) {
for (j = 0; j < 16; j++) {
if (tile[j] != tiles[16 * i + j]) {
break;
}
}
if (j == 16) {
return i;
}
}
return -1;
}
2017-05-28 05:11:32 +00:00
FILE *fopen_verbose(char *filename, char *mode) {
FILE *f = fopen(filename, mode);
if (!f) {
fprintf(stderr, "Could not open file: \"%s\"\n", filename);
}
return f;
}
2016-08-25 01:56:07 +00:00
void create_tilemap(struct Tilemap* tilemap, struct Graphic* graphic, char* graphics_filename, int width, int height) {
long graphics_size;
uint8_t* graphics;
FILE* f;
int i;
2017-05-28 05:11:32 +00:00
int tile;
2016-08-25 01:56:07 +00:00
2017-05-28 05:11:32 +00:00
f = fopen_verbose(graphics_filename, "rb");
if (!f) {
exit(1);
}
2016-08-25 01:56:07 +00:00
fseek(f, 0, SEEK_END);
graphics_size = ftell(f);
rewind(f);
graphics = malloc(graphics_size);
fread(graphics, 1, graphics_size, f);
fclose(f);
2017-05-28 05:11:32 +00:00
int num_tiles_per_frame = width * height;
int tile_size = 16;
int num_frames = graphics_size / (tile_size * num_tiles_per_frame);
int frame_size = num_tiles_per_frame * tile_size;
2016-08-25 01:56:07 +00:00
// transpose each frame
2017-05-28 05:11:32 +00:00
for (i = 0; i < num_frames; i++) {
transpose_tiles(graphics + i * frame_size, width, frame_size, tile_size);
2016-08-25 01:56:07 +00:00
}
2017-05-28 05:11:32 +00:00
// first frame is naively populated with redundant tiles,
// so fill it unconditionally and start from the second frame
int num_tiles = width * height;
int tilemap_size = graphics_size / tile_size;
tilemap->data = malloc(tilemap_size);
2016-08-25 01:56:07 +00:00
for (i = 0; i < num_tiles; i++) {
tilemap->data[tilemap->size] = i;
tilemap->size++;
}
2017-05-28 05:11:32 +00:00
for (i = num_tiles; i < tilemap_size; i++) {
tile = get_tile_index(graphics + i * tile_size, graphics, i);
2016-08-25 01:56:07 +00:00
if (tile == -1) {
tilemap->data[tilemap->size] = num_tiles;
tilemap->size++;
num_tiles++;
} else {
tilemap->data[tilemap->size] = tile;
tilemap->size++;
}
}
graphic->data = malloc(tilemap->size * 16);
graphic->size = 16 * width * height;
memcpy(graphic->data, graphics, graphic->size);
for (i = width * height; i < tilemap->size; i++) {
tile = get_tile_index(graphics + 16 * i, graphic->data, graphic->size / 16);
if (tile == -1) {
memcpy(graphic->data + graphic->size, graphics + 16 * i, 16);
graphic->size += 16;
}
}
free(graphics);
}
int main(int argc, char* argv[]) {
2017-05-28 05:11:32 +00:00
int opt;
2016-08-25 01:56:07 +00:00
char* dimensions_filename;
char* graphics_filename;
char* outfile;
char* mapfile;
FILE* f;
long size;
uint8_t bytes[1];
int width;
int height;
struct Graphic graphic = {0};
struct Tilemap tilemap = {0};
2017-05-28 05:11:32 +00:00
while ((opt = getopt(argc, argv, "o:t:")) != -1) {
switch (opt) {
2016-08-25 01:56:07 +00:00
case 'o':
outfile = optarg;
break;
case 't':
mapfile = optarg;
break;
default:
usage();
2017-05-28 05:11:32 +00:00
break;
2016-08-25 01:56:07 +00:00
}
}
argc -= optind;
argv += optind;
if (argc < 2) {
usage();
}
graphics_filename = argv[0];
dimensions_filename = argv[1];
2017-05-28 05:11:32 +00:00
f = fopen_verbose(dimensions_filename, "rb");
if (!f) {
exit(1);
}
2016-08-25 01:56:07 +00:00
fread(bytes, 1, 1, f);
fclose(f);
width = bytes[0] & 0xf;
height = bytes[0] >> 4;
create_tilemap(&tilemap, &graphic, graphics_filename, width, height);
2017-05-28 05:11:32 +00:00
if (outfile) {
f = fopen_verbose(outfile, "wb");
if (f) {
fwrite(graphic.data, 1, graphic.size, f);
fclose(f);
}
2016-08-25 01:56:07 +00:00
}
2017-05-28 05:11:32 +00:00
if (mapfile) {
f = fopen_verbose(mapfile, "wb");
if (f) {
fwrite(tilemap.data, 1, tilemap.size, f);
fclose(f);
}
2016-08-25 01:56:07 +00:00
}
free(graphic.data);
free(tilemap.data);
return 0;
}