summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: ea5c289)
raw | patch | inline | side by side (parent: ea5c289)
author | janw <janw@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Thu, 29 May 2008 08:05:18 +0000 (08:05 +0000) | ||
committer | janw <janw@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Thu, 29 May 2008 08:05:18 +0000 (08:05 +0000) |
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@11095 594d385d-05f5-0310-b6e9-bd551577e9d8
gosa-si/server/events/gosaTriggered.pm | patch | blob | history |
index 164c4913e100a5c6d908b9103a09c94f68150497..3975d8e04c172481649b3d871e9ee7ab2c194d33 100644 (file)
my $source = @{$msg_hash->{'source'}}[0];
my $target = @{$msg_hash->{'target'}}[0];
my $header= @{$msg_hash->{'header'}}[0];
- &main::daemon_log(Dumper($msg_hash));
my $mac= (defined($msg_hash->{'mac'}))?@{$msg_hash->{'mac'}}[0]:undef;
my $ogroup= (defined($msg_hash->{'ogroup'}))?@{$msg_hash->{'ogroup'}}[0]:undef;
my $timestamp= (defined($msg_hash->{'timestamp'}))?@{$msg_hash->{'timestamp'}}[0]:undef;
$ldap_entry->replace(
'FAIstate' => 'install'
);
+ my $faistate_mesg = $ldap_entry->update($ldap_handle);
+ if ($faistate_mesg->code() != 0) {
+ &main::daemon_log("ERROR: Updating the FAIstate for '".$ldap_entry->dn()."' failed (code '".$faistate_mesg->code()."') with '$@'!", 1);
+ }
}
} else {
$ldap_entry->add(
'FAIstate' => 'install'
);
+ my $faistate_mesg = $ldap_entry->update($ldap_handle);
+ if ($faistate_mesg->code() != 0) {
+ &main::daemon_log("ERROR: Updating the FAIstate for '".$ldap_entry->dn()."' failed (code '".$faistate_mesg->code()."') with '$@'!", 1);
+ }
}
- my $faistate_mesg = $ldap_entry->update($ldap_handle);
- if ($faistate_mesg->code() != 0) {
- &main::daemon_log("ERROR: Updating the FAIstate for '".$ldap_entry->dn()."' failed (code '".$faistate_mesg->code()."') with '$@'!", 1);
- }
} elsif ($ldap_mesg->count == 0) {
# TODO: Create a new entry
my $ogroup_result = $ogroup_entry->update($ldap_handle);
if ($ogroup_result->code() != 0) {
&main::daemon_log("ERROR: Updating the ObjectGroup '$ogroup' failed (code '".$ogroup_result->code()."') with '".$ogroup_result->{'errorMessage'}."'!", 1);
- &main::daemon_log(Dumper($ogroup_result));
}
}