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, 0 insertions, 1076 deletions

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

-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;

-}