bb1f5b3c46
* NEW: Diary. Help in making daily notes. See ':h vimwiki-diary'. Now you can really easy add information into vimwiki that should be sorted out later. * NEW: Tables are redesigned. Syntax is changed. Now they are auto-formattable. You can navigate them with <tab> and <cr> in insert mode. See 'vimwiki-syntax-tables' and 'vimwiki-tables' for more details. * NEW: Keyword STARTED: is added. * NEW: Words TODO:, DONE:, STARTED:, XXX:, FIXME:, FIXED: are highlighed inside headers. * FIX: Export to html external links with 'file://' protocol. Ex: '[file:///home/user1/book.pdf my book]'. * FIX: Menu is corrupted if wiki's path contains spaces. * FIX: Settings 'wrap' and 'linebreak' are removed from ftplugin. Add them into your personal settings file '.vim/after/ftplugin/vimwiki.vim' if needed. * NEW: Headers are highlighted in different colors by default. See ':h g:vimwiki_hl_headers' to turn it off. * FIX: Issue 40: Links with russian subdirs don't work. * NEW: It is now possible to generate HTML files automatically on page save. See ':h vimwiki-option-auto_export'.
1124 lines
30 KiB
VimL
1124 lines
30 KiB
VimL
" Vimwiki autoload plugin file
|
|
" Export to HTML
|
|
" Author: Maxim Kim <habamax@gmail.com>
|
|
" Home: http://code.google.com/p/vimwiki/
|
|
|
|
" XXX: This file should be refactored!
|
|
|
|
" Load only once {{{
|
|
if exists("g:loaded_vimwiki_html_auto") || &cp
|
|
finish
|
|
endif
|
|
let g:loaded_vimwiki_html_auto = 1
|
|
"}}}
|
|
|
|
" SCRIPT VARS "{{{
|
|
" Warn if html header or html footer do not exist only once.
|
|
let s:warn_html_header = 0
|
|
let s:warn_html_footer = 0
|
|
"}}}
|
|
|
|
" UTILITY "{{{
|
|
function! s:root_path(subdir) "{{{
|
|
return repeat('../', len(split(a:subdir, '[/\\]')))
|
|
endfunction "}}}
|
|
|
|
function! s:syntax_supported() " {{{
|
|
return VimwikiGet('syntax') == "default"
|
|
endfunction " }}}
|
|
|
|
function! s:remove_blank_lines(lines) " {{{
|
|
while a:lines[-1] =~ '^\s*$'
|
|
call remove(a:lines, -1)
|
|
endwhile
|
|
endfunction "}}}
|
|
|
|
function! s:is_web_link(lnk) "{{{
|
|
if a:lnk =~ '^\%(https://\|http://\|www.\|ftp://\|file://\)'
|
|
return 1
|
|
endif
|
|
return 0
|
|
endfunction "}}}
|
|
|
|
function! s:is_img_link(lnk) "{{{
|
|
if a:lnk =~ '\.\%(png\|jpg\|gif\|jpeg\)$'
|
|
return 1
|
|
endif
|
|
return 0
|
|
endfunction "}}}
|
|
|
|
function! s:is_non_wiki_link(lnk) "{{{
|
|
" TODO: Add more file extensions here
|
|
if a:lnk =~ '.\+\.\%(pdf\|txt\|doc\|rtf\|xls\)$'
|
|
return 1
|
|
endif
|
|
return 0
|
|
endfunction "}}}
|
|
|
|
function! s:has_abs_path(fname) "{{{
|
|
if a:fname =~ '\(^.:\)\|\(^/\)'
|
|
return 1
|
|
endif
|
|
return 0
|
|
endfunction "}}}
|
|
|
|
function! s:create_default_CSS(path) " {{{
|
|
let path = expand(a:path)
|
|
let css_full_name = path.VimwikiGet('css_name')
|
|
if glob(css_full_name) == ""
|
|
call vimwiki#mkdir(fnamemodify(css_full_name, ':p:h'))
|
|
let lines = []
|
|
|
|
call add(lines, 'body {font-family: Arial, sans-serif; margin: 1em 2em 1em 2em; font-size: 100%; line-height: 130%;}')
|
|
call add(lines, 'h1, h2, h3, h4, h5, h6 {font-family: Trebuchet MS, serif; margin-top: 1.5em; margin-bottom: 0.5em;}')
|
|
call add(lines, 'h1 {font-size: 2.0em; color: #a77070;}')
|
|
call add(lines, 'h2 {font-size: 1.6em; color: #779977;}')
|
|
call add(lines, 'h3 {font-size: 1.3em; color: #555577;}')
|
|
call add(lines, 'h4 {font-size: 1.2em; color: #222244;}')
|
|
call add(lines, 'h5 {font-size: 1.1em; color: #222244;}')
|
|
call add(lines, 'h6 {font-size: 1.0em; color: #222244;}')
|
|
call add(lines, 'p, pre, blockquote, table, ul, ol, dl {margin-top: 1em; margin-bottom: 1em;}')
|
|
call add(lines, 'ul ul, ul ol, ol ol, ol ul {margin-top: 0.5em; margin-bottom: 0.5em;}')
|
|
call add(lines, 'li {margin: 0.3em auto;}')
|
|
call add(lines, 'ul {margin-left: 2em; padding-left: 0.5em;}')
|
|
call add(lines, 'dt {font-weight: bold;}')
|
|
call add(lines, 'img {border: none;}')
|
|
call add(lines, 'pre {border-left: 1px solid #ccc; margin-left: 2em; padding-left: 0.5em;}')
|
|
call add(lines, 'blockquote {padding: 0.4em; background-color: #f6f5eb;}')
|
|
call add(lines, 'th, td {border: 1px solid #ccc; padding: 0.3em;}')
|
|
call add(lines, 'th {background-color: #f0f0f0;}')
|
|
call add(lines, 'hr {border: none; border-top: 1px solid #ccc; width: 100%;}')
|
|
call add(lines, 'del {text-decoration: line-through; color: #777777;}')
|
|
call add(lines, '.toc li {list-style-type: none;}')
|
|
call add(lines, '.todo {font-weight: bold; background-color: #f0ece8; color: #a03020;}')
|
|
call add(lines, '.justleft {text-align: left;}')
|
|
call add(lines, '.justright {text-align: right;}')
|
|
call add(lines, '.justcenter {text-align: center;}')
|
|
|
|
call writefile(lines, css_full_name)
|
|
echomsg "Default style.css is created."
|
|
endif
|
|
endfunction "}}}
|
|
|
|
function! s:get_html_header(wikifile, subdir, charset) "{{{
|
|
let lines=[]
|
|
|
|
let title = fnamemodify(a:wikifile, ":t:r")
|
|
|
|
if VimwikiGet('html_header') != "" && !s:warn_html_header
|
|
try
|
|
let lines = readfile(expand(VimwikiGet('html_header')))
|
|
call map(lines, 'substitute(v:val, "%title%", "'. title .'", "g")')
|
|
call map(lines, 'substitute(v:val, "%root_path%", "'.
|
|
\ s:root_path(a:subdir) .'", "g")')
|
|
return lines
|
|
catch /E484/
|
|
let s:warn_html_header = 1
|
|
echomsg 'vimwiki: Header template '.VimwikiGet('html_header').
|
|
\ ' does not exist!'
|
|
endtry
|
|
endif
|
|
|
|
let css_name = expand(VimwikiGet('css_name'))
|
|
let css_name = substitute(css_name, '\', '/', 'g')
|
|
if !s:has_abs_path(css_name)
|
|
" Relative css file for deep links: [[dir1/dir2/dir3/filename]]
|
|
let css_name = s:root_path(a:subdir).css_name
|
|
endif
|
|
|
|
" if no VimwikiGet('html_header') set up or error while reading template
|
|
" file -- use default header.
|
|
call add(lines, '<html>')
|
|
call add(lines, '<head>')
|
|
call add(lines, '<link rel="Stylesheet" type="text/css" href="'.
|
|
\ css_name.'" />')
|
|
call add(lines, '<title>'.title.'</title>')
|
|
call add(lines, '<meta http-equiv="Content-Type" content="text/html;'.
|
|
\ ' charset='.a:charset.'" />')
|
|
call add(lines, '</head>')
|
|
call add(lines, '<body>')
|
|
|
|
return lines
|
|
endfunction "}}}
|
|
|
|
function! s:get_html_footer() "{{{
|
|
let lines=[]
|
|
|
|
if VimwikiGet('html_footer') != "" && !s:warn_html_footer
|
|
try
|
|
let lines = readfile(expand(VimwikiGet('html_footer')))
|
|
return lines
|
|
catch /E484/
|
|
let s:warn_html_footer = 1
|
|
echomsg 'vimwiki: Footer template '.VimwikiGet('html_footer').
|
|
\ ' does not exist!'
|
|
endtry
|
|
endif
|
|
|
|
" if no VimwikiGet('html_footer') set up or error while reading template
|
|
" file -- use default footer.
|
|
call add(lines, "")
|
|
call add(lines, '</body>')
|
|
call add(lines, '</html>')
|
|
|
|
return lines
|
|
endfunction "}}}
|
|
|
|
function! s:safe_html(line) "{{{
|
|
"" change dangerous html symbols: < > &
|
|
|
|
let line = substitute(a:line, '&', '\&', 'g')
|
|
let line = substitute(line, '<', '\<', 'g')
|
|
let line = substitute(line, '>', '\>', 'g')
|
|
return line
|
|
endfunction "}}}
|
|
|
|
function! s:delete_html_files(path) "{{{
|
|
let htmlfiles = split(glob(a:path.'**/*.html'), '\n')
|
|
for fname in htmlfiles
|
|
try
|
|
call delete(fname)
|
|
catch
|
|
echomsg 'vimwiki: Cannot delete '.fname
|
|
endtry
|
|
endfor
|
|
endfunction "}}}
|
|
|
|
function! s:remove_comments(lines) "{{{
|
|
let res = []
|
|
let multiline_comment = 0
|
|
|
|
let idx = 0
|
|
while idx < len(a:lines)
|
|
let line = a:lines[idx]
|
|
let idx += 1
|
|
|
|
if multiline_comment
|
|
let col = matchend(line, '-->',)
|
|
if col != -1
|
|
let multiline_comment = 0
|
|
let line = strpart(line, col)
|
|
else
|
|
continue
|
|
endif
|
|
endif
|
|
|
|
if !multiline_comment && line =~ '<!--.*-->'
|
|
let line = substitute(line, '<!--.*-->', '', 'g')
|
|
if line =~ '^\s*$'
|
|
continue
|
|
endif
|
|
endif
|
|
|
|
if !multiline_comment
|
|
let col = match(line, '<!--',)
|
|
if col != -1
|
|
let multiline_comment = 1
|
|
let line = strpart(line, 1, col - 1)
|
|
endif
|
|
endif
|
|
|
|
call add(res, line)
|
|
endwhile
|
|
return res
|
|
endfunction "}}}
|
|
|
|
function! s:mid(value, cnt) "{{{
|
|
return strpart(a:value, a:cnt, len(a:value) - 2 * a:cnt)
|
|
endfunction "}}}
|
|
|
|
function! s:subst_func(line, regexp, func) " {{{
|
|
" Substitute text found by regexp with result of
|
|
" func(matched) function.
|
|
|
|
let pos = 0
|
|
let lines = split(a:line, a:regexp, 1)
|
|
let res_line = ""
|
|
for line in lines
|
|
let res_line = res_line.line
|
|
let matched = matchstr(a:line, a:regexp, pos)
|
|
if matched != ""
|
|
let res_line = res_line.{a:func}(matched)
|
|
endif
|
|
let pos = matchend(a:line, a:regexp, pos)
|
|
endfor
|
|
return res_line
|
|
endfunction " }}}
|
|
|
|
function! s:save_vimwiki_buffer() "{{{
|
|
if &filetype == 'vimwiki'
|
|
silent update
|
|
endif
|
|
endfunction "}}}
|
|
|
|
function! s:trim(string) "{{{
|
|
let res = substitute(a:string, '^\s\+', '', '')
|
|
let res = substitute(res, '\s\+$', '', '')
|
|
return res
|
|
endfunction "}}}
|
|
|
|
" toc_list is list of [level, header_text, header_id]
|
|
" ex: [[1, "Header", "toc1"], [2, "Header2", "toc2"], ...]
|
|
function! s:get_html_toc(toc_list) "{{{
|
|
if empty(a:toc_list)
|
|
return []
|
|
endif
|
|
|
|
let toc = ['<div class="toc">']
|
|
let level = 0
|
|
let plevel = 0
|
|
for [level, text, id] in a:toc_list
|
|
if level > plevel
|
|
call add(toc, '<ul>')
|
|
elseif level < plevel
|
|
call add(toc, '</ul>')
|
|
endif
|
|
call add(toc, '<li><a href="#'.id.'">'.text.'</a></li>')
|
|
let plevel = level
|
|
endfor
|
|
while level > 0
|
|
call add(toc, '</ul>')
|
|
let level -= 1
|
|
endwhile
|
|
call add(toc, '</div>')
|
|
return toc
|
|
endfunction "}}}
|
|
|
|
" insert placeholder's contents into dest.
|
|
function! s:process_placeholders(dest, placeholders, type, ins_content) "{{{
|
|
if !empty(a:placeholders)
|
|
for [placeholder, row, idx] in a:placeholders
|
|
let [type, param] = placeholder
|
|
if type == a:type
|
|
let ins_content = a:ins_content[:]
|
|
if !empty(param)
|
|
call insert(ins_content, '<h1>'.param.'</h1>')
|
|
endif
|
|
let shift = idx * len(ins_content)
|
|
call extend(a:dest, ins_content, row + shift)
|
|
endif
|
|
endfor
|
|
endif
|
|
endfunction "}}}
|
|
|
|
"}}}
|
|
|
|
" INLINE TAGS "{{{
|
|
function! s:tag_em(value) "{{{
|
|
return '<em>'.s:mid(a:value, 1).'</em>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_strong(value) "{{{
|
|
return '<strong>'.s:mid(a:value, 1).'</strong>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_todo(value) "{{{
|
|
return '<span class="todo">'.a:value.'</span>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_strike(value) "{{{
|
|
return '<del>'.s:mid(a:value, 2).'</del>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_super(value) "{{{
|
|
return '<sup><small>'.s:mid(a:value, 1).'</small></sup>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_sub(value) "{{{
|
|
return '<sub><small>'.s:mid(a:value, 2).'</small></sub>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_code(value) "{{{
|
|
return '<code>'.s:mid(a:value, 1).'</code>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_pre(value) "{{{
|
|
return '<code>'.s:mid(a:value, 3).'</code>'
|
|
endfunction "}}}
|
|
|
|
function! s:tag_external_link(value) "{{{
|
|
"" Make <a href="link">link desc</a>
|
|
"" from [link link desc]
|
|
|
|
let value = s:mid(a:value, 1)
|
|
|
|
let line = ''
|
|
if s:is_web_link(value)
|
|
let lnkElements = split(value)
|
|
let head = lnkElements[0]
|
|
let rest = join(lnkElements[1:])
|
|
if rest==""
|
|
let rest=head
|
|
endif
|
|
if s:is_img_link(rest)
|
|
if rest!=head
|
|
let line = '<a href="'.head.'"><img src="'.rest.'" /></a>'
|
|
else
|
|
let line = '<img src="'.rest.'" />'
|
|
endif
|
|
else
|
|
let line = '<a href="'.head.'">'.rest.'</a>'
|
|
endif
|
|
elseif s:is_img_link(value)
|
|
let line = '<img src="'.value.'" />'
|
|
else
|
|
" [alskfj sfsf] shouldn't be a link. So return it as it was --
|
|
" enclosed in [...]
|
|
let line = '['.value.']'
|
|
endif
|
|
return line
|
|
endfunction "}}}
|
|
|
|
function! s:tag_internal_link(value) "{{{
|
|
" Make <a href="This is a link">This is a link</a>
|
|
" from [[This is a link]]
|
|
" Make <a href="link">This is a link</a>
|
|
" from [[link|This is a link]]
|
|
" Make <a href="link">This is a link</a>
|
|
" from [[link][This is a link]]
|
|
" TODO: rename function -- it makes not only internal links.
|
|
" TODO: refactor it.
|
|
|
|
let value = s:mid(a:value, 2)
|
|
|
|
let line = ''
|
|
if value =~ '|'
|
|
let link_parts = split(value, "|", 1)
|
|
else
|
|
let link_parts = split(value, "][", 1)
|
|
endif
|
|
|
|
if len(link_parts) > 1
|
|
if len(link_parts) < 3
|
|
let style = ""
|
|
else
|
|
let style = link_parts[2]
|
|
endif
|
|
|
|
if s:is_img_link(link_parts[1])
|
|
let line = '<a href="'.link_parts[0].'"><img src="'.link_parts[1].
|
|
\ '" style="'.style.'" /></a>'
|
|
elseif len(link_parts) < 3
|
|
if s:is_non_wiki_link(link_parts[0])
|
|
let line = '<a href="'.link_parts[0].'">'.link_parts[1].'</a>'
|
|
else
|
|
let line = '<a href="'.vimwiki#safe_link(link_parts[0]).
|
|
\ '.html">'.link_parts[1].'</a>'
|
|
endif
|
|
elseif s:is_img_link(link_parts[0])
|
|
let line = '<img src="'.link_parts[0].'" alt="'.
|
|
\ link_parts[1].'" style="'.style.'" />'
|
|
endif
|
|
else
|
|
if s:is_img_link(value)
|
|
let line = '<img src="'.value.'" />'
|
|
elseif s:is_non_wiki_link(link_parts[0])
|
|
let line = '<a href="'.value.'">'.value.'</a>'
|
|
else
|
|
let line = '<a href="'.vimwiki#safe_link(value).
|
|
\ '.html">'.value.'</a>'
|
|
endif
|
|
endif
|
|
return line
|
|
endfunction "}}}
|
|
|
|
function! s:tag_wikiword_link(value) "{{{
|
|
" Make <a href="WikiWord">WikiWord</a> from WikiWord
|
|
" if first symbol is ! then remove it and make no link.
|
|
if a:value[0] == '!'
|
|
return a:value[1:]
|
|
else
|
|
let line = '<a href="'.a:value.'.html">'.a:value.'</a>'
|
|
return line
|
|
endif
|
|
endfunction "}}}
|
|
|
|
function! s:tag_barebone_link(value) "{{{
|
|
"" Make <a href="http://habamax.ru">http://habamax.ru</a>
|
|
"" from http://habamax.ru
|
|
|
|
if s:is_img_link(a:value)
|
|
let line = '<img src="'.a:value.'" />'
|
|
else
|
|
let line = '<a href="'.a:value.'">'.a:value.'</a>'
|
|
endif
|
|
return line
|
|
endfunction "}}}
|
|
|
|
function! s:make_tag(line, regexp, func) "{{{
|
|
" Make tags for a given matched regexp.
|
|
" Exclude preformatted text and href links.
|
|
|
|
let patt_splitter = '\(`[^`]\+`\)\|\({{{.\+}}}\)\|'.
|
|
\ '\(<a href.\{-}</a>\)\|\(<img src.\{-}/>\)'
|
|
if '`[^`]\+`' == a:regexp || '{{{.\+}}}' == a:regexp
|
|
let res_line = s:subst_func(a:line, a:regexp, a:func)
|
|
else
|
|
let pos = 0
|
|
" split line with patt_splitter to have parts of line before and after
|
|
" href links, preformatted text
|
|
" ie:
|
|
" hello world `is just a` simple <a href="link.html">type of</a> prg.
|
|
" result:
|
|
" ['hello world ', ' simple ', 'type of', ' prg']
|
|
let lines = split(a:line, patt_splitter, 1)
|
|
let res_line = ""
|
|
for line in lines
|
|
let res_line = res_line.s:subst_func(line, a:regexp, a:func)
|
|
let res_line = res_line.matchstr(a:line, patt_splitter, pos)
|
|
let pos = matchend(a:line, patt_splitter, pos)
|
|
endfor
|
|
endif
|
|
return res_line
|
|
endfunction "}}}
|
|
|
|
function! s:process_inline_tags(line) "{{{
|
|
let line = a:line
|
|
let line = s:make_tag(line, '\[\[.\{-}\]\]', 's:tag_internal_link')
|
|
let line = s:make_tag(line, '\[.\{-}\]', 's:tag_external_link')
|
|
let line = s:make_tag(line, g:vimwiki_rxWeblink, 's:tag_barebone_link')
|
|
let line = s:make_tag(line, '!\?'.g:vimwiki_rxWikiWord,
|
|
\ 's:tag_wikiword_link')
|
|
let line = s:make_tag(line, g:vimwiki_rxItalic, 's:tag_em')
|
|
let line = s:make_tag(line, g:vimwiki_rxBold, 's:tag_strong')
|
|
let line = s:make_tag(line, g:vimwiki_rxTodo, 's:tag_todo')
|
|
let line = s:make_tag(line, g:vimwiki_rxDelText, 's:tag_strike')
|
|
let line = s:make_tag(line, g:vimwiki_rxSuperScript, 's:tag_super')
|
|
let line = s:make_tag(line, g:vimwiki_rxSubScript, 's:tag_sub')
|
|
let line = s:make_tag(line, g:vimwiki_rxCode, 's:tag_code')
|
|
let line = s:make_tag(line, g:vimwiki_rxPreStart.'.\+'.g:vimwiki_rxPreEnd,
|
|
\ 's:tag_pre')
|
|
return line
|
|
endfunction " }}}
|
|
"}}}
|
|
|
|
" BLOCK TAGS {{{
|
|
function! s:close_tag_pre(pre, ldest) "{{{
|
|
if a:pre
|
|
call insert(a:ldest, "</pre></code>")
|
|
return 0
|
|
endif
|
|
return a:pre
|
|
endfunction "}}}
|
|
|
|
function! s:close_tag_quote(quote, ldest) "{{{
|
|
if a:quote
|
|
call insert(a:ldest, "</blockquote>")
|
|
return 0
|
|
endif
|
|
return a:quote
|
|
endfunction "}}}
|
|
|
|
function! s:close_tag_para(para, ldest) "{{{
|
|
if a:para
|
|
call insert(a:ldest, "</p>")
|
|
return 0
|
|
endif
|
|
return a:para
|
|
endfunction "}}}
|
|
|
|
function! s:close_tag_table(table, ldest) "{{{
|
|
if len(a:table)
|
|
call insert(a:ldest, "</table>")
|
|
return []
|
|
endif
|
|
return a:table
|
|
endfunction "}}}
|
|
|
|
function! s:close_tag_list(lists, ldest) "{{{
|
|
while len(a:lists)
|
|
let item = remove(a:lists, -1)
|
|
call insert(a:ldest, item[0])
|
|
endwhile
|
|
endfunction! "}}}
|
|
|
|
function! s:close_tag_def_list(deflist, ldest) "{{{
|
|
if a:deflist
|
|
call insert(a:ldest, "</dl>")
|
|
return 0
|
|
endif
|
|
return a:deflist
|
|
endfunction! "}}}
|
|
|
|
function! s:process_tag_pre(line, pre) "{{{
|
|
let lines = []
|
|
let pre = a:pre
|
|
let processed = 0
|
|
if !pre && a:line =~ '{{{[^\(}}}\)]*\s*$'
|
|
let class = matchstr(a:line, '{{{\zs.*$')
|
|
let class = substitute(class, '\s\+$', '', 'g')
|
|
if class != ""
|
|
call add(lines, "<pre ".class.">")
|
|
else
|
|
call add(lines, "<pre>")
|
|
endif
|
|
let pre = 1
|
|
let processed = 1
|
|
elseif pre && a:line =~ '^}}}\s*$'
|
|
let pre = 0
|
|
call add(lines, "</pre>")
|
|
let processed = 1
|
|
elseif pre
|
|
let processed = 1
|
|
call add(lines, a:line)
|
|
endif
|
|
return [processed, lines, pre]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_quote(line, quote) "{{{
|
|
let lines = []
|
|
let quote = a:quote
|
|
let processed = 0
|
|
" if a:line =~ '^\s\{4,}[^[:blank:]*#]'
|
|
if a:line =~ '^\s\{4,}\S'
|
|
if !quote
|
|
call add(lines, "<blockquote>")
|
|
let quote = 1
|
|
endif
|
|
let processed = 1
|
|
call add(lines, substitute(a:line, '^\s*', '', ''))
|
|
elseif quote && a:line =~ '^\s*$'
|
|
let processed = 1
|
|
call add(lines, a:line)
|
|
elseif quote
|
|
call add(lines, "</blockquote>")
|
|
let quote = 0
|
|
endif
|
|
return [processed, lines, quote]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_list(line, lists) "{{{
|
|
|
|
function! s:add_checkbox(line, rx_list, st_tag, en_tag) "{{{
|
|
let st_tag = a:st_tag
|
|
let en_tag = a:en_tag
|
|
|
|
let chk = matchlist(a:line, a:rx_list)
|
|
if len(chk) > 0
|
|
if chk[1] == g:vimwiki_listsyms[4]
|
|
let st_tag .= '<del><input type="checkbox" checked />'
|
|
let en_tag = '</del>'.a:en_tag
|
|
else
|
|
let st_tag .= '<input type="checkbox" />'
|
|
endif
|
|
endif
|
|
return [st_tag, en_tag]
|
|
endfunction "}}}
|
|
|
|
" Do not process line that starts from *bold* text as list item.
|
|
let pos = match(a:line, g:vimwiki_rxBold)
|
|
if pos != -1 && strpart(a:line, 0, pos) =~ '^\s*$'
|
|
return [0, []]
|
|
endif
|
|
|
|
let lines = []
|
|
let processed = 0
|
|
|
|
if a:line =~ g:vimwiki_rxListBullet
|
|
let lstSym = matchstr(a:line, '[*-]')
|
|
let lstTagOpen = '<ul>'
|
|
let lstTagClose = '</ul>'
|
|
let lstRegExp = g:vimwiki_rxListBullet
|
|
elseif a:line =~ g:vimwiki_rxListNumber
|
|
let lstSym = '#'
|
|
let lstTagOpen = '<ol>'
|
|
let lstTagClose = '</ol>'
|
|
let lstRegExp = g:vimwiki_rxListNumber
|
|
else
|
|
let lstSym = ''
|
|
let lstTagOpen = ''
|
|
let lstTagClose = ''
|
|
let lstRegExp = ''
|
|
endif
|
|
|
|
let in_list = (len(a:lists) > 0)
|
|
if lstSym != ''
|
|
" To get proper indent level 'retab' the line -- change all tabs
|
|
" to spaces*tabstop
|
|
let line = substitute(a:line, '\t', repeat(' ', &tabstop), 'g')
|
|
let indent = stridx(line, lstSym)
|
|
|
|
let checkbox = '\s*\[\(.\?\)\]\s*'
|
|
let [st_tag, en_tag] = s:add_checkbox(line,
|
|
\ lstRegExp.checkbox, '<li>', '</li>')
|
|
|
|
if !in_list
|
|
call add(a:lists, [lstTagClose, indent])
|
|
call add(lines, lstTagOpen)
|
|
elseif (in_list && indent > a:lists[-1][1])
|
|
let item = remove(a:lists, -1)
|
|
call add(lines, item[0])
|
|
|
|
call add(a:lists, [lstTagClose, indent])
|
|
call add(lines, lstTagOpen)
|
|
elseif (in_list && indent < a:lists[-1][1])
|
|
while len(a:lists) && indent < a:lists[-1][1]
|
|
let item = remove(a:lists, -1)
|
|
call add(lines, item[0])
|
|
endwhile
|
|
elseif in_list
|
|
let item = remove(a:lists, -1)
|
|
call add(lines, item[0])
|
|
endif
|
|
|
|
call add(a:lists, [en_tag, indent])
|
|
call add(lines, st_tag)
|
|
call add(lines,
|
|
\ substitute(a:line, lstRegExp.'\%('.checkbox.'\)\?', '', ''))
|
|
let processed = 1
|
|
elseif in_list > 0 && a:line =~ '^\s\+\S\+'
|
|
if g:vimwiki_list_ignore_newline
|
|
call add(lines, a:line)
|
|
else
|
|
call add(lines, '<br />'.a:line)
|
|
endif
|
|
let processed = 1
|
|
else
|
|
while len(a:lists)
|
|
let item = remove(a:lists, -1)
|
|
call add(lines, item[0])
|
|
endwhile
|
|
endif
|
|
return [processed, lines]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_def_list(line, deflist) "{{{
|
|
let lines = []
|
|
let deflist = a:deflist
|
|
let processed = 0
|
|
let matches = matchlist(a:line, '\(^.*\)::\%(\s\|$\)\(.*\)')
|
|
if !deflist && len(matches) > 0
|
|
call add(lines, "<dl>")
|
|
let deflist = 1
|
|
endif
|
|
if deflist && len(matches) > 0
|
|
if matches[1] != ''
|
|
call add(lines, "<dt>".matches[1]."</dt>")
|
|
endif
|
|
if matches[2] != ''
|
|
call add(lines, "<dd>".matches[2]."</dd>")
|
|
endif
|
|
let processed = 1
|
|
elseif deflist
|
|
let deflist = 0
|
|
call add(lines, "</dl>")
|
|
endif
|
|
return [processed, lines, deflist]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_para(line, para) "{{{
|
|
let lines = []
|
|
let para = a:para
|
|
let processed = 0
|
|
if a:line =~ '^\s\{,3}\S'
|
|
if !para
|
|
call add(lines, "<p>")
|
|
let para = 1
|
|
endif
|
|
let processed = 1
|
|
call add(lines, a:line)
|
|
elseif para && a:line =~ '^\s*$'
|
|
call add(lines, "</p>")
|
|
let para = 0
|
|
endif
|
|
return [processed, lines, para]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_h(line, id) "{{{
|
|
let line = a:line
|
|
let processed = 0
|
|
let h_level = 0
|
|
let h_text = ''
|
|
let h_id = ''
|
|
if a:line =~ g:vimwiki_rxH6
|
|
let h_level = 6
|
|
elseif a:line =~ g:vimwiki_rxH5
|
|
let h_level = 5
|
|
elseif a:line =~ g:vimwiki_rxH4
|
|
let h_level = 4
|
|
elseif a:line =~ g:vimwiki_rxH3
|
|
let h_level = 3
|
|
elseif a:line =~ g:vimwiki_rxH2
|
|
let h_level = 2
|
|
elseif a:line =~ g:vimwiki_rxH1
|
|
let h_level = 1
|
|
endif
|
|
if h_level > 0
|
|
let centered = 0
|
|
if a:line =~ '^\s\+'
|
|
let centered = 1
|
|
endif
|
|
|
|
let line = s:trim(line)
|
|
|
|
let h_text = s:trim(strpart(line, h_level, len(line) - h_level * 2))
|
|
let h_id = 'toc'.a:id
|
|
let h_part = '<h'.h_level.' id="'.h_id.'"'
|
|
|
|
if centered
|
|
let h_part .= ' class="justcenter">'
|
|
else
|
|
let h_part .= '>'
|
|
endif
|
|
let line = h_part.h_text.'</h'.h_level.'>'
|
|
let processed = 1
|
|
endif
|
|
return [processed, line, h_level, h_text, h_id]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_hr(line) "{{{
|
|
let line = a:line
|
|
let processed = 0
|
|
if a:line =~ '^-----*$'
|
|
let line = '<hr />'
|
|
let processed = 1
|
|
endif
|
|
return [processed, line]
|
|
endfunction "}}}
|
|
|
|
function! s:process_tag_table(line, table) "{{{
|
|
" XXX: This should be refactored!!!
|
|
let table = a:table
|
|
let lines = []
|
|
let processed = 0
|
|
|
|
if a:line =~ '^\s*|[-+]\+|\s*$' && len(table)
|
|
call add(table, [])
|
|
let processed = 1
|
|
elseif a:line =~ '^\s*|.\+|\s*$'
|
|
if empty(table)
|
|
let table = [[]]
|
|
else
|
|
call add(table, [])
|
|
endif
|
|
let processed = 1
|
|
|
|
call extend(table[-1], split(a:line, '\s*|\s*'))
|
|
|
|
elseif len(table)
|
|
call add(lines, "<table>")
|
|
|
|
let head = 0
|
|
for idx in range(len(table))
|
|
if empty(table[idx])
|
|
let head = idx
|
|
break
|
|
endif
|
|
endfor
|
|
if head > 0
|
|
for row in table[: head-1]
|
|
call add(lines, '<tr>')
|
|
call extend(lines, map(row, '"<th>".v:val."</th>"'))
|
|
call add(lines, '</tr>')
|
|
endfor
|
|
for row in table[head+1 :]
|
|
call add(lines, '<tr>')
|
|
call extend(lines, map(row, '"<td>".v:val."</td>"'))
|
|
call add(lines, '</tr>')
|
|
endfor
|
|
else
|
|
for row in table
|
|
call add(lines, '<tr>')
|
|
call extend(lines, map(row, '"<td>".v:val."</td>"'))
|
|
call add(lines, '</tr>')
|
|
endfor
|
|
endif
|
|
call add(lines, "</table>")
|
|
let table = []
|
|
endif
|
|
return [processed, lines, table]
|
|
endfunction "}}}
|
|
|
|
"}}}
|
|
|
|
" WIKI2HTML "{{{
|
|
function! s:parse_line(line, state) " {{{
|
|
let state = {}
|
|
let state.para = a:state.para
|
|
let state.quote = a:state.quote
|
|
let state.pre = a:state.pre
|
|
let state.table = a:state.table[:]
|
|
let state.lists = a:state.lists[:]
|
|
let state.deflist = a:state.deflist
|
|
let state.placeholder = a:state.placeholder
|
|
let state.toc = a:state.toc
|
|
let state.toc_id = a:state.toc_id
|
|
|
|
let res_lines = []
|
|
|
|
let line = s:safe_html(a:line)
|
|
|
|
let processed = 0
|
|
|
|
" toc -- placeholder "{{{
|
|
if !processed
|
|
if line =~ '^\s*%toc'
|
|
let processed = 1
|
|
let param = matchstr(line, '^\s*%toc\s\zs.*')
|
|
let state.placeholder = ['toc', param]
|
|
endif
|
|
endif
|
|
"}}}
|
|
|
|
" pres "{{{
|
|
if !processed
|
|
let [processed, lines, state.pre] = s:process_tag_pre(line, state.pre)
|
|
if processed && len(state.lists)
|
|
call s:close_tag_list(state.lists, lines)
|
|
endif
|
|
if processed && len(state.table)
|
|
let state.table = s:close_tag_table(state.table, lines)
|
|
endif
|
|
if processed && state.deflist
|
|
let state.deflist = s:close_tag_def_list(state.deflist, lines)
|
|
endif
|
|
if processed && state.quote
|
|
let state.quote = s:close_tag_quote(state.quote, lines)
|
|
endif
|
|
if processed && state.para
|
|
let state.para = s:close_tag_para(state.para, lines)
|
|
endif
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
" lists "{{{
|
|
if !processed
|
|
let [processed, lines] = s:process_tag_list(line, state.lists)
|
|
if processed && state.quote
|
|
let state.quote = s:close_tag_quote(state.quote, lines)
|
|
endif
|
|
if processed && state.pre
|
|
let state.pre = s:close_tag_pre(state.pre, lines)
|
|
endif
|
|
if processed && len(state.table)
|
|
let state.table = s:close_tag_table(state.table, lines)
|
|
endif
|
|
if processed && state.deflist
|
|
let state.deflist = s:close_tag_def_list(state.deflist, lines)
|
|
endif
|
|
if processed && state.para
|
|
let state.para = s:close_tag_para(state.para, lines)
|
|
endif
|
|
|
|
call map(lines, 's:process_inline_tags(v:val)')
|
|
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
" headers "{{{
|
|
if !processed
|
|
let [processed, line, h_level, h_text, h_id] = s:process_tag_h(line, state.toc_id)
|
|
if processed
|
|
call s:close_tag_list(state.lists, res_lines)
|
|
let state.table = s:close_tag_table(state.table, res_lines)
|
|
let state.pre = s:close_tag_pre(state.pre, res_lines)
|
|
let state.quote = s:close_tag_quote(state.quote, res_lines)
|
|
|
|
let line = s:make_tag(line, g:vimwiki_rxTodo, 's:tag_todo')
|
|
|
|
call add(res_lines, line)
|
|
|
|
" gather information for table of contents
|
|
call add(state.toc, [h_level, h_text, h_id])
|
|
let state.toc_id += 1
|
|
endif
|
|
endif
|
|
"}}}
|
|
|
|
" quotes "{{{
|
|
if !processed
|
|
let [processed, lines, state.quote] = s:process_tag_quote(line, state.quote)
|
|
if processed && len(state.lists)
|
|
call s:close_tag_list(state.lists, lines)
|
|
endif
|
|
if processed && state.deflist
|
|
let state.deflist = s:close_tag_def_list(state.deflist, lines)
|
|
endif
|
|
if processed && len(state.table)
|
|
let state.table = s:close_tag_table(state.table, lines)
|
|
endif
|
|
if processed && state.pre
|
|
let state.pre = s:close_tag_pre(state.pre, lines)
|
|
endif
|
|
if processed && state.para
|
|
let state.para = s:close_tag_para(state.para, lines)
|
|
endif
|
|
|
|
call map(lines, 's:process_inline_tags(v:val)')
|
|
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
" tables "{{{
|
|
if !processed
|
|
let [processed, lines, state.table] = s:process_tag_table(line, state.table)
|
|
|
|
call map(lines, 's:process_inline_tags(v:val)')
|
|
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
" horizontal rules "{{{
|
|
if !processed
|
|
let [processed, line] = s:process_tag_hr(line)
|
|
if processed
|
|
call s:close_tag_list(state.lists, res_lines)
|
|
let state.table = s:close_tag_table(state.table, res_lines)
|
|
let state.pre = s:close_tag_pre(state.pre, res_lines)
|
|
call add(res_lines, line)
|
|
endif
|
|
endif
|
|
"}}}
|
|
|
|
" definition lists "{{{
|
|
if !processed
|
|
let [processed, lines, state.deflist] = s:process_tag_def_list(line, state.deflist)
|
|
|
|
call map(lines, 's:process_inline_tags(v:val)')
|
|
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
"" P "{{{
|
|
if !processed
|
|
let [processed, lines, state.para] = s:process_tag_para(line, state.para)
|
|
if processed && len(state.lists)
|
|
call s:close_tag_list(state.lists, lines)
|
|
endif
|
|
if processed && state.quote
|
|
let state.quote = s:close_tag_quote(state.quote, res_lines)
|
|
endif
|
|
if processed && state.pre
|
|
let state.pre = s:close_tag_pre(state.pre, res_lines)
|
|
endif
|
|
if processed && len(state.table)
|
|
let state.table = s:close_tag_table(state.table, res_lines)
|
|
endif
|
|
|
|
call map(lines, 's:process_inline_tags(v:val)')
|
|
|
|
call extend(res_lines, lines)
|
|
endif
|
|
"}}}
|
|
|
|
"" add the rest
|
|
if !processed
|
|
call add(res_lines, line)
|
|
endif
|
|
|
|
return [res_lines, state]
|
|
|
|
endfunction " }}}
|
|
|
|
function! vimwiki_html#Wiki2HTML(path, wikifile) "{{{
|
|
|
|
if !s:syntax_supported()
|
|
echomsg 'vimwiki: Only vimwiki_default syntax supported!!!'
|
|
return
|
|
endif
|
|
|
|
let wikifile = fnamemodify(a:wikifile, ":p")
|
|
let subdir = vimwiki#subdir(VimwikiGet('path'), wikifile)
|
|
|
|
let path = expand(a:path).subdir
|
|
call vimwiki#mkdir(path)
|
|
|
|
let lsource = s:remove_comments(readfile(wikifile))
|
|
let ldest = s:get_html_header(wikifile, subdir, &fileencoding)
|
|
|
|
" for table of contents placeholders.
|
|
let placeholders = []
|
|
|
|
" current state of converter
|
|
let state = {}
|
|
let state.para = 0
|
|
let state.quote = 0
|
|
let state.pre = 0
|
|
let state.table = []
|
|
let state.deflist = 0
|
|
let state.lists = []
|
|
let state.placeholder = []
|
|
let state.toc = []
|
|
let state.toc_id = 1
|
|
|
|
for line in lsource
|
|
let oldquote = state.quote
|
|
let [lines, state] = s:parse_line(line, state)
|
|
|
|
" Hack: There could be a lot of empty strings before s:process_tag_quote
|
|
" find out `quote` is over. So we should delete them all. Think of the way
|
|
" to refactor it out.
|
|
if (oldquote != state.quote) && ldest[-1] =~ '^\s*$'
|
|
call s:remove_blank_lines(ldest)
|
|
endif
|
|
|
|
if !empty(state.placeholder)
|
|
call add(placeholders, [state.placeholder, len(ldest), len(placeholders)])
|
|
let state.placeholder = []
|
|
endif
|
|
|
|
call extend(ldest, lines)
|
|
endfor
|
|
|
|
|
|
let toc = s:get_html_toc(state.toc)
|
|
call s:process_placeholders(ldest, placeholders, 'toc', toc)
|
|
|
|
call s:remove_blank_lines(ldest)
|
|
|
|
"" process end of file
|
|
"" close opened tags if any
|
|
let lines = []
|
|
call s:close_tag_quote(state.quote, lines)
|
|
call s:close_tag_para(state.para, lines)
|
|
call s:close_tag_pre(state.pre, lines)
|
|
call s:close_tag_list(state.lists, lines)
|
|
call s:close_tag_def_list(state.deflist, lines)
|
|
call s:close_tag_table(state.table, lines)
|
|
call extend(ldest, lines)
|
|
|
|
call extend(ldest, s:get_html_footer())
|
|
|
|
"" make html file.
|
|
let wwFileNameOnly = fnamemodify(wikifile, ":t:r")
|
|
call writefile(ldest, path.wwFileNameOnly.'.html')
|
|
endfunction "}}}
|
|
|
|
function! vimwiki_html#WikiAll2HTML(path) "{{{
|
|
if !s:syntax_supported()
|
|
echomsg 'vimwiki: Only vimwiki_default syntax supported!!!'
|
|
return
|
|
endif
|
|
|
|
echomsg 'Saving vimwiki files...'
|
|
let cur_buf = bufname('%')
|
|
bufdo call s:save_vimwiki_buffer()
|
|
exe 'buffer '.cur_buf
|
|
|
|
let path = expand(a:path)
|
|
call vimwiki#mkdir(path)
|
|
|
|
echomsg 'Deleting old html files...'
|
|
call s:delete_html_files(path)
|
|
|
|
echomsg 'Converting wiki to html files...'
|
|
let setting_more = &more
|
|
setlocal nomore
|
|
|
|
let wikifiles = split(glob(VimwikiGet('path').'**/*'.VimwikiGet('ext')), '\n')
|
|
for wikifile in wikifiles
|
|
echomsg 'Processing '.wikifile
|
|
call vimwiki_html#Wiki2HTML(path, wikifile)
|
|
endfor
|
|
call s:create_default_CSS(path)
|
|
echomsg 'Done!'
|
|
|
|
let &more = setting_more
|
|
endfunction "}}}
|
|
"}}}
|