diff -r 000000000000 -r f37ff08522ed ftplugin/PEM/folding.vim --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/ftplugin/PEM/folding.vim Sat Jun 27 21:55:53 2015 +0200 @@ -0,0 +1,102 @@ +" vim: foldmethod=marker +set foldmethod=expr +set foldexpr=GetPEMfold(v:lnum) +set foldtext=SetFoldTextCN() + +function! GetPEMfold(lnum) +"{{{1 + if getline(a:lnum) =~? '\v^\s*$' + return '-1' + elseif getline(a:lnum) =~? '\v^certificate:' + return '>1' + elseif getline(a:lnum) =~? '\v^-{5}begin\scertificate-{5}' + return '>1' + endif + + let this_indent = GetShiftLevel(a:lnum) + let next_indent = GetShiftLevel(GetNonBlankLines(a:lnum)) + let begin_cert = GetShiftLevel(GetBeginCertificate(a:lnum)) + + if this_indent == begin_cert + return '1' + elseif this_indent == next_indent || this_indent > next_indent + return this_indent + elseif this_indent < next_indent + return '>' . next_indent + endif + +endfunction +"}}} + +function! GetShiftLevel(lnum) +"{{{1 + "return indent(a:lnum) / &shiftwidth + return indent(a:lnum) / 4 +endfunction +"}}} + +function! GetNonBlankLines(lnum) +"{{{1 + let numlines = line('$') + let current = a:lnum + 1 + + while current <= numlines + if getline(current) =~? '\v\S' + return current + endif + + let current += 1 + + endwhile + + return -2 +endfunction +"}}} + +function! GetBeginCertificate(lnum) +"{{{1 + let numlines = line('$') + let current = a:lnum + 1 + + while current <= numlines + if getline(current) =~? '\v^-{5}begin\scertificate-{5}' + return current + endif + + let current += 1 + endwhile + +endfunction +"}}} + +function! SetFoldTextCN() +"{{{1 + + let line = getline(v:foldstart) + let lines_count = v:foldend - v:foldstart + 1 + let lines_count_text = '| ' . printf("%10s", lines_count . ' lines') . ' |' + let foldchar = matchstr(&fillchars, 'fold:\zs.') + let foldtextstart = strpart('+' . repeat(foldchar, v:foldlevel*2) . line, 0, (winwidth(0)*2)/3) + let foldtextend = lines_count_text . repeat(foldchar, 8) + + if match( line, 'Certificate:.*' ) == 0 + let current = line + 1 + + while current <= lines_count + if ( getline(current) =~? 'CN=.*') + let inLine = getline(current) + let CName = substitute( inLine, '.*CN=\(.*$\)', "\\1", 'g') + endif + let current += 1 + endwhile + + let foldtextlength = strlen(substitute(foldtextstart . CName . foldtextend, '.', 'x', 'g')) + &foldcolumn + return foldtextstart . ' ' . CName . repeat(foldchar, winwidth(0)-foldtextlength-1) . foldtextend + + else + let foldtextlength = strlen(substitute(foldtextstart . foldtextend, '.', 'x', 'g')) + &foldcolumn + return foldtextstart . repeat(foldchar, winwidth(0)-foldtextlength) . foldtextend + endif + +endfunction +"}}}