2010-07-11 22:38:52 +02:00
|
|
|
" Vim autoload file for the tohtml plugin.
|
2010-07-16 20:35:36 +02:00
|
|
|
" Maintainer: Ben Fritz <fritzophrenic@gmail.com>
|
2010-07-29 20:43:36 +02:00
|
|
|
" Last Change: 2010 Jul 29
|
2010-07-11 22:38:52 +02:00
|
|
|
"
|
2010-07-16 20:35:36 +02:00
|
|
|
" Additional contributors:
|
|
|
|
"
|
2010-07-18 14:07:22 +02:00
|
|
|
" Original by Bram Moolenaar <Bram@vim.org>
|
|
|
|
" Diff2HTML() added by Christian Brabandt <cb@256bit.org>
|
2010-07-16 20:35:36 +02:00
|
|
|
"
|
2010-07-18 14:07:22 +02:00
|
|
|
" See Mercurial change logs for more!
|
|
|
|
|
2010-07-16 20:35:36 +02:00
|
|
|
" this file uses line continuations
|
|
|
|
let s:cpo_sav = &cpo
|
|
|
|
set cpo-=C
|
2010-07-11 22:38:52 +02:00
|
|
|
|
|
|
|
func! tohtml#Convert2HTML(line1, line2)
|
2010-07-16 20:35:36 +02:00
|
|
|
let old_vals = tohtml#OverrideUserSettings()
|
|
|
|
|
|
|
|
if !&diff || exists("g:html_diff_one_file")
|
2010-07-11 22:38:52 +02:00
|
|
|
if a:line2 >= a:line1
|
|
|
|
let g:html_start_line = a:line1
|
|
|
|
let g:html_end_line = a:line2
|
|
|
|
else
|
|
|
|
let g:html_start_line = a:line2
|
|
|
|
let g:html_end_line = a:line1
|
|
|
|
endif
|
|
|
|
runtime syntax/2html.vim
|
|
|
|
else
|
|
|
|
let win_list = []
|
|
|
|
let buf_list = []
|
2010-07-16 20:35:36 +02:00
|
|
|
windo | if &diff | call add(win_list, winbufnr(0)) | endif
|
2010-07-11 22:38:52 +02:00
|
|
|
let save_hwf = exists("g:html_whole_filler")
|
|
|
|
let g:html_whole_filler = 1
|
2010-07-16 20:35:36 +02:00
|
|
|
let g:html_diff_win_num = 0
|
2010-07-11 22:38:52 +02:00
|
|
|
for window in win_list
|
|
|
|
exe ":" . bufwinnr(window) . "wincmd w"
|
|
|
|
let g:html_start_line = 1
|
|
|
|
let g:html_end_line = line('$')
|
2010-07-16 20:35:36 +02:00
|
|
|
let g:html_diff_win_num += 1
|
2010-07-11 22:38:52 +02:00
|
|
|
runtime syntax/2html.vim
|
|
|
|
call add(buf_list, bufnr('%'))
|
|
|
|
endfor
|
2010-07-16 20:35:36 +02:00
|
|
|
unlet g:html_diff_win_num
|
2010-07-11 22:38:52 +02:00
|
|
|
if !save_hwf
|
|
|
|
unlet g:html_whole_filler
|
|
|
|
endif
|
|
|
|
call tohtml#Diff2HTML(win_list, buf_list)
|
|
|
|
endif
|
|
|
|
|
2010-07-16 20:35:36 +02:00
|
|
|
call tohtml#RestoreUserSettings(old_vals)
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
unlet g:html_start_line
|
|
|
|
unlet g:html_end_line
|
|
|
|
endfunc
|
|
|
|
|
|
|
|
func! tohtml#Diff2HTML(win_list, buf_list)
|
2010-07-16 20:35:36 +02:00
|
|
|
" TODO: add logic for xhtml
|
2010-07-29 20:43:36 +02:00
|
|
|
let style = ['-->']
|
|
|
|
let body_line = ''
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
let html = []
|
|
|
|
call add(html, '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"')
|
|
|
|
call add(html, ' "http://www.w3.org/TR/html4/loose.dtd">')
|
|
|
|
call add(html, '<html>')
|
|
|
|
call add(html, '<head>')
|
|
|
|
call add(html, '<title>diff</title>')
|
2010-07-16 20:35:36 +02:00
|
|
|
call add(html, '<meta name="Generator" content="Vim/'.v:version/100.'.'.v:version%100.'">')
|
2010-07-25 12:46:44 +02:00
|
|
|
call add(html, '<meta name="plugin-version" content="'.g:loaded_2html_plugin.'">')
|
2010-07-16 20:35:36 +02:00
|
|
|
" TODO: copy or move encoding logic from 2html.vim so generated markup can
|
|
|
|
" validate without warnings about encoding
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
call add(html, '</head>')
|
2010-07-29 20:43:36 +02:00
|
|
|
let body_line_num = len(html)
|
2010-07-11 22:38:52 +02:00
|
|
|
call add(html, '<body>')
|
|
|
|
call add(html, '<table border="1" width="100%">')
|
2010-07-16 20:35:36 +02:00
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
call add(html, '<tr>')
|
|
|
|
for buf in a:win_list
|
|
|
|
call add(html, '<th>'.bufname(buf).'</th>')
|
|
|
|
endfor
|
|
|
|
call add(html, '</tr><tr>')
|
|
|
|
|
2010-07-29 20:43:36 +02:00
|
|
|
let diff_style_start = 0
|
|
|
|
let insert_index = 0
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
for buf in a:buf_list
|
|
|
|
let temp = []
|
|
|
|
exe bufwinnr(buf) . 'wincmd w'
|
|
|
|
|
2010-07-16 20:35:36 +02:00
|
|
|
" If text is folded because of user foldmethod settings, etc. we don't want
|
|
|
|
" to act on everything in a fold by mistake.
|
|
|
|
setlocal nofoldenable
|
|
|
|
|
2010-07-29 20:43:36 +02:00
|
|
|
" When not using CSS or when using xhtml, the <body> line can be important.
|
|
|
|
" Assume it will be the same for all buffers and grab it from the first
|
|
|
|
" buffer. Similarly, need to grab the body end line as well.
|
|
|
|
if body_line == ''
|
|
|
|
1
|
|
|
|
call search('<body')
|
|
|
|
let body_line = getline('.')
|
|
|
|
$
|
|
|
|
call search('</body>', 'b')
|
|
|
|
let s:body_end_line = getline('.')
|
|
|
|
endif
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
" Grab the style information. Some of this will be duplicated...
|
|
|
|
1
|
|
|
|
let style_start = search('^<style type="text/css">')
|
|
|
|
1
|
|
|
|
let style_end = search('^</style>')
|
|
|
|
if style_start > 0 && style_end > 0
|
2010-07-29 20:43:36 +02:00
|
|
|
let buf_styles = getline(style_start + 1, style_end - 1)
|
|
|
|
for a_style in buf_styles
|
|
|
|
if index(style, a_style) == -1
|
|
|
|
if diff_style_start == 0
|
|
|
|
if a_style =~ '\<Diff\(Change\|Text\|Add\|Delete\)'
|
|
|
|
let diff_style_start = len(style)-1
|
|
|
|
endif
|
|
|
|
endif
|
|
|
|
call insert(style, a_style, insert_index)
|
|
|
|
let insert_index += 1
|
|
|
|
endif
|
|
|
|
endfor
|
|
|
|
endif
|
|
|
|
|
|
|
|
if diff_style_start != 0
|
|
|
|
let insert_index = diff_style_start
|
2010-07-11 22:38:52 +02:00
|
|
|
endif
|
|
|
|
|
|
|
|
" Delete those parts that are not needed so
|
|
|
|
" we can include the rest into the resulting table
|
|
|
|
1,/^<body/d_
|
|
|
|
$
|
|
|
|
?</body>?,$d_
|
|
|
|
let temp = getline(1,'$')
|
|
|
|
" undo deletion of start and end part
|
|
|
|
" so we can later save the file as valid html
|
2010-07-16 20:35:36 +02:00
|
|
|
" TODO: restore using grabbed lines if undolevel is 1?
|
2010-07-11 22:38:52 +02:00
|
|
|
normal 2u
|
2010-07-16 20:35:36 +02:00
|
|
|
call add(html, '<td nowrap valign="top"><div>')
|
2010-07-11 22:38:52 +02:00
|
|
|
let html += temp
|
2010-07-16 20:35:36 +02:00
|
|
|
call add(html, '</div></td>')
|
2010-07-11 22:38:52 +02:00
|
|
|
|
|
|
|
" Close this buffer
|
2010-07-16 20:35:36 +02:00
|
|
|
" TODO: the comment above says we're going to allow saving the file
|
|
|
|
" later...but here we discard it?
|
2010-07-11 22:38:52 +02:00
|
|
|
quit!
|
|
|
|
endfor
|
|
|
|
|
2010-07-29 20:43:36 +02:00
|
|
|
let html[body_line_num] = body_line
|
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
call add(html, '</tr>')
|
|
|
|
call add(html, '</table>')
|
2010-07-29 20:43:36 +02:00
|
|
|
call add(html, s:body_end_line)
|
2010-07-11 22:38:52 +02:00
|
|
|
call add(html, '</html>')
|
|
|
|
|
|
|
|
let i = 1
|
|
|
|
let name = "Diff" . ".html"
|
2010-07-16 20:35:36 +02:00
|
|
|
" Find an unused file name if current file name is already in use
|
2010-07-11 22:38:52 +02:00
|
|
|
while filereadable(name)
|
|
|
|
let name = substitute(name, '\d*\.html$', '', '') . i . ".html"
|
|
|
|
let i += 1
|
2010-07-16 20:35:36 +02:00
|
|
|
endwhile
|
|
|
|
exe "topleft new " . name
|
|
|
|
setlocal modifiable
|
|
|
|
|
|
|
|
" just in case some user autocmd creates content in the new buffer, make sure
|
|
|
|
" it is empty before proceeding
|
|
|
|
%d
|
2010-07-11 22:38:52 +02:00
|
|
|
call append(0, html)
|
2010-07-16 20:35:36 +02:00
|
|
|
|
2010-07-11 22:38:52 +02:00
|
|
|
if len(style) > 0
|
|
|
|
1
|
2010-07-16 20:35:36 +02:00
|
|
|
let style_start = search('^</head>')-1
|
|
|
|
|
|
|
|
" Insert javascript to toggle matching folds open and closed in all windows,
|
|
|
|
" if dynamic folding is active.
|
|
|
|
if exists("g:html_dynamic_folds")
|
|
|
|
call append(style_start, [
|
2010-07-18 14:07:22 +02:00
|
|
|
\ "<script type='text/javascript'>",
|
|
|
|
\ " <!--",
|
|
|
|
\ " function toggleFold(objID)",
|
|
|
|
\ " {",
|
|
|
|
\ " for (win_num = 1; win_num <= ".len(a:buf_list)."; win_num++)",
|
|
|
|
\ " {",
|
|
|
|
\ " var fold;",
|
|
|
|
\ ' fold = document.getElementById("win"+win_num+objID);',
|
|
|
|
\ " if(fold.className == 'closed-fold')",
|
|
|
|
\ " {",
|
|
|
|
\ " fold.className = 'open-fold';",
|
|
|
|
\ " }",
|
|
|
|
\ " else if (fold.className == 'open-fold')",
|
|
|
|
\ " {",
|
|
|
|
\ " fold.className = 'closed-fold';",
|
|
|
|
\ " }",
|
|
|
|
\ " }",
|
|
|
|
\ " }",
|
|
|
|
\ " -->",
|
|
|
|
\ "</script>"
|
|
|
|
\ ])
|
2010-07-16 20:35:36 +02:00
|
|
|
endif
|
|
|
|
|
|
|
|
" Insert styles from all the generated html documents and additional styles
|
|
|
|
" for the table-based layout of the side-by-side diff. The diff should take
|
|
|
|
" up the full browser window (but not more), and be static in size,
|
|
|
|
" horizontally scrollable when the lines are too long. Otherwise, the diff
|
|
|
|
" is pretty useless for really long lines.
|
|
|
|
if exists("g:html_use_css")
|
|
|
|
call append(style_start, [
|
2010-07-18 14:07:22 +02:00
|
|
|
\ '<style type="text/css">']+
|
|
|
|
\ style+[
|
|
|
|
\ '<!--',
|
|
|
|
\ 'table { table-layout: fixed; }',
|
|
|
|
\ 'html, body, table, tbody { width: 100%; margin: 0; padding: 0; }',
|
|
|
|
\ 'th, td { width: '.printf("%.1f",100.0/len(a:win_list)).'%; }',
|
|
|
|
\ 'td div { overflow: auto; }',
|
|
|
|
\ '-->',
|
|
|
|
\ '</style>'
|
|
|
|
\ ])
|
2010-07-16 20:35:36 +02:00
|
|
|
endif
|
|
|
|
endif
|
|
|
|
endfunc
|
|
|
|
|
|
|
|
func! tohtml#OverrideUserSettings()
|
|
|
|
let old_settings = {}
|
|
|
|
" make copies of the user-defined settings that we may overrule
|
|
|
|
let old_settings.html_dynamic_folds = exists("g:html_dynamic_folds")
|
|
|
|
let old_settings.html_hover_unfold = exists("g:html_hover_unfold")
|
|
|
|
let old_settings.html_use_css = exists("g:html_use_css")
|
|
|
|
|
|
|
|
" hover opening implies dynamic folding
|
|
|
|
if exists("g:html_hover_unfold")
|
|
|
|
let g:html_dynamic_folds = 1
|
2010-07-11 22:38:52 +02:00
|
|
|
endif
|
2010-07-16 20:35:36 +02:00
|
|
|
|
|
|
|
" dynamic folding with no foldcolumn implies hover opens
|
|
|
|
if exists("g:html_dynamic_folds") && exists("g:html_no_foldcolumn")
|
|
|
|
let g:html_hover_unfold = 1
|
|
|
|
endif
|
|
|
|
|
|
|
|
" ignore folding overrides dynamic folding
|
|
|
|
if exists("g:html_ignore_folding") && exists("g:html_dynamic_folds")
|
|
|
|
unlet g:html_dynamic_folds
|
|
|
|
endif
|
|
|
|
|
|
|
|
" dynamic folding implies css
|
|
|
|
if exists("g:html_dynamic_folds")
|
|
|
|
let g:html_use_css = 1
|
|
|
|
endif
|
|
|
|
|
|
|
|
return old_settings
|
2010-07-11 22:38:52 +02:00
|
|
|
endfunc
|
2010-07-16 20:35:36 +02:00
|
|
|
|
|
|
|
func! tohtml#RestoreUserSettings(old_settings)
|
|
|
|
" restore any overridden user options
|
|
|
|
if a:old_settings.html_dynamic_folds
|
|
|
|
let g:html_dynamic_folds = 1
|
|
|
|
else
|
|
|
|
unlet! g:html_dynamic_folds
|
|
|
|
endif
|
|
|
|
if a:old_settings.html_hover_unfold
|
|
|
|
let g:html_hover_unfold = 1
|
|
|
|
else
|
|
|
|
unlet! g:html_hover_unfold
|
|
|
|
endif
|
|
|
|
if a:old_settings.html_use_css
|
|
|
|
let g:html_use_css = 1
|
|
|
|
else
|
|
|
|
unlet! g:html_use_css
|
|
|
|
endif
|
|
|
|
endfunc
|
|
|
|
|
|
|
|
let &cpo = s:cpo_sav
|
|
|
|
unlet s:cpo_sav
|
|
|
|
|
|
|
|
" Make sure any patches will probably use consistent indent
|
2010-07-18 14:07:22 +02:00
|
|
|
" vim: ts=8 sw=2 sts=2 noet
|