mirror of
https://github.com/amix/vimrc
synced 2025-02-28 14:12:51 +08:00
241 lines
7.5 KiB
VimL
241 lines
7.5 KiB
VimL
" AUTHOR: kanno <akapanna@gmail.com>
|
|
" License: This file is placed in the public domain.
|
|
let s:save_cpo = &cpo
|
|
set cpo&vim
|
|
|
|
let s:V = vital#of('previm')
|
|
let s:File = s:V.import('System.File')
|
|
|
|
let s:newline_character = "\n"
|
|
|
|
function! previm#open(preview_html_file)
|
|
call previm#refresh()
|
|
if exists('g:previm_open_cmd') && !empty(g:previm_open_cmd)
|
|
call s:system(g:previm_open_cmd . ' ''' . a:preview_html_file . '''')
|
|
elseif s:exists_openbrowser()
|
|
" fix temporary(the cause unknown)
|
|
call s:apply_openbrowser('file:///' . a:preview_html_file)
|
|
else
|
|
call s:echo_err('Command for the open can not be found. show detail :h previm#open')
|
|
endif
|
|
endfunction
|
|
|
|
function! s:exists_openbrowser()
|
|
try
|
|
call openbrowser#load()
|
|
return 1
|
|
catch /E117.*/
|
|
return 0
|
|
endtry
|
|
endfunction
|
|
|
|
function! s:apply_openbrowser(path)
|
|
let saved_in_vim = g:openbrowser_open_filepath_in_vim
|
|
try
|
|
let g:openbrowser_open_filepath_in_vim = 0
|
|
call openbrowser#open(a:path)
|
|
finally
|
|
let g:openbrowser_open_filepath_in_vim = saved_in_vim
|
|
endtry
|
|
endfunction
|
|
|
|
function! previm#refresh()
|
|
call previm#refresh_css()
|
|
call previm#refresh_js()
|
|
endfunction
|
|
|
|
function! previm#refresh_css()
|
|
let css = []
|
|
if get(g:, 'previm_disable_default_css', 0) !=# 1
|
|
call extend(css, ["@import url('origin.css');", "@import url('lib/github.css');"])
|
|
endif
|
|
if exists('g:previm_custom_css_path')
|
|
let css_path = expand(g:previm_custom_css_path)
|
|
if filereadable(css_path)
|
|
call s:File.copy(css_path, previm#make_preview_file_path('css/user_custom.css'))
|
|
call add(css, "@import url('user_custom.css');")
|
|
else
|
|
call s:echo_err('[Previm]failed load custom css. ' . css_path)
|
|
endif
|
|
endif
|
|
call writefile(css, previm#make_preview_file_path('css/previm.css'))
|
|
endfunction
|
|
|
|
" TODO: test(refresh_cssと同じように)
|
|
function! previm#refresh_js()
|
|
let encoded_lines = split(iconv(s:function_template(), &encoding, 'utf-8'), s:newline_character)
|
|
call writefile(encoded_lines, previm#make_preview_file_path('js/previm-function.js'))
|
|
endfunction
|
|
|
|
let s:base_dir = expand('<sfile>:p:h')
|
|
function! previm#make_preview_file_path(path)
|
|
return s:base_dir . '/../preview/' . a:path
|
|
endfunction
|
|
|
|
" NOTE: getFileType()の必要性について。
|
|
" js側でファイル名の拡張子から取得すればこの関数は不要だが、
|
|
" その場合「.txtだが内部的なファイルタイプがmarkdown」といった場合に動かなくなる。
|
|
" そのためVim側できちんとファイルタイプを返すようにしている。
|
|
function! s:function_template()
|
|
let current_file = expand('%:p')
|
|
return join([
|
|
\ 'function isShowHeader() {',
|
|
\ printf('return %s;', get(g:, 'previm_show_header', 1)),
|
|
\ '}',
|
|
\ '',
|
|
\ 'function getFileName() {',
|
|
\ printf('return "%s";', s:escape_backslash(current_file)),
|
|
\ '}',
|
|
\ '',
|
|
\ 'function getFileType() {',
|
|
\ printf('return "%s";', &filetype),
|
|
\ '}',
|
|
\ '',
|
|
\ 'function getLastModified() {',
|
|
\ printf('return "%s";', s:get_last_modified_time()),
|
|
\ '}',
|
|
\ '',
|
|
\ 'function getContent() {',
|
|
\ printf('return "%s";', previm#convert_to_content(getline(1, '$'))),
|
|
\ '}',
|
|
\], s:newline_character)
|
|
endfunction
|
|
|
|
function! s:get_last_modified_time()
|
|
if exists('*strftime')
|
|
return strftime("%Y/%m/%d (%a) %H:%M:%S")
|
|
endif
|
|
return '(strftime cannot be performed.)'
|
|
endfunction
|
|
|
|
function! s:escape_backslash(text)
|
|
return escape(a:text, '\')
|
|
endfunction
|
|
|
|
function! s:system(cmd)
|
|
if get(g:, 'previm_disable_vimproc', 0)
|
|
return system(a:cmd)
|
|
endif
|
|
|
|
try
|
|
" NOTE: WindowsでDOS窓を開かず実行してくれるらしいのでvimprocを使う
|
|
let result = vimproc#system(a:cmd)
|
|
return result
|
|
catch /E117.*/
|
|
return system(a:cmd)
|
|
endtry
|
|
endfunction
|
|
|
|
function! s:do_external_parse(lines)
|
|
if &filetype !=# "rst"
|
|
return a:lines
|
|
endif
|
|
" NOTE: 本来は外部コマンドに頼りたくない
|
|
" いずれjsパーサーが出てきたときに移行するが、
|
|
" その時に混乱を招かないように設定でrst2htmlへのパスを持つことはしない
|
|
let cmd = ''
|
|
if executable("rst2html.py") ==# 1
|
|
let cmd = "rst2html.py"
|
|
elseif executable("rst2html") ==# 1
|
|
let cmd = "rst2html"
|
|
endif
|
|
|
|
if empty(cmd)
|
|
call s:echo_err("rst2html.py or rst2html has not been installed, you can not run")
|
|
return a:lines
|
|
endif
|
|
let temp = tempname()
|
|
call writefile(a:lines, temp)
|
|
return split(s:system(cmd . ' ' . s:escape_backslash(temp)), "\n")
|
|
endfunction
|
|
|
|
function! previm#convert_to_content(lines)
|
|
let mkd_dir = s:escape_backslash(expand('%:p:h'))
|
|
if has("win32unix")
|
|
" convert cygwin path to windows path
|
|
let mkd_dir = s:escape_backslash(substitute(system('cygpath -wa ' . mkd_dir), "\n$", '', ''))
|
|
endif
|
|
let converted_lines = []
|
|
for line in s:do_external_parse(a:lines)
|
|
" TODO エスケープの理由と順番の依存度が複雑
|
|
let escaped = substitute(line, '\', '\\\\', 'g')
|
|
let escaped = previm#relative_to_absolute_imgpath(escaped, mkd_dir)
|
|
let escaped = substitute(escaped, '"', '\\"', 'g')
|
|
call add(converted_lines, escaped)
|
|
endfor
|
|
return join(converted_lines, "\\n")
|
|
endfunction
|
|
|
|
" convert example
|
|
" if unix:
|
|
" 
|
|
" if win:
|
|
" 
|
|
function! previm#relative_to_absolute_imgpath(text, mkd_dir)
|
|
let elem = previm#fetch_imgpath_elements(a:text)
|
|
if empty(elem.path)
|
|
return a:text
|
|
endif
|
|
for protocol in ['http://', 'https://', 'file://']
|
|
if s:start_with(elem.path, protocol)
|
|
" is absolute path
|
|
return a:text
|
|
endif
|
|
endfor
|
|
|
|
" escape backslash for substitute (see pull/#34)
|
|
let dir = substitute(a:mkd_dir, '\\', '\\\\', 'g')
|
|
let elem.path = substitute(elem.path, '\\', '\\\\', 'g')
|
|
|
|
" マルチバイトの解釈はブラウザに任せるのでURLエンコードしない
|
|
" 半角空白だけはエラーの原因になるのでURLエンコード対象とする
|
|
let pre_slash = s:start_with(dir, '/') ? '' : '/'
|
|
let local_path = substitute(dir.'/'.elem.path, ' ', '%20', 'g')
|
|
|
|
let prev_imgpath = ''
|
|
let new_imgpath = ''
|
|
if empty(elem.title)
|
|
let prev_imgpath = printf('!\[%s\](%s)', elem.alt, elem.path)
|
|
let new_imgpath = printf('', elem.alt, pre_slash, local_path)
|
|
else
|
|
let prev_imgpath = printf('!\[%s\](%s "%s")', elem.alt, elem.path, elem.title)
|
|
let new_imgpath = printf('', elem.alt, pre_slash, local_path, elem.title)
|
|
endif
|
|
|
|
" unify quote
|
|
let text = substitute(a:text, "'", '"', 'g')
|
|
return substitute(text, prev_imgpath, new_imgpath, '')
|
|
endfunction
|
|
|
|
function! previm#fetch_imgpath_elements(text)
|
|
let elem = {'alt': '', 'path': '', 'title': ''}
|
|
let matched = matchlist(a:text, '!\[\(.*\)\](\(.*\))')
|
|
if empty(matched)
|
|
return elem
|
|
endif
|
|
let elem.alt = matched[1]
|
|
return extend(elem, s:fetch_path_and_title(matched[2]))
|
|
endfunction
|
|
|
|
function! s:fetch_path_and_title(path)
|
|
let matched = matchlist(a:path, '\(.*\)\s\+["'']\(.*\)["'']')
|
|
if empty(matched)
|
|
return {'path': a:path}
|
|
endif
|
|
let trimmed_path = matchstr(matched[1],'^\s*\zs.\{-}\ze\s*$')
|
|
return {'path': trimmed_path, 'title': matched[2]}
|
|
endfunction
|
|
|
|
function! s:start_with(haystock, needle)
|
|
return stridx(a:haystock, a:needle) ==# 0
|
|
endfunction
|
|
|
|
function! s:echo_err(msg)
|
|
echohl WarningMsg
|
|
echomsg a:msg
|
|
echohl None
|
|
endfunction
|
|
|
|
let &cpo = s:save_cpo
|
|
unlet! s:save_cpo
|