2 // This file is part of the aMule Project.
4 // Copyright (c) 2003-2008 Kry ( elkry@sourceforge.net / http://www.amule.org )
5 // Copyright (c) 2003-2008 aMule Team ( admin@amule.org / http://www.amule.org )
6 // Copyright (c) 2008 Froenchenko Leonid (lfroen@gmail.com)
8 // Any parts of this program derived from the xMule, lMule or eMule project,
9 // or contributed by third-party developers are copyrighted by their
10 // respective authors.
12 // This program is free software; you can redistribute it and/or modify
13 // it under the terms of the GNU General Public License as published by
14 // the Free Software Foundation; either version 2 of the License, or
15 // (at your option) any later version.
17 // This program is distributed in the hope that it will be useful,
18 // but WITHOUT ANY WARRANTY; without even the implied warranty of
19 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 // GNU General Public License for more details.
22 // You should have received a copy of the GNU General Public License
23 // along with this program; if not, write to the Free Software
24 // Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
28 #include "config.h" // Needed for VERSION
31 #include <ec/cpp/ECMuleSocket.h> // Needed for CECSocket
33 #include <common/Format.h> // Needed for CFormat
35 #include <common/ClientVersion.h>
36 #include <common/MD5Sum.h>
38 #include "ExternalConn.h" // Interface declarations
39 #include "updownclient.h" // Needed for CUpDownClient
40 #include "Server.h" // Needed for CServer
41 #include "ServerList.h" // Needed for CServerList
42 #include "PartFile.h" // Needed for CPartFile
43 #include "ServerConnect.h" // Needed for CServerConnect
44 #include "UploadQueue.h" // Needed for CUploadQueue
45 #include "amule.h" // Needed for theApp
46 #include "SearchList.h" // Needed for GetSearchResults
47 #include "IPFilter.h" // Needed for CIPFilter
48 #include "ClientList.h"
49 #include "Preferences.h" // Needed for CPreferences
51 #include "GuiEvents.h" // Needed for Notify_* macros
52 #include "Statistics.h" // Needed for theStats
53 #include "KnownFileList.h" // Needed for CKnownFileList
54 #include "RandomFunctions.h"
55 #include "kademlia/kademlia/Kademlia.h"
56 #include "kademlia/kademlia/UDPFirewallTester.h"
59 //-------------------- CECServerSocket --------------------
61 class CECServerSocket
: public CECMuleSocket
64 CECServerSocket(ECNotifier
*notifier
);
65 virtual ~CECServerSocket();
67 virtual const CECPacket
*OnPacketReceived(const CECPacket
*packet
);
68 virtual void OnLost();
70 virtual void WriteDoneAndQueueEmpty();
72 ECNotifier
*m_ec_notifier
;
74 const CECPacket
*Authenticate(const CECPacket
*);
83 uint64_t m_passwd_salt
;
84 CLoggerAccess m_LoggerAccess
;
85 CPartFile_Encoder_Map m_part_encoder
;
86 CKnownFile_Encoder_Map m_shared_encoder
;
87 CObjTagMap m_obj_tagmap
;
88 CECPacket
*ProcessRequest2(
89 const CECPacket
*request
,
90 CPartFile_Encoder_Map
&,
91 CKnownFile_Encoder_Map
&,
97 CECServerSocket::CECServerSocket(ECNotifier
*notifier
)
100 m_conn_state(CONN_INIT
),
101 m_passwd_salt(GetRandomUint64()),
106 wxASSERT(theApp
->ECServerHandler
);
107 theApp
->ECServerHandler
->AddSocket(this);
108 m_ec_notifier
= notifier
;
112 CECServerSocket::~CECServerSocket()
114 wxASSERT(theApp
->ECServerHandler
);
115 theApp
->ECServerHandler
->RemoveSocket(this);
119 const CECPacket
*CECServerSocket::OnPacketReceived(const CECPacket
*packet
)
121 packet
->DebugPrint(true);
123 const CECPacket
*reply
= NULL
;
125 if (m_conn_state
== CONN_FAILED
) {
126 // Client didn't close the socket when authentication failed.
127 AddLogLineM(false, _("Client sent packet after authentication failed."));
131 if (m_conn_state
!= CONN_ESTABLISHED
) {
132 reply
= Authenticate(packet
);
133 if (reply
->GetOpCode() == EC_OP_AUTH_FAIL
) {
135 AddLogLineM(false, _("Unauthorized access attempt. Connection closed."));
136 m_conn_state
= CONN_FAILED
;
138 theApp
->ECServerHandler
->m_ec_notifier
->Add_EC_Client(this);
141 reply
= ProcessRequest2(
142 packet
, m_part_encoder
, m_shared_encoder
, m_obj_tagmap
);
148 void CECServerSocket::OnLost()
150 AddLogLineM(false,_("External connection closed."));
151 theApp
->ECServerHandler
->m_ec_notifier
->Remove_EC_Client(this);
155 void CECServerSocket::WriteDoneAndQueueEmpty()
157 if ( HaveNotificationSupport() && (m_conn_state
== CONN_ESTABLISHED
) ) {
158 CECPacket
*packet
= m_ec_notifier
->GetNextPacket(this);
163 //printf("[EC] %p: WriteDoneAndQueueEmpty but notification disabled\n", this);
167 //-------------------- ExternalConn --------------------
175 BEGIN_EVENT_TABLE(ExternalConn
, wxEvtHandler
)
176 EVT_SOCKET(SERVER_ID
, ExternalConn::OnServerEvent
)
180 ExternalConn::ExternalConn(amuleIPV4Address addr
, wxString
*msg
)
184 // Are we allowed to accept External Connections?
185 if ( thePrefs::AcceptExternalConnections() ) {
186 // We must have a valid password, otherwise we will not allow EC connections
187 if (thePrefs::ECPassword().IsEmpty()) {
188 *msg
+= wxT("External connections disabled due to empty password!\n");
189 AddLogLineM(true, _("External connections disabled due to empty password!"));
194 m_ECServer
= new wxSocketServer(addr
, wxSOCKET_REUSEADDR
);
195 m_ECServer
->SetEventHandler(*this, SERVER_ID
);
196 m_ECServer
->SetNotify(wxSOCKET_CONNECTION_FLAG
);
197 m_ECServer
->Notify(true);
199 int port
= addr
.Service();
200 wxString ip
= addr
.IPAddress();
201 if (m_ECServer
->Ok()) {
202 msgLocal
= wxT("*** TCP socket (ECServer) listening on ") + ip
+
203 wxString::Format(wxT(":%d"), port
);
204 *msg
+= msgLocal
+ wxT("\n");
205 AddLogLineM(false, msgLocal
);
207 msgLocal
= wxT("Could not listen for external connections at ") + ip
+
208 wxString::Format(wxT(":%d!"), port
);
209 *msg
+= msgLocal
+ wxT("\n");
210 AddLogLineM(false, msgLocal
);
213 *msg
+= wxT("External connections disabled in config file\n");
214 AddLogLineM(false,_("External connections disabled in config file"));
216 m_ec_notifier
= new ECNotifier();
220 ExternalConn::~ExternalConn()
224 delete m_ec_notifier
;
228 void ExternalConn::AddSocket(CECServerSocket
*s
)
231 socket_list
.insert(s
);
235 void ExternalConn::RemoveSocket(CECServerSocket
*s
)
238 socket_list
.erase(s
);
242 void ExternalConn::KillAllSockets()
244 AddDebugLogLineM(false, logGeneral
,
245 CFormat(wxT("ExternalConn::KillAllSockets(): %d sockets to destroy.")) %
247 SocketSet::iterator it
= socket_list
.begin();
248 while (it
!= socket_list
.end()) {
249 CECServerSocket
*s
= *(it
++);
256 void ExternalConn::OnServerEvent(wxSocketEvent
& WXUNUSED(event
))
258 CECServerSocket
*sock
= new CECServerSocket(m_ec_notifier
);
259 // Accept new connection if there is one in the pending
260 // connections queue, else exit. We use Accept(FALSE) for
261 // non-blocking accept (although if we got here, there
262 // should ALWAYS be a pending connection).
263 if ( m_ECServer
->AcceptWith(*sock
, false) ) {
264 AddLogLineM(false, _("New external connection accepted"));
267 AddLogLineM(false, _("ERROR: couldn't accept a new external connection"));
275 const CECPacket
*CECServerSocket::Authenticate(const CECPacket
*request
)
279 if (request
== NULL
) {
280 response
= new CECPacket(EC_OP_AUTH_FAIL
);
284 // Password must be specified if we are to allow remote connections
285 if ( thePrefs::ECPassword().IsEmpty() ) {
286 AddLogLineM(true, _("External connection refused due to empty password in preferences!"));
288 return new CECPacket(EC_OP_AUTH_FAIL
);
291 if ((m_conn_state
== CONN_INIT
) && (request
->GetOpCode() == EC_OP_AUTH_REQ
) ) {
292 const CECTag
*clientName
= request
->GetTagByName(EC_TAG_CLIENT_NAME
);
293 const CECTag
*clientVersion
= request
->GetTagByName(EC_TAG_CLIENT_VERSION
);
295 AddLogLineM(false, CFormat( _("Connecting client: %s %s") )
296 % ( clientName
? clientName
->GetStringData() : wxString(_("Unknown")) )
297 % ( clientVersion
? clientVersion
->GetStringData() : wxString(_("Unknown version")) ) );
298 const CECTag
*protocol
= request
->GetTagByName(EC_TAG_PROTOCOL_VERSION
);
300 // For SVN versions, both client and server must use SVNDATE, and they must be the same
302 if (!vhash
.Decode(wxT(EC_VERSION_ID
))) {
303 response
= new CECPacket(EC_OP_AUTH_FAIL
);
304 response
->AddTag(CECTag(EC_TAG_STRING
, wxT("Fatal error, version hash is not a valid MD4-hash.")));
305 } else if (!request
->GetTagByName(EC_TAG_VERSION_ID
) || request
->GetTagByNameSafe(EC_TAG_VERSION_ID
)->GetMD4Data() != vhash
) {
306 response
= new CECPacket(EC_OP_AUTH_FAIL
);
307 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Incorrect EC version ID, there might be binary incompatibility. Use core and remote from same snapshot.")));
309 // For release versions, we don't want to allow connections from any arbitrary SVN client.
310 if (request
->GetTagByName(EC_TAG_VERSION_ID
)) {
311 response
= new CECPacket(EC_OP_AUTH_FAIL
);
312 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("You cannot connect to a release version from an arbitrary SVN version! *sigh* possible crash prevented")));
314 } else if (protocol
!= NULL
) {
315 uint16 proto_version
= protocol
->GetInt();
316 if (proto_version
== EC_CURRENT_PROTOCOL_VERSION
) {
317 response
= new CECPacket(EC_OP_AUTH_SALT
);
318 response
->AddTag(CECTag(EC_TAG_PASSWD_SALT
, m_passwd_salt
));
319 m_conn_state
= CONN_SALT_SENT
;
321 response
= new CECPacket(EC_OP_AUTH_FAIL
);
322 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Invalid protocol version.") + wxString::Format(wxT("( %i != %i )"),proto_version
,EC_CURRENT_PROTOCOL_VERSION
)));
325 response
= new CECPacket(EC_OP_AUTH_FAIL
);
326 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Missing protocol version tag.")));
328 } else if ((m_conn_state
== CONN_SALT_SENT
) && (request
->GetOpCode() == EC_OP_AUTH_PASSWD
)) {
329 const CECTag
*passwd
= request
->GetTagByName(EC_TAG_PASSWD_HASH
);
332 if (!passh
.Decode(thePrefs::ECPassword())) {
333 AddLogLineM(false, wxT("EC Auth failed, invalid hash specificed as EC password: ") + thePrefs::ECPassword());
334 response
= new CECPacket(EC_OP_AUTH_FAIL
);
335 response
->AddTag(CECTag(EC_TAG_STRING
, wxT("Authentication failed, invalid hash specified as EC password.")));
337 wxString saltHash
= MD5Sum(CFormat(wxT("%lX")) % m_passwd_salt
).GetHash();
338 wxString saltStr
= CFormat(wxT("%lX")) % m_passwd_salt
;
340 passh
.Decode(MD5Sum(thePrefs::ECPassword().Lower() + saltHash
).GetHash());
342 if (passwd
&& passwd
->GetMD4Data() == passh
) {
343 response
= new CECPacket(EC_OP_AUTH_OK
);
344 response
->AddTag(CECTag(EC_TAG_SERVER_VERSION
, wxT(VERSION
)));
347 AddLogLineM(false, wxT("EC Auth failed: (") + passwd
->GetMD4Data().Encode() + wxT(" != ") + passh
.Encode() + wxT(")."));
349 AddLogLineM(false, wxT("EC Auth failed. Password tag missing."));
352 response
= new CECPacket(EC_OP_AUTH_FAIL
);
353 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Authentication failed.")));
357 response
= new CECPacket(EC_OP_AUTH_FAIL
);
358 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Invalid request, please authenticate first.")));
361 if (response
->GetOpCode() == EC_OP_AUTH_OK
) {
362 m_conn_state
= CONN_ESTABLISHED
;
363 AddLogLineM(false, _("Access granted."));
364 } else if (response
->GetTagByIndex(0)->IsString()) {
365 AddLogLineM(false, wxGetTranslation(response
->GetTagByIndex(0)->GetStringData()));
371 // Make a Logger tag (if there are any logging messages) and add it to the response
372 static void AddLoggerTag(CECPacket
*response
, CLoggerAccess
&LoggerAccess
)
374 if (LoggerAccess
.HasString()) {
375 CECEmptyTag
tag(EC_TAG_STATS_LOGGER_MESSAGE
);
376 // Tag structure is fix: tag carries nothing, inside are the strings
377 // maximum of 200 log lines per message
380 while (entries
< 200 && LoggerAccess
.GetString(line
)) {
381 tag
.AddTag(CECTag(EC_TAG_STRING
, line
));
384 response
->AddTag(tag
);
385 //printf("send Log tag %d %d\n", FirstEntry, entries);
389 static CECPacket
*Get_EC_Response_StatRequest(const CECPacket
*request
, CLoggerAccess
&LoggerAccess
)
391 CECPacket
*response
= new CECPacket(EC_OP_STATS
);
393 switch (request
->GetDetailLevel()) {
395 response
->AddTag(CECTag(EC_TAG_STATS_UP_OVERHEAD
, (uint32
)theStats::GetUpOverheadRate()));
396 response
->AddTag(CECTag(EC_TAG_STATS_DOWN_OVERHEAD
, (uint32
)theStats::GetDownOverheadRate()));
397 response
->AddTag(CECTag(EC_TAG_STATS_BANNED_COUNT
, /*(uint32)*/theStats::GetBannedCount()));
398 AddLoggerTag(response
, LoggerAccess
);
401 response
->AddTag(CECTag(EC_TAG_STATS_UL_SPEED
, (uint32
)theStats::GetUploadRate()));
402 response
->AddTag(CECTag(EC_TAG_STATS_DL_SPEED
, (uint32
)(theStats::GetDownloadRate())));
403 response
->AddTag(CECTag(EC_TAG_STATS_UL_SPEED_LIMIT
, (uint32
)(thePrefs::GetMaxUpload()*1024.0)));
404 response
->AddTag(CECTag(EC_TAG_STATS_DL_SPEED_LIMIT
, (uint32
)(thePrefs::GetMaxDownload()*1024.0)));
405 response
->AddTag(CECTag(EC_TAG_STATS_UL_QUEUE_LEN
, /*(uint32)*/theStats::GetWaitingUserCount()));
406 response
->AddTag(CECTag(EC_TAG_STATS_TOTAL_SRC_COUNT
, /*(uint32)*/theStats::GetFoundSources()));
409 uint32 totaluser
= 0, totalfile
= 0;
410 theApp
->serverlist
->GetUserFileStatus( totaluser
, totalfile
);
411 response
->AddTag(CECTag(EC_TAG_STATS_ED2K_USERS
, totaluser
));
412 response
->AddTag(CECTag(EC_TAG_STATS_KAD_USERS
, Kademlia::CKademlia::GetKademliaUsers()));
413 response
->AddTag(CECTag(EC_TAG_STATS_ED2K_FILES
, totalfile
));
414 response
->AddTag(CECTag(EC_TAG_STATS_KAD_FILES
, Kademlia::CKademlia::GetKademliaFiles()));
417 if (Kademlia::CKademlia::IsConnected()) {
418 response
->AddTag(CECTag(EC_TAG_STATS_KAD_FIREWALLED_UDP
, Kademlia::CUDPFirewallTester::IsFirewalledUDP(true)));
419 response
->AddTag(CECTag(EC_TAG_STATS_KAD_INDEXED_SOURCES
, Kademlia::CKademlia::GetIndexed()->m_totalIndexSource
));
420 response
->AddTag(CECTag(EC_TAG_STATS_KAD_INDEXED_KEYWORDS
, Kademlia::CKademlia::GetIndexed()->m_totalIndexKeyword
));
421 response
->AddTag(CECTag(EC_TAG_STATS_KAD_INDEXED_NOTES
, Kademlia::CKademlia::GetIndexed()->m_totalIndexNotes
));
422 response
->AddTag(CECTag(EC_TAG_STATS_KAD_INDEXED_LOAD
, Kademlia::CKademlia::GetIndexed()->m_totalIndexLoad
));
423 response
->AddTag(CECTag(EC_TAG_STATS_KAD_IP_ADRESS
, wxUINT32_SWAP_ALWAYS(Kademlia::CKademlia::GetPrefs()->GetIPAddress())));
424 response
->AddTag(CECTag(EC_TAG_STATS_BUDDY_STATUS
, theApp
->clientlist
->GetBuddyStatus()));
426 uint16 BuddyPort
= 0;
427 CUpDownClient
* Buddy
= theApp
->clientlist
->GetBuddy();
429 BuddyIP
= Buddy
->GetIP();
430 BuddyPort
= Buddy
->GetUDPPort();
432 response
->AddTag(CECTag(EC_TAG_STATS_BUDDY_IP
, BuddyIP
));
433 response
->AddTag(CECTag(EC_TAG_STATS_BUDDY_PORT
, BuddyPort
));
435 case EC_DETAIL_UPDATE
:
436 case EC_DETAIL_INC_UPDATE
:
443 static CECPacket
*Get_EC_Response_GetSharedFiles(const CECPacket
*request
, CKnownFile_Encoder_Map
&encoders
)
445 wxASSERT(request
->GetOpCode() == EC_OP_GET_SHARED_FILES
);
447 CECPacket
*response
= new CECPacket(EC_OP_SHARED_FILES
);
449 EC_DETAIL_LEVEL detail_level
= request
->GetDetailLevel();
451 // request can contain list of queried items
452 CTagSet
<CMD4Hash
, EC_TAG_KNOWNFILE
> queryitems(request
);
454 encoders
.UpdateEncoders(theApp
->sharedfiles
);
456 for (uint32 i
= 0; i
< theApp
->sharedfiles
->GetFileCount(); ++i
) {
457 CKnownFile
*cur_file
= (CKnownFile
*)theApp
->sharedfiles
->GetFileByIndex(i
);
459 if ( !cur_file
|| (!queryitems
.empty() && !queryitems
.count(cur_file
->GetFileHash())) ) {
463 CEC_SharedFile_Tag
filetag(cur_file
, detail_level
);
464 CKnownFile_Encoder
&enc
= encoders
[cur_file
];
465 if ( detail_level
!= EC_DETAIL_UPDATE
) {
468 enc
.Encode(&filetag
);
469 response
->AddTag(filetag
);
474 static CECPacket
*Get_EC_Response_GetSharedFiles(CKnownFile_Encoder_Map
&encoders
, CObjTagMap
&tagmap
)
476 CECPacket
*response
= new CECPacket(EC_OP_SHARED_FILES
);
478 encoders
.UpdateEncoders(theApp
->sharedfiles
);
479 for (uint32 i
= 0; i
< theApp
->sharedfiles
->GetFileCount(); ++i
) {
480 CKnownFile
*cur_file
= (CKnownFile
*)theApp
->sharedfiles
->GetFileByIndex(i
);
483 // Hashes of tags are maintained on "per-object" basis. So, in this mode only
484 // same kind of objects can go into particular query type.
485 // But files from download queue (aka partfiles) need to be listed both as downloads
486 // and as shares (with different tag content).
487 // So simply increment the object pointer - it's only a map key and never used for referencing.
489 void * mapKey
= cur_file
;
490 if (!cur_file
) continue;
491 if (cur_file
->IsPartFile()) {
492 mapKey
= (void *) ((char *)mapKey
+ 1);
495 CValueMap
&valuemap
= tagmap
.GetValueMap(mapKey
);
496 CEC_SharedFile_Tag
filetag(cur_file
, EC_DETAIL_INC_UPDATE
, &valuemap
);
497 CKnownFile_Encoder
&enc
= encoders
[cur_file
];
498 enc
.Encode(&filetag
);
500 response
->AddTag(filetag
);
505 static CECPacket
*Get_EC_Response_GetClientQueue(const CECPacket
*request
, CObjTagMap
&tagmap
, int op
)
507 CECPacket
*response
= new CECPacket(op
);
509 EC_DETAIL_LEVEL detail_level
= request
->GetDetailLevel();
512 // request can contain list of queried items
513 // (not for incremental update of course)
514 CTagSet
<uint32
, EC_TAG_CLIENT
> queryitems(request
);
516 std::set
<uint32
> idSet
;
518 const CClientPtrList
& clients
= (op
== EC_OP_WAIT_QUEUE
) ? theApp
->uploadqueue
->GetWaitingList()
519 : theApp
->uploadqueue
->GetUploadingList();
520 CClientPtrList::const_iterator it
= clients
.begin();
521 for (; it
!= clients
.end(); ++it
) {
522 CUpDownClient
* cur_client
= *it
;
524 if (!cur_client
) { // shouldn't happen
527 // Sometimes clients can have the same ID. Make sure we transmit something unique.
528 uint32 id
= cur_client
->GetUserIDHybrid();
529 while (idSet
.count(id
)) {
534 if (!queryitems
.empty() && !queryitems
.count(id
)) {
537 CValueMap
*valuemap
= NULL
;
538 if (detail_level
== EC_DETAIL_INC_UPDATE
) {
539 valuemap
= &tagmap
.GetValueMap(cur_client
);
541 CEC_UpDownClient_Tag
cli_tag(cur_client
, detail_level
, id
, valuemap
);
543 response
->AddTag(cli_tag
);
550 static CECPacket
*Get_EC_Response_GetDownloadQueue(CPartFile_Encoder_Map
&encoders
, CObjTagMap
&tagmap
)
552 CECPacket
*response
= new CECPacket(EC_OP_DLOAD_QUEUE
);
554 encoders
.UpdateEncoders(theApp
->downloadqueue
);
555 for (unsigned int i
= 0; i
< theApp
->downloadqueue
->GetFileCount(); i
++) {
556 CPartFile
*cur_file
= theApp
->downloadqueue
->GetFileByIndex(i
);
558 CValueMap
&valuemap
= tagmap
.GetValueMap(cur_file
);
559 CEC_PartFile_Tag
filetag(cur_file
, EC_DETAIL_INC_UPDATE
, true, &valuemap
);
560 CPartFile_Encoder
&enc
= encoders
[cur_file
];
561 enc
.Encode(&filetag
);
563 response
->AddTag(filetag
);
568 static CECPacket
*Get_EC_Response_GetDownloadQueue(const CECPacket
*request
, CPartFile_Encoder_Map
&encoders
, bool detail
= false)
570 CECPacket
*response
= new CECPacket(EC_OP_DLOAD_QUEUE
);
572 EC_DETAIL_LEVEL detail_level
= request
->GetDetailLevel();
574 // request can contain list of queried items
575 CTagSet
<CMD4Hash
, EC_TAG_PARTFILE
> queryitems(request
);
577 encoders
.UpdateEncoders(theApp
->downloadqueue
);
579 for (unsigned int i
= 0; i
< theApp
->downloadqueue
->GetFileCount(); i
++) {
580 CPartFile
*cur_file
= theApp
->downloadqueue
->GetFileByIndex(i
);
582 if ( !queryitems
.empty() && !queryitems
.count(cur_file
->GetFileHash()) ) {
586 CEC_PartFile_Tag
filetag(cur_file
, detail_level
, detail
);
588 CPartFile_Encoder
&enc
= encoders
[cur_file
];
589 if ( detail_level
!= EC_DETAIL_UPDATE
) {
592 enc
.Encode(&filetag
);
594 response
->AddTag(filetag
);
600 static CECPacket
*Get_EC_Response_PartFile_Cmd(const CECPacket
*request
)
602 CECPacket
*response
= NULL
;
604 // request can contain multiple files.
605 for (unsigned int i
= 0; i
< request
->GetTagCount(); ++i
) {
606 const CECTag
*hashtag
= request
->GetTagByIndex(i
);
608 wxASSERT(hashtag
->GetTagName() == EC_TAG_PARTFILE
);
610 CMD4Hash hash
= hashtag
->GetMD4Data();
611 CPartFile
*pfile
= theApp
->downloadqueue
->GetFileByID( hash
);
614 AddLogLineM(false,CFormat(_("Remote PartFile command failed: FileHash not found: %s")) % hash
.Encode());
615 response
= new CECPacket(EC_OP_FAILED
);
616 response
->AddTag(CECTag(EC_TAG_STRING
, CFormat(wxString(wxTRANSLATE("FileHash not found: %s"))) % hash
.Encode()));
620 switch (request
->GetOpCode()) {
621 case EC_OP_PARTFILE_SWAP_A4AF_THIS
:
622 if ((pfile
->GetStatus(false) == PS_READY
) ||
623 (pfile
->GetStatus(false) == PS_EMPTY
)) {
624 CPartFile::SourceSet::const_iterator it
= pfile
->GetA4AFList().begin();
625 while ( it
!= pfile
->GetA4AFList().end() ) {
626 CUpDownClient
*cur_source
= *it
++;
628 cur_source
->SwapToAnotherFile(true, false, false, pfile
);
632 case EC_OP_PARTFILE_SWAP_A4AF_THIS_AUTO
:
633 pfile
->SetA4AFAuto(!pfile
->IsA4AFAuto());
635 case EC_OP_PARTFILE_SWAP_A4AF_OTHERS
:
636 if ((pfile
->GetStatus(false) == PS_READY
) ||
637 (pfile
->GetStatus(false) == PS_EMPTY
)) {
638 CPartFile::SourceSet::const_iterator it
= pfile
->GetSourceList().begin();
639 while ( it
!= pfile
->GetSourceList().end() ) {
640 CUpDownClient
* cur_source
= *it
++;
642 cur_source
->SwapToAnotherFile(false, false, false, NULL
);
646 case EC_OP_PARTFILE_PAUSE
:
649 case EC_OP_PARTFILE_RESUME
:
651 pfile
->SavePartFile();
653 case EC_OP_PARTFILE_STOP
:
656 case EC_OP_PARTFILE_PRIO_SET
: {
657 uint8 prio
= hashtag
->GetTagByIndexSafe(0)->GetInt();
658 if ( prio
== PR_AUTO
) {
659 pfile
->SetAutoDownPriority(1);
661 pfile
->SetAutoDownPriority(0);
662 pfile
->SetDownPriority(prio
);
666 case EC_OP_PARTFILE_DELETE
:
667 if ( thePrefs::StartNextFile() && (pfile
->GetStatus() != PS_PAUSED
) ) {
668 theApp
->downloadqueue
->StartNextFile(pfile
);
673 case EC_OP_PARTFILE_SET_CAT
:
674 pfile
->SetCategory(hashtag
->GetTagByIndexSafe(0)->GetInt());
678 response
= new CECPacket(EC_OP_FAILED
);
679 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("OOPS! OpCode processing error!")));
684 response
= new CECPacket(EC_OP_NOOP
);
689 static CECPacket
*Get_EC_Response_Server_Add(const CECPacket
*request
)
691 CECPacket
*response
= NULL
;
693 const CECTag
*srv_tag
= request
->GetTagByIndex(0);
695 wxString full_addr
= srv_tag
->GetTagByName(EC_TAG_SERVER_ADDRESS
)->GetStringData();
696 wxString name
= srv_tag
->GetTagByName(EC_TAG_SERVER_NAME
)->GetStringData();
698 wxString s_ip
= full_addr
.Left(full_addr
.Find(':'));
699 wxString s_port
= full_addr
.Mid(full_addr
.Find(':') + 1);
701 long port
= StrToULong(s_port
);
702 CServer
* toadd
= new CServer(port
, s_ip
);
703 toadd
->SetListName(name
.IsEmpty() ? full_addr
: name
);
705 if ( theApp
->AddServer(toadd
, true) ) {
706 response
= new CECPacket(EC_OP_NOOP
);
708 response
= new CECPacket(EC_OP_FAILED
);
709 response
->AddTag(CECTag(EC_TAG_STRING
, _("Server not added")));
716 static CECPacket
*Get_EC_Response_Server(const CECPacket
*request
)
718 CECPacket
*response
= NULL
;
719 const CECTag
*srv_tag
= request
->GetTagByIndex(0);
722 srv
= theApp
->serverlist
->GetServerByIPTCP(srv_tag
->GetIPv4Data().IP(), srv_tag
->GetIPv4Data().m_port
);
723 // server tag passed, but server not found
725 response
= new CECPacket(EC_OP_FAILED
);
726 response
->AddTag(CECTag(EC_TAG_STRING
,
727 CFormat(wxString(wxTRANSLATE("server not found: %s"))) % srv_tag
->GetIPv4Data().StringIP()));
731 switch (request
->GetOpCode()) {
732 case EC_OP_SERVER_DISCONNECT
:
733 theApp
->serverconnect
->Disconnect();
734 response
= new CECPacket(EC_OP_NOOP
);
736 case EC_OP_SERVER_REMOVE
:
738 theApp
->serverlist
->RemoveServer(srv
);
739 response
= new CECPacket(EC_OP_NOOP
);
741 response
= new CECPacket(EC_OP_FAILED
);
742 response
->AddTag(CECTag(EC_TAG_STRING
,
743 wxTRANSLATE("need to define server to be removed")));
746 case EC_OP_SERVER_CONNECT
:
747 if (thePrefs::GetNetworkED2K()) {
749 theApp
->serverconnect
->ConnectToServer(srv
);
750 response
= new CECPacket(EC_OP_NOOP
);
752 theApp
->serverconnect
->ConnectToAnyServer();
753 response
= new CECPacket(EC_OP_NOOP
);
756 response
= new CECPacket(EC_OP_FAILED
);
757 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("eD2k is disabled in preferences.")));
762 response
= new CECPacket(EC_OP_FAILED
);
763 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("OOPS! OpCode processing error!")));
768 static CECPacket
*Get_EC_Response_Search_Results(const CECPacket
*request
)
770 CECPacket
*response
= new CECPacket(EC_OP_SEARCH_RESULTS
);
772 EC_DETAIL_LEVEL detail_level
= request
->GetDetailLevel();
774 // request can contain list of queried items
775 CTagSet
<CMD4Hash
, EC_TAG_SEARCHFILE
> queryitems(request
);
777 const CSearchResultList
& list
= theApp
->searchlist
->GetSearchResults(0xffffffff);
778 CSearchResultList::const_iterator it
= list
.begin();
779 while (it
!= list
.end()) {
780 CSearchFile
* sf
= *it
++;
781 if ( !queryitems
.empty() && !queryitems
.count(sf
->GetFileHash()) ) {
784 response
->AddTag(CEC_SearchFile_Tag(sf
, detail_level
));
789 static CECPacket
*Get_EC_Response_Search_Results(CObjTagMap
&tagmap
)
791 CECPacket
*response
= new CECPacket(EC_OP_SEARCH_RESULTS
);
793 const CSearchResultList
& list
= theApp
->searchlist
->GetSearchResults(0xffffffff);
794 CSearchResultList::const_iterator it
= list
.begin();
795 while (it
!= list
.end()) {
796 CSearchFile
* sf
= *it
++;
797 CValueMap
&valuemap
= tagmap
.GetValueMap(sf
);
798 response
->AddTag(CEC_SearchFile_Tag(sf
, EC_DETAIL_INC_UPDATE
, &valuemap
));
803 static CECPacket
*Get_EC_Response_Search_Results_Download(const CECPacket
*request
)
805 CECPacket
*response
= new CECPacket(EC_OP_STRINGS
);
806 for (unsigned int i
= 0;i
< request
->GetTagCount();i
++) {
807 const CECTag
*tag
= request
->GetTagByIndex(i
);
808 CMD4Hash hash
= tag
->GetMD4Data();
809 uint8 category
= tag
->GetTagByIndexSafe(0)->GetInt();
810 theApp
->searchlist
->AddFileToDownloadByHash(hash
, category
);
815 static CECPacket
*Get_EC_Response_Search_Stop(const CECPacket
*WXUNUSED(request
))
817 CECPacket
*reply
= new CECPacket(EC_OP_MISC_DATA
);
818 theApp
->searchlist
->StopGlobalSearch();
822 static CECPacket
*Get_EC_Response_Search(const CECPacket
*request
)
826 CEC_Search_Tag
*search_request
= (CEC_Search_Tag
*)request
->GetTagByIndex(0);
827 theApp
->searchlist
->RemoveResults(0xffffffff);
829 CSearchList::CSearchParams params
;
830 params
.searchString
= search_request
->SearchText();
831 params
.typeText
= search_request
->SearchFileType();
832 params
.extension
= search_request
->SearchExt();
833 params
.minSize
= search_request
->MinSize();
834 params
.maxSize
= search_request
->MaxSize();
835 params
.availability
= search_request
->Avail();
838 EC_SEARCH_TYPE search_type
= search_request
->SearchType();
839 SearchType core_search_type
= LocalSearch
;
840 switch (search_type
) {
841 case EC_SEARCH_GLOBAL
:
842 core_search_type
= GlobalSearch
;
844 if (core_search_type
!= GlobalSearch
) { // Not a global search obviously
845 core_search_type
= KadSearch
;
847 case EC_SEARCH_LOCAL
: {
848 uint32 search_id
= 0xffffffff;
849 wxString error
= theApp
->searchlist
->StartNewSearch(&search_id
, core_search_type
, params
);
850 if (!error
.IsEmpty()) {
853 response
= wxTRANSLATE("Search in progress. Refetch results in a moment!");
858 response
= wxTRANSLATE("WebSearch from remote interface makes no sense.");
862 CECPacket
*reply
= new CECPacket(EC_OP_FAILED
);
863 // error or search in progress
864 reply
->AddTag(CECTag(EC_TAG_STRING
, response
));
869 static CECPacket
*Get_EC_Response_Set_SharedFile_Prio(const CECPacket
*request
)
871 CECPacket
*response
= new CECPacket(EC_OP_NOOP
);
872 for (unsigned int i
= 0;i
< request
->GetTagCount();i
++) {
873 const CECTag
*tag
= request
->GetTagByIndex(i
);
874 CMD4Hash hash
= tag
->GetMD4Data();
875 uint8 prio
= tag
->GetTagByIndexSafe(0)->GetInt();
876 CKnownFile
* cur_file
= theApp
->sharedfiles
->GetFileByID(hash
);
880 if (prio
== PR_AUTO
) {
881 cur_file
->SetAutoUpPriority(1);
882 cur_file
->UpdateAutoUpPriority();
884 cur_file
->SetAutoUpPriority(0);
885 cur_file
->SetUpPriority(prio
);
892 static CECPacket
*Get_EC_Response_Kad_Connect(const CECPacket
*request
)
895 if (thePrefs::GetNetworkKademlia()) {
896 response
= new CECPacket(EC_OP_NOOP
);
897 if ( !Kademlia::CKademlia::IsRunning() ) {
898 Kademlia::CKademlia::Start();
899 theApp
->ShowConnectionState();
901 const CECTag
*addrtag
= request
->GetTagByIndex(0);
903 uint32 ip
= addrtag
->GetIPv4Data().IP();
904 uint16 port
= addrtag
->GetIPv4Data().m_port
;
905 Kademlia::CKademlia::Bootstrap(ip
, port
, true);
908 response
= new CECPacket(EC_OP_FAILED
);
909 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Kad is disabled in preferences.")));
915 void CPartFile_Encoder::Encode(CECTag
*parent
)
918 // Source part frequencies
920 // These are not always populated, don't send a tag in this case
922 if (!m_file
->m_SrcpartFrequency
.empty()) {
925 const uint8
*part_enc_data
= m_enc_data
.m_part_status
.Encode(m_file
->m_SrcpartFrequency
, part_enc_size
, changed
);
927 parent
->AddTag(CECTag(EC_TAG_PARTFILE_PART_STATUS
, part_enc_size
, part_enc_data
));
929 delete[] part_enc_data
;
935 const CGapList
& gaplist
= m_file
->GetNewGapList();
936 const size_t gap_list_size
= gaplist
.size();
938 gaps
.reserve(gap_list_size
* 2);
940 for (CGapList::const_iterator curr_pos
= gaplist
.begin();
941 curr_pos
!= gaplist
.end(); ++curr_pos
) {
942 gaps
.push_back(curr_pos
.start());
943 gaps
.push_back(curr_pos
.end());
946 int gap_enc_size
= 0;
948 const uint8
*gap_enc_data
= m_enc_data
.m_gap_status
.Encode(gaps
, gap_enc_size
, changed
);
950 parent
->AddTag(CECTag(EC_TAG_PARTFILE_GAP_STATUS
, gap_enc_size
, (void *)gap_enc_data
));
952 delete[] gap_enc_data
;
957 // that's the next thing to go
958 ArrayOfUInts64 req_buffer
;
959 const CPartFile::CReqBlockPtrList
& requestedblocks
= m_file
->GetRequestedBlockList();
960 CPartFile::CReqBlockPtrList::const_iterator curr_pos2
= requestedblocks
.begin();
962 for ( ; curr_pos2
!= requestedblocks
.end(); ++curr_pos2
) {
963 Requested_Block_Struct
* block
= *curr_pos2
;
964 req_buffer
.push_back(block
->StartOffset
);
965 req_buffer
.push_back(block
->EndOffset
);
967 int req_enc_size
= 0;
968 const uint8
*req_enc_data
= m_enc_data
.m_req_status
.Encode(req_buffer
, req_enc_size
, changed
);
970 parent
->AddTag(CECTag(EC_TAG_PARTFILE_REQ_STATUS
, req_enc_size
, (void *)req_enc_data
));
972 delete[] req_enc_data
;
975 void CKnownFile_Encoder::Encode(CECTag
*parent
)
977 // Don't add tag if available parts aren't populated yet.
978 if (!m_file
->m_AvailPartFrequency
.empty()) {
981 const uint8
*part_enc_data
= m_enc_data
.Encode(m_file
->m_AvailPartFrequency
, part_enc_size
, changed
);
983 parent
->AddTag(CECTag(EC_TAG_PARTFILE_PART_STATUS
, part_enc_size
, part_enc_data
));
985 delete[] part_enc_data
;
989 static CECPacket
*GetStatsGraphs(const CECPacket
*request
)
991 CECPacket
*response
= NULL
;
993 switch (request
->GetDetailLevel()) {
995 case EC_DETAIL_FULL
: {
996 double dTimestamp
= 0.0;
997 if (request
->GetTagByName(EC_TAG_STATSGRAPH_LAST
) != NULL
) {
998 dTimestamp
= request
->GetTagByName(EC_TAG_STATSGRAPH_LAST
)->GetDoubleData();
1000 uint16 nScale
= request
->GetTagByNameSafe(EC_TAG_STATSGRAPH_SCALE
)->GetInt();
1001 uint16 nMaxPoints
= request
->GetTagByNameSafe(EC_TAG_STATSGRAPH_WIDTH
)->GetInt();
1003 unsigned int numPoints
= theApp
->m_statistics
->GetHistoryForWeb(nMaxPoints
, (double)nScale
, &dTimestamp
, &graphData
);
1005 response
= new CECPacket(EC_OP_STATSGRAPHS
);
1006 response
->AddTag(CECTag(EC_TAG_STATSGRAPH_DATA
, 4 * numPoints
* sizeof(uint32
), graphData
));
1007 delete [] graphData
;
1008 response
->AddTag(CECTag(EC_TAG_STATSGRAPH_LAST
, dTimestamp
));
1010 response
= new CECPacket(EC_OP_FAILED
);
1011 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("No points for graph.")));
1015 case EC_DETAIL_INC_UPDATE
:
1016 case EC_DETAIL_UPDATE
:
1019 response
= new CECPacket(EC_OP_FAILED
);
1020 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Your client is not configured for this detail level.")));
1024 response
= new CECPacket(EC_OP_FAILED
);
1031 CECPacket
*CECServerSocket::ProcessRequest2(const CECPacket
*request
,
1032 CPartFile_Encoder_Map
&enc_part_map
, CKnownFile_Encoder_Map
&enc_shared_map
, CObjTagMap
&objmap
)
1039 CECPacket
*response
= NULL
;
1041 switch (request
->GetOpCode()) {
1045 case EC_OP_SHUTDOWN
:
1046 if (!theApp
->IsOnShutDown()) {
1047 response
= new CECPacket(EC_OP_NOOP
);
1048 AddLogLineM(true, _("External Connection: shutdown requested"));
1049 #ifndef AMULE_DAEMON
1052 evt
.SetCanVeto(false);
1053 theApp
->ShutDown(evt
);
1056 theApp
->ExitMainLoop();
1059 response
= new CECPacket(EC_OP_FAILED
);
1060 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Already shutting down.")));
1063 case EC_OP_ADD_LINK
:
1064 for(unsigned int i
= 0; i
< request
->GetTagCount();i
++) {
1065 const CECTag
*tag
= request
->GetTagByIndex(i
);
1066 wxString link
= tag
->GetStringData();
1068 const CECTag
*cattag
= tag
->GetTagByName(EC_TAG_PARTFILE_CAT
);
1070 category
= cattag
->GetInt();
1072 AddLogLineM(true, CFormat(_("ExternalConn: adding link '%s'.")) % link
);
1073 if ( theApp
->downloadqueue
->AddLink(link
, category
) ) {
1074 response
= new CECPacket(EC_OP_NOOP
);
1076 // Error messages are printed by the add function.
1077 response
= new CECPacket(EC_OP_FAILED
);
1078 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Invalid link or already on list.")));
1085 case EC_OP_STAT_REQ
:
1086 response
= Get_EC_Response_StatRequest(request
, m_LoggerAccess
);
1087 response
->AddTag(CEC_ConnState_Tag(request
->GetDetailLevel()));
1089 case EC_OP_GET_CONNSTATE
:
1090 response
= new CECPacket(EC_OP_MISC_DATA
);
1091 response
->AddTag(CEC_ConnState_Tag(request
->GetDetailLevel()));
1096 case EC_OP_GET_SHARED_FILES
:
1097 if ( request
->GetDetailLevel() == EC_DETAIL_INC_UPDATE
) {
1098 response
= Get_EC_Response_GetSharedFiles(enc_shared_map
, objmap
);
1100 response
= Get_EC_Response_GetSharedFiles(request
, enc_shared_map
);
1103 case EC_OP_GET_DLOAD_QUEUE
:
1104 if ( request
->GetDetailLevel() == EC_DETAIL_INC_UPDATE
) {
1105 response
= Get_EC_Response_GetDownloadQueue(enc_part_map
, objmap
);
1107 response
= Get_EC_Response_GetDownloadQueue(request
, enc_part_map
);
1110 // transmit source names and comments only if file detail dialog is open
1111 case EC_OP_GET_DLOAD_QUEUE_DETAIL
:
1112 if ( request
->GetDetailLevel() == EC_DETAIL_INC_UPDATE
) {
1113 response
= Get_EC_Response_GetDownloadQueue(enc_part_map
, objmap
);
1115 response
= Get_EC_Response_GetDownloadQueue(request
, enc_part_map
, true);
1118 case EC_OP_GET_ULOAD_QUEUE
:
1119 response
= Get_EC_Response_GetClientQueue(request
, objmap
, EC_OP_ULOAD_QUEUE
);
1121 case EC_OP_GET_WAIT_QUEUE
:
1122 response
= Get_EC_Response_GetClientQueue(request
, objmap
, EC_OP_WAIT_QUEUE
);
1124 case EC_OP_PARTFILE_REMOVE_NO_NEEDED
:
1125 case EC_OP_PARTFILE_REMOVE_FULL_QUEUE
:
1126 case EC_OP_PARTFILE_REMOVE_HIGH_QUEUE
:
1127 case EC_OP_PARTFILE_CLEANUP_SOURCES
:
1128 case EC_OP_PARTFILE_SWAP_A4AF_THIS
:
1129 case EC_OP_PARTFILE_SWAP_A4AF_THIS_AUTO
:
1130 case EC_OP_PARTFILE_SWAP_A4AF_OTHERS
:
1131 case EC_OP_PARTFILE_PAUSE
:
1132 case EC_OP_PARTFILE_RESUME
:
1133 case EC_OP_PARTFILE_STOP
:
1134 case EC_OP_PARTFILE_PRIO_SET
:
1135 case EC_OP_PARTFILE_DELETE
:
1136 case EC_OP_PARTFILE_SET_CAT
:
1137 response
= Get_EC_Response_PartFile_Cmd(request
);
1139 case EC_OP_SHAREDFILES_RELOAD
:
1140 theApp
->sharedfiles
->Reload();
1141 response
= new CECPacket(EC_OP_NOOP
);
1143 case EC_OP_SHARED_SET_PRIO
:
1144 response
= Get_EC_Response_Set_SharedFile_Prio(request
);
1146 case EC_OP_RENAME_FILE
: {
1147 CMD4Hash fileHash
= request
->GetTagByNameSafe(EC_TAG_KNOWNFILE
)->GetMD4Data();
1148 CKnownFile
* file
= theApp
->knownfiles
->FindKnownFileByID(fileHash
);
1149 wxString newName
= request
->GetTagByNameSafe(EC_TAG_PARTFILE_NAME
)->GetStringData();
1151 file
= theApp
->downloadqueue
->GetFileByID(fileHash
);
1154 response
= new CECPacket(EC_OP_FAILED
);
1155 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("File not found.")));
1158 if (newName
.IsEmpty()) {
1159 response
= new CECPacket(EC_OP_FAILED
);
1160 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Invalid file name.")));
1164 if (theApp
->sharedfiles
->RenameFile(file
, CPath(newName
))) {
1165 response
= new CECPacket(EC_OP_NOOP
);
1167 response
= new CECPacket(EC_OP_FAILED
);
1168 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Unable to rename file.")));
1178 case EC_OP_SERVER_ADD
:
1179 response
= Get_EC_Response_Server_Add(request
);
1181 case EC_OP_SERVER_DISCONNECT
:
1182 case EC_OP_SERVER_CONNECT
:
1183 case EC_OP_SERVER_REMOVE
:
1184 response
= Get_EC_Response_Server(request
);
1186 case EC_OP_GET_SERVER_LIST
: {
1187 response
= new CECPacket(EC_OP_SERVER_LIST
);
1188 if (!thePrefs::GetNetworkED2K()) {
1189 // Kad only: just send an empty list
1192 EC_DETAIL_LEVEL detail_level
= request
->GetDetailLevel();
1193 std::vector
<const CServer
*> servers
= theApp
->serverlist
->CopySnapshot();
1195 std::vector
<const CServer
*>::const_iterator it
= servers
.begin();
1196 it
!= servers
.end();
1199 response
->AddTag(CEC_Server_Tag(*it
, detail_level
));
1203 case EC_OP_SERVER_UPDATE_FROM_URL
: {
1204 wxString url
= request
->GetTagByIndexSafe(0)->GetStringData();
1206 // Save the new url, and update the UI (if not amuled).
1207 Notify_ServersURLChanged(url
);
1208 thePrefs::SetEd2kServersUrl(url
);
1210 theApp
->serverlist
->UpdateServerMetFromURL(url
);
1211 response
= new CECPacket(EC_OP_NOOP
);
1217 case EC_OP_IPFILTER_RELOAD
:
1218 theApp
->ipfilter
->Reload();
1219 response
= new CECPacket(EC_OP_NOOP
);
1222 case EC_OP_IPFILTER_UPDATE
: {
1223 wxString url
= request
->GetTagByIndexSafe(0)->GetStringData();
1224 if (url
== wxEmptyString
) {
1225 url
= thePrefs::IPFilterURL();
1227 theApp
->ipfilter
->Update(url
);
1228 response
= new CECPacket(EC_OP_NOOP
);
1234 case EC_OP_SEARCH_START
:
1235 response
= Get_EC_Response_Search(request
);
1238 case EC_OP_SEARCH_STOP
:
1239 response
= Get_EC_Response_Search_Stop(request
);
1242 case EC_OP_SEARCH_RESULTS
:
1243 if ( request
->GetDetailLevel() == EC_DETAIL_INC_UPDATE
) {
1244 response
= Get_EC_Response_Search_Results(objmap
);
1246 response
= Get_EC_Response_Search_Results(request
);
1250 case EC_OP_SEARCH_PROGRESS
:
1251 response
= new CECPacket(EC_OP_SEARCH_PROGRESS
);
1252 response
->AddTag(CECTag(EC_TAG_SEARCH_STATUS
,
1253 theApp
->searchlist
->GetSearchProgress()));
1256 case EC_OP_DOWNLOAD_SEARCH_RESULT
:
1257 response
= Get_EC_Response_Search_Results_Download(request
);
1262 case EC_OP_GET_PREFERENCES
:
1263 response
= new CEC_Prefs_Packet(request
->GetTagByNameSafe(EC_TAG_SELECT_PREFS
)->GetInt(), request
->GetDetailLevel());
1265 case EC_OP_SET_PREFERENCES
:
1266 ((CEC_Prefs_Packet
*)request
)->Apply();
1267 theApp
->glob_prefs
->Save();
1268 if (thePrefs::IsFilteringClients()) {
1269 theApp
->clientlist
->FilterQueues();
1271 if (thePrefs::IsFilteringServers()) {
1272 theApp
->serverlist
->FilterServers();
1274 if (!thePrefs::GetNetworkED2K() && theApp
->IsConnectedED2K()) {
1275 theApp
->DisconnectED2K();
1277 if (!thePrefs::GetNetworkKademlia() && theApp
->IsConnectedKad()) {
1280 response
= new CECPacket(EC_OP_NOOP
);
1283 case EC_OP_CREATE_CATEGORY
:
1284 if ( request
->GetTagCount() == 1 ) {
1285 CEC_Category_Tag
*tag
= (CEC_Category_Tag
*)request
->GetTagByIndex(0);
1286 if (tag
->Create()) {
1287 response
= new CECPacket(EC_OP_NOOP
);
1289 response
= new CECPacket(EC_OP_FAILED
);
1290 response
->AddTag(CECTag(EC_TAG_CATEGORY
, theApp
->glob_prefs
->GetCatCount() - 1));
1291 response
->AddTag(CECTag(EC_TAG_CATEGORY_PATH
, tag
->Path()));
1293 Notify_CategoryAdded();
1295 response
= new CECPacket(EC_OP_NOOP
);
1298 case EC_OP_UPDATE_CATEGORY
:
1299 if ( request
->GetTagCount() == 1 ) {
1300 CEC_Category_Tag
*tag
= (CEC_Category_Tag
*)request
->GetTagByIndex(0);
1302 response
= new CECPacket(EC_OP_NOOP
);
1304 response
= new CECPacket(EC_OP_FAILED
);
1305 response
->AddTag(CECTag(EC_TAG_CATEGORY
, tag
->GetInt()));
1306 response
->AddTag(CECTag(EC_TAG_CATEGORY_PATH
, tag
->Path()));
1308 Notify_CategoryUpdate(tag
->GetInt());
1310 response
= new CECPacket(EC_OP_NOOP
);
1313 case EC_OP_DELETE_CATEGORY
:
1314 if ( request
->GetTagCount() == 1 ) {
1315 uint32 cat
= request
->GetTagByIndex(0)->GetInt();
1316 // this noes not only update the gui, but actually deletes the cat
1317 Notify_CategoryDelete(cat
);
1319 response
= new CECPacket(EC_OP_NOOP
);
1325 case EC_OP_ADDLOGLINE
:
1326 AddLogLineM( (request
->GetTagByName(EC_TAG_LOG_TO_STATUS
) != NULL
), request
->GetTagByNameSafe(EC_TAG_STRING
)->GetStringData() );
1327 response
= new CECPacket(EC_OP_NOOP
);
1329 case EC_OP_ADDDEBUGLOGLINE
:
1330 AddDebugLogLineM( (request
->GetTagByName(EC_TAG_LOG_TO_STATUS
) != NULL
), logGeneral
, request
->GetTagByNameSafe(EC_TAG_STRING
)->GetStringData() );
1331 response
= new CECPacket(EC_OP_NOOP
);
1334 response
= new CECPacket(EC_OP_LOG
);
1335 response
->AddTag(CECTag(EC_TAG_STRING
, theApp
->GetLog(false)));
1337 case EC_OP_GET_DEBUGLOG
:
1338 response
= new CECPacket(EC_OP_DEBUGLOG
);
1339 response
->AddTag(CECTag(EC_TAG_STRING
, theApp
->GetDebugLog(false)));
1341 case EC_OP_RESET_LOG
:
1342 theApp
->GetLog(true);
1343 response
= new CECPacket(EC_OP_NOOP
);
1345 case EC_OP_RESET_DEBUGLOG
:
1346 theApp
->GetDebugLog(true);
1347 response
= new CECPacket(EC_OP_NOOP
);
1349 case EC_OP_GET_LAST_LOG_ENTRY
:
1351 wxString tmp
= theApp
->GetLog(false);
1352 if (tmp
.Last() == '\n') {
1355 response
= new CECPacket(EC_OP_LOG
);
1356 response
->AddTag(CECTag(EC_TAG_STRING
, tmp
.AfterLast('\n')));
1359 case EC_OP_GET_SERVERINFO
:
1360 response
= new CECPacket(EC_OP_SERVERINFO
);
1361 response
->AddTag(CECTag(EC_TAG_STRING
, theApp
->GetServerLog(false)));
1363 case EC_OP_CLEAR_SERVERINFO
:
1364 theApp
->GetServerLog(true);
1365 response
= new CECPacket(EC_OP_NOOP
);
1370 case EC_OP_GET_STATSGRAPHS
:
1371 response
= GetStatsGraphs(request
);
1373 case EC_OP_GET_STATSTREE
: {
1374 theApp
->m_statistics
->UpdateStatsTree();
1375 response
= new CECPacket(EC_OP_STATSTREE
);
1376 CECTag
* tree
= theStats::GetECStatTree(request
->GetTagByNameSafe(EC_TAG_STATTREE_CAPPING
)->GetInt());
1378 response
->AddTag(*tree
);
1381 if (request
->GetDetailLevel() == EC_DETAIL_WEB
) {
1382 response
->AddTag(CECTag(EC_TAG_SERVER_VERSION
, wxT(VERSION
)));
1383 response
->AddTag(CECTag(EC_TAG_USER_NICK
, thePrefs::GetUserNick()));
1391 case EC_OP_KAD_START
:
1392 response
= Get_EC_Response_Kad_Connect(request
);
1394 case EC_OP_KAD_STOP
:
1396 response
= new CECPacket(EC_OP_NOOP
);
1398 case EC_OP_KAD_UPDATE_FROM_URL
: {
1399 wxString url
= request
->GetTagByIndexSafe(0)->GetStringData();
1401 // Save the new url, and update the UI (if not amuled).
1402 Notify_NodesURLChanged(url
);
1403 thePrefs::SetKadNodesUrl(url
);
1405 theApp
->UpdateNotesDat(url
);
1406 response
= new CECPacket(EC_OP_NOOP
);
1409 case EC_OP_KAD_BOOTSTRAP_FROM_IP
:
1410 theApp
->BootstrapKad(request
->GetTagByIndexSafe(0)->GetInt(),
1411 request
->GetTagByIndexSafe(1)->GetInt());
1412 response
= new CECPacket(EC_OP_NOOP
);
1419 if (thePrefs::GetNetworkED2K()) {
1420 response
= new CECPacket(EC_OP_STRINGS
);
1421 if (theApp
->IsConnectedED2K()) {
1422 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Already connected to eD2k.")));
1424 theApp
->serverconnect
->ConnectToAnyServer();
1425 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Connecting to eD2k...")));
1428 if (thePrefs::GetNetworkKademlia()) {
1430 response
= new CECPacket(EC_OP_STRINGS
);
1432 if (theApp
->IsConnectedKad()) {
1433 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Already connected to Kad.")));
1436 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Connecting to Kad...")));
1440 response
= new CECPacket(EC_OP_FAILED
);
1441 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("All networks are disabled.")));
1444 case EC_OP_DISCONNECT
:
1445 if (theApp
->IsConnected()) {
1446 response
= new CECPacket(EC_OP_STRINGS
);
1447 if (theApp
->IsConnectedED2K()) {
1448 theApp
->serverconnect
->Disconnect();
1449 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Disconnected from eD2k.")));
1451 if (theApp
->IsConnectedKad()) {
1453 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Disconnected from Kad.")));
1456 response
= new CECPacket(EC_OP_NOOP
);
1461 AddLogLineM(false, wxString::Format(_("External Connection: invalid opcode received: %#x"), request
->GetOpCode()));
1463 response
= new CECPacket(EC_OP_FAILED
);
1464 response
->AddTag(CECTag(EC_TAG_STRING
, wxTRANSLATE("Invalid opcode (wrong protocol version?)")));
1471 * Here notification-based EC. Notification will be sorted by priority for possible throttling.
1475 * Core general status
1477 ECStatusMsgSource::ECStatusMsgSource()
1479 m_last_ed2k_status_sent
= 0xffffffff;
1480 m_last_kad_status_sent
= 0xffffffff;
1481 m_server
= (void *)0xffffffff;
1484 uint32
ECStatusMsgSource::GetEd2kStatus()
1486 if ( theApp
->IsConnectedED2K() ) {
1487 return theApp
->GetED2KID();
1488 } else if ( theApp
->serverconnect
->IsConnecting() ) {
1495 uint32
ECStatusMsgSource::GetKadStatus()
1497 if ( theApp
->IsConnectedKad() ) {
1499 } else if ( Kademlia::CKademlia::IsFirewalled() ) {
1501 } else if ( Kademlia::CKademlia::IsRunning() ) {
1507 CECPacket
*ECStatusMsgSource::GetNextPacket()
1509 if ( (m_last_ed2k_status_sent
!= GetEd2kStatus()) ||
1510 (m_last_kad_status_sent
!= GetKadStatus()) ||
1511 (m_server
!= theApp
->serverconnect
->GetCurrentServer()) ) {
1513 m_last_ed2k_status_sent
= GetEd2kStatus();
1514 m_last_kad_status_sent
= GetKadStatus();
1515 m_server
= theApp
->serverconnect
->GetCurrentServer();
1517 CECPacket
*response
= new CECPacket(EC_OP_STATS
);
1518 response
->AddTag(CEC_ConnState_Tag(EC_DETAIL_UPDATE
));
1527 ECPartFileMsgSource::ECPartFileMsgSource()
1529 for (unsigned int i
= 0; i
< theApp
->downloadqueue
->GetFileCount(); i
++) {
1530 CPartFile
*cur_file
= theApp
->downloadqueue
->GetFileByIndex(i
);
1531 PARTFILE_STATUS status
= { true, false, false, false, true, cur_file
};
1532 m_dirty_status
[cur_file
->GetFileHash()] = status
;
1536 void ECPartFileMsgSource::SetDirty(CPartFile
*file
)
1538 CMD4Hash filehash
= file
->GetFileHash();
1539 if ( m_dirty_status
.find(filehash
) != m_dirty_status
.end() ) {
1540 m_dirty_status
[filehash
].m_dirty
= true;;
1544 void ECPartFileMsgSource::SetNew(CPartFile
*file
)
1546 CMD4Hash filehash
= file
->GetFileHash();
1547 wxASSERT ( m_dirty_status
.find(filehash
) == m_dirty_status
.end() );
1548 PARTFILE_STATUS status
= { true, false, false, false, true, file
};
1549 m_dirty_status
[filehash
] = status
;
1552 void ECPartFileMsgSource::SetCompleted(CPartFile
*file
)
1554 CMD4Hash filehash
= file
->GetFileHash();
1555 wxASSERT ( m_dirty_status
.find(filehash
) != m_dirty_status
.end() );
1557 m_dirty_status
[filehash
].m_finished
= true;
1560 void ECPartFileMsgSource::SetRemoved(CPartFile
*file
)
1562 CMD4Hash filehash
= file
->GetFileHash();
1563 wxASSERT ( m_dirty_status
.find(filehash
) != m_dirty_status
.end() );
1565 m_dirty_status
[filehash
].m_removed
= true;
1568 CECPacket
*ECPartFileMsgSource::GetNextPacket()
1570 for(std::map
<CMD4Hash
, PARTFILE_STATUS
>::iterator it
= m_dirty_status
.begin();
1571 it
!= m_dirty_status
.end(); it
++) {
1572 if ( it
->second
.m_new
|| it
->second
.m_dirty
|| it
->second
.m_removed
) {
1573 CMD4Hash filehash
= it
->first
;
1575 CPartFile
*partfile
= it
->second
.m_file
;
1577 CECPacket
*packet
= new CECPacket(EC_OP_DLOAD_QUEUE
);
1578 if ( it
->second
.m_removed
) {
1579 CECTag
tag(EC_TAG_PARTFILE
, filehash
);
1580 packet
->AddTag(tag
);
1581 m_dirty_status
.erase(it
);
1583 CEC_PartFile_Tag
tag(partfile
, it
->second
.m_new
? EC_DETAIL_FULL
: EC_DETAIL_UPDATE
);
1584 packet
->AddTag(tag
);
1586 m_dirty_status
[filehash
].m_new
= false;
1587 m_dirty_status
[filehash
].m_dirty
= false;
1596 * Shared files - similar to downloading
1598 ECKnownFileMsgSource::ECKnownFileMsgSource()
1600 for (unsigned int i
= 0; i
< theApp
->sharedfiles
->GetFileCount(); i
++) {
1601 CKnownFile
*cur_file
= (CKnownFile
*)theApp
->sharedfiles
->GetFileByIndex(i
);
1602 KNOWNFILE_STATUS status
= { true, false, false, true, cur_file
};
1603 m_dirty_status
[cur_file
->GetFileHash()] = status
;
1607 void ECKnownFileMsgSource::SetDirty(CKnownFile
*file
)
1609 CMD4Hash filehash
= file
->GetFileHash();
1610 if ( m_dirty_status
.find(filehash
) != m_dirty_status
.end() ) {
1611 m_dirty_status
[filehash
].m_dirty
= true;;
1615 void ECKnownFileMsgSource::SetNew(CKnownFile
*file
)
1617 CMD4Hash filehash
= file
->GetFileHash();
1618 wxASSERT ( m_dirty_status
.find(filehash
) == m_dirty_status
.end() );
1619 KNOWNFILE_STATUS status
= { true, false, false, true, file
};
1620 m_dirty_status
[filehash
] = status
;
1623 void ECKnownFileMsgSource::SetRemoved(CKnownFile
*file
)
1625 CMD4Hash filehash
= file
->GetFileHash();
1626 wxASSERT ( m_dirty_status
.find(filehash
) != m_dirty_status
.end() );
1628 m_dirty_status
[filehash
].m_removed
= true;
1631 CECPacket
*ECKnownFileMsgSource::GetNextPacket()
1633 for(std::map
<CMD4Hash
, KNOWNFILE_STATUS
>::iterator it
= m_dirty_status
.begin();
1634 it
!= m_dirty_status
.end(); it
++) {
1635 if ( it
->second
.m_new
|| it
->second
.m_dirty
|| it
->second
.m_removed
) {
1636 CMD4Hash filehash
= it
->first
;
1638 CKnownFile
*partfile
= it
->second
.m_file
;
1640 CECPacket
*packet
= new CECPacket(EC_OP_SHARED_FILES
);
1641 if ( it
->second
.m_removed
) {
1642 CECTag
tag(EC_TAG_PARTFILE
, filehash
);
1643 packet
->AddTag(tag
);
1644 m_dirty_status
.erase(it
);
1646 CEC_SharedFile_Tag
tag(partfile
, it
->second
.m_new
? EC_DETAIL_FULL
: EC_DETAIL_UPDATE
);
1647 packet
->AddTag(tag
);
1649 m_dirty_status
[filehash
].m_new
= false;
1650 m_dirty_status
[filehash
].m_dirty
= false;
1659 * Notification about search status
1661 ECSearchMsgSource::ECSearchMsgSource()
1665 CECPacket
*ECSearchMsgSource::GetNextPacket()
1667 if ( m_dirty_status
.empty() ) {
1671 CECPacket
*response
= new CECPacket(EC_OP_SEARCH_RESULTS
);
1672 for(std::map
<CMD4Hash
, SEARCHFILE_STATUS
>::iterator it
= m_dirty_status
.begin();
1673 it
!= m_dirty_status
.end(); it
++) {
1675 if ( it
->second
.m_new
) {
1676 response
->AddTag(CEC_SearchFile_Tag(it
->second
.m_file
, EC_DETAIL_FULL
));
1677 it
->second
.m_new
= false;
1678 } else if ( it
->second
.m_dirty
) {
1679 response
->AddTag(CEC_SearchFile_Tag(it
->second
.m_file
, EC_DETAIL_UPDATE
));
1687 void ECSearchMsgSource::FlushStatus()
1689 m_dirty_status
.clear();
1692 void ECSearchMsgSource::SetDirty(CSearchFile
*file
)
1694 if ( m_dirty_status
.count(file
->GetFileHash()) ) {
1695 m_dirty_status
[file
->GetFileHash()].m_dirty
= true;
1697 m_dirty_status
[file
->GetFileHash()].m_new
= true;
1698 m_dirty_status
[file
->GetFileHash()].m_dirty
= true;
1699 m_dirty_status
[file
->GetFileHash()].m_child_dirty
= true;
1700 m_dirty_status
[file
->GetFileHash()].m_file
= file
;
1704 void ECSearchMsgSource::SetChildDirty(CSearchFile
*file
)
1706 m_dirty_status
[file
->GetFileHash()].m_child_dirty
= true;
1710 * Notification about uploading clients
1712 CECPacket
*ECClientMsgSource::GetNextPacket()
1718 // Notification iface per-client
1720 ECNotifier::ECNotifier()
1724 CECPacket
*ECNotifier::GetNextPacket(ECUpdateMsgSource
*msg_source_array
[])
1726 CECPacket
*packet
= 0;
1728 // priority 0 is highest
1730 for(int i
= 0; i
< EC_STATUS_LAST_PRIO
; i
++) {
1731 if ( (packet
= msg_source_array
[i
]->GetNextPacket()) != 0 ) {
1738 CECPacket
*ECNotifier::GetNextPacket(CECServerSocket
*sock
)
1741 // OnOutput is called for a first time before
1742 // socket is registered
1744 if ( m_msg_source
.count(sock
) ) {
1745 ECUpdateMsgSource
**notifier_array
= m_msg_source
[sock
];
1746 if ( !notifier_array
) {
1749 CECPacket
*packet
= GetNextPacket(notifier_array
);
1750 printf("[EC] next update packet; opcode=%x\n",packet
? packet
->GetOpCode() : 0xff);
1758 // Interface to notification macros
1760 void ECNotifier::DownloadFile_SetDirty(CPartFile
*file
)
1762 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1763 i
!= m_msg_source
.end(); i
++) {
1764 CECServerSocket
*sock
= i
->first
;
1765 if ( sock
->HaveNotificationSupport() ) {
1766 ECUpdateMsgSource
**notifier_array
= i
->second
;
1767 ((ECPartFileMsgSource
*)notifier_array
[EC_PARTFILE
])->SetDirty(file
);
1770 NextPacketToSocket();
1773 void ECNotifier::DownloadFile_RemoveFile(CPartFile
*file
)
1775 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1776 i
!= m_msg_source
.end(); i
++) {
1777 ECUpdateMsgSource
**notifier_array
= i
->second
;
1778 ((ECPartFileMsgSource
*)notifier_array
[EC_PARTFILE
])->SetRemoved(file
);
1780 NextPacketToSocket();
1783 void ECNotifier::DownloadFile_RemoveSource(CPartFile
*)
1785 // per-partfile source list is not supported (yet), and IMHO quite useless
1788 void ECNotifier::DownloadFile_AddFile(CPartFile
*file
)
1790 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1791 i
!= m_msg_source
.end(); i
++) {
1792 ECUpdateMsgSource
**notifier_array
= i
->second
;
1793 ((ECPartFileMsgSource
*)notifier_array
[EC_PARTFILE
])->SetNew(file
);
1795 NextPacketToSocket();
1798 void ECNotifier::DownloadFile_AddSource(CPartFile
*)
1800 // per-partfile source list is not supported (yet), and IMHO quite useless
1803 void ECNotifier::SharedFile_AddFile(CKnownFile
*file
)
1805 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1806 i
!= m_msg_source
.end(); i
++) {
1807 ECUpdateMsgSource
**notifier_array
= i
->second
;
1808 ((ECKnownFileMsgSource
*)notifier_array
[EC_KNOWN
])->SetNew(file
);
1810 NextPacketToSocket();
1813 void ECNotifier::SharedFile_RemoveFile(CKnownFile
*file
)
1815 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1816 i
!= m_msg_source
.end(); i
++) {
1817 ECUpdateMsgSource
**notifier_array
= i
->second
;
1818 ((ECKnownFileMsgSource
*)notifier_array
[EC_KNOWN
])->SetRemoved(file
);
1820 NextPacketToSocket();
1823 void ECNotifier::SharedFile_RemoveAllFiles()
1825 // need to figure out what to do here
1828 void ECNotifier::Add_EC_Client(CECServerSocket
*sock
)
1830 ECUpdateMsgSource
**notifier_array
= new ECUpdateMsgSource
*[EC_STATUS_LAST_PRIO
];
1831 notifier_array
[EC_STATUS
] = new ECStatusMsgSource();
1832 notifier_array
[EC_SEARCH
] = new ECSearchMsgSource();
1833 notifier_array
[EC_PARTFILE
] = new ECPartFileMsgSource();
1834 notifier_array
[EC_CLIENT
] = new ECClientMsgSource();
1835 notifier_array
[EC_KNOWN
] = new ECKnownFileMsgSource();
1837 m_msg_source
[sock
] = notifier_array
;
1840 void ECNotifier::Remove_EC_Client(CECServerSocket
*sock
)
1842 if (m_msg_source
.count(sock
)) {
1843 ECUpdateMsgSource
**notifier_array
= m_msg_source
[sock
];
1845 m_msg_source
.erase(sock
);
1847 for(int i
= 0; i
< EC_STATUS_LAST_PRIO
; i
++) {
1848 delete notifier_array
[i
];
1850 delete [] notifier_array
;
1854 void ECNotifier::NextPacketToSocket()
1856 for(std::map
<CECServerSocket
*, ECUpdateMsgSource
**>::iterator i
= m_msg_source
.begin();
1857 i
!= m_msg_source
.end(); i
++) {
1858 CECServerSocket
*sock
= i
->first
;
1859 if ( sock
->HaveNotificationSupport() && !sock
->DataPending() ) {
1860 ECUpdateMsgSource
**notifier_array
= i
->second
;
1861 CECPacket
*packet
= GetNextPacket(notifier_array
);
1863 printf("[EC] sending update packet; opcode=%x\n",packet
->GetOpCode());
1864 sock
->SendPacket(packet
);
1870 // File_checked_for_headers