// Copyright © 2010 sss
// 
// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
// 
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
// 
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.


#include "commonheaders.h"


TCHAR* __stdcall UniGetContactSettingUtf(HANDLE hContact, const char *szModule,const char* szSetting, TCHAR* szDef)
{
  DBVARIANT dbv = {DBVT_DELETED};
  TCHAR* szRes;
  if (DBGetContactSettingTString(hContact, szModule, szSetting, &dbv))
	 return _tcsdup(szDef);
  if(dbv.pszVal)
	  szRes = _tcsdup(dbv.ptszVal);
  DBFreeVariant(&dbv);
  return szRes;
}

extern list <JabberAccount*> Accounts;

int GetJabberInterface(WPARAM, LPARAM) //get interface for all jabber accounts, options later
{
	int count = 0;
	PROTOACCOUNT **accounts;
	ProtoEnumAccounts(&count, &accounts);
	list <JabberAccount*>::iterator p;
	Accounts.clear();
	Accounts.push_back(new JabberAccount);
	p = Accounts.begin();
	(*p)->setAccountNumber(0);
	for(int i = 0; i < count; i++) //get only jabber accounts from all accounts
	{
		IJabberInterface *JIftmp = getJabberApi(accounts[i]->szModuleName);
		int a = 0;
		if(JIftmp)
		{
			(*p)->setJabberInterface(JIftmp);
			(*p)->setAccountName(accounts[i]->tszAccountName);
			(*p)->setAccountNumber(a);
			(*p)->setIqHandler(INVALID_HANDLE_VALUE);
			(*p)->setMessageHandler(INVALID_HANDLE_VALUE);
			(*p)->setPrescenseHandler(INVALID_HANDLE_VALUE);
			a++;
			p++;
			Accounts.push_back(new JabberAccount);
		}
	}
	Accounts.pop_back();
	return 0;
}

static JABBER_HANDLER_FUNC PrescenseHandler(IJabberInterface *ji, HXML node, void *pUserData);
static JABBER_HANDLER_FUNC MessageHandler(IJabberInterface *ji, HXML node, void *pUserData);
static JABBER_HANDLER_FUNC IqHandler(IJabberInterface *ji, HXML node, void *pUserData);


int HandleDbNewContact(WPARAM w, LPARAM l)
{
	list <JabberAccount*>::iterator p = Accounts.begin();
	for(unsigned int i = 0; i < Accounts.size(); i++, p++)
	{
		if(!(*p))
			break;
		LPTSTR tmp = (*p)->getJabberInterface()->Sys()->ContactToJID(HANDLE(w));
		if(tmp)
		{
			if(_tcsstr(_T(JUICK_JID), tmp))
			{
				if((*p)->getPrescenseHandler() == INVALID_HANDLE_VALUE && (*p)->getMessageHandler() == INVALID_HANDLE_VALUE && (*p)->getIqHandler() == INVALID_HANDLE_VALUE)
				{
					(*p)->setPrescenseHandler((*p)->getJabberInterface()->Net()->AddPresenceHandler((JABBER_HANDLER_FUNC)PrescenseHandler));
					(*p)->setMessageHandler((*p)->getJabberInterface()->Net()->AddMessageHandler((JABBER_HANDLER_FUNC)MessageHandler, JABBER_MESSAGE_TYPE_ANY, 0, 0));
					(*p)->setIqHandler((*p)->getJabberInterface()->Net()->AddIqHandler((JABBER_HANDLER_FUNC)IqHandler, JABBER_IQ_TYPE_ANY, 0, 0));
				}
			}
		}
	}
	return 0;
}
int HandleDbContactDeleted(WPARAM w, LPARAM l)
{
	list <JabberAccount*>::iterator p = Accounts.begin();
	for(unsigned int i = 0; i < Accounts.size(); i++, p++)
	{
		if(!(*p))
			break;
		LPTSTR tmp = (*p)->getJabberInterface()->Sys()->ContactToJID(HANDLE(w));
		if(tmp)
		{
			if(_tcsstr(_T(JUICK_JID), tmp))
			{
				if((*p)->getPrescenseHandler() != INVALID_HANDLE_VALUE && (*p)->getMessageHandler() != INVALID_HANDLE_VALUE && (*p)->getIqHandler() != INVALID_HANDLE_VALUE)
				{
					(*p)->getJabberInterface()->Net()->RemoveHandler((*p)->getPrescenseHandler());
					(*p)->getJabberInterface()->Net()->RemoveHandler((*p)->getMessageHandler());
					(*p)->getJabberInterface()->Net()->RemoveHandler((*p)->getIqHandler());			
				}
			}
		}
	}
	return 0;
}

void FindJuickAccounts()
{
	list <JabberAccount*>::iterator p = Accounts.begin();	
	for(unsigned int i = 0; i < Accounts.size(); i++, p++)
	{
		if(!(*p))
			break;
		if((*p)->getJabberInterface()->Sys()->ContactFromJID(_T(JUICK_JID))) //i should use this contact handler
		{
			if((*p)->getPrescenseHandler() == INVALID_HANDLE_VALUE && (*p)->getMessageHandler() == INVALID_HANDLE_VALUE && (*p)->getIqHandler() == INVALID_HANDLE_VALUE)
			{
				(*p)->setPrescenseHandler((*p)->getJabberInterface()->Net()->AddPresenceHandler((JABBER_HANDLER_FUNC)PrescenseHandler));
				(*p)->setMessageHandler((*p)->getJabberInterface()->Net()->AddMessageHandler((JABBER_HANDLER_FUNC)MessageHandler, JABBER_MESSAGE_TYPE_ANY, 0, 0));
				(*p)->setIqHandler((*p)->getJabberInterface()->Net()->AddIqHandler((JABBER_HANDLER_FUNC)IqHandler, JABBER_IQ_TYPE_ANY, 0, 0));
			}
		}
	}
}


static JABBER_HANDLER_FUNC PrescenseHandler(IJabberInterface *ji, HXML node, void *pUserData)
{
	return FALSE;
}

static JABBER_HANDLER_FUNC MessageHandler(IJabberInterface *ji, HXML node, void *pUserData)
{
	if(!_tcsstr(xi.getAttr(node, 0), _T(JUICK_JID)))
		return FALSE;

	return FALSE;
}

static JABBER_HANDLER_FUNC IqHandler(IJabberInterface *ji, HXML node, void *pUserData)
{
	return FALSE;
}

//JabberAccount class implementation

void JabberAccount::setAccountName(TCHAR *Name)
{
	AccountName = Name;
}
void JabberAccount::setAccountNumber(int Number)
{
	AccountNumber = Number;
}
void JabberAccount::setJabberInterface(IJabberInterface *JIf)
{
	JabberInterface = JIf;
}
void JabberAccount::setPrescenseHandler(HANDLE hHandler)
{
	hPrescenseHandler = hHandler;
}
void JabberAccount::setMessageHandler(HANDLE hHandler)
{
	hMessageHandler = hHandler;
}
void JabberAccount::setIqHandler(HANDLE hHandler)
{
	hIqHandler = hHandler;
}

TCHAR *JabberAccount::getAccountName()
{
	return AccountName;
}
int JabberAccount::getAccountNumber()
{
	return AccountNumber;
}
IJabberInterface *JabberAccount::getJabberInterface()
{
	return JabberInterface;
}
HANDLE JabberAccount::getMessageHandler()
{
	return hMessageHandler;
}
HANDLE JabberAccount::getPrescenseHandler()
{
	return hPrescenseHandler;
}
HANDLE JabberAccount::getIqHandler()
{
	return hIqHandler;
}
HANDLE JabberAccount::getJuickContact()
{
	HANDLE hContact;
	if(hContact = JabberInterface->Sys()->ContactFromJID(_T(JUICK_JID)))
		return hContact;
	return INVALID_HANDLE_VALUE; //TODO: implement this
}

//end JabberAccount class implementation


char *date()
{
	static char d[11];
	char *tmp = __DATE__, m[4], mn[3] = "01";
	m[0]=tmp[0];
	m[1]=tmp[1];
	m[2]=tmp[2];
	if(strstr(m,"Jan"))
		strcpy(mn,"01");
	else if(strstr(m,"Feb"))
		strcpy(mn,"02");
	else if(strstr(m,"Mar"))
		strcpy(mn,"03");
	else if(strstr(m,"Apr"))
		strcpy(mn,"04");
	else if(strstr(m,"May"))
		strcpy(mn,"05");
	else if(strstr(m,"Jun"))
		strcpy(mn,"06");
	else if(strstr(m,"Jul"))
		strcpy(mn,"07");
	else if(strstr(m,"Aug"))
		strcpy(mn,"08");
	else if(strstr(m,"Sep"))
		strcpy(mn,"09");
	else if(strstr(m,"Oct"))
		strcpy(mn,"10");
	else if(strstr(m,"Nov"))
		strcpy(mn,"11");
	else if(strstr(m,"Dec"))
		strcpy(mn,"12");
	d[0]=tmp[7];
	d[1]=tmp[8];
	d[2]=tmp[9];
	d[3]=tmp[10];
	d[4]='.';
	d[5]=mn[0];
	d[6]=mn[1];
	d[7]='.';
	if (tmp[4] == ' ')
		d[8] = '0';
	else
		d[8]=tmp[4];
	d[9]=tmp[5];
	return d;
}