This file will be used to store tests for creating rewrite rulesets. Change-Id: Ie23585ff4d02f70efb0193626f616d52c3cf1c4bchanges/00/29400/2
parent
d55e2c35b0
commit
ec6dd1bc1b
@ -0,0 +1,37 @@
|
||||
use warnings;
|
||||
use strict;
|
||||
|
||||
use lib 't/lib';
|
||||
use Test::More import => [qw(done_testing is ok diag todo_skip)];
|
||||
use Selenium::Remote::Driver::FirefoxExtensions;
|
||||
use Selenium::Collection::Common;
|
||||
|
||||
my $browsername = $ENV{BROWSER_NAME} || "firefox"; # possible values: firefox, htmlunit, chrome
|
||||
|
||||
my $d = Selenium::Remote::Driver::FirefoxExtensions->new(
|
||||
browser_name => $browsername,
|
||||
extra_capabilities => {
|
||||
acceptInsecureCerts => \1,
|
||||
},
|
||||
);
|
||||
|
||||
my $c = Selenium::Collection::Common->new(
|
||||
driver => $d
|
||||
);
|
||||
|
||||
$d->login_ok();
|
||||
|
||||
my $resellername = ("test" . int(rand(10000)));
|
||||
my $contractid = ("test" . int(rand(10000)));
|
||||
my $rulesetname = ("rule" . int(rand(10000)));
|
||||
|
||||
$c->create_reseller_contract($contractid);
|
||||
$c->create_reseller($resellername, $contractid);
|
||||
|
||||
$c->create_rw_ruleset($resellername, $rulesetname);
|
||||
$c->delete_rw_ruleset($rulesetname);
|
||||
|
||||
$c->delete_reseller_contract($contractid);
|
||||
$c->delete_reseller($resellername);
|
||||
|
||||
done_testing;
|
Loading…
Reference in new issue