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 Consuming的值:val。它们都有可以自定义行为的函数valf,但默认的valf是(pr / read),即stringify。在io-prepl中,valf在结果值上调用,但在异常值上不调用。在remote-prepl中,valf总是被调用。这造成了一种不对称。

我认为另一个可能的解决方案是让remote-prepl对异常的:val采取不同的措施:val's (你提出的是一个路径,另一个路径是根据:exception主动选择不同的路径),但这似乎阻止了valf的最初目标(这允许调用者自定义值的处理)。

在提交票据之前,我只是这样谈论了一下。
我在思考这个问题是在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 \"除数不能为零\", :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 \"除数不能为零\", :phase :execution}", :ns "user", :form "(/ 1 0)", :exception true}

基于此,我认为这是 io-prepl 中的一个问题,而不是 remote-prepl 中的问题。
因此,异常使用 valf 进行序列化,因为 io-prepl 将 prepl 包装起来,在 `:val` 键中也放置了抛出的异常。我建议更改 CLJ-2620 中的问题描述,因为它说 io-prepl 不序列化错误 vals,但实际行为是 io-prepl 不序列化某些错误 vals,特别是那些在序列化期间抛出的异常。
0 投票
...