You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
240 lines
14 KiB
240 lines
14 KiB
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
|
|
);
|
|
|
|
my $customerid = ("id" . int(rand(100000)) . "ok");
|
|
my $domainstring = ("domain" . int(rand(100000)) . ".example.org");
|
|
my $emailstring = ("test" . int(rand(10000)) . "\@example.org");
|
|
my $username = ("demo" . int(rand(10000)) . "name");
|
|
my $bsetname = ("test" . int(10000) . "bset");
|
|
my $destinationname = ("test" . int(10000) . "dset");
|
|
my $sourcename = ("test" . int(10000) . "source");
|
|
|
|
$c->login_ok();
|
|
$c->create_domain($domainstring);
|
|
$c->create_customer($customerid);
|
|
|
|
diag("Open Details for our just created Customer");
|
|
$d->fill_element('#Customer_table_filter input', 'css', 'thisshouldnotexist');
|
|
ok($d->find_element_by_css('#Customer_table tr > td.dataTables_empty', 'css'), 'Garbage test not found');
|
|
$d->fill_element('#Customer_table_filter input', 'css', $customerid);
|
|
ok($d->wait_for_text('//*[@id="Customer_table"]/tbody/tr[1]/td[2]', $customerid), 'Customer found');
|
|
$d->move_action(element=> $d->find_element('//*[@id="Customer_table"]/tbody/tr[1]//td//div//a[contains(text(),"Details")]'));
|
|
$d->find_element('//*[@id="Customer_table"]/tbody/tr[1]//td//div//a[contains(text(),"Details")]')->click();
|
|
|
|
diag("Trying to add a Subscriber");
|
|
$d->find_element('//*[@id="customer_details"]//div//a[contains(text(), "Subscribers")]')->click();
|
|
$d->scroll_to_element($d->find_element('//*[@id="customer_details"]//div//a[contains(text(), "Subscribers")]'));
|
|
$d->find_element('Create Subscriber', 'link_text')->click();
|
|
|
|
diag('Enter necessary information');
|
|
$d->fill_element('//*[@id="domainidtable_filter"]/label/input', 'xpath', 'thisshouldnotexist');
|
|
ok($d->find_element_by_css('#domainidtable tr > td.dataTables_empty'), 'Table is empty');
|
|
$d->fill_element('//*[@id="domainidtable_filter"]/label/input', 'xpath', $domainstring);
|
|
ok($d->wait_for_text('//*[@id="domainidtable"]/tbody/tr[1]/td[3]', $domainstring), 'Domain found');
|
|
$d->select_if_unselected('//*[@id="domainidtable"]/tbody/tr[1]/td[4]/input');
|
|
$d->find_element('//*[@id="e164.cc"]')->send_keys('43');
|
|
$d->find_element('//*[@id="e164.ac"]')->send_keys('99');
|
|
$d->find_element('//*[@id="e164.sn"]')->send_keys(int(rand(99999999)));
|
|
$d->find_element('//*[@id="email"]')->send_keys($emailstring);
|
|
$d->find_element('//*[@id="webusername"]')->send_keys($username);
|
|
$d->find_element('//*[@id="webpassword"]')->send_keys('testing1234'); #workaround for misclicking on ok button
|
|
$d->find_element('//*[@id="gen_password"]')->click();
|
|
$d->find_element('//*[@id="username"]')->send_keys($username);
|
|
$d->find_element('//*[@id="password"]')->send_keys('testing1234'); #using normal pwd, cant easily seperate both generate buttons
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Trying to find Subscriber');
|
|
$d->fill_element('//*[@id="subscribers_table_filter"]/label/input', 'xpath', 'thisshouldnotexist');
|
|
ok($d->find_element_by_css('#subscribers_table tr > td.dataTables_empty'), 'Table is empty');
|
|
$d->fill_element('//*[@id="subscribers_table_filter"]/label/input', 'xpath', $username);
|
|
ok($d->wait_for_text('//*[@id="subscribers_table"]/tbody/tr/td[2]', $username), 'Subscriber was found');
|
|
|
|
diag('Go to Subscribers page');
|
|
$d->find_element('//*[@id="main-nav"]//*[contains(text(),"Settings")]')->click();
|
|
$d->find_element("Subscribers", 'link_text')->click();
|
|
|
|
diag('Checking Subscriber Details');
|
|
$d->fill_element('//*[@id="subscriber_table_filter"]/label/input', 'xpath', 'thisshouldnotexist');
|
|
ok($d->find_element_by_css('#subscriber_table tr > td.dataTables_empty'), 'Table is empty');
|
|
$d->fill_element('//*[@id="subscriber_table_filter"]/label/input', 'xpath', $username);
|
|
ok($d->wait_for_text('//*[@id="subscriber_table"]/tbody/tr/td[3]', 'default-customer@default.invalid'), 'Contact Email is correct');
|
|
ok($d->wait_for_text('//*[@id="subscriber_table"]/tbody/tr/td[4]', $username), 'Subscriber name is correct');
|
|
ok($d->wait_for_text('//*[@id="subscriber_table"]/tbody/tr/td[5]', $domainstring), 'Domain name is correct');
|
|
|
|
diag('Go to Subscriber details');
|
|
$d->move_action(element => $d->find_element('//*[@id="subscriber_table"]/tbody/tr[1]/td/div/a[contains(text(), "Details")]'));
|
|
$d->find_element('//*[@id="subscriber_table"]/tbody/tr[1]/td/div/a[contains(text(), "Details")]')->click();
|
|
|
|
diag('Go to Subscriber preferences');
|
|
$d->find_element("Preferences", 'link_text')->click();
|
|
|
|
diag('Trying to change subscriber IVR language');
|
|
$d->find_element("Internals", 'link_text')->click();
|
|
$d->scroll_to_element($d->find_element('//table//tr/td[contains(text(), "language")]'));
|
|
$d->move_and_click('//table//tr/td[contains(text(), "language")]/..//td//a[contains(text(), "Edit")]', 'xpath');
|
|
|
|
diag('Change language to German');
|
|
$d->find_element('//*[@id="language"]/option[contains(text(), "German")]')->click();
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check if language has been applied');
|
|
$d->scroll_to_element($d->find_element('//*[@id="preference_groups"]//div//a[contains(text(),"Internals")]'));
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "language")]/../td/select/option[contains(text(), "German") and @selected="selected"]'), '"German" has been selected');
|
|
|
|
diag('Trying to enable call recording');
|
|
$d->find_element("NAT and Media Flow Control", 'link_text')->click();
|
|
$d->scroll_to_element($d->find_element('//table//tr/td[contains(text(), "record_call")]'));
|
|
$d->move_and_click('//table//tr/td[contains(text(), "record_call")]/..//td//a[contains(text(), "Edit")]', 'xpath');
|
|
|
|
diag('Enable call recording');
|
|
$d->select_if_unselected('//*[@id="record_call"]');
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check if call recording was enabled');
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "record_call")]/../td//input[@checked="checked"]'), "Call recording was enabled");
|
|
|
|
diag('Trying to add a simple call forward');
|
|
$d->find_element("Call Forwards", 'link_text')->click();
|
|
$d->move_and_click('//*[@id="preferences_table_cf"]/tbody/tr/td[contains(text(), "Unconditional")]/../td/div/a[contains(text(), "Edit")]', 'xpath');
|
|
$d->fill_element('//*[@id="destination.uri.destination"]', 'xpath', '43123456789');
|
|
$d->find_element('//*[@id="cf_actions.advanced"]')->click();
|
|
|
|
diag('Add a new Source set');
|
|
$d->find_element('//*[@id="cf_actions.edit_source_sets"]')->click();
|
|
$d->find_element('Create New', 'link_text')->click();
|
|
$d->fill_element('//*[@id="name"]', 'xpath', $sourcename);
|
|
$d->fill_element('//*[@id="source.0.source"]', 'xpath', '43*');
|
|
|
|
diag('Adding another source');
|
|
$d->find_element('//*[@id="source_add"]')->click();
|
|
ok($d->fill_element('//*[@id="source.1.source"]', 'xpath', '494331337'), "New Source input was created");
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check Source set details');
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $sourcename . '")]'), "Name is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $sourcename . '")]/../td[contains(text(), "whitelist")]'), "Mode is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $sourcename . '")]/../td[contains(text(), "43*")]'), "Number 1 is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $sourcename . '")]/../td[text()[contains(., "494331337")]]'), "Number 2 is correct");
|
|
$d->find_element('//*[@id="mod_close"]')->click();
|
|
|
|
diag('Add a new B-Number set');
|
|
$d->find_element('//*[@id="cf_actions.edit_bnumber_sets"]')->click();
|
|
$d->find_element('Create New', 'link_text')->click();
|
|
$d->fill_element('//*[@id="name"]', 'xpath', $bsetname);
|
|
$d->fill_element('//*[@id="bnumbers.0.number"]', 'xpath', '1234567890');
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check B-Number set details');
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $bsetname . '")]'), "Name is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $bsetname . '")]/../td[contains(text(), "1234567890")]'), "Number is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $bsetname . '")]/../td[contains(text(), "whitelist")]'), "Mode is correct");
|
|
$d->find_element('//*[@id="mod_close"]')->click();
|
|
|
|
diag('Add a new Destination set');
|
|
$d->find_element('//*[@id="cf_actions.edit_destination_sets"]')->click();
|
|
$d->find_element('Create New', 'link_text')->click();
|
|
$d->fill_element('//*[@id="name"]', 'xpath', $destinationname);
|
|
$d->fill_element('//*[@id="destination.0.uri.destination"]', 'xpath', '1234567890');
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check Destination set details');
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $destinationname . '")]'), "Name is correct");
|
|
ok($d->find_element_by_xpath('//*[@id="mod_edit"]//table//tr/td[contains(text(), "' . $destinationname . '")]/../td[contains(text(), "1234567890")]'), "Number is correct");
|
|
$d->find_element('//*[@id="mod_close"]')->click();
|
|
|
|
diag('Use new Sets');
|
|
$d->find_element('//*[@id="callforward_controls_add"]')->click();
|
|
$d->find_element('//*[@id="active_callforward.0.source_set"]/option[contains(text(), "' . $sourcename . '")]')->click();
|
|
ok($d->find_element_by_xpath('//select//option[contains(text(), "' . $sourcename . '")]')->click(), "Source set has been found");
|
|
ok($d->find_element_by_xpath('//select//option[contains(text(), "' . $destinationname . '")]')->click(), "Destination Set has been found");
|
|
ok($d->find_element_by_xpath('//select//option[contains(text(), "' . $bsetname . '")]')->click(), "B-Set has been found");
|
|
|
|
diag('Save');
|
|
$d->find_element('//*[@id="cf_actions.save"]')->click();
|
|
|
|
diag('Check if call-forward has been applied');
|
|
ok($d->find_element_by_xpath('//*[@id="preferences_table_cf"]/tbody/tr[1]/td[contains(text(), ' . $bsetname . ')]'), 'B-Set was selected');
|
|
ok($d->find_element_by_xpath('//*[@id="preferences_table_cf"]/tbody/tr[1]/td[contains(text(), ' . $destinationname . ')]'), 'Destination set was selected');
|
|
|
|
diag('Trying to add call blockings');
|
|
$d->find_element("Call Blockings", 'link_text')->click();
|
|
$d->scroll_to_element($d->find_element("Call Blockings", 'link_text'));
|
|
|
|
diag('Edit block_in_mode');
|
|
$d->move_and_click('//table//tr/td[contains(text(), "block_in_mode")]/../td//a[contains(text(), "Edit")]', 'xpath', '//*[@id="preference_groups"]//div//a[contains(text(), "Call Blockings")]');
|
|
$d->find_element('//*[@id="block_in_mode"]')->click();
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check if value was set');
|
|
$d->scroll_to_element($d->find_element("Call Blockings", 'link_text'));
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "block_in_mode")]/../td/input[@checked="checked"]'), "Setting is correct");
|
|
|
|
diag('Edit block_in_list');
|
|
$d->move_and_click('//table//tr/td[contains(text(), "block_in_list")]/../td//a[contains(text(), "Edit")]', 'xpath', '//*[@id="preference_groups"]//div//a[contains(text(), "Call Blockings")]');
|
|
$d->fill_element('//*[@id="block_in_list"]', 'xpath', '1337');
|
|
$d->find_element('//*[@id="add"]')->click();
|
|
$d->fill_element('//*[@id="block_in_list"]', 'xpath', '42');
|
|
$d->find_element('//*[@id="add"]')->click();
|
|
$d->find_element('//*[@id="mod_close"]')->click();
|
|
|
|
diag('Check if value was set');
|
|
$d->scroll_to_element($d->find_element("Call Blockings", 'link_text'));
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "block_in_list")]/../td[contains(text(), "1337")]'), "Number 1 is correct");
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "block_in_list")]/../td[text()[contains(., "42")]]'), "Number 2 is correct");
|
|
|
|
diag('Disable Entry');
|
|
$d->move_and_click('//table//tr/td[contains(text(), "block_in_list")]/../td//a[contains(text(), "Edit")]', 'xpath', '//*[@id="preference_groups"]//div//a[contains(text(), "Call Blockings")]');
|
|
$d->find_element('//*[@id="mod_edit"]//div//input[@value="1337"]/../a[2]')->click();
|
|
$d->find_element('//*[@id="mod_close"]')->click();
|
|
|
|
diag('Check if Entry was disabled');
|
|
$d->scroll_to_element($d->find_element("Call Blockings", 'link_text'));
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "block_in_list")]/../td/span[@class="ngcp-entry-disabled"]/../span[contains(text(), "1337")]'), "Entry was disabled");
|
|
|
|
diag('Edit block_in_clir');
|
|
$d->move_and_click('//table//tr/td[contains(text(), "block_in_clir")]/../td//a[contains(text(), "Edit")]', 'xpath', '//*[@id="preference_groups"]//div//a[contains(text(), "Call Blockings")]');
|
|
$d->find_element('//*[@id="block_in_clir"]')->click();
|
|
$d->find_element('//*[@id="save"]')->click();
|
|
|
|
diag('Check if value was set');
|
|
ok($d->find_element_by_xpath('//table//tr/td[contains(text(), "block_in_clir")]/../td/input[@checked="checked"]'), "Setting is correct");
|
|
|
|
diag('Go to Subscribers Page');
|
|
$d->find_element('//*[@id="main-nav"]//*[contains(text(),"Settings")]')->click();
|
|
$d->find_element("Subscribers", 'link_text')->click();
|
|
|
|
diag('Trying to delete Subscriber');
|
|
$d->fill_element('//*[@id="subscriber_table_filter"]/label/input', 'xpath', 'thisshouldnotexist');
|
|
ok($d->find_element_by_css('#subscriber_table tr > td.dataTables_empty'), 'Table is empty');
|
|
$d->fill_element('//*[@id="subscriber_table_filter"]/label/input', 'xpath', $username);
|
|
ok($d->wait_for_text('//*[@id="subscriber_table"]/tbody/tr/td[4]', $username), 'Subscriber was found');
|
|
$d->move_action(element => $d->find_element('//*[@id="subscriber_table"]/tbody/tr[1]/td/div/a[contains(text(), "Terminate")]'));
|
|
$d->find_element('//*[@id="subscriber_table"]/tbody/tr[1]/td/div/a[contains(text(), "Terminate")]')->click();
|
|
$d->find_element('//*[@id="dataConfirmOK"]')->click();
|
|
|
|
diag('Check if Subscriber has been deleted');
|
|
$d->fill_element('//*[@id="subscriber_table_filter"]/label/input', 'xpath', $username);
|
|
ok($d->find_element_by_css('#subscriber_table tr > td.dataTables_empty'), 'Table is empty');
|
|
|
|
$c->delete_customer($customerid);
|
|
$c->delete_domain($domainstring);
|
|
|
|
done_testing(); |