#ifndef __i386__
#  error "This program can't compile or run on non-Intel computers"
#else

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/io.h>
#include <string.h>

int main(int argc, char **argv)
{
	/* Counters. */
	unsigned int i, j, n;
	/* For ROM chips larger than 64 KB, a long integer
	 _ is needed for the global byte counter. */
	unsigned long k;
	/* The I/O address of the card. */
	unsigned int ioaddr;
	/* Storage for a byte. */
	unsigned char b;
	// tmp
	unsigned int cnt = 0;

	/* Initialize a few things to avoid compiler warnings. */
	i=0; j=0; n=0;

	/* Verify the command-line parameters; write
		_ out an usage message if needed. */
	if (argc != 3) {
		/* Exactly 2 command line parameters are needed. */
		printf("Usage: ./cromutil ioaddr burn <file\n");
		exit(-1);
	}

	/* Set the UID to root if possible. */
	setuid(0);

	/* Get port-access permissions for in{blw}/out{blw}. */
	if (iopl(3)) {
		perror("iopl()");
		exit(1);
	}

	/* Pass the I/O address of the card to a variable. */
	sscanf(argv[1],"%x",&ioaddr);

	/* Set the register window to 0. */
	outw(0x800, ioaddr+0xe);

	//
	// "burn": burn the 512 Kbit UV-EPROM's such as 27C512
	// WARNING: pull-up an OE#/VPP pin with an external +12V through at least 470 Ohm resistor!!!
	// thus limiting current to <= 25 mA
	//
	if (strcmp(argv[2], "burn") == 0)
	{
		// Loop over the bytes in pages, to allow for a progress report
		for (j = 0; j < 512; j++)
		{
			for (i = 0; i < 128; i++)
			{
				// If this program is to run on a diskless node,
				// must read in the byte _before_ changing the
				// mode of the chip, or NFS may block.
				n = read(0, &b, 1);
				// At EOF exit the inner loop.
				if (n == 0)
					break;
				if (n < 0)
				{
					perror("Input File Error");
					exit(-3);
				}

for (cnt = 0; cnt < 10; cnt++)
{
				// Calculate the address of the byte.
				k = i + 128*j;
				// Program this byte.
				outl(k, ioaddr+0x4); outb(b, ioaddr+0x8);

				// Wait for the programming of this byte to complete.
				// We pulled-up OE#/VPP to +12V externally, thus we CAN'T READ! so
				// sleep 100us for burning to complete
				//while (inb(ioaddr+0x8) != b)
				//	;
				usleep(10);
}
				//usleep(100);
			}
			// At EOF exit the outer loop.
			if (n == 0)
				break;
			// Write out a progress report.
			printf("."); fflush(NULL);
		}
		// Write out an informative message.
		printf("\nWrote %ld bytes to ROM: Success\n", k);
	}
	else
	{
		printf("Usage: ./cromutil ioaddr burn <file\n");
		exit(-1);
	}

	return 0;
}

#endif /* __i386__ */