- more assertions for proper linking

git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@40102 20353a03-c40f-0410-a6d1-a30d3c3de9de

buildout/tests/assertSoftware.py

@@ -229,7 +229,7 @@ class AssertApache(unittest.TestCase):
   """Tests for built apache"""
 
   def test_ld_libaprutil1(self):
-    """Checks proper linking"""
+    """Checks proper linking of libaprutil-1.so"""
     elf_dict = readElfAsDict('parts/apache/lib/libaprutil-1.so')
     self.assertEqual(sorted(['libexpat', 'libapr-1', 'librt', 'libcrypt',
       'libpthread', 'libdl', 'libc']), elf_dict['library_list'])
@@ -239,6 +239,27 @@ class AssertApache(unittest.TestCase):
     self.assertEqual(sorted(expected_rpath_list), elf_dict['rpath_list'])
     self.assertEqual(sorted(expected_rpath_list), elf_dict['runpath_list'])
 
+  def test_ld_libapr1(self):
+    """Checks proper linking of libapr-1.so"""
+    elf_dict = readElfAsDict('parts/apache/lib/libapr-1.so')
+    self.assertEqual(sorted(['librt', 'libcrypt',
+      'libpthread', 'libdl', 'libc']), elf_dict['library_list'])
+    soft_dir = os.path.join(os.path.abspath(os.curdir), 'parts')
+    expected_rpath_list = [os.path.join(soft_dir, software, 'lib') for
+        software in ['zlib', 'openssl']]
+    self.assertEqual(sorted(expected_rpath_list), elf_dict['rpath_list'])
+    self.assertEqual(sorted(expected_rpath_list), elf_dict['runpath_list'])
+
+  def test_ld_libexpat(self):
+    """Checks proper linking of libexpat.so"""
+    elf_dict = readElfAsDict('parts/apache/lib/libexpat.so')
+    self.assertEqual(sorted(['libc']), elf_dict['library_list'])
+    soft_dir = os.path.join(os.path.abspath(os.curdir), 'parts')
+    expected_rpath_list = [os.path.join(soft_dir, software, 'lib') for
+        software in ['zlib', 'openssl']]
+    self.assertEqual(sorted(expected_rpath_list), elf_dict['rpath_list'])
+    self.assertEqual(sorted(expected_rpath_list), elf_dict['runpath_list'])
+
   def test_modules(self):
     """Checks for availability of apache modules"""
     required_module_list = getCleanList("""