pokecrystal-board/tools/palette.c

106 lines
1.9 KiB
C
Raw Normal View History

2016-08-24 18:56:07 -07:00
#include <stdio.h>
#include <unistd.h>
#include <stdint.h>
#include <stdlib.h>
#include <stdbool.h>
2017-06-24 13:47:11 -07:00
#include <getopt.h>
2016-08-24 18:56:07 -07:00
void usage(void) {
printf("Usage: palette palfile\n");
exit(1);
}
void print_rgb(uint16_t word) {
int r, g, b;
r = word & 0x1f;
g = (word >> 5) & 0x1f;
b = (word >> 10) & 0x1f;
printf("\tRGB %2d, %2d, %2d\n", r, g, b);
}
void print_pokemon_palette(char* palette_filename) {
FILE* f;
uint8_t bytes[4];
f = fopen(palette_filename, "rb");
if (f == NULL) {
fprintf(stderr, "failed to open file %s\n", palette_filename);
exit(1);
}
fseek(f, 2, SEEK_SET);
2017-12-27 22:25:25 -08:00
size_t size = 4;
if (size != fread(bytes, 1, size, f)) {
fprintf(stderr, "failed to read file %s\n", palette_filename);
exit(1);
}
2016-08-24 18:56:07 -07:00
fclose(f);
print_rgb((bytes[1] << 8) | bytes[0]);
print_rgb((bytes[3] << 8) | bytes[2]);
}
void print_palette(char* palette_filename) {
FILE* f;
uint8_t* bytes;
2017-12-27 22:25:25 -08:00
size_t size;
2016-08-24 18:56:07 -07:00
int i;
f = fopen(palette_filename, "rb");
if (f == NULL) {
fprintf(stderr, "failed to open file %s\n", palette_filename);
exit(1);
}
fseek(f, 0, SEEK_END);
size = ftell(f);
if (!size) {
fprintf(stderr, "empty file %s\n", palette_filename);
exit(1);
}
2016-08-24 18:56:07 -07:00
rewind(f);
bytes = malloc(size);
if (!bytes) {
fprintf(stderr, "malloc failure\n");
exit(1);
}
2016-08-24 18:56:07 -07:00
fseek(f, 0, SEEK_SET);
2017-12-27 22:25:25 -08:00
if (size != fread(bytes, 1, size, f)) {
fprintf(stderr, "failed to read file %s\n", palette_filename);
exit(1);
}
2016-08-24 18:56:07 -07:00
fclose(f);
2017-12-27 22:25:25 -08:00
for (i = 0; i + 1 < (int)size; i += 2) {
2016-08-24 18:56:07 -07:00
print_rgb((bytes[i + 1] << 8) | bytes[i]);
}
}
int main(int argc, char* argv[]) {
int ch;
2017-06-29 21:14:12 -07:00
bool pokemon = false;
2016-08-24 18:56:07 -07:00
while ((ch = getopt(argc, argv, "p")) != -1) {
switch (ch) {
case 'p':
pokemon = true;
break;
default:
usage();
}
}
argc -= optind;
argv += optind;
if (argc < 1) {
usage();
}
if (pokemon) {
print_pokemon_palette(argv[0]);
} else {
print_palette(argv[0]);
}
return 0;
}