Project

General

Profile

Download (3.73 KB) Statistics
| Branch: | Tag: | Revision:
#!/usr/bin/ruby -Ku

#--
# CyborgHood, a distributed system management software.
# Copyright (c) 2009-2010 Marc Dequènes (Duck) <Duck@DuckCorp.org>
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
#++

# to allow in-place run for test
$: << File.join(File.dirname(__FILE__), "..", "lib")

require 'cyborghood/cyborg'
require 'cyborghood/cyborg/dsl'


module CyborgHood
module TestClientHome
include I18nTranslation
bindtextdomain("cyborghood_mapmaker", {:path => Config::L10N_DIR, :charset => "UTF-8"})

class TestClientClient < Cyborg
# load config before modules are included
Config.load

include BotNet

def start_work
# to test the closure through the inner instance_eval calls
toto = true

c = 0
task "compare stuff" do
# ask :MapMaker, :ver1, "/api_version"
# ask :Librarian, :ver2, "/api_version"
wait_notification :thread, {:topic => "HELOz"}, 5 do |subtask, msg|
puts "POUET NOTIF"
subtask.finish
end
send_notification :thread, {:topic => "HELO"}
wait_timer 2, true do |subtask|
c += 1
puts "TIMER !!!"
STDOUT.flush
subtask.finish if c == 10
end
on_error do
puts "PLOUF"
pp errors
pp results
end
on_success do
puts "OK"
pp errors
pp results
# puts "Tadam: " + (ver1 == ver2 ? "same" : "different")
meet "waiter", :zzz
STDOUT.flush
on_success do
puts "OK compare stuff"
end
end
end

task "waiter" do
meet "compare stuff", :zzz
on_success do
puts "OK waiter"
end
end

conversation_with "MapMaker" do
on_error do
puts "Halalalala !"
end
thread "super taiste" do
call :ver, "/api_version"
call :zones, "/DNS/Zones" if toto
on_error do
puts "Sniff !"
pp reply
end
on_success do
puts "Yahou !"
pp reply
call :gogogo, "/DNS"
on_error do
pp "Plouf"
pp reply
end
on_success do
pp "Hop!"
pp reply
send_notification 'meetpoint', { :topic => "MYNOTIF", :msg => "plop" }
end
end
end
#stop_bot :at_once
stop_bot :when_finished
end

conversation_with "Librarian" do
thread "taistouille" do
call :sdf, "/Gruik"
on_success do
puts "Librarian GoGoGo!"
pp reply
wait_notification 'meetpoint', { :topic => "MYNOTIF" }
on_success do
puts "NOTIF!"
pp reply
end
end
end
end
end
end
end
end

bot = CyborgHood::TestClientHome::TestClientClient.new

trap('INT') do
bot.ask_to_stop
end
trap('TERM') do
bot.ask_to_stop
end

bot.run
(7-7/7)