Add command-line options.

1 files changed, 65 insertions, 10 deletions

diff --git a/src/extract.c b/src/extract.c
index 079fe7f..4f761e4 100644
--- a/src/extract.c
+++ b/src/extract.c
@@ -1,9 +1,14 @@
 #include <stdio.h>
 #include <stdlib.h>
+#include <ctype.h>
+#include <string.h>
+#include <limits.h>
 #include <f65.h>
 #include "unalf.h"
 #include "addrs.h"
 
+char *out_filename;
+
 void dpoke(int addr, u16 value) {
 	mem[addr] = value & 0xff;
 	mem[addr + 1] = value >> 8;
@@ -13,29 +18,79 @@ u16 dpeek(int addr) {
 	return mem[addr] | (mem[addr + 1] << 8);
 }
 
-void extract_alf(void) {
-	char *filename;
+void fix_filename(void) {
+	char *p;
+
+	if(!out_filename) return;
+
+	if(opts.lowercase) {
+		for(p = out_filename; *p; p++)
+			*p = tolower(*p);
+	}
+
+	if(!opts.keepdot) {
+		for(p = out_filename; *p; p++)
+			if(p[0] == '.' && !p[1])
+				*p = '\0';
+	}
+}
+
+void make_backup(void) {
+	char backup[PATH_MAX];
+
+	strcpy(backup, out_filename);
+	strcat(backup, "~");
 
+	/* silently ignore errors! */
+	rename(out_filename, backup);
+}
+
+void extract_alf(void) {
 	/* get ready to call fake 6502 stuff. set up memory like the Atari. */
 	dpoke(MEMTOP, 0xbc1f);
 
 	while(read_alf_header()) {
-		filename = (char *)(mem + alf_hdr_filename);
-		printf("Uncrunching %s\n", filename);
+		out_filename = (char *)(mem + alf_hdr_filename);
 
-		if(!(out_file = fopen(filename, "wb"))) {
-			fprintf(stderr, "%s: ", self);
-			perror(filename);
-			exit(1);
+		fix_filename();
+
+		if(!file_wanted(out_filename)) {
+			if(fseek(in_file, getquad(alf_hdr_compsize0), SEEK_CUR) != 0) {
+				fputs(self, stderr);
+				perror(": fseek");
+				exit(1);
+			}
+			out_filename = 0;
+			continue;
+		}
+
+		if(!opts.quiet) {
+			printf("%s %s\n", opts.testonly ? "Testing" : "Uncrunching", out_filename);
+		}
+
+		if(opts.extract_to_stdout) {
+			out_file = stdout;
+		} else {
+			if(opts.testonly) {
+				out_filename = "/dev/null";
+			} else if(!opts.overwrite) {
+				make_backup();
+			}
+			if(!(out_file = fopen(out_filename, "wb"))) {
+				perror(out_filename);
+				exit(1);
+			}
 		}
 
 		uncrunch_file();
-		fclose(out_file);
+
+		if(!opts.extract_to_stdout) fclose(out_file);
+		out_filename = 0;
 	}
 }
 
 static void chksum_err(void) {
-	fprintf(stderr, "%s: checksum error on file %s\n", self, in_filename);
+	fprintf(stderr, "%s: checksum error on file %s\n", self, out_filename);
 }
 
 void uncrunch_file(void) {