Add simple regression testing code and tests for some issues.
[oweals/opkg-lede.git] / tests / regress / issue51.py
diff --git a/tests/regress/issue51.py b/tests/regress/issue51.py
new file mode 100755 (executable)
index 0000000..75803ed
--- /dev/null
@@ -0,0 +1,70 @@
+#!/usr/bin/python3
+
+import os
+import opk, cfg, opkgcl
+
+opk.regress_init()
+
+open("foo", "w").close()
+a1 = opk.Opk(Package="a", Version="1.0", Architecture="all")
+a1.write(data_files=["foo"])
+os.rename("a_1.0_all.opk", "a_with_foo.opk")
+
+opkgcl.install("a_with_foo.opk")
+
+# ----
+opkgcl.install("a_with_foo.opk")
+
+open("bar", "w").close()
+o = opk.OpkGroup()
+a2 = opk.Opk(Package="a", Version="1.0", Architecture="all")
+a2.write(data_files=["foo", "bar"])
+o.opk_list.append(a2)
+o.write_list()
+
+os.unlink("foo")
+os.unlink("bar")
+
+opkgcl.update()
+opkgcl.install("a", "--force-reinstall")
+
+foo_fullpath = "{}/foo".format(cfg.offline_root)
+bar_fullpath = "{}/bar".format(cfg.offline_root)
+
+if not os.path.exists(foo_fullpath) or not os.path.exists(bar_fullpath):
+       print(__file__, ": Files foo and/or bar are missing.")
+       exit(False)
+
+a_files = opkgcl.files("a")
+if not foo_fullpath in a_files or not bar_fullpath in a_files:
+       print(__file__, ": Package 'a' does not own foo and/or bar.")
+       exit(False)
+
+opkgcl.remove("a")
+
+if os.path.exists(foo_fullpath) or os.path.exists(bar_fullpath):
+       print(__file__, ": Files foo and/or bar still exist "
+                               "after removal of package 'a'.")
+       exit(False)
+
+# ----
+o = opk.OpkGroup()
+a2 = opk.Opk(Package="a", Version="1.0", Architecture="all")
+a2.write()
+o.opk_list.append(a2)
+o.write_list()
+
+
+opkgcl.update()
+
+opkgcl.install("a", "--force-reinstall")
+
+if os.path.exists(foo_fullpath):
+       print(__file__, ": File 'foo' not orphaned as it should be.")
+       exit(False)
+
+if foo_fullpath in opkgcl.files("a"):
+       print(__file__, ": Package 'a' incorrectly owns file 'foo'.")
+       exit(False)
+
+opkgcl.remove("a")