[devel] Re: I: Sisyphus-20051011 unexpanded_macros: +4 -2 (784)

[Alexey Tourbin <at@altlinux.ru>]

[-- Attachment #1.1: Type: text/plain, Size: 402 bytes --]

On Tue, Oct 11, 2005 at 09:32:05AM +0600, Andrey Rahmatullin wrote:
> > vim-plugin-vimbuddy-0.9.1-alt1.1.noarch.rpm	DESCRIPTION	%{VimBuddy()}
> > vim-plugin-vimbuddy-0.9.1-alt1.1.src.rpm	DESCRIPTION	%{VimBuddy()}
> Это как?
> И я уже говорил, что там %%.

Объясни это роботу.  Кстати, я отключаю этого робота, потому что теперь
проверка встроена в rpm.  Каким он был, таким останется (лирика).

[-- Attachment #1.2: unexpanded_macros --]
[-- Type: text/plain, Size: 546 bytes --]

#!/bin/sh -ef

dump()
{
	find "$@" -type f -name '*.rpm' -print0 |perl -Mstrict -ln0 -e \
'	use RPM::Header; my $f = $_;
	my $rpm = RPM::Header->new($f) or die "$f: $RPM::err\n";
	while (my ($k, $v) = each %$rpm) {
		next if $k =~ /CHANGELOGTEXT|SIGGPG|SIGMD5|GIF/;
		my @v = ref($v) ? @$v : $v;
		my @lines = map { split /[\r\n]+/ } @v;
		foreach (@lines) {
			next if /^\s*#/;
			use File::Basename;
			printf "%s\t%s\t%s\n", basename($f), $k, $_
				for /\%\{[a-zA-Z_]\w.*?\}|\%[a-zA-Z_]\w+/g;
		}
	}
'
}

dump "${1-/raid/ALT/Sisyphus/files}"

[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]