| Bram Moolenaar | a7241f5 | 2008-06-24 20:39:31 +0000 | [diff] [blame] | 1 | " Vim syntax file |
| 2 | " Language: MS Message Text files (*.mc) |
| 3 | " Maintainer: Kevin Locke <kwl7@cornell.edu> |
| 4 | " Last Change: 2008 April 09 |
| 5 | " Location: http://kevinlocke.name/programs/vim/syntax/msmessages.vim |
| 6 | |
| 7 | " See format description at <http://msdn2.microsoft.com/en-us/library/aa385646.aspx> |
| 8 | " This file is based on the rc.vim and c.vim |
| 9 | |
| 10 | " For version 5.x: Clear all syntax items |
| 11 | " For version 6.x: Quit when a syntax file was already loaded |
| 12 | if version < 600 |
| 13 | syntax clear |
| 14 | elseif exists("b:current_syntax") |
| 15 | finish |
| 16 | endif |
| 17 | |
| 18 | " Common MS Messages keywords |
| 19 | syn case ignore |
| 20 | syn keyword msmessagesIdentifier MessageIdTypedef |
| 21 | syn keyword msmessagesIdentifier SeverityNames |
| 22 | syn keyword msmessagesIdentifier FacilityNames |
| 23 | syn keyword msmessagesIdentifier LanguageNames |
| 24 | syn keyword msmessagesIdentifier OutputBase |
| 25 | |
| 26 | syn keyword msmessagesIdentifier MessageId |
| 27 | syn keyword msmessagesIdentifier Severity |
| 28 | syn keyword msmessagesIdentifier Facility |
| 29 | syn keyword msmessagesIdentifier OutputBase |
| 30 | |
| 31 | syn match msmessagesIdentifier /\<SymbolicName\>/ nextgroup=msmessagesIdentEq skipwhite |
| 32 | syn match msmessagesIdentEq transparent /=/ nextgroup=msmessagesIdentDef skipwhite contained |
| 33 | syn match msmessagesIdentDef display /\w\+/ contained |
| 34 | " Note: The Language keyword is highlighted as part of an msmessagesLangEntry |
| 35 | |
| 36 | " Set value |
| 37 | syn case match |
| 38 | syn region msmessagesSet start="(" end=")" transparent fold contains=msmessagesName keepend |
| 39 | syn match msmessagesName /\w\+/ nextgroup=msmessagesSetEquals skipwhite contained |
| 40 | syn match msmessagesSetEquals /=/ display transparent nextgroup=msmessagesNumVal skipwhite contained |
| 41 | syn match msmessagesNumVal display transparent "\<\d\|\.\d" contains=msmessagesNumber,msmessagesFloat,msmessagesOctalError,msmessagesOctal nextgroup=msmessagesValSep |
| 42 | syn match msmessagesValSep /:/ display nextgroup=msmessagesNameDef contained |
| 43 | syn match msmessagesNameDef /\w\+/ display contained |
| 44 | |
| 45 | |
| 46 | " Comments are converted to C source (by removing leading ;) |
| 47 | " So we highlight the comments as C |
| 48 | syn include @msmessagesC syntax/c.vim |
| 49 | unlet b:current_syntax |
| 50 | syn region msmessagesCComment matchgroup=msmessagesComment start=/;/ end=/$/ contains=@msmessagesC keepend |
| 51 | |
| 52 | " String and Character constants |
| 53 | " Highlight special characters (those which have a escape) differently |
| 54 | syn case ignore |
| 55 | syn region msmessagesLangEntry start=/\<Language\>\s*=\s*\S\+\s*$/hs=e+1 end=/^\./ contains=msmessagesFormat,msmessagesLangEntryEnd,msmessagesLanguage keepend |
| 56 | syn match msmessagesLanguage /\<Language\(\s*=\)\@=/ contained |
| 57 | syn match msmessagesLangEntryEnd display /^\./ contained |
| 58 | syn case match |
| 59 | syn match msmessagesFormat display /%[1-9]\d\?\(![-+0 #]*\d*\(\.\d\+\)\?\(h\|l\|ll\|I\|I32\|I64\)\?[aAcCdeEfgGinopsSuxX]!\)\?/ contained |
| 60 | syn match msmessagesFormat display /%[0.%\\br]/ contained |
| 61 | syn match msmessagesFormat display /%!\(\s\)\@=/ contained |
| 62 | |
| 63 | " Integer number, or floating point number without a dot and with "f". |
| 64 | " Copied from c.vim |
| 65 | syn case ignore |
| 66 | "(long) integer |
| 67 | syn match msmessagesNumber display contained "\d\+\(u\=l\{0,2}\|ll\=u\)\>" |
| 68 | "hex number |
| 69 | syn match msmessagesNumber display contained "\<0x\x\+\(u\=l\{0,2}\|ll\=u\)\>" |
| 70 | " Flag the first zero of an octal number as something special |
| 71 | syn match msmessagesOctal display contained "\<0\o\+\(u\=l\{0,2}\|ll\=u\)\>" contains=msmessagesOctalZero |
| 72 | syn match msmessagesOctalZero display contained "\<0" |
| 73 | " flag an octal number with wrong digits |
| 74 | syn match msmessagesOctalError display contained "\<0\o*[89]\d*" |
| 75 | syn match msmessagesFloat display contained "\d\+f" |
| 76 | "floating point number, with dot, optional exponent |
| 77 | syn match msmessagesFloat display contained "\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=" |
| 78 | "floating point number, starting with a dot, optional exponent |
| 79 | syn match msmessagesFloat display contained "\.\d\+\(e[-+]\=\d\+\)\=[fl]\=\>" |
| 80 | "floating point number, without dot, with exponent |
| 81 | syn match msmessagesFloat display contained "\d\+e[-+]\=\d\+[fl]\=\>" |
| 82 | "hexadecimal floating point number, optional leading digits, with dot, with exponent |
| 83 | syn match msmessagesFloat display contained "0x\x*\.\x\+p[-+]\=\d\+[fl]\=\>" |
| 84 | "hexadecimal floating point number, with leading digits, optional dot, with exponent |
| 85 | syn match msmessagesFloat display contained "0x\x\+\.\=p[-+]\=\d\+[fl]\=\>" |
| 86 | |
| 87 | " Types (used in MessageIdTypedef statement) |
| 88 | syn case match |
| 89 | syn keyword msmessagesType int long short char |
| 90 | syn keyword msmessagesType signed unsigned |
| 91 | syn keyword msmessagesType size_t ssize_t sig_atomic_t |
| 92 | syn keyword msmessagesType int8_t int16_t int32_t int64_t |
| 93 | syn keyword msmessagesType uint8_t uint16_t uint32_t uint64_t |
| 94 | syn keyword msmessagesType int_least8_t int_least16_t int_least32_t int_least64_t |
| 95 | syn keyword msmessagesType uint_least8_t uint_least16_t uint_least32_t uint_least64_t |
| 96 | syn keyword msmessagesType int_fast8_t int_fast16_t int_fast32_t int_fast64_t |
| 97 | syn keyword msmessagesType uint_fast8_t uint_fast16_t uint_fast32_t uint_fast64_t |
| 98 | syn keyword msmessagesType intptr_t uintptr_t |
| 99 | syn keyword msmessagesType intmax_t uintmax_t |
| 100 | " Add some Windows datatypes that will be common in msmessages files |
| 101 | syn keyword msmessagesType BYTE CHAR SHORT SIZE_T SSIZE_T TBYTE TCHAR UCHAR USHORT |
| 102 | syn keyword msmessagesType DWORD DWORDLONG DWORD32 DWORD64 |
| 103 | syn keyword msmessagesType INT INT32 INT64 UINT UINT32 UINT64 |
| 104 | syn keyword msmessagesType LONG LONGLONG LONG32 LONG64 |
| 105 | syn keyword msmessagesType ULONG ULONGLONG ULONG32 ULONG64 |
| 106 | |
| 107 | " Sync to language entries, since they should be most common |
| 108 | syn sync match msmessagesLangSync grouphere msmessagesLangEntry "\<Language\s*=" |
| 109 | syn sync match msmessagesLangEndSync grouphere NONE "^\." |
| 110 | |
| 111 | " Define the default highlighting. |
| 112 | hi def link msmessagesNumber Number |
| 113 | hi def link msmessagesOctal Number |
| 114 | hi def link msmessagesFloat Float |
| 115 | hi def link msmessagesOctalError msmessagesError |
| 116 | hi def link msmessagesSetError msmessagesError |
| 117 | hi def link msmessagesError Error |
| 118 | hi def link msmessagesLangEntry String |
| 119 | hi def link msmessagesLangEntryEnd Special |
| 120 | hi def link msmessagesComment Comment |
| 121 | hi def link msmessagesFormat msmessagesSpecial |
| 122 | hi def link msmessagesSpecial SpecialChar |
| 123 | |
| 124 | hi def link msmessagesType Type |
| 125 | hi def link msmessagesIdentifier Identifier |
| 126 | hi def link msmessagesLanguage msmessagesIdentifier |
| 127 | hi def link msmessagesName msmessagesIdentifier |
| 128 | hi def link msmessagesNameDef Macro |
| 129 | hi def link msmessagesIdentDef Macro |
| 130 | hi def link msmessagesValSep Special |
| 131 | hi def link msmessagesNameErr Error |
| 132 | |
| 133 | let b:current_syntax = "msmessages" |
| 134 | |
| 135 | " vim: ts=8 |