#include <unistd.h>
#include "logan.h"

u64 r;
u64 b;
int turn;
int hP = -1, lP;
int depth;

void routine()
{
	char c;
	int quit=0;
	int cl,i;

	if(lP == 0) r = move(lP,r,b,depth);
	pboard(r,b);
	while(!quit) {
		c = fgetc(stdin);

		if(c == 0xa) continue;
		if(c == 'q') break;

		cl=c-48;
		if(0 <= cl < 8) {
			u64 e = col(r|b,cl);
			for(i = 0; i < 8; i++) {
				if(!(e & (1<<i))) break;
			}

			if(hP == 0) {
				r = tog(r,cl,i);
				pboard(r,b);
				b = move(lP,r,b,depth);
			}
			else {
				b = tog(b,cl,i);
				pboard(r,b);
				r = move(lP,r,b,depth);
			}

			pboard(r,b);
			if(eval(hP,r,b) == INT_MAX) {
				puts("you win.");
			} else if(eval(hP,r,b) == INT_MIN) {
				puts("you lose.");
			}
		} else puts("bad column! (0-6 or q to quit)");
	}
}

int main(int argc, char** argv)
{
	int opt;

	while((opt = getopt(argc, argv, ":d:rb")) != -1) {
		switch(opt) {
		case 'r': hP = 0; break;
		case 'b': hP = 1; break;
		case 'd': depth = atoi(optarg); break;
		case '?': printf("unknown option: -%c\n", optopt); break;
		case ':': printf("missing arg: -%c\n", optopt); break;
		}
	}

	if(hP == -1) {
		puts("no player chosen, terminating");
		return 0;
	}

	if(depth == 0) {
		puts("depth must be non-zero, terminating");
		return 0;
	}

	lP = !hP;
	printf("playing with depth=%d\n", depth);
	r=b=0;
	routine();
	return 0;
}