diff options
Diffstat (limited to 'config/vim/autoload/colorizer.vim')
-rw-r--r-- | config/vim/autoload/colorizer.vim | 377 |
1 files changed, 377 insertions, 0 deletions
diff --git a/config/vim/autoload/colorizer.vim b/config/vim/autoload/colorizer.vim new file mode 100644 index 0000000..19b10be --- /dev/null +++ b/config/vim/autoload/colorizer.vim @@ -0,0 +1,377 @@ +" colorizer.vim Colorize all text in the form #rrggbb or #rgb; autoload functions +" Maintainer: lilydjwg <lilydjwg@gmail.com> +" Version: 1.4.1 +" License: Vim License (see vim's :help license) +" +" See plugin/colorizer.vim for more info. + +let s:keepcpo = &cpo +set cpo&vim + +function! s:FGforBG(bg) "{{{1 + " takes a 6hex color code and returns a matching color that is visible + let pure = substitute(a:bg,'^#','','') + let r = eval('0x'.pure[0].pure[1]) + let g = eval('0x'.pure[2].pure[3]) + let b = eval('0x'.pure[4].pure[5]) + let fgc = g:colorizer_fgcontrast + if r*30 + g*59 + b*11 > 12000 + return s:predefined_fgcolors['dark'][fgc] + else + return s:predefined_fgcolors['light'][fgc] + end +endfunction + +function! s:Rgb2xterm(color) "{{{1 + " selects the nearest xterm color for a rgb value like #FF0000 + let best_match=0 + let smallest_distance = 10000000000 + let r = eval('0x'.a:color[1].a:color[2]) + let g = eval('0x'.a:color[3].a:color[4]) + let b = eval('0x'.a:color[5].a:color[6]) + let colortable = s:GetXterm2rgbTable() + for c in range(0,254) + let d = pow(colortable[c][0]-r,2) + pow(colortable[c][1]-g,2) + pow(colortable[c][2]-b,2) + if d<smallest_distance + let smallest_distance = d + let best_match = c + endif + endfor + return best_match +endfunction + +"" the 6 value iterations in the xterm color cube {{{1 +let s:valuerange = [0x00, 0x5F, 0x87, 0xAF, 0xD7, 0xFF] + +"" 16 basic colors {{{1 +let s:basic16 = [ + \ [0x00, 0x00, 0x00], [0xCD, 0x00, 0x00], + \ [0x00, 0xCD, 0x00], [0xCD, 0xCD, 0x00], + \ [0x00, 0x00, 0xEE], [0xCD, 0x00, 0xCD], + \ [0x00, 0xCD, 0xCD], [0xE5, 0xE5, 0xE5], + \ [0x7F, 0x7F, 0x7F], [0xFF, 0x00, 0x00], + \ [0x00, 0xFF, 0x00], [0xFF, 0xFF, 0x00], + \ [0x5C, 0x5C, 0xFF], [0xFF, 0x00, 0xFF], + \ [0x00, 0xFF, 0xFF], [0xFF, 0xFF, 0xFF]] + +function! s:Xterm2rgb(color) "{{{1 + " 16 basic colors + let r = 0 + let g = 0 + let b = 0 + if a:color<16 + let r = s:basic16[a:color][0] + let g = s:basic16[a:color][1] + let b = s:basic16[a:color][2] + endif + + " color cube color + if a:color>=16 && a:color<=232 + let l:color=a:color-16 + let r = s:valuerange[(l:color/36)%6] + let g = s:valuerange[(l:color/6)%6] + let b = s:valuerange[l:color%6] + endif + + " gray tone + if a:color>=233 && a:color<=253 + let r=8+(a:color-232)*0x0a + let g=r + let b=r + endif + let rgb=[r,g,b] + return rgb +endfunction + +function! s:SetMatcher(color, pat) "{{{1 + " "color" is the converted color and "pat" is what to highlight + let group = 'Color' . strpart(a:color, 1) + if !hlexists(group) || s:force_group_update + let fg = g:colorizer_fgcontrast < 0 ? a:color : s:FGforBG(a:color) + if &t_Co == 256 + exe 'hi '.group.' ctermfg='.s:Rgb2xterm(fg).' ctermbg='.s:Rgb2xterm(a:color) + endif + " Always set gui* as user may switch to GUI version and it's cheap + exe 'hi '.group.' guifg='.fg.' guibg='.a:color + endif + if !exists("w:colormatches[a:pat]") + let w:colormatches[a:pat] = matchadd(group, a:pat) + endif +endfunction + +"ColorFinders {{{1 +function! s:HexCode(str, lineno) "{{{2 + let ret = [] + let place = 0 + let colorpat = '#[0-9A-Fa-f]\{3\}\>\|#[0-9A-Fa-f]\{6\}\>' + while 1 + let foundcolor = matchstr(a:str, colorpat, place) + if foundcolor == '' + break + endif + let place = matchend(a:str, colorpat, place) + let pat = foundcolor . '\>' + if len(foundcolor) == 4 + let foundcolor = substitute(foundcolor, '[[:xdigit:]]', '&&', 'g') + endif + call add(ret, [foundcolor, pat]) + endwhile + return ret +endfunction + +function! s:RgbColor(str, lineno) "{{{2 + let ret = [] + let place = 0 + let colorpat = '\<rgb(\v\s*(\d+(\%)?)\s*,\s*(\d+%(\2))\s*,\s*(\d+%(\2))\s*\)' + while 1 + let foundcolor = matchlist(a:str, colorpat, place) + if empty(foundcolor) + break + endif + let place = matchend(a:str, colorpat, place) + if foundcolor[2] == '%' + let r = foundcolor[1] * 255 / 100 + let g = foundcolor[3] * 255 / 100 + let b = foundcolor[4] * 255 / 100 + else + let r = foundcolor[1] + let g = foundcolor[3] + let b = foundcolor[4] + endif + if r > 255 || g > 255 || b > 255 + break + endif + let pat = printf('\<rgb(\v\s*%s\s*,\s*%s\s*,\s*%s\s*\)', foundcolor[1], foundcolor[3], foundcolor[4]) + if foundcolor[2] == '%' + let pat = substitute(pat, '%', '\\%', 'g') + endif + let l:color = printf('#%02x%02x%02x', r, g, b) + call add(ret, [l:color, pat]) + endwhile + return ret +endfunction + +function! s:RgbaColor(str, lineno) "{{{2 + if has("gui_running") + let bg = synIDattr(synIDtrans(hlID("Normal")), "bg") + let bg_r = str2nr(bg[1].bg[2], 16) + let bg_g = str2nr(bg[3].bg[4], 16) + let bg_b = str2nr(bg[5].bg[6], 16) + else + " translucent colors would display incorrectly, so ignore the alpha value + return s:RgbaColorForTerm(a:str, a:lineno) + endif + let ret = [] + let place = 0 + let colorpat = '\<rgba(\v\s*(\d+(\%)?)\s*,\s*(\d+%(\2))\s*,\s*(\d+%(\2))\s*,\s*(-?[.[:digit:]]+)\s*\)' + while 1 + let foundcolor = matchlist(a:str, colorpat, place) + if empty(foundcolor) + break + endif + let place = matchend(a:str, colorpat, place) + if foundcolor[2] == '%' + let ar = foundcolor[1] * 255 / 100 + let ag = foundcolor[3] * 255 / 100 + let ab = foundcolor[4] * 255 / 100 + else + let ar = foundcolor[1] + let ag = foundcolor[3] + let ab = foundcolor[4] + endif + if ar > 255 || ag > 255 || ab > 255 + break + endif + let alpha = str2float(foundcolor[5]) + if alpha < 0 + let alpha = 0.0 + elseif alpha > 1 + let alpha = 1.0 + endif + let pat = printf('\<rgba(\v\s*%s\s*,\s*%s\s*,\s*%s\s*,\s*%s0*\s*\)', foundcolor[1], foundcolor[3], foundcolor[4], foundcolor[5]) + if foundcolor[2] == '%' + let pat = substitute(pat, '%', '\\%', 'g') + endif + let r = float2nr(ceil(ar * alpha) + ceil(bg_r * (1 - alpha))) + let g = float2nr(ceil(ag * alpha) + ceil(bg_g * (1 - alpha))) + let b = float2nr(ceil(ab * alpha) + ceil(bg_b * (1 - alpha))) + if r > 255 + let r = 255 + endif + if g > 255 + let g = 255 + endif + if b > 255 + let b = 255 + endif + let l:color = printf('#%02x%02x%02x', r, g, b) + call add(ret, [l:color, pat]) + endwhile + return ret +endfunction + +function! s:RgbaColorForTerm(str, lineno) "{{{2 + let ret = [] + let place = 0 + let colorpat = '\<rgba(\v\s*(\d+(\%)?)\s*,\s*(\d+%(\2))\s*,\s*(\d+%(\2))\s*,\s*(-?[.[:digit:]]+)\s*\)' + while 1 + let foundcolor = matchlist(a:str, colorpat, place) + if empty(foundcolor) + break + endif + let place = matchend(a:str, colorpat, place) + if foundcolor[2] == '%' + let ar = foundcolor[1] * 255 / 100 + let ag = foundcolor[3] * 255 / 100 + let ab = foundcolor[4] * 255 / 100 + else + let ar = foundcolor[1] + let ag = foundcolor[3] + let ab = foundcolor[4] + endif + if ar > 255 || ag > 255 || ab > 255 + break + endif + let pat = printf('\<rgba(\v\s*%s\s*,\s*%s\s*,\s*%s\s*,\ze\s*(-?[.[:digit:]]+)\s*\)', foundcolor[1], foundcolor[3], foundcolor[4]) + if foundcolor[2] == '%' + let pat = substitute(pat, '%', '\\%', 'g') + endif + let l:color = printf('#%02x%02x%02x', ar, ag, ab) + call add(ret, [l:color, pat]) + endwhile + return ret +endfunction + +function! s:PreviewColorInLine(where) "{{{1 + let line = getline(a:where) + for Func in s:ColorFinder + let ret = Func(line, a:where) + " returned a list of a list: color as #rrggbb, text pattern to highlight + for r in ret + call s:SetMatcher(r[0], r[1]) + endfor + endfor +endfunction + +function! s:CursorMoved() "{{{1 + if !exists('w:colormatches') + return + endif + if exists('b:colorizer_last_update') + if b:colorizer_last_update == b:changedtick + " Nothing changed + return + endif + endif + call s:PreviewColorInLine('.') + let b:colorizer_last_update = b:changedtick +endfunction + +function! s:TextChanged() "{{{1 + if !exists('w:colormatches') + return + endif + echomsg "TextChanged" + call s:PreviewColorInLine('.') +endfunction + +function! colorizer#ColorHighlight(update, ...) "{{{1 + if exists('w:colormatches') + if !a:update + return + endif + call s:ClearMatches() + endif + let w:colormatches = {} + if g:colorizer_fgcontrast != s:saved_fgcontrast || (exists("a:1") && a:1 == '!') + let s:force_group_update = 1 + endif + for i in range(1, line("$")) + call s:PreviewColorInLine(i) + endfor + let s:force_group_update = 0 + let s:saved_fgcontrast = g:colorizer_fgcontrast + augroup Colorizer + au! + if exists('##TextChanged') + autocmd TextChanged * silent call s:TextChanged() + if v:version > 704 || v:version == 704 && has('patch143') + autocmd TextChangedI * silent call s:TextChanged() + else + " TextChangedI does not work as expected + autocmd CursorMovedI * silent call s:CursorMoved() + endif + else + autocmd CursorMoved,CursorMovedI * silent call s:CursorMoved() + endif + " rgba handles differently, so need updating + autocmd GUIEnter * silent call colorizer#ColorHighlight(1) + autocmd BufRead * silent call colorizer#ColorHighlight(1) + autocmd WinEnter * silent call colorizer#ColorHighlight(1) + autocmd ColorScheme * let s:force_group_update=1 | silent call colorizer#ColorHighlight(1) + augroup END +endfunction + +function! colorizer#ColorClear() "{{{1 + augroup Colorizer + au! + augroup END + let save_tab = tabpagenr() + let save_win = winnr() + tabdo windo call s:ClearMatches() + exe 'tabn '.save_tab + exe save_win . 'wincmd w' +endfunction + +function! s:ClearMatches() "{{{1 + if !exists('w:colormatches') + return + endif + for i in values(w:colormatches) + call matchdelete(i) + endfor + unlet w:colormatches +endfunction + +function! colorizer#ColorToggle() "{{{1 + if exists('#Colorizer#BufRead') + call colorizer#ColorClear() + echomsg 'Disabled color code highlighting.' + else + call colorizer#ColorHighlight(0) + echomsg 'Enabled color code highlighting.' + endif +endfunction + +function! s:GetXterm2rgbTable() + if !exists('s:table_xterm2rgb') + let s:table_xterm2rgb = [] + for c in range(0, 254) + let s:color = s:Xterm2rgb(c) + call add(s:table_xterm2rgb, s:color) + endfor + endif + return s:table_xterm2rgb +endfun + +" Setups {{{1 +let s:ColorFinder = [function('s:HexCode'), function('s:RgbColor'), function('s:RgbaColor')] +let s:force_group_update = 0 +let s:predefined_fgcolors = {} +let s:predefined_fgcolors['dark'] = ['#444444', '#222222', '#000000'] +let s:predefined_fgcolors['light'] = ['#bbbbbb', '#dddddd', '#ffffff'] +if !exists("g:colorizer_fgcontrast") + " Default to black / white + let g:colorizer_fgcontrast = len(s:predefined_fgcolors['dark']) - 1 +elseif g:colorizer_fgcontrast >= len(s:predefined_fgcolors['dark']) + echohl WarningMsg + echo "g:colorizer_fgcontrast value invalid, using default" + echohl None + let g:colorizer_fgcontrast = len(s:predefined_fgcolors['dark']) - 1 +endif +let s:saved_fgcontrast = g:colorizer_fgcontrast + +" Restoration and modelines {{{1 +let &cpo = s:keepcpo +unlet s:keepcpo +" vim:ft=vim:fdm=marker:fmr={{{,}}}: |