diff options
Diffstat (limited to 'protocols/IRCG/src/input.cpp')
| -rw-r--r-- | protocols/IRCG/src/input.cpp | 936 |
1 files changed, 936 insertions, 0 deletions
diff --git a/protocols/IRCG/src/input.cpp b/protocols/IRCG/src/input.cpp new file mode 100644 index 0000000000..c564b7844c --- /dev/null +++ b/protocols/IRCG/src/input.cpp @@ -0,0 +1,936 @@ +/*
+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"
+
+#define NICKSUBSTITUTE _T("!_nick_!")
+
+void CIrcProto::FormatMsg(CMString& text)
+{
+ TCHAR temp[30];
+ lstrcpyn(temp, GetWord(text.c_str(), 0).c_str(), 29);
+ CharLower(temp);
+ CMString command = temp;
+ CMString S = _T("");
+ if (command == _T("/quit") || command == _T("/away"))
+ S = GetWord(text.c_str(), 0) + _T(" :") + GetWordAddress(text.c_str(), 1);
+ else if (command == _T("/privmsg") || command == _T("/part") || command == _T("/topic") || command == _T("/notice")) {
+ S = GetWord(text.c_str(), 0) + _T(" ") + GetWord(text.c_str(), 1) + _T(" :");
+ if (!GetWord(text.c_str(), 2).IsEmpty())
+ S += CMString(GetWordAddress(text.c_str(), 2));
+ }
+ else if (command == _T("/kick")) {
+ S = GetWord(text.c_str(), 0) + _T(" ") + GetWord(text.c_str(), 1) + _T(" ") + GetWord(text.c_str(), 2) + _T(" :") + GetWordAddress(text.c_str(), 3);
+ }
+ else if (command == _T("/nick")) {
+ if ( !_tcsstr(GetWord(text.c_str(), 1).c_str(), NICKSUBSTITUTE )) {
+ sNick4Perform = GetWord(text.c_str(), 1);
+ S = GetWordAddress(text.c_str(), 0);
+ }
+ else {
+ CMString sNewNick = GetWord(text.c_str(), 1);
+ if ( sNick4Perform == _T("")) {
+ DBVARIANT dbv;
+ if ( !getTString( "PNick", &dbv )) {
+ sNick4Perform = dbv.ptszVal;
+ DBFreeVariant(&dbv);
+ } }
+
+ ReplaceString( sNewNick, NICKSUBSTITUTE, sNick4Perform.c_str());
+ S = GetWord(text.c_str(), 0) + _T(" ") + sNewNick;
+ }
+ }
+ else S = GetWordAddress(text.c_str(), 0);
+
+ S.Delete(0,1);
+ text = S;
+}
+
+static void AddCR( CMString& text )
+{
+ ReplaceString( text, _T("\n"), _T("\r\n"));
+ ReplaceString( text, _T("\r\r"), _T("\r"));
+}
+
+CMString CIrcProto::DoAlias( const TCHAR *text, TCHAR *window)
+{
+ CMString Messageout = _T("");
+ const TCHAR* p1 = text;
+ const TCHAR* p2 = text;
+ bool LinebreakFlag = false, hasAlias = false;
+ p2 = _tcsstr(p1, _T("\r\n"));
+ if ( !p2 )
+ p2 = _tcschr(p1, '\0');
+ if ( p1 == p2 )
+ return (CMString)text;
+
+ do {
+ if ( LinebreakFlag )
+ Messageout += _T("\r\n");
+
+ TCHAR* line = new TCHAR[p2-p1 +1];
+ lstrcpyn(line, p1, p2-p1+1);
+ TCHAR* test = line;
+ while ( *test == ' ' )
+ test++;
+ if ( *test == '/' ) {
+ lstrcpyn(line, GetWordAddress(line, 0), p2-p1+1);
+ CMString S = line;
+ delete [] line;
+ line = new TCHAR[S.GetLength()+2];
+ lstrcpyn(line, S.c_str(), S.GetLength()+1);
+ CMString alias( m_alias );
+ const TCHAR* p3 = _tcsstr( alias.c_str(), (GetWord(line, 0)+ _T(" ")).c_str());
+ if ( p3 != alias.c_str()) {
+ CMString S = _T("\r\n");
+ S += GetWord(line, 0) + _T(" ");
+ p3 = _tcsstr( alias.c_str(), S.c_str());
+ if ( p3 )
+ p3 += 2;
+ }
+ if ( p3 != NULL ) {
+ hasAlias = true;
+ const TCHAR* p4 = _tcsstr( p3, _T("\r\n"));
+ if ( !p4 )
+ p4 = _tcschr( p3, '\0' );
+
+ *( TCHAR* )p4 = 0;
+ CMString S = p3;
+ ReplaceString( S, _T("##"), window );
+ ReplaceString( S, _T("$?"), _T("%question"));
+
+ for ( int index = 1; index < 8; index++ ) {
+ TCHAR str[5];
+ mir_sntprintf( str, SIZEOF(str), _T("#$%u"), index );
+ if ( !GetWord(line, index).IsEmpty() && IsChannel( GetWord( line, index )))
+ ReplaceString( S, str, GetWord(line, index).c_str());
+ else {
+ CMString S1 = _T("#");
+ S1 += GetWord( line, index );
+ ReplaceString( S, str, S1.c_str());
+ }
+ }
+ for ( int index2 = 1; index2 <8; index2++ ) {
+ TCHAR str[5];
+ mir_sntprintf( str, SIZEOF(str), _T("$%u-"), index2 );
+ ReplaceString( S, str, GetWordAddress( line, index2 ));
+ }
+ for ( int index3 = 1; index3 <8; index3++ ) {
+ TCHAR str[5];
+ mir_sntprintf( str, SIZEOF(str), _T("$%u"), index3 );
+ ReplaceString( S, str, GetWord(line, index3).c_str());
+ }
+ Messageout += GetWordAddress(S.c_str(), 1);
+ }
+ else Messageout += line;
+ }
+ else Messageout += line;
+
+ p1 = p2;
+ if ( *p1 == '\r' )
+ p1 += 2;
+ p2 = _tcsstr( p1, _T("\r\n"));
+ if ( !p2 )
+ p2 = _tcschr( p1, '\0' );
+ delete [] line;
+ LinebreakFlag = true;
+ }
+ while ( *p1 != '\0');
+
+ return hasAlias ? DoIdentifiers(Messageout, window) : Messageout;
+}
+
+CMString CIrcProto::DoIdentifiers( CMString text, const TCHAR* )
+{
+ SYSTEMTIME time;
+ TCHAR str[2];
+
+ GetLocalTime( &time );
+ ReplaceString( text, _T("%mnick"), m_nick);
+ ReplaceString( text, _T("%anick"), m_alternativeNick);
+ ReplaceString( text, _T("%awaymsg"), m_statusMessage.c_str());
+ ReplaceString( text, _T("%module"), _A2T(m_szModuleName));
+ ReplaceString( text, _T("%name"), m_name);
+ ReplaceString( text, _T("%newl"), _T("\r\n"));
+ ReplaceString( text, _T("%network"), m_info.sNetwork.c_str());
+ ReplaceString( text, _T("%me"), m_info.sNick.c_str());
+
+ char mirver[100];
+ CallService(MS_SYSTEM_GETVERSIONTEXT, SIZEOF(mirver), LPARAM(mirver));
+ ReplaceString(text, _T("%mirver"), _A2T(mirver));
+
+ ReplaceString(text, _T("%version"), _T(__VERSION_STRING));
+
+ str[0] = 3; str[1] = '\0';
+ ReplaceString(text, _T("%color"), str);
+
+ str[0] = 2;
+ ReplaceString(text, _T("%bold"), str);
+
+ str[0] = 31;
+ ReplaceString(text, _T("%underline"), str);
+
+ str[0] = 22;
+ ReplaceString(text, _T("%italics"), str);
+ return text;
+}
+
+static void __stdcall sttSetTimerOn( void* _pro )
+{
+ CIrcProto* ppro = ( CIrcProto* )_pro;
+ ppro->DoEvent( GC_EVENT_INFORMATION, NULL, ppro->m_info.sNick.c_str(), TranslateT( "The buddy check function is enabled"), NULL, NULL, NULL, true, false);
+ ppro->SetChatTimer( ppro->OnlineNotifTimer, 500, OnlineNotifTimerProc );
+ if ( ppro->m_channelAwayNotification )
+ ppro->SetChatTimer( ppro->OnlineNotifTimer3, 1500, OnlineNotifTimerProc3 );
+}
+
+static void __stdcall sttSetTimerOff( void* _pro )
+{
+ CIrcProto* ppro = ( CIrcProto* )_pro;
+ ppro->DoEvent( GC_EVENT_INFORMATION, NULL, ppro->m_info.sNick.c_str(), TranslateT("The buddy check function is disabled"), NULL, NULL, NULL, true, false);
+ ppro->KillChatTimer( ppro->OnlineNotifTimer );
+ ppro->KillChatTimer( ppro->OnlineNotifTimer3 );
+}
+
+BOOL CIrcProto::DoHardcodedCommand( CMString text, TCHAR* window, HANDLE hContact )
+{
+ TCHAR temp[30];
+ lstrcpyn(temp, GetWord(text.c_str(), 0).c_str(), 29 );
+ CharLower(temp);
+ CMString command = temp;
+ CMString one = GetWord(text.c_str(), 1);
+ CMString two = GetWord(text.c_str(), 2);
+ CMString three = GetWord(text.c_str(), 3);
+ CMString therest = GetWordAddress(text.c_str(), 4);
+
+ if ( command == _T("/servershow") || command == _T("/serverhide")) {
+ if ( m_useServer ) {
+ GCEVENT gce = {0};
+ GCDEST gcd = {0};
+ gce.dwFlags = GC_TCHAR;
+ gcd.iType = GC_EVENT_CONTROL;
+ gcd.ptszID = SERVERWINDOW;
+ gcd.pszModule = m_szModuleName;
+ gce.cbSize = sizeof(GCEVENT);
+ gce.pDest = &gcd;
+ CallChatEvent( command == _T("/servershow") ? WINDOW_VISIBLE : WINDOW_HIDDEN, (LPARAM)&gce);
+ }
+ return true;
+ }
+
+ else if (command == _T("/sleep") || command == _T("/wait")) {
+ if (!one.IsEmpty()) {
+ int ms;
+ if (_stscanf(one.c_str(), _T("%d"), &ms) == 1 && ms > 0 && ms <= 4000)
+ Sleep(ms);
+ else
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Incorrect parameters. Usage: /sleep [ms], ms should be greater than 0 and less than 4000."), NULL, NULL, NULL, true, false);
+ }
+ return true;
+ }
+
+ if (command == _T("/clear")) {
+ CMString S;
+ if ( !one.IsEmpty()) {
+ if ( one == _T("server"))
+ S = SERVERWINDOW;
+ else
+ S = MakeWndID( one.c_str());
+ }
+ else if ( lstrcmpi( window, SERVERWINDOW) == 0 )
+ S = window;
+ else
+ S = MakeWndID( window );
+
+ GCEVENT gce = {0};
+ GCDEST gcd = {0};
+ gce.cbSize = sizeof(GCEVENT);
+ gcd.iType = GC_EVENT_CONTROL;
+ gcd.pszModule = m_szModuleName;
+ gce.pDest = &gcd;
+ gce.dwFlags = GC_TCHAR;
+ gcd.ptszID = (TCHAR*)S.c_str();
+ CallChatEvent( WINDOW_CLEARLOG, (LPARAM)&gce);
+ return true;
+ }
+
+ if ( command == _T("/ignore")) {
+ if ( IsConnected()) {
+ CMString IgnoreFlags;
+ TCHAR temp[500];
+ if ( one.IsEmpty()) {
+ if ( m_ignore )
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Ignore system is enabled"), NULL, NULL, NULL, true, false);
+ else
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Ignore system is disabled"), NULL, NULL, NULL, true, false);
+ return true;
+ }
+ if ( !lstrcmpi( one.c_str(), _T("on"))) {
+ m_ignore = 1;
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Ignore system is enabled"), NULL, NULL, NULL, true, false);
+ return true;
+ }
+ if ( !lstrcmpi( one.c_str(), _T("off"))) {
+ m_ignore = 0;
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Ignore system is disabled"), NULL, NULL, NULL, true, false);
+ return true;
+ }
+ if ( !_tcschr( one.c_str(), '!' ) && !_tcschr( one.c_str(), '@' ))
+ one += _T("!*@*");
+
+ if ( !two.IsEmpty() && two[0] == '+' ) {
+ if ( _tcschr( two.c_str(), 'q'))
+ IgnoreFlags += 'q';
+ if ( _tcschr( two.c_str(), 'n'))
+ IgnoreFlags += 'n';
+ if ( _tcschr( two.c_str(), 'i'))
+ IgnoreFlags += 'i';
+ if ( _tcschr( two.c_str(), 'd'))
+ IgnoreFlags += 'd';
+ if ( _tcschr( two.c_str(), 'c'))
+ IgnoreFlags += 'c';
+ if ( _tcschr( two.c_str(), 'm'))
+ IgnoreFlags += 'm';
+ }
+ else IgnoreFlags = _T("qnidc");
+
+ CMString m_network;
+ if ( three.IsEmpty())
+ m_network = m_info.sNetwork;
+ else
+ m_network = three;
+
+ AddIgnore( one.c_str(), IgnoreFlags.c_str(), m_network.c_str());
+
+ mir_sntprintf(temp, SIZEOF(temp), TranslateT("%s on %s is now ignored (+%s)"), one.c_str(), m_network.c_str(), IgnoreFlags.c_str());
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), temp, NULL, NULL, NULL, true, false);
+ }
+ return true;
+ }
+
+ if (command == _T("/unignore")) {
+ if ( !_tcschr( one.c_str(), '!' ) && !_tcschr(one.c_str(), '@'))
+ one += _T("!*@*");
+
+ TCHAR temp[500];
+ if ( RemoveIgnore( one.c_str()))
+ mir_sntprintf(temp, SIZEOF(temp), TranslateT("%s is not ignored now"), one.c_str());
+ else
+ mir_sntprintf(temp, SIZEOF(temp), TranslateT("%s was not ignored"), one.c_str());
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), temp, NULL, NULL, NULL, true, false);
+ return true;
+ }
+
+ if ( command == _T("/userhost")) {
+ if ( one.IsEmpty())
+ return true;
+
+ DoUserhostWithReason( 1, _T("U"), false, temp );
+ return false;
+ }
+
+ if ( command == _T("/joinx")) {
+ if ( !one.IsEmpty()) {
+ for ( int i=1; ; i++ ) {
+ CMString tmp = GetWord( text.c_str(), i );
+ if ( tmp.IsEmpty())
+ break;
+
+ AddToJTemp( 'X', tmp );
+ }
+
+ PostIrcMessage( _T("/JOIN %s"), GetWordAddress(text.c_str(), 1));
+ }
+ return true;
+ }
+
+ if ( command == _T("/joinm")) {
+ if ( !one.IsEmpty()) {
+ for ( int i=1; ; i++ ) {
+ CMString tmp = GetWord( text.c_str(), i );
+ if ( tmp.IsEmpty())
+ break;
+
+ AddToJTemp( 'M', tmp );
+ }
+
+ PostIrcMessage( _T("/JOIN %s"), GetWordAddress(text.c_str(), 1));
+ }
+ return true;
+ }
+
+ if (command == _T("/nusers")) {
+ TCHAR szTemp[40];
+ CMString S = MakeWndID(window);
+ GC_INFO gci = {0};
+ gci.Flags = BYID|NAME|COUNT;
+ gci.pszModule = m_szModuleName;
+ gci.pszID = (TCHAR*)S.c_str();
+ if ( !CallServiceSync( MS_GC_GETINFO, 0, ( LPARAM )&gci ))
+ mir_sntprintf( szTemp, SIZEOF(szTemp), _T("users: %u"), gci.iCount);
+
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ return true;
+ }
+
+ if (command == _T("/echo")) {
+ if ( one.IsEmpty())
+ return true;
+
+ if ( !lstrcmpi( one.c_str(), _T("on"))) {
+ bEcho = TRUE;
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Outgoing commands are shown"), NULL, NULL, NULL, true, false);
+ }
+
+ if ( !lstrcmpi( one.c_str(), _T("off"))) {
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("Outgoing commands are not shown"), NULL, NULL, NULL, true, false);
+ bEcho = FALSE;
+ }
+
+ return true;
+ }
+
+ if (command == _T("/buddycheck")) {
+ if ( one.IsEmpty()) {
+ if (( m_autoOnlineNotification && !bTempDisableCheck) || bTempForceCheck )
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("The buddy check function is enabled"), NULL, NULL, NULL, true, false);
+ else
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("The buddy check function is disabled"), NULL, NULL, NULL, true, false);
+ return true;
+ }
+ if ( !lstrcmpi( one.c_str(), _T("on"))) {
+ bTempForceCheck = true;
+ bTempDisableCheck = false;
+ CallFunctionAsync( sttSetTimerOn, this );
+ }
+ if ( !lstrcmpi( one.c_str(), _T("off"))) {
+ bTempForceCheck = false;
+ bTempDisableCheck = true;
+ CallFunctionAsync( sttSetTimerOff, this );
+ }
+ if ( !lstrcmpi( one.c_str(), _T("time")) && !two.IsEmpty()) {
+ m_iTempCheckTime = StrToInt( two.c_str());
+ if ( m_iTempCheckTime < 10 && m_iTempCheckTime != 0 )
+ m_iTempCheckTime = 10;
+
+ if ( m_iTempCheckTime == 0 )
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), TranslateT("The time interval for the buddy check function is now at default setting"), NULL, NULL, NULL, true, false);
+ else {
+ TCHAR temp[200];
+ mir_sntprintf( temp, SIZEOF(temp), TranslateT("The time interval for the buddy check function is now %u seconds"), m_iTempCheckTime);
+ DoEvent( GC_EVENT_INFORMATION, NULL, m_info.sNick.c_str(), temp, NULL, NULL, NULL, true, false);
+ } }
+ return true;
+ }
+
+ if (command == _T("/whois")) {
+ if ( one.IsEmpty())
+ return false;
+ m_manualWhoisCount++;
+ return false;
+ }
+
+ if ( command == _T("/channelmanager")) {
+ if ( window && !hContact && IsChannel( window )) {
+ if ( IsConnected()) {
+ if ( m_managerDlg != NULL ) {
+ SetActiveWindow( m_managerDlg->GetHwnd());
+ m_managerDlg->Close();
+ }
+ else {
+ m_managerDlg = new CManagerDlg( this );
+ m_managerDlg->Show();
+ m_managerDlg->InitManager( 1, window );
+ } } }
+
+ return true;
+ }
+
+ if ( command == _T("/who")) {
+ if ( one.IsEmpty())
+ return true;
+
+ DoUserhostWithReason( 2, _T("U"), false, _T("%s"), one.c_str());
+ return false;
+ }
+
+ if (command == _T("/hop")) {
+ if ( !IsChannel( window ))
+ return true;
+
+ PostIrcMessage( _T("/PART %s"), window );
+
+ if (( one.IsEmpty() || !IsChannel( one ))) {
+ CHANNELINFO* wi = (CHANNELINFO *)DoEvent(GC_EVENT_GETITEMDATA, window, NULL, NULL, NULL, NULL, NULL, FALSE, FALSE, 0);
+ if ( wi && wi->pszPassword )
+ PostIrcMessage( _T("/JOIN %s %s"), window, wi->pszPassword);
+ else
+ PostIrcMessage( _T("/JOIN %s"), window);
+ return true;
+ }
+
+ GCEVENT gce = {0};
+ GCDEST gcd = {0};
+ gcd.iType = GC_EVENT_CONTROL;
+ CMString S = MakeWndID(window);
+ gcd.ptszID = (TCHAR*)S.c_str();
+ gcd.pszModule = m_szModuleName;
+ gce.cbSize = sizeof(GCEVENT);
+ gce.dwFlags = GC_TCHAR;
+ gce.pDest = &gcd;
+ CallChatEvent( SESSION_TERMINATE, (LPARAM)&gce);
+
+ PostIrcMessage( _T("/JOIN %s"), GetWordAddress(text.c_str(), 1));
+ return true;
+ }
+
+ if (command == _T("/list" )) {
+ if ( m_listDlg == NULL ) {
+ m_listDlg = new CListDlg( this );
+ m_listDlg->Show();
+ }
+ SetActiveWindow( m_listDlg->GetHwnd());
+ int minutes = ( int )m_noOfChannels/4000;
+ int minutes2 = ( int )m_noOfChannels/9000;
+
+ TCHAR text[256];
+ mir_sntprintf( text, SIZEOF(text), TranslateT("This command is not recommended on a network of this size!\r\nIt will probably cause high CPU usage and/or high bandwidth\r\nusage for around %u to %u minute(s).\r\n\r\nDo you want to continue?"), minutes2, minutes);
+ if ( m_noOfChannels < 4000 || ( m_noOfChannels >= 4000 && MessageBox( NULL, text, TranslateT("IRC warning") , MB_YESNO|MB_ICONWARNING|MB_DEFBUTTON2) == IDYES)) {
+ ListView_DeleteAllItems( GetDlgItem( m_listDlg->GetHwnd(), IDC_INFO_LISTVIEW ));
+ PostIrcMessage( _T("/lusers" ));
+ return false;
+ }
+ m_listDlg->m_status.SetText( TranslateT("Aborted"));
+ return true;
+ }
+
+ if (command == _T("/me")) {
+ if ( one.IsEmpty())
+ return true;
+
+ TCHAR szTemp[4000];
+ mir_sntprintf(szTemp, SIZEOF(szTemp), _T("\001ACTION %s\001"), GetWordAddress(text.c_str(), 1));
+ PostIrcMessageWnd( window, hContact, szTemp );
+ return true;
+ }
+
+ if (command == _T("/ame")) {
+ if ( one.IsEmpty())
+ return true;
+
+ CMString S = _T("/ME ") + DoIdentifiers(GetWordAddress(text.c_str(), 1), window);
+ ReplaceString( S, _T("%"), _T("%%"));
+ DoEvent( GC_EVENT_SENDMESSAGE, NULL, NULL, S.c_str(), NULL, NULL, NULL, FALSE, FALSE);
+ return true;
+ }
+
+ if (command == _T("/amsg")) {
+ if ( one.IsEmpty())
+ return true;
+
+ CMString S = DoIdentifiers( GetWordAddress(text.c_str(), 1), window );
+ ReplaceString( S, _T("%"), _T("%%"));
+ DoEvent( GC_EVENT_SENDMESSAGE, NULL, NULL, S.c_str(), NULL, NULL, NULL, FALSE, FALSE);
+ return true;
+ }
+
+ if (command == _T("/msg")) {
+ if ( one.IsEmpty() || two.IsEmpty())
+ return true;
+
+ TCHAR szTemp[4000];
+ mir_sntprintf(szTemp, SIZEOF(szTemp), _T("/PRIVMSG %s"), GetWordAddress(text.c_str(), 1));
+
+ PostIrcMessageWnd(window, hContact, szTemp);
+ return true;
+ }
+
+ if (command == _T("/query")) {
+ if ( one.IsEmpty() || IsChannel(one.c_str()))
+ return true;
+
+ CONTACT user = { (TCHAR*)one.c_str(), NULL, NULL, false, false, false};
+ HANDLE hContact2 = CList_AddContact(&user, false, false);
+ if ( hContact2 ) {
+ if ( getByte( hContact, "AdvancedMode", 0 ) == 0 )
+ DoUserhostWithReason(1, (_T("S") + one).c_str(), true, one.c_str());
+ else {
+ DBVARIANT dbv1;
+ if ( !getTString( hContact, "UWildcard", &dbv1 )) {
+ CMString S = _T("S");
+ S += dbv1.ptszVal;
+ DoUserhostWithReason(2, S.c_str(), true, dbv1.ptszVal);
+ DBFreeVariant(&dbv1);
+ }
+ else {
+ CMString S = _T("S");
+ S += one;
+ DoUserhostWithReason(2, S.c_str(), true, one.c_str());
+ } }
+
+ CallService( MS_MSG_SENDMESSAGE, ( WPARAM )hContact2, 0 );
+ }
+
+ if ( !two.IsEmpty()) {
+ TCHAR szTemp[4000];
+ mir_sntprintf( szTemp, SIZEOF(szTemp), _T("/PRIVMSG %s"), GetWordAddress(text.c_str(), 1));
+ PostIrcMessageWnd( window, hContact, szTemp );
+ }
+ return true;
+ }
+
+ if (command == _T("/ctcp")) {
+ if ( one.IsEmpty() || two.IsEmpty())
+ return true;
+
+ TCHAR szTemp[1000];
+ unsigned long ulAdr = 0;
+ if ( m_manualHost )
+ ulAdr = ConvertIPToInteger( m_mySpecifiedHostIP );
+ else
+ ulAdr = ConvertIPToInteger( m_IPFromServer ? m_myHost : m_myLocalHost );
+
+ // if it is not dcc or if it is dcc and a local ip exist
+ if ( lstrcmpi( two.c_str(), _T("dcc")) != 0 || ulAdr ) {
+ if ( lstrcmpi( two.c_str(), _T("ping")) == 0 )
+ mir_sntprintf( szTemp, SIZEOF(szTemp), _T("/PRIVMSG %s \001%s %u\001"), one.c_str(), two.c_str(), time(0));
+ else
+ mir_sntprintf( szTemp, SIZEOF(szTemp), _T("/PRIVMSG %s \001%s\001"), one.c_str(), GetWordAddress(text.c_str(), 2));
+ PostIrcMessageWnd( window, hContact, szTemp );
+ }
+
+ if ( lstrcmpi(two.c_str(), _T("dcc")) != 0 ) {
+ mir_sntprintf( szTemp, SIZEOF(szTemp), TranslateT("CTCP %s request sent to %s"), two.c_str(), one.c_str());
+ DoEvent(GC_EVENT_INFORMATION, SERVERWINDOW, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ }
+
+ return true;
+ }
+
+ if (command == _T("/dcc")) {
+ if ( one.IsEmpty() || two.IsEmpty())
+ return true;
+
+ if ( lstrcmpi( one.c_str(), _T("send")) == 0 ) {
+ TCHAR szTemp[1000];
+ unsigned long ulAdr = 0;
+
+ if ( m_manualHost )
+ ulAdr = ConvertIPToInteger( m_mySpecifiedHostIP );
+ else
+ ulAdr = ConvertIPToInteger( m_IPFromServer ? m_myHost : m_myLocalHost );
+
+ if ( ulAdr ) {
+ CONTACT user = { (TCHAR*)two.c_str(), NULL, NULL, false, false, true };
+ HANDLE hContact = CList_AddContact( &user, false, false );
+ if ( hContact ) {
+ CMString s;
+
+ if ( getByte( hContact, "AdvancedMode", 0 ) == 0 )
+ DoUserhostWithReason( 1, (_T("S") + two).c_str(), true, two.c_str());
+ else {
+ DBVARIANT dbv1;
+ CMString S = _T("S");
+ if ( !getTString( hContact, "UWildcard", &dbv1 )) {
+ S += dbv1.ptszVal;
+ DoUserhostWithReason(2, S.c_str(), true, dbv1.ptszVal );
+ DBFreeVariant( &dbv1 );
+ }
+ else {
+ S += two;
+ DoUserhostWithReason( 2, S.c_str(), true, two.c_str());
+ } }
+
+ if ( three.IsEmpty())
+ CallService( MS_FILE_SENDFILE, ( WPARAM )hContact, 0 );
+ else {
+ CMString temp = GetWordAddress(text.c_str(), 3);
+ TCHAR* pp[2];
+ TCHAR* p = ( TCHAR* )temp.c_str();
+ pp[0] = p;
+ pp[1] = NULL;
+ CallService( MS_FILE_SENDSPECIFICFILES, (WPARAM)hContact, (LPARAM)pp );
+ } }
+ }
+ else {
+ mir_sntprintf( szTemp, SIZEOF(szTemp), TranslateT("DCC ERROR: Unable to automatically resolve external IP"));
+ DoEvent(GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ }
+ return true;
+ }
+
+ if ( lstrcmpi( one.c_str(), _T("chat")) == 0 ) {
+ TCHAR szTemp[1000];
+
+ unsigned long ulAdr = 0;
+ if ( m_manualHost )
+ ulAdr = ConvertIPToInteger( m_mySpecifiedHostIP );
+ else
+ ulAdr = ConvertIPToInteger( m_IPFromServer ? m_myHost : m_myLocalHost );
+
+ if ( ulAdr ) {
+ CMString contact = two; contact += _T(DCCSTRING);
+ CONTACT user = { (TCHAR*)contact.c_str(), NULL, NULL, false, false, true};
+ HANDLE hContact = CList_AddContact( &user, false, false );
+ setByte(hContact, "DCC", 1);
+
+ int iPort = 0;
+ if ( hContact ) {
+ DCCINFO* dci = new DCCINFO;
+ dci->hContact = hContact;
+ dci->sContactName = two;
+ dci->iType = DCC_CHAT;
+ dci->bSender = true;
+
+ CDccSession* dcc = new CDccSession(this, dci);
+ CDccSession* olddcc = FindDCCSession(hContact);
+ if ( olddcc )
+ olddcc->Disconnect();
+ AddDCCSession(hContact, dcc);
+ iPort = dcc->Connect();
+ }
+
+ if ( iPort != 0 ) {
+ PostIrcMessage( _T("/CTCP %s DCC CHAT chat %u %u"), two.c_str(), ulAdr, iPort );
+ mir_sntprintf( szTemp, SIZEOF(szTemp), TranslateT("DCC CHAT request sent to %s"), two.c_str(), one.c_str());
+ DoEvent( GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ }
+ else {
+ mir_sntprintf( szTemp, SIZEOF(szTemp), TranslateT("DCC ERROR: Unable to bind port"));
+ DoEvent( GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ }
+ }
+ else {
+ mir_sntprintf( szTemp, SIZEOF(szTemp), TranslateT("DCC ERROR: Unable to automatically resolve external IP"));
+ DoEvent( GC_EVENT_INFORMATION, 0, m_info.sNick.c_str(), szTemp, NULL, NULL, NULL, true, false);
+ } }
+ return true;
+ }
+ return false;
+}
+
+/////////////////////////////////////////////////////////////////////////////////////////
+
+struct DoInputRequestParam
+{
+ DoInputRequestParam( CIrcProto* _pro, const TCHAR* _str ) :
+ ppro( _pro ),
+ str( mir_tstrdup( _str ))
+ {}
+
+ CIrcProto* ppro;
+ TCHAR* str;
+};
+
+static void __stdcall DoInputRequestAliasApcStub( void* _par )
+{
+ DoInputRequestParam* param = ( DoInputRequestParam* )_par;
+ CIrcProto* ppro = param->ppro;
+ TCHAR* str = param->str;
+
+ TCHAR* infotext = NULL;
+ TCHAR* title = NULL;
+ TCHAR* defaulttext = NULL;
+ CMString command = ( TCHAR* )str;
+ TCHAR* p = _tcsstr(( TCHAR* )str, _T("%question"));
+ if ( p[9] == '=' && p[10] == '\"' ) {
+ infotext = &p[11];
+ p = _tcschr( infotext, '\"' );
+ if ( p ) {
+ *p = '\0';
+ p++;
+ if ( *p == ',' && p[1] == '\"' ) {
+ p++; p++;
+ title = p;
+ p = _tcschr( title, '\"' );
+ if ( p ) {
+ *p = '\0';
+ p++;
+ if ( *p == ',' && p[1] == '\"' ) {
+ p++; p++;
+ defaulttext = p;
+ p = _tcschr( defaulttext, '\"' );
+ if ( p )
+ *p = '\0';
+ } } } } }
+
+ CQuestionDlg* dlg = new CQuestionDlg( ppro );
+ dlg->Show();
+ HWND question_hWnd = dlg->GetHwnd();
+
+ if ( title )
+ SetDlgItemText( question_hWnd, IDC_CAPTION, title);
+ else
+ SetDlgItemText( question_hWnd, IDC_CAPTION, TranslateT("Input command"));
+
+ if ( infotext )
+ SetWindowText( GetDlgItem( question_hWnd, IDC_TEXT), infotext );
+ else
+ SetWindowText( GetDlgItem( question_hWnd, IDC_TEXT), TranslateT("Please enter the reply"));
+
+ if ( defaulttext )
+ SetWindowText( GetDlgItem( question_hWnd, IDC_EDIT), defaulttext );
+
+ SetDlgItemText( question_hWnd, IDC_HIDDENEDIT, command.c_str());
+ dlg->Activate();
+
+ mir_free( str );
+ delete param;
+}
+
+bool CIrcProto::PostIrcMessage( const TCHAR* fmt, ... )
+{
+ if ( !fmt || lstrlen(fmt) < 1 || lstrlen(fmt) > 4000 )
+ return 0;
+
+ va_list marker;
+ va_start( marker, fmt );
+ static TCHAR szBuf[4*1024];
+ mir_vsntprintf( szBuf, SIZEOF(szBuf), fmt, marker );
+ va_end( marker );
+
+ return PostIrcMessageWnd(NULL, NULL, szBuf);
+}
+
+bool CIrcProto::PostIrcMessageWnd( TCHAR* window, HANDLE hContact, const TCHAR* szBuf )
+{
+ DBVARIANT dbv;
+ TCHAR windowname[256];
+ BYTE bDCC = 0;
+
+ if ( hContact )
+ bDCC = getByte( hContact, "DCC", 0 );
+
+ if ( !IsConnected() && !bDCC || !szBuf || lstrlen(szBuf) < 1 )
+ return 0;
+
+ if ( hContact && !getTString( hContact, "Nick", &dbv )) {
+ lstrcpyn( windowname, dbv.ptszVal, 255);
+ DBFreeVariant(&dbv);
+ }
+ else if ( window )
+ lstrcpyn( windowname, window, 255 );
+ else
+ lstrcpyn( windowname, SERVERWINDOW, 255 );
+
+ if ( lstrcmpi( window, SERVERWINDOW) != 0 ) {
+ TCHAR* p1 = _tcschr( windowname, ' ' );
+ if ( p1 )
+ *p1 = '\0';
+ }
+
+ // remove unecessary linebreaks, and do the aliases
+ CMString Message = szBuf;
+ AddCR( Message );
+ RemoveLinebreaks( Message );
+ if ( !hContact && IsConnected()) {
+ Message = DoAlias( Message.c_str(), windowname );
+
+ if ( Message.Find( _T("%question")) != -1 ) {
+ CallFunctionAsync( DoInputRequestAliasApcStub, new DoInputRequestParam( this, Message ));
+ return 1;
+ }
+
+ ReplaceString( Message, _T("%newl"), _T("\r\n"));
+ RemoveLinebreaks( Message );
+ }
+
+ if ( Message.IsEmpty())
+ return 0;
+
+ CHANNELINFO* wi = (CHANNELINFO *)DoEvent(GC_EVENT_GETITEMDATA, windowname, NULL, NULL, NULL, NULL, NULL, FALSE, FALSE, 0);
+ int codepage = ( wi ) ? wi->codepage : getCodepage();
+
+ // process the message
+ while ( !Message.IsEmpty()) {
+ // split the text into lines, and do an automatic textsplit on long lies as well
+ bool flag = false;
+ CMString DoThis = _T("");
+ int index = Message.Find( _T("\r\n"), 0 );
+ if ( index == -1 )
+ index = Message.GetLength();
+
+ if ( index > 464 )
+ index = 432;
+ DoThis = Message.Mid(0, index);
+ Message.Delete(0, index);
+ if ( Message.Find( _T("\r\n"), 0 ) == 0 )
+ Message.Delete( 0, 2 );
+
+ //do this if it's a /raw
+ if ( IsConnected() && ( GetWord(DoThis.c_str(), 0) == _T("/raw") || GetWord(DoThis.c_str(), 0) == _T("/quote"))) {
+ if ( GetWord( DoThis.c_str(), 1 ).IsEmpty())
+ continue;
+
+ CMString S = GetWordAddress( DoThis.c_str(), 1 );
+ SendIrcMessage( S.c_str(), true, codepage );
+ continue;
+ }
+
+ // Do this if the message is not a command
+ if ( (GetWord( DoThis.c_str(), 0)[0] != '/') || // not a command
+ ( (GetWord( DoThis.c_str(), 0)[0] == '/') && (GetWord( DoThis.c_str(), 0)[1] == '/')) || // or double backslash at the beginning
+ hContact ) {
+ CMString S = _T("/PRIVMSG ");
+ if ( lstrcmpi(window, SERVERWINDOW) == 0 && !m_info.sServerName.IsEmpty())
+ S += m_info.sServerName + _T(" ") + DoThis;
+ else
+ S += CMString(windowname) + _T(" ") + DoThis;
+
+ DoThis = S;
+ flag = true;
+ }
+
+ // and here we send it unless the command was a hardcoded one that should not be sent
+ if ( DoHardcodedCommand( DoThis, windowname, hContact ))
+ continue;
+
+ if ( !IsConnected() && !bDCC )
+ continue;
+
+ if ( !flag && IsConnected())
+ DoThis = DoIdentifiers(DoThis, windowname);
+
+ if ( hContact ) {
+ if ( flag && bDCC ) {
+ CDccSession* dcc = FindDCCSession( hContact );
+ if ( dcc ) {
+ FormatMsg( DoThis );
+ CMString mess = GetWordAddress(DoThis.c_str(), 2);
+ if ( mess[0] == ':' )
+ mess.Delete(0,1);
+ mess += '\n';
+ dcc->SendStuff( mess.c_str());
+ }
+ }
+ else if ( IsConnected()) {
+ FormatMsg( DoThis );
+ SendIrcMessage( DoThis.c_str(), false, codepage );
+ }
+ }
+ else {
+ FormatMsg( DoThis );
+ SendIrcMessage( DoThis.c_str(), true, codepage );
+ } }
+
+ return 1;
+}
|