Subversion Repositories forth-cpu

#include <stdio.h>
#include <stdint.h>
#include <stdbool.h>
 
#define MAX_READ (3200)
#define DEFAULT_ATTRIBUTES (0x3800u)
 
static int printer(FILE *o, uint16_t n, bool binary_not_hex)
{
	n |= DEFAULT_ATTRIBUTES;
	if(binary_not_hex) {
		unsigned i;
		for(i = 15; i <= 15; i--)
			fputc(n & (1 << i) ? '1' : '0', o);
		fputc('\n', o);
	} else {
		fprintf(o, "%04x\n", (unsigned)n);
	}
	return 0;
}
 
static void usage(const char *arg0)
{
	static const char *help = "\
Generate initial VGA screen text for the H2 CPU project.\n\
Options:\n\n\
\t-h print this help message and exit\n\
\t-g turn on generation mode - generate file full of spaces\n\n\
This program turns a byte stream into a text file containing\n\
a single 16-bit (doubling up the input data) ASCII file encoded\n\
'1' and '0' characters.\n\n";
	fprintf(stderr, "usage: %s -h -g\n", arg0);
	fprintf(stderr, "%s", help);
	fprintf(stderr, "%d characters are read in and converted.\n\n", MAX_READ);
}
 
int main(int argc, char **argv)
{
	size_t i;
	int ia, gen = 0;
	for(ia = 1; ia < argc && argv[ia][0] == '-'; ia++) {
		switch(argv[ia][1]) {
		case '\0': goto done; /* stop processing options */
		case 'h':  usage(argv[0]);
			   return -1;
		case 'g':  gen = 1; break;
		default:
			   fprintf(stderr, "unknown option '%s'\n", argv[ia]);
			   return -1;
		}
	}
done:
	if(argc != ia) {
		fprintf(stderr, "too many arguments supplied\n");
		return -1;
	}
	for(i = 0; i < MAX_READ; i++) {
		int c = gen ? ' ' : fgetc(stdin);
		if(c == EOF)
			return 0;
		if(printer(stdout, c, false) < 0)
			return -1;
	}
	return 0;
}