clojure:如何将jdbc4array转换为clojure的seq?

时间:2011-05-19 08:07:08

标签: postgresql clojure seq

我尝试使用jdbc从数据库中查询数据。问题是某些列是数组类型。

;get that particular column
(def jdbc-array (with-connection *db*                                                                    
                  (with-query-results rs ["select * from refgene limit 5"]                                        
                    (:exonstarts (first rs)))))

;Check if it has a value
(print jdbc-array)
;#<Jdbc4Array {67075873,67078739,67085754,67100417,67109640,67113051,67129424,67131499,67143471,67162932}>nil

;check class
(class jdbc-array)
;org.postgresql.jdbc4.Jdbc4Array

如何在clojure中将此数组转换为seq / vector?我试过(seq jdbc-array)和(seq(.getArray jdbc-array)但两者都不起作用......

2 个答案:

答案 0 :(得分:7)

如果with-connection选项看起来很笨(对我来说),你可以扩展IResultSetReadColumn协议,将Jdbc4Array对象转换为常规或向量:

这是一种方法:

(extend-protocol clojure.java.jdbc/IResultSetReadColumn
  org.postgresql.jdbc4.Jdbc4Array
  (result-set-read-column [pgobj metadata i]
    (vec (.getArray pgobj))))

这将在读取

时将所有数组类型转换为向量

这种方法也可以帮助JSON数据类型,如this example

答案 1 :(得分:3)

好的,我明白了。我需要在clojure关闭连接之前调用getArray,否则它会给出一个nil。

不确定为什么......我的猜测是clojure的懒惰。

;work
(with-connection *db*
  (with-query-results rs ["select * from refgene limit ?" 5]
    (seq (.getArray (:exonends (first rs))))))