How to get the absolute paths of foreign libraries from cffi:list-foreign-libraries?
Suppose I want to create a dump of the current dynamic libraries used in a Common Lisp application. How I can get the absolute path of foreign libraries given the result of cffi:list-foreign-libraries?
It should be nice if the given solution can be portable operating-system-wise or at least CL implementation-wise.
After some investigation, it appears that once a library is loaded, the pathname slot of the foreign-library instance representing the library is modified to point to path of resolved object file, but it is absolute only when the file is not in a standard system location. For example:
(cffi:list-foreign-libraries :loaded-only t)
=> (#<CFFI:FOREIGN-LIBRARY LIBSDL2 "libSDL2-2.0.so.0"> ...)
Now it is just a matter of accessing the pathname slot:
(mapcar #'cffi:foreign-library-pathname *)
=> (#P"libSDL2-2.0.so.0" ...)
But here, you can see that the pathname is not absolute. That's because when CFFI internally called cffi::%load-foreign-library (after a bit of tracing) with the following arguments:
(cffi::%load-foreign-library "libSDL2-2.0.so.0" "libSDL2-2.0.so.0")
... and the implementation found the object file using the system's implicit lookup mechanism (e.g. dlopen).
cffi::%load-foreign-library is implemented differently on different platforms, and in the case of SBCL, for example, the pointer obtained by dlopen is stored in objects inside SB-SYS:*SHARED-OBJECTS*, but as far as I know there is no portable way to retrieve the path of the library being loaded from that.
- How to generate all the permutations of elements in a list one at a time in Lisp?
- Iterating over strings
- How do I define my type based on class so I can use that type in typecase and related expressions?
- CL Macro does not resolve properly
- How to have offline CLHS available from the REPL?
- Does recursive call have to be strictly the last call in a function for a function to be tail-recursive?
- Why does listp in SBCL Common Lisp return T for a non-list cons cell?
- How can I delete a "." from a list in Common Lisp?
- How to create timers in a doplist loop?
- How can I access a slot with class allocation without creating an instance?
- ASDF system uffi does not return version number
- Why do we need funcall in Lisp?
- Simplest way to get a Lisp "hello world" web application going
- Is there a standard/portable way to query if a symbol stands for a symbol macro?
- seal a generic function to prevent additional methods
- Why can't Quicklisp find package Alexandria-2 when installing lisp-stat?
- Common Lisp's equivalent of \r inside the format function?
- What's the best way to learn LISP?
- Using the :around-compile argument to asdf:defsystem
- Quicklisp: Unable to load any of the alternatives ("libcrypto.so.1.1" "libcrypto.so.1.0.0" "libcrypto.so.3" "libcrypto.so")
- Macro with &key and &body parameters requires specifying key parameter
- How do you compile macros in a Lisp compiler?
- Problems with scope in defstruct common lisp
- Is there a way to execute forms in parallel in Common Lisp? Something like a parallel PROGN?
- How to step through some Common Lisp code, inspecting the return value of forms?
- Possible ways to restrict CL API, disable a double colon access, permission access manager in CL
- "UIOP" package does not exist in SBCL, can someone help me to find?
- Can you auto-continue on continuable error with clisp (or sbcl)?
- Is TRUNCASE a symbol that ever existed in a Lisp implementation?
- Unbound Variable in Lisp Macro using loop-for-collect