You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
876 lines
23 KiB
876 lines
23 KiB
#include "kxsldbg_part.h"
|
|
#include "libxsldbg/files.h"
|
|
#include "libxsldbg/xsldbg.h"
|
|
|
|
#include <kinstance.h>
|
|
#include <tdeaction.h>
|
|
#include <kstdaction.h>
|
|
#include <tdefiledialog.h>
|
|
#include <tdeparts/genericfactory.h>
|
|
#include <tdetexteditor/markinterface.h>
|
|
#include <tdetexteditor/editinterface.h>
|
|
#include <tdetexteditor/viewcursorinterface.h>
|
|
#include <tdetexteditor/configinterface.h>
|
|
#include <kate/view.h>
|
|
|
|
#include <tqfile.h>
|
|
#include <tqtextstream.h>
|
|
|
|
#include "../kxsldbg.h"
|
|
#include <tdeaction.h>
|
|
#include <tdecmdlineargs.h>
|
|
#include <kinstance.h>
|
|
#include <kiconloader.h>
|
|
#include <tqmessagebox.h>
|
|
#include <tdelocale.h>
|
|
#include <tdeversion.h>
|
|
#if KDE_IS_VERSION(3,1,90)
|
|
#include <kinputdialog.h>
|
|
#else
|
|
#include <klineeditdlg.h>
|
|
#endif
|
|
|
|
// Qxsldbg specific includes
|
|
#include "qxsldbgdoc.h"
|
|
#include <tqvariant.h>
|
|
#include <tqfile.h>
|
|
#include <tqstatusbar.h>
|
|
#include <tqsplitter.h>
|
|
#include <tqvbox.h>
|
|
|
|
|
|
#include <tqmime.h>
|
|
#include <tqdragobject.h>
|
|
#include <tqlayout.h>
|
|
#include <tqtooltip.h>
|
|
#include <tqwhatsthis.h>
|
|
#include <tqaction.h>
|
|
#include <tqmenubar.h>
|
|
#include <tqpopupmenu.h>
|
|
#include <tqtoolbar.h>
|
|
#include <tqimage.h>
|
|
#include <tqpixmap.h>
|
|
#include <tqtextstream.h>
|
|
#include <tqtextbrowser.h>
|
|
#include <tqmessagebox.h>
|
|
#include <tqlineedit.h>
|
|
#include <tqdockwindow.h>
|
|
#include <tqpushbutton.h>
|
|
#include <tqinputdialog.h>
|
|
#include <tqobjectlist.h>
|
|
#include <tqwidgetstack.h>
|
|
#include "xsldbgoutputview.h"
|
|
#include "xsldbgconfigimpl.h"
|
|
#include <kdebug.h>
|
|
#include "xsldbgdebugger.h"
|
|
|
|
typedef KParts::GenericFactory<KXsldbgPart> 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(TQt::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, TQ_SLOT(fileOpen()), actionCollection());
|
|
|
|
// set our XML-UI resource file
|
|
setXMLFile("kxsldbg_part.rc");
|
|
(void) new TDEAction( i18n("Configure Editor..."),
|
|
"configure", 0,
|
|
this, TQ_SLOT(configureEditorCmd_activated()),
|
|
actionCollection(), "configureEditorCmd" );
|
|
(void) new TDEAction( i18n("Configure..."),
|
|
"configure", Key_C,
|
|
this, TQ_SLOT(configureCmd_activated()),
|
|
actionCollection(), "configureCmd" );
|
|
|
|
(void) new TDEAction( i18n("Inspect..."),
|
|
"edit-find", Key_I,
|
|
this, TQ_SLOT(inspectorCmd_activated()),
|
|
actionCollection(), "inspectCmd" );
|
|
|
|
|
|
// Motions commands
|
|
(void) new TDEAction( i18n("Run"),
|
|
"system-run", Key_F5,
|
|
this, TQ_SLOT(runCmd_activated()),
|
|
actionCollection(), "runCmd" );
|
|
|
|
(void) new TDEAction( i18n("Continue"),
|
|
"1downarrow", Key_F4,
|
|
this, TQ_SLOT(continueCmd_activated()),
|
|
actionCollection(), "continueCmd" );
|
|
|
|
(void) new TDEAction( i18n("Step"),
|
|
"step", Key_F8,
|
|
this, TQ_SLOT(stepCmd_activated()),
|
|
actionCollection(), "stepCmd" );
|
|
|
|
(void) new TDEAction( i18n("Next"),
|
|
"next", Key_F10,
|
|
this, TQ_SLOT(nextCmd_activated()),
|
|
actionCollection(), "nextCmd" );
|
|
|
|
(void) new TDEAction( i18n("Step Up"),
|
|
"xsldbg_stepup", Key_F6,
|
|
this, TQ_SLOT(stepupCmd_activated()),
|
|
actionCollection(), "stepupCmd" );
|
|
|
|
(void) new TDEAction( i18n("Step Down"),
|
|
"xsldbg_stepdown", Key_F7,
|
|
this, TQ_SLOT(stepCmd_activated()),
|
|
actionCollection(), "stepdownCmd" );
|
|
|
|
// Breakpoint commands
|
|
(void) new TDEAction( i18n("Break"),
|
|
"xsldbg_break", Key_F2,
|
|
this, TQ_SLOT(breakCmd_activated()),
|
|
actionCollection(), "breakCmd" );
|
|
|
|
(void) new TDEAction( i18n("Enable/Disable"),
|
|
"xsldbg_enable", Key_F3,
|
|
this, TQ_SLOT(enableCmd_activated()),
|
|
actionCollection(), "enableCmd" );
|
|
|
|
(void) new TDEAction( i18n("Delete"),
|
|
"xsldbg_delete", Key_Delete,
|
|
this, TQ_SLOT(deleteCmd_activated()),
|
|
actionCollection(), "deleteCmd" );
|
|
|
|
(void) new TDEAction( i18n("&Source"),
|
|
"xsldbg_source", Key_S,
|
|
this, TQ_SLOT(sourceCmd_activated()),
|
|
actionCollection(), "sourceCmd" );
|
|
|
|
(void) new TDEAction( i18n("&Data"),
|
|
"xsldbg_data", Key_D,
|
|
this, TQ_SLOT(dataCmd_activated()),
|
|
actionCollection(), "dataCmd" );
|
|
|
|
(void) new TDEAction( i18n("&Output"),
|
|
"xsldbg_output", Key_O,
|
|
this, TQ_SLOT(outputCmd_activated()),
|
|
actionCollection(), "outputCmd" );
|
|
|
|
(void) new TDEAction( i18n("Reload Current File From Disk"),
|
|
"xsldbg_refresh", CTRL + Key_F5,
|
|
this, TQ_SLOT(refreshCmd_activated()),
|
|
actionCollection(), "refreshCmd" );
|
|
|
|
/* tracing and walking */
|
|
(void) new TDEAction( i18n("Walk Through Stylesheet..."),
|
|
Key_W,
|
|
this, TQ_SLOT(walkCmd_activated()),
|
|
actionCollection(), "walkCmd" );
|
|
(void) new TDEAction( i18n("Stop Wal&king Through Stylesheet"),
|
|
Key_K,
|
|
this, TQ_SLOT(walkStopCmd_activated()),
|
|
actionCollection(), "walkStopCmd" );
|
|
(void) new TDEAction( i18n("Tr&ace Execution of Stylesheet"),
|
|
Key_A,
|
|
this, TQ_SLOT(traceCmd_activated()),
|
|
actionCollection(), "traceCmd" );
|
|
(void) new TDEAction( i18n("Stop Tracing of Stylesheet"),
|
|
Key_K,
|
|
this, TQ_SLOT(traceStopCmd_activated()),
|
|
actionCollection(), "traceStopCmd" );
|
|
|
|
(void) new TDEAction( i18n("&Evaluate Expression..."),
|
|
Key_E,
|
|
this, TQ_SLOT(evaluateCmd_activated()),
|
|
actionCollection(), "evaluateCmd" );
|
|
|
|
(void) new TDEAction( i18n("Goto &XPath..."),
|
|
Key_X,
|
|
this, TQ_SLOT(gotoXPathCmd_activated()),
|
|
actionCollection(), "gotoXPathCmd" );
|
|
|
|
(void) new TDEAction( i18n("Lookup SystemID..."),
|
|
0,
|
|
this, TQ_SLOT(slotLookupSystemID()),
|
|
actionCollection(), "lookupSystemID" );
|
|
|
|
(void) new TDEAction( i18n("Lookup PublicID..."),
|
|
0,
|
|
this, TQ_SLOT(slotLookupPublicID()),
|
|
actionCollection(), "lookupPublicID" );
|
|
|
|
(void) new TDEAction( i18n("Quit"),
|
|
0, CTRL + Key_Q,
|
|
this, TQ_SLOT(quit()),
|
|
actionCollection(), "file_quit" );
|
|
|
|
/*
|
|
(void) new TDEAction( i18n("Exit KXsldbg"),
|
|
"xsldbg_output", CTRL + Key_Q,
|
|
this, TQ_SLOT(exitCmd_activated()),
|
|
actionCollection(), "exitCmd" );
|
|
*/
|
|
connect( xPathBtn, TQ_SIGNAL( clicked() ),
|
|
this, TQ_SLOT( slotGotoXPath() ) );
|
|
connect( evaluateBtn, TQ_SIGNAL( clicked() ),
|
|
this, TQ_SLOT( slotEvaluate() ) );
|
|
/*
|
|
|
|
connect( searchBtn, TQ_SIGNAL( clicked() ),
|
|
this, TQ_SLOT( slotSearch() ) );
|
|
*/
|
|
/* We must have a valid debugger and inspector */
|
|
createInspector();
|
|
if (checkDebugger()){
|
|
configWidget = new XsldbgConfigImpl( debugger, 0L );
|
|
TQ_CHECK_PTR( configWidget );
|
|
debugger->start();
|
|
}else{
|
|
openURL("");
|
|
}
|
|
}
|
|
|
|
KXsldbgPart::~KXsldbgPart()
|
|
{
|
|
docDictionary.clear();
|
|
}
|
|
|
|
void KXsldbgPart::quit()
|
|
{
|
|
tqWarning("Custom void KXsldbgPart::quit()");
|
|
closeURL();
|
|
}
|
|
|
|
|
|
TDEAboutData *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)
|
|
TDEAboutData *aboutData = new TDEAboutData("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, TQ_SIGNAL(cursorPositionChanged()), this, TQ_SLOT(cursorPositionChanged()));
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
bool KXsldbgPart::openFile()
|
|
{
|
|
tqWarning("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(), &ok,
|
|
mainView);
|
|
#else
|
|
systemID = TQInputDialog::getText(
|
|
i18n( "Lookup SystemID" ),
|
|
i18n( "Please enter SystemID to find:" ),
|
|
TQLineEdit::Normal, TQString(), &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(), &ok, mainView );
|
|
#else
|
|
publicID = TQInputDialog::getText(
|
|
i18n( "Lookup PublicID" ),
|
|
i18n( "Please enter PublicID to find:" ),
|
|
TQLineEdit::Normal, TQString(), &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();
|
|
TQ_CHECK_PTR( debugger );
|
|
if ( debugger != 0L ) {
|
|
connect(debugger, TQ_SIGNAL( debuggerReady()),
|
|
this, TQ_SLOT(debuggerStarted()));
|
|
if (outputview){
|
|
connect(debugger,
|
|
TQ_SIGNAL( showMessage(TQString /* msg*/)),
|
|
outputview,
|
|
TQ_SLOT(slotProcShowMessage(TQString /* msg*/)));
|
|
}
|
|
inspector = new XsldbgInspector( debugger );
|
|
TQ_CHECK_PTR( inspector );
|
|
debugger->setInspector( inspector );
|
|
if (inspector != 0L){
|
|
/*process line number and/or file name changed */
|
|
connect(debugger,
|
|
TQ_SIGNAL(lineNoChanged
|
|
(TQString /* fileName */ ,
|
|
int /* lineNumber */ ,
|
|
bool /* breakpoint */ ) ),
|
|
this,
|
|
TQ_SLOT(lineNoChanged
|
|
( TQString /* fileName */ ,
|
|
int /* lineNumber */ ,
|
|
bool /* breakpoint */ ) ) );
|
|
connect(debugger,
|
|
TQ_SIGNAL(breakpointItem(TQString /* fileName*/,
|
|
int /* lineNumber */,
|
|
TQString /*templateName*/,
|
|
TQString /* modeName */,
|
|
bool /* enabled */,
|
|
int /* id */)),
|
|
this,
|
|
TQ_SLOT( breakpointItem(TQString /* fileName*/,
|
|
int /* lineNumber */,
|
|
TQString /*templateName*/,
|
|
TQString /* modeName */,
|
|
bool /* enabled */,
|
|
int /* id */)));
|
|
connect(debugger, TQ_SIGNAL(resolveItem(TQString /*URI*/)),
|
|
this, TQ_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<QXsldbgDoc> 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<QXsldbgDoc> 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 {
|
|
tqWarning("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){
|
|
TDECmdLineArgs *args = TDECmdLineArgs::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<QXsldbgDoc> 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 {
|
|
tqWarning("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"
|