3 // Copyright by Johannes Sixt
4 // This file is under GPL, the GNU General Public Licence
8 #include <klocale.h> /* i18n */
9 #include <kmessagebox.h>
12 #include <kcmdlineargs.h>
13 #include <kaboutdata.h>
14 #include <kpopupmenu.h>
16 #include "dbgmainwnd.h"
17 #include "typetable.h"
25 #include <fcntl.h> /* open(2) */
28 #include <unistd.h> /* getopt(3) */
30 #include <stdlib.h> /* getenv(3) */
34 int main(int argc
, char** argv
)
36 static const char* description
=
39 KAboutData
aboutData("kdbg", "KDbg",
42 KAboutData::License_GPL
,
43 "(c) 1998-2001 Johannes Sixt",
45 "http://members.nextra.at/johsixt/kdbg.html",
46 "Johannes.Sixt@telecom.at");
47 aboutData
.addAuthor("Johannes Sixt", 0, "Johannes.Sixt@telecom.at");
48 aboutData
.addCredit("Max Judin",
49 I18N_NOOP("Docking windows"),
50 "novaprint@mtu-net.ru");
51 aboutData
.addCredit("Keith Isdale",
52 I18N_NOOP("XSLT debugging"),
53 "k_isdale@tpg.com.au");
54 KCmdLineArgs::init( argc
, argv
, &aboutData
);
56 static KCmdLineOptions options
[] = {
57 { "t <file>", I18N_NOOP("transcript of conversation with the debugger"), 0 },
58 { "r <device>", I18N_NOOP("remote debugging via <device>"), 0 },
59 { "l <language>", I18N_NOOP("specify language: C, XSLT"), ""},
60 { "x", I18N_NOOP("use language XSLT (deprecated)"), 0 },
61 { "+[program]", I18N_NOOP("path of executable to debug"), 0 },
62 { "+[core]", I18N_NOOP("a core file to use"), 0},
65 KCmdLineArgs::addCmdLineOptions(options
);
69 KGlobal::dirs()->addResourceType("types", "share/apps/kdbg/types");
71 DebuggerMainWnd
debugger("kdbg_main");
74 TypeTable::initTypeLibraries();
77 bool restored
= false;
78 if (app
.isRestored()) {
79 if (KMainWindow::canBeRestored(1)) {
85 app
.setMainWidget(&debugger
);
91 KCmdLineArgs
*args
= KCmdLineArgs::parsedArgs();
92 QCString t
= args
->getOption("t");
93 const char* transcript
= t
.data();
94 QString remote
= args
->getOption("r");
95 if (!remote
.isEmpty())
96 debugger
.setRemoteDevice(remote
);
98 QCString lang
= args
->getOption("l");
100 // deprecated option; overrides -l
101 if (args
->isSet("x")){
102 /* run in xsldbg mode */
106 // check environment variable for transcript file name
107 if (transcript
== 0) {
108 transcript
= getenv("KDBG_TRANSCRIPT");
110 debugger
.setTranscript(transcript
);
112 if (!restored
&& args
->count() > 0) {
113 // check for core file
114 if (args
->count() > 1) {
115 debugger
.setCoreFile(args
->arg(1));
117 if (!debugger
.debugProgram(args
->arg(0), lang
)) {
119 TRACE("cannot start debugger");
120 KMessageBox::error(&debugger
, i18n("Cannot start debugger."));
121 debugger
.setCoreFile("");