scintilla/lexers/LexProps.cxx

   1 // Scintilla source code edit control
   2 /** @file LexProps.cxx
   3  ** Lexer for properties files.
   4  **/
   5 // Copyright 1998-2001 by Neil Hodgson <neilh@scintilla.org>
   6 // The License.txt file describes the conditions under which this software may be distributed.
   7
   8 #include <stdlib.h>
   9 #include <string.h>
  10 #include <stdio.h>
  11 #include <stdarg.h>
  12 #include <assert.h>
  13 #include <ctype.h>
  14
  15 #include "ILexer.h"
  16 #include "Scintilla.h"
  17 #include "SciLexer.h"
  18
  19 #include "WordList.h"
  20 #include "LexAccessor.h"
  21 #include "Accessor.h"
  22 #include "StyleContext.h"
  23 #include "CharacterSet.h"
  24 #include "LexerModule.h"
  25
  26 #ifdef SCI_NAMESPACE
  27 using namespace Scintilla;
  28 #endif
  29
  30 static inline bool AtEOL(Accessor &styler, Sci_PositionU i) {
  31         return (styler[i] == '\n') ||
  32                ((styler[i] == '\r') && (styler.SafeGetCharAt(i + 1) != '\n'));
  33 }
  34
  35 static inline bool isassignchar(unsigned char ch) {
  36         return (ch == '=') || (ch == ':');
  37 }
  38
  39 static void ColourisePropsLine(
  40     char *lineBuffer,
  41     Sci_PositionU lengthLine,
  42     Sci_PositionU startLine,
  43     Sci_PositionU endPos,
  44     Accessor &styler,
  45     bool allowInitialSpaces) {
  46
  47         Sci_PositionU i = 0;
  48         if (allowInitialSpaces) {
  49                 while ((i < lengthLine) && isspacechar(lineBuffer[i]))  // Skip initial spaces
  50                         i++;
  51         } else {
  52                 if (isspacechar(lineBuffer[i])) // don't allow initial spaces
  53                         i = lengthLine;
  54         }
  55
  56         if (i < lengthLine) {
  57                 if (lineBuffer[i] == '#' || lineBuffer[i] == '!' || lineBuffer[i] == ';') {
  58                         styler.ColourTo(endPos, SCE_PROPS_COMMENT);
  59                 } else if (lineBuffer[i] == '[') {
  60                         styler.ColourTo(endPos, SCE_PROPS_SECTION);
  61                 } else if (lineBuffer[i] == '@') {
  62                         styler.ColourTo(startLine + i, SCE_PROPS_DEFVAL);
  63                         if (isassignchar(lineBuffer[i++]))
  64                                 styler.ColourTo(startLine + i, SCE_PROPS_ASSIGNMENT);
  65                         styler.ColourTo(endPos, SCE_PROPS_DEFAULT);
  66                 } else {
  67                         // Search for the '=' character
  68                         while ((i < lengthLine) && !isassignchar(lineBuffer[i]))
  69                                 i++;
  70                         if ((i < lengthLine) && isassignchar(lineBuffer[i])) {
  71                                 styler.ColourTo(startLine + i - 1, SCE_PROPS_KEY);
  72                                 styler.ColourTo(startLine + i, SCE_PROPS_ASSIGNMENT);
  73                                 styler.ColourTo(endPos, SCE_PROPS_DEFAULT);
  74                         } else {
  75                                 styler.ColourTo(endPos, SCE_PROPS_DEFAULT);
  76                         }
  77                 }
  78         } else {
  79                 styler.ColourTo(endPos, SCE_PROPS_DEFAULT);
  80         }
  81 }
  82
  83 static void ColourisePropsDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {
  84         char lineBuffer[1024];
  85         styler.StartAt(startPos);
  86         styler.StartSegment(startPos);
  87         Sci_PositionU linePos = 0;
  88         Sci_PositionU startLine = startPos;
  89
  90         // property lexer.props.allow.initial.spaces
  91         //      For properties files, set to 0 to style all lines that start with whitespace in the default style.
  92         //      This is not suitable for SciTE .properties files which use indentation for flow control but
  93         //      can be used for RFC2822 text where indentation is used for continuation lines.
  94         bool allowInitialSpaces = styler.GetPropertyInt("lexer.props.allow.initial.spaces", 1) != 0;
  95
  96         for (Sci_PositionU i = startPos; i < startPos + length; i++) {
  97                 lineBuffer[linePos++] = styler[i];
  98                 if (AtEOL(styler, i) || (linePos >= sizeof(lineBuffer) - 1)) {
  99                         // End of line (or of line buffer) met, colourise it
 100                         lineBuffer[linePos] = '\0';
 101                         ColourisePropsLine(lineBuffer, linePos, startLine, i, styler, allowInitialSpaces);
 102                         linePos = 0;
 103                         startLine = i + 1;
 104                 }
 105         }
 106         if (linePos > 0) {      // Last line does not have ending characters
 107                 ColourisePropsLine(lineBuffer, linePos, startLine, startPos + length - 1, styler, allowInitialSpaces);
 108         }
 109 }
 110
 111 // adaption by ksc, using the "} else {" trick of 1.53
 112 // 030721
 113 static void FoldPropsDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {
 114         bool foldCompact = styler.GetPropertyInt("fold.compact", 1) != 0;
 115
 116         Sci_PositionU endPos = startPos + length;
 117         int visibleChars = 0;
 118         Sci_Position lineCurrent = styler.GetLine(startPos);
 119
 120         char chNext = styler[startPos];
 121         int styleNext = styler.StyleAt(startPos);
 122         bool headerPoint = false;
 123         int lev;
 124
 125         for (Sci_PositionU i = startPos; i < endPos; i++) {
 126                 char ch = chNext;
 127                 chNext = styler[i+1];
 128
 129                 int style = styleNext;
 130                 styleNext = styler.StyleAt(i + 1);
 131                 bool atEOL = (ch == '\r' && chNext != '\n') || (ch == '\n');
 132
 133                 if (style == SCE_PROPS_SECTION) {
 134                         headerPoint = true;
 135                 }
 136
 137                 if (atEOL) {
 138                         lev = SC_FOLDLEVELBASE;
 139
 140                         if (lineCurrent > 0) {
 141                                 int levelPrevious = styler.LevelAt(lineCurrent - 1);
 142
 143                                 if (levelPrevious & SC_FOLDLEVELHEADERFLAG) {
 144                                         lev = SC_FOLDLEVELBASE + 1;
 145                                 } else {
 146                                         lev = levelPrevious & SC_FOLDLEVELNUMBERMASK;
 147                                 }
 148                         }
 149
 150                         if (headerPoint) {
 151                                 lev = SC_FOLDLEVELBASE;
 152                         }
 153                         if (visibleChars == 0 && foldCompact)
 154                                 lev |= SC_FOLDLEVELWHITEFLAG;
 155
 156                         if (headerPoint) {
 157                                 lev |= SC_FOLDLEVELHEADERFLAG;
 158                         }
 159                         if (lev != styler.LevelAt(lineCurrent)) {
 160                                 styler.SetLevel(lineCurrent, lev);
 161                         }
 162
 163                         lineCurrent++;
 164                         visibleChars = 0;
 165                         headerPoint = false;
 166                 }
 167                 if (!isspacechar(ch))
 168                         visibleChars++;
 169         }
 170
 171         if (lineCurrent > 0) {
 172                 int levelPrevious = styler.LevelAt(lineCurrent - 1);
 173                 if (levelPrevious & SC_FOLDLEVELHEADERFLAG) {
 174                         lev = SC_FOLDLEVELBASE + 1;
 175                 } else {
 176                         lev = levelPrevious & SC_FOLDLEVELNUMBERMASK;
 177                 }
 178         } else {
 179                 lev = SC_FOLDLEVELBASE;
 180         }
 181         int flagsNext = styler.LevelAt(lineCurrent);
 182         styler.SetLevel(lineCurrent, lev | (flagsNext & ~SC_FOLDLEVELNUMBERMASK));
 183 }
 184
 185 static const char *const emptyWordListDesc[] = {
 186         0
 187 };
 188
 189 LexerModule lmProps(SCLEX_PROPERTIES, ColourisePropsDoc, "props", FoldPropsDoc, emptyWordListDesc);