1" Plugin to update the %changelog section of RPM spec files 2" Filename: spec.vim 3" Maintainer: Igor Gnatenko [email protected] 4" Former Maintainer: Gustavo Niemeyer <[email protected]> (until March 2014) 5" Last Change: Mon Jun 01 21:15 MSK 2015 Igor Gnatenko 6 7if exists("b:did_ftplugin") 8 finish 9endif 10let b:did_ftplugin = 1 11 12let s:cpo_save = &cpo 13set cpo&vim 14 15if !exists("no_plugin_maps") && !exists("no_spec_maps") 16 if !hasmapto("<Plug>SpecChangelog") 17 map <buffer> <LocalLeader>c <Plug>SpecChangelog 18 endif 19endif 20 21if !hasmapto("call <SID>SpecChangelog(\"\")<CR>") 22 noremap <buffer> <unique> <script> <Plug>SpecChangelog :call <SID>SpecChangelog("")<CR> 23endif 24 25if !exists("*s:GetRelVer") 26 function! s:GetRelVer() 27 if has('python') 28python << PYEND 29import sys, datetime, shutil, tempfile 30import vim 31 32try: 33 import rpm 34except ImportError: 35 pass 36else: 37 specfile = vim.current.buffer.name 38 if specfile: 39 rpm.delMacro("dist") 40 spec = rpm.spec(specfile) 41 headers = spec.sourceHeader 42 version = headers["Version"] 43 release = headers["Release"] 44 vim.command("let ver = " + version) 45 vim.command("let rel = " + release) 46PYEND 47 endif 48 endfunction 49endif 50 51if !exists("*s:SpecChangelog") 52 function s:SpecChangelog(format) 53 if strlen(a:format) == 0 54 if !exists("g:spec_chglog_format") 55 let email = input("Name <email address>: ") 56 let g:spec_chglog_format = "%a %b %d %Y " . l:email 57 echo "\r" 58 endif 59 let format = g:spec_chglog_format 60 else 61 if !exists("g:spec_chglog_format") 62 let g:spec_chglog_format = a:format 63 endif 64 let format = a:format 65 endif 66 let line = 0 67 let name = "" 68 let ver = "" 69 let rel = "" 70 let nameline = -1 71 let verline = -1 72 let relline = -1 73 let chgline = -1 74 while (line <= line("$")) 75 let linestr = getline(line) 76 if (name == "" && linestr =~? '^Name:') 77 let nameline = line 78 let name = substitute(strpart(linestr,5), '^[ ]*\([^ ]\+\)[ ]*$','\1','') 79 elseif (ver == "" && linestr =~? '^Version:') 80 let verline = line 81 let ver = substitute(strpart(linestr,8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') 82 elseif (rel == "" && linestr =~? '^Release:') 83 let relline = line 84 let rel = substitute(strpart(linestr,8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') 85 elseif (linestr =~? '^%changelog') 86 let chgline = line 87 execute line 88 break 89 endif 90 let line = line+1 91 endwhile 92 if (nameline != -1 && verline != -1 && relline != -1) 93 let include_release_info = exists("g:spec_chglog_release_info") 94 let name = s:ParseRpmVars(name, nameline) 95 let ver = s:ParseRpmVars(ver, verline) 96 let rel = s:ParseRpmVars(rel, relline) 97 else 98 let include_release_info = 0 99 endif 100 101 call s:GetRelVer() 102 103 if (chgline == -1) 104 let option = confirm("Can't find %changelog. Create one? ","&End of file\n&Here\n&Cancel",3) 105 if (option == 1) 106 call append(line("$"),"") 107 call append(line("$"),"%changelog") 108 execute line("$") 109 let chgline = line(".") 110 elseif (option == 2) 111 call append(line("."),"%changelog") 112 normal j 113 chgline = line(".") 114 endif 115 endif 116 if (chgline != -1) 117 let tmptime = v:lc_time 118 language time C 119 let parsed_format = "* ".strftime(format)." - ".ver."-".rel 120 execute "language time" tmptime 121 let release_info = "+ ".name."-".ver."-".rel 122 let wrong_format = 0 123 let wrong_release = 0 124 let insert_line = 0 125 if (getline(chgline+1) != parsed_format) 126 let wrong_format = 1 127 endif 128 if (include_release_info && getline(chgline+2) != release_info) 129 let wrong_release = 1 130 endif 131 if (wrong_format || wrong_release) 132 if (include_release_info && !wrong_release && !exists("g:spec_chglog_never_increase_release")) 133 let option = confirm("Increase release? ","&Yes\n&No",1) 134 if (option == 1) 135 execute relline 136 normal 137 let rel = substitute(strpart(getline(relline),8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') 138 let release_info = "+ ".name."-".ver."-".rel 139 endif 140 endif 141 let n = 0 142 call append(chgline+n, parsed_format) 143 if include_release_info 144 let n = n + 1 145 call append(chgline+n, release_info) 146 endif 147 let n = n + 1 148 call append(chgline+n,"- ") 149 let n = n + 1 150 call append(chgline+n,"") 151 let insert_line = chgline+n 152 else 153 let line = chgline 154 if !exists("g:spec_chglog_prepend") 155 while !(getline(line+2) =~ '^\( *\|\*.*\)$') 156 let line = line+1 157 endwhile 158 endif 159 call append(line+1,"- ") 160 let insert_line = line+2 161 endif 162 execute insert_line 163 startinsert! 164 endif 165 endfunction 166endif 167 168if !exists("*s:ParseRpmVars") 169 function s:ParseRpmVars(str, strline) 170 let end = -1 171 let ret = "" 172 while (1) 173 let start = match(a:str, "\%{", end+1) 174 if (start == -1) 175 let ret = ret . strpart(a:str, end+1) 176 break 177 endif 178 let ret = ret . strpart(a:str, end+1, start-(end+1)) 179 let end = match(a:str, "}", start) 180 if (end == -1) 181 let ret = ret . strpart(a:str, start) 182 break 183 endif 184 let varname = strpart(a:str, start+2, end-(start+2)) 185 execute a:strline 186 let definestr = "^[ \t]*%\\(define\\|global\\)[ \t]\\+".varname."[ \t]\\+\\(.*\\)$" 187 let linenum = search(definestr, "bW") 188 if (linenum != 0) 189 let ret = ret . substitute(getline(linenum), definestr, "\\2", "") 190 endif 191 endwhile 192 return ret 193 endfunction 194endif 195 196" The following lines, along with the macros/matchit.vim plugin, 197" make it easy to navigate the different sections of a spec file 198" with the % key (thanks to Max Ischenko). 199 200let b:match_ignorecase = 0 201let b:match_words = 202 \ '^Name:^%description:^%clean:^%(?:auto)?setup:^%build:^%install:^%files:' . 203 \ '^%package:^%preun:^%postun:^%changelog' 204 205let &cpo = s:cpo_save 206unlet s:cpo_save 207 208let b:undo_ftplugin = "unlet! b:match_ignorecase b:match_words" 209