if exists("b:did_indent")

finish

let b:did_indent = 1

setlocal indentexpr=GetJavascriptIndent()

setlocal formatexpr=Fixedgq(v:lnum,v:count)

setlocal indentkeys=0{,0},0),0],:,!^F,o,O,e

setlocal cinoptions+=j1,J1,c1

let b:undo_indent = 'setlocal indentexpr< formatexpr< indentkeys< cinoptions<'

if exists("*GetJavascriptIndent")

finish

let s:cpo_save = &cpo

set cpo&vim

if exists('*shiftwidth')

func s:sw()

return shiftwidth()

endfunc

func s:sw()

return &sw

endfunc

let s:line_pre = '^\s*\%(\/\*.*\*\/\s*\)*'

let s:expr_case = s:line_pre . '\%(\%(case\>.*\)\|default\)\s*:\C'

let s:syng_strcom = '\%(string\|regex\|special\|doc\|comment\|template\)\c'

let s:syng_comment = '\%(comment\|doc\)\c'

let s:skip_expr = "synIDattr(synID(line('.'),col('.'),1),'name') =~ '".s:syng_strcom."'"

func s:lookForParens(start,end,flags,time)

try

return searchpair(a:start,'',a:end,a:flags,

\ "line('.') < " . (prevnonblank(v:lnum) - 2000) . " ? dummy :" . s:skip_expr

\ ,0,a:time)

catch /E118/

return searchpair(a:start,'',a:end,a:flags,0,0)

endtry

let s:line_term = '\s*\%(\%(:\@<!\/\/.*\)\=\|\%(\/\*.*\*\/\s*\)*\)$'

let s:continuation_regex = '\%([*,.?:]\|+\@<!+\|-\@<!-\|\*\@<!\/\|=\|||\|&&\)' . s:line_term

function s:Onescope(lnum)

return getline(a:lnum) =~ '\%(\<else\|\<do\|=>\)\C' . s:line_term ||

\ (cursor(a:lnum, match(getline(a:lnum),')' . s:line_term)) > -1 &&

\ s:lookForParens('(', ')', 'cbW', 100) > 0 &&

\ cursor(line('.'),match( ' ' . strpart(getline(line('.')),0,col('.') - 1),

\ '\<\%(else\|for\%(\s+each\)\=\|if\|let\|while\|with\)\C' . s:line_term)) > -1) &&

\ (expand("<cword>") =~ 'while\C' ? !s:lookForParens('\<do\>\C', '\<while\>\C','bw',100) : 1)

let s:operator_first = s:line_pre . '\%([,:?]\|\([-/.+*]\)\%(\1\|\*\|\/\)\@!\|||\|&&\)'

function s:IsInStringOrComment(lnum, col)

return synIDattr(synID(a:lnum, a:col, 1), 'name') =~ s:syng_strcom

function s:IsInComment(lnum, col)

return synIDattr(synID(a:lnum, a:col, 1), 'name') =~ s:syng_comment

function s:PrevNonBlankNonString(lnum)

let lnum = prevnonblank(a:lnum)

while lnum > 0

if !s:IsInStringOrComment(lnum, matchend(getline(lnum), '^\s*[^''"]'))

break

endif

let lnum = prevnonblank(lnum - 1)

endwhile

return lnum

function s:LineHasOpeningBrackets(lnum)

let open_0 = 0

let open_2 = 0

let open_4 = 0

let line = getline(a:lnum)

let pos = match(line, '[][(){}]', 0)

while pos != -1

if !s:IsInStringOrComment(a:lnum, pos + 1)

let idx = stridx('(){}[]', line[pos])

if idx % 2 == 0

let open_{idx} = open_{idx} + 1

else

let open_{idx - 1} = open_{idx - 1} - 1

endif

endif

let pos = match(line, '[][(){}]', pos + 1)

endwhile

return (open_0 > 0 ? 1 : (open_0 == 0 ? 0 : 2)) . (open_2 > 0 ? 1 : (open_2 == 0 ? 0 : 2)) . (open_4 > 0 ? 1 : (open_4 == 0 ? 0 : 2))

function GetJavascriptIndent()

if !exists('b:js_cache')

let b:js_cache = [0,0]

end

let line = getline(v:lnum)

let prevline = prevnonblank(v:lnum - 1)

let lnum = s:PrevNonBlankNonString(v:lnum - 1)

if (line !~ '^[''"`]' && synIDattr(synID(v:lnum, 1, 1), 'name') =~? 'string\|template') ||

\ (line !~ '^\s*[/*]' && synIDattr(synID(v:lnum, 1, 1), 'name') =~? 'comment')

return -1

endif

if line !~ '^\%(\/\*\|\s*\/\/\)' && s:IsInComment(v:lnum, 1)

return cindent(v:lnum)

endif

if line =~ '^\s*$' && getline(prevline) =~ '\%(\%(^\s*\/\/\|\/\*\).*\)\@<!\*\/' &&

\ s:IsInComment(prevline, 1)

return indent(prevline) - 1

endif

if line =~ '^\s*$' && lnum != prevline

return indent(prevnonblank(v:lnum))

endif

if lnum == 0

return 0

endif

if (line =~ s:expr_case)

let s:cpo_switch = &cpo

set cpo+=%

let ind = cindent(v:lnum)

let &cpo = s:cpo_switch

let b:js_cache = [v:lnum, search('\<switch\s*(','nbw')]

return ind

endif

let pcounts = [0]

if b:js_cache[0] >= lnum && b:js_cache[0] < v:lnum && b:js_cache[0] &&

\ (b:js_cache[0] > lnum || map(pcounts,'s:LineHasOpeningBrackets(lnum)')[0] !~ '2')

let num = pcounts[0] =~ '1' ? lnum : b:js_cache[1]

else

call cursor(v:lnum,1)

let syns = synIDattr(synID(v:lnum, 1, 1), 'name')

if line[1] =~ '\s'

if syns != ''

let pattern = syns =~? 'funcblock' ? ['{','}'] : syns =~? 'jsparen' ? ['(',')'] : syns =~? 'jsbracket'? ['\[','\]'] :

\ ['(\|{\|\[',')\|}\|\]']

let num = s:lookForParens(pattern[0],pattern[1],'nbw',2000)

else

let num = 0

end

else

let num = s:lookForParens('(\|{\|\[',')\|}\|\]','nbW',2000)

end

end

let b:js_cache = [v:lnum, num]

if line =~ s:line_pre . '[])}]'

return indent(num)

end

let switch_offset = 0

if synIDattr(synID(v:lnum, 1, 1), 'name') =~? 'switch'

let num = search('\<switch\s*(','nbw')

let switch_offset = &cino !~ ':' ? s:sw() :

\ (strlen(matchstr(getline(search(s:expr_case,'nbw')),'^\s*')) - strlen(matchstr(getline(num),'^\s*')))

let b:js_cache[1] = num

endif

if (line =~ s:operator_first ||

\ (getline(lnum) =~ s:continuation_regex && getline(lnum) !~ s:expr_case) ||

\ (s:Onescope(lnum) && line !~ s:line_pre . '{')) &&

\ (num != lnum &&

\ synIDattr(synID(v:lnum, 1, 1), 'name') !~? 'jsdestructuringblock\|args\|jsbracket\|jsparen\|jsobject')

return (num > 0 ? indent(num) : -s:sw()) + (s:sw() * 2) + switch_offset

elseif num > 0

return indent(num) + s:sw() + switch_offset

end

let &cpo = s:cpo_save

unlet s:cpo_save

function! Fixedgq(lnum, count)

let l:tw = &tw ? &tw : 80;

let l:count = a:count

let l:first_char = indent(a:lnum) + 1

if mode() == 'i' " gq was not pressed, but tw was set

return 1

endif

if s:IsInComment(a:lnum, l:first_char)

return 1

endif

if len(getline(a:lnum)) < l:tw && l:count == 1 " No need for gq

return 1

endif

if l:count > 1

while l:count > 1

let l:count -= 1

normal J

endwhile

endif

let l:winview = winsaveview()

call cursor(a:lnum, l:tw + 1)

let orig_breakpoint = searchpairpos(' ', '', '\.', 'bcW', '', a:lnum)

call cursor(a:lnum, l:tw + 1)

let breakpoint = searchpairpos(' ', '', '\.', 'bcW', s:skip_expr, a:lnum)

if breakpoint[1] == orig_breakpoint[1]

call winrestview(l:winview)

return 1

endif

if breakpoint[1] <= indent(a:lnum)

call cursor(a:lnum, l:tw + 1)

let breakpoint = searchpairpos('\.', '', ' ', 'cW', s:skip_expr, a:lnum)

endif

if breakpoint[1] != 0

call feedkeys("r\<CR>")

else

let l:count = l:count - 1

endif

if l:count == 1

call feedkeys("gqq")

endif

return 0