3

您好目前我正在使用 java.data ( https://github.com/clojure/java.data ) 将 java pojos 转换为 clojure 兼容类型。它不适用于嵌套对象。

例如：

class Abc {
   Map<String, Def> someMap;
}

Class Def {
   String b;
}

如果我将 Abc 的示例实例传递给 java.data，我得到的输出为：

   {
      :someMap { 
         "keyString" #object[com.sample.Def 0xb33584d "com.sample.Def@b33584d"]
      }
   }

但我希望输出为：

   {
       :someMap { 
            "keyString" {
                 "b" "value" 
            } 
       }
   }

我怎样才能解决这个问题？

我尝试了 clojure.core bean ( https://clojuredocs.org/clojure.core/bean )，它似乎也能正常工作。

先感谢您。

4

2 回答 2

3

为了使其工作，您的 Java 对象需要符合JavaBean 规范。这意味着他们需要 .getXXX()（至少）读取对象属性以及.setXXX()构造新对象的方法。例子：

类Inner：

package demo;
public class Inner {
    public String secret;
    public String getSecret() {
        return secret;
    }    
    public Inner(String arg) {
        this.secret = arg;
    }
}

类Outer：

package demo;
import java.util.HashMap;
import demo.Inner;

public class Outer {
  public HashMap<String, Inner> someMap;

  public Outer() {
    HashMap<String,Inner> hm = new HashMap<String, Inner>();
    hm.put("stuff", new Inner( "happens"));
    hm.put("another", new Inner( "thing"));
    this.someMap = hm;
  }

  public HashMap getSomeMap() { return someMap; }
}

和 Clojure 代码来解码嵌套的 JavaBean 对象：

(ns tst.demo.core
  (:use demo.core tupelo.core tupelo.test)
  (:require
    [clojure.java.data :as jd])
  (:import [demo Calc]))

(dotest
  (let [java-obj    (Outer.)
        obj-shallow (jd/from-java java-obj)
        obj-deep    (jd/from-java-deep java-obj {})]
    (spyx         java-obj)
    (spyx         obj-shallow)
    (spyx-pretty  obj-deep)
    ))

结果显示会发生什么：

--------------------------------------
   Clojure 1.10.2-alpha1    Java 14
--------------------------------------

lein test tst.demo.core
java-obj     => #object[demo.Outer 0x138d8219 "demo.Outer@138d8219"]
obj-shallow  => {:someMap {"another" #object[demo.Inner 0x8d86c4d "demo.Inner@8d86c4d"], "stuff" #object[demo.Inner 0x28c92c51 "demo.Inner@28c92c51"]}}
obj-deep     => {:someMap {"another" {:secret "thing"}, 
                           "stuff"   {:secret "happens"}}}

原始java-obj数据对 Clojure 是不透明的。Using jd/from-javaonly 使用 JavaBean getter 解包外层。使用jd/from-java-deep（注意所需的选项映射，此处留空）将递归地解包 JavaBean，使用基于其 java 类的每个对象上的适当 getter。

以上所有代码均基于此模板项目。享受！

于 2020-09-26T21:54:59.473 回答
2

Clojure 的内置bean函数只进行浅层转换——它不会递归地转换任何嵌套信息。查看https://github.com/clojure/java.data以了解从 Java 对象到 Clojure 数据结构（以及返回）的递归转换。

java.data还支持“builder”风格的 Java API，因此您可以更轻松地从 Clojure 构建 Java 对象。

于 2020-09-26T21:50:35.197 回答