shithub: scc

ref: 8c20e677d7728c5120feb182e4d4195a7571fa71
dir: /src/cmd/objdump.c/

#include <errno.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <scc/arg.h>
#include <scc/mach.h>

char *argv0;
static char *filename;
static int status;

static void
error(char *fmt, ...)
{
	va_list va;

	va_start(va, fmt);
	fprintf(stderr, "objdump: %s: ", filename);
	vfprintf(stderr, fmt, va);
	putc('\n', stderr);
	va_end(va);

	status = EXIT_FAILURE;
}

/*
 * TODO: Dummy implementation used only in the assembler tests
 */
static void
dump(char *fname)
{
	int c, n;
	FILE *fp;

	filename = fname;
	if ((fp = fopen(fname, "rb")) == NULL) {
		error("%s", strerror(errno));
		return;
	}

	puts("data:");
	for (n = 1; (c = getc(fp)) != EOF; n++)
		printf("%02X%c", c, (n%16 == 0) ? '\n' : ' ');
	if (n%16 != 0)
		putchar('\n');

	if (ferror(fp))
		error("%s", strerror(errno));

	fclose(fp);
}

static void
usage(void)
{
	fputs("usage: objdump file ...\n", stderr);
	exit(1);
}

int
main(int argc, char *argv[])
{
	ARGBEGIN {
	default:
		usage();
	} ARGEND

	if (argc == 0)
		dump("a.out");
	else while (*argv) {
		dump(*argv++);
	}

	if (fclose(stdout) == EOF) {
		fprintf(stderr,
		        "objdump: writing output: %s\n",
		        strerror(errno));
		return EXIT_FAILURE;
	}

	return status;
}