#include "stdafx.h" /* * Plugin of miranda IM(ICQ) for Communicating with users of the XFire Network. * * Copyright (C) 2010 by * dufte * * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA * * Based on J. Lawler - BaseProtocol * Herbert Poul/Beat Wolf - xfirelib * * Miranda ICQ: the free icq client for MS Windows * Copyright (C) 2000-2008 Richard Hughes, Roland Rabien & Tristan Van de Vreede * */ //xfire stuff #include "client.h" #include "xfirepacket.h" #include "loginfailedpacket.h" #include "otherloginpacket.h" #include "loginsuccesspacket.h" #include "messagepacket.h" #include "sendstatusmessagepacket.h" #include "sendmessagepacket.h" #include "invitebuddypacket.h" #include "sendacceptinvitationpacket.h" #include "senddenyinvitationpacket.h" #include "sendremovebuddypacket.h" #include "sendnickchangepacket.h" #include "sendgamestatuspacket.h" #include "sendgamestatus2packet.h" #include "dummyxfiregameresolver.h" #include "sendgameserverpacket.h" #include "recvstatusmessagepacket.h" #include "recvoldversionpacket.h" #include "packetlistener.h" #include "inviterequestpacket.h" #include "buddylistgames2packet.h" #include "dummyxfiregameresolver.h" #include "sendtypingpacket.h" #include "xfireclanpacket.h" #include "recvremovebuddypacket.h" #include "gameinfopacket.h" #include "claninvitationpacket.h" #include "xfireprefpacket.h" #include "searchbuddy.h" #include "xfirefoundbuddys.h" #include "getbuddyinfo.h" #include "buddyinfo.h" #include "variables.h" #include "passworddialog.h" #include "setnickname.h" #include "all_statusmsg.h" #include "processbuddyinfo.h" #include "recvprefspacket.h" #include "sendsidpacket.h" #include "friendsoffriendlist.h" #include "recvbuddychangednick.h" //miranda stuff #include "baseProtocol.h" #include "Xfire_gamelist.h" #include "Xfire_proxy.h" #include "Xfire_avatar_loader.h" #include "Xfire_voicechat.h" #include "variables.h" #include #include Xfire_gamelist xgamelist; Xfire_voicechat voicechat; HANDLE hLogEvent; int bpStatus = ID_STATUS_OFFLINE; int previousMode; int OptInit(WPARAM wParam,LPARAM lParam); int OnDetailsInit(WPARAM wParam,LPARAM lParam); HANDLE hFillListEvent = 0; CONTACT user; HINSTANCE hinstance = NULL; int hLangpack; HANDLE hExtraIcon1, hExtraIcon2; HANDLE heventXStatusIconChanged; HGENMENU copyipport,gotoclansite,vipport,joingame,startthisgame,removefriend,blockfriend; int foundgames=0; Gdiplus::GdiplusStartupInput gdiplusStartupInput; ULONG_PTR gdiplusToken; //xfire preferences, wichtige variablen xfire_prefitem xfireconfig[XFIRE_RECVPREFSPACKET_MAXCONFIGS]; extern xfireconfigitem xfireconfigitems[XFIRE_RECVPREFSPACKET_SUPPORTEDONFIGS]; CRITICAL_SECTION modeMsgsMutex; CRITICAL_SECTION avatarMutex; CRITICAL_SECTION connectingMutex; DWORD pid=NULL; //processid des gefunden spiels DWORD ts2pid=NULL; // processid vom teamspeak/ventrilo HANDLE XFireAvatarFolder = NULL; HANDLE XFireWorkingFolder = NULL; HANDLE XFireIconFolder = NULL; HANDLE hookgamestart = NULL; char statusmessage[2][1024]; BOOL sendonrecieve=FALSE; HANDLE hNetlib=NULL; pGetExtendedUdpTable _GetExtendedUdpTable=NULL; extern LPtsrGetServerInfo tsrGetServerInfo; //eventhandles HANDLE hGameDetection = CreateEvent(NULL,FALSE,FALSE,NULL); HANDLE hConnectionClose = CreateEvent(NULL,TRUE,FALSE,NULL); PLUGININFOEX pluginInfoEx={ sizeof(PLUGININFOEX), "Xfire protocol", PLUGIN_MAKE_VERSION(0,1,8,4), "Xfire protocol support for Miranda NG.", "dufte", "dufte@justmail.de", "(c) 2012 Xfirelib by Herbert Poul, Xfire Miranda protocol plugin by dufte", "http://miranda-ng.org", UNICODE_AWARE, { 0x9b8e1735, 0x970d, 0x4ce0, { 0x93, 0xc, 0xa5, 0x61, 0x95, 0x6b, 0xdc, 0xa2 } } // {9B8E1735-970D-4ce0-930C-A561956BDCA2} }; static IconItem icon = { LPGEN("Protocol icon"), "XFIRE_main", IDI_TM }; INT_PTR RecvMessage(WPARAM wParam, LPARAM lParam); INT_PTR SendMessage(WPARAM wParam, LPARAM lParam); int FillList(WPARAM wParam, LPARAM lParam); HANDLE CList_AddContact(XFireContact xfc, bool InList, bool SetOnline,int clan); HANDLE CList_FindContact (int uid); void CList_MakeAllOffline(); static INT_PTR UserIsTyping(WPARAM wParam, LPARAM lParam); HANDLE LoadGameIcon(char* g, int id, HICON* ico,BOOL onyico=FALSE,char * gamename=NULL,int*uu=NULL); void SetIcon(HANDLE hcontact,HANDLE hicon,int ctype=1); BOOL GetAvatar(char* username,XFireAvatar* av); //void SetAvatar(HANDLE hContact, char* username); static void SetAvatar(LPVOID lparam); static INT_PTR GetIPPort(WPARAM /*wParam*/,LPARAM lParam); static INT_PTR GetVIPPort(WPARAM /*wParam*/,LPARAM lParam); int RebuildContactMenu( WPARAM wParam, LPARAM lParam ); int doneQuery( WPARAM wParam, LPARAM lParam ); static INT_PTR GotoProfile(WPARAM wParam,LPARAM lParam); static INT_PTR GotoProfileAct(WPARAM wParam,LPARAM lParam); static INT_PTR GotoXFireClanSite(WPARAM wParam,LPARAM lParam); static INT_PTR ReScanMyGames(WPARAM wParam,LPARAM lParam); static INT_PTR SetNickDlg(WPARAM wParam,LPARAM lParam); static INT_PTR CustomGameSetup(WPARAM wParam,LPARAM lParam); #ifndef NO_PTHREAD void *gamedetectiont(void *ptr); void *inigamedetectiont(void *ptr); pthread_t gamedetection; #else void inigamedetectiont(LPVOID lParam); void gamedetectiont(LPVOID lparam); #endif INT_PTR AddtoList( WPARAM wParam, LPARAM lParam ); INT_PTR BasicSearch(WPARAM wParam,LPARAM lParam); INT_PTR GetAvatarInfo(WPARAM wParam, LPARAM lParam); //GAIR_NOAVATAR INT_PTR SearchAddtoList(WPARAM wParam,LPARAM lParam); INT_PTR SendPrefs(WPARAM wparam, LPARAM lparam); INT_PTR SetAwayMsg(WPARAM wParam, LPARAM lParam); INT_PTR GetAwayMsg(WPARAM /*wParam*/, LPARAM lParam); INT_PTR GetXStatusIcon(WPARAM wParam, LPARAM lParam); static INT_PTR GotoProfile2(WPARAM wParam,LPARAM lParam); HANDLE handlingBuddys(BuddyListEntry *entry, int clan=0,char* group=NULL,BOOL dontscan=FALSE); int StatusIcon(WPARAM wParam,LPARAM lParam); void CreateGroup(char*grpn,char*field); //void CreateGroup(char*grp); int ContactDeleted(WPARAM wParam,LPARAM /*lParam*/); INT_PTR JoinGame(WPARAM wParam,LPARAM lParam); extern void Scan4Games( LPVOID lparam ); INT_PTR RemoveFriend(WPARAM wParam,LPARAM lParam); INT_PTR BlockFriend(WPARAM wParam,LPARAM lParam); INT_PTR StartThisGame(WPARAM wParam,LPARAM lParam); int IconLibChanged(WPARAM wParam, LPARAM lParam); void SetAvatar2(LPVOID lparam); int ExtraListRebuild(WPARAM wparam, LPARAM lparam); int ExtraImageApply(WPARAM wparam, LPARAM lparam); //XFire Stuff using namespace xfirelib; class XFireClient : public PacketListener { public: Client* client; Xfire_avatar_loader* avatarloader; BOOL useutf8; XFireClient(string username, string password,char protover,int useproxy=0,string proxyip="",int proxyport=0); ~XFireClient(); void run(); void Status(string s); void receivedPacket(XFirePacket *packet); void getBuddyList(); void sendmsg(char*usr,char*msg); void setNick(char*nnick); void handlingBuddy(HANDLE handle); void CheckAvatar(BuddyListEntry* entry); private: vector explodeString(string s, string e); string joinString(vector s, int startindex, int endindex=-1, string delimiter=" "); void BuddyList(); string *lastInviteRequest; string username; string password; string proxyip; int useproxy; int proxyport; BOOL connected; unsigned int myuid; }; XFireClient* myClient=NULL; void XFireClient::CheckAvatar(BuddyListEntry* entry) { //kein entry, zurück if(!entry) return; //keine avatars? if(db_get_b(NULL,protocolname,"noavatars",-1)==0) { //avatar gelocked? if(db_get_b(entry->hcontact, "ContactPhoto", "Locked", -1)!=1) { //avatar lade auftrag übergeben this->avatarloader->loadAvatar(entry->hcontact,(char*)entry->username.c_str(),entry->userid); } } } void XFireClient::handlingBuddy(HANDLE handle){ vector *entries = client->getBuddyList()->getEntries(); for(uint i = 0 ; i < entries->size() ; i ++) { BuddyListEntry *entry = entries->at(i); if(entry->hcontact==handle) { handlingBuddys(entry,0,NULL); break; } } //mir_forkthread( } void XFireClient::setNick(char*nnick) { /*if(strlen(nnick)==0) return;*/ SendNickChangePacket nick; if(this->useutf8) nick.nick = ( char* )nnick; else nick.nick = mir_utf8encode(( char* )nnick); client->send( &nick ); } void XFireClient::sendmsg(char*usr,char*cmsg) { SendMessagePacket msg; // if(strlen(cmsg)>255) // *(cmsg+255)=0; msg.init(client, usr, cmsg); client->send( &msg ); } XFireClient::XFireClient(string username_,string password_,char protover,int useproxy,string proxyip,int proxyport) : username(username_), password(password_) { client = new Client(); client->setGameResolver( new DummyXFireGameResolver() ); client->protocolVersion=protover; avatarloader = new Xfire_avatar_loader(client); this->useproxy=useproxy; this->proxyip=proxyip; this->proxyport=proxyport; useutf8=FALSE; avatarloader=new Xfire_avatar_loader(client); lastInviteRequest = NULL; connected = FALSE; } XFireClient::~XFireClient() { if(client!=NULL) { client->disconnect(); delete client; } if(avatarloader) { delete avatarloader; avatarloader=NULL; } if(lastInviteRequest!=NULL) delete lastInviteRequest; } void XFireClient::run() { client->connect(username,password,useproxy,proxyip,proxyport); client->addPacketListener(this); } void XFireClient::Status(string s) { //da bei xfire statusmsg nur 100bytes länge unterstützt werden, wird gecutted if(!client->gotBudduyList) return; s = s.substr(0, 100); SendStatusMessagePacket *packet = new SendStatusMessagePacket(); if(myClient->useutf8) packet->awaymsg = s.c_str(); else packet->awaymsg = mir_utf8encode(s.c_str()); client->send( packet ); delete packet; } void XFireClient::receivedPacket(XFirePacket *packet) { XFirePacketContent *content = packet->getContent(); switch(content->getPacketId()) { /*case XFIRE_RECVBUDDYCHANGEDNICK: { RecvBuddyChangedNick *changednick = (RecvBuddyChangedNick*)content; if(changednick) { handlingBuddys((BuddyListEntry*)changednick->entry,0,NULL); } break; }*/ //Konfigpacket empfangen case XFIRE_RECVPREFSPACKET: { //Konfigarray leeren memset(&xfireconfig,0,sizeof(xfire_prefitem)*XFIRE_RECVPREFSPACKET_MAXCONFIGS); RecvPrefsPacket *config = (RecvPrefsPacket*)content; //konfigs in array speichern if(config!=NULL) { //ins preferenes array sichern for(int i=0;iconfig[i]; } //datenbank einträge durchführen for(int i=0;iusernames->size() ; i++) { if((char*)fb->usernames->at(i).c_str()!=NULL) psr.nick = (char*)fb->usernames->at(i).c_str(); if((char*)fb->fname->at(i).c_str()!=NULL) psr.firstName = (char*)fb->fname->at(i).c_str(); if((char*)fb->lname->at(i).c_str()!=NULL) psr.lastName = (char*)fb->lname->at(i).c_str(); ProtoBroadcastAck(protocolname, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE) 1, (LPARAM) & psr); } ProtoBroadcastAck(protocolname, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE) 1, 0); break; } case XFIRE_BUDDYINFO: { BuddyInfoPacket *buddyinfo = (BuddyInfoPacket*)content; BuddyListEntry *entry = client->getBuddyList()->getBuddyById( buddyinfo->userid ); //wenn die uid die gleiche wie die eigene ist, dann avatar auch selbst zuweisen if(buddyinfo->userid==this->myuid) { ProcessBuddyInfo(buddyinfo,NULL,"myxfireavatar"); } if(entry) ProcessBuddyInfo(buddyinfo,entry->hcontact,(char*)entry->username.c_str()); break; } case XFIRE_CLANINVITATION_ID: { ClanInvitationPacket *claninv = (ClanInvitationPacket*)content; for(int i=0;inumberOfInv;i++) { char msg[XFIRE_MAX_STATIC_STRING_LEN]; mir_snprintf(msg, SIZEOF(msg), Translate("%s (Nickname: %s) has invited you to join the %s clan. Message: %s%sPlease go to the XFireclan-Site to accept the Invitation."),claninv->invitefromusername[i].c_str(), claninv->invitefrom[i].c_str(), claninv->clanname[i].c_str(), claninv->invitemsg[i].c_str(),"\n"); MSGBOX(msg); } break; } case XFIRE_GAMEINFO_ID: { GameInfoPacket *gameinfo = (GameInfoPacket*)content; for(uint i = 0 ; i < gameinfo->sids->size() ; i++) { BuddyListEntry *entry = client->getBuddyList()->getBuddyBySid( gameinfo->sids->at(i) ); if(entry){ entry->gameinfo = gameinfo->gameinfo->at(i); handlingBuddys(entry,0,NULL); } } break; } case XFIRE_RECVREMOVEBUDDYPACKET: { RecvRemoveBuddyPacket *remove = (RecvRemoveBuddyPacket*)content; CallService(MS_DB_CONTACT_DELETE, (WPARAM) remove->handle, 1 ); break; } case XFIRE_BUDDYS_NAMES_ID: { //status nachricht nach der buddylist senden client->gotBudduyList=TRUE; if(sendonrecieve) { if(myClient!=NULL) { if(myClient->client->connected) { // if (bpStatus == ID_STATUS_AWAY) myClient->Status(statusmessage[1]); else myClient->Status(statusmessage[0]); } } sendonrecieve=FALSE; } sendonrecieve=FALSE; /* GetBuddyInfo buddyinfo; vector *entries = client->getBuddyList()->getEntries(); for(uint i = 0 ; i < entries->size() ; i ++) { BuddyListEntry *entry = entries->at(i); handlingBuddys(entry,0,NULL); }*/ break; } /* case XFIRE_CLAN_BUDDYS_NAMES_ID: { vector *entries = client->getBuddyList()->getEntriesClan(); char temp[255]; char * dummy; ClanBuddyListNamesPacket *clan = (ClanBuddyListNamesPacket*)content; sprintf(temp,"Clan_%d",clan->clanid); DBVARIANT dbv; if(!db_get(NULL,protocolname,temp,&dbv)) { dummy=dbv.pszVal; } else dummy=NULL; for(uint i = 0 ; i < entries->size() ; i ++) { BuddyListEntry *entry = entries->at(i); if(entry->clanid==clan->clanid) { handlingBuddys(entry,clan->clanid,dummy); } } break; }*/ case XFIRE_FRIENDS_BUDDYS_NAMES_ID: { for(uint i = 0 ; i < ((FriendsBuddyListNamesPacket*)content)->userids->size() ; i++) { BuddyListEntry *entry = client->getBuddyList()->getBuddyById( ((FriendsBuddyListNamesPacket*)content)->userids->at(i) ); if(entry) { char fofname[128]=LPGEN("Friends of Friends Playing"); DBVARIANT dbv; //gruppennamen überladen if(!db_get(NULL,protocolname,"overload_fofgroupname",&dbv)) { strcpy_s(fofname,128,dbv.pszVal); db_free(&dbv); } CreateGroup(Translate(fofname),"fofgroup"); HANDLE hc=handlingBuddys(entry,-1,Translate(fofname)); if(hc) { CheckAvatar(entry); db_set_b(hc,protocolname,"friendoffriend",1); } } } break; } /*case XFIRE_BUDDYS_ONLINE_ID: { for(uint i = 0 ; i < ((BuddyListOnlinePacket*)content)->userids->size() ; i++) { BuddyListEntry *entry = client->getBuddyList()->getBuddyById( ((BuddyListOnlinePacket*)content)->userids->at(i) ); if(entry){ handlingBuddys(entry,0,NULL); } } break; }*/ /*case XFIRE_RECV_STATUSMESSAGE_PACKET_ID: { for(uint i=0;i<((RecvStatusMessagePacket*)content)->sids->size();i++) { BuddyListEntry *entry = this->client->getBuddyList()->getBuddyBySid( ((RecvStatusMessagePacket*)content)->sids->at(i) ); if(entry) //crashbug entfernt setBuddyStatusMsg(entry); //auf eine funktion reduziert, verringert cpuauslastung und beseitigt das //das problem der fehlenden statusmsg //handlingBuddys(entry,0,NULL); } break; }*/ case XFIRE_BUDDYS_GAMES_ID: { vector *sids=NULL; //dieses array dient zu zwischensicherung von unbekannten sids for(uint i=0;i<((BuddyListGamesPacket*)content)->sids->size();i++) { BuddyListEntry *entry = this->client->getBuddyList()->getBuddyBySid( ((BuddyListGamesPacket*)content)->sids->at(i) ); if(entry!=NULL) { //wir haben einen unbekannten user if(entry->username.length()==0) { //sid array ist noch nicht init if(sids==NULL) { sids = new vector; } //kopie der sid anlegen char *sid = new char[16]; memcpy(sid,((BuddyListGamesPacket*)content)->sids->at(i),16); //ab ins array damit sids->push_back(sid); } else { if(entry->game == 0 && entry->hcontact != 0 && db_get_b(entry->hcontact,protocolname,"friendoffriend",0)==1) db_set_w(entry->hcontact,protocolname,"Status",ID_STATUS_OFFLINE); else handlingBuddys(entry,0,NULL); } } } //sid anfragen nur senden, wenn das sids array init wurde if(sids) { SendSidPacket sp; sp.sids=sids; client->send( &sp ); delete sids; } break; } case XFIRE_BUDDYS_GAMES2_ID: { for(uint i=0;i<((BuddyListGames2Packet*)content)->sids->size();i++) { BuddyListEntry *entry = this->client->getBuddyList()->getBuddyBySid( ((BuddyListGames2Packet*)content)->sids->at(i) ); if(entry!=NULL) handlingBuddys(entry,0,NULL); } break; } case XFIRE_PACKET_INVITE_REQUEST_PACKET: //friend request { InviteRequestPacket *invite = (InviteRequestPacket*)content; //nur nich blockierte buddy's durchlassen if(!db_get_b(NULL,"XFireBlock",(char*)invite->name.c_str(),0)) { XFireContact xfire_newc; xfire_newc.username=(char*)invite->name.c_str(); xfire_newc.nick=(char*)invite->nick.c_str(); xfire_newc.id=0; HANDLE handle=CList_AddContact(xfire_newc,TRUE,TRUE,0); if(handle) { // invite nachricht mitsenden string str = (char*)invite->msg.c_str(); PROTORECVEVENT pre; pre.flags = 0; pre.timestamp = time(NULL); pre.szMessage = (char*)mir_utf8decode((char*)str.c_str(),NULL); //invite nachricht konnte nicht zugewiesen werden?!?!?! if(!pre.szMessage) pre.szMessage=(char*)str.c_str(); pre.lParam = 0; ProtoChainRecvMsg(handle, &pre); } } else { SendDenyInvitationPacket deny; deny.name = invite->name; client->send( &deny ); } break; } case XFIRE_CLAN_PACKET: { char temp[100]; XFireClanPacket *clan = (XFireClanPacket*)content; for(int i=0;icount;i++) { mir_snprintf(temp, SIZEOF(temp), "Clan_%d", clan->clanid[i]); db_set_s(NULL, protocolname, temp, (char*)clan->name[i].c_str()); mir_snprintf(temp, SIZEOF(temp), "ClanUrl_%d", clan->clanid[i]); db_set_s(NULL, protocolname, temp, (char*)clan->url[i].c_str()); if(!db_get_b(NULL,protocolname,"noclangroups",0)) { CreateGroup((char*)clan->name[i].c_str(),"mainclangroup"); } } break; } case XFIRE_LOGIN_FAILED_ID: MSGBOXE(Translate("Login failed.")); SetStatus(ID_STATUS_OFFLINE,NULL); break; case XFIRE_LOGIN_SUCCESS_ID: //login war erfolgreich { LoginSuccessPacket *login = (LoginSuccessPacket*)content; char * temp = mir_utf8decode((char*)login->nick.c_str(),NULL); //nick speichern db_set_s(NULL,protocolname,"Nick",temp); //uid speichern db_set_dw(NULL,protocolname,"myuid",login->myuid); this->myuid=login->myuid; //avatar auslesen GetBuddyInfo* buddyinfo=new GetBuddyInfo(); buddyinfo->userid=login->myuid; mir_forkthread(SetAvatar2,(LPVOID)buddyinfo); break; } case XFIRE_RECV_OLDVERSION_PACKET_ID: { RecvOldVersionPacket *version = (RecvOldVersionPacket*)content; char temp[255]; if((unsigned int)client->protocolVersion<(unsigned int)version->newversion) { db_set_b(NULL,protocolname,"protover",version->newversion); //recprotoverchg if(db_get_w(NULL,protocolname,"recprotoverchg",0)==0) { mir_snprintf(temp, SIZEOF(temp), Translate("The protocol version is too old. Changed current version from %d to %d. You can reconnect now."),client->protocolVersion,version->newversion); MSGBOXE(temp); } else { SetStatus(ID_STATUS_RECONNECT,NULL); return; } } else { mir_snprintf(temp, SIZEOF(temp), Translate("The protocol version is too old. Cannot detect a new version number.")); MSGBOXE(temp); SetStatus(ID_STATUS_OFFLINE,NULL); } break; } case XFIRE_OTHER_LOGIN: MSGBOXE(Translate("Someone loged in with your account.disconnect.")); SetStatus(ID_STATUS_OFFLINE,NULL); break; //ne nachricht für mich, juhu case XFIRE_MESSAGE_ID: { string str; if( (( MessagePacket*)content)->getMessageType() == 0){ BuddyListEntry *entry = client->getBuddyList()->getBuddyBySid( ((MessagePacket*)content)->getSid() ); if(entry!=NULL) { str=((MessagePacket*)content)->getMessage(); PROTORECVEVENT pre = { 0 }; pre.timestamp = time(NULL); if (this->useutf8) { pre.szMessage = (char*)str.c_str(); pre.flags = PREF_UTF; } else pre.szMessage = (char*)mir_utf8decode((char*)str.c_str(),NULL); CallService(MS_PROTO_CONTACTISTYPING,(WPARAM)entry->hcontact,PROTOTYPE_CONTACTTYPING_OFF); ProtoChainRecvMsg(entry->hcontact, &pre); } } else if( (( MessagePacket*)content)->getMessageType() == 3) { BuddyListEntry *entry = client->getBuddyList()->getBuddyBySid( ((MessagePacket*)content)->getSid() ); if(entry!=NULL) CallService(MS_PROTO_CONTACTISTYPING,(WPARAM)entry->hcontact,5); } break; } //refresh buddy's /* if(content->getPacketId()==XFIRE_RECV_STATUSMESSAGE_PACKET_ID|| content->getPacketId()==XFIRE_BUDDYS_GAMES_ID|| content->getPacketId()==XFIRE_BUDDYS_GAMES2_ID) CallService(MS_CLIST_FRAMES_UPDATEFRAME, (WPARAM)-1, (LPARAM)FU_TBREDRAW | FU_FMREDRAW);*/ } // } //===================================================== extern "C" __declspec(dllexport) PLUGININFOEX* MirandaPluginInfoEx(DWORD) { return &pluginInfoEx; } //===================================================== // Unloads plugin //===================================================== extern "C" __declspec(dllexport) int Unload(void) { //urlprefix raushaun if(ServiceExists(MS_ASSOCMGR_ADDNEWURLTYPE)) CallService(MS_ASSOCMGR_REMOVEURLTYPE, 0, (LPARAM)"xfire:"); //gamedetetion das dead signal geben SetEvent(hGameDetection); #ifndef NO_PTHREAD pthread_cancel (gamedetection); pthread_win32_process_detach_np (); #endif DeleteCriticalSection(&modeMsgsMutex); DeleteCriticalSection(&connectingMutex); DeleteCriticalSection(&avatarMutex); Gdiplus::GdiplusShutdown(gdiplusToken); return 0; } void __stdcall XFireLog( const char* fmt, ... ) { va_list vararg; va_start( vararg, fmt ); char* str = ( char* )alloca( 32000 ); mir_vsnprintf( str, 32000, fmt, vararg ); va_end( vararg ); CallService(MS_NETLIB_LOG, ( WPARAM )hNetlib, ( LPARAM )str ); } //===================================================== // WINAPI DllMain //===================================================== BOOL WINAPI DllMain(HINSTANCE hinst,DWORD fdwReason,LPVOID lpvReserved) { hinstance = hinst; //AtlAxWinInit(); return TRUE; } //suche nach ini und danach starte gamedetection thread void StartIniUpdateAndDetection(LPVOID dummy) { EnterCriticalSection(&connectingMutex); //ini/ico updater, nur wenn aktiv if(db_get_b(NULL,protocolname,"autoiniupdate",0)) UpdateMyXFireIni(NULL); if(db_get_b(NULL,protocolname,"autoicodllupdate",0)) UpdateMyIcons(NULL); #ifndef NO_PTHREAD void* (*func)(void*) = &inigamedetectiont; pthread_create( &gamedetection, NULL, func , NULL); #else mir_forkthread(inigamedetectiont,NULL); #endif LeaveCriticalSection(&connectingMutex); } INT_PTR UrlCall(WPARAM wparam,LPARAM lparam) { //lparam!=0? if(lparam) { //nach dem doppelpunkt suchen char*type=strchr((char*)lparam,':'); //gefunden, dann anch fragezeichen suchen if(type) { type++; char*q=strchr(type,'?'); //gefunden? dann urltype ausschneiden if(q) { //abschneiden *q=0; //ein addfriend url request? if(strcmp("add_friend",type)==0) { q++; //nach = suchen char*g=strchr(q,'='); //gefunden? dann abschneiden if(g) { *g=0; g++; //user parameter? if(strcmp("user",q)==0) { //tempbuffer für die frage and en user char temp[100]; if(strlen(g)>25) //zugroße abschneiden *(g+25)=0; mir_snprintf(temp, SIZEOF(temp), Translate("Do you really want to add %s to your friend list?"),g); //Nutzer vorher fragen, ob er wirklich user xyz adden möchte if(MessageBoxA(NULL,temp,"Miranda XFire Protocol Plugin",MB_YESNO|MB_ICONQUESTION)==IDYES) { if(myClient!=NULL) { if(myClient->client->connected) { InviteBuddyPacket invite; invite.addInviteName(g, Translate("Add me to your friends list.")); myClient->client->send(&invite); } else MSGBOXE(Translate("XFire is not connected.")); } else MSGBOXE(Translate("XFire is not connected.")); } } } } } } } return 0; } //wenn alle module geladen sind static int OnSystemModulesLoaded(WPARAM wParam,LPARAM lParam) { char servicefunction[100]; /*NETLIB***********************************/ NETLIBUSER nlu; ZeroMemory(&nlu, sizeof(nlu)); nlu.cbSize = sizeof(nlu); nlu.flags = NUF_OUTGOING | NUF_HTTPCONNS; nlu.szSettingsModule = protocolname; nlu.szDescriptiveName = "XFire server connection"; hNetlib = (HANDLE) CallService(MS_NETLIB_REGISTERUSER, 0, (LPARAM) & nlu); /*NETLIB***********************************/ HookEvent(ME_USERINFO_INITIALISE, OnDetailsInit); HookEvent(ME_DB_CONTACT_DELETED, ContactDeleted); //hook das queryplugin HookEvent("GameServerQuery/doneQuery" , doneQuery); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_SETAWAYMSG); CreateServiceFunction(servicefunction, SetAwayMsg); /*NETLIBUSER nlu; ZeroMemory(&nlu, sizeof(nlu)); nlu.cbSize = sizeof(nlu); nlu.flags = NUF_NOHTTPSOPTION; nlu.szSettingsModule = protocolname; nlu.szDescriptiveName = "XFire Gamedetectionthread"; hNetlibUser = (HANDLE) CallService(MS_NETLIB_REGISTERUSER, 0, (LPARAM) & nlu);*/ // Variables support if (ServiceExists(MS_VARS_REGISTERTOKEN)) { TOKENREGISTER tr = {0}; tr.cbSize = sizeof(TOKENREGISTER); tr.memType = TR_MEM_MIRANDA; tr.flags = TRF_FREEMEM | TRF_PARSEFUNC | TRF_FIELD; tr.tszTokenString = _T("xfiregame"); tr.parseFunction = Varxfiregame; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("Current Game"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("myxfiregame"); tr.parseFunction = Varmyxfiregame; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("My Current Game"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("xfireserverip"); tr.parseFunction = Varxfireserverip; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("ServerIP"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("myxfireserverip"); tr.parseFunction = Varmyxfireserverip; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("My Current ServerIP"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("xfirevoice"); tr.parseFunction = Varxfirevoice; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("Voice"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("myxfirevoice"); tr.parseFunction = Varmyxfirevoice; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("My Current Voice"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("xfirevoiceip"); tr.parseFunction = Varxfirevoiceip; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("Voice ServerIP"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); tr.tszTokenString = _T("myxfirevoiceip"); tr.parseFunction = Varmyxfirevoiceip; tr.szHelpText = LPGEN("XFire")"\t"LPGEN("My Voice ServerIP"); CallService(MS_VARS_REGISTERTOKEN, 0, (LPARAM) &tr); } //File Association Manager support if(ServiceExists(MS_ASSOCMGR_ADDNEWURLTYPE)) { AssocMgr_AddNewUrlType("xfire:",Translate("Xfire Link Protocol"),hinstance,IDI_TM,XFIRE_URLCALL,0); } //sound einfügen SkinAddNewSoundEx("xfirebstartgame",protocolname,LPGEN("Buddy start a game")); //hook für mbot einfügen, nur wenn mbot option aktiv if(db_get_b(NULL,protocolname,"mbotsupport",0)) HookEvent(XFIRE_INGAMESTATUSHOOK, mBotNotify); //init der extraicons wenn service vorhanden /*if(ServiceExists(MS_EXTRAICON_REGISTER)) { extraiconGAME=ExtraIcon_Register("Game Icon","Xfire game icons.","XFIRE_main",RebuildIcons,ApplyIcons); extraiconGAME=ExtraIcon_Register("Voice Icon","Xfire voice icons.","XFIRE_main"); }*/ //initialisiere teamspeak und co detection voicechat.initVoicechat(); mir_forkthread(StartIniUpdateAndDetection,NULL); return 0; } //===================================================== // Called when plugin is loaded into Miranda //===================================================== /*placebo funktionen*/ /*PROTO_INTERFACE* xfireProtoInit( const char* pszProtoName, const TCHAR* tszUserName ) { Xfire_m8 m8=new Xfire_m8(); return m8; } /*placebo funktionen*/ /*static int xfireProtoUninit( void* ppro ) { return 0; } */ int ExtraListRebuild(WPARAM wparam, LPARAM lparam) { //für alle gameicons ein neues handle setzen return xgamelist.iconmngr.resetIconHandles(); } int ExtraImageApply(WPARAM wparam, LPARAM lparam) { HANDLE hContact=(HANDLE)wparam; // TODO: maybe need to fix extra icons char *szProto = GetContactProto(hContact); if ( szProto != NULL && !lstrcmpiA( szProto, protocolname ) && db_get_w(hContact, protocolname, "Status", ID_STATUS_OFFLINE)!=ID_STATUS_OFFLINE) { int gameid=db_get_w(hContact, protocolname, "GameId", 0); int gameid2=db_get_w(hContact, protocolname, "VoiceId", 0); if(gameid!=0) { SetIcon(hContact,xgamelist.iconmngr.getGameIconHandle(gameid)); } if(gameid2!=0) { SetIcon(hContact,xgamelist.iconmngr.getGameIconHandle(gameid2),2); } } return 0; } extern "C" __declspec(dllexport) int Load(void) { mir_getLP(&pluginInfoEx); InitializeCriticalSection(&modeMsgsMutex); InitializeCriticalSection(&connectingMutex); InitializeCriticalSection(&avatarMutex); Gdiplus::GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL); //void* init = GetProcAddress(LoadLibrary("atl"),"AtlAxWinInit"); _asm call init; //keine protoversion in der db, dann wohl der erste start von xfire if(db_get_b(NULL,protocolname,"protover",0)==0) { db_set_b(NULL,protocolname,"protover",0x84); db_set_w(NULL,protocolname,"avatarloadlatency",1000); db_set_b(NULL,protocolname,"gameico",0); db_set_b(NULL,protocolname,"voiceico",1); db_set_b(NULL,protocolname,"specialavatarload",1); db_set_b(NULL,protocolname,"xfiresitegameico",1); db_set_b(NULL,protocolname,"recprotoverchg",1); if(MessageBoxA(NULL,Translate("It seems that is the first time you use this plugin. Do you want to automatically download the latest available xfire_games.ini and icons.dll?\r\nWithout the ini xfire can't detect any games on your computer."),"Miranda XFire Protocol Plugin",MB_YESNO|MB_ICONQUESTION)==IDYES) { db_set_b(NULL,protocolname,"autoiniupdate",1); db_set_b(NULL,protocolname,"autoicodllupdate",1); } } XDEBUGS("-----------------------------------------------------\n"); //statusmessages setzen strcpy(statusmessage[0],""); mir_snprintf(statusmessage[1], SIZEOF(statusmessage[1]), "(AFK) %s", Translate("Away from Keyboard")); char servicefunction[100]; HookEvent(ME_OPT_INITIALISE, OptInit); HookEvent(ME_SYSTEM_MODULESLOADED, OnSystemModulesLoaded); PROTOCOLDESCRIPTOR pd = { PROTOCOLDESCRIPTOR_V3_SIZE }; pd.szName = protocolname; pd.type = PROTOTYPE_PROTOCOL; CallService(MS_PROTO_REGISTERMODULE,0,(LPARAM)&pd); hLogEvent=CreateHookableEvent("XFireProtocol/Log"); CList_MakeAllOffline(); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETCAPS); CreateServiceFunction(servicefunction, GetCaps); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETNAME); CreateServiceFunction(servicefunction, GetName); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_LOADICON); CreateServiceFunction(servicefunction, TMLoadIcon); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_SETSTATUS); CreateServiceFunction(servicefunction, SetStatus); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETSTATUS); CreateServiceFunction(servicefunction, GetStatus); strcpy(servicefunction, protocolname); strcat(servicefunction, PSS_ADDED); CreateServiceFunction(servicefunction, AddtoList); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_ADDTOLIST); CreateServiceFunction(servicefunction, SearchAddtoList); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETAVATARINFO); CreateServiceFunction(servicefunction, GetAvatarInfo); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETMYAVATAR); CreateServiceFunction(servicefunction, GetMyAvatar); HookEvent(ME_CLIST_EXTRA_IMAGE_APPLY, ExtraImageApply); HookEvent(ME_CLIST_EXTRA_LIST_REBUILD, ExtraListRebuild); //erstell eine hook für andere plugins damit diese nachprüfen können, ab wann jemand ingame ist oer nicht hookgamestart = CreateHookableEvent(XFIRE_INGAMESTATUSHOOK); strcpy(servicefunction, protocolname); strcat(servicefunction, PS_BASICSEARCH); CreateServiceFunction(servicefunction, BasicSearch); strcpy(servicefunction, protocolname); strcat(servicefunction, PSS_MESSAGE); CreateServiceFunction( servicefunction, SendMessage ); strcpy(servicefunction, protocolname); strcat(servicefunction, PSS_USERISTYPING); CreateServiceFunction( servicefunction, UserIsTyping ); strcpy(servicefunction, protocolname); strcat(servicefunction, PSR_MESSAGE); CreateServiceFunction( servicefunction, RecvMessage ); strcpy(servicefunction, XFIRE_URLCALL); CreateServiceFunction( servicefunction, UrlCall ); strcpy(servicefunction, protocolname); strcat(servicefunction, PSS_GETAWAYMSG); CreateServiceFunction( servicefunction, GetAwayMsg ); strcpy(servicefunction, XFIRE_SET_NICK); CreateServiceFunction( servicefunction, SetNickName ); strcpy(servicefunction, XFIRE_SEND_PREFS); CreateServiceFunction( servicefunction, SendPrefs ); //für mtipper, damit man das statusico übertragen kann strcpy(servicefunction, protocolname); strcat(servicefunction, PS_GETCUSTOMSTATUSICON); CreateServiceFunction( servicefunction, GetXStatusIcon ); char AvatarsFolder[MAX_PATH]= ""; char CurProfileF[MAX_PATH] = ""; char CurProfile[MAX_PATH] = ""; CallService(MS_DB_GETPROFILEPATH, (WPARAM) MAX_PATH, (LPARAM)AvatarsFolder); strcat(AvatarsFolder, "\\"); CallService(MS_DB_GETPROFILENAME, (WPARAM) MAX_PATH, (LPARAM)CurProfileF); int i; for (i = MAX_PATH; 5; i--){ if (CurProfileF[i] == 't' && CurProfileF[i-3] == '.'){ i = i-3; break; } } memcpy(CurProfile, CurProfileF, i); strcat(AvatarsFolder, CurProfile); strcat(AvatarsFolder, "\\"); strcat(AvatarsFolder, "XFire"); XFireWorkingFolder = FoldersRegisterCustomPath(protocolname, "Working Folder", AvatarsFolder); if ( !(XFireIconFolder = FoldersRegisterCustomPath(protocolname, "Game Icon Folder", AvatarsFolder))) CreateDirectory(AvatarsFolder, NULL); strcat(AvatarsFolder, "\\Avatars"); if ( !(XFireAvatarFolder = FoldersRegisterCustomPath(protocolname, "Avatars", AvatarsFolder))) CreateDirectory(AvatarsFolder,NULL); //erweiterte Kontextmenüpunkte CLISTMENUITEM mi = { sizeof(mi) }; mi.pszPopupName = protocolname; //gotoprofilemenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "GotoProfile"); CreateServiceFunction(servicefunction,GotoProfile); mi.pszService = servicefunction; mi.position = 500090000; mi.pszContactOwner=protocolname; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.ptszName = LPGENT("&XFire Online Profile"); Menu_AddContactMenuItem(&mi); //gotoxfireclansitemenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "GotoXFireClanSite"); CreateServiceFunction(servicefunction,GotoXFireClanSite); mi.pszService = servicefunction; mi.position = 500090000; mi.pszContactOwner=protocolname; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.ptszName = LPGENT("XFire &Clan Site"); gotoclansite=Menu_AddContactMenuItem(&mi); //kopiermenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "GetIPPort"); CreateServiceFunction(servicefunction,GetIPPort); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("C&opy Server Address and Port"); copyipport=Menu_AddContactMenuItem(&mi); //kopiermenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "VoiceIPPort"); CreateServiceFunction(servicefunction,GetVIPPort); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Cop&y Voice Server Address and Port"); vipport=Menu_AddContactMenuItem(&mi); //joinmenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "JoinGame"); CreateServiceFunction(servicefunction,JoinGame); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Join &Game ..."); joingame=Menu_AddContactMenuItem(&mi); //joinmenüpunkt strcpy(servicefunction, protocolname); strcat(servicefunction, "StartThisGame"); CreateServiceFunction(servicefunction,StartThisGame); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Play this Game ..."); startthisgame=Menu_AddContactMenuItem(&mi); //remove friend strcpy(servicefunction, protocolname); strcat(servicefunction, "RemoveFriend"); CreateServiceFunction(servicefunction,RemoveFriend); mi.pszService = servicefunction; mi.position = 2000070000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Remove F&riend ..."); removefriend=Menu_AddContactMenuItem(&mi); //block user strcpy(servicefunction, protocolname); strcat(servicefunction, "BlockFriend"); CreateServiceFunction(servicefunction,BlockFriend); mi.pszService = servicefunction; mi.position = 2000070000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Block U&ser ..."); blockfriend=Menu_AddContactMenuItem(&mi); //my fire profile strcpy(servicefunction, protocolname); strcat(servicefunction, "GotoProfile2"); CreateServiceFunction(servicefunction,GotoProfile2); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("&My XFire Online Profile"); Menu_AddMainMenuItem(&mi); //my activity protocol strcpy(servicefunction, protocolname); strcat(servicefunction, "GotoProfileAct"); CreateServiceFunction(servicefunction,GotoProfileAct); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("&Activity Report"); Menu_AddMainMenuItem(&mi); //rescan my games strcpy(servicefunction, protocolname); strcat(servicefunction, "ReScanMyGames"); CreateServiceFunction(servicefunction,ReScanMyGames); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("&Rescan my Games ..."); Menu_AddMainMenuItem(&mi); strcpy(servicefunction, protocolname); strcat(servicefunction, "SetNick"); CreateServiceFunction(servicefunction,SetNickDlg); mi.pszService = servicefunction; mi.position = 500090000; mi.hIcon = LoadIcon(hinstance,MAKEINTRESOURCE(ID_OP)); mi.pszContactOwner=protocolname; mi.ptszName = LPGENT("Set &Nickname"); Menu_AddMainMenuItem(&mi); HookEvent( ME_CLIST_PREBUILDCONTACTMENU, RebuildContactMenu ); //lade GetExtendedUdpTable Funktion HMODULE hmod=LoadLibraryA("IpHlpApi.dll"); _GetExtendedUdpTable=(pGetExtendedUdpTable)GetProcAddress(hmod,"GetExtendedUdpTable"); if(_GetExtendedUdpTable==NULL&&db_get_b(NULL,protocolname,"ipportdetec",0)) { //MessageBoxA(0,"GetExtendedUdpTable not found. ServerIP/Port detection feature will be disabled.","Miranda XFire Protocol Plugin",MB_OK|MB_ICONINFORMATION); db_set_b(NULL,protocolname,"ipportdetec",0); XFireLog("Wasn't able to get GetExtendedUdpTable function"); } Icon_Register(hinstance, LPGENT("Protocols/XFire"), &icon, 1); hExtraIcon1 = ExtraIcon_Register("xfire_game", LPGEN("XFire game icon"), "", ExtraListRebuild, ExtraImageApply); hExtraIcon2 = ExtraIcon_Register("xfire_voice", LPGEN("XFire voice icon"), "", ExtraListRebuild, ExtraImageApply); return 0; } //funktion liefert für xstatusid den passenden ico zurück, für tipper zb notwendig INT_PTR GetXStatusIcon(WPARAM wParam, LPARAM lParam) { if(lParam == LR_SHARED) { if(wParam>1) return (int)xgamelist.iconmngr.getGameIconFromId(wParam-2); //icocache[(int)wParam-2].hicon; } else { if(wParam>1) return (int)CopyIcon((HICON)xgamelist.iconmngr.getGameIconFromId(wParam-2)/*icocache[(int)wParam-2].hicon*/); } return 0; } INT_PTR RecvMessage(WPARAM wParam, LPARAM lParam) { CCSDATA *ccs = ( CCSDATA* )lParam; db_unset(ccs->hContact, "CList", "Hidden"); char *szProto = GetContactProto(ccs->hContact); if ( szProto != NULL && !lstrcmpiA( szProto, protocolname )) return CallService(MS_PROTO_RECVMSG, wParam, lParam ); return 1; } static void SetMeAFK( LPVOID param ) { if(bpStatus==ID_STATUS_ONLINE) { SetStatus(ID_STATUS_AWAY,(LPARAM)param); } } static void SetStatusLate( LPVOID param ) { Sleep(1000); if(bpStatus==ID_STATUS_OFFLINE) { SetStatus((WPARAM)param,0); } } static void SendAck( LPVOID param ) { ProtoBroadcastAck(protocolname, param, ACKTYPE_MESSAGE, ACKRESULT_SUCCESS, (HANDLE) 1, 0); } static void SendBadAck( LPVOID param ) { ProtoBroadcastAck(protocolname, param, ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE) 0, LPARAM(Translate("XFire does not support offline messaging!"))); } static INT_PTR UserIsTyping(WPARAM wParam, LPARAM lParam) { HANDLE hContact = ( HANDLE )wParam; DBVARIANT dbv; if(lParam==PROTOTYPE_SELFTYPING_ON) { if(db_get_b(NULL,protocolname,"sendtyping",1)==1) { if(myClient!=NULL) if(myClient->client->connected) if(!db_get_s(hContact, protocolname, "Username",&dbv)) { SendTypingPacket typing; typing.init(myClient->client, dbv.pszVal); myClient->client->send( &typing ); db_free(&dbv); } } } else if(lParam==PROTOTYPE_SELFTYPING_OFF) { } return 0; } INT_PTR SendMessage(WPARAM wParam, LPARAM lParam) { CCSDATA *ccs = (CCSDATA *) lParam; PROTORECVEVENT* pre = (PROTORECVEVENT*)ccs->lParam; ACKDATA * ack = (ACKDATA*) lParam; DBVARIANT dbv; int sended=0; db_get_s(ccs->hContact, protocolname, "Username",&dbv); if(myClient!=NULL) if(myClient->client->connected&&db_get_w(ccs->hContact, protocolname, "Status", -1)!=ID_STATUS_OFFLINE) { /*if(myClient->useutf8) myClient->sendmsg(dbv.pszVal, ( char* )ccs->lParam); else*/ myClient->sendmsg(dbv.pszVal, mir_utf8encode(( char* )ccs->lParam)); mir_forkthread(SendAck,ccs->hContact); sended=1; } else { mir_forkthread(SendBadAck,ccs->hContact); } db_free(&dbv); return sended; } //======================================================= //GetCaps //======================================================= INT_PTR GetCaps(WPARAM wParam,LPARAM lParam) { if(wParam==PFLAGNUM_1) return PF1_BASICSEARCH|PF1_MODEMSG|PF1_IM; else if(wParam==PFLAGNUM_2) return PF2_ONLINE|PF2_SHORTAWAY; // add the possible statuses here. else if(wParam==PFLAGNUM_3) return PF2_ONLINE|(db_get_b(NULL,protocolname,"nocustomaway",0)==1?0:PF2_SHORTAWAY); else if(wParam==PFLAGNUM_4) return PF4_SUPPORTTYPING|PF4_AVATARS; else if(wParam==PFLAG_UNIQUEIDTEXT) return (INT_PTR)Translate("Username"); else if(wParam==PFLAG_UNIQUEIDSETTING) return (INT_PTR)"Username"; else if(wParam==PFLAG_MAXLENOFMESSAGE) return 3996; //255; return 0; } //======================================================= //GetName (tray icon) //======================================================= INT_PTR GetName(WPARAM wParam,LPARAM lParam) { lstrcpyn((char*)lParam,"XFire",wParam); return 0; } //======================================================= //TMLoadIcon //======================================================= INT_PTR TMLoadIcon(WPARAM wParam,LPARAM lParam) { if(LOWORD( wParam ) == PLI_PROTOCOL) { if(wParam & PLIF_ICOLIB) return (int)Skin_GetIcon("XFIRE_main"); return (int)CopyIcon( Skin_GetIcon("XFIRE_main")); } return NULL; } static void ConnectingThread(LPVOID params) { WPARAM wParam=(WPARAM)params; EnterCriticalSection(&connectingMutex); if(myClient!=NULL&&myClient->client!=NULL) myClient->run(); else { EnterCriticalSection(&connectingMutex); return; } if(myClient->client->connected) { sendonrecieve=TRUE; } else { if(db_get_w(NULL,protocolname,"noconnectfailedbox",0)==0) MSGBOXE(Translate("Unable to connect to XFire.")); wParam =ID_STATUS_OFFLINE; } int oldStatus; oldStatus = bpStatus; bpStatus = wParam; ProtoBroadcastAck(protocolname,NULL,ACKTYPE_STATUS,ACKRESULT_SUCCESS,(HANDLE)oldStatus,wParam); LeaveCriticalSection(&connectingMutex); } //======================================================= //SetStatus //======================================================= INT_PTR SetStatus(WPARAM wParam,LPARAM lParam) { int oldStatus; oldStatus = bpStatus; if(bpStatus==ID_STATUS_CONNECTING) return 0; if(wParam!=ID_STATUS_ONLINE&&wParam!=ID_STATUS_OFFLINE&&wParam!=ID_STATUS_AWAY&&wParam!=ID_STATUS_RECONNECT) if(db_get_b(NULL,protocolname,"oninsteadafk",0)==0) wParam=ID_STATUS_AWAY; //protokoll auf away schalten else wParam=ID_STATUS_ONLINE; //protokoll auf online schalten if ( (wParam == ID_STATUS_ONLINE && bpStatus!=ID_STATUS_ONLINE) || // offline --> online (wParam == ID_STATUS_AWAY && bpStatus==ID_STATUS_OFFLINE) // offline --> away ) { if(bpStatus == ID_STATUS_AWAY) // away --> online { myClient->Status(statusmessage[0]); } else { // the status has been changed to online (maybe run some more code) DBVARIANT dbv; DBVARIANT dbv2; if(db_get(NULL,protocolname,"login",&dbv)) { MSGBOXE(Translate("No Loginname is set!")); wParam=ID_STATUS_OFFLINE; } else if(db_get(NULL,protocolname,"password",&dbv2)) { MSGBOXE(Translate("No Password is set!")); wParam=ID_STATUS_OFFLINE; } else { CallService(MS_DB_CRYPT_DECODESTRING,strlen(dbv2.pszVal)+1,(LPARAM)dbv2.pszVal); if(myClient!=NULL) delete myClient; //alter proxycode, entfernt da über netlib die proxysache geregelt wird /* if(db_get_b(NULL, protocolname, "useproxy" ,0)) { //verbindung über proxy DBVARIANT dbv3; DBVARIANT dbv4; if(!db_get(NULL,protocolname,"proxyip",&dbv3)) { if(!db_get(NULL,protocolname,"proxyport",&dbv4)) { myClient = new XFireClient(dbv.pszVal,dbv2.pszVal,db_get_b(NULL,protocolname,"protover",0),1,dbv3.pszVal,atoi(dbv4.pszVal)); db_free(&dbv4); } db_free(&dbv3); } } else */ myClient = new XFireClient(dbv.pszVal,dbv2.pszVal,db_get_b(NULL,protocolname,"protover",0)); //prüfe ob utf8 option aktiv, dann schlater auf true if(db_get_b(NULL,protocolname,"useutf8",0)) { myClient->useutf8=TRUE; } //verbindung als thread bpStatus = ID_STATUS_CONNECTING; ProtoBroadcastAck(protocolname,NULL,ACKTYPE_STATUS,ACKRESULT_SUCCESS,(HANDLE)oldStatus,ID_STATUS_CONNECTING); mir_forkthread(ConnectingThread,(LPVOID)wParam); //alte verb /* myClient->run(); if(myClient->client->connected) { sendonrecieve=TRUE; } else { MSGBOXE(Translate("Unable to connect to XFire.")); wParam =ID_STATUS_OFFLINE; } */ //für die vars db_unset(NULL,protocolname,"currentgamename"); db_unset(NULL,protocolname,"currentvoicename"); db_unset(NULL,protocolname,"VServerIP"); db_unset(NULL,protocolname,"ServerIP"); db_free(&dbv); db_free(&dbv2); return 0; } } } else if (wParam == ID_STATUS_AWAY && bpStatus!=ID_STATUS_AWAY) { if(bpStatus == ID_STATUS_OFFLINE) // nix { } else if(myClient!=NULL&&myClient->client->connected) // online --> afk { //setze bei aktivem nocustomaway die alte awaystatusmsg zurück, bugfix if(db_get_b(NULL,protocolname,"nocustomaway",0)) mir_snprintf(statusmessage[1], SIZEOF(statusmessage[1]), "(AFK) %s", Translate("Away from Keyboard")); myClient->Status(statusmessage[1]); } } else if ((wParam == ID_STATUS_OFFLINE || wParam == ID_STATUS_RECONNECT) && bpStatus!=ID_STATUS_OFFLINE) // * --> offline { SetEvent(hConnectionClose); // the status has been changed to offline (maybe run some more code) if(myClient!=NULL) if(myClient->client->connected) myClient->client->disconnect(); CList_MakeAllOffline(); //teamspeak/ventrilo pid sowie gamepid auf NULL setzen, damit bei einem reconnect die neuerkannt werden pid=NULL; ts2pid=NULL; db_set_w(NULL,protocolname,"currentgame",0); db_set_w(NULL,protocolname,"currentvoice",0); db_unset(NULL,protocolname, "VServerIP"); db_unset(NULL,protocolname, "ServerIP"); if(wParam == ID_STATUS_RECONNECT) { mir_forkthread(SetStatusLate,(LPVOID)oldStatus); wParam = ID_STATUS_OFFLINE; } } else { // the status has been changed to unknown (maybe run some more code) } //broadcast the message bpStatus = wParam; ProtoBroadcastAck(protocolname,NULL,ACKTYPE_STATUS,ACKRESULT_SUCCESS,(HANDLE)oldStatus,wParam); return 0; } //======================================================= //GetStatus //======================================================= INT_PTR GetStatus(WPARAM wParam,LPARAM lParam) { if (bpStatus == ID_STATUS_ONLINE) return ID_STATUS_ONLINE; else if (bpStatus == ID_STATUS_AWAY) return ID_STATUS_AWAY; else if (bpStatus == ID_STATUS_CONNECTING) return ID_STATUS_CONNECTING; else return ID_STATUS_OFFLINE; } HANDLE CList_AddContact(XFireContact xfc, bool InList, bool SetOnline,int clan) { HANDLE hContact; if (xfc.username == NULL) return 0; // here we create a new one since no one is to be found hContact = (HANDLE) CallService(MS_DB_CONTACT_ADD, 0, 0); if ( hContact ) { CallService(MS_PROTO_ADDTOCONTACT, (WPARAM) hContact, (LPARAM)protocolname ); if ( InList ) db_unset(hContact, "CList", "NotOnList"); else db_set_b(hContact, "CList", "NotOnList", 1); db_unset(hContact, "CList", "Hidden"); if(strlen(xfc.nick)>0) { if(myClient->useutf8) db_set_utf(hContact, protocolname, "Nick", xfc.nick); else db_set_s(hContact, protocolname, "Nick", mir_utf8decode(( char* )xfc.nick,NULL)); } else if(strlen(xfc.username)>0) db_set_s(hContact, protocolname, "Nick", xfc.username); db_set_s(hContact, protocolname, "Username", xfc.username); //db_set_s(hContact, protocolname, "Screenname", xfc.nick); db_set_dw(hContact, protocolname, "UserId", xfc.id); if(clan>0) db_set_dw(hContact, protocolname, "Clan", clan); db_set_w(hContact, protocolname, "Status", SetOnline ? ID_STATUS_ONLINE:ID_STATUS_OFFLINE); if(db_get_b(NULL,protocolname,"noavatars",-1)==0) { if(!db_get_b(NULL,protocolname,"specialavatarload",0)) { XFire_SetAvatar* xsa=new XFire_SetAvatar; xsa->hContact=hContact; xsa->username=new char[strlen(xfc.username)+1]; strcpy(xsa->username,xfc.username); mir_forkthread(SetAvatar,(LPVOID)xsa); } else { /* scheinbar unterpricht xfire bei zu agressiven nachfragen der buddyinfos die verbindung , deshalb erstmal auskommentiert getestet mit clanbuddy's >270 members mit hilfe der buddyinfos kann man den avatar laden und screenshot infos etc bekommt man auch */ GetBuddyInfo* buddyinfo=new GetBuddyInfo(); buddyinfo->userid=xfc.id; mir_forkthread(SetAvatar2,(LPVOID)buddyinfo); } } if (xfc.id==0) { db_set_b( hContact, "CList", "NotOnList", 1 ); db_set_b( hContact, "CList", "Hidden", 1 ); } return hContact; } return false; } BOOL IsXFireContact(HANDLE hContact) { char *szProto = GetContactProto(hContact); if (szProto != NULL && !lstrcmpiA(szProto, protocolname)) return TRUE; return FALSE; } HANDLE CList_FindContact (int uid) { for (HANDLE hContact = db_find_first(protocolname); hContact; hContact = db_find_next(hContact, protocolname)) if ( db_get_dw(hContact, protocolname, "UserId", -1) == uid) return hContact; return 0; } void CList_MakeAllOffline() { vector fhandles; for (HANDLE hContact = db_find_first(protocolname); hContact; hContact = db_find_next(hContact, protocolname)) { //freunde von freunden in eine seperate liste setzen //nur wenn das nicht abgestellt wurde if(db_get_b(hContact,protocolname,"friendoffriend",0)==1 && db_get_b(NULL,protocolname,"fofdbremove",0)==1) fhandles.push_back(hContact); db_unset(hContact, "CList", "StatusMsg"); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); db_unset(hContact, protocolname, "ServerName"); db_unset(hContact, protocolname, "GameType"); db_unset(hContact, protocolname, "Map"); db_unset(hContact, protocolname, "Players"); db_unset(hContact, protocolname, "Passworded"); db_unset(hContact, protocolname, "XStatusMsg"); db_unset(hContact, protocolname, "XStatusId"); db_unset(hContact, protocolname, "XStatusName"); if(db_get_b(NULL,protocolname,"noavatars",-1)==1) { db_unset(hContact, "ContactPhoto", "File"); db_unset(hContact, "ContactPhoto", "RFile"); db_unset(hContact, "ContactPhoto", "Backup"); db_unset(hContact, "ContactPhoto", "Format"); db_unset(hContact, "ContactPhoto", "ImageHash"); db_unset(hContact, "ContactPhoto", "XFireAvatarId"); db_unset(hContact, "ContactPhoto", "XFireAvatarMode"); } else { //prüf ob der avatar noch existiert DBVARIANT dbv; if(!db_get_s(hContact, "ContactPhoto", "File",&dbv)) { FILE*f=fopen(dbv.pszVal,"r"); if(f==NULL) { db_unset(hContact, "ContactPhoto", "File"); db_unset(hContact, "ContactPhoto", "RFile"); db_unset(hContact, "ContactPhoto", "Backup"); db_unset(hContact, "ContactPhoto", "Format"); db_unset(hContact, "ContactPhoto", "ImageHash"); db_unset(hContact, "ContactPhoto", "XFireAvatarId"); db_unset(hContact, "ContactPhoto", "XFireAvatarMode"); } else fclose(f); db_free(&dbv); } } db_set_w(hContact,protocolname,"Status",ID_STATUS_OFFLINE); } //alle gefundenen handles lsöchen for(uint i=0; i < fhandles.size(); i++) CallService(MS_DB_CONTACT_DELETE, (WPARAM) fhandles.at(i), 0); } void SetIcon(HANDLE hcontact,HANDLE hicon,int ctype) { ExtraIcon_SetIcon((ctype == 1) ? hExtraIcon1 : hExtraIcon2, hcontact, hicon); } void SetAvatar2(LPVOID lparam) { static int lasttime=0; int sleep=db_get_w(NULL,protocolname,"avatarloadlatency",1000); lasttime+=sleep; if(mySleep(lasttime,hConnectionClose)) { delete lparam; lasttime-=sleep; return; } GetBuddyInfo* buddyinfo=(GetBuddyInfo*)lparam; if(myClient!=NULL) if(myClient->client->connected) myClient->client->send( buddyinfo ); delete lparam; lasttime-=sleep; } void SetAvatar(LPVOID lparam) //void SetAvatar(HANDLE hContact, char* username) { //EnterCriticalSection(&avatarMutex); //WaitForSingleObject(hMutex, INFINITE); static int lasttime=0; int sleep=db_get_w(NULL,protocolname,"avatarloadlatency",250); if(bpStatus==ID_STATUS_OFFLINE) return; lasttime+=sleep; //Sleep(lasttime); if(mySleep(lasttime,hConnectionClose)) { delete lparam; lasttime-=sleep; return; } if(bpStatus==ID_STATUS_OFFLINE) return; XFireAvatar av; XFire_SetAvatar* xsa=(XFire_SetAvatar*)lparam; if(xsa->hContact==NULL) return; if(GetAvatar(xsa->username,&av)) { PROTO_AVATAR_INFORMATION AI; AI.cbSize = sizeof(AI); AI.format = av.type; AI.hContact = xsa->hContact; lstrcpy(AI.filename,av.file); ProtoBroadcastAck(protocolname, xsa->hContact, ACKTYPE_AVATAR, ACKRESULT_SUCCESS,(HANDLE) &AI, 0); } delete(xsa); //ReleaseMutex(hMutex); lasttime-=sleep; } BOOL GetAvatar(char* username,XFireAvatar* av) { BOOL status=FALSE; if(av==NULL||username==NULL) return FALSE; char address[256]="http://www.xfire.com/profile/"; strcat_s(address,256,username); strcat_s(address,256,"/"); //netlib request NETLIBHTTPREQUEST nlhr={0},*nlhrReply; nlhr.cbSize = sizeof(nlhr); nlhr.requestType= REQUEST_GET; nlhr.flags = NLHRF_NODUMP|NLHRF_GENERATEHOST|NLHRF_SMARTAUTHHEADER; nlhr.szUrl = address; nlhrReply=(NETLIBHTTPREQUEST*)CallService(MS_NETLIB_HTTPTRANSACTION,(WPARAM)hNetlib,(LPARAM)&nlhr); if(nlhrReply) { //nicht auf dem server if (nlhrReply->resultCode != 200) { CallService(MS_NETLIB_FREEHTTPREQUESTSTRUCT,0,(LPARAM)nlhrReply); return FALSE; } //keine daten für mich else if (nlhrReply->dataLength < 1 || nlhrReply->pData == NULL) { CallService(MS_NETLIB_FREEHTTPREQUESTSTRUCT,0,(LPARAM)nlhrReply); return FALSE; } else { //fwrite(nlhrReply->pData,nlhrReply->dataLength,1,f); //id wo angefangen wird, die adresse "rauszuschneiden" char avatarid[]="m_user_avatar_img_wrapper"; char* pointer_av=avatarid; //ende des datenbuffers char* deathend=nlhrReply->pData+nlhrReply->dataLength; char* pointer=nlhrReply->pData; //status ob gefunden oder nich BOOL found=FALSE; while(pointer4) found=TRUE; } else pointer_av=avatarid; pointer++; } //was gefunden, nun das bild raustrennen if(*pointer_av==0) { char * pos = NULL; pos=strchr(pointer,'/'); pos-=5; pointer=pos; pos=strchr(pointer,' '); if(pos) { pos--; *pos=0; //analysieren, welchent typ das bild hat pos=strrchr(pointer,'.'); if(pos) { char filename[512]; strcpy(filename, XFireGetFoldersPath ("Avatar")); strcat(filename, username); pos++; //gif?!?! if(*pos=='g'&& *(pos+1)=='i'&& *(pos+2)=='f') { av->type=PA_FORMAT_GIF; strcat(filename,".gif"); } else//dann kanns nur jpg sein { av->type=PA_FORMAT_JPEG; strcat(filename,".jpg"); } //verusch das bild runterladen if(GetWWWContent2(pointer,filename,FALSE)) { strcpy_s(av->file,256,filename); //setzte dateinamen status=TRUE; //avatarladen hat geklappt, cool :) } } } } } CallService(MS_NETLIB_FREEHTTPREQUESTSTRUCT,0,(LPARAM)nlhrReply); } return status; } static INT_PTR GetIPPort(WPARAM wParam,LPARAM lParam) { char temp[XFIRE_MAX_STATIC_STRING_LEN]; HGLOBAL clipbuffer; char* buffer; if(db_get_w((HANDLE)wParam, protocolname, "Port", -1)==0) return 0; DBVARIANT dbv; if(db_get_s((HANDLE)wParam, protocolname, "ServerIP",&dbv)) return 0; mir_snprintf(temp, SIZEOF(temp), "%s:%d", dbv.pszVal, db_get_w((HANDLE)wParam, protocolname, "Port", -1)); db_free(&dbv); if(OpenClipboard(NULL)) { EmptyClipboard(); clipbuffer = GlobalAlloc(GMEM_DDESHARE, strlen(temp)+1); buffer = (char*)GlobalLock(clipbuffer); strcpy(buffer, LPCSTR(temp)); GlobalUnlock(clipbuffer); SetClipboardData(CF_TEXT, clipbuffer); CloseClipboard(); } return 0; } static INT_PTR GetVIPPort(WPARAM wParam,LPARAM lParam) { char temp[XFIRE_MAX_STATIC_STRING_LEN]; HGLOBAL clipbuffer; char* buffer; if(db_get_w((HANDLE)wParam, protocolname, "VPort", -1)==0) return 0; DBVARIANT dbv; if(db_get_s((HANDLE)wParam, protocolname, "VServerIP",&dbv)) return 0; mir_snprintf(temp, SIZEOF(temp), "%s:%d", dbv.pszVal, db_get_w((HANDLE)wParam, protocolname, "VPort", -1)); db_free(&dbv); if(OpenClipboard(NULL)) { EmptyClipboard(); clipbuffer = GlobalAlloc(GMEM_DDESHARE, strlen(temp)+1); buffer = (char*)GlobalLock(clipbuffer); strcpy(buffer, LPCSTR(temp)); GlobalUnlock(clipbuffer); SetClipboardData(CF_TEXT, clipbuffer); CloseClipboard(); } return 0; } static INT_PTR GotoProfile(WPARAM wParam,LPARAM lParam) { DBVARIANT dbv; char temp[64]=""; if(db_get_s((HANDLE)wParam, protocolname, "Username",&dbv)) return 0; strcpy(temp,"http://xfire.com/profile/"); strcat_s(temp,64,dbv.pszVal); db_free(&dbv); CallService(MS_UTILS_OPENURL, 1, (LPARAM)temp ); return 0; } static INT_PTR GotoXFireClanSite(WPARAM wParam,LPARAM lParam) { DBVARIANT dbv; char temp[64]=""; int clanid=db_get_dw((HANDLE)wParam, protocolname, "Clan",-1); mir_snprintf(temp, SIZEOF(temp), "ClanUrl_%d", clanid); if(db_get_s(NULL, protocolname, temp,&dbv)) return 0; strcpy(temp,"http://xfire.com/clans/"); strcat_s(temp,64,dbv.pszVal); db_free(&dbv); CallService(MS_UTILS_OPENURL, 1, (LPARAM)temp ); return 0; } static INT_PTR GotoProfile2(WPARAM wParam,LPARAM lParam) { DBVARIANT dbv; char temp[64]=""; if(db_get_s(NULL, protocolname, "login",&dbv)) return 0; strcpy(temp,"http://xfire.com/profile/"); strcat_s(temp,64,dbv.pszVal); db_free(&dbv); CallService(MS_UTILS_OPENURL, 1, (LPARAM)temp ); //prefrences pakcet senden //XFirePrefPacket *packet2 = new XFirePrefPacket(); //myClient->client->send( packet2 ); //delete(packet2); return 0; } static INT_PTR GotoProfileAct(WPARAM wParam,LPARAM lParam) { DBVARIANT dbv; char temp[64]=""; if(db_get_s(NULL, protocolname, "login",&dbv)) return 0; strcpy(temp,"http://www.xfire.com/?username="); strcat_s(temp,64,dbv.pszVal); db_free(&dbv); CallService(MS_UTILS_OPENURL, 1, (LPARAM)temp ); //prefrences pakcet senden //XFirePrefPacket *packet2 = new XFirePrefPacket(); //myClient->client->send( packet2 ); //delete(packet2); return 0; } int RebuildContactMenu( WPARAM wParam, LPARAM lParam ) { HANDLE hContact = (HANDLE)wParam; bool bEnabled = true, bEnabled2 = true; DBVARIANT dbv; if (db_get_s(hContact, protocolname, "ServerIP", &dbv)) bEnabled = false; else db_free(&dbv); Menu_ShowItem(copyipport, bEnabled); //kopieren von voice port und ip nur erlauben, wenn verfügbar bEnabled = true; if(db_get_s(hContact, protocolname, "VServerIP", &dbv)) bEnabled = false; else db_free(&dbv); Menu_ShowItem(vipport, bEnabled); //clansite nur bei clanmembern anbieten Menu_ShowItem(gotoclansite, db_get_dw(hContact, protocolname, "Clan",0) != 0); //NotOnList Menu_ShowItem(blockfriend, db_get_dw(hContact, "CList", "NotOnList",0) != 0); //speichere gameid ab int gameid = db_get_w(hContact, protocolname, "GameId",0); //spiel in xfirespieliste? bEnabled = bEnabled2 = true; if(!xgamelist.Gameinlist(gameid)) { //nein, dann start und join auf unsichbar schalten bEnabled = bEnabled2 = false; } else { //gameobject holen Xfire_game* game=xgamelist.getGamebyGameid(gameid); //hat das spiel netzwerkparameter? if(game) { if(game->networkparams) { //is beim buddy ein port hinterlegt, also spielt er im internet? if( !db_get_dw(hContact, protocolname, "Port",0)) { //nein, dann join button auch ausblenden bEnabled = false; } } else bEnabled = false; } else bEnabled = false; } Menu_ShowItem(joingame, bEnabled); Menu_ShowItem(startthisgame, bEnabled2); //remove freind nur bei noramlen buddies Menu_ShowItem(removefriend, db_get_b(hContact, protocolname, "friendoffriend",0) != 1); return 0; } //wird beim miranda start ausgeführt, lädt spiele und startet gamedetection #ifndef NO_PTHREAD void *inigamedetectiont(void *ptr) #else void inigamedetectiont(LPVOID lParam) #endif { Scan4Games(NULL); #ifndef NO_PTHREAD return gamedetectiont(ptr); #else gamedetectiont(NULL); #endif } void SetXFireGameStatusMsg(Xfire_game* game) { char inipath[XFIRE_MAX_STATIC_STRING_LEN]=""; static char statusmsg[100]=""; //kein gameobject, dann abbrechen if(!game) return; if(!game->statusmsg) { xgamelist.getIniValue(game->id,"XUSERStatusMsg",statusmsg,100); } else { strcpy_s(statusmsg,100,game->statusmsg); } if(statusmsg[0]!=0) if(myClient!=NULL) if(myClient->client->connected) myClient->Status(statusmsg); } #ifndef NO_PTHREAD void *gamedetectiont(void *ptr) #else void gamedetectiont(LPVOID lparam) #endif { DWORD ec; //exitcode der processid int ts2port=0; int vid=0; char ts2ip[4]={0,0,0,0}; char temp[200]; Xfire_game* currentgame=NULL; BOOL disabledsound=FALSE; BOOL disabledpopups=FALSE; //vaiable zum spielzeit messen time_t t1; if(db_get_b(NULL,protocolname,"nogamedetect",0)) #ifndef NO_PTHREAD return ptr; #else return; #endif DWORD lowpids=db_get_b(NULL,protocolname,"skiplowpid",100); //XFireLog("XFire Gamedetectionthread started ...",""); while(1) { //Sleep(12000); //XFireLog("12 Sek warten ...",""); if(mySleep(12000,hGameDetection)) { #ifndef NO_PTHREAD return ptr; #else return; #endif } #ifndef NO_PTHREAD pthread_testcancel(); #else if(Miranda_Terminated()) return; #endif if(myClient!=NULL) if(!myClient->client->connected) { //XFireLog("PID und TSPID resett ...",""); ts2pid=pid=0; //voicechat internen status zurücksetzen voicechat.resetCurrentvoicestatus(); } /* else*/ { //erstmal nach TS2 suchen //XFireLog("Teamspeak detection ...",""); if(db_get_b(NULL,protocolname,"ts2detection",0)) { SendGameStatus2Packet *packet = new SendGameStatus2Packet(); if(voicechat.checkVoicechat(packet)) { if(myClient!=NULL) { XFireLog("Send voicechat infos ..."); myClient->client->send( packet ); } } delete packet; //nach ts3 mapfile suchen //HANDLE hMapObject = OpenFileMappingA(FILE_MAP_READ, FALSE, "$ts3info4xfire$"); //if (hMapObject) { //} //wenn remote feature aktiviert, darüber ip erkennen /*if(db_get_b(NULL,protocolname,"ts2useremote",0)) { //ipholen SendGameStatus2Packet *packet = new SendGameStatus2Packet(); if(TSSetupPacket(packet,&ts2pid,&ts2port)) { db_set_w(NULL,protocolname,"currentvoice",packet->gameid); if(packet->ip[3]!=0) { sprintf(temp,"%d.%d.%d.%d:%d",(unsigned char)packet->ip[3],(unsigned char)packet->ip[2],(unsigned char)packet->ip[1],(unsigned char)packet->ip[0],packet->port); db_set_s(NULL, protocolname, "VServerIP", temp); db_set_s(NULL, protocolname, "currentvoicename", "Teamspeak"); } else { db_unset(NULL,protocolname, "VServerIP"); db_unset(NULL,protocolname, "currentvoicename"); } if(myClient!=NULL) myClient->client->send( packet ); } delete packet; } else { if(!ts2pid) { if(FindTeamSpeak(&ts2pid,&vid)) { //gefunden, serverdaten scannen SendGameStatus2Packet *packet = new SendGameStatus2Packet(); if(myClient!=NULL) if(GetServerIPPort2(ts2pid,myClient->client->localaddr,myClient->client->llocaladdr,&packet->ip[3],&packet->ip[2],&packet->ip[1],&packet->ip[0],&packet->port)) { if(packet->port!=0) { packet->gameid=vid; if(vid==32) db_set_s(NULL, protocolname, "currentvoicename", "Teamspeak"); else if(vid==33) db_set_s(NULL, protocolname, "currentvoicename", "Ventrilo"); else if(vid==34) db_set_s(NULL, protocolname, "currentvoicename", "Mumble"); db_set_w(NULL,protocolname,"currentvoice",vid); sprintf(temp,"%d.%d.%d.%d:%d",(unsigned char)packet->ip[3],(unsigned char)packet->ip[2],(unsigned char)packet->ip[1],(unsigned char)packet->ip[0],packet->port); db_set_s(NULL, protocolname, "VServerIP", temp); if(myClient!=NULL) myClient->client->send( packet ); } } delete packet; } } else { //HANDLE op=OpenProcess(PROCESS_QUERY_INFORMATION, FALSE, ts2pid); //if(op!=NULL) GetExitCodeProcess(op,&ec); //if(ec!=STILL_ACTIVE) //nicht mehr offen if (GetProcessVersion(ts2pid) == 0) { SendGameStatus2Packet *packet = new SendGameStatus2Packet(); packet->gameid=0; db_set_w(NULL,protocolname,"currentvoice",0); db_unset(NULL,protocolname, "VServerIP"); db_unset(NULL,protocolname, "currentvoicename"); if(myClient!=NULL) myClient->client->send( packet ); ts2pid=0; delete packet; } else { SendGameStatus2Packet *packet = new SendGameStatus2Packet(); if(myClient!=NULL) if(GetServerIPPort2(ts2pid,myClient->client->localaddr,myClient->client->llocaladdr,&packet->ip[3],&packet->ip[2],&packet->ip[1],&packet->ip[0],&packet->port)) { if(packet->port!=0) { packet->gameid=vid; db_set_w(NULL,protocolname,"currentvoice",vid); sprintf(temp,"%d.%d.%d.%d:%d",(unsigned char)packet->ip[3],(unsigned char)packet->ip[2],(unsigned char)packet->ip[1],(unsigned char)packet->ip[0],packet->port); db_set_s(NULL, protocolname, "VServerIP", temp); if(myClient!=NULL) myClient->client->send( packet ); } } delete packet; } //if(op!=NULL) CloseHandle(op); } }*/ } if(currentgame!=NULL) { //XFireLog("XFire Gamedetection - Game still running ...",""); //prüf ob das spiel noch offen ec=0; //HANDLE op=OpenProcess(PROCESS_QUERY_INFORMATION, FALSE, pid); //if(op!=NULL) GetExitCodeProcess(op,&ec); //if(GetLastError()==5) //anwendung ist noch offen und der zugriff wird noch darauf blockiert //{ // //} //else if(ec!=STILL_ACTIVE) //nicht mehr offen if (!xgamelist.isValidPid(pid)) { //XFireLog("XFire Gamedetection - Game was closed ID: %i",currentgame); SendGameStatusPacket *packet = new SendGameStatusPacket(); packet->gameid=0; if(db_get_b(NULL,protocolname,"sendgamestatus",1)) if(myClient!=NULL) myClient->client->send( packet ); //spielzeit messen time_t t2=time(NULL); time_t t3=t2-t1; tm * mytm=gmtime(&t3); //statusmsg von xfire zurücksetzen if(currentgame->setstatusmsg) { if(myClient!=NULL) if(myClient->client->connected) if(bpStatus==ID_STATUS_ONLINE) myClient->Status(statusmessage[0]); else if(bpStatus==ID_STATUS_AWAY) myClient->Status(statusmessage[1]); } mir_snprintf(temp, SIZEOF(temp), Translate("Last game: %s playtime: %.2d:%.2d:%.2d"), currentgame->name, mytm->tm_hour, mytm->tm_min, mytm->tm_sec); db_set_s(NULL, protocolname, "LastGame", temp); if(currentgame->noicqstatus!=TRUE&&db_get_b(NULL,protocolname,"autosetstatusmsg",0)) SetOldStatusMsg(); db_set_w(NULL,protocolname,"currentgame",0); db_unset(NULL,protocolname,"currentgamename"); //popup wieder aktivieren, menuservice funk aufrufen, nur wenn popups vorher abgestellt wurden if(disabledpopups) if(db_get_b(NULL,protocolname,"nopopups",0)) { if(ServiceExists("Popup/EnableDisableMenuCommand")) { CallService("Popup/EnableDisableMenuCommand",NULL,NULL); } else if(ServiceExists("Popup/ToggleEnabled")) { CallService("Popup/ToggleEnabled",NULL,NULL); } disabledpopups=FALSE; } //sound wieder aktivieren, nur wenn es vorher abgestellt wurde if(disabledsound) if(db_get_b(NULL,protocolname,"nosoundev",0)) { db_set_b(NULL,"Skin","UseSound",1); disabledsound=FALSE; } //bug beseitigt, wenn spiel beendet, alte ip entfernen db_unset(NULL,protocolname, "ServerIP"); pid=NULL; currentgame=NULL; xgamelist.SetGameStatus(FALSE); NotifyEventHooks(hookgamestart,0,0); delete packet; } else //noch offen { //XFireLog("Spiel noch offen ...",""); //nur nwspiele nach ip/port scannen if(db_get_b(NULL,protocolname,"ipportdetec",0)) if(currentgame->networkparams!=NULL&¤tgame->send_gameid>0) { SendGameStatusPacket *packet = new SendGameStatusPacket(); //verscueh serverip und port zu scannen XFireLog("IPPort detection ...",""); if(GetServerIPPort(pid,myClient->client->localaddr,myClient->client->llocaladdr,&packet->ip[3],&packet->ip[2],&packet->ip[1],&packet->ip[0],&packet->port)) { if(packet->ip[3]!=0) { mir_snprintf(temp, SIZEOF(temp), "%d.%d.%d.%d:%d", (unsigned char)packet->ip[3], (unsigned char)packet->ip[2], (unsigned char)packet->ip[1], (unsigned char)packet->ip[0], packet->port); db_set_s(NULL, protocolname, "ServerIP", temp); XFireLog("Got IPPort: %s",temp); } else { db_unset(NULL,protocolname, "ServerIP"); XFireLog("NO IPPort",""); } packet->gameid=currentgame->send_gameid; if(db_get_b(NULL,protocolname,"sendgamestatus",1)) if(myClient!=NULL) myClient->client->send( packet ); if(currentgame->noicqstatus!=TRUE&&db_get_b(NULL,protocolname,"autosetstatusmsg",0)) SetGameStatusMsg(); } else { XFireLog("GetServerIPPort failed",""); } delete packet; } //XFireLog("fertig ...",""); //packet->=xf[currentgame].gameid2; } //if(op!=NULL) CloseHandle(op); } else { //XFireLog("nach spiel suchen ...",""); //hardcoded game detection HANDLE hSnapShot = CreateToolhelp32Snapshot ( TH32CS_SNAPALL, 0); PROCESSENTRY32* processInfo = new PROCESSENTRY32; processInfo->dwSize = sizeof ( PROCESSENTRY32); XFireLog("XFire Gamedetection - Suche laufende Spiele ..."); //gamelist blocken xgamelist.Block(TRUE); while ( Process32Next ( hSnapShot,processInfo ) != FALSE && currentgame==NULL) { //überspringe niedrige pids if(processInfo->th32ProcessIDcheckpath(processInfo)) { SendGameStatusPacket *packet = new SendGameStatusPacket() ; XFireLog("XFire Gamedetection - Spiel gefunden: %i",nextgame->id); if(myClient!=NULL) if(myClient->client->connected) { currentgame=nextgame; pid=processInfo->th32ProcessID; db_set_w(NULL,protocolname,"currentgame",currentgame->id); db_set_s(NULL,protocolname,"currentgamename",currentgame->name); packet->gameid=currentgame->send_gameid; t1=time(NULL); if(db_get_b(NULL,protocolname,"sendgamestatus",1)) { XFireLog("XFire Gamedetection - Sendgame-ID: %i",currentgame->send_gameid); if(currentgame->send_gameid>0) { XFireLog("XFire Gamedetection - Setzte Status für XFire"); myClient->client->send( packet ); } } xgamelist.SetGameStatus(TRUE); //eventhook triggern NotifyEventHooks(hookgamestart,1,0); //statusmsg für xfire setzen if(currentgame->setstatusmsg) { SetXFireGameStatusMsg(currentgame); } if(currentgame->noicqstatus!=TRUE&&db_get_b(NULL,protocolname,"autosetstatusmsg",0)) { BackupStatusMsg(); SetGameStatusMsg(); } //popup abschalten, menuservice funk aufrufen if(db_get_b(NULL,protocolname,"nopopups",0)) { if(ServiceExists("Popup/EnableDisableMenuCommand")&&db_get_b(NULL,"Popup","ModuleIsEnabled",0)==1) /**/ { disabledpopups=TRUE; CallService("Popup/EnableDisableMenuCommand",NULL,NULL); } else if(ServiceExists("Popup/ToggleEnabled")&&db_get_b(NULL,"YAPP","Enabled",0)==1) { disabledpopups=TRUE; CallService("Popup/ToggleEnabled",NULL,NULL); } } //sound abschalten if(db_get_b(NULL,protocolname,"nosoundev",0)&&db_get_b(NULL,"Skin","UseSound",0)==1) { db_set_b(NULL,"Skin","UseSound",0); disabledsound=TRUE; } } delete packet; break; } } } CloseHandle ( hSnapShot); //gamelist unblocken xgamelist.Block(FALSE); } } } } static INT_PTR ReScanMyGames(WPARAM wParam,LPARAM lParam) { db_unset(NULL, protocolname, "foundgames"); mir_forkthread(Scan4Games,NULL); return 0; } static INT_PTR CustomGameSetup(WPARAM wParam,LPARAM lParam) { //DialogBox(hinstance,MAKEINTRESOURCE(IDD_GAMELIST),NULL,DlgAddGameProc); return 0; } void setBuddyStatusMsg(BuddyListEntry *entry) { if (entry == NULL) return; if (IsContactMySelf(entry->username)) return; if (entry->game) { ostringstream xstatus; DBVARIANT dbv; if (!db_get_s(entry->hcontact, protocolname, "RGame", &dbv)) { xstatus << dbv.pszVal << " "; db_free(&dbv); } if (!db_get_b(NULL, protocolname, "noipportinstatus", 0)) { if (!db_get_s(entry->hcontact, protocolname, "ServerName", &dbv)) { xstatus << dbv.pszVal; db_free(&dbv); } else if (!db_get_s(entry->hcontact,protocolname, "ServerIP",&dbv)) { xstatus << "(" << dbv.pszVal << ":" << db_get_w(entry->hcontact, protocolname, "Port", 0) << ")"; db_free(&dbv); } } db_set_utf(entry->hcontact, protocolname, "XStatusMsg", xstatus.str().c_str()); } else { //db_set_b(entry->hcontact, protocolname, "XStatusId", 1); db_unset(entry->hcontact, protocolname, "XStatusId"); db_unset(entry->hcontact, protocolname, "XStatusName"); db_unset(entry->hcontact, protocolname, "XStatusMsg"); } /*//statusmsg umwandeln char *statusmsg = mir_utf8decode((char*)entry->statusmsg.c_str(),NULL); if (statusmsg == NULL) statusmsg = (char*)entry->statusmsg.c_str();*/ string afk = entry->statusmsg.substr(0, 5); int status_id = (afk == "(AFK)" || afk == "(ABS)") ? ID_STATUS_AWAY : ID_STATUS_ONLINE; db_set_w(entry->hcontact, protocolname, "Status", status_id); if (!entry->statusmsg.empty()) db_set_utf(entry->hcontact, "CList", "StatusMsg", entry->statusmsg.c_str()); else db_unset(entry->hcontact, "CList", "StatusMsg"); } /*void CheckAvatar(void *ventry) { BuddyListEntry* entry=(BuddyListEntry*)ventry; DBVARIANT dbv; if(entry==NULL) return; if(db_get_b(NULL,protocolname,"noavatars",-1)==0) { if(db_get_b(entry->hcontact, "ContactPhoto", "Locked", -1)!=1) { if(!db_get_b(NULL,protocolname,"specialavatarload",0)) { if(db_get(entry->hcontact,"ContactPhoto", "File",&dbv)) { XFire_SetAvatar* xsa=new XFire_SetAvatar; xsa->hContact=entry->hcontact; xsa->username=new char[strlen(entry->username.c_str())+1]; strcpy(xsa->username,entry->username.c_str()); mir_forkthread(SetAvatar,(LPVOID)xsa); } } else { /* scheinbar unterpricht xfire bei zu agressiven nachfragen der buddyinfos die verbindung , deshalb erstmal auskommentiert getestet mit clanbuddy's >270 members mit hilfe der buddyinfos kann man den avatar laden und screenshot infos etc bekommt man auch */ /* GetBuddyInfo* buddyinfo=new GetBuddyInfo(); buddyinfo->userid=entry->userid; mir_forkthread(SetAvatar2,(LPVOID)buddyinfo); } } } }*/ HANDLE handlingBuddys(BuddyListEntry *entry, int clan,char*group,BOOL dontscan) { HANDLE hContact; string game; if(entry==NULL) return NULL; //wenn der buddy ich selbst ist, dann ignorieren if(IsContactMySelf(entry->username)) return NULL; if(entry->hcontact==NULL) { entry->hcontact=CList_FindContact(entry->userid); if(entry->hcontact&&clan==-1) { db_set_w(entry->hcontact, protocolname, "Status", ID_STATUS_ONLINE); db_set_s(entry->hcontact, protocolname, "MirVer", "xfire"); } } if(entry->hcontact==NULL) { XFireContact xfire_newc; xfire_newc.username=(char*)entry->username.c_str(); xfire_newc.nick=(char*)entry->nick.c_str(); xfire_newc.id=entry->userid; entry->hcontact=CList_AddContact(xfire_newc,TRUE,entry->isOnline()?TRUE:FALSE,clan); } hContact=entry->hcontact; if (hContact!=0) { if (!entry->nick.empty() && db_get_b(NULL, protocolname, "shownicks", 1)) { char*nick=NULL; if (myClient->useutf8) nick = ( char* )entry->nick.c_str(); else nick = mir_utf8decode(( char* )entry->nick.c_str(),NULL); if(nick) { if(myClient->useutf8) db_set_utf(hContact, protocolname, "Nick", nick); else db_set_s(hContact, protocolname, "Nick", nick); } else db_set_s(hContact, protocolname, "Nick", entry->username.c_str()); //db_set_utf(hContact, protocolname, "Nick", entry->nick.c_str()); //db_set_utf(hContact, protocolname, "Nick", ( char* )entry->nick.c_str()); } else db_set_s(hContact, protocolname, "Nick", entry->username.c_str()); if(!entry->isOnline()) { db_set_w(hContact, protocolname, "Status", ID_STATUS_OFFLINE); db_unset(hContact, protocolname, "XStatusMsg"); db_unset(hContact, protocolname, "XStatusId"); db_unset(hContact, protocolname, "XStatusName"); db_unset(hContact, "CList", "StatusMsg"); //db_set_utf(hContact, protocolname, "XStatusName", ""); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); db_unset(hContact, protocolname, "VServerIP"); db_unset(hContact, protocolname, "VPort"); db_unset(hContact, protocolname, "RVoice"); db_unset(hContact, protocolname, "RGame"); db_unset(hContact, protocolname, "GameId"); db_unset(hContact, protocolname, "VoiceId"); db_unset(hContact, protocolname, "GameInfo"); } else if(entry->game>0||entry->game2>0) { char temp[XFIRE_MAX_STATIC_STRING_LEN]=""; char gname[255]=""; DummyXFireGame *gameob; if(strlen(entry->gameinfo.c_str())>0) db_set_s(hContact, protocolname, "GameInfo", entry->gameinfo.c_str()); //beim voicechat foglendes machn if(entry->game2>0) { gameob=(DummyXFireGame*)entry->game2Obj; //obj wo ip und port sind auslesen xgamelist.getGamename(entry->game2,gname,255); db_set_s(hContact, protocolname, "RVoice", gname); if(gameob) { if((unsigned char)gameob->ip[3]!=0) // wenn ip, dann speichern { mir_snprintf(temp, SIZEOF(temp), "%d.%d.%d.%d", (unsigned char)gameob->ip[3], (unsigned char)gameob->ip[2], (unsigned char)gameob->ip[1], (unsigned char)gameob->ip[0]); db_set_s(hContact, protocolname, "VServerIP", temp); db_set_w(hContact, protocolname, "VPort", (unsigned long)gameob->port); } else { db_unset(hContact, protocolname, "VServerIP"); db_unset(hContact, protocolname, "VPort"); } } db_set_w(hContact, protocolname, "VoiceId", entry->game2); SetIcon(hContact,xgamelist.iconmngr.getGameIconHandle(entry->game2),2); //icon seperat setzen } else { db_unset(hContact, protocolname, "VServerIP"); db_unset(hContact, protocolname, "VPort"); db_unset(hContact, protocolname, "RVoice"); db_unset(hContact, protocolname, "VoiceId"); SetIcon(hContact,(HANDLE)-1,2); } //beim game folgendes machen if(entry->game>0) { HICON hicongame=xgamelist.iconmngr.getGameIcon(entry->game); xgamelist.getGamename(entry->game,gname,255); db_set_s(hContact, protocolname, "RGame", gname); //beinhaltet ip und port gameob=(DummyXFireGame*)entry->gameObj; //popup, wenn jemand was spielt if(db_get_b(NULL,protocolname,"gamepopup",0)==1) { char temp[256]=""; mir_snprintf(temp, SIZEOF(temp), Translate("%s is playing %s."), //ist ein nick gesetzt? (entry->nick.length()==0? //nein dann username entry->username.c_str(): //klar, dann nick nehmen entry->nick.c_str()) ,gname); if(gameob) { if((unsigned char)gameob->ip[3]!=0) { mir_snprintf(temp, SIZEOF(temp), Translate("%s is playing %s on server %d.%d.%d.%d:%d."), //ist ein nick gesetzt? (entry->nick.length()==0? //nein dann username entry->username.c_str(): //klar, dann nick nehmen entry->nick.c_str()) ,gname,(unsigned char)gameob->ip[3],(unsigned char)gameob->ip[2],(unsigned char)gameob->ip[1],(unsigned char)gameob->ip[0],(unsigned long)gameob->port); } } /* POPUP-Filter Nur Popups anzeigen die noch nicht angezeigt wurden */ if(entry->lastpopup==NULL) { //größe des popupstrings int size=strlen(temp)+1; //popup darstellen displayPopup(NULL,temp,"Miranda XFire Protocol Plugin",0,hicongame); //letzten popup definieren entry->lastpopup=new char[size]; //string kopieren strcpy_s(entry->lastpopup,size,temp); } else { if(strcmp(entry->lastpopup,temp)!=0) { delete[] entry->lastpopup; entry->lastpopup=NULL; //größe des popupstrings int size=strlen(temp)+1; //popup darstellen displayPopup(NULL,temp,"Miranda XFire Protocol Plugin",0,hicongame); //letzten popup definieren entry->lastpopup=new char[size]; //string kopieren strcpy_s(entry->lastpopup,size,temp); } } } if(gameob) { if((unsigned char)gameob->ip[3]!=0) { //ip und port in kontakt speichern mir_snprintf(temp, SIZEOF(temp), "%d.%d.%d.%d", (unsigned char)gameob->ip[3], (unsigned char)gameob->ip[2], (unsigned char)gameob->ip[1], (unsigned char)gameob->ip[0]); db_set_s(hContact, protocolname, "ServerIP", temp); db_set_w(hContact, protocolname, "Port", (unsigned long)gameob->port); //lass das query arbeiten if(dontscan==FALSE) if(ServiceExists("GameServerQuery/Query")&&db_get_b(NULL,protocolname,"gsqsupport",0)) { GameServerQuery_query gsqq={0}; gsqq.port=gameob->port; gsqq.xfiregameid=entry->game; strcpy(gsqq.ip,temp); CallService("GameServerQuery/Query" , (WPARAM) entry, (LPARAM)&gsqq); } } else { db_unset(hContact, protocolname, "ServerName"); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); } } SetIcon(hContact,xgamelist.iconmngr.getGameIconHandle(entry->game)); //db_unset(hContact, "CList", "StatusMsg"); db_set_w(hContact, protocolname, "Status", ID_STATUS_ONLINE); db_set_utf(hContact, protocolname, "XStatusName", Translate("Playing")); setBuddyStatusMsg(entry); db_set_b(hContact, protocolname, "XStatusId", xgamelist.iconmngr.getGameIconId(entry->game)+2); //buddy vorher ein spielgestartet, wenn nicht sound spielen? if(!db_get_w(hContact, protocolname, "GameId",0)) SkinPlaySound("xfirebstartgame"); db_set_w(hContact, protocolname, "GameId", entry->game); } else { SetIcon(hContact,(HANDLE)-1); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); db_unset(hContact, protocolname, "XStatusMsg"); db_unset(hContact, protocolname, "XStatusId"); db_unset(hContact, protocolname, "XStatusName"); db_unset(hContact, protocolname, "RGame"); db_unset(hContact, protocolname, "GameId"); setBuddyStatusMsg(entry); } } else if (!entry->statusmsg.empty()) { setBuddyStatusMsg(entry); SetIcon(hContact,(HANDLE)-1); SetIcon(hContact,(HANDLE)-1,2); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); db_unset(hContact, protocolname, "VServerIP"); db_unset(hContact, protocolname, "VPort"); db_unset(hContact, protocolname, "RVoice"); db_unset(hContact, protocolname, "RGame"); db_unset(hContact, protocolname, "GameId"); db_unset(hContact, protocolname, "VoiceId"); } else { if(db_get_w(entry->hcontact, protocolname, "Status", -1)==ID_STATUS_OFFLINE) { if(db_get_b(NULL, protocolname, "noclanavatars", 0)==1&&clan>0) ; else if(myClient) myClient->CheckAvatar(entry); } SetIcon(hContact,(HANDLE)-1); SetIcon(hContact,(HANDLE)-1,2); db_set_w(hContact, protocolname, "Status", ID_STATUS_ONLINE); db_set_s(entry->hcontact, protocolname, "MirVer", "xfire"); if(clan>0) db_set_dw(hContact, protocolname, "Clan", clan); //db_set_utf(hContact, "CList", "StatusMsg", ""); db_unset(hContact, protocolname, "XStatusMsg"); db_unset(hContact, protocolname, "XStatusId"); db_unset(hContact, protocolname, "XStatusName"); db_unset(hContact, "CList", "StatusMsg"); db_unset(hContact, protocolname, "ServerIP"); db_unset(hContact, protocolname, "Port"); db_unset(hContact, protocolname, "VServerIP"); db_unset(hContact, protocolname, "VPort"); db_unset(hContact, protocolname, "RVoice"); db_unset(hContact, protocolname, "RGame"); db_unset(hContact, protocolname, "GameId"); db_unset(hContact, protocolname, "VoiceId"); } } if(group!=NULL) { if(!db_get_b(NULL,protocolname,"noclangroups",0)) { if(clan>0) { int val=db_get_b(NULL,protocolname,"mainclangroup",0); if( db_get_b(NULL,protocolname,"skipfriendsgroups",0)==0 || (db_get_b(NULL,protocolname,"skipfriendsgroups",0)==1&& db_get_b(entry->hcontact, protocolname, "isfriend", 0)==0) ) { if(val==0) { db_set_s(entry->hcontact, "CList", "Group", group); } else { char temp[256]; DBVARIANT dbv; mir_snprintf(temp, SIZEOF(temp), "%d", val - 1); db_get_s(NULL,"CListGroups",temp,&dbv); if(dbv.pszVal!=NULL) { mir_snprintf(temp, SIZEOF(temp), "%s\\%s", &dbv.pszVal[1], group); db_set_s(entry->hcontact, "CList", "Group", temp); db_free(&dbv); } } } } else if(clan==-1)//hauptgruppe für fof { int val=db_get_b(NULL,protocolname,"fofgroup",0); if(val==0) { db_set_s(entry->hcontact, "CList", "Group", group); } else { char temp[256]; DBVARIANT dbv; mir_snprintf(temp, SIZEOF(temp), "%d", val - 1); db_get_s(NULL,"CListGroups",temp,&dbv); if(dbv.pszVal!=NULL) { mir_snprintf(temp, SIZEOF(temp), "%s\\%s", &dbv.pszVal[1], group); db_set_s(entry->hcontact, "CList", "Group", temp); db_free(&dbv); } } } } } else { db_set_b(entry->hcontact, protocolname, "isfriend", 1); } return hContact; } INT_PTR AddtoList( WPARAM wParam, LPARAM lParam ) { CCSDATA* ccs = (CCSDATA*)lParam; if (ccs->hContact) { DBVARIANT dbv2; if(!db_get(ccs->hContact,protocolname,"Username",&dbv2)) { if(myClient!=NULL) if(myClient->client->connected) { SendAcceptInvitationPacket accept; accept.name = dbv2.pszVal; myClient->client->send(&accept ); } //temporären buddy entfernen, da eh ein neues packet kommt db_set_b(ccs->hContact, protocolname, "DontSendDenyPacket", 1); CallService(MS_DB_CONTACT_DELETE, (WPARAM) ccs->hContact, 0); } } return 0; } static void __cdecl AckBasicSearch(void * pszNick) { if(pszNick!=NULL) { if(myClient!=NULL) if(myClient->client->connected) { SearchBuddy search; search.searchfor(( char* )pszNick); myClient->client->send(&search ); } } } INT_PTR BasicSearch(WPARAM wParam,LPARAM lParam) { static char buf[50]; if ( lParam ) { if(myClient!=NULL) if(myClient->client->connected) { lstrcpynA(buf, (const char *)lParam, 50); mir_forkthread(AckBasicSearch, &buf ); return 1; } } return 0; } INT_PTR SearchAddtoList(WPARAM wParam,LPARAM lParam) { PROTOSEARCHRESULT *psr = ( PROTOSEARCHRESULT* ) lParam; if ( psr->cbSize != sizeof( PROTOSEARCHRESULT )) return 0; if((int)wParam==0) if(myClient!=NULL) if(myClient->client->connected) { InviteBuddyPacket invite; invite.addInviteName( psr->nick, Translate("Add me to your friends list.")); myClient->client->send(&invite ); } return -1; } void CreateGroup(char*grpn,char*field) { DBVARIANT dbv; char* grp[255]; int val=db_get_b(NULL,protocolname,field,0); if(val==0) { strcpy_s((char*)grp,255,grpn);//((char*)clan->name[i].c_str()); } else { char temp[255]; DBVARIANT dbv; mir_snprintf(temp, SIZEOF(temp), "%d", val - 1); db_get_s(NULL,"CListGroups",temp,&dbv); if(dbv.pszVal!=NULL) { mir_snprintf((char*)grp, 255, "%s\\%s", &dbv.pszVal[1], (char*)grpn); db_free(&dbv); } else //gruppe existiert nciht mehr, auf root alles legen { strcpy_s((char*)grp,255,grpn); db_set_b(NULL,protocolname,field,0); } } char group[255]=""; char temp[10]; int i=0; for (i = 0;; i++) { mir_snprintf(temp, SIZEOF(temp), "%d", i); if (db_get_s(NULL, "CListGroups", temp, &dbv)) { i--; break; } if (dbv.pszVal[0] != '\0' && !lstrcmp(dbv.pszVal + 1, (char*)grp)) { db_free(&dbv); return; } db_free(&dbv); } strcpy_s(group,255,"D"); strcat_s(group,255,(char*)grp); group[0]= 1 | GROUPF_EXPANDED; mir_snprintf(temp, SIZEOF(temp), "%d", i + 1); db_set_s(NULL, "CListGroups", temp, group); CallServiceSync(MS_CLUI_GROUPADDED, i + 1, 0); } INT_PTR SetAwayMsg(WPARAM wParam, LPARAM lParam) { EnterCriticalSection(&modeMsgsMutex); if(( char* )lParam==NULL) { if(wParam==ID_STATUS_ONLINE) { strcpy(statusmessage[0],""); } else if(wParam!=ID_STATUS_OFFLINE/*&&db_get_b(NULL,protocolname,"nocustomaway",0)==0*/) { mir_snprintf(statusmessage[1], SIZEOF(statusmessage[1]), "(AFK) %s", Translate("Away from Keyboard")); } } else { if(wParam==ID_STATUS_ONLINE) { strcpy(statusmessage[0],( char* )lParam); } else if (wParam != ID_STATUS_OFFLINE) { if (db_get_b(NULL,protocolname,"nocustomaway",0)==0&&strlen(( char* )lParam)>0) { mir_snprintf(statusmessage[1], SIZEOF(statusmessage[1]), "(AFK) %s", (char*)lParam); //strcpy(statusmessage[1],( char* )lParam); } else mir_snprintf(statusmessage[1], SIZEOF(statusmessage[1]), "(AFK) %s", Translate("Away from Keyboard")); } } if(myClient!=NULL) { if(myClient->client->connected) { if(bpStatus==ID_STATUS_ONLINE) myClient->Status(statusmessage[0]); else if(wParam!=ID_STATUS_ONLINE&&wParam!=ID_STATUS_OFFLINE) myClient->Status(statusmessage[1]); } } LeaveCriticalSection(&modeMsgsMutex); return 0; } static void SendAMAck( LPVOID param ) { DBVARIANT dbv; if(!db_get_utf((HANDLE)param, protocolname, "XStatusMsg",&dbv)) { ProtoBroadcastAck(protocolname, (HANDLE)param, ACKTYPE_AWAYMSG, ACKRESULT_SUCCESS, (HANDLE) 1, LPARAM(dbv.pszVal)); } else ProtoBroadcastAck(protocolname, (HANDLE)param, ACKTYPE_AWAYMSG, ACKRESULT_SUCCESS, (HANDLE) 1, LPARAM("")); } INT_PTR SetNickName(WPARAM newnick, LPARAM lparam) { if(newnick==NULL) { return FALSE; } if(myClient!=NULL) if(myClient->client->connected) { myClient->setNick((char*)newnick); db_set_s(NULL,protocolname,"Nick",(char*)newnick); return TRUE; } return FALSE; } //sendet neue preferencen zu xfire INT_PTR SendPrefs(WPARAM wparam, LPARAM lparam) { if(myClient!=NULL) if(myClient->client->connected) { PrefsPacket prefs; for(int i=0;iclient->send( &prefs ); return TRUE; } return FALSE; } INT_PTR GetAwayMsg(WPARAM /*wParam*/, LPARAM lParam) { CCSDATA* ccs = (CCSDATA*)lParam; mir_forkthread(SendAMAck,ccs->hContact); return 1; } int ContactDeleted(WPARAM wParam,LPARAM lParam) { if(!db_get_b((HANDLE)wParam, protocolname, "DontSendDenyPacket", 0)) if(db_get_b((HANDLE)wParam,"CList","NotOnList",0)) { if(myClient!=NULL) if(myClient->client->connected) { DBVARIANT dbv2; if(!db_get((HANDLE)wParam,protocolname,"Username",&dbv2)) { SendDenyInvitationPacket deny; deny.name = dbv2.pszVal; myClient->client->send( &deny ); } } } return 0; } INT_PTR StartGame(WPARAM wParam,LPARAM lParam,LPARAM fParam) { //gamelist blocken xgamelist.Block(TRUE); Xfire_game*game=xgamelist.getGamebyGameid(fParam); //starte das spiel if(game) game->start_game(); //gamelist blocken xgamelist.Block(FALSE); return 0; } INT_PTR RemoveFriend(WPARAM wParam,LPARAM lParam) { char temp[256]; DBVARIANT dbv; if(!db_get_s((HANDLE)wParam, protocolname, "Username",&dbv)) { mir_snprintf(temp, SIZEOF(temp), Translate("Do you really want delete your friend %s?"), dbv.pszVal); if(MessageBoxA(NULL,temp,Translate("Confirm Delete"),MB_YESNO|MB_ICONQUESTION)==IDYES) { if(myClient!=NULL) { if(myClient->client->connected) { SendRemoveBuddyPacket removeBuddy; removeBuddy.userid=db_get_dw((HANDLE)wParam,protocolname,"UserId",0); if(removeBuddy.userid!=0) { myClient->client->send(&removeBuddy); } } } } db_free(&dbv); } return 0; } INT_PTR BlockFriend(WPARAM wParam,LPARAM lParam) { DBVARIANT dbv; if(!db_get_s((HANDLE)wParam, protocolname, "Username",&dbv)) { if(MessageBoxA(NULL,Translate("Block this user from ever contacting you again?"),Translate("Block Confirmation"),MB_YESNO|MB_ICONQUESTION)==IDYES) { if(myClient!=NULL) { if(myClient->client->connected) { db_set_b(NULL,"XFireBlock",dbv.pszVal,1); SendDenyInvitationPacket deny; deny.name = dbv.pszVal; myClient->client->send( &deny ); } } } CallService(MS_DB_CONTACT_DELETE, (WPARAM) wParam, 1); db_free(&dbv); } return 0; } INT_PTR StartThisGame(WPARAM wParam,LPARAM lParam) { //gamelist blocken xgamelist.Block(TRUE); //hole die gameid des spiels int id=db_get_w((HANDLE)wParam, protocolname, "GameId",0); //hole passendes spielobjekt Xfire_game*game=xgamelist.getGamebyGameid(id); //starte das spiel if(game) game->start_game(); //gamelist blocken xgamelist.Block(FALSE); return 0; } INT_PTR JoinGame(WPARAM wParam,LPARAM lParam) { //gamelist blocken xgamelist.Block(TRUE); //hole die gameid des spiels int id=db_get_w((HANDLE)wParam, protocolname, "GameId",0); //hole passendes spielobjekt Xfire_game*game=xgamelist.getGamebyGameid(id); //starte das spiel if(game) { DBVARIANT dbv; //dbv.pszVal int port=db_get_w((HANDLE)wParam, protocolname, "Port",0); if(!db_get_s((HANDLE)wParam, protocolname, "ServerIP",&dbv)) { //starte spiel mit netzwerk parametern game->start_game(dbv.pszVal,port); db_free(&dbv); } } //gamelist unblocken xgamelist.Block(FALSE); return 0; } int doneQuery( WPARAM wParam, LPARAM lParam ) { char temp[256]; BuddyListEntry* bud=(BuddyListEntry*)wParam; gServerstats* gameinfo = (gServerstats*)lParam; db_set_s(bud->hcontact, protocolname, "ServerName", gameinfo->name); db_set_s(bud->hcontact, protocolname, "GameType", gameinfo->gametype); db_set_s(bud->hcontact, protocolname, "Map", gameinfo->map); mir_snprintf(temp, SIZEOF(temp), "(%d/%d)", gameinfo->players, gameinfo->maxplayers); db_set_s(bud->hcontact, protocolname, "Players", temp); db_set_b(bud->hcontact, protocolname, "Passworded", gameinfo->password); if(myClient!=NULL) handlingBuddys(bud,0,NULL,TRUE); return 0; } static INT_PTR SetNickDlg(WPARAM wParam,LPARAM lParam) { return ShowSetNick(); } int IconLibChanged(WPARAM wParam, LPARAM lParam) { /*int x=0; char temp[255]; for(int i=0;i<1024;i++) { if(icocache[i].hicon>0) { //ImageList_ReplaceIcon(hAdvancedStatusIcon,(int)icocache[i].handle,icocache[i].hicon); HANDLE before=icocache[i].handle; icocache[i].handle=(HANDLE)CallService(MS_CLIST_EXTRA_ADD_ICON, (WPARAM)icocache[i].hicon, 0); sprintf(temp,"before: %d after: %d",before,icocache[i].handle); MessageBoxA(NULL,temp,temp,0); DrawIcon(GetDC(NULL),x,0,(HICON)CallService(MS_SKIN2_GETICONBYHANDLE,0,(LPARAM)icocache[i].handle)); x+=32; } }*/ return 0; } INT_PTR GetAvatarInfo(WPARAM wParam, LPARAM lParam) { PROTO_AVATAR_INFORMATION* pai = (PROTO_AVATAR_INFORMATION*)lParam; if(db_get_b(NULL,protocolname,"noavatars",-1)!=0) return GAIR_NOAVATAR; pai->format=db_get_w(pai->hContact,"ContactPhoto","Format",0); if(pai->format==0) return GAIR_NOAVATAR; DBVARIANT dbv; if(!db_get(pai->hContact,"ContactPhoto","File",&dbv)) { strcpy(pai->filename,dbv.pszVal); db_free(&dbv); } else return GAIR_NOAVATAR; return GAIR_SUCCESS; }