install.fairie/dotfiles/.vim/plugged/vim-carbon-now-sh/plugin/vim-carbon-now-sh.vim
Git E2E Dev Test Username be93c28e01 git subrepo clone (merge) https://github.com/kristijanhusak/vim-carbon-now-sh.git ./dotfiles/.vim/plugged/vim-carbon-now-sh
subrepo:
  subdir:   "dotfiles/.vim/plugged/vim-carbon-now-sh"
  merged:   "31a18d26"
upstream:
  origin:   "https://github.com/kristijanhusak/vim-carbon-now-sh.git"
  branch:   "master"
  commit:   "31a18d26"
git-subrepo:
  version:  "0.4.3"
  origin:   "???"
  commit:   "???"
2022-10-18 10:37:00 -04:00

122 lines
3.2 KiB
VimL

if exists('g:carbon_now_sh_loaded')
finish
endif
let g:carbon_now_sh_loaded = 1
let g:carbon_now_sh_options = get(g:, 'carbon_now_sh_options', {})
let g:carbon_now_sh_browser = get(g:, 'carbon_now_sh_browser', '')
let g:carbon_now_sh_base_url = get(g:, 'carbon_now_sh_base_url', 'https://carbon.now.sh')
let g:carbon_now_sh_trace = get(g:, 'carbon_now_sh_trace', 0)
command! -range=% CarbonNowSh <line1>,<line2>call s:carbonNowSh()
function! s:carbonNowSh() range
let l:text = s:urlEncode(s:getVisualSelection())
let l:browser = s:getBrowser()
let l:options = type(g:carbon_now_sh_options) == v:t_dict ? s:getOptions() : g:carbon_now_sh_options
let l:filetype = &filetype
let l:url = g:carbon_now_sh_base_url .. '/?l=' .. l:filetype .. '&code=' .. l:text .. '&' .. l:options
if g:carbon_now_sh_trace
echom 'navigate to: ' . l:url
endif
if has('win32') && l:browser ==? 'start' && &shell =~? '\<cmd\.exe$'
return system(l:browser .. ' "" "' .. l:url .. '"')
endif
call system(l:browser .. escape(' ' .. l:url, '?&%'))
endfunction
function! s:getBrowser() "{{{
if g:carbon_now_sh_browser !=? ''
return g:carbon_now_sh_browser
endif
if executable('xdg-open')
return 'xdg-open'
endif
if has('win32')
return 'start'
endif
if executable('open')
return 'open'
endif
if executable('google-chrome')
return 'google-chrome'
endif
if executable('firefox')
return 'firefox'
endif
throw 'Browser not found'
endfunction "}}}
function! s:getOptions() "{{{
let l:options = g:carbon_now_sh_options
let l:result = ''
for l:key in keys(l:options)
let l:result = l:result .. '&' .. s:urlEncode(l:key) .. '=' .. s:urlEncode(l:options[key])
endfor
return l:result[1:]
endfunction "}}}
function! s:urlEncode(string) "{{{
let l:result = ''
let l:characters = split(a:string, '.\zs')
for l:character in l:characters
if s:characterRequiresUrlEncoding(l:character)
let l:i = 0
while l:i < strlen(l:character)
let l:byte = strpart(l:character, l:i, 1)
let l:decimal = char2nr(l:byte)
let l:result = l:result .. '%' .. printf('%02x', l:decimal)
let l:i += 1
endwhile
else
let l:result = l:result .. l:character
endif
endfor
return l:result
endfunction "}}}
function! s:characterRequiresUrlEncoding(character) "{{{
let l:ascii_code = char2nr(a:character)
if l:ascii_code >= 48 && l:ascii_code <= 57
return 0
elseif l:ascii_code >= 65 && l:ascii_code <= 90
return 0
elseif l:ascii_code >= 97 && l:ascii_code <= 122
return 0
elseif a:character ==? '-' || a:character ==? '_' || a:character ==? '.' || a:character ==? '~'
return 0
endif
return 1
endfunction "}}}
function! s:getVisualSelection() "{{{
let [l:line_start, l:column_start] = getpos("'<")[1:2]
let [l:line_end, l:column_end] = getpos("'>")[1:2]
let l:lines = getline(l:line_start, l:line_end)
if len(l:lines) == 0
return ''
endif
let l:lines[-1] = l:lines[-1][:l:column_end - (&selection ==? 'inclusive' ? 1 : 2)]
let l:lines[0] = l:lines[0][l:column_start - 1:]
return join(l:lines, "\n")
endfunction "}}}
" vim:foldenable:foldmethod=marker:sw=2