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
);
394 // ConnectToCore is blocking since m_ECClient was initialized with NULL
395 if (!m_ECClient
->ConnectToCore(m_host
, m_port
, wxT("foobar"), m_password
.Encode(), ProgName
, ProgVersion
)) {
396 // no connection => close gracefully
397 if (!m_ECClient
->GetServerReply().IsEmpty()) {
398 Show(CFormat(wxT("%s\n")) % m_ECClient
->GetServerReply());
400 Show(CFormat(_("Connection Failed. Unable to connect to %s:%d\n")) % m_host
% m_port
);
402 // Authenticate ourselves
403 // ConnectToCore() already authenticated for us.
404 //m_ECClient->ConnectionEstablished();
405 Show(m_ECClient
->GetServerReply()+wxT("\n"));
406 if (m_ECClient
->IsSocketConnected()) {
414 Show(CFormat(_("\nOk, exiting %s...\n")) % ProgName
);
418 m_ECClient
->DestroySocket();
420 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"));
424 void CaMuleExternalConnector::OnInitCmdLine(wxCmdLineParser
& parser
, const char* appname
)
428 parser
.AddSwitch(wxEmptyString
, wxT("help"),
429 _("Show this help text."),
430 wxCMD_LINE_PARAM_OPTIONAL
);
431 parser
.AddOption(wxT("h"), wxT("host"),
432 _("Host where aMule is running. (default: localhost)"),
433 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
434 parser
.AddOption(wxT("p"), wxT("port"),
435 _("aMule's port for External Connection. (default: 4712)"),
436 wxCMD_LINE_VAL_NUMBER
, wxCMD_LINE_PARAM_OPTIONAL
);
437 parser
.AddOption(wxT("P"), wxT("password"),
438 _("External Connection password."),
439 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
440 parser
.AddOption(wxT("f"), wxT("config-file"),
441 _("Read configuration from file."),
442 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
443 parser
.AddSwitch(wxT("q"), wxT("quiet"),
444 _("Do not print any output to stdout."),
445 wxCMD_LINE_PARAM_OPTIONAL
);
446 parser
.AddSwitch(wxT("v"), wxT("verbose"),
447 _("Be verbose - show also debug messages."),
448 wxCMD_LINE_PARAM_OPTIONAL
);
449 parser
.AddOption(wxT("l"), wxT("locale"),
450 _("Sets program locale (language)."),
451 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
452 parser
.AddSwitch(wxT("w"), wxT("write-config"),
453 _("Write command line options to config file."),
454 wxCMD_LINE_PARAM_OPTIONAL
);
455 parser
.AddOption(wxEmptyString
, wxT("create-config-from"),
456 _("Creates config file based on aMule's config file."),
457 wxCMD_LINE_VAL_STRING
, wxCMD_LINE_PARAM_OPTIONAL
);
458 parser
.AddSwitch(wxEmptyString
, wxT("version"),
459 _("Print program version."),
460 wxCMD_LINE_PARAM_OPTIONAL
);
463 bool CaMuleExternalConnector::OnCmdLineParsed(wxCmdLineParser
& parser
)
465 if (parser
.Found(wxT("version"))) {
466 printf("%s %s\n", m_appname
, (const char *)unicode2char(GetMuleVersion()));
470 if (!parser
.Found(wxT("config-file"), &m_configFileName
)) {
471 m_configFileName
= GetConfigDir() + wxT("remote.conf");
474 wxString aMuleConfigFile
;
475 if (parser
.Found(wxT("create-config-from"), &aMuleConfigFile
)) {
476 aMuleConfigFile
= FinalizeFilename(aMuleConfigFile
);
477 if (!::wxFileExists(aMuleConfigFile
)) {
478 fprintf(stderr
, "%s\n", (const char *)unicode2char(wxT("FATAL ERROR: File does not exist: ") + aMuleConfigFile
));
481 CECFileConfig
aMuleConfig(aMuleConfigFile
);
482 LoadAmuleConfig(aMuleConfig
);
484 m_configFile
->Flush();
490 if ( !parser
.Found(wxT("host"), &m_host
) ) {
491 if ( m_host
.IsEmpty() ) {
492 m_host
= wxT("localhost");
497 if (parser
.Found(wxT("port"), &port
)) {
502 if (parser
.Found(wxT("password"), &pass_plain
)) {
503 if (!pass_plain
.IsEmpty()) {
504 m_password
.Decode(MD5Sum(pass_plain
).GetHash());
510 if (parser
.Found(wxT("write-config"))) {
511 m_NeedsConfigSave
= true;
514 parser
.Found(wxT("locale"), &m_language
);
516 if (parser
.Found(wxT("help"))) {
521 m_KeepQuiet
= parser
.Found(wxT("quiet"));
522 m_Verbose
= parser
.Found(wxT("verbose"));
527 void CaMuleExternalConnector::LoadAmuleConfig(CECFileConfig
& cfg
)
529 m_host
= wxT("localhost");
530 m_port
= cfg
.Read(wxT("/ExternalConnect/ECPort"), 4712l);
531 cfg
.ReadHash(wxT("/ExternalConnect/ECPassword"), &m_password
);
532 m_language
= cfg
.Read(wxT("/eMule/Language"), wxEmptyString
);
536 void CaMuleExternalConnector::LoadConfigFile()
539 m_configFile
= new CECFileConfig(m_configFileName
);
542 m_language
= m_configFile
->Read(wxT("/Locale"), wxEmptyString
);
543 m_host
= m_configFile
->Read(wxT("/EC/Host"), wxEmptyString
);
544 m_port
= m_configFile
->Read(wxT("/EC/Port"), 4712l);
545 m_configFile
->ReadHash(wxT("/EC/Password"), &m_password
);
549 void CaMuleExternalConnector::SaveConfigFile()
551 if (!wxFileName::DirExists(GetConfigDir())) {
552 wxFileName::Mkdir(GetConfigDir());
555 m_configFile
= new CECFileConfig(m_configFileName
);
558 m_configFile
->Write(wxT("/Locale"), m_language
);
559 m_configFile
->Write(wxT("/EC/Host"), m_host
);
560 m_configFile
->Write(wxT("/EC/Port"), m_port
);
561 m_configFile
->WriteHash(wxT("/EC/Password"), m_password
);
565 bool CaMuleExternalConnector::OnInit()
568 // catch fatal exceptions
569 wxHandleFatalExceptions(true);
572 m_strFullVersion
= strdup((const char *)unicode2char(GetMuleVersion()));
573 m_strOSDescription
= strdup((const char *)unicode2char(wxGetOsDescription()));
575 // Handle uncaught exceptions
576 InstallMuleExceptionHandler();
578 bool retval
= wxApp::OnInit();
580 InitCustomLanguages();
581 SetLocale(m_language
);
585 wxString
CaMuleExternalConnector::SetLocale(const wxString
& language
)
587 if (!language
.IsEmpty()) {
588 m_language
= language
;
592 m_locale
= new wxLocale
;
593 InitLocale(*m_locale
, StrLang2wx(language
));
596 return m_locale
== NULL
? wxString() : m_locale
->GetCanonicalName();
599 #if !wxUSE_GUI && defined(__WXMAC__) && !wxCHECK_VERSION(2, 9, 0)
601 #include <wx/apptrait.h> // Do_not_auto_remove
602 #include <wx/stdpaths.h> // Do_not_auto_remove
604 class CaMuleExternalConnectorTraits
: public wxConsoleAppTraits
607 virtual wxStandardPathsBase
& GetStandardPaths()
613 static wxStandardPathsCF s_stdPaths
;
616 wxStandardPathsCF
CaMuleExternalConnectorTraits::s_stdPaths
;
618 wxAppTraits
* CaMuleExternalConnector::CreateTraits()
620 return new CaMuleExternalConnectorTraits
;
625 // Gracefully handle fatal exceptions and print backtrace if possible
626 void CaMuleExternalConnector::OnFatalException()
628 /* Print the backtrace */
629 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
630 fprintf(stderr
, "A fatal error has occurred and %s has crashed.\n", m_appname
);
631 fprintf(stderr
, "Please assist us in fixing this problem by posting the backtrace below in our\n");
632 fprintf(stderr
, "'aMule Crashes' forum and include as much information as possible regarding the\n");
633 fprintf(stderr
, "circumstances of this crash. The forum is located here:\n");
634 fprintf(stderr
, " http://forum.amule.org/index.php?board=67.0\n");
635 fprintf(stderr
, "If possible, please try to generate a real backtrace of this crash:\n");
636 fprintf(stderr
, " http://wiki.amule.org/index.php/Backtraces\n\n");
637 fprintf(stderr
, "----------------------------=| BACKTRACE FOLLOWS: |=----------------------------\n");
638 fprintf(stderr
, "Current version is: %s %s\n", m_appname
, m_strFullVersion
);
639 fprintf(stderr
, "Running on: %s\n\n", m_strOSDescription
);
641 print_backtrace(1); // 1 == skip this function.
643 fprintf(stderr
, "\n--------------------------------------------------------------------------------\n");
647 void CaMuleExternalConnector::OnAssertFailure(const wxChar
*file
, int line
, const wxChar
*func
, const wxChar
*cond
, const wxChar
*msg
)
649 #if !defined wxUSE_STACKWALKER || !wxUSE_STACKWALKER
650 wxString errmsg
= CFormat( wxT("%s:%s:%d: Assertion '%s' failed. %s") ) % file
% func
% line
% cond
% ( msg
? msg
: wxT("") );
652 fprintf(stderr
, "Assertion failed: %s\n", (const char*)unicode2char(errmsg
));
654 // Skip the function-calls directly related to the assert call.
655 fprintf(stderr
, "\nBacktrace follows:\n");
657 fprintf(stderr
, "\n");
659 wxApp::OnAssertFailure(file
, line
, func
, cond
, msg
);
663 // File_checked_for_headers