GTalkExt, ICQ, IRC, Jabber: folders restructurization

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

1 files changed, 1076 insertions, 0 deletions

diff --git a/protocols/IRCG/src/ircproto.cpp b/protocols/IRCG/src/ircproto.cpp
new file mode 100644
index 0000000000..9ff2a1c851
--- /dev/null
+++ b/protocols/IRCG/src/ircproto.cpp
@@ -0,0 +1,1076 @@
+/*

+IRC plugin for Miranda IM

+

+Copyright (C) 2003-05 Jurgen Persson

+Copyright (C) 2007-09 George Hazan

+

+This program is free software; you can redistribute it and/or

+modify it under the terms of the GNU General Public License

+as published by the Free Software Foundation; either version 2

+of the License, or (at your option) any later version.

+

+This program is distributed in the hope that it will be useful,

+but WITHOUT ANY WARRANTY; without even the implied warranty of

+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

+GNU General Public License for more details.

+

+You should have received a copy of the GNU General Public License

+along with this program; if not, write to the Free Software

+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

+*/

+

+#include "irc.h"

+#include "version.h"

+

+#include <m_genmenu.h>

+

+static int CompareSessions( const CDccSession* p1, const CDccSession* p2 )

+{

+	return INT_PTR( p1->di->hContact ) - INT_PTR( p2->di->hContact );

+}

+

+CIrcProto::CIrcProto( const char* szModuleName, const TCHAR* tszUserName ) :

+	m_dcc_chats( 10, CompareSessions ),

+	m_dcc_xfers( 10, CompareSessions ),

+	m_ignoreItems( 10 ),

+	vUserhostReasons( 10 ),

+	vWhoInProgress( 10 )

+{

+	m_iVersion = 2;

+	m_tszUserName = mir_tstrdup( tszUserName );

+	m_szModuleName = mir_strdup( szModuleName );

+

+	InitializeCriticalSection(&cs);

+	InitializeCriticalSection(&m_gchook);

+	m_evWndCreate = ::CreateEvent( NULL, FALSE, FALSE, NULL );

+

+	CreateProtoService( PS_GETMYAWAYMSG,   &CIrcProto::GetMyAwayMsg );

+

+	CreateProtoService( PS_CREATEACCMGRUI, &CIrcProto::SvcCreateAccMgrUI );

+	CreateProtoService( PS_JOINCHAT,       &CIrcProto::OnJoinChat );

+	CreateProtoService( PS_LEAVECHAT,      &CIrcProto::OnLeaveChat );

+

+	CreateProtoService( IRC_JOINCHANNEL,   &CIrcProto::OnJoinMenuCommand );

+	CreateProtoService( IRC_QUICKCONNECT,  &CIrcProto::OnQuickConnectMenuCommand);

+	CreateProtoService( IRC_CHANGENICK,    &CIrcProto::OnChangeNickMenuCommand );

+	CreateProtoService( IRC_SHOWLIST,      &CIrcProto::OnShowListMenuCommand );

+	CreateProtoService( IRC_SHOWSERVER,    &CIrcProto::OnShowServerMenuCommand );

+	CreateProtoService( IRC_UM_CHANSETTINGS, &CIrcProto::OnMenuChanSettings );

+	CreateProtoService( IRC_UM_WHOIS,      &CIrcProto::OnMenuWhois );

+	CreateProtoService( IRC_UM_DISCONNECT, &CIrcProto::OnMenuDisconnect );

+	CreateProtoService( IRC_UM_IGNORE,     &CIrcProto::OnMenuIgnore );

+

+	CreateProtoService( "/DblClickEvent",  &CIrcProto::OnDoubleclicked );

+	CreateProtoService( "/InsertRawIn",    &CIrcProto::Scripting_InsertRawIn );

+	CreateProtoService( "/InsertRawOut",   &CIrcProto::Scripting_InsertRawOut );

+	CreateProtoService( "/InsertGuiIn",    &CIrcProto::Scripting_InsertGuiIn );

+	CreateProtoService( "/InsertGuiOut",   &CIrcProto::Scripting_InsertGuiOut);

+	CreateProtoService( "/GetIrcData",     &CIrcProto::Scripting_GetIrcData);

+

+	codepage = CP_ACP;

+	InitializeCriticalSection(&m_resolve);

+	InitializeCriticalSection(&m_dcc);

+

+	InitPrefs();

+

+	char text[ MAX_PATH ];

+	mir_snprintf( text, sizeof( text ), "%s/Status", m_szProtoName );

+	CallService( MS_DB_SETSETTINGRESIDENT, TRUE, ( LPARAM )text );

+

+	CList_SetAllOffline(true);

+	AddIcons();

+

+	IRC_MAP_ENTRY("PING", PING)

+	IRC_MAP_ENTRY("JOIN", JOIN)

+	IRC_MAP_ENTRY("QUIT", QUIT)

+	IRC_MAP_ENTRY("KICK", KICK)

+	IRC_MAP_ENTRY("MODE", MODE)

+	IRC_MAP_ENTRY("NICK", NICK)

+	IRC_MAP_ENTRY("PART", PART)

+	IRC_MAP_ENTRY("PRIVMSG", PRIVMSG)

+	IRC_MAP_ENTRY("TOPIC", TOPIC)

+	IRC_MAP_ENTRY("NOTICE", NOTICE)

+	IRC_MAP_ENTRY("PING", PINGPONG)

+	IRC_MAP_ENTRY("PONG", PINGPONG)

+	IRC_MAP_ENTRY("INVITE", INVITE)

+	IRC_MAP_ENTRY("ERROR", ERROR)

+	IRC_MAP_ENTRY("001", WELCOME)

+	IRC_MAP_ENTRY("002", YOURHOST)

+	IRC_MAP_ENTRY("005", SUPPORT)

+	IRC_MAP_ENTRY("223", WHOIS_OTHER)			//CodePage info

+	IRC_MAP_ENTRY("254", NOOFCHANNELS)

+	IRC_MAP_ENTRY("263", TRYAGAIN)

+	IRC_MAP_ENTRY("264", WHOIS_OTHER)			//Encryption info (SSL connect)

+	IRC_MAP_ENTRY("301", WHOIS_AWAY)

+	IRC_MAP_ENTRY("302", USERHOST_REPLY)

+	IRC_MAP_ENTRY("305", BACKFROMAWAY)

+	IRC_MAP_ENTRY("306", SETAWAY)

+	IRC_MAP_ENTRY("307", WHOIS_AUTH)

+	IRC_MAP_ENTRY("310", WHOIS_OTHER)

+	IRC_MAP_ENTRY("311", WHOIS_NAME)

+	IRC_MAP_ENTRY("312", WHOIS_SERVER)

+	IRC_MAP_ENTRY("313", WHOIS_OTHER)

+	IRC_MAP_ENTRY("315", WHO_END)

+	IRC_MAP_ENTRY("317", WHOIS_IDLE)

+	IRC_MAP_ENTRY("318", WHOIS_END)

+	IRC_MAP_ENTRY("319", WHOIS_CHANNELS)

+	IRC_MAP_ENTRY("320", WHOIS_AUTH)

+	IRC_MAP_ENTRY("321", LISTSTART)

+	IRC_MAP_ENTRY("322", LIST)

+	IRC_MAP_ENTRY("323", LISTEND)

+	IRC_MAP_ENTRY("324", MODEQUERY)

+	IRC_MAP_ENTRY("330", WHOIS_AUTH)

+	IRC_MAP_ENTRY("332", INITIALTOPIC)

+	IRC_MAP_ENTRY("333", INITIALTOPICNAME)

+	IRC_MAP_ENTRY("352", WHO_REPLY)

+	IRC_MAP_ENTRY("353", NAMES)

+	IRC_MAP_ENTRY("366", ENDNAMES)

+	IRC_MAP_ENTRY("367", BANLIST)

+	IRC_MAP_ENTRY("368", BANLISTEND)

+	IRC_MAP_ENTRY("346", BANLIST)

+	IRC_MAP_ENTRY("347", BANLISTEND)

+	IRC_MAP_ENTRY("348", BANLIST)

+	IRC_MAP_ENTRY("349", BANLISTEND)

+	IRC_MAP_ENTRY("371", WHOIS_OTHER)

+	IRC_MAP_ENTRY("376", ENDMOTD)

+	IRC_MAP_ENTRY("401", WHOIS_NO_USER)

+	IRC_MAP_ENTRY("403", JOINERROR)

+	IRC_MAP_ENTRY("416", WHOTOOLONG)

+	IRC_MAP_ENTRY("421", UNKNOWN)

+	IRC_MAP_ENTRY("422", ENDMOTD)

+	IRC_MAP_ENTRY("433", NICK_ERR)

+	IRC_MAP_ENTRY("471", JOINERROR)

+	IRC_MAP_ENTRY("473", JOINERROR)

+	IRC_MAP_ENTRY("474", JOINERROR)

+	IRC_MAP_ENTRY("475", JOINERROR)

+	IRC_MAP_ENTRY("671", WHOIS_OTHER)			//Encryption info (SSL connect)

+}

+

+CIrcProto::~CIrcProto()

+{

+	if ( con ) {

+		Netlib_CloseHandle( con );

+		con = NULL;

+	}

+

+	Netlib_CloseHandle(hNetlib); hNetlib = NULL;

+	Netlib_CloseHandle(hNetlibDCC); hNetlibDCC = NULL;

+

+	m_dcc_chats.destroy();

+	m_dcc_xfers.destroy();

+

+	DeleteCriticalSection( &cs );

+	DeleteCriticalSection( &m_gchook );

+

+	if (hMenuRoot)

+		CallService( MS_CLIST_REMOVEMAINMENUITEM, ( WPARAM )hMenuRoot, 0 );

+

+	mir_free( m_alias );

+	mir_free( m_szModuleName );

+	mir_free( m_tszUserName );

+

+	CloseHandle( m_evWndCreate );

+	DeleteCriticalSection(&m_resolve);

+	DeleteCriticalSection(&m_dcc);

+	KillChatTimer(OnlineNotifTimer);

+	KillChatTimer(OnlineNotifTimer3);

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// OnModulesLoaded - performs hook registration

+

+static COLORREF crCols[16] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};

+

+static int sttCheckPerform( const char *szSetting, LPARAM lParam )

+{

+	if ( !_strnicmp( szSetting, "PERFORM:", 8 )) {

+		String s = szSetting;

+		s.MakeUpper();

+		if ( s != szSetting ) {

+			OBJLIST<String>* p = ( OBJLIST<String>* )lParam;

+			p->insert( new String( szSetting ));

+	}	}

+	return 0;

+}

+

+int CIrcProto::OnModulesLoaded( WPARAM, LPARAM )

+{

+	char szTemp3[256];

+	NETLIBUSER nlu = {0};

+	TCHAR name[128];

+

+	DBDeleteContactSetting( NULL, m_szModuleName, "JTemp" );

+

+	nlu.cbSize = sizeof(nlu);

+	nlu.flags = NUF_OUTGOING|NUF_INCOMING|NUF_HTTPCONNS|NUF_TCHAR;

+	nlu.szSettingsModule = m_szModuleName;

+	mir_sntprintf( name, SIZEOF(name), TranslateT("%s server connection"), m_tszUserName);

+	nlu.ptszDescriptiveName = name;

+	hNetlib=(HANDLE)CallService( MS_NETLIB_REGISTERUSER, 0, (LPARAM)&nlu);

+

+	nlu.flags = NUF_OUTGOING|NUF_INCOMING|NUF_HTTPCONNS|NUF_TCHAR;

+	char szTemp2[256];

+	mir_snprintf(szTemp2, sizeof(szTemp2), "%s DCC", m_szModuleName);

+	nlu.szSettingsModule = szTemp2;

+	mir_sntprintf( name, SIZEOF(name), TranslateT("%s client-to-client connections"), m_tszUserName);

+	nlu.ptszDescriptiveName = name;

+	hNetlibDCC=(HANDLE)CallService( MS_NETLIB_REGISTERUSER, 0, (LPARAM)&nlu);

+

+	//add as a known module in DB Editor ++

+	CallService( "DBEditorpp/RegisterSingleModule",(WPARAM)m_szModuleName,0);

+	mir_snprintf(szTemp3, sizeof(szTemp3), "%s DCC", m_szModuleName);

+	CallService( "DBEditorpp/RegisterSingleModule",(WPARAM)szTemp3,0);

+

+	if ( ServiceExists("MBot/GetFcnTable")) {

+		CallService( MS_MBOT_REGISTERIRC, 0, (LPARAM)m_szModuleName);

+		m_bMbotInstalled = TRUE;

+	}

+

+	if ( ServiceExists( MS_GC_REGISTER )) {

+		GCREGISTER gcr = {0};

+		gcr.cbSize = sizeof(GCREGISTER);

+		gcr.dwFlags = GC_CHANMGR | GC_BOLD | GC_ITALICS | GC_UNDERLINE | GC_COLOR | GC_BKGCOLOR | GC_TCHAR;

+		gcr.iMaxText = 0;

+		gcr.nColors = 16;

+		gcr.pColors = colors;

+		gcr.ptszModuleDispName = m_tszUserName;

+		gcr.pszModule = m_szModuleName;

+		CallServiceSync( MS_GC_REGISTER, NULL, (LPARAM)&gcr );

+		IrcHookEvent( ME_GC_EVENT, &CIrcProto::GCEventHook );

+		IrcHookEvent( ME_GC_BUILDMENU, &CIrcProto::GCMenuHook );

+

+		GCSESSION gcw = {0};

+		GCDEST gcd = {0};

+		GCEVENT gce = {0};

+

+		gcw.cbSize = sizeof(GCSESSION);

+		gcw.dwFlags = GC_TCHAR;

+		gcw.iType = GCW_SERVER;

+		gcw.ptszID = SERVERWINDOW;

+		gcw.pszModule = m_szModuleName;

+		gcw.ptszName = NEWTSTR_ALLOCA(( TCHAR* )_A2T( m_network ));

+		CallServiceSync( MS_GC_NEWSESSION, 0, (LPARAM)&gcw );

+

+		gce.cbSize = sizeof(GCEVENT);

+		gce.dwFlags = GC_TCHAR;

+		gce.pDest = &gcd;

+		gcd.ptszID = SERVERWINDOW;

+		gcd.pszModule = m_szModuleName;

+		gcd.iType = GC_EVENT_CONTROL;

+

+		gce.pDest = &gcd;

+		if ( m_useServer && !m_hideServerWindow )

+			CallChatEvent( WINDOW_VISIBLE, (LPARAM)&gce);

+		else

+			CallChatEvent( WINDOW_HIDDEN, (LPARAM)&gce);

+		bChatInstalled = TRUE;

+	}

+	else {

+		if ( IDYES == MessageBox(0,TranslateT("The IRC protocol depends on another plugin called \'Chat\'\n\nDo you want to download it from the Miranda NG web site now?"),TranslateT("Information"),MB_YESNO|MB_ICONINFORMATION ))

+			CallService( MS_UTILS_OPENURL, 1, (LPARAM) "http://miranda-ng.org/");

+	}

+

+	TCHAR szTemp[MAX_PATH];

+	mir_sntprintf(szTemp, SIZEOF(szTemp), _T("%%miranda_path%%\\Plugins\\") _T(TCHAR_STR_PARAM) _T("_perform.ini"), m_szModuleName);

+	TCHAR *szLoadFileName = Utils_ReplaceVarsT( szTemp );

+	char* pszPerformData = IrcLoadFile( szLoadFileName );

+	if ( pszPerformData != NULL ) {

+		char *p1 = pszPerformData, *p2 = pszPerformData;

+		while (( p1 = strstr( p2, "NETWORK: " )) != NULL ) {

+			p1 += 9;

+			p2 = strchr(p1, '\n');

+			String sNetwork( p1, int( p2-p1-1 ));

+			sNetwork.MakeUpper();

+			p1 = p2;

+			p2 = strstr( ++p1, "\nNETWORK: " );

+			if ( !p2 )

+				p2 = p1 + lstrlenA( p1 )-1;

+			if ( p1 == p2 )

+				break;

+

+			*p2++ = 0;

+			setString(("PERFORM:" + sNetwork).c_str(), rtrim( p1 ));

+		}

+		delete[] pszPerformData;

+		::_tremove( szLoadFileName );

+	}

+	mir_free( szLoadFileName );

+

+	if ( !getByte( "PerformConversionDone", 0 )) {

+		OBJLIST<String> performToConvert( 10 );

+		DBCONTACTENUMSETTINGS dbces;

+		dbces.pfnEnumProc = sttCheckPerform;

+		dbces.lParam = ( LPARAM )&performToConvert;

+		dbces.szModule = m_szModuleName;

+		CallService( MS_DB_CONTACT_ENUMSETTINGS, NULL, (LPARAM)&dbces );

+

+		for ( int i = 0; i < performToConvert.getCount(); i++ ) {

+			String s = performToConvert[i];

+			DBVARIANT dbv;

+			if ( !getTString( s, &dbv )) {

+				DBDeleteContactSetting( NULL, m_szModuleName, s );

+				s.MakeUpper();

+				setTString( s, dbv.ptszVal );

+				DBFreeVariant( &dbv );

+		}	}

+

+		setByte( "PerformConversionDone", 1 );

+	}

+

+	InitIgnore();

+

+	IrcHookEvent( ME_USERINFO_INITIALISE, &CIrcProto::OnInitUserInfo );

+	IrcHookEvent( ME_OPT_INITIALISE, &CIrcProto::OnInitOptionsPages );

+

+	if ( m_nick[0] ) {

+		TCHAR szBuf[ 40 ];

+		if ( lstrlen( m_alternativeNick ) == 0 ) {

+			mir_sntprintf( szBuf, SIZEOF(szBuf), _T("%s%u"), m_nick, rand()%9999);

+			setTString("AlernativeNick", szBuf);

+			lstrcpyn(m_alternativeNick, szBuf, 30);

+		}

+

+		if ( lstrlen( m_name ) == 0 ) {

+			mir_sntprintf( szBuf, SIZEOF(szBuf), _T("Miranda%u"), rand()%9999);

+			setTString("Name", szBuf);

+			lstrcpyn( m_name, szBuf, 200 );

+	}	}

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// AddToList - adds a contact to the contact list

+

+HANDLE __cdecl CIrcProto::AddToList( int, PROTOSEARCHRESULT* psr )

+{

+	if ( m_iStatus == ID_STATUS_OFFLINE || m_iStatus == ID_STATUS_CONNECTING )

+		return 0;

+

+	TCHAR *id = psr->id ? psr->id : psr->nick;

+	id = psr->flags & PSR_UNICODE ? mir_u2t((wchar_t*)id) : mir_a2t((char*)id);

+

+	CONTACT user = { id, NULL, NULL, true, false, false };

+	HANDLE hContact = CList_AddContact( &user, true, false );

+

+	if ( hContact ) {

+		DBVARIANT dbv1;

+		CMString S = _T("S");

+

+		if ( getByte( hContact, "AdvancedMode", 0 ) == 0 ) {

+			S += user.name;

+			DoUserhostWithReason( 1, S, true, user.name );

+		}

+		else {

+			if ( !getTString(hContact, "UWildcard", &dbv1 )) {

+				S += dbv1.ptszVal;

+				DoUserhostWithReason(2, S, true, dbv1.ptszVal);

+				DBFreeVariant( &dbv1 );

+			}

+			else {

+				S += user.name;

+				DoUserhostWithReason( 2, S, true, user.name );

+			}

+		}

+		if (getByte( "MirVerAutoRequest", 1))

+			PostIrcMessage( _T("/PRIVMSG %s \001VERSION\001"), user.name);

+	}

+

+	mir_free(id);

+	return hContact;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// AddToList - adds a contact to the contact list

+

+HANDLE __cdecl CIrcProto::AddToListByEvent( int, int, HANDLE )

+{

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// AuthAllow - processes the successful authorization

+

+int __cdecl CIrcProto::Authorize( HANDLE )

+{

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// AuthDeny - handles the unsuccessful authorization

+

+int __cdecl CIrcProto::AuthDeny( HANDLE, const TCHAR* )

+{

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// PSR_AUTH

+

+int __cdecl CIrcProto::AuthRecv( HANDLE, PROTORECVEVENT* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// PSS_AUTHREQUEST

+

+int __cdecl CIrcProto::AuthRequest( HANDLE, const TCHAR* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// ChangeInfo

+

+HANDLE __cdecl CIrcProto::ChangeInfo( int, void* )

+{

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// FileAllow - starts a file transfer

+

+HANDLE __cdecl CIrcProto::FileAllow( HANDLE, HANDLE hTransfer, const TCHAR* szPath )

+{

+	DCCINFO* di = ( DCCINFO* )hTransfer;

+

+	if ( !IsConnected()) {

+		delete di;

+		return (HANDLE)szPath;

+	}

+

+	di->sPath = szPath;

+	di->sFileAndPath = di->sPath + di->sFile;

+

+	CDccSession* dcc = new CDccSession( this, di );

+	AddDCCSession( di, dcc );

+	dcc->Connect();

+	return di;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// FileCancel - cancels a file transfer

+

+int __cdecl CIrcProto::FileCancel( HANDLE, HANDLE hTransfer )

+{

+	DCCINFO* di = ( DCCINFO* )hTransfer;

+

+	CDccSession* dcc = FindDCCSession(di);

+	if (dcc) {

+		InterlockedExchange(&dcc->dwWhatNeedsDoing, (long)FILERESUME_CANCEL);

+		SetEvent(dcc->hEvent);

+		dcc->Disconnect();

+	}

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// FileDeny - denies a file transfer

+

+int __cdecl CIrcProto::FileDeny( HANDLE, HANDLE hTransfer, const TCHAR* )

+{

+	DCCINFO* di = ( DCCINFO* )hTransfer;

+	delete di;

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// FileResume - processes file renaming etc

+

+int __cdecl CIrcProto::FileResume( HANDLE hTransfer, int* action, const TCHAR** szFilename )

+{

+	DCCINFO* di = ( DCCINFO* )hTransfer;

+

+	long i = (long)*action;

+

+	CDccSession* dcc = FindDCCSession(di);

+	if (dcc) {

+		InterlockedExchange(&dcc->dwWhatNeedsDoing, i);

+		if (*action == FILERESUME_RENAME) {

+			TCHAR* szTemp = _tcsdup(*szFilename);

+			InterlockedExchangePointer((PVOID*)&dcc->NewFileName, szTemp);

+		}

+

+		if (*action == FILERESUME_RESUME) {

+			unsigned __int64 dwPos = 0;

+

+			struct _stati64 statbuf;

+			if (_tstati64(di->sFileAndPath.c_str(), &statbuf) == 0 && (statbuf.st_mode & _S_IFDIR) == 0)

+				dwPos = statbuf.st_size;

+

+			CMString sFileWithQuotes = di->sFile;

+

+			// if spaces in the filename surround witrh quotes

+			if (sFileWithQuotes.Find( ' ', 0 ) != -1 ) {

+				sFileWithQuotes.Insert( 0, _T("\""));

+				sFileWithQuotes.Insert( sFileWithQuotes.GetLength(), _T("\""));

+			}

+

+			if (di->bReverse)

+				PostIrcMessage( _T("/PRIVMSG %s \001DCC RESUME %s 0 %I64u %s\001"), di->sContactName.c_str(), sFileWithQuotes.c_str(), dwPos, dcc->di->sToken.c_str());

+			else

+				PostIrcMessage( _T("/PRIVMSG %s \001DCC RESUME %s %u %I64u\001"), di->sContactName.c_str(), sFileWithQuotes.c_str(), di->iPort, dwPos);

+

+			return 0;

+		}

+

+		SetEvent(dcc->hEvent);

+	}

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// GetCaps - return protocol capabilities bits

+

+DWORD_PTR __cdecl CIrcProto::GetCaps( int type, HANDLE )

+{

+	switch( type ) {

+	case PFLAGNUM_1:

+		return PF1_BASICSEARCH | PF1_MODEMSG | PF1_FILE | PF1_CHAT | PF1_CANRENAMEFILE | PF1_PEER2PEER | PF1_IM;

+

+	case PFLAGNUM_2:

+		return PF2_ONLINE | PF2_SHORTAWAY;

+

+	case PFLAGNUM_3:

+		return PF2_SHORTAWAY;

+

+	case PFLAGNUM_4:

+		return PF4_NOAUTHDENYREASON | PF4_NOCUSTOMAUTH | PF4_IMSENDUTF;

+

+	case PFLAG_UNIQUEIDTEXT:

+		return (DWORD_PTR) Translate("Nickname");

+

+	case PFLAG_MAXLENOFMESSAGE:

+		return 400;

+

+	case PFLAG_UNIQUEIDSETTING:

+		return (DWORD_PTR) "Nick";

+	}

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// GetIcon - loads an icon for the contact list

+

+HICON __cdecl CIrcProto::GetIcon( int iconIndex )

+{

+	if (LOWORD(iconIndex) == PLI_PROTOCOL)

+	{

+		if (iconIndex & PLIF_ICOLIBHANDLE)

+			return (HICON)GetIconHandle(IDI_MAIN);

+		

+		bool big = (iconIndex & PLIF_SMALL) == 0;

+		HICON hIcon = LoadIconEx(IDI_MAIN, big);

+

+		if (iconIndex & PLIF_ICOLIB)

+			return hIcon;

+

+		HICON hIcon2 = CopyIcon(hIcon);

+		ReleaseIconEx(hIcon);

+		return hIcon2;

+	}

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// GetInfo - retrieves a contact info

+

+int __cdecl CIrcProto::GetInfo( HANDLE, int )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SearchBasic - searches the contact by JID

+

+struct AckBasicSearchParam

+{

+	PROTOCHAR buf[ 50 ];

+};

+

+void __cdecl CIrcProto::AckBasicSearch( void* param )

+{

+	PROTOSEARCHRESULT psr = { 0 };

+	psr.cbSize = sizeof(psr);

+	psr.flags = PSR_TCHAR;

+	psr.id = (( AckBasicSearchParam* )param )->buf;

+	psr.nick = (( AckBasicSearchParam* )param )->buf;

+	ProtoBroadcastAck( m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE) 1, (LPARAM) & psr);

+	ProtoBroadcastAck( m_szModuleName, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

+	delete param;

+}

+

+HANDLE __cdecl CIrcProto::SearchBasic( const PROTOCHAR* szId )

+{

+	if ( szId ) {

+		if (m_iStatus != ID_STATUS_OFFLINE && m_iStatus != ID_STATUS_CONNECTING && 

+			szId && szId[0] && !IsChannel(szId)) {

+			AckBasicSearchParam* param = new AckBasicSearchParam;

+			lstrcpyn( param->buf, szId, 50 );

+			ircFork( &CIrcProto::AckBasicSearch, param );

+			return ( HANDLE )1;

+	}	}

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SearchByEmail - searches the contact by its e-mail

+

+HANDLE __cdecl CIrcProto::SearchByEmail( const PROTOCHAR* )

+{

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// upsupported search functions

+

+HANDLE __cdecl CIrcProto::SearchByName( const PROTOCHAR*, const PROTOCHAR*, const PROTOCHAR* )

+{

+	return NULL;

+}

+

+HWND __cdecl CIrcProto::CreateExtendedSearchUI( HWND )

+{

+	return NULL;

+}

+

+HWND __cdecl CIrcProto::SearchAdvanced( HWND )

+{

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// RecvContacts

+

+int __cdecl CIrcProto::RecvContacts( HANDLE, PROTORECVEVENT* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// RecvFile

+

+int __cdecl CIrcProto::RecvFile( HANDLE hContact, PROTORECVFILET* evt )

+{

+	return Proto_RecvFile(hContact, evt);

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// RecvMsg

+

+int __cdecl CIrcProto::RecvMsg( HANDLE hContact, PROTORECVEVENT* evt )

+{

+	return Proto_RecvMessage(hContact, evt);

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// RecvUrl

+

+int __cdecl CIrcProto::RecvUrl( HANDLE, PROTORECVEVENT* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SendContacts

+

+int __cdecl CIrcProto::SendContacts( HANDLE, int, int, HANDLE* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SendFile - sends a file

+

+HANDLE __cdecl CIrcProto::SendFile( HANDLE hContact, const TCHAR*, TCHAR** ppszFiles )

+{

+	DCCINFO* dci = NULL;

+	int iPort = 0;

+	int index= 0;

+	unsigned __int64 size = 0;

+

+	// do not send to channels :-P

+	if ( getByte(hContact, "ChatRoom", 0) != 0)

+		return 0;

+

+	// stop if it is an active type filetransfer and the user's IP is not known

+	unsigned long ulAdr = 0;

+	if (m_manualHost)

+		ulAdr = ConvertIPToInteger(m_mySpecifiedHostIP);

+	else

+		ulAdr = ConvertIPToInteger(m_IPFromServer?m_myHost:m_myLocalHost);

+

+	if (!m_DCCPassive && !ulAdr) {

+		DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), TranslateT("DCC ERROR: Unable to automatically resolve external IP"), NULL, NULL, NULL, true, false);

+		return 0;

+	}

+

+	if ( ppszFiles[index] ) {

+

+		//get file size

+		while (ppszFiles[index]) {

+			struct _stati64 statbuf;

+			if (_tstati64(ppszFiles[index], &statbuf) == 0 && (statbuf.st_mode & _S_IFDIR) == 0) {

+				size = statbuf.st_size;

+				break;

+			}

+			index++;

+		}

+

+		if (size == 0) {

+			DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), TranslateT("DCC ERROR: No valid files specified"), NULL, NULL, NULL, true, false);

+			return 0;

+		}

+

+		DBVARIANT dbv;

+		if ( !getTString( hContact, "Nick", &dbv )) {

+			// set up a basic DCCINFO struct and pass it to a DCC object

+			dci = new DCCINFO;

+			dci->sFileAndPath = ppszFiles[index];

+

+			int i = dci->sFileAndPath.ReverseFind( '\\' );

+			if (i != -1) {

+				dci->sPath = dci->sFileAndPath.Mid(0, i+1);

+				dci->sFile = dci->sFileAndPath.Mid(i+1, dci->sFileAndPath.GetLength());

+			}

+

+			CMString sFileWithQuotes = dci->sFile;

+

+			// if spaces in the filename surround witrh quotes

+			if ( sFileWithQuotes.Find( ' ', 0 ) != -1) {

+				sFileWithQuotes.Insert( 0, _T("\""));

+				sFileWithQuotes.Insert( sFileWithQuotes.GetLength(), _T("\""));

+			}

+

+			dci->hContact = hContact;

+			dci->sContactName = dbv.ptszVal;

+			dci->iType = DCC_SEND;

+			dci->bReverse = m_DCCPassive?true:false;

+			dci->bSender = true;

+			dci->dwSize = size;

+

+			// create new dcc object

+			CDccSession* dcc = new CDccSession(this,dci);

+

+			// keep track of all objects created

+			AddDCCSession(dci, dcc);

+

+			// need to make sure that %'s are doubled to avoid having chat interpret as color codes

+			CMString sFileCorrect = dci->sFile;

+			ReplaceString(sFileCorrect, _T("%"), _T("%%"));

+

+			// is it an reverse filetransfer (receiver acts as server)

+			if (dci->bReverse) {

+				TCHAR szTemp[256];

+				PostIrcMessage( _T("/CTCP %s DCC SEND %s 200 0 %I64u %u"),

+					dci->sContactName.c_str(), sFileWithQuotes.c_str(), dci->dwSize, dcc->iToken);

+

+				mir_sntprintf(szTemp, SIZEOF(szTemp),

+					TranslateT("DCC reversed file transfer request sent to %s [%s]"),

+					dci->sContactName.c_str(), sFileCorrect.c_str());

+				DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);

+

+				if (m_sendNotice) {

+					mir_sntprintf(szTemp, SIZEOF(szTemp),

+						_T("/NOTICE %s I am sending the file \'\002%s\002\' (%I64u kB) to you, please accept it. [Reverse transfer]"),

+						dci->sContactName.c_str(), sFileCorrect.c_str(), dci->dwSize/1024);

+					PostIrcMessage(szTemp);

+				}

+			}

+			else { // ... normal filetransfer.

+				iPort = dcc->Connect();

+				if ( iPort ) {

+					TCHAR szTemp[256];

+					PostIrcMessage( _T("/CTCP %s DCC SEND %s %u %u %I64u"),

+						dci->sContactName.c_str(), sFileWithQuotes.c_str(), ulAdr, iPort, dci->dwSize);

+

+					mir_sntprintf(szTemp, SIZEOF(szTemp),

+						TranslateT("DCC file transfer request sent to %s [%s]"),

+						dci->sContactName.c_str(), sFileCorrect.c_str());

+					DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);

+

+					if ( m_sendNotice ) {

+						mir_sntprintf(szTemp, SIZEOF(szTemp),

+							_T("/NOTICE %s I am sending the file \'\002%s\002\' (%I64u kB) to you, please accept it. [IP: %s]"),

+							dci->sContactName.c_str(), sFileCorrect.c_str(), dci->dwSize/1024, (TCHAR*)_A2T(ConvertIntegerToIP(ulAdr)));

+						PostIrcMessage(szTemp);

+					}

+				}

+				else DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(),

+					TranslateT("DCC ERROR: Unable to bind local port"), NULL, NULL, NULL, true, false);

+			}

+

+			// fix for sending multiple files

+			index++;

+			while( ppszFiles[index] ) {

+				if ( _taccess(ppszFiles[index], 0) == 0 ) {

+					PostIrcMessage( _T("/DCC SEND %s ") _T(TCHAR_STR_PARAM), dci->sContactName.c_str(), ppszFiles[index]);

+				}

+				index++;

+			}

+

+			DBFreeVariant( &dbv );

+	}	}

+

+	if (dci)

+		return dci;

+	return NULL;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SendMessage - sends a message

+

+void __cdecl CIrcProto::AckMessageFail( void* info )

+{

+	ProtoBroadcastAck( m_szModuleName, info, ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE) 1, (LPARAM)Translate("The protocol is not online"));

+}

+

+void __cdecl CIrcProto::AckMessageFailDcc( void* info )

+{

+	ProtoBroadcastAck( m_szModuleName, info, ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE) 1, (LPARAM)Translate("The dcc chat connection is not active"));

+}

+

+void __cdecl CIrcProto::AckMessageSuccess( void* info )

+{

+	ProtoBroadcastAck( m_szModuleName, info, ACKTYPE_MESSAGE, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

+}

+

+int __cdecl CIrcProto::SendMsg( HANDLE hContact, int flags, const char* pszSrc )

+{

+	BYTE bDcc = getByte( hContact, "DCC", 0) ;

+	WORD wStatus = getWord( hContact, "Status", ID_STATUS_OFFLINE) ;

+	if ( m_iStatus != ID_STATUS_OFFLINE && m_iStatus != ID_STATUS_CONNECTING && !bDcc || bDcc && wStatus == ID_STATUS_ONLINE ) {

+		int codepage = getCodepage();

+

+		TCHAR* result;

+		if ( flags & PREF_UNICODE ) {

+			const char* p = strchr( pszSrc, '\0' );

+			if ( p != pszSrc ) {

+				while ( *(++p) == '\0' )

+					;

+				result = mir_u2t_cp(( wchar_t* )p, codepage );

+			}

+			else result = mir_a2t_cp( pszSrc, codepage );

+		}

+		else if ( flags & PREF_UTF ) {

+			mir_utf8decode( NEWSTR_ALLOCA(pszSrc), &result );

+		}

+		else result = mir_a2t_cp( pszSrc, codepage );

+

+		PostIrcMessageWnd(NULL, hContact, result );

+		mir_free( result );

+		ircFork( &CIrcProto::AckMessageSuccess, hContact );

+	}

+	else {

+		if ( bDcc )

+			ircFork( &CIrcProto::AckMessageFailDcc, hContact );

+		else

+			ircFork( &CIrcProto::AckMessageFail, hContact );

+	}

+

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SendUrl

+

+int __cdecl CIrcProto::SendUrl( HANDLE, int, const char* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SetApparentMode - sets the visibility status

+

+int __cdecl CIrcProto::SetApparentMode( HANDLE, int )

+{

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SetStatus - sets the protocol status

+

+int __cdecl CIrcProto::SetStatus( int iNewStatus )

+{

+	return SetStatusInternal( iNewStatus, false );

+}

+

+int CIrcProto::SetStatusInternal( int iNewStatus, bool bIsInternal )

+{

+	if ( !bChatInstalled )

+		return 0;

+

+	if ( iNewStatus != ID_STATUS_OFFLINE && !m_network[0] ) {

+		if (m_nick[0] && !m_disableDefaultServer) {

+			CQuickDlg* dlg = new CQuickDlg( this );

+			dlg->GetProto()->m_quickComboSelection = dlg->GetProto()->m_serverComboSelection + 1;

+			dlg->Show();

+			HWND hwnd = dlg->GetHwnd();

+			SetWindowTextA(hwnd, "Miranda IRC");

+			SetWindowText(GetDlgItem(hwnd, IDC_TEXT), TranslateT("Please choose an IRC-network to go online. This network will be the default."));

+			SetWindowText(GetDlgItem(hwnd, IDC_CAPTION), TranslateT("Default network"));

+			WindowSetIcon(hwnd, IDI_MAIN);

+			ShowWindow(hwnd, SW_SHOW);

+			SetActiveWindow(hwnd);

+		}

+		return 0;

+	}

+

+	if ( iNewStatus != ID_STATUS_OFFLINE && !m_nick[0] || !m_userID[0] || !m_name[0]) {

+		MIRANDASYSTRAYNOTIFY msn;

+		msn.cbSize = sizeof( MIRANDASYSTRAYNOTIFY );

+		msn.szProto = m_szModuleName;

+		msn.tszInfoTitle = TranslateT( "IRC error" );

+		msn.tszInfo = TranslateT( "Connection can not be established! You have not completed all necessary fields (Nickname, User ID and m_name)." );

+		msn.dwInfoFlags = NIIF_ERROR | NIIF_INTERN_UNICODE;

+		msn.uTimeout = 15000;

+		CallService( MS_CLIST_SYSTRAY_NOTIFY, (WPARAM)NULL,(LPARAM) &msn);

+		return 0;

+	}

+

+	if ( !bIsInternal )

+		m_iDesiredStatus = iNewStatus;

+

+	if (( iNewStatus == ID_STATUS_ONLINE || iNewStatus == ID_STATUS_AWAY || iNewStatus == ID_STATUS_FREECHAT) && !IsConnected()) //go from offline to online

+	{

+		if (!m_bConnectThreadRunning)

+			ConnectToServer();

+	}

+	else if (( iNewStatus == ID_STATUS_ONLINE || iNewStatus == ID_STATUS_FREECHAT) && IsConnected() && m_iStatus == ID_STATUS_AWAY) //go to online while connected

+	{

+		m_statusMessage = _T("");

+		PostIrcMessage( _T("/AWAY"));

+		return 0;

+	}

+	else if ( iNewStatus == ID_STATUS_OFFLINE && IsConnected()) //go from online/away to offline

+		DisconnectFromServer();

+	else if ( iNewStatus == ID_STATUS_OFFLINE && !IsConnected()) //offline to offline

+	{

+		KillChatTimer( RetryTimer);

+		return 0;

+	}

+	else if ( iNewStatus == ID_STATUS_AWAY && IsConnected()) //go to away while connected

+	{

+		PostIrcMessage( _T("/AWAY %s"), m_statusMessage.Mid(0,450).c_str());

+		return 0;

+	}

+	else if ( iNewStatus == ID_STATUS_ONLINE && IsConnected()) //already online

+		return 0;

+	else

+		SetStatusInternal(ID_STATUS_AWAY, true);

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// GetAwayMsg - returns a contact's away message

+

+HANDLE __cdecl CIrcProto::GetAwayMsg( HANDLE hContact )

+{

+	WhoisAwayReply = _T("");

+	DBVARIANT dbv;

+

+	// bypass chat contacts.

+	if ( getByte( hContact, "ChatRoom", 0 ) == 0) {

+		if ( hContact && !getTString( hContact, "Nick", &dbv)) {

+			int i = getWord( hContact, "Status", ID_STATUS_OFFLINE );

+			if ( i != ID_STATUS_AWAY) {

+				DBFreeVariant( &dbv);

+				return 0;

+			}

+			CMString S = _T("WHOIS ");

+			S += dbv.ptszVal;

+			if (IsConnected())

+				SendIrcMessage( S.c_str(), false);

+			DBFreeVariant( &dbv);

+	}	}

+

+	return (HANDLE)1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// PSR_AWAYMSG

+

+int __cdecl CIrcProto::RecvAwayMsg( HANDLE, int, PROTORECVEVENT* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// PSS_AWAYMSG

+

+int __cdecl CIrcProto::SendAwayMsg( HANDLE, HANDLE, const char* )

+{

+	return 1;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SetAwayMsg - sets the away status message

+

+int __cdecl CIrcProto::SetAwayMsg( int status, const TCHAR* msg )

+{

+	switch( status ) {

+	case ID_STATUS_ONLINE:     case ID_STATUS_INVISIBLE:   case ID_STATUS_FREECHAT:

+	case ID_STATUS_CONNECTING: case ID_STATUS_OFFLINE:

+		break;

+

+	default:

+		CMString newStatus = msg;

+		ReplaceString( newStatus, _T("\r\n"), _T(" "));

+		if ( m_statusMessage.IsEmpty() || msg == NULL || m_statusMessage != newStatus ) {

+			if ( msg == NULL || *msg == 0 )

+				m_statusMessage = _T(STR_AWAYMESSAGE);

+			else

+				m_statusMessage = newStatus;

+

+			if ( m_iStatus == ID_STATUS_AWAY )

+				PostIrcMessage( _T("/AWAY %s"), m_statusMessage.Mid(0,450).c_str());

+	}	}

+

+	return 0;

+}

+

+/////////////////////////////////////////////////////////////////////////////////////////

+// UserIsTyping - sends a UTN notification

+

+int __cdecl CIrcProto::UserIsTyping( HANDLE, int )

+{

+	return 0;

+}

+

+/////////////////////////////////////////////////////////////////////////////////////////

+// OnEvent - maintain protocol events

+

+int __cdecl CIrcProto::OnEvent( PROTOEVENTTYPE eventType, WPARAM wParam, LPARAM lParam )

+{

+	switch( eventType ) {

+	case EV_PROTO_ONLOAD:    return OnModulesLoaded( 0, 0 );

+	case EV_PROTO_ONEXIT:    return OnPreShutdown( 0, 0 );

+	case EV_PROTO_ONOPTIONS: return OnInitOptionsPages( wParam, lParam );

+

+	case EV_PROTO_ONMENU:

+		InitMainMenus();

+		break;

+

+	case EV_PROTO_ONRENAME:

+		if ( hMenuRoot ) {

+			CLISTMENUITEM clmi = { 0 };

+			clmi.cbSize = sizeof(CLISTMENUITEM);

+			clmi.flags = CMIM_NAME | CMIF_TCHAR | CMIF_KEEPUNTRANSLATED;

+			clmi.ptszName = m_tszUserName;

+			CallService( MS_CLIST_MODIFYMENUITEM, ( WPARAM )hMenuRoot, ( LPARAM )&clmi );

+		}

+		break;

+

+	case EV_PROTO_ONCONTACTDELETED:

+		return OnContactDeleted(wParam, lParam);

+

+	case EV_PROTO_DBSETTINGSCHANGED:

+		return OnDbSettingChanged(wParam, lParam);

+	}

+	return 1;

+}