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 DeleteContents(m_subcommands
);
77 CCommandTree
* CCommandTree::AddCommand(CCommandTree
* command
)
79 command
->m_parent
= this;
80 const wxString
& cmd
= command
->m_command
;
82 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
83 if ((*it
)->m_command
> cmd
) {
87 m_subcommands
.insert(it
, command
);
92 int CCommandTree::FindCommandId(const wxString
& command
, wxString
& args
, wxString
& cmdstr
) const
94 wxString cmd
= command
.BeforeFirst(wxT(' ')).Lower();
95 for (CmdPosConst_t it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
96 if ((*it
)->m_command
.Lower() == cmd
) {
97 args
= command
.AfterFirst(wxT(' ')).Trim(false);
98 return (*it
)->FindCommandId(args
, args
, cmdstr
);
101 cmdstr
= GetFullCommand().Lower();
102 if (m_params
== CMD_PARAM_ALWAYS
&& args
.IsEmpty()) {
103 return CMD_ERR_MUST_HAVE_PARAM
;
104 } else if (m_params
== CMD_PARAM_NEVER
&& !args
.IsEmpty()) {
105 return CMD_ERR_NO_PARAM
;
107 if ((m_cmd_id
>= 0) && (m_cmd_id
& CMD_DEPRECATED
)) {
108 m_app
.Show(wxT('\n') + m_verbose
+ wxT('\n'));
109 return m_cmd_id
& ~CMD_DEPRECATED
;
117 wxString
CCommandTree::GetFullCommand() const
119 wxString cmd
= m_command
;
121 const CCommandTree
*parent
= m_parent
;
122 while (parent
&& parent
->m_parent
) {
123 cmd
= parent
->m_command
+ wxT(" ") + cmd
;
124 parent
= parent
->m_parent
;
131 void CCommandTree::PrintHelpFor(const wxString
& command
) const
133 wxString cmd
= command
.BeforeFirst(wxT(' ')).Lower();
134 if (!cmd
.IsEmpty()) {
135 for (CmdPosConst_t it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
136 if ((*it
)->m_command
.Lower() == cmd
) {
137 (*it
)->PrintHelpFor(command
.AfterFirst(wxT(' ')).Trim(false));
142 m_app
.Show(CFormat(_("Unknown extension '%s' for the '%s' command.\n")) % command
% GetFullCommand());
144 m_app
.Show(CFormat(_("Unknown command '%s'.\n")) % command
);
147 wxString fullcmd
= GetFullCommand();
148 if (!fullcmd
.IsEmpty()) {
149 m_app
.Show(fullcmd
.Upper() + wxT(": ") + wxGetTranslation(m_short
) + wxT("\n"));
150 if (!m_verbose
.IsEmpty()) {
151 m_app
.Show(wxT("\n"));
152 m_app
.Show(wxGetTranslation(m_verbose
));
155 if (m_params
== CMD_PARAM_NEVER
) {
156 m_app
.Show(_("\nThis command cannot have an argument.\n"));
157 } else if (m_params
== CMD_PARAM_ALWAYS
) {
158 m_app
.Show(_("\nThis command must have an argument.\n"));
160 if (m_cmd_id
== CMD_ERR_INCOMPLETE
) {
161 m_app
.Show(_("\nThis command is incomplete, you must use one of the extensions below.\n"));
163 if (!m_subcommands
.empty()) {
167 m_app
.Show(_("\nAvailable extensions:\n"));
169 m_app
.Show(_("Available commands:\n"));
171 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
172 if (!((*it
)->m_cmd_id
>= 0 && (*it
)->m_cmd_id
& CMD_DEPRECATED
) || m_parent
) {
173 int len
= (*it
)->m_command
.Length();
180 for (it
= m_subcommands
.begin(); it
!= m_subcommands
.end(); ++it
) {
181 if (!((*it
)->m_cmd_id
>= 0 && (*it
)->m_cmd_id
& CMD_DEPRECATED
) || m_parent
) {
182 m_app
.Show((*it
)->m_command
+ wxString(wxT(' '), maxlen
- (*it
)->m_command
.Length()) + wxGetTranslation((*it
)->m_short
) + wxT("\n"));
186 m_app
.Show(CFormat(_("\nAll commands are case insensitive.\nType '%s <command>' to get detailed info on <command>.\n")) % wxT("help"));
190 m_app
.Show(wxT("\n"));
193 //-------------------------------------------------------------------
195 CaMuleExternalConnector::CaMuleExternalConnector()
196 : m_configFile(NULL
),
200 m_interactive(false),
204 m_NeedsConfigSave(false),
206 m_strFullVersion(NULL
),
207 m_strOSDescription(NULL
)
209 SetAppName(wxT("aMule")); // Do not change!
212 CaMuleExternalConnector::~CaMuleExternalConnector()
216 free(m_strFullVersion
);
217 free(m_strOSDescription
);
220 void CaMuleExternalConnector::OnInitCommandSet()
222 m_commands
.AddCommand(wxT("Quit"), CMD_ID_QUIT
, wxTRANSLATE("Exits from the application."), wxEmptyString
);
223 m_commands
.AddCommand(wxT("Exit"), CMD_ID_QUIT
, wxTRANSLATE("Exits from the application."), wxEmptyString
);
224 m_commands
.AddCommand(wxT("Help"), CMD_ID_HELP
, wxTRANSLATE("Show help."),
226 Do not translate the word 'help', it is a command to the program! */
227 wxTRANSLATE("To get help on a command, type 'help <command>'.\nTo get the full command list type 'help'.\n"));
230 void CaMuleExternalConnector::Show(const wxString
&s
)
233 printf("%s", (const char *)unicode2char(s
));
240 void CaMuleExternalConnector::ShowGreet()
242 wxString text
= GetGreetingTitle();
243 int len
= text
.Length();
244 Show(wxT('\n') + wxString(wxT('-'), 22 + len
) + wxT('\n'));
245 Show(wxT('|') + wxString(wxT(' '), 10) + text
+ wxString(wxT(' '), 10) + wxT('|') + wxT('\n'));
246 Show(wxString(wxT('-'), 22 + len
) + wxT('\n'));
247 // Do not merge the line below, or translators could translate "Help"
248 Show(CFormat(_("\nUse '%s' for command list\n\n")) % wxT("Help"));
251 void CaMuleExternalConnector::Process_Answer(const wxString
& answer
)
253 wxStringTokenizer
tokens(answer
, wxT("\n"));
254 while ( tokens
.HasMoreTokens() ) {
255 Show(wxT(" > ") + tokens
.GetNextToken() + wxT("\n"));
259 bool CaMuleExternalConnector::Parse_Command(const wxString
& buffer
)
262 wxStringTokenizer
tokens(buffer
);
263 while (tokens
.HasMoreTokens()) {
264 cmd
+= tokens
.GetNextToken() + wxT(' ');
268 int cmd_ID
= GetIDFromString(cmd
);
270 cmd_ID
= ProcessCommand(cmd_ID
);
275 m_commands
.PrintHelpFor(GetCmdArgs());
278 error
= _("Syntax error!");
280 case CMD_ERR_PROCESS_CMD
:
281 Show(_("Error processing command - should never happen! Report bug, please\n"));
283 case CMD_ERR_NO_PARAM
:
284 error
= _("This command should not have any parameters.");
286 case CMD_ERR_MUST_HAVE_PARAM
:
287 error
= _("This command must have a parameter.");
289 case CMD_ERR_INVALID_ARG
:
290 error
= _("Invalid argument.");
292 case CMD_ERR_INCOMPLETE
:
293 error
= _("This is an incomplete command.");
296 if (!error
.IsEmpty()) {
297 Show(error
+ wxT('\n'));
298 wxString
helpStr(wxT("help"));
299 if (!GetLastCmdStr().IsEmpty()) {
300 helpStr
<< wxT(' ') << GetLastCmdStr();
302 Show(CFormat(_("Type '%s' to get more help.\n")) % helpStr
);
304 return cmd_ID
== CMD_ID_QUIT
;
307 void CaMuleExternalConnector::GetCommand(const wxString
&prompt
, char* buffer
, size_t buffer_size
)
309 #ifdef HAVE_LIBREADLINE
310 char *text
= readline(unicode2char(prompt
+ wxT("$ ")));
312 (m_InputLine
== 0 || strcmp(text
,m_InputLine
) != 0)) {
319 Show(prompt
+ wxT("$ "));
321 if (fgets(buffer
, buffer_size
, stdin
)){} // prevent GCC warning
322 const char *text
= buffer
;
323 #endif /* HAVE_LIBREADLINE */
325 size_t len
= strlen(text
);
326 if (len
> buffer_size
- 2) {
327 len
= buffer_size
- 2;
329 strncpy(buffer
, text
, len
);
333 strncpy(buffer
, "quit", buffer_size
);
337 void CaMuleExternalConnector::TextShell(const wxString
&prompt
)
342 bool The_End
= false;
344 GetCommand(prompt
, buffer
, 256);
345 buf
= char2unicode(buffer
);
346 The_End
= Parse_Command(buf
);
347 } while ((!The_End
) && (m_ECClient
->IsSocketConnected()));
350 void CaMuleExternalConnector::ConnectAndRun(const wxString
&ProgName
, const wxString
& ProgVersion
)
352 if (m_NeedsConfigSave
) {
358 Show(CFormat(_("This is %s %s %s\n")) % wxString::FromAscii(m_appname
) % wxT(VERSION
) % wxT(SVNDATE
));
360 Show(CFormat(_("This is %s %s\n")) % wxString::FromAscii(m_appname
) % wxT(VERSION
));
363 // HostName, Port and Password
364 if ( m_password
.IsEmpty() ) {
367 pass_plain
= char2unicode(getpass("Enter password for mule connection: "));
369 //#warning This way, pass enter is not hidden on windows. Bad thing.
372 printf("Enter password for mule connection: \n");
374 fgets(temp_str
, 512, stdin
);
375 temp_str
[strlen(temp_str
)-1] = '\0';
376 pass_plain
= char2unicode(temp_str
);
378 wxCHECK2(m_password
.Decode(MD5Sum(pass_plain
).GetHash()), /* Do nothing. */ );
379 // MD5 hash for an empty string, according to rfc1321.
380 if (m_password
.Encode() == wxT("D41D8CD98F00B204E9800998ECF8427E")) {
384 // Clear plain-text password
385 pass_plain
= wxT("01234567890123456789");
388 if (!m_password
.IsEmpty()) {
391 Show(_("\nCreating client...\n"));
392 m_ECClient
= new CRemoteConnect(NULL
);
393 m_ECClient
->SetCapabilities(m_ZLIB
, true, false); // ZLIB, UTF8 numbers, notification
395 // ConnectToCore is blocking since m_ECClient was initialized with NULL
396 if (!m_ECClient
->ConnectToCore(m_host
, m_port
, wxT("foobar"), m_password
.Encode(), ProgName
, ProgVersion
)) {
397 // no connection => close gracefully
398 if (!m_ECClient
->GetServerReply().IsEmpty()) {
399 Show(CFormat(wxT("%s\n")) % m_ECClient
->GetServerReply());
401 Show(CFormat(_("Connection Failed. Unable to connect to %s:%d\n")) % m_host
% m_port
);
403 // Authenticate ourselves
404 // ConnectToCore() already authenticated for us.
405 //m_ECClient->ConnectionEstablished();
406 Show(m_ECClient
->GetServerReply()+wxT("\n"));
407 if (m_ECClient
->IsSocketConnected()) {
415 Show(CFormat(_("\nOk, exiting %s...\n")) % ProgName
);
419 m_ECClient
->DestroySocket();
421 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"));
425 void CaMuleExternalConnector::OnInitCmdLine(wxCmdLineParser
& parser
, const char* appname
)
429 parser
.AddSwitch(wxEmptyString
, wxT("help"),
430 _("Show this help text."),
431 wxCMD_LINE_PARAM_OPTIONAL
);
432 parser
.AddOption(wxT("h"), wxT("host"),
433 _("Host where aMule is running. (default: localhost)"),
434 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
435 parser
.AddOption(wxT("p"), wxT("port"),
436 _("aMule's port for External Connection. (default: 4712)"),
437 wxCMD_LINE_VAL_NUMBER
, wxCMD_LINE_PARAM_OPTIONAL
);
438 parser
.AddOption(wxT("P"), wxT("password"),
439 _("External Connection password."),
440 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
441 parser
.AddOption(wxT("f"), wxT("config-file"),
442 _("Read configuration from file."),
443 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
444 parser
.AddSwitch(wxT("q"), wxT("quiet"),
445 _("Do not print any output to stdout."),
446 wxCMD_LINE_PARAM_OPTIONAL
);
447 parser
.AddSwitch(wxT("v"), wxT("verbose"),
448 _("Be verbose - show also debug messages."),
449 wxCMD_LINE_PARAM_OPTIONAL
);
450 parser
.AddOption(wxT("l"), wxT("locale"),
451 _("Sets program locale (language)."),
452 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
453 parser
.AddSwitch(wxT("w"), wxT("write-config"),
454 _("Write command line options to config file."),
455 wxCMD_LINE_PARAM_OPTIONAL
);
456 parser
.AddOption(wxEmptyString
, wxT("create-config-from"),
457 _("Creates config file based on aMule's config file."),
458 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
459 parser
.AddSwitch(wxEmptyString
, wxT("version"),
460 _("Print program version."),
461 wxCMD_LINE_PARAM_OPTIONAL
);
464 bool CaMuleExternalConnector::OnCmdLineParsed(wxCmdLineParser
& parser
)
466 if (parser
.Found(wxT("version"))) {
467 printf("%s %s\n", m_appname
, (const char *)unicode2char(GetMuleVersion()));
471 if (!parser
.Found(wxT("config-file"), &m_configFileName
)) {
472 m_configFileName
= GetConfigDir() + wxT("remote.conf");
475 wxString aMuleConfigFile
;
476 if (parser
.Found(wxT("create-config-from"), &aMuleConfigFile
)) {
477 aMuleConfigFile
= FinalizeFilename(aMuleConfigFile
);
478 if (!::wxFileExists(aMuleConfigFile
)) {
479 fprintf(stderr
, "%s\n", (const char *)unicode2char(wxT("FATAL ERROR: File does not exist: ") + aMuleConfigFile
));
482 CECFileConfig
aMuleConfig(aMuleConfigFile
);
483 LoadAmuleConfig(aMuleConfig
);
485 m_configFile
->Flush();
491 if ( !parser
.Found(wxT("host"), &m_host
) ) {
492 if ( m_host
.IsEmpty() ) {
493 m_host
= wxT("localhost");
498 if (parser
.Found(wxT("port"), &port
)) {
503 if (parser
.Found(wxT("password"), &pass_plain
)) {
504 if (!pass_plain
.IsEmpty()) {
505 m_password
.Decode(MD5Sum(pass_plain
).GetHash());
511 if (parser
.Found(wxT("write-config"))) {
512 m_NeedsConfigSave
= true;
515 parser
.Found(wxT("locale"), &m_language
);
517 if (parser
.Found(wxT("help"))) {
522 m_KeepQuiet
= parser
.Found(wxT("quiet"));
523 m_Verbose
= parser
.Found(wxT("verbose"));
528 void CaMuleExternalConnector::LoadAmuleConfig(CECFileConfig
& cfg
)
530 m_host
= wxT("localhost");
531 m_port
= cfg
.Read(wxT("/ExternalConnect/ECPort"), 4712l);
532 cfg
.ReadHash(wxT("/ExternalConnect/ECPassword"), &m_password
);
533 m_language
= cfg
.Read(wxT("/eMule/Language"), wxEmptyString
);
537 void CaMuleExternalConnector::LoadConfigFile()
540 m_configFile
= new CECFileConfig(m_configFileName
);
543 m_language
= m_configFile
->Read(wxT("/Locale"), wxEmptyString
);
544 m_host
= m_configFile
->Read(wxT("/EC/Host"), wxEmptyString
);
545 m_port
= m_configFile
->Read(wxT("/EC/Port"), 4712l);
546 m_configFile
->ReadHash(wxT("/EC/Password"), &m_password
);
547 m_ZLIB
= m_configFile
->Read(wxT("/EC/ZLIB"), 1l) != 0;
551 void CaMuleExternalConnector::SaveConfigFile()
553 if (!wxFileName::DirExists(GetConfigDir())) {
554 wxFileName::Mkdir(GetConfigDir());
557 m_configFile
= new CECFileConfig(m_configFileName
);
560 m_configFile
->Write(wxT("/Locale"), m_language
);
561 m_configFile
->Write(wxT("/EC/Host"), m_host
);
562 m_configFile
->Write(wxT("/EC/Port"), m_port
);
563 m_configFile
->WriteHash(wxT("/EC/Password"), m_password
);
567 bool CaMuleExternalConnector::OnInit()
570 // catch fatal exceptions
571 wxHandleFatalExceptions(true);
574 m_strFullVersion
= strdup((const char *)unicode2char(GetMuleVersion()));
575 m_strOSDescription
= strdup((const char *)unicode2char(wxGetOsDescription()));
577 // Handle uncaught exceptions
578 InstallMuleExceptionHandler();
580 bool retval
= wxApp::OnInit();
582 InitCustomLanguages();
583 SetLocale(m_language
);
587 wxString
CaMuleExternalConnector::SetLocale(const wxString
& language
)
589 if (!language
.IsEmpty()) {
590 m_language
= language
;
594 m_locale
= new wxLocale
;
595 InitLocale(*m_locale
, StrLang2wx(language
));
598 return m_locale
== NULL
? wxString() : m_locale
->GetCanonicalName();
601 #if !wxUSE_GUI && defined(__WXMAC__) && !wxCHECK_VERSION(2, 9, 0)
603 #include <wx/apptrait.h> // Do_not_auto_remove
604 #include <wx/stdpaths.h> // Do_not_auto_remove
606 class CaMuleExternalConnectorTraits
: public wxConsoleAppTraits
609 virtual wxStandardPathsBase
& GetStandardPaths()
615 static wxStandardPathsCF s_stdPaths
;
618 wxStandardPathsCF
CaMuleExternalConnectorTraits::s_stdPaths
;
620 wxAppTraits
* CaMuleExternalConnector::CreateTraits()
622 return new CaMuleExternalConnectorTraits
;
627 // Gracefully handle fatal exceptions and print backtrace if possible
628 void CaMuleExternalConnector::OnFatalException()
630 /* Print the backtrace */
631 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
632 fprintf(stderr
, "A fatal error has occurred and %s has crashed.\n", m_appname
);
633 fprintf(stderr
, "Please assist us in fixing this problem by posting the backtrace below in our\n");
634 fprintf(stderr
, "'aMule Crashes' forum and include as much information as possible regarding the\n");
635 fprintf(stderr
, "circumstances of this crash. The forum is located here:\n");
636 fprintf(stderr
, " http://forum.amule.org/index.php?board=67.0\n");
637 fprintf(stderr
, "If possible, please try to generate a real backtrace of this crash:\n");
638 fprintf(stderr
, " http://wiki.amule.org/index.php/Backtraces\n\n");
639 fprintf(stderr
, "----------------------------=| BACKTRACE FOLLOWS: |=----------------------------\n");
640 fprintf(stderr
, "Current version is: %s %s\n", m_appname
, m_strFullVersion
);
641 fprintf(stderr
, "Running on: %s\n\n", m_strOSDescription
);
643 print_backtrace(1); // 1 == skip this function.
645 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
649 void CaMuleExternalConnector::OnAssertFailure(const wxChar
*file
, int line
, const wxChar
*func
, const wxChar
*cond
, const wxChar
*msg
)
651 #if !defined wxUSE_STACKWALKER || !wxUSE_STACKWALKER
652 wxString errmsg
= CFormat( wxT("%s:%s:%d: Assertion '%s' failed. %s") ) % file
% func
% line
% cond
% ( msg
? msg
: wxT("") );
654 fprintf(stderr
, "Assertion failed: %s\n", (const char*)unicode2char(errmsg
));
656 // Skip the function-calls directly related to the assert call.
657 fprintf(stderr
, "\nBacktrace follows:\n");
659 fprintf(stderr
, "\n");
661 wxApp::OnAssertFailure(file
, line
, func
, cond
, msg
);
665 // File_checked_for_headers