Added KDE3 version of ktechlab

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

1 files changed, 209 insertions, 0 deletions

diff --git a/src/asmformatter.cpp b/src/asmformatter.cpp
new file mode 100644
index 0000000..fb77789
--- /dev/null
+++ b/src/asmformatter.cpp
@@ -0,0 +1,209 @@
+/***************************************************************************
+ *   Copyright (C) 2003-2005 by David Saxton                               *
+ *   david@bluehaze.org                                                    *
+ *                                                                         *
+ *   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 "asmformatter.h"
+#include "core/ktlconfig.h"
+#include "picinfo12bit.h"
+#include "picinfo14bit.h"
+#include "picinfo16bit.h"
+
+static QString extractComment( const QString & line )
+{
+	int pos = line.find( ';' );
+	
+	if ( pos == -1 )
+		return "";
+	
+	return line.right( line.length() - pos );
+}
+
+
+//BEGIN class AsmFormatter
+AsmFormatter::AsmFormatter()
+{
+}
+
+
+AsmFormatter::~AsmFormatter()
+{
+}
+
+
+QString AsmFormatter::tidyAsm( QStringList lines )
+{
+	// Update our indentation values from config
+	m_indentAsmName = KTLConfig::indentAsmName();
+	m_indentAsmData = KTLConfig::indentAsmData();
+	m_indentEqu = KTLConfig::indentEqu();
+	m_indentEquValue = KTLConfig::indentEquValue();
+	m_indentComment = m_indentEquComment = KTLConfig::indentComment();
+	
+	QStringList::iterator end = lines.end();
+	for ( QStringList::iterator slit = lines.begin(); slit != end; ++slit )
+	{
+		switch ( lineType(*slit) )
+		{
+			case Other:
+				break;
+				
+			case Equ:
+				*slit = tidyEqu( *slit );
+				break;
+				
+			case Instruction:
+				*slit = tidyInstruction( *slit );
+				break;
+		}
+	}
+	
+	QString code;
+	
+	for ( QStringList::iterator slit = lines.begin(); slit != end; ++slit )
+		code.append( *slit + '\n' );
+	
+	return code;
+}
+
+
+void AsmFormatter::pad( QString & text, int length )
+{
+	int padLength = length - text.length();
+	if ( padLength <= 0 )
+		return;
+	
+	QString pad;
+	pad.fill( ' ', padLength );
+	text += pad;
+}
+
+
+QString AsmFormatter::tidyInstruction( const QString & oldLine )
+{
+	InstructionParts parts( oldLine );
+	QString line;
+	
+	if ( !parts.label().isEmpty() )
+		line = parts.label() + ' ';
+	pad( line, m_indentAsmName );
+	
+	if ( !parts.operand().isEmpty() )
+		line += parts.operand() + ' ';
+	pad( line, m_indentAsmData );
+	
+	if ( !parts.operandData().isEmpty() )
+		line += parts.operandData();
+	pad( line, m_indentComment );
+	
+	if ( parts.comment().isEmpty() )
+	{
+		// Remove any whitespace at the end if we're not padding out a comment
+		while ( !line.isEmpty() && line[ line.length() - 1 ].isSpace() )
+			line.remove( line.length() -1, 1 );
+	}
+	else
+		line += parts.comment();
+	
+	return line;
+}
+
+
+QString AsmFormatter::tidyEqu( const QString & oldLine )
+{
+	QString comment = extractComment( oldLine );
+	QString code = oldLine;
+	code.remove( comment );
+	code = code.simplifyWhiteSpace();
+
+    QStringList parts = QStringList::split( ' ', code );
+
+	QString pad0, pad1, pad2;
+	pad0.fill( ' ', m_indentEqu - (*parts.at(0)).length() );
+	pad1.fill( ' ', m_indentEquValue - m_indentEqu - (*parts.at(1)).length() );
+	pad2.fill( ' ', m_indentEquComment - m_indentEquValue - m_indentEqu - (*parts.at(2)).length() );
+
+	code = *parts.at(0) + pad0;
+	code += *parts.at(1) + pad1;
+	code += *parts.at(2);
+	if ( !comment.isEmpty() )
+	{
+		code += pad2;
+		code += comment;
+	}
+	
+	return code;
+}
+
+
+AsmFormatter::LineType AsmFormatter::lineType( QString line )
+{
+	line = line.simplifyWhiteSpace();
+	
+	line.remove( extractComment( line ) );
+	
+	QStringList parts = QStringList::split( ' ', line );
+	QStringList::iterator end = parts.end();
+	for ( QStringList::iterator it = parts.begin(); it != end; ++it )
+	{
+		if ( (*it).lower() == "equ" )
+			return Equ;
+	}
+	
+	InstructionParts instructionParts( line );
+	if ( !instructionParts.operand().isEmpty() )
+		return Instruction;
+	
+	return Other;
+}
+//END class AsmFormatter
+
+
+
+//BEGIN class InstructionParts
+InstructionParts::InstructionParts( QString line )
+{
+	m_comment = extractComment( line );
+	line.remove( m_comment );
+	
+	line = line.simplifyWhiteSpace();
+	QStringList parts = QStringList::split( ' ', line );
+	
+	bool foundOperand = false;
+	QStringList::iterator end = parts.end();
+	for ( QStringList::iterator it = parts.begin(); it != end; ++it )
+	{
+		if ( foundOperand )
+		{
+			// Already found the operand, so anything else must be the operand
+			// data.
+			
+			if ( m_operandData.isEmpty() )
+				m_operandData = *it;
+			else
+				m_operandData += ' ' + *it;
+			
+			continue;
+		}
+		
+		if ( PicAsm12bit::self()->operandList().contains( (*it).upper() )
+				   || PicAsm14bit::self()->operandList().contains( (*it).upper() )
+				   || PicAsm16bit::self()->operandList().contains( (*it).upper() ) )
+		{
+			m_operand = *it;
+			foundOperand = true;
+		}
+		else
+		{
+			// Must be a label
+			m_label = *it;
+		}
+	}
+}
+//END class InstructionParts
+