//NetBot was made by Adar Grof, don't fuck with me, seriously!
#include "Network.h"


const char HEADREQ1[]=
{
    "HEAD / HTTP/1.1\r\n"           // Get root index from server
    "Host: "                        // Specify host name used
};
const char HEADREQ2[]=
{
    "\r\n"                          // End hostname header from part1
    "User-agent: HeadReqSample\r\n" // Specify user agent
    "Connection: close\r\n"         // Close connection after response
    "\r\n"                          // Empty line indicating end of request
};
const char USER[]=
{
	"USER NetWatcherX50 tolmoon tolsun : Mr Roboto\r\n"
};
const char NICK[] = {"NICK NetBot2.0\n\r" "NICKSERV IDENTIFY The_Architect noobay11\r\n"};
const char JOIN[] = "JOIN #Elysian_Shadows\n\r";
const char JUNO[] = "PRIVMSG #Elysian_Shadows : Juno Reactor Rulez\n\r";


int main(int argc, char* argv[])
{

	SetConsoleTitle(L"NetBot V1.0");
	sockaddr_in sockAddr;
	SOCKET mySocket;
	WSAData wsaData;
	cout<<"initializing socket...";
	
	mySocket = INVALID_SOCKET;
	WSAStartup(MAKEWORD(2,2),&wsaData);
    if(mySocket != SOCKET_ERROR)
		cout<<"done"<<endl;

	mySocket = socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);

	sockAddr.sin_port = htons(IRCport);
	sockAddr.sin_family = AF_INET;
	sockAddr.sin_addr.S_un.S_addr = ResolveHost(FreenodeHost);

	cout<<"connecting to Server...";
	if (connect(mySocket, (SOCKADDR*)(&sockAddr), sizeof(sockAddr))!=0)
		throw HRException("could not connect.");
	
	cout << "Connection Established\n";


	if (send(mySocket, HEADREQ1, sizeof(HEADREQ1)-1, 0)==SOCKET_ERROR)
		throw HRException("failed to send data.");
	

	
	if (send(mySocket, HEADREQ2, sizeof(HEADREQ2)-1, 0)==SOCKET_ERROR)
		throw HRException("failed to send data.");
	
 
	send(mySocket,USER, strlen(USER), 0);  

	send(mySocket,NICK, strlen(NICK),0);

	send(mySocket,JOIN,strlen(JOIN),0);
	while(true)
	{      
 
        
		int retval;
		char rcvBuf[200];
		char *prcvBuf = rcvBuf;
		retval = recv(mySocket,rcvBuf,sizeof(rcvBuf)-1,0);
	
		/*if(strtok(rcvBuf,"PING")==true)
		{
			cout<<"PINGED\r\n";
			string(rcvBuf).append("PONG \r\n");
			send(mySocket,string(rcvBuf).c_str(),sizeof(rcvBuf)-1,0);

		}*/
		if(CheckString(8,"!net die",sizeof(rcvBuf),rcvBuf)==true)
		{
			break;
		}
		if(CheckString(12,"Juno Reactor",sizeof(rcvBuf),rcvBuf)==true)
		{
			send(mySocket,JUNO,sizeof(JUNO),0);
		}
		else if(retval == 0)
		{
			//do shit
		}
		else if(retval == SOCKET_ERROR)
		{
			throw HRException("failed to recieve");
		}
		else
		{
			rcvBuf[retval]=0;
			cout<<rcvBuf;
		}

	}





	 

	closesocket(mySocket);
	WSACleanup();
}



unsigned long ResolveHost(const char *pServerName)
{
	HOSTENT *pHostent;
	 // Get hostent structure for hostname:
	pHostent = gethostbyname(pServerName);
    // Extract primary IP address from hostent structure:
	if(pHostent->h_addr_list && pHostent->h_addr_list[0])
        return *reinterpret_cast<unsigned long*>(pHostent->h_addr_list[0]);
	return 0;
}

bool CheckString(int Word_Length,char word[],int String_Length,char string[])
{

	unsigned f;
	unsigned c;
	short counter;
	if(String_Length<Word_Length)
		return false;
	//first loop in the length of the word, to pass on all the characters in the word
	for(f=0;f<(String_Length-Word_Length);f++)
	{
		//reset counter
		counter = 0;
		//second loop to loop through all the letters
		for(c=0;c<Word_Length;c++)
		{
			if(string[f+c]==word[c])
				counter ++;
			if(counter==Word_Length)
				return true;
		}		
	}

	return false;
}