ꦫꦣꦺꦤ꧀ꦄꦤ꧀ꦠꦱꦺꦤ

PATH: usr / share / vim / vim74 / ftplugin

" Plugin to update the %changelog section of RPM spec files
" Filename: spec.vim
" Maintainer: Gustavo Niemeyer <niemeyer@conectiva.com>
" Last Change: 2012 Mar 07

if exists("b:did_ftplugin")
	finish
endif
let b:did_ftplugin = 1

let s:cpo_save = &cpo
set cpo&vim

if !exists("no_plugin_maps") && !exists("no_spec_maps")
	if !hasmapto("<Plug>SpecChangelog")
		map <buffer> <LocalLeader>c <Plug>SpecChangelog
	endif
endif

noremap <buffer> <unique> <script> <Plug>SpecChangelog :call <SID>SpecChangelog("")<CR>

if !exists("*s:SpecChangelog")
	function s:SpecChangelog(format)
        let save_time = v:lc_time
		if strlen(a:format) == 0
			if !exists("g:spec_chglog_format")
                if !exists("g:packager")
                    let email = input("Email address: ")
                    let g:spec_chglog_format = "%a %b %d %Y " . l:email
                    echo "\r"
                else
                    let email = g:packager
                    let g:spec_chglog_format = "%a %b %d %Y " . l:email
                    echo "\r"
                endif
			endif
			let format = g:spec_chglog_format
		else
			if !exists("g:spec_chglog_format")
				let g:spec_chglog_format = a:format
			endif
			let format = a:format
		endif
		let line = 0
		let name = ""
		let ver = ""
		let rel = ""
		let nameline = -1
		let verline = -1
		let relline = -1
		let chgline = -1
		while (line <= line("$"))
			let linestr = getline(line)
			if (name == "" && linestr =~? '^Name:')
				let nameline = line
				let name = substitute(strpart(linestr,5), '^[	 ]*$[^ 	]\+$[		]*$','\1','')
			elseif (ver == "" && linestr =~? '^Version:')
				let verline = line
				let ver = substitute(strpart(linestr,8), '^[	 ]*$[^ 	]\+$[		]*$','\1','')
			elseif (rel == "" && linestr =~? '^Release:')
				let relline = line
				let rel = substitute(strpart(linestr,8), '^[	 ]*$[^ 	]\+$[		]*$','\1','')
			elseif (linestr =~? '^%changelog')
				let chgline = line
				execute line
				break
			endif
			let line = line+1
		endwhile
		if (nameline != -1 && verline != -1 && relline != -1)
			let include_release_info = 1
			let name = s:ParseRpmVars(name, nameline)
			let ver = s:ParseRpmVars(ver, verline)
			let rel = s:ParseRpmVars(rel, relline)
		else
			let include_release_info = 0
		endif
		if (chgline == -1)
			let option = confirm("Can't find %changelog. Create one? ","&End of file\n&Here\n&Cancel",3)
			if (option == 1)
				call append(line("$"),"")
				call append(line("$"),"%changelog")
				execute line("$")
				let chgline = line(".")
			elseif (option == 2)
				call append(line("."),"%changelog")
				normal j
				chgline = line(".")
			endif
		endif
		if (chgline != -1)
            execute "language time C"
			let parsed_format = "* ".strftime(format)
            execute "language time " . save_time
			let release_info = ver."-".rel
			let wrong_format = 0
			let wrong_release = 0
			let insert_line = 0
			if (getline(chgline+1) != parsed_format)
				let wrong_format = 1
			endif
			if (include_release_info && getline(chgline+2) != release_info)
				let wrong_release = 1
			endif
			if (wrong_format || wrong_release)
				if (include_release_info && !wrong_release && !exists("g:spec_chglog_never_increase_release"))
					let option = confirm("Increase release? ","&Yes\n&No",1)
					if (option == 1)
						execute relline
						normal 
						let rel = substitute(strpart(getline(relline),8), '^[	 ]*$[^ 	]\+$[		]*$','\1','')
						let release_info = ver."-".rel
					endif
				endif
				let n = 0
				if include_release_info
                    let parsed_format = parsed_format." ".release_info
				endif
				call append(chgline+n, parsed_format)
				let n = n + 1
				call append(chgline+n,"- ")
				let n = n + 1
				call append(chgline+n,"")
				let insert_line = chgline+n
			else
				let line = chgline
				if !exists("g:spec_chglog_prepend")
					while !(getline(line+2) =~ '^$ *\|\*.*$$')
						let line = line+1
					endwhile
				endif
				call append(line+1,"- ")
				let insert_line = line+2
			endif
			execute insert_line
			startinsert!
		endif
	endfunction
endif

if !exists("*s:ParseRpmVars")
    function s:ParseRpmVars(str, strline)
	let end = -1
	let ret = ""
	while (1)
		let start = match(a:str, "\%{", end+1)
		if (start == -1)
			let ret = ret . strpart(a:str, end+1)
			break
		endif
		let ret = ret . strpart(a:str, end+1, start-(end+1))
		let end = match(a:str, "}", start)
		if (end == -1)
			let ret = ret . strpart(a:str, start)
			break
		endif
		let varname = strpart(a:str, start+2, end-(start+2))
		execute a:strline
		let definestr = "^[ \t]*%define[ \t]\\+" . varname . "[ \t]\\+\$.*\$$"
		let linenum = search(definestr, "bW")
		if (linenum != -1)
			let ret = ret .  substitute(getline(linenum), definestr, "\\1", "")
		else
			let ret = ret . strpart(str, start, end+1-start)
		endif
	endwhile
	return ret
    endfunction
endif

" The following lines, along with the macros/matchit.vim plugin,
" make it easy to navigate the different sections of a spec file
" with the % key (thanks to Max Ischenko).

let b:match_ignorecase = 0
let b:match_words =
  \ '^Name:^%description:^%clean:^%setup:^%build:^%install:^%files:' .
  \ '^%package:^%preun:^%postun:^%changelog'

let &cpo = s:cpo_save
unlet s:cpo_save

let b:undo_ftplugin = "unlet! b:match_ignorecase b:match_words"

[-] rpl.vim [edit]
[-] denyhosts.vim [edit]
[-] zimbu.vim [edit]
[-] nanorc.vim [edit]
[-] c.vim [edit]
[-] tt2html.vim [edit]
[-] group.vim [edit]
[-] muttrc.vim [edit]
[-] make.vim [edit]
[-] aspvbs.vim [edit]
[-] rnc.vim [edit]
[-] protocols.vim [edit]
[-] logtalk.vim [edit]
[-] postscr.vim [edit]
[-] gitrebase.vim [edit]
[-] eruby.vim [edit]
[-] udevrules.vim [edit]
[-] xs.vim [edit]
[-] ada.vim [edit]
[-] sql.vim [edit]
[-] liquid.vim [edit]
[-] mplayerconf.vim [edit]
[-] abap.vim [edit]
[-] mrxvtrc.vim [edit]
[-] xsd.vim [edit]
[-] quake.vim [edit]
[-] tex.vim [edit]
[-] xdefaults.vim [edit]
[-] aap.vim [edit]
[-] matlab.vim [edit]
[-] kconfig.vim [edit]
[-] bdf.vim [edit]
[-] ishd.vim [edit]
[-] calendar.vim [edit]
[-] gpg.vim [edit]
[-] gitcommit.vim [edit]
[-] cvsrc.vim [edit]
[-] libao.vim [edit]
[+] ..
[-] qf.vim [edit]
[-] cs.vim [edit]
[-] dtd.vim [edit]
[-] python.vim [edit]
[-] svg.vim [edit]
[-] changelog.vim [edit]
[-] sshconfig.vim [edit]
[-] man.vim [edit]
[-] screen.vim [edit]
[-] xmodmap.vim [edit]
[-] treetop.vim [edit]
[-] tcsh.vim [edit]
[-] setserial.vim [edit]
[-] elinks.vim [edit]
[-] xhtml.vim [edit]
[-] dircolors.vim [edit]
[-] manconf.vim [edit]
[-] passwd.vim [edit]
[-] gitsendemail.vim [edit]
[-] perl6.vim [edit]
[-] dosini.vim [edit]
[-] cucumber.vim [edit]
[-] hamster.vim [edit]
[-] verilog.vim [edit]
[-] java.vim [edit]
[-] reva.vim [edit]
[-] README.txt [edit]
[-] crm.vim [edit]
[-] loginaccess.vim [edit]
[-] updatedb.vim [edit]
[-] gitconfig.vim [edit]
[-] scss.vim [edit]
[-] pamconf.vim [edit]
[-] slpconf.vim [edit]
[-] tcl.vim [edit]
[-] plaintex.vim [edit]
[-] flexwiki.vim [edit]
[-] art.vim [edit]
[-] nsis.vim [edit]
[-] yaml.vim [edit]
[-] zsh.vim [edit]
[-] pascal.vim [edit]
[-] objc.vim [edit]
[-] pyrex.vim [edit]
[-] lprolog.vim [edit]
[-] services.vim [edit]
[-] occam.vim [edit]
[-] initex.vim [edit]
[-] automake.vim [edit]
[-] xml.vim [edit]
[-] fortran.vim [edit]
[-] sysctl.vim [edit]
[-] xslt.vim [edit]
[-] help.vim [edit]
[-] netrc.vim [edit]
[-] grub.vim [edit]
[-] csc.vim [edit]
[-] ch.vim [edit]
[-] msmessages.vim [edit]
[-] m4.vim [edit]
[-] diff.vim [edit]
[-] htmldjango.vim [edit]
[-] mailcap.vim [edit]
[-] csh.vim [edit]
[-] ant.vim [edit]
[-] erlang.vim [edit]
[-] debcontrol.vim [edit]
[-] racc.vim [edit]
[-] abaqus.vim [edit]
[-] slpspi.vim [edit]
[-] logcheck.vim [edit]
[-] vim.vim [edit]
[-] udevconf.vim [edit]
[-] vb.vim [edit]
[-] alsaconf.vim [edit]
[-] mp.vim [edit]
[-] git.vim [edit]
[-] vhdl.vim [edit]
[-] lftp.vim [edit]
[-] ocaml.vim [edit]
[-] cdrdaoconf.vim [edit]
[-] css.vim [edit]
[-] dosbatch.vim [edit]
[-] lua.vim [edit]
[-] sieve.vim [edit]
[-] debchangelog.vim [edit]
[-] perl.vim [edit]
[-] sensors.vim [edit]
[-] eterm.vim [edit]
[-] haml.vim [edit]
[-] falcon.vim [edit]
[-] dictconf.vim [edit]
[-] scheme.vim [edit]
[-] dictdconf.vim [edit]
[-] docbk.vim [edit]
[-] xinetd.vim [edit]
[-] kwt.vim [edit]
[-] framescript.vim [edit]
[-] rst.vim [edit]
[-] dtrace.vim [edit]
[-] ruby.vim [edit]
[-] conf.vim [edit]
[-] fvwm.vim [edit]
[-] btm.vim [edit]
[-] javascript.vim [edit]
[-] fetchmail.vim [edit]
[-] ld.vim [edit]
[-] markdown.vim [edit]
[-] mailaliases.vim [edit]
[-] php.vim [edit]
[-] xf86conf.vim [edit]
[-] context.vim [edit]
[-] sass.vim [edit]
[-] a2ps.vim [edit]
[-] gprof.vim [edit]
[-] prolog.vim [edit]
[-] haskell.vim [edit]
[-] indent.vim [edit]
[-] hostconf.vim [edit]
[-] modconf.vim [edit]
[-] udevperm.vim [edit]
[-] html.vim [edit]
[-] bst.vim [edit]
[-] config.vim [edit]
[-] lisp.vim [edit]
[-] hostsaccess.vim [edit]
[-] mail.vim [edit]
[-] cpp.vim [edit]
[-] limits.vim [edit]
[-] cobol.vim [edit]
[-] spec.vim [edit]
[-] mf.vim [edit]
[-] pdf.vim [edit]
[-] terminfo.vim [edit]
[-] logindefs.vim [edit]
[-] clojure.vim [edit]
[-] jsp.vim [edit]
[-] sudoers.vim [edit]
[-] slpreg.vim [edit]
[-] sh.vim [edit]
[-] sgml.vim [edit]
[-] arch.vim [edit]
[-] procmail.vim [edit]
[-] readline.vim [edit]
[-] pinfo.vim [edit]
[-] logtalk.dict [edit]