2 // This file is part of the aMule Project.
4 // Copyright (c) 2003-2008 Angel Vidal ( kry@amule.org )
5 // Copyright (c) 2003-2008 aMule Team ( admin@amule.org / http://www.amule.org )
7 // Any parts of this program derived from the xMule, lMule or eMule project,
8 // or contributed by third-party developers are copyrighted by their
11 // This program is free software; you can redistribute it and/or modify
12 // it under the terms of the GNU General Public License as published by
13 // the Free Software Foundation; either version 2 of the License, or
14 // (at your option) any later version.
16 // This program is distributed in the hope that it will be useful,
17 // but WITHOUT ANY WARRANTY; without even the implied warranty of
18 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 // GNU General Public License for more details.
21 // You should have received a copy of the GNU General Public License
22 // along with this program; if not, write to the Free Software
23 // Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
28 #include "config.h" // Needed for VERSION
31 #include <common/ClientVersion.h>
33 #include "TextClient.h"
36 #include <unistd.h> // Do_not_auto_remove
40 //-------------------------------------------------------------------
43 //-------------------------------------------------------------------
45 #include <ec/cpp/ECSpecialTags.h>
47 #include <wx/tokenzr.h>
49 #include <common/Format.h> // Needed for CFormat
50 #include "OtherFunctions.h"
51 #include "KnownFile.h" // Needed for Priority Levels
52 #include "DataToText.cpp" // Needed for PriorityToStr
54 #define APP_INIT_SIZE_X 640
55 #define APP_INIT_SIZE_Y 480
57 #define theApp (*((CamulecmdApp*)wxTheApp))
59 //-------------------------------------------------------------------
66 CMD_ID_PRIORITY_NORMAL
,
74 CMD_ID_DISCONNECT_ED2K
,
75 CMD_ID_DISCONNECT_KAD
,
77 CMD_ID_RELOAD_IPFILTER
,
78 CMD_ID_SET_IPFILTER_ON
,
79 CMD_ID_SET_IPFILTER_OFF
,
80 CMD_ID_SET_IPFILTER_CLIENTS_ON
,
81 CMD_ID_SET_IPFILTER_CLIENTS_OFF
,
82 CMD_ID_SET_IPFILTER_SERVERS_ON
,
83 CMD_ID_SET_IPFILTER_SERVERS_OFF
,
84 CMD_ID_SET_IPFILTER_LEVEL
,
86 CMD_ID_GET_IPFILTER_STATE
,
87 CMD_ID_GET_IPFILTER_STATE_CLIENTS
,
88 CMD_ID_GET_IPFILTER_STATE_SERVERS
,
89 CMD_ID_GET_IPFILTER_LEVEL
,
98 CMD_ID_SET_BWLIMIT_UP
,
99 CMD_ID_SET_BWLIMIT_DOWN
,
103 CMD_ID_SEARCH_GLOBAL
,
106 CMD_ID_SEARCH_RESULTS
,
107 CMD_ID_SEARCH_PROGRESS
,
109 // IDs for deprecated commands
114 // method to create a SearchFile
115 SearchFile::SearchFile(CEC_SearchFile_Tag
*tag
)
117 nHash
= tag
->FileHash();
118 sHash
= nHash
.Encode();
119 sFileName
= tag
->FileName();
120 lFileSize
= tag
->SizeFull();
121 lSourceCount
= tag
->SourceCount();
122 bPresent
= tag
->AlreadyHave();
125 //-------------------------------------------------------------------
126 IMPLEMENT_APP (CamulecmdApp
)
127 //-------------------------------------------------------------------
129 void CamulecmdApp::OnInitCmdLine(wxCmdLineParser
& parser
)
131 CaMuleExternalConnector::OnInitCmdLine(parser
, "amulecmd");
132 parser
.AddOption(wxT("c"), wxT("command"),
133 _("Execute <str> and exit."),
134 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
137 bool CamulecmdApp::OnCmdLineParsed(wxCmdLineParser
& parser
)
139 m_HasCmdOnCmdLine
= parser
.Found(wxT("command"), &m_CmdString
);
140 if (m_CmdString
.Lower().StartsWith(wxT("help")))
143 printf("%s %s\n", m_appname
, (const char *)unicode2char(GetMuleVersion()));
144 Parse_Command(m_CmdString
);
147 m_interactive
= !m_HasCmdOnCmdLine
;
148 return CaMuleExternalConnector::OnCmdLineParsed(parser
);
151 void CamulecmdApp::TextShell(const wxString
& prompt
)
153 if (m_HasCmdOnCmdLine
)
154 Parse_Command(m_CmdString
);
156 CaMuleExternalConnector::TextShell(prompt
);
159 int CamulecmdApp::ProcessCommand(int CmdId
)
161 wxString args
= GetCmdArgs();
162 CECPacket
*request
= 0;
163 std::list
<CECPacket
*> request_list
;
165 EC_SEARCH_TYPE search_type
= EC_SEARCH_KAD
;
167 // Implementation of the deprecated command 'SetIPFilter'.
168 if (CmdId
== CMD_ID_SET_IPFILTER
) {
169 if ( ! args
.IsEmpty() ) {
170 if (args
.IsSameAs(wxT("ON"), false)) {
171 CmdId
= CMD_ID_SET_IPFILTER_ON
;
172 } else if (args
.IsSameAs(wxT("OFF"), false)) {
173 CmdId
= CMD_ID_SET_IPFILTER_OFF
;
175 return CMD_ERR_INVALID_ARG
;
178 CmdId
= CMD_ID_GET_IPFILTER_STATE
;
184 request_list
.push_back(new CECPacket(EC_OP_STAT_REQ
, EC_DETAIL_CMD
));
187 case CMD_ID_SHUTDOWN
:
188 request_list
.push_back(new CECPacket(EC_OP_SHUTDOWN
));
192 if ( !args
.IsEmpty() ) {
195 // Not much we can do against this unicode2char.
196 int result
= sscanf(unicode2char(args
), "%d.%d.%d.%d:%d", &ip
[0], &ip
[1], &ip
[2], &ip
[3], &port
);
198 // Try to resolve DNS -- good for dynamic IP servers
199 wxString
serverName(args
.BeforeFirst(wxT(':')));
201 bool ok
= args
.AfterFirst(wxT(':')).ToLong(&lPort
);
202 port
= (unsigned int)lPort
;
204 a
.Hostname(serverName
);
206 result
= sscanf(unicode2char(a
.IPAddress()), "%d.%d.%d.%d", &ip
[0], &ip
[1], &ip
[2], &ip
[3]);
207 if (serverName
.IsEmpty() || !ok
|| (result
!= 4)) {
208 Show(_("Invalid IP format. Use xxx.xxx.xxx.xxx:xxxx\n"));
213 addr
.m_ip
[0] = ip
[0];
214 addr
.m_ip
[1] = ip
[1];
215 addr
.m_ip
[2] = ip
[2];
216 addr
.m_ip
[3] = ip
[3];
218 request
= new CECPacket(EC_OP_SERVER_CONNECT
);
219 request
->AddTag(CECTag(EC_TAG_SERVER
, addr
));
220 request_list
.push_back(request
);
222 request_list
.push_back(new CECPacket(EC_OP_CONNECT
));
226 case CMD_ID_CONNECT_ED2K
:
227 request_list
.push_back(new CECPacket(EC_OP_SERVER_CONNECT
));
230 case CMD_ID_CONNECT_KAD
:
231 request_list
.push_back(new CECPacket(EC_OP_KAD_START
));
234 case CMD_ID_DISCONNECT
:
235 request_list
.push_back(new CECPacket(EC_OP_DISCONNECT
));
238 case CMD_ID_DISCONNECT_ED2K
:
239 request_list
.push_back(new CECPacket(EC_OP_SERVER_DISCONNECT
));
242 case CMD_ID_DISCONNECT_KAD
:
243 request_list
.push_back(new CECPacket(EC_OP_KAD_STOP
));
246 case CMD_ID_RELOAD_SHARED
:
247 request_list
.push_back(new CECPacket(EC_OP_SHAREDFILES_RELOAD
));
250 case CMD_ID_RELOAD_IPFILTER
:
251 request_list
.push_back(new CECPacket(EC_OP_IPFILTER_RELOAD
));
254 case CMD_ID_SET_IPFILTER_ON
:
255 case CMD_ID_SET_IPFILTER_CLIENTS_ON
:
256 case CMD_ID_SET_IPFILTER_SERVERS_ON
:
258 case CMD_ID_SET_IPFILTER_OFF
:
259 case CMD_ID_SET_IPFILTER_CLIENTS_OFF
:
260 case CMD_ID_SET_IPFILTER_SERVERS_OFF
:
262 if (CmdId
== CMD_ID_SET_IPFILTER_CLIENTS_ON
|| CmdId
== CMD_ID_SET_IPFILTER_CLIENTS_OFF
) {
263 CmdId
= CMD_ID_GET_IPFILTER_STATE_CLIENTS
;
264 } else if (CmdId
== CMD_ID_SET_IPFILTER_SERVERS_ON
|| CmdId
== CMD_ID_SET_IPFILTER_SERVERS_OFF
) {
265 CmdId
= CMD_ID_GET_IPFILTER_STATE_SERVERS
;
267 CmdId
= CMD_ID_GET_IPFILTER_STATE
;
270 request
= new CECPacket(EC_OP_SET_PREFERENCES
);
271 CECEmptyTag
prefs(EC_TAG_PREFS_SECURITY
);
272 if (CmdId
!= CMD_ID_GET_IPFILTER_STATE_SERVERS
) {
273 prefs
.AddTag(CECTag(EC_TAG_IPFILTER_CLIENTS
, (uint8
)tmp_int
));
275 if (CmdId
!= CMD_ID_GET_IPFILTER_STATE_CLIENTS
) {
276 prefs
.AddTag(CECTag(EC_TAG_IPFILTER_SERVERS
, (uint8
)tmp_int
));
278 request
->AddTag(prefs
);
279 request_list
.push_back(request
);
281 case CMD_ID_GET_IPFILTER
:
282 case CMD_ID_GET_IPFILTER_STATE
:
283 case CMD_ID_GET_IPFILTER_STATE_CLIENTS
:
284 case CMD_ID_GET_IPFILTER_STATE_SERVERS
:
285 request
= new CECPacket(EC_OP_GET_PREFERENCES
);
286 request
->AddTag(CECTag(EC_TAG_SELECT_PREFS
, (uint32
)EC_PREFS_SECURITY
));
287 request_list
.push_back(request
);
290 case CMD_ID_SET_IPFILTER_LEVEL
:
291 if (!args
.IsEmpty()) // This 'if' must stay as long as we support the deprecated 'IPLevel' command.
293 unsigned long int level
= 0;
294 if (args
.ToULong(&level
) == true && level
< 256) {
295 request
= new CECPacket(EC_OP_SET_PREFERENCES
);
296 CECEmptyTag
prefs(EC_TAG_PREFS_SECURITY
);
297 prefs
.AddTag(CECTag(EC_TAG_IPFILTER_LEVEL
, (uint8
)level
));
298 request
->AddTag(prefs
);
299 request_list
.push_back(request
);
301 return CMD_ERR_INVALID_ARG
;
304 CmdId
= CMD_ID_GET_IPFILTER_LEVEL
;
305 case CMD_ID_GET_IPFILTER_LEVEL
:
306 request
= new CECPacket(EC_OP_GET_PREFERENCES
);
307 request
->AddTag(CECTag(EC_TAG_SELECT_PREFS
, (uint32
)EC_PREFS_SECURITY
));
308 request_list
.push_back(request
);
315 if ( args
.IsEmpty() ) {
316 Show(_("This command requires an argument. Valid arguments: 'all', filename, or a number.\n"));
319 wxStringTokenizer
argsTokenizer(args
);
323 // Grab the entire dl queue right away
324 CECPacket
request_all(EC_OP_GET_DLOAD_QUEUE
, EC_DETAIL_CMD
);
325 const CECPacket
*reply_all
= SendRecvMsg_v2(&request_all
);
330 request
= new CECPacket(EC_OP_PARTFILE_PAUSE
); break;
332 request
= new CECPacket(EC_OP_PARTFILE_DELETE
); break;
334 request
= new CECPacket(EC_OP_PARTFILE_RESUME
); break;
338 // We loop through all the arguments
339 while(argsTokenizer
.HasMoreTokens()) {
340 token
=argsTokenizer
.GetNextToken();
342 // If the user requested all, then we select all files and exit the loop
343 // since there is little point to add anything more to "everything"
344 if( token
== wxT("all") ) {
345 for (size_t i
= 0; i
< reply_all
->GetTagCount(); i
++) {
346 const CECTag
*tag
= reply_all
->GetTagByIndex(i
);
348 request
->AddTag(CECTag(EC_TAG_PARTFILE
, tag
->GetMD4Data()));
352 } else if ( hash
.Decode(token
.Trim(false).Trim(true)) ) {
353 if ( !hash
.IsEmpty() ) {
354 Show(_("Processing by hash: "+token
+wxT("\n")));
355 request
->AddTag(CECTag(EC_TAG_PARTFILE
, hash
));
358 // Go through the dl queue and look at each filename
359 for (size_t i
= 0; i
< reply_all
->GetTagCount(); i
++) {
360 CEC_PartFile_Tag
*tag
= (CEC_PartFile_Tag
*)reply_all
->GetTagByIndex(i
);
362 wxString partmetname
= tag
->PartMetName();
364 // We check for filename, XXX.pat.met, XXX.part, XXX
365 if( tag
->FileName() == token
||
366 partmetname
== token
||
367 partmetname
.Truncate(partmetname
.Len()-4) == token
||
368 partmetname
.Truncate(partmetname
.Len()-5) == token
) {
369 Show(_("Processing by filename: "+token
+wxT("\n")));
370 request
->AddTag(CECTag(EC_TAG_PARTFILE
, tag
->GetMD4Data()));
374 } // End of filename check else
375 } // End of argument token loop
377 request_list
.push_back(request
);
381 } // End of dl queue processing
383 } // end of command processing
387 case CMD_ID_PRIORITY_LOW
:
388 case CMD_ID_PRIORITY_NORMAL
:
389 case CMD_ID_PRIORITY_HIGH
:
390 case CMD_ID_PRIORITY_AUTO
:
391 if ( args
.IsEmpty() ) {
392 Show(_("This command requires an argument. Valid arguments: a file hash.\n"));
396 if (hash
.Decode(args
.Trim(false).Trim(true))) {
397 if (!hash
.IsEmpty()) {
398 request
= new CECPacket(EC_OP_PARTFILE_PRIO_SET
);
399 CECTag
hashtag(EC_TAG_PARTFILE
, hash
);
401 case CMD_ID_PRIORITY_LOW
:
402 hashtag
.AddTag(CECTag(EC_TAG_PARTFILE_PRIO
, (uint8
)PR_LOW
));
404 case CMD_ID_PRIORITY_NORMAL
:
405 hashtag
.AddTag(CECTag(EC_TAG_PARTFILE_PRIO
, (uint8
)PR_NORMAL
));
407 case CMD_ID_PRIORITY_HIGH
:
408 hashtag
.AddTag(CECTag(EC_TAG_PARTFILE_PRIO
, (uint8
)PR_HIGH
));
410 case CMD_ID_PRIORITY_AUTO
:
411 hashtag
.AddTag(CECTag(EC_TAG_PARTFILE_PRIO
, (uint8
)PR_AUTO
));
415 request
->AddTag(hashtag
);
416 request_list
.push_back(request
);
418 Show(_("Not a valid number\n"));
422 Show(_("Not a valid hash (length should be exactly 32 chars)\n"));
429 request_list
.push_back(new CECPacket(EC_OP_GET_ULOAD_QUEUE
));
433 request_list
.push_back(new CECPacket(EC_OP_GET_DLOAD_QUEUE
));
436 case CMD_ID_SHOW_LOG
:
437 request_list
.push_back(new CECPacket(EC_OP_GET_LOG
));
440 case CMD_ID_SHOW_SERVERS
:
441 request_list
.push_back(new CECPacket(EC_OP_GET_SERVER_LIST
, EC_DETAIL_CMD
));
444 case CMD_ID_RESET_LOG
:
445 request_list
.push_back(new CECPacket(EC_OP_RESET_LOG
));
449 if (args
.compare(0, 7, wxT("ed2k://")) == 0) {
450 //aMule doesn't like AICH links without |/| in front of h=
451 if (args
.Find(wxT("|h=")) > -1 && args
.Find(wxT("|/|h=")) == -1) {
452 args
.Replace(wxT("|h="),wxT("|/|h="));
455 request
= new CECPacket(EC_OP_ADD_LINK
);
456 request
->AddTag(CECTag(EC_TAG_STRING
, args
));
457 request_list
.push_back(request
);
460 case CMD_ID_SET_BWLIMIT_UP
:
461 tmp_int
= EC_TAG_CONN_MAX_UL
- EC_TAG_CONN_MAX_DL
;
462 case CMD_ID_SET_BWLIMIT_DOWN
:
463 tmp_int
+= EC_TAG_CONN_MAX_DL
;
465 unsigned long int limit
;
466 if (args
.ToULong(&limit
)) {
467 request
= new CECPacket(EC_OP_SET_PREFERENCES
);
468 CECEmptyTag
prefs(EC_TAG_PREFS_CONNECTIONS
);
469 prefs
.AddTag(CECTag(tmp_int
, (uint16
)limit
));
470 request
->AddTag(prefs
);
471 request_list
.push_back(request
);
473 return CMD_ERR_INVALID_ARG
;
476 case CMD_ID_GET_BWLIMITS
:
477 request
= new CECPacket(EC_OP_GET_PREFERENCES
);
478 request
->AddTag(CECTag(EC_TAG_SELECT_PREFS
, (uint32
)EC_PREFS_CONNECTIONS
));
479 request_list
.push_back(request
);
482 case CMD_ID_STATTREE
:
483 request
= new CECPacket(EC_OP_GET_STATSTREE
);
484 if (!args
.IsEmpty()) {
485 unsigned long int max_versions
;
486 if (args
.ToULong(&max_versions
)) {
487 if (max_versions
< 256) {
488 request
->AddTag(CECTag(EC_TAG_STATTREE_CAPPING
, (uint8
)max_versions
));
491 return CMD_ERR_INVALID_ARG
;
495 return CMD_ERR_INVALID_ARG
;
498 request_list
.push_back(request
);
500 case CMD_ID_SEARCH_GLOBAL
:
501 search_type
= EC_SEARCH_GLOBAL
;
502 case CMD_ID_SEARCH_LOCAL
:
503 if (search_type
!= EC_SEARCH_GLOBAL
){
504 search_type
= EC_SEARCH_LOCAL
;
506 case CMD_ID_SEARCH_KAD
:
507 if (search_type
!= EC_SEARCH_GLOBAL
&& search_type
!= EC_SEARCH_LOCAL
){
508 search_type
= EC_SEARCH_KAD
;
512 wxString search
= args
;
513 wxString type
= wxT("");
514 wxString extention
= wxT("");
519 request
= new CECPacket(EC_OP_SEARCH_START
);
520 request
->AddTag(CEC_Search_Tag (search
, search_type
, type
, extention
, avail
, min_size
, max_size
));
521 request_list
.push_back(request
);
525 printf("No search type defined.\nType 'help search' to get more help.\n");
529 case CMD_ID_SEARCH_RESULTS
:
530 request_list
.push_back(new CECPacket(EC_OP_SEARCH_RESULTS
, EC_DETAIL_FULL
));
533 case CMD_ID_SEARCH_PROGRESS
:
534 request_list
.push_back(new CECPacket(EC_OP_SEARCH_PROGRESS
));
537 case CMD_ID_DOWNLOAD
:
540 unsigned long int id
= 0;
541 if (args
.ToULong(&id
) == true && id
< m_Results_map
.size()) {
543 SearchFile
* file
= m_Results_map
[id
];
544 printf("Download File: %lu %s\n", id
, (const char*)unicode2char(file
->sFileName
));
545 request
= new CECPacket(EC_OP_DOWNLOAD_SEARCH_RESULT
);
546 // get with id the hash and category=0
548 CECTag
hashtag(EC_TAG_PARTFILE
, file
->nHash
);
549 hashtag
.AddTag(CECTag(EC_TAG_PARTFILE_CAT
, category
));
550 request
->AddTag(hashtag
);
551 request_list
.push_back(request
);
553 return CMD_ERR_INVALID_ARG
;
559 return CMD_ERR_PROCESS_CMD
;
562 m_last_cmd_id
= CmdId
;
564 if ( ! request_list
.empty() ) {
565 std::list
<CECPacket
*>::iterator it
= request_list
.begin();
566 while ( it
!= request_list
.end() ) {
567 CECPacket
*curr
= *it
++;
568 const CECPacket
*reply
= SendRecvMsg_v2(curr
);
571 Process_Answer_v2(reply
);
575 request_list
.resize(0);
578 if (CmdId
== CMD_ID_SHUTDOWN
)
585 * Method to show the results in the console
587 void CamulecmdApp::ShowResults(CResultMap results_map
)
589 unsigned int name_max
= 80;
590 unsigned int mb_max
= 5;
591 unsigned int nr_max
= 5;
592 unsigned long int id
= 0;
593 wxString output
, name
, sources
, mb
, kb
;
595 printf("Nr. Filename: Size(MB): Sources: \n");
596 printf("-----------------------------------------------------------------------------------------------------------\n");
598 for( std::map
<unsigned long int,SearchFile
*>::iterator iter
= results_map
.begin(); iter
!= results_map
.end(); iter
++ ) {
600 SearchFile
* file
= (*iter
).second
;
602 output
.Printf(wxT("%i. "), id
);
603 output
= output
.SubString(0, nr_max
).Append(file
->sFileName
).Append(' ', name_max
);
604 mb
.Printf(wxT(" %d"), file
->lFileSize
/1024/1024);
605 kb
.Printf(wxT(".%d"), file
->lFileSize
/1024%1024);
606 output
= output
.SubString(0, nr_max
+ name_max
+ mb_max
- mb
.Length() ).Append(mb
).Append(kb
);
607 printf("%s %ld\n",(const char*)unicode2char(output
), file
->lSourceCount
);
612 // Formats a statistics (sub)tree to text
613 wxString
StatTree2Text(CEC_StatTree_Node_Tag
*tree
, int depth
)
616 return wxEmptyString
;
618 wxString result
= wxString(wxChar(' '), depth
) + tree
->GetDisplayString() + wxT("\n");
619 for (size_t i
= 0; i
< tree
->GetTagCount(); ++i
) {
620 CEC_StatTree_Node_Tag
*tmp
= (CEC_StatTree_Node_Tag
*)tree
->GetTagByIndex(i
);
621 if (tmp
->GetTagName() == EC_TAG_STATTREE_NODE
) {
622 result
+= StatTree2Text(tmp
, depth
+ 1);
629 * Format EC packet into text form for output to console
631 void CamulecmdApp::Process_Answer_v2(const CECPacket
*response
)
634 wxString
msgFailedUnknown(_("Request failed with an unknown error."));
636 switch (response
->GetOpCode()) {
638 s
<< _("Operation was successful.");
641 if (response
->GetTagCount()) {
642 const CECTag
*tag
= response
->GetTagByIndex(0);
644 s
<< CFormat(_("Request failed with the following error: %s")) % wxGetTranslation(tag
->GetStringData());
646 s
<< msgFailedUnknown
;
649 s
<< msgFailedUnknown
;
652 case EC_OP_SET_PREFERENCES
:
654 const CECTag
*tab
= response
->GetTagByNameSafe(EC_TAG_PREFS_SECURITY
);
655 const CECTag
*ipfilterLevel
= tab
->GetTagByName(EC_TAG_IPFILTER_LEVEL
);
657 if (m_last_cmd_id
== CMD_ID_GET_IPFILTER
||
658 m_last_cmd_id
== CMD_ID_GET_IPFILTER_STATE
||
659 m_last_cmd_id
== CMD_ID_GET_IPFILTER_STATE_CLIENTS
) {
660 s
<< wxString::Format(_("IP filtering for clients is %s.\n"),
661 (tab
->GetTagByName(EC_TAG_IPFILTER_CLIENTS
) == NULL
) ? _("OFF") : _("ON"));
663 if (m_last_cmd_id
== CMD_ID_GET_IPFILTER
||
664 m_last_cmd_id
== CMD_ID_GET_IPFILTER_STATE
||
665 m_last_cmd_id
== CMD_ID_GET_IPFILTER_STATE_SERVERS
) {
666 s
<< wxString::Format(_("IP filtering for servers is %s.\n"),
667 (tab
->GetTagByName(EC_TAG_IPFILTER_SERVERS
) == NULL
) ? _("OFF") : _("ON"));
669 if (m_last_cmd_id
== CMD_ID_GET_IPFILTER
||
670 m_last_cmd_id
== CMD_ID_GET_IPFILTER_LEVEL
) {
671 s
<< CFormat(_("Current IPFilter Level is %d.\n")) % ipfilterLevel
->GetInt();
674 tab
= response
->GetTagByNameSafe(EC_TAG_PREFS_CONNECTIONS
);
675 const CECTag
*connMaxUL
= tab
->GetTagByName(EC_TAG_CONN_MAX_UL
);
676 const CECTag
*connMaxDL
= tab
->GetTagByName(EC_TAG_CONN_MAX_DL
);
677 if (connMaxUL
&& connMaxDL
) {
678 s
<< CFormat(_("Bandwidth limits: Up: %u kB/s, Down: %u kB/s.\n"))
679 % connMaxUL
->GetInt() % connMaxDL
->GetInt();
684 for (size_t i
= 0; i
< response
->GetTagCount(); ++i
) {
685 const CECTag
*tag
= response
->GetTagByIndex(i
);
687 s
<< tag
->GetStringData() << wxT("\n");
693 CEC_ConnState_Tag
*connState
= (CEC_ConnState_Tag
*)response
->GetTagByName(EC_TAG_CONNSTATE
);
695 s
<< _("eD2k") << wxT(": ");
696 if (connState
->IsConnectedED2K()) {
697 CECTag
*server
= connState
->GetTagByName(EC_TAG_SERVER
);
698 CECTag
*serverName
= server
? server
->GetTagByName(EC_TAG_SERVER_NAME
) : NULL
;
699 if (server
&& serverName
) {
700 s
<< CFormat(_("Connected to %s %s %s")) %
701 serverName
->GetStringData() %
702 server
->GetIPv4Data().StringIP() %
703 (connState
->HasLowID() ? _("with LowID") : _("with HighID"));
705 } else if (connState
->IsConnectingED2K()) {
706 s
<< _("Now connecting");
708 s
<< _("Not connected");
710 s
<< wxT('\n') << _("Kad") << wxT(": ");
711 if (connState
->IsKadRunning()) {
712 if (connState
->IsConnectedKademlia()) {
713 s
<< _("Connected") << wxT(" (");
714 if (connState
->IsKadFirewalled()) {
715 s
<< _("firewalled");
721 s
<< _("Not connected");
724 s
<< _("Not running");
728 const CECTag
*tmpTag
;
729 if ((tmpTag
= response
->GetTagByName(EC_TAG_STATS_DL_SPEED
)) != 0) {
730 s
<< CFormat(_("\nDownload:\t%s")) % CastItoSpeed(tmpTag
->GetInt());
732 if ((tmpTag
= response
->GetTagByName(EC_TAG_STATS_UL_SPEED
)) != 0) {
733 s
<< CFormat(_("\nUpload:\t%s")) % CastItoSpeed(tmpTag
->GetInt());
735 if ((tmpTag
= response
->GetTagByName(EC_TAG_STATS_UL_QUEUE_LEN
)) != 0) {
736 s
<< CFormat(_("\nClients in queue:\t%d\n")) % tmpTag
->GetInt();
738 if ((tmpTag
= response
->GetTagByName(EC_TAG_STATS_TOTAL_SRC_COUNT
)) != 0) {
739 s
<< CFormat(_("\nTotal sources:\t%d\n")) % tmpTag
->GetInt();
743 case EC_OP_DLOAD_QUEUE
:
744 for (size_t i
= 0; i
< response
->GetTagCount(); ++i
) {
745 CEC_PartFile_Tag
*tag
=
746 (CEC_PartFile_Tag
*)response
->GetTagByIndex(i
);
748 uint64 filesize
, donesize
;
749 filesize
= tag
->SizeFull();
750 donesize
= tag
->SizeDone();
751 s
<< tag
->FileHashString() << wxT(" ") <<
753 wxString::Format(wxT("\n\t [%.1f%%] %4i/%4i "),
754 ((float)donesize
) / ((float)filesize
)*100.0,
755 (int)tag
->SourceCount() - (int)tag
->SourceNotCurrCount(),
756 (int)tag
->SourceCount()) <<
757 ((int)tag
->SourceCountA4AF() ? wxString::Format(wxT("+%2.2i "),(int)tag
->SourceCountA4AF()) : wxString(wxT(" "))) <<
758 ((int)tag
->SourceXferCount() ? wxString::Format(wxT("(%2.2i) - "),(int)tag
->SourceXferCount()) : wxString(wxT(" - "))) <<
759 tag
->GetFileStatusString();
760 s
<< wxT(" - ") << tag
->PartMetName();
761 if (tag
->Prio() < 10) {
762 s
<< wxT(" - ") << PriorityToStr((int)tag
->Prio(), 0);
764 s
<< wxT(" - ") << PriorityToStr((tag
->Prio() - 10), 1);
766 if ( tag
->SourceXferCount() > 0) {
767 s
<< wxT(" - ") + CastItoSpeed(tag
->Speed());
773 case EC_OP_ULOAD_QUEUE
:
774 for (size_t i
= 0; i
< response
->GetTagCount(); ++i
) {
775 const CECTag
*tag
= response
->GetTagByIndex(i
);
776 const CECTag
*clientName
= tag
? tag
->GetTagByName(EC_TAG_CLIENT_NAME
) : NULL
;
777 const CECTag
*partfileName
= tag
? tag
->GetTagByName(EC_TAG_PARTFILE_NAME
) : NULL
;
778 const CECTag
*partfileSizeXfer
= tag
? tag
->GetTagByName(EC_TAG_PARTFILE_SIZE_XFER
) : NULL
;
779 const CECTag
*partfileSpeed
= tag
? tag
->GetTagByName(EC_TAG_CLIENT_UP_SPEED
) : NULL
;
780 if (tag
&& clientName
&& partfileName
&& partfileSizeXfer
&& partfileSpeed
) {
782 CFormat(wxT("%10u ")) % tag
->GetInt() <<
783 clientName
->GetStringData() << wxT(" ") <<
784 partfileName
->GetStringData() << wxT(" ") <<
785 CastItoXBytes(partfileSizeXfer
->GetInt()) << wxT(" ") <<
786 CastItoSpeed(partfileSpeed
->GetInt());
791 for (size_t i
= 0; i
< response
->GetTagCount(); ++i
) {
792 const CECTag
*tag
= response
->GetTagByIndex(i
);
794 s
<< tag
->GetStringData() << wxT("\n");
799 case EC_OP_SERVER_LIST
:
800 for (size_t i
= 0; i
< response
->GetTagCount(); i
++) {
801 const CECTag
*tag
= response
->GetTagByIndex(i
);
802 const CECTag
*serverName
= tag
? tag
->GetTagByName(EC_TAG_SERVER_NAME
) : NULL
;
803 if (tag
&& serverName
) {
804 wxString ip
= tag
->GetIPv4Data().StringIP();
805 ip
.Append(' ', 24 - ip
.Length());
806 s
<< ip
<< serverName
->GetStringData() << wxT("\n");
810 case EC_OP_STATSTREE
:
811 s
<< StatTree2Text((CEC_StatTree_Node_Tag
*)response
->GetTagByName(EC_TAG_STATTREE_NODE
), 0);
814 case EC_OP_SEARCH_RESULTS
:
815 m_Results_map
.clear();
816 s
<< CFormat(_("Number of search results: %i\n")) % response
->GetTagCount();
817 for (size_t i
= 0; i
< response
->GetTagCount(); i
++) {
818 CEC_SearchFile_Tag
*tag
= (CEC_SearchFile_Tag
*)response
->GetTagByIndex(i
);
819 //printf("Tag FileName: %s \n",(const char*)unicode2char(tag->FileName()));
821 m_Results_map
[i
] = new SearchFile(tag
);
822 //const CECTag *tag = response->GetTagByIndex(i);
825 ShowResults(m_Results_map
);
828 case EC_OP_SEARCH_PROGRESS
:
829 s
<< _("TODO - show progress of a search");
830 // gives compilation error!!
831 // const CECTag *tab = response->GetTagByNameSafe(EC_TAG_SEARCH_STATUS);
832 //s << wxString::Format(_("Search progress: %u %% \n"),(const char*)unicode2char(tab->GetStringData()));
835 s
<< wxString::Format(_("Received an unknown reply from the server, OpCode = %#x."), response
->GetOpCode());
840 void CamulecmdApp::OnInitCommandSet()
846 CaMuleExternalConnector::OnInitCommandSet();
848 m_commands
.AddCommand(wxT("Status"), CMD_ID_STATUS
, wxTRANSLATE("Show short status information."),
849 wxTRANSLATE("Show connection status, current up/download speeds, etc.\n"), CMD_PARAM_NEVER
);
851 m_commands
.AddCommand(wxT("Statistics"), CMD_ID_STATTREE
, wxTRANSLATE("Show full statistics tree."),
852 wxTRANSLATE("Optionally, a number in the range 0-255 can be passed as an argument to this\ncommand, which tells how many entries of the client version subtrees should be\nshown. Passing 0 or omitting it means 'unlimited'.\n\nExample: 'statistics 5' will show only the top 5 versions for each client type.\n"));
854 m_commands
.AddCommand(wxT("Shutdown"), CMD_ID_SHUTDOWN
, wxTRANSLATE("Shut down aMule."),
855 wxTRANSLATE("Shut down the remote running core (amule/amuled).\nThis will also shut down the text client, since it is unusable without a\nrunning core.\n"), CMD_PARAM_NEVER
);
857 tmp
= m_commands
.AddCommand(wxT("Reload"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Reloads the given object."), wxEmptyString
, CMD_PARAM_NEVER
);
858 tmp
->AddCommand(wxT("Shared"), CMD_ID_RELOAD_SHARED
, wxTRANSLATE("Reloads shared files list."), wxEmptyString
, CMD_PARAM_NEVER
);
859 tmp
->AddCommand(wxT("IPFilter"), CMD_ID_RELOAD_IPFILTER
, wxTRANSLATE("Reloads IP Filter table from file."), wxEmptyString
, CMD_PARAM_NEVER
);
861 tmp
= m_commands
.AddCommand(wxT("Connect"), CMD_ID_CONNECT
, wxTRANSLATE("Connect to the network."),
862 wxTRANSLATE("This will connect to all networks that are enabled in Preferences.\nYou may also optionally specify a server address in IP:Port form, to connect to\nthat server only. The IP must be a dotted decimal IPv4 address,\nor a resolvable DNS name."), CMD_PARAM_OPTIONAL
);
863 tmp
->AddCommand(wxT("ED2K"), CMD_ID_CONNECT_ED2K
, wxTRANSLATE("Connect to eD2k only."), wxEmptyString
, CMD_PARAM_NEVER
);
864 tmp
->AddCommand(wxT("Kad"), CMD_ID_CONNECT_KAD
, wxTRANSLATE("Connect to Kad only."), wxEmptyString
, CMD_PARAM_NEVER
);
866 tmp
= m_commands
.AddCommand(wxT("Disconnect"), CMD_ID_DISCONNECT
, wxTRANSLATE("Disconnect from the network."),
867 wxTRANSLATE("This will disconnect from all networks that are currently connected.\n"), CMD_PARAM_NEVER
);
868 tmp
->AddCommand(wxT("ED2K"), CMD_ID_DISCONNECT_ED2K
, wxTRANSLATE("Disconnect from eD2k only."), wxEmptyString
, CMD_PARAM_NEVER
);
869 tmp
->AddCommand(wxT("Kad"), CMD_ID_DISCONNECT_KAD
, wxTRANSLATE("Disconnect from Kad only."), wxEmptyString
, CMD_PARAM_NEVER
);
871 m_commands
.AddCommand(wxT("Add"), CMD_ID_ADDLINK
, wxTRANSLATE("Adds an eD2k or magnet link to core."),
872 wxTRANSLATE("The eD2k link to be added can be:\n*) a file link (ed2k://|file|...), it will be added to the download queue,\n*) a server link (ed2k://|server|...), it will be added to the server list,\n*) or a serverlist link, in which case all servers in the list will be added to the\n server list.\n\nThe magnet link must contain the eD2k hash and file length.\n"), CMD_PARAM_ALWAYS
);
874 tmp
= m_commands
.AddCommand(wxT("Set"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Set a preference value."),
875 wxEmptyString
, CMD_PARAM_NEVER
);
877 tmp2
= tmp
->AddCommand(wxT("IPFilter"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Set IPFilter preferences."), wxEmptyString
, CMD_PARAM_NEVER
);
878 tmp2
->AddCommand(wxT("On"), CMD_ID_SET_IPFILTER_ON
, wxTRANSLATE("Turn IP filtering on for both clients and servers."), wxEmptyString
, CMD_PARAM_NEVER
);
879 tmp2
->AddCommand(wxT("Off"), CMD_ID_SET_IPFILTER_OFF
, wxTRANSLATE("Turn IP filtering off for both clients and servers."), wxEmptyString
, CMD_PARAM_NEVER
);
880 tmp3
= tmp2
->AddCommand(wxT("Clients"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Enable/Disable IP filtering for clients."), wxEmptyString
, CMD_PARAM_NEVER
);
881 tmp3
->AddCommand(wxT("On"), CMD_ID_SET_IPFILTER_CLIENTS_ON
, wxTRANSLATE("Turn IP filtering on for clients."), wxEmptyString
, CMD_PARAM_NEVER
);
882 tmp3
->AddCommand(wxT("Off"), CMD_ID_SET_IPFILTER_CLIENTS_OFF
, wxTRANSLATE("Turn IP filtering off for clients."), wxEmptyString
, CMD_PARAM_NEVER
);
883 tmp3
= tmp2
->AddCommand(wxT("Servers"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Enable/Disable IP filtering for servers."), wxEmptyString
, CMD_PARAM_NEVER
);
884 tmp3
->AddCommand(wxT("On"), CMD_ID_SET_IPFILTER_SERVERS_ON
, wxTRANSLATE("Turn IP filtering on for servers."), wxEmptyString
, CMD_PARAM_NEVER
);
885 tmp3
->AddCommand(wxT("Off"), CMD_ID_SET_IPFILTER_SERVERS_OFF
, wxTRANSLATE("Turn IP filtering off for servers."), wxEmptyString
, CMD_PARAM_NEVER
);
886 tmp2
->AddCommand(wxT("Level"), CMD_ID_SET_IPFILTER_LEVEL
, wxTRANSLATE("Select IP filtering level."),
887 wxTRANSLATE("Valid filtering levels are in the range 0-255, and it's default (initial)\nvalue is 127.\n"), CMD_PARAM_ALWAYS
);
889 tmp2
= tmp
->AddCommand(wxT("BwLimit"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Set bandwidth limits."),
890 wxTRANSLATE("The value given to these commands has to be in kilobytes/sec.\n"), CMD_PARAM_NEVER
);
891 tmp2
->AddCommand(wxT("Up"), CMD_ID_SET_BWLIMIT_UP
, wxTRANSLATE("Set upload bandwidth limit."),
892 wxT("The given value must be in kilobytes/sec.\n"), CMD_PARAM_ALWAYS
);
893 tmp2
->AddCommand(wxT("Down"), CMD_ID_SET_BWLIMIT_DOWN
, wxTRANSLATE("Set download bandwidth limit."),
894 wxT("The given value must be in kilobytes/sec.\n"), CMD_PARAM_ALWAYS
);
896 tmp
= m_commands
.AddCommand(wxT("Get"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Get and display a preference value."),
897 wxEmptyString
, CMD_PARAM_NEVER
);
899 tmp2
= tmp
->AddCommand(wxT("IPFilter"), CMD_ID_GET_IPFILTER
, wxTRANSLATE("Get IPFilter preferences."), wxEmptyString
, CMD_PARAM_NEVER
);
900 tmp3
= tmp2
->AddCommand(wxT("State"), CMD_ID_GET_IPFILTER_STATE
, wxTRANSLATE("Get IPFilter state for both clients and servers."), wxEmptyString
, CMD_PARAM_NEVER
);
901 tmp3
->AddCommand(wxT("Clients"), CMD_ID_GET_IPFILTER_STATE_CLIENTS
, wxTRANSLATE("Get IPFilter state for clients only."), wxEmptyString
, CMD_PARAM_NEVER
);
902 tmp3
->AddCommand(wxT("Servers"), CMD_ID_GET_IPFILTER_STATE_SERVERS
, wxTRANSLATE("Get IPFilter state for servers only."), wxEmptyString
, CMD_PARAM_NEVER
);
903 tmp2
->AddCommand(wxT("Level"), CMD_ID_GET_IPFILTER_LEVEL
, wxTRANSLATE("Get IPFilter level."), wxEmptyString
, CMD_PARAM_NEVER
);
905 tmp
->AddCommand(wxT("BwLimits"), CMD_ID_GET_BWLIMITS
, wxTRANSLATE("Get bandwidth limits."), wxEmptyString
, CMD_PARAM_NEVER
);
907 tmp
= m_commands
.AddCommand(wxT("Search"), CMD_ID_SEARCH
, wxTRANSLATE("Makes a search."),
908 wxTRANSLATE("A search type has to be specified by giving the type:\n GLOBAL\n LOCAL\n KAD\nExample: 'search kad file' will execute a kad search for \"file\".\n"), CMD_PARAM_ALWAYS
);
909 tmp
->AddCommand(wxT("global"), CMD_ID_SEARCH_GLOBAL
, wxTRANSLATE("Executes a global search."), wxEmptyString
, CMD_PARAM_ALWAYS
);
910 tmp
->AddCommand(wxT("local"), CMD_ID_SEARCH_LOCAL
, wxTRANSLATE("Executes a local search"), wxEmptyString
, CMD_PARAM_ALWAYS
);
911 tmp
->AddCommand(wxT("kad"), CMD_ID_SEARCH_KAD
, wxTRANSLATE("Executes a kad search"), wxEmptyString
, CMD_PARAM_ALWAYS
);
913 m_commands
.AddCommand(wxT("Results"), CMD_ID_SEARCH_RESULTS
, wxTRANSLATE("Shows the results of the last search."),
914 wxTRANSLATE("Returns the results of the previous search.\n"), CMD_PARAM_NEVER
);
916 m_commands
.AddCommand(wxT("Progress"), CMD_ID_SEARCH_PROGRESS
, wxTRANSLATE("Shows the progress of a search."),
917 wxTRANSLATE("Shows the progress of a search.\n"), CMD_PARAM_NEVER
);
919 m_commands
.AddCommand(wxT("Download"), CMD_ID_DOWNLOAD
, wxTRANSLATE("Start downloading a file"),
920 wxTRANSLATE("The number of a file from the last search has to be given.\nExample: 'download 12' will start to download the file with the number 12 of the previous search.\n"), CMD_PARAM_ALWAYS
);
924 // TODO: These commands below need implementation and/or rewrite!
927 m_commands
.AddCommand(wxT("Pause"), CMD_ID_PAUSE
, wxTRANSLATE("Pause download."),
928 wxEmptyString
, CMD_PARAM_ALWAYS
);
930 m_commands
.AddCommand(wxT("Resume"), CMD_ID_RESUME
, wxTRANSLATE("Resume download."),
931 wxEmptyString
, CMD_PARAM_ALWAYS
);
933 m_commands
.AddCommand(wxT("Cancel"), CMD_ID_CANCEL
, wxTRANSLATE("Cancel download."),
934 wxEmptyString
, CMD_PARAM_ALWAYS
);
936 tmp
= m_commands
.AddCommand(wxT("Priority"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Set download priority."),
937 wxTRANSLATE("Set priority of a download to Low, Normal, High or Auto.\n"), CMD_PARAM_ALWAYS
);
938 tmp
->AddCommand(wxT("Low"), CMD_ID_PRIORITY_LOW
, wxTRANSLATE("Set priority to low."), wxEmptyString
, CMD_PARAM_ALWAYS
);
939 tmp
->AddCommand(wxT("Normal"), CMD_ID_PRIORITY_NORMAL
, wxTRANSLATE("Set priority to normal."), wxEmptyString
, CMD_PARAM_ALWAYS
);
940 tmp
->AddCommand(wxT("High"), CMD_ID_PRIORITY_HIGH
, wxTRANSLATE("Set priority to high."), wxEmptyString
, CMD_PARAM_ALWAYS
);
941 tmp
->AddCommand(wxT("Auto"), CMD_ID_PRIORITY_AUTO
, wxTRANSLATE("Set priority to auto."), wxEmptyString
, CMD_PARAM_ALWAYS
);
943 tmp
= m_commands
.AddCommand(wxT("Show"), CMD_ERR_INCOMPLETE
, wxTRANSLATE("Show queues/lists."),
944 wxTRANSLATE("Shows upload/download queue, server list or shared files list.\n"), CMD_PARAM_ALWAYS
);
945 tmp
->AddCommand(wxT("UL"), CMD_ID_SHOW_UL
, wxTRANSLATE("Show upload queue."), wxEmptyString
, CMD_PARAM_NEVER
);
946 tmp
->AddCommand(wxT("DL"), CMD_ID_SHOW_DL
, wxTRANSLATE("Show download queue."), wxEmptyString
, CMD_PARAM_NEVER
);
947 tmp
->AddCommand(wxT("Log"), CMD_ID_SHOW_LOG
, wxTRANSLATE("Show log."), wxEmptyString
, CMD_PARAM_NEVER
);
948 tmp
->AddCommand(wxT("Servers"), CMD_ID_SHOW_SERVERS
, wxTRANSLATE("Show servers list."), wxEmptyString
, CMD_PARAM_NEVER
);
949 // tmp->AddCommand(wxT("Shared"), CMD_ID_SHOW_SHARED, wxTRANSLATE("Show shared files list."), wxEmptyString, CMD_PARAM_NEVER);
951 m_commands
.AddCommand(wxT("Reset"), CMD_ID_RESET_LOG
, wxTRANSLATE("Reset log."), wxEmptyString
, CMD_PARAM_NEVER
);
954 // Deprecated commands, kept for backwards compatibility only.
957 #define DEPRECATED(OLDCMD, ID, NEWCMD, PARAM) \
958 m_commands.AddCommand(wxT(OLDCMD), CMD_ID_##ID | CMD_DEPRECATED, CFormat(wxTRANSLATE("Deprecated command, use '%s' instead.")) % wxT(NEWCMD), \
959 CFormat(wxTRANSLATE("This is a deprecated command, and may be removed in the future.\nUse '%s' instead.\n")) % wxT(NEWCMD), CMD_PARAM_##PARAM)
961 DEPRECATED("Stats", STATUS
, "Status", NEVER
);
962 DEPRECATED("SetIPFilter", SET_IPFILTER
, "Set IPFilter", OPTIONAL
);
963 DEPRECATED("GetIPLevel", GET_IPFILTER_LEVEL
, "Get IPFilter Level", NEVER
);
964 DEPRECATED("SetIPLevel", SET_IPFILTER_LEVEL
, "Set IPFilter Level", ALWAYS
);
965 DEPRECATED("IPLevel", SET_IPFILTER_LEVEL
, "Get/Set IPFilter Level", OPTIONAL
);
966 DEPRECATED("Servers", SHOW_SERVERS
, "Show Servers", NEVER
);
967 DEPRECATED("GetBWLimits", GET_BWLIMITS
, "Get BwLimits", NEVER
);
968 DEPRECATED("SetUpBWLimit", SET_BWLIMIT_UP
, "Set BwLimit Up", ALWAYS
);
969 DEPRECATED("SetDownBWLimit", SET_BWLIMIT_DOWN
, "Set BwLimit Down", ALWAYS
);
972 int CamulecmdApp::OnRun()
974 ConnectAndRun(wxT("aMulecmd"), wxT(VERSION
));
978 // Dummy functions for EC logging
979 bool ECLogIsEnabled()
984 void DoECLogLine(const wxString
&)
987 // File_checked_for_headers