使用 compojure 从数据库提供二进制文件

我有以下路线定义：

(require '[compojure.core :as ccore]
         '[ring.util.response :as response])

(def *main-routes*
     (ccore/defroutes avalanche-routes
       (ccore/GET "/" [] "Hello World 2")
       (ccore/GET "/images/:id" [id] (get-image-response id))))

在这个例子中，请求/像魅力一样工作并返回预期的结果Hello World 2.

get-images-response 方法定义如下：

(defn get-image-response
  [id]
  (let [record (db/get-image id false)]
    (-> (response/response (:data record))
        (response/content-type (:content-type record))
        (response/header "Content-Length" (:size record)))))

但我收到了 404 错误，因此二进制文件的服务还不能正常工作。有什么想法吗？

编辑： 好的，问题与正在请求图像的事实有关/images/name.jpg。一旦我删除.jpg处理程序被调用。所以问题是我如何匹配除扩展名之外的任何内容？

Compojure 用途clout http://github.com/weavejester/clout用于路由匹配。点字符在影响力路线中具有特殊含义。它代表一个标记分隔符，类似于斜杠字符。以下字符均具有此含义：/ . , ; ?.

这意味着像这样的路线"/images/:id"不会匹配以下形式的 uri/images/name.jpg since images, name and jpg每个都代表着影响力中的一个单独的令牌。

为了匹配它，您可以根据需要以多种不同的方式编写路线。

如果您的所有图像都有.jpg扩展，最简单的事情是：

(GET "/images/:id.jpg" [id] ...)

如果扩展名不同，您可以执行以下操作：

(GET "/images/:name.:extension" [name extension] ...)

如果你想限制扩展，你可以向 compojure/clout 传递一个正则表达式：

(GET ["/images/:name.:ext", :ext #"(jpe?g|png|gif)"] [name ext] ...)

您还可以使用通配符，它​​不太精确，并且会匹配以任何开头的 uri/images/:

(GET "/images/*" [*] ...)