elkarte / Elkarte

sources/subs/Themes.subs.php

<?php

/**
 * This file contains functions for dealing with themes, adding, removing
 *
 * @package   ElkArte Forum
 * @copyright ElkArte Forum contributors
 * @license   BSD http://opensource.org/licenses/BSD-3-Clause (see accompanying LICENSE.txt file)
 *
 * @version 2.0 dev
 *
 */

use ElkArte\Helper\HttpReq;
use ElkArte\Helper\Util;
use ElkArte\Languages\Loader as LangLoader;
use ElkArte\Languages\Txt;
use ElkArte\Themes\ThemeLoader;

/**
 * Retrieve all installed themes
 */
function installedThemes()
{
	$db = database();

	$themes = [];
	$db->fetchQuery('
		SELECT 
			id_theme, variable, value
		FROM {db_prefix}themes
		WHERE variable IN ({string:name}, {string:theme_dir}, {string:theme_url}, {string:images_url}, {string:theme_templates}, {string:theme_layers})
			AND id_member = {int:no_member}',
		[
			'name' => 'name',
			'theme_dir' => 'theme_dir',
			'theme_url' => 'theme_url',
			'images_url' => 'images_url',
			'theme_templates' => 'theme_templates',
			'theme_layers' => 'theme_layers',
			'no_member' => 0,
		]
	)->fetch_callback(
		function ($row) use (&$themes) {
			if (!isset($themes[$row['id_theme']]))
			{
				$themes[$row['id_theme']] = [
					'id' => $row['id_theme'],
					'num_default_options' => 0,
					'num_members' => 0,
				];
			}

			$themes[$row['id_theme']][$row['variable']] = $row['value'];
		}
	);

	return $themes;
}

/**
 * Validates a theme name
 *
 * @param array $indexes
 * @param array $value_data
 *
 * @return array
 */
function validateThemeName($indexes, $value_data)
{
	$db = database();

	$themes = [];
	$db->fetchQuery('
		SELECT 
			id_theme, value
		FROM {db_prefix}themes
		WHERE id_member = {int:no_member}
			AND variable = {string:theme_dir}
			AND (' . implode(' OR ', $value_data['query']) . ')',
		array_merge($value_data['params'], [
			'no_member' => 0,
			'theme_dir' => 'theme_dir',
			'index_compare_explode' => 'value LIKE \'%' . implode('\' OR value LIKE \'%', $indexes) . '\'',
		])
	)->fetch_callback(
		function ($row) use (&$themes, $indexes) {
			// Find the right one.
			foreach ($indexes as $index)
			{
				if (strpos($row['value'], $index) !== false)
				{
					$themes[$row['id_theme']] = $index;
				}
			}
		}
	);

	return $themes;
}

/**
 * Get a basic list of themes
 *
 * @param int|int[] $themes
 * @return array
 */
function getBasicThemeInfos($themes)
{
	$db = database();

	$themelist = [];

	$db->fetchQuery('
		SELECT 
			id_theme, value
		FROM {db_prefix}themes
		WHERE id_member = {int:no_member}
			AND variable = {string:name}
			AND id_theme IN ({array_int:theme_list})',
		[
			'theme_list' => (array) $themes,
			'no_member' => 0,
			'name' => 'name',
		]
	)->fetch_callback(
		function ($row) use (&$themelist) {
			$themelist[$row['id_theme']] = $row['value'];
		}
	);

	return $themelist;
}

/**
 * Gets a list of all themes from the database
 *
 * @return array $themes
 */
function getCustomThemes()
{
	global $settings, $txt;

	$db = database();

	// Manually add in the default
	$themes = [
		1 => [
			'name' => $txt['dvc_default'],
			'theme_dir' => $settings['default_theme_dir'],
		],
	];

	$db->fetchQuery('
		SELECT 
			id_theme, variable, value
		FROM {db_prefix}themes
		WHERE id_theme != {int:default_theme}
			AND id_member = {int:no_member}
			AND variable IN ({string:name}, {string:theme_dir})',
		[
			'default_theme' => 1,
			'no_member' => 0,
			'name' => 'name',
			'theme_dir' => 'theme_dir',
		]
	)->fetch_callback(
		function ($row) use (&$themes) {
			$themes[$row['id_theme']][$row['variable']] = $row['value'];
		}
	);

	return $themes;
}

/**
 * Returns all named and installed themes paths as an array of theme name => path
 *
 * @param int[] $theme_list
 *
 * @return array
 */
function getThemesPathbyID($theme_list = [])
{
	global $modSettings;

	$db = database();

	// Nothing passed then we use the defaults
	if (empty($theme_list))
	{
		$theme_list = explode(',', $modSettings['knownThemes']);
	}

	if (!is_array($theme_list))

The condition is_array($theme_list) is always true.

	{
		$theme_list = [$theme_list];
	}

	// Load up any themes we need the paths for
	$theme_list = array_map('intval', $theme_list);
	$theme_paths = [];
	$db->fetchQuery('
		SELECT 
			id_theme, variable, value
		FROM {db_prefix}themes
		WHERE (id_theme = {int:default_theme} OR id_theme IN ({array_int:known_theme_list}))
			AND variable IN ({string:name}, {string:theme_dir})',
		[
			'known_theme_list' => $theme_list,
			'default_theme' => 1,
			'name' => 'name',
			'theme_dir' => 'theme_dir',
		]
	)->fetch_callback(
		function ($row) use (&$theme_paths) {
			$theme_paths[(int) $row['id_theme']][$row['variable']] = $row['value'];
		}
	);

	return $theme_paths;
}

/**
 * Load the installed themes
 * (minimum data)
 *
 * @param int[] $knownThemes available themes
 *
 * @return array
 */
function loadThemes($knownThemes)
{
	$db = database();

	// Load up all the themes.
	$themes = [];
	$db->query('', '
		SELECT 
			id_theme, value AS name
		FROM {db_prefix}themes
		WHERE variable = {string:name}
			AND id_member = {int:no_member}
		ORDER BY id_theme',
		[
			'no_member' => 0,
			'name' => 'name',
		]
	)->fetch_callback(
		function ($row) use (&$themes, $knownThemes) {
			$themes[] = [
				'id' => $row['id_theme'],
				'name' => $row['name'],
				'known' => in_array($row['id_theme'], $knownThemes),
			];
		}
	);

	return $themes;
}

/**
 * Load all themes that a package is installed in
 *
 * @param int $id id of the package we are checking
 *
 * @return array
 */
function loadThemesAffected($id)
{
	$db = database();

	$themes = [];
	$db->fetchQuery('
		SELECT 
			themes_installed
		FROM {db_prefix}log_packages
		WHERE id_install = {int:install_id}
		LIMIT 1',
		[
			'install_id' => $id,
		]
	)->fetch_callback(
		function ($row) use (&$themes) {
			$themes = explode(',', $row['themes_installed']);
		}
	);

	return $themes;
}

/**
 * Counts the theme options configured for guests
 *
 * @return array
 */
function countConfiguredGuestOptions()
{
	$db = database();

	return $db->fetchQuery('
		SELECT 
			id_theme, COUNT(*) AS value
		FROM {db_prefix}themes
		WHERE id_member = {int:guest_member}
		GROUP BY id_theme',
		[
			'guest_member' => -1,
		]
	)->fetch_all();
}

/**
 * Loads all available themes in the system
 *
 * - Determines count of users that are using each
 * - Loads variant options
 *
 * @param int $current_theme
 * @param int $current_member
 *
 * @return array
 */
function availableThemes($current_theme, $current_member)
{
	global $modSettings, $settings, $txt, $context;

	$db = database();

	$available_themes = [];
	$current_theme = (int) $current_theme;
	if (!empty($modSettings['knownThemes']))
	{
		$db->fetchQuery('
			SELECT 
				id_theme, variable, value
			FROM {db_prefix}themes
			WHERE variable IN ({string:name}, {string:theme_url}, {string:theme_dir}, {string:images_url}, {string:disable_user_variant})' . (!allowedTo('admin_forum') ? '
				AND id_theme IN ({array_string:known_themes})' : '') . '
				AND id_theme != {int:default_theme}
				AND id_member = {int:no_member}',
			[
				'default_theme' => 0,
				'name' => 'name',
				'no_member' => 0,
				'theme_url' => 'theme_url',
				'theme_dir' => 'theme_dir',
				'images_url' => 'images_url',
				'disable_user_variant' => 'disable_user_variant',
				'known_themes' => !empty($modSettings['theme_allow']) || allowedTo('admin_forum') ? explode(',', $modSettings['knownThemes']) : [$modSettings['theme_guests']],
			]
		)->fetch_callback(
			function ($row) use (&$available_themes, $current_theme) {
				if (!isset($available_themes[$row['id_theme']]))
				{
					$row['id_theme'] = (int) $row['id_theme'];
					$available_themes[$row['id_theme']] = [
						'id' => $row['id_theme'],
						'selected' => $current_theme == $row['id_theme'],
						'num_users' => 0
					];
				}

				$available_themes[$row['id_theme']][$row['variable']] = $row['value'];
			}
		);
	}

	// Okay, this is a complicated problem: the default theme is 1, but they aren't allowed to access 1!
	if (!isset($available_themes[$modSettings['theme_guests']]))
	{
		$available_themes[0] = [
			'num_users' => 0
		];
		$guest_theme = 0;
	}
	else
	{
		$guest_theme = (int) $modSettings['theme_guests'];
	}

	$db->fetchQuery('
		SELECT 
			id_theme, COUNT(*) AS the_count
		FROM {db_prefix}members
		GROUP BY id_theme
		ORDER BY id_theme DESC',
		[]
	)->fetch_callback(
		function ($row) use (&$available_themes, $guest_theme) {
			global $modSettings;

			// Figure out which theme it is they are REALLY using.
			if (!empty($modSettings['knownThemes']) && !in_array($row['id_theme'], explode(',', $modSettings['knownThemes'])))
			{
				$row['id_theme'] = $guest_theme;
			}
			elseif (empty($modSettings['theme_allow']))
			{
				$row['id_theme'] = $guest_theme;
			}

			if (isset($available_themes[$row['id_theme']]))
			{
				$available_themes[$row['id_theme']]['num_users'] += $row['the_count'];
			}
			else
			{
				$available_themes[$guest_theme]['num_users'] += $row['the_count'];
			}
		}
	);

	// Get any member variant preferences.
	$variant_preferences = [];
	if ($current_member > 0)
	{
		$db->fetchQuery('
			SELECT 
				id_theme, value
			FROM {db_prefix}themes
			WHERE variable = {string:theme_variant}
				AND id_member IN ({array_int:id_member})
			ORDER BY id_member ASC',
			[
				'theme_variant' => 'theme_variant',
				'id_member' => isset($_REQUEST['sa']) && $_REQUEST['sa'] === 'pick' ? [-1, $current_member] : [-1],
			]
		)->fetch_callback(
			function ($row) use (&$variant_preferences) {
				$variant_preferences[$row['id_theme']] = $row['value'];
			}
		);
	}

	// Needed to trick ThemeLoader, so we can get variant names
	HttpReq::instance()->post->th = true;

	foreach ($available_themes as $id_theme => $theme_data)
	{
		// Don't try to load the forum or board default theme's data... it doesn't have any!
		if ($id_theme === 0)
		{
			continue;
		}

		// The thumbnail needs the correct path.
		$settings['images_url'] = &$theme_data['images_url'];
		$theme_thumbnail_href = $theme_data['images_url'] . '/thumbnail.png';

		$txt['theme_description'] = '';
		$lang = new LangLoader(null, $txt, $db);
		$lang->changePath($theme_data['theme_dir'] . '/Languages');
		$lang->load('Settings', false);

		$available_themes[$id_theme]['thumbnail_href'] = str_replace('{images_url}', $settings['images_url'], $theme_thumbnail_href);
		$available_themes[$id_theme]['description'] = $txt['theme_description'];

		// Are there any variants?
		if (empty($theme_data['disable_user_variant']) || allowedTo('admin_forum'))
		{
			new ThemeLoader($theme_data['id'], false);
			$variants = $context['theme_instance']->getSettings();

			if (!empty($variants['theme_variants']))
			{
				$settings['theme_variants'] = $variants['theme_variants'];

				call_integration_hook('integrate_init_theme', [$id_theme, &$settings]);

				Txt::load('Settings');

				$available_themes[$id_theme]['variants'] = [];
				foreach ($settings['theme_variants'] as $variant)
				{
					$available_themes[$id_theme]['variants'][$variant] = [
						'label' => $txt['variant_' . $variant] ?? $variant,
						'thumbnail' => !file_exists($theme_data['theme_dir'] . '/images/thumbnail.png') || file_exists($theme_data['theme_dir'] . '/images/thumbnail_' . $variant . '.png') ? $theme_data['images_url'] . '/thumbnail_' . $variant . '.png' : ($theme_data['images_url'] . '/thumbnail.png'),
					];
				}

				// This was once a horrible ternary
				if (isset($_GET['vrt']))
				{
					$available_themes[$id_theme]['selected_variant'] = $_GET['vrt'];
				}
				elseif (!empty($variant_preferences[$id_theme]))
				{
					$available_themes[$id_theme]['selected_variant'] = $variant_preferences[$id_theme];
				}
				elseif (!empty($settings['default_variant']))
				{
					$available_themes[$id_theme]['selected_variant'] = $settings['default_variant'];
				}
				else
				{
					$available_themes[$id_theme]['selected_variant'] = $settings['theme_variants'][0];
				}

				if (!isset($available_themes[$id_theme]['variants'][$available_themes[$id_theme]['selected_variant']]['thumbnail']))
				{
					$available_themes[$id_theme]['selected_variant'] = $settings['theme_variants'][0];
				}

				$available_themes[$id_theme]['thumbnail_href'] = $available_themes[$id_theme]['variants'][$available_themes[$id_theme]['selected_variant']]['thumbnail'];

				// Allow themes to override the text.
				$available_themes[$id_theme]['pick_label'] = $txt['variant_pick'] ?? $txt['theme_pick_variant'];
			}
		}
	}

	// Then return it.
	new ThemeLoader($current_theme, true);

	return [$available_themes, $guest_theme];
}

/**
 * Counts the theme options configured for members
 *
 * @return array
 */
function countConfiguredMemberOptions()
{
	$db = database();

	return $db->fetchQuery('
		SELECT 
			COUNT(DISTINCT id_member) AS value, id_theme
		FROM {db_prefix}themes
		WHERE id_member > {int:no_member}
		GROUP BY id_theme',
		[
			'no_member' => 0,
		]
	)->fetch_all();
}

/**
 * Deletes all outdated options from the themes table
 *
 * @param int|string $theme : if int to remove option from a specific theme,
 *              if string it can be:
 *               - 'default' => to remove from the default theme
 *               - 'custom' => to remove from all the custom themes
 *               - 'all' => to remove from both default and custom
 * @param int|string $membergroups : if int a specific member
 *              if string a "group" of members and it can assume the following values:
 *               - 'guests' => obviously guests,
 *               - 'members' => all members with custom settings (i.e. id_member > 0)
 *               - 'non_default' => guests and members with custom settings (i.e. id_member != 0)
 *               - 'all' => any record
 * @param string[]|string $old_settings can be a string or an array of strings. If empty deletes all settings.
 */
function removeThemeOptions($theme, $membergroups, $old_settings = '')
{
	$db = database();

	$query_param = [];

	// The default theme is 1 (id_theme = 1)
	if ($theme === 'default')
	{
		$query_param = ['theme_operator' => '=', 'theme' => 1];
	}
	// All the themes that are not the default one (id_theme != 1)
	// @todo 'non_default' would be more explicative, though it could be confused with the one in $membergroups
	elseif ($theme === 'custom')
	{
		$query_param = ['theme_operator' => '!=', 'theme' => 1];
	}
	// If numeric means a specific theme
	elseif (is_numeric($theme))
	{
		$query_param = ['theme_operator' => '=', 'theme' => (int) $theme];
	}

	// Guests means id_member = -1
	if ($membergroups === 'guests')
	{
		$query_param += ['member_operator' => '=', 'member' => -1];
	}
	// Members means id_member > 0
	elseif ($membergroups === 'members')
	{
		$query_param += ['member_operator' => '>', 'member' => 0];
	}
	// Non default settings id_member != 0 (that is different from id_member > 0)
	elseif ($membergroups === 'non_default')
	{
		$query_param += ['member_operator' => '!=', 'member' => 0];
	}
	// all it's all
	elseif ($membergroups === 'all')
	{
		$query_param += ['member_operator' => '', 'member' => 0];
	}
	// If it is a number, then it means a specific member (id_member = (int))
	elseif (is_numeric($membergroups))
	{
		$query_param += ['member_operator' => '=', 'member' => (int) $membergroups];
	}

	// If array or string set up the query accordingly
	if (is_array($old_settings))
	{
		$var = 'variable IN ({array_string:old_settings})';
	}
	elseif (!empty($old_settings))
	{
		$var = 'variable = {string:old_settings}';
	}
	// If empty then means any setting
	else
	{
		$var = '1=1';
	}

	$db->query('', '
		DELETE FROM {db_prefix}themes
		WHERE ' . $var . ($membergroups === 'all' ? '' : '
			AND id_member {raw:member_operator} {int:member}') . ($theme === 'all' ? '' : '
			AND id_theme {raw:theme_operator} {int:theme}'),
		array_merge(
			$query_param,
			[
				'old_settings' => $old_settings
			]
		)
	);
}

/**
 * Update the default options for our users.
 *
 * @param array $setValues in the order: id_theme, id_member, variable name, value
 */
function updateThemeOptions($setValues)
{
	$db = database();

	$db->replace(
		'{db_prefix}themes',
		['id_theme' => 'int', 'id_member' => 'int', 'variable' => 'string-255', 'value' => 'string-65534'],
		$setValues,
		['id_theme', 'variable', 'id_member']
	);
}

/**
 * Add predefined options to the themes table.
 *
 * @param int $id_theme
 * @param string $options
 * @param string[]|string $value
 */
function addThemeOptions($id_theme, $options, $value)
{
	$db = database();

	$db->fetchQuery('
		INSERT INTO {db_prefix}themes
			(id_member, id_theme, variable, value)
		SELECT 
			id_member, {int:current_theme}, SUBSTRING({string:option}, 1, 255), SUBSTRING({string:value}, 1, 65534)
		FROM {db_prefix}members',
		[
			'current_theme' => $id_theme,
			'option' => $options,
			'value' => (is_array($value) ? implode(',', $value) : $value),
		]
	);
}

/**
 * Deletes a theme from the database.
 *
 * @param int $id
 *
 * @throws \ElkArte\Exceptions\Exception no_access
 */
function deleteTheme($id)
{
	$db = database();

	// Make sure we never ever delete the default theme!
	if ($id === 1)
	{
		throw new \ElkArte\Exceptions\Exception('no_access', false);
	}

	$db->query('', '
		DELETE FROM {db_prefix}themes
		WHERE id_theme = {int:current_theme}',
		[
			'current_theme' => $id,
		]
	);

	// Update the members ...
	$db->query('', '
		UPDATE {db_prefix}members
		SET 
			id_theme = {int:default_theme}
		WHERE id_theme = {int:current_theme}',
		[
			'default_theme' => 0,
			'current_theme' => $id,
		]
	);

	// ... and the boards table.
	$db->query('', '
		UPDATE {db_prefix}boards
		SET 
			id_theme = {int:default_theme}
		WHERE id_theme = {int:current_theme}',
		[
			'default_theme' => 0,
			'current_theme' => $id,
		]
	);
}

/**
 * Get the next free id for the theme.
 *
 * @return int
 */
function nextTheme()
{
	$db = database();

	// Find the newest id_theme.
	$result = $db->query('', '
		SELECT 
			MAX(id_theme)
		FROM {db_prefix}themes',
		[]
	);
	list ($id_theme) = $result->fetch_row();
	$result->free_result();

	// This will be theme number...
	$id_theme++;

	return $id_theme;
}

/**
 * Adds a new theme to the database.
 *
 * @param array $details
 */
function addTheme($details)
{
	$db = database();

	$db->insert('insert',
		'{db_prefix}themes',
		['id_theme' => 'int', 'variable' => 'string-255', 'value' => 'string-65534'],
		$details,
		['id_theme', 'variable']
	);
}

/**
 * Get the name of a theme
 *
 * @param int $id
 * @return string
 */
function getThemeName($id)
{
	$db = database();

	$result = $db->query('', '
		SELECT 
			value
		FROM {db_prefix}themes
		WHERE id_theme = {int:current_theme}
			AND id_member = {int:no_member}
			AND variable = {string:name}
		LIMIT 1',
		[
			'current_theme' => $id,
			'no_member' => 0,
			'name' => 'name',
		]
	);
	list ($theme_name) = $result->fetch_row();
	$result->free_result();

	return $theme_name;
}

/**
 * Deletes all variants from a given theme id.
 *
 * @param int $id
 */
function deleteVariants($id)
{
	$db = database();

	$db->query('', '
		DELETE FROM {db_prefix}themes
		WHERE id_theme = {int:current_theme}
			AND variable = {string:theme_variant}',
		[
			'current_theme' => $id,
			'theme_variant' => 'theme_variant',
		]
	);
}

/**
 * Loads all the theme variable/value pairs for a member or group of members
 * If supplied a variable array it will only load / return those values
 *
 * @param int|int[] $theme
 * @param int|int[]|null $memID
 * @param array $options
 * @param string[] $variables
 *
 * @return array|array
 */
function loadThemeOptionsInto($theme, $memID = null, $options = [], $variables = [])
{
	$db = database();

	$variables = is_array($variables) ? $variables : [$variables];

The condition is_array($variables) is always true.

	// @todo the ORDER BY may or may not be necessary:
	// I have the feeling that *sometimes* the default order may be a bit messy,
	// and considering this function is not use in frequently accessed areas the
	// overhead for an ORDER BY should be acceptable
	$db->fetchQuery('
		SELECT 
			variable, value
		FROM {db_prefix}themes
		WHERE id_theme IN ({array_int:current_theme})' . ($memID === null ? '' : (is_array($memID) ? '
			AND id_member IN ({array_int:guest_member})' : '
			AND id_member = {int:guest_member}')) . (!empty($variables) ? '
			AND variable IN ({array_string:variables})' : '') . '
		ORDER BY id_theme ASC' . ($memID === null ? '' : ', id_member ASC'),
		[
			'current_theme' => is_array($theme) ? $theme : [$theme],
			'guest_member' => $memID,
			'variables' => $variables,
		]
	)->fetch_callback(
		function ($row) use (&$options) {
			$options[$row['variable']] = $row['value'];
		}
	);

	return $options;
}

/**
 * Used when installing a theme that is based off an existing theme (an therefore is dependant on)
 * Returns based-on theme directory values needed by the install function in ManageThemes.controller
 *
 * @param string $based_on name of theme this is based on, will do a LIKE search
 * @param bool $explicit_images Don't worry its not like it sounds !
 * @return array
 * @todo may be merged with something else?
 */
function loadBasedOnTheme($based_on, $explicit_images = false)
{
	$db = database();

	$request = $db->query('', '
		SELECT 
			th.value AS base_theme_dir, th2.value AS base_theme_url' . (!empty($explicit_images) ? '' : ', th3.value AS images_url') . '
		FROM {db_prefix}themes AS th
			INNER JOIN {db_prefix}themes AS th2 ON (th2.id_theme = th.id_theme
				AND th2.id_member = {int:no_member}
				AND th2.variable = {string:theme_url})' . (!empty($explicit_images) ? '' : '
			INNER JOIN {db_prefix}themes AS th3 ON (th3.id_theme = th.id_theme
				AND th3.id_member = {int:no_member}
				AND th3.variable = {string:images_url})') . '
		WHERE th.id_member = {int:no_member}
			AND (th.value LIKE {string:based_on} OR th.value LIKE {string:based_on_path})
			AND th.variable = {string:theme_dir}
		LIMIT 1',
		[
			'no_member' => 0,
			'theme_url' => 'theme_url',
			'images_url' => 'images_url',
			'theme_dir' => 'theme_dir',
			'based_on' => '%/' . $based_on,
			'based_on_path' => '%\\' . $based_on,
		]
	);
	$temp = $request->fetch_assoc();
	$request->free_result();

	return $temp;
}

/**
 * Builds a theme-info.xml file for use when a new theme is installed by copying
 * an existing theme
 *
 * @param string $name
 * @param string $version
 * @param string $theme_dir
 * @param array $theme_values
 */
function write_theme_info($name, $version, $theme_dir, $theme_values)
{
	$xml_info = '<' . '?xml version="1.0"?' . '>
	<theme-info xmlns="https://www.elkarte.net/xml/theme-info" xmlns:elk="https://www.elkarte.net/">
		<!-- For the id, always use something unique - put your name, a colon, and then the package name. -->
		<id>elk:' . Util::strtolower(str_replace([' '], '_', $name)) . '</id>
		<version>' . $version . '</version>
		<!-- Theme name, used purely for aesthetics. -->
		<name>' . $name . '</name>
		<!-- Author: your email address or contact information. The name attribute is optional. -->
		<author name="Your Name">info@youremailaddress.tld</author>
		<!-- Website... where to get updates and more information. -->
		<website>http://www.yourdomain.tld/</website>
		<!-- Template layers to use, defaults to "html,body". -->
		<layers>' . (empty($theme_values['theme_layers']) ? 'html,body' : $theme_values['theme_layers']) . '</layers>
		<!-- Templates to load on startup. Default is "index". -->
		<templates>' . (empty($theme_values['theme_templates']) ? 'index' : $theme_values['theme_templates']) . '</templates>
		<!-- Base this theme off another? Default is blank, or no. It could be "default". -->
		<based-on></based-on>
	</theme-info>';

	// Now write it.
	file_put_contents($theme_dir . '/theme_info.xml', $xml_info);
}