load->model('user_model'); if(!$this->user_model->authorize(99)) { $this->session->set_flashdata('error', __("You're not allowed to do that!")); redirect('dashboard'); } } public function index() { set_time_limit(3600); // Starting clock time in seconds $start_time = microtime(true); $this->load->model('stations'); $data['station_profile'] = $this->stations->all_of_user(); $footerData = []; $footerData['scripts'] = [ 'assets/js/sections/calltester.js', ]; $data['page_title'] = __("Call Tester"); $this->load->view('interface_assets/header', $data); $this->load->view('calltester/index'); $this->load->view('interface_assets/footer', $footerData); } function doDxccCheck() { set_time_limit(3600); $de = $this->input->post('de', true); $compare = $this->input->post('compare', true); $this->load->model('dxcc'); $qsos = $this->dxcc->getQsos($de); if ($compare == "true") { $result = $this->doClassCheck($de, $qsos); $result2 = $this->doDxccCheckModel($de, $qsos); return $this->compareDxccChecks($result, $result2); } $result = $this->doClassCheck($de, $qsos); $this->loadView($result); } /* Uses DXCC Class. Much faster */ function doClassCheck($de, $callarray) { ini_set('memory_limit', '-1'); $i = 0; $result = array(); // Starting clock time in seconds $start_time = microtime(true); $dxccobj = new Dxcc(); foreach ($callarray->result() as $call) { $i++; $dxcc = $dxccobj->dxcc_lookup($call->col_call, $call->date); $dxcc['adif'] = (isset($dxcc['adif'])) ? $dxcc['adif'] : 0; $dxcc['entity'] = (isset($dxcc['entity'])) ? $dxcc['entity'] : 'None'; if ($call->col_dxcc != $dxcc['adif']) { $result[] = array( 'callsign' => $call->col_call, 'qso_date' => $call->date, 'station_profile' => $call->station_profile_name, 'existing_dxcc' => $call->col_country, 'existing_adif' => $call->col_dxcc, 'result_country' => ucwords(strtolower($dxcc['entity']), "- (/"), 'result_adif' => $dxcc['adif'], 'id' => $call->col_primary_key, ); } } // End clock time in seconds $end_time = microtime(true); // Calculate script execution time $execution_time = ($end_time - $start_time); $data['execution_time'] = $execution_time; $data['calls_tested'] = $i; $data['result'] = $result; return $data; } /* Uses the normal dxcc lookup, which is slow */ function doDxccCheckModel($de, $callarray) { $i = 0; $result = array(); // Starting clock time in seconds $start_time = microtime(true); $this->load->model('dxcc'); foreach ($callarray->result() as $call) { $i++; $dxcc = $this->dxcc->dxcc_lookup($call->col_call, $call->date); $dxcc['adif'] = (isset($dxcc['adif'])) ? $dxcc['adif'] : 0; $dxcc['entity'] = (isset($dxcc['entity'])) ? $dxcc['entity'] : 0; if ($call->col_dxcc != $dxcc['adif']) { $result[] = array( 'callsign' => $call->col_call, 'qso_date' => $call->date, 'station_profile' => $call->station_profile_name, 'existing_dxcc' => $call->col_country, 'existing_adif' => $call->col_dxcc, 'result_country' => ucwords(strtolower($dxcc['entity']), "- (/"), 'result_adif' => $dxcc['adif'], 'id' => $call->col_primary_key, ); } } // End clock time in seconds $end_time = microtime(true); // Calculate script execution time $execution_time = ($end_time - $start_time); $data['execution_time'] = $execution_time; $data['calls_tested'] = $i; $data['result'] = $result; return $data; } function loadView($data) { $this->load->view('calltester/result', $data); } function compareDxccChecks($result, $result2) { // Convert arrays to comparable format using callsign, qso_date, and id as unique keys $classCheckItems = []; $modelCheckItems = []; // Create associative arrays for easier comparison foreach ($result['result'] as $item) { $key = $item['callsign'] . '|' . $item['qso_date'] . '|' . $item['id']; $classCheckItems[$key] = $item; } foreach ($result2['result'] as $item) { $key = $item['callsign'] . '|' . $item['qso_date'] . '|' . $item['id']; $modelCheckItems[$key] = $item; } // Find items that are in class check but not in model check $onlyInClass = array_diff_key($classCheckItems, $modelCheckItems); // Find items that are in model check but not in class check $onlyInModel = array_diff_key($modelCheckItems, $classCheckItems); // Prepare comparison data $comparisonData = []; $comparisonData['class_execution_time'] = $result['execution_time']; $comparisonData['model_execution_time'] = $result2['execution_time']; $comparisonData['class_calls_tested'] = $result['calls_tested']; $comparisonData['model_calls_tested'] = $result2['calls_tested']; $comparisonData['class_total_issues'] = count($result['result']); $comparisonData['model_total_issues'] = count($result2['result']); $comparisonData['only_in_class'] = $onlyInClass; $comparisonData['only_in_model'] = $onlyInModel; $comparisonData['common_issues'] = array_intersect_key($classCheckItems, $modelCheckItems); $this->load->view('calltester/comparison_result', $comparisonData); } function csv() { set_time_limit(3600); // Starting clock time in seconds $start_time = microtime(true); $file = 'uploads/calls.csv'; $handle = fopen($file,"r"); $data = fgetcsv($handle,1000,",",'"',"\\"); // Skips firsts line, usually that is the header $data = fgetcsv($handle,1000,",",'"',"\\"); $result = array(); $i = 0; $this->load->model('dxcc'); do { if ($data[0]) { // COL_CALL,COL_DXCC,COL_TIME_ON $i++; $dxcc = $this->dxcc->dxcc_lookup($data[0], $data[2]); $dxcc['adif'] = (isset($dxcc['adif'])) ? $dxcc['adif'] : 0; $dxcc['entity'] = (isset($dxcc['entity'])) ? $dxcc['entity'] : 0; $data[1] = $data[1] == "NULL" ? 0 : $data[1]; if ($data[1] != $dxcc['adif']) { $result[] = array( 'Callsign' => $data[0], 'Expected country' => '', 'Expected adif' => $data[1], 'Result country' => ucwords(strtolower($dxcc['entity']), "- (/"), 'Result adif' => $dxcc['adif'], ); } } } while ($data = fgetcsv($handle,1000,",",'"',"\\")); // End clock time in seconds $end_time = microtime(true); // Calculate script execution time $execution_time = ($end_time - $start_time); $viewData = []; $viewData['result'] = $result; $viewData['execution_time'] = $execution_time; $viewData['calls_tested'] = $i; $viewData['page_title'] = __("CSV Call Tester"); $this->load->view('interface_assets/header', $viewData); $this->load->view('calltester/call'); $this->load->view('interface_assets/footer'); } /* * Uses check_dxcc_table - written to check if that function works */ function csv2() { set_time_limit(3600); // Starting clock time in seconds $start_time = microtime(true); $file = 'uploads/calls.csv'; $handle = fopen($file,"r"); $data = fgetcsv($handle,1000,",",'"',"\\"); // Skips firsts line, usually that is the header $data = fgetcsv($handle,1000,",",'"',"\\"); $result = array(); $i = 0; $this->load->model('dxcc'); do { if ($data[0]) { // COL_CALL,COL_DXCC,COL_TIME_ON $i++; $dxcc = $this->dxcc->check_dxcc_table($data[0], $data[2]); $data[1] = $data[1] == "NULL" ? 0 : $data[1]; if ($data[1] != $dxcc[0]) { $result[] = array( 'Callsign' => $data[0], 'Expected country' => '', 'Expected adif' => $data[1], 'Result country' => ucwords(strtolower($dxcc[1]), "- (/"), 'Result adif' => $dxcc[0], ); } } } while ($data = fgetcsv($handle,1000,",",'"',"\\")); // End clock time in seconds $end_time = microtime(true); // Calculate script execution time $execution_time = ($end_time - $start_time); $viewData = []; $viewData['result'] = $result; $viewData['execution_time'] = $execution_time; $viewData['calls_tested'] = $i; $viewData['page_title'] = __("CSV Call Tester"); $this->load->view('interface_assets/header', $viewData); $this->load->view('calltester/call'); $this->load->view('interface_assets/footer'); } function call() { $testarray = array(); $testarray[] = array( 'Callsign' => 'WJ7R/C6A', 'Country' => 'Bahamas', 'Adif' => 60, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'WJ7R/KH6', 'Country' => 'Hawaii', 'Adif' => 110, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'WJ7R/C6', 'Country' => 'Bahamas', 'Adif' => 60, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VE3EY/VP9', 'Country' => 'Bermuda', 'Adif' => 64, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP2MDG', 'Country' => 'Montserrat', 'Adif' => 96, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP2EY', 'Country' => 'Anguilla', 'Adif' => 12, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP2VI', 'Country' => 'British Virgin Islands.', 'Adif' => 65, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP2V/AA7V', 'Country' => 'British Virgin Islands', 'Adif' => 65, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'W8LR/R', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'SO1FH', 'Country' => 'Poland', 'Adif' => 269, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KZ1H/PP', 'Country' => 'Brazil', 'Adif' => 108, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'K1KW/AM', 'Country' => 'None', 'Adif' => 0, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'K1KW/MM', 'Country' => 'None', 'Adif' => 0, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'TF/DL2NWK/P', 'Country' => 'Iceland', 'Adif' => 242, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'OZ1ALS/A', 'Country' => 'Denmark', 'Adif' => 221, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'LA1K', 'Country' => 'Norway', 'Adif' => 266, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'K1KW/M', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'TF/DL2NWK/M', 'Country' => 'Iceland', 'Adif' => 242, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'TF/DL2NWK/MM', 'Country' => 'None', 'Adif' => 0, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'TF/DL2NWK/P', 'Country' => 'Iceland', 'Adif' => 242, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '2M0SQL/P', 'Country' => 'Scotland', 'Adif' => 279, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'FT8WW', 'Country' => 'Crozet Island', 'Adif' => 41, 'Date' => '2023-03-14' ); $testarray[] = array( 'Callsign' => 'RV0AL/0/P', 'Country' => 'Asiatic Russia', 'Adif' => 15, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'OH/DJ1YFK', 'Country' => 'Finland', 'Adif' => 224, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'N6TR/7', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KH0CW', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'R2FM/P', 'Country' => 'kaliningrad', 'Adif' => 126, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'R2FM', 'Country' => 'kaliningrad', 'Adif' => 126, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'FT5XO', 'Country' => 'Kerguelen Island', 'Adif' => 131, 'Date' => '2005-03-20' ); $testarray[] = array( 'Callsign' => 'VP8CTR', 'Country' => 'Antarctica', 'Adif' => 13, 'Date' => '1997-02-07' ); $testarray[] = array( 'Callsign' => 'FO0AAA', 'Country' => 'Clipperton', 'Adif' => 36, 'Date' => '2000-03-02' ); $testarray[] = array( 'Callsign' => 'CX/PR8KW', 'Country' => 'Uruguay', 'Adif' => 144, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'IQ3MV/LH', 'Country' => 'Italy', 'Adif' => 248, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'LA1K/QRP', 'Country' => 'Norway', 'Adif' => 266, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'LA1K/LGT', 'Country' => 'Norway', 'Adif' => 266, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'SM1K/LH', 'Country' => 'Sweden', 'Adif' => 284, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KG4W', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KG4WW', 'Country' => 'Guantanamo Bay', 'Adif' => 105, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KG4WWW', 'Country' => 'United States Of America', 'Adif' => 291, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'JA0JHQ/VK9X', 'Country' => 'Christmas Island', 'Adif' => 35, 'Date' => '2015-05-08' ); $testarray[] = array( 'Callsign' => 'D5M', 'Country' => 'Liberia', 'Adif' => 434, 'Date' => '2025-12-14' ); $testarray[] = array( 'Callsign' => 'AT44I', 'Country' => 'Antarctica', 'Adif' => 13, 'Date' => '2025-12-16' ); $testarray[] = array( 'Callsign' => 'PT7BZ/PY0F', 'Country' => 'Fernando De Noronha', 'Adif' => 56, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP6A', 'Country' => 'Ducie Island', 'Adif' => 513, 'Date' => '2023-06-21' ); $testarray[] = array( 'Callsign' => '9M1Z', 'Country' => 'East Malaysia', 'Adif' => 46, 'Date' => '2024-06-24' ); $testarray[] = array( 'Callsign' => 'VK2/W7BRS', 'Country' => 'Lord Howe Island', 'Adif' => 147, 'Date' => '2024-07-18' ); $testarray[] = array( 'Callsign' => 'G4SGX/6Y', 'Country' => 'Jamaica', 'Adif' => 82, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'DX0JP', 'Country' => 'Spratly Islands', 'Adif' => 247, 'Date' => '2007-02-08' ); $testarray[] = array( 'Callsign' => 'AU7JCB', 'Country' => 'India', 'Adif' => 324, 'Date' => '2007-02-08' ); $testarray[] = array( 'Callsign' => 'N2JBY/4X', 'Country' => 'Israel', 'Adif' => 336, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KH5K', 'Country' => 'Invalid', 'Adif' => 0, 'Date' => '1993-03-13' ); $testarray[] = array( 'Callsign' => 'HB/DK9TA', 'Country' => 'Switzerland', 'Adif' => 287, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'OE5DI/500', 'Country' => 'Austria', 'Adif' => 206, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'YI6SUL', 'Country' => 'Invalid', 'Adif' => 0, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '3DA8/DF8LY/P', 'Country' => 'Kingdom Of Eswatini', 'Adif' => 468, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '3X/DL5DAB', 'Country' => 'Invalid', 'Adif' => 0, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '3X/DL5DA', 'Country' => 'Guinea', 'Adif' => 107, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'KN5H/6YA', 'Country' => 'Jamaica', 'Adif' => 82, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'DL2AAZ/6Y5', 'Country' => 'Jamaica', 'Adif' => 82, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '6Y5WJ', 'Country' => 'Jamaica', 'Adif' => 82, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'R20RRC/0', 'Country' => 'Asiatic Russia', 'Adif' => 15, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'G4KJV/2K/P', 'Country' => 'England', 'Adif' => 223, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP8ADR/40', 'Country' => 'Falkland Islands', 'Adif' => 141, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VP8ADR/400', 'Country' => 'Falkland Islands', 'Adif' => 141, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'LU7CC/E', 'Country' => 'Argentina', 'Adif' => 100, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'FR/F6KDF/T', 'Country' => 'Tromelin Island', 'Adif' => 276, 'Date' => '1999-08-04' ); $testarray[] = array( 'Callsign' => 'A6050Y/5', 'Country' => 'United Arab Emirates', 'Adif' => 391, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '9H5G/C6A', 'Country' => 'Bahamas', 'Adif' => 60, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'A45XR/0', 'Country' => 'Oman', 'Adif' => 370, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'RAEM', 'Country' => 'Asiatic Russia', 'Adif' => 54, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'DJ1YFK/VE1', 'Country' => 'Canada', 'Adif' => 1, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'HD1QRC90', 'Country' => 'Ecuador', 'Adif' => 120, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'PJ6A', 'Country' => 'Saba & St. Eustatius', 'Adif' => 519, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'PJ4D', 'Country' => 'Bonaire', 'Adif' => 520, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => '4X50CZ/SK', 'Country' => 'Israel', 'Adif' => 336, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'RK3BY/0', 'Country' => 'Asiatic Russia', 'Adif' => 15, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'IU0KNS/ERA', 'Country' => 'Italy', 'Adif' => 248, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'IU8BPS/AWD', 'Country' => 'Italy', 'Adif' => 248, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'IK7XNF/GIRO', 'Country' => 'Italy', 'Adif' => 248, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VJ5A', 'Country' => 'Australia', 'Adif' => 150, 'Date' => date('Y-m-d', time()) ); $testarray[] = array( 'Callsign' => 'VL2IG', 'Country' => 'Australia', 'Adif' => 150, 'Date' => date('Y-m-d', time()) ); set_time_limit(3600); // Starting clock time in seconds $start_time = microtime(true); $result = array(); $i = 0; $dxccobj = new Dxcc(); foreach ($testarray as $call) { $i++; $dxcc = $dxccobj->dxcc_lookup($call['Callsign'], $call['Date']); $dxcc['adif'] = (isset($dxcc['adif'])) ? $dxcc['adif'] : 0; $dxcc['entity'] = (isset($dxcc['entity'])) ? $dxcc['entity'] : 'None'; $result[] = array( 'Callsign' => $call['Callsign'], 'Date' => $call['Date'], 'Expected country' => $call['Country'], 'Expected adif' => $call['Adif'], 'Result country' => ucwords(strtolower($dxcc['entity']), "- (/"), 'Result adif' => $dxcc['adif'], 'Passed' => ($call['Adif'] == $dxcc['adif']) ? 'Yes' : 'No', ); } // End clock time in seconds $end_time = microtime(true); // Calculate script execution time $execution_time = ($end_time - $start_time); $data['result'] = $result; $data['execution_time'] = $execution_time; $data['calls_tested'] = $i; $data['page_title'] = __("Callsign Tester"); $this->load->view('interface_assets/header', $data); $this->load->view('calltester/call'); $this->load->view('interface_assets/footer'); } }