From e977b4f72b782c2dc3811fa5a110061d00485c9d Mon Sep 17 00:00:00 2001 From: rettenbe Date: Fri, 14 Mar 2008 11:10:24 +0000 Subject: [PATCH] bugfix: empty messages of logged in users are be handled git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9830 594d385d-05f5-0310-b6e9-bd551577e9d8 --- gosa-si/server/events/clMessages.pm | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/gosa-si/server/events/clMessages.pm b/gosa-si/server/events/clMessages.pm index 3415ea14c..24ab66829 100644 --- a/gosa-si/server/events/clMessages.pm +++ b/gosa-si/server/events/clMessages.pm @@ -165,6 +165,11 @@ sub CURRENTLY_LOGGED_IN { my $source = @{$msg_hash->{'source'}}[0]; my $login = @{$msg_hash->{$header}}[0]; + if(ref $login eq "HASH") { + &main::daemon_log("$session_id INFO: no logged in users reported from host '$source'", 5); + return; + } + # fetch all user currently assigned to the client at login_users_db my %currently_logged_in_user = (); $sql_statement = "SELECT * FROM $main::login_users_tn WHERE client='$source'"; @@ -174,7 +179,7 @@ sub CURRENTLY_LOGGED_IN { } &main::daemon_log("$session_id DEBUG: logged in users from login_user_db: ".join(", ", keys(%currently_logged_in_user)), 7); - # + # update all reported users in login_user_db my @logged_in_user = split(/\s+/, $login); &main::daemon_log("$session_id DEBUG: logged in users reported from client: ".join(", ", @logged_in_user), 7); foreach my $user (@logged_in_user) { -- 2.30.2