From: cajus Date: Tue, 26 Feb 2008 15:43:07 +0000 (+0000) Subject: Added reminders X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=bf9764fece00efc52112f55147ba77fb32e3a929;p=gosa.git Added reminders git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9131 594d385d-05f5-0310-b6e9-bd551577e9d8 --- diff --git a/gosa-si/server/events/clMessages.pm b/gosa-si/server/events/clMessages.pm index 62a3a50ae..a7487a3e1 100644 --- a/gosa-si/server/events/clMessages.pm +++ b/gosa-si/server/events/clMessages.pm @@ -28,13 +28,27 @@ END {} ### Start ###################################################################### -#&read_configfile($main::cfg_file, %cfg_defaults); +my $ldap_uri; +my $ldap_base; +my $ldap_admin_dn; +my $ldap_admin_password; + +my %cfg_defaults = ( +"server" => { + "ldap-uri" => [\$ldap_uri, ""], + "ldap-base" => [\$ldap_base, ""], + "ldap-admin-dn" => [\$ldap_admin_dn, ""], + "ldap-admin-password" => [\$ldap_admin_password, ""], + }, +); +&read_configfile($main::cfg_file, %cfg_defaults); sub get_events { return \@events; } + sub read_configfile { my ($cfg_file, %cfg_defaults) = @_; my $cfg; @@ -56,6 +70,7 @@ sub read_configfile { } } + sub LOGIN { my ($msg, $msg_hash, $session_id) = @_; my $header = @{$msg_hash->{'header'}}[0]; @@ -105,8 +120,6 @@ sub LOGOUT { } - -# echo "GOTOACTIVATION" > /var/run/gosa-si-client.socket sub GOTOACTIVATION { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_result_update_msg($msg_hash); @@ -115,7 +128,6 @@ sub GOTOACTIVATION { } -# echo "PROGRESS 15" > /var/run/gosa-si-client.socket sub PROGRESS { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_progress_update_msg($msg_hash); @@ -123,7 +135,7 @@ sub PROGRESS { return @out_msg_l; } -# echo "FAIREBOOT" > /tmp/gosa-si-client-fifo + sub FAIREBOOT { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash); @@ -131,7 +143,7 @@ sub FAIREBOOT { return @out_msg_l; } -# echo "TASKSKIP hallo welt" > /tmp/gosa-si-client-fifo + sub TASKSKIP { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash); @@ -140,33 +152,52 @@ sub TASKSKIP { } -# echo "TASKBEGIN hallo welt" > /tmp/gosa-si-client-fifo + sub TASKBEGIN { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash); my @out_msg_l = ($out_msg); + +# -----------------------> Update hier +# finish +#
CLMSG_TASKBEGIN
+# macaddress auslesen, Client im LDAP lokalisieren +# FAIstate auf "localboot" setzen, wenn FAIstate "install" oder "softupdate" war + return @out_msg_l; } -# echo "TASKEND hallo welt" > /tmp/gosa-si-client-fifo + sub TASKEND { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash); my @out_msg_l = ($out_msg); + +# -----------------------> Update hier +# finish +#
CLMSG_TASKBEGIN
+# macaddress auslesen, Client im LDAP lokalisieren +# FAIstate auf "error" setzen + return @out_msg_l; } -# echo "TASKERROR hallo welt" > /tmp/gosa-si-client-fifo sub TASKERROR { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash); my @out_msg_l = ($out_msg); + +# -----------------------> Update hier +# finish +#
CLMSG_TASKBEGIN
+# macaddress auslesen, Client im LDAP lokalisieren +# FAIstate auf "error" setzen + return @out_msg_l; } -# echo "HOOK hallo welt" > /tmp/gosa-si-client-fifo sub HOOK { my ($msg, $msg_hash, $session_id) = @_; my $out_msg = &build_status_result_update_msg($msg_hash);