tiny-scheduler: tiny no-brainer job scheduler

[ bsd3, library, web ] [ Propose Tags ]

this is a tiny library to make scheduling jobs to run at predetermined intervals, easier


[Skip to Readme]

Downloads

Maintainer's Corner

Package maintainers

For package maintainers and hackage trustees

Candidates

Versions [RSS] 0.1.0.0, 0.1.1.0, 0.1.1.1, 0.1.1.2, 0.1.4.0, 0.1.4.1, 0.1.4.2, 0.1.4.3
Dependencies async, base (>=4.7 && <5), time [details]
License BSD-3-Clause
Copyright None
Author Functor soup
Maintainer functor.soup@gmail.com
Category Web
Home page https://github.com/functor-soup/tiny-scheduler#readme
Source repo head: git clone https://github.com/functor-soup/tiny-scheduler
Uploaded by functor_soup at 2017-04-22T15:47:25Z
Distributions
Reverse Dependencies 1 direct, 0 indirect [details]
Downloads 4927 total (21 in the last 30 days)
Rating (no votes yet) [estimated by Bayesian average]
Your Rating
  • λ
  • λ
  • λ
Status Docs available [build log]
Last success reported on 2017-04-22 [all 1 reports]

Readme for tiny-scheduler-0.1.4.3

[back to package description]

tiny-scheduler

Utility Library to run jobs concurrently at predetermined Intervals

Basic Example


import TinyScheduler.Jobs
import TinyScheduler.SubJobs
import TinyScheduler.Time
import Data.Time

intervalio :: Interval
intervalio = (Minutes 1) + (Secs 20)

jobx :: UTCTime -> Job ()
jobx x = makeJob 1234 4 intervalio x (putStrLn "Hello")

main :: IO ()
main = getCurrentTime >>= (\x ->
      execSubJobs . convertJobIntoSubJobs x $ (jobx x)) >> 
      return ()

A little more advanced Example

In the following, assuming that time starts at 0, jobs are fired at 1 minute 2 seconds, 1 minutes 4 seconds, and 2 minutes 2 seconds and 2 minutes 4 seconds from current time


import TinyScheduler.Jobs
import TinyScheduler.SubJobs
import TinyScheduler.Time
import Data.Time
import Data.Monoid

atom1 :: TimeAtom
atom1 =  makeTimeAtom 2 (Minutes 1)

atom2 :: TimeAtom
atom2 =  makeTimeAtom 2 (Secs 2)

jobx :: UTCTime -> Job ()
jobx x = timeAtomToJob 1234 (putStrLn "Hello") x (atom1 <> atom2)

main :: IO ()
main = getCurrentTime >>= (\x ->
      execSubJobs . convertJobIntoSubJobs x $ (jobx x)) >> 
      return ()

how to install

stack install tiny-scheduler

pending work

  1. Tests
  2. More documentation
  3. Haddock documentation
  4. Complete the example below

for an application based example (still in progress)

go to https://github.com/functor-soup/tiny-simple-scheduler-example