#include "CandyGame.h"
#include <iostream>
#include <stdlib.h>


CandyGame::CandyGame(apstring seed) {
	
	NUM_BOARDS = 4;
	if (seed.length() == 0) {
		cerr << "CandyGame class: construction violation" << endl;
		exit(-1);
	}
	
//    seed = seed.trim();
	int firstNonBlank = 0;
	while (firstNonBlank<seed.length() && seed[firstNonBlank]==' ') {
		firstNonBlank++;
	}
	int lastNonBlank = seed.length()-1;
	while (lastNonBlank >= 0 && seed[lastNonBlank]==' ') {
		lastNonBlank--;
	}
	seed = seed.substr(firstNonBlank, lastNonBlank-firstNonBlank+1);
	
	
	
	while (seed.length() < 10) {
		seed += seed;
	}
		
	// Create board
	int boardNum = ((int) seed[0]) % NUM_BOARDS;
	createBoard(boardNum);

	// Create colors
	createColors();		
	
	// Create deck
	createDeck(seed);
	deckPos = ((int) seed[seed.length()-1]) % deck.length();

}

int CandyGame::findSquare(const apstring & card, int pos) const {
	for (int i=pos+1; i<board.length(); i++) {
		if (card == board[i])
			return i;
	}
	return -1;
}
	
int CandyGame::boardSize() const {
	return board.length();
}
	
apstring CandyGame::nextCard() {
	apstring ans = deck[deckPos];
	deckPos = (deckPos+1) % deck.length();
	return ans;
}
	
void CandyGame::printBoard() const {
	cout << "[";
	int i;
	for (i=0; i<board.length()-1;i++)
		cout << board[i] << ", ";
	cout << board[i] << "]" << endl;
}
	
void CandyGame::printDeck() const {
	cout << "[";
	int i;
	for (i=deckPos; i<deck.length();i++) {
		cout << deck[i] << ", ";
		if (i%10 == 0)
			cout << endl;
	}
	for (int k=0; k<deckPos-1; k++) {
		cout << deck[k] << ", ";
		if (k%10 == 0) 
			cout << endl;
	}
	cout << deck[deckPos-1] << "]" << endl;
	cout << "deckPos(" << deckPos << ")" << endl;
}
	
void CandyGame::createBoard(int boardNum) {
	switch (boardNum) {
		case 0: // the "real" board
			board.resize(134);
			board[  0] = "red"; // Cycle 1
			board[  1] = "purple";
			board[  2] = "yellow";
			board[  3] = "blue";
			board[  4] = "orange";
			board[  5] = "green";
			board[  6] = "red"; // Cycle 2
			board[  7] = "purple";
			board[  8] = "plumpy plum";
			board[  9] = "yellow";
			board[ 10] = "blue";
			board[ 11] = "orange";
			board[ 12] = "green";
			board[ 13] = "red"; // Cycle 3
			board[ 14] = "purple";
			board[ 15] = "yellow";
			board[ 16] = "blue";
			board[ 17] = "mr. mint";
			board[ 18] = "orange";
			board[ 19] = "green";
			board[ 20] = "red"; // Cycle 4
			board[ 21] = "purple";
			board[ 22] = "yellow";
			board[ 23] = "blue";
			board[ 24] = "orange";
			board[ 25] = "green";
			board[ 26] = "red"; // Cycle 5
			board[ 27] = "purple";
			board[ 28] = "yellow";
			board[ 29] = "blue";
			board[ 30] = "orange";
			board[ 31] = "green";
			board[ 32] = "red"; // Cycle 6
			board[ 33] = "purple";
			board[ 34] = "yellow";
			board[ 35] = "blue";
			board[ 36] = "orange";
			board[ 37] = "green";
			board[ 38] = "red"; // Cycle 7
			board[ 39] = "purple";
			board[ 40] = "yellow";
			board[ 41] = "blue";
			board[ 42] = "jolly gumdrop";
			board[ 43] = "orange";
			board[ 44] = "green";
			board[ 45] = "red"; // Cycle 8
			board[ 46] = "purple";
			board[ 47] = "yellow";
			board[ 48] = "blue";
			board[ 49] = "orange";
			board[ 50] = "green";
			board[ 51] = "red"; // Cycle 9
			board[ 52] = "purple";
			board[ 53] = "yellow";
			board[ 54] = "blue";
			board[ 55] = "orange";
			board[ 56] = "green";
			board[ 57] = "red"; // Cycle 10
			board[ 58] = "purple";
			board[ 59] = "yellow";
			board[ 60] = "blue";
			board[ 61] = "orange";
			board[ 62] = "green";
			board[ 63] = "red"; // Cycle 11
			board[ 64] = "purple";
			board[ 65] = "yellow";
			board[ 66] = "blue";
			board[ 67] = "orange";
			board[ 68] = "green";
			board[ 69] = "red"; // Cycle 12
			board[ 70] = "purple";
			board[ 71] = "yellow";
			board[ 72] = "blue";
			board[ 73] = "orange";
			board[ 74] = "gramma nutt";
			board[ 75] = "green";
			board[ 76] = "red"; // Cycle 13
			board[ 77] = "purple";
			board[ 78] = "yellow";
			board[ 79] = "blue";
			board[ 80] = "orange";
			board[ 81] = "green";
			board[ 82] = "red"; // Cycle 14
			board[ 83] = "purple";
			board[ 84] = "yellow";
			board[ 85] = "blue";
			board[ 86] = "orange";
			board[ 87] = "green";
			board[ 88] = "red"; // Cycle 15
			board[ 89] = "purple";
			board[ 90] = "yellow";
			board[ 91] = "blue";
			board[ 92] = "orange";
			board[ 93] = "green";
			board[ 94] = "red"; // Cycle 16
			board[ 95] = "princess lolly";
			board[ 96] = "purple";
			board[ 97] = "yellow";
			board[ 98] = "blue";
			board[ 99] = "orange";
			board[100] = "green";
			board[101] = "red"; // Cycle 17
			board[102] = "purple";
			board[103] = "queen frostine";
			board[104] = "yellow";
			board[105] = "blue";
			board[106] = "orange";
			board[107] = "green";
			board[108] = "red"; // Cycle 18
			board[109] = "purple";
			board[110] = "yellow";
			board[111] = "blue";
			board[112] = "orange";
			board[113] = "green";
			board[114] = "red"; // Cycle 19
			board[115] = "purple";
			board[116] = "yellow";
			board[117] = "blue";
			board[118] = "orange";
			board[119] = "green";
			board[120] = "red"; // Cycle 20
			board[121] = "purple";
			board[122] = "yellow";
			board[123] = "blue";
			board[124] = "orange";
			board[125] = "green";
			board[126] = "red"; // Cycle 21
			board[127] = "purple";
			board[128] = "yellow";
			board[129] = "blue";
			board[130] = "orange";
			board[131] = "green";
			board[132] = "red"; // Cycle 22
			board[133] = "purple";
			break;
		case 1:
			board.resize(18);
			board[ 0] = "plumpy plum";
			board[ 1] = "mr. mint";
			board[ 2] = "jolly gumdrop";
			board[ 3] = "gramma nutt";
			board[ 4] = "princess lolly";
			board[ 5] = "queen frostine";
			board[ 6] = "yellow";
			board[ 7] = "blue";
			board[ 8] = "orange";
			board[ 9] = "green";
			board[10] = "red";
			board[11] = "purple";
			board[12] = "yellow";
			board[13] = "blue";
			board[14] = "orange";
			board[15] = "green";
			board[16] = "red";
			board[17] = "purple";
			break;
		case 2:
			board.resize(30);
			board[ 0] = "yellow";
			board[ 1] = "blue";
			board[ 2] = "orange";
			board[ 3] = "green";
			board[ 4] = "red";
			board[ 5] = "purple";
			board[ 6] = "yellow";
			board[ 7] = "blue";
			board[ 8] = "orange";
			board[ 9] = "green";
			board[10] = "red";
			board[11] = "purple";
			board[12] = "yellow";
			board[13] = "blue";
			board[14] = "orange";
			board[15] = "green";
			board[16] = "red";
			board[17] = "purple";
			board[18] = "yellow";
			board[19] = "blue";
			board[20] = "orange";
			board[21] = "green";
			board[22] = "red";
			board[23] = "purple";
			board[24] = "plumpy plum";
			board[25] = "mr. mint";
			board[26] = "jolly gumdrop";
			board[27] = "gramma nutt";
			board[28] = "princess lolly";
			board[29] = "queen frostine";
			break;

		case 3:
			board.resize(10);
			board[0] = "red";
			board[1] = "red";
			board[2] = "red";
			board[3] = "red";
			board[4] = "plumpy plum";
			board[5] = "mr. mint";
			board[6] = "jolly gumdrop";
			board[7] = "gramma nutt";
			board[8] = "princess lolly";
			board[9] = "queen frostine";
			break;
	}
}
	
void CandyGame::createDeck(const apstring & seed) {
	
	deck.resize(31);
	deck[ 0] = "red"; 
	deck[ 1] = "red";
	deck[ 2] = "blue";
	deck[ 3] = "blue";
	deck[ 4] = "purple";
	deck[ 5] = "green";
	deck[ 6] = "red"; 
	deck[ 7] = "purple";
	deck[ 8] = "yellow";
	deck[ 9] = "blue";
	deck[10] = "orange";
	deck[11] = "red";
	deck[12] = "yellow";
	deck[13] = "yellow";
	deck[14] = "yellow";
	deck[15] = "green";
	deck[16] = "orange";
	deck[17] = "green";
	deck[18] = "orange";
	deck[19] = "purple";
	deck[20] = "purple";
	deck[21] = "blue";
	deck[22] = "orange";
	deck[23] = "green";
	deck[24] = "yellow";
	deckCap = 25;
		
	addAtPos(seed[1], "plumpy plum");
	addAtPos(seed[2], "mr. mint");
	addAtPos(seed[3], "jolly gumdrop");
	addAtPos(seed[4], "gramma nutt");
	addAtPos(seed[5], "princess lolly");
	addAtPos(seed[6], "queen frostine");

	for (int j=0; j<deck.length(); j++) {
		if (((j%4)==0) && isColor(deck[j])) {
			deck[j] = "double " + deck[j];
		}
	}
}
	
void CandyGame::addAtPos(char posLocator, const apstring & card) {
	int x = (((int) posLocator) - ((int) 'A') + 1) % deck.length();
	for (int j=deckCap; j>x; j--) {
		deck[j] = deck[j-1];
	}
	deck[x] = card;
	deckCap++;
}
	
void CandyGame::createColors() {
	colors.resize(6);
	colors[0] = "red"; 
	colors[1] = "purple";
	colors[2] = "yellow";
	colors[3] = "blue";
	colors[4] = "orange";
	colors[5] = "green";
}

bool CandyGame::isColor(const apstring  & value) {
	for (int i=0; i<colors.length(); i++) {
		if (colors[i] == value) {
			return true;
		}
	}
	return false;
}


apstring CandyGame::deckToString() {
	apstring answer = "[";
	for (int i=deckPos; i<deck.length(); i++) {
		answer += deck[i] + ", ";
		if (i%10 == 0) 
			answer += "\n";
	}
	for (int k=0; k<deckPos; k++) {
		answer += deck[k] + ", ";
		if (k%10 == 0) 
			answer += "\n";
	}
		
	return answer.substr(0,answer.length()-2)+"]";
}