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.
445 lines
9.8 KiB
445 lines
9.8 KiB
// This module implements the QextScintillaLexer class.
|
|
//
|
|
// Copyright (c) 2006
|
|
// Riverbank Computing Limited <info@riverbankcomputing.co.uk>
|
|
//
|
|
// This file is part of TQScintilla.
|
|
//
|
|
// This copy of TQScintilla 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.
|
|
//
|
|
// TQScintilla 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
|
|
// TQScintilla; see the file LICENSE. If not, write to the Free Software
|
|
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
|
|
#include <tqapplication.h>
|
|
#include <tqcolor.h>
|
|
#include <tqfont.h>
|
|
#include <tqsettings.h>
|
|
|
|
#include "qextscintillalexer.h"
|
|
#include "qextscintilla.h"
|
|
#include "qextscintillabase.h"
|
|
|
|
|
|
// The ctor.
|
|
QextScintillaLexer::QextScintillaLexer(TQObject *parent,const char *name)
|
|
: TQObject(parent,name), autoIndStyle(-1)
|
|
{
|
|
#if defined(Q_OS_WIN)
|
|
defFont = TQFont("Verdana",10);
|
|
#else
|
|
defFont = TQFont("Bitstream Vera Sans",9);
|
|
#endif
|
|
|
|
// Set the default fore and background colours.
|
|
TQColorGroup cg = TQApplication::palette().active();
|
|
defColor = cg.text();
|
|
defPaper = cg.base();
|
|
}
|
|
|
|
|
|
// The dtor.
|
|
QextScintillaLexer::~QextScintillaLexer()
|
|
{
|
|
}
|
|
|
|
|
|
// Default implementation to return the set of fill up characters that can end
|
|
// auto-completion.
|
|
const char *QextScintillaLexer::autoCompletionFillups() const
|
|
{
|
|
return "(";
|
|
}
|
|
|
|
|
|
// Default implementation to return the set of characters that can start
|
|
// auto-completion.
|
|
const char *QextScintillaLexer::autoCompletionStartCharacters() const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Default implementation to return the list of keywords that can start a
|
|
// block.
|
|
const char *QextScintillaLexer::blockStartKeyword(int *) const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Default implementation to return the list of characters that can start a
|
|
// block.
|
|
const char *QextScintillaLexer::blockStart(int *) const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Default implementation to return the list of characters that can end a
|
|
// block.
|
|
const char *QextScintillaLexer::blockEnd(int *) const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Default implementation to return the style used for braces.
|
|
int QextScintillaLexer::braceStyle() const
|
|
{
|
|
return -1;
|
|
}
|
|
|
|
|
|
// Default implementation to return the number of lines to look back when
|
|
// auto-indenting.
|
|
int QextScintillaLexer::blockLookback() const
|
|
{
|
|
return 20;
|
|
}
|
|
|
|
|
|
// Default implementation to return the characters that make up a word.
|
|
const char *QextScintillaLexer::wordCharacters() const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Default implementation to return the style used for whitespace.
|
|
int QextScintillaLexer::defaultStyle() const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Returns the foreground colour of the text for a style.
|
|
TQColor QextScintillaLexer::color(int) const
|
|
{
|
|
return defaultColor();
|
|
}
|
|
|
|
|
|
// Returns the end-of-line fill for a style.
|
|
bool QextScintillaLexer::eolFill(int) const
|
|
{
|
|
return FALSE;
|
|
}
|
|
|
|
|
|
// Returns the font for a style.
|
|
TQFont QextScintillaLexer::font(int) const
|
|
{
|
|
return defaultFont();
|
|
}
|
|
|
|
|
|
// Returns the set of keywords.
|
|
const char *QextScintillaLexer::keywords(int) const
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Returns the background colour of the text for a style.
|
|
TQColor QextScintillaLexer::paper(int) const
|
|
{
|
|
return defaultPaper();
|
|
}
|
|
|
|
|
|
// Returns the default font for all styles.
|
|
TQFont QextScintillaLexer::defaultFont() const
|
|
{
|
|
return defFont;
|
|
}
|
|
|
|
|
|
// Sets the default font for all styles.
|
|
void QextScintillaLexer::setDefaultFont(const TQFont &f)
|
|
{
|
|
defFont = f;
|
|
}
|
|
|
|
|
|
// Returns the default text colour for all styles.
|
|
TQColor QextScintillaLexer::defaultColor() const
|
|
{
|
|
return defColor;
|
|
}
|
|
|
|
|
|
// Sets the default text colour for all styles.
|
|
void QextScintillaLexer::setDefaultColor(const TQColor &c)
|
|
{
|
|
defColor = c;
|
|
}
|
|
|
|
|
|
// Returns the default paper colour for all styles.
|
|
TQColor QextScintillaLexer::defaultPaper() const
|
|
{
|
|
return defPaper;
|
|
}
|
|
|
|
|
|
// Sets the default paper colour for all styles.
|
|
void QextScintillaLexer::setDefaultPaper(const TQColor &c)
|
|
{
|
|
defPaper = c;
|
|
}
|
|
|
|
|
|
// Read properties from the settings.
|
|
bool QextScintillaLexer::readProperties(TQSettings &,const TQString &)
|
|
{
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
// Refresh all properties.
|
|
void QextScintillaLexer::refreshProperties()
|
|
{
|
|
}
|
|
|
|
|
|
// Write properties to the settings.
|
|
bool QextScintillaLexer::writeProperties(TQSettings &,const TQString &) const
|
|
{
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
// Restore the user settings.
|
|
bool QextScintillaLexer::readSettings(TQSettings &qs,const char *prefix)
|
|
{
|
|
bool ok, flag, rc = TRUE;
|
|
int num;
|
|
TQString key;
|
|
|
|
// Read the styles.
|
|
for (int i = 0; i < 128; ++i)
|
|
{
|
|
// Ignore invalid styles.
|
|
if (description(i).isNull())
|
|
continue;
|
|
|
|
key.sprintf("%s/%s/style%d/",prefix,language(),i);
|
|
|
|
// Read the foreground colour.
|
|
num = qs.readNumEntry(key + "color",0,&ok);
|
|
|
|
if (ok)
|
|
emit colorChanged(TQColor((num >> 16) & 0xff,(num >> 8) & 0xff,num & 0xff),i);
|
|
else
|
|
rc = FALSE;
|
|
|
|
// Read the end-of-line fill.
|
|
flag = qs.readBoolEntry(key + "eolfill",0,&ok);
|
|
|
|
if (ok)
|
|
emit eolFillChanged(flag,i);
|
|
else
|
|
rc = FALSE;
|
|
|
|
// Read the font
|
|
TQStringList fdesc;
|
|
|
|
fdesc = qs.readListEntry(key + "font",',',&ok);
|
|
|
|
if (ok && fdesc.count() == 5)
|
|
{
|
|
TQFont f;
|
|
|
|
f.setFamily(fdesc[0]);
|
|
f.setPointSize(fdesc[1].toInt());
|
|
f.setBold(fdesc[2].toInt());
|
|
f.setItalic(fdesc[3].toInt());
|
|
f.setUnderline(fdesc[4].toInt());
|
|
|
|
emit fontChanged(f,i);
|
|
}
|
|
else
|
|
rc = FALSE;
|
|
|
|
// Read the background colour.
|
|
num = qs.readNumEntry(key + "paper",0,&ok);
|
|
|
|
if (ok)
|
|
emit paperChanged(TQColor((num >> 16) & 0xff,(num >> 8) & 0xff,num & 0xff),i);
|
|
else
|
|
rc = FALSE;
|
|
}
|
|
|
|
// Read the properties.
|
|
key.sprintf("%s/%s/properties/",prefix,language());
|
|
|
|
if (!readProperties(qs,key))
|
|
rc = FALSE;
|
|
|
|
refreshProperties();
|
|
|
|
// Read the rest.
|
|
key.sprintf("%s/%s/",prefix,language());
|
|
|
|
num = qs.readNumEntry(key + "autoindentstyle",0,&ok);
|
|
|
|
if (ok)
|
|
autoIndStyle = num;
|
|
else
|
|
rc = FALSE;
|
|
|
|
return rc;
|
|
}
|
|
|
|
|
|
// Save the user settings.
|
|
bool QextScintillaLexer::writeSettings(TQSettings &qs,const char *prefix) const
|
|
{
|
|
bool rc = TRUE;
|
|
TQString key;
|
|
|
|
// Write the styles.
|
|
for (int i = 0; i < 128; ++i)
|
|
{
|
|
// Ignore invalid styles.
|
|
if (description(i).isNull())
|
|
continue;
|
|
|
|
int num;
|
|
TQColor c;
|
|
|
|
key.sprintf("%s/%s/style%d/",prefix,language(),i);
|
|
|
|
// Write the foreground colour.
|
|
c = color(i);
|
|
num = (c.red() << 16) | (c.green() << 8) | c.blue();
|
|
|
|
if (!qs.writeEntry(key + "color",num))
|
|
rc = FALSE;
|
|
|
|
// Write the end-of-line fill.
|
|
if (!qs.writeEntry(key + "eolfill",eolFill(i)))
|
|
rc = FALSE;
|
|
|
|
// Write the font
|
|
TQStringList fdesc;
|
|
TQString fmt("%1");
|
|
TQFont f;
|
|
|
|
f = font(i);
|
|
|
|
fdesc += f.family();
|
|
fdesc += fmt.arg(f.pointSize());
|
|
|
|
// The casts are for Borland.
|
|
fdesc += fmt.arg((int)f.bold());
|
|
fdesc += fmt.arg((int)f.italic());
|
|
fdesc += fmt.arg((int)f.underline());
|
|
|
|
if (!qs.writeEntry(key + "font",fdesc,','))
|
|
rc = FALSE;
|
|
|
|
// Write the background colour.
|
|
c = paper(i);
|
|
num = (c.red() << 16) | (c.green() << 8) | c.blue();
|
|
|
|
if (!qs.writeEntry(key + "paper",num))
|
|
rc = FALSE;
|
|
}
|
|
|
|
// Write the properties.
|
|
key.sprintf("%s/%s/properties/",prefix,language());
|
|
|
|
if (!writeProperties(qs,key))
|
|
rc = FALSE;
|
|
|
|
// Write the rest.
|
|
key.sprintf("%s/%s/",prefix,language());
|
|
|
|
if (!qs.writeEntry(key + "autoindentstyle",autoIndStyle))
|
|
rc = FALSE;
|
|
|
|
return rc;
|
|
}
|
|
|
|
|
|
// Return the auto-indentation style.
|
|
int QextScintillaLexer::autoIndentStyle()
|
|
{
|
|
// We can't do this in the ctor because we want the virtuals to work.
|
|
if (autoIndStyle < 0)
|
|
autoIndStyle = (blockStartKeyword() || blockStart() || blockEnd()) ?
|
|
0 : QextScintilla::AiMaintain;
|
|
|
|
return autoIndStyle;
|
|
}
|
|
|
|
|
|
// Set the auto-indentation style.
|
|
void QextScintillaLexer::setAutoIndentStyle(int autoindentstyle)
|
|
{
|
|
autoIndStyle = autoindentstyle;
|
|
}
|
|
|
|
|
|
// Set the foreground colour for a style.
|
|
void QextScintillaLexer::setColor(const TQColor &c,int style)
|
|
{
|
|
if (style >= 0)
|
|
emit colorChanged(c,style);
|
|
else
|
|
for (int i = 0; i < 128; ++i)
|
|
if (!description(i).isNull())
|
|
emit colorChanged(c,i);
|
|
}
|
|
|
|
|
|
// Set the end-of-line fill for a style.
|
|
void QextScintillaLexer::setEolFill(bool eolfill,int style)
|
|
{
|
|
if (style >= 0)
|
|
emit eolFillChanged(eolfill,style);
|
|
else
|
|
for (int i = 0; i < 128; ++i)
|
|
if (!description(i).isNull())
|
|
emit eolFillChanged(eolfill,i);
|
|
}
|
|
|
|
|
|
// Set the font for a style.
|
|
void QextScintillaLexer::setFont(const TQFont &f,int style)
|
|
{
|
|
if (style >= 0)
|
|
emit fontChanged(f,style);
|
|
else
|
|
for (int i = 0; i < 128; ++i)
|
|
if (!description(i).isNull())
|
|
emit fontChanged(f,i);
|
|
}
|
|
|
|
|
|
// Set the background colour for a style.
|
|
void QextScintillaLexer::setPaper(const TQColor &c,int style)
|
|
{
|
|
if (style >= 0)
|
|
emit paperChanged(c,style);
|
|
else
|
|
{
|
|
for (int i = 0; i < 128; ++i)
|
|
if (!description(i).isNull())
|
|
emit paperChanged(c,i);
|
|
|
|
emit paperChanged(c,QextScintillaBase::STYLE_DEFAULT);
|
|
}
|
|
}
|