#!/usr/bin/ruby
# pkgsizestat - Display the installed size of packages in a filesystem
#
# Copyright (C) 2006  Enrico Zini <enrico@debian.org>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
# Display the installed size of packages in the given filesystem
# Defaults to /usr if non specified
#
# Usually used as "./pkgsizestat /usr   sort -nr   less" to see what packages
# are filling up your /usr partition
dev = File.stat(ARGV[0]   "/usr").dev
def pkgsize(name, dev)
      size = 0
      IO.foreach(name)    line 
              begin
                      st = File.stat(line.chomp)
                      if (st.file? && st.dev == dev)
                              size += st.size
                      end
              rescue
              end
       
      return size
end
Dir.glob("/var/lib/dpkg/info/*.list").each    file 
      puts "%d %s" % [pkgsize(file, dev), file.gsub(/.+?\/([^\/]+)\.list/, '\1')]
 

dev = File.stat(ARGV[0]   "/usr").dev
def pkgsize(name, dev)
      size = 0
      IO.foreach(name)    line 
              begin
                      st = File.stat(line.chomp)
                      if (st.file? && st.dev == dev)
                              size += st.size
                      end
              rescue
              end
       
      return size
end
pkgs =  
Dir.glob("/var/lib/dpkg/info/*.list").each    file 
  pkgs[pkgsize(file, dev)] = file.gsub(/.+?\/([^\/]+)\.list/, '\1')
 
pkgs = pkgs.sort
pkgs.reverse!
to_size = 1024**3 # show up to 1 GB
size = 0
pkgs.each do  a 
  size += a[0]
  puts "%d %d %s" % [a[0], size, a[1]]
  break if size >= to_size
end

# [License part omitted]
dev=File.stat(ARGV[0]   "/usr").dev
def pkgsize(name, dev)
  size=0
  IO.foreach(name) do  line 
    begin
      st=File.stat(line.chomp)
      if (st.file? && st.dev == dev)
        size += st.size
      end
    rescue
    end
  end
  return size
end
def space(file,dev)
  "%d %s" % [pkgsize(file,dev),file.gsub(/.+?\/([^\/]+)\.list/,'\1')]
end
@used=Array.new
Dir.glob("/var/lib/dpkg/info/*.list").sort.each do  file 
  x=Array.new
  x << space(file,dev).split(/\s+/)
  p [x[0][0].to_i,x[0][1]]
  @used << [x[0][0].to_i,x[0][1]]
end
#p @used.sort.each    x  p x  
@used.sort.each    x  puts "# x[0]  # x[1] "  
#redirect to file?