在 Yesod 中显示动态生成的图像

Question

我正在编写我的第一个 Yesod 应用程序。 该应用程序涉及用户选择查看基于服务器上数据库中存储的数据动态生成的图表。 我知道如何获取用户请求并在服务器的文件系统上创建图像，但如何创建显示它的响应页面？

PS 由于我使用 GnuPlot 生成图像，我只知道如何将其作为文件写入文件系统，但如果您碰巧知道如何获取内存中的数据，那可能会更好。 谢谢，

Answer 1

对于磁盘上的文件，您可以使用 sendFile 在您的处理程序中。

getImageR = do
    -- ... save image data to disk somewhere
    sendFile typeJpeg "/path/to/file.jpg"

要从内存中的 ByteString 发送它，请使用 sendResponse。

getImageR = do
    bytes <- -- generate image data
    sendResponse (typePng, toContent bytes)

确保指定 正确的图像内容类型。