mirror of
https://github.com/mattn/emmet-vim.git
synced 2025-12-08 03:24:45 +08:00
343 lines
12 KiB
VimL
343 lines
12 KiB
VimL
"==============================================================================
|
|
" region utils
|
|
"==============================================================================
|
|
" deleteContent : delete content in region
|
|
" if region make from between '<foo>' and '</foo>'
|
|
" --------------------
|
|
" begin:<foo>
|
|
" </foo>:end
|
|
" --------------------
|
|
" this function make the content as following
|
|
" --------------------
|
|
" begin::end
|
|
" --------------------
|
|
function! zencoding#util#deleteContent(region)
|
|
let lines = getline(a:region[0][0], a:region[1][0])
|
|
call setpos('.', [0, a:region[0][0], a:region[0][1], 0])
|
|
silent! exe "delete ".(a:region[1][0] - a:region[0][0])
|
|
call setline(line('.'), lines[0][:a:region[0][1]-2] . lines[-1][a:region[1][1]])
|
|
endfunction
|
|
|
|
" change_content : change content in region
|
|
" if region make from between '<foo>' and '</foo>'
|
|
" --------------------
|
|
" begin:<foo>
|
|
" </foo>:end
|
|
" --------------------
|
|
" and content is
|
|
" --------------------
|
|
" foo
|
|
" bar
|
|
" baz
|
|
" --------------------
|
|
" this function make the content as following
|
|
" --------------------
|
|
" begin:foo
|
|
" bar
|
|
" baz:end
|
|
" --------------------
|
|
function! zencoding#util#setContent(region, content)
|
|
let newlines = split(a:content, '\n', 1)
|
|
let oldlines = getline(a:region[0][0], a:region[1][0])
|
|
call setpos('.', [0, a:region[0][0], a:region[0][1], 0])
|
|
silent! exe "delete ".(a:region[1][0] - a:region[0][0])
|
|
if len(newlines) == 0
|
|
let tmp = ''
|
|
if a:region[0][1] > 1
|
|
let tmp = oldlines[0][:a:region[0][1]-2]
|
|
endif
|
|
if a:region[1][1] >= 1
|
|
let tmp .= oldlines[-1][a:region[1][1]:]
|
|
endif
|
|
call setline(line('.'), tmp)
|
|
elseif len(newlines) == 1
|
|
if a:region[0][1] > 1
|
|
let newlines[0] = oldlines[0][:a:region[0][1]-2] . newlines[0]
|
|
endif
|
|
if a:region[1][1] >= 1
|
|
let newlines[0] .= oldlines[-1][a:region[1][1]:]
|
|
endif
|
|
call setline(line('.'), newlines[0])
|
|
else
|
|
if a:region[0][1] > 1
|
|
let newlines[0] = oldlines[0][:a:region[0][1]-2] . newlines[0]
|
|
endif
|
|
if a:region[1][1] >= 1
|
|
let newlines[-1] .= oldlines[-1][a:region[1][1]:]
|
|
endif
|
|
call setline(line('.'), newlines[0])
|
|
call append(line('.'), newlines[1:])
|
|
endif
|
|
endfunction
|
|
|
|
" select_region : select region
|
|
" this function make a selection of region
|
|
function! zencoding#util#selectRegion(region)
|
|
call setpos('.', [0, a:region[1][0], a:region[1][1], 0])
|
|
normal! v
|
|
call setpos('.', [0, a:region[0][0], a:region[0][1], 0])
|
|
endfunction
|
|
|
|
" point_in_region : check point is in the region
|
|
" this function return 0 or 1
|
|
function! zencoding#util#pointInRegion(point, region)
|
|
if !zencoding#util#regionIsValid(a:region) | return 0 | endif
|
|
if a:region[0][0] > a:point[0] | return 0 | endif
|
|
if a:region[1][0] < a:point[0] | return 0 | endif
|
|
if a:region[0][0] == a:point[0] && a:region[0][1] > a:point[1] | return 0 | endif
|
|
if a:region[1][0] == a:point[0] && a:region[1][1] < a:point[1] | return 0 | endif
|
|
return 1
|
|
endfunction
|
|
|
|
" cursor_in_region : check cursor is in the region
|
|
" this function return 0 or 1
|
|
function! zencoding#util#cursorInRegion(region)
|
|
if !zencoding#util#regionIsValid(a:region) | return 0 | endif
|
|
let cur = getpos('.')[1:2]
|
|
return zencoding#util#pointInRegion(cur, a:region)
|
|
endfunction
|
|
|
|
" region_is_valid : check region is valid
|
|
" this function return 0 or 1
|
|
function! zencoding#util#regionIsValid(region)
|
|
if a:region[0][0] == 0 || a:region[1][0] == 0 | return 0 | endif
|
|
return 1
|
|
endfunction
|
|
|
|
" search_region : make region from pattern which is composing start/end
|
|
" this function return array of position
|
|
function! zencoding#util#searchRegion(start, end)
|
|
return [searchpairpos(a:start, '', a:end, 'bcnW'), searchpairpos(a:start, '\%#', a:end, 'nW')]
|
|
endfunction
|
|
|
|
" get_content : get content in region
|
|
" this function return string in region
|
|
function! zencoding#util#getContent(region)
|
|
if !zencoding#util#regionIsValid(a:region)
|
|
return ''
|
|
endif
|
|
let lines = getline(a:region[0][0], a:region[1][0])
|
|
if a:region[0][0] == a:region[1][0]
|
|
let lines[0] = lines[0][a:region[0][1]-1:a:region[1][1]-1]
|
|
else
|
|
let lines[0] = lines[0][a:region[0][1]-1:]
|
|
let lines[-1] = lines[-1][:a:region[1][1]-1]
|
|
endif
|
|
return join(lines, "\n")
|
|
endfunction
|
|
|
|
" region_in_region : check region is in the region
|
|
" this function return 0 or 1
|
|
function! zencoding#util#regionInRegion(outer, inner)
|
|
if !zencoding#util#regionIsValid(a:inner) || !zencoding#util#regionIsValid(a:outer)
|
|
return 0
|
|
endif
|
|
return zencoding#util#pointInRegion(a:inner[0], a:outer) && zencoding#util#pointInRegion(a:inner[1], a:outer)
|
|
endfunction
|
|
|
|
" get_visualblock : get region of visual block
|
|
" this function return region of visual block
|
|
function! zencoding#util#getVisualBlock()
|
|
return [[line("'<"), col("'<")], [line("'>"), col("'>")]]
|
|
endfunction
|
|
|
|
"==============================================================================
|
|
" html utils
|
|
"==============================================================================
|
|
function! zencoding#util#getContentFromURL(url)
|
|
let res = system(printf("%s %s", g:zencoding_curl_command, shellescape(substitute(a:url, '#.*', '', ''))))
|
|
let charset = matchstr(res, '<meta[^>]\+content=["''][^;"'']\+;\s\+charset=\zs[^;"'']\+\ze["'']>')
|
|
if len(charset) == 0
|
|
let charset = matchstr(res, '<meta\s\+charset=["'']\?\zs[^"'']\+\ze["'']\?[^>]\+>')
|
|
endif
|
|
if len(charset) == 0
|
|
let s1 = len(split(res, '?'))
|
|
let utf8 = iconv(res, 'utf-8', &encoding)
|
|
let s2 = len(split(utf8, '?'))
|
|
return (s2 == s1 || s2 >= s1 * 2) ? utf8 : res
|
|
endif
|
|
return iconv(res, charset, &encoding)
|
|
endfunction
|
|
|
|
function! zencoding#util#getTextFromHTML(buf)
|
|
let threshold_len = 100
|
|
let threshold_per = 0.1
|
|
let buf = a:buf
|
|
|
|
let buf = strpart(buf, stridx(buf, '</head>'))
|
|
let buf = substitute(buf, '<style[^>]*>.\{-}</style>', '', 'g')
|
|
let buf = substitute(buf, '<script[^>]*>.\{-}</script>', '', 'g')
|
|
let res = ''
|
|
let max = 0
|
|
let mx = '\(<td[^>]\{-}>\)\|\(<\/td>\)\|\(<div[^>]\{-}>\)\|\(<\/div>\)'
|
|
let m = split(buf, mx)
|
|
for str in m
|
|
let c = split(str, '<[^>]*?>')
|
|
let str = substitute(str, '<[^>]\{-}>', ' ', 'g')
|
|
let str = substitute(str, '>', '>', 'g')
|
|
let str = substitute(str, '<', '<', 'g')
|
|
let str = substitute(str, '"', '"', 'g')
|
|
let str = substitute(str, ''', "'", 'g')
|
|
let str = substitute(str, ' ', ' ', 'g')
|
|
let str = substitute(str, '¥', '\￥', 'g')
|
|
let str = substitute(str, '&', '\&', 'g')
|
|
let str = substitute(str, '^\s*\(.*\)\s*$', '\1', '')
|
|
let str = substitute(str, '\s\+', ' ', 'g')
|
|
let l = len(str)
|
|
if l > threshold_len
|
|
let per = (l+0.0) / len(c)
|
|
if max < l && per > threshold_per
|
|
let max = l
|
|
let res = str
|
|
endif
|
|
endif
|
|
endfor
|
|
let res = substitute(res, '^\s*\(.*\)\s*$', '\1', 'g')
|
|
return res
|
|
endfunction
|
|
|
|
function! zencoding#util#getImageSize(fn)
|
|
let fn = a:fn
|
|
|
|
if zencoding#util#isImageMagickInstalled()
|
|
return zencoding#util#imageSizeWithImageMagick(fn)
|
|
endif
|
|
|
|
if filereadable(fn)
|
|
let hex = substitute(system('xxd -p "'.fn.'"'), '\n', '', 'g')
|
|
else
|
|
let hex = substitute(system(g:zencoding_curl_command.' "'.fn.'" | xxd -p'), '\n', '', 'g')
|
|
endif
|
|
|
|
let [width, height] = [-1, -1]
|
|
if hex =~ '^89504e470d0a1a0a'
|
|
let width = eval('0x'.hex[32:39])
|
|
let height = eval('0x'.hex[40:47])
|
|
endif
|
|
if hex =~ '^ffd8'
|
|
let pos = 4
|
|
while pos < len(hex)
|
|
let bs = hex[pos+0:pos+3]
|
|
let pos += 4
|
|
if bs == 'ffc0' || bs == 'ffc2'
|
|
let pos += 6
|
|
let height = eval('0x'.hex[pos+0:pos+1])*256 + eval('0x'.hex[pos+2:pos+3])
|
|
let pos += 4
|
|
let width = eval('0x'.hex[pos+0:pos+1])*256 + eval('0x'.hex[pos+2:pos+3])
|
|
break
|
|
elseif bs =~ 'ffd[9a]'
|
|
break
|
|
elseif bs =~ 'ff\(e[0-9a-e]\|fe\|db\|dd\|c4\)'
|
|
let pos += (eval('0x'.hex[pos+0:pos+1])*256 + eval('0x'.hex[pos+2:pos+3])) * 2
|
|
endif
|
|
endwhile
|
|
endif
|
|
if hex =~ '^47494638'
|
|
let width = eval('0x'.hex[14:15].hex[12:13])
|
|
let height = eval('0x'.hex[18:19].hex[16:17])
|
|
endif
|
|
|
|
return [width, height]
|
|
endfunction
|
|
|
|
function! zencoding#util#imageSizeWithImageMagick(fn)
|
|
let img_info = system('identify -format "%wx%h" "'.a:fn.'"')
|
|
let img_size = split(substitute(img_info, '\n', '', ''), 'x')
|
|
let width = img_size[0]
|
|
let height = img_size[1]
|
|
return [width, height]
|
|
endfunction
|
|
|
|
function! zencoding#util#isImageMagickInstalled()
|
|
if !get(s:, 'zencoding_use_identify', 1)
|
|
return 0
|
|
endif
|
|
return executable('identify')
|
|
endfunction
|
|
|
|
function! zencoding#util#unique(arr)
|
|
let m = {}
|
|
let r = []
|
|
for i in a:arr
|
|
if !has_key(m, i)
|
|
let m[i] = 1
|
|
call add(r, i)
|
|
endif
|
|
endfor
|
|
return r
|
|
endfunction
|
|
|
|
let s:seed = localtime()
|
|
function! s:srand(seed)
|
|
let s:seed = a:seed
|
|
endfunction
|
|
|
|
function! s:rand()
|
|
let s:seed = s:seed * 214013 + 2531011
|
|
return (s:seed < 0 ? s:seed - 0x80000000 : s:seed) / 0x10000 % 0x8000
|
|
endfunction
|
|
|
|
function! zencoding#util#lorem(count)
|
|
let common = ['lorem', 'ipsum', 'dolor', 'sit', 'amet', 'consectetur', 'adipisicing', 'elit']
|
|
let words = ['exercitationem', 'perferendis', 'perspiciatis', 'laborum', 'eveniet',
|
|
\ 'sunt', 'iure', 'nam', 'nobis', 'eum', 'cum', 'officiis', 'excepturi',
|
|
\ 'odio', 'consectetur', 'quasi', 'aut', 'quisquam', 'vel', 'eligendi',
|
|
\ 'itaque', 'non', 'odit', 'tempore', 'quaerat', 'dignissimos',
|
|
\ 'facilis', 'neque', 'nihil', 'expedita', 'vitae', 'vero', 'ipsum',
|
|
\ 'nisi', 'animi', 'cumque', 'pariatur', 'velit', 'modi', 'natus',
|
|
\ 'iusto', 'eaque', 'sequi', 'illo', 'sed', 'ex', 'et', 'voluptatibus',
|
|
\ 'tempora', 'veritatis', 'ratione', 'assumenda', 'incidunt', 'nostrum',
|
|
\ 'placeat', 'aliquid', 'fuga', 'provident', 'praesentium', 'rem',
|
|
\ 'necessitatibus', 'suscipit', 'adipisci', 'quidem', 'possimus',
|
|
\ 'voluptas', 'debitis', 'sint', 'accusantium', 'unde', 'sapiente',
|
|
\ 'voluptate', 'qui', 'aspernatur', 'laudantium', 'soluta', 'amet',
|
|
\ 'quo', 'aliquam', 'saepe', 'culpa', 'libero', 'ipsa', 'dicta',
|
|
\ 'reiciendis', 'nesciunt', 'doloribus', 'autem', 'impedit', 'minima',
|
|
\ 'maiores', 'repudiandae', 'ipsam', 'obcaecati', 'ullam', 'enim',
|
|
\ 'totam', 'delectus', 'ducimus', 'quis', 'voluptates', 'dolores',
|
|
\ 'molestiae', 'harum', 'dolorem', 'quia', 'voluptatem', 'molestias',
|
|
\ 'magni', 'distinctio', 'omnis', 'illum', 'dolorum', 'voluptatum', 'ea',
|
|
\ 'quas', 'quam', 'corporis', 'quae', 'blanditiis', 'atque', 'deserunt',
|
|
\ 'laboriosam', 'earum', 'consequuntur', 'hic', 'cupiditate',
|
|
\ 'quibusdam', 'accusamus', 'ut', 'rerum', 'error', 'minus', 'eius',
|
|
\ 'ab', 'ad', 'nemo', 'fugit', 'officia', 'at', 'in', 'id', 'quos',
|
|
\ 'reprehenderit', 'numquam', 'iste', 'fugiat', 'sit', 'inventore',
|
|
\ 'beatae', 'repellendus', 'magnam', 'recusandae', 'quod', 'explicabo',
|
|
\ 'doloremque', 'aperiam', 'consequatur', 'asperiores', 'commodi',
|
|
\ 'optio', 'dolor', 'labore', 'temporibus', 'repellat', 'veniam',
|
|
\ 'architecto', 'est', 'esse', 'mollitia', 'nulla', 'a', 'similique',
|
|
\ 'eos', 'alias', 'dolore', 'tenetur', 'deleniti', 'porro', 'facere',
|
|
\ 'maxime', 'corrupti']
|
|
let ret = []
|
|
let sentence = 0
|
|
let c = a:count > 0 ? a:count : 30
|
|
for i in range(c)
|
|
let arr = common
|
|
if sentence > 0
|
|
let arr += words
|
|
endif
|
|
let r = s:rand()
|
|
let word = arr[r % len(arr)]
|
|
if sentence == 0
|
|
let word = substitute(word, '^.', '\U&', '')
|
|
endif
|
|
let sentence += 1
|
|
call add(ret, word)
|
|
if (sentence > 5 && s:rand() < 10000) || i == c - 1
|
|
if i == c - 1
|
|
let endc = "?!..."[s:rand() % 5]
|
|
call add(ret, endc)
|
|
else
|
|
let endc = "?!,..."[s:rand() % 6]
|
|
call add(ret, endc . ' ')
|
|
endif
|
|
if endc != ','
|
|
let sentence = 0
|
|
endif
|
|
else
|
|
call add(ret, ' ')
|
|
endif
|
|
endfor
|
|
return join(ret, '')
|
|
endfunction
|