runtime/indent/xinetd.vim

   1 " Vim indent file
   2 " Language:         xinetd.conf(5) configuration file
   3 " Maintainer:       Nikolai Weibull <now@bitwi.se>
   4 " Latest Revision:  2006-04-19
   5
   6 if exists("b:did_indent")
   7   finish
   8 endif
   9 let b:did_indent = 1
  10
  11 setlocal indentexpr=GetXinetdIndent()
  12 setlocal indentkeys=0{,0},!^F,o,O
  13
  14 if exists("*GetXinetdIndent")
  15   finish
  16 endif
  17
  18 function s:count_braces(lnum, count_open)
  19   let n_open = 0
  20   let n_close = 0
  21   let line = getline(a:lnum)
  22   let pattern = '[{}]'
  23   let i = match(line, pattern)
  24   while i != -1
  25     if synIDattr(synID(a:lnum, i + 1, 0), 'name') !~ 'ld\%(Comment\|String\)'
  26       if line[i] == '{'
  27         let n_open += 1
  28       elseif line[i] == '}'
  29         if n_open > 0
  30           let n_open -= 1
  31         else
  32           let n_close += 1
  33         endif
  34       endif
  35     endif
  36     let i = match(line, pattern, i + 1)
  37   endwhile
  38   return a:count_open ? n_open : n_close
  39 endfunction
  40
  41 function GetXinetdIndent()
  42   let pnum = prevnonblank(v:lnum - 1)
  43   if pnum == 0
  44     return 0
  45   endif
  46
  47   return indent(pnum) + s:count_braces(pnum, 1) * &sw
  48         \ - s:count_braces(v:lnum, 0) * &sw
  49 endfunction