forked from aniani/vim
161 lines
4.8 KiB
VimL
161 lines
4.8 KiB
VimL
" Vim syntax file
|
|
" Language: DTD (Document Type Definition for XML)
|
|
" Maintainer: Johannes Zellner <johannes@zellner.org>
|
|
" Author and previous maintainer:
|
|
" Daniel Amyot <damyot@site.uottawa.ca>
|
|
" Last Change: Tue, 27 Apr 2004 14:54:59 CEST
|
|
" Filenames: *.dtd
|
|
"
|
|
" REFERENCES:
|
|
" http://www.w3.org/TR/html40/
|
|
" http://www.w3.org/TR/NOTE-html-970421
|
|
"
|
|
" TODO:
|
|
" - improve synchronizing.
|
|
|
|
if exists("b:current_syntax")
|
|
finish
|
|
endif
|
|
let s:dtd_cpo_save = &cpo
|
|
set cpo&vim
|
|
|
|
if !exists("dtd_ignore_case")
|
|
" I prefer having the case takes into consideration.
|
|
syn case match
|
|
else
|
|
syn case ignore
|
|
endif
|
|
|
|
|
|
" the following line makes the opening <! and
|
|
" closing > highlighted using 'dtdFunction'.
|
|
"
|
|
" PROVIDES: @dtdTagHook
|
|
"
|
|
syn region dtdTag matchgroup=dtdFunction
|
|
\ start=+<!+ end=+>+ matchgroup=NONE
|
|
\ contains=dtdTag,dtdTagName,dtdError,dtdComment,dtdString,dtdAttrType,dtdAttrDef,dtdEnum,dtdParamEntityInst,dtdParamEntityDecl,dtdCard,@dtdTagHook
|
|
|
|
if !exists("dtd_no_tag_errors")
|
|
" mark everything as an error which starts with a <!
|
|
" and is not overridden later. If this is annoying,
|
|
" it can be switched off by setting the variable
|
|
" dtd_no_tag_errors.
|
|
syn region dtdError contained start=+<!+lc=2 end=+>+
|
|
endif
|
|
|
|
" if this is a html like comment hightlight also
|
|
" the opening <! and the closing > as Comment.
|
|
syn region dtdComment start=+<![ \t]*--+ end=+-->+ contains=dtdTodo,@Spell
|
|
|
|
|
|
" proper DTD comment
|
|
syn region dtdComment contained start=+--+ end=+--+ contains=dtdTodo,@Spell
|
|
|
|
|
|
" Start tags (keywords). This is contained in dtdFunction.
|
|
" Note that everything not contained here will be marked
|
|
" as error.
|
|
syn match dtdTagName contained +<!\(ATTLIST\|DOCTYPE\|ELEMENT\|ENTITY\|NOTATION\|SHORTREF\|USEMAP\|\[\)+lc=2,hs=s+2
|
|
|
|
|
|
" wildcards and operators
|
|
syn match dtdCard contained "|"
|
|
syn match dtdCard contained ","
|
|
" evenutally overridden by dtdEntity
|
|
syn match dtdCard contained "&"
|
|
syn match dtdCard contained "?"
|
|
syn match dtdCard contained "\*"
|
|
syn match dtdCard contained "+"
|
|
|
|
" ...and finally, special cases.
|
|
syn match dtdCard "ANY"
|
|
syn match dtdCard "EMPTY"
|
|
|
|
if !exists("dtd_no_param_entities")
|
|
|
|
" highlight parameter entity declarations
|
|
" and instances. Note that the closing `;'
|
|
" is optional.
|
|
|
|
" instances
|
|
syn region dtdParamEntityInst oneline matchgroup=dtdParamEntityPunct
|
|
\ start="%[-_a-zA-Z0-9.]\+"he=s+1,rs=s+1
|
|
\ skip=+[-_a-zA-Z0-9.]+
|
|
\ end=";\|\>"
|
|
\ matchgroup=NONE contains=dtdParamEntityPunct
|
|
syn match dtdParamEntityPunct contained "\."
|
|
|
|
" declarations
|
|
" syn region dtdParamEntityDecl oneline matchgroup=dtdParamEntityDPunct start=+<!ENTITY % +lc=8 skip=+[-_a-zA-Z0-9.]+ matchgroup=NONE end="\>" contains=dtdParamEntityDPunct
|
|
syn match dtdParamEntityDecl +<!ENTITY % [-_a-zA-Z0-9.]*+lc=8 contains=dtdParamEntityDPunct
|
|
syn match dtdParamEntityDPunct contained "%\|\."
|
|
|
|
endif
|
|
|
|
" &entities; compare with xml
|
|
syn match dtdEntity "&[^; \t]*;" contains=dtdEntityPunct
|
|
syn match dtdEntityPunct contained "[&.;]"
|
|
|
|
" Strings are between quotes
|
|
syn region dtdString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=dtdAttrDef,dtdAttrType,dtdEnum,dtdParamEntityInst,dtdEntity,dtdCard
|
|
syn region dtdString start=+'+ skip=+\\\\\|\\'+ end=+'+ contains=dtdAttrDef,dtdAttrType,dtdEnum,dtdParamEntityInst,dtdEntity,dtdCard
|
|
|
|
" Enumeration of elements or data between parenthesis
|
|
"
|
|
" PROVIDES: @dtdEnumHook
|
|
"
|
|
syn region dtdEnum matchgroup=dtdType start="(" end=")" matchgroup=NONE contains=dtdEnum,dtdParamEntityInst,dtdCard,@dtdEnumHook
|
|
|
|
"Attribute types
|
|
syn keyword dtdAttrType NMTOKEN ENTITIES NMTOKENS ID CDATA
|
|
syn keyword dtdAttrType IDREF IDREFS
|
|
" ENTITY has to treated special for not overriding <!ENTITY
|
|
syn match dtdAttrType +[^!]\<ENTITY+
|
|
|
|
"Attribute Definitions
|
|
syn match dtdAttrDef "#REQUIRED"
|
|
syn match dtdAttrDef "#IMPLIED"
|
|
syn match dtdAttrDef "#FIXED"
|
|
|
|
syn case match
|
|
" define some common keywords to mark TODO
|
|
" and important sections inside comments.
|
|
syn keyword dtdTodo contained TODO FIXME XXX
|
|
|
|
syn sync lines=250
|
|
|
|
" Define the default highlighting.
|
|
" Only when an item doesn't have highlighting yet
|
|
|
|
" The default highlighting.
|
|
hi def link dtdFunction Function
|
|
hi def link dtdTag Normal
|
|
hi def link dtdType Type
|
|
hi def link dtdAttrType dtdType
|
|
hi def link dtdAttrDef dtdType
|
|
hi def link dtdConstant Constant
|
|
hi def link dtdString dtdConstant
|
|
hi def link dtdEnum dtdConstant
|
|
hi def link dtdCard dtdFunction
|
|
|
|
hi def link dtdEntity Statement
|
|
hi def link dtdEntityPunct dtdType
|
|
hi def link dtdParamEntityInst dtdConstant
|
|
hi def link dtdParamEntityPunct dtdType
|
|
hi def link dtdParamEntityDecl dtdType
|
|
hi def link dtdParamEntityDPunct dtdComment
|
|
|
|
hi def link dtdComment Comment
|
|
hi def link dtdTagName Statement
|
|
hi def link dtdError Error
|
|
hi def link dtdTodo Todo
|
|
|
|
|
|
let &cpo = s:dtd_cpo_save
|
|
unlet s:dtd_cpo_save
|
|
|
|
let b:current_syntax = "dtd"
|
|
|
|
" vim: ts=8
|