blob: c586ee7c5fe9175fdee04bdc16031bbb8438c7d4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
" Vim syntax file
" Language: fetchmail(1) RC File
" Maintainer: Nikolai Weibull <source@pcppopper.org>
" URL: http://www.pcppopper.org/vim/syntax/pcp/fetchmail/
" Latest Revision: 2004-05-06
" arch-tag: 59d8adac-6e59-45f6-88cb-f9ba1e009c1f
if version < 600
syntax clear
elseif exists("b:current_syntax")
finish
endif
" todo
syn keyword fetchmailTodo contained FIXME TODO XXX NOTE
" comments
syn region fetchmailComment start="#" end="$" contains=fetchmailTodo
" numbers
syn match fetchmailNumber "\<\d\+\>"
" strings
syn region fetchmailString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=fetchmailStringEsc
syn region fetchmailString start=+'+ skip=+\\\\\|\\'+ end=+'+ contains=fetchmailStringEsc
" escape characters in strings
syn match fetchmailStringEsc "\\\([ntb]\|0\d*\|x\x\+\)"
" server entries
syn region fetchmailKeyword transparent matchgroup=fetchmailKeyword start="\<poll\|skip\|defaults\>" end="\<poll\|skip\|defaults\>" contains=ALLBUT,fetchmailOptions,fetchmailSet
" server options
syn keyword fetchmailServerOpts contained via proto[col] local[domains] port auth[enticate]
syn keyword fetchmailServerOpts contained timeout envelope qvirtual aka interface monitor
syn keyword fetchmailServerOpts contained plugin plugout dns checkalias uidl interval netsec
syn keyword fetchmailServerOpts contained principal esmtpname esmtppassword
syn match fetchmailServerOpts contained "\<no\_s\+\(envelope\|dns\|checkalias\|uidl\)"
" user options
syn keyword fetchmailUserOpts contained user[name] is to pass[word] ssl sslcert sslkey sslproto folder
syn keyword fetchmailUserOpts contained smtphost fetchdomains smtpaddress smtpname antispam mda bsmtp
syn keyword fetchmailUserOpts contained preconnect postconnect keep flush fetchall rewrite stripcr
syn keyword fetchmailUserOpts contained forcecr pass8bits dropstatus dropdelivered mimedecode idle
syn keyword fetchmailUserOpts contained limit warnings batchlimit fetchlimit expunge tracepolls properties
syn match fetchmailUserOpts contained "\<no\_s\+\(keep\|flush\|fetchall\|rewrite\|stripcr\|forcecr\|pass8bits\|dropstatus\|dropdelivered\|mimedecode\|noidle\)"
syn keyword fetchmailSpecial contained here there
" noise keywords
syn keyword fetchmailNoise and with has wants options
syn match fetchmailNoise "[:;,]"
" options
syn keyword fetchmailSet nextgroup=fetchmailOptions skipwhite skipnl set
syn keyword fetchmailOptions daemon postmaster bouncemail spambounce logfile idfile syslog nosyslog properties
syn match fetchmailOptions "\<no\_s\+\(bouncemail\|spambounce\)"
" Define the default highlighting.
" For version 5.7 and earlier: only when not done already
" For version 5.8 and later: only when an item doesn't have highlighting yet
if version >= 508 || !exists("did_fetchmail_syn_inits")
if version < 508
let did_fetchmail_syn_inits = 1
command -nargs=+ HiLink hi link <args>
else
command -nargs=+ HiLink hi def link <args>
endif
HiLink fetchmailComment Comment
HiLink fetchmailTodo Todo
HiLink fetchmailNumber Number
HiLink fetchmailString String
HiLink fetchmailStringEsc SpecialChar
HiLink fetchmailKeyword Keyword
HiLink fetchmailServerOpts Identifier
HiLink fetchmailUserOpts Identifier
HiLink fetchmailSpecial Special
HiLink fetchmailSet Keyword
HiLink fetchmailOptions Identifier
delcommand HiLink
endif
let b:current_syntax = "fetchmail"
" vim: set sts=2 sw=2:
|