Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.

BUG:215923


git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdewebdev@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 474 insertions, 0 deletions

diff --git a/kxsldbg/kxsldbgpart/xsldbgdebugger.cpp b/kxsldbg/kxsldbgpart/xsldbgdebugger.cpp
new file mode 100644
index 00000000..69fcaeec
--- /dev/null
+++ b/kxsldbg/kxsldbgpart/xsldbgdebugger.cpp
@@ -0,0 +1,474 @@
+/***************************************************************************
+                          xsldbgdebugger.cpp  -  description
+                             -------------------
+    begin                : Tue Jan 1 2002
+    copyright            : (C) 2002 by Keith Isdale
+    email                : k_isdale@tpg.com.au
+ ***************************************************************************/
+
+/***********************************************************************************
+ *                                                                         										*
+ *   This program is free software; you can redistribute it and/or modify       *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or         *
+ *   (at your option) any later version.                                   							*
+ *                                                                         										*
+ ************************************************************************************/
+
+#include <klocale.h>
+#include <kurl.h>
+
+#include <libxml/tree.h>
+#include <libxslt/xsltInternals.h>
+#include "xsldbgdebugger.h"
+
+#include <libxsldbg/xsldbgthread.h>
+#include <libxsldbg/xsldbgevent.h>
+#include <libxsldbg/qtnotifier2.h>
+#include <libxsldbg/options.h>
+#include <libxsldbg/files.h>
+
+extern int xsldbgStop;
+
+#include "xsldbgwalkspeedimpl.h"
+#include <qmessagebox.h>
+#include <kdebug.h> 
+
+XsldbgDebugger::XsldbgDebugger()
+{
+   initialized = false;
+   inspector = 0L;
+   walkDialog = 0L;
+   outputFileActive = false;
+
+   updateText = "";
+   lastType =  XSLDBG_MSG_AWAITING_INPUT;
+	readMsg = false;
+	procMsg = false;
+	/* set a slow occurance of  timer events to check for xsldbg commands from user */
+	updateTimerID  = startTimer(100);
+
+	connectNotifier(this);
+}
+
+
+XsldbgDebugger::~XsldbgDebugger(){
+   if (initialized == true)
+	 xsldbgThreadFree();
+
+	if (walkDialog != 0L)
+		walkDialog->close(true);
+
+}
+
+
+void  XsldbgDebugger::setInspector(XsldbgInspector *inspector)
+{
+  this->inspector = inspector;
+}
+
+bool XsldbgDebugger::event(QEvent *e)
+{
+	if (e == 0L)
+		return false;
+
+	if (e->type() != QEvent::User)
+		return QObject::event(e);
+   else{
+	static bool waitingFirstmessage = true;
+	if (waitingFirstmessage){
+	    waitingFirstmessage = false;
+	    emit debuggerReady();
+	}
+
+		/* we now have a notify message from xsldbg */
+	   XsldbgEvent *event = dynamic_cast<XsldbgEvent*>(e);
+	   	/* send to this debugger the messages in event */
+  	  event->emitMessage(this);
+ 	 }
+	return true;
+
+}
+
+
+void XsldbgDebugger::timerEvent(QTimerEvent *e)
+{
+	/* This function runs in the application's thread */
+
+	if (e == 0L || (e->timerId() != updateTimerID))
+		return;
+
+	if  ((getInputReady() == 0) && (getInputStatus() == XSLDBG_MSG_AWAITING_INPUT) &&
+		(commandQue.count() > 0)){
+		 QString msg = commandQue.first();
+ 		 commandQue.remove(msg);
+		::fakeInput((const char*)msg.utf8());
+	}
+
+      	if ((!updateText.isEmpty()) && (getInputStatus() == XSLDBG_MSG_AWAITING_INPUT)){
+      		/* flush remainding text to message window */
+		QString msgCopy = updateText;
+		updateText = "";
+      		emit showMessage(msgCopy);
+		lastType  = XSLDBG_MSG_AWAITING_INPUT;
+      	}
+
+}
+
+
+QString XsldbgDebugger::fixLocalPaths(QString & file)
+{
+    QString result = file;
+
+    if (file.left(6) == "file:/"){
+        xmlChar * tempResult = filesExpandName((xmlChar *)file.utf8().data());
+        result = QString::fromUtf8((char*)tempResult);
+        xmlFree(tempResult);
+    }
+
+    return result;
+}
+
+
+QString XsldbgDebugger::sourceFileName()
+{
+	QString fileName;
+
+	if (optionsGetStringOption(OPTIONS_SOURCE_FILE_NAME) != 0L)
+		fileName = QString::fromUtf8((const char*)optionsGetStringOption(OPTIONS_SOURCE_FILE_NAME));
+
+	return fileName;
+}
+
+QString XsldbgDebugger::dataFileName()
+{
+	QString fileName;
+
+	if (optionsGetStringOption(OPTIONS_DATA_FILE_NAME) != 0L)
+		fileName = QString::fromUtf8((const char*)optionsGetStringOption(OPTIONS_DATA_FILE_NAME));
+
+	return fileName;
+}
+
+QString XsldbgDebugger::outputFileName()
+{
+	QString fileName;
+
+	if (optionsGetStringOption(OPTIONS_OUTPUT_FILE_NAME) != 0L)
+		fileName = QString::fromUtf8((const char*)optionsGetStringOption(OPTIONS_OUTPUT_FILE_NAME));
+
+	return fileName;
+}
+
+void XsldbgDebugger::gotoLine(QString fileName, int lineNo, bool breakpoint /*= false*/)
+{
+	emit lineNoChanged(fileName, lineNo, breakpoint);
+}
+
+
+void XsldbgDebugger::setOption(const char* name, bool value)
+{
+    QString msg = "setoption ";
+	 msg.append(name).append(" ").append(QString::number(value));
+	fakeInput(msg, true);
+}
+
+void XsldbgDebugger::fakeInput(QString text, bool wait)
+{
+        Q_UNUSED(wait);
+	commandQue.append(text);
+}
+
+
+bool XsldbgDebugger::start()
+{
+		bool result = false;
+	  if ((initialized == false) && !xsldbgThreadInit())
+		{
+			xsldbgThreadFree();
+			kdDebug() << "Init of thread failed" << endl;
+		}
+		else
+	  {
+			initialized = true;
+			result = true;
+		}
+		return result;
+}
+
+bool XsldbgDebugger::stop()
+{
+	if (initialized == true){
+		setThreadStatus(XSLDBG_MSG_THREAD_STOP);
+	}
+
+	  /* it always succeeds at the moment */
+		return true;
+}
+
+void XsldbgDebugger::slotConfigure()
+{
+	if (start() == false)
+		return;
+
+	if(inspector == 0L ){
+			inspector = new XsldbgInspector(this);
+			connect(inspector, SIGNAL(closedWindow()), this, SLOT(slotConfigClosed()));
+  }
+}
+
+
+void XsldbgDebugger::slotConfigClosed()
+{
+	inspector = 0L;
+}
+
+void XsldbgDebugger::slotStepCmd()
+{
+	if (start())
+		fakeInput("step", true);
+	if (inspector != 0L)
+		inspector->refreshVariables();
+}
+
+void XsldbgDebugger::slotContinueCmd()
+{
+	if (start())
+			/*this can take a while so don't wait for xsldbg to finish */
+			fakeInput("continue", false);
+	if (inspector != 0L)
+		inspector->refreshVariables();
+
+}
+
+void XsldbgDebugger::slotRunCmd()
+{
+	if (start())
+			/*this can take a while so don't wait for xsldbg to finish */
+			fakeInput("run", false);
+
+	if (inspector != 0L)
+		inspector->refresh();
+}
+
+
+void XsldbgDebugger::slotWalkSpeed(int speed)
+{
+		if ((speed >= 0) && (speed <= 9)){
+			if (start()){
+				if (optionsGetIntOption(OPTIONS_WALK_SPEED) == WALKSPEED_STOP){
+					 // start walking at speed requested
+					QString msg("walk ");
+					msg.append(QString::number(speed));
+					fakeInput(msg, true);
+				} else
+					// This will take effect imediately
+					optionsSetIntOption(OPTIONS_WALK_SPEED, speed);
+			}
+		}else
+			kdDebug() << "Invalid walk speed " << speed << endl;
+}
+
+void XsldbgDebugger::slotWalkCmd()
+{
+	if  (walkDialog == 0L )
+		walkDialog = new XsldbgWalkSpeedImpl (this);
+
+	if (walkDialog != 0L)
+		/* if the user changes the speed the dialog will call back slotWalkSpeed(int)  */
+		walkDialog->show();
+}
+
+void XsldbgDebugger::slotWalkStopCmd()
+{
+    xsldbgStop = 1;
+}
+
+void XsldbgDebugger::slotTraceCmd()
+{
+	if (start())
+			/*this can take a while so don't wait for xsldbg to finish */
+			fakeInput("trace", false);
+}
+
+void XsldbgDebugger::slotBreakCmd(QString fileName, int lineNumber)
+{
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+
+	QString msg("break -l \"");
+	msg.append(XsldbgDebugger::fixLocalPaths(fileName)).append("\" ").append(QString::number(lineNumber));
+
+	if (start())
+		fakeInput(msg, true);
+
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+void XsldbgDebugger::slotBreakCmd(QString templateName, QString modeName)
+{
+
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+	QString msg("break \"");
+	msg.append(templateName).append("\" \"").append(modeName).append("\"");
+	if (start())
+		fakeInput(msg, true);
+
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+void XsldbgDebugger::slotEnableCmd(QString fileName, int lineNumber)
+{
+
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+
+  QString msg("enable -l \"");
+	msg.append(XsldbgDebugger::fixLocalPaths(fileName)).append("\" ").append(QString::number(lineNumber));
+	if (start())
+		fakeInput(msg, true);
+
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+
+void XsldbgDebugger::slotEnableCmd(int id)
+{
+
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+
+  QString msg("enable ");
+	msg.append(QString::number(id));
+	if (start())
+		fakeInput(msg, true);
+
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+
+void XsldbgDebugger::slotDeleteCmd(QString fileName, int lineNumber)
+{
+
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+
+	QString msg("delete -l \"");
+	msg.append(XsldbgDebugger::fixLocalPaths(fileName)).append("\" ").append(QString::number(lineNumber));
+	if (start())
+		fakeInput(msg, true);
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+
+void XsldbgDebugger::slotDeleteCmd(int id)
+{
+
+  if (outputFileActive == true){
+    QMessageBox::information(0L, i18n("Operation Failed"),
+			     i18n("Cannot set/edit breakpoints on the output file."),
+			     QMessageBox::Ok);
+    return ;
+  }
+	QString msg("delete ");
+	msg.append(QString::number(id));
+	if (start())
+		fakeInput(msg, true);
+	if (inspector != 0L)
+		inspector->refreshBreakpoints();
+}
+
+
+void XsldbgDebugger::slotSourceCmd()
+{
+  if (start()){
+    outputFileActive = false;
+    fakeInput("source", true);
+  }
+}
+
+
+void XsldbgDebugger::slotDataCmd()
+{
+  if (start()){
+    outputFileActive = false;
+    fakeInput("data", true);
+  }
+}
+
+void XsldbgDebugger::slotShowDocument()
+{
+
+  if (outputFileName().length() > 0){
+        outputFileActive = true;
+	gotoLine(outputFileName(), 1);
+  }
+}
+
+
+void XsldbgDebugger::slotExitCmd()
+{
+	/*	showMessage("\nExit command disabled in Quanta for the moment\n");*/
+		stop();
+}
+
+
+void XsldbgDebugger::slotCatCmd(QString xPathExpression){
+	QString msg("cat ");
+	msg.append(xPathExpression);
+
+	if (start())
+		/*this can take a while so don't wait for xsldbg to finish */
+		fakeInput(msg, false);
+
+}
+
+void  XsldbgDebugger::slotCdCmd(QString xPathExpression){
+	QString msg("cd ");
+	msg.append(xPathExpression);
+
+	if (start())
+		fakeInput(msg, true);
+}
+void XsldbgDebugger::slotSetVariableCmd(QString variableName, QString xPathExpression)
+{
+    if (!variableName.isEmpty() && !xPathExpression.isEmpty()){
+	QString msg("set ");
+	msg.append(variableName);
+	msg.append(" \"");
+	msg.append(xPathExpression);
+	msg.append("\"");
+
+	if (start())
+		fakeInput(msg, true);
+    }
+}
+
+
+#include "xsldbgdebugger.moc"