1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
" Vim syntax file
" Language: lite
" Maintainer: Lutz Eymers <ixtab@polzin.com>
" URL: http://www.isp.de/data/lite.vim
" Email: Subject: send syntax_vim.tgz
" Last Change: 2001 Mai 01
"
" Options lite_sql_query = 1 for SQL syntax highligthing inside strings
" lite_minlines = x to sync at least x lines backwards
" quit when a syntax file was already loaded
if exists("b:current_syntax")
finish
endif
if !exists("main_syntax")
let main_syntax = 'lite'
endif
if main_syntax == 'lite'
if exists("lite_sql_query")
if lite_sql_query == 1
syn include @liteSql <sfile>:p:h/sql.vim
unlet b:current_syntax
endif
endif
endif
if main_syntax == 'msql'
if exists("msql_sql_query")
if msql_sql_query == 1
syn include @liteSql <sfile>:p:h/sql.vim
unlet b:current_syntax
endif
endif
endif
syn cluster liteSql remove=sqlString,sqlComment
syn case match
" Internal Variables
syn keyword liteIntVar ERRMSG contained
" Comment
syn region liteComment start="/\*" end="\*/" contains=liteTodo
" Function names
syn keyword liteFunctions echo printf fprintf open close read
syn keyword liteFunctions readln readtok
syn keyword liteFunctions split strseg chop tr sub substr
syn keyword liteFunctions test unlink umask chmod mkdir chdir rmdir
syn keyword liteFunctions rename truncate link symlink stat
syn keyword liteFunctions sleep system getpid getppid kill
syn keyword liteFunctions time ctime time2unixtime unixtime2year
syn keyword liteFunctions unixtime2year unixtime2month unixtime2day
syn keyword liteFunctions unixtime2hour unixtime2min unixtime2sec
syn keyword liteFunctions strftime
syn keyword liteFunctions getpwnam getpwuid
syn keyword liteFunctions gethostbyname gethostbyaddress
syn keyword liteFunctions urlEncode setContentType includeFile
syn keyword liteFunctions msqlConnect msqlClose msqlSelectDB
syn keyword liteFunctions msqlQuery msqlStoreResult msqlFreeResult
syn keyword liteFunctions msqlFetchRow msqlDataSeek msqlListDBs
syn keyword liteFunctions msqlListTables msqlInitFieldList msqlListField
syn keyword liteFunctions msqlFieldSeek msqlNumRows msqlEncode
syn keyword liteFunctions exit fatal typeof
syn keyword liteFunctions crypt addHttpHeader
" Conditional
syn keyword liteConditional if else
" Repeat
syn keyword liteRepeat while
" Operator
syn keyword liteStatement break return continue
" Operator
syn match liteOperator "[-+=#*]"
syn match liteOperator "/[^*]"me=e-1
syn match liteOperator "\$"
syn match liteRelation "&&"
syn match liteRelation "||"
syn match liteRelation "[!=<>]="
syn match liteRelation "[<>]"
" Identifier
syn match liteIdentifier "$\h\w*" contains=liteIntVar,liteOperator
syn match liteGlobalIdentifier "@\h\w*" contains=liteIntVar
" Include
syn keyword liteInclude load
" Define
syn keyword liteDefine funct
" Type
syn keyword liteType int uint char real
" String
syn region liteString keepend matchgroup=None start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=liteIdentifier,liteSpecialChar,@liteSql
" Number
syn match liteNumber "-\=\<\d\+\>"
" Float
syn match liteFloat "\(-\=\<\d+\|-\=\)\.\d\+\>"
" SpecialChar
syn match liteSpecialChar "\\[abcfnrtv\\]" contained
syn match liteParentError "[)}\]]"
" Todo
syn keyword liteTodo TODO Todo todo contained
" dont syn #!...
syn match liteExec "^#!.*$"
" Parents
syn cluster liteInside contains=liteComment,liteFunctions,liteIdentifier,liteGlobalIdentifier,liteConditional,liteRepeat,liteStatement,liteOperator,liteRelation,liteType,liteString,liteNumber,liteFloat,liteParent
syn region liteParent matchgroup=Delimiter start="(" end=")" contains=@liteInside
syn region liteParent matchgroup=Delimiter start="{" end="}" contains=@liteInside
syn region liteParent matchgroup=Delimiter start="\[" end="\]" contains=@liteInside
" sync
if main_syntax == 'lite'
if exists("lite_minlines")
exec "syn sync minlines=" . lite_minlines
else
syn sync minlines=100
endif
endif
" Define the default highlighting.
" Only when an item doesn't have highlighting yet
command -nargs=+ HiLink hi def link <args>
HiLink liteComment Comment
HiLink liteString String
HiLink liteNumber Number
HiLink liteFloat Float
HiLink liteIdentifier Identifier
HiLink liteGlobalIdentifier Identifier
HiLink liteIntVar Identifier
HiLink liteFunctions Function
HiLink liteRepeat Repeat
HiLink liteConditional Conditional
HiLink liteStatement Statement
HiLink liteType Type
HiLink liteInclude Include
HiLink liteDefine Define
HiLink liteSpecialChar SpecialChar
HiLink liteParentError liteError
HiLink liteError Error
HiLink liteTodo Todo
HiLink liteOperator Operator
HiLink liteRelation Operator
delcommand HiLink
let b:current_syntax = "lite"
if main_syntax == 'lite'
unlet main_syntax
endif
" vim: ts=8
|