The home page is now at www.kdbg.org.
[kdbg.git] / kdbg / main.cpp
blob5a12506c53ba02f6e7287a1255fa0b607a88e8bb
1 // $Id$
3 // Copyright by Johannes Sixt
4 // This file is under GPL, the GNU General Public Licence
7 #include <kapp.h>
8 #include <klocale.h> /* i18n */
9 #include <kmessagebox.h>
10 #include <kglobal.h>
11 #include <kstddirs.h>
12 #include <kcmdlineargs.h>
13 #include <kaboutdata.h>
14 #include <kpopupmenu.h>
15 #include <kmenubar.h>
16 #include "dbgmainwnd.h"
17 #include "typetable.h"
18 #ifdef HAVE_CONFIG_H
19 #include "config.h"
20 #endif
21 #ifndef VERSION
22 #define VERSION ""
23 #endif
24 #ifdef HAVE_FCNTL_H
25 #include <fcntl.h> /* open(2) */
26 #endif
27 #ifdef HAVE_UNISTD_H
28 #include <unistd.h> /* getopt(3) */
29 #endif
30 #include <stdlib.h> /* getenv(3) */
31 #include "mydebug.h"
34 int main(int argc, char** argv)
36 KAboutData aboutData("kdbg", "KDbg",
37 VERSION,
38 I18N_NOOP("A Debugger"),
39 KAboutData::License_GPL,
40 "(c) 1998-2005 Johannes Sixt",
41 0, /* any text */
42 "http://www.kdbg.org/",
43 "Johannes.Sixt@telecom.at");
44 aboutData.addAuthor("Johannes Sixt", 0, "Johannes.Sixt@telecom.at");
45 aboutData.addCredit("Keith Isdale",
46 I18N_NOOP("XSLT debugging"),
47 "k_isdale@tpg.com.au");
48 aboutData.addCredit("Daniel Kristjansson",
49 I18N_NOOP("Register groups and formating"),
50 "danielk@cat.nyu.edu");
51 KCmdLineArgs::init( argc, argv, &aboutData );
53 static KCmdLineOptions options[] = {
54 { "t <file>", I18N_NOOP("transcript of conversation with the debugger"), 0 },
55 { "r <device>", I18N_NOOP("remote debugging via <device>"), 0 },
56 { "l <language>", I18N_NOOP("specify language: C, XSLT"), ""},
57 { "x", I18N_NOOP("use language XSLT (deprecated)"), 0 },
58 { "p <pid>", I18N_NOOP("specify PID of process to debug"), 0},
59 { "+[program]", I18N_NOOP("path of executable to debug"), 0 },
60 { "+[core]", I18N_NOOP("a core file to use"), 0},
61 { 0, 0, 0 }
63 KCmdLineArgs::addCmdLineOptions(options);
65 KApplication app;
67 KGlobal::dirs()->addResourceType("types", "share/apps/kdbg/types");
69 DebuggerMainWnd debugger("kdbg_main");
71 /* type libraries */
72 TypeTable::initTypeLibraries();
74 // session management
75 bool restored = false;
76 if (app.isRestored()) {
77 if (KMainWindow::canBeRestored(1)) {
78 debugger.restore(1);
79 restored = true;
83 app.setMainWidget(&debugger);
85 debugger.show();
87 // handle options
89 KCmdLineArgs *args = KCmdLineArgs::parsedArgs();
90 QCString t = args->getOption("t");
91 const char* transcript = t.data();
92 QString remote = args->getOption("r");
93 if (!remote.isEmpty())
94 debugger.setRemoteDevice(remote);
96 QCString lang = args->getOption("l");
98 // deprecated option; overrides -l
99 if (args->isSet("x")){
100 /* run in xsldbg mode */
101 lang = "xslt";
104 // check environment variable for transcript file name
105 if (transcript == 0) {
106 transcript = getenv("KDBG_TRANSCRIPT");
108 debugger.setTranscript(transcript);
110 QString pid = args->getOption("p");
112 if (!restored && args->count() > 0) {
113 // attach to process?
114 if (!pid.isEmpty()) {
115 TRACE("pid: " + pid);
116 debugger.setAttachPid(pid);
118 // check for core file; use it only if we're not attaching to a process
119 else if (args->count() > 1 && pid.isEmpty()) {
120 debugger.setCoreFile(args->arg(1));
122 if (!debugger.debugProgram(args->arg(0), lang)) {
123 // failed
124 TRACE("cannot start debugger");
125 KMessageBox::error(&debugger, i18n("Cannot start debugger."));
127 debugger.setCoreFile(QString());
128 debugger.setAttachPid(QString());
132 int rc = app.exec();
133 return rc;