2 // This file is part of the aMule Project.
4 // Copyright (c) 2004-2008 aMule Team ( admin@amule.org / http://www.amule.org )
6 // Any parts of this program derived from the xMule, lMule or eMule project,
7 // or contributed by third-party developers are copyrighted by their
10 // This program is free software; you can redistribute it and/or modify
11 // it under the terms of the GNU General Public License as published by
12 // the Free Software Foundation; either version 2 of the License, or
13 // (at your option) any later version.
15 // This program is distributed in the hope that it will be useful,
16 // but WITHOUT ANY WARRANTY; without even the implied warranty of
17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 // GNU General Public License for more details.
20 // You should have received a copy of the GNU General Public License
21 // along with this program; if not, write to the Free Software
22 // Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
25 #include "ExternalConnector.h"
28 #include "config.h" // Needed for VERSION and readline detection
31 #include <common/ClientVersion.h>
32 #include <common/Format.h> // Needed for CFormat
33 #include <wx/tokenzr.h> // For wxStringTokenizer
36 #ifdef HAVE_LIBREADLINE
37 #if defined(HAVE_READLINE_READLINE_H)
38 #include <readline/readline.h> // Do_not_auto_remove
39 #elif defined(HAVE_READLINE_H)
40 #include <readline.h> // Do_not_auto_remove
41 #else /* !defined(HAVE_READLINE_H) */
42 extern "C" char *readline (const char*);
43 #endif /* !defined(HAVE_READLINE_H) */
44 #else /* !defined(HAVE_READLINE_READLINE_H) */
46 #endif /* HAVE_LIBREADLINE */
49 #ifdef HAVE_READLINE_HISTORY
50 #if defined(HAVE_READLINE_HISTORY_H)
51 #include <readline/history.h> // Do_not_auto_remove
52 #elif defined(HAVE_HISTORY_H)
53 #include <history.h> // Do_not_auto_remove
54 #else /* !defined(HAVE_HISTORY_H) */
55 extern "C" void add_history (const char*);
56 #endif /* defined(HAVE_READLINE_HISTORY_H) */
59 #endif /* HAVE_READLINE_HISTORY */
62 #include <ec/cpp/ECFileConfig.h> // Needed for CECFileConfig
63 #include <common/MD5Sum.h>
65 #ifdef _MSC_VER // silly warnings about deprecated functions
66 #pragma warning(disable:4996)
69 //-------------------------------------------------------------------
71 CCommandTree::~CCommandTree()
73 for (CmdPos_t it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
76 m_subcommands
.clear();
80 CCommandTree
* CCommandTree::AddCommand(CCommandTree
* command
)
82 command
->m_parent
= this;
83 const wxString
& cmd
= command
->m_command
;
85 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
86 if ((*it
)->m_command
> cmd
) {
90 m_subcommands
.insert(it
, command
);
95 int CCommandTree::FindCommandId(const wxString
& command
, wxString
& args
, wxString
& cmdstr
) const
97 wxString cmd
= command
.BeforeFirst(wxT(' ')).Lower();
98 for (CmdPosConst_t it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
99 if ((*it
)->m_command
.Lower() == cmd
) {
100 args
= command
.AfterFirst(wxT(' ')).Trim(false);
101 return (*it
)->FindCommandId(args
, args
, cmdstr
);
104 cmdstr
= GetFullCommand().Lower();
105 if (m_params
== CMD_PARAM_ALWAYS
&& args
.IsEmpty()) {
106 return CMD_ERR_MUST_HAVE_PARAM
;
107 } else if (m_params
== CMD_PARAM_NEVER
&& !args
.IsEmpty()) {
108 return CMD_ERR_NO_PARAM
;
110 if ((m_cmd_id
>= 0) && (m_cmd_id
& CMD_DEPRECATED
)) {
111 m_app
.Show(wxT('\n') + m_verbose
+ wxT('\n'));
112 return m_cmd_id
& ~CMD_DEPRECATED
;
120 wxString
CCommandTree::GetFullCommand() const
122 wxString cmd
= m_command
;
124 const CCommandTree
*parent
= m_parent
;
125 while (parent
&& parent
->m_parent
) {
126 cmd
= parent
->m_command
+ wxT(" ") + cmd
;
127 parent
= parent
->m_parent
;
134 void CCommandTree::PrintHelpFor(const wxString
& command
) const
136 wxString cmd
= command
.BeforeFirst(wxT(' ')).Lower();
137 if (!cmd
.IsEmpty()) {
138 for (CmdPosConst_t it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
139 if ((*it
)->m_command
.Lower() == cmd
) {
140 (*it
)->PrintHelpFor(command
.AfterFirst(wxT(' ')).Trim(false));
145 m_app
.Show(CFormat(_("Unknown extension '%s' for the '%s' command.\n")) % command
% GetFullCommand());
147 m_app
.Show(CFormat(_("Unknown command '%s'.\n")) % command
);
150 wxString fullcmd
= GetFullCommand();
151 if (!fullcmd
.IsEmpty()) {
152 m_app
.Show(fullcmd
.Upper() + wxT(": ") + wxGetTranslation(m_short
) + wxT("\n"));
153 if (!m_verbose
.IsEmpty()) {
154 m_app
.Show(wxT("\n"));
155 m_app
.Show(wxGetTranslation(m_verbose
));
158 if (m_params
== CMD_PARAM_NEVER
) {
159 m_app
.Show(_("\nThis command cannot have an argument.\n"));
160 } else if (m_params
== CMD_PARAM_ALWAYS
) {
161 m_app
.Show(_("\nThis command must have an argument.\n"));
163 if (m_cmd_id
== CMD_ERR_INCOMPLETE
) {
164 m_app
.Show(_("\nThis command is incomplete, you must use one of the extensions below.\n"));
166 if (!m_subcommands
.empty()) {
170 m_app
.Show(_("\nAvailable extensions:\n"));
172 m_app
.Show(_("Available commands:\n"));
174 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
175 if (!((*it
)->m_cmd_id
>= 0 && (*it
)->m_cmd_id
& CMD_DEPRECATED
) || m_parent
) {
176 int len
= (*it
)->m_command
.Length();
183 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
184 if (!((*it
)->m_cmd_id
>= 0 && (*it
)->m_cmd_id
& CMD_DEPRECATED
) || m_parent
) {
185 m_app
.Show((*it
)->m_command
+ wxString(wxT(' '), maxlen
- (*it
)->m_command
.Length()) + wxGetTranslation((*it
)->m_short
) + wxT("\n"));
189 m_app
.Show(CFormat(_("\nAll commands are case insensitive.\nType '%s <command>' to get detailed info on <command>.\n")) % wxT("help"));
193 m_app
.Show(wxT("\n"));
196 //-------------------------------------------------------------------
198 CaMuleExternalConnector::CaMuleExternalConnector()
199 : m_configFile(NULL
),
203 m_interactive(false),
207 m_NeedsConfigSave(false),
209 m_strFullVersion(NULL
),
210 m_strOSDescription(NULL
)
212 SetAppName(wxT("aMule")); // Do not change!
214 // Find out Application Name
223 CaMuleExternalConnector::~CaMuleExternalConnector()
227 free(m_strFullVersion
);
228 free(m_strOSDescription
);
231 void CaMuleExternalConnector::OnInitCommandSet()
233 m_commands
.AddCommand(wxT("Quit"), CMD_ID_QUIT
, wxTRANSLATE("Exits from the application."), wxEmptyString
);
234 m_commands
.AddCommand(wxT("Exit"), CMD_ID_QUIT
, wxTRANSLATE("Exits from the application."), wxEmptyString
);
235 m_commands
.AddCommand(wxT("Help"), CMD_ID_HELP
, wxTRANSLATE("Show help."),
237 Do not translate the word 'help', it is a command to the program! */
238 wxTRANSLATE("To get help on a command, type 'help <command>'.\nTo get the full command list type 'help'.\n"));
241 void CaMuleExternalConnector::Show(const wxString
&s
)
244 printf("%s", (const char *)unicode2char(s
));
251 void CaMuleExternalConnector::ShowGreet()
253 wxString text
= GetGreetingTitle();
254 int len
= text
.Length();
255 Show(wxT('\n') + wxString(wxT('-'), 22 + len
) + wxT('\n'));
256 Show(wxT('|') + wxString(wxT(' '), 10) + text
+ wxString(wxT(' '), 10) + wxT('|') + wxT('\n'));
257 Show(wxString(wxT('-'), 22 + len
) + wxT('\n'));
258 // Do not merge the line below, or translators could translate "Help"
259 Show(CFormat(_("\nUse '%s' for command list\n\n")) % wxT("Help"));
262 void CaMuleExternalConnector::Process_Answer(const wxString
& answer
)
264 wxStringTokenizer
tokens(answer
, wxT("\n"));
265 while ( tokens
.HasMoreTokens() ) {
266 Show(wxT(" > ") + tokens
.GetNextToken() + wxT("\n"));
270 bool CaMuleExternalConnector::Parse_Command(const wxString
& buffer
)
273 wxStringTokenizer
tokens(buffer
);
274 while (tokens
.HasMoreTokens()) {
275 cmd
+= tokens
.GetNextToken() + wxT(' ');
279 int cmd_ID
= GetIDFromString(cmd
);
281 cmd_ID
= ProcessCommand(cmd_ID
);
286 m_commands
.PrintHelpFor(GetCmdArgs());
289 error
= _("Syntax error!");
291 case CMD_ERR_PROCESS_CMD
:
292 Show(_("Error processing command - should never happen! Report bug, please\n"));
294 case CMD_ERR_NO_PARAM
:
295 error
= _("This command should not have any parameters.");
297 case CMD_ERR_MUST_HAVE_PARAM
:
298 error
= _("This command must have a parameter.");
300 case CMD_ERR_INVALID_ARG
:
301 error
= _("Invalid argument.");
303 case CMD_ERR_INCOMPLETE
:
304 error
= _("This is an incomplete command.");
307 if (!error
.IsEmpty()) {
308 Show(error
+ wxT('\n'));
309 wxString
helpStr(wxT("help"));
310 if (!GetLastCmdStr().IsEmpty()) {
311 helpStr
<< wxT(' ') << GetLastCmdStr();
313 Show(CFormat(_("Type '%s' to get more help.\n")) % helpStr
);
315 return cmd_ID
== CMD_ID_QUIT
;
318 void CaMuleExternalConnector::GetCommand(const wxString
&prompt
, char* buffer
, size_t buffer_size
)
320 #ifdef HAVE_LIBREADLINE
321 char *text
= readline(unicode2char(prompt
+ wxT("$ ")));
323 (m_InputLine
== 0 || strcmp(text
,m_InputLine
) != 0)) {
330 Show(prompt
+ wxT("$ "));
332 fgets(buffer
, buffer_size
, stdin
);
333 const char *text
= buffer
;
334 #endif /* HAVE_LIBREADLINE */
336 size_t len
= strlen(text
);
337 if (len
> buffer_size
- 2) {
338 len
= buffer_size
- 2;
340 strncpy(buffer
, text
, len
);
344 strncpy(buffer
, "quit", buffer_size
);
348 void CaMuleExternalConnector::TextShell(const wxString
&prompt
)
353 bool The_End
= false;
355 GetCommand(prompt
, buffer
, 256);
356 buf
= char2unicode(buffer
);
357 The_End
= Parse_Command(buf
);
358 } while ((!The_End
) && (m_ECClient
->IsSocketConnected()));
361 void CaMuleExternalConnector::ConnectAndRun(const wxString
&ProgName
, const wxString
& ProgVersion
)
363 if (m_NeedsConfigSave
) {
369 Show(CFormat(_("This is %s %s %s\n")) % wxString::FromAscii(m_appname
) % wxT(VERSION
) % wxT(SVNDATE
));
371 Show(CFormat(_("This is %s %s\n")) % wxString::FromAscii(m_appname
) % wxT(VERSION
));
374 // HostName, Port and Password
375 if ( m_password
.IsEmpty() ) {
378 pass_plain
= char2unicode(getpass("Enter password for mule connection: "));
380 //#warning This way, pass enter is not hidden on windows. Bad thing.
383 printf("Enter password for mule connection: \n");
385 fgets(temp_str
, 512, stdin
);
386 temp_str
[strlen(temp_str
)-1] = '\0';
387 pass_plain
= char2unicode(temp_str
);
389 wxCHECK2(m_password
.Decode(MD5Sum(pass_plain
).GetHash()), /* Do nothing. */ );
390 // MD5 hash for an empty string, according to rfc1321.
391 if (m_password
.Encode() == wxT("D41D8CD98F00B204E9800998ECF8427E")) {
395 // Clear plain-text password
396 pass_plain
= wxT("01234567890123456789");
399 if (!m_password
.IsEmpty()) {
402 Show(_("\nCreating client...\n"));
403 m_ECClient
= new CRemoteConnect(NULL
);
405 // ConnectToCore is blocking since m_ECClient was initialized with NULL
406 if (!m_ECClient
->ConnectToCore(m_host
, m_port
, wxT("foobar"), m_password
.Encode(), ProgName
, ProgVersion
)) {
407 // no connection => close gracefully
408 if (!m_ECClient
->GetServerReply().IsEmpty()) {
409 Show(CFormat(wxT("%s\n")) % m_ECClient
->GetServerReply());
411 Show(CFormat(_("Connection Failed. Unable to connect to %s:%d\n")) % m_host
% m_port
);
413 // Authenticate ourselves
414 // ConnectToCore() already authenticated for us.
415 //m_ECClient->ConnectionEstablished();
416 Show(m_ECClient
->GetServerReply()+wxT("\n"));
417 if (m_ECClient
->IsSocketConnected()) {
425 Show(CFormat(_("\nOk, exiting %s...\n")) % ProgName
);
429 m_ECClient
->DestroySocket();
431 Show(_("Cannot connect with an empty password.\nYou must specify a password either in config file\nor on command-line, or enter one when asked.\n\nExiting...\n"));
435 void CaMuleExternalConnector::OnInitCmdLine(wxCmdLineParser
& parser
)
437 parser
.AddSwitch(wxEmptyString
, wxT("help"),
438 _("Show this help text."),
439 wxCMD_LINE_PARAM_OPTIONAL
);
440 parser
.AddOption(wxT("h"), wxT("host"),
441 _("Host where aMule is running. (default: localhost)"),
442 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
443 parser
.AddOption(wxT("p"), wxT("port"),
444 _("aMule's port for External Connection. (default: 4712)"),
445 wxCMD_LINE_VAL_NUMBER
, wxCMD_LINE_PARAM_OPTIONAL
);
446 parser
.AddOption(wxT("P"), wxT("password"),
447 _("External Connection password."),
448 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
449 parser
.AddOption(wxT("f"), wxT("config-file"),
450 _("Read configuration from file."),
451 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
452 parser
.AddSwitch(wxT("q"), wxT("quiet"),
453 _("Do not print any output to stdout."),
454 wxCMD_LINE_PARAM_OPTIONAL
);
455 parser
.AddSwitch(wxT("v"), wxT("verbose"),
456 _("Be verbose - show also debug messages."),
457 wxCMD_LINE_PARAM_OPTIONAL
);
458 parser
.AddOption(wxT("l"), wxT("locale"),
459 _("Sets program locale (language)."),
460 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
461 parser
.AddSwitch(wxT("w"), wxT("write-config"),
462 _("Write command line options to config file."),
463 wxCMD_LINE_PARAM_OPTIONAL
);
464 parser
.AddOption(wxEmptyString
, wxT("create-config-from"),
465 _("Creates config file based on aMule's config file."),
466 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
467 parser
.AddSwitch(wxEmptyString
, wxT("version"),
468 _("Print program version."),
469 wxCMD_LINE_PARAM_OPTIONAL
);
472 bool CaMuleExternalConnector::OnCmdLineParsed(wxCmdLineParser
& parser
)
474 if (parser
.Found(wxT("version"))) {
475 printf("%s %s\n", m_appname
, (const char *)unicode2char(GetMuleVersion()));
479 if (!parser
.Found(wxT("config-file"), &m_configFileName
)) {
480 m_configFileName
= GetConfigDir() + wxT("remote.conf");
483 wxString aMuleConfigFile
;
484 if (parser
.Found(wxT("create-config-from"), &aMuleConfigFile
)) {
485 aMuleConfigFile
= FinalizeFilename(aMuleConfigFile
);
486 if (!::wxFileExists(aMuleConfigFile
)) {
487 fprintf(stderr
, "%s\n", (const char *)unicode2char(wxT("FATAL ERROR: File does not exist: ") + aMuleConfigFile
));
490 CECFileConfig
aMuleConfig(aMuleConfigFile
);
491 LoadAmuleConfig(aMuleConfig
);
493 m_configFile
->Flush();
499 if ( !parser
.Found(wxT("host"), &m_host
) ) {
500 if ( m_host
.IsEmpty() ) {
501 m_host
= wxT("localhost");
506 if (!parser
.Found(wxT("port"), &port
)) {
515 if (parser
.Found(wxT("password"), &pass_plain
)) {
516 if (!pass_plain
.IsEmpty()) {
517 m_password
.Decode(MD5Sum(pass_plain
).GetHash());
523 if (parser
.Found(wxT("write-config"))) {
524 m_NeedsConfigSave
= true;
527 parser
.Found(wxT("locale"), &m_language
);
529 if (parser
.Found(wxT("help"))) {
534 m_KeepQuiet
= parser
.Found(wxT("quiet"));
535 m_Verbose
= parser
.Found(wxT("verbose"));
540 void CaMuleExternalConnector::LoadAmuleConfig(CECFileConfig
& cfg
)
542 m_host
= wxT("localhost");
543 m_port
= cfg
.Read(wxT("/ExternalConnect/ECPort"), -1l);
544 cfg
.ReadHash(wxT("/ExternalConnect/ECPassword"), &m_password
);
545 m_language
= cfg
.Read(wxT("/eMule/Language"), wxEmptyString
);
549 void CaMuleExternalConnector::LoadConfigFile()
552 m_configFile
= new CECFileConfig(m_configFileName
);
555 m_language
= m_configFile
->Read(wxT("/Locale"), wxEmptyString
);
556 m_host
= m_configFile
->Read(wxT("/EC/Host"), wxEmptyString
);
557 m_port
= m_configFile
->Read(wxT("/EC/Port"), -1l);
558 m_configFile
->ReadHash(wxT("/EC/Password"), &m_password
);
562 void CaMuleExternalConnector::SaveConfigFile()
564 if (!wxFileName::DirExists(GetConfigDir())) {
565 wxFileName::Mkdir(GetConfigDir());
568 m_configFile
= new CECFileConfig(m_configFileName
);
571 m_configFile
->Write(wxT("/Locale"), m_language
);
572 m_configFile
->Write(wxT("/EC/Host"), m_host
);
573 m_configFile
->Write(wxT("/EC/Port"), m_port
);
574 m_configFile
->WriteHash(wxT("/EC/Password"), m_password
);
578 bool CaMuleExternalConnector::OnInit()
581 // catch fatal exceptions
582 wxHandleFatalExceptions(true);
585 m_strFullVersion
= strdup((const char *)unicode2char(GetMuleVersion()));
586 m_strOSDescription
= strdup((const char *)unicode2char(wxGetOsDescription()));
588 // Handle uncaught exceptions
589 InstallMuleExceptionHandler();
591 bool retval
= wxApp::OnInit();
593 InitCustomLanguages();
594 SetLocale(m_language
);
598 wxString
CaMuleExternalConnector::SetLocale(const wxString
& language
)
600 if (!language
.IsEmpty()) {
601 m_language
= language
;
605 m_locale
= new wxLocale
;
606 InitLocale(*m_locale
, StrLang2wx(language
));
609 return m_locale
== NULL
? wxString() : m_locale
->GetCanonicalName();
612 #if !wxUSE_GUI && defined(__WXMAC__)
614 #include <wx/apptrait.h> // Do_not_auto_remove
615 #include <wx/stdpaths.h> // Do_not_auto_remove
617 class CaMuleExternalConnectorTraits
: public wxConsoleAppTraits
620 virtual wxStandardPathsBase
& GetStandardPaths()
626 static wxStandardPathsCF s_stdPaths
;
629 wxStandardPathsCF
CaMuleExternalConnectorTraits::s_stdPaths
;
631 wxAppTraits
* CaMuleExternalConnector::CreateTraits()
633 return new CaMuleExternalConnectorTraits
;
638 // Gracefully handle fatal exceptions and print backtrace if possible
639 void CaMuleExternalConnector::OnFatalException()
641 /* Print the backtrace */
642 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
643 fprintf(stderr
, "A fatal error has occurred and %s has crashed.\n", m_appname
);
644 fprintf(stderr
, "Please assist us in fixing this problem by posting the backtrace below in our\n");
645 fprintf(stderr
, "'aMule Crashes' forum and include as much information as possible regarding the\n");
646 fprintf(stderr
, "circumstances of this crash. The forum is located here:\n");
647 fprintf(stderr
, " http://forum.amule.org/index.php?board=67.0\n");
648 fprintf(stderr
, "If possible, please try to generate a real backtrace of this crash:\n");
649 fprintf(stderr
, " http://www.amule.org/wiki/index.php/Backtraces\n\n");
650 fprintf(stderr
, "----------------------------=| BACKTRACE FOLLOWS: |=----------------------------\n");
651 fprintf(stderr
, "Current version is: %s %s\n", m_appname
, m_strFullVersion
);
652 fprintf(stderr
, "Running on: %s\n\n", m_strOSDescription
);
654 print_backtrace(1); // 1 == skip this function.
656 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
660 void CaMuleExternalConnector::OnAssertFailure(const wxChar
*file
, int line
, const wxChar
*func
, const wxChar
*cond
, const wxChar
*msg
)
662 #if !defined wxUSE_STACKWALKER || !wxUSE_STACKWALKER
663 wxString errmsg
= CFormat( wxT("%s:%s:%d: Assertion '%s' failed. %s") ) % file
% func
% line
% cond
% ( msg
? msg
: wxT("") );
665 fprintf(stderr
, "Assertion failed: %s\n", (const char*)unicode2char(errmsg
));
667 // Skip the function-calls directly related to the assert call.
668 fprintf(stderr
, "\nBacktrace follows:\n");
670 fprintf(stderr
, "\n");
672 wxApp::OnAssertFailure(file
, line
, func
, cond
, msg
);
676 // File_checked_for_headers