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/kdevelop@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 282 insertions, 0 deletions

diff --git a/languages/ada/problemreporter.cpp b/languages/ada/problemreporter.cpp
new file mode 100644
index 00000000..36ac6186
--- /dev/null
+++ b/languages/ada/problemreporter.cpp
@@ -0,0 +1,282 @@
+/*
+   Copyright (C) 2002 by Roberto Raggi <roberto@kdevelop.org>
+   Copyright (C) 2003 Oliver Kellogg <okellogg@users.sourceforge.net>
+
+   This library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public
+   version 2, License as published by the Free Software Foundation.
+
+   This library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public License
+   along with this library; see the file COPYING.LIB.  If not, write to
+   the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+*/
+
+#include "problemreporter.h"
+#include "adasupportpart.h"
+#include "kdevpartcontroller.h"
+#include "kdevmainwindow.h"
+#include "configproblemreporter.h"
+#include "backgroundparser.h"
+
+#include <qfileinfo.h>
+
+#include <kdeversion.h>
+#include <kparts/part.h>
+#include <ktexteditor/editinterface.h>
+#include <ktexteditor/document.h>
+#include <ktexteditor/markinterface.h>
+
+#include <ktexteditor/markinterfaceextension.h>
+
+#include <kdebug.h>
+#include <klocale.h>
+#include <kstatusbar.h>
+#include <kurl.h>
+#include <kapplication.h>
+#include <kiconloader.h>
+
+#include <kconfig.h>
+
+#include <qtimer.h>
+#include <qregexp.h>
+#include <qvbox.h>
+#include <qwhatsthis.h>
+#include <kdialogbase.h>
+
+
+class ProblemItem: public QListViewItem{
+public:
+	ProblemItem( QListView* parent, const QString& level, const QString& problem,
+				 const QString& file, const QString& line, const QString& column  )
+		: QListViewItem( parent, level, problem, file, line, column ) {}
+
+	ProblemItem( QListViewItem* parent, const QString& level, const QString& problem,
+				 const QString& file, const QString& line, const QString& column  )
+		: QListViewItem( parent, level, problem, file, line, column ) {}
+
+	int compare( QListViewItem* item, int column, bool ascending ) const {
+		if( column == 3 || column == 4 ){
+			int a = text( column ).toInt();
+			int b = item->text( column ).toInt();
+			if( a == b )
+				return 0;
+			return( a > b ? -1 : 1 );
+		}
+		return QListViewItem::compare( item, column, ascending );
+	}
+
+};
+
+ProblemReporter::ProblemReporter( AdaSupportPart* part, QWidget* parent, const char* name )
+    : QListView( parent, name ),
+      m_adaSupport( part ),
+      m_editor( 0 ),
+      m_document( 0 ),
+	  m_markIface( 0 ),
+      m_bgParser( 0 )
+{
+    QWhatsThis::add(this, i18n("<b>Problem reporter</b><p>This window shows errors reported by a language parser."));
+
+    addColumn( i18n("Level") );
+    addColumn( i18n("Problem") );
+    addColumn( i18n("File") );
+    addColumn( i18n("Line") );
+    //addColumn( i18n("Column") );
+    setAllColumnsShowFocus( TRUE );
+
+    m_timer = new QTimer( this );
+
+    connect( part->partController(), SIGNAL(activePartChanged(KParts::Part*)),
+             this, SLOT(slotActivePartChanged(KParts::Part*)) );
+    connect( part->partController(), SIGNAL(partAdded(KParts::Part*)),
+             this, SLOT(slotPartAdded(KParts::Part*)) );
+    connect( part->partController(), SIGNAL(partRemoved(KParts::Part*)),
+             this, SLOT(slotPartRemoved(KParts::Part*)) );
+
+    connect( m_timer, SIGNAL(timeout()), this, SLOT(reparse()) );
+
+    connect( this, SIGNAL(doubleClicked(QListViewItem*)),
+             this, SLOT(slotSelected(QListViewItem*)) );
+    connect( this, SIGNAL(returnPressed(QListViewItem*)),
+             this, SLOT(slotSelected(QListViewItem*)) );
+
+    configure();
+}
+
+ProblemReporter::~ProblemReporter()
+{
+    if( m_bgParser ) {
+        m_bgParser->wait();
+    }
+
+    delete( m_bgParser );
+    m_bgParser = 0;
+}
+
+void ProblemReporter::slotActivePartChanged( KParts::Part* part )
+{
+    if( !part )
+        return;
+    
+    if( m_editor )
+	reparse();
+
+    m_document = dynamic_cast<KTextEditor::Document*>( part );
+    if( m_document ){
+        m_filename = m_document->url().path();
+    }
+
+    m_editor = dynamic_cast<KTextEditor::EditInterface*>( part );
+    if( m_editor )
+        connect( m_document, SIGNAL(textChanged()), this, SLOT(slotTextChanged()) );
+
+	m_markIface = dynamic_cast<KTextEditor::MarkInterface*>( part );
+
+	m_timer->changeInterval( m_delay );
+}
+
+void ProblemReporter::slotTextChanged()
+{
+    if( m_active )
+        m_timer->changeInterval( m_delay );
+}
+
+void ProblemReporter::reparse()
+{
+    kdDebug() << "ProblemReporter::reparse()" << endl;
+
+    if( !m_editor )
+        return;
+
+    m_timer->stop();
+
+    if( m_bgParser ) {
+        if( m_bgParser->running() ) {
+            m_timer->changeInterval( m_delay );
+            return;
+        }
+
+        delete( m_bgParser );
+        m_bgParser = 0;
+    }
+
+    QListViewItem* current = firstChild();
+    while( current ){
+        QListViewItem* i = current;
+        current = current->nextSibling();
+
+        if( i->text(2) == m_filename )
+            delete( i );
+    }
+
+	if( m_markIface ){
+		QPtrList<KTextEditor::Mark> marks = m_markIface->marks();
+		QPtrListIterator<KTextEditor::Mark> it( marks );
+		while( it.current() ){
+			m_markIface->removeMark( it.current()->line, KTextEditor::MarkInterface::markType07 );
+			++it;
+		}
+	}
+
+/* Temporarily deactivated (crashes)*/
+    if (!m_adaSupport->fileExtensions ().contains (QFileInfo (m_filename).extension ()))
+    {
+        m_bgParser = new BackgroundParser( this, m_editor->text(), m_filename );
+	m_bgParser->start();
+    }
+ /**/
+}
+
+void ProblemReporter::slotSelected( QListViewItem* item )
+{
+    KURL url( item->text(2) );
+    int line = item->text( 3 ).toInt();
+    // int column = item->text( 4 ).toInt();
+    m_adaSupport->partController()->editDocument( url, line-1 );
+}
+
+void ProblemReporter::reportError( QString message,
+                                   QString filename,
+                                   int line, int column )
+{
+	if( m_markIface ){
+		m_markIface->addMark( line-1, KTextEditor::MarkInterface::markType07 );
+	}
+
+    new ProblemItem( this,
+                       "error",
+                       message.replace( QRegExp("\n"), "" ),
+                       filename,
+                       QString::number( line ),
+                       QString::number( column ) );
+}
+
+void ProblemReporter::reportWarning( QString message,
+                                     QString filename,
+                                     int line, int column )
+{
+    new ProblemItem( this,
+                       "warning",
+                       message.replace( QRegExp("\n"), "" ),
+                       filename,
+                       QString::number( line ),
+                       QString::number( column ) );
+}
+
+void ProblemReporter::reportMessage( QString message,
+                                     QString filename,
+                                     int line, int column )
+{
+    new QListViewItem( this,
+                       "message",
+                       message.replace( QRegExp("\n"), "" ),
+                       filename,
+                       QString::number( line ),
+                       QString::number( column ) );
+}
+
+void ProblemReporter::configure()
+{
+    kdDebug() << "ProblemReporter::configure()" << endl;
+    KConfig* config = kapp->config();
+    config->setGroup( "General Options" );
+    m_active = config->readBoolEntry( "EnableAdaBgParser", TRUE );
+    m_delay = config->readNumEntry( "BgParserDelay", 500 );
+}
+
+void ProblemReporter::configWidget( KDialogBase* dlg )
+{
+    kdDebug() << "ProblemReporter::configWidget()" << endl;
+    QVBox *vbox = dlg->addVBoxPage(i18n("Ada Parsing"), i18n("Ada Parsing"),  BarIcon( "source", KIcon::SizeMedium ));
+    ConfigureProblemReporter* w = new ConfigureProblemReporter( vbox );
+    connect(dlg, SIGNAL(okClicked()), w, SLOT(accept()));
+    connect(dlg, SIGNAL(okClicked()), this, SLOT(configure()));
+}
+
+void ProblemReporter::slotPartAdded( KParts::Part* part )
+{
+	KTextEditor::MarkInterfaceExtension* iface = dynamic_cast<KTextEditor::MarkInterfaceExtension*>( part );
+	
+	if( !iface )
+		return;
+		
+	iface->setPixmap( KTextEditor::MarkInterface::markType07, SmallIcon("stop") );
+}
+
+void ProblemReporter::slotPartRemoved( KParts::Part* part )
+{
+    kdDebug() << "ProblemReporter::slotPartRemoved()" << endl;
+    if( part == m_document ){
+        m_document = 0;
+        m_editor = 0;
+        m_timer->stop();
+    }
+}
+
+#include "problemreporter.moc"