|
625
|
1 " Vim completion script
|
|
|
2 " Language: All languages, uses existing syntax highlighting rules
|
|
1620
|
3 " Maintainer: David Fishburn <dfishburn.vim@gmail.com>
|
|
|
4 " Version: 4.0
|
|
|
5 " Last Change: Fri 26 Oct 2007 05:27:03 PM Eastern Daylight Time
|
|
871
|
6 " Usage: For detailed help, ":help ft-syntax-omni"
|
|
625
|
7
|
|
|
8 " Set completion with CTRL-X CTRL-O to autoloaded function.
|
|
785
|
9 " This check is in place in case this script is
|
|
|
10 " sourced directly instead of using the autoload feature.
|
|
702
|
11 if exists('+omnifunc')
|
|
785
|
12 " Do not set the option if already set since this
|
|
|
13 " results in an E117 warning.
|
|
|
14 if &omnifunc == ""
|
|
|
15 setlocal omnifunc=syntaxcomplete#Complete
|
|
|
16 endif
|
|
625
|
17 endif
|
|
|
18
|
|
|
19 if exists('g:loaded_syntax_completion')
|
|
|
20 finish
|
|
|
21 endif
|
|
1620
|
22 let g:loaded_syntax_completion = 40
|
|
871
|
23
|
|
|
24 " Set ignorecase to the ftplugin standard
|
|
1121
|
25 " This is the default setting, but if you define a buffer local
|
|
|
26 " variable you can override this on a per filetype.
|
|
871
|
27 if !exists('g:omni_syntax_ignorecase')
|
|
|
28 let g:omni_syntax_ignorecase = &ignorecase
|
|
|
29 endif
|
|
625
|
30
|
|
1121
|
31 " Indicates whether we should use the iskeyword option to determine
|
|
|
32 " how to split words.
|
|
|
33 " This is the default setting, but if you define a buffer local
|
|
|
34 " variable you can override this on a per filetype.
|
|
|
35 if !exists('g:omni_syntax_use_iskeyword')
|
|
|
36 let g:omni_syntax_use_iskeyword = 1
|
|
|
37 endif
|
|
|
38
|
|
|
39 " Only display items in the completion window that are at least
|
|
|
40 " this many characters in length.
|
|
|
41 " This is the default setting, but if you define a buffer local
|
|
|
42 " variable you can override this on a per filetype.
|
|
|
43 if !exists('g:omni_syntax_minimum_length')
|
|
|
44 let g:omni_syntax_minimum_length = 0
|
|
|
45 endif
|
|
|
46
|
|
625
|
47 " This script will build a completion list based on the syntax
|
|
|
48 " elements defined by the files in $VIMRUNTIME/syntax.
|
|
|
49 let s:syn_remove_words = 'match,matchgroup=,contains,'.
|
|
|
50 \ 'links to,start=,end=,nextgroup='
|
|
|
51
|
|
|
52 let s:cache_name = []
|
|
|
53 let s:cache_list = []
|
|
785
|
54 let s:prepended = ''
|
|
625
|
55
|
|
|
56 " This function is used for the 'omnifunc' option.
|
|
|
57 function! syntaxcomplete#Complete(findstart, base)
|
|
|
58
|
|
1121
|
59 " Only display items in the completion window that are at least
|
|
|
60 " this many characters in length
|
|
|
61 if !exists('b:omni_syntax_ignorecase')
|
|
|
62 if exists('g:omni_syntax_ignorecase')
|
|
|
63 let b:omni_syntax_ignorecase = g:omni_syntax_ignorecase
|
|
|
64 else
|
|
|
65 let b:omni_syntax_ignorecase = &ignorecase
|
|
|
66 endif
|
|
|
67 endif
|
|
|
68
|
|
625
|
69 if a:findstart
|
|
|
70 " Locate the start of the item, including "."
|
|
|
71 let line = getline('.')
|
|
|
72 let start = col('.') - 1
|
|
|
73 let lastword = -1
|
|
|
74 while start > 0
|
|
1121
|
75 " if line[start - 1] =~ '\S'
|
|
|
76 " let start -= 1
|
|
|
77 " elseif line[start - 1] =~ '\.'
|
|
|
78 if line[start - 1] =~ '\k'
|
|
625
|
79 let start -= 1
|
|
1121
|
80 let lastword = a:findstart
|
|
625
|
81 else
|
|
|
82 break
|
|
|
83 endif
|
|
|
84 endwhile
|
|
|
85
|
|
|
86 " Return the column of the last word, which is going to be changed.
|
|
|
87 " Remember the text that comes before it in s:prepended.
|
|
|
88 if lastword == -1
|
|
|
89 let s:prepended = ''
|
|
|
90 return start
|
|
|
91 endif
|
|
1121
|
92 let s:prepended = strpart(line, start, (col('.') - 1) - start)
|
|
|
93 return start
|
|
625
|
94 endif
|
|
|
95
|
|
1121
|
96 " let base = s:prepended . a:base
|
|
|
97 let base = s:prepended
|
|
625
|
98
|
|
871
|
99 let filetype = substitute(&filetype, '\.', '_', 'g')
|
|
|
100 let list_idx = index(s:cache_name, filetype, 0, &ignorecase)
|
|
625
|
101 if list_idx > -1
|
|
|
102 let compl_list = s:cache_list[list_idx]
|
|
|
103 else
|
|
871
|
104 let compl_list = OmniSyntaxList()
|
|
|
105 let s:cache_name = add( s:cache_name, filetype )
|
|
|
106 let s:cache_list = add( s:cache_list, compl_list )
|
|
625
|
107 endif
|
|
|
108
|
|
|
109 " Return list of matches.
|
|
|
110
|
|
1121
|
111 if base != ''
|
|
|
112 " let compstr = join(compl_list, ' ')
|
|
|
113 " let expr = (b:omni_syntax_ignorecase==0?'\C':'').'\<\%('.base.'\)\@!\w\+\s*'
|
|
|
114 " let compstr = substitute(compstr, expr, '', 'g')
|
|
|
115 " let compl_list = split(compstr, '\s\+')
|
|
|
116
|
|
|
117 " Filter the list based on the first few characters the user
|
|
|
118 " entered
|
|
|
119 let expr = 'v:val '.(g:omni_syntax_ignorecase==1?'=~?':'=~#')." '^".escape(base, '\\/.*$^~[]').".*'"
|
|
|
120 let compl_list = filter(deepcopy(compl_list), expr)
|
|
625
|
121 endif
|
|
|
122
|
|
|
123 return compl_list
|
|
|
124 endfunc
|
|
|
125
|
|
702
|
126 function! OmniSyntaxList()
|
|
871
|
127 " Default to returning a dictionary, if use_dictionary is set to 0
|
|
|
128 " a list will be returned.
|
|
|
129 " let use_dictionary = 1
|
|
|
130 " if a:0 > 0 && a:1 != ''
|
|
|
131 " let use_dictionary = a:1
|
|
|
132 " endif
|
|
|
133
|
|
1121
|
134 " Only display items in the completion window that are at least
|
|
|
135 " this many characters in length
|
|
|
136 if !exists('b:omni_syntax_use_iskeyword')
|
|
|
137 if exists('g:omni_syntax_use_iskeyword')
|
|
|
138 let b:omni_syntax_use_iskeyword = g:omni_syntax_use_iskeyword
|
|
|
139 else
|
|
|
140 let b:omni_syntax_use_iskeyword = 1
|
|
|
141 endif
|
|
|
142 endif
|
|
|
143
|
|
|
144 " Only display items in the completion window that are at least
|
|
|
145 " this many characters in length
|
|
|
146 if !exists('b:omni_syntax_minimum_length')
|
|
|
147 if exists('g:omni_syntax_minimum_length')
|
|
|
148 let b:omni_syntax_minimum_length = g:omni_syntax_minimum_length
|
|
|
149 else
|
|
|
150 let b:omni_syntax_minimum_length = 0
|
|
|
151 endif
|
|
|
152 endif
|
|
|
153
|
|
625
|
154 let saveL = @l
|
|
|
155
|
|
|
156 " Loop through all the syntax groupnames, and build a
|
|
|
157 " syntax file which contains these names. This can
|
|
|
158 " work generically for any filetype that does not already
|
|
|
159 " have a plugin defined.
|
|
|
160 " This ASSUMES the syntax groupname BEGINS with the name
|
|
702
|
161 " of the filetype. From my casual viewing of the vim7\syntax
|
|
625
|
162 " directory.
|
|
|
163 redir @l
|
|
|
164 silent! exec 'syntax list '
|
|
|
165 redir END
|
|
|
166
|
|
702
|
167 let syntax_full = "\n".@l
|
|
625
|
168 let @l = saveL
|
|
|
169
|
|
702
|
170 if syntax_full =~ 'E28'
|
|
|
171 \ || syntax_full =~ 'E411'
|
|
|
172 \ || syntax_full =~ 'E415'
|
|
|
173 \ || syntax_full =~ 'No Syntax items'
|
|
|
174 return []
|
|
|
175 endif
|
|
|
176
|
|
871
|
177 let filetype = substitute(&filetype, '\.', '_', 'g')
|
|
|
178
|
|
702
|
179 " Default the include group to include the requested syntax group
|
|
871
|
180 let syntax_group_include_{filetype} = ''
|
|
702
|
181 " Check if there are any overrides specified for this filetype
|
|
871
|
182 if exists('g:omni_syntax_group_include_'.filetype)
|
|
|
183 let syntax_group_include_{filetype} =
|
|
|
184 \ substitute( g:omni_syntax_group_include_{filetype},'\s\+','','g')
|
|
|
185 if syntax_group_include_{filetype} =~ '\w'
|
|
|
186 let syntax_group_include_{filetype} =
|
|
|
187 \ substitute( syntax_group_include_{filetype},
|
|
702
|
188 \ '\s*,\s*', '\\|', 'g'
|
|
|
189 \ )
|
|
|
190 endif
|
|
625
|
191 endif
|
|
|
192
|
|
702
|
193 " Default the exclude group to nothing
|
|
871
|
194 let syntax_group_exclude_{filetype} = ''
|
|
702
|
195 " Check if there are any overrides specified for this filetype
|
|
871
|
196 if exists('g:omni_syntax_group_exclude_'.filetype)
|
|
|
197 let syntax_group_exclude_{filetype} =
|
|
|
198 \ substitute( g:omni_syntax_group_exclude_{filetype},'\s\+','','g')
|
|
|
199 if syntax_group_exclude_{filetype} =~ '\w'
|
|
|
200 let syntax_group_exclude_{filetype} =
|
|
|
201 \ substitute( syntax_group_exclude_{filetype},
|
|
702
|
202 \ '\s*,\s*', '\\|', 'g'
|
|
|
203 \ )
|
|
|
204 endif
|
|
|
205 endif
|
|
|
206
|
|
871
|
207 " Sometimes filetypes can be composite names, like c.doxygen
|
|
|
208 " Loop through each individual part looking for the syntax
|
|
|
209 " items specific to each individual filetype.
|
|
625
|
210 let syn_list = ''
|
|
871
|
211 let ftindex = 0
|
|
|
212 let ftindex = match(&filetype, '\w\+', ftindex)
|
|
625
|
213
|
|
871
|
214 while ftindex > -1
|
|
|
215 let ft_part_name = matchstr( &filetype, '\w\+', ftindex )
|
|
625
|
216
|
|
871
|
217 " Syntax rules can contain items for more than just the current
|
|
|
218 " filetype. They can contain additional items added by the user
|
|
|
219 " via autocmds or their vimrc.
|
|
|
220 " Some syntax files can be combined (html, php, jsp).
|
|
|
221 " We want only items that begin with the filetype we are interested in.
|
|
|
222 let next_group_regex = '\n' .
|
|
|
223 \ '\zs'.ft_part_name.'\w\+\ze'.
|
|
|
224 \ '\s\+xxx\s\+'
|
|
|
225 let index = 0
|
|
|
226 let index = match(syntax_full, next_group_regex, index)
|
|
|
227
|
|
|
228 while index > -1
|
|
|
229 let group_name = matchstr( syntax_full, '\w\+', index )
|
|
|
230
|
|
|
231 let get_syn_list = 1
|
|
|
232 " if syntax_group_include_{&filetype} == ''
|
|
|
233 " if syntax_group_exclude_{&filetype} != ''
|
|
|
234 " if '\<'.syntax_group_exclude_{&filetype}.'\>' =~ '\<'.group_name.'\>'
|
|
|
235 " let get_syn_list = 0
|
|
|
236 " endif
|
|
|
237 " endif
|
|
|
238 " else
|
|
|
239 " if '\<'.syntax_group_include_{&filetype}.'\>' !~ '\<'.group_name.'\>'
|
|
|
240 " let get_syn_list = 0
|
|
|
241 " endif
|
|
|
242 " endif
|
|
|
243 if syntax_group_exclude_{filetype} != ''
|
|
|
244 if '\<'.syntax_group_exclude_{filetype}.'\>' =~ '\<'.group_name.'\>'
|
|
702
|
245 let get_syn_list = 0
|
|
|
246 endif
|
|
|
247 endif
|
|
871
|
248
|
|
|
249 if get_syn_list == 1
|
|
|
250 if syntax_group_include_{filetype} != ''
|
|
|
251 if '\<'.syntax_group_include_{filetype}.'\>' !~ '\<'.group_name.'\>'
|
|
|
252 let get_syn_list = 0
|
|
|
253 endif
|
|
|
254 endif
|
|
|
255 endif
|
|
|
256
|
|
|
257 if get_syn_list == 1
|
|
|
258 " Pass in the full syntax listing, plus the group name we
|
|
|
259 " are interested in.
|
|
|
260 let extra_syn_list = s:SyntaxCSyntaxGroupItems(group_name, syntax_full)
|
|
625
|
261
|
|
871
|
262 " if !empty(extra_syn_list)
|
|
|
263 " for elem in extra_syn_list
|
|
|
264 " let item = {'word':elem, 'kind':'t', 'info':group_name}
|
|
|
265 " let compl_list += [item]
|
|
|
266 " endfor
|
|
|
267 " endif
|
|
702
|
268
|
|
871
|
269 let syn_list = syn_list . extra_syn_list . "\n"
|
|
|
270 endif
|
|
625
|
271
|
|
871
|
272 let index = index + strlen(group_name)
|
|
|
273 let index = match(syntax_full, next_group_regex, index)
|
|
|
274 endwhile
|
|
|
275
|
|
|
276 let ftindex = ftindex + len(ft_part_name)
|
|
|
277 let ftindex = match( &filetype, '\w\+', ftindex )
|
|
625
|
278 endwhile
|
|
|
279
|
|
702
|
280 " Convert the string to a List and sort it.
|
|
|
281 let compl_list = sort(split(syn_list))
|
|
|
282
|
|
|
283 if &filetype == 'vim'
|
|
|
284 let short_compl_list = []
|
|
|
285 for i in range(len(compl_list))
|
|
|
286 if i == len(compl_list)-1
|
|
|
287 let next = i
|
|
|
288 else
|
|
|
289 let next = i + 1
|
|
|
290 endif
|
|
|
291 if compl_list[next] !~ '^'.compl_list[i].'.$'
|
|
|
292 let short_compl_list += [compl_list[i]]
|
|
|
293 endif
|
|
|
294 endfor
|
|
|
295
|
|
|
296 return short_compl_list
|
|
|
297 else
|
|
|
298 return compl_list
|
|
|
299 endif
|
|
625
|
300 endfunction
|
|
|
301
|
|
818
|
302 function! s:SyntaxCSyntaxGroupItems( group_name, syntax_full )
|
|
702
|
303
|
|
|
304 let syn_list = ""
|
|
625
|
305
|
|
702
|
306 " From the full syntax listing, strip out the portion for the
|
|
|
307 " request group.
|
|
|
308 " Query:
|
|
|
309 " \n - must begin with a newline
|
|
|
310 " a:group_name - the group name we are interested in
|
|
|
311 " \s\+xxx\s\+ - group names are always followed by xxx
|
|
|
312 " \zs - start the match
|
|
|
313 " .\{-} - everything ...
|
|
|
314 " \ze - end the match
|
|
|
315 " \n\w - at the first newline starting with a character
|
|
|
316 let syntax_group = matchstr(a:syntax_full,
|
|
|
317 \ "\n".a:group_name.'\s\+xxx\s\+\zs.\{-}\ze'."\n".'\w'
|
|
871
|
318 \ )
|
|
702
|
319
|
|
|
320 if syntax_group != ""
|
|
625
|
321 " let syn_list = substitute( @l, '^.*xxx\s*\%(contained\s*\)\?', "", '' )
|
|
702
|
322 " let syn_list = substitute( @l, '^.*xxx\s*', "", '' )
|
|
625
|
323
|
|
|
324 " We only want the words for the lines begining with
|
|
|
325 " containedin, but there could be other items.
|
|
|
326
|
|
|
327 " Tried to remove all lines that do not begin with contained
|
|
|
328 " but this does not work in all cases since you can have
|
|
|
329 " contained nextgroup=...
|
|
|
330 " So this will strip off the ending of lines with known
|
|
|
331 " keywords.
|
|
871
|
332 let syn_list = substitute(
|
|
|
333 \ syntax_group, '\<\('.
|
|
|
334 \ substitute(
|
|
|
335 \ escape(s:syn_remove_words, '\\/.*$^~[]')
|
|
|
336 \ , ',', '\\|', 'g'
|
|
|
337 \ ).
|
|
|
338 \ '\).\{-}\%($\|'."\n".'\)'
|
|
|
339 \ , "\n", 'g'
|
|
|
340 \ )
|
|
625
|
341
|
|
|
342 " Now strip off the newline + blank space + contained
|
|
871
|
343 let syn_list = substitute(
|
|
|
344 \ syn_list, '\%(^\|\n\)\@<=\s*\<\(contained\)'
|
|
|
345 \ , "", 'g'
|
|
|
346 \ )
|
|
625
|
347
|
|
1121
|
348 if b:omni_syntax_use_iskeyword == 0
|
|
|
349 " There are a number of items which have non-word characters in
|
|
|
350 " them, *'T_F1'*. vim.vim is one such file.
|
|
|
351 " This will replace non-word characters with spaces.
|
|
|
352 let syn_list = substitute( syn_list, '[^0-9A-Za-z_ ]', ' ', 'g' )
|
|
|
353 else
|
|
|
354 let accept_chars = ','.&iskeyword.','
|
|
|
355 " Remove all character ranges
|
|
1620
|
356 " let accept_chars = substitute(accept_chars, ',[^,]\+-[^,]\+,', ',', 'g')
|
|
|
357 let accept_chars = substitute(accept_chars, ',\@<=[^,]\+-[^,]\+,', '', 'g')
|
|
1121
|
358 " Remove all numeric specifications
|
|
1620
|
359 " let accept_chars = substitute(accept_chars, ',\d\{-},', ',', 'g')
|
|
|
360 let accept_chars = substitute(accept_chars, ',\@<=\d\{-},', '', 'g')
|
|
1121
|
361 " Remove all commas
|
|
|
362 let accept_chars = substitute(accept_chars, ',', '', 'g')
|
|
|
363 " Escape special regex characters
|
|
|
364 let accept_chars = escape(accept_chars, '\\/.*$^~[]' )
|
|
|
365 " Remove all characters that are not acceptable
|
|
|
366 let syn_list = substitute( syn_list, '[^0-9A-Za-z_ '.accept_chars.']', ' ', 'g' )
|
|
|
367 endif
|
|
|
368
|
|
|
369 if b:omni_syntax_minimum_length > 0
|
|
|
370 " If the user specified a minimum length, enforce it
|
|
|
371 let syn_list = substitute(' '.syn_list.' ', ' \S\{,'.b:omni_syntax_minimum_length.'}\ze ', ' ', 'g')
|
|
|
372 endif
|
|
625
|
373 else
|
|
|
374 let syn_list = ''
|
|
|
375 endif
|
|
|
376
|
|
|
377 return syn_list
|
|
|
378 endfunction
|
