runtime/syntax/ptcap.vim

   1 " Vim syntax file
   2 " Language:     printcap/termcap database
   3 " Maintainer:   Haakon Riiser <hakonrk@fys.uio.no>
   4 " URL:          http://folk.uio.no/hakonrk/vim/syntax/ptcap.vim
   5 " Last Change:  2001 May 15
   6
   7 " For version 5.x: Clear all syntax items
   8 " For version 6.x: Quit when a syntax file was already loaded
   9 if version < 600
  10     syn clear
  11 elseif exists("b:current_syntax")
  12     finish
  13 endif
  14
  15 " Since I only highlight based on the structure of the databases, not
  16 " specific keywords, case sensitivity isn't required
  17 syn case ignore
  18
  19 " Since everything that is not caught by the syntax patterns is assumed
  20 " to be an error, we start parsing 20 lines up, unless something else
  21 " is specified
  22 if exists("ptcap_minlines")
  23     exe "syn sync lines=".ptcap_minlines
  24 else
  25     syn sync lines=20
  26 endif
  27
  28 " Highlight everything that isn't caught by the rules as errors,
  29 " except blank lines
  30 syn match ptcapError        "^.*\S.*$"
  31
  32 syn match ptcapLeadBlank    "^\s\+" contained
  33
  34 " `:' and `|' are delimiters for fields and names, and should not be
  35 " highlighted.  Hence, they are linked to `NONE'
  36 syn match ptcapDelimiter    "[:|]" contained
  37
  38 " Escaped characters receive special highlighting
  39 syn match ptcapEscapedChar  "\\." contained
  40 syn match ptcapEscapedChar  "\^." contained
  41 syn match ptcapEscapedChar  "\\\o\{3}" contained
  42
  43 " A backslash at the end of a line will suppress the newline
  44 syn match ptcapLineCont     "\\$" contained
  45
  46 " A number follows the same rules as an integer in C
  47 syn match ptcapNumber       "#\(+\|-\)\=\d\+"lc=1 contained
  48 syn match ptcapNumberError  "#\d*[^[:digit:]:\\]"lc=1 contained
  49 syn match ptcapNumber       "#0x\x\{1,8}"lc=1 contained
  50 syn match ptcapNumberError  "#0x\X"me=e-1,lc=1 contained
  51 syn match ptcapNumberError  "#0x\x\{9}"lc=1 contained
  52 syn match ptcapNumberError  "#0x\x*[^[:xdigit:]:\\]"lc=1 contained
  53
  54 " The `@' operator clears a flag (i.e., sets it to zero)
  55 " The `#' operator assigns a following number to the flag
  56 " The `=' operator assigns a string to the preceding flag
  57 syn match ptcapOperator     "[@#=]" contained
  58
  59 " Some terminal capabilites have special names like `#5' and `@1', and we
  60 " need special rules to match these properly
  61 syn match ptcapSpecialCap   "\W[#@]\d" contains=ptcapDelimiter contained
  62
  63 " If editing a termcap file, an entry in the database is terminated by
  64 " a (non-escaped) newline.  Otherwise, it is terminated by a line which
  65 " does not start with a colon (:)
  66 if exists("b:ptcap_type") && b:ptcap_type[0] == 't'
  67     syn region ptcapEntry   start="^\s*[^[:space:]:]" end="[^\\]\(\\\\\)*$" end="^$" contains=ptcapNames,ptcapField,ptcapLeadBlank keepend
  68 else
  69     syn region ptcapEntry   start="^\s*[^[:space:]:]"me=e-1 end="^\s*[^[:space:]:#]"me=e-1 contains=ptcapNames,ptcapField,ptcapLeadBlank,ptcapComment
  70 endif
  71 syn region ptcapNames       start="^\s*[^[:space:]:]" skip="[^\\]\(\\\\\)*\\:" end=":"me=e-1 contains=ptcapDelimiter,ptcapEscapedChar,ptcapLineCont,ptcapLeadBlank,ptcapComment keepend contained
  72 syn region ptcapField       start=":" skip="[^\\]\(\\\\\)*\\$" end="[^\\]\(\\\\\)*:"me=e-1 end="$" contains=ptcapDelimiter,ptcapString,ptcapNumber,ptcapNumberError,ptcapOperator,ptcapLineCont,ptcapSpecialCap,ptcapLeadBlank,ptcapComment keepend contained
  73 syn region ptcapString      matchgroup=ptcapOperator start="=" skip="[^\\]\(\\\\\)*\\:" matchgroup=ptcapDelimiter end=":"me=e-1 matchgroup=NONE end="[^\\]\(\\\\\)*[^\\]$" end="^$" contains=ptcapEscapedChar,ptcapLineCont keepend contained
  74 syn region ptcapComment     start="^\s*#" end="$" contains=ptcapLeadBlank
  75
  76 if version >= 508 || !exists("did_ptcap_syntax_inits")
  77     if version < 508
  78         let did_ptcap_syntax_inits = 1
  79         command -nargs=+ HiLink hi link <args>
  80     else
  81         command -nargs=+ HiLink hi def link <args>
  82     endif
  83
  84     HiLink ptcapComment         Comment
  85     HiLink ptcapDelimiter       Delimiter
  86     " The highlighting of "ptcapEntry" should always be overridden by
  87     " its contents, so I use Todo highlighting to indicate that there
  88     " is work to be done with the syntax file if you can see it :-)
  89     HiLink ptcapEntry           Todo
  90     HiLink ptcapError           Error
  91     HiLink ptcapEscapedChar     SpecialChar
  92     HiLink ptcapField           Type
  93     HiLink ptcapLeadBlank       NONE
  94     HiLink ptcapLineCont        Special
  95     HiLink ptcapNames           Label
  96     HiLink ptcapNumber          NONE
  97     HiLink ptcapNumberError     Error
  98     HiLink ptcapOperator        Operator
  99     HiLink ptcapSpecialCap      Type
 100     HiLink ptcapString          NONE
 101
 102     delcommand HiLink
 103 endif
 104
 105 let b:current_syntax = "ptcap"
 106
 107 " vim: sts=4 sw=4 ts=8