#!/usr/bin/perl

use rpmtools;

sub chop_version($) {
    ($_[0] =~ /(.*)-[^-]+-[^-]+/)[0] || $_[0];
}

sub read_compsslist {
    my ($file) = @_;
    my %compsslist;

    local *F;
    open F, $file or die "closurepkgs: unable to open compsslist file $file\n";
    foreach (<F>) {
	my ($name, $level) = /^\s*(\S+)\s+(\d+)/;
	$compsslist{$name} = $level;
    }
    close F;

    \%compsslist;
}

sub main {
    my ($dir, $lang) = @_;

    #- compute depslist on line directly.
    my $params = new rpmtools;
    foreach (glob("$dir/*.cz*")) { $params->read_hdlists($_) }
    $params->keep_only_cleaned_provides_files();
    foreach (glob("$dir/*.cz*")) { $params->read_hdlists($_) }
    $params->compute_depslist();

    my $compsslist = read_compsslist("$dir/compssList");

    #- DO NOT FORGET TO UPDATE HERE ACCORDING TO gi/perl-install/install_any.pm
    my @pkgs = qw(XFree86 XFree86-glide-module Device3Dfx Glide_V3-DRI Glide_V5 Mesa
		  dhcpcd pump dhcpxd dhcp-client isdn4net isdn4k-utils dev pptp-adsl-fr rp-pppoe ppp ypbind
		  rhs-printfilters lpr cups cups-drivers samba ncpfs ghostscript-utils
		  kernel-pcmcia-cs apmd cdrecord
		  );
    push @pkgs, "XFree86-$_" foreach qw(3DLabs 3dfx 8514 AGX FBDev I128 Mach8 Mach32 Mach64 Mono P9000 Rage128 S3 S3V SVGA VGA16 W32);

    #- closure the list of package to be kept for oem.
    my %closure;
    foreach (@pkgs) {
	$closure{$_} = 1;
	map { $closure{chop_version($_->{name})} = 1 } map { $params->{depslist}[$_] } map { split /\|/ } split ' ', $params->{info}{$_}{deps};
    }
    #- only if dependancy is ok.
    $closure{$_} = 1 foreach qw(xpp kups kisdn);

    #- closure the list of package to always install for oem. (level >= 50)...
    my %install;
    my @force_install;
    if ($params->{info}{"locales-$lang"}) {
	foreach (keys %{$params->{info}}) {
	    push @force_install, $_ if grep { $_ == $params->{info}{"locales-$lang"}{id} } split ' ', $params->{info}{$_}{deps};
	}
    } else {
	foreach (keys %{$params->{info}}) {
	    push @force_install, $_ if grep { $params->{depslist}[$_]{name} =~ /locales-/ } split ' ', $params->{info}{$_}{deps};
	}
    }
    push @force_install, qw(cups cups-drivers drakprofile draksync irda-utils numlock raidtools reiserfs-utils
			    Mesa Mesa-demos alsa alsa-utils);
    foreach (qw(
		Aurora xawtv kwintv xscreensaver-gl Mesa-demos xmms-mesa bzflag csmash gltron spacecup chromium tuxracer
		), @force_install, grep { $compsslist->{$_} >= 50 } keys %{$params->{info}}) {
	$install{$_} = 1;
	map { $install{chop_version($_->{name})} = 1 } map { $params->{depslist}[$_] } map { split /\|/ } split ' ', $params->{info}{$_}{deps};
    }

    #- remove base packages, which have to be installed, according to basesystem.
    delete $closure{'basesystem'};
    $install{'basesystem'} = 1;
    map { delete $closure{chop_version($_->{name})};
	  $install{chop_version($_->{name})} = 1 } map { $params->{depslist}[$_] } map { split /\|/ } split ' ', $params->{info}{'basesystem'}{deps};

    #- special packages that are to be move to closure always ...
    foreach (qw(kernel-smp kernel-linus kernel-secure hackkernel-smp hackkernel-linus hackkernel-secure
		Aurora xawtv kwintv xscreensaver-gl xmms-mesa bzflag csmash gltron spacecup chromium tuxracer
		)) {
	$params->{info}{$_} or next;
	$closure{$_} = 1;
	delete $install{$_};
    }

    #- dump out the list of package according to the 2 lists defined above.
    my $total_install = 0;
    my $total_closure = 0;
    foreach (@{$params->{depslist}}) {
	my $tiny_name = chop_version($_->{name});
	if (exists $install{$tiny_name}) {
	    my $p = $params->{info}{$tiny_name};
	    $total_install += $p->{size};
	    print "I:$p->{name}-$p->{version}-$p->{release}\n";
	} elsif (exists $closure{$tiny_name}) {
	    my $p = $params->{info}{$tiny_name};
	    $total_closure += $p->{size};
	    print "C:$p->{name}-$p->{version}-$p->{release}\n";
	}
    }
    print "\n\ntotal_install=$total_install\n";
    print "total_closure=$total_closure\n";
}

main(@ARGV);
es-info?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>dkms-modules-info</a>/<a href='/software/ldetect-lst/commit/dkms-modules-info/2.6.24.4-desktop-1mnb?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>2.6.24.4-desktop-1mnb</a>/<a href='/software/ldetect-lst/commit/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>wlan.alias</a></div><div class='content'><div class='cgit-panel'><b>diff options</b><form method='get'><input type='hidden' name='h' value='distro/mga7'/><input type='hidden' name='id' value='2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'/><table><tr><td colspan='2'/></tr><tr><td class='label'>context:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Mandrake &lt;mandrake@mandriva.com&gt;</td><td class='right'>2008-10-23 03:32:54 +0000</td></tr>
<tr><th>committer</th><td>Mandrake &lt;mandrake@mandriva.com&gt;</td><td class='right'>2008-10-23 03:32:54 +0000</td></tr>
<tr><th>commit</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/commit/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>2caf67a1d51f30a0d7c0a3319235ee6bce499d7a</a> (<a href='/software/ldetect-lst/patch/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/tree/?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>919e6ad6a55cdb0ace25041a12385a1057da1768</a> /<a href='/software/ldetect-lst/tree/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias</a></td></tr>
<tr><th>parent</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/commit/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?h=distro/mga7&amp;id=e54d2ae4e63e9456c82a8a568e9fa514767327c1'>e54d2ae4e63e9456c82a8a568e9fa514767327c1</a> (<a href='/software/ldetect-lst/diff/dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a&amp;id2=e54d2ae4e63e9456c82a8a568e9fa514767327c1'>diff</a>)</td></tr><tr><th>download</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/snapshot/ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar'>ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.gz'>ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.gz</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.bz2'>ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.bz2</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.xz'>ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.tar.xz</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.zip'>ldetect-lst-2caf67a1d51f30a0d7c0a3319235ee6bce499d7a.zip</a><br/></td></tr></table>
<div class='commit-subject'>add dkms info for vhba with kernel 2.6.27.2-server-3mnb</div><div class='commit-msg'></div><div class='diffstat-header'><a href='/software/ldetect-lst/diff/?h=distro/mga7&amp;id=2caf67a1d51f30a0d7c0a3319235ee6bce499d7a'>Diffstat</a> (limited to 'dkms-modules-info/2.6.24.4-desktop-1mnb/wlan.alias')</div><table summary='diffstat' class='diffstat'></table><div class='diffstat-summary'>0 files changed, 0 insertions, 0 deletions</div><table summary='diff' class='diff'><tr><td></td></tr></table></div> <!-- class=content -->
<div class='footer'>generated by <a href='https://git.zx2c4.com/cgit/about/'>cgit v1.2.1</a> (<a href='https://git-scm.com/'>git 2.21.0</a>) at 2024-12-29 08:47:21 +0000</div>
</div> <!-- id=cgit -->
</body>
</html>