dgh 0.1.2

data/lib/policy.treetop

@@ -0,0 +1,170 @@
+# Treetop grammar for apt-cache policy output
+grammar Policy
+  rule package_list
+    package_entry+ {
+      def content
+        elements.map {|e| e.content}
+      end
+    }
+  end
+
+  rule package_entry
+    package_name ":\n"
+    "  " installed "\n"
+    "  " candidate "\n"
+    version_table {
+      def content
+        {
+          :name => elements[0].content,
+          :installed_version => elements[3].content,
+          :candidate_version => elements[6].content,
+          :versions => elements[8].content
+        }
+      end
+    }
+  end
+
+  rule package_name
+    [a-z0-9_.+-]+ {
+      def content
+        elements.inject("") {|s,e| s << e.text_value}
+      end
+    }
+  end
+
+  rule installed
+    "Installed: " version {
+      def content
+        elements[1].content
+      end
+    }
+  end
+
+  rule candidate
+    "Candidate: " version {
+      def content
+        elements[1].content
+      end
+    }
+  end
+
+  rule version
+    ([0-9] ":")? [a-zA-Z0-9_.~+-]+ {
+      def content
+        text_value
+      end
+    }
+  end
+
+  rule version_table
+    "  Version table:\n" version_table_entries {
+      def content
+        elements[1].content
+      end
+    }
+  end
+
+  rule version_table_entries
+    version_table_entry+ {
+      def content
+        elements.map {|e| e.content}
+      end
+    }
+  end
+
+  rule version_table_entry
+    (current_mark / not_current_mark) version " " [0-9]+ "\n" source_lines {
+      def content
+        {
+          :version => elements[1].content,
+          :current => elements[0].content,
+          :sources => elements[5].content
+        }
+      end
+    }
+  end
+
+  rule current_mark
+    " *** " {
+      def content
+        true
+      end
+    }
+  end
+  
+  rule not_current_mark
+    "     " {
+      def content
+        false
+      end
+    }
+  end
+
+  rule source_lines
+    source_line+ {
+      def content
+        elements.map {|e| e.content}
+      end
+    }
+  end
+
+  rule source_line
+    " "+ priority " "+ (status_file / apt_source) "\n" {
+      def content
+        {
+          :priority => elements[1].content,
+          :source => elements[3].content
+        }
+      end
+    }
+  end
+
+  rule priority
+    [0-9]+ {
+      def content
+        text_value.to_i
+      end
+    }
+  end
+
+  rule status_file
+    "/var/lib/dpkg/status" {
+      def content
+        text_value
+      end
+    }
+  end
+
+  rule apt_source
+    url " "+ (section " "+)? (arch " "+)? "Packages" {
+      def content
+        text_value
+      end
+    }
+  end
+
+  rule url
+    [a-z]+ "://" [^ ]+ {
+      def content
+        text_value
+      end
+    }
+  end
+
+  rule section
+    [a-z-]+ "/" [a-z-]+ {
+      def content
+        text_value
+      end
+    }
+  end
+
+  rule arch
+    [a-zA-Z0-9]+ {
+      def content
+        text_value
+      end
+    }
+  end
+end
+# vim: filetype=ruby

data/spec/dgh_spec.rb

@@ -0,0 +1,74 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+PolicyOutputWithDowngradable = <<EOS
+avahi-autoipd:
+  Installed: 0.6.30-3ubuntu1~natty1
+  Candidate: 0.6.30-3ubuntu1~natty1
+  Version table:
+ *** 0.6.30-3ubuntu1~natty1 0
+        100 /var/lib/dpkg/status
+     0.6.30-0ubuntu2 0
+        500 http://fi.archive.ubuntu.com/ubuntu/ natty/main i386 Packages
+libdaemon0:
+  Installed: 0.14-2
+  Candidate: 0.14-2
+  Version table:
+ *** 0.14-2 0
+        500 http://fi.archive.ubuntu.com/ubuntu/ natty/main i386 Packages
+        100 /var/lib/dpkg/status
+EOS
+
+PolicyOutputWithoutDowngradable = <<EOS
+automake:
+  Installed: 1:1.11.1-1ubuntu1
+  Candidate: 1:1.11.1-1ubuntu1
+  Version table:
+ *** 1:1.11.1-1ubuntu1 0
+        500 http://fi.archive.ubuntu.com/ubuntu/ natty/main i386 Packages
+        100 /var/lib/dpkg/status
+autotools-dev:
+  Installed: 20100122.1
+  Candidate: 20100122.1
+  Version table:
+ *** 20100122.1 0
+        500 http://fi.archive.ubuntu.com/ubuntu/ natty/main i386 Packages
+        100 /var/lib/dpkg/status
+libqt4-dev:
+  Installed: 4:4.7.2-0ubuntu6
+  Candidate: 4:4.7.2-0ubuntu6
+  Version table:
+ *** 4:4.7.2-0ubuntu6 0
+        500 http://fi.archive.ubuntu.com/ubuntu/ natty/main i386 Packages
+        100 /var/lib/dpkg/status
+EOS
+
+describe Dgh do
+  describe 'parser' do
+    it 'parses apt-cache policy output' do
+      result = Dgh.parse(PolicyOutputWithDowngradable).content
+      result.length.should == 2
+      result[0][:name].should == 'avahi-autoipd'
+      result[0][:installed_version].should == '0.6.30-3ubuntu1~natty1'
+      result[0][:candidate_version].should == '0.6.30-3ubuntu1~natty1'
+      result[0][:versions].length.should == 2
+      result[0][:versions][0][:version].should == '0.6.30-3ubuntu1~natty1'
+      result[0][:versions][0][:current].should == true
+      result[0][:versions][0][:sources].length.should == 1
+      result[0][:versions][0][:sources][0][:priority].should == 100
+      result[0][:versions][0][:sources][0][:source].should == '/var/lib/dpkg/status'
+    end
+  end
+
+  describe 'scanner' do
+    it 'finds downgradable packages in parse results' do
+      result = Dgh.find_downgradable(Dgh.parse(PolicyOutputWithDowngradable).content)
+      result.length.should == 1
+      result[0][:name].should == "avahi-autoipd"
+    end
+
+    it "doesn't find downgradables where there aren't any" do
+      result = Dgh.find_downgradable(Dgh.parse(PolicyOutputWithoutDowngradable).content)
+      result.length.should == 0
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,20 @@
+require 'rubygems'
+require 'spork'
+
+Spork.prefork do
+  $LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+  $LOAD_PATH.unshift(File.dirname(__FILE__))
+  require 'rspec'
+
+  # Requires supporting files with custom matchers and macros, etc,
+  # in ./support/ and its subdirectories.
+  Dir["#{File.dirname(__FILE__)}/support/**/*.rb"].each {|f| require f}
+
+  RSpec.configure do |config|
+  end
+end
+
+Spork.each_run do
+  require 'dgh'
+end
+

data/tests.watchr

@@ -0,0 +1,162 @@
+#!/usr/bin/env watchr
+# vim: filetype=ruby
+#
+# Thanks to
+# http://www.stupididea.com/2009/03/15/non-rails-autotest-rspec-libnotify-linux/
+# for inspiration.
+
+def have_notify_send?
+  case `which notify-send`.empty?
+  when true
+    false
+  else
+    true
+  end
+end
+
+def have_growl?
+  @have_growl ||= begin
+                    require 'growl'
+                  rescue LoadError
+                    false
+                  end
+end
+
+def error_icon_name 
+  "gtk-dialog-error"
+end
+
+def success_icon_name
+  "gtk-dialog-info"
+end
+
+# Rules
+watch('^spec/.+_spec\.rb$') { |md| spec md[0] }
+watch('^lib/.+\.rb$') { |md| spec "spec/#{File.basename(md[0]).gsub(/\..*?$/, '')}_spec.rb" }
+watch('^features/.+\.feature$') { |md| feature md[0] }
+watch('^lib/.+\.treetop$') { |md| treetop md[0]; run_suite }
+
+# Notify using notify-send.
+#
+# @param icon [String] name of stock icon to use.
+# @param title [String] title of notification.
+# @param message [String] message for notification body.
+# @return [Boolean] true if the command ran successfully, false
+# otherwise.
+def notify(icon, title, message)
+  system("notify-send -t 3000 -i #{icon} \"#{title}\" \"#{message}\"")
+end
+
+# Notify of success.
+#
+def notify_success
+  puts "Success"
+  #if have_notify_send?
+    #notify success_icon_name, "All green!", "Now write more tests :)"
+  #elsif have_growl?
+    #Growl.notify_ok "All green!"
+  #end
+end
+
+# Notify of failure.
+#
+def notify_failure
+  puts "Failure"
+  #if have_notify_send?
+    #notify error_icon_name, "Something is broken", "Now go fix it :)"
+  #elsif have_growl?
+    #Growl.notify_error "Something is broken"
+  #end
+end
+
+# Run a single ruby command. Notify appropriately.
+# 
+# @param cmd [String] command to run.
+def run(cmd)
+  system('clear')
+  puts "Running #{cmd}"
+  if system(cmd)
+    notify_success
+    true
+  else
+    notify_failure
+    false
+  end
+end
+
+# Run a single spec.
+#
+# @param specfile [String] path to specfile.
+def spec(specfile)
+  if run(%Q(rspec #{rspec_opts} #{specfile}))
+    if @last_run_failed
+      run_all_specs && @last_run_failed = false
+    end
+  else
+    @last_run_failed = true
+  end
+end
+
+# Run a single feature.
+#
+# @param featurefile [String] path to feature file.
+def feature(featurefile)
+  run(%Q(cucumber #{cucumber_opts} #{featurefile}))
+end
+
+# Compile a treetop grammar
+#
+# @param grammarfile [String] path to grammar file
+def treetop(grammarfile)
+  run(%Q(tt #{grammarfile}))
+end
+
+# Options for rspec run
+#
+# @return [String] string with options.
+def rspec_opts
+  "--format documentation --color --drb"
+end
+
+# Options for cucumber run.
+#
+# @return [String] string with options.
+def cucumber_opts
+  "--drb --port 8990"
+end
+
+# Run all specs.
+#
+def run_all_specs
+  run "rake spec"
+end
+
+# Run all features.
+#
+def run_features
+  run "rake features"
+end
+
+# Run specs and features.
+#
+def run_suite
+  run "rake spec features"
+end
+
+# Run all specs on Ctrl-\
+Signal.trap('QUIT') { run_all_specs }
+
+# Run full suite on one Ctrl-C, quit on two
+@interrupted = false
+Signal.trap('INT') do
+  if @interrupted
+    abort("\n")
+  else
+    puts "Interrupt a second time to quit"
+    @interrupted = true
+    Kernel.sleep 1.5
+    run_suite
+    @interrupted = false
+  end
+end
+

metadata

@@ -0,0 +1,184 @@
+--- !ruby/object:Gem::Specification 
+name: dgh
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: 0.1.2
+platform: ruby
+authors: 
+- Ilkka Laukkanen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-05-23 00:00:00 +03:00
+default_executable: dgh
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: treetop
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rake
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 0.9.0
+  type: :development
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 2.6.0
+  type: :development
+  version_requirements: *id003
+- !ruby/object:Gem::Dependency 
+  name: yard
+  prerelease: false
+  requirement: &id004 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 0.6.0
+  type: :development
+  version_requirements: *id004
+- !ruby/object:Gem::Dependency 
+  name: cucumber
+  prerelease: false
+  requirement: &id005 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id005
+- !ruby/object:Gem::Dependency 
+  name: bundler
+  prerelease: false
+  requirement: &id006 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 1.0.13
+  type: :development
+  version_requirements: *id006
+- !ruby/object:Gem::Dependency 
+  name: jeweler
+  prerelease: false
+  requirement: &id007 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 1.5.2
+  type: :development
+  version_requirements: *id007
+- !ruby/object:Gem::Dependency 
+  name: spork
+  prerelease: false
+  requirement: &id008 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id008
+- !ruby/object:Gem::Dependency 
+  name: watchr
+  prerelease: false
+  requirement: &id009 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id009
+description: |
+  Dgh helps when you have to manually downgrade a large amount of packages.
+  It requires the user to generate a file with `apt-cache policy` output for all
+  installed packages, which it then reads. It looks for packages that have a
+  currently installed version that doesn't exist in any repository, and prints
+  those. This includes both locally generated packages that never did exist in
+  any repository, and more crucially, packages that have been upgraded from e.g.
+  a PPA that has since been removed from the system.
+
+email: 
+- ilkka.s.laukkanen@gmail.com
+executables: 
+- dgh
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE.txt
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- .rspec
+- .rvmrc
+- Gemfile
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- bin/dgh
+- cucumber.yml
+- dgh.gemspec
+- features/dgh.feature
+- features/step_definitions/dgh_steps.rb
+- features/support/env.rb
+- lib/dgh.rb
+- lib/dgh/version.rb
+- lib/policy.rb
+- lib/policy.treetop
+- spec/dgh_spec.rb
+- spec/spec_helper.rb
+- tests.watchr
+has_rdoc: true
+homepage: http://github.com/ilkka/dgh
+licenses: 
+- GPLv3
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.5.2
+signing_key: 
+specification_version: 3
+summary: The Debian/Ubuntu Downgrade Helper
+test_files: []
+