forked from aniani/vim
151 lines
6.3 KiB
VimL
151 lines
6.3 KiB
VimL
|
" DTrace D script syntax file. To avoid confusion with the D programming
|
||
|
|
" language, I call this script dtrace.vim instead of d.vim.
|
||
|
|
" Language: D script as described in "Solaris Dynamic Tracing Guide",
|
||
|
|
" http://docs.sun.com/app/docs/doc/817-6223
|
||
|
|
" Version: 1.5
|
||
|
|
" Last Change: 2008/04/05
|
||
|
|
" Maintainer: Nicolas Weber <nicolasweber@gmx.de>
|
||
|
|
|
||
|
|
" dtrace lexer and parser are at
|
||
|
|
" http://src.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/lib/libdtrace/common/dt_lex.l
|
||
|
|
" http://src.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/lib/libdtrace/common/dt_grammar.y
|
||
|
|
|
||
|
|
if version < 600
|
||
|
|
syntax clear
|
||
|
|
elseif exists("b:current_syntax")
|
||
|
|
finish
|
||
|
|
endif
|
||
|
|
|
||
|
|
" Read the C syntax to start with
|
||
|
|
if version < 600
|
||
|
|
so <sfile>:p:h/c.vim
|
||
|
|
else
|
||
|
|
runtime! syntax/c.vim
|
||
|
|
unlet b:current_syntax
|
||
|
|
endif
|
||
|
|
|
||
|
|
syn clear cCommentL " dtrace doesn't support // style comments
|
||
|
|
|
||
|
|
" First line may start with #!, also make sure a '-s' flag is somewhere in
|
||
|
|
" that line.
|
||
|
|
syn match dtraceComment "\%^#!.*-s.*"
|
||
|
|
|
||
|
|
" Probe descriptors need explicit matches, so that keywords in probe
|
||
|
|
" descriptors don't show up as errors. Note that this regex detects probes
|
||
|
|
" as "something with three ':' in it". This works in practice, but it's not
|
||
|
|
" really correct. Also add special case code for BEGIN, END and ERROR, since
|
||
|
|
" they are common.
|
||
|
|
" Be careful not to detect '/*some:::node*/\n/**/' as probe, as it's
|
||
|
|
" commented out.
|
||
|
|
" XXX: This allows a probe description to end with ',', even if it's not
|
||
|
|
" followed by another probe.
|
||
|
|
" XXX: This doesn't work if followed by a comment.
|
||
|
|
let s:oneProbe = '\%(BEGIN\|END\|ERROR\|\S\{-}:\S\{-}:\S\{-}:\S\{-}\)\_s*'
|
||
|
|
exec 'syn match dtraceProbe "'.s:oneProbe.'\%(,\_s*'.s:oneProbe.'\)*\ze\_s\%({\|\/[^*]\|\%$\)"'
|
||
|
|
|
||
|
|
" Note: We have to be careful to not make this match /* */ comments.
|
||
|
|
" Also be careful not to eat `c = a / b; b = a / 2;`. We use the same
|
||
|
|
" technique as the dtrace lexer: a predicate has to be followed by {, ;, or
|
||
|
|
" EOF. Also note that dtrace doesn't allow an empty predicate // (we do).
|
||
|
|
" This regex doesn't allow a divison operator in the predicate.
|
||
|
|
" Make sure that this matches the empty predicate as well.
|
||
|
|
" XXX: This doesn't work if followed by a comment.
|
||
|
|
syn match dtracePredicate "/\*\@!\_[^/]*/\ze\_s*\%({\|;\|\%$\)"
|
||
|
|
"contains=ALLBUT,dtraceOption " this lets the region contain too much stuff
|
||
|
|
|
||
|
|
" Pragmas.
|
||
|
|
" dtrace seems not to support whitespace before or after the '='. dtrace
|
||
|
|
" supports only one option per #pragma, and no continuations of #pragma over
|
||
|
|
" several lines with '\'.
|
||
|
|
" Note that dtrace treats units (Hz etc) as case-insenstive, we allow only
|
||
|
|
" sane unit capitalization in this script (ie 'ns', 'us', 'ms', 's' have to be
|
||
|
|
" small, Hertz can be 'Hz' or 'hz')
|
||
|
|
" XXX: "cpu" is always highlighted as builtin var, not as option
|
||
|
|
|
||
|
|
" auto or manual: bufresize
|
||
|
|
syn match dtraceOption contained "bufresize=\%(auto\|manual\)\s*$"
|
||
|
|
|
||
|
|
" scalar: cpu jstackframes jstackstrsize nspec stackframes stackindent ustackframes
|
||
|
|
syn match dtraceOption contained "\%(cpu\|jstackframes\|jstackstrsize\|nspec\|stackframes\|stackindent\|ustackframes\)=\d\+\s*$"
|
||
|
|
|
||
|
|
" size: aggsize bufsize dynvarsize specsize strsize
|
||
|
|
" size defaults to something if no unit is given (ie., having no unit is ok)
|
||
|
|
syn match dtraceOption contained "\%(aggsize\|bufsize\|dynvarsize\|specsize\|strsize\)=\d\+\%(k\|m\|g\|t\|K\|M\|G\|T\)\=\s*$"
|
||
|
|
|
||
|
|
" time: aggrate cleanrate statusrate switchrate
|
||
|
|
" time defaults to hz if no unit is given
|
||
|
|
syn match dtraceOption contained "\%(aggrate\|cleanrate\|statusrate\|switchrate\)=\d\+\%(hz\|Hz\|ns\|us\|ms\|s\)\=\s*$"
|
||
|
|
|
||
|
|
" No type: defaultargs destructive flowindent grabanon quiet rawbytes
|
||
|
|
syn match dtraceOption contained "\%(defaultargs\|destructive\|flowindent\|grabanon\|quiet\|rawbytes\)\s*$"
|
||
|
|
|
||
|
|
|
||
|
|
" Turn reserved but unspecified keywords into errors
|
||
|
|
syn keyword dtraceReservedKeyword auto break case continue counter default do
|
||
|
|
syn keyword dtraceReservedKeyword else for goto if import probe provider
|
||
|
|
syn keyword dtraceReservedKeyword register restrict return static switch while
|
||
|
|
|
||
|
|
" Add dtrace-specific stuff
|
||
|
|
syn keyword dtraceOperator sizeof offsetof stringof xlate
|
||
|
|
syn keyword dtraceStatement self inline xlate this translator
|
||
|
|
|
||
|
|
" Builtin variables
|
||
|
|
syn keyword dtraceIdentifier arg0 arg1 arg2 arg3 arg4 arg5 arg6 arg7 arg8 arg9
|
||
|
|
syn keyword dtraceIdentifier args caller chip cpu curcpu curlwpsinfo curpsinfo
|
||
|
|
syn keyword dtraceIdentifier curthread cwd epid errno execname gid id ipl lgrp
|
||
|
|
syn keyword dtraceIdentifier pid ppid probefunc probemod probename probeprov
|
||
|
|
syn keyword dtraceIdentifier pset root stackdepth tid timestamp uid uregs
|
||
|
|
syn keyword dtraceIdentifier vtimestamp walltimestamp
|
||
|
|
syn keyword dtraceIdentifier ustackdepth
|
||
|
|
|
||
|
|
" Macro Variables
|
||
|
|
syn match dtraceConstant "$[0-9]\+"
|
||
|
|
syn match dtraceConstant "$\(egid\|euid\|gid\|pgid\|ppid\)"
|
||
|
|
syn match dtraceConstant "$\(projid\|sid\|target\|taskid\|uid\)"
|
||
|
|
|
||
|
|
" Data Recording Actions
|
||
|
|
syn keyword dtraceFunction trace tracemem printf printa stack ustack jstack
|
||
|
|
|
||
|
|
" Process Destructive Actions
|
||
|
|
syn keyword dtraceFunction stop raise copyout copyoutstr system
|
||
|
|
|
||
|
|
" Kernel Destructive Actions
|
||
|
|
syn keyword dtraceFunction breakpoint panic chill
|
||
|
|
|
||
|
|
" Special Actions
|
||
|
|
syn keyword dtraceFunction speculate commit discard exit
|
||
|
|
|
||
|
|
" Subroutines
|
||
|
|
syn keyword dtraceFunction alloca basename bcopy cleanpath copyin copyinstr
|
||
|
|
syn keyword dtraceFunction copyinto dirname msgdsize msgsize mutex_owned
|
||
|
|
syn keyword dtraceFunction mutex_owner mutex_type_adaptive progenyof
|
||
|
|
syn keyword dtraceFunction rand rw_iswriter rw_write_held speculation
|
||
|
|
syn keyword dtraceFunction strjoin strlen
|
||
|
|
|
||
|
|
" Aggregating Functions
|
||
|
|
syn keyword dtraceAggregatingFunction count sum avg min max lquantize quantize
|
||
|
|
|
||
|
|
syn keyword dtraceType int8_t int16_t int32_t int64_t intptr_t
|
||
|
|
syn keyword dtraceType uint8_t uint16_t uint32_t uint64_t uintptr_t
|
||
|
|
syn keyword dtraceType string
|
||
|
|
syn keyword dtraceType pid_t id_t
|
||
|
|
|
||
|
|
|
||
|
|
" Define the default highlighting.
|
||
|
|
" We use `hi def link` directly, this requires 5.8.
|
||
|
|
hi def link dtraceReservedKeyword Error
|
||
|
|
hi def link dtracePredicate String
|
||
|
|
hi def link dtraceProbe dtraceStatement
|
||
|
|
hi def link dtraceStatement Statement
|
||
|
|
hi def link dtraceConstant Constant
|
||
|
|
hi def link dtraceIdentifier Identifier
|
||
|
|
hi def link dtraceAggregatingFunction dtraceFunction
|
||
|
|
hi def link dtraceFunction Function
|
||
|
|
hi def link dtraceType Type
|
||
|
|
hi def link dtraceOperator Operator
|
||
|
|
hi def link dtraceComment Comment
|
||
|
|
hi def link dtraceNumber Number
|
||
|
|
hi def link dtraceOption Identifier
|
||
|
|
|
||
|
|
let b:current_syntax = "dtrace"
|