Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

时间:2023-03-09 15:45:51
Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

用clojure写了一个简单的短网址服务(一半抄自《Clojure 编程》)。在那基础上增加了数据库,来持久化数据。

功能

用Get方法缩短一个网址:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

然后在短网址列表就能够查看了,

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

接下来訪问那一长串地址就能够通过:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

浏览器重定向:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

代码剪影

url路由部分:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

用korma库,通过id查询到对应的url:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

这里的urls是先前定义的一个entity,entity就是对数据库一个表的描写叙述:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

很多其它代码见github:

Clojure实现的简单短网址服务(Compojure、Ring、Korma库演示样例)

请猛戳:

短网址逻辑,路由部分

Korma数据库处理