Clojure 数据库
为了使用数据库的功能,请确保首先从以下网址下载JDBC文件 - https://codeload.github.com/clojure/java.jdbc/zip/master
你会发现一个zip文件,它有必要的驱动程序,Clojure有能力连接到数据库。 提取zip文件后,请确保将解压缩的位置添加到类路径中。
数据库连接的主文件是位于clojure / java中的名为jdbc.clj的文件。
clojure jdbc连接器支持各种各样的数据库,其中一些如下。
- H2Database
- Oracle
- Microsoft SQL Server
- MySQL
- PostgreSQL
在我们的示例中,我们将使用MySQL DB作为示例。
在Clojure中有关数据库的以下操作是可能的。
数据库连接
在连接到MySQL数据库之前,请确保以下内容
- 您已创建数据库TESTDB。
- 您在TESTDB中创建了一个表EMPLOYEE。
- 此表格包含FIRST_NAME,LAST_NAME,AGE,SEX和INCOME字段。
- 用户ID“testuser”和密码“test123”设置为访问TESTDB。
- 确保已下载“mysql jar文件”,并将该文件添加到类路径。
- 你已经通过MySQL教程来了解MySQL基础。
语法
以下是在Clojure中创建连接的语法。
(def connection_name { :subprotocol “protocol_name” :subname “Location of mysql DB” :user “username” :password “password” })
参数 - 'connection_name'是要给连接的名称。 'subprotocol'是用于连接的协议。 默认情况下我们将使用mysql协议。 'subname'是连接到mysql数据库的URL以及数据库名称。 'user'是用于连接到数据库的用户名。 'password'是用于连接到数据库的密码。
返回值 -这将提供一个连接字符串,可以在后续的mysql操作中使用。
以下示例显示如何连接到信息模式中的表并检索表中的所有数据。
例
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/information_schema" :user "root" :password "shakinstev"}) (println (sql/query mysql-db ["select table_name from tables"] :row-fn :table_name)))
数据查询
在任何数据库上查询数据意味着从数据库获取一些有用的信息。 一旦建立了数据库连接,就可以对该数据库进行查询。
以下是使用Clojure查询数据的语法。
语法
clojure.java.jdbc/query dbconn ["query"] :row-fn :sequence
参数 -'dbconn'是用于连接到数据库的连接的名称。 'query'是用于从数据库提取数据的查询字符串。 ':sequence'默认情况下从数据库获取的所有数据行,并作为序列返回。 然后可以对序列执行必要的操作,以查看已提取了哪些数据。
返回值 -这将返回一个序列,它将具有来自查询操作的数据行。
以下示例显示如何连接到employee表并获取表中行的first_name列。
例
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/testdb" :user "root" :password "shakinstev"}) (println (sql/query mysql-db ["select first_name from employee"] :row-fn :first_name)))
从上面的代码,我们可以看到,
查询“select first_name from employee”作为查询字符串传递。
first_name是作为fetch操作结果返回的序列。
如果我们假设在我们的数据库中只有一行包含first_name值为John,则以下将是上述程序的输出。
(John)
插入数据
当您要将记录创建到数据库表中时需要。 以下是使用Clojure可以插入数据的语法。 这是通过使用'insert!'函数完成的。
语法
clojure.java.jdbc/insert! :table_name {:column_namen columnvalue}
参数 - ':table_name'是需要插入的表的名称。 '{:column_namen columnvalue}'是所有列名称和值的映射,需要在表中作为一行添加。
返回值 -如果插入成功,这将返回nil。
以下示例显示如何将记录插入到testdb数据库中的employee表中。
例
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/testdb" :user "root" :password "shakinstev"}) (sql/insert! mysql-db :employee {:first_name "John" :last_name "Mark" :sex "M" :age 30 :income 30}))
如果现在检查MySQL数据库和employee表,您将看到上面的行将成功插入表中。
删除数据
可以使用'delete!'函数从表中删除行。 以下是如何执行此操作的语法。
语法
clojure.java.jdbc/delete! :table_name [condition]
参数 -':table_name'是需要插入的表的名称。 'condition'是用于确定需要从表中删除哪一行的条件。
返回值 -这将返回删除的行数。
以下示例显示如何从testdb数据库中的employee表中删除记录。 示例根据年龄等于30的条件从表中删除一行。
例
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/testdb" :user "root" :password "shakinstev"}) (println (sql/delete! mysql-db :employee ["age = ? " 30])))
如果您有一条记录包含年龄等于30的行,则该行将被删除。
更新数据
可以使用'update!'函数从表中更新行。 以下是如何执行此操作的语法。
语法
clojure.java.jdbc/update! :table_name {setcondition} [condition]
参数 - ':table_name'是需要插入的表的名称。 'setcondition'是需要根据映射提到的更新的列。 'condition'是用于确定需要从表中删除哪一行的条件。
返回值 -这将返回更新的行数。
以下示例显示如何从testdb数据库中的employee表中删除记录。 该示例根据年龄等于30的条件更新表中的行,并将收入值更新为40。
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/testdb" :user "root" :password "shakinstev"}) (println (sql/update! mysql-db :employee {:income 40} ["age = ? " 30])))
如果您有一条记录,其中的行的年龄等于值30,那行将被更新,其中收入的值将设置为40。
事务
事务是确保数据一致性的机制。 事务具有以下四个属性
原子性 -事务完成或根本没有任何事情发生。
一致性 -事务必须以一致的状态开始,并使系统保持一致状态。
隔离性 -事务的中间结果在当前事务外部不可见。
耐用性 -一旦事务提交,即使在系统故障后,影响仍然是持久的。
例
以下示例显示如何在Clojure中实现事务。 任何需要在事务中执行的操作都需要嵌入到'with-dbtransaction'子句中。
(ns test.core (:require [clojure.java.jdbc :as sql])) (defn -main [] (def mysql-db { :subprotocol "mysql" :subname "//127.0.0.1:3306/testdb" :user "root" :password "shakinstev"}) (sql/with-db-transaction [t-con mysql-db] (sql/update! t-con :employee {:income 40} ["age = ? " 30])))
更多建议: