- armedbear-devel - mailman3.common-lisp.net

How to call System.getProperty("user.home") from ABCL
by Mirko Vukovic 21 Jun '17

21 Jun '17

Hello, after a recent update of my company Windows 10 laptop, ABCL 1.4 is landing me in an incorrect home directory. Before I contact our support I would like to investigate the problem a bit more. This is how far I got: (user-homedir-pathname) returns #P"C:/WINDOWS/system32/config/systemprofile/" I wrote a little Java snippet to test "user.home" public class UserHome { public static void main(String[] args) { System.out.println(System.getProperty("user.home")); } } and it returns, correctly, "C:\Users\977315" I don't know how to call System.getProperty("user.home") from ABCL. I have multiple Java's on my laptop, and I need to doublecheck that my tests are self-consistent. But in the meantime, how do I call System.getProperty? Thanks, Mirko

4 8

ABCL User Question about following HTTP redirects for CL:OPEN on EXT:PATHNAME-URL references?
by Mark Evenson 04 Jun '17

04 Jun '17

Alan Ruttenberg from <http://abcl.org/trac/ticket/432>: So if you want to do something like use uiop/stream:copy-file which does something like open the source, open the dest, read/write, it will not do what you might expect. I don't see a way of controlling this behavior. Arguably the default ought to be to follow redirects and open the redirected-to file. I replied: ABCL-BUILD now uses uiop/steam:copy-file for the machinery which retreives XDG rooted Ant and Maven installations from well-known URIs c.f. <http://abcl.org/trac/browser/trunk/abcl/contrib/abcl-build/build/install.li…>, so the underlying ext:pathname-url implementation on java.net.HTTPUrlConnection seems to be working for cases in which the URI is already canonical in the form that would be idempotent for following across HTTP 3xx redirects. WORKAROUND: The current usage expected of the user is to introspect any reference to a ext:pathname-url via CL:TRUENAME. If there is an underlying redirect, CL:TRUENAME should somehow offer an API to the user to customize its behavior. I am currently against "jumping" across URI schema changes without a chance for user intervention. Smells like another restart to me. What would the current users of Armed Bear to do: automatically follow all HTTP retrieval redirects without regards to security concerns, or follow the current policy of doing "whatever ORCL thinks is right for java.net.HTTPUrlConnection"? -- "No, this is not a disentanglement, but a progressive /knotting-into/."

1 0

How to load the jna jar file before cffi?
by Mirko Vukovic 26 May '17

26 May '17

Hello, In order for CFFI to load, I need to load jna-4.2.2.jar. Right now, I have to do something like this: (let ((jar-pathname #P"c:/Users/977315/.m2/repository/net/java/dev/jna/jna/4.2.2/jna-4.2.2.jar")) (java:add-to-classpath (namestring jar-pathname))) To automate loading of ASDFs that require CFFI I tried to automate the process by adding a before method to 'load-op: (eval-when (:compile-toplevel :execute :load-toplevel) (defmethod operate :before ((operation (eql 'asdf/lisp-action:load-op)) (component (eql :cffi))) (let ((jar-pathname #P"c:/Users/977315/.m2/repository/net/java/dev/jna/jna/4.2.2/jna-4.2.2.jar")) (java:add-to-classpath (namestring jar-pathname))))) That did not work. I did read the ASDF manual, but could not figure out how to do it. I suspect someone has figured out the right way. What is it? Thanks, Mirko

3 8

Maven and ABCL
by Alan Ruttenberg 25 May '17

25 May '17

I'm using :mvn ASDF components and ran into a problem with having multiple versions of the same library. The issue boils down to the fact that ABCL currently processes dependencies for :mvn components one at a time, which doesn't take into account mutual dependencies. Attached is a function resolve-multiple-maven-dependencies, which takes a set of maven components and computes the dependencies. As an example, here is a comparison of treating the dependencies individually vs at once. (length (mapcan 'resolve-multiple-maven-dependencies '(("net.sourceforge.owlapi:owlapi-distribution:4.2.6") ("net.sourceforge.owlapi:org.semanticweb.hermit:1.3.8.413") ("org.semanticweb.elk/elk-reasoner/0.4.3") ("net.sourceforge.owlapi/pellet-cli-ignazio1977/2.4.0-ignazio1977") ("net.sourceforge.owlapi/owlexplanation/2.0.0")))) -> 210 (length (mapcan 'resolve-multiple-maven-dependencies '(("net.sourceforge.owlapi:owlapi-distribution:4.2.6" "net.sourceforge.owlapi:org.semanticweb.hermit:1.3.8.413" "org.semanticweb.elk/elk-reasoner/0.4.3" "net.sourceforge.owlapi/pellet-cli-ignazio1977/2.4.0-ignazio1977" "net.sourceforge.owlapi/owlexplanation/2.0.0")))) -> 90 In particular there are several versions of owlapi-distribution that are put on the classpath. Which one is actually used is not easily predictable. In my case even though I specified version 4.2.6 in my system definition, 4.1.3 was actually used. The attached code also has features not yet supported by the :mvn syntax that are really needed: The ability to override versions of a particular dependency that a downstream dependency specifies, and the ability to exclude certain artifacts altogether. Mark has suggested that the maven resolution could be moved to the ASDF planning stage, which sounds like a good idea. However there is still an issue regarding maven dependencies in different loaded ASDF systems. One idea is to remember dependencies across systems and then uses them as constraints on subsequent maven resolutions. Comments and ideas would be appreciated. Alan

3 11

sys:run-program errs on first invocation, works afterwards
by Mirko Vukovic 24 May '17

24 May '17

On Windows 10, ABCL 1.4.0 sys:run-program first issues an error. With abcl --no-init, the first call goes like this: (sys:run-program "where.exe" '("mvn.bat")) Error message: Class not found: java.lang.UNIXProcess [Condition of type ERROR] ... 48: (JCLASS "java.lang.UNIXProcess") 49: (SYSTEM::GET-FASL-FUNCTION #<org.armedbear.lisp.FaslClassLoader org.armedbear.lisp.FaslClassLoad.... {445C74}> 48) 50: (SYSTEM:INIT-FASL :VERSION 42) 51: (SYSTEM::%EVAL (SYSTEM:RUN-PROGRAM "where.exe" '("mvn.bat"))) Repeating the command the second time, and parsing the output (as done in abcl-asdf:find-mvn) gives the expected result. Mirko

1 0

Finding abcl-contrib packages inside a JAR: approach and suggestions
by Frederico Munoz 30 Apr '17

30 Apr '17

Hello, I'm almost done with my small experiment: * I'm loading lisp code via a Java file using Load.loadSystemFile in an init method * I'm adding the file file to *lisp-home* via gradle * I'm using gradle tasks to create a single JAR with abcl and abcl-contrib added (not as JAR files) Note that I need to have only one jar file and with specific requirements around the main method; the above allows me to have it working fine, a single JAR which is essentially standalone. My only remaining doubt (apart from other possible solutions which could also work and be more elegant, I'm open to suggestions of course) is around loading abcl-contrib.jar or more specifically the included packages (JSS and JFLI specifically). I've spent some hours tracking the loading mechanism and learned a bit about the process but I'm still missing some pieces. My current solution (which works) is: (require :abcl-contrib) (pushnew (make-pathname :device (pathname-device *lisp-home*) :directory '(:absolute "jss")) asdf:*central-registry*) (require :jss) This adds #P"jar:file:/foo/myapp.jar!/jss" to ASDF, but I would like something more direct. With my setup (system::find-contrib) returns NIL; I've tried to add the abcl-contrib.jar to myapp.jar (which is in the CLASSPATH of course) but the code on abcl-contrib.lisp (and specifically find-contrib) doesn't seem to seach inside a jar for another one. I also tried to use something like (system::add-contrib (make-pathname :device (pathname-device *lisp-home*) :directory '(:absolute "abcl-contrib.jar"))) to see if it would pick up the jar but no luck. I think there is something obvious I'm missing, the pieces are all there (the jar handling code works fine, etc) but I can't seem to find the right way to put them together. Best regards, -- fsmunoz(a)sdf.org SDF Public Access UNIX System - http://sdf.org

2 2

disabling debugger in production
by Vibhu Mohindra 26 Apr '17

26 Apr '17

I'm bundling up a program for distribution to customers. I don't want it to ever enter the debugger. I want it to raise Java exceptions instead. What I've written to achieve this follows. I've observed it working. However, there are still times when my program enters the debugger. I can't tell why, and want to prevent it entirely. Does anybody know? Does anyone on this list distribute ABCL applications to end users, and how do you disable the debugger? /* disable the debugger. raise a RuntimeException instead */ static void installDebuggerHook() { Symbol.DEBUGGER_HOOK .setSymbolValue(new Function() { public LispObject execute(LispObject c, LispObject h) { throw translateCondition(c);}}); } static RuntimeException translateCondition(LispObject c) { return new RuntimeException( c instanceof Condition ? String.format("%s: %s", c.princToString(), ((Condition) c).getConditionReport()) : c.princToString()); } My program is really a Lisp library that people will use via a thin Java layer. I have a hunch that the above takes care of errors that occur in: interpreter.eval("...") but not errors that occur in: someSymbol.execute(...) Thanks in advance, Vibhu

1 2

"Don't know how to REQUIRE JSS" when loading Lisp code from Java
by Frederico Munoz 25 Apr '17

25 Apr '17

Hello, I'm using the following code to execute a Lisp function: #+BEGIN_SRC java public class Call { public static void main(String [] args) { Call thisObject = new Call(); Interpreter interpreter = Interpreter.createInstance(); interpreter.eval("(load \"lispfunctions.lisp\")"); org.armedbear.lisp.Package defaultPackage = Packages.findPackage("CL-USER"); Symbol voidsym = defaultPackage.findAccessibleSymbol("SAY-HELLO"); Function voidFunction = (Function) voidsym.getSymbolFunction(); LispObject result = voidFunction.execute(new JavaObject(thisObject)); } } #+END_SRC The Lisp side: #+BEGIN_SRC lisp ;;; lispfunctions.lisp (java:add-to-classpath "/opt/abcl-bin-1.4.0/abcl-contrib.jar") (require :jss) (defun say-hello () "Hi!") #+END_SRC It works without the (requirese :jss); whenever I try to use it I get: #<THREAD "main" {C7BBB6C0}>: Debugger invoked on condition of type SIMPLE-ERROR Don't know how to REQUIRE JSS. Any pointers? Thanks! -- fsmunoz(a)sdf.org SDF Public Access UNIX System - http://sdf.org

2 2

Getting a Java class from Function.execute (LispObject introspection)
by Frederico Munoz 25 Apr '17

25 Apr '17

Hello, I'm experimenting with compiling some code using javac and the following example: https://github.com/slyrus/abcl/blob/master/examples/pure-lisp-to-java/Main.… I have one doubt regarding LispObject (what we get from Function.execute): I have read some introspection in the manual but my use-case is slightly different since the I will use the return value of the Lisp call and that value is actually a Java class (from a non-standard library which I use) that will be the return value of the main method of the Main class. Is this feasible? Perhaps I'm missing something obvious, especially since my Java is hardly the strongest. Best regards, -- fsmunoz(a)sdf.org SDF Public Access UNIX System - http://sdf.org

1 1

CFFI on Windows does not load sqlite3.dll
by Mirko Vukovic 24 Apr '17

24 Apr '17

Hello, This is on Windows 10, Armed Bear Common Lisp 1.4.0, Java 1.7.0_51 Oracle Corporation I am trying to link to sqlite3.dll with CFFI (as required by the cl-dbi package) I have jna installed in my home directory under ~/.m2/... and cffi loads cleanly as does cl-dbi. Note that the ~/.m2/.../jna-4.2.2.jar is not in my classpath. Instead I added it via (java:add-to-classpath ...) (cffi:load-foreign-library "c:/Program Files/sqlite/sqlite3.dll") gives an error (shown below). I also tried by adding the directory to cffi:*foreign-library-directoris*, and then calling (cffi:load-foreign-library "sqlite3.dll"). The error message is: Unable to load foreign library (SQLITE3.DLL-30929). Unable to load library 'C:/Program Files/sqlite/sqlite3.dll': Native library (win32-x86/C:/Program Files/sqlite/sqlite3.dll) not found in resource path ([file:/C:/mv-program-files/abcl-bin-1.4.0/, file:/C:/mv-program-files/abcl-bin-1.4.0/abcl.jar]) Questions: 1. What is the implication of the win32-x86 prefix to the path in the error message? Is that a 32/64 bit incompatibility? 2. I don't understand the part of the error message referring to the resource path 3. while CFFI does compile, do I have somehow to load JNA explicitly. In other words, is (ql:qload ...) enough, or do I need to do something else to activate JNA? 4. Does CFFI work on Windows (since Java is cross-platform, I would expect it to)? (My Java knowledge is epsilon where epsilon appraches 0, although I plan to work on this if I continue using ABCL to interface to Java libraries) Thank you, Mirko

2 2