Your message dated Wed, 14 Nov 2007 22:17:03 +0000
with message-id <[EMAIL PROTECTED]>
and subject line Bug#438971: fixed in devscripts 2.10.11
has caused the attached Bug report to be marked as done.
This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.
(NB: If you are a system administrator and have no idea what I am
talking about this indicates a serious mail system misconfiguration
somewhere. Please contact me immediately.)
Debian bug tracking system administrator
(administrator, Debian Bugs database)
--- Begin Message ---
Package: devscripts
Version: 2.10.7
Severity: wishlist
Hi,
I'd like to propose a new script for devscripts. It's a rewrite of what
used to be known as 'MultiDistroTools' (or mdt). Its use is to create
'APT trees' for several distributions, making it easy to query the
status of packages in Ubuntu without using chroots, for example.
Example usage:
------------------------------------------------------
[EMAIL PROTECTED]:~$ chdist create sid
Now edit /home/lucas/.chdist/sid/etc/apt/sources.list
Then run chdist apt-get sid update
And enjoy.
[EMAIL PROTECTED]:~$ vi /home/lucas/.chdist/sid/etc/apt/sources.list
[EMAIL PROTECTED]:~$ chdist create gutsy
Now edit /home/lucas/.chdist/gutsy/etc/apt/sources.list
Then run chdist apt-get gutsy update
And enjoy.
[EMAIL PROTECTED]:~$ vi /home/lucas/.chdist/gutsy/etc/apt/sources.list
[EMAIL PROTECTED]:~$ chdist apt-get sid update
Get:1 http://ftp.debian.org unstable Release.gpg [189B]
Ign http://ftp.debian.org unstable/main Translation-en_US
[...]
[EMAIL PROTECTED]:~$ chdist apt-get gutsy update
Get:1 http://archive.ubuntu.com gutsy Release.gpg [191B]
[...]
[EMAIL PROTECTED]:~$ chdist apt-cache gutsy show devscripts | head -10
Package: devscripts
Priority: optional
Section: devel
Installed-Size: 1208
Maintainer: Ubuntu Core Developers
<[EMAIL PROTECTED]>
Original-Maintainer: Devscripts Devel Team
<[EMAIL PROTECTED]>
Architecture: i386
Version: 2.10.7ubuntu1
Depends: dpkg-dev, debianutils (>= 2.0), perl (>= 5.8), sed (>= 2.95),
libc6 (>= 2.6-1)
Recommends: fakeroot
[EMAIL PROTECTED]:~$ chdist compare-packages sid gutsy |grep "^dev"
devede UNAVAIL 2.13-0.0
devel-protocols UNAVAIL 1.5
develock-el 0.34-2 0.34-2
developers-reference 3.3.8 3.3.8
devhelp 0.15-1 0.15-0ubuntu1
device-tree-compiler UNAVAIL 0.1-1
device3dfx 2007.02.06-1 2007.02.06-1
devil 1.6.7-5 1.6.7-5
devilspie 0.20.2-1 0.20.2-1build1
devio 1.2-1 1.2-1
devmapper 2:1.02.20-2 2:1.02.20-1ubuntu3
devscripts 2.10.7 2.10.7ubuntu1
devtodo 0.1.19-3 0.1.19-3
[EMAIL PROTECTED]:~$ chdist compare-versions sid gutsy |grep "^dev"
devede UNAVAIL 2.13-0.0 not_in_sid
devel-protocols UNAVAIL 1.5 not_in_sid
develock-el 0.34-2 0.34-2 same_version
developers-reference 3.3.8 3.3.8 same_version
devhelp 0.15-1 0.15-0ubuntu1 newer_in_sid
device-tree-compiler UNAVAIL 0.1-1 not_in_sid
device3dfx 2007.02.06-1 2007.02.06-1 same_version
devil 1.6.7-5 1.6.7-5 same_version
devilspie 0.20.2-1 0.20.2-1build1 newer_in_gutsy
devio 1.2-1 1.2-1 same_version
devmapper 2:1.02.20-2 2:1.02.20-1ubuntu3 newer_in_sid
devscripts 2.10.7 2.10.7ubuntu1 newer_in_gutsy
devtodo 0.1.19-3 0.1.19-3 same_version
------------------------------------------------------
The main problem with my script is that it's written in ruby, and I
would really hate to rewrite it in perl just to include it in
devscripts. I've seen that so far, you only have sh and perl scripts. Do
you have a policy against adding scripts in other languages?
I've attached the script in question. I'll work on a clean patch if you
agree on its inclusion despite being in ruby.
Thank you,
--
| Lucas Nussbaum
| [EMAIL PROTECTED] http://www.lucas-nussbaum.net/ |
| jabber: [EMAIL PROTECTED] GPG: 1024D/023B3F4F |
#!/usr/bin/ruby -w
require 'fileutils'
require 'getoptlong'
$datadir = ENV['HOME'] + '/.chdist'
def usage
return <<-EOF
Usage: chdist [options] [command] [command parameters]
Options:
-h, --help Show this help
-d, --data-dir DIR Choose data directory (default:
$HOME/.chdist/
Commands:
create DIST : prepare a new tree named DIST
apt-get DIST (update|source|...) : run apt-get inside DIST
apt-cache DIST (show|showsrc|...) : run apt-cache inside DIST
apt-rdepends DIST [...] : run apt-rdepends inside DIST
src2bin DIST PKG : get binary packages for a source package in DIST
bin2src DIST PKG : get source package for a binary package in DIST
compare-packages DIST1 DIST2 [DIST3, ...] : list versions of packages in
several DISTributions
compare-versions DIST1 DIST2 : same as compare-packages, but also run
dpkg --compare-versions and display where the package is newer
grep-dctrl-packages DIST [...] : run grep-dctrl on *_Packages inside DIST
grep-dctrl-sources DIST [...] : run grep-dctrl on *_Sources inside DIST
EOF
end
# specify the options we accept and initialize
# the option parser
opts = GetoptLong.new(
[ "--help", "-h", GetoptLong::NO_ARGUMENT ],
[ "--data-dir", "-d", GetoptLong::REQUIRED_ARGUMENT ]
)
opts.ordering = GetoptLong::REQUIRE_ORDER
# process the parsed options
opts.each do |opt, arg|
if opt == '--help'
puts usage
exit(0)
elsif opt == '--data-dir'
$datadir = arg
end
end
if ARGV.length == 0
puts usage
exit(1)
end
########################################################
def dist_check(dist)
dir = $datadir + '/' + dist
return true if File::directory?(dir)
puts "Could not find #{dist} in $datadir. Exiting."
exit(1)
end
def aptopts(dist)
return ['-o',"Dir=#{$datadir}/#{dist}/", '-o',
"Dir::State::status=#{$datadir}/#{dist}/var/lib/dpkg/status"]
end
def compare_versions(va, vb)
return IO::popen("dpkg --compare-versions #{va} lt #{vb}; echo $?").read.to_i
== 1
end
###
def aptcache(args)
dist_check(dist = args.shift)
args = aptopts(dist) + args
exec('/usr/bin/apt-cache', *args)
end
def aptget(args)
dist_check(dist = args.shift)
args = aptopts(dist) + args
exec('/usr/bin/apt-get', *args)
end
def aptrdepends(args)
dist_check(dist = args.shift)
args = aptopts(dist) + args
exec('/usr/bin/apt-rdepends', *args)
end
def bin2src(args)
dist_check(dist = args[0])
args = aptopts(dist) + ['show', args[1] ]
cmd = (['/usr/bin/apt-cache'] + args).join(' ')
# FIXME avoid that ugly shell invocation
lines = `#{cmd}`
if $?.exitstatus != 0
exit($?.exitstatus)
end
source = lines.split(/\n/).grep(/^Source: /)
if source == []
puts args[1]
else
puts source[0].split(' ', 2)[1]
end
end
def src2bin(argv)
dist_check(dist = argv[0])
args = aptopts(dist) + ['showsrc', argv[1] ]
cmd = (['/usr/bin/apt-cache'] + args).join(' ')
# FIXME avoid that ugly shell invocation
lines = `#{cmd}`
if $?.exitstatus != 0
exit($?.exitstatus)
end
bins = []
lines.split(/\n\n/).each do |lp|
# avoid cases where apt-cache showsrc also shows source packages
# with a binary package with that name (e.g apt-cache showsrc sm)
src = lp.split(/\n/).grep(/^Package: /)[0].split(': ', 2)[1]
next if src != argv[1]
binaries = lp.split(/\n/).grep(/^Binary: /)
if binaries != []
binaries = binaries[0].split(/: /, 2)[1]
bins += binaries.split(/, /)
end
end
puts bins.uniq.join("\n")
end
def dist_create(argv)
dist = argv[0]
dir = $datadir + '/' + dist
if File::exists?(dir)
puts "#{dir} already exists, exiting."
exit(1)
end
FileUtils::mkdir_p(dir)
[ '/etc/apt', '/var/lib/apt/lists/partial', '/var/lib/dpkg',
'/var/cache/apt/archives/partial'].each do |d|
FileUtils::mkdir_p(dir + d)
end
File::open(dir + '/etc/apt/sources.list', 'w') do |f|
f.puts <<-EOF
#deb http://ftp.debian.org/debian/ unstable main contrib non-free
#deb-src http://ftp.debian.org/debian/ unstable main contrib non-free
#deb http://archive.ubuntu.com/ubuntu dapper main restricted
#deb http://archive.ubuntu.com/ubuntu dapper universe multiverse
#deb-src http://archive.ubuntu.com/ubuntu dapper main restricted
#deb-src http://archive.ubuntu.com/ubuntu dapper universe multiverse
EOF
end
File::open(dir + '/var/lib/dpkg/status', 'w') { |f| } # empty file
puts "Now edit #{dir + '/etc/apt/sources.list'}"
puts "Then run chdist apt-get #{dist} update"
puts "And enjoy."
end
def dist_compare(argv, do_compare = false)
dists = []
n = 0
# read params
while not argv.empty? do
a = argv.shift
dists[n] = a
dist_check(dists[n])
n += 1
end
if do_compare and n != 2
puts "Can only compare if there are two distros."
exit(1)
end
# read Sources
packages = {}
dists.each do |dist|
packages[dist] = {}
Dir::glob($datadir + '/' + dist + '/var/lib/apt/lists/*_Sources').each do
|f|
pkg = nil
IO::readlines(f).each do |l|
if l =~ /^Package: /
pkg = l.split(': ', 2)[1].chomp
elsif l =~ /^Version: /
packages[dist][pkg] = l.split(': ', 2)[1].chomp
end
end
end
end
# output packages list
dists.inject([]) { |tot, d| tot += packages[d].keys }.sort.uniq.each do |pkg|
str = "#{pkg}"
dists.each do |dist|
if packages[dist].has_key?(pkg)
str += " #{packages[dist][pkg]}"
else
str += " UNAVAIL"
end
end
if do_compare
# compare versions if run as compare-versions
if not packages[dists[0]].has_key?(pkg)
str += " not_in_#{dists[0]}"
elsif not packages[dists[1]].has_key?(pkg)
str += " not_in_#{dists[1]}"
elsif packages[dists[0]][pkg] == packages[dists[1]][pkg]
str += " same_version"
elsif compare_versions(packages[dists[0]][pkg], packages[dists[1]][pkg])
str += " newer_in_#{dists[0]}"
else
str += " newer_in_#{dists[1]}"
end
end
puts str
end
end
def grep_file(argv, file)
dist = argv.shift
dist_check(dist)
f = Dir::glob($datadir + '/' + dist + "/var/lib/apt/lists/*_#{file}").join('
')
# FIXME avoid shell invoc, potential quoting problems here
exec("cat #{f} | grep-dctrl #{argv.join(' ')}")
end
########################################################
# Command parsing
command = ARGV.shift
case command
when 'create'
dist_create(ARGV)
when 'apt-get' then
aptget(ARGV)
when 'apt-cache' then
aptcache(ARGV)
when 'apt-rdepends' then
aptrdepends(ARGV)
when 'bin2src' then
bin2src(ARGV)
when 'src2bin' then
src2bin(ARGV)
when 'compare-packages' then
dist_compare(ARGV)
when 'compare-versions' then
dist_compare(ARGV, true)
when 'grep-dctrl-packages'
grep_file(ARGV, 'Packages')
when 'grep-dctrl-sources'
grep_file(ARGV, 'Sources')
else
puts "Command unknown. Try #{$PROGRAM_NAME} -h"
exit(1)
end
--- End Message ---
--- Begin Message ---
Source: devscripts
Source-Version: 2.10.11
We believe that the bug you reported is fixed in the latest version of
devscripts, which is due to be installed in the Debian FTP archive:
devscripts_2.10.11.dsc
to pool/main/d/devscripts/devscripts_2.10.11.dsc
devscripts_2.10.11.tar.gz
to pool/main/d/devscripts/devscripts_2.10.11.tar.gz
devscripts_2.10.11_i386.deb
to pool/main/d/devscripts/devscripts_2.10.11_i386.deb
A summary of the changes between this version and the previous one is
attached.
Thank you for reporting the bug, which will now be closed. If you
have further comments please address them to [EMAIL PROTECTED],
and the maintainer will reopen the bug report if appropriate.
Debian distribution maintenance software
pp.
Luk Claes <[EMAIL PROTECTED]> (supplier of updated devscripts package)
(This message was generated automatically at their request; if you
believe that there is a problem with it please contact the archive
administrators by mailing [EMAIL PROTECTED])
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Format: 1.7
Date: Wed, 14 Nov 2007 22:53:22 +0100
Source: devscripts
Binary: devscripts
Architecture: source i386
Version: 2.10.11
Distribution: unstable
Urgency: low
Maintainer: Devscripts Devel Team <[EMAIL PROTECTED]>
Changed-By: Luk Claes <[EMAIL PROTECTED]>
Description:
devscripts - Scripts to make the life of a Debian Package maintainer easier
Closes: 419657 420899 438971 439666 439667 448636 448730 448795
Changes:
devscripts (2.10.11) unstable; urgency=low
.
[ Adam D. Barratt ]
* uscan: Correctly parse HTMLised FTP directory listings. Thanks to
Vaclav Ovsik for the patch (Closes: #448636)
* desktop2menu: New script to generate skeleton menu files from
freedesktop.org .desktop files. Thanks to Sune Vuorela (Closes: #448730)
* debchange: Default to using -t / --mainttrailer when using the "changelog"
heuristic. Thanks to Joey Hess for the patch (Closes: #448795)
* debcommit: Automatically include the changelog in the list of files to be
committed (Closes: #419657, again)
* debcommit: Correctly pull the depot path from the output of svk info
.
[ Luk Claes ]
* debdiff: Support tarball in tarball (Closes: #439667).
* debdiff: Support p-u-new use case (Closes: #439666).
* chdist: New script to easily play with several distributions.
Closes: #438971
* debian/control: Add build dependency on libfile-desktopentry-perl and
liburi-perl so perl -c won't fail for desktop2menu and rmadison.
.
[ Joey Hess ]
* debcommit: Avoid svk hang by only running svk if ~/.svk/local exists.
Closes: #420899
* debcommit: Try harder to see if the package is in git. Look for
.git in parent directories too.
Files:
1feb06a8a53daf0aabea721733e3707f 1131 devel optional devscripts_2.10.11.dsc
7d6732241467c628522aa7ad457a7494 483786 devel optional
devscripts_2.10.11.tar.gz
b82e648a41ecf30b04c1bc020cf0ddb4 420650 devel optional
devscripts_2.10.11_i386.deb
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
iD8DBQFHO29p5UTeB5t8Mo0RArqpAJ99vTgOjISOnxr8SO5Ux1U74k70qgCfX38i
TyLQJd9qhnm+03PBn9sAJd0=
=iaZh
-----END PGP SIGNATURE-----
--- End Message ---
