时间戳的相对格式

Question

过去两天我编写了 CS 462 Office Hours 应用程序。 最近的迭代 告诉用户下一个办公时间段是什么时候。目前，它只是将其格式设置为“星期四（2 月 3 日）下午 3 点”。不过，我希望它能更聪明一点，比如说“今天下午 3 点”或“明天上午 10 点”。

这类似于 Twitter 推文上的相对时间戳（它显示“3 分钟前”或“23 小时前”；除此之外还列出了日期）。但就我而言，情况恰恰相反，因为我们面对的是未来。

基本上，它需要足够聪明才能知道某个事件是今天还是明天。除此之外，我只想显示日期和星期几。

KRL 有办法做到这一点吗？我是否只需要使用逻辑像这样并编写一个函数（或模块）？

Answer 1

这些是我拥有的功能：

// First define some constants to measuring relative time
now = time:now({"tz": "America/Denver"});
midnight = time:new("23:59:59.000-07:00");
tomorrow_midnight = time:add(midnight, {"days": 1});
yesterday_midnight = time:add(midnight, {"days": -1});

// Functions for calculating relative time
relativefuturedate = function(d){
  ispast(d) => "today (past) at " + justtime(d)
    | istoday(d) => "today at " + justtime(d)
    | istomorrow(d) => "tomorrow at " + justtime(d)
    | datetime(d);
};

istoday = function(d){
  d > now && d <= midnight;
};

istomorrow = function(d){
  not istoday(d) && d <= tomorrow_midnight;
};

ispast = function(d){
  d < now;
};

isfuture = function(d){
  d > now;
};

justtime = function(d){
  time:strftime(d, "%l:%M %p");
};

datetime = function(d){
  time:strftime(d, "%A (%B %e) at %l:%M %p");
};

这应该可以解决问题。现在我正在用这个规则测试它：

rule first_rule {
  select when pageview ".*"
  pre {
    today_9 = time:new("2011-02-09T09:00:00.000-07:00");
    today_12 = time:new("2011-02-09T12:00:00.000-07:00");
    today_4  = time:new("2011-02-09T16:00:00.000-07:00");
    tomorrow_9 = time:new("2011-02-10T09:00:00.000-07:00");
    tomorrow_4 = time:new("2011-02-10T16:00:00.000-07:00");
    nextday_9 = time:new("2011-02-11T09:00:00.000-07:00");

    relative_now = relativefuturedate(now);
    relative_today_9 = relativefuturedate(today_9);
    relative_today_12 = relativefuturedate(today_12);
    relative_today_4 = relativefuturedate(today_4);
    relative_tomorrow_9 = relativefuturedate(tomorrow_9);
    relative_tomorrow_4 = relativefuturedate(tomorrow_4);
    relative_nextday_9 = relativefuturedate(nextday_9);

    message = <<
      Now: #{relative_now}<br />
      Today at 9: #{relative_today_9}<br />
      Today at 12: #{relative_today_12}<br />
      Today at 4: #{relative_today_4}<br />
      Tomorrow at 9: #{relative_tomorrow_9}<br />
      Tomorrow at 4: #{relative_tomorrow_4}<br />
      Day after tomorrow at 9: #{relative_nextday_9}<br />
    >>;
  }
  notify("Time calculations:", message) with sticky=true;
}

但是，这似乎还不起作用。我得到以下输出：

任何人都可以看到出了什么问题吗？

Answer 2

目前 KRL 中没有内置功能来执行此操作。您可能需要编写一个函数或模块来执行此操作，如果/当您这样做时，我很乐意看到它。