diff options
Diffstat (limited to 'nvim/header.vim')
| -rw-r--r-- | nvim/header.vim | 142 |
1 files changed, 142 insertions, 0 deletions
diff --git a/nvim/header.vim b/nvim/header.vim new file mode 100644 index 0000000..a96db90 --- /dev/null +++ b/nvim/header.vim @@ -0,0 +1,142 @@ +" . :-. . +" author: ratakor <ratakor@disroot.org> :*==*%%%#%+=---: +" :#%%%*+%#=+%*:. +" created: Sat, 06 May 2023 18:54:06 +0200 :%%%. . -*%- +" updated: Sun, 14 May 2023 01:43:30 +0200 =## . :#%*=:. +" -#*#%:=#%%%#- +" description: *:*%%%%%%%#- +" script to produce an header like this one .-#%%%%%%+ +" use .local/bin/updateheader to change the %%%--%%%%*- +" letter shown ##%= +%%=:.. +" #* #%# +" :# -==* +" :: .: + +let s:ascii = [ + \"", + \"███╗ ███╗", + \"████╗ ████║", + \"██╔████╔██║", + \"██║╚██╔╝██║", + \"██║ ╚═╝ ██║", + \"╚═╝ ╚═╝", + \] + +let s:start = '#' +let s:mid = '#' +let s:end = '' +let s:size = 20 " ascii width +let s:length = len(s:ascii) " header length +let s:width = 80 " header width +let s:margin = 5 + +let s:types = { + \'\.c$\|\.h$\|\.cc$\|\.hh$\|\.cpp$\|\.hpp$\|\.cs$\|\.php$': + \['/*', ' *', ' */'], + \'\.htm$\|\.html$\|\.xml$': + \['<!--', ' ', '-->'], + \'\.js$': + \['//', '//', ''], + \'\.tex$': + \['%', '%', ''], + \'\.ml$\|\.mli$\|\.mll$\|\.mly$': + \['(*', ' ', '*)'], + \'\.vim$\|\vimrc$': + \['"', '"', ''], + \'\.f90$\|\.f95$\|\.f03$\|\.f$\|\.for$': + \['!', '!', ''], + \} + +function! s:filetype() + let l:f = expand("%:t") + + for type in keys(s:types) + if l:f =~ type + let s:start = s:types[type][0] + let s:mid = s:types[type][1] + let s:end = s:types[type][2] + endif + endfor + +endfunction + +function! s:textline(txt, pos) + let l:txt = strpart(a:txt, 0, s:width - s:margin * 2 - s:size) + + if a:pos == 1 + return s:start . repeat(' ', s:margin - strlen(s:start)) . l:txt . repeat(' ', s:width - s:margin * 2 - strlen(l:txt) - s:size) . s:ascii[a:pos] + elseif a:pos == s:length + return s:end + else + return s:mid . repeat(' ', s:margin - strlen(s:start)) . l:txt . repeat(' ', s:width - s:margin * 2 - strlen(l:txt) - s:size) . s:ascii[a:pos] +endfunction + +function! s:line(n) + if a:n == 2 + return s:textline("author: " . s:user() . " <" . s:mail() . ">", a:n) +" elseif a:n == 3 +" return s:textline("license: " . "ICS license", a:n) + elseif a:n == 4 + return s:textline("created: " . s:date(), a:n) + elseif a:n == 5 + return s:textline("updated: " . s:date(), a:n) + elseif a:n == 7 + return s:textline("description: ", a:n) + else + return s:textline('', a:n) + endif +endfunction + +function! s:user() + let l:user = $USER + if strlen(l:user) == 0 + let l:user = "user" + endif + return l:user +endfunction + +function! s:mail() + let l:mail = $MAIL + if strlen(l:mail) == 0 + let l:mail = "user@mail.org" + endif + return l:mail +endfunction + +function! s:date() + return strftime("%a, %d %b %Y %H:%M:%S %z") +endfunction + +function! s:insert() + let l:line = s:length + + while l:line > 0 + call append(0, s:line(l:line)) + let l:line = l:line - 1 + endwhile +endfunction + +function! s:update() + let line = 0 + call s:filetype() + if getline(5) =~ s:start . repeat(' ', s:margin - strlen(s:start)) . "updated: " + let line = 5 + elseif getline(6) =~ s:start . repeat(' ', s:margin - strlen(s:start)) . "updated: " + let line = 6 + endif + if line > 0 && &mod + call setline(line, s:line(5)) + return 0 + endif + return 1 +endfunction + +function! s:header() + if s:update() + call s:insert() + endif +endfunction + +command! Header call s:header () +autocmd BufNewFile * call s:header () +autocmd BufWritePre * call s:update () |