Well, I went and started over, and it seems that it tests ok with the EventNotificationClient.pl script in the samples area. But I noticed that when I actually create the subscription with
sub CreateSubscription {
my $name = "QA Subscription";
my @event_list = (
"EVENTTYPE_CREATE",
"EVENTTYPE_MODIFY",
"EVENTTYPE_DELETE",
"EVENTTYPE_INTERFACE",
"EVENTTYPE_POOL",
"EVENTTYPE_POOL_MEMBER",
"EVENTTYPE_RULE",
"EVENTTYPE_VIRTUAL_SERVER",
"EVENTTYPE_NODE_ADDRESS",
"EVENTTYPE_SYSTEM_STARTUP",
"EVENTTYPE_SYSTEM_SHUTDOWN",
"EVENTTYPE_SYSTEM_CONFIG_LOAD"
);
my $url = "http://10.10.1.30:8420";
my $url_cred =
{
auth_mode => "AUTHMODE_BASIC",
username => "admin",
password => "password"
};
my $ttl = -1;
my $min_event_per = 30;
my $max_time = 60;
my $enabled_state = "STATE_ENABLED";
my $total_detail =
{
name => $name,
event_type_list => [@event_list],
url => $url,
url_credentials => $url_cred,
ttl => $ttl,
min_events_per_timeslice => $min_event_per,
max_timeslice => $max_time,
enabled_state => $enabled_sate
};
my $soapResponse = $EventSub->create
(
SOAP::Data->name(sub_detail_list => [$total_detail])
);
if ($soapResponse->fault) {
print $soapResponse->faultcode," ",$soapResponse->faultstring,"\n";
exit();
}
else {
my @subStatus = @{$soapResponse->result};
foreach $stat (@subStatus) {
$code = $stat->{"code"};
$data = $stat->{"data"};
print "code: $code\n";
print "data: $data\n";
print "\n";
}
}
}
That it comes up as STATE_DISABLED, which seems to be the issue:
Getting subscription info
Details for subscription ID: 4936492D-1974-6E33-E4DC-52423273FE3
Name: QA Subscription
URL: http://10.10.1.30:8420
Enabled State: STATE_DISABLED
ID: 4936492D-1974-6E33-E4DC-52423273FE3
----EVENTS----
EVENTTYPE_INTERFACE
EVENTTYPE_NODE_ADDRESS
EVENTTYPE_VIRTUAL_SERVER
EVENTTYPE_POOL_MEMBER
EVENTTYPE_POOL
EVENTTYPE_RULE
EVENTTYPE_DELETE
EVENTTYPE_CREATE
EVENTTYPE_MODIFY
EVENTTYPE_SYSTEM_STARTUP
EVENTTYPE_SYSTEM_SHUTDOWN
EVENTTYPE_SYSTEM_CONFIG_LOAD
Not sure why that is so I'm still investigating.
-jaskel