[devel] gb-task-check-lastchange: inheritance by src.rpm changelog

[Alexey Tourbin]

On Tue, Mar 16, 2010 at 05:11:01PM +0300, Alexey Tourbin wrote:
> gb-task-check-lastchange: new check for inheritance
> http://git.altlinux.org/people/at/packages/girar-builder.git?a=commitdiff;h=132737dc
> 
> +#
> +# When updating a package V1->V2, last changelog entry in V1
> +# must be present among changelog entries in V2.  This is how
> +# we can retain NMU and promote QA activity.
> +#

More examples follow along with a simple script to automate comparsion.

[at на altair at]$ ./changelogdiff /ALT/archive/Sisyphus/2009/08/01 /ALT/archive/Sisyphus/2009/09/01 >diff
----------- следующая часть -----------
#!/bin/sh -efu

. tmpdir.sh
cd $TMPDIR

repo1=$1
repo2=$2

ls $repo1/files/SRPMS/ |perl -pe 's/(.+)-(.+)-(.+)/$1\t$1-$2-$3/' >NF1
ls $repo2/files/SRPMS/ |perl -pe 's/(.+)-(.+)-(.+)/$1\t$1-$2-$3/' >NF2

sort -u -o NF1{,}
sort -u -o NF2{,}

join NF1 NF2 |awk '$2!=$3{print$2,$3}' >check

changelog()
{       
	rpmquery --qf '[%{CHANGELOGTIME:day}\t%{CHANGELOGNAME}\n]' -p "$1" |
	perl -pe 's/\t.*<(\S+)(?:\@| at )([\w-]+).*>[ \t]*/\t$1\@$2\t/'
}

check()
{       
        changelog "$1" >c1
        changelog "$2" >c2
        lastchange=$(head -1 c1)
        if ! fgrep -qs -x -e "${lastchange:?}" c2; then
		rpm -q --changelog -p "$1" >${1##*/}.changelog
		rpm -q --changelog -p "$2" >${2##*/}.changelog
		diff -u {${1##*/},${2##*/}}.changelog || [ $? = 1 ]
        fi
}

while read -r F1 F2; do
	F1=$repo1/files/SRPMS/$F1
	F2=$repo2/files/SRPMS/$F2
	check $F1 $F2
done <check
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : diff.gz
Тип     : application/x-gzip
Размер  : 6350 байтов
Описание: отсутствует
Url     : <http://lists.altlinux.org/pipermail/devel/attachments/20100316/5d49d604/attachment-0002.bin>
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : отсутствует
Тип     : application/pgp-signature
Размер  : 198 байтов
Описание: отсутствует
Url     : <http://lists.altlinux.org/pipermail/devel/attachments/20100316/5d49d604/attachment-0003.bin>