diff --git a/src/warden-server/bin/registerReceiver.pl b/src/warden-server/bin/registerReceiver.pl index 0aac8eee412596458608eb01840f80a420dafaa7..b327a82c5d0dfd3ec02ca61039b1831019c41a5e 100755 --- a/src/warden-server/bin/registerReceiver.pl +++ b/src/warden-server/bin/registerReceiver.pl @@ -128,8 +128,9 @@ if (defined $result) { $sth = $dbh->prepare("INSERT INTO clients VALUES (?,?,?,?,?,?,?,?,?,?,?);") or die "Cannot prepare statement: " . $dbh->errstr; my $ret_val = $sth->execute(undef, $hostname, $registered, $requestor, $service, $client_type, $type, $receive_own_events, $description_tags, $ip_net_client, $valid) or die "Cannot execute statement: " . $sth->errstr; if ($ret_val == 1) { - sendMsg("info", "New receiver [Hostname: '$hostname', Requestor: '$requestor', Type: '$type', ROE: '$receive_own_events', CIDR: '$ip_net_client'] has been registered"); - WardenCommon::succMsg("Registration of receiver $hostname ($type) was SUCCESSFUL!!!"); + my $last_insert_id = $dbh->last_insert_id(undef, undef, "clients", undef); + sendMsg("info", "New receiver [ID: '$last_insert_id', Hostname: '$hostname', Requestor: '$requestor', Type: '$type', ROE: '$receive_own_events', CIDR: '$ip_net_client'] has been registered"); + WardenCommon::succMsg("Registration of receiver (#$last_insert_id) was SUCCESSFUL!!!"); } else { WardenCommon::errMsg("Registration of receiver $hostname ($type) FAILED!!!"); } diff --git a/src/warden-server/bin/registerSender.pl b/src/warden-server/bin/registerSender.pl index 83dc56ffda7d749adc766c9bed89c11e4d4341de..5d5b03de47699260bbbdcff63b434632e4a6a8e6 100755 --- a/src/warden-server/bin/registerSender.pl +++ b/src/warden-server/bin/registerSender.pl @@ -127,8 +127,9 @@ if (defined $result) { $sth = $dbh->prepare("INSERT INTO clients VALUES (?,?,?,?,?,?,?,?,?,?,?);") or die "Cannot prepare statement: " . $dbh->errstr; my $ret_val = $sth->execute(undef, $hostname, $registered, $requestor, $service, $client_type, $type, $receive_own_events, $description_tags, $ip_net_client, $valid) or die "Cannot execute statement: " . $sth->errstr; if ($ret_val == 1) { - sendMsg("info", "New sender [Hostname: '$hostname', Requestor: '$requestor', Service: '$service', Description_tags: '$description_tags', CIDR: '$ip_net_client'] has been registered"); - WardenCommon::succMsg("Registration of sender $hostname ($service) was SUCCESSFUL!!!"); + my $last_insert_id = $dbh->last_insert_id(undef, undef, "clients", undef); + sendMsg("info", "New sender [ID: '$last_insert_id', Hostname: '$hostname', Requestor: '$requestor', Service: '$service', Description_tags: '$description_tags', CIDR: '$ip_net_client'] has been registered"); + WardenCommon::succMsg("Registration of sender (#$last_insert_id) was SUCCESSFUL!!!"); } else { WardenCommon::errMsg("Registration of sender $hostname ($service) FAILED!!!"); }