你怎么得到clojure yesql输出它将执行的SQL?

时间:2015-06-18 02:34:06

标签: clojure

我想调试我的yesql查询。所以我试图让SQL执行。 谁能给我一个如何让yesql输出它将执行的SQL的例子?

这不是一个很好的例子......我将参数名称'tel'误认为是'电话'。

users.sql

-- name: insert-user
-- insert a user data to users table. 
insert into
users  ( name,  age,  tel,  address,  remark)
values (:name, :age, :tel, :address, :remark);

query.clj

(ns example.sql.query
  (:require [yesql.core :as yesql]
            [example.sql.datasource :as ds]))

(yesql/defqueries {:connection {:datasource ds/datasource}})
(yesql/insert-user {:name "joe" :age 22 :phone nil :address "xxxxxx" :remark ""})

1 个答案:

答案 0 :(得分:3)

一般情况下(如评论中所述),yesql不应该进行大量的SQL生成;这个概念是它通过你写的查询。

话虽如此,如果您仍然想尝试查看原始查询yesql是否传递给JDBC,那么这是一个非常接近的黑客攻击:

(require 'yesql.generate)
(require 'yesql.statement-parser)

(defn debug-yesql-query [queryfn args]
  ;; queryfn should be a query function generated by yesql
  ;; args should be a map of query args, just as if you were
  ;;   calling the query function
  (let [sql-source (-> queryfn meta :yesql.generate/source)]
    (yesql.generate/rewrite-query-for-jdbc
     (yesql.statement-parser/tokenize sql-source)
     args))

使用yesql版本0.5.2进行测试。