我正在尝试使用Clojure作为宿主Java程序的脚本语言。最终用户将能够编写Clojure脚本代码,以调用特定于域的Java API。在运行时,宿主Java程序将评估最终用户的Clojure脚本(该脚本又将调用域API)。因此,我从一个简单的原型(prototype)开始,以探索地形。
领域
package a.problem.domain;
public class Domain {
public Domain() { }
public String defaultMsg() {
return "default";
}
public String passBackMsg(String s) {
return s;
}
}
托管Java程序
(为简单起见,对最终用户的Clojure脚本进行了硬编码)
String script = "(do "+
" (import '(a.problem.domain Domain)) "+
" (.defaultMsg (Domain.)) "+
") ";
System.out.println(RT.var("clojure.core", "eval").invoke(RT.var("clojure.core","read-string").invoke(script)));
(摘自here的代码段)
到现在为止还挺好。
但是我找不到一种方法来调用第二种方法(需要一个参数的方法)。相反,我求助于在运行时动态生成Clojure脚本,并用代表表示调用域方法 passBackMsg 的结果的文字替换占位符。显然,这并不能令人满意,并且不会走得太远(如果我想将java.sql.Connection传递给Clojure脚本该怎么办?)。
那么,如何从宿主Java程序调用 passBackMsg 方法?
当我尝试以下操作时:
String script = "(ns foo) "+
"(import '(a.problem.domain Domain)) "+
"(defn numberToString [s] ( "+
" (.passBackMsg (Domain.) s) "+
")) ";
RT.var("clojure.core", "eval").invoke(RT.var("clojure.core","read-string").invoke(script)); // line-A
System.out.println(RT.var("foo", "numberToString").invoke(33)); // line-B
我得到:
java.lang.IllegalStateException: Can't change/establish root binding of: *ns* with set
...在A行上。当我尝试不使用ns并使用:
RT.var("user", "numberToString").invoke(33)
(“用户”是一个疯狂的猜测,因为我看不到没有命名空间参数的 var 方法)
我得到:
java.lang.IllegalStateException: Attempting to call unbound fn: #'user/numberToString"
...在B行上。
最佳答案
试试这个:
String script = "(do "+
" (import '(a.problem.domain Domain)) "+
" (fn [s] " +
" (.passBackMsg (Domain.) s) "+
")) ";
IFn fn = (IFn)RT.var("clojure.core", "eval").invoke(RT.var("clojure.core","read-string").invoke(script));
fn.invoke("hello");
更新:
下面的示例代码可以正常工作:
package hello_clj;
import clojure.lang.RT;
import clojure.lang.IFn;
public class Main {
public String passBackMsg(String s) {
return s;
}
public static void main(String[] args) {
String script = "(do (import 'hello_clj.Main) (fn [s] " +
"(.passBackMsg (Main.) s) ))";
IFn fn = (IFn)RT.var("clojure.core", "eval").invoke(RT.var("clojure.core","read-string").invoke(script));
System.out.print(fn.invoke("Hello"));
}
}