diff options
Diffstat (limited to 'protocols/IRCG/src/ircproto.cpp')
| -rw-r--r-- | protocols/IRCG/src/ircproto.cpp | 1076 |
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;
+}
|