2016-03-26 10:46:01 +00:00
|
|
|
" ___vital___
|
|
|
|
" NOTE: lines between '" ___vital___' is generated by :Vitalize.
|
|
|
|
" Do not mofidify the code nor insert new lines before '" ___vital___'
|
|
|
|
if v:version > 703 || v:version == 703 && has('patch1170')
|
|
|
|
function! vital#_neosnippet#System#Cache#Deprecated#import() abort
|
|
|
|
return map({'filereadable': '', '_vital_depends': '', 'delete': '', 'readfile': '', 'getfilename': '', 'deletefile': '', 'check_old_cache': '', 'writefile': '', '_vital_loaded': ''}, 'function("s:" . v:key)')
|
|
|
|
endfunction
|
|
|
|
else
|
|
|
|
function! s:_SID() abort
|
|
|
|
return matchstr(expand('<sfile>'), '<SNR>\zs\d\+\ze__SID$')
|
|
|
|
endfunction
|
|
|
|
execute join(['function! vital#_neosnippet#System#Cache#Deprecated#import() abort', printf("return map({'filereadable': '', '_vital_depends': '', 'delete': '', 'readfile': '', 'getfilename': '', 'deletefile': '', 'check_old_cache': '', 'writefile': '', '_vital_loaded': ''}, \"function('<SNR>%s_' . v:key)\")", s:_SID()), 'endfunction'], "\n")
|
|
|
|
delfunction s:_SID
|
|
|
|
endif
|
|
|
|
" ___vital___
|
|
|
|
" Note:
|
|
|
|
" This module is deprecated. Use a new `Syste.Cache` instead.
|
2014-05-11 08:46:20 +00:00
|
|
|
|
|
|
|
let s:save_cpo = &cpo
|
|
|
|
set cpo&vim
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:_vital_loaded(V) abort
|
|
|
|
let s:V = a:V
|
|
|
|
let s:S = s:V.import('Data.String')
|
|
|
|
endfunction
|
|
|
|
|
|
|
|
function! s:_vital_depends() abort
|
|
|
|
return ['Data.String']
|
|
|
|
endfunction
|
|
|
|
|
|
|
|
function! s:getfilename(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
return s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:filereadable(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
let cache_name = s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
return filereadable(cache_name)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:readfile(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
let cache_name = s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
return filereadable(cache_name) ? readfile(cache_name) : []
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:writefile(cache_dir, filename, list) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
let cache_name = s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
|
|
|
|
call writefile(a:list, cache_name)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:delete(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
echoerr 'System.Cache.delete() is obsolete. Use its deletefile() instead.'
|
|
|
|
return call('s:deletefile', a:cache_dir, a:filename)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:deletefile(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
let cache_name = s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
return delete(cache_name)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:_encode_name(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
" Check cache directory.
|
|
|
|
if !isdirectory(a:cache_dir)
|
|
|
|
call mkdir(a:cache_dir, 'p')
|
|
|
|
endif
|
|
|
|
let cache_dir = a:cache_dir
|
2016-03-26 10:46:01 +00:00
|
|
|
if cache_dir !~# '/$'
|
2014-05-11 08:46:20 +00:00
|
|
|
let cache_dir .= '/'
|
|
|
|
endif
|
|
|
|
|
|
|
|
return cache_dir . s:_create_hash(cache_dir, a:filename)
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:check_old_cache(cache_dir, filename) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
" Check old cache file.
|
|
|
|
let cache_name = s:_encode_name(a:cache_dir, a:filename)
|
|
|
|
let ret = getftime(cache_name) == -1
|
|
|
|
\ || getftime(cache_name) <= getftime(a:filename)
|
|
|
|
if ret && filereadable(cache_name)
|
|
|
|
" Delete old cache.
|
|
|
|
call delete(cache_name)
|
|
|
|
endif
|
|
|
|
|
|
|
|
return ret
|
|
|
|
endfunction
|
|
|
|
|
2015-05-12 05:11:55 +00:00
|
|
|
function! s:_create_hash(dir, str) abort
|
2014-05-11 08:46:20 +00:00
|
|
|
if len(a:dir) + len(a:str) < 150
|
|
|
|
let hash = substitute(substitute(
|
|
|
|
\ a:str, ':', '=-', 'g'), '[/\\]', '=+', 'g')
|
|
|
|
else
|
2015-05-12 05:11:55 +00:00
|
|
|
let hash = s:S.hash(a:str)
|
2014-05-11 08:46:20 +00:00
|
|
|
endif
|
|
|
|
|
|
|
|
return hash
|
|
|
|
endfunction
|
|
|
|
|
|
|
|
let &cpo = s:save_cpo
|
|
|
|
unlet s:save_cpo
|
|
|
|
|
|
|
|
" vim:set et ts=2 sts=2 sw=2 tw=0:
|