#include <stdio.h>
#include <stdint.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/mman.h>
#include <fcntl.h>
#include <string.h>

int main() {
	uint32_t data[320];
	uint32_t first;
	int i, j, k;
	int f;
	uint8_t* bPtr;
	
	printf("Hello, world\n");

	// Clear the screen and wait a bit
	f = open("/dev/fb0", O_RDWR);
	printf("Blacking\n");
	for (i = 0; i < 320; ++i) {
		data[i] = 0;
	}
	for (i = 0; i < 240; ++i) {
		write(f, data, 320*4);
	}
	printf("Sleeping before next step...\n");
	sleep(10);
	
	// Make screen all white and wait
	printf("Whiting\n");
	lseek(f, 0, SEEK_SET);
	for (i = 0; i < 320; ++i) {
		data[i] = 0xffffff;
	}
	for (i = 0; i < 240; ++i) {
		write(f, data, 320*4);
	}
	printf("Sleeping before next step...\n");
	sleep(10);

	// Make multi-colored, 8x8 pixel boxes
	printf("Colouring\n");	
	lseek(f, 0, SEEK_SET);
	for (i = 0; i < 10; ++i) {
		for (j = 0; j < 8; ++j) {
			data[i*32 + j] = 0x0000ff;
		}
		for (j = 0; j < 8; ++j) {
			data[i*32 + j + 8] = 0x00ff00;
		}
		for (j = 0; j < 8; ++j) {
			data[i*32 + j + 16] = 0x00ff0000;
		}
		for (j = 0; j < 8; ++j) {
			data[i*32 + j + 24] = 0x00ff00ff;
		}
	}
	for (i = 0; i < 30; ++i) {
		for (j = 0; j < 8; ++j) {
			write(f, data, 320*4);
		}
		first = data[0];
		for (j = 0; j < 312; ++j) {
			data[j] = data[j+8];
		}
		for (j = 312; j < 320; ++j) {
			data[j] = first;
		}
	}
	printf("Sleeping before next step...\n");
	sleep(10);
	close(f);
	printf("Done!\n");
}