123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309 |
- // This module implements the QsciLexerTeX class.
- //
- // Copyright (c) 2017 Riverbank Computing Limited <info@riverbankcomputing.com>
- //
- // This file is part of QScintilla.
- //
- // This file may be used under the terms of the GNU General Public License
- // version 3.0 as published by the Free Software Foundation and appearing in
- // the file LICENSE included in the packaging of this file. Please review the
- // following information to ensure the GNU General Public License version 3.0
- // requirements will be met: http://www.gnu.org/copyleft/gpl.html.
- //
- // If you do not wish to use this file under the terms of the GPL version 3.0
- // then you may purchase a commercial license. For more information contact
- // info@riverbankcomputing.com.
- //
- // This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
- // WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
- #include "Qsci/qscilexertex.h"
- #include <qcolor.h>
- #include <qfont.h>
- #include <qsettings.h>
- // The ctor.
- QsciLexerTeX::QsciLexerTeX(QObject *parent)
- : QsciLexer(parent),
- fold_comments(false), fold_compact(true), process_comments(false),
- process_if(true)
- {
- }
- // The dtor.
- QsciLexerTeX::~QsciLexerTeX()
- {
- }
- // Returns the language name.
- const char *QsciLexerTeX::language() const
- {
- return "TeX";
- }
- // Returns the lexer name.
- const char *QsciLexerTeX::lexer() const
- {
- return "tex";
- }
- // Return the string of characters that comprise a word.
- const char *QsciLexerTeX::wordCharacters() const
- {
- return "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ\\@";
- }
- // Returns the foreground colour of the text for a style.
- QColor QsciLexerTeX::defaultColor(int style) const
- {
- switch (style)
- {
- case Default:
- return QColor(0x3f,0x3f,0x3f);
- case Special:
- return QColor(0x00,0x7f,0x7f);
- case Group:
- return QColor(0x7f,0x00,0x00);
- case Symbol:
- return QColor(0x7f,0x7f,0x00);
- case Command:
- return QColor(0x00,0x7f,0x00);
- }
- return QsciLexer::defaultColor(style);
- }
- // Returns the set of keywords.
- const char *QsciLexerTeX::keywords(int set) const
- {
- if (set == 1)
- return
- "above abovedisplayshortskip abovedisplayskip "
- "abovewithdelims accent adjdemerits advance "
- "afterassignment aftergroup atop atopwithdelims "
- "badness baselineskip batchmode begingroup "
- "belowdisplayshortskip belowdisplayskip binoppenalty "
- "botmark box boxmaxdepth brokenpenalty catcode char "
- "chardef cleaders closein closeout clubpenalty copy "
- "count countdef cr crcr csname day deadcycles def "
- "defaulthyphenchar defaultskewchar delcode delimiter "
- "delimiterfactor delimeters delimitershortfall "
- "delimeters dimen dimendef discretionary "
- "displayindent displaylimits displaystyle "
- "displaywidowpenalty displaywidth divide "
- "doublehyphendemerits dp dump edef else "
- "emergencystretch end endcsname endgroup endinput "
- "endlinechar eqno errhelp errmessage "
- "errorcontextlines errorstopmode escapechar everycr "
- "everydisplay everyhbox everyjob everymath everypar "
- "everyvbox exhyphenpenalty expandafter fam fi "
- "finalhyphendemerits firstmark floatingpenalty font "
- "fontdimen fontname futurelet gdef global group "
- "globaldefs halign hangafter hangindent hbadness "
- "hbox hfil horizontal hfill horizontal hfilneg hfuzz "
- "hoffset holdinginserts hrule hsize hskip hss "
- "horizontal ht hyphenation hyphenchar hyphenpenalty "
- "hyphen if ifcase ifcat ifdim ifeof iffalse ifhbox "
- "ifhmode ifinner ifmmode ifnum ifodd iftrue ifvbox "
- "ifvmode ifvoid ifx ignorespaces immediate indent "
- "input inputlineno input insert insertpenalties "
- "interlinepenalty jobname kern language lastbox "
- "lastkern lastpenalty lastskip lccode leaders left "
- "lefthyphenmin leftskip leqno let limits linepenalty "
- "line lineskip lineskiplimit long looseness lower "
- "lowercase mag mark mathaccent mathbin mathchar "
- "mathchardef mathchoice mathclose mathcode mathinner "
- "mathop mathopen mathord mathpunct mathrel "
- "mathsurround maxdeadcycles maxdepth meaning "
- "medmuskip message mkern month moveleft moveright "
- "mskip multiply muskip muskipdef newlinechar noalign "
- "noboundary noexpand noindent nolimits nonscript "
- "scriptscript nonstopmode nulldelimiterspace "
- "nullfont number omit openin openout or outer output "
- "outputpenalty over overfullrule overline "
- "overwithdelims pagedepth pagefilllstretch "
- "pagefillstretch pagefilstretch pagegoal pageshrink "
- "pagestretch pagetotal par parfillskip parindent "
- "parshape parskip patterns pausing penalty "
- "postdisplaypenalty predisplaypenalty predisplaysize "
- "pretolerance prevdepth prevgraf radical raise read "
- "relax relpenalty right righthyphenmin rightskip "
- "romannumeral scriptfont scriptscriptfont "
- "scriptscriptstyle scriptspace scriptstyle "
- "scrollmode setbox setlanguage sfcode shipout show "
- "showbox showboxbreadth showboxdepth showlists "
- "showthe skewchar skip skipdef spacefactor spaceskip "
- "span special splitbotmark splitfirstmark "
- "splitmaxdepth splittopskip string tabskip textfont "
- "textstyle the thickmuskip thinmuskip time toks "
- "toksdef tolerance topmark topskip tracingcommands "
- "tracinglostchars tracingmacros tracingonline "
- "tracingoutput tracingpages tracingparagraphs "
- "tracingrestores tracingstats uccode uchyph "
- "underline unhbox unhcopy unkern unpenalty unskip "
- "unvbox unvcopy uppercase vadjust valign vbadness "
- "vbox vcenter vfil vfill vfilneg vfuzz voffset vrule "
- "vsize vskip vsplit vss vtop wd widowpenalty write "
- "xdef xleaders xspaceskip year "
- "TeX bgroup egroup endgraf space empty null newcount "
- "newdimen newskip newmuskip newbox newtoks newhelp "
- "newread newwrite newfam newlanguage newinsert newif "
- "maxdimen magstephalf magstep frenchspacing "
- "nonfrenchspacing normalbaselines obeylines "
- "obeyspaces raggedr ight ttraggedright thinspace "
- "negthinspace enspace enskip quad qquad smallskip "
- "medskip bigskip removelastskip topglue vglue hglue "
- "break nobreak allowbreak filbreak goodbreak "
- "smallbreak medbreak bigbreak line leftline "
- "rightline centerline rlap llap underbar strutbox "
- "strut cases matrix pmatrix bordermatrix eqalign "
- "displaylines eqalignno leqalignno pageno folio "
- "tracingall showhyphens fmtname fmtversion hphantom "
- "vphantom phantom smash";
- return 0;
- }
- // Returns the user name of a style.
- QString QsciLexerTeX::description(int style) const
- {
- switch (style)
- {
- case Default:
- return tr("Default");
- case Special:
- return tr("Special");
- case Group:
- return tr("Group");
- case Symbol:
- return tr("Symbol");
- case Command:
- return tr("Command");
- case Text:
- return tr("Text");
- }
- return QString();
- }
- // Refresh all properties.
- void QsciLexerTeX::refreshProperties()
- {
- setCommentProp();
- setCompactProp();
- setProcessCommentsProp();
- setAutoIfProp();
- }
- // Read properties from the settings.
- bool QsciLexerTeX::readProperties(QSettings &qs, const QString &prefix)
- {
- int rc = true;
- fold_comments = qs.value(prefix + "foldcomments", false).toBool();
- fold_compact = qs.value(prefix + "foldcompact", true).toBool();
- process_comments = qs.value(prefix + "processcomments", false).toBool();
- process_if = qs.value(prefix + "processif", true).toBool();
- return rc;
- }
- // Write properties to the settings.
- bool QsciLexerTeX::writeProperties(QSettings &qs, const QString &prefix) const
- {
- int rc = true;
- qs.value(prefix + "foldcomments", fold_comments);
- qs.value(prefix + "foldcompact", fold_compact);
- qs.value(prefix + "processcomments", process_comments);
- qs.value(prefix + "processif", process_if);
- return rc;
- }
- // Set if comments can be folded.
- void QsciLexerTeX::setFoldComments(bool fold)
- {
- fold_comments = fold;
- setCommentProp();
- }
- // Set the "fold.comment" property.
- void QsciLexerTeX::setCommentProp()
- {
- emit propertyChanged("fold.comment", (fold_comments ? "1" : "0"));
- }
- // Set if folds are compact.
- void QsciLexerTeX::setFoldCompact(bool fold)
- {
- fold_compact = fold;
- setCompactProp();
- }
- // Set the "fold.compact" property.
- void QsciLexerTeX::setCompactProp()
- {
- emit propertyChanged("fold.compact", (fold_compact ? "1" : "0"));
- }
- // Set if comments are processed
- void QsciLexerTeX::setProcessComments(bool enable)
- {
- process_comments = enable;
- setProcessCommentsProp();
- }
- // Set the "lexer.tex.comment.process" property.
- void QsciLexerTeX::setProcessCommentsProp()
- {
- emit propertyChanged("lexer.tex.comment.process", (process_comments ? "1" : "0"));
- }
- // Set if \if<unknown> is processed
- void QsciLexerTeX::setProcessIf(bool enable)
- {
- process_if = enable;
- setAutoIfProp();
- }
- // Set the "lexer.tex.auto.if" property.
- void QsciLexerTeX::setAutoIfProp()
- {
- emit propertyChanged("lexer.tex.auto.if", (process_if ? "1" : "0"));
- }
|