转换时间以便在mysql中使用

Question

我正在尝试将时间戳加载到 mysql 中。我所有的时间都是 UTCTime 对象。 HDBC mysql 实现似乎不喜欢 UTCTime 对象，尽管内部文档说它将所有时间视为 UTC 时间。我相信我需要将 UTCTime 转换为 EpochTime，因为看起来 HDBC mysql 实现支持绑定 SqlEpochTime。我一直无法弄清楚如何获取 UTCTime 并从中获取 EpochTime。

Answer 1

现在有一个解决方法：

import Data.Time.Clock (UTCTime)
import Data.Time.Clock.POSIX (utcTimeToPOSIXSeconds)
import Database.HDBC (SqlValue (SqlEpochTime))

-- until HDBC-mysql fixes it. use instead of SqlUTCTime (data constructor)
sqlUTCTime :: UTCTime -> SqlValue
sqlUTCTime = SqlEpochTime . floor . utcTimeToPOSIXSeconds

三周前我向 Chris Waterson（HDBC-mysql 的维护者）发送了一个修复程序，他说他会将其合并到下一个版本中。