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拋出安全異常 。