Initial import of qscintilla from 2007

1 files changed, 198 insertions, 0 deletions

diff --git a/qt/qextscintillalexerbatch.cpp b/qt/qextscintillalexerbatch.cpp
new file mode 100644
index 0000000..57a9418
--- /dev/null
+++ b/qt/qextscintillalexerbatch.cpp
@@ -0,0 +1,198 @@
+// This module implements the QextScintillaLexerBatch class.
+//
+// Copyright (c) 2006
+// 	Riverbank Computing Limited <info@riverbankcomputing.co.uk>
+// 
+// This file is part of QScintilla.
+// 
+// This copy of QScintilla 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, or (at your option) any
+// later version.
+// 
+// QScintilla is supplied 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 General Public License for more
+// details.
+// 
+// You should have received a copy of the GNU General Public License along with
+// QScintilla; see the file LICENSE.  If not, write to the Free Software
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+
+#include <qcolor.h>
+#include <qfont.h>
+#include <qsettings.h>
+
+#include "qextscintillalexerbatch.h"
+
+
+// The ctor.
+QextScintillaLexerBatch::QextScintillaLexerBatch(QObject *parent,
+						 const char *name)
+	: QextScintillaLexer(parent,name)
+{
+}
+
+
+// The dtor.
+QextScintillaLexerBatch::~QextScintillaLexerBatch()
+{
+}
+
+
+// Returns the language name.
+const char *QextScintillaLexerBatch::language() const
+{
+	return "Batch";
+}
+
+
+// Returns the lexer name.
+const char *QextScintillaLexerBatch::lexer() const
+{
+	return "batch";
+}
+
+
+// Return the string of characters that comprise a word.
+const char *QextScintillaLexerBatch::wordCharacters() const
+{
+	return "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-";
+}
+
+
+// Returns the foreground colour of the text for a style.
+QColor QextScintillaLexerBatch::color(int style) const
+{
+	switch (style)
+	{
+	case Default:
+	case Operator:
+		return QColor(0x00,0x00,0x00);
+
+	case Comment:
+		return QColor(0x00,0x7f,0x00);
+
+	case Keyword:
+	case ExternalCommand:
+		return QColor(0x00,0x00,0x7f);
+
+	case Label:
+		return QColor(0x7f,0x00,0x7f);
+
+	case HideCommandChar:
+		return QColor(0x7f,0x7f,0x00);
+
+	case Variable:
+		return QColor(0x80,0x00,0x80);
+	}
+
+	return QextScintillaLexer::color(style);
+}
+
+
+// Returns the end-of-line fill for a style.
+bool QextScintillaLexerBatch::eolFill(int style) const
+{
+	return (style == Label);
+}
+
+
+// Returns the font of the text for a style.
+QFont QextScintillaLexerBatch::font(int style) const
+{
+	QFont f;
+
+	switch (style)
+	{
+	case Comment:
+#if defined(Q_OS_WIN)
+		f = QFont("Comic Sans MS",9);
+#else
+		f = QFont("Bitstream Vera Serif",9);
+#endif
+		break;
+
+	case Keyword:
+		f = QextScintillaLexer::font(style);
+		f.setBold(TRUE);
+		break;
+
+	case ExternalCommand:
+#if defined(Q_OS_WIN)
+		f = QFont("Courier New",10);
+#else
+		f = QFont("Bitstream Vera Sans Mono",9);
+#endif
+		f.setBold(TRUE);
+		break;
+
+	default:
+		f = QextScintillaLexer::font(style);
+	}
+
+	return f;
+}
+
+
+// Returns the set of keywords.
+const char *QextScintillaLexerBatch::keywords(int set) const
+{
+	if (set == 1)
+		return
+			"rem set if exist errorlevel for in do break call "
+			"chcp cd chdir choice cls country ctty date del "
+			"erase dir echo exit goto loadfix loadhigh mkdir md "
+			"move path pause prompt rename ren rmdir rd shift "
+			"time type ver verify vol com con lpt nul";
+
+	return 0;
+}
+
+
+// Returns the user name of a style.
+QString QextScintillaLexerBatch::description(int style) const
+{
+	switch (style)
+	{
+	case Default:
+		return tr("Default");
+
+	case Comment:
+		return tr("Comment");
+
+	case Keyword:
+		return tr("Keyword");
+
+	case Label:
+		return tr("Label");
+
+	case HideCommandChar:
+		return tr("Hide command character");
+
+	case ExternalCommand:
+		return tr("External command");
+
+	case Variable:
+		return tr("Variable");
+
+	case Operator:
+		return tr("Operator");
+	}
+
+	return QString::null;
+}
+
+
+// Returns the background colour of the text for a style.
+QColor QextScintillaLexerBatch::paper(int style) const
+{
+	switch (style)
+	{
+	case Label:
+		return QColor(0x60,0x60,0x60);
+	}
+
+	return QextScintillaLexer::paper(style);
+}