Clojure - 每周二安排一份工作

时间:2015-09-15 13:57:43

标签: clojure quartz-scheduler

我正在使用quartzite,我需要每周二早上安排一份工作(比如上午10点)。

我有工作的代码,但我不确定如何安排它。

编辑:这是我到目前为止所做的,但它不起作用(请参阅评论)。

(defn start-weekly-email-job []
  (let [job  (job/build
              (job/of-type AlertMail)
              (job/with-identity (job/key "jobs.weekly.1")))
        trigger (trigger/build
                 (trigger/with-identity (trigger/key "triggers.1"))
                 (trigger/start-at (time-of-day 10 00 00))
                                        ; at 10 AM, fails with exception
                                        ; IllegalArgumentException No implementation of method: :to-date of protocol: #'clojurewerkz.quartzite.conversion/DateConversion found for class: org.quartz.TimeOfDay  clojure.core/-cache-protocol-fn (core_deftype.clj:554)
                 (trigger/with-schedule (daily/schedule
                                         (daily/on-days-of-the-week #{(int 2)}))))] ;; ;; start Tuesday
    (qs/schedule s job trigger)))

Edit2

  

使用每日间隔时间表每日间隔时间表使其变得简单   定义像

这样的时间表      
      
  • “周一至周五9点到17点”
  •   
  • “每个周末凌晨3点”
  •   
  • “每周五中午”
  •   
  • “每天13:45”
  •   
  • “星期四每小时但不迟于15:00,最多400次”
  •   

我的案例与文档中突出显示的案例非常相似,但我无法找到如何使用每日日程表。

1 个答案:

答案 0 :(得分:0)

一个可行的选择是使用cron触发器[1] [2] [3]。文档[1] -

中的示例代码
(ns my.service
  (:require [clojurewerkz.quartzite.scheduler :as qs]
            [clojurewerkz.quartzite.triggers :as t]
            [clojurewerkz.quartzite.jobs :as j]
        [clojurewerkz.quartzite.jobs :refer [defjob]]
            [clojurewerkz.quartzite.schedule.cron :refer [schedule cron-schedule]]))

(defjob NoOpJob
  [ctx]
  (comment "Does nothing"))

(defn -main
  [& m]
  (let [s   (-> (qs/initialize) qs/start)
       job  (j/build
              (j/of-type NoOpJob)
              (j/with-identity (j/key "jobs.noop.1")))
        trigger (t/build
                  (t/with-identity (t/key "triggers.1"))
                  (t/start-now)
                  (t/with-schedule (schedule
                                     (cron-schedule "0 0 15 ? * 5"))))]
  (qs/schedule s job trigger)))

Cron计划使用计划它的计算机的本地时区。 0 0 10 ? * TUE之类的内容根据当地时间的机器描述every Tuesday at 10am。如果时间需要某个特定的UTC时间,则优选的选项是预先计算相应的本地时间并在cron触发器描述中使用该时间。或者只是将机器配置为使用UTC时区。

[1] - http://clojurequartz.info/articles/triggers.html#using_cron_expression_schedules

[2] - [DEAD] http://quartz-scheduler.org/generated/2.2.1/html/qs-all/index.html#page/Quartz_Scheduler_Documentation_Set%2Fco-trg_crontriggers.html%23

[3] - http://linux.die.net/man/5/crontab

[4] - 可能替换现在死链接2号 - http://www.quartz-scheduler.org/documentation/quartz-2.x/tutorials/tutorial-lesson-06.html