diff options
Diffstat (limited to 'games/clonekeen/extract_shareware_data.c')
| -rw-r--r-- | games/clonekeen/extract_shareware_data.c | 172 |
1 files changed, 172 insertions, 0 deletions
diff --git a/games/clonekeen/extract_shareware_data.c b/games/clonekeen/extract_shareware_data.c new file mode 100644 index 000000000000..7b5fb6593fea --- /dev/null +++ b/games/clonekeen/extract_shareware_data.c @@ -0,0 +1,172 @@ +/* utility to extract the .SHR installer data files of early ID software + shareware games + + Copyright (C) 2007 Hans de Goede <j.w.r.degoede@hhs.nl> + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +*/ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <ctype.h> +#include <libdynamite.h> + +struct cookie_s { + char *in_buffer; + int in_buffer_remaining; + int in_buffer_index; + int in_buffer_size; + FILE* out_file; +}; + +size_t reader(void* buffer, size_t size, void* cookie) +{ + struct cookie_s *c = cookie; + if (size > c->in_buffer_remaining) + size = c->in_buffer_remaining; + + memcpy (buffer, c->in_buffer + c->in_buffer_index, size); + + c->in_buffer_index += size; + c->in_buffer_remaining -= size; + + return size; +} + +size_t writer(void* buffer, size_t size, void* cookie) +{ + struct cookie_s *c = cookie; + return fwrite(buffer, 1, size, c->out_file); +} + +int main(int argc, char *argv[]) +{ + struct cookie_s cookie; + FILE *in_file; + char filename[16]; + unsigned char buf[4]; + int i, compressed_size; + + if (argc != 2) { + fprintf(stderr, "%s: Usage: %s <filename.CHR> %d\n", argv[0], argv[0], argc); + return 1; + } + + in_file = fopen(argv[1], "r"); + if (!in_file) { + fprintf(stderr, "error opening: %s", argv[1]); + perror(NULL); + return 1; + } + + /* skip first 0x3A bytes header */ + if (fseek(in_file, 0x3A, SEEK_CUR)) { + perror("error skipping initial file header"); + return 1; + } + + cookie.in_buffer = malloc(65536); + if (!cookie.in_buffer) { + fprintf(stderr, "Error: out of memory\n"); + return 1; + } + cookie.in_buffer_size = 65536; + + while (1) + { + /* get the name of the file */ + if (fread(filename, 1, sizeof(filename), in_file) != sizeof(filename)) { + if (feof(in_file)) { + free(cookie.in_buffer); + fclose(in_file); + return 0; /* done */ + } + perror("error getting output filename from file"); + return 1; + } + + /* verify the filename and convert to lower case */ + for (i = 0 ; i < sizeof(filename); i++) { + if (filename[i] == 0) + break; /* done */ + if (!isprint(filename[i])) { + fprintf(stderr, "error invalid output filename\n"); + return 1; + } + filename[i] = tolower(filename[i]); + } + if (i == sizeof(filename)) { + fprintf(stderr, "error too long output filename\n"); + return 1; + } + + /* seek to compressed size */ + if (fseek(in_file, 0x88 - sizeof(filename), SEEK_CUR)) { + perror("error skipping file header before file size"); + return 1; + } + + if (fread(buf, 1, 4, in_file) != 4) { + perror("error reading file size"); + return 1; + } + compressed_size = (buf[3] << 24) | (buf[2] << 16) | (buf[1] << 8) | buf[0]; + if (compressed_size > cookie.in_buffer_size) { + cookie.in_buffer = realloc(cookie.in_buffer, compressed_size); + if (!cookie.in_buffer) { + fprintf(stderr, "Error: out of memory\n"); + return 1; + } + cookie.in_buffer_size = compressed_size; + } + + /* seek to begin of compressed data */ + if (fseek(in_file, 0x1C, SEEK_CUR)) { + perror("error skipping file header before file size"); + return 1; + } + + /* read compressed data */ + if (fread(cookie.in_buffer, 1, compressed_size, in_file) != + compressed_size) { + perror("error reading compressed data"); + return 1; + } + + cookie.in_buffer_index = 0; + cookie.in_buffer_remaining = compressed_size; + + cookie.out_file = fopen(filename, "w"); + if (!cookie.out_file) { + fprintf(stderr, "Error creating: %s for writing", filename); + perror(NULL); + return 1; + } + + printf("decompressing: %s, compressed size: %d\n", filename, + compressed_size); + + if ((i = dynamite_explode(reader, writer, &cookie))) { + fprintf(stderr, "Error: %d while decompressing\n", i); + return i; + } + + fclose(cookie.out_file); + } + + /* never reached */ + return 0; +} |