diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-03-31 14:48:40 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-03-31 14:48:40 +0000 |
commit | f748c26b26f537c6a73c65e6c5ffedd23a94a5f4 (patch) | |
tree | 9988cd98ce1f5a4985b2225c8b4015c1ceae800c | |
parent | 1a93a4749ea3e4f5d7b83fa8010e5842154586ac (diff) | |
download | draklive-f748c26b26f537c6a73c65e6c5ffedd23a94a5f4.tar draklive-f748c26b26f537c6a73c65e6c5ffedd23a94a5f4.tar.gz draklive-f748c26b26f537c6a73c65e6c5ffedd23a94a5f4.tar.bz2 draklive-f748c26b26f537c6a73c65e6c5ffedd23a94a5f4.tar.xz draklive-f748c26b26f537c6a73c65e6c5ffedd23a94a5f4.zip |
write full list of rpm packages and list of rpm leaves, sorted by package size
-rwxr-xr-x | draklive | 10 |
1 files changed, 10 insertions, 0 deletions
@@ -870,6 +870,16 @@ sub write_dist_lists { mkdir_p(dirname($lst)); run_("chroot " . get_system_root($live) . " rpm -qa | sort > " . $lst); + my $full = get_builddir($live) . $live->{prefix}{build}{dist} . '/' . get_live_name($live) . '.lst.full'; + mkdir_p(dirname($full)); + run_("chroot " . get_system_root($live) . + qq( sh -c "rpm -qa --qf '%{size} \t%{name}\n' | sort -n" > ) . $full); + + my $leaves = get_builddir($live) . $live->{prefix}{build}{dist} . '/' . get_live_name($live) . '.lst.leaves'; + mkdir_p(dirname($leaves)); + run_("chroot " . get_system_root($live) . + qq( sh -c "urpmi_rpm-find-leaves | xargs rpm -q --qf '%{size} \t%{name}\n' | sort -n" > ) . $leaves); + require lang; my @live_langs = get_langs($live); my @langs = grep { member(lang::locale_to_main_locale($_), @live_langs) } lang::list_langs(); |