XFire adoption (crashes on login, no 64bit)

git-svn-id: http://svn.miranda-ng.org/main/trunk@2212 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 567 insertions, 0 deletions

diff --git a/protocols/Xfire/src/Xfire_base.cpp b/protocols/Xfire/src/Xfire_base.cpp
new file mode 100644
index 0000000000..2d28b12659
--- /dev/null
+++ b/protocols/Xfire/src/Xfire_base.cpp
@@ -0,0 +1,567 @@
+#include "stdafx.h"

+

+#include "Xfire_base.h"

+

+//rechnet die einzelnen chars des strings zusammen

+BYTE Xfire_base::accStringByte(char* str){

+	BYTE temp=0;

+

+	//keins tirng? bye bye

+	if(str==NULL)

+		return 0;

+

+	for(unsigned int i=0;i<(int)strlen(str);i++)

+	{

+		temp+=str[i];

+	}

+

+	return temp;

+}

+

+//lowercased einen string

+void Xfire_base::strtolower(char*str)

+{

+	//keins tirng? bye bye

+	if(str==NULL)

+		return;

+

+	//lowercase it :)

+	for(unsigned int i=0;i<(int)strlen(str);i++)

+	{

+		str[i]=tolower(str[i]);

+	}

+}

+

+//uppercased einen string

+void Xfire_base::strtoupper(char*str)

+{

+	//keins tirng? bye bye

+	if(str==NULL)

+		return;

+

+	//lowercase it :)

+	for(unsigned int i=0;i<(int)strlen(str);i++)

+	{

+		str[i]=toupper(str[i]);

+	}

+}

+

+//setzt einen string

+void Xfire_base::setString(char*from,char**to)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(from==NULL||to==NULL)

+		return;

+

+	//stringgröße auslesen

+	int size=strlen(from);

+

+	//bestehenden zielpointer leeren

+	if(*to!=NULL)

+		delete[] *to;

+

+	//neuen string anlegen

+	*to=new char[size+1];

+

+	//string in neues array kopieren

+	strcpy_s(*to,size+1,from);

+}

+

+//setzt einen string

+void Xfire_base::appendString(char*from,char**to)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(from==NULL||to==NULL||*to==NULL)

+		return;

+

+	//stringgröße auslesen

+	int size=strlen(from);

+	int size2=strlen(*to);

+

+	//temporären pointer anlegen

+	char* append=new char[size+size2+1];

+

+	//string in neues array kopieren

+	strcpy_s(append,size+size2+1,*to);

+	//zusätzlichen stirng anhängen

+	strcat_s(append,size+size2+1,from);

+	//altes to entfernen

+	delete[] *to;

+	//appendstring zuordnen

+	*to=append;

+}

+

+//liest einen stringval aus der db und setzt einen string für

+void Xfire_base::readStringfromDB(char*name,unsigned int dbid,char**to)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL||to==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	if(!DBGetContactSettingTString(NULL, protocolname, temp,&dbv))

+	{

+		//string setzen

+		setString(dbv.pszVal,to);

+		//dbval wieder freigeben

+		DBFreeVariant(&dbv);

+	}

+}

+

+//liest einen stringval aus der db welches unterid hat und setzt einen string für

+void Xfire_base::readStringfromDB(char*name,unsigned int dbid,int id,char**to)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL||to==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i_%i",name,dbid,id);

+	if(!DBGetContactSettingTString(NULL, protocolname, temp,&dbv))

+	{

+		//string setzen

+		setString(dbv.pszVal,to);

+		//dbval wieder freigeben

+		DBFreeVariant(&dbv);

+	}

+}

+

+//schreibt einen stringval in die db welche unterid hat

+void Xfire_base::writeStringtoDB(char*name,unsigned int dbid,int id,char*val)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL||val==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i_%i",name,dbid,id);

+	DBWriteContactSettingTString(NULL, protocolname, temp,val);

+}

+

+//schreibt einen stringval in die db welche unterid hat

+void Xfire_base::writeStringtoDB(char*name,unsigned int dbid,char*val)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL||val==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	DBWriteContactSettingTString(NULL, protocolname, temp,val);

+}

+

+//schreibt einen bytewert in die db

+void Xfire_base::writeBytetoDB(char*name,unsigned int dbid,int val)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	DBWriteContactSettingByte(NULL, protocolname, temp, val);

+}

+

+//schreibt einen wordwert in die db

+void Xfire_base::writeWordtoDB(char*name,unsigned int dbid,int val)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL)

+		return;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	DBWriteContactSettingWord(NULL, protocolname, temp, val);

+}

+

+

+//liest einen byteval aus der db und gibt es zurück

+unsigned char Xfire_base::readBytefromDB(char*name,unsigned int dbid,int defaultval)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL)

+		return 0;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	return DBGetContactSettingByte(NULL, protocolname, temp, defaultval);

+}

+

+//liest einen wordval aus der db und gibt es zurück

+unsigned int Xfire_base::readWordfromDB(char*name,unsigned int dbid,int defaultval)

+{

+	//keine quelle, kein ziel? dann nix machen

+	if(name==NULL)

+		return 0;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	return DBGetContactSettingWord(NULL, protocolname, temp, defaultval);

+}

+

+//entfernt einen dbeintrag

+BOOL Xfire_base::removeDBEntry(char*name,unsigned int dbid)

+{

+	//kein name?

+	if(name==NULL)

+		return 0;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i",name,dbid);

+	

+	//eintrag entfernen

+	if(!DBGetContactSetting(NULL, protocolname, temp,&dbv))

+	{

+		DBFreeVariant(&dbv);

+		DBDeleteContactSetting(NULL, protocolname, temp);

+

+		return TRUE;

+	}

+	return FALSE;

+}

+

+//entfernt einen dbeintrag welche unterid's hat

+BOOL Xfire_base::removeDBEntry(char*name,unsigned int dbid,int id)

+{

+	//kein name?

+	if(name==NULL)

+		return 0;

+

+	//wert aus der dblesen

+	sprintf_s(temp,128,"%s_%i_%i",name,dbid,id);

+	

+	//eintrag entfernen

+	if(!DBGetContactSetting(NULL, protocolname, temp,&dbv))

+	{

+		DBFreeVariant(&dbv);

+		DBDeleteContactSetting(NULL, protocolname, temp);

+

+		return TRUE;

+	}

+	return FALSE;

+}

+

+//sucht innerhalb eines strings ein anderen string und liefert true zurück wenn gefunden

+BOOL Xfire_base::inString(char*str,char*search,char**pos) {

+	//leere pointer?, dann FALSE zurück

+	if(str==NULL||search==NULL)

+	{

+		//poszeiger, falls übergeben, auf NULL setzen

+		if(pos) *pos=NULL; 

+		return FALSE;

+	}

+

+	//ist der gesuchte string größer, wie der string wo gesucht werden soll? dann FALSE zurück

+	unsigned int sizeofsearch=strlen(search);

+	if(sizeofsearch>strlen(str))

+	{

+		//poszeiger, falls übergeben, auf NULL setzen

+		if(pos) *pos=NULL; 

+		return FALSE;

+	}

+

+	char* src=str;

+	char* s=search;

+

+	while(*src!=0)

+	{

+		if(*src==*s) //gleich, dann zum nächsten buchstaben springen

+			s++;

+		else if(*s==0) //string ende erreicht? dann true

+		{

+			//poszeiger mit aktueller pos füllen, da position gefunden

+			if(pos) *pos=src-sizeofsearch;

+			return TRUE;

+		}

+		else //anderer biuchstabe? dann wieder zurück zum anfangsbuchstaben

+			s=search;

+		src++;

+	}

+	if(*s==0) //string ende erreicht? dann true

+	{

+		//poszeiger mit aktueller pos füllen, da position gefunden

+		if(pos) *pos=src-sizeofsearch;

+		return TRUE;

+	}

+

+	//poszeiger, falls übergeben, auf NULL setzen

+	if(pos) *pos=NULL; 

+	//nix gefunden, FALSE

+	return FALSE;

+}

+

+void Xfire_base::strreplace(char*search,char*replace,char**data) {

+	//leere pointer?, dann zurück

+	if(replace==NULL||search==NULL||data==NULL||*data==NULL)

+	{

+		return;

+	}

+

+	char* pos=NULL;

+	//gesuchten string suchen

+	if(this->inString(*data,search,&pos))

+	{

+		//gefunden? dann replace

+		*pos=0;

+		char* newdata=NULL;

+		//alles vorm gefunden anhängen

+		this->setString(*data,&newdata);

+		//ersetzendes anhängen

+		this->appendString(replace,&newdata);

+		//poszeiger um die größe des zusuchenden strings erhöhen

+		pos+=strlen(search);

+		//rest anhängen

+		this->appendString(pos,&newdata);

+		//alten string löschen

+		delete[] *data;

+		*data=NULL;

+		//neuen auf diesen setzen

+		this->setString(newdata,data);

+		//temporären newdata löschen

+		delete[] newdata;

+	}

+}

+

+//stringvergleich mit wildcards

+BOOL Xfire_base::wildcmp(const char*search,const char *text) {

+	//keine gültigen strings, dann abbruch

+	if(search==NULL || text==NULL || *text==0 || *search==0)

+		return FALSE;

+

+	//wildcardmodus

+	int wildc=0;

+

+	do {

+		//wilcard gefunden?

+		if(*search=='*')

+		{

+			//wildcardmodus an

+			wildc=1;

+			//nächsten suchzeichen

+			search++;

+			//wenn searchzeichen 0, dann 1 zurückgeben, da der rest des searchstings egal ist

+			if(*search==0)

+				return TRUE;

+		}

+

+		//prüfe searchzeichen mit textzeichen, aber nut wenn kein wildcardmodus aktiv ist

+		if(*search!=*text && !wildc)

+			return FALSE;

+

+		//kein wildcardmodus

+		if(!wildc)

+		{	

+			//nächstes suchzeichen

+			search++;

+		}

+		//wenn suchzeichen und textzeichen gleich ist

+		else if(*search==*text)

+		{

+			//den wildcardmodus abschalten

+			wildc=0;

+			//nächstes suchzeichen

+			search++;

+		}

+		//nächstes textzeichen

+		text++;

+		//wenn textende erreicht und suchzeichen noch vorhanden, dann 0 zurückgegebn

+		if(*text==0 && *search!=0)

+			return FALSE;

+	}

+	//solange weiter bis kein suchzeichen mehr vorhanden is

+	while(*search!=0);

+

+	//textzeichen übrig 0 zurück

+	if(*text!=0)

+		return FALSE;

+

+	//volle übereinstimmung

+	return TRUE;

+}

+

+//wrapper wenn nur gameid angegeben

+BOOL Xfire_base::getIniValue(unsigned int gameid,const char* valname,char*out,int sizeofout) {

+	return Xfire_base::getIniValue(gameid,0,valname,out,sizeofout);

+}

+

+

+//läd einen eintrag aus der ini

+BOOL Xfire_base::getIniValue(unsigned int gameid,unsigned int subid,const char* valname,char*out,int sizeofout) {

+	//kein ziel oder kein variablenname, dann FALSE zurück

+	if(!out || !valname)

+		return FALSE;

+

+	char idstring[15];

+	char path[MAX_PATH];

+

+	//pfad einlesen

+	if(!getIniPath(path))

+		return FALSE; //kein pfad bug?!?!

+

+	if(subid==0) {

+		sprintf_s(idstring,15,"%d",gameid);

+

+		if(xfire_GetPrivateProfileString(idstring, valname, "", out, sizeofout, path))

+			return TRUE;

+

+		subid++;

+	}

+

+	sprintf_s(idstring,15,"%d_%d",gameid,subid);

+

+	if(xfire_GetPrivateProfileString(idstring, valname, "", out, sizeofout, path))

+		return TRUE;

+

+	return FALSE;	

+}

+

+BOOL Xfire_base::getIniPath(char*path) {

+	//kein ziel abbruch

+	if(!path)

+		return FALSE;

+

+	FoldersGetCustomPath( XFireWorkingFolder, path, MAX_PATH, "" );

+	strcat_s(path,MAX_PATH,"\\");

+	strcat_s(path,MAX_PATH,"xfire_games.ini");

+

+	return TRUE;

+}

+

+BOOL Xfire_base::getIconPath(char*path) {

+	//kein ziel abbruch

+	if(!path)

+		return FALSE;

+

+	FoldersGetCustomPath( XFireIconFolder, path, MAX_PATH, "" );

+	strcat_s(path,MAX_PATH,"\\");

+

+	return TRUE;

+}

+

+BOOL Xfire_base::getGamename(unsigned int gameid,char* out,int outsize){

+	//kein ziel

+	if(!out)

+		return FALSE;

+

+	if(!getIniValue(gameid,"LongName",out,outsize))

+	{

+		//customnamen laden, wenn vorhanden

+		DBVARIANT dbv;

+		char dbstr[80]="";

+		sprintf_s(dbstr,XFIRE_MAXSIZEOFGAMENAME,"customgamename_%d",gameid);

+		if(!DBGetContactSetting(NULL,protocolname,dbstr,&dbv)) {

+			sprintf_s(out,outsize,"%s",dbv.pszVal);

+			DBFreeVariant(&dbv);

+			return TRUE;

+		}

+		else

+			return FALSE;

+	}

+	return TRUE;

+}

+

+//wandelt einen buffer mit größe in ein hicon mit hilfe von gdi+ um

+HICON Xfire_base::createHICONfromdata(LPVOID data,unsigned int size) {

+	//zielspeichern anlegen

+	HGLOBAL buffer=GlobalAlloc(GMEM_MOVEABLE, size); 

+	if(buffer) {

+		LPVOID data2=GlobalLock(buffer);

+		if(data2) {

+			CopyMemory(data2, data, size); 

+			

+			IStream* stream=NULL;

+			if(CreateStreamOnHGlobal(data2,FALSE,&stream)== S_OK)

+			{

+				HICON hicon=NULL;

+				Gdiplus::Bitmap image(stream);

+

+				image.GetHICON(&hicon);

+				stream->Release();

+

+				GlobalUnlock(buffer);

+				GlobalFree(buffer);

+

+				return hicon;

+			}

+			GlobalUnlock(buffer);

+		}

+		GlobalFree(buffer);

+	}

+	return NULL;

+}

+

+//wandelt einen buffer mit größe in ein hicon mit hilfe von gdi+ um

+HBITMAP Xfire_base::createHBITMAPfromdata(LPVOID data,unsigned int size) {

+	//zielspeichern anlegen

+	HGLOBAL buffer=GlobalAlloc(GMEM_MOVEABLE, size); 

+	if(buffer) {

+		LPVOID data2=GlobalLock(buffer);

+		if(data2) {

+			CopyMemory(data2, data, size); 

+			

+			IStream* stream=NULL;

+			if(CreateStreamOnHGlobal(data2,FALSE,&stream)== S_OK)

+			{

+				HBITMAP hbitmap=NULL;

+				Gdiplus::Bitmap image(stream);

+

+				image.GetHBITMAP(0,&hbitmap);

+				stream->Release();

+

+				GlobalUnlock(buffer);

+				GlobalFree(buffer);

+

+				return hbitmap;

+			}

+			GlobalUnlock(buffer);

+		}

+		GlobalFree(buffer);

+	}

+	return NULL;

+}

+

+//prüft ob processid noch gültig is

+BOOL Xfire_base::isValidPid(DWORD pid) {

+	DWORD aProcesses[1024],cbNeeded,cProcesses;

+

+	if(pid==NULL)

+		return FALSE;

+

+	if(!EnumProcesses(aProcesses,sizeof(aProcesses),&cbNeeded))

+		return FALSE;

+

+	cProcesses = cbNeeded / sizeof(DWORD);

+

+	for ( unsigned int i = 0; i < cProcesses; i++ )

+		if(aProcesses[i]==pid)

+		{

+			return TRUE;

+		}

+

+	return FALSE;

+}

+

+//sucht nach einen process und liefert die pid

+BOOL Xfire_base::getPidByProcessName(char*name,DWORD*pid) {

+	if(pid==NULL||name==NULL)

+		return FALSE;

+

+	HANDLE hSnapShot = CreateToolhelp32Snapshot ( TH32CS_SNAPALL, 0);

+	PROCESSENTRY32* processInfo = new PROCESSENTRY32;

+	processInfo->dwSize = sizeof ( PROCESSENTRY32);

+

+	while ( Process32Next ( hSnapShot,processInfo ) != FALSE)

+	{

+		if(processInfo->th32ProcessID!=0) {

+			if(_stricmp(processInfo->szExeFile,name)==0)

+			{

+				*pid=processInfo->th32ProcessID;

+				CloseHandle ( hSnapShot);

+				return TRUE;

+			}

+		}

+	}

+	CloseHandle ( hSnapShot);

+	return FALSE;

+}