- return DI::l10n()->t('Errors encountered performing database changes: ') . $message . EOL;
- }
-
- public static function writeStructure()
- {
- $tables = [];
- foreach (self::definition('') as $name => $definition) {
- $indexes = [[
- 'name' => 'Name',
- 'fields' => 'Fields',
- ],
- [
- 'name' => '-',
- 'fields' => '-',
- ]];
-
- $lengths = ['name' => 4, 'fields' => 6];
- foreach ($definition['indexes'] as $key => $value) {
- $fieldlist = implode(', ', $value);
- $indexes[] = ['name' => $key, 'fields' => $fieldlist];
- $lengths['name'] = max($lengths['name'], strlen($key));
- $lengths['fields'] = max($lengths['fields'], strlen($fieldlist));
- }
-
- array_walk_recursive($indexes, function(&$value, $key) use ($lengths)
- {
- $value = str_pad($value, $lengths[$key], $value === '-' ? '-' : ' ');
- });
-
- $foreign = [];
- $fields = [[
- 'name' => 'Field',
- 'comment' => 'Description',
- 'type' => 'Type',
- 'null' => 'Null',
- 'primary' => 'Key',
- 'default' => 'Default',
- 'extra' => 'Extra',
- ],
- [
- 'name' => '-',
- 'comment' => '-',
- 'type' => '-',
- 'null' => '-',
- 'primary' => '-',
- 'default' => '-',
- 'extra' => '-',
- ]];
- $lengths = [
- 'name' => 5,
- 'comment' => 11,
- 'type' => 4,
- 'null' => 4,
- 'primary' => 3,
- 'default' => 7,
- 'extra' => 5,
- ];
- foreach ($definition['fields'] as $key => $value) {
- $field = [];
- $field['name'] = $key;
- $field['comment'] = $value['comment'] ?? '';
- $field['type'] = $value['type'];
- $field['null'] = ($value['not null'] ?? false) ? 'NO' : 'YES';
- $field['primary'] = ($value['primary'] ?? false) ? 'PRI' : '';
- $field['default'] = $value['default'] ?? 'NULL';
- $field['extra'] = $value['extra'] ?? '';
-
- foreach ($field as $fieldName => $fieldvalue) {
- $lengths[$fieldName] = max($lengths[$fieldName] ?? 0, strlen($fieldvalue));
- }
- $fields[] = $field;
-
- if (!empty($value['foreign'])) {
- $foreign[] = [
- 'field' => $key,
- 'targettable' => array_keys($value['foreign'])[0],
- 'targetfield' => array_values($value['foreign'])[0]
- ];
- }
- }
-
- array_walk_recursive($fields, function(&$value, $key) use ($lengths)
- {
- $value = str_pad($value, $lengths[$key], $value === '-' ? '-' : ' ');
- });
-
- $tables[] = ['name' => $name, 'comment' => $definition['comment']];
- $content = Renderer::replaceMacros(Renderer::getMarkupTemplate('structure.tpl'), [
- '$name' => $name,
- '$comment' => $definition['comment'],
- '$fields' => $fields,
- '$indexes' => $indexes,
- '$foreign' => $foreign,
- ]);
- $filename = DI::basePath() . '/doc/database/db_' . $name . '.md';
- file_put_contents($filename, $content);
- }
- asort($tables);
- $content = Renderer::replaceMacros(Renderer::getMarkupTemplate('tables.tpl'), [
- '$tables' => $tables,
- ]);
- $filename = DI::basePath() . '/doc/database.md';
- file_put_contents($filename, $content);
- }
-
- public static function printStructure(string $basePath)
- {
- $database = self::definition($basePath, false);
-
- echo "-- ------------------------------------------\n";
- echo "-- " . FRIENDICA_PLATFORM . " " . FRIENDICA_VERSION . " (" . FRIENDICA_CODENAME, ")\n";
- echo "-- DB_UPDATE_VERSION " . DB_UPDATE_VERSION . "\n";
- echo "-- ------------------------------------------\n\n\n";
- foreach ($database as $name => $structure) {
- echo "--\n";
- echo "-- TABLE $name\n";
- echo "--\n";
- self::createTable($name, $structure, true, false);
-
- echo "\n";
- }
-
- View::printStructure($basePath);
- }
-
- /**
- * Loads the database structure definition from the static/dbstructure.config.php file.
- * On first pass, defines DB_UPDATE_VERSION constant.
- *
- * @see static/dbstructure.config.php
- * @param string $basePath The base path of this application
- * @param boolean $with_addons_structure Whether to tack on addons additional tables
- * @return array
- * @throws Exception
- */
- public static function definition(string $basePath, bool $with_addons_structure = true): array
- {
- if (!self::$definition) {
- if (empty($basePath)) {
- $basePath = DI::app()->getBasePath();
- }
-
- $filename = $basePath . '/static/dbstructure.config.php';
-
- if (!is_readable($filename)) {
- throw new Exception('Missing database structure config file static/dbstructure.config.php at basePath=' . $basePath);
- }
-
- $definition = require $filename;
-
- if (!$definition) {
- throw new Exception('Corrupted database structure config file static/dbstructure.config.php');
- }
-
- self::$definition = $definition;
- } else {
- $definition = self::$definition;
- }
-
- if ($with_addons_structure) {
- Hook::callAll('dbstructure_definition', $definition);
- }
-
- return $definition;
- }
-
- /**
- * Get field data for the given table
- *
- * @param string $table Tavle to load field definitions for
- * @param array $data data fields
- * @return array fields for the given
- */
- public static function getFieldsForTable(string $table, array $data = []): array
- {
- $definition = DBStructure::definition('', false);
- if (empty($definition[$table])) {
- return [];
- }
-
- $fieldNames = array_keys($definition[$table]['fields']);
-
- $fields = [];
-
- // Assign all field that are present in the table
- foreach ($fieldNames as $field) {
- if (isset($data[$field])) {
- // Limit the length of varchar, varbinary, char and binrary fields
- if (is_string($data[$field]) && preg_match("/char\((\d*)\)/", $definition[$table]['fields'][$field]['type'], $result)) {
- $data[$field] = mb_substr($data[$field], 0, $result[1]);
- } elseif (is_string($data[$field]) && preg_match("/binary\((\d*)\)/", $definition[$table]['fields'][$field]['type'], $result)) {
- $data[$field] = substr($data[$field], 0, $result[1]);
- }
- $fields[$field] = $data[$field];
- }
- }
-
- return $fields;
- }
-
- /**
- * Creates given table with structure
- *
- * @param string $name Name of table
- * @param array $structure Structure of table
- * @param boolean $verbose Output SQL statements
- * @param boolean $action Whether to run the SQL commands
- * @return Whether the SQL command ran successful
- */
- private static function createTable(string $name, array $structure, bool $verbose, bool $action): bool
- {
- $r = true;
-
- $engine = '';
- $comment = '';
- $sql_rows = [];
- $primary_keys = [];
- $foreign_keys = [];
-
- foreach ($structure['fields'] as $fieldName => $field) {
- $sql_rows[] = '`' . DBA::escape($fieldName) . '` ' . self::FieldCommand($field);
- if (!empty($field['primary'])) {
- $primary_keys[] = $fieldName;
- }
- if (!empty($field['foreign'])) {
- $foreign_keys[$fieldName] = $field;
- }
- }
-
- if (!empty($structure['indexes'])) {
- foreach ($structure['indexes'] as $indexName => $fieldNames) {
- $sql_index = self::createIndex($indexName, $fieldNames, '');
- if (!is_null($sql_index)) {
- $sql_rows[] = $sql_index;
- }
- }
- }
-
- foreach ($foreign_keys as $fieldName => $parameters) {
- $sql_rows[] = self::foreignCommand($name, $fieldName, $parameters);
- }
-
- if (isset($structure['engine'])) {
- $engine = ' ENGINE=' . $structure['engine'];
- }
-
- if (isset($structure['comment'])) {
- $comment = " COMMENT='" . DBA::escape($structure['comment']) . "'";
- }
-
- $sql = implode(",\n\t", $sql_rows);
-
- $sql = sprintf("CREATE TABLE IF NOT EXISTS `%s` (\n\t", DBA::escape($name)) . $sql .
- "\n)" . $engine . " DEFAULT COLLATE utf8mb4_general_ci" . $comment;
- if ($verbose) {
- echo $sql . ";\n";
- }
-
- if ($action) {
- $r = DBA::e($sql);
- }
-
- return $r;
- }
-
- /**
- * Returns SQL statement for field
- *
- * @param array $parameters Parameters for SQL statement
- * @param boolean $create Whether to include PRIMARY KEY statement (unused)
- * @return string SQL statement part
- */
- private static function FieldCommand(array $parameters, bool $create = true): string
- {
- $fieldstruct = $parameters['type'];
-
- if (isset($parameters['Collation'])) {
- $fieldstruct .= ' COLLATE ' . $parameters['Collation'];
- }
-
- if (isset($parameters['not null'])) {
- $fieldstruct .= ' NOT NULL';
- }
-
- if (isset($parameters['default'])) {
- if (strpos(strtolower($parameters['type']), 'int') !== false) {
- $fieldstruct .= ' DEFAULT ' . $parameters['default'];
- } else {
- $fieldstruct .= " DEFAULT '" . $parameters['default'] . "'";
- }
- }
- if (isset($parameters['extra'])) {
- $fieldstruct .= ' ' . $parameters['extra'];
- }
-
- if (isset($parameters['comment'])) {
- $fieldstruct .= " COMMENT '" . DBA::escape($parameters['comment']) . "'";
- }
-
- /*if (($parameters['primary'] != '') && $create)
- $fieldstruct .= ' PRIMARY KEY';*/
-
- return $fieldstruct;
- }
-
- private static function createIndex(string $indexName, array $fieldNames, string $method = 'ADD')
- {
- $method = strtoupper(trim($method));
- if ($method != '' && $method != 'ADD') {
- throw new Exception("Invalid parameter 'method' in self::createIndex(): '$method'");
- }
-
- if (in_array($fieldNames[0], ['UNIQUE', 'FULLTEXT'])) {
- $index_type = array_shift($fieldNames);
- $method .= " " . $index_type;
- }
-
- $names = "";
- foreach ($fieldNames as $fieldName) {
- if ($names != '') {
- $names .= ',';
- }
-
- if (preg_match('|(.+)\((\d+)\)|', $fieldName, $matches)) {
- $names .= "`" . DBA::escape($matches[1]) . "`(" . intval($matches[2]) . ")";
- } else {
- $names .= "`" . DBA::escape($fieldName) . "`";
- }
- }
-
- if ($indexName == 'PRIMARY') {
- return sprintf("%s PRIMARY KEY(%s)", $method, $names);
- }
-
-
- return sprintf("%s INDEX `%s` (%s)", $method, DBA::escape($indexName), $names);