d43dd7e
diff -up arts-1.5.10/libltdl/ltdl.c.CVE-2009-3736 arts-1.5.10/libltdl/ltdl.c
d43dd7e
--- arts-1.5.10/libltdl/ltdl.c.CVE-2009-3736	2008-08-19 22:18:38.000000000 +0200
d43dd7e
+++ arts-1.5.10/libltdl/ltdl.c	2009-12-08 16:02:38.000000000 +0100
d43dd7e
@@ -1454,9 +1454,10 @@ lt_dlexit ()
d43dd7e
 }
d43dd7e
 
d43dd7e
 static int
d43dd7e
-tryall_dlopen (handle, filename)
d43dd7e
+tryall_dlopen (handle, filename, useloader)
d43dd7e
      lt_dlhandle *handle;
d43dd7e
      const char *filename;
d43dd7e
+     const char *useloader;
d43dd7e
 {
d43dd7e
   lt_dlhandle	 cur;
d43dd7e
   lt_dlloader   *loader;
d43dd7e
@@ -1514,6 +1515,11 @@ tryall_dlopen (handle, filename)
d43dd7e
 
d43dd7e
   while (loader)
d43dd7e
     {
d43dd7e
+      if (useloader && strcmp(loader->loader_name, useloader))
d43dd7e
+	{
d43dd7e
+	  loader = loader->next;
d43dd7e
+	  continue;
d43dd7e
+	}
d43dd7e
       lt_user_data data = loader->dlloader_data;
d43dd7e
 
d43dd7e
       cur->module = loader->module_open (data, filename);
d43dd7e
@@ -1556,7 +1562,7 @@ find_module (handle, dir, libdir, dlname
ada66a2
   /* try to open the old library first; if it was dlpreopened,
ada66a2
      we want the preopened version of it, even if a dlopenable
ada66a2
      module is available */
ada66a2
-  if (old_name && tryall_dlopen(handle, old_name) == 0)
d43dd7e
+  if (old_name && tryall_dlopen(handle, old_name, "dlpreload") == 0)
ada66a2
     {
ada66a2
       return 0;
ada66a2
     }
d43dd7e
@@ -1579,7 +1585,7 @@ find_module (handle, dir, libdir, dlname
d43dd7e
 	    }
d43dd7e
 
d43dd7e
 	  sprintf (filename, "%s/%s", libdir, dlname);
d43dd7e
-	  error = (tryall_dlopen (handle, filename) != 0);
d43dd7e
+	  error = (tryall_dlopen (handle, filename, NULL) != 0);
d43dd7e
 	  LT_DLFREE (filename);
d43dd7e
 
d43dd7e
 	  if (!error)
d43dd7e
@@ -1611,7 +1617,7 @@ find_module (handle, dir, libdir, dlname
d43dd7e
 	  strcat(filename, objdir);
d43dd7e
 	  strcat(filename, dlname);
d43dd7e
 
d43dd7e
-	  error = tryall_dlopen (handle, filename) != 0;
d43dd7e
+	  error = tryall_dlopen (handle, filename, NULL) != 0;
d43dd7e
 	  LT_DLFREE (filename);
d43dd7e
 	  if (!error)
d43dd7e
 	    {
d43dd7e
@@ -1634,7 +1640,7 @@ find_module (handle, dir, libdir, dlname
ada66a2
 	  }
d43dd7e
 	strcat(filename, dlname);
d43dd7e
 
d43dd7e
-	error = (tryall_dlopen (handle, filename) != 0);
d43dd7e
+	error = (tryall_dlopen (handle, filename, NULL) != 0);
d43dd7e
 	LT_DLFREE (filename);
d43dd7e
 	if (!error)
d43dd7e
 	  {
d43dd7e
@@ -1749,7 +1755,7 @@ find_file (basename, search_path, pdir, 
d43dd7e
       strcpy(filename+lendir, basename);
d43dd7e
       if (handle)
d43dd7e
 	{
d43dd7e
-	  if (tryall_dlopen (handle, filename) == 0)
d43dd7e
+	  if (tryall_dlopen (handle, filename, NULL) == 0)
d43dd7e
 	    {
d43dd7e
 	      result = (lt_ptr) handle;
d43dd7e
 	      goto cleanup;
d43dd7e
@@ -2063,7 +2069,7 @@ lt_dlopen (filename)
d43dd7e
       /* lt_dlclose()ing yourself is very bad!  Disallow it.  */
d43dd7e
       LT_DLSET_FLAG (handle, LT_DLRESIDENT_FLAG);
d43dd7e
 
d43dd7e
-      if (tryall_dlopen (&newhandle, 0) != 0)
d43dd7e
+      if (tryall_dlopen (&newhandle, 0, NULL) != 0)
d43dd7e
 	{
d43dd7e
 	  LT_DLFREE (handle);
d43dd7e
 	  return 0;
d43dd7e
@@ -2368,7 +2374,7 @@ lt_dlopen (filename)
d43dd7e
 #ifdef LTDL_SYSSEARCHPATH
d43dd7e
 		      && !find_file (basename, sys_search_path, 0, &newhandle)
ada66a2
 #endif
d43dd7e
-		   )) && tryall_dlopen (&newhandle, filename))
d43dd7e
+		   )) && tryall_dlopen (&newhandle, filename, NULL))
d43dd7e
 	{
d43dd7e
 	  LT_DLFREE (handle);
d43dd7e
 	  goto cleanup;