test/timetest.rb in openwferu-0.9.1 vs test/timetest.rb in openwferu-0.9.2
- old
+ new
@@ -1,17 +1,17 @@
#
-# Testing OpenWFEru
+# Testing OpenWFE
#
# John Mettraux at openwfe.org
#
# Sun Oct 29 16:18:25 JST 2006
#
require 'test/unit'
-require 'otime'
-require 'ru/scheduler'
+require 'openwfe/otime'
+require 'openwfe/util/scheduler'
#
# testing otime and the scheduler
#
@@ -21,10 +21,34 @@
#end
#def teardown
#end
+ #def test_to_iso_date
+ def xxxx_to_iso_date
+ #
+ # well... this test is not timezone friendly...
+ # commented out thus...
+
+ t = 1169019813.93468
+
+ s = OpenWFE.to_iso8601_date(t)
+ puts s
+
+ assert \
+ OpenWFE.to_iso8601_date(t) == "2007-01-17 02:43:33-0500",
+ "conversion to iso8601 date failed"
+
+ d = OpenWFE.to_ruby_time(s)
+
+ #puts d.to_s
+
+ assert \
+ d.to_s == "2007-01-17T02:43:33-0500",
+ "iso8601 date parsing failed"
+ end
+
def test_is_digit
for i in 0...9
si = "#{i}"
assert \
@@ -40,72 +64,56 @@
"the character 'a' is not a character digit"
end
def test_parse_time_string
+ pts("500", 0.5)
pts("1000", 1.0)
pts("1h", 3600.0)
pts("1h10s", 3610.0)
end
def test_scheduler_0
$var = nil
- scheduler = OpenWFEru::Scheduler.new()
+ scheduler = OpenWFE::Scheduler.new()
scheduler.start
- scheduler.schedule_in('2s', TestSchedulable.new, nil)
+ sid = scheduler.schedule_in('2s', TestSchedulable.new, nil)
+ assert \
+ sid,
+ "scheduler did not return a job id"
+
+ assert \
+ (not $var),
+ "scheduler_0 is blocking but should not"
+
sleep(2.5)
scheduler.stop
#puts ">#{$var}<"
assert \
($var == "ok"),
"scheduler_0 didn't work"
end
- def test_cron_0
- $var = 0
-
- scheduler = OpenWFEru::Scheduler.new()
- scheduler.start
-
- scheduler.schedule('* * * * *', CounterSchedulable.new, nil)
-
- sleep(120)
- scheduler.stop
-
- #puts ">#{$var}<"
-
- assert \
- ($var == 2),
- "cron_0 failed, $var is #{$var}"
- end
-
protected
class TestSchedulable
- include OpenWFEru::Schedulable
+ include OpenWFE::Schedulable
def trigger (params)
$var = "ok"
end
end
- class CounterSchedulable
- include OpenWFEru::Schedulable
-
- def trigger (params)
- $var = $var + 1
- end
- end
-
def pts (time_string, seconds)
+
assert \
- ((OpenWFE::parse_time_string(time_string) == seconds),
- "'#{time_string}' did not map to #{seconds} seconds")
+ OpenWFE::parse_time_string(time_string) == seconds,
+ "'#{time_string}' did not map to #{seconds} seconds"
end
end