1 <& /elements/header-popup.html, 'Interface added' &>
2 <SCRIPT TYPE="text/javascript">
3 window.top.location.reload();
9 unless $FS::CurrentUser::CurrentUser->access_right('Configure network monitoring');
11 my $host = $cgi->param('host');
12 errorpage_popup('invalid host') unless $host =~ /^[0-9.a-zA-Z\-]+$/;
14 my $iface = $cgi->param('iface');
15 errorpage_popup('invalid iface') unless $iface =~ /^[0-9A-Za-z_\-.\\\/ ]+$/;
17 my $serviceid = $cgi->param('serviceid');
18 #die 'invalid serviceid' unless $serviceid =~ /^[0-9A-Za-z_\-.\\\/ ]+$/;
19 errorpage_popup('invalid serviceid') unless $serviceid =~ /^[0-9A-Za-z_]+$/;
21 my $nms = new FS::NetworkMonitoringSystem;
22 my $error = $nms->add_interface($host,$iface,$serviceid);
23 errorpage_popup($error) if $error;