merged 2.2 branch

[wxWidgets.git] / contrib / src / stc / scintilla / src / WindowAccessor.cxx

diff --git a/contrib/src/stc/scintilla/src/WindowAccessor.cxx b/contrib/src/stc/scintilla/src/WindowAccessor.cxx
new file mode 100644 (file)
index 0000000..059c877
--- /dev/null
+++ b/contrib/src/stc/scintilla/src/WindowAccessor.cxx
@@ -0,0 +1,173 @@
+// SciTE - Scintilla based Text Editor
+// Accessor.cxx - rapid easy access to contents of a Scintilla
+// Copyright 1998-2000 by Neil Hodgson <neilh@scintilla.org>
+// The License.txt file describes the conditions under which this software may be distributed.
+
+#include <stdlib.h>
+#include <ctype.h> 
+#include <stdio.h>
+
+#include "Platform.h"
+
+#include "PropSet.h"
+#include "Accessor.h"
+#include "WindowAccessor.h"
+#include "Scintilla.h"
+
+WindowAccessor::~WindowAccessor() {
+}
+
+bool WindowAccessor::InternalIsLeadByte(char ch) {
+#if PLAT_GTK
+       // TODO: support DBCS under GTK+
+       return false;
+#elif PLAT_WIN 
+       if (SC_CP_UTF8 == codePage)
+               // For lexing, all characters >= 0x80 are treated the
+               // same so none is considered a lead byte.
+               return false;   
+       else
+               return IsDBCSLeadByteEx(codePage, ch);
+#elif PLAT_WX 
+       return false;
+#endif 
+}
+
+void WindowAccessor::Fill(int position) {
+       if (lenDoc == -1)
+               lenDoc = Platform::SendScintilla(id, WM_GETTEXTLENGTH, 0, 0);
+       startPos = position - slopSize;
+       if (startPos + bufferSize > lenDoc)
+               startPos = lenDoc - bufferSize;
+       if (startPos < 0)
+               startPos = 0;
+       endPos = startPos + bufferSize;
+       if (endPos > lenDoc)
+               endPos = lenDoc;
+
+       TEXTRANGE tr = {{startPos, endPos}, buf};
+       Platform::SendScintilla(id, EM_GETTEXTRANGE, 0, reinterpret_cast<LPARAM>(&tr));
+}
+
+char WindowAccessor::StyleAt(int position) {
+       return static_cast<char>(Platform::SendScintilla(
+               id, SCI_GETSTYLEAT, position, 0));
+}
+
+int WindowAccessor::GetLine(int position) {
+       return Platform::SendScintilla(id, EM_LINEFROMCHAR, position, 0);
+}
+
+int WindowAccessor::LineStart(int line) {
+       return Platform::SendScintilla(id, EM_LINEINDEX, line, 0);
+}
+
+int WindowAccessor::LevelAt(int line) {
+       return Platform::SendScintilla(id, SCI_GETFOLDLEVEL, line, 0);
+}
+
+int WindowAccessor::Length() { 
+       if (lenDoc == -1) 
+               lenDoc = Platform::SendScintilla(id, WM_GETTEXTLENGTH, 0, 0);
+       return lenDoc; 
+}
+
+int WindowAccessor::GetLineState(int line) {
+       return Platform::SendScintilla(id, SCI_GETLINESTATE, line);
+}
+
+int WindowAccessor::SetLineState(int line, int state) {
+       return Platform::SendScintilla(id, SCI_SETLINESTATE, line, state);
+}
+
+void WindowAccessor::StartAt(unsigned int start, char chMask) {
+       Platform::SendScintilla(id, SCI_STARTSTYLING, start, chMask);
+}
+
+void WindowAccessor::StartSegment(unsigned int pos) {
+       startSeg = pos;
+}
+
+void WindowAccessor::ColourTo(unsigned int pos, int chAttr) {
+       // Only perform styling if non empty range
+       if (pos != startSeg - 1) {
+               if (pos < startSeg) {
+                       Platform::DebugPrintf("Bad colour positions %d - %d\n", startSeg, pos);
+               }
+
+               if (validLen + (pos - startSeg + 1) >= bufferSize)
+                       Flush();
+               if (validLen + (pos - startSeg + 1) >= bufferSize) {
+                       // Too big for buffer so send directly
+                       Platform::SendScintilla(id, SCI_SETSTYLING, pos - startSeg + 1, chAttr);
+               } else {
+                       if (chAttr != chWhile)
+                               chFlags = 0;
+                       chAttr |= chFlags;
+                       for (unsigned int i = startSeg; i <= pos; i++) {
+                               styleBuf[validLen++] = static_cast<char>(chAttr);
+                       }
+               }
+       }
+       startSeg = pos+1;
+}
+
+void WindowAccessor::SetLevel(int line, int level) {
+       Platform::SendScintilla(id, SCI_SETFOLDLEVEL, line, level);
+}
+
+void WindowAccessor::Flush() {
+       startPos = extremePosition;
+       lenDoc = -1;
+       if (validLen > 0) {
+               Platform::SendScintilla(id, SCI_SETSTYLINGEX, validLen, 
+                       reinterpret_cast<LPARAM>(styleBuf));
+               validLen = 0;
+       }
+}
+
+int WindowAccessor::IndentAmount(int line, int *flags, PFNIsCommentLeader pfnIsCommentLeader) {
+       int end = Length();
+       int spaceFlags = 0;
+       
+       // Determines the indentation level of the current line and also checks for consistent 
+       // indentation compared to the previous line.
+       // Indentation is judged consistent when the indentation whitespace of each line lines 
+       // the same or the indentation of one line is a prefix of the other.
+       
+       int pos = LineStart(line);
+       char ch = (*this)[pos];
+       int indent = 0;
+       bool inPrevPrefix = line > 0;
+       int posPrev = inPrevPrefix ? LineStart(line-1) : 0;
+       while ((ch == ' ' || ch == '\t') && (pos < end)) {
+               if (inPrevPrefix) {
+                       char chPrev = (*this)[posPrev++];
+                       if (chPrev == ' ' || chPrev == '\t') {
+                               if (chPrev != ch)
+                                       spaceFlags |= wsInconsistent;
+                       } else {
+                               inPrevPrefix = false;
+                       }
+               }
+               if (ch == ' ') {
+                       spaceFlags |= wsSpace;
+                       indent++;
+               } else {        // Tab
+                       spaceFlags |= wsTab;
+                       if (spaceFlags & wsSpace)
+                               spaceFlags |= wsSpaceTab;
+                       indent = (indent / 8 + 1) * 8;
+               }
+               ch = (*this)[++pos];
+       }
+       
+       *flags = spaceFlags;
+       indent += SC_FOLDLEVELBASE;
+       // if completely empty line or the start of a comment...
+       if (isspace(ch) || (pfnIsCommentLeader && (*pfnIsCommentLeader)(*this, pos, end-pos)) )
+               return indent | SC_FOLDLEVELWHITEFLAG;
+       else
+               return indent;
+}
+