Mageia Bugzilla – Attachment 964 Details for
Bug 337
Obsoleting a package should remove src.rpm
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Requests
|
Help
|
Log In
[x]
|
New Account
|
Forgot Password
Script listing packages to delete
clean.rb (text/plain), 1.36 KB, created by
Pascal Terjan
on 2011-10-14 22:05:17 CEST
(
hide
)
Description:
Script listing packages to delete
Filename:
MIME Type:
Creator:
Pascal Terjan
Created:
2011-10-14 22:05:17 CEST
Size:
1.36 KB
patch
obsolete
>#!/usr/bin/ruby > >def usage > puts "Usage: #{$0} [options]" > puts "Lists packages without src.rpm" > puts > puts "-h, --help show help" > puts "-m, --media <path> path to the binary media" > puts "-s, --src <path> path to the associated src media" >end > >require 'rpm' >require 'getoptlong' > >opts = GetoptLong.new( > [ '--help', '-h', GetoptLong::NO_ARGUMENT ], > [ '--media', '-m', GetoptLong::REQUIRED_ARGUMENT ], > [ '--smedia', '-s', GetoptLong::REQUIRED_ARGUMENT ], > [ '--src', '-S', GetoptLong::NO_ARGUMENT ] >) > >bin_path = "/distrib/bootstrap/distrib/cauldron/i586/media/core/release" >src_path = "/distrib/bootstrap/distrib/cauldron/SRPMS/core/release" >mode = "bin" > >opts.each do |opt, arg| > case opt > when '--help' > usage > exit 0 > when '--media' > bin_path = arg > when '--smedia' > src_path = arg > when '--src' > mode = "src" > end >end > >used_srcs = {} >old_binaries = [] >srcs = {} > >`urpmf --synthesis "#{src_path}/media_info/synthesis.hdlist.cz" --qf '%filename' "."`.each_line{|l| > srcs[l.rstrip] = true >} >`urpmf --synthesis "#{bin_path}/media_info/synthesis.hdlist.cz" --qf '%sourcerpm:%filename' ":"`.each_line{|l| > l2 = l.split(':') > src = l2[0] > filename = l2[1].rstrip > old_binaries << filename unless srcs[src] > used_srcs[src] = true >} > >if mode == "bin" > old_binaries.each{|b| > puts "#{bin_path}/#{b}" > } >else > srcs.each_key{|s| > puts "#{src_path}/#{s}" unless used_srcs[s] > } >end >
#!/usr/bin/ruby def usage puts "Usage: #{$0} [options]" puts "Lists packages without src.rpm" puts puts "-h, --help show help" puts "-m, --media <path> path to the binary media" puts "-s, --src <path> path to the associated src media" end require 'rpm' require 'getoptlong' opts = GetoptLong.new( [ '--help', '-h', GetoptLong::NO_ARGUMENT ], [ '--media', '-m', GetoptLong::REQUIRED_ARGUMENT ], [ '--smedia', '-s', GetoptLong::REQUIRED_ARGUMENT ], [ '--src', '-S', GetoptLong::NO_ARGUMENT ] ) bin_path = "/distrib/bootstrap/distrib/cauldron/i586/media/core/release" src_path = "/distrib/bootstrap/distrib/cauldron/SRPMS/core/release" mode = "bin" opts.each do |opt, arg| case opt when '--help' usage exit 0 when '--media' bin_path = arg when '--smedia' src_path = arg when '--src' mode = "src" end end used_srcs = {} old_binaries = [] srcs = {} `urpmf --synthesis "#{src_path}/media_info/synthesis.hdlist.cz" --qf '%filename' "."`.each_line{|l| srcs[l.rstrip] = true } `urpmf --synthesis "#{bin_path}/media_info/synthesis.hdlist.cz" --qf '%sourcerpm:%filename' ":"`.each_line{|l| l2 = l.split(':') src = l2[0] filename = l2[1].rstrip old_binaries << filename unless srcs[src] used_srcs[src] = true } if mode == "bin" old_binaries.each{|b| puts "#{bin_path}/#{b}" } else srcs.each_key{|s| puts "#{src_path}/#{s}" unless used_srcs[s] } end
View Attachment As Raw
Actions:
View
Attachments on
bug 337
: 964 |
965