Update DB\IO and do not print call steck on DB_INFO calls

just wrapper around array_diff

www/admin/class_test.admin.backend.php

@@ -55,7 +55,25 @@ print '<div><h1>' . $PAGE_NAME . '</h1></div>';
 print "SETACL[]: <br>";
 $backend->setACL(['EMPTY' => 'EMPTY']);
 print "ADBEDITLOG: <br>";
-$backend->adbEditLog('CLASSTEST-ADMIN', 'Some info string');
+$backend->adbEditLog('CLASSTEST-ADMIN-BINARY', 'Some info string', 'BINARY');
+$backend->adbEditLog('CLASSTEST-ADMIN-ZLIB', 'Some info string', 'ZLIB');
+$backend->adbEditLog('CLASSTEST-ADMIN-SERIAL', 'Some info string', 'SERIAL');
+$backend->adbEditLog('CLASSTEST-ADMIN-INVALID', 'Some info string', 'INVALID');
+// test with various
+$backend->action = 'TEST ACTION';
+$backend->action_id = 'TEST ACTION ID';
+$backend->action_yes = 'TEST ACTION YES';
+$backend->action_flag = 'TEST ACTION FLAG';
+$backend->action_menu = 'TEST ACTION MENU';
+$backend->action_loaded = 'TEST ACTION LOADED';
+$backend->action_value = 'TEST ACTION VALUE';
+$backend->action_type = 'TEST ACTION TYPE';
+$backend->action_error = 'TEST ACTION ERROR';
+$backend->adbEditLog('CLASSTEST-ADMIN-JSON', [
+	"_GET" => $_GET,
+	"_POST" => $_POST,
+], 'JSON');
+
 print "ADBTOPMENU(0): " . Support::printAr($backend->adbTopMenu(CONTENT_PATH)) . "<br>";
 print "ADBMSG: <br>";
 $backend->adbMsg('info', 'Message: %1$d', [1]);

www/lib/CoreLibs/Admin/Backend.php

@@ -31,6 +31,8 @@ declare(strict_types=1);
 
 namespace CoreLibs\Admin;
 
+use CoreLibs\Convert\Json;
+
 class Backend
 {
 	// page name
@@ -42,7 +44,7 @@ class Backend
 	/** @var array<string> */
 	public array $action_list = [
 		'action', 'action_id', 'action_sub_id', 'action_yes', 'action_flag',
-		'action_menu', 'action_value', 'action_error', 'action_loaded'
+		'action_menu', 'action_value', 'action_type', 'action_error', 'action_loaded'
 	];
 	/** @var string */
 	public string $action;
@@ -61,20 +63,31 @@ class Backend
 	/** @var string */
 	public string $action_value;
 	/** @var string */
+	public string $action_type;
+	/** @var string */
 	public string $action_error;
+
 	// ACL array variable if we want to set acl data from outisde
 	/** @var array<mixed> */
 	public array $acl = [];
 	/** @var int */
 	public int $default_acl;
+
 	// queue key
 	/** @var string */
 	public string $queue_key;
+
+	/** @var array<string> list of allowed types for edit log write */
+	private const WRITE_TYPES = ['BINARY', 'BZIP2', 'LZIP', 'STRING', 'SERIAL', 'JSON'];
+	/** @var array<string> list of available write types for log */
+	private array $write_types_available = [];
+
 	// the current active edit access id
 	/** @var int|null */
 	public int|null $edit_access_id;
 	/** @var string */
 	public string $page_name;
+
 	// error/warning/info messages
 	/** @var array<mixed> */
 	public array $messages = [];
@@ -84,6 +97,7 @@ class Backend
 	public bool $warning = false;
 	/** @var bool */
 	public bool $info = false;
+
 	// internal lang & encoding vars
 	/** @var string */
 	public string $lang_dir = '';
@@ -95,6 +109,7 @@ class Backend
 	public string $domain;
 	/** @var string */
 	public string $encoding;
+
 	/** @var \CoreLibs\Logging\Logging logger */
 	public \CoreLibs\Logging\Logging $log;
 	/** @var \CoreLibs\DB\IO database */
@@ -103,6 +118,7 @@ class Backend
 	public \CoreLibs\Language\L10n $l;
 	/** @var \CoreLibs\Create\Session session class */
 	public \CoreLibs\Create\Session $session;
+
 	// smarty publics [end processing in smarty class]
 	/** @var array<mixed> */
 	public array $DATA = [];
@@ -175,6 +191,9 @@ class Backend
 		if (preg_match("/^(add|save|delete|remove|move|up|down|push_live)$/", $this->action ?? '')) {
 			$this->queue_key = \CoreLibs\Create\RandomKey::randomKeyGen(3);
 		}
+
+		// check what edit log data write types are allowed
+		$this->adbSetEditLogWriteTypeAvailable();
 	}
 
 	/**
@@ -185,7 +204,26 @@ class Backend
 		// NO OP
 	}
 
-	// PUBLIC METHODS |=================================================>
+	// MARK: PRIVATE METHODS
+
+	/**
+	 * set the write types that are allowed
+	 *
+	 * @return void
+	 */
+	private function adbSetEditLogWriteTypeAvailable()
+	{
+		// check what edit log data write types are allowed
+		$this->write_types_available = self::WRITE_TYPES;
+		if (!function_exists('bzcompress')) {
+			$this->write_types_available = array_diff($this->write_types_available, ['BINARY', 'BZIP']);
+		}
+		if (!function_exists('gzcompress')) {
+			$this->write_types_available = array_diff($this->write_types_available, ['LZIP']);
+		}
+	}
+
+	// MARK: PUBLIC METHODS |=================================================>
 
 	/**
 	 * set internal ACL from login ACL
@@ -223,27 +261,69 @@ class Backend
 	/**
 	 * writes all action vars plus other info into edit_log table
 	 *
-	 * @param  string              $event      any kind of event description,
+	 * @param  string              $event [default='']        any kind of event description,
-	 * @param  string|array<mixed> $data       any kind of data related to that event
+	 * @param  string|array<mixed> $data [default='']         any kind of data related to that event
-	 * @param  string              $write_type write type can bei STRING or BINARY
+	 * @param  string              $write_type [default=JSON] write type can be
-	 * @param  string|null         $db_schema  override target schema
+	 *                                                        JSON, STRING/SERIEAL, BINARY/BZIP or ZLIB
+	 * @param  string|null         $db_schema [default=null]  override target schema
 	 * @return void
 	 */
 	public function adbEditLog(
 		string $event = '',
 		string|array $data = '',
-		string $write_type = 'STRING',
+		string $write_type = 'JSON',
 		?string $db_schema = null
 	): void {
 		$data_binary = '';
 		$data_write = '';
-		if ($write_type == 'BINARY') {
+		// check if write type is valid, if not fallback to JSON
-			$data_binary = $this->db->dbEscapeBytea((string)bzcompress(serialize($data)));
+		if (!in_array($write_type, $this->write_types_available)) {
-			$data_write = 'see bzip compressed data_binary field';
+			$this->log->warning('Write type not in allowed array, fallback to JSON', context:[
+				"write_type" => $write_type,
+				"write_list" => $this->write_types_available,
+			]);
+			$write_type = 'JSON';
 		}
-		if ($write_type == 'STRING') {
+		switch ($write_type) {
-			$data_binary = '';
+			case 'BINARY':
-			$data_write = $this->db->dbEscapeString(serialize($data));
+			case 'BZIP':
+				$data_binary = $this->db->dbEscapeBytea((string)bzcompress(serialize($data)));
+				$data_write = Json::jsonConvertArrayTo([
+					'type' => 'BZIP',
+					'message' => 'see bzip compressed data_binary field'
+				]);
+				break;
+			case 'ZLIB':
+				$data_binary = $this->db->dbEscapeBytea((string)gzcompress(serialize($data)));
+				$data_write = Json::jsonConvertArrayTo([
+					'type' => 'ZLIB',
+					'message' => 'see zlib compressed data_binary field'
+				]);
+				break;
+			case 'STRING':
+			case 'SERIAL':
+				$data_binary = $this->db->dbEscapeBytea(Json::jsonConvertArrayTo([
+					'type' => 'SERIAL',
+					'message' => 'see serial string data field'
+				]));
+				$data_write = serialize($data);
+				break;
+			case 'JSON':
+				$data_binary = $this->db->dbEscapeBytea(Json::jsonConvertArrayTo([
+					'type' => 'JSON',
+					'message' => 'see json string data field'
+				]));
+				// must be converted to array
+				if (!is_array($data)) {
+					$data = ["data" => $data];
+				}
+				$data_write = Json::jsonConvertArrayTo($data);
+				break;
+			default:
+				$this->log->alert('Invalid type for data compression was set', context:[
+					"write_type" => $write_type
+				]);
+				break;
 		}
 
 		/** @var string $DB_SCHEMA check schema */
@@ -253,44 +333,62 @@ class Backend
 		} elseif (!empty($this->db->dbGetSchema())) {
 			$DB_SCHEMA = $this->db->dbGetSchema();
 		}
-		$q = "INSERT INTO " . $DB_SCHEMA . ".edit_log "
+		$q = <<<SQL
-			. "(euid, event_date, event, data, data_binary, page, "
+		INSERT INTO {DB_SCHEMA}.edit_log (
-			. "ip, user_agent, referer, script_name, query_string, server_name, http_host, "
+			euid, event_date, event, data, data_binary, page,
-			. "http_accept, http_accept_charset, http_accept_encoding, session_id, "
+			ip, user_agent, referer, script_name, query_string, server_name, http_host,
-			. "action, action_id, action_yes, action_flag, action_menu, action_loaded, action_value, action_error) "
+			http_accept, http_accept_charset, http_accept_encoding, session_id,
-			. "VALUES "
+			action, action_id, action_yes, action_flag, action_menu, action_loaded,
-			. "(" . $this->db->dbEscapeString(isset($_SESSION['EUID']) && is_numeric($_SESSION['EUID']) ?
+			action_value, action_type, action_error
-				$_SESSION['EUID'] :
+		) VALUES (
-				'NULL')
+			$1, NOW(), $2, $3, $4, $5,
-			. ", "
+			$6, $7, $8, $9, $10, $11, $12,
-			. "NOW(), "
+			$13, $14, $15, $16,
-			. "'" . $this->db->dbEscapeString((string)$event) . "', "
+			$17, $18, $19, $20, $21, $22,
-			. "'" . $data_write . "', "
+			$23, $24, $25
-			. "'" . $data_binary . "', "
+		)
-			. "'" . $this->db->dbEscapeString((string)$this->page_name) . "', "
+		SQL;
-			. "'" . ($_SERVER["REMOTE_ADDR"] ?? '') . "', "
+		$this->db->dbExecParams(
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_USER_AGENT'] ?? '') . "', "
+			str_replace(
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_REFERER'] ?? '') . "', "
+				['{DB_SCHEMA}'],
-			. "'" . $this->db->dbEscapeString($_SERVER['SCRIPT_FILENAME'] ?? '') . "', "
+				[$DB_SCHEMA],
-			. "'" . $this->db->dbEscapeString($_SERVER['QUERY_STRING'] ?? '') . "', "
+				$q
-			. "'" . $this->db->dbEscapeString($_SERVER['SERVER_NAME'] ?? '') . "', "
+			),
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_HOST'] ?? '') . "', "
+			[
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_ACCEPT'] ?? '') . "', "
+				// row 1
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_ACCEPT_CHARSET'] ?? '') . "', "
+				isset($_SESSION['EUID']) && is_numeric($_SESSION['EUID']) ?
-			. "'" . $this->db->dbEscapeString($_SERVER['HTTP_ACCEPT_ENCODING'] ?? '') . "', "
+					$_SESSION['EUID'] : null,
-			. ($this->session->getSessionId() === false ?
+				(string)$event,
-				"NULL" :
+				$data_write,
-				"'" . $this->session->getSessionId() . "'")
+				$data_binary,
-			. ", "
+				(string)$this->page_name,
-			. "'" . $this->db->dbEscapeString($this->action ?? '') . "', "
+				// row 2
-			. "'" . $this->db->dbEscapeString($this->action_id ?? '') . "', "
+				$_SERVER["REMOTE_ADDR"] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_yes ?? '') . "', "
+				$_SERVER['HTTP_USER_AGENT'] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_flag ?? '') . "', "
+				$_SERVER['HTTP_REFERER'] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_menu ?? '') . "', "
+				$_SERVER['SCRIPT_FILENAME'] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_loaded ?? '') . "', "
+				$_SERVER['QUERY_STRING'] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_value ?? '') . "', "
+				$_SERVER['SERVER_NAME'] ?? '',
-			. "'" . $this->db->dbEscapeString($this->action_error ?? '') . "')";
+				$_SERVER['HTTP_HOST'] ?? '',
-		$this->db->dbExec($q, 'NULL');
+				// row 3
+				$_SERVER['HTTP_ACCEPT'] ?? '',
+				$_SERVER['HTTP_ACCEPT_CHARSET'] ?? '',
+				$_SERVER['HTTP_ACCEPT_ENCODING'] ?? '',
+				$this->session->getSessionId() !== false ?
+					$this->session->getSessionId() : null,
+				// row 4
+				$this->action ?? '',
+				$this->action_id ?? '',
+				$this->action_yes ?? '',
+				$this->action_flag ?? '',
+				$this->action_menu ?? '',
+				$this->action_loaded ?? '',
+				$this->action_value ?? '',
+				$this->action_type ?? '',
+				$this->action_error ?? '',
+			],
+			'NULL'
+		);
 	}
 
 	/**
@@ -540,16 +638,30 @@ class Backend
 		} elseif (!empty($this->db->dbGetSchema())) {
 			$DB_SCHEMA = $this->db->dbGetSchema();
 		}
-		$q = "INSERT INTO " . $DB_SCHEMA . ".live_queue ("
+		$q = <<<SQL
-			. "queue_key, key_value, key_name, type, target, data, group_key, action, associate, file"
+		INSERT INTO {DB_SCHEMA}.live_queue (
-			. ") VALUES ("
+			queue_key, key_value, key_name, type,
-			. "'" . $this->db->dbEscapeString($queue_key) . "', '" . $this->db->dbEscapeString($key_value) . "', "
+			target, data, group_key, action, associate, file
-			. "'" . $this->db->dbEscapeString($key_name) . "', '" . $this->db->dbEscapeString($type) . "', "
+		) VALUES (
-			. "'" . $this->db->dbEscapeString($target) . "', '" . $this->db->dbEscapeString($data) . "', "
+			$1, $2, $3, $4,
-			. "'" . $this->queue_key . "', '" . $this->action . "', "
+			$5, $6, $7, $8, $9, $10
-			. "'" . $this->db->dbEscapeString((string)$associate) . "', "
+		)
-			. "'" . $this->db->dbEscapeString((string)$file) . "')";
+		SQL;
-		$this->db->dbExec($q);
+		// $this->db->dbExec($q);
+		$this->db->dbExecParams(
+			str_replace(
+				['{DB_SCHEMA}'],
+				[$DB_SCHEMA],
+				$q
+			),
+			[
+				$queue_key, $key_value,
+				$key_name, $type,
+				$target, $data,
+				$this->queue_key, $this->action,
+				(string)$associate, (string)$file
+			]
+		);
 	}
 
 	/**

www/lib/CoreLibs/Combined/ArrayHandler.php

@@ -509,6 +509,22 @@ class ArrayHandler
 		}
 		return $array;
 	}
+
+	/**
+	 * Remove entries from a simple array, will not keep key order
+	 *
+	 * any array content is allowed
+	 *
+	 * https://stackoverflow.com/a/369608
+	 *
+	 * @param  array<mixed> $array  Array where elements are located
+	 * @param  array<mixed> $remove Elements to remove
+	 * @return array<mixed>         Array with $remove elements removed
+	 */
+	public static function arrayRemoveEntry(array $array, array $remove): array
+	{
+		return array_diff($array, $remove);
+	}
 }
 
 // __END__

www/lib/CoreLibs/DB/IO.php

@@ -823,6 +823,11 @@ class IO
 				);
 				break;
 			default:
+				// no context on DB_INFO
+				if ($id == 'DB_INFO') {
+					echo "DB INFO<br>";
+					$context = [];
+				}
 				// used named arguments so we can easy change the order of debug
 				$this->log->debug(
 					group_id: $debug_id,
@@ -1814,14 +1819,13 @@ class IO
 		$html_tags = ['{b}', '{/b}', '{br}'];
 		$replace_html = ['<b>', '</b>', '<br>'];
 		$replace_text = ['', '', ' **** '];
-		$string = '';
+		$string = '{b}-DB-info->{/b} Connected to db {b}\'' . $this->db_name . '\'{/b} '
-		$string .= '{b}-DB-info->{/b} Connected to db {b}\'' . $this->db_name . '\'{/b} ';
+			. 'with schema {b}\'' . $this->db_schema . '\'{/b} '
-		$string .= 'with schema {b}\'' . $this->db_schema . '\'{/b} ';
+			. 'as user {b}\'' . $this->db_user . '\'{/b} '
-		$string .= 'as user {b}\'' . $this->db_user . '\'{/b} ';
+			. 'at host {b}\'' . $this->db_host . '\'{/b} '
-		$string .= 'at host {b}\'' . $this->db_host . '\'{/b} ';
+			. 'on port {b}\'' . $this->db_port . '\'{/b} '
-		$string .= 'on port {b}\'' . $this->db_port . '\'{/b} ';
+			. 'with ssl mode {b}\'' . $this->db_ssl . '\'{/b}{br}'
-		$string .= 'with ssl mode {b}\'' . $this->db_ssl . '\'{/b}{br}';
+			. '{b}-DB-info->{/b} DB IO Class debug output: {b}'
-		$string .= '{b}-DB-info->{/b} DB IO Class debug output: {b}'
 			. ($this->dbGetDebug() ? 'Yes' : 'No') . '{/b}';
 		if ($log === true) {
 			// if debug, remove / change b
@@ -1829,7 +1833,7 @@ class IO
 				$html_tags,
 				$replace_text,
 				$string
-			), 'dbInfo');
+			), 'DB_INFO');
 		} else {
 			$string = $string . '{br}';
 		}
@@ -1985,7 +1989,7 @@ class IO
 		if (is_array($array)) {
 			$this->nbsp = '';
 			$string .= $this->__printArray($array);
-			$this->__dbDebugMessage('db', $string, 'dbDumpData');
+			$this->__dbDebugMessage('db', $string, 'DB_INFO');
 		}
 		return $string;
 	}