summaryrefslogtreecommitdiffstats
path: root/kate/scripts/script-indent-c1-test.lua
diff options
context:
space:
mode:
authortoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
committertoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
commitce4a32fe52ef09d8f5ff1dd22c001110902b60a2 (patch)
tree5ac38a06f3dde268dc7927dc155896926aaf7012 /kate/scripts/script-indent-c1-test.lua
downloadtdelibs-ce4a32fe52ef09d8f5ff1dd22c001110902b60a2.tar.gz
tdelibs-ce4a32fe52ef09d8f5ff1dd22c001110902b60a2.zip
Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.
BUG:215923 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdelibs@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'kate/scripts/script-indent-c1-test.lua')
-rw-r--r--kate/scripts/script-indent-c1-test.lua154
1 files changed, 154 insertions, 0 deletions
diff --git a/kate/scripts/script-indent-c1-test.lua b/kate/scripts/script-indent-c1-test.lua
new file mode 100644
index 000000000..d2593b962
--- /dev/null
+++ b/kate/scripts/script-indent-c1-test.lua
@@ -0,0 +1,154 @@
+function indentChar(c)
+ katedebug("LUA indentChar has been called")
+ local tabWidth = 4
+ local spaceIndent = true
+ local indentWidth = 4
+
+ local line=view.cursorLine()
+ local col=view.cursorColumn()
+ local textLine=document.textLine(line)
+ local prevLine=document.textLine(line-1);
+
+ --local prevIndent=prevLine.match("^%s*")
+ --local addIndent=""
+
+
+ -- unindent } and {, if not in a comment
+
+ if not(string.find(textLine,"^%s*//")) then
+ katedebug("no comment")
+ katedebug(c);
+ if (c=="}") or (c=="{") then
+ katedebug("} or { found");
+ if (string.find(textLine,"^%s%s%s%s")) then
+ katedebug("removing one indentation level");
+ document.removeText(line,0,line,tabWidth)
+ view.setCursorPositionReal(line,col-tabWidth)
+ else
+ katedebug("no indentation found");
+ end
+ end
+ else
+ katedebug("in comment");
+ end
+end
+
+
+
+
+
+function indentNewLine()
+ local tabWidth = 4;
+ local spaceIndent = true;
+ local indentWidth = 4;
+
+ local strIndentCharacters = " ";
+ local strIndentFiller = "";
+
+ local intStartLine, intStartColumn= view.cursorPosition();
+
+ local strTextLine = document.textLine( intStartLine );
+ local strPrevLine = document.textLine( intStartLine - 1 );
+
+ local addIndent = "";
+
+
+ local intCurrentLine = intStartLine;
+ local openParenCount = 0;
+ local openBraceCount = 0;
+
+
+
+ function firstNonSpace( text )
+ local pos=string.find(text,"[^%s]")
+ if pos then
+ return pos
+ else
+ return -1
+ end
+ end
+
+ function lastNonSpace (text)
+ local pos=string.find(text,"[^%s]%s*$")
+ if pos then
+ return pos
+ else
+ return -1
+ end
+ end
+
+ local strCurrentLine=""
+ local intCurrentLine=intStartLine
+ katedebug(intStartLine .. "-" .. intStartColumn)
+ function label_while()
+ katedebug("label_while has been entered: intCurrentLine" .. intCurrentLine)
+ while (intCurrentLine>0) do
+ --katedebug("intCurrentLine:" ..intCurrentLine)
+ intCurrentLine=intCurrentLine-1
+ strCurrentLine=document.textLine(intCurrentLine)
+ intLastChar= lastNonSpace(strCurrentLine)
+ intFirstChar=firstNonSpace(strCurrentLine)
+ if not (string.find(strCurrentLine,"//")) then
+ for intCurrentChar=intLastChar,intFirstChar,-1 do
+ ch=string.sub(strCurrentLine,intCurrentChar,intCurrentChar)
+ if (ch=="(") or (ch=="[") then
+ openParenCount=openParenCount+1
+ if (openParenCount>0) then
+ return label_while()
+ end
+ elseif (ch==")") or (ch=="]") then
+ openParenCount=openParenCount-1
+ elseif (ch=="{") then
+ openBraceCount=openBraceCount+1
+ if openBraceCount>0 then
+ return label_while()
+ end
+ elseif (ch=="}") then
+ openBraceCount=openBraceCount-1
+ elseif (ch==";") then
+ if (openParenCount==0) then
+ lookingForScopeKeywords=false
+ end
+ end
+ end
+ end
+ end
+ end
+
+ label_while()
+
+
+
+ katedebug( "line: " .. intCurrentLine)
+ katedebug( openParenCount .. ", " .. openBraceCount)
+
+ local ok,match=pcall(function () return string.sub(strCurrentLine,string.find(strCurrentLine,"^%s+")) end)
+ if ok then
+ katedebug("Line HAD leading whitespaces")
+ strIndentFiller=match
+ else
+ katedebug("Line had NO leading whitespaces")
+ strIndentFiller=""
+ end
+
+
+ while( openParenCount > 0 ) do
+ openParenCount=openParenCount-1
+ strIndentFiller = strIndentFiller .. strIndentCharacters
+ end
+
+ while( openBraceCount > 0 ) do
+ openBraceCount=openBraceCount-1;
+ strIndentFiller = strIndentFiller .. strIndentCharacters
+ end
+
+ document.insertText( intStartLine, 0, strIndentFiller )
+ view.setCursorPositionReal( intStartLine, string.len(document.textLine( intStartLine )))
+end
+
+
+
+
+
+indenter.register(indenter.OnChar,indentChar)
+indenter.register(indenter.OnNewline,indentNewLine) \ No newline at end of file