请在 2024 年Clojure 状态调查! 中分享您的想法。

欢迎!请查阅 关于 页面了解此网站的更多资料。

+2
REPL
已关闭

io-prepl 使用 valf 序列化 eval 结果,但如果序列化的值在打印时抛出异常,则会保留异常原样。

再现问题

# terminal 1
clj -X clojure.core.server/start-server \
  :name '"io-prepl"' \
  :port 7777 \
  :accept clojure.core.server/io-prepl \
  :server-daemon false

# terminal 2
nc localhost 7777
(reify Object (toString [_] (/ 1 0)))
{:tag :ret, :val {:via [{:type java.lang.ArithmeticException, :message "Divide by zero", :at [clojure.lang.Numbers divide "Numbers.java" 188]}], :trace [[clojure.lang.Numbers divide "Numbers.java" 188] [clojure.lang.Numbers divide "Numbers.java" 3901] [user$eval220$reify__221 toString "NO_SOURCE_FILE" 3] [clojure.core$str invokeStatic "core.clj" 555] [clojure.core$print_object invokeStatic "core_print.clj" 117] [clojure.core$fn__7297 invokeStatic "core_print.clj" 120] [clojure.core$fn__7297 invoke "core_print.clj" 120] [clojure.lang.MultiFn invoke "MultiFn.java" 234] [clojure.core$pr_on invokeStatic "core.clj" 3662] [clojure.core$pr invokeStatic "core.clj" 3665] [clojure.core$pr invoke "core.clj" 3665] [clojure.lang.AFn applyToHelper "AFn.java" 154] [clojure.lang.RestFn applyTo "RestFn.java" 132] [clojure.core$apply invokeStatic "core.clj" 667] [clojure.core$pr_str invokeStatic "core.clj" 4724] [clojure.core$pr_str doInvoke "core.clj" 4724] [clojure.lang.RestFn invoke "RestFn.java" 408] [clojure.core.server$io_prepl$fn__8978$fn__8979 invoke "server.clj" 289] [clojure.core.server$io_prepl$fn__8978 invoke "server.clj" 288] [clojure.core.server$prepl$fn__8964 invoke "server.clj" 239] [clojure.core.server$prepl invokeStatic "server.clj" 228] [clojure.core.server$prepl doInvoke "server.clj" 191] [clojure.lang.RestFn invoke "RestFn.java" 425] [clojure.core.server$io_prepl invokeStatic "server.clj" 283] [clojure.core.server$io_prepl doInvoke "server.clj" 272] [clojure.lang.RestFn invoke "RestFn.java" 397] [clojure.lang.AFn applyToHelper "AFn.java" 152] [clojure.lang.RestFn applyTo "RestFn.java" 132] [clojure.lang.Var applyTo "Var.java" 705] [clojure.core$apply invokeStatic "core.clj" 667] [clojure.core.server$accept_connection invokeStatic "server.clj" 73] [clojure.core.server$start_server$fn__8902$fn__8903$fn__8905 invoke "server.clj" 117] [clojure.lang.AFn run "AFn.java" 22] [java.lang.Thread run "Thread.java" 834]], :cause "Divide by zero", :phase :print-eval-result}, :ns "user", :ms 3, :form "(reify Object (toString [_] (/ 1 0)))", :exception true}

这会导致其他连接到 io-prepl 的预处理器(如 remote-prepl)出现问题,因为这些预处理器始终使用其 valf 进行反序列化。

# terminal 3
clj
Clojure 1.10.3
user=> ((requiring-resolve 'clojure.core.server/remote-prepl) "localhost" 7777 *in* prn)
(reify Object (toString [_] (/ 1 0)))
{:tag :ret, :val {:via [{:type java.lang.ClassCastException, :message "class clojure.lang.PersistentArrayMap cannot be cast to class java.lang.String (clojure.lang.PersistentArrayMap is in unnamed module of loader 'app'; java.lang.String is in module java.base of loader 'bootstrap')", :at [clojure.core$read_string invokeStatic "core.clj" 3793]}], :trace [[clojure.core$read_string invokeStatic "core.clj" 3793] [clojure.core$read_string invoke "core.clj" 3793] [clojure.core.server$remote_prepl$fn__8992$fn__8994 invoke "server.clj" 322] [clojure.core.server$remote_prepl$fn__8992 invoke "server.clj" 321] [clojure.lang.AFn run "AFn.java" 22] [java.lang.Thread run "Thread.java" 834]], :cause "class clojure.lang.PersistentArrayMap cannot be cast to class java.lang.String (clojure.lang.PersistentArrayMap is in unnamed module of loader 'app'; java.lang.String is in module java.base of loader 'bootstrap')", :phase :read-eval-result}, :ns "user", :ms 1, :form "(reify Object (toString [_] (/ 1 0)))", :exception true}

在这种情况下,原始异常(打印期间的除零错误)被另一个异常(尝试将映射 read-string 为对象的类转换异常)所掩盖。

已关闭,备注为:在 1.11.0-beta1 中发布

2 个答案

0

我认为您建议将 https://github.com/clojure/clojure/blob/master/src/clj/clojure/core/server.clj#L291 应应用 valf 到 ex->data 的结果?

(确保我理解了您的意思)

我尝试只陈述问题,而没有提出考虑不周的解决方案 :)

我对此想了一会儿,我认为在打印阶段异常上调用 valf 是合理的。我认为这是 io-prepl 的 valf 正确处理异常的要求。另一个我考虑的替代方案是在 remote-prepl 中吞没读取异常,并返回未读取的值,但这会让 io-prepl 的语义变得模糊和不稳定,并混淆对 remote-prepl 中值的推理。
io-prepl 产生代码,而 remote-prepl 消费代码 :val 的值。它们都有可以通过 valf 定制的函数,但默认的 valf 是 (pr / read),即转换为字符串。在 io-prepl 中,valf 对结果值调用,但不调用异常值。在 remote-prepl 中,总是调用 valf。这破坏了对称性。

我想另一个可能的解决方案可能是让 remote-prepl 在异常 :val 上做不同的事情:你的建议是一条路径,另一条路径是根据 :exception 主动选择不同的路径,但这似乎阻挡了 valf 的原始目标(它允许调用者自定义 val 处理)。

在创建工单之前,我先讨论一下这个问题。
我一直在考虑这个问题是在 io-prepl 中(文档字符串看起来很明确)还是在 remote-prepl 中(应该为 :exception 定制 :val 的读取)。
>> 在 io-prepl 中,valf 在结果值上调用,但不调用异常值。

我认为这是一个错误,当执行阶段发生异常时,valf 在异常值上调用。

    # 终端 1
    clj -X clojure.core.server/start-server \
    :name '"io-prepl"' \
    :port 7777 \
    :accept clojure.core.server/io-prepl \
    :server-daemon false

    # 终端 2
     nc localhost 7777
    (/ 1 0)
    {:tag :ret, :val "{:via [{:type java.lang.ArithmeticException, :message \"Divide by zero\", :at [clojure.lang.Numbers divide \"Numbers.java\" 188]}], :trace [[clojure.lang.Numbers divide \"Numbers.java\" 188] [clojure.lang.Numbers divide \"Numbers.java\" 3901] [user$eval214 invokeStatic \"NO_SOURCE_FILE\" 2] [user$eval214 invoke \"NO_SOURCE_FILE\" 2] [clojure.lang Compiler eval \"Compiler.java\" 7177] [clojure.lang Compiler eval \"Compiler.java\" 7132] [clojure.core$eval invokeStatic \"core.clj\" 3214] [clojure.core.server$prepl$fn__8941 invoke \"server.clj\" 232] [clojure.core.server$prepl invokeStatic \"server.clj\" 228] [clojure.core.server$prepl doInvoke \"server.clj\" 191] [clojure.lang.RestFn invoke \"RestFn.java\" 425] [clojure.core.server$io_prepl invokeStatic \"server.clj\" 283] [clojure.core.server$io_prepl doInvoke \"server.clj\" 272] [clojure.lang.RestFn invoke \"RestFn.java\" 397] [clojure.lang.AFn applyToHelper \"AFn.java\" 152] [clojure.lang.RestFn applyTo \"RestFn.java\" 132] [clojure.lang.Var applyTo \"Var.java\" 705] [clojure.core$apply invokeStatic \"core.clj\" 665] [clojure.core.server$accept_connection invokeStatic \"server.clj\" 73] [clojure.core.server$start_server$fn__8879$fn__8880$fn__8882 invoke \"server.clj\" 117] [clojure.lang.AFn run \"AFn.java\" 22] [java.lang.Thread run \"Thread.java\" 832]], :cause \"Divide by zero\", :phase :execution}", :ns "user", :form "(/ 1 0)", :exception true}

因此,我认为这是一个在 io-prepl 中而不是在 remote-prepl 中的问题。
by
因此,异常被使用 valf 序列化,因为 io-prepl 包装了 prepl,它也将抛出的异常放在了 `:val` 键中。因此,建议修改 CLJ-2620 中的问题说明,因为它表示 io-prepl 不序列化错误值,但实际上 io-prepl 不序列化某些错误值,特别是序列化期间抛出的异常。
0
by
...