Clojail不会在Clojure中抛出安全异常

Question

我正在使用clojail库进行沙盒处理，但它没有按预期运行。

这是代码：

(ns jail.core
  (:require [clojail.core :as s]
            [clojail.testers :as t]))

(def my-tester [(t/blacklist-objects [clojure.lang.RT])
                (t/blanket "clojail")])

(def sb (s/sandbox my-tester))

(println (sb '(do
                (import clojure.lang.RT)
                (RT/errPrintWriter))))

在(import clojure.lang.RT)行，它必须抛出SecurityException但它没有。

它返回PrintWriter（errPrintWriter）对象。

Answer 1

事实证明，如果我不传递类对象import宏，它只是工作，但我认为这种行为有点奇怪。

这里：

(println (sb '(do
                clojure.lang.RT
                (RT/errPrintWriter))))

现在我得到安全异常， import宏以某种方式阻止clojail抛出安全异常 。