<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en_US" xml:lang="en_US">
<head>
<title>kate: kateluaindentscript.cpp Source File (kate)</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Style-Type" content="text/css" />
<meta http-equiv="pics-label" content='(pics-1.1 "http://www.icra.org/ratingsv02.html" comment "ICRAonline DE v2.0" l gen true for "http://www.kde.org" r (nz 1 vz 1 lz 1 oz 1 cb 1) "http://www.rsac.org/ratingsv01.html" l gen true for "http://www.kde.org" r (n 0 s 0 v 0 l 0))' />
<meta name="trademark" content="KDE e.V." />
<meta name="description" content="K Desktop Environment Homepage, KDE.org" />
<meta name="MSSmartTagsPreventParsing" content="true" />
<meta name="robots" content="all" />
<link rel="shortcut icon" href="../../favicon.ico" />
<link rel="stylesheet" media="screen" type="text/css" title="APIDOX" href="doxygen.css" />
</head>
<body>
<div id="nav_header_top" align="right">
<a href="#content" class="doNotDisplay" accesskey="2">Skip to main content ::</a>
<a href="../.."><img id="nav_header_logo" alt="Home" align="left" src="../../kde_gear_64.png" border="0" /></a>
<span class="doNotDisplay">::</span>
<div id="nav_header_title" align="left">KDE API Reference</div>
</div>
<div id="nav_header_bottom" align="right">
<span class="doNotDisplay">:: <a href="#navigation" accesskey="5">Skip to Link Menu</a><br/></span>
<div id="nav_header_bottom_right" style="text-align: left;">
/ <a href="../..">API Reference</a>
/ <a href=".">kate</a>
</div>
</div>
<table id="main" border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td valign="top" class="menuheader" height="0"></td>
<td id="contentcolumn" valign="top" rowspan="2" >
<div id="content" style="padding-top: 0px;"><div style="width:100%; margin: 0px; padding: 0px;">
<a name="content"></a>
<!-- Generated by Doxygen 1.7.4 -->
<div class="header">
<div class="headertitle">
<div class="title">kateluaindentscript.cpp</div> </div>
</div>
<div class="contents">
<div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/* This file is part of the KDE libraries</span>
<a name="l00002"></a>00002 <span class="comment"> Copyright (C) 2005 Joseph Wenninger <jowenn@kde.org></span>
<a name="l00003"></a>00003 <span class="comment"></span>
<a name="l00004"></a>00004 <span class="comment"> This library is free software; you can redistribute it and/or</span>
<a name="l00005"></a>00005 <span class="comment"> modify it under the terms of the GNU Library General Public</span>
<a name="l00006"></a>00006 <span class="comment"> License version 2 as published by the Free Software Foundation.</span>
<a name="l00007"></a>00007 <span class="comment"></span>
<a name="l00008"></a>00008 <span class="comment"> This library is distributed in the hope that it will be useful,</span>
<a name="l00009"></a>00009 <span class="comment"> but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
<a name="l00010"></a>00010 <span class="comment"> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU</span>
<a name="l00011"></a>00011 <span class="comment"> Library General Public License for more details.</span>
<a name="l00012"></a>00012 <span class="comment"></span>
<a name="l00013"></a>00013 <span class="comment"> You should have received a copy of the GNU Library General Public License</span>
<a name="l00014"></a>00014 <span class="comment"> along with this library; see the file COPYING.LIB. If not, write to</span>
<a name="l00015"></a>00015 <span class="comment"> the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,</span>
<a name="l00016"></a>00016 <span class="comment"> Boston, MA 02110-1301, USA.</span>
<a name="l00017"></a>00017 <span class="comment">*/</span>
<a name="l00018"></a>00018
<a name="l00019"></a>00019 <span class="preprocessor">#include "config.h"</span>
<a name="l00020"></a>00020 <span class="preprocessor">#ifdef HAVE_LUA</span>
<a name="l00021"></a>00021 <span class="preprocessor"></span>
<a name="l00022"></a>00022 <span class="preprocessor">#include "kateluaindentscript.h"</span>
<a name="l00023"></a>00023 <span class="preprocessor">#include "katedocument.h"</span>
<a name="l00024"></a>00024 <span class="preprocessor">#include "kateview.h"</span>
<a name="l00025"></a>00025
<a name="l00026"></a>00026 <span class="preprocessor">#include <sys/types.h></span>
<a name="l00027"></a>00027 <span class="preprocessor">#include <sys/stat.h></span>
<a name="l00028"></a>00028 <span class="preprocessor">#include <unistd.h></span>
<a name="l00029"></a>00029
<a name="l00030"></a>00030 <span class="preprocessor">#include <qfile.h></span>
<a name="l00031"></a>00031 <span class="preprocessor">#include <qfileinfo.h></span>
<a name="l00032"></a>00032 <span class="preprocessor">#include <kstandarddirs.h></span>
<a name="l00033"></a>00033
<a name="l00034"></a>00034 <span class="preprocessor">#include <kconfig.h></span>
<a name="l00035"></a>00035 <span class="preprocessor">#include <kglobal.h></span>
<a name="l00036"></a>00036 <span class="preprocessor">#include <<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/klocale_8h.html">klocale.h</a>></span>
<a name="l00037"></a>00037
<a name="l00038"></a>00038 <span class="keyword">extern</span> <span class="stringliteral">"C"</span> {
<a name="l00039"></a>00039 <span class="preprocessor">#include <lua.h></span>
<a name="l00040"></a>00040 <span class="preprocessor">#include <lualib.h></span>
<a name="l00041"></a>00041 }
<a name="l00042"></a>00042
<a name="l00043"></a>00043 <span class="preprocessor">#define ONCHAR 1</span>
<a name="l00044"></a>00044 <span class="preprocessor"></span><span class="preprocessor">#define ONNEWLINE 2</span>
<a name="l00045"></a>00045 <span class="preprocessor"></span><span class="preprocessor">#define ONCHARSTR "kateonchar"</span>
<a name="l00046"></a>00046 <span class="preprocessor"></span><span class="preprocessor">#define ONNEWLINESTR "kateonnewline"</span>
<a name="l00047"></a>00047 <span class="preprocessor"></span>
<a name="l00048"></a>00048 <span class="preprocessor">#define katelua_registerFunc(n,f,t) \</span>
<a name="l00049"></a>00049 <span class="preprocessor"> (lua_pushstring(m_interpreter, n), \</span>
<a name="l00050"></a>00050 <span class="preprocessor"> lua_pushcfunction(m_interpreter, f), \</span>
<a name="l00051"></a>00051 <span class="preprocessor"> lua_settable(m_interpreter, t))</span>
<a name="l00052"></a>00052 <span class="preprocessor"></span>
<a name="l00053"></a>00053 <span class="preprocessor">#define katelua_registerNumConst(n,v,t) \</span>
<a name="l00054"></a>00054 <span class="preprocessor"> (lua_pushstring(m_interpreter, n), \</span>
<a name="l00055"></a>00055 <span class="preprocessor"> lua_pushnumber(m_interpreter, v), \</span>
<a name="l00056"></a>00056 <span class="preprocessor"> lua_settable(m_interpreter, t))</span>
<a name="l00057"></a>00057 <span class="preprocessor"></span>
<a name="l00058"></a>00058 <span class="comment">//BEGIN temporary, try to use registry later</span>
<a name="l00059"></a>00059 <span class="keyword">static</span> KateDocument *katelua_doc;
<a name="l00060"></a>00060 <span class="keyword">static</span> <a class="code" href="classKate_1_1View.html" title="The Kate::View text editor interface.">Kate::View</a> *katelua_view;
<a name="l00061"></a>00061 <span class="comment">//END</span>
<a name="l00062"></a>00062
<a name="l00063"></a>00063
<a name="l00064"></a>00064
<a name="l00065"></a>00065 <span class="comment">//BEGIN STATIC BINDING FUNCTIONS</span>
<a name="l00066"></a>00066 <span class="keyword">typedef</span> <span class="keyword">struct </span>KATELUA_FUNCTIONS {
<a name="l00067"></a>00067 <span class="keywordtype">char</span> *<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/namespaceKStdAccel.html#a737bc2466b1f000625fe8ebddffbb09d">name</a>;
<a name="l00068"></a>00068 lua_CFunction func;
<a name="l00069"></a>00069 } KATELUA_FUNCTIONS;
<a name="l00070"></a>00070
<a name="l00071"></a>00071 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_katedebug(lua_State *L) {
<a name="l00072"></a>00072 <span class="keywordtype">int</span> n=lua_gettop(L);
<a name="l00073"></a>00073 <span class="keywordflow">for</span> (<span class="keywordtype">int</span> i=1;i<=n;i++) {
<a name="l00074"></a>00074 <span class="keywordflow">if</span> (lua_isnil(L,i)) <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"NIL VALUE"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00075"></a>00075 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (lua_isstring(L,i)) <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<lua_tostring(L,i)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00076"></a>00076 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (lua_isboolean(L,i)) <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<(bool)lua_toboolean(L,i)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00077"></a>00077 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (lua_isnumber(L,i)) <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<lua_tonumber(L,i)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00078"></a>00078 <span class="keywordflow">else</span> <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"Invalid type for katedebug:"</span><<lua_type(L,i)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00079"></a>00079 }
<a name="l00080"></a>00080 <span class="keywordflow">return</span> 0;
<a name="l00081"></a>00081 }
<a name="l00082"></a>00082
<a name="l00083"></a>00083 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_indenter_register(lua_State *L) {
<a name="l00084"></a>00084 <span class="keywordtype">int</span> n=lua_gettop(L);
<a name="l00085"></a>00085 <span class="keywordflow">if</span> (n!=2) {
<a name="l00086"></a>00086 lua_pushstring(L,i18n(<span class="stringliteral">"indenter.register requires 2 parameters (event id, function to call)"</span>).utf8().data());
<a name="l00087"></a>00087 lua_error(L);
<a name="l00088"></a>00088 }
<a name="l00089"></a>00089 <span class="keywordflow">if</span> ( (!lua_isfunction(L,2)) || (!lua_isnumber(L,1)))
<a name="l00090"></a>00090 {
<a name="l00091"></a>00091 <span class="comment">/*if (lua_isnumber(L,1)) kdDebug()<<"A"<<endl;</span>
<a name="l00092"></a>00092 <span class="comment"> if (lua_isfunction(L,2)) kdDebug()<<"B"<<endl;</span>
<a name="l00093"></a>00093 <span class="comment"> kdDebug()<<lua_type(L,2)<<endl;*/</span>
<a name="l00094"></a>00094 lua_pushstring(L,i18n(<span class="stringliteral">"indenter.register requires 2 parameters (event id (number), function to call (function))"</span>).utf8().data());
<a name="l00095"></a>00095 lua_error(L);
<a name="l00096"></a>00096 }
<a name="l00097"></a>00097 <span class="keywordflow">switch</span> ((<span class="keywordtype">int</span>)lua_tonumber(L,1))
<a name="l00098"></a>00098 {
<a name="l00099"></a>00099 <span class="keywordflow">case</span> ONCHAR:
<a name="l00100"></a>00100 lua_pushstring(L,ONCHARSTR);
<a name="l00101"></a>00101 lua_pushstring(L,ONCHARSTR);
<a name="l00102"></a>00102 <span class="keywordflow">break</span>;
<a name="l00103"></a>00103 <span class="keywordflow">case</span> ONNEWLINE:
<a name="l00104"></a>00104 lua_pushstring(L,ONNEWLINESTR);
<a name="l00105"></a>00105 lua_pushstring(L,ONNEWLINESTR);
<a name="l00106"></a>00106 <span class="keywordflow">break</span>;
<a name="l00107"></a>00107 <span class="keywordflow">default</span>:
<a name="l00108"></a>00108 lua_pushstring(L,i18n(<span class="stringliteral">"indenter.register:invalid event id"</span>).utf8().data());
<a name="l00109"></a>00109 lua_error(L);
<a name="l00110"></a>00110 }
<a name="l00111"></a>00111 lua_gettable(L,LUA_REGISTRYINDEX);
<a name="l00112"></a>00112 <span class="keywordflow">if</span> (!lua_isnil(L,lua_gettop(L))) {
<a name="l00113"></a>00113 lua_pushstring(L,i18n(<span class="stringliteral">"indenter.register:there is already a function set for given"</span>).utf8().data());
<a name="l00114"></a>00114 lua_error(L);
<a name="l00115"></a>00115 }
<a name="l00116"></a>00116 lua_pop(L,1);
<a name="l00117"></a>00117 lua_pushvalue(L,2);
<a name="l00118"></a>00118 lua_settable(L,LUA_REGISTRYINDEX);
<a name="l00119"></a>00119 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"katelua_indenter_register: Success"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00120"></a>00120 <span class="keywordflow">return</span> 0;
<a name="l00121"></a>00121 }
<a name="l00122"></a>00122
<a name="l00123"></a>00123
<a name="l00124"></a>00124 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_document_textline(lua_State *L) {
<a name="l00125"></a>00125 <span class="keywordflow">if</span> (lua_gettop(L)!=1) {
<a name="l00126"></a>00126 lua_pushstring(L,i18n(<span class="stringliteral">"document.textLine:One parameter (line number) required"</span>).utf8().data());
<a name="l00127"></a>00127 lua_error(L);
<a name="l00128"></a>00128 }
<a name="l00129"></a>00129 <span class="keywordflow">if</span> (!lua_isnumber(L,1)) {
<a name="l00130"></a>00130 lua_pushstring(L,i18n(<span class="stringliteral">"document.textLine:One parameter (line number) required (number)"</span>).utf8().data());
<a name="l00131"></a>00131 lua_error(L);
<a name="l00132"></a>00132 }
<a name="l00133"></a>00133 lua_pushstring(L,katelua_doc->textLine((uint)lua_tonumber(L,1)).utf8().data());
<a name="l00134"></a>00134 <span class="keywordflow">return</span> 1;
<a name="l00135"></a>00135 }
<a name="l00136"></a>00136
<a name="l00137"></a>00137 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_document_removeText(lua_State *L) {
<a name="l00138"></a>00138 <span class="keywordflow">if</span> (lua_gettop(L)!=4) {
<a name="l00139"></a>00139 lua_pushstring(L,i18n(<span class="stringliteral">"document.removeText:Four parameters needed (start line, start col,end line, end col)"</span>).utf8().data());
<a name="l00140"></a>00140 lua_error(L);
<a name="l00141"></a>00141 }
<a name="l00142"></a>00142 <span class="keywordflow">if</span> ((!lua_isnumber(L,1)) || (!lua_isnumber(L,2)) ||(!lua_isnumber(L,3)) || (!lua_isnumber(L,4))) {
<a name="l00143"></a>00143 lua_pushstring(L,i18n(<span class="stringliteral">"document.removeText:Four parameters needed (start line, start col,end line, end col) (4x number)"</span>).utf8().data());
<a name="l00144"></a>00144 lua_error(L);
<a name="l00145"></a>00145 }
<a name="l00146"></a>00146 lua_pushboolean(L,katelua_doc->removeText((uint)lua_tonumber(L,1),(uint)lua_tonumber(L,2),(uint)lua_tonumber(L,3),(uint)lua_tonumber(L,4)));
<a name="l00147"></a>00147 <span class="keywordflow">return</span> 1;
<a name="l00148"></a>00148 }
<a name="l00149"></a>00149
<a name="l00150"></a>00150 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_document_insertText(lua_State *L) {
<a name="l00151"></a>00151 <span class="keywordflow">if</span> (lua_gettop(L)!=3) {
<a name="l00152"></a>00152 lua_pushstring(L,i18n(<span class="stringliteral">"document.insertText:Three parameters needed (line,col,text)"</span>).utf8().data());
<a name="l00153"></a>00153 lua_error(L);
<a name="l00154"></a>00154 }
<a name="l00155"></a>00155 <span class="keywordflow">if</span> ((!lua_isnumber(L,1)) || (!lua_isnumber(L,2)) ||(!lua_isstring(L,3)) ) {
<a name="l00156"></a>00156 lua_pushstring(L,i18n(<span class="stringliteral">"document.removeText:Three parameters needed (line,col,text) (number,number,string)"</span>).utf8().data());
<a name="l00157"></a>00157 lua_error(L);
<a name="l00158"></a>00158 }
<a name="l00159"></a>00159 lua_pushboolean(L,katelua_doc->insertText((uint)lua_tonumber(L,1),(uint)lua_tonumber(L,2),<a class="codeRef" href="qstring.html#fromUtf8">QString::fromUtf8</a>(lua_tostring(L,3))));
<a name="l00160"></a>00160 <span class="keywordflow">return</span> 1;
<a name="l00161"></a>00161 }
<a name="l00162"></a>00162
<a name="l00163"></a>00163 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_view_cursorline(lua_State *L) {
<a name="l00164"></a>00164 lua_pushnumber(L,katelua_view->cursorLine());
<a name="l00165"></a>00165 <span class="keywordflow">return</span> 1;
<a name="l00166"></a>00166 }
<a name="l00167"></a>00167 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_view_cursorcolumn(lua_State *L) {
<a name="l00168"></a>00168 lua_pushnumber(L,katelua_view->cursorColumn());
<a name="l00169"></a>00169 <span class="keywordflow">return</span> 1;
<a name="l00170"></a>00170 }
<a name="l00171"></a>00171 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_view_cursorposition(lua_State *L) {
<a name="l00172"></a>00172 lua_pushnumber(L,katelua_view->cursorLine());
<a name="l00173"></a>00173 lua_pushnumber(L,katelua_view->cursorColumn());
<a name="l00174"></a>00174 <span class="keywordflow">return</span> 2;
<a name="l00175"></a>00175
<a name="l00176"></a>00176 }
<a name="l00177"></a>00177 <span class="keyword">static</span> <span class="keywordtype">int</span> katelua_view_setcursorpositionreal(lua_State *L) {
<a name="l00178"></a>00178 <span class="keywordflow">return</span> 0;
<a name="l00179"></a>00179 }
<a name="l00180"></a>00180
<a name="l00181"></a>00181 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keyword">struct </span>KATELUA_FUNCTIONS katelua_documenttable[4]= {
<a name="l00182"></a>00182 {<span class="stringliteral">"textLine"</span>,katelua_document_textline},
<a name="l00183"></a>00183 {<span class="stringliteral">"removeText"</span>,katelua_document_removeText},
<a name="l00184"></a>00184 {<span class="stringliteral">"insertText"</span>,katelua_document_insertText},
<a name="l00185"></a>00185 {0,0}
<a name="l00186"></a>00186 };
<a name="l00187"></a>00187
<a name="l00188"></a>00188 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keyword">struct </span>KATELUA_FUNCTIONS katelua_viewtable[5]= {
<a name="l00189"></a>00189 {<span class="stringliteral">"cursorLine"</span>,katelua_view_cursorline},
<a name="l00190"></a>00190 {<span class="stringliteral">"cursorColumn"</span>,katelua_view_cursorcolumn},
<a name="l00191"></a>00191 {<span class="stringliteral">"cursorPosition"</span>,katelua_view_cursorposition},
<a name="l00192"></a>00192 {<span class="stringliteral">"setCursorPositionReal"</span>,katelua_view_setcursorpositionreal},
<a name="l00193"></a>00193 {0,0}
<a name="l00194"></a>00194 };
<a name="l00195"></a>00195
<a name="l00196"></a>00196 <span class="keyword">static</span> <span class="keywordtype">void</span> kateregistertable(lua_State* m_interpreter,<span class="keyword">const</span> KATELUA_FUNCTIONS funcs[],<span class="keywordtype">char</span> * tablename) {
<a name="l00197"></a>00197 lua_newtable(m_interpreter);
<a name="l00198"></a>00198 <span class="keywordtype">int</span> table=lua_gettop(m_interpreter);
<a name="l00199"></a>00199 <span class="keywordflow">for</span> (uint i=0;funcs[i].name!=0;i++)
<a name="l00200"></a>00200 {
<a name="l00201"></a>00201 katelua_registerFunc(funcs[i].name,funcs[i].func,table);
<a name="l00202"></a>00202 }
<a name="l00203"></a>00203
<a name="l00204"></a>00204 lua_pushstring(m_interpreter,tablename);
<a name="l00205"></a>00205 lua_pushvalue(m_interpreter,table);
<a name="l00206"></a>00206 lua_settable(m_interpreter,LUA_GLOBALSINDEX);
<a name="l00207"></a>00207 lua_pop(m_interpreter,1);
<a name="l00208"></a>00208
<a name="l00209"></a>00209 }
<a name="l00210"></a>00210
<a name="l00211"></a>00211 <span class="comment">//END STATIC BINDING FUNCTIONS</span>
<a name="l00212"></a>00212
<a name="l00213"></a>00213
<a name="l00214"></a>00214 <span class="comment">//BEGIN KateLUAIndentScriptImpl</span>
<a name="l00215"></a>00215 KateLUAIndentScriptImpl::KateLUAIndentScriptImpl(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a>& internalName,
<a name="l00216"></a>00216 <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &filePath, <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &niceName,
<a name="l00217"></a>00217 <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &copyright, <span class="keywordtype">double</span> version):
<a name="l00218"></a>00218 KateIndentScriptImplAbstract(internalName,filePath,niceName,copyright,version),m_interpreter(0)<span class="comment">/*,m_indenter(0)*/</span>
<a name="l00219"></a>00219 {
<a name="l00220"></a>00220 }
<a name="l00221"></a>00221
<a name="l00222"></a>00222
<a name="l00223"></a>00223 KateLUAIndentScriptImpl::~KateLUAIndentScriptImpl()
<a name="l00224"></a>00224 {
<a name="l00225"></a>00225 deleteInterpreter();
<a name="l00226"></a>00226 }
<a name="l00227"></a>00227
<a name="l00228"></a>00228 <span class="keywordtype">void</span> KateLUAIndentScriptImpl::decRef()
<a name="l00229"></a>00229 {
<a name="l00230"></a>00230 KateIndentScriptImplAbstract::decRef();
<a name="l00231"></a>00231 <span class="keywordflow">if</span> (refCount()==0)
<a name="l00232"></a>00232 {
<a name="l00233"></a>00233 deleteInterpreter();
<a name="l00234"></a>00234 }
<a name="l00235"></a>00235 }
<a name="l00236"></a>00236
<a name="l00237"></a>00237 <span class="keywordtype">void</span> KateLUAIndentScriptImpl::deleteInterpreter()
<a name="l00238"></a>00238 {
<a name="l00239"></a>00239 <span class="keywordflow">if</span> (m_interpreter)
<a name="l00240"></a>00240 {
<a name="l00241"></a>00241 lua_close(m_interpreter);
<a name="l00242"></a>00242 m_interpreter=0;
<a name="l00243"></a>00243 }
<a name="l00244"></a>00244 }
<a name="l00245"></a>00245
<a name="l00246"></a>00246 <span class="keywordtype">bool</span> KateLUAIndentScriptImpl::setupInterpreter(<a class="codeRef" href="qstring.html">QString</a> &errorMsg)
<a name="l00247"></a>00247 {
<a name="l00248"></a>00248 <span class="keywordflow">if</span> (m_interpreter) <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l00249"></a>00249 m_interpreter=lua_open();
<a name="l00250"></a>00250
<a name="l00251"></a>00251 <span class="keywordflow">if</span> (!m_interpreter)
<a name="l00252"></a>00252 {
<a name="l00253"></a>00253 errorMsg=i18n(<span class="stringliteral">"LUA interpreter could not be initialized"</span>);
<a name="l00254"></a>00254 <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l00255"></a>00255 }
<a name="l00256"></a>00256 luaopen_base(m_interpreter);
<a name="l00257"></a>00257 luaopen_string( m_interpreter );
<a name="l00258"></a>00258 luaopen_table( m_interpreter );
<a name="l00259"></a>00259 luaopen_math( m_interpreter );
<a name="l00260"></a>00260 luaopen_io( m_interpreter );
<a name="l00261"></a>00261 luaopen_debug( m_interpreter );
<a name="l00262"></a>00262
<a name="l00263"></a>00263
<a name="l00264"></a>00264 <span class="comment">/*indenter callback setup table*/</span>
<a name="l00265"></a>00265 lua_newtable(m_interpreter);
<a name="l00266"></a>00266 <span class="keywordtype">int</span> indentertable=lua_gettop(m_interpreter);
<a name="l00267"></a>00267 katelua_registerFunc(<span class="stringliteral">"register"</span>,katelua_indenter_register,indentertable);
<a name="l00268"></a>00268 katelua_registerNumConst(<span class="stringliteral">"OnChar"</span>,ONCHAR,indentertable);
<a name="l00269"></a>00269 katelua_registerNumConst(<span class="stringliteral">"OnNewline"</span>,ONNEWLINE,indentertable);
<a name="l00270"></a>00270 lua_pushstring(m_interpreter,<span class="stringliteral">"indenter"</span>);
<a name="l00271"></a>00271 lua_pushvalue(m_interpreter,indentertable);
<a name="l00272"></a>00272 lua_settable(m_interpreter,LUA_GLOBALSINDEX);
<a name="l00273"></a>00273 lua_pop(m_interpreter,1);
<a name="l00274"></a>00274
<a name="l00275"></a>00275 <span class="comment">/*debug*/</span>
<a name="l00276"></a>00276 katelua_registerFunc(<span class="stringliteral">"katedebug"</span>,katelua_katedebug,LUA_GLOBALSINDEX);
<a name="l00277"></a>00277
<a name="l00278"></a>00278 <span class="comment">/*document interface*/</span>
<a name="l00279"></a>00279 kateregistertable(m_interpreter,katelua_documenttable,<span class="stringliteral">"document"</span>);
<a name="l00280"></a>00280 <span class="comment">/*view interface*/</span>
<a name="l00281"></a>00281 kateregistertable(m_interpreter,katelua_viewtable,<span class="stringliteral">"view"</span>);
<a name="l00282"></a>00282
<a name="l00283"></a>00283 <span class="comment">/*open script*/</span>
<a name="l00284"></a>00284 lua_pushstring(m_interpreter,<span class="stringliteral">"dofile"</span>);
<a name="l00285"></a>00285 lua_gettable(m_interpreter,LUA_GLOBALSINDEX);
<a name="l00286"></a>00286 <a class="codeRef" href="qcstring.html">QCString</a> fn=<a class="codeRef" href="qfile.html#encodeName">QFile::encodeName</a>(filePath());
<a name="l00287"></a>00287 lua_pushstring(m_interpreter,fn.data());
<a name="l00288"></a>00288 <span class="keywordtype">int</span> execresult=lua_pcall(m_interpreter,1,1,0);
<a name="l00289"></a>00289 <span class="keywordflow">if</span> (execresult==0) {
<a name="l00290"></a>00290 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"Lua script has been loaded successfully. Lua interpreter version:"</span><<lua_version()<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00291"></a>00291 <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l00292"></a>00292 } <span class="keywordflow">else</span> {
<a name="l00293"></a>00293 errorMsg=i18n(<span class="stringliteral">"Lua indenting script had errors: %1"</span>).<a class="codeRef" href="qstring.html#arg">arg</a>(lua_tostring(m_interpreter,lua_gettop(m_interpreter)));
<a name="l00294"></a>00294 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<errorMsg<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00295"></a>00295 deleteInterpreter();
<a name="l00296"></a>00296
<a name="l00297"></a>00297 <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l00298"></a>00298 }
<a name="l00299"></a>00299 }
<a name="l00300"></a>00300
<a name="l00301"></a>00301
<a name="l00302"></a>00302 <span class="keywordtype">bool</span> KateLUAIndentScriptImpl::processChar(<a class="code" href="classKate_1_1View.html" title="The Kate::View text editor interface.">Kate::View</a> *view, <a class="codeRef" href="qchar.html">QChar</a> c, <a class="codeRef" href="qstring.html">QString</a> &errorMsg )
<a name="l00303"></a>00303 {
<a name="l00304"></a>00304 <span class="keywordflow">if</span> (!setupInterpreter(errorMsg)) <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l00305"></a>00305 katelua_doc=((KateView*)view)->doc();
<a name="l00306"></a>00306 katelua_view=view;
<a name="l00307"></a>00307 <span class="keywordtype">int</span> oldtop=lua_gettop(m_interpreter);
<a name="l00308"></a>00308 lua_pushstring(m_interpreter,ONCHARSTR);
<a name="l00309"></a>00309 lua_gettable(m_interpreter,LUA_REGISTRYINDEX);
<a name="l00310"></a>00310 <span class="keywordtype">bool</span> result=<span class="keyword">true</span>;
<a name="l00311"></a>00311 <span class="keywordflow">if</span> (!lua_isnil(m_interpreter,lua_gettop(m_interpreter)))
<a name="l00312"></a>00312 {
<a name="l00313"></a>00313 lua_pushstring(m_interpreter,<a class="codeRef" href="qstring.html">QString</a>(c).utf8().data());
<a name="l00314"></a>00314 <span class="keywordflow">if</span> (lua_pcall(m_interpreter,1,0,0)!=0)
<a name="l00315"></a>00315 {
<a name="l00316"></a>00316 errorMsg=i18n(<span class="stringliteral">"Lua indenting script had errors: %1"</span>).<a class="codeRef" href="qstring.html#arg">arg</a>(lua_tostring(m_interpreter,lua_gettop(m_interpreter)));
<a name="l00317"></a>00317 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<errorMsg<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00318"></a>00318 result=<span class="keyword">false</span>;
<a name="l00319"></a>00319 }
<a name="l00320"></a>00320 }
<a name="l00321"></a>00321 lua_settop(m_interpreter,oldtop);
<a name="l00322"></a>00322 <span class="keywordflow">return</span> result;
<a name="l00323"></a>00323 }
<a name="l00324"></a>00324
<a name="l00325"></a>00325 <span class="keywordtype">bool</span> KateLUAIndentScriptImpl::processLine(<a class="code" href="classKate_1_1View.html" title="The Kate::View text editor interface.">Kate::View</a> *view, <span class="keyword">const</span> <a class="code" href="classKateDocCursor.html" title="Cursor class with a pointer to its document.">KateDocCursor</a> &line, <a class="codeRef" href="qstring.html">QString</a> &errorMsg )
<a name="l00326"></a>00326 {
<a name="l00327"></a>00327 <span class="keywordflow">if</span> (!setupInterpreter(errorMsg)) <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l00328"></a>00328 <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l00329"></a>00329 }
<a name="l00330"></a>00330
<a name="l00331"></a>00331 <span class="keywordtype">bool</span> KateLUAIndentScriptImpl::processNewline( <span class="keyword">class</span> <a class="code" href="classKate_1_1View.html" title="The Kate::View text editor interface.">Kate::View</a> *view, <span class="keyword">const</span> <a class="code" href="classKateDocCursor.html" title="Cursor class with a pointer to its document.">KateDocCursor</a> &begin, <span class="keywordtype">bool</span> needcontinue, <a class="codeRef" href="qstring.html">QString</a> &errorMsg )
<a name="l00332"></a>00332 {
<a name="l00333"></a>00333 <span class="keywordflow">if</span> (!setupInterpreter(errorMsg)) <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l00334"></a>00334 katelua_doc=((KateView*)view)->doc();
<a name="l00335"></a>00335 katelua_view=view;
<a name="l00336"></a>00336 <span class="keywordtype">int</span> oldtop=lua_gettop(m_interpreter);
<a name="l00337"></a>00337 lua_pushstring(m_interpreter,ONNEWLINESTR);
<a name="l00338"></a>00338 lua_gettable(m_interpreter,LUA_REGISTRYINDEX);
<a name="l00339"></a>00339 <span class="keywordtype">bool</span> result=<span class="keyword">true</span>;
<a name="l00340"></a>00340 <span class="keywordflow">if</span> (!lua_isnil(m_interpreter,lua_gettop(m_interpreter)))
<a name="l00341"></a>00341 {
<a name="l00342"></a>00342 <span class="keywordflow">if</span> (lua_pcall(m_interpreter,0,0,0)!=0)
<a name="l00343"></a>00343 {
<a name="l00344"></a>00344 errorMsg=i18n(<span class="stringliteral">"Lua indenting script had errors: %1"</span>).<a class="codeRef" href="qstring.html#arg">arg</a>(lua_tostring(m_interpreter,lua_gettop(m_interpreter)));
<a name="l00345"></a>00345 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<errorMsg<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00346"></a>00346 result=<span class="keyword">false</span>;
<a name="l00347"></a>00347 }
<a name="l00348"></a>00348 }
<a name="l00349"></a>00349 lua_settop(m_interpreter,oldtop);
<a name="l00350"></a>00350 <span class="keywordflow">return</span> result;
<a name="l00351"></a>00351 }
<a name="l00352"></a>00352 <span class="comment">//END</span>
<a name="l00353"></a>00353
<a name="l00354"></a>00354 <span class="comment">//BEGIN KateLUAIndentScriptManager</span>
<a name="l00355"></a>00355 KateLUAIndentScriptManager::KateLUAIndentScriptManager():KateIndentScriptManagerAbstract()
<a name="l00356"></a>00356 {
<a name="l00357"></a>00357 collectScripts();
<a name="l00358"></a>00358 }
<a name="l00359"></a>00359
<a name="l00360"></a>00360 KateLUAIndentScriptManager::~KateLUAIndentScriptManager ()
<a name="l00361"></a>00361 {
<a name="l00362"></a>00362 }
<a name="l00363"></a>00363
<a name="l00364"></a>00364 <span class="keywordtype">void</span> KateLUAIndentScriptManager::collectScripts (<span class="keywordtype">bool</span> force)
<a name="l00365"></a>00365 {
<a name="l00366"></a>00366 <span class="comment">// If there's something in myModeList the Mode List was already built so, don't do it again</span>
<a name="l00367"></a>00367 <span class="keywordflow">if</span> (!m_scripts.isEmpty())
<a name="l00368"></a>00368 <span class="keywordflow">return</span>;
<a name="l00369"></a>00369
<a name="l00370"></a>00370 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"================================================="</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a><<<span class="stringliteral">"Trying to find Lua scripts"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>
<a name="l00371"></a>00371 <<<span class="stringliteral">"================================================="</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00372"></a>00372
<a name="l00373"></a>00373 <span class="comment">// We'll store the scripts list in this config</span>
<a name="l00374"></a>00374 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/classKConfig.html">KConfig</a> config(<span class="stringliteral">"katepartluaindentscriptrc"</span>, <span class="keyword">false</span>, <span class="keyword">false</span>);
<a name="l00375"></a>00375 <span class="preprocessor">#if 0</span>
<a name="l00376"></a>00376 <span class="preprocessor"></span> <span class="comment">// figure out if the kate install is too new</span>
<a name="l00377"></a>00377 config.setGroup (<span class="stringliteral">"General"</span>);
<a name="l00378"></a>00378 <span class="keywordflow">if</span> (config.readNumEntry (<span class="stringliteral">"Version"</span>) > config.readNumEntry (<span class="stringliteral">"CachedVersion"</span>))
<a name="l00379"></a>00379 {
<a name="l00380"></a>00380 config.writeEntry (<span class="stringliteral">"CachedVersion"</span>, config.readNumEntry (<span class="stringliteral">"Version"</span>));
<a name="l00381"></a>00381 force = <span class="keyword">true</span>;
<a name="l00382"></a>00382 }
<a name="l00383"></a>00383 <span class="preprocessor">#endif</span>
<a name="l00384"></a>00384 <span class="preprocessor"></span>
<a name="l00385"></a>00385 <span class="comment">// Let's get a list of all the .js files</span>
<a name="l00386"></a>00386 <a class="codeRef" href="qstringlist.html">QStringList</a> list = <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/classKGlobal.html#a431d05bf9a252475846c89769fbff8c1">KGlobal::dirs</a>()-><a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/classKStandardDirs.html#ae6310facab4e97b2aceb5cf37080c3c0">findAllResources</a>(<span class="stringliteral">"data"</span>,<span class="stringliteral">"katepart/scripts/indent/*.lua"</span>,<span class="keyword">false</span>,<span class="keyword">true</span>);
<a name="l00387"></a>00387
<a name="l00388"></a>00388 <span class="comment">// Let's iterate through the list and build the Mode List</span>
<a name="l00389"></a>00389 <span class="keywordflow">for</span> ( QStringList::Iterator it = list.begin(); it != list.end(); ++it )
<a name="l00390"></a>00390 {
<a name="l00391"></a>00391 <span class="comment">// Each file has a group ed:</span>
<a name="l00392"></a>00392 <a class="codeRef" href="qstring.html">QString</a> Group=<span class="stringliteral">"Cache "</span>+ *it;
<a name="l00393"></a>00393
<a name="l00394"></a>00394 <span class="comment">// Let's go to this group</span>
<a name="l00395"></a>00395 config.setGroup(Group);
<a name="l00396"></a>00396
<a name="l00397"></a>00397 <span class="comment">// stat the file</span>
<a name="l00398"></a>00398 <span class="keyword">struct </span>stat sbuf;
<a name="l00399"></a>00399 memset (&sbuf, 0, <span class="keyword">sizeof</span>(sbuf));
<a name="l00400"></a>00400 stat(<a class="codeRef" href="qfile.html#encodeName">QFile::encodeName</a>(*it), &sbuf);
<a name="l00401"></a>00401 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>()<<<span class="stringliteral">"Lua script file:"</span><<(*it)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00402"></a>00402 <span class="comment">// If the group exist and we're not forced to read the .js file, let's build myModeList for katepartjscriptrc</span>
<a name="l00403"></a>00403 <span class="keywordtype">bool</span> readnew=<span class="keyword">false</span>;
<a name="l00404"></a>00404 <span class="keywordflow">if</span> (!force && config.hasGroup(Group) && (sbuf.st_mtime == config.readNumEntry(<span class="stringliteral">"lastModified"</span>)))
<a name="l00405"></a>00405 {
<a name="l00406"></a>00406 config.setGroup(Group);
<a name="l00407"></a>00407 <a class="codeRef" href="qstring.html">QString</a> filePath=*it;
<a name="l00408"></a>00408 <a class="codeRef" href="qstring.html">QString</a> internalName=config.readEntry(<span class="stringliteral">"internlName"</span>,<span class="stringliteral">"KATE-ERROR"</span>);
<a name="l00409"></a>00409 <span class="keywordflow">if</span> (internalName==<span class="stringliteral">"KATE-ERROR"</span>) readnew=<span class="keyword">true</span>;
<a name="l00410"></a>00410 <span class="keywordflow">else</span>
<a name="l00411"></a>00411 {
<a name="l00412"></a>00412 <a class="codeRef" href="qstring.html">QString</a> niceName=config.readEntry(<span class="stringliteral">"niceName"</span>,internalName);
<a name="l00413"></a>00413 <a class="codeRef" href="qstring.html">QString</a> copyright=config.readEntry(<span class="stringliteral">"copyright"</span>,i18n(<span class="stringliteral">"(Unknown)"</span>));
<a name="l00414"></a>00414 <span class="keywordtype">double</span> <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/namespaceKDE.html#aa7220767389d3c119ac8cf38bf333c55">version</a>=config.readDoubleNumEntry(<span class="stringliteral">"version"</span>,0.0);
<a name="l00415"></a>00415 KateLUAIndentScriptImpl *s=<span class="keyword">new</span> KateLUAIndentScriptImpl(
<a name="l00416"></a>00416 internalName,filePath,niceName,copyright,version);
<a name="l00417"></a>00417 m_scripts.insert (internalName, s);
<a name="l00418"></a>00418 }
<a name="l00419"></a>00419 }
<a name="l00420"></a>00420 <span class="keywordflow">else</span> readnew=<span class="keyword">true</span>;
<a name="l00421"></a>00421 <span class="keywordflow">if</span> (readnew)
<a name="l00422"></a>00422 {
<a name="l00423"></a>00423 <a class="codeRef" href="qfileinfo.html">QFileInfo</a> fi (*it);
<a name="l00424"></a>00424
<a name="l00425"></a>00425 <span class="keywordflow">if</span> (m_scripts[fi.baseName()])
<a name="l00426"></a>00426 <span class="keywordflow">continue</span>;
<a name="l00427"></a>00427
<a name="l00428"></a>00428 <a class="codeRef" href="qstring.html">QString</a> internalName=fi.baseName();
<a name="l00429"></a>00429 <a class="codeRef" href="qstring.html">QString</a> filePath=*it;
<a name="l00430"></a>00430 <a class="codeRef" href="qstring.html">QString</a> niceName=internalName;
<a name="l00431"></a>00431 <a class="codeRef" href="qstring.html">QString</a> copyright=i18n(<span class="stringliteral">"(Unknown)"</span>);
<a name="l00432"></a>00432 <span class="keywordtype">double</span> version=0.0;
<a name="l00433"></a>00433 parseScriptHeader(filePath,&niceName,&copyright,&version);
<a name="l00434"></a>00434 <span class="comment">/*save the information for retrieval*/</span>
<a name="l00435"></a>00435 config.setGroup(Group);
<a name="l00436"></a>00436 config.writeEntry(<span class="stringliteral">"lastModified"</span>,sbuf.st_mtime);
<a name="l00437"></a>00437 config.writeEntry(<span class="stringliteral">"internalName"</span>,internalName);
<a name="l00438"></a>00438 config.writeEntry(<span class="stringliteral">"niceName"</span>,niceName);
<a name="l00439"></a>00439 config.writeEntry(<span class="stringliteral">"copyright"</span>,copyright);
<a name="l00440"></a>00440 config.writeEntry(<span class="stringliteral">"version"</span>,version);
<a name="l00441"></a>00441 KateLUAIndentScriptImpl *s=<span class="keyword">new</span> KateLUAIndentScriptImpl(
<a name="l00442"></a>00442 internalName,filePath,niceName,copyright,version);
<a name="l00443"></a>00443 m_scripts.insert (internalName, s);
<a name="l00444"></a>00444 }
<a name="l00445"></a>00445 }
<a name="l00446"></a>00446
<a name="l00447"></a>00447 <span class="comment">// Syncronize with the file katepartjscriptrc</span>
<a name="l00448"></a>00448 config.sync();
<a name="l00449"></a>00449 }
<a name="l00450"></a>00450
<a name="l00451"></a>00451 KateIndentScript KateLUAIndentScriptManager::script(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &scriptname) {
<a name="l00452"></a>00452 KateLUAIndentScriptImpl *s=m_scripts[scriptname];
<a name="l00453"></a>00453 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<scriptname<<<span class="stringliteral">"=="</span><<s<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00454"></a>00454 <span class="keywordflow">return</span> KateIndentScript(s);
<a name="l00455"></a>00455 }
<a name="l00456"></a>00456
<a name="l00457"></a>00457 <span class="keywordtype">void</span> KateLUAIndentScriptManager::parseScriptHeader(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &filePath,
<a name="l00458"></a>00458 <a class="codeRef" href="qstring.html">QString</a> *niceName,<a class="codeRef" href="qstring.html">QString</a> *copyright,<span class="keywordtype">double</span> *version)
<a name="l00459"></a>00459 {
<a name="l00460"></a>00460 <span class="preprocessor">#if 0</span>
<a name="l00461"></a>00461 <span class="preprocessor"></span> <a class="codeRef" href="qfile.html">QFile</a> f(<a class="codeRef" href="qfile.html#encodeName">QFile::encodeName</a>(filePath));
<a name="l00462"></a>00462 <span class="keywordflow">if</span> (!f.open(IO_ReadOnly) ) {
<a name="l00463"></a>00463 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"Header could not be parsed, because file could not be opened"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00464"></a>00464 <span class="keywordflow">return</span>;
<a name="l00465"></a>00465 }
<a name="l00466"></a>00466 <a class="codeRef" href="qtextstream.html">QTextStream</a> st(&f);
<a name="l00467"></a>00467 st.setEncoding (QTextStream::UnicodeUTF8);
<a name="l00468"></a>00468 <span class="keywordflow">if</span> (!st.readLine().upper().startsWith(<span class="stringliteral">"/**KATE"</span>)) {
<a name="l00469"></a>00469 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"No header found"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00470"></a>00470 f.close();
<a name="l00471"></a>00471 <span class="keywordflow">return</span>;
<a name="l00472"></a>00472 }
<a name="l00473"></a>00473 <span class="comment">// here the real parsing begins</span>
<a name="l00474"></a>00474 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"Parsing indent script header"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00475"></a>00475 <span class="keyword">enum</span> {NOTHING=0,COPYRIGHT=1} currentState=NOTHING;
<a name="l00476"></a>00476 <a class="codeRef" href="qstring.html">QString</a> line;
<a name="l00477"></a>00477 <a class="codeRef" href="qstring.html">QString</a> tmpblockdata=<span class="stringliteral">""</span>;
<a name="l00478"></a>00478 <a class="codeRef" href="qregexp.html">QRegExp</a> endExpr(<span class="stringliteral">"[\\s\\t]*\\*\\*\\/[\\s\\t]*$"</span>);
<a name="l00479"></a>00479 <a class="codeRef" href="qregexp.html">QRegExp</a> keyValue(<span class="stringliteral">"[\\s\\t]*\\*\\s*(.+):(.*)$"</span>);
<a name="l00480"></a>00480 <a class="codeRef" href="qregexp.html">QRegExp</a> blockContent(<span class="stringliteral">"[\\s\\t]*\\*(.*)$"</span>);
<a name="l00481"></a>00481 <span class="keywordflow">while</span> ((line=st.readLine())!=QString::null) {
<a name="l00482"></a>00482 <span class="keywordflow">if</span> (endExpr.exactMatch(line)) {
<a name="l00483"></a>00483 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"end of config block"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00484"></a>00484 <span class="keywordflow">if</span> (currentState==NOTHING) <span class="keywordflow">break</span>;
<a name="l00485"></a>00485 <span class="keywordflow">if</span> (currentState==COPYRIGHT) {
<a name="l00486"></a>00486 *copyright=tmpblockdata;
<a name="l00487"></a>00487 <span class="keywordflow">break</span>;
<a name="l00488"></a>00488 }
<a name="l00489"></a>00489 Q_ASSERT(0);
<a name="l00490"></a>00490 }
<a name="l00491"></a>00491 <span class="keywordflow">if</span> (currentState==NOTHING)
<a name="l00492"></a>00492 {
<a name="l00493"></a>00493 <span class="keywordflow">if</span> (keyValue.exactMatch(line)) {
<a name="l00494"></a>00494 <a class="codeRef" href="qstringlist.html">QStringList</a> sl=keyValue.capturedTexts();
<a name="l00495"></a>00495 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"key:"</span><<sl[1]<<endl<<<span class="stringliteral">"value:"</span><<sl[2]<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00496"></a>00496 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"key-length:"</span><<sl[1].length()<<endl<<<span class="stringliteral">"value-length:"</span><<sl[2].length()<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00497"></a>00497 <a class="codeRef" href="qstring.html">QString</a> <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/namespaceKStdAccel.html#acc12b2741ae01cac579a473d3e6bafce">key</a>=sl[1];
<a name="l00498"></a>00498 <a class="codeRef" href="qstring.html">QString</a> value=sl[2];
<a name="l00499"></a>00499 <span class="keywordflow">if</span> (key==<span class="stringliteral">"NAME"</span>) (*niceName)=value.<a class="codeRef" href="qstring.html#stripWhiteSpace">stripWhiteSpace</a>();
<a name="l00500"></a>00500 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (key==<span class="stringliteral">"VERSION"</span>) (*version)=value.<a class="codeRef" href="qstring.html#stripWhiteSpace">stripWhiteSpace</a>().toDouble(0);
<a name="l00501"></a>00501 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (key==<span class="stringliteral">"COPYRIGHT"</span>)
<a name="l00502"></a>00502 {
<a name="l00503"></a>00503 tmpblockdata=<span class="stringliteral">""</span>;
<a name="l00504"></a>00504 <span class="keywordflow">if</span> (value.<a class="codeRef" href="qstring.html#stripWhiteSpace">stripWhiteSpace</a>().length()>0) tmpblockdata=value;
<a name="l00505"></a>00505 currentState=COPYRIGHT;
<a name="l00506"></a>00506 } <span class="keywordflow">else</span> <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"ignoring key"</span><<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00507"></a>00507 }
<a name="l00508"></a>00508 } <span class="keywordflow">else</span> {
<a name="l00509"></a>00509 <span class="keywordflow">if</span> (blockContent.exactMatch(line))
<a name="l00510"></a>00510 {
<a name="l00511"></a>00511 <a class="codeRef" href="qstring.html">QString</a> bl=blockContent.capturedTexts()[1];
<a name="l00512"></a>00512 <span class="comment">//kdDebug(13050)<<"block content line:"<<bl<<endl<<bl.length()<<" "<<bl.isEmpty()<<endl;</span>
<a name="l00513"></a>00513 <span class="keywordflow">if</span> (bl.<a class="codeRef" href="qstring.html#isEmpty">isEmpty</a>())
<a name="l00514"></a>00514 {
<a name="l00515"></a>00515 (*copyright)=tmpblockdata;
<a name="l00516"></a>00516 <a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#gafbb9aa4a84d6c0563d46550454b9714b">kdDebug</a>(13050)<<<span class="stringliteral">"Copyright block:"</span><<endl<<(*copyright)<<<a class="codeRef" doxygen="kdecore.tag:../../kdecore/html/" href="../../kdecore/html/group__kdebug.html#ga313d520ed8f8f6b46eeef22cfb3b082a">endl</a>;
<a name="l00517"></a>00517 currentState=NOTHING;
<a name="l00518"></a>00518 } <span class="keywordflow">else</span> tmpblockdata=tmpblockdata+<span class="stringliteral">"\n"</span>+bl;
<a name="l00519"></a>00519 }
<a name="l00520"></a>00520 }
<a name="l00521"></a>00521 }
<a name="l00522"></a>00522 f.close();
<a name="l00523"></a>00523 <span class="preprocessor">#endif</span>
<a name="l00524"></a>00524 <span class="preprocessor"></span>}
<a name="l00525"></a>00525 <span class="comment">//END</span>
<a name="l00526"></a>00526
<a name="l00527"></a>00527 <span class="preprocessor">#endif</span>
<a name="l00528"></a>00528 <span class="preprocessor"></span><span class="comment">// kate: space-indent on; indent-width 2; replace-tabs on;</span>
</pre></div></div>
</div>
</div></div>
</td>
</tr>
<tr>
<td valign="top" id="leftmenu" width="25%">
<a name="navigation"></a>
<div class="menu_box"><h2>kate</h2>
<div class="nav_list">
<ul><li><a href="index.html">Main Page</a></li><li><a href="namespaces.html">Namespace List</a></li><li><a href="hierarchy.html">Class Hierarchy</a></li><li><a href="classes.html">Alphabetical List</a></li><li><a href="annotated.html">Class List</a></li><li><a href="files.html">File List</a></li><li><a href="namespacemembers.html">Namespace Members</a></li><li><a href="functions.html">Class Members</a></li><li><a href="pages.html">Related Pages</a></li></ul>
<!--
<h2>Class Picker</h2>
<div style="text-align: center;">
<form name="guideform">
<select name="guidelinks" style="width:100%;" onChange="window.location=document.guideform.guidelinks.options[document.guideform.guidelinks.selectedIndex].value">
<option value="annotated.html">-- Choose --</option>
<option value="classIndenterConfigPage.html">indenterconfigpage</option>, <option value="classKate_1_1Command.html">kate::command</option>, <option value="classKate_1_1CommandExtension.html">kate::commandextension</option>, <option value="classKate_1_1Document.html">kate::document</option>, <option value="classKate_1_1DocumentExt.html">kate::documentext</option>, <option value="classKate_1_1View.html">kate::view</option>, <option value="classKateArbitraryHighlight.html">katearbitraryhighlight</option>, <option value="classKateAttribute.html">kateattribute</option>, <option value="classKateAutoIndent.html">kateautoindent</option>, <option value="classKateBrowserExtension.html">katebrowserextension</option>, <option value="classKateBufBlock.html">katebufblock</option>, <option value="classKateBufBlockList.html">katebufblocklist</option>, <option value="classKateBuffer.html">katebuffer</option>, <option value="classKateCmdShellCompletion.html">katecmdshellcompletion</option>, <option value="classKateCommands_1_1Character.html">katecommands::character</option>, <option value="classKateCommands_1_1CoreCommands.html">katecommands::corecommands</option>, <option value="classKateCommands_1_1Date.html">katecommands::date</option>, <option value="classKateCommands_1_1SedReplace.html">katecommands::sedreplace</option>, <option value="classKateConfig.html">kateconfig</option>, <option value="classKateDocCursor.html">katedoccursor</option>, <option value="classKateJScript.html">katejscript</option>, <option value="classKateModOnHdPrompt.html">katemodonhdprompt</option>, <option value="classKateNormalIndent.html">katenormalindent</option>, <option value="classKateRenderer.html">katerenderer</option>, <option value="classKateReplacePrompt.html">katereplaceprompt</option>, <option value="classKateScrollBar.html">katescrollbar</option>, <option value="classKateSuperCursor.html">katesupercursor</option>, <option value="classKateSuperRange.html">katesuperrange</option>, <option value="classKateSyntaxContextData.html">katesyntaxcontextdata</option>, <option value="classKateSyntaxDocument.html">katesyntaxdocument</option>, <option value="classKateSyntaxModeListItem.html">katesyntaxmodelistitem</option>, <option value="classKateTextCursor.html">katetextcursor</option>, <option value="classKateTextLine.html">katetextline</option>, <option value="classKateUndoGroup.html">kateundogroup</option>, <option value="classKateVarIndent.html">katevarindent</option>, <option value="classKateViewIndentationAction.html">kateviewindentationaction</option>, <option value="classOutputFunction.html">outputfunction</option>, <option value="classOutputObject.html">outputobject</option>,
</select>
</form>
</div>
-->
</div></div>
<div class="menu_box"><h2>API Dox</h2>
<div class="nav_list">
<ul>
<li><a href="../../arts/html/index.html">arts</a></li><li><a href="../../dcop/html/index.html">dcop</a></li><li><a href="../../dnssd/html/index.html">dnssd</a></li><li><a href="../../interfaces/html/index.html">interfaces</a></li><li> <a href="../../interfaces/kimproxy/interface/html/index.html">interface</a></li><li> <a href="../../interfaces/kimproxy/library/html/index.html">library</a></li><li> <a href="../../interfaces/kspeech/html/index.html">kspeech</a></li><li> <a href="../../interfaces/ktexteditor/html/index.html">ktexteditor</a></li><li><a href="../../kabc/html/index.html">kabc</a></li><li><a href="../../kate/html/index.html">kate</a></li><li><a href="../../kcmshell/html/index.html">kcmshell</a></li><li><a href="../../kdecore/html/index.html">kdecore</a></li><li><a href="../../kded/html/index.html">kded</a></li><li><a href="../../kdefx/html/index.html">kdefx</a></li><li><a href="../../kdeprint/html/index.html">kdeprint</a></li><li><a href="../../kdesu/html/index.html">kdesu</a></li><li><a href="../../kdeui/html/index.html">kdeui</a></li><li><a href="../../kdoctools/html/index.html">kdoctools</a></li><li><a href="../../khtml/html/index.html">khtml</a></li><li><a href="../../kimgio/html/index.html">kimgio</a></li><li><a href="../../kinit/html/index.html">kinit</a></li><li><a href="../../kio/html/index.html">kio</a></li><li> <a href="../../kio/bookmarks/html/index.html">bookmarks</a></li><li> <a href="../../kio/httpfilter/html/index.html">httpfilter</a></li><li> <a href="../../kio/kfile/html/index.html">kfile</a></li><li> <a href="../../kio/kio/html/index.html">kio</a></li><li> <a href="../../kio/kioexec/html/index.html">kioexec</a></li><li> <a href="../../kio/kpasswdserver/html/index.html">kpasswdserver</a></li><li> <a href="../../kio/kssl/html/index.html">kssl</a></li><li><a href="../../kioslave/html/index.html">kioslave</a></li><li> <a href="../../kioslave/http/html/index.html">http</a></li><li><a href="../../kjs/html/index.html">kjs</a></li><li><a href="../../kmdi/html/index.html">kmdi</a></li><li> <a href="../../kmdi/kmdi/html/index.html">kmdi</a></li><li><a href="../../knewstuff/html/index.html">knewstuff</a></li><li><a href="../../kparts/html/index.html">kparts</a></li><li><a href="../../kresources/html/index.html">kresources</a></li><li><a href="../../kspell2/html/index.html">kspell2</a></li><li><a href="../../kunittest/html/index.html">kunittest</a></li><li><a href="../../kutils/html/index.html">kutils</a></li><li><a href="../../kwallet/html/index.html">kwallet</a></li><li><a href="../../libkmid/html/index.html">libkmid</a></li><li><a href="../../libkscreensaver/html/index.html">libkscreensaver</a></li>
</ul></div></div>
</td>
</tr>
</table>
<span class="doNotDisplay">
<a href="http://www.kde.org/" accesskey="8">KDE Home</a> |
<a href="http://accessibility.kde.org/" accesskey="9">KDE Accessibility Home</a> |
<a href="http://www.kde.org/media/accesskeys.php" accesskey="0">Description of Access Keys</a>
</span>
<div style="height: 8px"></div>
<div id="footer">
<div id="footer_left">
Maintained by <a href="mailto:groot@kde.org">Adriaan de Groot</a>
and
<a href="mailto:winter@kde.org">Allen Winter</a>.
<br/>
KDE and K Desktop Environment are trademarks of <a href="http://www.kde.org/areas/kde-ev/" title="Homepage of the KDE non-profit Organization">KDE e.V.</a> |
<a href="http://www.kde.org/contact/impressum.php">Legal</a>
</div>
<div id="footer_right"><img src="/media/images/footer_right.png" style="margin: 0px" alt="" /></div>
</div>
<!--
WARNING: DO NOT SEND MAIL TO THE FOLLOWING EMAIL ADDRESS! YOU WILL
BE BLOCKED INSTANTLY AND PERMANENTLY!
<a href="mailto:aaaatrap-425acc3b5374943f@kde.org">Block me</a>
WARNING END
-->
</body>
</html>
