From 7d0906c0b1eb4df0a66371268317e07802abaa2b Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 16 Jun 2003 14:12:48 +0000 Subject: first pass at something ready to try/test --- iceplexd | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) (limited to 'iceplexd') diff --git a/iceplexd b/iceplexd index 1f1c293..2904be1 100644 --- a/iceplexd +++ b/iceplexd @@ -1 +1,27 @@ #!/usr/bin/perl +# +# iceplexd +# +# Copyright (c) 2003 Ivan Kohler +# All rights reserved. +# This program is free software; you can redistribute it and/or modify it under +# the same terms as Perl itself. + +# TODO, fake it for now :) + +# daemonize + +while (1) { + + # select all servers + # SELECT * FROM iceplex_servers + + foreach my $server ( @servers ) { + #ping , set status + # ask # of listeners + #update database + + } + +sleep 5; +} -- cgit v1.2.1