function icms_module_update($dirname)
{
$dirname = trim($dirname);
$db =& icms_db_Factory::instance();
$module_handler = icms::handler('icms_module');
$module =& $module_handler->getByDirname($dirname);
// Save current version for use in the update function
$prev_version = $module->getVar('version');
$prev_dbversion = $module->getVar('dbversion');
xoops_template_clear_module_cache($module->getVar('mid'));
// we dont want to change the module name set by admin
$temp_name = $module->getVar('name');
$module->loadInfoAsVar($dirname);
$module->setVar('name', $temp_name);
if (!$module_handler->insert($module)) {
echo '<p>Could not update ' . $module->getVar('name') . '</p>';
echo "<br /><a href='admin.php?fct=modulesadmin'>" . _MD_AM_BTOMADMIN . "</a>";
} else {
$newmid = $module->getVar('mid');
$msgs = array();
$msgs[] = _MD_AM_MOD_DATA_UPDATED;
$tplfile_handler =& icms::handler('icms_view_template_file');
$deltpl =& $tplfile_handler->find('default', 'module', $module->getVar('mid'));
$delng = array();
if (is_array($deltpl)) {
$xoopsDelTpl = new icms_view_Tpl();
// clear cache files
$xoopsDelTpl->clear_cache(null, 'mod_' . $dirname);
// delete template file entry in db
$dcount = count($deltpl);
for ($i = 0; $i < $dcount; $i++) {
if (!$tplfile_handler->delete($deltpl[$i])) {
$delng[] = $deltpl[$i]->getVar('tpl_file');
}
}
}
$templates = $module->getInfo('templates');
if ($templates != false) {
$msgs[] = _MD_AM_MOD_UP_TEM;
foreach ($templates as $tpl) {
$tpl['file'] = trim($tpl['file']);
if (!in_array($tpl['file'], $delng)) {
$tpldata =& xoops_module_gettemplate($dirname, $tpl['file']);
$tplfile =& $tplfile_handler->create();
$tplfile->setVar('tpl_refid', $newmid);
$tplfile->setVar('tpl_lastimported', 0);
$tplfile->setVar('tpl_lastmodified', time());
if (preg_match("/\\.css\$/i", $tpl['file'])) {
$tplfile->setVar('tpl_type', 'css');
} else {
$tplfile->setVar('tpl_type', 'module');
}
$tplfile->setVar('tpl_source', $tpldata, true);
$tplfile->setVar('tpl_module', $dirname);
$tplfile->setVar('tpl_tplset', 'default');
$tplfile->setVar('tpl_file', $tpl['file'], true);
$tplfile->setVar('tpl_desc', $tpl['description'], true);
if (!$tplfile_handler->insert($tplfile)) {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_INSERT_FAIL . '</span>', '<strong>' . $tpl['file'] . '</strong>');
} else {
$newid = $tplfile->getVar('tpl_id');
$msgs[] = sprintf(' <span>' . _MD_AM_TEMPLATE_INSERTED . '</span>', '<strong>' . $tpl['file'] . '</strong>', '<strong>' . $newid . '</strong>');
if ($icmsConfig['template_set'] == 'default') {
if (!icms_view_Tpl::template_touch($newid)) {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_RECOMPILE_FAIL . '</span>', '<strong>' . $tpl['file'] . '</strong>');
} else {
$msgs[] = sprintf(' <span>' . _MD_AM_TEMPLATE_RECOMPILED . '</span>', '<strong>' . $tpl['file'] . '</strong>');
}
}
}
unset($tpldata);
} else {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_DELETE_FAIL . '</span>', $tpl['file']);
}
}
}
$blocks = $module->getInfo('blocks');
$msgs[] = _MD_AM_MOD_REBUILD_BLOCKS;
if ($blocks != false) {
$count = count($blocks);
$showfuncs = array();
$funcfiles = array();
for ($i = 1; $i <= $count; $i++) {
if (isset($blocks[$i]['show_func']) && $blocks[$i]['show_func'] != '' && isset($blocks[$i]['file']) && $blocks[$i]['file'] != '') {
$editfunc = isset($blocks[$i]['edit_func']) ? $blocks[$i]['edit_func'] : '';
$showfuncs[] = $blocks[$i]['show_func'];
$funcfiles[] = $blocks[$i]['file'];
$template = '';
if (isset($blocks[$i]['template']) && trim($blocks[$i]['template']) != '') {
$content =& xoops_module_gettemplate($dirname, $blocks[$i]['template'], true);
}
if (!$content) {
$content = '';
} else {
$template = $blocks[$i]['template'];
}
$options = '';
if (!empty($blocks[$i]['options'])) {
$options = $blocks[$i]['options'];
}
$sql = "SELECT bid, name FROM " . $db->prefix('newblocks') . " WHERE mid='" . (int) $module->getVar('mid') . "' AND func_num='" . (int) $i . "' AND show_func='" . addslashes($blocks[$i]['show_func']) . "' AND func_file='" . addslashes($blocks[$i]['file']) . "'";
$fresult = $db->query($sql);
$fcount = 0;
while ($fblock = $db->fetchArray($fresult)) {
$fcount++;
$sql = "UPDATE " . $db->prefix("newblocks") . " SET name='" . addslashes($blocks[$i]['name']) . "', edit_func='" . addslashes($editfunc) . "', content='', template='" . $template . "', last_modified=" . time() . " WHERE bid='" . (int) $fblock['bid'] . "'";
$result = $db->query($sql);
if (!$result) {
$msgs[] = sprintf(' ' . _MD_AM_UPDATE_FAIL, $fblock['name']);
} else {
$msgs[] = sprintf(' ' . _MD_AM_BLOCK_UPDATED, '<strong>' . $fblock['name'] . '</strong>', '<strong>' . icms_conv_nr2local($fblock['bid']) . '</strong>');
if ($template != '') {
$tplfile =& $tplfile_handler->find('default', 'block', $fblock['bid']);
if (count($tplfile) == 0) {
$tplfile_new =& $tplfile_handler->create();
$tplfile_new->setVar('tpl_module', $dirname);
$tplfile_new->setVar('tpl_refid', (int) $fblock['bid']);
$tplfile_new->setVar('tpl_tplset', 'default');
$tplfile_new->setVar('tpl_file', $blocks[$i]['template'], true);
$tplfile_new->setVar('tpl_type', 'block');
} else {
$tplfile_new = $tplfile[0];
}
$tplfile_new->setVar('tpl_source', $content, true);
$tplfile_new->setVar('tpl_desc', $blocks[$i]['description'], true);
$tplfile_new->setVar('tpl_lastmodified', time());
$tplfile_new->setVar('tpl_lastimported', 0);
if (!$tplfile_handler->insert($tplfile_new)) {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_UPDATE_FAIL . '</span>', '<strong>' . $blocks[$i]['template'] . '</strong>');
} else {
$msgs[] = ' Template <b>' . $blocks[$i]['template'] . '</b> updated.';
if ($icmsConfig['template_set'] == 'default') {
if (!icms_view_Tpl::template_touch($tplfile_new->getVar('tpl_id'))) {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_RECOMPILE_FAIL . '</span>', '<strong>' . $blocks[$i]['template'] . '</strong>');
} else {
$msgs[] = sprintf(' ' . _MD_AM_TEMPLATE_RECOMPILED, '<strong>' . $blocks[$i]['template'] . '</strong>');
}
}
}
}
}
}
if ($fcount == 0) {
$newbid = $db->genId($db->prefix('newblocks') . '_bid_seq');
$block_name = addslashes($blocks[$i]['name']);
$sql = "INSERT INTO " . $db->prefix("newblocks") . " (bid, mid, func_num, options, name, title, content, side, weight, visible, block_type, c_type, isactive, dirname, func_file, show_func, edit_func, template, bcachetime, last_modified) VALUES ('" . (int) $newbid . "', '" . (int) $module->getVar('mid') . "', '" . (int) $i . "','" . addslashes($options) . "','" . $block_name . "', '" . $block_name . "', '', '1', '0', '0', 'M', 'H', '1', '" . addslashes($dirname) . "', '" . addslashes($blocks[$i]['file']) . "', '" . addslashes($blocks[$i]['show_func']) . "', '" . addslashes($editfunc) . "', '" . $template . "', '0', '" . time() . "')";
$result = $db->query($sql);
if (!$result) {
$msgs[] = ' ERROR: Could not create ' . $blocks[$i]['name'];
echo $sql;
} else {
if (empty($newbid)) {
$newbid = $db->getInsertId();
}
$groups =& icms::$user->getGroups();
$gperm_handler = icms::handler('icms_member_groupperm');
foreach ($groups as $mygroup) {
$bperm =& $gperm_handler->create();
$bperm->setVar('gperm_groupid', (int) $mygroup);
$bperm->setVar('gperm_itemid', (int) $newbid);
$bperm->setVar('gperm_name', 'block_read');
$bperm->setVar('gperm_modid', 1);
if (!$gperm_handler->insert($bperm)) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not add block access right. Block ID: <b>' . $newbid . '</b> Group ID: <b>' . $mygroup . '</b></span>';
} else {
$msgs[] = ' Added block access right. Block ID: <b>' . $newbid . '</b> Group ID: <b>' . $mygroup . '</b>';
}
}
if ($template != '') {
$tplfile =& $tplfile_handler->create();
$tplfile->setVar('tpl_module', $dirname);
$tplfile->setVar('tpl_refid', (int) $newbid);
$tplfile->setVar('tpl_source', $content, true);
$tplfile->setVar('tpl_tplset', 'default');
$tplfile->setVar('tpl_file', $blocks[$i]['template'], true);
$tplfile->setVar('tpl_type', 'block');
$tplfile->setVar('tpl_lastimported', 0);
$tplfile->setVar('tpl_lastmodified', time());
$tplfile->setVar('tpl_desc', $blocks[$i]['description'], true);
if (!$tplfile_handler->insert($tplfile)) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not insert template <b>' . $blocks[$i]['template'] . '</b> to the database.</span>';
} else {
$newid = $tplfile->getVar('tpl_id');
$msgs[] = ' Template <b>' . $blocks[$i]['template'] . '</b> added to the database.';
if ($icmsConfig['template_set'] == 'default') {
if (!icms_view_Tpl::template_touch($newid)) {
$msgs[] = sprintf(' <span style="color:#ff0000;">' . _MD_AM_TEMPLATE_RECOMPILE_FAIL . '</span>', '<strong>' . $blocks[$i]['template'] . '</strong>');
} else {
$msgs[] = sprintf(' ' . _MD_AM_TEMPLATE_RECOMPILED, '<strong>' . $blocks[$i]['template'] . '</strong>');
}
}
}
}
$msgs[] = ' Block <b>' . $blocks[$i]['name'] . '</b> created. Block ID: <b>' . $newbid . '</b>';
$sql = "INSERT INTO " . $db->prefix('block_module_link') . " (block_id, module_id, page_id) VALUES ('" . (int) $newbid . "', '0', '1')";
$db->query($sql);
}
}
}
}
$icms_block_handler = icms::handler('icms_view_block');
$block_arr = $icms_block_handler->getByModule($module->getVar('mid'));
foreach ($block_arr as $block) {
if (!in_array($block->getVar('show_func'), $showfuncs) || !in_array($block->getVar('func_file'), $funcfiles)) {
$sql = sprintf("DELETE FROM %s WHERE bid = '%u'", $db->prefix('newblocks'), (int) $block->getVar('bid'));
if (!$db->query($sql)) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not delete block <b>' . $block->getVar('name') . '</b>. Block ID: <b>' . $block->getVar('bid') . '</b></span>';
} else {
$msgs[] = ' Block <b>' . $block->getVar('name') . ' deleted. Block ID: <b>' . $block->getVar('bid') . '</b>';
if ($block->getVar('template') != '') {
$tplfiles =& $tplfile_handler->find(null, 'block', $block->getVar('bid'));
if (is_array($tplfiles)) {
$btcount = count($tplfiles);
for ($k = 0; $k < $btcount; $k++) {
if (!$tplfile_handler->delete($tplfiles[$k])) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not remove deprecated block template. (ID: <b>' . $tplfiles[$k]->getVar('tpl_id') . '</b>)</span>';
} else {
$msgs[] = ' Block template <b>' . $tplfiles[$k]->getVar('tpl_file') . '</b> deprecated.';
}
}
}
}
}
}
}
}
// first delete all config entries
$config_handler = icms::handler('icms_config');
$configs =& $config_handler->getConfigs(new icms_db_criteria_Item('conf_modid', $module->getVar('mid')));
$confcount = count($configs);
$config_delng = array();
if ($confcount > 0) {
$msgs[] = 'Deleting module config options...';
for ($i = 0; $i < $confcount; $i++) {
if (!$config_handler->deleteConfig($configs[$i])) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not delete config data from the database. Config ID: <b>' . $configs[$i]->getvar('conf_id') . '</b></span>';
// save the name of config failed to delete for later use
$config_delng[] = $configs[$i]->getvar('conf_name');
} else {
$config_old[$configs[$i]->getvar('conf_name')]['value'] = $configs[$i]->getvar('conf_value', 'N');
$config_old[$configs[$i]->getvar('conf_name')]['formtype'] = $configs[$i]->getvar('conf_formtype');
$config_old[$configs[$i]->getvar('conf_name')]['valuetype'] = $configs[$i]->getvar('conf_valuetype');
$msgs[] = ' Config data deleted from the database. Config ID: <b>' . $configs[$i]->getVar('conf_id') . '</b>';
}
}
}
// now reinsert them with the new settings
$configs = $module->getInfo('config');
if ($configs != false) {
if ($module->getVar('hascomments') != 0) {
include_once ICMS_ROOT_PATH . '/include/comment_constants.php';
array_push($configs, array('name' => 'com_rule', 'title' => '_CM_COMRULES', 'description' => '', 'formtype' => 'select', 'valuetype' => 'int', 'default' => 1, 'options' => array('_CM_COMNOCOM' => XOOPS_COMMENT_APPROVENONE, '_CM_COMAPPROVEALL' => XOOPS_COMMENT_APPROVEALL, '_CM_COMAPPROVEUSER' => XOOPS_COMMENT_APPROVEUSER, '_CM_COMAPPROVEADMIN' => XOOPS_COMMENT_APPROVEADMIN)));
array_push($configs, array('name' => 'com_anonpost', 'title' => '_CM_COMANONPOST', 'description' => '', 'formtype' => 'yesno', 'valuetype' => 'int', 'default' => 0));
}
} else {
if ($module->getVar('hascomments') != 0) {
$configs = array();
include_once ICMS_ROOT_PATH . '/include/comment_constants.php';
$configs[] = array('name' => 'com_rule', 'title' => '_CM_COMRULES', 'description' => '', 'formtype' => 'select', 'valuetype' => 'int', 'default' => 1, 'options' => array('_CM_COMNOCOM' => XOOPS_COMMENT_APPROVENONE, '_CM_COMAPPROVEALL' => XOOPS_COMMENT_APPROVEALL, '_CM_COMAPPROVEUSER' => XOOPS_COMMENT_APPROVEUSER, '_CM_COMAPPROVEADMIN' => XOOPS_COMMENT_APPROVEADMIN));
$configs[] = array('name' => 'com_anonpost', 'title' => '_CM_COMANONPOST', 'description' => '', 'formtype' => 'yesno', 'valuetype' => 'int', 'default' => 0);
}
}
// RMV-NOTIFY
if ($module->getVar('hasnotification') != 0) {
if (empty($configs)) {
$configs = array();
}
// Main notification options
include_once ICMS_ROOT_PATH . '/include/notification_constants.php';
include_once ICMS_ROOT_PATH . '/include/notification_functions.php';
$options = array();
$options['_NOT_CONFIG_DISABLE'] = XOOPS_NOTIFICATION_DISABLE;
$options['_NOT_CONFIG_ENABLEBLOCK'] = XOOPS_NOTIFICATION_ENABLEBLOCK;
$options['_NOT_CONFIG_ENABLEINLINE'] = XOOPS_NOTIFICATION_ENABLEINLINE;
$options['_NOT_CONFIG_ENABLEBOTH'] = XOOPS_NOTIFICATION_ENABLEBOTH;
//$configs[] = array ('name' => 'notification_enabled', 'title' => '_NOT_CONFIG_ENABLED', 'description' => '_NOT_CONFIG_ENABLEDDSC', 'formtype' => 'yesno', 'valuetype' => 'int', 'default' => 1);
$configs[] = array('name' => 'notification_enabled', 'title' => '_NOT_CONFIG_ENABLE', 'description' => '_NOT_CONFIG_ENABLEDSC', 'formtype' => 'select', 'valuetype' => 'int', 'default' => XOOPS_NOTIFICATION_ENABLEBOTH, 'options' => $options);
// Event specific notification options
// FIXME: for some reason the default doesn't come up properly
// initially is ok, but not when 'update' module..
$options = array();
$categories =& icms_data_notification_Handler::categoryInfo('', $module->getVar('mid'));
foreach ($categories as $category) {
$events =& icms_data_notification_Handler::categoryEvents($category['name'], false, $module->getVar('mid'));
foreach ($events as $event) {
if (!empty($event['invisible'])) {
continue;
}
$option_name = $category['title'] . ' : ' . $event['title'];
$option_value = $category['name'] . '-' . $event['name'];
$options[$option_name] = $option_value;
//$configs[] = array ('name' => icms_data_notification_Handler::generateConfig($category,$event,'name'), 'title' => icms_data_notification_Handler::generateConfig($category,$event,'title_constant'), 'description' => icms_data_notification_Handler::generateConfig($category,$event,'description_constant'), 'formtype' => 'yesno', 'valuetype' => 'int', 'default' => 1);
}
}
$configs[] = array('name' => 'notification_events', 'title' => '_NOT_CONFIG_EVENTS', 'description' => '_NOT_CONFIG_EVENTSDSC', 'formtype' => 'select_multi', 'valuetype' => 'array', 'default' => array_values($options), 'options' => $options);
}
if ($configs != false) {
$msgs[] = 'Adding module config data...';
$config_handler = icms::handler('icms_config');
$order = 0;
foreach ($configs as $config) {
// only insert ones that have been deleted previously with success
if (!in_array($config['name'], $config_delng)) {
$confobj =& $config_handler->createConfig();
$confobj->setVar('conf_modid', (int) $newmid);
$confobj->setVar('conf_catid', 0);
$confobj->setVar('conf_name', $config['name']);
$confobj->setVar('conf_title', $config['title'], true);
$confobj->setVar('conf_desc', $config['description'], true);
$confobj->setVar('conf_formtype', $config['formtype']);
$confobj->setVar('conf_valuetype', $config['valuetype']);
if (isset($config_old[$config['name']]['value']) && $config_old[$config['name']]['formtype'] == $config['formtype'] && $config_old[$config['name']]['valuetype'] == $config['valuetype']) {
// preserver the old value if any
// form type and value type must be the same
$confobj->setVar('conf_value', $config_old[$config['name']]['value'], true);
} else {
$confobj->setConfValueForInput($config['default'], true);
//$confobj->setVar('conf_value', $config['default'], true);
}
$confobj->setVar('conf_order', $order);
$confop_msgs = '';
if (isset($config['options']) && is_array($config['options'])) {
foreach ($config['options'] as $key => $value) {
$confop =& $config_handler->createConfigOption();
$confop->setVar('confop_name', $key, true);
$confop->setVar('confop_value', $value, true);
$confobj->setConfOptions($confop);
$confop_msgs .= '<br /> Config option added. Name: <b>' . $key . '</b> Value: <b>' . $value . '</b>';
unset($confop);
}
}
$order++;
if (false != $config_handler->insertConfig($confobj)) {
$msgs[] = ' Config <b>' . $config['name'] . '</b> added to the database.' . $confop_msgs;
} else {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not insert config <b>' . $config['name'] . '</b> to the database.</span>';
}
unset($confobj);
}
}
unset($configs);
}
// add module specific tasks to system autotasks list
$atasks = $module->getInfo('autotasks');
$atasks_handler =& icms_getModuleHandler('autotasks', 'system');
if (count($atasks) > 0) {
$msgs[] = 'Updating autotasks...';
$criteria = new icms_db_criteria_Compo();
$criteria->add(new icms_db_criteria_Item('sat_type', 'addon/' . $module->getInfo('dirname')));
$items_atasks = $atasks_handler->getObjects($criteria, false);
foreach ($items_atasks as $task) {
$taskID = (int) $task->getVar('sat_addon_id');
$atasks[$taskID]['enabled'] = $task->getVar('sat_enabled');
$atasks[$taskID]['repeat'] = $task->getVar('sat_repeat');
$atasks[$taskID]['interval'] = $task->getVar('sat_interval');
$atasks[$taskID]['name'] = $task->getVar('sat_name');
}
$atasks_handler->deleteAll($criteria);
foreach ($atasks as $taskID => $taskData) {
if (!isset($taskData['code']) || trim($taskData['code']) == '') {
continue;
}
$task =& $atasks_handler->create();
if (isset($taskData['enabled'])) {
$task->setVar('sat_enabled', $taskData['enabled']);
}
if (isset($taskData['repeat'])) {
$task->setVar('sat_repeat', $taskData['repeat']);
}
if (isset($taskData['interval'])) {
$task->setVar('sat_interval', $taskData['interval']);
}
if (isset($taskData['onfinish'])) {
$task->setVar('sat_onfinish', $taskData['onfinish']);
}
$task->setVar('sat_name', $taskData['name']);
$task->setVar('sat_code', sprintf("require ICMS_ROOT_PATH . \"/modules/%s/%s\";", $module->getInfo('dirname'), addslashes($taskData['code'])));
$task->setVar('sat_type', 'addon/' . $module->getInfo('dirname'));
$task->setVar('sat_addon_id', (int) $taskID);
if (!$atasks_handler->insert($task)) {
$msgs[] = ' <span style="color:#ff0000;">ERROR: Could not insert autotask to db. Name: <b>' . $taskData['name'] . '</b></span>';
} else {
$msgs[] = ' Updated task from autotasks list. Task Name: <b>' . $taskData['name'] . '</b>';
}
}
unset($atasks, $atasks_handler, $task, $taskData, $criteria, $items, $taskID);
}
// execute module specific update script if any
$update_script = $module->getInfo('onUpdate');
$ModName = $module->getInfo('modname') != '' ? trim($module->getInfo('modname')) : $dirname;
if (false != $update_script && trim($update_script) != '') {
include_once ICMS_ROOT_PATH . '/modules/' . $dirname . '/' . trim($update_script);
$is_IPF = $module->getInfo('object_items');
if (!empty($is_IPF)) {
$icmsDatabaseUpdater = icms_db_legacy_Factory::getDatabaseUpdater();
$icmsDatabaseUpdater->moduleUpgrade($module, true);
foreach ($icmsDatabaseUpdater->_messages as $msg) {
$msgs[] = $msg;
}
}
if (function_exists('xoops_module_update_' . $ModName)) {
$func = 'xoops_module_update_' . $ModName;
if (!$func($module, $prev_version, $prev_dbversion)) {
$msgs[] = sprintf(_MD_AM_FAIL_EXEC, '<strong>' . $func . '</strong>');
} else {
$msgs[] = sprintf(_MD_AM_FUNCT_EXEC, '<strong>' . $func . '</strong>');
}
} elseif (function_exists('icms_module_update_' . $ModName)) {
$func = 'icms_module_update_' . $ModName;
if (!$func($module, $prev_version, $prev_dbversion)) {
$msgs[] = sprintf(_MD_AM_FAIL_EXEC, '<strong>' . $func . '</strong>');
} else {
$msgs[] = sprintf(_MD_AM_FUNCT_EXEC, '<strong>' . $func . '</strong>');
}
}
}
$msgs[] = '</code><p>' . sprintf(_MD_AM_OKUPD, '<b>' . $module->getVar('name') . '</b>') . '</p>';
}
$ret = '<code>';
foreach ($msgs as $msg) {
$ret .= $msg . '<br />';
}
return $ret;
}
/**
* function to update compiled template file in templates_c folder
*
* @param string $tpl_id
* @param boolean $clear_old
* @return boolean
* @deprecated Use icms_view_Tpl::template_touch instead
* @todo Remove in version 1.4 - there are no other occurrences in the core
**/
function xoops_template_touch($tpl_id, $clear_old = true)
{
icms_core_Debug::setDeprecated('icms_view_Tpl::template_touch($tplid)', sprintf(_CORE_REMOVE_IN_VERSION, '1.4'));
icms_view_Tpl::template_touch($tplid);
}
$err[] = sprintf(_MD_TPLSET_TEMPLATE_NOTEXIST, $id);
} else {
if ($tplfile->getVar('tpl_tplset') != 'default') {
$tplfile->setVar('tpl_source', $html);
$tplfile->setVar('tpl_lastmodified', time());
if (!$tpltpl_handler->insert($tplfile)) {
$err[] = sprintf(_MD_TPLSET_INSERT_FAILED, $tplfile->getVar('tpl_file'));
} else {
$xoopsTpl = new icms_view_Tpl();
if ($xoopsTpl->is_cached('db:' . $tplfile->getVar('tpl_file'))) {
if (!$xoopsTpl->clear_cache('db:' . $tplfile->getVar('tpl_file'))) {
}
}
if ($tplfile->getVar('tpl_tplset') == $icmsConfig['template_set']) {
$icmsAdminTpl->template_touch($id);
}
}
} else {
$err[] = _MD_TPLSET_DEFAULT_NOEDIT;
}
}
if (count($err) == 0) {
if (!empty($moddir)) {
redirect_header('admin.php?fct=tplsets&op=edittpl&id=' . $tplfile->getVar('tpl_id'), 2, _MD_AM_DBUPDATED);
} elseif (isset($redirect)) {
redirect_header('admin.php?fct=tplsets&tplset=' . $tplfile->getVar('tpl_tplset') . '&op=' . trim($redirect), 2, _MD_AM_DBUPDATED);
} else {
redirect_header('admin.php?fct=tplsets', 2, _MD_AM_DBUPDATED);
}
// clear all compiled and cachedfiles
$xoopsTpl->clear_compiled_tpl();
// generate compiled files for the new theme
// block files only for now..
$tplfile_handler = icms::handler('icms_view_template_file');
$dtemplates = & $tplfile_handler->find('default', 'block');
$dcount = count($dtemplates);
// need to do this to pass to $icmsAdminTpl->template_touch function
$GLOBALS['icmsConfig']['template_set'] = $newtplset;
for ($i = 0; $i < $dcount; $i++) {
$found = & $tplfile_handler->find($newtplset, 'block', $dtemplates[$i]->getVar('tpl_refid'), NULL);
if (count($found) > 0) {
// template for the new theme found, compile it
$icmsAdminTpl->template_touch($found[0]->getVar('tpl_id'));
} else {
// not found, so compile 'default' template file
$icmsAdminTpl->template_touch($dtemplates[$i]->getVar('tpl_id'));
}
}
}
$tpl_updated = TRUE;
}
// add read permission for the start module to all groups
if (! $startmod_updated && $new_value != '--' && $config->getVar('conf_catid') == ICMS_CONF && $config->getVar('conf_name') == 'startpage') {
$moduleperm_handler = icms::handler('icms_member_groupperm');
$module_handler = icms::handler('icms_module');
foreach ($new_value as $k => $v) {
function protector_oninstall_base($module, $mydirname)
{
// transations on module install
global $ret;
// TODO :-D
// for Cube 2.1
if (defined('XOOPS_CUBE_LEGACY')) {
$root =& XCube_Root::getSingleton();
$root->mDelegateManager->add('Legacy.Admin.Event.ModuleInstall.' . ucfirst($mydirname) . '.Success', 'protector_message_append_oninstall');
$ret = array();
} else {
if (!is_array($ret)) {
$ret = array();
}
}
$db =& icms_db_Factory::instance();
$mid = $module->getVar('mid');
// TABLES (loading mysql.sql)
$sql_file_path = dirname(__FILE__) . '/sql/mysql.sql';
$prefix_mod = $db->prefix() . '_' . $mydirname;
if (file_exists($sql_file_path)) {
$ret[] = "SQL file found at <b>" . htmlspecialchars($sql_file_path) . "</b>.<br /> Creating tables...";
$sqlutil = new icms_db_legacy_mysql_Utility();
$sql_query = trim(file_get_contents($sql_file_path));
$sqlutil->splitMySqlFile($pieces, $sql_query);
$created_tables = array();
foreach ($pieces as $piece) {
$prefixed_query = $sqlutil->prefixQuery($piece, $prefix_mod);
if (!$prefixed_query) {
$ret[] = "Invalid SQL <b>" . htmlspecialchars($piece) . "</b><br />";
return false;
}
if (!$db->query($prefixed_query[0])) {
$ret[] = '<b>' . htmlspecialchars($db->error()) . '</b><br />';
//var_dump( $db->error() ) ;
return false;
} else {
if (!in_array($prefixed_query[4], $created_tables)) {
$ret[] = 'Table <b>' . htmlspecialchars($prefix_mod . '_' . $prefixed_query[4]) . '</b> created.<br />';
$created_tables[] = $prefixed_query[4];
} else {
$ret[] = 'Data inserted to table <b>' . htmlspecialchars($prefix_mod . '_' . $prefixed_query[4]) . '</b>.</br />';
}
}
}
}
// TEMPLATES
$tplfile_handler =& new icms_view_template_file_Handler(icms::$xoopsDB);
$tpl_path = dirname(__FILE__) . '/templates';
if ($handler = @opendir($tpl_path . '/')) {
while (($file = readdir($handler)) !== false) {
if (substr($file, 0, 1) == '.') {
continue;
}
$file_path = $tpl_path . '/' . $file;
if (is_file($file_path) && in_array(strrchr($file, '.'), array('.html', '.css', '.js'))) {
$mtime = intval(@filemtime($file_path));
$tplfile =& $tplfile_handler->create();
$tplfile->setVar('tpl_source', file_get_contents($file_path), true);
$tplfile->setVar('tpl_refid', $mid);
$tplfile->setVar('tpl_tplset', 'default');
$tplfile->setVar('tpl_file', $mydirname . '_' . $file);
$tplfile->setVar('tpl_desc', '', true);
$tplfile->setVar('tpl_module', $mydirname);
$tplfile->setVar('tpl_lastmodified', $mtime);
$tplfile->setVar('tpl_lastimported', 0);
$tplfile->setVar('tpl_type', 'module');
if (!$tplfile_handler->insert($tplfile)) {
$ret[] = '<span style="color:#ff0000;">ERROR: Could not insert template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> to the database.</span><br />';
} else {
$tplid = $tplfile->getVar('tpl_id');
$ret[] = 'Template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> added to the database. (ID: <b>' . $tplid . '</b>)<br />';
// generate compiled file
if (!icms_view_Tpl::template_touch($tplid)) {
$ret[] = '<span style="color:#ff0000;">ERROR: Failed compiling template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b>.</span><br />';
} else {
$ret[] = 'Template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> compiled.</span><br />';
}
}
}
}
closedir($handler);
}
/*
Fixes Bug #619 : parse Error
*/
if (defined('ICMS_PRELOAD_PATH') && !file_exists(ICMS_PRELOAD_PATH . '/protector.php') && (!defined('PROTECTOR_POSTCHECK_INCLUDED') || !defined('PROTECTOR_PRECHECK_INCLUDED'))) {
if (icms_core_Filesystem::copyRecursive(ICMS_TRUST_PATH . '/modules/protector/patches/ImpressCMS1.1/preload_protector.php', ICMS_PRELOAD_PATH . '/protector.php')) {
$ret[] = 'Successfully moved protector preload<br />';
} else {
$ret[] = icms_core_Message::error("Failed to move protector preload - your site is not protected.", "", FALSE);
}
}
icms_view_Tpl::template_clear_module_cache($mid);
return true;
}
function protector_onupdate_base($module, $mydirname)
{
// transations on module update
global $msgs;
// TODO :-D
// for Cube 2.1
if (defined('XOOPS_CUBE_LEGACY')) {
$root =& XCube_Root::getSingleton();
$root->mDelegateManager->add('Legacy.Admin.Event.ModuleUpdate.' . ucfirst($mydirname) . '.Success', 'protector_message_append_onupdate');
$msgs = array();
} else {
if (!is_array($msgs)) {
$msgs = array();
}
}
$db =& icms_db_Factory::instance();
$mid = $module->getVar('mid');
// TABLES (write here ALTER TABLE etc. if necessary)
// configs (Though I know it is not a recommended way...)
$check_sql = "SHOW COLUMNS FROM " . $db->prefix("config") . " LIKE 'conf_title'";
if (($result = $db->query($check_sql)) && ($myrow = $db->fetchArray($result)) && @$myrow['Type'] == 'varchar(30)') {
$db->queryF("ALTER TABLE " . $db->prefix("config") . " MODIFY `conf_title` varchar(255) NOT NULL default '', MODIFY `conf_desc` varchar(255) NOT NULL default ''");
}
list(, $create_string) = $db->fetchRow($db->query("SHOW CREATE TABLE " . $db->prefix("config")));
foreach (explode('KEY', $create_string) as $line) {
if (preg_match('/(\\`conf\\_title_\\d+\\`) \\(\\`conf\\_title\\`\\)/', $line, $regs)) {
$db->query("ALTER TABLE " . $db->prefix("config") . " DROP KEY " . $regs[1]);
}
}
$db->query("ALTER TABLE " . $db->prefix("config") . " ADD KEY `conf_title` (`conf_title`)");
// 2.x -> 3.0
list(, $create_string) = $db->fetchRow($db->query("SHOW CREATE TABLE " . $db->prefix($mydirname . "_log")));
if (preg_match('/timestamp\\(/i', $create_string)) {
$db->query("ALTER TABLE " . $db->prefix($mydirname . "_log") . " MODIFY `timestamp` DATETIME");
}
// TEMPLATES (all templates have been already removed by modulesadmin)
$tplfile_handler =& icms::handler('icms_view_template_file');
$tpl_path = dirname(__FILE__) . '/templates';
if ($handler = @opendir($tpl_path . '/')) {
while (($file = readdir($handler)) !== false) {
if (substr($file, 0, 1) == '.') {
continue;
}
$file_path = $tpl_path . '/' . $file;
if (is_file($file_path) && in_array(strrchr($file, '.'), array('.html', '.css', '.js'))) {
$mtime = intval(@filemtime($file_path));
$tplfile =& $tplfile_handler->create();
$tplfile->setVar('tpl_source', file_get_contents($file_path), true);
$tplfile->setVar('tpl_refid', $mid);
$tplfile->setVar('tpl_tplset', 'default');
$tplfile->setVar('tpl_file', $mydirname . '_' . $file);
$tplfile->setVar('tpl_desc', '', true);
$tplfile->setVar('tpl_module', $mydirname);
$tplfile->setVar('tpl_lastmodified', $mtime);
$tplfile->setVar('tpl_lastimported', 0);
$tplfile->setVar('tpl_type', 'module');
if (!$tplfile_handler->insert($tplfile)) {
$msgs[] = '<span style="color:#ff0000;">ERROR: Could not insert template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> to the database.</span>';
} else {
$tplid = $tplfile->getVar('tpl_id');
$msgs[] = 'Template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> added to the database. (ID: <b>' . $tplid . '</b>)';
// generate compiled file
if (!icms_view_Tpl::template_touch($tplid)) {
$msgs[] = '<span style="color:#ff0000;">ERROR: Failed compiling template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b>.</span>';
} else {
$msgs[] = 'Template <b>' . htmlspecialchars($mydirname . '_' . $file) . '</b> compiled.</span>';
}
}
}
}
closedir($handler);
}
if (defined(ICMS_PRELOAD_PATH) && !file_exists(ICMS_PRELOAD_PATH . '/protector.php') && (!defined('PROTECTOR_POSTCHECK_INCLUDED') || !defined('PROTECTOR_PRECHECK_INCLUDED')) && function_exists('icms_copyr')) {
icms_core_Filesystem::copyRecursive(ICMS_TRUST_PATH . '/modules/protector/patches/ImpressCMS1.1/preload_protector.php', ICMS_PRELOAD_PATH . '/protector.php');
}
icms_view_Tpl::template_clear_module_cache($mid);
return true;
}