Mikescher/www.mikescher.com
1
0
Fork 0
Code Actions
bde2750e23
www.mikescher.com/www/internals/modules/selftest.php

775 lines
30 KiB
PHP
Raw Normal View History

selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
<?php
continue working on selftest
2020-01-19 13:16:40 +01:00
class SelfTest implements IWebsiteModule
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
{
private const STATUS_ERROR = 2;
private const STATUS_WARN = 1;
private const STATUS_OK = 0;
private const DISPLAY_NAMES =
[
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'web::main' => 'Website (http)',
'web::programs' => 'Programs (http)',
move ext link check to own selftest cat
2020-01-20 19:04:39 +01:00
'web::programs-ext' => 'Programs (links)',
'web::programs-dl' => 'Programs (download)',
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'web::books' => 'Books (http)',
'web::blog' => 'Blog (http)',
'web::webapps' => 'WebApps (http)',
'web::euler' => 'Project Euler (http)',
finished selftest module
2020-01-20 17:42:52 +01:00
'web::aoc' => 'Advent of Code (http)',
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'api::default' => 'API',
'api::highscore' => 'Highscores API',
'modules::database' => 'Database',
finished selftest module
2020-01-20 17:42:52 +01:00
'modules::blog' => 'Blog (data)',
'modules::euler' => 'Project Euler (data)',
'modules::books' => 'Books (data)',
'modules::extgitgraph' => 'ExtendedGitGraph (data)',
'modules::programs' => 'Programs (data)',
'modules::adventofcode' => 'Advent of Code (data)',
'modules::anstatistics' => 'AlephNote Stats (data)',
'modules::updateslog' => 'Program Updates (data)',
'modules::webapps' => 'Webapps (data)',
'modules::highscores' => 'Highscores (data)',
Add check-db to egg and save parents as json-objects
2022-10-20 14:56:27 +02:00
'egg::db-check' => 'ExtendedGitGraph (db-check)',
'backend::git' => 'Git Repository',
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
];
private $methods = [];
public function __construct()
{
$this->init();
}
private function init()
{
$this->addMethodPathStatus("web::main::index-1", 200, '');
$this->addMethodPathStatus("web::main::index-2", 200, '/index');
$this->addMethodPathStatus("web::main::index-3", 200, '/index.php');
$this->addMethodPathStatus("web::main::index-4", 200, '/msmain/index');
$this->addMethodPathStatus("web::main::about-1", 200, '/about');
$this->addMethodPathStatus("web::main::about-2", 200, '/msmain/about');
$this->addMethodPathStatus("web::main::login-1", 200, '/login');
$this->addMethodPathStatus("web::main::404-1", 404, '/asdf');
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->addHTTPSRedirect( "web::main::redirect-1", '');
$this->addHTTPSRedirect( "web::main::redirect-2", '/about');
more direct server fixes
2020-01-20 18:11:33 +01:00
$this->addHTTPSRedirect( "web::main::redirect-3", '/about');
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$this->addMethodPathStatus( "web::programs::programs-list-1", 200, '/programs');
$this->addMethodPathStatus( "web::programs::programs-list-2", 200, '/programs/index');
$this->addMethodPathStatus( "web::programs::programs-list-3", 200, '/downloads/details.php');
$this->addMethodPathStatus( "web::programs::programs-list-4", 200, '/downloads/downloads.php');
$this->addMethodMultiPathStatus("web::programs::programs-filtered-1", 200, '/programs/index?categoryfilter={0}', function(){ return array_key_map_unique(Website::inst()->modules->Programs()->listAll(), 'category'); });
$this->addMethodMultiPathStatus("web::programs::programs-filtered-2", 200, '/programs/cat/{0}', function(){ return array_key_map_unique(Website::inst()->modules->Programs()->listAll(), 'category'); });
$this->addMethodMultiPathStatus("web::programs::programs-show-1", 200, '/programs/view/{0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'internal_name'); });
$this->addMethodMultiPathStatus("web::programs::programs-show-2", 200, '/programs/view?id={0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'internal_name'); });
$this->addMethodMultiPathStatus("web::programs::programs-show-3", 200, '{0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'url'); });
$this->addMethodPathStatus( "web::programs::programs-404-1", 404, '/programs/view/asdf_not_found');
$this->addMethodPathStatus( "web::programs::programs-404-2", 404, '/programs/download/asdf_not_found');
move ext link check to own selftest cat
2020-01-20 19:04:39 +01:00
$this->addMethodMultiPathStatus("web::programs-dl::programs-download-1", 302, '/downloads/{0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'internal_name'); });
$this->addMethodMultiPathStatus("web::programs-dl::programs-download-2", 302, '/programs/download/{0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'internal_name'); });
$this->addMethodMultiPathStatus("web::programs-dl::programs-download-3", 302, '/programs/download?id={0}', function(){ return array_key_map(Website::inst()->modules->Programs()->listAll(), 'internal_name'); });
$this->addMethodExtProgLinks( "web::programs-ext::programs-ext-links");
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$this->addMethodPathStatus( "web::books::books-list-1", 200, '/books');
$this->addMethodPathStatus( "web::books::books-list-2", 200, '/books/list');
$this->addMethodMultiPathStatus("web::books::books-show-1", 200, '/books/view/{0}', function(){ return array_key_map(Website::inst()->modules->Books()->listAll(), 'id'); });
$this->addMethodMultiPathStatus("web::books::books-show-2", 200, '{0}', function(){ return array_key_map(Website::inst()->modules->Books()->listAll(), 'url'); });
$this->addMethodPathStatus( "web::books::books-404-1", 404, '/books/view/asdf/not_found');
$this->addMethodPathStatus( "web::blog::blog-list-1", 200, '/blog');
$this->addMethodPathStatus( "web::blog::blog-list-2", 200, '/log');
$this->addMethodPathStatus( "web::blog::blog-list-3", 200, '/blogpost/index');
$this->addMethodMultiPathStatus("web::blog::blog-show-1", 200, '/blog/{0}', function(){ return array_key_map(Website::inst()->modules->Blog()->listAll(), 'id'); });
$this->addMethodMultiPathStatus("web::blog::blog-show-2", 200, '/log/{0}', function(){ return array_key_map(Website::inst()->modules->Blog()->listAll(), 'id'); });
$this->addMethodMultiPathStatus("web::blog::blog-show-3", 200, '/blogpost/view?id={0}', function(){ return array_key_map(Website::inst()->modules->Blog()->listAll(), 'id'); });
$this->addMethodMultiPathStatus("web::blog::blog-show-4", 200, '{0}', function(){ return array_key_map(Website::inst()->modules->Blog()->listAll(), 'url'); });
$this->addMethodPathStatus( "web::blog::blog-404-1", 404, '/blog/999999');
$this->addMethodPathStatus( "web::blog::blog-404-2", 404, '/blog/999999/Notfound');
$this->addMethodPathStatus( "web::blog::blog-404-3", 404, '/blog/asdf');
$this->addMethodPathStatus("web::webapps::webapps-list-1", 200, '/webapps');
$this->addMethodPathStatus( "web::euler::euler-list-1", 200, '/blog/1/Project_Euler_with_Befunge');
$this->addMethodMultiPathStatus("web::euler::euler-show-1", 200, '{0}', function(){ return array_key_map(Website::inst()->modules->Euler()->listAll(), 'url'); });
$this->addMethodPathStatus( "web::euler::euler-404-1", 404, '/blog/1/Project_Euler_with_Befunge/problem-A');
$this->addMethodPathStatus( "web::euler::euler-404-2", 404, '/blog/1/Project_Euler_with_Befunge/problem-99999');
$this->addMethodPathStatus( "web::euler::euler-404-3", 404, '/blog/1/Project_Euler_with_Befunge/asdf');
more dynamic header
2020-01-20 21:13:26 +01:00
$this->addMethodMultiPathStatus("web::aoc::aoc-list-1", 200, '{0}', function(){ return array_map(function($x){return Website::inst()->modules->AdventOfCode()->getURLForYear($x);},Website::inst()->modules->AdventOfCode()->listYears()); });
$this->addMethodMultiPathStatus("web::aoc::aoc-show-1", 200, '{0}', function(){ return array_key_map(Website::inst()->modules->AdventOfCode()->listAllDays(), 'url'); });
$this->addMethodPathStatus( "web::aoc::aoc-404-1", 404, '/blog/25/Advent_of_Code_2017/day-26');
$this->addMethodPathStatus( "web::aoc::aoc-404-2", 404, '/blog/23/Advent_of_Code_2018/day-27');
$this->addMethodPathStatus( "web::aoc::aoc-404-3", 404, '/blog/24/Advent_of_Code_2019/day-28');
$this->addMethodMultiPathStatus("web::aoc::aoc-redirect-1", 302, '{0}', function(){ return array_key_map(Website::inst()->modules->AdventOfCode()->listAllDays(), 'url-alternative'); });
$this->addMethodMultiPathStatus("web::aoc::aoc-redirect-1", 302, '/adventofcode/{0}', function(){ return Website::inst()->modules->AdventOfCode()->listYears(); });
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$this->addCheckConsistency("modules::database::database-check-consistency", function(){ return Website::inst()->modules->Database(); });
$this->addCheckConsistency("modules::blog::blog-check-consistency", function(){ return Website::inst()->modules->Blog(); });
$this->addCheckConsistency("modules::euler::euler-check-consistency", function(){ return Website::inst()->modules->Euler(); });
$this->addCheckConsistency("modules::books::books-check-consistency", function(){ return Website::inst()->modules->Books(); });
$this->addCheckConsistency("modules::extgitgraph::extgitgraph-check-consistency", function(){ return Website::inst()->modules->ExtendedGitGraph(); });
$this->addCheckConsistency("modules::programs::programs-check-consistency", function(){ return Website::inst()->modules->Programs(); });
$this->addCheckConsistency("modules::books::books-check-consistency", function(){ return Website::inst()->modules->Books(); });
$this->addCheckConsistency("modules::adventofcode::adventofcode-check-consistency", function(){ return Website::inst()->modules->AdventOfCode(); });
$this->addCheckConsistency("modules::anstatistics::anstatistics-check-consistency", function(){ return Website::inst()->modules->AlephNoteStatistics(); });
$this->addCheckConsistency("modules::updateslog::updateslog-check-consistency", function(){ return Website::inst()->modules->UpdatesLog(); });
$this->addCheckConsistency("modules::webapps::webapps-check-consistency", function(){ return Website::inst()->modules->WebApps(); });
$this->addCheckConsistency("modules::highscores::highscores-check-consistency", function(){ return Website::inst()->modules->Highscores(); });
Add check-db to egg and save parents as json-objects
2022-10-20 14:56:27 +02:00
$this->addLambdaStatus("egg::db-check::check-db-consistency", function(){ return Website::inst()->modules->ExtendedGitGraph()->checkDatabaseConsistency(); });
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$ajaxsecret = Website::inst()->config['ajax_secret'];
$this->addMethodPathResponse( "api::default::base-test-2", 200, '{}', '/api/test');
$this->addMethodPathResponse( "api::default::base-test-4", 200, '{}', '/api/base::test');
$this->addMethodMultiPathStatus("api::default::updatecheck-1", 200, '/update.php?name={0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-2", 200, '/update.php/{0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-3", 200, '/update?name={0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-4", 200, '/update/{0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-5", 200, '/update2?name={0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-6", 200, '/api/update?name={0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
$this->addMethodMultiPathStatus("api::default::updatecheck-7", 200, '/api/update/{0}', function(){ return array_keys(Website::inst()->modules->UpdatesLog()->listUpdateData()); });
and more selftest fixes... ...
2020-01-20 18:42:39 +01:00
$this->addMethodPathStatus( "api::default::egg-status", 200, "/api/extendedgitgraph::status?secret=$ajaxsecret");
$this->addMethodPathStatus( "api::default::an-show", 200, "/api/alephnote::show?secret=$ajaxsecret");
and more selftest fixes... ... ...
2020-01-20 18:47:06 +01:00
$this->addMethodMultiPathStatus("api::default::updates-show", 200, "/api/updates::show?secret=$ajaxsecret&ulname={0}", function(){ return array_key_map(Website::inst()->modules->UpdatesLog()->listProgramsInformation(), 'name'); });
and more selftest fixes... ... ... ...
2020-01-20 18:49:28 +01:00
$this->addMethodPathStatus( "api::default::aoc-ajax-1", 200, "/api/html::panel_aoc_calendar?year=2017&nav=true&linkheader=true&ajax=true&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-2", 200, "/api/html::panel_aoc_calendar?year=2018&nav=true&linkheader=true&ajax=true&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-3", 200, "/api/html::panel_aoc_calendar?year=2019&nav=true&linkheader=true&ajax=true&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-4", 200, "/api/html::panel_aoc_calendar?year=2019&nav=false&linkheader=true&ajax=true&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-5", 200, "/api/html::panel_aoc_calendar?year=2019&nav=true&linkheader=false&ajax=true&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-6", 200, "/api/html::panel_aoc_calendar?year=2019&nav=true&linkheader=true&ajax=false&frameid=x");
$this->addMethodPathStatus( "api::default::aoc-ajax-7", 200, "/api/html::panel_aoc_calendar?year=2019&nav=false&linkheader=false&ajax=false&frameid=x");
and more selftest fixes... ... ... ... ...
2020-01-20 18:58:26 +01:00
$this->addMethodPathStatus( "api::default::api-404-1", 404, '/api/update/no_prog_xx');
$this->addMethodPathStatus( "api::default::api-404-2", 404, '/api/asdf::notfound');
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$this->addMethodPathStatus( "api::highscore::listgames-1", 200, "/highscores/list.php");
$this->addMethodPathStatus( "api::highscore::listgames-2", 200, "/highscores/list");
$this->addMethodPathStatus( "api::highscore::listgames-3", 200, "/highscores/listgames");
$this->addMethodMultiPathStatus("api::highscore::listentries-1", 200, "/highscores/list.php?gameid={0}", function(){ return [1,2,3,4,5,6]; });
$this->addMethodMultiPathStatus("api::highscore::listentries-2", 200, "/highscores/list?gameid={0}", function(){ return [1,2,3,4,5,6]; });
$this->addMethodMultiPathStatus("api::highscore::listentries-3", 200, "/highscores/listentries?gameid={0}", function(){ return [1,2,3,4,5,6]; });
$this->addMethodMultiPathStatus("api::highscore::top50-1", 200, "/highscores/list_top50.php?gameid={0}", function(){ return [1,2,3,4,5,6]; });
$this->addMethodMultiPathStatus("api::highscore::top50-2", 200, "/highscores/list_top50?gameid={0}", function(){ return [1,2,3,4,5,6]; });
$this->addMethodGitStatusCheck("backend::git::git-status");
}
/** @noinspection PhpUnhandledExceptionInspection */
public function listMethodGroups()
{
$data = [];
foreach ($this->methods as $method)
{
$parts = explode('::', $method['name']);
if (count($parts) !== 3) throw new Exception();
$data []= ($parts[0] . '::' . $parts[1]);
}
$data = array_unique($data);
$result = [];
foreach ($data as $d)
{
$result []=
[
'name' => key_exists($d, self::DISPLAY_NAMES) ? self::DISPLAY_NAMES[$d] : $d,
'filter' => $d.'::*',
do not run expensive selftest on every /admin site visit
2020-12-02 09:06:10 +01:00
'base' => $d,
'root' => explode('::', $d)[0],
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
];
}
finished selftest module
2020-01-20 17:42:52 +01:00
sort($result);
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
return $result;
}
private function addMethodPathStatus(string $name, int $status, string $path)
{
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $path, $status)
{
$xname = explode('::', $name)[2];
try
{
continue working on selftest
2020-01-19 13:16:40 +01:00
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed: curl requests in dev mode prohibited',
'long' => null,
'exception' => null,
];
more direct server fixes
2020-01-20 18:11:33 +01:00
$url = 'https://' . $_SERVER['HTTP_HOST'] . $path;
$r = curl_http_request($url);
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
if ($r['statuscode'] === $status) return
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
[
'result' => self::STATUS_OK,
'message' => "{".$xname."} succeeded",
'long' => null,
'exception' => null,
];
return
[
'result' => self::STATUS_ERROR,
'message' => '{'.$xname.'} failed: Request returned wrong statuscode',
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
'long' => 'Wrong HTTP Statuscode (Expected: ['.$status.']; Found: ['.$r['statuscode'].'])' . "\n" .
"URL: $url\n".
"Redirect: " . $r['redirect'] . "\n" .
"Response:\n" . $r['output'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
'exception' => null,
];
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
continue working on selftest
2020-01-19 13:16:40 +01:00
'long' => str_max_len($e->getMessage(), 48),
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
'exception' => $e,
];
}
}
];
}
private function addMethodMultiPathStatus(string $name, int $status, string $path, Closure $supplier)
{
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $path, $status, $supplier)
{
$xname = explode('::', $name)[2];
try
{
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed: curl requests in dev mode prohibited',
'long' => null,
'exception' => null,
];
$supdata = $supplier();
$message = '';
$count = 0;
show long error message in selftest admin panel
2020-01-20 20:44:39 +01:00
$i = 0;
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
foreach ($supdata as $d)
{
show long error message in selftest admin panel
2020-01-20 20:44:39 +01:00
$i++;
$sxname = $xname . '-' . $i;
more direct server fixes
2020-01-20 18:11:33 +01:00
$url = 'https://' . $_SERVER['HTTP_HOST'] . str_replace('{0}', $d, $path);
better error messages in selftest
2020-01-20 18:00:30 +01:00
$r = curl_http_request($url);
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$count++;
show long error message in selftest admin panel
2020-01-20 20:44:39 +01:00
if ($r['statuscode'] === $status) { $message .= " {".$sxname."} succeeded" . "\n"; continue; }
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
return
[
'result' => self::STATUS_ERROR,
show long error message in selftest admin panel
2020-01-20 20:44:39 +01:00
'message' => '{'.$sxname.'} failed: Request returned wrong statuscode',
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
'long' => 'Wrong HTTP Statuscode (Expected: ['.$status.']; Found: ['.$r['statuscode'].'])' . "\n".
"URL: $url\n".
"Redirect: " . $r['redirect'] . "\n" .
"Response:\n" . $r['output'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
return
[
'result' => self::STATUS_OK,
show long error message in selftest admin panel
2020-01-20 20:44:39 +01:00
'message' => "$count requests succeeded\n" . trim($message, "\n"),
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'long' => null,
'exception' => null,
];
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
'long' => str_max_len($e->getMessage(), 48),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
private function addCheckConsistency(string $name, Closure $moduleSupplier)
{
continue working on selftest
2020-01-19 13:16:40 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $moduleSupplier)
{
try
{
/** @var IWebsiteModule $module */
$module = $moduleSupplier();
$consistency = $module->checkConsistency();
if ($consistency['result'] === 'err') return
[
'result' => self::STATUS_ERROR,
'message' => $consistency['message'],
'long' => isset($consistency['long']) ? $consistency['long'] : null,
'exception' => null,
];
if ($consistency['result'] === 'warn') return
[
'result' => self::STATUS_WARN,
'message' => $consistency['message'],
'long' => isset($consistency['long']) ? $consistency['long'] : null,
'exception' => null,
];
if ($consistency['result'] === 'ok') return
[
'result' => self::STATUS_OK,
'message' => 'OK',
'long' => isset($consistency['long']) ? $consistency['long'] : null,
'exception' => null,
];
throw new Exception("Unknown result: " . print_r($consistency, true));
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => str_max_len($e->getMessage(), 48),
'long' => formatException($e),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
Add check-db to egg and save parents as json-objects
2022-10-20 14:56:27 +02:00
private function addLambdaStatus(string $name, Closure $fun)
{
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $fun)
{
try
{
$result = $fun();
if (empty($result)) return
[
'result' => self::STATUS_OK,
'message' => 'OK',
'long' => 'Okay',
'exception' => null,
];
if (isset($result['result']) && isset($result['message'])) {
if ($result['result'] === 'err') return
[
'result' => self::STATUS_ERROR,
'message' => $result['message'],
'long' => isset($result['long']) ? $result['long'] : null,
'exception' => null,
];
if ($result['result'] === 'warn') return
[
'result' => self::STATUS_WARN,
'message' => $result['message'],
'long' => isset($result['long']) ? $result['long'] : null,
'exception' => null,
];
if ($result['result'] === 'ok') return
[
'result' => self::STATUS_OK,
'message' => 'OK',
'long' => isset($result['long']) ? $result['long'] : null,
'exception' => null,
];
}
if (is_array($result) && is_string($result[0])) {
return
[
'result' => self::STATUS_ERROR,
'message' => count($result) . " errors occured",
'long' => implode("\n", $result),
'exception' => null,
];
}
throw new Exception("Unknown result: " . print_r($result, true));
}
catch (Throwable $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => str_max_len($e->getMessage(), 48),
'long' => formatException($e),
'exception' => $e,
];
}
}
];
}
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
private function addMethodPathResponse(string $name, int $status, string $json_expected, string $path)
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
{
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $path, $status, $json_expected)
{
$xname = explode('::', $name)[2];
try
{
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed: curl requests in dev mode prohibited',
'long' => null,
'exception' => null,
];
and more selftest fixes...
2020-01-20 18:36:33 +01:00
$url = 'https://' . $_SERVER['HTTP_HOST'] . $path;
better error messages in selftest
2020-01-20 18:00:30 +01:00
$r = curl_http_request($url);
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
if ($r['statuscode'] !== $status)
{
return
[
'result' => self::STATUS_ERROR,
'message' => '{'.$xname.'} failed: Request returned wrong statuscode',
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
'long' => 'Wrong HTTP Statuscode (Expected: ['.$status.']; Found: ['.$r['statuscode'].'])' . "\n".
"URL: $url\n" .
"Response:\n" . $r['output'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
$jj_found = json_encode(json_decode($r['output']));
$jj_expected = json_encode(json_decode($json_expected));
if ($jj_found !== $jj_expected)
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
{
return
[
'result' => self::STATUS_ERROR,
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
'message' => '{'.$xname.'} failed: Request returned wrong response',
'long' => "Wrong HTTP Response\n".
"Expected:\n$json_expected\n".
"Found:\n".$r['output'] . "\n".
"URL: $url\n" .
"HTTP Statuscode:\n" . $r['statuscode'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
return
[
'result' => self::STATUS_OK,
'message' => "{".$xname."} succeeded",
'long' => null,
'exception' => null,
];
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
'long' => str_max_len($e->getMessage(), 48),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
private function addMethodGitStatusCheck(string $name)
{
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name)
{
$xname = explode('::', $name)[2];
try
{
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed in dev mode',
'long' => null,
'exception' => null,
];
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
$r = shell_exec('git status 2>&1');
$ok = ($r !== null) && (strpos($r, 'Your branch is up to date with') !== false) && (strpos($r, 'nothing to commit, working tree clean') !== false);
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
if (!$ok)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed",
'long' => $r,
'exception' => null,
];
}
else
{
return
[
'result' => self::STATUS_OK,
'message' => "{".$xname."} succeeded",
'long' => $r,
'exception' => null,
];
}
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
'long' => str_max_len($e->getMessage(), 48),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
private function addMethodExtProgLinks(string $name)
{
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name)
{
$xname = explode('::', $name)[2];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
finished selftest module
2020-01-20 17:42:52 +01:00
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed: curl requests in dev mode prohibited',
'long' => null,
'exception' => null,
];
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
try
{
$message = '';
$count = 0;
foreach (Website::inst()->modules->Programs()->listAll() as $prog)
{
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
foreach ($prog['urls'] as $urlname => $urlobj)
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
{
$url = $urlobj;
if (is_array($urlobj)) $url = $urlobj['url'];
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
if ($url === 'direct') continue;
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$r = curl_http_request($url);
$count++;
and more selftest fixes...
2020-01-20 18:36:33 +01:00
if ($r['statuscode'] === 200 || $r['statuscode'] === 301 || $r['statuscode'] === 302) { $message .= "[".$prog['name']."] Request to '$url' succeeded" . "\n"; continue; }
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
Allow 403 (check-browser) response from alternative.to in check func
2022-10-20 16:21:48 +02:00
if ($r['statuscode'] === 403 && $urlname === 'alternativeto') { $message .= "[".$prog['name']."] Request to '$url' succeeded (alternative.to | 403)" . "\n"; continue; }
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
return
[
'result' => self::STATUS_ERROR,
'message' => '['.$prog['name'].'] failed: Request to returned wrong statuscode',
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
'long' => 'Wrong HTTP Statuscode from "'.$url.'"' . "\n".
and more selftest fixes...
2020-01-20 18:36:33 +01:00
"Expected: [200|301|302]\n".
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
"Found: [".$r['statuscode'].']' . "\n" .
"Response:\n" . $r['output'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
}
return
[
'result' => self::STATUS_OK,
'message' => "$count requests succeeded\n" . $message,
'long' => null,
'exception' => null,
];
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
'long' => str_max_len($e->getMessage(), 48),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
private function addHTTPSRedirect(string $name, string $path)
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
{
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$this->methods []=
[
'name' => $name,
'func' => function() use ($name, $path)
{
$xname = explode('::', $name)[2];
try
{
if (!Website::inst()->isProd()) return
[
'result' => self::STATUS_WARN,
'message' => '{'.$xname.'} not executed: curl requests in dev mode prohibited',
'long' => null,
'exception' => null,
];
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
$url1 = 'http://' . $_SERVER['HTTP_HOST'] . $path;
$url2 = 'https://' . $_SERVER['HTTP_HOST'] . $path;
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$r = curl_http_request($url1);
and more selftest fixes... ...
2020-01-20 18:42:39 +01:00
if ($r['statuscode'] !== 301)
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
{
return
[
'result' => self::STATUS_ERROR,
'message' => '{'.$xname.'} failed: Request returned wrong statuscode',
and more selftest fixes... ...
2020-01-20 18:42:39 +01:00
'long' => 'Wrong HTTP Statuscode (Expected: [301]; Found: ['.$r['statuscode'].'])' . "\n".
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
"URL: $url1 >> $url2\n" .
"Response:\n" . $r['output'] . "\n" .
"Redirect:\n" . $r['redirect'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
and more selftest fixes... ... ... ... ...
2020-01-20 18:58:26 +01:00
if (rtrim($r['redirect'], "/\t \n#") !== rtrim($url2, "/\t \n#"))
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
{
return
[
'result' => self::STATUS_ERROR,
'message' => '{'.$xname.'} failed: Request returned wrong redirect',
and more selftest fixes... ... ... ... ...
2020-01-20 18:58:26 +01:00
'long' => "Wrong Redirect URL\n" .
'Expected: "'.$url2.'"' . "\n" .
'Found: "'.$r['redirect'].'")' . "\n" .
more fixes for baseclass-branch changes
2020-01-20 18:28:31 +01:00
"Response:\n" . $r['output'] . "\n" .
"Redirect:\n" . $r['redirect'] . "\n".
"Error [" . $r['errnum'] . "]:\n" . $r['errstr'],
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
'exception' => null,
];
}
return
[
'result' => self::STATUS_OK,
'message' => "{".$xname."} succeeded",
'long' => null,
'exception' => null,
];
}
catch (Exception $e)
{
return
[
'result' => self::STATUS_ERROR,
'message' => "{$xname} failed: " . $e->getMessage(),
'long' => str_max_len($e->getMessage(), 48),
'exception' => $e,
];
}
}
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
}
public function run($filter)
{
$rex = '/^' . str_replace('*', '([^:]*)', $filter) . '$/';
$fullmessage = '';
continue working on selftest
2020-01-19 13:16:40 +01:00
$fullwarnmessage = '';
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
continue working on selftest
2020-01-19 13:16:40 +01:00
$warnings = 0;
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$count = 0;
foreach ($this->methods as $method)
{
if (!preg_match($rex, $method['name'])) continue;
continue working on selftest (2)
2020-01-19 17:30:47 +01:00
$r = $method['func']();
continue working on selftest
2020-01-19 13:16:40 +01:00
if ($r['result'] === self::STATUS_ERROR) return $r;
if ($r['result'] === self::STATUS_WARN) { $warnings++; $fullwarnmessage .= $r['message'] . "\n"; }
$fullmessage .= $r['message'] . "\n";
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
$count++;
}
continue working on selftest
2020-01-19 13:16:40 +01:00
if ($warnings > 0)
{
return
[
'result' => self::STATUS_WARN,
'message' => "$warnings/$count methods had warnings",
'long' => $fullwarnmessage,
'exception' => null,
];
}
if ($count === 0) return
[
'result' => self::STATUS_WARN,
'message' => "No methods matched filter",
'long' => null,
'exception' => null,
];
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
return
[
'result' => self::STATUS_OK,
continue working on selftest
2020-01-19 13:16:40 +01:00
'message' => "OK",
'long' => "$count methods succeeded\n\n" . $fullmessage,
selftest on admin page (WIP)
2020-01-19 01:22:06 +01:00
'exception' => null,
];
}
continue working on selftest
2020-01-19 13:16:40 +01:00
public function checkConsistency()
{
return ['result'=>'ok', 'message' => ''];
}
small fixes in selftest
2020-01-20 17:59:16 +01:00
}
Copy Permalink