1" Vim support file to detect file types 2" 3" Maintainer: Bram Moolenaar <[email protected]> 4" Last Change: 2015 Dec 03 5 6" Listen very carefully, I will say this only once 7if exists("did_load_filetypes") 8 finish 9endif 10let did_load_filetypes = 1 11 12" Line continuation is used here, remove 'C' from 'cpoptions' 13let s:cpo_save = &cpo 14set cpo&vim 15 16augroup filetypedetect 17 18" Ignored extensions 19if exists("*fnameescape") 20au BufNewFile,BufRead ?\+.orig,?\+.bak,?\+.old,?\+.new,?\+.dpkg-dist,?\+.dpkg-old,?\+.dpkg-new,?\+.dpkg-bak,?\+.rpmsave,?\+.rpmnew 21 \ exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r")) 22au BufNewFile,BufRead *~ 23 \ let s:name = expand("<afile>") | 24 \ let s:short = substitute(s:name, '\~$', '', '') | 25 \ if s:name != s:short && s:short != "" | 26 \ exe "doau filetypedetect BufRead " . fnameescape(s:short) | 27 \ endif | 28 \ unlet! s:name s:short 29au BufNewFile,BufRead ?\+.in 30 \ if expand("<afile>:t") != "configure.in" | 31 \ exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r")) | 32 \ endif 33elseif &verbose > 0 34 echomsg "Warning: some filetypes will not be recognized because this version of Vim does not have fnameescape()" 35endif 36 37" Pattern used to match file names which should not be inspected. 38" Currently finds compressed files. 39if !exists("g:ft_ignore_pat") 40 let g:ft_ignore_pat = '\.\(Z\|gz\|bz2\|zip\|tgz\)$' 41endif 42 43" Function used for patterns that end in a star: don't set the filetype if the 44" file name matches ft_ignore_pat. 45func! s:StarSetf(ft) 46 if expand("<amatch>") !~ g:ft_ignore_pat 47 exe 'setf ' . a:ft 48 endif 49endfunc 50 51" Abaqus or Trasys 52au BufNewFile,BufRead *.inp call s:Check_inp() 53 54func! s:Check_inp() 55 if getline(1) =~ '^\*' 56 setf abaqus 57 else 58 let n = 1 59 if line("$") > 500 60 let nmax = 500 61 else 62 let nmax = line("$") 63 endif 64 while n <= nmax 65 if getline(n) =~? "^header surface data" 66 setf trasys 67 break 68 endif 69 let n = n + 1 70 endwhile 71 endif 72endfunc 73 74" A-A-P recipe 75au BufNewFile,BufRead *.aap setf aap 76 77" A2ps printing utility 78au BufNewFile,BufRead */etc/a2ps.cfg,*/etc/a2ps/*.cfg,a2psrc,.a2psrc setf a2ps 79 80" ABAB/4 81au BufNewFile,BufRead *.abap setf abap 82 83" ABC music notation 84au BufNewFile,BufRead *.abc setf abc 85 86" ABEL 87au BufNewFile,BufRead *.abl setf abel 88 89" AceDB 90au BufNewFile,BufRead *.wrm setf acedb 91 92" Ada (83, 9X, 95) 93au BufNewFile,BufRead *.adb,*.ads,*.ada setf ada 94if has("vms") 95 au BufNewFile,BufRead *.gpr,*.ada_m,*.adc setf ada 96else 97 au BufNewFile,BufRead *.gpr setf ada 98endif 99 100" AHDL 101au BufNewFile,BufRead *.tdf setf ahdl 102 103" AMPL 104au BufNewFile,BufRead *.run setf ampl 105 106" Ant 107au BufNewFile,BufRead build.xml setf ant 108 109" Arduino 110au BufNewFile,BufRead *.ino,*.pde setf arduino 111 112" Apache style config file 113au BufNewFile,BufRead proftpd.conf* call s:StarSetf('apachestyle') 114 115" Apache config file 116au BufNewFile,BufRead .htaccess,*/etc/httpd/*.conf setf apache 117 118" XA65 MOS6510 cross assembler 119au BufNewFile,BufRead *.a65 setf a65 120 121" Applescript 122au BufNewFile,BufRead *.scpt setf applescript 123 124" Applix ELF 125au BufNewFile,BufRead *.am 126 \ if expand("<afile>") !~? 'Makefile.am\>' | setf elf | endif 127 128" ALSA configuration 129au BufNewFile,BufRead .asoundrc,*/usr/share/alsa/alsa.conf,*/etc/asound.conf setf alsaconf 130 131" Arc Macro Language 132au BufNewFile,BufRead *.aml setf aml 133 134" APT config file 135au BufNewFile,BufRead apt.conf setf aptconf 136au BufNewFile,BufRead */.aptitude/config setf aptconf 137au BufNewFile,BufRead */etc/apt/apt.conf.d/{[-_[:alnum:]]\+,[-_.[:alnum:]]\+.conf} setf aptconf 138 139" Arch Inventory file 140au BufNewFile,BufRead .arch-inventory,=tagging-method setf arch 141 142" ART*Enterprise (formerly ART-IM) 143au BufNewFile,BufRead *.art setf art 144 145" AsciiDoc 146au BufNewFile,BufRead *.asciidoc,*.adoc setf asciidoc 147 148" ASN.1 149au BufNewFile,BufRead *.asn,*.asn1 setf asn 150 151" Active Server Pages (with Visual Basic Script) 152au BufNewFile,BufRead *.asa 153 \ if exists("g:filetype_asa") | 154 \ exe "setf " . g:filetype_asa | 155 \ else | 156 \ setf aspvbs | 157 \ endif 158 159" Active Server Pages (with Perl or Visual Basic Script) 160au BufNewFile,BufRead *.asp 161 \ if exists("g:filetype_asp") | 162 \ exe "setf " . g:filetype_asp | 163 \ elseif getline(1) . getline(2) . getline(3) =~? "perlscript" | 164 \ setf aspperl | 165 \ else | 166 \ setf aspvbs | 167 \ endif 168 169" Grub (must be before catch *.lst) 170au BufNewFile,BufRead */boot/grub/menu.lst,*/boot/grub/grub.conf,*/etc/grub.conf setf grub 171 172" Assembly (all kinds) 173" *.lst is not pure assembly, it has two extra columns (address, byte codes) 174au BufNewFile,BufRead *.asm,*.[sS],*.[aA],*.mac,*.lst call s:FTasm() 175 176" This function checks for the kind of assembly that is wanted by the user, or 177" can be detected from the first five lines of the file. 178func! s:FTasm() 179 " make sure b:asmsyntax exists 180 if !exists("b:asmsyntax") 181 let b:asmsyntax = "" 182 endif 183 184 if b:asmsyntax == "" 185 call s:FTasmsyntax() 186 endif 187 188 " if b:asmsyntax still isn't set, default to asmsyntax or GNU 189 if b:asmsyntax == "" 190 if exists("g:asmsyntax") 191 let b:asmsyntax = g:asmsyntax 192 else 193 let b:asmsyntax = "asm" 194 endif 195 endif 196 197 exe "setf " . fnameescape(b:asmsyntax) 198endfunc 199 200func! s:FTasmsyntax() 201 " see if file contains any asmsyntax=foo overrides. If so, change 202 " b:asmsyntax appropriately 203 let head = " ".getline(1)." ".getline(2)." ".getline(3)." ".getline(4). 204 \" ".getline(5)." " 205 let match = matchstr(head, '\sasmsyntax=\zs[a-zA-Z0-9]\+\ze\s') 206 if match != '' 207 let b:asmsyntax = match 208 elseif ((head =~? '\.title') || (head =~? '\.ident') || (head =~? '\.macro') || (head =~? '\.subtitle') || (head =~? '\.library')) 209 let b:asmsyntax = "vmasm" 210 endif 211endfunc 212 213" Macro (VAX) 214au BufNewFile,BufRead *.mar setf vmasm 215 216" Atlas 217au BufNewFile,BufRead *.atl,*.as setf atlas 218 219" Autoit v3 220au BufNewFile,BufRead *.au3 setf autoit 221 222" Autohotkey 223au BufNewFile,BufRead *.ahk setf autohotkey 224 225" Automake 226au BufNewFile,BufRead [mM]akefile.am,GNUmakefile.am setf automake 227 228" Autotest .at files are actually m4 229au BufNewFile,BufRead *.at setf m4 230 231" Avenue 232au BufNewFile,BufRead *.ave setf ave 233 234" Awk 235au BufNewFile,BufRead *.awk setf awk 236 237" B 238au BufNewFile,BufRead *.mch,*.ref,*.imp setf b 239 240" BASIC or Visual Basic 241au BufNewFile,BufRead *.bas call s:FTVB("basic") 242 243" Check if one of the first five lines contains "VB_Name". In that case it is 244" probably a Visual Basic file. Otherwise it's assumed to be "alt" filetype. 245func! s:FTVB(alt) 246 if getline(1).getline(2).getline(3).getline(4).getline(5) =~? 'VB_Name\|Begin VB\.\(Form\|MDIForm\|UserControl\)' 247 setf vb 248 else 249 exe "setf " . a:alt 250 endif 251endfunc 252 253" Visual Basic Script (close to Visual Basic) or Visual Basic .NET 254au BufNewFile,BufRead *.vb,*.vbs,*.dsm,*.ctl setf vb 255 256" IBasic file (similar to QBasic) 257au BufNewFile,BufRead *.iba,*.ibi setf ibasic 258 259" FreeBasic file (similar to QBasic) 260au BufNewFile,BufRead *.fb,*.bi setf freebasic 261 262" Batch file for MSDOS. 263au BufNewFile,BufRead *.bat,*.sys setf dosbatch 264" *.cmd is close to a Batch file, but on OS/2 Rexx files also use *.cmd. 265au BufNewFile,BufRead *.cmd 266 \ if getline(1) =~ '^/\*' | setf rexx | else | setf dosbatch | endif 267 268" Batch file for 4DOS 269au BufNewFile,BufRead *.btm call s:FTbtm() 270func! s:FTbtm() 271 if exists("g:dosbatch_syntax_for_btm") && g:dosbatch_syntax_for_btm 272 setf dosbatch 273 else 274 setf btm 275 endif 276endfunc 277 278" BC calculator 279au BufNewFile,BufRead *.bc setf bc 280 281" BDF font 282au BufNewFile,BufRead *.bdf setf bdf 283 284" BibTeX bibliography database file 285au BufNewFile,BufRead *.bib setf bib 286 287" BibTeX Bibliography Style 288au BufNewFile,BufRead *.bst setf bst 289 290" BIND configuration 291au BufNewFile,BufRead named.conf,rndc.conf setf named 292 293" BIND zone 294au BufNewFile,BufRead named.root setf bindzone 295au BufNewFile,BufRead *.db call s:BindzoneCheck('') 296 297func! s:BindzoneCheck(default) 298 if getline(1).getline(2).getline(3).getline(4) =~ '^; <<>> DiG [0-9.]\+ <<>>\|BIND.*named\|$ORIGIN\|$TTL\|IN\s\+SOA' 299 setf bindzone 300 elseif a:default != '' 301 exe 'setf ' . a:default 302 endif 303endfunc 304 305" Blank 306au BufNewFile,BufRead *.bl setf blank 307 308" Blkid cache file 309au BufNewFile,BufRead */etc/blkid.tab,*/etc/blkid.tab.old setf xml 310 311" Bazel (http://bazel.io) 312autocmd BufRead,BufNewFile *.bzl,BUILD,WORKSPACE setfiletype bzl 313 314" C or lpc 315au BufNewFile,BufRead *.c call s:FTlpc() 316 317func! s:FTlpc() 318 if exists("g:lpc_syntax_for_c") 319 let lnum = 1 320 while lnum <= 12 321 if getline(lnum) =~# '^\(//\|inherit\|private\|protected\|nosave\|string\|object\|mapping\|mixed\)' 322 setf lpc 323 return 324 endif 325 let lnum = lnum + 1 326 endwhile 327 endif 328 setf c 329endfunc 330 331" Calendar 332au BufNewFile,BufRead calendar setf calendar 333 334" C# 335au BufNewFile,BufRead *.cs setf cs 336 337" CSDL 338au BufNewFile,BufRead *.csdl setf csdl 339 340" Cabal 341au BufNewFile,BufRead *.cabal setf cabal 342 343" Cdrdao TOC 344au BufNewFile,BufRead *.toc setf cdrtoc 345 346" Cdrdao config 347au BufNewFile,BufRead */etc/cdrdao.conf,*/etc/defaults/cdrdao,*/etc/default/cdrdao,.cdrdao setf cdrdaoconf 348 349" Cfengine 350au BufNewFile,BufRead cfengine.conf setf cfengine 351 352" ChaiScript 353au BufRead,BufNewFile *.chai setf chaiscript 354 355" Comshare Dimension Definition Language 356au BufNewFile,BufRead *.cdl setf cdl 357 358" Conary Recipe 359au BufNewFile,BufRead *.recipe setf conaryrecipe 360 361" Controllable Regex Mutilator 362au BufNewFile,BufRead *.crm setf crm 363 364" Cyn++ 365au BufNewFile,BufRead *.cyn setf cynpp 366 367" Cynlib 368" .cc and .cpp files can be C++ or Cynlib. 369au BufNewFile,BufRead *.cc 370 \ if exists("cynlib_syntax_for_cc")|setf cynlib|else|setf cpp|endif 371au BufNewFile,BufRead *.cpp 372 \ if exists("cynlib_syntax_for_cpp")|setf cynlib|else|setf cpp|endif 373 374" C++ 375au BufNewFile,BufRead *.cxx,*.c++,*.hh,*.hxx,*.hpp,*.ipp,*.moc,*.tcc,*.inl setf cpp 376if has("fname_case") 377 au BufNewFile,BufRead *.C,*.H setf cpp 378endif 379 380" .h files can be C, Ch C++, ObjC or ObjC++. 381" Set c_syntax_for_h if you want C, ch_syntax_for_h if you want Ch. ObjC is 382" detected automatically. 383au BufNewFile,BufRead *.h call s:FTheader() 384 385func! s:FTheader() 386 if match(getline(1, min([line("$"), 200])), '^@\(interface\|end\|class\)') > -1 387 if exists("g:c_syntax_for_h") 388 setf objc 389 else 390 setf objcpp 391 endif 392 elseif exists("g:c_syntax_for_h") 393 setf c 394 elseif exists("g:ch_syntax_for_h") 395 setf ch 396 else 397 setf cpp 398 endif 399endfunc 400 401" Ch (CHscript) 402au BufNewFile,BufRead *.chf setf ch 403 404" TLH files are C++ headers generated by Visual C++'s #import from typelibs 405au BufNewFile,BufRead *.tlh setf cpp 406 407" Cascading Style Sheets 408au BufNewFile,BufRead *.css setf css 409 410" Century Term Command Scripts (*.cmd too) 411au BufNewFile,BufRead *.con setf cterm 412 413" Changelog 414au BufNewFile,BufRead changelog.Debian,changelog.dch,NEWS.Debian,NEWS.dch 415 \ setf debchangelog 416 417au BufNewFile,BufRead [cC]hange[lL]og 418 \ if getline(1) =~ '; urgency=' 419 \| setf debchangelog 420 \| else 421 \| setf changelog 422 \| endif 423 424au BufNewFile,BufRead NEWS 425 \ if getline(1) =~ '; urgency=' 426 \| setf debchangelog 427 \| endif 428 429" CHILL 430au BufNewFile,BufRead *..ch setf chill 431 432" Changes for WEB and CWEB or CHILL 433au BufNewFile,BufRead *.ch call s:FTchange() 434 435" This function checks if one of the first ten lines start with a '@'. In 436" that case it is probably a change file. 437" If the first line starts with # or ! it's probably a ch file. 438" If a line has "main", "include", "//" ir "/*" it's probably ch. 439" Otherwise CHILL is assumed. 440func! s:FTchange() 441 let lnum = 1 442 while lnum <= 10 443 if getline(lnum)[0] == '@' 444 setf change 445 return 446 endif 447 if lnum == 1 && (getline(1)[0] == '#' || getline(1)[0] == '!') 448 setf ch 449 return 450 endif 451 if getline(lnum) =~ "MODULE" 452 setf chill 453 return 454 endif 455 if getline(lnum) =~ 'main\s*(\|#\s*include\|//' 456 setf ch 457 return 458 endif 459 let lnum = lnum + 1 460 endwhile 461 setf chill 462endfunc 463 464" ChordPro 465au BufNewFile,BufRead *.chopro,*.crd,*.cho,*.crdpro,*.chordpro setf chordpro 466 467" Clean 468au BufNewFile,BufRead *.dcl,*.icl setf clean 469 470" Clever 471au BufNewFile,BufRead *.eni setf cl 472 473" Clever or dtd 474au BufNewFile,BufRead *.ent call s:FTent() 475 476func! s:FTent() 477 " This function checks for valid cl syntax in the first five lines. 478 " Look for either an opening comment, '#', or a block start, '{". 479 " If not found, assume SGML. 480 let lnum = 1 481 while lnum < 6 482 let line = getline(lnum) 483 if line =~ '^\s*[#{]' 484 setf cl 485 return 486 elseif line !~ '^\s*$' 487 " Not a blank line, not a comment, and not a block start, 488 " so doesn't look like valid cl code. 489 break 490 endif 491 let lnum = lnum + 1 492 endw 493 setf dtd 494endfunc 495 496" Clipper (or FoxPro; could also be eviews) 497au BufNewFile,BufRead *.prg 498 \ if exists("g:filetype_prg") | 499 \ exe "setf " . g:filetype_prg | 500 \ else | 501 \ setf clipper | 502 \ endif 503 504" Clojure 505au BufNewFile,BufRead *.clj,*.cljs,*.cljx,*.cljc setf clojure 506 507" Cmake 508au BufNewFile,BufRead CMakeLists.txt,*.cmake,*.cmake.in setf cmake 509 510" Cmusrc 511au BufNewFile,BufRead */.cmus/{autosave,rc,command-history,*.theme} setf cmusrc 512au BufNewFile,BufRead */cmus/{rc,*.theme} setf cmusrc 513 514" Cobol 515au BufNewFile,BufRead *.cbl,*.cob,*.lib setf cobol 516" cobol or zope form controller python script? (heuristic) 517au BufNewFile,BufRead *.cpy 518 \ if getline(1) =~ '^##' | 519 \ setf python | 520 \ else | 521 \ setf cobol | 522 \ endif 523 524" Coco/R 525au BufNewFile,BufRead *.atg setf coco 526 527" Cold Fusion 528au BufNewFile,BufRead *.cfm,*.cfi,*.cfc setf cf 529 530" Configure scripts 531au BufNewFile,BufRead configure.in,configure.ac setf config 532 533" CUDA Cumpute Unified Device Architecture 534au BufNewFile,BufRead *.cu setf cuda 535 536" Dockerfile 537au BufNewFile,BufRead Dockerfile setf dockerfile 538 539" WildPackets EtherPeek Decoder 540au BufNewFile,BufRead *.dcd setf dcd 541 542" Enlightenment configuration files 543au BufNewFile,BufRead *enlightenment/*.cfg setf c 544 545" Eterm 546au BufNewFile,BufRead *Eterm/*.cfg setf eterm 547 548" Euphoria 3 or 4 549au BufNewFile,BufRead *.eu,*.ew,*.ex,*.exu,*.exw call s:EuphoriaCheck() 550if has("fname_case") 551 au BufNewFile,BufRead *.EU,*.EW,*.EX,*.EXU,*.EXW call s:EuphoriaCheck() 552endif 553 554func! s:EuphoriaCheck() 555 if exists('g:filetype_euphoria') 556 exe 'setf ' . g:filetype_euphoria 557 else 558 setf euphoria3 559 endif 560endfunc 561 562" Lynx config files 563au BufNewFile,BufRead lynx.cfg setf lynx 564 565" Quake 566au BufNewFile,BufRead *baseq[2-3]/*.cfg,*id1/*.cfg setf quake 567au BufNewFile,BufRead *quake[1-3]/*.cfg setf quake 568 569" Quake C 570au BufNewFile,BufRead *.qc setf c 571 572" Configure files 573au BufNewFile,BufRead *.cfg setf cfg 574 575" Cucumber 576au BufNewFile,BufRead *.feature setf cucumber 577 578" Communicating Sequential Processes 579au BufNewFile,BufRead *.csp,*.fdr setf csp 580 581" CUPL logic description and simulation 582au BufNewFile,BufRead *.pld setf cupl 583au BufNewFile,BufRead *.si setf cuplsim 584 585" Debian Control 586au BufNewFile,BufRead */debian/control setf debcontrol 587au BufNewFile,BufRead control 588 \ if getline(1) =~ '^Source:' 589 \| setf debcontrol 590 \| endif 591 592" Debian Sources.list 593au BufNewFile,BufRead */etc/apt/sources.list setf debsources 594au BufNewFile,BufRead */etc/apt/sources.list.d/*.list setf debsources 595 596" Deny hosts 597au BufNewFile,BufRead denyhosts.conf setf denyhosts 598 599" dnsmasq(8) configuration files 600au BufNewFile,BufRead */etc/dnsmasq.conf setf dnsmasq 601 602" ROCKLinux package description 603au BufNewFile,BufRead *.desc setf desc 604 605" the D language or dtrace 606au BufNewFile,BufRead *.d call s:DtraceCheck() 607 608func! s:DtraceCheck() 609 let lines = getline(1, min([line("$"), 100])) 610 if match(lines, '^module\>\|^import\>') > -1 611 " D files often start with a module and/or import statement. 612 setf d 613 elseif match(lines, '^#!\S\+dtrace\|#pragma\s\+D\s\+option\|:\S\{-}:\S\{-}:') > -1 614 setf dtrace 615 else 616 setf d 617 endif 618endfunc 619 620" Desktop files 621au BufNewFile,BufRead *.desktop,.directory setf desktop 622 623" Dict config 624au BufNewFile,BufRead dict.conf,.dictrc setf dictconf 625 626" Dictd config 627au BufNewFile,BufRead dictd.conf setf dictdconf 628 629" Diff files 630au BufNewFile,BufRead *.diff,*.rej,*.patch setf diff 631 632" Dircolors 633au BufNewFile,BufRead .dir_colors,.dircolors,*/etc/DIR_COLORS setf dircolors 634 635" Diva (with Skill) or InstallShield 636au BufNewFile,BufRead *.rul 637 \ if getline(1).getline(2).getline(3).getline(4).getline(5).getline(6) =~? 'InstallShield' | 638 \ setf ishd | 639 \ else | 640 \ setf diva | 641 \ endif 642 643" DCL (Digital Command Language - vms) or DNS zone file 644au BufNewFile,BufRead *.com call s:BindzoneCheck('dcl') 645 646" DOT 647au BufNewFile,BufRead *.dot setf dot 648 649" Dylan - lid files 650au BufNewFile,BufRead *.lid setf dylanlid 651 652" Dylan - intr files (melange) 653au BufNewFile,BufRead *.intr setf dylanintr 654 655" Dylan 656au BufNewFile,BufRead *.dylan setf dylan 657 658" Microsoft Module Definition 659au BufNewFile,BufRead *.def setf def 660 661" Dracula 662au BufNewFile,BufRead *.drac,*.drc,*lvs,*lpe setf dracula 663 664" Datascript 665au BufNewFile,BufRead *.ds setf datascript 666 667" dsl 668au BufNewFile,BufRead *.dsl setf dsl 669 670" DTD (Document Type Definition for XML) 671au BufNewFile,BufRead *.dtd setf dtd 672 673" DTS/DSTI (device tree files) 674au BufNewFile,BufRead *.dts,*.dtsi setf dts 675 676" EDIF (*.edf,*.edif,*.edn,*.edo) 677au BufNewFile,BufRead *.ed\(f\|if\|n\|o\) setf edif 678 679" Embedix Component Description 680au BufNewFile,BufRead *.ecd setf ecd 681 682" Eiffel or Specman or Euphoria 683au BufNewFile,BufRead *.e,*.E call s:FTe() 684 685" Elinks configuration 686au BufNewFile,BufRead */etc/elinks.conf,*/.elinks/elinks.conf setf elinks 687 688func! s:FTe() 689 if exists('g:filetype_euphoria') 690 exe 'setf ' . g:filetype_euphoria 691 else 692 let n = 1 693 while n < 100 && n < line("$") 694 if getline(n) =~ "^\\s*\\(<'\\|'>\\)\\s*$" 695 setf specman 696 return 697 endif 698 let n = n + 1 699 endwhile 700 setf eiffel 701 endif 702endfunc 703 704" ERicsson LANGuage; Yaws is erlang too 705au BufNewFile,BufRead *.erl,*.hrl,*.yaws setf erlang 706 707" Elm Filter Rules file 708au BufNewFile,BufRead filter-rules setf elmfilt 709 710" ESMTP rc file 711au BufNewFile,BufRead *esmtprc setf esmtprc 712 713" ESQL-C 714au BufNewFile,BufRead *.ec,*.EC setf esqlc 715 716" Esterel 717au BufNewFile,BufRead *.strl setf esterel 718 719" Essbase script 720au BufNewFile,BufRead *.csc setf csc 721 722" Exim 723au BufNewFile,BufRead exim.conf setf exim 724 725" Expect 726au BufNewFile,BufRead *.exp setf expect 727 728" Exports 729au BufNewFile,BufRead exports setf exports 730 731" Falcon 732au BufNewFile,BufRead *.fal setf falcon 733 734" Fantom 735au BufNewFile,BufRead *.fan,*.fwt setf fan 736 737" Factor 738au BufNewFile,BufRead *.factor setf factor 739 740" Fetchmail RC file 741au BufNewFile,BufRead .fetchmailrc setf fetchmail 742 743" FlexWiki - disabled, because it has side effects when a .wiki file 744" is not actually FlexWiki 745"au BufNewFile,BufRead *.wiki setf flexwiki 746 747" Focus Executable 748au BufNewFile,BufRead *.fex,*.focexec setf focexec 749 750" Focus Master file (but not for auto.master) 751au BufNewFile,BufRead auto.master setf conf 752au BufNewFile,BufRead *.mas,*.master setf master 753 754" Forth 755au BufNewFile,BufRead *.fs,*.ft setf forth 756 757" Reva Forth 758au BufNewFile,BufRead *.frt setf reva 759 760" Fortran 761if has("fname_case") 762 au BufNewFile,BufRead *.F,*.FOR,*.FPP,*.FTN,*.F77,*.F90,*.F95,*.F03,*.F08 setf fortran 763endif 764au BufNewFile,BufRead *.f,*.for,*.fortran,*.fpp,*.ftn,*.f77,*.f90,*.f95,*.f03,*.f08 setf fortran 765 766" Framescript 767au BufNewFile,BufRead *.fsl setf framescript 768 769" FStab 770au BufNewFile,BufRead fstab,mtab setf fstab 771 772" GDB command files 773au BufNewFile,BufRead .gdbinit setf gdb 774 775" GDMO 776au BufNewFile,BufRead *.mo,*.gdmo setf gdmo 777 778" Gedcom 779au BufNewFile,BufRead *.ged,lltxxxxx.txt setf gedcom 780 781" Git 782au BufNewFile,BufRead COMMIT_EDITMSG setf gitcommit 783au BufNewFile,BufRead MERGE_MSG setf gitcommit 784au BufNewFile,BufRead *.git/config,.gitconfig,.gitmodules setf gitconfig 785au BufNewFile,BufRead *.git/modules/*/config setf gitconfig 786au BufNewFile,BufRead */.config/git/config setf gitconfig 787if !empty($XDG_CONFIG_HOME) 788 au BufNewFile,BufRead $XDG_CONFIG_HOME/git/config setf gitconfig 789endif 790au BufNewFile,BufRead git-rebase-todo setf gitrebase 791au BufNewFile,BufRead .msg.[0-9]* 792 \ if getline(1) =~ '^From.*# This line is ignored.$' | 793 \ setf gitsendemail | 794 \ endif 795au BufNewFile,BufRead *.git/* 796 \ if getline(1) =~ '^\x\{40\}\>\|^ref: ' | 797 \ setf git | 798 \ endif 799 800" Gkrellmrc 801au BufNewFile,BufRead gkrellmrc,gkrellmrc_? setf gkrellmrc 802 803" GP scripts (2.0 and onward) 804au BufNewFile,BufRead *.gp,.gprc setf gp 805 806" GPG 807au BufNewFile,BufRead */.gnupg/options setf gpg 808au BufNewFile,BufRead */.gnupg/gpg.conf setf gpg 809au BufNewFile,BufRead */usr/*/gnupg/options.skel setf gpg 810 811" gnash(1) configuration files 812au BufNewFile,BufRead gnashrc,.gnashrc,gnashpluginrc,.gnashpluginrc setf gnash 813 814" Gitolite 815au BufNewFile,BufRead gitolite.conf setf gitolite 816au BufNewFile,BufRead */gitolite-admin/conf/* call s:StarSetf('gitolite') 817au BufNewFile,BufRead {,.}gitolite.rc,example.gitolite.rc setf perl 818 819" Gnuplot scripts 820au BufNewFile,BufRead *.gpi setf gnuplot 821 822" Go (Google) 823au BufNewFile,BufRead *.go setf go 824 825" GrADS scripts 826au BufNewFile,BufRead *.gs setf grads 827 828" Gretl 829au BufNewFile,BufRead *.gretl setf gretl 830 831" Groovy 832au BufNewFile,BufRead *.gradle,*.groovy setf groovy 833 834" GNU Server Pages 835au BufNewFile,BufRead *.gsp setf gsp 836 837" Group file 838au BufNewFile,BufRead */etc/group,*/etc/group-,*/etc/group.edit,*/etc/gshadow,*/etc/gshadow-,*/etc/gshadow.edit,*/var/backups/group.bak,*/var/backups/gshadow.bak setf group 839 840" GTK RC 841au BufNewFile,BufRead .gtkrc,gtkrc setf gtkrc 842 843" Haml 844au BufNewFile,BufRead *.haml setf haml 845 846" Hamster Classic | Playground files 847au BufNewFile,BufRead *.hsc,*.hsm setf hamster 848 849" Haskell 850au BufNewFile,BufRead *.hs,*.hs-boot setf haskell 851au BufNewFile,BufRead *.lhs setf lhaskell 852au BufNewFile,BufRead *.chs setf chaskell 853 854" Haste 855au BufNewFile,BufRead *.ht setf haste 856au BufNewFile,BufRead *.htpp setf hastepreproc 857 858" Hercules 859au BufNewFile,BufRead *.vc,*.ev,*.rs,*.sum,*.errsum setf hercules 860 861" HEX (Intel) 862au BufNewFile,BufRead *.hex,*.h32 setf hex 863 864" Tilde (must be before HTML) 865au BufNewFile,BufRead *.t.html setf tilde 866 867" HTML (.shtml and .stm for server side) 868au BufNewFile,BufRead *.html,*.htm,*.shtml,*.stm call s:FThtml() 869 870" Distinguish between HTML, XHTML and Django 871func! s:FThtml() 872 let n = 1 873 while n < 10 && n < line("$") 874 if getline(n) =~ '\<DTD\s\+XHTML\s' 875 setf xhtml 876 return 877 endif 878 if getline(n) =~ '{%\s*\(extends\|block\|load\)\>\|{#\s\+' 879 setf htmldjango 880 return 881 endif 882 let n = n + 1 883 endwhile 884 setf html 885endfunc 886 887" HTML with Ruby - eRuby 888au BufNewFile,BufRead *.erb,*.rhtml setf eruby 889 890" HTML with M4 891au BufNewFile,BufRead *.html.m4 setf htmlm4 892 893" HTML Cheetah template 894au BufNewFile,BufRead *.tmpl setf htmlcheetah 895 896" Host config 897au BufNewFile,BufRead */etc/host.conf setf hostconf 898 899" Hosts access 900au BufNewFile,BufRead */etc/hosts.allow,*/etc/hosts.deny setf hostsaccess 901 902" Hyper Builder 903au BufNewFile,BufRead *.hb setf hb 904 905" Httest 906au BufNewFile,BufRead *.htt,*.htb setf httest 907 908" Icon 909au BufNewFile,BufRead *.icn setf icon 910 911" IDL (Interface Description Language) 912au BufNewFile,BufRead *.idl call s:FTidl() 913 914" Distinguish between standard IDL and MS-IDL 915func! s:FTidl() 916 let n = 1 917 while n < 50 && n < line("$") 918 if getline(n) =~ '^\s*import\s\+"\(unknwn\|objidl\)\.idl"' 919 setf msidl 920 return 921 endif 922 let n = n + 1 923 endwhile 924 setf idl 925endfunc 926 927" Microsoft IDL (Interface Description Language) Also *.idl 928" MOF = WMI (Windows Management Instrumentation) Managed Object Format 929au BufNewFile,BufRead *.odl,*.mof setf msidl 930 931" Icewm menu 932au BufNewFile,BufRead */.icewm/menu setf icemenu 933 934" Indent profile (must come before IDL *.pro!) 935au BufNewFile,BufRead .indent.pro setf indent 936au BufNewFile,BufRead indent.pro call s:ProtoCheck('indent') 937 938" IDL (Interactive Data Language) 939au BufNewFile,BufRead *.pro call s:ProtoCheck('idlang') 940 941" Distinguish between "default" and Cproto prototype file. */ 942func! s:ProtoCheck(default) 943 " Cproto files have a comment in the first line and a function prototype in 944 " the second line, it always ends in ";". Indent files may also have 945 " comments, thus we can't match comments to see the difference. 946 " IDL files can have a single ';' in the second line, require at least one 947 " chacter before the ';'. 948 if getline(2) =~ '.;$' 949 setf cpp 950 else 951 exe 'setf ' . a:default 952 endif 953endfunc 954 955 956" Indent RC 957au BufNewFile,BufRead indentrc setf indent 958 959" Inform 960au BufNewFile,BufRead *.inf,*.INF setf inform 961 962" Initng 963au BufNewFile,BufRead */etc/initng/*/*.i,*.ii setf initng 964 965" Innovation Data Processing 966au BufRead,BufNewFile upstream.dat\c,upstream.*.dat\c,*.upstream.dat\c setf upstreamdat 967au BufRead,BufNewFile upstream.log\c,upstream.*.log\c,*.upstream.log\c setf upstreamlog 968au BufRead,BufNewFile upstreaminstall.log\c,upstreaminstall.*.log\c,*.upstreaminstall.log\c setf upstreaminstalllog 969au BufRead,BufNewFile usserver.log\c,usserver.*.log\c,*.usserver.log\c setf usserverlog 970au BufRead,BufNewFile usw2kagt.log\c,usw2kagt.*.log\c,*.usw2kagt.log\c setf usw2kagtlog 971 972" Ipfilter 973au BufNewFile,BufRead ipf.conf,ipf6.conf,ipf.rules setf ipfilter 974 975" Informix 4GL (source - canonical, include file, I4GL+M4 preproc.) 976au BufNewFile,BufRead *.4gl,*.4gh,*.m4gl setf fgl 977 978" .INI file for MSDOS 979au BufNewFile,BufRead *.ini setf dosini 980 981" SysV Inittab 982au BufNewFile,BufRead inittab setf inittab 983 984" Inno Setup 985au BufNewFile,BufRead *.iss setf iss 986 987" J 988au BufNewFile,BufRead *.ijs setf j 989 990" JAL 991au BufNewFile,BufRead *.jal,*.JAL setf jal 992 993" Jam 994au BufNewFile,BufRead *.jpl,*.jpr setf jam 995 996" Java 997au BufNewFile,BufRead *.java,*.jav setf java 998 999" JavaCC 1000au BufNewFile,BufRead *.jj,*.jjt setf javacc 1001 1002" JavaScript, ECMAScript 1003au BufNewFile,BufRead *.js,*.javascript,*.es,*.jsx setf javascript 1004 1005" Java Server Pages 1006au BufNewFile,BufRead *.jsp setf jsp 1007 1008" Java Properties resource file (note: doesn't catch font.properties.pl) 1009au BufNewFile,BufRead *.properties,*.properties_??,*.properties_??_?? setf jproperties 1010au BufNewFile,BufRead *.properties_??_??_* call s:StarSetf('jproperties') 1011 1012" Jess 1013au BufNewFile,BufRead *.clp setf jess 1014 1015" Jgraph 1016au BufNewFile,BufRead *.jgr setf jgraph 1017 1018" Jovial 1019au BufNewFile,BufRead *.jov,*.j73,*.jovial setf jovial 1020 1021" JSON 1022au BufNewFile,BufRead *.json,*.jsonp setf json 1023 1024" Kixtart 1025au BufNewFile,BufRead *.kix setf kix 1026 1027" Kimwitu[++] 1028au BufNewFile,BufRead *.k setf kwt 1029 1030" Kivy 1031au BufNewFile,BufRead *.kv setf kivy 1032 1033" KDE script 1034au BufNewFile,BufRead *.ks setf kscript 1035 1036" Kconfig 1037au BufNewFile,BufRead Kconfig,Kconfig.debug setf kconfig 1038 1039" Lace (ISE) 1040au BufNewFile,BufRead *.ace,*.ACE setf lace 1041 1042" Latte 1043au BufNewFile,BufRead *.latte,*.lte setf latte 1044 1045" Limits 1046au BufNewFile,BufRead */etc/limits,*/etc/*limits.conf,*/etc/*limits.d/*.conf setf limits 1047 1048" LambdaProlog (*.mod too, see Modsim) 1049au BufNewFile,BufRead *.sig setf lprolog 1050 1051" LDAP LDIF 1052au BufNewFile,BufRead *.ldif setf ldif 1053 1054" Ld loader 1055au BufNewFile,BufRead *.ld setf ld 1056 1057" Less 1058au BufNewFile,BufRead *.less setf less 1059 1060" Lex 1061au BufNewFile,BufRead *.lex,*.l,*.lxx,*.l++ setf lex 1062 1063" Libao 1064au BufNewFile,BufRead */etc/libao.conf,*/.libao setf libao 1065 1066" Libsensors 1067au BufNewFile,BufRead */etc/sensors.conf,*/etc/sensors3.conf setf sensors 1068 1069" LFTP 1070au BufNewFile,BufRead lftp.conf,.lftprc,*lftp/rc setf lftp 1071 1072" Lifelines (or Lex for C++!) 1073au BufNewFile,BufRead *.ll setf lifelines 1074 1075" Lilo: Linux loader 1076au BufNewFile,BufRead lilo.conf setf lilo 1077 1078" Lisp (*.el = ELisp, *.cl = Common Lisp, *.jl = librep Lisp) 1079if has("fname_case") 1080 au BufNewFile,BufRead *.lsp,*.lisp,*.el,*.cl,*.jl,*.L,.emacs,.sawfishrc setf lisp 1081else 1082 au BufNewFile,BufRead *.lsp,*.lisp,*.el,*.cl,*.jl,.emacs,.sawfishrc setf lisp 1083endif 1084 1085" SBCL implementation of Common Lisp 1086au BufNewFile,BufRead sbclrc,.sbclrc setf lisp 1087 1088" Liquid 1089au BufNewFile,BufRead *.liquid setf liquid 1090 1091" Lite 1092au BufNewFile,BufRead *.lite,*.lt setf lite 1093 1094" LiteStep RC files 1095au BufNewFile,BufRead */LiteStep/*/*.rc setf litestep 1096 1097" Login access 1098au BufNewFile,BufRead */etc/login.access setf loginaccess 1099 1100" Login defs 1101au BufNewFile,BufRead */etc/login.defs setf logindefs 1102 1103" Logtalk 1104au BufNewFile,BufRead *.lgt setf logtalk 1105 1106" LOTOS 1107au BufNewFile,BufRead *.lot,*.lotos setf lotos 1108 1109" Lout (also: *.lt) 1110au BufNewFile,BufRead *.lou,*.lout setf lout 1111 1112" Lua 1113au BufNewFile,BufRead *.lua setf lua 1114 1115" Luarocks 1116au BufNewFile,BufRead *.rockspec setf lua 1117 1118" Linden Scripting Language (Second Life) 1119au BufNewFile,BufRead *.lsl setf lsl 1120 1121" Lynx style file (or LotusScript!) 1122au BufNewFile,BufRead *.lss setf lss 1123 1124" M4 1125au BufNewFile,BufRead *.m4 1126 \ if expand("<afile>") !~? 'html.m4$\|fvwm2rc' | setf m4 | endif 1127 1128" MaGic Point 1129au BufNewFile,BufRead *.mgp setf mgp 1130 1131" Mail (for Elm, trn, mutt, muttng, rn, slrn) 1132au BufNewFile,BufRead snd.\d\+,.letter,.letter.\d\+,.followup,.article,.article.\d\+,pico.\d\+,mutt{ng,}-*-\w\+,mutt[[:alnum:]_-]\\\{6\},ae\d\+.txt,/tmp/SLRN[0-9A-Z.]\+,*.eml setf mail 1133 1134" Mail aliases 1135au BufNewFile,BufRead */etc/mail/aliases,*/etc/aliases setf mailaliases 1136 1137" Mailcap configuration file 1138au BufNewFile,BufRead .mailcap,mailcap setf mailcap 1139 1140" Makefile 1141au BufNewFile,BufRead *[mM]akefile,*.mk,*.mak,*.dsp setf make 1142 1143" MakeIndex 1144au BufNewFile,BufRead *.ist,*.mst setf ist 1145 1146" Mallard 1147au BufNewFile,BufRead *.page setf mallard 1148 1149" Manpage 1150au BufNewFile,BufRead *.man setf man 1151 1152" Man config 1153au BufNewFile,BufRead */etc/man.conf,man.config setf manconf 1154 1155" Maple V 1156au BufNewFile,BufRead *.mv,*.mpl,*.mws setf maple 1157 1158" Map (UMN mapserver config file) 1159au BufNewFile,BufRead *.map setf map 1160 1161" Markdown 1162au BufNewFile,BufRead *.markdown,*.mdown,*.mkd,*.mkdn,*.mdwn,*.md setf markdown 1163 1164" Mason 1165au BufNewFile,BufRead *.mason,*.mhtml,*.comp setf mason 1166 1167" Matlab or Objective C 1168au BufNewFile,BufRead *.m call s:FTm() 1169 1170func! s:FTm() 1171 let n = 1 1172 while n < 10 1173 let line = getline(n) 1174 if line =~ '^\s*\(#\s*\(include\|import\)\>\|@import\>\|/\*\|//\)' 1175 setf objc 1176 return 1177 endif 1178 if line =~ '^\s*%' 1179 setf matlab 1180 return 1181 endif 1182 if line =~ '^\s*(\*' 1183 setf mma 1184 return 1185 endif 1186 let n = n + 1 1187 endwhile 1188 if exists("g:filetype_m") 1189 exe "setf " . g:filetype_m 1190 else 1191 setf matlab 1192 endif 1193endfunc 1194 1195" Mathematica notebook 1196au BufNewFile,BufRead *.nb setf mma 1197 1198" Maya Extension Language 1199au BufNewFile,BufRead *.mel setf mel 1200 1201" Mercurial (hg) commit file 1202au BufNewFile,BufRead hg-editor-*.txt setf hgcommit 1203 1204" Mercurial config (looks like generic config file) 1205au BufNewFile,BufRead *.hgrc,*hgrc setf cfg 1206 1207" Messages (logs mostly) 1208au BufNewFile,BufRead */log/{auth,cron,daemon,debug,kern,lpr,mail,messages,news/news,syslog,user}{,.log,.err,.info,.warn,.crit,.notice}{,.[0-9]*,-[0-9]*} setf messages 1209 1210" Metafont 1211au BufNewFile,BufRead *.mf setf mf 1212 1213" MetaPost 1214au BufNewFile,BufRead *.mp setf mp 1215 1216" MGL 1217au BufNewFile,BufRead *.mgl setf mgl 1218 1219" MIX - Knuth assembly 1220au BufNewFile,BufRead *.mix,*.mixal setf mix 1221 1222" MMIX or VMS makefile 1223au BufNewFile,BufRead *.mms call s:FTmms() 1224 1225" Symbian meta-makefile definition (MMP) 1226au BufNewFile,BufRead *.mmp setf mmp 1227 1228func! s:FTmms() 1229 let n = 1 1230 while n < 10 1231 let line = getline(n) 1232 if line =~ '^\s*\(%\|//\)' || line =~ '^\*' 1233 setf mmix 1234 return 1235 endif 1236 if line =~ '^\s*#' 1237 setf make 1238 return 1239 endif 1240 let n = n + 1 1241 endwhile 1242 setf mmix 1243endfunc 1244 1245 1246" Modsim III (or LambdaProlog) 1247au BufNewFile,BufRead *.mod 1248 \ if getline(1) =~ '\<module\>' | 1249 \ setf lprolog | 1250 \ else | 1251 \ setf modsim3 | 1252 \ endif 1253 1254" Modula 2 (.md removed in favor of Markdown) 1255au BufNewFile,BufRead *.m2,*.DEF,*.MOD,*.mi setf modula2 1256 1257" Modula 3 (.m3, .i3, .mg, .ig) 1258au BufNewFile,BufRead *.[mi][3g] setf modula3 1259 1260" Monk 1261au BufNewFile,BufRead *.isc,*.monk,*.ssc,*.tsc setf monk 1262 1263" MOO 1264au BufNewFile,BufRead *.moo setf moo 1265 1266" Modconf 1267au BufNewFile,BufRead */etc/modules.conf,*/etc/modules,*/etc/conf.modules setf modconf 1268 1269" Mplayer config 1270au BufNewFile,BufRead mplayer.conf,*/.mplayer/config setf mplayerconf 1271 1272" Motorola S record 1273au BufNewFile,BufRead *.s19,*.s28,*.s37,*.mot,*.srec setf srec 1274 1275" Mrxvtrc 1276au BufNewFile,BufRead mrxvtrc,.mrxvtrc setf mrxvtrc 1277 1278" Msql 1279au BufNewFile,BufRead *.msql setf msql 1280 1281" Mysql 1282au BufNewFile,BufRead *.mysql setf mysql 1283 1284" Mutt setup files (must be before catch *.rc) 1285au BufNewFile,BufRead */etc/Muttrc.d/* call s:StarSetf('muttrc') 1286 1287" M$ Resource files 1288au BufNewFile,BufRead *.rc,*.rch setf rc 1289 1290" MuPAD source 1291au BufRead,BufNewFile *.mu setf mupad 1292 1293" Mush 1294au BufNewFile,BufRead *.mush setf mush 1295 1296" Mutt setup file (also for Muttng) 1297au BufNewFile,BufRead Mutt{ng,}rc setf muttrc 1298 1299" Nano 1300au BufNewFile,BufRead */etc/nanorc,*.nanorc setf nanorc 1301 1302" Nastran input/DMAP 1303"au BufNewFile,BufRead *.dat setf nastran 1304 1305" Natural 1306au BufNewFile,BufRead *.NS[ACGLMNPS] setf natural 1307 1308" Netrc 1309au BufNewFile,BufRead .netrc setf netrc 1310 1311" Ninja file 1312au BufNewFile,BufRead *.ninja setf ninja 1313 1314" Novell netware batch files 1315au BufNewFile,BufRead *.ncf setf ncf 1316 1317" Nroff/Troff (*.ms and *.t are checked below) 1318au BufNewFile,BufRead *.me 1319 \ if expand("<afile>") != "read.me" && expand("<afile>") != "click.me" | 1320 \ setf nroff | 1321 \ endif 1322au BufNewFile,BufRead *.tr,*.nr,*.roff,*.tmac,*.mom setf nroff 1323au BufNewFile,BufRead *.[1-9] call s:FTnroff() 1324 1325" This function checks if one of the first five lines start with a dot. In 1326" that case it is probably an nroff file: 'filetype' is set and 1 is returned. 1327func! s:FTnroff() 1328 if getline(1)[0] . getline(2)[0] . getline(3)[0] . getline(4)[0] . getline(5)[0] =~ '\.' 1329 setf nroff 1330 return 1 1331 endif 1332 return 0 1333endfunc 1334 1335" Nroff or Objective C++ 1336au BufNewFile,BufRead *.mm call s:FTmm() 1337 1338func! s:FTmm() 1339 let n = 1 1340 while n < 10 1341 let line = getline(n) 1342 if line =~ '^\s*\(#\s*\(include\|import\)\>\|@import\>\|/\*\)' 1343 setf objcpp 1344 return 1345 endif 1346 let n = n + 1 1347 endwhile 1348 setf nroff 1349endfunc 1350 1351" Not Quite C 1352au BufNewFile,BufRead *.nqc setf nqc 1353 1354" NSIS 1355au BufNewFile,BufRead *.nsi,*.nsh setf nsis 1356 1357" OCAML 1358au BufNewFile,BufRead *.ml,*.mli,*.mll,*.mly,.ocamlinit setf ocaml 1359 1360" Occam 1361au BufNewFile,BufRead *.occ setf occam 1362 1363" Omnimark 1364au BufNewFile,BufRead *.xom,*.xin setf omnimark 1365 1366" OpenROAD 1367au BufNewFile,BufRead *.or setf openroad 1368 1369" OPL 1370au BufNewFile,BufRead *.[Oo][Pp][Ll] setf opl 1371 1372" Oracle config file 1373au BufNewFile,BufRead *.ora setf ora 1374 1375" Packet filter conf 1376au BufNewFile,BufRead pf.conf setf pf 1377 1378" Pam conf 1379au BufNewFile,BufRead */etc/pam.conf setf pamconf 1380 1381" PApp 1382au BufNewFile,BufRead *.papp,*.pxml,*.pxsl setf papp 1383 1384" Password file 1385au BufNewFile,BufRead */etc/passwd,*/etc/passwd-,*/etc/passwd.edit,*/etc/shadow,*/etc/shadow-,*/etc/shadow.edit,*/var/backups/passwd.bak,*/var/backups/shadow.bak setf passwd 1386 1387" Pascal (also *.p) 1388au BufNewFile,BufRead *.pas setf pascal 1389 1390" Delphi project file 1391au BufNewFile,BufRead *.dpr setf pascal 1392 1393" PDF 1394au BufNewFile,BufRead *.pdf setf pdf 1395 1396" Perl 1397if has("fname_case") 1398 au BufNewFile,BufRead *.pl,*.PL call s:FTpl() 1399else 1400 au BufNewFile,BufRead *.pl call s:FTpl() 1401endif 1402au BufNewFile,BufRead *.plx,*.al setf perl 1403au BufNewFile,BufRead *.p6,*.pm6,*.pl6 setf perl6 1404 1405func! s:FTpl() 1406 if exists("g:filetype_pl") 1407 exe "setf " . g:filetype_pl 1408 else 1409 " recognize Prolog by specific text in the first non-empty line 1410 " require a blank after the '%' because Perl uses "%list" and "%translate" 1411 let l = getline(nextnonblank(1)) 1412 if l =~ '\<prolog\>' || l =~ '^\s*\(%\+\(\s\|$\)\|/\*\)' || l =~ ':-' 1413 setf prolog 1414 else 1415 setf perl 1416 endif 1417 endif 1418endfunc 1419 1420" Perl, XPM or XPM2 1421au BufNewFile,BufRead *.pm 1422 \ if getline(1) =~ "XPM2" | 1423 \ setf xpm2 | 1424 \ elseif getline(1) =~ "XPM" | 1425 \ setf xpm | 1426 \ else | 1427 \ setf perl | 1428 \ endif 1429 1430" Perl POD 1431au BufNewFile,BufRead *.pod setf pod 1432au BufNewFile,BufRead *.pod6 setf pod6 1433 1434" Php, php3, php4, etc. 1435" Also Phtml (was used for PHP 2 in the past) 1436" Also .ctp for Cake template file 1437au BufNewFile,BufRead *.php,*.php\d,*.phtml,*.ctp setf php 1438 1439" Pike 1440au BufNewFile,BufRead *.pike,*.lpc,*.ulpc,*.pmod setf pike 1441 1442" Pinfo config 1443au BufNewFile,BufRead */etc/pinforc,*/.pinforc setf pinfo 1444 1445" Palm Resource compiler 1446au BufNewFile,BufRead *.rcp setf pilrc 1447 1448" Pine config 1449au BufNewFile,BufRead .pinerc,pinerc,.pinercex,pinercex setf pine 1450 1451" PL/1, PL/I 1452au BufNewFile,BufRead *.pli,*.pl1 setf pli 1453 1454" PL/M (also: *.inp) 1455au BufNewFile,BufRead *.plm,*.p36,*.pac setf plm 1456 1457" PL/SQL 1458au BufNewFile,BufRead *.pls,*.plsql setf plsql 1459 1460" PLP 1461au BufNewFile,BufRead *.plp setf plp 1462 1463" PO and PO template (GNU gettext) 1464au BufNewFile,BufRead *.po,*.pot setf po 1465 1466" Postfix main config 1467au BufNewFile,BufRead main.cf setf pfmain 1468 1469" PostScript (+ font files, encapsulated PostScript, Adobe Illustrator) 1470au BufNewFile,BufRead *.ps,*.pfa,*.afm,*.eps,*.epsf,*.epsi,*.ai setf postscr 1471 1472" PostScript Printer Description 1473au BufNewFile,BufRead *.ppd setf ppd 1474 1475" Povray 1476au BufNewFile,BufRead *.pov setf pov 1477 1478" Povray configuration 1479au BufNewFile,BufRead .povrayrc setf povini 1480 1481" Povray, PHP or assembly 1482au BufNewFile,BufRead *.inc call s:FTinc() 1483 1484func! s:FTinc() 1485 if exists("g:filetype_inc") 1486 exe "setf " . g:filetype_inc 1487 else 1488 let lines = getline(1).getline(2).getline(3) 1489 if lines =~? "perlscript" 1490 setf aspperl 1491 elseif lines =~ "<%" 1492 setf aspvbs 1493 elseif lines =~ "<?" 1494 setf php 1495 else 1496 call s:FTasmsyntax() 1497 if exists("b:asmsyntax") 1498 exe "setf " . fnameescape(b:asmsyntax) 1499 else 1500 setf pov 1501 endif 1502 endif 1503 endif 1504endfunc 1505 1506" Printcap and Termcap 1507au BufNewFile,BufRead *printcap 1508 \ let b:ptcap_type = "print" | setf ptcap 1509au BufNewFile,BufRead *termcap 1510 \ let b:ptcap_type = "term" | setf ptcap 1511 1512" PCCTS / ANTRL 1513"au BufNewFile,BufRead *.g setf antrl 1514au BufNewFile,BufRead *.g setf pccts 1515 1516" PPWizard 1517au BufNewFile,BufRead *.it,*.ih setf ppwiz 1518 1519" Obj 3D file format 1520" TODO: is there a way to avoid MS-Windows Object files? 1521au BufNewFile,BufRead *.obj setf obj 1522 1523" Oracle Pro*C/C++ 1524au BufNewFile,BufRead *.pc setf proc 1525 1526" Privoxy actions file 1527au BufNewFile,BufRead *.action setf privoxy 1528 1529" Procmail 1530au BufNewFile,BufRead .procmail,.procmailrc setf procmail 1531 1532" Progress or CWEB 1533au BufNewFile,BufRead *.w call s:FTprogress_cweb() 1534 1535func! s:FTprogress_cweb() 1536 if exists("g:filetype_w") 1537 exe "setf " . g:filetype_w 1538 return 1539 endif 1540 if getline(1) =~ '&ANALYZE' || getline(3) =~ '&GLOBAL-DEFINE' 1541 setf progress 1542 else 1543 setf cweb 1544 endif 1545endfunc 1546 1547" Progress or assembly 1548au BufNewFile,BufRead *.i call s:FTprogress_asm() 1549 1550func! s:FTprogress_asm() 1551 if exists("g:filetype_i") 1552 exe "setf " . g:filetype_i 1553 return 1554 endif 1555 " This function checks for an assembly comment the first ten lines. 1556 " If not found, assume Progress. 1557 let lnum = 1 1558 while lnum <= 10 && lnum < line('$') 1559 let line = getline(lnum) 1560 if line =~ '^\s*;' || line =~ '^\*' 1561 call s:FTasm() 1562 return 1563 elseif line !~ '^\s*$' || line =~ '^/\*' 1564 " Not an empty line: Doesn't look like valid assembly code. 1565 " Or it looks like a Progress /* comment 1566 break 1567 endif 1568 let lnum = lnum + 1 1569 endw 1570 setf progress 1571endfunc 1572 1573" Progress or Pascal 1574au BufNewFile,BufRead *.p call s:FTprogress_pascal() 1575 1576func! s:FTprogress_pascal() 1577 if exists("g:filetype_p") 1578 exe "setf " . g:filetype_p 1579 return 1580 endif 1581 " This function checks for valid Pascal syntax in the first ten lines. 1582 " Look for either an opening comment or a program start. 1583 " If not found, assume Progress. 1584 let lnum = 1 1585 while lnum <= 10 && lnum < line('$') 1586 let line = getline(lnum) 1587 if line =~ '^\s*\(program\|unit\|procedure\|function\|const\|type\|var\)\>' 1588 \ || line =~ '^\s*{' || line =~ '^\s*(\*' 1589 setf pascal 1590 return 1591 elseif line !~ '^\s*$' || line =~ '^/\*' 1592 " Not an empty line: Doesn't look like valid Pascal code. 1593 " Or it looks like a Progress /* comment 1594 break 1595 endif 1596 let lnum = lnum + 1 1597 endw 1598 setf progress 1599endfunc 1600 1601 1602" Software Distributor Product Specification File (POSIX 1387.2-1995) 1603au BufNewFile,BufRead *.psf setf psf 1604au BufNewFile,BufRead INDEX,INFO 1605 \ if getline(1) =~ '^\s*\(distribution\|installed_software\|root\|bundle\|product\)\s*$' | 1606 \ setf psf | 1607 \ endif 1608 1609" Prolog 1610au BufNewFile,BufRead *.pdb setf prolog 1611 1612" Promela 1613au BufNewFile,BufRead *.pml setf promela 1614 1615" Google protocol buffers 1616au BufNewFile,BufRead *.proto setf proto 1617 1618" Protocols 1619au BufNewFile,BufRead */etc/protocols setf protocols 1620 1621" Pyrex 1622au BufNewFile,BufRead *.pyx,*.pxd setf pyrex 1623 1624" Python 1625au BufNewFile,BufRead *.py,*.pyw setf python 1626 1627" Quixote (Python-based web framework) 1628au BufNewFile,BufRead *.ptl setf python 1629 1630" Radiance 1631au BufNewFile,BufRead *.rad,*.mat setf radiance 1632 1633" Ratpoison config/command files 1634au BufNewFile,BufRead .ratpoisonrc,ratpoisonrc setf ratpoison 1635 1636" RCS file 1637au BufNewFile,BufRead *\,v setf rcs 1638 1639" Readline 1640au BufNewFile,BufRead .inputrc,inputrc setf readline 1641 1642" Registry for MS-Windows 1643au BufNewFile,BufRead *.reg 1644 \ if getline(1) =~? '^REGEDIT[0-9]*\s*$\|^Windows Registry Editor Version \d*\.\d*\s*$' | setf registry | endif 1645 1646" Renderman Interface Bytestream 1647au BufNewFile,BufRead *.rib setf rib 1648 1649" Rexx 1650au BufNewFile,BufRead *.rex,*.orx,*.rxo,*.rxj,*.jrexx,*.rexxj,*.rexx,*.testGroup,*.testUnit setf rexx 1651 1652" R (Splus) 1653if has("fname_case") 1654 au BufNewFile,BufRead *.s,*.S setf r 1655else 1656 au BufNewFile,BufRead *.s setf r 1657endif 1658 1659" R Help file 1660if has("fname_case") 1661 au BufNewFile,BufRead *.rd,*.Rd setf rhelp 1662else 1663 au BufNewFile,BufRead *.rd setf rhelp 1664endif 1665 1666" R noweb file 1667if has("fname_case") 1668 au BufNewFile,BufRead *.Rnw,*.rnw,*.Snw,*.snw setf rnoweb 1669else 1670 au BufNewFile,BufRead *.rnw,*.snw setf rnoweb 1671endif 1672 1673" R Markdown file 1674if has("fname_case") 1675 au BufNewFile,BufRead *.Rmd,*.rmd,*.Smd,*.smd setf rmd 1676else 1677 au BufNewFile,BufRead *.rmd,*.smd setf rmd 1678endif 1679 1680" R reStructuredText file 1681if has("fname_case") 1682 au BufNewFile,BufRead *.Rrst,*.rrst,*.Srst,*.srst setf rrst 1683else 1684 au BufNewFile,BufRead *.rrst,*.srst setf rrst 1685endif 1686 1687" Rexx, Rebol or R 1688au BufNewFile,BufRead *.r,*.R call s:FTr() 1689 1690func! s:FTr() 1691 let max = line("$") > 50 ? 50 : line("$") 1692 1693 for n in range(1, max) 1694 " Rebol is easy to recognize, check for that first 1695 if getline(n) =~? '\<REBOL\>' 1696 setf rebol 1697 return 1698 endif 1699 endfor 1700 1701 for n in range(1, max) 1702 " R has # comments 1703 if getline(n) =~ '^\s*#' 1704 setf r 1705 return 1706 endif 1707 " Rexx has /* comments */ 1708 if getline(n) =~ '^\s*/\*' 1709 setf rexx 1710 return 1711 endif 1712 endfor 1713 1714 " Nothing recognized, use user default or assume Rexx 1715 if exists("g:filetype_r") 1716 exe "setf " . g:filetype_r 1717 else 1718 " Rexx used to be the default, but R appears to be much more popular. 1719 setf r 1720 endif 1721endfunc 1722 1723" Remind 1724au BufNewFile,BufRead .reminders,*.remind,*.rem setf remind 1725 1726" Resolv.conf 1727au BufNewFile,BufRead resolv.conf setf resolv 1728 1729" Relax NG Compact 1730au BufNewFile,BufRead *.rnc setf rnc 1731 1732" Relax NG XML 1733au BufNewFile,BufRead *.rng setf rng 1734 1735" RPL/2 1736au BufNewFile,BufRead *.rpl setf rpl 1737 1738" Robots.txt 1739au BufNewFile,BufRead robots.txt setf robots 1740 1741" Rpcgen 1742au BufNewFile,BufRead *.x setf rpcgen 1743 1744" reStructuredText Documentation Format 1745au BufNewFile,BufRead *.rst setf rst 1746 1747" RTF 1748au BufNewFile,BufRead *.rtf setf rtf 1749 1750" Interactive Ruby shell 1751au BufNewFile,BufRead .irbrc,irbrc setf ruby 1752 1753" Ruby 1754au BufNewFile,BufRead *.rb,*.rbw setf ruby 1755 1756" RubyGems 1757au BufNewFile,BufRead *.gemspec setf ruby 1758 1759" Rackup 1760au BufNewFile,BufRead *.ru setf ruby 1761 1762" Bundler 1763au BufNewFile,BufRead Gemfile setf ruby 1764 1765" Ruby on Rails 1766au BufNewFile,BufRead *.builder,*.rxml,*.rjs setf ruby 1767 1768" Rantfile and Rakefile is like Ruby 1769au BufNewFile,BufRead [rR]antfile,*.rant,[rR]akefile,*.rake setf ruby 1770 1771" S-lang (or shader language, or SmallLisp) 1772au BufNewFile,BufRead *.sl setf slang 1773 1774" Samba config 1775au BufNewFile,BufRead smb.conf setf samba 1776 1777" SAS script 1778au BufNewFile,BufRead *.sas setf sas 1779 1780" Sass 1781au BufNewFile,BufRead *.sass setf sass 1782 1783" Sather 1784au BufNewFile,BufRead *.sa setf sather 1785 1786" Scilab 1787au BufNewFile,BufRead *.sci,*.sce setf scilab 1788 1789" SCSS 1790au BufNewFile,BufRead *.scss setf scss 1791 1792" SD: Streaming Descriptors 1793au BufNewFile,BufRead *.sd setf sd 1794 1795" SDL 1796au BufNewFile,BufRead *.sdl,*.pr setf sdl 1797 1798" sed 1799au BufNewFile,BufRead *.sed setf sed 1800 1801" Sieve (RFC 3028) 1802au BufNewFile,BufRead *.siv setf sieve 1803 1804" Sendmail 1805au BufNewFile,BufRead sendmail.cf setf sm 1806 1807" Sendmail .mc files are actually m4. Could also be MS Message text file. 1808au BufNewFile,BufRead *.mc call s:McSetf() 1809 1810func! s:McSetf() 1811 " Rely on the file to start with a comment. 1812 " MS message text files use ';', Sendmail files use '#' or 'dnl' 1813 for lnum in range(1, min([line("$"), 20])) 1814 let line = getline(lnum) 1815 if line =~ '^\s*\(#\|dnl\)' 1816 setf m4 " Sendmail .mc file 1817 return 1818 elseif line =~ '^\s*;' 1819 setf msmessages " MS Message text file 1820 return 1821 endif 1822 endfor 1823 setf m4 " Default: Sendmail .mc file 1824endfunc 1825 1826" Services 1827au BufNewFile,BufRead */etc/services setf services 1828 1829" Service Location config 1830au BufNewFile,BufRead */etc/slp.conf setf slpconf 1831 1832" Service Location registration 1833au BufNewFile,BufRead */etc/slp.reg setf slpreg 1834 1835" Service Location SPI 1836au BufNewFile,BufRead */etc/slp.spi setf slpspi 1837 1838" Setserial config 1839au BufNewFile,BufRead */etc/serial.conf setf setserial 1840 1841" SGML 1842au BufNewFile,BufRead *.sgm,*.sgml 1843 \ if getline(1).getline(2).getline(3).getline(4).getline(5) =~? 'linuxdoc' | 1844 \ setf sgmllnx | 1845 \ elseif getline(1) =~ '<!DOCTYPE.*DocBook' || getline(2) =~ '<!DOCTYPE.*DocBook' | 1846 \ let b:docbk_type = "sgml" | 1847 \ let b:docbk_ver = 4 | 1848 \ setf docbk | 1849 \ else | 1850 \ setf sgml | 1851 \ endif 1852 1853" SGMLDECL 1854au BufNewFile,BufRead *.decl,*.dcl,*.dec 1855 \ if getline(1).getline(2).getline(3) =~? '^<!SGML' | 1856 \ setf sgmldecl | 1857 \ endif 1858 1859" SGML catalog file 1860au BufNewFile,BufRead catalog setf catalog 1861au BufNewFile,BufRead sgml.catalog* call s:StarSetf('catalog') 1862 1863" Shell scripts (sh, ksh, bash, bash2, csh); Allow .profile_foo etc. 1864" Gentoo ebuilds are actually bash scripts 1865au BufNewFile,BufRead .bashrc*,bashrc,bash.bashrc,.bash[_-]profile*,.bash[_-]logout*,.bash[_-]aliases*,*.bash,*/{,.}bash[_-]completion{,.d,.sh}{,/*},*.ebuild,*.eclass call SetFileTypeSH("bash") 1866au BufNewFile,BufRead .kshrc*,*.ksh call SetFileTypeSH("ksh") 1867au BufNewFile,BufRead */etc/profile,.profile*,*.sh,*.env call SetFileTypeSH(getline(1)) 1868 1869" Also called from scripts.vim. 1870func! SetFileTypeSH(name) 1871 if expand("<amatch>") =~ g:ft_ignore_pat 1872 return 1873 endif 1874 if a:name =~ '\<csh\>' 1875 " Some .sh scripts contain #!/bin/csh. 1876 call SetFileTypeShell("csh") 1877 return 1878 elseif a:name =~ '\<tcsh\>' 1879 " Some .sh scripts contain #!/bin/tcsh. 1880 call SetFileTypeShell("tcsh") 1881 return 1882 elseif a:name =~ '\<zsh\>' 1883 " Some .sh scripts contain #!/bin/zsh. 1884 call SetFileTypeShell("zsh") 1885 return 1886 elseif a:name =~ '\<ksh\>' 1887 let b:is_kornshell = 1 1888 if exists("b:is_bash") 1889 unlet b:is_bash 1890 endif 1891 if exists("b:is_sh") 1892 unlet b:is_sh 1893 endif 1894 elseif exists("g:bash_is_sh") || a:name =~ '\<bash\>' || a:name =~ '\<bash2\>' 1895 let b:is_bash = 1 1896 if exists("b:is_kornshell") 1897 unlet b:is_kornshell 1898 endif 1899 if exists("b:is_sh") 1900 unlet b:is_sh 1901 endif 1902 elseif a:name =~ '\<sh\>' 1903 let b:is_sh = 1 1904 if exists("b:is_kornshell") 1905 unlet b:is_kornshell 1906 endif 1907 if exists("b:is_bash") 1908 unlet b:is_bash 1909 endif 1910 endif 1911 call SetFileTypeShell("sh") 1912endfunc 1913 1914" For shell-like file types, check for an "exec" command hidden in a comment, 1915" as used for Tcl. 1916" Also called from scripts.vim, thus can't be local to this script. 1917func! SetFileTypeShell(name) 1918 if expand("<amatch>") =~ g:ft_ignore_pat 1919 return 1920 endif 1921 let l = 2 1922 while l < 20 && l < line("$") && getline(l) =~ '^\s*\(#\|$\)' 1923 " Skip empty and comment lines. 1924 let l = l + 1 1925 endwhile 1926 if l < line("$") && getline(l) =~ '\s*exec\s' && getline(l - 1) =~ '^\s*#.*\\$' 1927 " Found an "exec" line after a comment with continuation 1928 let n = substitute(getline(l),'\s*exec\s\+\([^ ]*/\)\=', '', '') 1929 if n =~ '\<tclsh\|\<wish' 1930 setf tcl 1931 return 1932 endif 1933 endif 1934 exe "setf " . a:name 1935endfunc 1936 1937" tcsh scripts 1938au BufNewFile,BufRead .tcshrc*,*.tcsh,tcsh.tcshrc,tcsh.login call SetFileTypeShell("tcsh") 1939 1940" csh scripts, but might also be tcsh scripts (on some systems csh is tcsh) 1941au BufNewFile,BufRead .login*,.cshrc*,csh.cshrc,csh.login,csh.logout,*.csh,.alias call s:CSH() 1942 1943func! s:CSH() 1944 if exists("g:filetype_csh") 1945 call SetFileTypeShell(g:filetype_csh) 1946 elseif &shell =~ "tcsh" 1947 call SetFileTypeShell("tcsh") 1948 else 1949 call SetFileTypeShell("csh") 1950 endif 1951endfunc 1952 1953" Z-Shell script 1954au BufNewFile,BufRead .zprofile,*/etc/zprofile,.zfbfmarks setf zsh 1955au BufNewFile,BufRead .zsh*,.zlog*,.zcompdump* call s:StarSetf('zsh') 1956au BufNewFile,BufRead *.zsh setf zsh 1957 1958" Scheme 1959au BufNewFile,BufRead *.scm,*.ss,*.rkt setf scheme 1960 1961" Screen RC 1962au BufNewFile,BufRead .screenrc,screenrc setf screen 1963 1964" Simula 1965au BufNewFile,BufRead *.sim setf simula 1966 1967" SINDA 1968au BufNewFile,BufRead *.sin,*.s85 setf sinda 1969 1970" SiSU 1971au BufNewFile,BufRead *.sst,*.ssm,*.ssi,*.-sst,*._sst setf sisu 1972au BufNewFile,BufRead *.sst.meta,*.-sst.meta,*._sst.meta setf sisu 1973 1974" SKILL 1975au BufNewFile,BufRead *.il,*.ils,*.cdf setf skill 1976 1977" SLRN 1978au BufNewFile,BufRead .slrnrc setf slrnrc 1979au BufNewFile,BufRead *.score setf slrnsc 1980 1981" Smalltalk (and TeX) 1982au BufNewFile,BufRead *.st setf st 1983au BufNewFile,BufRead *.cls 1984 \ if getline(1) =~ '^%' | 1985 \ setf tex | 1986 \ elseif getline(1)[0] == '#' && getline(1) =~ 'rexx' | 1987 \ setf rexx | 1988 \ else | 1989 \ setf st | 1990 \ endif 1991 1992" Smarty templates 1993au BufNewFile,BufRead *.tpl setf smarty 1994 1995" SMIL or XML 1996au BufNewFile,BufRead *.smil 1997 \ if getline(1) =~ '<?\s*xml.*?>' | 1998 \ setf xml | 1999 \ else | 2000 \ setf smil | 2001 \ endif 2002 2003" SMIL or SNMP MIB file 2004au BufNewFile,BufRead *.smi 2005 \ if getline(1) =~ '\<smil\>' | 2006 \ setf smil | 2007 \ else | 2008 \ setf mib | 2009 \ endif 2010 2011" SMITH 2012au BufNewFile,BufRead *.smt,*.smith setf smith 2013 2014" Snobol4 and spitbol 2015au BufNewFile,BufRead *.sno,*.spt setf snobol4 2016 2017" SNMP MIB files 2018au BufNewFile,BufRead *.mib,*.my setf mib 2019 2020" Snort Configuration 2021au BufNewFile,BufRead *.hog,snort.conf,vision.conf setf hog 2022au BufNewFile,BufRead *.rules call s:FTRules() 2023 2024let s:ft_rules_udev_rules_pattern = '^\s*\cudev_rules\s*=\s*"\([^"]\{-1,}\)/*".*' 2025func! s:FTRules() 2026 let path = expand('<amatch>:p') 2027 if path =~ '^/\(etc/udev/\%(rules\.d/\)\=.*\.rules\|lib/udev/\%(rules\.d/\)\=.*\.rules\)$' 2028 setf udevrules 2029 return 2030 endif 2031 if path =~ '^/etc/ufw/' 2032 setf conf " Better than hog 2033 return 2034 endif 2035 if path =~ '^/\(etc\|usr/share\)/polkit-1/rules\.d' 2036 setf javascript 2037 return 2038 endif 2039 try 2040 let config_lines = readfile('/etc/udev/udev.conf') 2041 catch /^Vim\%((\a\+)\)\=:E484/ 2042 setf hog 2043 return 2044 endtry 2045 let dir = expand('<amatch>:p:h') 2046 for line in config_lines 2047 if line =~ s:ft_rules_udev_rules_pattern 2048 let udev_rules = substitute(line, s:ft_rules_udev_rules_pattern, '\1', "") 2049 if dir == udev_rules 2050 setf udevrules 2051 endif 2052 break 2053 endif 2054 endfor 2055 setf hog 2056endfunc 2057 2058 2059" Spec (Linux RPM) 2060au BufNewFile,BufRead *.spec setf spec 2061 2062" Speedup (AspenTech plant simulator) 2063au BufNewFile,BufRead *.speedup,*.spdata,*.spd setf spup 2064 2065" Slice 2066au BufNewFile,BufRead *.ice setf slice 2067 2068" Spice 2069au BufNewFile,BufRead *.sp,*.spice setf spice 2070 2071" Spyce 2072au BufNewFile,BufRead *.spy,*.spi setf spyce 2073 2074" Squid 2075au BufNewFile,BufRead squid.conf setf squid 2076 2077" SQL for Oracle Designer 2078au BufNewFile,BufRead *.tyb,*.typ,*.tyc,*.pkb,*.pks setf sql 2079 2080" SQL 2081au BufNewFile,BufRead *.sql call s:SQL() 2082 2083func! s:SQL() 2084 if exists("g:filetype_sql") 2085 exe "setf " . g:filetype_sql 2086 else 2087 setf sql 2088 endif 2089endfunc 2090 2091" SQLJ 2092au BufNewFile,BufRead *.sqlj setf sqlj 2093 2094" SQR 2095au BufNewFile,BufRead *.sqr,*.sqi setf sqr 2096 2097" OpenSSH configuration 2098au BufNewFile,BufRead ssh_config,*/.ssh/config setf sshconfig 2099 2100" OpenSSH server configuration 2101au BufNewFile,BufRead sshd_config setf sshdconfig 2102 2103" Stata 2104au BufNewFile,BufRead *.ado,*.class,*.do,*.imata,*.mata setf stata 2105 2106" SMCL 2107au BufNewFile,BufRead *.hlp,*.ihlp,*.smcl setf smcl 2108 2109" Stored Procedures 2110au BufNewFile,BufRead *.stp setf stp 2111 2112" Standard ML 2113au BufNewFile,BufRead *.sml setf sml 2114 2115" Sratus VOS command macro 2116au BufNewFile,BufRead *.cm setf voscm 2117 2118" Sysctl 2119au BufNewFile,BufRead */etc/sysctl.conf,*/etc/sysctl.d/*.conf setf sysctl 2120 2121" Systemd unit files 2122au BufNewFile,BufRead */systemd/*.{automount,mount,path,service,socket,swap,target,timer} setf systemd 2123 2124" Synopsys Design Constraints 2125au BufNewFile,BufRead *.sdc setf sdc 2126 2127" Sudoers 2128au BufNewFile,BufRead */etc/sudoers,sudoers.tmp setf sudoers 2129 2130" SVG (Scalable Vector Graphics) 2131au BufNewFile,BufRead *.svg setf svg 2132 2133" If the file has an extension of 't' and is in a directory 't' or 'xt' then 2134" it is almost certainly a Perl test file. 2135" If the first line starts with '#' and contains 'perl' it's probably a Perl 2136" file. 2137" (Slow test) If a file contains a 'use' statement then it is almost certainly 2138" a Perl file. 2139func! s:FTperl() 2140 let dirname = expand("%:p:h:t") 2141 if expand("%:e") == 't' && (dirname == 't' || dirname == 'xt') 2142 setf perl 2143 return 1 2144 endif 2145 if getline(1)[0] == '#' && getline(1) =~ 'perl' 2146 setf perl 2147 return 1 2148 endif 2149 if search('^use\s\s*\k', 'nc', 30) 2150 setf perl 2151 return 1 2152 endif 2153 return 0 2154endfunc 2155 2156" Tads (or Nroff or Perl test file) 2157au BufNewFile,BufRead *.t 2158 \ if !s:FTnroff() && !s:FTperl() | setf tads | endif 2159 2160" Tags 2161au BufNewFile,BufRead tags setf tags 2162 2163" TAK 2164au BufNewFile,BufRead *.tak setf tak 2165 2166" Task 2167au BufRead,BufNewFile {pending,completed,undo}.data setf taskdata 2168au BufRead,BufNewFile *.task setf taskedit 2169 2170" Tcl (JACL too) 2171au BufNewFile,BufRead *.tcl,*.tk,*.itcl,*.itk,*.jacl setf tcl 2172 2173" TealInfo 2174au BufNewFile,BufRead *.tli setf tli 2175 2176" Telix Salt 2177au BufNewFile,BufRead *.slt setf tsalt 2178 2179" Tera Term Language 2180au BufRead,BufNewFile *.ttl setf teraterm 2181 2182" Terminfo 2183au BufNewFile,BufRead *.ti setf terminfo 2184 2185" TeX 2186au BufNewFile,BufRead *.latex,*.sty,*.dtx,*.ltx,*.bbl setf tex 2187au BufNewFile,BufRead *.tex call s:FTtex() 2188 2189" Choose context, plaintex, or tex (LaTeX) based on these rules: 2190" 1. Check the first line of the file for "%&<format>". 2191" 2. Check the first 1000 non-comment lines for LaTeX or ConTeXt keywords. 2192" 3. Default to "latex" or to g:tex_flavor, can be set in user's vimrc. 2193func! s:FTtex() 2194 let firstline = getline(1) 2195 if firstline =~ '^%&\s*\a\+' 2196 let format = tolower(matchstr(firstline, '\a\+')) 2197 let format = substitute(format, 'pdf', '', '') 2198 if format == 'tex' 2199 let format = 'plain' 2200 endif 2201 else 2202 " Default value, may be changed later: 2203 let format = exists("g:tex_flavor") ? g:tex_flavor : 'plain' 2204 " Save position, go to the top of the file, find first non-comment line. 2205 let save_cursor = getpos('.') 2206 call cursor(1,1) 2207 let firstNC = search('^\s*[^[:space:]%]', 'c', 1000) 2208 if firstNC " Check the next thousand lines for a LaTeX or ConTeXt keyword. 2209 let lpat = 'documentclass\>\|usepackage\>\|begin{\|newcommand\>\|renewcommand\>' 2210 let cpat = 'start\a\+\|setup\a\+\|usemodule\|enablemode\|enableregime\|setvariables\|useencoding\|usesymbols\|stelle\a\+\|verwende\a\+\|stel\a\+\|gebruik\a\+\|usa\a\+\|imposta\a\+\|regle\a\+\|utilisemodule\>' 2211 let kwline = search('^\s*\\\%(' . lpat . '\)\|^\s*\\\(' . cpat . '\)', 2212 \ 'cnp', firstNC + 1000) 2213 if kwline == 1 " lpat matched 2214 let format = 'latex' 2215 elseif kwline == 2 " cpat matched 2216 let format = 'context' 2217 endif " If neither matched, keep default set above. 2218 " let lline = search('^\s*\\\%(' . lpat . '\)', 'cn', firstNC + 1000) 2219 " let cline = search('^\s*\\\%(' . cpat . '\)', 'cn', firstNC + 1000) 2220 " if cline > 0 2221 " let format = 'context' 2222 " endif 2223 " if lline > 0 && (cline == 0 || cline > lline) 2224 " let format = 'tex' 2225 " endif 2226 endif " firstNC 2227 call setpos('.', save_cursor) 2228 endif " firstline =~ '^%&\s*\a\+' 2229 2230 " Translation from formats to file types. TODO: add AMSTeX, RevTex, others? 2231 if format == 'plain' 2232 setf plaintex 2233 elseif format == 'context' 2234 setf context 2235 else " probably LaTeX 2236 setf tex 2237 endif 2238 return 2239endfunc 2240 2241" ConTeXt 2242au BufNewFile,BufRead tex/context/*/*.tex,*.mkii,*.mkiv setf context 2243 2244" Texinfo 2245au BufNewFile,BufRead *.texinfo,*.texi,*.txi setf texinfo 2246 2247" TeX configuration 2248au BufNewFile,BufRead texmf.cnf setf texmf 2249 2250" Tidy config 2251au BufNewFile,BufRead .tidyrc,tidyrc setf tidy 2252 2253" TF mud client 2254au BufNewFile,BufRead *.tf,.tfrc,tfrc setf tf 2255 2256" TPP - Text Presentation Program 2257au BufNewFile,BufReadPost *.tpp setf tpp 2258 2259" Treetop 2260au BufRead,BufNewFile *.treetop setf treetop 2261 2262" Trustees 2263au BufNewFile,BufRead trustees.conf setf trustees 2264 2265" TSS - Geometry 2266au BufNewFile,BufReadPost *.tssgm setf tssgm 2267 2268" TSS - Optics 2269au BufNewFile,BufReadPost *.tssop setf tssop 2270 2271" TSS - Command Line (temporary) 2272au BufNewFile,BufReadPost *.tsscl setf tsscl 2273 2274" TWIG files 2275au BufNewFile,BufReadPost *.twig setf twig 2276 2277" Motif UIT/UIL files 2278au BufNewFile,BufRead *.uit,*.uil setf uil 2279 2280" Udev conf 2281au BufNewFile,BufRead */etc/udev/udev.conf setf udevconf 2282 2283" Udev permissions 2284au BufNewFile,BufRead */etc/udev/permissions.d/*.permissions setf udevperm 2285" 2286" Udev symlinks config 2287au BufNewFile,BufRead */etc/udev/cdsymlinks.conf setf sh 2288 2289" UnrealScript 2290au BufNewFile,BufRead *.uc setf uc 2291 2292" Updatedb 2293au BufNewFile,BufRead */etc/updatedb.conf setf updatedb 2294 2295" Upstart (init(8)) config files 2296au BufNewFile,BufRead */usr/share/upstart/*.conf setf upstart 2297au BufNewFile,BufRead */usr/share/upstart/*.override setf upstart 2298au BufNewFile,BufRead */etc/init/*.conf,*/etc/init/*.override setf upstart 2299au BufNewFile,BufRead */.init/*.conf,*/.init/*.override setf upstart 2300au BufNewFile,BufRead */.config/upstart/*.conf setf upstart 2301au BufNewFile,BufRead */.config/upstart/*.override setf upstart 2302 2303" Vera 2304au BufNewFile,BufRead *.vr,*.vri,*.vrh setf vera 2305 2306" Verilog HDL 2307au BufNewFile,BufRead *.v setf verilog 2308 2309" Verilog-AMS HDL 2310au BufNewFile,BufRead *.va,*.vams setf verilogams 2311 2312" SystemVerilog 2313au BufNewFile,BufRead *.sv,*.svh setf systemverilog 2314 2315" VHDL 2316au BufNewFile,BufRead *.hdl,*.vhd,*.vhdl,*.vbe,*.vst setf vhdl 2317au BufNewFile,BufRead *.vhdl_[0-9]* call s:StarSetf('vhdl') 2318 2319" Vim script 2320au BufNewFile,BufRead *.vim,*.vba,.exrc,_exrc setf vim 2321 2322" Viminfo file 2323au BufNewFile,BufRead .viminfo,_viminfo setf viminfo 2324 2325" Virata Config Script File or Drupal module 2326au BufRead,BufNewFile *.hw,*.module,*.pkg 2327 \ if getline(1) =~ '<?php' | 2328 \ setf php | 2329 \ else | 2330 \ setf virata | 2331 \ endif 2332 2333" Visual Basic (also uses *.bas) or FORM 2334au BufNewFile,BufRead *.frm call s:FTVB("form") 2335 2336" SaxBasic is close to Visual Basic 2337au BufNewFile,BufRead *.sba setf vb 2338 2339" Vgrindefs file 2340au BufNewFile,BufRead vgrindefs setf vgrindefs 2341 2342" VRML V1.0c 2343au BufNewFile,BufRead *.wrl setf vrml 2344 2345" Vroom (vim testing and executable documentation) 2346au BufNewFile,BufRead *.vroom setf vroom 2347 2348" Webmacro 2349au BufNewFile,BufRead *.wm setf webmacro 2350 2351" Wget config 2352au BufNewFile,BufRead .wgetrc,wgetrc setf wget 2353 2354" Website MetaLanguage 2355au BufNewFile,BufRead *.wml setf wml 2356 2357" Winbatch 2358au BufNewFile,BufRead *.wbt setf winbatch 2359 2360" WSML 2361au BufNewFile,BufRead *.wsml setf wsml 2362 2363" WvDial 2364au BufNewFile,BufRead wvdial.conf,.wvdialrc setf wvdial 2365 2366" CVS RC file 2367au BufNewFile,BufRead .cvsrc setf cvsrc 2368 2369" CVS commit file 2370au BufNewFile,BufRead cvs\d\+ setf cvs 2371 2372" WEB (*.web is also used for Winbatch: Guess, based on expecting "%" comment 2373" lines in a WEB file). 2374au BufNewFile,BufRead *.web 2375 \ if getline(1)[0].getline(2)[0].getline(3)[0].getline(4)[0].getline(5)[0] =~ "%" | 2376 \ setf web | 2377 \ else | 2378 \ setf winbatch | 2379 \ endif 2380 2381" Windows Scripting Host and Windows Script Component 2382au BufNewFile,BufRead *.ws[fc] setf wsh 2383 2384" XHTML 2385au BufNewFile,BufRead *.xhtml,*.xht setf xhtml 2386 2387" X Pixmap (dynamically sets colors, use BufEnter to make it work better) 2388au BufEnter *.xpm 2389 \ if getline(1) =~ "XPM2" | 2390 \ setf xpm2 | 2391 \ else | 2392 \ setf xpm | 2393 \ endif 2394au BufEnter *.xpm2 setf xpm2 2395 2396" XFree86 config 2397au BufNewFile,BufRead XF86Config 2398 \ if getline(1) =~ '\<XConfigurator\>' | 2399 \ let b:xf86conf_xfree86_version = 3 | 2400 \ endif | 2401 \ setf xf86conf 2402au BufNewFile,BufRead */xorg.conf.d/*.conf 2403 \ let b:xf86conf_xfree86_version = 4 | 2404 \ setf xf86conf 2405 2406" Xorg config 2407au BufNewFile,BufRead xorg.conf,xorg.conf-4 let b:xf86conf_xfree86_version = 4 | setf xf86conf 2408 2409" Xinetd conf 2410au BufNewFile,BufRead */etc/xinetd.conf setf xinetd 2411 2412" XS Perl extension interface language 2413au BufNewFile,BufRead *.xs setf xs 2414 2415" X resources file 2416au BufNewFile,BufRead .Xdefaults,.Xpdefaults,.Xresources,xdm-config,*.ad setf xdefaults 2417 2418" Xmath 2419au BufNewFile,BufRead *.msc,*.msf setf xmath 2420au BufNewFile,BufRead *.ms 2421 \ if !s:FTnroff() | setf xmath | endif 2422 2423" XML specific variants: docbk and xbl 2424au BufNewFile,BufRead *.xml call s:FTxml() 2425 2426func! s:FTxml() 2427 let n = 1 2428 while n < 100 && n < line("$") 2429 let line = getline(n) 2430 " DocBook 4 or DocBook 5. 2431 let is_docbook4 = line =~ '<!DOCTYPE.*DocBook' 2432 let is_docbook5 = line =~ ' xmlns="http://docbook.org/ns/docbook"' 2433 if is_docbook4 || is_docbook5 2434 let b:docbk_type = "xml" 2435 if is_docbook5 2436 let b:docbk_ver = 5 2437 else 2438 let b:docbk_ver = 4 2439 endif 2440 setf docbk 2441 return 2442 endif 2443 if line =~ 'xmlns:xbl="http://www.mozilla.org/xbl"' 2444 setf xbl 2445 return 2446 endif 2447 let n += 1 2448 endwhile 2449 setf xml 2450endfunc 2451 2452" XMI (holding UML models) is also XML 2453au BufNewFile,BufRead *.xmi setf xml 2454 2455" CSPROJ files are Visual Studio.NET's XML-based project config files 2456au BufNewFile,BufRead *.csproj,*.csproj.user setf xml 2457 2458" Qt Linguist translation source and Qt User Interface Files are XML 2459au BufNewFile,BufRead *.ts,*.ui setf xml 2460 2461" TPM's are RDF-based descriptions of TeX packages (Nikolai Weibull) 2462au BufNewFile,BufRead *.tpm setf xml 2463 2464" Xdg menus 2465au BufNewFile,BufRead */etc/xdg/menus/*.menu setf xml 2466 2467" ATI graphics driver configuration 2468au BufNewFile,BufRead fglrxrc setf xml 2469 2470" XLIFF (XML Localisation Interchange File Format) is also XML 2471au BufNewFile,BufRead *.xlf setf xml 2472au BufNewFile,BufRead *.xliff setf xml 2473 2474" XML User Interface Language 2475au BufNewFile,BufRead *.xul setf xml 2476 2477" X11 xmodmap (also see below) 2478au BufNewFile,BufRead *Xmodmap setf xmodmap 2479 2480" Xquery 2481au BufNewFile,BufRead *.xq,*.xql,*.xqm,*.xquery,*.xqy setf xquery 2482 2483" XSD 2484au BufNewFile,BufRead *.xsd setf xsd 2485 2486" Xslt 2487au BufNewFile,BufRead *.xsl,*.xslt setf xslt 2488 2489" Yacc 2490au BufNewFile,BufRead *.yy,*.yxx,*.y++ setf yacc 2491 2492" Yacc or racc 2493au BufNewFile,BufRead *.y call s:FTy() 2494 2495func! s:FTy() 2496 let n = 1 2497 while n < 100 && n < line("$") 2498 let line = getline(n) 2499 if line =~ '^\s*%' 2500 setf yacc 2501 return 2502 endif 2503 if getline(n) =~ '^\s*\(#\|class\>\)' && getline(n) !~ '^\s*#\s*include' 2504 setf racc 2505 return 2506 endif 2507 let n = n + 1 2508 endwhile 2509 setf yacc 2510endfunc 2511 2512 2513" Yaml 2514au BufNewFile,BufRead *.yaml,*.yml setf yaml 2515 2516" yum conf (close enough to dosini) 2517au BufNewFile,BufRead */etc/yum.conf setf dosini 2518 2519" Zimbu 2520au BufNewFile,BufRead *.zu setf zimbu 2521" Zimbu Templates 2522au BufNewFile,BufRead *.zut setf zimbutempl 2523 2524" Zope 2525" dtml (zope dynamic template markup language), pt (zope page template), 2526" cpt (zope form controller page template) 2527au BufNewFile,BufRead *.dtml,*.pt,*.cpt call s:FThtml() 2528" zsql (zope sql method) 2529au BufNewFile,BufRead *.zsql call s:SQL() 2530 2531" Z80 assembler asz80 2532au BufNewFile,BufRead *.z8a setf z8a 2533 2534augroup END 2535 2536 2537" Source the user-specified filetype file, for backwards compatibility with 2538" Vim 5.x. 2539if exists("myfiletypefile") && filereadable(expand(myfiletypefile)) 2540 execute "source " . myfiletypefile 2541endif 2542 2543 2544" Check for "*" after loading myfiletypefile, so that scripts.vim is only used 2545" when there are no matching file name extensions. 2546" Don't do this for compressed files. 2547augroup filetypedetect 2548au BufNewFile,BufRead * 2549 \ if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat 2550 \ | runtime! scripts.vim | endif 2551au StdinReadPost * if !did_filetype() | runtime! scripts.vim | endif 2552 2553 2554" Extra checks for when no filetype has been detected now. Mostly used for 2555" patterns that end in "*". E.g., "zsh*" matches "zsh.vim", but that's a Vim 2556" script file. 2557" Most of these should call s:StarSetf() to avoid names ending in .gz and the 2558" like are used. 2559 2560" More Apache config files 2561au BufNewFile,BufRead access.conf*,apache.conf*,apache2.conf*,httpd.conf*,srm.conf* call s:StarSetf('apache') 2562au BufNewFile,BufRead */etc/apache2/*.conf*,*/etc/apache2/conf.*/*,*/etc/apache2/mods-*/*,*/etc/apache2/sites-*/*,*/etc/httpd/conf.d/*.conf* call s:StarSetf('apache') 2563 2564" Asterisk config file 2565au BufNewFile,BufRead *asterisk/*.conf* call s:StarSetf('asterisk') 2566au BufNewFile,BufRead *asterisk*/*voicemail.conf* call s:StarSetf('asteriskvm') 2567 2568" Bazaar version control 2569au BufNewFile,BufRead bzr_log.* setf bzr 2570 2571" BIND zone 2572au BufNewFile,BufRead */named/db.*,*/bind/db.* call s:StarSetf('bindzone') 2573 2574" Calendar 2575au BufNewFile,BufRead */.calendar/*, 2576 \*/share/calendar/*/calendar.*,*/share/calendar/calendar.* 2577 \ call s:StarSetf('calendar') 2578 2579" Changelog 2580au BufNewFile,BufRead [cC]hange[lL]og* 2581 \ if getline(1) =~ '; urgency=' 2582 \| call s:StarSetf('debchangelog') 2583 \|else 2584 \| call s:StarSetf('changelog') 2585 \|endif 2586 2587" Crontab 2588au BufNewFile,BufRead crontab,crontab.*,*/etc/cron.d/* call s:StarSetf('crontab') 2589 2590" dnsmasq(8) configuration 2591au BufNewFile,BufRead */etc/dnsmasq.d/* call s:StarSetf('dnsmasq') 2592 2593" Dracula 2594au BufNewFile,BufRead drac.* call s:StarSetf('dracula') 2595 2596" Fvwm 2597au BufNewFile,BufRead */.fvwm/* call s:StarSetf('fvwm') 2598au BufNewFile,BufRead *fvwmrc*,*fvwm95*.hook 2599 \ let b:fvwm_version = 1 | call s:StarSetf('fvwm') 2600au BufNewFile,BufRead *fvwm2rc* 2601 \ if expand("<afile>:e") == "m4" 2602 \| call s:StarSetf('fvwm2m4') 2603 \|else 2604 \| let b:fvwm_version = 2 | call s:StarSetf('fvwm') 2605 \|endif 2606 2607" Gedcom 2608au BufNewFile,BufRead */tmp/lltmp* call s:StarSetf('gedcom') 2609 2610" GTK RC 2611au BufNewFile,BufRead .gtkrc*,gtkrc* call s:StarSetf('gtkrc') 2612 2613" Jam 2614au BufNewFile,BufRead Prl*.*,JAM*.* call s:StarSetf('jam') 2615 2616" Jargon 2617au! BufNewFile,BufRead *jarg* 2618 \ if getline(1).getline(2).getline(3).getline(4).getline(5) =~? 'THIS IS THE JARGON FILE' 2619 \| call s:StarSetf('jargon') 2620 \|endif 2621 2622" Kconfig 2623au BufNewFile,BufRead Kconfig.* call s:StarSetf('kconfig') 2624 2625" Lilo: Linux loader 2626au BufNewFile,BufRead lilo.conf* call s:StarSetf('lilo') 2627 2628" Logcheck 2629au BufNewFile,BufRead */etc/logcheck/*.d*/* call s:StarSetf('logcheck') 2630 2631" Makefile 2632au BufNewFile,BufRead [mM]akefile* call s:StarSetf('make') 2633 2634" Ruby Makefile 2635au BufNewFile,BufRead [rR]akefile* call s:StarSetf('ruby') 2636 2637" Mail (also matches muttrc.vim, so this is below the other checks) 2638au BufNewFile,BufRead mutt[[:alnum:]._-]\\\{6\} setf mail 2639 2640" Modconf 2641au BufNewFile,BufRead */etc/modutils/* 2642 \ if executable(expand("<afile>")) != 1 2643 \| call s:StarSetf('modconf') 2644 \|endif 2645au BufNewFile,BufRead */etc/modprobe.* call s:StarSetf('modconf') 2646 2647" Mutt setup file 2648au BufNewFile,BufRead .mutt{ng,}rc*,*/.mutt{ng,}/mutt{ng,}rc* call s:StarSetf('muttrc') 2649au BufNewFile,BufRead mutt{ng,}rc*,Mutt{ng,}rc* call s:StarSetf('muttrc') 2650 2651" Nroff macros 2652au BufNewFile,BufRead tmac.* call s:StarSetf('nroff') 2653 2654" Pam conf 2655au BufNewFile,BufRead */etc/pam.d/* call s:StarSetf('pamconf') 2656 2657" Printcap and Termcap 2658au BufNewFile,BufRead *printcap* 2659 \ if !did_filetype() 2660 \| let b:ptcap_type = "print" | call s:StarSetf('ptcap') 2661 \|endif 2662au BufNewFile,BufRead *termcap* 2663 \ if !did_filetype() 2664 \| let b:ptcap_type = "term" | call s:StarSetf('ptcap') 2665 \|endif 2666 2667" ReDIF 2668" Only used when the .rdf file was not detected to be XML. 2669au BufRead,BufNewFile *.rdf call s:Redif() 2670func! s:Redif() 2671 let lnum = 1 2672 while lnum <= 5 && lnum < line('$') 2673 if getline(lnum) =~ "^\ctemplate-type:" 2674 setf redif 2675 return 2676 endif 2677 let lnum = lnum + 1 2678 endwhile 2679endfunc 2680 2681" Remind 2682au BufNewFile,BufRead .reminders* call s:StarSetf('remind') 2683 2684" Vim script 2685au BufNewFile,BufRead *vimrc* call s:StarSetf('vim') 2686 2687" Subversion commit file 2688au BufNewFile,BufRead svn-commit*.tmp setf svn 2689 2690" X resources file 2691au BufNewFile,BufRead Xresources*,*/app-defaults/*,*/Xresources/* call s:StarSetf('xdefaults') 2692 2693" XFree86 config 2694au BufNewFile,BufRead XF86Config-4* 2695 \ let b:xf86conf_xfree86_version = 4 | call s:StarSetf('xf86conf') 2696au BufNewFile,BufRead XF86Config* 2697 \ if getline(1) =~ '\<XConfigurator\>' 2698 \| let b:xf86conf_xfree86_version = 3 2699 \|endif 2700 \|call s:StarSetf('xf86conf') 2701 2702" X11 xmodmap 2703au BufNewFile,BufRead *xmodmap* call s:StarSetf('xmodmap') 2704 2705" Xinetd conf 2706au BufNewFile,BufRead */etc/xinetd.d/* call s:StarSetf('xinetd') 2707 2708" yum conf (close enough to dosini) 2709au BufNewFile,BufRead */etc/yum.repos.d/* call s:StarSetf('dosini') 2710 2711" Z-Shell script 2712au BufNewFile,BufRead zsh*,zlog* call s:StarSetf('zsh') 2713 2714 2715" Plain text files, needs to be far down to not override others. This avoids 2716" the "conf" type being used if there is a line starting with '#'. 2717au BufNewFile,BufRead *.txt,*.text,README setf text 2718 2719 2720" Use the filetype detect plugins. They may overrule any of the previously 2721" detected filetypes. 2722runtime! ftdetect/*.vim 2723 2724" NOTE: The above command could have ended the filetypedetect autocmd group 2725" and started another one. Let's make sure it has ended to get to a consistent 2726" state. 2727augroup END 2728 2729" Generic configuration file (check this last, it's just guessing!) 2730au filetypedetect BufNewFile,BufRead,StdinReadPost * 2731 \ if !did_filetype() && expand("<amatch>") !~ g:ft_ignore_pat 2732 \ && (getline(1) =~ '^#' || getline(2) =~ '^#' || getline(3) =~ '^#' 2733 \ || getline(4) =~ '^#' || getline(5) =~ '^#') | 2734 \ setf conf | 2735 \ endif 2736 2737 2738" If the GUI is already running, may still need to install the Syntax menu. 2739" Don't do it when the 'M' flag is included in 'guioptions'. 2740if has("menu") && has("gui_running") 2741 \ && !exists("did_install_syntax_menu") && &guioptions !~# "M" 2742 source <sfile>:p:h/menu.vim 2743endif 2744 2745" Function called for testing all functions defined here. These are 2746" script-local, thus need to be executed here. 2747" Returns a string with error messages (hopefully empty). 2748func! TestFiletypeFuncs(testlist) 2749 let output = '' 2750 for f in a:testlist 2751 try 2752 exe f 2753 catch 2754 let output = output . "\n" . f . ": " . v:exception 2755 endtry 2756 endfor 2757 return output 2758endfunc 2759 2760" Restore 'cpoptions' 2761let &cpo = s:cpo_save 2762unlet s:cpo_save 2763