ruby-debian 0.3.8

data/t/testdeb.rb

@@ -0,0 +1,239 @@
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+
+$:.unshift("../lib")
+require '../lib/debian.rb'
+
+class TestDebian__Deb < RUNIT::TestCase
+
+  def setup
+    @deb = [Debian::Deb.new(IO.readlines("d/w3m_0.2.1-1.f").join("")),
+            Debian::Deb.new(IO.readlines("d/w3m_0.2.1-2.f").join("")),
+            Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-1.f").join("")),
+            Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-2.f").join(""))]
+  end
+
+  def test_package
+    assert_equals("w3m", @deb[0].package)
+    assert_equals("w3m", @deb[1].package)
+    assert_equals("w3m-ssl", @deb[2].package)
+    assert_equals("w3m-ssl", @deb[3].package)
+  end
+
+  def test_provides
+    assert_equals(['www-browser'], @deb[0].provides)
+    assert_equals(['www-browser'], @deb[1].provides)
+    assert_equals(['www-browser'], @deb[2].provides)
+    assert_equals(['www-browser'], @deb[3].provides)
+  end
+
+  def test_source
+    assert_equals("w3m", @deb[0].package)
+    assert_equals("w3m", @deb[1].package)
+    assert_equals("w3m-ssl", @deb[2].package)
+    assert_equals("w3m-ssl", @deb[3].package)
+  end
+
+  def test_unmet
+    p = Debian::Packages.new("d/w3m_met_list")
+    puts @deb[0].unmet(p)
+    assert_equals([], @deb[0].unmet(p))
+  end
+
+  def test_version
+    assert_equals("0.2.1-1", @deb[0].version)
+    assert_equals("0.2.1-2", @deb[1].version)
+    assert_equals("0.2.1-1", @deb[2].version)
+    assert_equals("0.2.1-2", @deb[3].version)
+  end
+
+  def test_status
+    assert_equals("not-installed", @deb[0].status)
+  end
+
+  def test_selection
+    assert_equals("unknown", @deb[0].selection)
+  end
+
+  def test_description
+    assert_equals("WWW browsable pager with excellent tables/frames support",
+		  @deb[0].description)
+  end
+
+  def test_unknown?
+    assert(@deb[0].unknown?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: unknown ok not-installed\n"].join(""))
+    assert(d.unknown?)
+  end
+  def test_install?
+    assert(! @deb[0].installed?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok installed\n"].join(""))
+    assert(d.install?)
+  end
+  def test_hold?
+    assert(! @deb[0].hold?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: hold ok installed\n"].join(""))
+    assert(d.hold?)
+  end
+  def test_deinstall?
+    assert(! @deb[0].deinstall?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: deinstall ok not-installed\n"].join(""))
+    assert(d.deinstall?)
+  end
+  def test_remove?
+    assert(! @deb[0].remove?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: deinstall ok not-installed\n"].join(""))
+    assert(d.remove?)
+  end
+  def test_purge?
+    assert(! @deb[0].purge?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: purge ok not-installed\n"].join(""))
+    assert(d.purge?)
+  end
+  def test_not_installed?
+    assert(@deb[0].not_installed?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: unknown ok not-installed\n"].join(""))
+    assert(d.not_installed?)
+  end
+  def test_purged?
+    assert(@deb[0].purged?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: unknown ok not-installed\n"].join(""))
+    assert(d.purged?)
+  end
+  def test_unpacked?
+    assert(! @deb[0].unpacked?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok unpacked\n"].join(""))
+    assert(d.unpacked?)
+  end
+  def test_half_configured?
+    assert(! @deb[0].half_configured?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install reinstreq half-configured\n"].join(""))
+    assert(d.half_configured?)
+  end
+  def test_intalled?
+    assert(! @deb[0].installed?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok installed\n"].join(""))
+    assert(d.installed?)
+  end
+  def test_half_installed?
+    assert(! @deb[0].half_installed?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install reinstreq half-installed\n"].join(""))
+    assert(d.half_installed?)
+  end
+  def test_config_files?
+    assert(! @deb[0].config_files?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok config-files\n"].join(""))
+    assert(d.config_files?)
+  end
+  def test_config_only?
+    assert(! @deb[0].config_only?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok config-files\n"].join(""))
+    assert(d.config_only?)
+  end
+  def test_removed?
+    assert(@deb[0].removed?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok config-files\n"].join(""))
+    assert(d.removed?)
+  end
+  def test_need_fix?
+    assert(! @deb[0].need_fix?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install reinstreq half-installed\n"].join(""))
+    assert(d.need_fix?)
+  end
+  def test_need_action?
+    assert(! @deb[0].need_action?)
+    d = Debian::Deb.new([IO.readlines("d/w3m_0.2.1-1.f"),
+			  "Status: install ok not-installed\n"].join(""))
+    assert(d.need_action?)
+  end
+
+  def test_ok?
+    assert(@deb[0].ok?)
+  end
+
+  def check_apt_cache
+    @ruby = Dir["/var/cache/apt/archives/ruby_1.6*.deb"]
+    if @ruby.empty?
+      assert_fail("no ruby package in /var/cache/apt/archives")
+    end
+  end
+  def test_filename=()
+    check_apt_cache
+    @ruby.each {|df|
+      d = Debian::Deb.new(IO.readlines("d/w3m_0.2.1-1.f").join(""))
+      d.filename = df
+      assert_equals(df, d.filename)
+    }
+  end
+
+  def test_controlFile
+    # tested by controlData?
+  end
+  def test_controlData
+    check_apt_cache
+    @ruby.each {|df|
+      deb = Debian::DpkgDeb.load(df)
+      oc = IO.popen("dpkg -f #{df}") {|fp| fp.readlines.join("")}
+      assert_equals(oc, deb.controlData)
+      om = IO.popen("dpkg -I #{df} md5sums") {|fp| fp.readlines.join("") }
+      assert_equals(om, deb.controlData("md5sums"))
+    }
+  end
+  def test_dataFile
+    # tested by dataData?
+  end
+  def test_dataData
+    check_apt_cache
+    @ruby.each {|df|
+      deb = Debian::DpkgDeb.load(df)
+      oc = IO.popen("dpkg --fsys-tarfile #{df}|tar xfO - '*/copyright'") {|fp|
+	fp.readlines.join("")
+      }
+      assert_equals(oc, deb.dataData('copyright'))
+    }
+  end
+  def test_sys_tarfile
+    check_apt_cache
+    @ruby.each {|df|
+      deb = Debian::DpkgDeb.load(df)
+      os = IO.popen("dpkg --fsys-tarfile #{df}") {|fp|
+	fp.readlines.join("")
+      }
+      ts = deb.sys_tarfile {|fp| fp.readlines.join("") }
+      assert_equals(os, ts)
+    }
+  end
+
+#  def test_s_new
+#    
+#  end
+
+end
+
+if $0 == __FILE__
+  if ARGV.size == 0
+    suite = TestDebian__Deb.suite
+  else
+    suite = RUNIT::TestSuite.new
+    ARGV.each do |testmethod|
+      suite.add_test(TestDebian__Deb.new(testmethod))
+    end
+  end
+  RUNIT::CUI::TestRunner.run(suite)
+end

data/t/testdep.rb

@@ -0,0 +1,70 @@
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+
+$:.unshift("../lib")
+require '../lib/debian.rb'
+
+class TestDebian__Dep < RUNIT::TestCase
+
+  def setup
+    @dep = [Debian::Dep.new("w3m", 'Depends'),
+      	    Debian::Dep.new("w3m | w3m-ssl", 'Depends'),
+            Debian::Dep.new("w3m (>= 0.2.1-2) | w3m-ssl (>= 0.2.1-2)", 
+			    'Recommends'),
+      	    Debian::Dep.new("www-browser", "Suggests")]
+  end
+
+  def test_satisfy?
+    deb = [Debian::Deb.new(IO.readlines("d/w3m_0.2.1-1.f").join("")),
+           Debian::Deb.new(IO.readlines("d/w3m_0.2.1-2.f").join("")),
+      	   Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-1.f").join("")),
+      	   Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-2.f").join(""))]
+    assert(@dep[0].satisfy?(deb[0]))
+    assert(@dep[0].satisfy?(deb[1]))
+    assert(!(@dep[0].satisfy?(deb[2])))
+    assert(!(@dep[0].satisfy?(deb[3])))
+
+    assert(@dep[1].satisfy?(deb[0]))
+    assert(@dep[1].satisfy?(deb[1]))
+    assert(@dep[1].satisfy?(deb[2]))
+    assert(@dep[1].satisfy?(deb[3]))
+
+    assert(!(@dep[2].satisfy?(deb[0])))
+    assert(@dep[2].satisfy?(deb[1]))
+    assert(!(@dep[2].satisfy?(deb[2])))
+    assert(@dep[2].satisfy?(deb[3]))
+  end
+
+  def test_to_s
+    assert_equals("Depends w3m", @dep[0].to_s)
+    assert_equals("Depends w3m | w3m-ssl", @dep[1].to_s)
+    assert_equals("Recommends w3m (>= 0.2.1-2) | w3m-ssl (>= 0.2.1-2)",
+		  @dep[2].to_s)
+  end
+
+  def test_unmet
+    p = Debian::Packages.new("d/w3m_met_list")
+    assert_equals([], @dep[0].unmet(p)) # w3m
+    assert_equals([], @dep[1].unmet(p)) # w3m | w3m-ssl
+    assert_equals([], @dep[2].unmet(p)) 
+    			# w3m (>= 0.2.1-2) | w3m-ssl (>= 0.2.1-2)
+    assert_equals([], @dep[3].unmet(p)) # www-browser
+  end
+
+#  def test_s_new
+#    
+#  end
+
+end
+
+if $0 == __FILE__
+  if ARGV.size == 0
+    suite = TestDebian__Dep.suite
+  else
+    suite = RUNIT::TestSuite.new
+    ARGV.each do |testmethod|
+      suite.add_test(TestDebian__Dep.new(testmethod))
+    end
+  end
+  RUNIT::CUI::TestRunner.run(suite)
+end

data/t/testdepterm.rb

@@ -0,0 +1,140 @@
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+
+$:.unshift("../lib")
+require '../lib/debian.rb'
+
+class TestDebian__Dep__Term < RUNIT::TestCase
+
+  def setup
+    @dep = [Debian::Dep::Term.new('w3m'),
+  	    Debian::Dep::Term.new('w3m', '<<', '0.2.1-2'),
+  	    Debian::Dep::Term.new('w3m', '<=', '0.2.1-2'),
+  	    Debian::Dep::Term.new('w3m', '=', '0.2.1-2'),
+  	    Debian::Dep::Term.new('w3m', '>=', '0.2.1-2'),
+  	    Debian::Dep::Term.new('w3m', '>>', '0.2.1-2'),
+  	    Debian::Dep::Term.new('w3m', '==', '0.2.1-2'),
+      	    Debian::Dep::Term.new('www-browser')]
+  end
+  def test_EQUAL # '=='
+    assert_equals(Debian::Dep::Term.new('w3m'), @dep[0])
+    assert_equals(Debian::Dep::Term.new('w3m', '<<', '0.2.1-2'), @dep[1])
+  end
+
+  def test_op
+    assert_equals("", @dep[0].op)
+    assert_equals("<<", @dep[1].op)
+    assert_equals("<=", @dep[2].op)
+    assert_equals("=", @dep[3].op)
+    assert_equals(">=", @dep[4].op)
+    assert_equals(">>", @dep[5].op)
+  end
+
+  def test_package
+    assert_equals("w3m", @dep[0].package)
+    assert_equals("w3m", @dep[1].package)
+  end
+
+  def test_satisfy?
+    @deb = [Debian::Deb.new(IO.readlines("d/w3m_0.2.1-1.f").join("")),
+      	    Debian::Deb.new(IO.readlines("d/w3m_0.2.1-2.f").join("")),
+      	    Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-1.f").join("")),
+      	    Debian::Deb.new(IO.readlines("d/w3m-ssl_0.2.1-2.f").join(""))]
+    # w3m
+    assert(@dep[0].satisfy?(@deb[0]))
+    assert(@dep[0].satisfy?(@deb[1]))
+    assert(!(@dep[0].satisfy?(@deb[2])))
+    assert(!(@dep[0].satisfy?(@deb[3])))
+
+    # w3m << 0.2.1-2
+    assert(@dep[1].satisfy?(@deb[0]))
+    assert(!(@dep[1].satisfy?(@deb[1])))
+    assert(!(@dep[1].satisfy?(@deb[2])))
+    assert(!(@dep[1].satisfy?(@deb[3])))
+
+    # w3m <= 0.2.1-2
+    assert(@dep[2].satisfy?(@deb[0]))
+    assert(@dep[2].satisfy?(@deb[1]))
+    assert(!(@dep[2].satisfy?(@deb[2])))
+    assert(!(@dep[2].satisfy?(@deb[3])))
+
+    # w3m = 0.2.1-2
+    assert(!(@dep[3].satisfy?(@deb[0])))
+    assert(@dep[3].satisfy?(@deb[1]))
+    assert(!(@dep[3].satisfy?(@deb[2])))
+    assert(!(@dep[3].satisfy?(@deb[3])))
+
+    # w3m >= 0.2.1-2
+    assert(!(@dep[4].satisfy?(@deb[0])))
+    assert(@dep[4].satisfy?(@deb[1]))
+    assert(!(@dep[4].satisfy?(@deb[2])))
+    assert(!(@dep[4].satisfy?(@deb[3])))
+
+    # w3m >> 0.2.1-2
+    assert(!(@dep[5].satisfy?(@deb[0])))
+    assert(!(@dep[5].satisfy?(@deb[1])))
+    assert(!(@dep[5].satisfy?(@deb[2])))
+    assert(!(@dep[5].satisfy?(@deb[3])))
+
+    # w3m == 0.2.1-2
+    assert_exception(Debian::DepError) { @dep[6].satisfy?(@deb[0])}
+    assert_exception(Debian::DepError) { @dep[6].satisfy?(@deb[1])}
+    assert_exception(Debian::DepError) { @dep[6].satisfy?(@deb[2])}
+    assert_exception(Debian::DepError) { @dep[6].satisfy?(@deb[3])}
+
+    # www-browser (provides test)
+    assert(@dep[7].satisfy?(@deb[0]))
+    assert(@dep[7].satisfy?(@deb[1]))
+    assert(@dep[7].satisfy?(@deb[2]))
+    assert(@dep[7].satisfy?(@deb[3]))
+  end
+
+  def test_to_s
+    assert_equals("w3m", @dep[0].to_s)
+    assert_equals("w3m (<< 0.2.1-2)", @dep[1].to_s)
+    assert_equals("w3m (<= 0.2.1-2)", @dep[2].to_s)
+    assert_equals("w3m (= 0.2.1-2)", @dep[3].to_s)
+    assert_equals("w3m (>= 0.2.1-2)", @dep[4].to_s)
+    assert_equals("w3m (>> 0.2.1-2)", @dep[5].to_s)
+  end
+
+  def test_unmet
+    p = Debian::Packages.new("d/w3m_met_list")
+    assert_equals([], @dep[0].unmet(p)) # w3m
+    assert_equals([Debian::Dep::Unmet.new(@dep[1], p['w3m'])],
+		  @dep[1].unmet(p)) # w3m << 0.2.1-2
+    assert_equals([], @dep[2].unmet(p)) # w3m <= 0.2.1-2
+    assert_equals([], @dep[3].unmet(p)) # w3m = 0.2.1-2
+    assert_equals([], @dep[4].unmet(p)) # w3m >= 0.2.1-2
+    assert_equals([Debian::Dep::Unmet.new(@dep[5], p['w3m'])], 
+		  @dep[5].unmet(p)) # w3m >> 0.2.1-2
+    assert_equals([], @dep[7].unmet(p)) # www-browser
+  end
+
+  def test_version
+    assert_equals("", @dep[0].version)
+    assert_equals("0.2.1-2", @dep[1].version)
+    assert_equals("0.2.1-2", @dep[2].version)
+    assert_equals("0.2.1-2", @dep[3].version)
+    assert_equals("0.2.1-2", @dep[4].version)
+    assert_equals("0.2.1-2", @dep[5].version)
+    assert_equals("0.2.1-2", @dep[6].version)
+  end
+
+#  def test_s_new
+#    
+#  end
+
+end
+
+if $0 == __FILE__
+  if ARGV.size == 0
+    suite = TestDebian__Dep__Term.suite
+  else
+    suite = RUNIT::TestSuite.new
+    ARGV.each do |testmethod|
+      suite.add_test(TestDebian__Dep__Term.new(testmethod))
+    end
+  end
+  RUNIT::CUI::TestRunner.run(suite)
+end