#include "kxsldbg_part.h" #include "libxsldbg/files.h" #include "libxsldbg/xsldbg.h" #include #include #include #include #include #include #include #include #include #include #include #include #include "../kxsldbg.h" #include #include #include #include #include #include #include #if KDE_IS_VERSION(3,1,90) #include #else #include #endif // Qxsldbg specific includes #include "qxsldbgdoc.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "xsldbgoutputview.h" #include "xsldbgconfigimpl.h" #include #include "xsldbgdebugger.h" typedef KParts::GenericFactory KXsldbgPartFactory; K_EXPORT_COMPONENT_FACTORY( libkxsldbgpart, KXsldbgPartFactory ) KXsldbgPart::KXsldbgPart( TQWidget *parentWidget, const char * /*widgetName*/, TQObject *parent, const char *name, const TQStringList & /*args*/ ) : DCOPObject("KXsldbgPart"), KParts::ReadOnlyPart(parent, name) { currentLineNo = 0; currentColumnNo = 0; inspector = 0L; debugger = 0L; configWidget = 0L; currentDoc = 0L; // we need an instance setInstance( KXsldbgPartFactory::instance() ); TQVBox *frame = new TQVBox(parentWidget); TQHBox *h = new TQHBox(frame); newXPath = new TQLineEdit(h); xPathBtn = new TQPushButton(i18n("Goto XPath"), h); /* Disable searching as searching documentation is not ready h = new TQHBox(frame); newSearch = new TQLineEdit(h); searchBtn = new TQPushButton(i18n("Search"), h); */ h = new TQHBox(frame); newEvaluate = new TQLineEdit(h); evaluateBtn = new TQPushButton(i18n("Evaluate"), h); TQSplitter *splitter = new TQSplitter(TQSplitter::Vertical, frame); mainView = new TQWidgetStack(splitter); mainView->setMinimumHeight(400); //## TODO don't use a magic number outputview = new XsldbgOutputView(splitter); setWidget(frame); docDictionary.setAutoDelete(true); // create our actions KStdAction::open(this, TQT_SLOT(fileOpen()), actionCollection()); // set our XML-UI resource file setXMLFile("kxsldbg_part.rc"); (void) new KAction( i18n("Configure Editor..."), "configure", 0, this, TQT_SLOT(configureEditorCmd_activated()), actionCollection(), "configureEditorCmd" ); (void) new KAction( i18n("Configure..."), "configure", Key_C, this, TQT_SLOT(configureCmd_activated()), actionCollection(), "configureCmd" ); (void) new KAction( i18n("Inspect..."), "find", Key_I, this, TQT_SLOT(inspectorCmd_activated()), actionCollection(), "inspectCmd" ); // Motions commands (void) new KAction( i18n("Run"), "run", Key_F5, this, TQT_SLOT(runCmd_activated()), actionCollection(), "runCmd" ); (void) new KAction( i18n("Continue"), "1downarrow", Key_F4, this, TQT_SLOT(continueCmd_activated()), actionCollection(), "continueCmd" ); (void) new KAction( i18n("Step"), "step", Key_F8, this, TQT_SLOT(stepCmd_activated()), actionCollection(), "stepCmd" ); (void) new KAction( i18n("Next"), "next", Key_F10, this, TQT_SLOT(nextCmd_activated()), actionCollection(), "nextCmd" ); (void) new KAction( i18n("Step Up"), "xsldbg_stepup", Key_F6, this, TQT_SLOT(stepupCmd_activated()), actionCollection(), "stepupCmd" ); (void) new KAction( i18n("Step Down"), "xsldbg_stepdown", Key_F7, this, TQT_SLOT(stepCmd_activated()), actionCollection(), "stepdownCmd" ); // Breakpoint commands (void) new KAction( i18n("Break"), "xsldbg_break", Key_F2, this, TQT_SLOT(breakCmd_activated()), actionCollection(), "breakCmd" ); (void) new KAction( i18n("Enable/Disable"), "xsldbg_enable", Key_F3, this, TQT_SLOT(enableCmd_activated()), actionCollection(), "enableCmd" ); (void) new KAction( i18n("Delete"), "xsldbg_delete", Key_Delete, this, TQT_SLOT(deleteCmd_activated()), actionCollection(), "deleteCmd" ); (void) new KAction( i18n("&Source"), "xsldbg_source", Key_S, this, TQT_SLOT(sourceCmd_activated()), actionCollection(), "sourceCmd" ); (void) new KAction( i18n("&Data"), "xsldbg_data", Key_D, this, TQT_SLOT(dataCmd_activated()), actionCollection(), "dataCmd" ); (void) new KAction( i18n("&Output"), "xsldbg_output", Key_O, this, TQT_SLOT(outputCmd_activated()), actionCollection(), "outputCmd" ); (void) new KAction( i18n("Reload Current File From Disk"), "xsldbg_refresh", CTRL + Key_F5, this, TQT_SLOT(refreshCmd_activated()), actionCollection(), "refreshCmd" ); /* tracing and walking */ (void) new KAction( i18n("Walk Through Stylesheet..."), Key_W, this, TQT_SLOT(walkCmd_activated()), actionCollection(), "walkCmd" ); (void) new KAction( i18n("Stop Wal&king Through Stylesheet"), Key_K, this, TQT_SLOT(walkStopCmd_activated()), actionCollection(), "walkStopCmd" ); (void) new KAction( i18n("Tr&ace Execution of Stylesheet"), Key_A, this, TQT_SLOT(traceCmd_activated()), actionCollection(), "traceCmd" ); (void) new KAction( i18n("Stop Tracing of Stylesheet"), Key_K, this, TQT_SLOT(traceStopCmd_activated()), actionCollection(), "traceStopCmd" ); (void) new KAction( i18n("&Evaluate Expression..."), Key_E, this, TQT_SLOT(evaluateCmd_activated()), actionCollection(), "evaluateCmd" ); (void) new KAction( i18n("Goto &XPath..."), Key_X, this, TQT_SLOT(gotoXPathCmd_activated()), actionCollection(), "gotoXPathCmd" ); (void) new KAction( i18n("Lookup SystemID..."), 0, this, TQT_SLOT(slotLookupSystemID()), actionCollection(), "lookupSystemID" ); (void) new KAction( i18n("Lookup PublicID..."), 0, this, TQT_SLOT(slotLookupPublicID()), actionCollection(), "lookupPublicID" ); (void) new KAction( i18n("Quit"), 0, CTRL + Key_Q, this, TQT_SLOT(quit()), actionCollection(), "file_quit" ); /* (void) new KAction( i18n("Exit KXsldbg"), "xsldbg_output", CTRL + Key_Q, this, TQT_SLOT(exitCmd_activated()), actionCollection(), "exitCmd" ); */ connect( xPathBtn, TQT_SIGNAL( clicked() ), this, TQT_SLOT( slotGotoXPath() ) ); connect( evaluateBtn, TQT_SIGNAL( clicked() ), this, TQT_SLOT( slotEvaluate() ) ); /* connect( searchBtn, TQT_SIGNAL( clicked() ), this, TQT_SLOT( slotSearch() ) ); */ /* We must have a valid debugger and inspector */ createInspector(); if (checkDebugger()){ configWidget = new XsldbgConfigImpl( debugger, 0L ); Q_CHECK_PTR( configWidget ); debugger->start(); }else{ openURL(""); } } KXsldbgPart::~KXsldbgPart() { docDictionary.clear(); } void KXsldbgPart::quit() { qWarning("Custom void KXsldbgPart::quit()"); closeURL(); } KAboutData *KXsldbgPart::createAboutData() { // the non-i18n name here must be the same as the directory in // which the part's rc file is installed ('partrcdir' in the // Makefile) KAboutData *aboutData = new KAboutData("kxsldbgpart", I18N_NOOP("KXsldbgPart"), "0.1"); aboutData->addAuthor("Keith Isdale", 0L, "k_isdale@tpg.com.au"); return aboutData; } bool KXsldbgPart::openURL(const KURL &url) { bool result = fetchURL(url); if (result){ QXsldbgDoc *docPtr = docDictionary[url.prettyURL()]; if (docPtr && docPtr->kateView()){ if (docPtr != currentDoc){ currentDoc = docPtr; currentFileName = url.prettyURL(); mainView->raiseWidget(currentDoc->kateView()); emit setWindowCaption(currentDoc->url().prettyURL()); } } else{ result = false; } } return result; } /* Don't show the content of URL just loaded it into our data structures */ bool KXsldbgPart::fetchURL(const KURL &url) { TQString docID = url.prettyURL(); QXsldbgDoc *docPtr = docDictionary[docID]; if (!docPtr){ docPtr = new QXsldbgDoc(mainView, url); docDictionary.insert(docID, docPtr); if (docPtr->kateView()){ mainView->addWidget(docPtr->kateView()); Kate::View *v = Kate::view((docPtr->kateView())); connect(v, TQT_SIGNAL(cursorPositionChanged()), this, TQT_SLOT(cursorPositionChanged())); } } return true; } bool KXsldbgPart::openFile() { qWarning("bool KXsldbgPart::openFile() called"); return false; } bool KXsldbgPart::closeURL() { docDictionary.clear(); return true; } void KXsldbgPart::fileOpen() { // this slot is called whenever the File->Open menu is selected, // the Open shortcut is pressed (usually CTRL+O) or the Open toolbar // button is clicked TQString file_name = KFileDialog::getOpenFileName(); if (file_name.isEmpty() == false) openURL(KURL( file_name )); } void KXsldbgPart::configureEditorCmd_activated() { if (currentDoc){ KTextEditor::ConfigInterface *configIf = KTextEditor::configInterface(currentDoc->kateDoc()); if (configIf) configIf->configDialog(); } } bool KXsldbgPart::checkDebugger() { bool result = debugger != 0L; if (!result){ TQMessageBox::information(0L, i18n("Debugger Not Ready"), i18n("Configure and start the debugger first."), TQMessageBox::Ok); } return result; } void KXsldbgPart::lookupSystemID( TQString systemID) { bool ok = false; if (!checkDebugger()) return; if (systemID.isEmpty()){ #if KDE_IS_VERSION(3, 1, 90) systemID = KInputDialog::getText( i18n( "Lookup SystemID" ), i18n( "Please enter SystemID to find:" ), TQString::null, &ok, mainView); #else systemID = QInputDialog::getText( i18n( "Lookup SystemID" ), i18n( "Please enter SystemID to find:" ), TQLineEdit::Normal, TQString::null, &ok, mainView); #endif }else{ ok = true; } if ( ok && !systemID.isEmpty() ){ // user entered something and pressed ok TQString msg(TQString("system %1").arg(systemID)); // noTr debugger->fakeInput(msg, true); } } void KXsldbgPart::lookupPublicID(TQString publicID) { bool ok = false; if (!checkDebugger()) return; if (publicID.isEmpty()){ #if KDE_IS_VERSION(3, 1, 90) publicID = KInputDialog::getText( i18n( "Lookup PublicID" ), i18n( "Please enter PublicID to find:" ), TQString::null, &ok, mainView ); #else publicID = QInputDialog::getText( i18n( "Lookup PublicID" ), i18n( "Please enter PublicID to find:" ), TQLineEdit::Normal, TQString::null, &ok, mainView ); #endif }else{ ok = true; } if ( ok && !publicID.isEmpty()){ // user entered something and pressed ok TQString msg(TQString("public %1").arg(publicID)); // noTr debugger->fakeInput(msg, true); } } void KXsldbgPart::slotLookupSystemID() { lookupSystemID(""); } void KXsldbgPart::slotLookupPublicID() { lookupPublicID(""); } void KXsldbgPart::configureCmd_activated() { if (!checkDebugger()) return; if (configWidget != 0L){ configWidget->refresh(); configWidget->show(); } } void KXsldbgPart::runCmd_activated() { if ( checkDebugger() ) debugger->slotRunCmd(); } void KXsldbgPart::inspectorCmd_activated() { if (inspector == 0L) createInspector(); if (checkDebugger() && (inspector != 0L)){ inspector->show(); } } void KXsldbgPart::createInspector() { if ( inspector == 0L ) { debugger = new XsldbgDebugger(); Q_CHECK_PTR( debugger ); if ( debugger != 0L ) { connect(debugger, TQT_SIGNAL( debuggerReady()), this, TQT_SLOT(debuggerStarted())); if (outputview){ connect(debugger, TQT_SIGNAL( showMessage(TQString /* msg*/)), outputview, TQT_SLOT(slotProcShowMessage(TQString /* msg*/))); } inspector = new XsldbgInspector( debugger ); Q_CHECK_PTR( inspector ); debugger->setInspector( inspector ); if (inspector != 0L){ /*process line number and/or file name changed */ connect(debugger, TQT_SIGNAL(lineNoChanged (TQString /* fileName */ , int /* lineNumber */ , bool /* breakpoint */ ) ), this, TQT_SLOT(lineNoChanged ( TQString /* fileName */ , int /* lineNumber */ , bool /* breakpoint */ ) ) ); connect(debugger, TQT_SIGNAL(breakpointItem(TQString /* fileName*/, int /* lineNumber */, TQString /*templateName*/, TQString /* modeName */, bool /* enabled */, int /* id */)), this, TQT_SLOT( breakpointItem(TQString /* fileName*/, int /* lineNumber */, TQString /*templateName*/, TQString /* modeName */, bool /* enabled */, int /* id */))); connect(debugger, TQT_SIGNAL(resolveItem(TQString /*URI*/)), this, TQT_SLOT(slotProcResolveItem(TQString /*URI*/))); } } } } void KXsldbgPart::emitOpenFile(TQString file, int line, int row) { TQByteArray params; TQDataStream stream(params, IO_WriteOnly); stream << file << line << row; emitDCOPSignal("openFile(TQString,int,int)", params); } void KXsldbgPart::continueCmd_activated() { if ( checkDebugger() ) debugger->slotContinueCmd(); } void KXsldbgPart::stepCmd_activated() { if ( checkDebugger() ) debugger->slotStepCmd(); } void KXsldbgPart::nextCmd_activated() { if ( checkDebugger() ) debugger->fakeInput("next", true); // noTr } void KXsldbgPart::stepupCmd_activated() { if ( checkDebugger() ) debugger->fakeInput("stepup", true); // noTr } void KXsldbgPart::stepdownCmd_activated() { if ( checkDebugger() ) debugger->fakeInput("stepdown", true); // noTr } void KXsldbgPart::dataCmd_activated() { if ( checkDebugger() ) debugger->slotDataCmd(); } void KXsldbgPart::sourceCmd_activated() { if ( checkDebugger() ) debugger->slotSourceCmd(); } void KXsldbgPart::outputCmd_activated() { if ( ( inspector != 0L ) && checkDebugger() && ( configWidget != 0L ) ){ debugger->setOutputFileActive(true); lineNoChanged( configWidget->getOutputFile(), 1, false ); refreshCmd_activated(); } } void KXsldbgPart::refreshCmd_activated() { if ( !currentFileName.isEmpty() ){ TQDictIterator it(docDictionary); QXsldbgDoc *docPtr; while (it.current()){ docPtr = it.current(); docPtr->refresh(); ++it; } if ( checkDebugger() ){ debugger->fakeInput("showbreak", true); // noTr } } } void KXsldbgPart::enableCmd_activated() { if ( checkDebugger() ){ debugger->slotEnableCmd( currentFileName, currentLineNo); } } void KXsldbgPart::deleteCmd_activated() { if ( checkDebugger() ){ debugger->slotDeleteCmd( currentFileName, currentLineNo); } } void KXsldbgPart::breakCmd_activated() { if ( checkDebugger() ){ debugger->slotBreakCmd( currentFileName, currentLineNo); } } void KXsldbgPart::evaluateCmd_activated() { #if KDE_IS_VERSION(3,1,90) TQString expression = KInputDialog::getText(i18n("Evalute Expression"), i18n("XPath:")); #else TQString expression = KLineEditDlg::getText(i18n("Evalute Expression"), i18n("XPath:")); #endif if (checkDebugger() && (expression.length() > 0)){ debugger->slotCatCmd( expression); } } void KXsldbgPart::gotoXPathCmd_activated() { #if KDE_IS_VERSION(3,1,90) TQString xpath = KInputDialog::getText(i18n("Goto XPath"), i18n("XPath:")); #else TQString xpath = KLineEditDlg::getText(i18n("Goto XPath"), i18n("XPath:")); #endif if (checkDebugger() && xpath.length() > 0){ debugger->slotCdCmd( xpath ); } } void KXsldbgPart::lineNoChanged(TQString fileName, int lineNumber, bool breakpoint) { if ( fileName.isEmpty() ) { kdDebug() << "Empty file Name" << endl; // noTr return; } openURL(fileName); QXsldbgDoc *docPtr; TQDictIterator it(docDictionary); while (it.current()){ docPtr = it.current(); // cause all Execution and BreakpointReached marks to be cleared docPtr->clearMarks(false); ++it; } /* Did we stop at a breakpoint if so move the marker */ if (currentDoc) { currentDoc->selectBreakPoint(lineNumber -1, breakpoint); TQByteArray params; TQDataStream stream(params, IO_WriteOnly); stream << currentFileName << lineNumber; emitDCOPSignal("debuggerPositionChanged(TQString,int)", params); }else { qWarning("Unable to retrieve document from internal cache"); } /* Move cursor and update status bar */ if (currentDoc && currentDoc->kateView()){ KTextEditor::ViewCursorInterface *cursorIf = KTextEditor::viewCursorInterface(currentDoc->kateView()); if (cursorIf){ cursorIf->setCursorPositionReal(lineNumber - 1, 0); currentLineNo = lineNumber; } } } void KXsldbgPart::cursorPositionChanged() { if (currentDoc && currentDoc->kateView()){ KTextEditor::ViewCursorInterface *viewCurIf = KTextEditor::viewCursorInterface(currentDoc->kateView()); if (viewCurIf){ viewCurIf->cursorPosition(¤tLineNo, ¤tColumnNo); currentLineNo++; currentColumnNo++; TQByteArray params; TQDataStream stream(params, IO_WriteOnly); stream << currentFileName << currentLineNo << currentColumnNo; emitDCOPSignal("editorPositionChanged(TQString,int,int)", params); } } } void KXsldbgPart::docChanged() { if (!currentDoc || currentDoc->kateDoc() || currentDoc->kateView()) return; } void KXsldbgPart::debuggerStarted() { if (configWidget != 0L){ KCmdLineArgs *args = KCmdLineArgs::parsedArgs(); if (args){ int i=0, result=1, noFilesFound = 0; TQString expandedName; /* contains file name with path expansion if any */ for (i = 0; i < args->count(); i++) { if (!result) break; if (args->arg(i)[0] != '-') { expandedName = TQString::fromUtf8((const char*)filesExpandName((const xmlChar*)args->arg(i))); if (expandedName.isEmpty()) { result = 0; break; } switch (noFilesFound) { case 0: configWidget->slotSourceFile(expandedName); noFilesFound++; break; case 1: configWidget->slotDataFile(expandedName); noFilesFound++; break; case 2: configWidget->slotOutputFile(expandedName); noFilesFound++; break; default: xsldbgGenericErrorFunc(i18n("Error: Too many file names supplied via command line.\n")); result = 0; } continue; } } configWidget->refresh(); configWidget->show(); } } } void KXsldbgPart::addBreakPoint(int lineNumber) { if ( checkDebugger() ){ debugger->slotBreakCmd( currentFileName, lineNumber); } } void KXsldbgPart::enableBreakPoint(int lineNumber) { if ( checkDebugger() ){ debugger->slotEnableCmd( currentFileName, lineNumber); } } void KXsldbgPart::deleteBreakPoint(int lineNumber) { if ( checkDebugger() ){ debugger->slotDeleteCmd( currentFileName, lineNumber); } } void KXsldbgPart::slotSearch() { if ((newSearch != 0L) && checkDebugger() ) { TQString msg(TQString("search \"%1\"").arg(newSearch->text())); // noTr debugger->fakeInput(msg, false); } } void KXsldbgPart::slotEvaluate() { if ((newEvaluate != 0L) && checkDebugger() ){ debugger->slotCatCmd( newEvaluate->text() ); } } void KXsldbgPart::slotGotoXPath() { if ((newXPath != 0L) && checkDebugger() ){ debugger->slotCdCmd( newXPath->text() ); } } void KXsldbgPart::slotProcResolveItem(TQString URI) { if (!URI.isEmpty()){ TQMessageBox::information(mainView, i18n("SystemID or PublicID Resolution Result"), i18n("SystemID or PublicID has been resolved to\n.%1").arg(URI), TQMessageBox::Ok); } } void KXsldbgPart::breakpointItem(TQString fileName, int lineNumber , TQString /*templateName*/, TQString /* modeName */, bool enabled , int /* id */) { if (fileName == 0L){ /* Go through all documents and remove all breakpoints */ TQDictIterator it(docDictionary); QXsldbgDoc *docPtr; while (it.current()){ docPtr = it.current(); docPtr->clearMarks(true); ++it; } }else{ /* if (!fileName.contains("://")){ // relative path ? must handle this special case KURL url; url.setFileName(fileName); fetchURL(url); }else{ fetchURL(fileName); } */ fileName = XsldbgDebugger::fixLocalPaths(fileName); KURL temp(fileName); fileName = temp.prettyURL(); fetchURL(fileName); QXsldbgDoc *docPtr = docDictionary[fileName] ; if (docPtr){ docPtr->addBreakPoint(lineNumber - 1, enabled); }else { qWarning("Unable to get doc %s from docDictionary", fileName.local8Bit().data()); } } } void KXsldbgPart::walkCmd_activated() { if (checkDebugger()){ debugger->slotWalkCmd(); } } void KXsldbgPart::walkStopCmd_activated() { if (checkDebugger()){ debugger->slotWalkStopCmd(); } } void KXsldbgPart::traceCmd_activated() { if (checkDebugger()){ debugger->slotTraceCmd(); } } void KXsldbgPart::traceStopCmd_activated() { walkStopCmd_activated(); } #include "kxsldbg_part.moc"