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.
2042 lines
63 KiB
2042 lines
63 KiB
// Scintilla source code edit control |
|
/** @file LexHTML.cxx |
|
** Lexer for HTML. |
|
**/ |
|
// Copyright 1998-2005 by Neil Hodgson <neilh@scintilla.org> |
|
// The License.txt file describes the conditions under which this software may be distributed. |
|
|
|
#include <stdlib.h> |
|
#include <string.h> |
|
#include <ctype.h> |
|
#include <stdio.h> |
|
#include <stdarg.h> |
|
|
|
#include "Platform.h" |
|
|
|
#include "PropSet.h" |
|
#include "Accessor.h" |
|
#include "StyleContext.h" |
|
#include "KeyWords.h" |
|
#include "Scintilla.h" |
|
#include "SciLexer.h" |
|
|
|
#define SCE_HA_JS (SCE_HJA_START - SCE_HJ_START) |
|
#define SCE_HA_VBS (SCE_HBA_START - SCE_HB_START) |
|
#define SCE_HA_PYTHON (SCE_HPA_START - SCE_HP_START) |
|
|
|
enum script_type { eScriptNone = 0, eScriptJS, eScriptVBS, eScriptPython, eScriptPHP, eScriptXML, eScriptSGML, eScriptSGMLblock }; |
|
enum script_mode { eHtml = 0, eNonHtmlScript, eNonHtmlPreProc, eNonHtmlScriptPreProc }; |
|
|
|
static inline bool IsAWordChar(const int ch) { |
|
return (ch < 0x80) && (isalnum(ch) || ch == '.' || ch == '_'); |
|
} |
|
|
|
static inline bool IsAWordStart(const int ch) { |
|
return (ch < 0x80) && (isalnum(ch) || ch == '_'); |
|
} |
|
|
|
static inline int MakeLowerCase(int ch) { |
|
if (ch < 'A' || ch > 'Z') |
|
return ch; |
|
else |
|
return ch - 'A' + 'a'; |
|
} |
|
|
|
static void GetTextSegment(Accessor &styler, unsigned int start, unsigned int end, char *s, size_t len) { |
|
size_t i = 0; |
|
for (; (i < end - start + 1) && (i < len-1); i++) { |
|
s[i] = static_cast<char>(MakeLowerCase(styler[start + i])); |
|
} |
|
s[i] = '\0'; |
|
} |
|
|
|
static script_type segIsScriptingIndicator(Accessor &styler, unsigned int start, unsigned int end, script_type prevValue) { |
|
char s[100]; |
|
GetTextSegment(styler, start, end, s, sizeof(s)); |
|
//Platform::DebugPrintf("Scripting indicator [%s]\n", s); |
|
if (strstr(s, "src")) // External script |
|
return eScriptNone; |
|
if (strstr(s, "vbs")) |
|
return eScriptVBS; |
|
if (strstr(s, "pyth")) |
|
return eScriptPython; |
|
if (strstr(s, "javas")) |
|
return eScriptJS; |
|
if (strstr(s, "jscr")) |
|
return eScriptJS; |
|
if (strstr(s, "php")) |
|
return eScriptPHP; |
|
if (strstr(s, "xml")) |
|
return eScriptXML; |
|
|
|
return prevValue; |
|
} |
|
|
|
static int PrintScriptingIndicatorOffset(Accessor &styler, unsigned int start, unsigned int end) { |
|
int iResult = 0; |
|
char s[100]; |
|
GetTextSegment(styler, start, end, s, sizeof(s)); |
|
if (0 == strncmp(s, "php", 3)) { |
|
iResult = 3; |
|
} |
|
|
|
return iResult; |
|
} |
|
|
|
static script_type ScriptOfState(int state) { |
|
if ((state >= SCE_HP_START) && (state <= SCE_HP_IDENTIFIER)) { |
|
return eScriptPython; |
|
} else if ((state >= SCE_HB_START) && (state <= SCE_HB_STRINGEOL)) { |
|
return eScriptVBS; |
|
} else if ((state >= SCE_HJ_START) && (state <= SCE_HJ_REGEX)) { |
|
return eScriptJS; |
|
} else if ((state >= SCE_HPHP_DEFAULT) && (state <= SCE_HPHP_COMMENTLINE)) { |
|
return eScriptPHP; |
|
} else if ((state >= SCE_H_SGML_DEFAULT) && (state < SCE_H_SGML_BLOCK_DEFAULT)) { |
|
return eScriptSGML; |
|
} else if (state == SCE_H_SGML_BLOCK_DEFAULT) { |
|
return eScriptSGMLblock; |
|
} else { |
|
return eScriptNone; |
|
} |
|
} |
|
|
|
static int statePrintForState(int state, script_mode inScriptType) { |
|
int StateToPrint; |
|
|
|
if ((state >= SCE_HP_START) && (state <= SCE_HP_IDENTIFIER)) { |
|
StateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_PYTHON); |
|
} else if ((state >= SCE_HB_START) && (state <= SCE_HB_STRINGEOL)) { |
|
StateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_VBS); |
|
} else if ((state >= SCE_HJ_START) && (state <= SCE_HJ_REGEX)) { |
|
StateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_JS); |
|
} else { |
|
StateToPrint = state; |
|
} |
|
|
|
return StateToPrint; |
|
} |
|
|
|
static int stateForPrintState(int StateToPrint) { |
|
int state; |
|
|
|
if ((StateToPrint >= SCE_HPA_START) && (StateToPrint <= SCE_HPA_IDENTIFIER)) { |
|
state = StateToPrint - SCE_HA_PYTHON; |
|
} else if ((StateToPrint >= SCE_HBA_START) && (StateToPrint <= SCE_HBA_STRINGEOL)) { |
|
state = StateToPrint - SCE_HA_VBS; |
|
} else if ((StateToPrint >= SCE_HJA_START) && (StateToPrint <= SCE_HJA_REGEX)) { |
|
state = StateToPrint - SCE_HA_JS; |
|
} else { |
|
state = StateToPrint; |
|
} |
|
|
|
return state; |
|
} |
|
|
|
static inline bool IsNumber(unsigned int start, Accessor &styler) { |
|
return IsADigit(styler[start]) || (styler[start] == '.') || |
|
(styler[start] == '-') || (styler[start] == '#'); |
|
} |
|
|
|
static inline bool isStringState(int state) { |
|
bool bResult; |
|
|
|
switch (state) { |
|
case SCE_HJ_DOUBLESTRING: |
|
case SCE_HJ_SINGLESTRING: |
|
case SCE_HJA_DOUBLESTRING: |
|
case SCE_HJA_SINGLESTRING: |
|
case SCE_HB_STRING: |
|
case SCE_HBA_STRING: |
|
case SCE_HP_STRING: |
|
case SCE_HP_CHARACTER: |
|
case SCE_HP_TRIPLE: |
|
case SCE_HP_TRIPLEDOUBLE: |
|
case SCE_HPA_STRING: |
|
case SCE_HPA_CHARACTER: |
|
case SCE_HPA_TRIPLE: |
|
case SCE_HPA_TRIPLEDOUBLE: |
|
case SCE_HPHP_HSTRING: |
|
case SCE_HPHP_SIMPLESTRING: |
|
case SCE_HPHP_HSTRING_VARIABLE: |
|
case SCE_HPHP_COMPLEX_VARIABLE: |
|
bResult = true; |
|
break; |
|
default : |
|
bResult = false; |
|
break; |
|
} |
|
return bResult; |
|
} |
|
|
|
static inline bool stateAllowsTermination(int state) { |
|
bool allowTermination = !isStringState(state); |
|
if (allowTermination) { |
|
switch (state) { |
|
case SCE_HPHP_COMMENT: |
|
case SCE_HP_COMMENTLINE: |
|
case SCE_HPA_COMMENTLINE: |
|
allowTermination = false; |
|
} |
|
} |
|
return allowTermination; |
|
} |
|
|
|
// not really well done, since it's only comments that should lex the %> and <% |
|
static inline bool isCommentASPState(int state) { |
|
bool bResult; |
|
|
|
switch (state) { |
|
case SCE_HJ_COMMENT: |
|
case SCE_HJ_COMMENTLINE: |
|
case SCE_HJ_COMMENTDOC: |
|
case SCE_HB_COMMENTLINE: |
|
case SCE_HP_COMMENTLINE: |
|
case SCE_HPHP_COMMENT: |
|
case SCE_HPHP_COMMENTLINE: |
|
bResult = true; |
|
break; |
|
default : |
|
bResult = false; |
|
break; |
|
} |
|
return bResult; |
|
} |
|
|
|
static void classifyAttribHTML(unsigned int start, unsigned int end, WordList &keywords, Accessor &styler) { |
|
bool wordIsNumber = IsNumber(start, styler); |
|
char chAttr = SCE_H_ATTRIBUTEUNKNOWN; |
|
if (wordIsNumber) { |
|
chAttr = SCE_H_NUMBER; |
|
} else { |
|
char s[100]; |
|
GetTextSegment(styler, start, end, s, sizeof(s)); |
|
if (keywords.InList(s)) |
|
chAttr = SCE_H_ATTRIBUTE; |
|
} |
|
if ((chAttr == SCE_H_ATTRIBUTEUNKNOWN) && !keywords) |
|
// No keywords -> all are known |
|
chAttr = SCE_H_ATTRIBUTE; |
|
styler.ColourTo(end, chAttr); |
|
} |
|
|
|
static int classifyTagHTML(unsigned int start, unsigned int end, |
|
WordList &keywords, Accessor &styler, bool &tagDontFold, |
|
bool caseSensitive) { |
|
char s[30 + 2]; |
|
// Copy after the '<' |
|
unsigned int i = 0; |
|
for (unsigned int cPos = start; cPos <= end && i < 30; cPos++) { |
|
char ch = styler[cPos]; |
|
if ((ch != '<') && (ch != '/')) { |
|
s[i++] = caseSensitive ? ch : static_cast<char>(MakeLowerCase(ch)); |
|
} |
|
} |
|
|
|
//The following is only a quick hack, to see if this whole thing would work |
|
//we first need the tagname with a trailing space... |
|
s[i] = ' '; |
|
s[i+1] = '\0'; |
|
|
|
//...to find it in the list of no-container-tags |
|
// (There are many more. We will need a keywordlist in the property file for this) |
|
tagDontFold = (NULL != strstr("meta link img area br hr input ",s)); |
|
|
|
//now we can remove the trailing space |
|
s[i] = '\0'; |
|
|
|
bool isScript = false; |
|
char chAttr = SCE_H_TAGUNKNOWN; |
|
if (s[0] == '!') { |
|
chAttr = SCE_H_SGML_DEFAULT; |
|
} else if (s[0] == '/') { // Closing tag |
|
if (keywords.InList(s + 1)) |
|
chAttr = SCE_H_TAG; |
|
} else { |
|
if (keywords.InList(s)) { |
|
chAttr = SCE_H_TAG; |
|
isScript = 0 == strcmp(s, "script"); |
|
} |
|
} |
|
if ((chAttr == SCE_H_TAGUNKNOWN) && !keywords) { |
|
// No keywords -> all are known |
|
chAttr = SCE_H_TAG; |
|
isScript = 0 == strcmp(s, "script"); |
|
} |
|
styler.ColourTo(end, chAttr); |
|
return isScript ? SCE_H_SCRIPT : chAttr; |
|
} |
|
|
|
static void classifyWordHTJS(unsigned int start, unsigned int end, |
|
WordList &keywords, Accessor &styler, script_mode inScriptType) { |
|
char chAttr = SCE_HJ_WORD; |
|
bool wordIsNumber = IsADigit(styler[start]) || (styler[start] == '.'); |
|
if (wordIsNumber) |
|
chAttr = SCE_HJ_NUMBER; |
|
else { |
|
char s[30 + 1]; |
|
unsigned int i = 0; |
|
for (; i < end - start + 1 && i < 30; i++) { |
|
s[i] = styler[start + i]; |
|
} |
|
s[i] = '\0'; |
|
if (keywords.InList(s)) |
|
chAttr = SCE_HJ_KEYWORD; |
|
} |
|
styler.ColourTo(end, statePrintForState(chAttr, inScriptType)); |
|
} |
|
|
|
static int classifyWordHTVB(unsigned int start, unsigned int end, WordList &keywords, Accessor &styler, script_mode inScriptType) { |
|
char chAttr = SCE_HB_IDENTIFIER; |
|
bool wordIsNumber = IsADigit(styler[start]) || (styler[start] == '.'); |
|
if (wordIsNumber) |
|
chAttr = SCE_HB_NUMBER; |
|
else { |
|
char s[100]; |
|
GetTextSegment(styler, start, end, s, sizeof(s)); |
|
if (keywords.InList(s)) { |
|
chAttr = SCE_HB_WORD; |
|
if (strcmp(s, "rem") == 0) |
|
chAttr = SCE_HB_COMMENTLINE; |
|
} |
|
} |
|
styler.ColourTo(end, statePrintForState(chAttr, inScriptType)); |
|
if (chAttr == SCE_HB_COMMENTLINE) |
|
return SCE_HB_COMMENTLINE; |
|
else |
|
return SCE_HB_DEFAULT; |
|
} |
|
|
|
static void classifyWordHTPy(unsigned int start, unsigned int end, WordList &keywords, Accessor &styler, char *prevWord, script_mode inScriptType) { |
|
bool wordIsNumber = IsADigit(styler[start]); |
|
char s[30 + 1]; |
|
unsigned int i = 0; |
|
for (; i < end - start + 1 && i < 30; i++) { |
|
s[i] = styler[start + i]; |
|
} |
|
s[i] = '\0'; |
|
char chAttr = SCE_HP_IDENTIFIER; |
|
if (0 == strcmp(prevWord, "class")) |
|
chAttr = SCE_HP_CLASSNAME; |
|
else if (0 == strcmp(prevWord, "def")) |
|
chAttr = SCE_HP_DEFNAME; |
|
else if (wordIsNumber) |
|
chAttr = SCE_HP_NUMBER; |
|
else if (keywords.InList(s)) |
|
chAttr = SCE_HP_WORD; |
|
styler.ColourTo(end, statePrintForState(chAttr, inScriptType)); |
|
strcpy(prevWord, s); |
|
} |
|
|
|
// Update the word colour to default or keyword |
|
// Called when in a PHP word |
|
static void classifyWordHTPHP(unsigned int start, unsigned int end, WordList &keywords, Accessor &styler) { |
|
char chAttr = SCE_HPHP_DEFAULT; |
|
bool wordIsNumber = IsADigit(styler[start]) || (styler[start] == '.' && start+1 <= end && IsADigit(styler[start+1])); |
|
if (wordIsNumber) |
|
chAttr = SCE_HPHP_NUMBER; |
|
else { |
|
char s[100]; |
|
GetTextSegment(styler, start, end, s, sizeof(s)); |
|
if (keywords.InList(s)) |
|
chAttr = SCE_HPHP_WORD; |
|
} |
|
styler.ColourTo(end, chAttr); |
|
} |
|
|
|
static bool isWordHSGML(unsigned int start, unsigned int end, WordList &keywords, Accessor &styler) { |
|
char s[30 + 1]; |
|
unsigned int i = 0; |
|
for (; i < end - start + 1 && i < 30; i++) { |
|
s[i] = styler[start + i]; |
|
} |
|
s[i] = '\0'; |
|
return keywords.InList(s); |
|
} |
|
|
|
static bool isWordCdata(unsigned int start, unsigned int end, Accessor &styler) { |
|
char s[30 + 1]; |
|
unsigned int i = 0; |
|
for (; i < end - start + 1 && i < 30; i++) { |
|
s[i] = styler[start + i]; |
|
} |
|
s[i] = '\0'; |
|
return (0 == strcmp(s, "[CDATA[")); |
|
} |
|
|
|
// Return the first state to reach when entering a scripting language |
|
static int StateForScript(script_type scriptLanguage) { |
|
int Result; |
|
switch (scriptLanguage) { |
|
case eScriptVBS: |
|
Result = SCE_HB_START; |
|
break; |
|
case eScriptPython: |
|
Result = SCE_HP_START; |
|
break; |
|
case eScriptPHP: |
|
Result = SCE_HPHP_DEFAULT; |
|
break; |
|
case eScriptXML: |
|
Result = SCE_H_TAGUNKNOWN; |
|
break; |
|
case eScriptSGML: |
|
Result = SCE_H_SGML_DEFAULT; |
|
break; |
|
default : |
|
Result = SCE_HJ_START; |
|
break; |
|
} |
|
return Result; |
|
} |
|
|
|
static inline bool ishtmlwordchar(char ch) { |
|
return !isascii(ch) || |
|
(isalnum(ch) || ch == '.' || ch == '-' || ch == '_' || ch == ':' || ch == '!' || ch == '#'); |
|
} |
|
|
|
static inline bool issgmlwordchar(char ch) { |
|
return !isascii(ch) || |
|
(isalnum(ch) || ch == '.' || ch == '_' || ch == ':' || ch == '!' || ch == '#' || ch == '['); |
|
} |
|
|
|
static inline bool IsPhpWordStart(const unsigned char ch) { |
|
return (isascii(ch) && (isalpha(ch) || (ch == '_'))) || (ch >= 0x7f); |
|
} |
|
|
|
static inline bool IsPhpWordChar(char ch) { |
|
return IsADigit(ch) || IsPhpWordStart(ch); |
|
} |
|
|
|
static bool InTagState(int state) { |
|
return state == SCE_H_TAG || state == SCE_H_TAGUNKNOWN || |
|
state == SCE_H_SCRIPT || |
|
state == SCE_H_ATTRIBUTE || state == SCE_H_ATTRIBUTEUNKNOWN || |
|
state == SCE_H_NUMBER || state == SCE_H_OTHER || |
|
state == SCE_H_DOUBLESTRING || state == SCE_H_SINGLESTRING; |
|
} |
|
|
|
static bool IsCommentState(const int state) { |
|
return state == SCE_H_COMMENT || state == SCE_H_SGML_COMMENT; |
|
} |
|
|
|
static bool IsScriptCommentState(const int state) { |
|
return state == SCE_HJ_COMMENT || state == SCE_HJ_COMMENTLINE || state == SCE_HJA_COMMENT || |
|
state == SCE_HJA_COMMENTLINE || state == SCE_HB_COMMENTLINE || state == SCE_HBA_COMMENTLINE; |
|
} |
|
|
|
static bool isLineEnd(char ch) { |
|
return ch == '\r' || ch == '\n'; |
|
} |
|
|
|
static bool isOKBeforeRE(char ch) { |
|
return (ch == '(') || (ch == '=') || (ch == ','); |
|
} |
|
|
|
static bool isPHPStringState(int state) { |
|
return |
|
(state == SCE_HPHP_HSTRING) || |
|
(state == SCE_HPHP_SIMPLESTRING) || |
|
(state == SCE_HPHP_HSTRING_VARIABLE) || |
|
(state == SCE_HPHP_COMPLEX_VARIABLE); |
|
} |
|
|
|
static int FindPhpStringDelimiter(char *phpStringDelimiter, const int phpStringDelimiterSize, int i, const int lengthDoc, Accessor &styler) { |
|
int j; |
|
while (i < lengthDoc && (styler[i] == ' ' || styler[i] == '\t')) |
|
i++; |
|
phpStringDelimiter[0] = '\n'; |
|
for (j = i; j < lengthDoc && styler[j] != '\n' && styler[j] != '\r'; j++) { |
|
if (j - i < phpStringDelimiterSize - 2) |
|
phpStringDelimiter[j-i+1] = styler[j]; |
|
else |
|
i++; |
|
} |
|
phpStringDelimiter[j-i+1] = '\0'; |
|
return j; |
|
} |
|
|
|
static void ColouriseHyperTextDoc(unsigned int startPos, int length, int initStyle, WordList *keywordlists[], |
|
Accessor &styler) { |
|
WordList &keywords = *keywordlists[0]; |
|
WordList &keywords2 = *keywordlists[1]; |
|
WordList &keywords3 = *keywordlists[2]; |
|
WordList &keywords4 = *keywordlists[3]; |
|
WordList &keywords5 = *keywordlists[4]; |
|
WordList &keywords6 = *keywordlists[5]; // SGML (DTD) keywords |
|
|
|
// Lexer for HTML requires more lexical states (7 bits worth) than most lexers |
|
styler.StartAt(startPos, STYLE_MAX); |
|
char prevWord[200]; |
|
prevWord[0] = '\0'; |
|
char phpStringDelimiter[200]; // PHP is not limited in length, we are |
|
phpStringDelimiter[0] = '\0'; |
|
int StateToPrint = initStyle; |
|
int state = stateForPrintState(StateToPrint); |
|
|
|
// If inside a tag, it may be a script tag, so reread from the start to ensure any language tags are seen |
|
if (InTagState(state)) { |
|
while ((startPos > 0) && (InTagState(styler.StyleAt(startPos - 1)))) { |
|
startPos--; |
|
length++; |
|
} |
|
state = SCE_H_DEFAULT; |
|
} |
|
// String can be heredoc, must find a delimiter first |
|
while (startPos > 0 && isPHPStringState(state) && state != SCE_HPHP_SIMPLESTRING) { |
|
startPos--; |
|
length++; |
|
state = styler.StyleAt(startPos); |
|
} |
|
styler.StartAt(startPos, STYLE_MAX); |
|
|
|
int lineCurrent = styler.GetLine(startPos); |
|
int lineState; |
|
if (lineCurrent > 0) { |
|
lineState = styler.GetLineState(lineCurrent); |
|
} else { |
|
// Default client and ASP scripting language is JavaScript |
|
lineState = eScriptJS << 8; |
|
lineState |= styler.GetPropertyInt("asp.default.language", eScriptJS) << 4; |
|
} |
|
script_mode inScriptType = script_mode((lineState >> 0) & 0x03); // 2 bits of scripting mode |
|
bool tagOpened = (lineState >> 2) & 0x01; // 1 bit to know if we are in an opened tag |
|
bool tagClosing = (lineState >> 3) & 0x01; // 1 bit to know if we are in a closing tag |
|
bool tagDontFold = false; //some HTML tags should not be folded |
|
script_type aspScript = script_type((lineState >> 4) & 0x0F); // 4 bits of script name |
|
script_type clientScript = script_type((lineState >> 8) & 0x0F); // 4 bits of script name |
|
int beforePreProc = (lineState >> 12) & 0xFF; // 8 bits of state |
|
|
|
script_type scriptLanguage = ScriptOfState(state); |
|
|
|
const bool foldHTML = styler.GetPropertyInt("fold.html", 0) != 0; |
|
const bool fold = foldHTML && styler.GetPropertyInt("fold", 0); |
|
const bool foldHTMLPreprocessor = foldHTML && styler.GetPropertyInt("fold.html.preprocessor", 1); |
|
const bool foldCompact = styler.GetPropertyInt("fold.compact", 1) != 0; |
|
const bool caseSensitive = styler.GetPropertyInt("html.tags.case.sensitive", 0) != 0; |
|
|
|
int levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK; |
|
int levelCurrent = levelPrev; |
|
int visibleChars = 0; |
|
|
|
char chPrev = ' '; |
|
char ch = ' '; |
|
char chPrevNonWhite = ' '; |
|
// look back to set chPrevNonWhite properly for better regex colouring |
|
if (scriptLanguage == eScriptJS && startPos > 0) { |
|
int back = startPos; |
|
int style = 0; |
|
while (--back) { |
|
style = styler.StyleAt(back); |
|
if (style < SCE_HJ_DEFAULT || style > SCE_HJ_COMMENTDOC) |
|
// includes SCE_HJ_COMMENT & SCE_HJ_COMMENTLINE |
|
break; |
|
} |
|
if (style == SCE_HJ_SYMBOLS) { |
|
chPrevNonWhite = styler.SafeGetCharAt(back); |
|
} |
|
} |
|
|
|
styler.StartSegment(startPos); |
|
const int lengthDoc = startPos + length; |
|
for (int i = startPos; i < lengthDoc; i++) { |
|
const char chPrev2 = chPrev; |
|
chPrev = ch; |
|
if (!isspacechar(ch) && state != SCE_HJ_COMMENT && |
|
state != SCE_HJ_COMMENTLINE && state != SCE_HJ_COMMENTDOC) |
|
chPrevNonWhite = ch; |
|
ch = styler[i]; |
|
char chNext = styler.SafeGetCharAt(i + 1); |
|
const char chNext2 = styler.SafeGetCharAt(i + 2); |
|
|
|
// Handle DBCS codepages |
|
if (styler.IsLeadByte(ch)) { |
|
chPrev = ' '; |
|
i += 1; |
|
continue; |
|
} |
|
|
|
if ((!isspacechar(ch) || !foldCompact) && fold) |
|
visibleChars++; |
|
|
|
// decide what is the current state to print (depending of the script tag) |
|
StateToPrint = statePrintForState(state, inScriptType); |
|
|
|
// handle script folding |
|
if (fold) { |
|
switch (scriptLanguage) { |
|
case eScriptJS: |
|
case eScriptPHP: |
|
//not currently supported case eScriptVBS: |
|
|
|
if ((state != SCE_HPHP_COMMENT) && (state != SCE_HPHP_COMMENTLINE) && (state != SCE_HJ_COMMENT) && (state != SCE_HJ_COMMENTLINE) && (state != SCE_HJ_COMMENTDOC) && (!isStringState(state))) { |
|
//Platform::DebugPrintf("state=%d, StateToPrint=%d, initStyle=%d\n", state, StateToPrint, initStyle); |
|
//if ((state == SCE_HPHP_OPERATOR) || (state == SCE_HPHP_DEFAULT) || (state == SCE_HJ_SYMBOLS) || (state == SCE_HJ_START) || (state == SCE_HJ_DEFAULT)) { |
|
if ((ch == '{') || (ch == '}')) { |
|
levelCurrent += (ch == '{') ? 1 : -1; |
|
} |
|
} |
|
break; |
|
case eScriptPython: |
|
if (state != SCE_HP_COMMENTLINE) { |
|
if ((ch == ':') && ((chNext == '\n') || (chNext == '\r' && chNext2 == '\n'))) { |
|
levelCurrent++; |
|
} else if ((ch == '\n') && !((chNext == '\r') && (chNext2 == '\n')) && (chNext != '\n')) { |
|
// check if the number of tabs is lower than the level |
|
int Findlevel = (levelCurrent & ~SC_FOLDLEVELBASE) * 8; |
|
for (int j = 0; Findlevel > 0; j++) { |
|
char chTmp = styler.SafeGetCharAt(i + j + 1); |
|
if (chTmp == '\t') { |
|
Findlevel -= 8; |
|
} else if (chTmp == ' ') { |
|
Findlevel--; |
|
} else { |
|
break; |
|
} |
|
} |
|
|
|
if (Findlevel > 0) { |
|
levelCurrent -= Findlevel / 8; |
|
if (Findlevel % 8) |
|
levelCurrent--; |
|
} |
|
} |
|
} |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
|
|
if ((ch == '\r' && chNext != '\n') || (ch == '\n')) { |
|
// Trigger on CR only (Mac style) or either on LF from CR+LF (Dos/Win) or on LF alone (Unix) |
|
// Avoid triggering two times on Dos/Win |
|
// New line -> record any line state onto /next/ line |
|
if (fold) { |
|
int lev = levelPrev; |
|
if (visibleChars == 0) |
|
lev |= SC_FOLDLEVELWHITEFLAG; |
|
if ((levelCurrent > levelPrev) && (visibleChars > 0)) |
|
lev |= SC_FOLDLEVELHEADERFLAG; |
|
|
|
styler.SetLevel(lineCurrent, lev); |
|
visibleChars = 0; |
|
levelPrev = levelCurrent; |
|
} |
|
lineCurrent++; |
|
styler.SetLineState(lineCurrent, |
|
((inScriptType & 0x03) << 0) | |
|
((tagOpened & 0x01) << 2) | |
|
((tagClosing & 0x01) << 3) | |
|
((aspScript & 0x0F) << 4) | |
|
((clientScript & 0x0F) << 8) | |
|
((beforePreProc & 0xFF) << 12)); |
|
} |
|
|
|
// generic end of script processing |
|
else if ((inScriptType == eNonHtmlScript) && (ch == '<') && (chNext == '/')) { |
|
// Check if it's the end of the script tag (or any other HTML tag) |
|
switch (state) { |
|
// in these cases, you can embed HTML tags (to confirm !!!!!!!!!!!!!!!!!!!!!!) |
|
case SCE_H_DOUBLESTRING: |
|
case SCE_H_SINGLESTRING: |
|
case SCE_HJ_COMMENT: |
|
case SCE_HJ_COMMENTDOC: |
|
//case SCE_HJ_COMMENTLINE: // removed as this is a common thing done to hide |
|
// the end of script marker from some JS interpreters. |
|
case SCE_HJ_DOUBLESTRING: |
|
case SCE_HJ_SINGLESTRING: |
|
case SCE_HJ_REGEX: |
|
case SCE_HB_STRING: |
|
case SCE_HP_STRING: |
|
case SCE_HP_TRIPLE: |
|
case SCE_HP_TRIPLEDOUBLE: |
|
break; |
|
default : |
|
// check if the closing tag is a script tag |
|
if (state == SCE_HJ_COMMENTLINE) { |
|
char tag[7]; // room for the <script> tag |
|
char chr; // current char |
|
int j=0; |
|
chr = styler.SafeGetCharAt(i+2); |
|
while (j < 6 && !isspacechar(chr)) { |
|
tag[j++] = static_cast<char>(MakeLowerCase(chr)); |
|
chr = styler.SafeGetCharAt(i+2+j); |
|
} |
|
tag[j] = '\0'; |
|
if (strcmp(tag, "script") != 0) break; |
|
} |
|
// closing tag of the script (it's a closing HTML tag anyway) |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_TAGUNKNOWN; |
|
inScriptType = eHtml; |
|
scriptLanguage = eScriptNone; |
|
clientScript = eScriptJS; |
|
i += 2; |
|
visibleChars += 2; |
|
tagClosing = true; |
|
continue; |
|
} |
|
} |
|
|
|
///////////////////////////////////// |
|
// handle the start of PHP pre-processor = Non-HTML |
|
else if ((state != SCE_H_ASPAT) && |
|
!isPHPStringState(state) && |
|
(state != SCE_HPHP_COMMENT) && |
|
(ch == '<') && |
|
(chNext == '?') && |
|
!IsScriptCommentState(state) ) { |
|
scriptLanguage = segIsScriptingIndicator(styler, i + 2, i + 10, eScriptPHP); |
|
if (scriptLanguage != eScriptPHP && isStringState(state)) continue; |
|
styler.ColourTo(i - 1, StateToPrint); |
|
beforePreProc = state; |
|
i++; |
|
visibleChars++; |
|
i += PrintScriptingIndicatorOffset(styler, styler.GetStartSegment() + 2, i + 10); |
|
if (scriptLanguage == eScriptXML) |
|
styler.ColourTo(i, SCE_H_XMLSTART); |
|
else |
|
styler.ColourTo(i, SCE_H_QUESTION); |
|
state = StateForScript(scriptLanguage); |
|
if (inScriptType == eNonHtmlScript) |
|
inScriptType = eNonHtmlScriptPreProc; |
|
else |
|
inScriptType = eNonHtmlPreProc; |
|
// Fold whole script, but not if the XML first tag (all XML-like tags in this case) |
|
if (foldHTMLPreprocessor && (scriptLanguage != eScriptXML)) { |
|
levelCurrent++; |
|
} |
|
// should be better |
|
ch = styler.SafeGetCharAt(i); |
|
continue; |
|
} |
|
|
|
// handle the start of ASP pre-processor = Non-HTML |
|
else if (!isCommentASPState(state) && (ch == '<') && (chNext == '%') && !isPHPStringState(state)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
beforePreProc = state; |
|
if (inScriptType == eNonHtmlScript) |
|
inScriptType = eNonHtmlScriptPreProc; |
|
else |
|
inScriptType = eNonHtmlPreProc; |
|
|
|
if (chNext2 == '@') { |
|
i += 2; // place as if it was the second next char treated |
|
visibleChars += 2; |
|
state = SCE_H_ASPAT; |
|
} else if ((chNext2 == '-') && (styler.SafeGetCharAt(i + 3) == '-')) { |
|
styler.ColourTo(i + 3, SCE_H_ASP); |
|
state = SCE_H_XCCOMMENT; |
|
scriptLanguage = eScriptVBS; |
|
continue; |
|
} else { |
|
if (chNext2 == '=') { |
|
i += 2; // place as if it was the second next char treated |
|
visibleChars += 2; |
|
} else { |
|
i++; // place as if it was the next char treated |
|
visibleChars++; |
|
} |
|
|
|
state = StateForScript(aspScript); |
|
} |
|
scriptLanguage = eScriptVBS; |
|
styler.ColourTo(i, SCE_H_ASP); |
|
// fold whole script |
|
if (foldHTMLPreprocessor) |
|
levelCurrent++; |
|
// should be better |
|
ch = styler.SafeGetCharAt(i); |
|
continue; |
|
} |
|
|
|
///////////////////////////////////// |
|
// handle the start of SGML language (DTD) |
|
else if (((scriptLanguage == eScriptNone) || (scriptLanguage == eScriptXML)) && |
|
(chPrev == '<') && |
|
(ch == '!') && |
|
(StateToPrint != SCE_H_CDATA) && |
|
(!IsCommentState(StateToPrint)) && |
|
(!IsScriptCommentState(StateToPrint)) ) { |
|
beforePreProc = state; |
|
styler.ColourTo(i - 2, StateToPrint); |
|
if ((chNext == '-') && (chNext2 == '-')) { |
|
state = SCE_H_COMMENT; // wait for a pending command |
|
styler.ColourTo(i + 2, SCE_H_COMMENT); |
|
i += 2; // follow styling after the -- |
|
} else if (isWordCdata(i + 1, i + 7, styler)) { |
|
state = SCE_H_CDATA; |
|
} else { |
|
styler.ColourTo(i, SCE_H_SGML_DEFAULT); // <! is default |
|
scriptLanguage = eScriptSGML; |
|
state = SCE_H_SGML_COMMAND; // wait for a pending command |
|
} |
|
// fold whole tag (-- when closing the tag) |
|
if (foldHTMLPreprocessor) |
|
levelCurrent++; |
|
continue; |
|
} |
|
|
|
// handle the end of a pre-processor = Non-HTML |
|
else if (( |
|
((inScriptType == eNonHtmlPreProc) |
|
|| (inScriptType == eNonHtmlScriptPreProc)) && ( |
|
((scriptLanguage != eScriptNone) && stateAllowsTermination(state) && ((ch == '%') || (ch == '?'))) |
|
) && (chNext == '>')) || |
|
((scriptLanguage == eScriptSGML) && (ch == '>') && (state != SCE_H_SGML_COMMENT))) { |
|
if (state == SCE_H_ASPAT) { |
|
aspScript = segIsScriptingIndicator(styler, |
|
styler.GetStartSegment(), i - 1, aspScript); |
|
} |
|
// Bounce out of any ASP mode |
|
switch (state) { |
|
case SCE_HJ_WORD: |
|
classifyWordHTJS(styler.GetStartSegment(), i - 1, keywords2, styler, inScriptType); |
|
break; |
|
case SCE_HB_WORD: |
|
classifyWordHTVB(styler.GetStartSegment(), i - 1, keywords3, styler, inScriptType); |
|
break; |
|
case SCE_HP_WORD: |
|
classifyWordHTPy(styler.GetStartSegment(), i - 1, keywords4, styler, prevWord, inScriptType); |
|
break; |
|
case SCE_HPHP_WORD: |
|
classifyWordHTPHP(styler.GetStartSegment(), i - 1, keywords5, styler); |
|
break; |
|
case SCE_H_XCCOMMENT: |
|
styler.ColourTo(i - 1, state); |
|
break; |
|
default : |
|
styler.ColourTo(i - 1, StateToPrint); |
|
break; |
|
} |
|
if (scriptLanguage != eScriptSGML) { |
|
i++; |
|
visibleChars++; |
|
} |
|
if (ch == '%') |
|
styler.ColourTo(i, SCE_H_ASP); |
|
else if (scriptLanguage == eScriptXML) |
|
styler.ColourTo(i, SCE_H_XMLEND); |
|
else if (scriptLanguage == eScriptSGML) |
|
styler.ColourTo(i, SCE_H_SGML_DEFAULT); |
|
else |
|
styler.ColourTo(i, SCE_H_QUESTION); |
|
state = beforePreProc; |
|
if (inScriptType == eNonHtmlScriptPreProc) |
|
inScriptType = eNonHtmlScript; |
|
else |
|
inScriptType = eHtml; |
|
// Unfold all scripting languages, except for XML tag |
|
if (foldHTMLPreprocessor && (scriptLanguage != eScriptXML)) { |
|
levelCurrent--; |
|
} |
|
scriptLanguage = eScriptNone; |
|
continue; |
|
} |
|
///////////////////////////////////// |
|
|
|
switch (state) { |
|
case SCE_H_DEFAULT: |
|
if (ch == '<') { |
|
// in HTML, fold on tag open and unfold on tag close |
|
tagOpened = true; |
|
tagClosing = (chNext == '/'); |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (chNext != '!') |
|
state = SCE_H_TAGUNKNOWN; |
|
} else if (ch == '&') { |
|
styler.ColourTo(i - 1, SCE_H_DEFAULT); |
|
state = SCE_H_ENTITY; |
|
} |
|
break; |
|
case SCE_H_SGML_DEFAULT: |
|
case SCE_H_SGML_BLOCK_DEFAULT: |
|
// if (scriptLanguage == eScriptSGMLblock) |
|
// StateToPrint = SCE_H_SGML_BLOCK_DEFAULT; |
|
|
|
if (ch == '\"') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_SGML_DOUBLESTRING; |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_SGML_SIMPLESTRING; |
|
} else if ((ch == '-') && (chPrev == '-')) { |
|
styler.ColourTo(i - 2, StateToPrint); |
|
state = SCE_H_SGML_COMMENT; |
|
} else if (isascii(ch) && isalpha(ch) && (chPrev == '%')) { |
|
styler.ColourTo(i - 2, StateToPrint); |
|
state = SCE_H_SGML_ENTITY; |
|
} else if (ch == '#') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_SGML_SPECIAL; |
|
} else if (ch == '[') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
scriptLanguage = eScriptSGMLblock; |
|
state = SCE_H_SGML_BLOCK_DEFAULT; |
|
} else if (ch == ']') { |
|
if (scriptLanguage == eScriptSGMLblock) { |
|
styler.ColourTo(i, StateToPrint); |
|
scriptLanguage = eScriptSGML; |
|
} else { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, SCE_H_SGML_ERROR); |
|
} |
|
state = SCE_H_SGML_DEFAULT; |
|
} else if (scriptLanguage == eScriptSGMLblock) { |
|
if ((ch == '!') && (chPrev == '<')) { |
|
styler.ColourTo(i - 2, StateToPrint); |
|
styler.ColourTo(i, SCE_H_SGML_DEFAULT); |
|
state = SCE_H_SGML_COMMAND; |
|
} else if (ch == '>') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, SCE_H_SGML_DEFAULT); |
|
} |
|
} |
|
break; |
|
case SCE_H_SGML_COMMAND: |
|
if ((ch == '-') && (chPrev == '-')) { |
|
styler.ColourTo(i - 2, StateToPrint); |
|
state = SCE_H_SGML_COMMENT; |
|
} else if (!issgmlwordchar(ch)) { |
|
if (isWordHSGML(styler.GetStartSegment(), i - 1, keywords6, styler)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_SGML_1ST_PARAM; |
|
} else { |
|
state = SCE_H_SGML_ERROR; |
|
} |
|
} |
|
break; |
|
case SCE_H_SGML_1ST_PARAM: |
|
// wait for the beginning of the word |
|
if ((ch == '-') && (chPrev == '-')) { |
|
if (scriptLanguage == eScriptSGMLblock) { |
|
styler.ColourTo(i - 2, SCE_H_SGML_BLOCK_DEFAULT); |
|
} else { |
|
styler.ColourTo(i - 2, SCE_H_SGML_DEFAULT); |
|
} |
|
state = SCE_H_SGML_1ST_PARAM_COMMENT; |
|
} else if (issgmlwordchar(ch)) { |
|
if (scriptLanguage == eScriptSGMLblock) { |
|
styler.ColourTo(i - 1, SCE_H_SGML_BLOCK_DEFAULT); |
|
} else { |
|
styler.ColourTo(i - 1, SCE_H_SGML_DEFAULT); |
|
} |
|
// find the length of the word |
|
int size = 1; |
|
while (ishtmlwordchar(styler.SafeGetCharAt(i + size))) |
|
size++; |
|
styler.ColourTo(i + size - 1, StateToPrint); |
|
i += size - 1; |
|
visibleChars += size - 1; |
|
ch = styler.SafeGetCharAt(i); |
|
if (scriptLanguage == eScriptSGMLblock) { |
|
state = SCE_H_SGML_BLOCK_DEFAULT; |
|
} else { |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
continue; |
|
} |
|
break; |
|
case SCE_H_SGML_ERROR: |
|
if ((ch == '-') && (chPrev == '-')) { |
|
styler.ColourTo(i - 2, StateToPrint); |
|
state = SCE_H_SGML_COMMENT; |
|
} |
|
case SCE_H_SGML_DOUBLESTRING: |
|
if (ch == '\"') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
break; |
|
case SCE_H_SGML_SIMPLESTRING: |
|
if (ch == '\'') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
break; |
|
case SCE_H_SGML_COMMENT: |
|
if ((ch == '-') && (chPrev == '-')) { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
break; |
|
case SCE_H_CDATA: |
|
if ((chPrev2 == ']') && (chPrev == ']') && (ch == '>')) { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_DEFAULT; |
|
levelCurrent--; |
|
} |
|
break; |
|
case SCE_H_COMMENT: |
|
if ((chPrev2 == '-') && (chPrev == '-') && (ch == '>')) { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_DEFAULT; |
|
levelCurrent--; |
|
} |
|
break; |
|
case SCE_H_SGML_1ST_PARAM_COMMENT: |
|
if ((ch == '-') && (chPrev == '-')) { |
|
styler.ColourTo(i, SCE_H_SGML_COMMENT); |
|
state = SCE_H_SGML_1ST_PARAM; |
|
} |
|
break; |
|
case SCE_H_SGML_SPECIAL: |
|
if (!(isascii(ch) && isupper(ch))) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (isalnum(ch)) { |
|
state = SCE_H_SGML_ERROR; |
|
} else { |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_H_SGML_ENTITY: |
|
if (ch == ';') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_SGML_DEFAULT; |
|
} else if (!(isascii(ch) && isalnum(ch)) && ch != '-' && ch != '.') { |
|
styler.ColourTo(i, SCE_H_SGML_ERROR); |
|
state = SCE_H_SGML_DEFAULT; |
|
} |
|
break; |
|
case SCE_H_ENTITY: |
|
if (ch == ';') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_DEFAULT; |
|
} |
|
if (ch != '#' && !(isascii(ch) && isalnum(ch)) // Should check that '#' follows '&', but it is unlikely anyway... |
|
&& ch != '.' && ch != '-' && ch != '_' && ch != ':') { // valid in XML |
|
styler.ColourTo(i, SCE_H_TAGUNKNOWN); |
|
state = SCE_H_DEFAULT; |
|
} |
|
break; |
|
case SCE_H_TAGUNKNOWN: |
|
if (!ishtmlwordchar(ch) && !((ch == '/') && (chPrev == '<')) && ch != '[') { |
|
int eClass = classifyTagHTML(styler.GetStartSegment(), |
|
i - 1, keywords, styler, tagDontFold, caseSensitive); |
|
if (eClass == SCE_H_SCRIPT) { |
|
if (!tagClosing) { |
|
inScriptType = eNonHtmlScript; |
|
scriptLanguage = clientScript; |
|
eClass = SCE_H_TAG; |
|
} else { |
|
scriptLanguage = eScriptNone; |
|
eClass = SCE_H_TAG; |
|
} |
|
} |
|
if (ch == '>') { |
|
styler.ColourTo(i, eClass); |
|
if (inScriptType == eNonHtmlScript) { |
|
state = StateForScript(scriptLanguage); |
|
} else { |
|
state = SCE_H_DEFAULT; |
|
} |
|
tagOpened = false; |
|
if (!tagDontFold){ |
|
if (tagClosing) { |
|
levelCurrent--; |
|
} else { |
|
levelCurrent++; |
|
} |
|
} |
|
tagClosing = false; |
|
} else if (ch == '/' && chNext == '>') { |
|
if (eClass == SCE_H_TAGUNKNOWN) { |
|
styler.ColourTo(i + 1, SCE_H_TAGUNKNOWN); |
|
} else { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i + 1, SCE_H_TAGEND); |
|
} |
|
i++; |
|
ch = chNext; |
|
state = SCE_H_DEFAULT; |
|
tagOpened = false; |
|
} else { |
|
if (eClass != SCE_H_TAGUNKNOWN) { |
|
if (eClass == SCE_H_SGML_DEFAULT) { |
|
state = SCE_H_SGML_DEFAULT; |
|
} else { |
|
state = SCE_H_OTHER; |
|
} |
|
} |
|
} |
|
} |
|
break; |
|
case SCE_H_ATTRIBUTE: |
|
if (!ishtmlwordchar(ch) && ch != '/' && ch != '-') { |
|
if (inScriptType == eNonHtmlScript) { |
|
int scriptLanguagePrev = scriptLanguage; |
|
clientScript = segIsScriptingIndicator(styler, styler.GetStartSegment(), i - 1, scriptLanguage); |
|
scriptLanguage = clientScript; |
|
if ((scriptLanguagePrev != scriptLanguage) && (scriptLanguage == eScriptNone)) |
|
inScriptType = eHtml; |
|
} |
|
classifyAttribHTML(styler.GetStartSegment(), i - 1, keywords, styler); |
|
if (ch == '>') { |
|
styler.ColourTo(i, SCE_H_TAG); |
|
if (inScriptType == eNonHtmlScript) { |
|
state = StateForScript(scriptLanguage); |
|
} else { |
|
state = SCE_H_DEFAULT; |
|
} |
|
tagOpened = false; |
|
if (!tagDontFold){ |
|
if (tagClosing){ |
|
levelCurrent--; |
|
} else { |
|
levelCurrent++; |
|
} |
|
} |
|
tagClosing = false; |
|
} else if (ch == '=') { |
|
styler.ColourTo(i, SCE_H_OTHER); |
|
state = SCE_H_VALUE; |
|
} else { |
|
state = SCE_H_OTHER; |
|
} |
|
} |
|
break; |
|
case SCE_H_OTHER: |
|
if (ch == '>') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, SCE_H_TAG); |
|
if (inScriptType == eNonHtmlScript) { |
|
state = StateForScript(scriptLanguage); |
|
} else { |
|
state = SCE_H_DEFAULT; |
|
} |
|
tagOpened = false; |
|
if (!tagDontFold){ |
|
if (tagClosing){ |
|
levelCurrent--; |
|
} else { |
|
levelCurrent++; |
|
} |
|
} |
|
tagClosing = false; |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_DOUBLESTRING; |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_SINGLESTRING; |
|
} else if (ch == '=') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_H_VALUE; |
|
} else if (ch == '/' && chNext == '>') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i + 1, SCE_H_TAGEND); |
|
i++; |
|
ch = chNext; |
|
state = SCE_H_DEFAULT; |
|
tagOpened = false; |
|
} else if (ch == '?' && chNext == '>') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i + 1, SCE_H_XMLEND); |
|
i++; |
|
ch = chNext; |
|
state = SCE_H_DEFAULT; |
|
} else if (ishtmlwordchar(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_H_ATTRIBUTE; |
|
} |
|
break; |
|
case SCE_H_DOUBLESTRING: |
|
if (ch == '\"') { |
|
if (inScriptType == eNonHtmlScript) { |
|
scriptLanguage = segIsScriptingIndicator(styler, styler.GetStartSegment(), i, scriptLanguage); |
|
} |
|
styler.ColourTo(i, SCE_H_DOUBLESTRING); |
|
state = SCE_H_OTHER; |
|
} |
|
break; |
|
case SCE_H_SINGLESTRING: |
|
if (ch == '\'') { |
|
if (inScriptType == eNonHtmlScript) { |
|
scriptLanguage = segIsScriptingIndicator(styler, styler.GetStartSegment(), i, scriptLanguage); |
|
} |
|
styler.ColourTo(i, SCE_H_SINGLESTRING); |
|
state = SCE_H_OTHER; |
|
} |
|
break; |
|
case SCE_H_VALUE: |
|
if (!ishtmlwordchar(ch)) { |
|
if (ch == '\"' && chPrev == '=') { |
|
// Should really test for being first character |
|
state = SCE_H_DOUBLESTRING; |
|
} else if (ch == '\'' && chPrev == '=') { |
|
state = SCE_H_SINGLESTRING; |
|
} else { |
|
if (IsNumber(styler.GetStartSegment(), styler)) { |
|
styler.ColourTo(i - 1, SCE_H_NUMBER); |
|
} else { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
} |
|
if (ch == '>') { |
|
styler.ColourTo(i, SCE_H_TAG); |
|
if (inScriptType == eNonHtmlScript) { |
|
state = StateForScript(scriptLanguage); |
|
} else { |
|
state = SCE_H_DEFAULT; |
|
} |
|
tagOpened = false; |
|
if (!tagDontFold){ |
|
if (tagClosing){ |
|
levelCurrent--; |
|
} else { |
|
levelCurrent++; |
|
} |
|
} |
|
tagClosing = false; |
|
} else { |
|
state = SCE_H_OTHER; |
|
} |
|
} |
|
} |
|
break; |
|
case SCE_HJ_DEFAULT: |
|
case SCE_HJ_START: |
|
case SCE_HJ_SYMBOLS: |
|
if (iswordstart(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_WORD; |
|
} else if (ch == '/' && chNext == '*') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (chNext2 == '*') |
|
state = SCE_HJ_COMMENTDOC; |
|
else |
|
state = SCE_HJ_COMMENT; |
|
} else if (ch == '/' && chNext == '/') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
} else if (ch == '/' && isOKBeforeRE(chPrevNonWhite)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_REGEX; |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_DOUBLESTRING; |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_SINGLESTRING; |
|
} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') && |
|
styler.SafeGetCharAt(i + 3) == '-') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
} else if ((ch == '-') && (chNext == '-') && (chNext2 == '>')) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
i += 2; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, statePrintForState(SCE_HJ_SYMBOLS, inScriptType)); |
|
state = SCE_HJ_DEFAULT; |
|
} else if ((ch == ' ') || (ch == '\t')) { |
|
if (state == SCE_HJ_START) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_HJ_WORD: |
|
if (!iswordchar(ch)) { |
|
classifyWordHTJS(styler.GetStartSegment(), i - 1, keywords2, styler, inScriptType); |
|
//styler.ColourTo(i - 1, eHTJSKeyword); |
|
state = SCE_HJ_DEFAULT; |
|
if (ch == '/' && chNext == '*') { |
|
if (chNext2 == '*') |
|
state = SCE_HJ_COMMENTDOC; |
|
else |
|
state = SCE_HJ_COMMENT; |
|
} else if (ch == '/' && chNext == '/') { |
|
state = SCE_HJ_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
state = SCE_HJ_DOUBLESTRING; |
|
} else if (ch == '\'') { |
|
state = SCE_HJ_SINGLESTRING; |
|
} else if ((ch == '-') && (chNext == '-') && (chNext2 == '>')) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
i += 2; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, statePrintForState(SCE_HJ_SYMBOLS, inScriptType)); |
|
state = SCE_HJ_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_HJ_COMMENT: |
|
case SCE_HJ_COMMENTDOC: |
|
if (ch == '/' && chPrev == '*') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HJ_DEFAULT; |
|
ch = ' '; |
|
} |
|
break; |
|
case SCE_HJ_COMMENTLINE: |
|
if (ch == '\r' || ch == '\n') { |
|
styler.ColourTo(i - 1, statePrintForState(SCE_HJ_COMMENTLINE, inScriptType)); |
|
state = SCE_HJ_DEFAULT; |
|
ch = ' '; |
|
} |
|
break; |
|
case SCE_HJ_DOUBLESTRING: |
|
if (ch == '\\') { |
|
if (chNext == '\"' || chNext == '\'' || chNext == '\\') { |
|
i++; |
|
} |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i, statePrintForState(SCE_HJ_DOUBLESTRING, inScriptType)); |
|
state = SCE_HJ_DEFAULT; |
|
} else if ((inScriptType == eNonHtmlScript) && (ch == '-') && (chNext == '-') && (chNext2 == '>')) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
i += 2; |
|
} else if (isLineEnd(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_STRINGEOL; |
|
} |
|
break; |
|
case SCE_HJ_SINGLESTRING: |
|
if (ch == '\\') { |
|
if (chNext == '\"' || chNext == '\'' || chNext == '\\') { |
|
i++; |
|
} |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i, statePrintForState(SCE_HJ_SINGLESTRING, inScriptType)); |
|
state = SCE_HJ_DEFAULT; |
|
} else if ((inScriptType == eNonHtmlScript) && (ch == '-') && (chNext == '-') && (chNext2 == '>')) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_COMMENTLINE; |
|
i += 2; |
|
} else if (isLineEnd(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_STRINGEOL; |
|
} |
|
break; |
|
case SCE_HJ_STRINGEOL: |
|
if (!isLineEnd(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HJ_DEFAULT; |
|
} else if (!isLineEnd(chNext)) { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HJ_DEFAULT; |
|
} |
|
break; |
|
case SCE_HJ_REGEX: |
|
if (ch == '\r' || ch == '\n' || ch == '/') { |
|
if (ch == '/') { |
|
while (isascii(chNext) && islower(chNext)) { // gobble regex flags |
|
i++; |
|
ch = chNext; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} |
|
} |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HJ_DEFAULT; |
|
} else if (ch == '\\') { |
|
// Gobble up the quoted character |
|
if (chNext == '\\' || chNext == '/') { |
|
i++; |
|
ch = chNext; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} |
|
} |
|
break; |
|
case SCE_HB_DEFAULT: |
|
case SCE_HB_START: |
|
if (iswordstart(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_WORD; |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_STRING; |
|
} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') && |
|
styler.SafeGetCharAt(i + 3) == '-') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_COMMENTLINE; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, statePrintForState(SCE_HB_DEFAULT, inScriptType)); |
|
state = SCE_HB_DEFAULT; |
|
} else if ((ch == ' ') || (ch == '\t')) { |
|
if (state == SCE_HB_START) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_HB_WORD: |
|
if (!iswordchar(ch)) { |
|
state = classifyWordHTVB(styler.GetStartSegment(), i - 1, keywords3, styler, inScriptType); |
|
if (state == SCE_HB_DEFAULT) { |
|
if (ch == '\"') { |
|
state = SCE_HB_STRING; |
|
} else if (ch == '\'') { |
|
state = SCE_HB_COMMENTLINE; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, statePrintForState(SCE_HB_DEFAULT, inScriptType)); |
|
state = SCE_HB_DEFAULT; |
|
} |
|
} |
|
} |
|
break; |
|
case SCE_HB_STRING: |
|
if (ch == '\"') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HB_DEFAULT; |
|
} else if (ch == '\r' || ch == '\n') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_STRINGEOL; |
|
} |
|
break; |
|
case SCE_HB_COMMENTLINE: |
|
if (ch == '\r' || ch == '\n') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_DEFAULT; |
|
} |
|
break; |
|
case SCE_HB_STRINGEOL: |
|
if (!isLineEnd(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HB_DEFAULT; |
|
} else if (!isLineEnd(chNext)) { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HB_DEFAULT; |
|
} |
|
break; |
|
case SCE_HP_DEFAULT: |
|
case SCE_HP_START: |
|
if (iswordstart(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HP_WORD; |
|
} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') && |
|
styler.SafeGetCharAt(i + 3) == '-') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HP_COMMENTLINE; |
|
} else if (ch == '#') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HP_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (chNext == '\"' && chNext2 == '\"') { |
|
i += 2; |
|
state = SCE_HP_TRIPLEDOUBLE; |
|
ch = ' '; |
|
chPrev = ' '; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} else { |
|
// state = statePrintForState(SCE_HP_STRING,inScriptType); |
|
state = SCE_HP_STRING; |
|
} |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (chNext == '\'' && chNext2 == '\'') { |
|
i += 2; |
|
state = SCE_HP_TRIPLE; |
|
ch = ' '; |
|
chPrev = ' '; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} else { |
|
state = SCE_HP_CHARACTER; |
|
} |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
styler.ColourTo(i, statePrintForState(SCE_HP_OPERATOR, inScriptType)); |
|
} else if ((ch == ' ') || (ch == '\t')) { |
|
if (state == SCE_HP_START) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_HP_WORD: |
|
if (!iswordchar(ch)) { |
|
classifyWordHTPy(styler.GetStartSegment(), i - 1, keywords4, styler, prevWord, inScriptType); |
|
state = SCE_HP_DEFAULT; |
|
if (ch == '#') { |
|
state = SCE_HP_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
if (chNext == '\"' && chNext2 == '\"') { |
|
i += 2; |
|
state = SCE_HP_TRIPLEDOUBLE; |
|
ch = ' '; |
|
chPrev = ' '; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} else { |
|
state = SCE_HP_STRING; |
|
} |
|
} else if (ch == '\'') { |
|
if (chNext == '\'' && chNext2 == '\'') { |
|
i += 2; |
|
state = SCE_HP_TRIPLE; |
|
ch = ' '; |
|
chPrev = ' '; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} else { |
|
state = SCE_HP_CHARACTER; |
|
} |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, statePrintForState(SCE_HP_OPERATOR, inScriptType)); |
|
} |
|
} |
|
break; |
|
case SCE_HP_COMMENTLINE: |
|
if (ch == '\r' || ch == '\n') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HP_STRING: |
|
if (ch == '\\') { |
|
if (chNext == '\"' || chNext == '\'' || chNext == '\\') { |
|
i++; |
|
ch = chNext; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} |
|
} else if (ch == '\"') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HP_CHARACTER: |
|
if (ch == '\\') { |
|
if (chNext == '\"' || chNext == '\'' || chNext == '\\') { |
|
i++; |
|
ch = chNext; |
|
chNext = styler.SafeGetCharAt(i + 1); |
|
} |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HP_TRIPLE: |
|
if (ch == '\'' && chPrev == '\'' && chPrev2 == '\'') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HP_TRIPLEDOUBLE: |
|
if (ch == '\"' && chPrev == '\"' && chPrev2 == '\"') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HP_DEFAULT; |
|
} |
|
break; |
|
///////////// start - PHP state handling |
|
case SCE_HPHP_WORD: |
|
if (!iswordchar(ch)) { |
|
classifyWordHTPHP(styler.GetStartSegment(), i - 1, keywords5, styler); |
|
if (ch == '/' && chNext == '*') { |
|
i++; |
|
state = SCE_HPHP_COMMENT; |
|
} else if (ch == '/' && chNext == '/') { |
|
i++; |
|
state = SCE_HPHP_COMMENTLINE; |
|
} else if (ch == '#') { |
|
state = SCE_HPHP_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
state = SCE_HPHP_HSTRING; |
|
strcpy(phpStringDelimiter, "\""); |
|
} else if (styler.Match(i, "<<<")) { |
|
state = SCE_HPHP_HSTRING; |
|
i = FindPhpStringDelimiter(phpStringDelimiter, sizeof(phpStringDelimiter), i + 3, lengthDoc, styler); |
|
} else if (ch == '\'') { |
|
state = SCE_HPHP_SIMPLESTRING; |
|
} else if (ch == '$' && IsPhpWordStart(chNext)) { |
|
state = SCE_HPHP_VARIABLE; |
|
} else if (isoperator(ch)) { |
|
state = SCE_HPHP_OPERATOR; |
|
} else { |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
} |
|
break; |
|
case SCE_HPHP_NUMBER: |
|
// recognize bases 8,10 or 16 integers OR floating-point numbers |
|
if (!IsADigit(ch) |
|
&& strchr(".xXabcdefABCDEF", ch) == NULL |
|
&& ((ch != '-' && ch != '+') || (chPrev != 'e' && chPrev != 'E'))) { |
|
styler.ColourTo(i - 1, SCE_HPHP_NUMBER); |
|
if (isoperator(ch)) |
|
state = SCE_HPHP_OPERATOR; |
|
else |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_VARIABLE: |
|
if (!IsPhpWordChar(ch)) { |
|
styler.ColourTo(i - 1, SCE_HPHP_VARIABLE); |
|
if (isoperator(ch)) |
|
state = SCE_HPHP_OPERATOR; |
|
else |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_COMMENT: |
|
if (ch == '/' && chPrev == '*') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_COMMENTLINE: |
|
if (ch == '\r' || ch == '\n') { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_HSTRING: |
|
if (ch == '\\' && (phpStringDelimiter[0] == '\"' || chNext == '$' || chNext == '{')) { |
|
// skip the next char |
|
i++; |
|
} else if (((ch == '{' && chNext == '$') || (ch == '$' && chNext == '{')) |
|
&& IsPhpWordStart(chNext2)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HPHP_COMPLEX_VARIABLE; |
|
} else if (ch == '$' && IsPhpWordStart(chNext)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
state = SCE_HPHP_HSTRING_VARIABLE; |
|
} else if (styler.Match(i, phpStringDelimiter)) { |
|
if (strlen(phpStringDelimiter) > 1) |
|
i += strlen(phpStringDelimiter) - 1; |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_SIMPLESTRING: |
|
if (ch == '\\') { |
|
// skip the next char |
|
i++; |
|
} else if (ch == '\'') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
case SCE_HPHP_HSTRING_VARIABLE: |
|
if (!IsPhpWordChar(ch)) { |
|
styler.ColourTo(i - 1, StateToPrint); |
|
i--; // strange but it works |
|
state = SCE_HPHP_HSTRING; |
|
} |
|
break; |
|
case SCE_HPHP_COMPLEX_VARIABLE: |
|
if (ch == '}') { |
|
styler.ColourTo(i, StateToPrint); |
|
state = SCE_HPHP_HSTRING; |
|
} |
|
break; |
|
case SCE_HPHP_OPERATOR: |
|
case SCE_HPHP_DEFAULT: |
|
styler.ColourTo(i - 1, StateToPrint); |
|
if (IsADigit(ch) || (ch == '.' && IsADigit(chNext))) { |
|
state = SCE_HPHP_NUMBER; |
|
} else if (iswordstart(ch)) { |
|
state = SCE_HPHP_WORD; |
|
} else if (ch == '/' && chNext == '*') { |
|
i++; |
|
state = SCE_HPHP_COMMENT; |
|
} else if (ch == '/' && chNext == '/') { |
|
i++; |
|
state = SCE_HPHP_COMMENTLINE; |
|
} else if (ch == '#') { |
|
state = SCE_HPHP_COMMENTLINE; |
|
} else if (ch == '\"') { |
|
state = SCE_HPHP_HSTRING; |
|
strcpy(phpStringDelimiter, "\""); |
|
} else if (styler.Match(i, "<<<")) { |
|
state = SCE_HPHP_HSTRING; |
|
i = FindPhpStringDelimiter(phpStringDelimiter, sizeof(phpStringDelimiter), i + 3, lengthDoc, styler); |
|
} else if (ch == '\'') { |
|
state = SCE_HPHP_SIMPLESTRING; |
|
} else if (ch == '$' && IsPhpWordStart(chNext)) { |
|
state = SCE_HPHP_VARIABLE; |
|
} else if (isoperator(ch)) { |
|
state = SCE_HPHP_OPERATOR; |
|
} else if ((state == SCE_HPHP_OPERATOR) && (isspacechar(ch))) { |
|
state = SCE_HPHP_DEFAULT; |
|
} |
|
break; |
|
///////////// end - PHP state handling |
|
} |
|
|
|
// Some of the above terminated their lexeme but since the same character starts |
|
// the same class again, only reenter if non empty segment. |
|
|
|
bool nonEmptySegment = i >= static_cast<int>(styler.GetStartSegment()); |
|
if (state == SCE_HB_DEFAULT) { // One of the above succeeded |
|
if ((ch == '\"') && (nonEmptySegment)) { |
|
state = SCE_HB_STRING; |
|
} else if (ch == '\'') { |
|
state = SCE_HB_COMMENTLINE; |
|
} else if (iswordstart(ch)) { |
|
state = SCE_HB_WORD; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, SCE_HB_DEFAULT); |
|
} |
|
} else if (state == SCE_HBA_DEFAULT) { // One of the above succeeded |
|
if ((ch == '\"') && (nonEmptySegment)) { |
|
state = SCE_HBA_STRING; |
|
} else if (ch == '\'') { |
|
state = SCE_HBA_COMMENTLINE; |
|
} else if (iswordstart(ch)) { |
|
state = SCE_HBA_WORD; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, SCE_HBA_DEFAULT); |
|
} |
|
} else if (state == SCE_HJ_DEFAULT) { // One of the above succeeded |
|
if (ch == '/' && chNext == '*') { |
|
if (styler.SafeGetCharAt(i + 2) == '*') |
|
state = SCE_HJ_COMMENTDOC; |
|
else |
|
state = SCE_HJ_COMMENT; |
|
} else if (ch == '/' && chNext == '/') { |
|
state = SCE_HJ_COMMENTLINE; |
|
} else if ((ch == '\"') && (nonEmptySegment)) { |
|
state = SCE_HJ_DOUBLESTRING; |
|
} else if ((ch == '\'') && (nonEmptySegment)) { |
|
state = SCE_HJ_SINGLESTRING; |
|
} else if (iswordstart(ch)) { |
|
state = SCE_HJ_WORD; |
|
} else if (isoperator(ch)) { |
|
styler.ColourTo(i, statePrintForState(SCE_HJ_SYMBOLS, inScriptType)); |
|
} |
|
} |
|
} |
|
|
|
StateToPrint = statePrintForState(state, inScriptType); |
|
styler.ColourTo(lengthDoc - 1, StateToPrint); |
|
|
|
// Fill in the real level of the next line, keeping the current flags as they will be filled in later |
|
if (fold) { |
|
int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK; |
|
styler.SetLevel(lineCurrent, levelPrev | flagsNext); |
|
} |
|
} |
|
|
|
static bool isASPScript(int state) { |
|
return |
|
(state >= SCE_HJA_START && state <= SCE_HJA_REGEX) || |
|
(state >= SCE_HBA_START && state <= SCE_HBA_STRINGEOL) || |
|
(state >= SCE_HPA_DEFAULT && state <= SCE_HPA_IDENTIFIER); |
|
} |
|
|
|
static void ColouriseHBAPiece(StyleContext &sc, WordList *keywordlists[]) { |
|
WordList &keywordsVBS = *keywordlists[2]; |
|
if (sc.state == SCE_HBA_WORD) { |
|
if (!IsAWordChar(sc.ch)) { |
|
char s[100]; |
|
sc.GetCurrentLowered(s, sizeof(s)); |
|
if (keywordsVBS.InList(s)) { |
|
if (strcmp(s, "rem") == 0) { |
|
sc.ChangeState(SCE_HBA_COMMENTLINE); |
|
if (sc.atLineEnd) { |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} else { |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} else { |
|
sc.ChangeState(SCE_HBA_IDENTIFIER); |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} |
|
} else if (sc.state == SCE_HBA_NUMBER) { |
|
if (!IsAWordChar(sc.ch)) { |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HBA_STRING) { |
|
if (sc.ch == '\"') { |
|
sc.ForwardSetState(SCE_HBA_DEFAULT); |
|
} else if (sc.ch == '\r' || sc.ch == '\n') { |
|
sc.ChangeState(SCE_HBA_STRINGEOL); |
|
sc.ForwardSetState(SCE_HBA_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HBA_COMMENTLINE) { |
|
if (sc.ch == '\r' || sc.ch == '\n') { |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} |
|
|
|
if (sc.state == SCE_HBA_DEFAULT) { |
|
if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) { |
|
sc.SetState(SCE_HBA_NUMBER); |
|
} else if (IsAWordStart(sc.ch)) { |
|
sc.SetState(SCE_HBA_WORD); |
|
} else if (sc.ch == '\'') { |
|
sc.SetState(SCE_HBA_COMMENTLINE); |
|
} else if (sc.ch == '\"') { |
|
sc.SetState(SCE_HBA_STRING); |
|
} |
|
} |
|
} |
|
|
|
static void ColouriseHTMLPiece(StyleContext &sc, WordList *keywordlists[]) { |
|
WordList &keywordsTags = *keywordlists[0]; |
|
if (sc.state == SCE_H_COMMENT) { |
|
if (sc.Match("-->")) { |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_H_ENTITY) { |
|
if (sc.ch == ';') { |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else if (sc.ch != '#' && (sc.ch < 0x80) && !isalnum(sc.ch) // Should check that '#' follows '&', but it is unlikely anyway... |
|
&& sc.ch != '.' && sc.ch != '-' && sc.ch != '_' && sc.ch != ':') { // valid in XML |
|
sc.ChangeState(SCE_H_TAGUNKNOWN); |
|
sc.SetState(SCE_H_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_H_TAGUNKNOWN) { |
|
if (!ishtmlwordchar(static_cast<char>(sc.ch)) && !((sc.ch == '/') && (sc.chPrev == '<')) && sc.ch != '[') { |
|
char s[100]; |
|
sc.GetCurrentLowered(s, sizeof(s)); |
|
if (s[1] == '/') { |
|
if (keywordsTags.InList(s + 2)) { |
|
sc.ChangeState(SCE_H_TAG); |
|
} |
|
} else { |
|
if (keywordsTags.InList(s + 1)) { |
|
sc.ChangeState(SCE_H_TAG); |
|
} |
|
} |
|
if (sc.ch == '>') { |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else if (sc.Match('/', '>')) { |
|
sc.SetState(SCE_H_TAGEND); |
|
sc.Forward(); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else { |
|
sc.SetState(SCE_H_OTHER); |
|
} |
|
} |
|
} else if (sc.state == SCE_H_ATTRIBUTE) { |
|
if (!ishtmlwordchar(static_cast<char>(sc.ch))) { |
|
char s[100]; |
|
sc.GetCurrentLowered(s, sizeof(s)); |
|
if (!keywordsTags.InList(s)) { |
|
sc.ChangeState(SCE_H_ATTRIBUTEUNKNOWN); |
|
} |
|
sc.SetState(SCE_H_OTHER); |
|
} |
|
} else if (sc.state == SCE_H_OTHER) { |
|
if (sc.ch == '>') { |
|
sc.SetState(SCE_H_TAG); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else if (sc.Match('/', '>')) { |
|
sc.SetState(SCE_H_TAG); |
|
sc.Forward(); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else if (sc.chPrev == '=') { |
|
sc.SetState(SCE_H_VALUE); |
|
} |
|
} else if (sc.state == SCE_H_DOUBLESTRING) { |
|
if (sc.ch == '\"') { |
|
sc.ForwardSetState(SCE_H_OTHER); |
|
} |
|
} else if (sc.state == SCE_H_SINGLESTRING) { |
|
if (sc.ch == '\'') { |
|
sc.ForwardSetState(SCE_H_OTHER); |
|
} |
|
} else if (sc.state == SCE_H_NUMBER) { |
|
if (!IsADigit(sc.ch)) { |
|
sc.SetState(SCE_H_OTHER); |
|
} |
|
} |
|
|
|
if (sc.state == SCE_H_DEFAULT) { |
|
if (sc.ch == '<') { |
|
if (sc.Match("<!--")) |
|
sc.SetState(SCE_H_COMMENT); |
|
else |
|
sc.SetState(SCE_H_TAGUNKNOWN); |
|
} else if (sc.ch == '&') { |
|
sc.SetState(SCE_H_ENTITY); |
|
} |
|
} else if ((sc.state == SCE_H_OTHER) || (sc.state == SCE_H_VALUE)) { |
|
if (sc.ch == '\"' && sc.chPrev == '=') { |
|
sc.SetState(SCE_H_DOUBLESTRING); |
|
} else if (sc.ch == '\'' && sc.chPrev == '=') { |
|
sc.SetState(SCE_H_SINGLESTRING); |
|
} else if (IsADigit(sc.ch)) { |
|
sc.SetState(SCE_H_NUMBER); |
|
} else if (sc.ch == '>') { |
|
sc.SetState(SCE_H_TAG); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} else if (ishtmlwordchar(static_cast<char>(sc.ch))) { |
|
sc.SetState(SCE_H_ATTRIBUTE); |
|
} |
|
} |
|
} |
|
|
|
static void ColouriseASPPiece(StyleContext &sc, WordList *keywordlists[]) { |
|
// Possibly exit current state to either SCE_H_DEFAULT or SCE_HBA_DEFAULT |
|
if ((sc.state == SCE_H_ASPAT || isASPScript(sc.state)) && sc.Match('%', '>')) { |
|
sc.SetState(SCE_H_ASP); |
|
sc.Forward(); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} |
|
|
|
// Handle some ASP script |
|
if (sc.state >= SCE_HBA_START && sc.state <= SCE_HBA_STRINGEOL) { |
|
ColouriseHBAPiece(sc, keywordlists); |
|
} else if (sc.state >= SCE_H_DEFAULT && sc.state <= SCE_H_SGML_BLOCK_DEFAULT) { |
|
ColouriseHTMLPiece(sc, keywordlists); |
|
} |
|
|
|
// Enter new sc.state |
|
if ((sc.state == SCE_H_DEFAULT) || (sc.state == SCE_H_TAGUNKNOWN)) { |
|
if (sc.Match('<', '%')) { |
|
if (sc.state == SCE_H_TAGUNKNOWN) |
|
sc.ChangeState(SCE_H_ASP); |
|
else |
|
sc.SetState(SCE_H_ASP); |
|
sc.Forward(); |
|
sc.Forward(); |
|
if (sc.ch == '@') { |
|
sc.ForwardSetState(SCE_H_ASPAT); |
|
} else { |
|
if (sc.ch == '=') { |
|
sc.Forward(); |
|
} |
|
sc.SetState(SCE_HBA_DEFAULT); |
|
} |
|
} |
|
} |
|
} |
|
|
|
static void ColouriseASPDoc(unsigned int startPos, int length, int initStyle, WordList *keywordlists[], |
|
Accessor &styler) { |
|
// Lexer for HTML requires more lexical states (7 bits worth) than most lexers |
|
StyleContext sc(startPos, length, initStyle, styler, 0x7f); |
|
for (; sc.More(); sc.Forward()) { |
|
ColouriseASPPiece(sc, keywordlists); |
|
} |
|
sc.Complete(); |
|
} |
|
|
|
static void ColourisePHPPiece(StyleContext &sc, WordList *keywordlists[]) { |
|
// Possibly exit current state to either SCE_H_DEFAULT or SCE_HBA_DEFAULT |
|
if (sc.state >= SCE_HPHP_DEFAULT && sc.state <= SCE_HPHP_OPERATOR) { |
|
if (!isPHPStringState(sc.state) && |
|
(sc.state != SCE_HPHP_COMMENT) && |
|
(sc.Match('?', '>'))) { |
|
sc.SetState(SCE_H_QUESTION); |
|
sc.Forward(); |
|
sc.ForwardSetState(SCE_H_DEFAULT); |
|
} |
|
} |
|
|
|
if (sc.state >= SCE_H_DEFAULT && sc.state <= SCE_H_SGML_BLOCK_DEFAULT) { |
|
ColouriseHTMLPiece(sc, keywordlists); |
|
} |
|
|
|
// Handle some PHP script |
|
if (sc.state == SCE_HPHP_WORD) { |
|
if (!IsPhpWordChar(static_cast<char>(sc.ch))) { |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_COMMENTLINE) { |
|
if (sc.ch == '\r' || sc.ch == '\n') { |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_COMMENT) { |
|
if (sc.Match('*', '/')) { |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_HSTRING) { |
|
if (sc.ch == '\"') { |
|
sc.ForwardSetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_SIMPLESTRING) { |
|
if (sc.ch == '\'') { |
|
sc.ForwardSetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_VARIABLE) { |
|
if (!IsPhpWordChar(static_cast<char>(sc.ch))) { |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
} else if (sc.state == SCE_HPHP_OPERATOR) { |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
|
|
// Enter new sc.state |
|
if ((sc.state == SCE_H_DEFAULT) || (sc.state == SCE_H_TAGUNKNOWN)) { |
|
if (sc.Match("<?php")) { |
|
sc.SetState(SCE_H_QUESTION); |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.Forward(); |
|
sc.SetState(SCE_HPHP_DEFAULT); |
|
} |
|
} |
|
if (sc.state == SCE_HPHP_DEFAULT) { |
|
if (IsPhpWordStart(static_cast<char>(sc.ch))) { |
|
sc.SetState(SCE_HPHP_WORD); |
|
} else if (sc.ch == '#') { |
|
sc.SetState(SCE_HPHP_COMMENTLINE); |
|
} else if (sc.Match("<!--")) { |
|
sc.SetState(SCE_HPHP_COMMENTLINE); |
|
} else if (sc.Match('/', '/')) { |
|
sc.SetState(SCE_HPHP_COMMENTLINE); |
|
} else if (sc.Match('/', '*')) { |
|
sc.SetState(SCE_HPHP_COMMENT); |
|
} else if (sc.ch == '\"') { |
|
sc.SetState(SCE_HPHP_HSTRING); |
|
} else if (sc.ch == '\'') { |
|
sc.SetState(SCE_HPHP_SIMPLESTRING); |
|
} else if (sc.ch == '$' && IsPhpWordStart(static_cast<char>(sc.chNext))) { |
|
sc.SetState(SCE_HPHP_VARIABLE); |
|
} else if (isoperator(static_cast<char>(sc.ch))) { |
|
sc.SetState(SCE_HPHP_OPERATOR); |
|
} |
|
} |
|
} |
|
|
|
static void ColourisePHPDoc(unsigned int startPos, int length, int initStyle, WordList *keywordlists[], |
|
Accessor &styler) { |
|
// Lexer for HTML requires more lexical states (7 bits worth) than most lexers |
|
StyleContext sc(startPos, length, initStyle, styler, 0x7f); |
|
for (; sc.More(); sc.Forward()) { |
|
ColourisePHPPiece(sc, keywordlists); |
|
} |
|
sc.Complete(); |
|
} |
|
|
|
static void ColourisePHPScriptDoc(unsigned int startPos, int length, int initStyle, WordList *keywordlists[], |
|
Accessor &styler) { |
|
if(startPos == 0) initStyle = SCE_HPHP_DEFAULT; |
|
ColouriseHyperTextDoc(startPos,length,initStyle,keywordlists,styler); |
|
} |
|
|
|
static const char * const htmlWordListDesc[] = { |
|
"HTML elements and attributes", |
|
"JavaScript keywords", |
|
"VBScript keywords", |
|
"Python keywords", |
|
"PHP keywords", |
|
"SGML and DTD keywords", |
|
0, |
|
}; |
|
|
|
static const char * const phpscriptWordListDesc[] = { |
|
"", //Unused |
|
"", //Unused |
|
"", //Unused |
|
"", //Unused |
|
"PHP keywords", |
|
"", //Unused |
|
0, |
|
}; |
|
|
|
LexerModule lmHTML(SCLEX_HTML, ColouriseHyperTextDoc, "hypertext", 0, htmlWordListDesc, 7); |
|
LexerModule lmXML(SCLEX_XML, ColouriseHyperTextDoc, "xml", 0, htmlWordListDesc, 7); |
|
// SCLEX_ASP and SCLEX_PHP should not be used in new code: use SCLEX_HTML instead. |
|
LexerModule lmASP(SCLEX_ASP, ColouriseASPDoc, "asp", 0, htmlWordListDesc, 7); |
|
LexerModule lmPHP(SCLEX_PHP, ColourisePHPDoc, "php", 0, htmlWordListDesc, 7); |
|
LexerModule lmPHPSCRIPT(SCLEX_PHPSCRIPT, ColourisePHPScriptDoc, "phpscript", 0, phpscriptWordListDesc, 7);
|
|
|