ext/scintilla/lexers/LexMake.cxx

   1 // Scintilla source code edit control
   2 /** @file LexMake.cxx
   3  ** Lexer for make 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 using namespace Scintilla;
  27
  28 static inline bool AtEOL(Accessor &styler, Sci_PositionU i) {
  29         return (styler[i] == '\n') ||
  30                ((styler[i] == '\r') && (styler.SafeGetCharAt(i + 1) != '\n'));
  31 }
  32
  33 static void ColouriseMakeLine(
  34     char *lineBuffer,
  35     Sci_PositionU lengthLine,
  36     Sci_PositionU startLine,
  37     Sci_PositionU endPos,
  38     Accessor &styler) {
  39
  40         Sci_PositionU i = 0;
  41         Sci_Position lastNonSpace = -1;
  42         unsigned int state = SCE_MAKE_DEFAULT;
  43         bool bSpecial = false;
  44
  45         // check for a tab character in column 0 indicating a command
  46         bool bCommand = false;
  47         if ((lengthLine > 0) && (lineBuffer[0] == '\t'))
  48                 bCommand = true;
  49
  50         // Skip initial spaces
  51         while ((i < lengthLine) && isspacechar(lineBuffer[i])) {
  52                 i++;
  53         }
  54         if (i < lengthLine) {
  55                 if (lineBuffer[i] == '#') {     // Comment
  56                         styler.ColourTo(endPos, SCE_MAKE_COMMENT);
  57                         return;
  58                 }
  59                 if (lineBuffer[i] == '!') {     // Special directive
  60                         styler.ColourTo(endPos, SCE_MAKE_PREPROCESSOR);
  61                         return;
  62                 }
  63         }
  64         int varCount = 0;
  65         while (i < lengthLine) {
  66                 if (((i + 1) < lengthLine) && (lineBuffer[i] == '$' && lineBuffer[i + 1] == '(')) {
  67                         styler.ColourTo(startLine + i - 1, state);
  68                         state = SCE_MAKE_IDENTIFIER;
  69                         varCount++;
  70                 } else if (state == SCE_MAKE_IDENTIFIER && lineBuffer[i] == ')') {
  71                         if (--varCount == 0) {
  72                                 styler.ColourTo(startLine + i, state);
  73                                 state = SCE_MAKE_DEFAULT;
  74                         }
  75                 }
  76
  77                 // skip identifier and target styling if this is a command line
  78                 if (!bSpecial && !bCommand) {
  79                         if (lineBuffer[i] == ':') {
  80                                 if (((i + 1) < lengthLine) && (lineBuffer[i + 1] == '=')) {
  81                                         // it's a ':=', so style as an identifier
  82                                         if (lastNonSpace >= 0)
  83                                                 styler.ColourTo(startLine + lastNonSpace, SCE_MAKE_IDENTIFIER);
  84                                         styler.ColourTo(startLine + i - 1, SCE_MAKE_DEFAULT);
  85                                         styler.ColourTo(startLine + i + 1, SCE_MAKE_OPERATOR);
  86                                 } else {
  87                                         // We should check that no colouring was made since the beginning of the line,
  88                                         // to avoid colouring stuff like /OUT:file
  89                                         if (lastNonSpace >= 0)
  90                                                 styler.ColourTo(startLine + lastNonSpace, SCE_MAKE_TARGET);
  91                                         styler.ColourTo(startLine + i - 1, SCE_MAKE_DEFAULT);
  92                                         styler.ColourTo(startLine + i, SCE_MAKE_OPERATOR);
  93                                 }
  94                                 bSpecial = true;        // Only react to the first ':' of the line
  95                                 state = SCE_MAKE_DEFAULT;
  96                         } else if (lineBuffer[i] == '=') {
  97                                 if (lastNonSpace >= 0)
  98                                         styler.ColourTo(startLine + lastNonSpace, SCE_MAKE_IDENTIFIER);
  99                                 styler.ColourTo(startLine + i - 1, SCE_MAKE_DEFAULT);
 100                                 styler.ColourTo(startLine + i, SCE_MAKE_OPERATOR);
 101                                 bSpecial = true;        // Only react to the first '=' of the line
 102                                 state = SCE_MAKE_DEFAULT;
 103                         }
 104                 }
 105                 if (!isspacechar(lineBuffer[i])) {
 106                         lastNonSpace = i;
 107                 }
 108                 i++;
 109         }
 110         if (state == SCE_MAKE_IDENTIFIER) {
 111                 styler.ColourTo(endPos, SCE_MAKE_IDEOL);        // Error, variable reference not ended
 112         } else {
 113                 styler.ColourTo(endPos, SCE_MAKE_DEFAULT);
 114         }
 115 }
 116
 117 static void ColouriseMakeDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {
 118         char lineBuffer[1024];
 119         styler.StartAt(startPos);
 120         styler.StartSegment(startPos);
 121         Sci_PositionU linePos = 0;
 122         Sci_PositionU startLine = startPos;
 123         for (Sci_PositionU i = startPos; i < startPos + length; i++) {
 124                 lineBuffer[linePos++] = styler[i];
 125                 if (AtEOL(styler, i) || (linePos >= sizeof(lineBuffer) - 1)) {
 126                         // End of line (or of line buffer) met, colourise it
 127                         lineBuffer[linePos] = '\0';
 128                         ColouriseMakeLine(lineBuffer, linePos, startLine, i, styler);
 129                         linePos = 0;
 130                         startLine = i + 1;
 131                 }
 132         }
 133         if (linePos > 0) {      // Last line does not have ending characters
 134                 ColouriseMakeLine(lineBuffer, linePos, startLine, startPos + length - 1, styler);
 135         }
 136 }
 137
 138 static const char *const emptyWordListDesc[] = {
 139         0
 140 };
 141
 142 LexerModule lmMake(SCLEX_MAKEFILE, ColouriseMakeDoc, "makefile", 0, emptyWordListDesc);