如何获取Clojure中作为字符串存储在数据库中的日期?

时间:2019-02-09 17:46:21

标签: json clojure clojure-java-interop

当使用clojure.java.jdbc从Postgres数据库中获取值时,我将以

结尾

{:id 1, :name "example", :created_at #object[java.time.LocalDateTime 0x15e0aadc "2019-02-08T12:52:11.438633"]}

我想要的时候

{:id 1, :name "example", :created_at :created_at "2019-02-08T12:52:11.438633"]}

我希望日期以JSON形式返回并由JavaScript消耗。第二个示例可能不是理想的格式,因此我向其他人开放,但是Java对象无法正常工作。

我尝试了几种方法,但是由于日期#object的原因,编译器产生了许多“不匹配的括号”错误。

有关如何执行此操作的想法?是否对原始SQL查询执行某些操作,对返回的数据进行其他操作?

3 个答案:

答案 0 :(得分:1)

我认为cheshire.core / encode会从该地图中为您提供漂亮的JSON。

https://github.com/dakrone/cheshire上了解有关柴郡的更多信息

答案 1 :(得分:1)

我尝试使用H2 db重新创建您的结果,但这给了我Clojure #inst结果,而不是对象引用。


好的,这是问题所在。如打印输出所示,您有一个java.time.LocalDateTime(Clojure #instjava.util.Date对象)。

如果要使用字符串版本,只需在其上调用成员函数toString

  (let [ldt (LocalDateTime/parse "2019-02-01T00:00:00" )]

    (.toString ldt) => <#java.lang.String "2019-02-01T00:00">

但是,您没有附加的时区信息。因此,您可能需要一个ZonedDateTime。 我们将在下面假设UTC时区(请验证您的数据库服务器配置):

  (let [jud      (Date.)
        ldt      (LocalDateTime/parse "2019-02-01T00:00:00")
        zdt      (.atZone ldt (ZoneId/of "UTC"))  ; *** big assumption here! ***
        inst     (.toInstant zdt)
        inst-str (.toString inst) ]

    ; a Clojure #inst is just a java.util.Date object
    jud      =>  #inst "2019-02-09T19:38:30.088-00:00"   

    ; a ZonedDateTime can print in 2 ways
    zdt              => #object[java.time.ZonedDateTime 0x780af31 "2019-02-01T00:00Z[UTC]"]
    (.toString zdt)  => "2019-02-01T00:00Z[UTC]"

    ; a java.time.Instant also prints in 2 ways:
    instant          => #object[java.time.Instant 0x48301adb "2019-02-01T00:00:00Z"]
    instant-str      => "2019-02-01T00:00:00Z"

请注意,ZDT在结尾处添加了类似后缀[UTC]的后缀,因此您可能希望将其转换为Instant,然后使用.toString方法来获取其更简单的字符串表示形式( ISO-8601)。


如果您不介意使用外部库来简化此操作,则tupelo.java-time库具有非常方便的辅助功能:

(ns xyz
  (require [tupelo.java-time :as tjt] ... ))

(tjt/string-date-time-iso zdt) => "2019-02-01T00:00:00Z"

还有许多其他辅助功能可用。请参阅the API Docsthe unit tests for examples


更新

我终于修复了Postgres安装程序(必须重置密码才能使Hikari正常工作)。这是我的测试代码:

(ns tst.demo.jdbc-pool
  (:use demo.core tupelo.core tupelo.test)
  (:require
    [clojure.java.jdbc :as jdbc]
    [hikari-cp.core :as pool]
    [tupelo.java-time :as tjt] ) )

(def datasource-options-pg
  {:adapter       "postgresql"
   :database-name "alan"
   :server-name   "localhost"
   :port-number   5433
   :username      "alan"
   :password      "secret" } )

(def ^:dynamic db-conn nil)

(defn with-connection-pool
  "Creates and uses a connection for test function"
  [tst-fn]
  (let [datasource (pool/make-datasource datasource-options-pg)]
    (binding [db-conn {:datasource datasource}]
      (tst-fn)
      (pool/close-datasource datasource)))) ; close the connection - also closes/destroys the in-memory database

(use-fixtures
  :once with-connection-pool) ; use the same db connection pool for all tests

以上只是配置内容。这是验证行为的单元测试:

(dotest
  (jdbc/db-do-commands db-conn ["drop table if exists langs"])
  (jdbc/db-do-commands db-conn
    [(jdbc/create-table-ddl :langs [[:id :serial]
                                    [:lang "varchar not null"]
                                    [:creation :timestamptz]])])
  (jdbc/insert-multi! db-conn :langs
    [{:lang "Clojure" :creation (tjt/iso-str->timestamp "2008-01-01T12:34:56Z")}
     {:lang "Java"    :creation (tjt/iso-str->timestamp "1995-06-01T07:08:09Z")}])

  (let [result (jdbc/query db-conn ["select * from langs"])]
    (is=  (vec result)
      [{:id       1, :lang "Clojure",
        :creation #inst "2008-01-01T12:34:56.000000000-00:00"}
       {:id       2, :lang "Java",
        :creation #inst "1995-06-01T07:08:09.000000000-00:00"}])))

所以您可以看到我仍然得到java.util.Date的结果,Clojure使用#inst格式打印。我不确定您如何使JDBC输出LocalDateTime格式。

答案 2 :(得分:1)

在db.core.clj文件中扩展java.time.Instant。有关扩展类型和协议的示例,请参见https://rundis.github.io/blog/2015/clojure_dates.html

(extend-type java.time.Instant
  jdbc/ISQLParameter
  (set-parameter [v ^PreparedStatement stmt ^long idx]
    (.setTimestamp stmt idx (Timestamp. (.toEpochMilli v)))))

(extend-protocol cheshire.generate/JSONable
  java.time.Instant
  (to-json [dt gen]
    (cheshire.generate/write-string gen (str dt))))