# HG changeset patch # User Matti Hamalainen # Date 1612948106 -7200 # Node ID c340683d6c13e668cd5ce191614a9217f572b19c # Parent 6f1d26814cc937b3b6bca47fc8bb8ac1df6b7c08 utillib: Add helper functions utl_sql_stamp_to_datetime() and utl_sql_datetime_to_stamp() for converting between UNIX timestamps and SQL datetime format. diff -r 6f1d26814cc9 -r c340683d6c13 utillib.tcl --- a/utillib.tcl Wed Feb 10 11:07:41 2021 +0200 +++ b/utillib.tcl Wed Feb 10 11:08:26 2021 +0200 @@ -221,3 +221,13 @@ proc utl_escape {str} { return [string map {' ''} $str] } + + +proc utl_sql_stamp_to_datetime { ustamp } { + return [clock format $ustamp -format "%Y-%m-%d %H:%M:%S"] +} + + +proc utl_sql_datetime_to_stamp { ustr } { + return [clock scan $ustr -format "%Y-%m-%d %H:%M:%S"] +}