<?php
// $Id: main.php,v 1.9 2004/12/26 19:12:06 onokazu Exp $
//  ------------------------------------------------------------------------ //
//                XOOPS - PHP Content Management System                      //
//                    Copyright (c) 2000 XOOPS.org                           //
//                       <http://www.xoops.org/>                             //
//  ------------------------------------------------------------------------ //
//  This program is free software; you can redistribute it and/or modify     //
//  it under the terms of the GNU General Public License as published by     //
//  the Free Software Foundation; either version 2 of the License, or        //
//  (at your option) any later version.                                      //
//                                                                           //
//  You may not change or alter any portion of this comment or credits       //
//  of supporting developers from this source code or any supporting         //
//  source code which is considered copyrighted (c) material of the          //
//  original comment or credit authors.                                      //
//                                                                           //
//  This program is distributed in the hope that it will be useful,          //
//  but WITHOUT ANY WARRANTY; without even the implied warranty of           //
//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the            //
//  GNU General Public License for more details.                             //
//                                                                           //
//  You should have received a copy of the GNU General Public License        //
//  along with this program; if not, write to the Free Software              //
//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA //
//  ------------------------------------------------------------------------ //
// Author: Kazumi Ono (AKA onokazu)                                          //
// URL: http://www.myweb.ne.jp/, http://www.xoops.org/, http://jp.xoops.org/ //
// Project: The XOOPS Project                                                //
// ------------------------------------------------------------------------- //

if ( !is_object($xoopsUser) || !is_object($xoopsModule) || !$xoopsUser->isAdmin($xoopsModule->mid()) ) {
	exit("Access Denied");
} else {
	$op = 'list';
	if (isset($_POST)) {
		foreach ( $_POST as $k => $v ) {
			${$k} = $v;
		}
	}
	if (isset($_GET['op'])) {
		$op = trim($_GET['op']);
		$id = $moddir = $file = $type = $tplset = null;
		if (isset($_GET['id'])) {
			$id = intval($_GET['id']);
		}
		if (isset($_GET['moddir'])) {
			$moddir = trim($_GET['moddir']);
		}
		if (isset($_GET['file'])) {
			$file = trim($_GET['file']);
		}
		if (isset($_GET['type'])) {
			$type = trim($_GET['type']);
		}
		if (isset($_GET['tplset'])) {
			$tplset = trim($_GET['tplset']);
		}
	}

	if ($op == 'edittpl_go') {
		if (isset($previewtpl)) {
			$op = 'previewtpl';
		}
	}

	switch ($op) {
	case 'list':
		$tplset_handler =& xoops_gethandler('tplset');
		$tplsets =& $tplset_handler->getObjects();
		xoops_cp_header();
		echo '<h4 style="text-align:left">'._MD_TPLMAIN.'</h4>';
		$installed = array();
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$installed_mods = $tpltpl_handler->getModuleTplCount('default');
		$tcount = count($tplsets);
		echo '<table width="100%" cellspacing="1" class="outer"><tr align="center"><th width="25%">'._MD_THMSETNAME.'</th><th>'._MD_CREATED.'</th><th>'._MD_TEMPLATES.'</th><th>'._MD_ACTION.'</th><th>&nbsp;</th></tr>';
		$class = 'even';
		for ($i = 0; $i < $tcount; $i++) {
			$tplsetname = $tplsets[$i]->getVar('tplset_name');
			$installed_themes[] = $tplsetname;
			$class = ($class == 'even') ? 'odd' : 'even';
			echo '<tr class="'.$class.'" align="center"><td class="head">'.$tplsetname.'<br /><br /><span style="font-weight:normal;">'.$tplsets[$i]->getVar('tplset_desc').'</span></td><td>'.formatTimestamp($tplsets[$i]->getVar('tplset_created'), 's').'</td><td align="left"><ul>';
			$tplstats = $tpltpl_handler->getModuleTplCount($tplsetname);
			if (count($tplstats) > 0) {
				$module_handler =& xoops_gethandler('module');
				echo '<ul>';
				foreach ($tplstats as $moddir => $filecount) {
					$module =& $module_handler->getByDirname($moddir);
					if ($installed_mods[$moddir] > $filecount) {
						$filecount = '<span style="color:#ff0000;">'.$filecount.'</span>';
					}
					echo '<li>'.$module->getVar('name').' [<a href="admin.php?fct=tplsets&amp;op=listtpl&amp;tplset='.$tplsetname.'&amp;moddir='.$moddir.'">'._LIST.'</a> (<b>'.$filecount.'</b>)]</li>';
					unset($module);
				}
				$not_installed = array_diff(array_keys($installed_mods), array_keys($tplstats));
			} else {
				$not_installed =& array_keys($installed_mods);
			}
			foreach ($not_installed as $ni) {
				$module =& $module_handler->getByDirname($ni);
				echo '<li>'.$module->getVar('name').' [<a href="admin.php?fct=tplsets&amp;op=listtpl&amp;tplset='.$tplsetname.'&amp;moddir='.$ni.'">'._LIST.'</a> (<span style="color:#ff0000; font-weight: bold;">0</span>)] [<a href="admin.php?fct=tplsets&amp;op=generatemod&amp;tplset='.$tplsetname.'&amp;moddir='.$ni.'">'._MD_GENERATE.'</a>]</li>';
			}
			echo '</ul></td><td>';
			echo '[<a href="admin.php?fct=tplsets&amp;op=download&amp;method=tar&amp;tplset='.$tplsetname.'">'._MD_DOWNLOAD.'</a>]<br />[<a href="admin.php?fct=tplsets&amp;op=clone&amp;tplset='.$tplsetname.'">'._CLONE.'</a>]';
			if ($tplsetname != 'default' && $tplsetname != $xoopsConfig['template_set']) {
				echo '<br />[<a href="admin.php?fct=tplsets&amp;op=delete&amp;tplset='.$tplsetname.'">'._DELETE.'</a>]';
			}
			echo '</td>';
			if ($tplsetname == $xoopsConfig['template_set']) {
				echo '<td><img src="'.XOOPS_URL.'/modules/system/images/check.gif" alt="'._MD_DEFAULTTHEME.'" /></td>';
			} else {
				echo '<td>&nbsp;</td>';
			}
			echo '</tr>';
		}
		echo '</table><br />';

		include_once XOOPS_ROOT_PATH.'/class/xoopsformloader.php';
		$form = new XoopsThemeForm(_MD_UPLOADTAR, 'tplupload_form', 'admin.php');
		$form->setExtra('enctype="multipart/form-data"');
		$form->addElement(new XoopsFormFile(_MD_CHOOSETAR.'<br /><span style="color:#ff0000;">'._MD_ONLYTAR.'</span>', 'tpl_upload', 1000000));
		$form->addElement(new XoopsFormText(_MD_NTHEMENAME.'<br /><span style="font-weight:normal;">'._MD_ENTERTH.'</span>', 'tplset_name', 20, 50));
		$form->addElement(new XoopsFormHidden('op', 'uploadtar_go'));
		$form->addElement(new XoopsFormHidden('fct', 'tplsets'));
		$form->addElement(new XoopsFormButton('', 'upload_button', _MD_UPLOAD, 'submit'));
		$form->display();
		xoops_cp_footer();
		break;
	case 'listtpl':
		$tplset = trim($_GET['tplset']);
		if ($tplset == '') {
			redirect_header('admin.php?fct=tplsets',1);
		}
		if ($moddir == '') {
			redirect_header('admin.php?fct=tplsets',1);
		}
		xoops_cp_header();
		$module_handler =& xoops_gethandler('module');
		$module =& $module_handler->getByDirname($moddir);
		$modname = $module->getVar('name');
		echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'.$tplset.'<br /><br />';

		echo '<h4>'.$modname.'</h4><form action="admin.php" method="post" enctype="multipart/form-data"><table width="100%" class="outer" cellspacing="1"><tr><th width="40%">'._MD_FILENAME.'</th><th>'._MD_LASTMOD.'</th>';
		if ($tplset != 'default') {
			echo '<th>'._MD_LASTIMP.'</th><th colspan="2">'._MD_ACTION.'</th></tr>';
		} else {
			echo '<th>'._MD_ACTION.'</th></tr>';
		}
		$tpltpl_handler =& xoops_gethandler('tplfile');
		// get files that are already installed
		$templates =& $tpltpl_handler->find($tplset, 'module', null, $moddir);
		$inst_files = array();
		$tcount = count($templates);
		for ($i = 0; $i < $tcount; $i++) {
			if ($i % 2 == 0) {
				$class = 'even';
			} else {
				$class = 'odd';
			}
			$last_modified = $templates[$i]->getVar('tpl_lastmodified');
			$last_imported = $templates[$i]->getVar('tpl_lastimported');
			$last_imported_f = ($last_imported > 0) ? formatTimestamp($last_imported, 'l') : '';
			echo  '<tr class="'.$class.'"><td class="head">'.$templates[$i]->getVar('tpl_file').'<br /><br /><span style="font-weight:normal;">'.$templates[$i]->getVar('tpl_desc').'</span></td><td>'.formatTimestamp($last_modified, 'l').'</td>';
			$filename = $templates[$i]->getVar('tpl_file');
			if ($tplset != 'default') {
				$physical_file = XOOPS_THEME_PATH.'/'.$tplset.'/templates/'.$moddir.'/'.$filename;
				if (file_exists($physical_file)) {
					$mtime = filemtime($physical_file);
					if ($last_imported < $mtime) {
						if ($mtime > $last_modified) {
							$bg = '#ff9999';
						} elseif($mtime > $last_imported) {
							$bg = '#99ff99';
						}
						echo '<td style="background-color:'.$bg.';">'.$last_imported_f.' [<a href="admin.php?fct=tplsets&amp;tplset='.$tplset.'&amp;moddir='.$moddir.'&amp;op=importtpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._MD_IMPORT.'</a>]';
					} else {
						echo '<td>'.$last_imported_f;
					}
				} else {
					echo '<td>'.$last_imported_f;
				}
				echo '</td><td>[<a href="admin.php?fct=tplsets&amp;op=edittpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._EDIT.'</a>] [<a href="admin.php?fct=tplsets&amp;op=deletetpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._DELETE.'</a>] [<a href="admin.php?fct=tplsets&amp;op=downloadtpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._MD_DOWNLOAD.'</a>]</td><td align="right"><input type="file" name="'.$filename.'" id="'.$filename.'" /><input type="hidden" name="xoops_upload_file[]" id="xoops_upload_file[]" value="'.$filename.'" /><input type="hidden" name="old_template['.$filename.']" value="'.$templates[$i]->getVar('tpl_id').'" /></td>';
			} else {
				echo '<td>[<a href="admin.php?fct=tplsets&amp;op=edittpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._MD_VIEW.'</a>] [<a href="admin.php?fct=tplsets&amp;op=downloadtpl&amp;id='.$templates[$i]->getVar('tpl_id').'">'._MD_DOWNLOAD.'</a>]</td>';
			}
			echo '</tr>'."\n";
			$inst_files[] = $filename;
		}
		if ($tplset != 'default') {
			include_once XOOPS_ROOT_PATH.'/class/xoopslists.php';
			// get difference between already installed files and the files under modules directory. which will be recognized as files that are not installed
			$notinst_files = array_diff(XoopsLists::getFileListAsArray(XOOPS_ROOT_PATH.'/modules/'.$moddir.'/templates/'), $inst_files);
			foreach ($notinst_files as $nfile) {
				if ($nfile != 'index.html') {
					echo  '<tr><td style="background-color:#FFFF99; padding: 5px;">'.$nfile.'</td><td style="background-color:#FFFF99; padding: 5px;">&nbsp;</td><td style="background-color:#FFFF99; padding: 5px;">';
					$physical_file = XOOPS_ROOT_PATH.'/templates/'.$tplset.'/'.$moddir.'/'.$nfile;
					if (file_exists($physical_file)) {
						echo '[<a href="admin.php?fct=tplsets&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'&amp;op=importtpl&amp;file='.urlencode($nfile).'">'._MD_IMPORT.'</a>]';
					} else {
						echo '&nbsp;';
					}
					echo '</td><td style="background-color:#FFFF99; padding: 5px;">[<a href="admin.php?fct=tplsets&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'&amp;op=generatetpl&amp;type=module&amp;file='.urlencode($nfile).'">'._MD_GENERATE.'</a>]</td><td style="background-color:#FFFF99; padding: 5px; text-align:right;"><input type="file" name="'.$nfile.'" id="'.$nfile.'" /><input type="hidden" name="xoops_upload_file[]" id="xoops_upload_file[]" value="'.$nfile.'" /></td></tr>'."\n";
				}
			}
		}
		echo '</table><br /><table width="100%" class="outer" cellspacing="1"><tr><th width="40%">'._MD_FILENAME.'</th><th>'._MD_LASTMOD.'</th>';
		if ($tplset != 'default') {
			echo '<th>'._MD_LASTIMP.'</th><th colspan="2">'._MD_ACTION.'</th></tr>';
		} else {
			echo '<th>'._MD_ACTION.'</th></tr>';
		}
		$btemplates =& $tpltpl_handler->find($tplset, 'block', null, $moddir);
		$binst_files = array();
		$btcount = count($btemplates);
		for ($j = 0; $j < $btcount; $j++) {
			$last_imported = $btemplates[$j]->getVar('tpl_lastimported');
			$last_imported_f = ($last_imported > 0) ? formatTimestamp($last_imported, 'l') : '';
			$last_modified = $btemplates[$j]->getVar('tpl_lastmodified');
			if ($j % 2 == 0) {
				$class = 'even';
			} else {
				$class = 'odd';
			}
			echo  '<tr class="'.$class.'"><td class="head"><span style="font-weight:bold;">'.$btemplates[$j]->getVar('tpl_file').'</span><br /><br /><span style="font-weight:normal;">'.$btemplates[$j]->getVar('tpl_desc').'</span></td><td>'.formatTimestamp($last_modified, 'l').'</td>';
			$filename = $btemplates[$j]->getVar('tpl_file');
			$physical_file = XOOPS_ROOT_PATH.'/templates/'.$tplset.'/'.$moddir.'/blocks/'.$filename;
			if ($tplset != 'default') {
				if (file_exists($physical_file)) {
					$mtime = filemtime($physical_file);
					if ($last_imported < $mtime) {
						if ($mtime > $last_modified) {
							$bg = '#ff9999';
						} elseif($mtime > $last_imported) {
							$bg = '#99ff99';
						}
						echo '<td style="background-color:'.$bg.';">'.$last_imported_f.' [<a href="admin.php?fct=tplsets&amp;tplset='.$tplset.'&amp;op=importtpl&amp;moddir='.$moddir.'&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._MD_IMPORT.'</a>]';
					} else {
						echo '<td>'.$last_imported_f;
					}
				} else {
					echo '<td>'.$last_imported_f;
				}
				echo '</td><td>[<a href="admin.php?fct=tplsets&amp;op=edittpl&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._EDIT.'</a>] [<a href="admin.php?fct=tplsets&amp;op=deletetpl&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._DELETE.'</a>] [<a href="admin.php?fct=tplsets&amp;op=downloadtpl&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._MD_DOWNLOAD.'</a>]</td><td align="right"><input type="file" name="'.$filename.'" id="'.$filename.'" /><input type="hidden" name="xoops_upload_file[]" id="xoops_upload_file[]" value="'.$filename.'" /><input type="hidden" name="old_template['.$filename.']" value="'.$btemplates[$j]->getVar('tpl_id').'" /></td>';
			} else {
				echo '<td>[<a href="admin.php?fct=tplsets&amp;op=edittpl&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._MD_VIEW.'</a>] [<a href="admin.php?fct=tplsets&amp;op=downloadtpl&amp;id='.$btemplates[$j]->getVar('tpl_id').'">'._MD_DOWNLOAD.'</a>]</td>';
			}
			echo '</tr>'."\n";
			$binst_files[] = $filename;
		}
		if ($tplset != 'default') {
			include_once XOOPS_ROOT_PATH.'/class/xoopslists.php';
			$bnotinst_files = array_diff(XoopsLists::getFileListAsArray(XOOPS_ROOT_PATH.'/modules/'.$moddir.'/templates/blocks/'), $binst_files);
			foreach ($bnotinst_files as $nfile) {
				if ($nfile != 'index.html') {
					echo  '<tr style="background-color:#FFFF99;"><td style="background-color:#FFFF99; padding: 5px;">'.$nfile.'</td><td style="background-color:#FFFF99; padding: 5px;">&nbsp;</td><td style="background-color:#FFFF99; padding: 5px;">';
					$physical_file = XOOPS_ROOT_PATH.'/templates/'.$tplset.'/'.$moddir.'/blocks/'.$nfile;
					if (file_exists($physical_file)) {
						echo '[<a href="admin.php?fct=tplsets&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'&amp;op=importtpl&amp;file='.urlencode($nfile).'">'._MD_IMPORT.'</a>]';
					} else {
						echo '&nbsp;';
					}
					echo '</td><td style="background-color:#FFFF99; padding: 5px;">[<a href="admin.php?fct=tplsets&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'&amp;op=generatetpl&amp;type=block&amp;file='.urlencode($nfile).'">'._MD_GENERATE.'</a>]</td><td style="background-color:#FFFF99; padding: 5px; text-align: right"><input type="file" name="'.$nfile.'" id="'.$nfile.'" /><input type="hidden" name="xoops_upload_file[]" id="xoops_upload_file[]" value="'.$nfile.'" /></td></tr>'."\n";
				}
			}
		}
		echo '</table>';
		if ($tplset != 'default') {
			echo '<div style="text-align: right; margin-top: 5px;"><input type="hidden" name="fct" value="tplsets" /><input type="hidden" name="op" value="update" /><input type="hidden" name="moddir" value="'.$moddir.'" /><input type="hidden" name="tplset" value="'.$tplset.'" /><input type="submit" value="'._MD_UPLOAD.'" /></div></form>';
			//echo '<table class="outer" width="70%"><tr><td style="width: 30px; background-color:#ff9999;">&nbsp;</td><td>'._MD_FILENEWER.'</td></tr><tr><td style="width: 30px; background-color:#99ff99;">&nbsp;</td><td>'._MD_FILEIMPORT.'</td></tr><tr><td style="width: 30px; background-color:#ffff99;">&nbsp;</td><td>'._MD_FILEGENER.'</td></tr></table>';
		}
		xoops_cp_footer();
		break;
	case 'edittpl':
		if ($id <= 0) {
			redirect_header('admin.php?fct=tplsets', 1);
		}
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->get($id, true);
		if (is_object($tplfile)) {
			$tplset = $tplfile->getVar('tpl_tplset');
			$tform = array('tpl_tplset' => $tplset, 'tpl_id' => $id, 'tpl_file' => $tplfile->getVar('tpl_file'), 'tpl_desc' => $tplfile->getVar('tpl_desc'), 'tpl_lastmodified' => $tplfile->getVar('tpl_lastmodified'), 'tpl_source' => $tplfile->getVar('tpl_source', 'E'), 'tpl_module' => $tplfile->getVar('tpl_module'));
			include_once XOOPS_ROOT_PATH.'/modules/system/admin/tplsets/tplform.php';
			xoops_cp_header();
			echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;<a href="./admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$tplfile->getVar('tpl_module').'&amp;tplset='.$tplset.'">'.$tplset.'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_EDITTEMPLATE.'<br /><br />';
			$form->display();
			xoops_cp_footer();
			exit();
		} else {
			$err[] = 'Selected template (ID: $id) does not exist';
		}
		xoops_cp_header();
		xoops_error($err);
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'edittpl_go':
		if ($id <= 0) {
			redirect_header('admin.php?fct=tplsets', 1);
		}
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->get($id, true);
		$err = array();
		if (!is_object($tplfile)) {
			$err[] = 'Selected template (ID: $id) does not exist';
		} else {
			if ($tplfile->getVar('tpl_tplset') != 'default') {
				$tplfile->setVar('tpl_source', $html);
				$tplfile->setVar('tpl_lastmodified', time());

				if (!$tpltpl_handler->insert($tplfile)) {
					$err[] = 'Could not insert template file to the database.';
				} else {
					include_once XOOPS_ROOT_PATH.'/class/template.php';
					$xoopsTpl = new XoopsTpl();
					if ($xoopsTpl->is_cached('db:'.$tplfile->getVar('tpl_file'))) {
						if (!$xoopsTpl->clear_cache('db:'.$tplfile->getVar('tpl_file'))) {
						}
					}
					if ($tplfile->getVar('tpl_tplset') == $xoopsConfig['template_set']) {
						xoops_template_touch($id);
					}
				}
			} else {
				$err[] = 'Default template files cannot be edited.';
			}
		}
		if (count($err) == 0) {
			if (!empty($moddir)) {
				redirect_header('admin.php?fct=tplsets&amp;op=edittpl&amp;id='.$tplfile->getVar('tpl_id'), 2, _MD_AM_DBUPDATED);
			} elseif (isset($redirect)) {
				redirect_header('admin.php?fct=tplsets&amp;tplset='.$tplfile->getVar('tpl_tplset').'&amp;op='.trim($redirect), 2, _MD_AM_DBUPDATED);
			} else {
				redirect_header('admin.php?fct=tplsets', 2, _MD_AM_DBUPDATED);
			}
		}
		xoops_cp_header();
		xoops_error($err);
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'deletetpl':
		xoops_cp_header();
		xoops_confirm(array('id' => $id, 'op' => 'deletetpl_go', 'fct' => 'tplsets'), 'admin.php', _MD_RUSUREDELTPL, _YES);
		xoops_cp_footer();
		break;
	case 'deletetpl_go':
		if ($id <= 0) {
			redirect_header('admin.php?fct=tplsets', 1);
		}
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->get($id);
		$err = array();
		if (!is_object($tplfile)) {
			$err[] = 'Selected template (ID: $id) does not exist';
		} else {
			if ($tplfile->getVar('tpl_tplset') != 'default') {
				if (!$tpltpl_handler->delete($tplfile)) {
					$err[] = 'Could not delete '.$tplfile->getVar('tpl_file').' from the database.';
				} else {
					// need to compile default xoops template
					if ($tplfile->getVar('tpl_tplset') == $xoopsConfig['template_set']) {
						$defaulttpl =& $tpltpl_handler->find('default', $tplfile->getVar('tpl_type'), $tplfile->getVar('tpl_refid'), null, $tplfile->getVar('tpl_file'));
						if (count($defaulttpl) > 0) {
							include_once XOOPS_ROOT_PATH.'/class/template.php';
							xoops_template_touch($defaulttpl[0]->getVar('tpl_id'), true);
						}
					}
				}
			} else {
				$err[] = 'Default template files cannot be deleted.';
			}
		}
		if (count($err) == 0) {
			redirect_header('admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$tplfile->getVar('tpl_module').'&amp;tplset='.urlencode($tplfile->getVar('tpl_tplset')), 2, _MD_AM_DBUPDATED);
		}
		xoops_cp_header();
		xoops_error($err);
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'delete':
		xoops_cp_header();
		xoops_confirm(array('tplset' => $tplset, 'op' => 'delete_go', 'fct' => 'tplsets'), 'admin.php', _MD_RUSUREDELTH, _YES);
		xoops_cp_footer();
		break;
	case 'delete_go':
		$msgs = array();
		if ($tplset != 'default' && $tplset != $xoopsConfig['template_set']) {
			$tpltpl_handler =& xoops_gethandler('tplfile');
			$templates =& $tpltpl_handler->getObjects(new Criteria('tpl_tplset', $tplset));
			$tcount = count($templates);
			if ($tcount > 0) {
				$msgs[] = 'Deleting template files...';
				for ($i = 0; $i < $tcount; $i++) {
					if (!$tpltpl_handler->delete($templates[$i])) {
						$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not delete template <b>'.$templates[$i]->getVar('tpl_file').'</b>. ID: <b>'.$templates[$i]->getVar('tpl_id').'</b></span>';
					} else {
						$msgs[] = '&nbsp;&nbsp;Template <b>'.$templates[$i]->getVar('tpl_file').'</b> deleted. ID: <b>'.$templates[$i]->getVar('tpl_id').'</b>';
					}
				}
			}
/*
			$image_handler =& xoops_gethandler('imagesetimg');
			$imagefiles =& $image_handler->getObjects(new Criteria('tplset_name', $tplset));
			$icount = count($imagefiles);
			if ($icount > 0) {
				$msgs[] = 'Deleting image files...';
				for ($i = 0; $i < $icount; $i++) {
					if (!$image_handler->delete($imagefiles[$i])) {
						$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not remove file <b>'.$imagefiles[$i]->getVar('imgsetimg_file').'</b> from the database (ID: <b>'.$imagefiles[$i]->getVar('imgsetimg_id').'</b>)</span>';
					} else {
						$msgs[] = '&nbsp;&nbsp;File <b>'.$imagefiles[$i]->getVar('imgsetimg_file').'</b> deleted from the database (ID: <b>'.$imagefiles[$i]->getVar('imgsetimg_id').'</b>)</span>';
					}
				}
			}
			$imageset_handler =& xoops_gethandler('imageset');
			$imagesets =& $imageset_handler->getObjects(new Criteria('tplset_name', $tplset));
			$scount = count($imagesets);
			if ($scount > 0) {
				$msgs[] = 'Deleting image set data...';
				for ($i = 0; $i < $scount; $i++) {
					if (!$imageset_handler->unlinktplset($imagesets[$i]->getVar('imgset_id'), $tplset)) {
						$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not remove link between <b>'.$imagesets[$i]->getVar('imgset_name').'</b> (ID: <b>'.$imagesets[$i]->getVar('imgset_id').'</b>) and '.$tplset.' from the database.</span>';
					} else {
						$msgs[] = '&nbsp;&nbsp;Link between <b>'.$imagesets[$i]->getVar('imgset_name').'</b> (ID: <b>'.$imagesets[$i]->getVar('imgset_id').'</b>) and <b>'.$tplset.'</b> removed from the database.</span>';
					}
					if (!$imageset_handler->delete($imagesets[$i])) {
						$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not delete image set <b>'.$imagesets[$i]->getVar('imgset_name').'</b> (ID: <b>'.$imagesets[$i]->getVar('imgset_id').'</b>) from the database.</span>';
					} else {
						$msgs[] = '&nbsp;&nbsp;Image set <b>'.$imagesets[$i]->getVar('imgset_name').'</b> (ID: <b>'.$imagesets[$i]->getVar('imgset_id').'</b>) removed from the database.</span>';
					}
				}
			}
*/
			$tplset_handler =& xoops_gethandler('tplset');
			$tplsets =& $tplset_handler->getObjects(new Criteria('tplset_name', $tplset));
			if (count($tplsets) > 0 && is_object($tplsets[0])) {
				$msgs[] = 'Deleting template set data...';
				if (!$tplset_handler->delete($tplsets[0])) {
					$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Template set '.$tplset.' could not be deleted.</span>';
				} else {
					$msgs[] = '&nbsp;&nbsp;Template set data removed from the database.';
				}
			}
		} else {
			$msgs[] = '<span style="color:#ff0000;">ERROR: Default template files cannot be deleted</span>';
		}
		xoops_cp_header();
		foreach ($msgs as $msg) {
			echo '<code>'.$msg.'</code><br />';
		}
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'clone':
		include_once XOOPS_ROOT_PATH.'/class/xoopsformloader.php';
		$form = new XoopsThemeForm(_MD_CLONETHEME, 'template_form', 'admin.php');
		$form->addElement(new XoopsFormLabel(_MD_THEMENAME, $tplset));
		$form->addElement(new XoopsFormText(_MD_NEWNAME, 'newtheme', 30, 50), true);
		$form->addElement(new XoopsFormHidden('tplset', $tplset));
		$form->addElement(new XoopsFormHidden('op', 'clone_go'));
		$form->addElement(new XoopsFormHidden('fct', 'tplsets'));
		$form->addElement(new XoopsFormButton('', 'tpl_button', _SUBMIT, 'submit'));
		xoops_cp_header();
		echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_CLONETHEME.'<br /><br />';
		$form->display();
		xoops_cp_footer();
		break;
	case 'clone_go':
		$msgs = array();
		$tplset = trim($tplset);
		$newtheme = trim($newtheme);
		$tpltpl_handler =& xoops_gethandler('tplfile');
		xoops_cp_header();
		if ($tplset == $newtheme) {
			xoops_error('Template set name must be a different name.');
		} elseif ($tpltpl_handler->getCount(new Criteria('tpl_tplset', $newtheme)) > 0) {
			xoops_error('Template set <b>'.$newtheme.'</b> already exists.');
		} else {
			$tplset_handler =& xoops_gethandler('tplset');
			$tplsetobj =& $tplset_handler->create();
			$tplsetobj->setVar('tplset_name', $newtheme);
			$tplsetobj->setVar('tplset_created', time());
			if (!$tplset_handler->insert($tplsetobj)) {
				$msgs[] = '<span style="color:#ff0000;">ERROR: Could not create template set <b>'.$newtheme.'</b>.</span><br />';
			} else {
				$tplsetid = $tplsetobj->getVar('tplset_id');
				$templates =& $tpltpl_handler->getObjects(new Criteria('tpl_tplset', $tplset), true);
				$tcount = count($templates);
				if ($tcount > 0) {
					$msgs[] = 'Copying template files...';
					for ($i = 0; $i < $tcount; $i++) {
						$newtpl =& $templates[$i]->xoopsClone();
						$newtpl->setVar('tpl_tplset', $newtheme);
						$newtpl->setVar('tpl_id', 0);
						$newtpl->setVar('tpl_lastimported', 0);
						$newtpl->setVar('tpl_lastmodified', time());
						if (!$tpltpl_handler->insert($newtpl)) {
							$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed copying template <b>'.$templates[$i]->getVar('tpl_file').'</b>. ID: <b>'.$templates[$i]->getVar('tpl_id').'</b></span>';
						} else {
							$msgs[] = '&nbsp;&nbsp;Template <b>'.$templates[$i]->getVar('tpl_file').'</b> copied. ID: <b>'.$newtpl->getVar('tpl_id').'</b>';
						}
						unset($newtpl);
					}
/*
					$imageset_handler =& xoops_gethandler('imageset');
					$orig_imgset =& $imageset_handler->getObjects(new Criteria('tplset_name', $tplset));
					$msgs[] = 'Copying image files...';
					$imgsetcount = count($orig_imgset);
					for ($i = 0; $i < $imgsetcount; $i++) {
						if ($orig_imgset[$i]->getVar('imgset_refid') == 0) {
							$new_imgset =& $orig_imgset[$i]->xoopsClone();
							$new_imgset->setVar('imgset_id', 0);
							$new_imgset->setVar('imgset_name', $newtheme);
							if (!$imageset_handler->insert($new_imgset)) {
								$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed copying template image set data.</span>';
							} else {
								$new_imgsetid = $new_imgset->getVar('imgset_id');
								$msgs[] = '&nbsp;&nbsp;Template image set data copied. (Name: <b>'.$newtheme.'</b> ID: <b>'.$new_imgsetid.'</b>)</span>';
								$image_handler = xoops_gethandler('imagesetimg');
								$orig_images =& $image_handler->getByImageset($orig_imgset[$i]->getVar('imgset_id'));
								$imgcount = count($orig_images);
								for ($j = 0; $j < $imgcount; $j++) {
									$new_image =& $orig_images[$j]->xoopsClone();
									$new_image->setVar('imgsetimg_id', 0);
									$new_image->setVar('imgsetimg_imgset', $new_imgsetid);
									if (!$image_handler->insert($new_image)) {
										$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed copying data for image file <b>'.$orig_images[$j]->getVar('imgsetimg_file').'</b>.</span>';
									} else {
										$thisimage = $orig_images[$j]->getVar('imgsetimg_file');
										$msgs[] = '&nbsp;&nbsp;Data for image file <b>'.$thisimage.'</b> copied.</span>';
									}
								}
								if (!$imageset_handler->linktplset($new_imgsetid, $newtheme)) {
									$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed creating link between template image set (ID : <b>'.$new_imgsetid.'</b>) and template set <b>'.$newtheme.'</b>.</span>';
								} else {
									$msgs[] = '&nbsp;&nbsp;Template image set (ID: <b>'.$new_imgsetid.'</b>) and template set <b>'.$newtheme.'</b> linked.</span>';
								}
							}
						} else {
							// module image set, so just create another link to the new template set
							if (!$imageset_handler->linktplset($orig_imgset[$i]->getVar('imgset_id'), $newtheme)) {
								$msgs[] = '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed creating link between module image set  <b>'.$orig_imgset[$i]->getVar('imgset_name').'</b> (ID <b>'.$orig_imgset[$i]->getVar('imgset_id').'</b>) and template set <b>'.$newtheme.'</b>.</span>';
							} else {
								$msgs[] = '&nbsp;&nbsp;Module image set <b>'.$orig_imgset[$i]->getVar('imgset_name').'</b> (ID <b>'.$orig_imgset[$i]->getVar('imgset_id').'</b>) and template set <b>'.$newtheme.'</b> linked.';
							}
						}
					}
*/
					$msgs[] = 'Template set <b>'.$newtheme.'</b> created. (ID: <b>'.$tplsetid.'</b>)<br />';
				} else {
					$msgs[] = '<span style="color:#ff0000;">ERROR: Template files for '.$theme.' do not exist</span>';
				}
			}
		}
		foreach ($msgs as $msg) {
			echo '<code>'.$msg.'</code><br />';
		}
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
/*
	case 'editimage':
		xoops_cp_header();
		echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_EDITSKINIMG.' ('.$tplset.')<br /><br />';
		include XOOPS_ROOT_PATH.'/modules/system/admin/tplsets/tplimgform.php';
		xoops_cp_footer();
		break;
	case 'updateimage':
		$tplset = trim($tplset);
		$err = array();
		if ($tplset != 'default') {
			include_once XOOPS_ROOT_PATH.'/class/uploader.php';
			$mimetypes = array('image/gif', "image/pjpeg", "image/jpeg", "image/jpeg", "image/jpeg", "image/png", 'image/x-png', "application/x-shockwave-flash", "image/tiff", "image/tiff", 'image/bmp');
			if ($tplset == $xoopsConfig['template_set']) {
				//directly upload to cache to reduce one step ;-)
				$uploader = new XoopsMediaUploader(XOOPS_CACHE_PATH, $mimetypes, 500000);
			} else {
				$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, $mimetypes, 500000);
			}
			$image_handler =& xoops_gethandler('imagesetimg');
			foreach ($imgids as $id) {
				if (isset($imgfiles[$id]) && trim($imgfiles[$id]) != '') {
					if ($uploader->fetchMedia('imgfiles', $id)) {
						$image =& $image_handler->get($id);
						$uploader->setTargetFileName($image->getVar('imgsetimg_file'));
						if (!$uploader->upload()) {
							$err[] = $uploader->getErrors();
						} else {
							$fp = @fopen($uploader->getSavedDestination(), 'rb');
							$image->setVar('imgsetimg_body', @fread($fp, filesize($uploader->getSavedDestination())), true);
							@fclose($fp);
							if ($tplset != $xoopsConfig['template_set']) {
								@unlink($uploader->getSavedDestination());
							}
							if (!$image_handler->insert($image)) {
								$err[] = 'Could not save '.$image->getVar('imgsetimg_file');
							}
						}
					} else {
						$err[] = $uploader->getErrors();
					}
				} elseif (!empty($imgdelete[$id])) {
					$image =& $image_handler->get($id);
					if (!$image_handler->delete($image)) {
						$err[] = 'Could not remove image file '.$image->getVar('imgsetimg_file');
					} else {
						if ($tplset == $xoopsConfig['template_set']) {
							@unlink(XOOPS_CACHE_PATH.'/'.$image->getVar('imgsetimg_file'));
						}
					}
				}
			}
		} else {
			$err[] = 'Cannot change XOOPS system default theme set images';
		}
		// delete image set if no more images
		$current_imgs =& $image_handler->getByImageset($imgset);
		if (count($current_imgs) == 0) {
			$imageset_handler =& xoops_gethandler('imageset');
			$imgset =& $imageset_handler->get($imgset);
			if (!$imageset_handler->delete($imgset)) {
				$err[] = 'Could not remove image set '.$imgset->getVar('imgset_name');
			}
		}
		if (count($err) > 0) {
			xoops_cp_header();
			xoops_error($err);
			xoops_cp_footer();
		} else {
			redirect_header('admin.php?fct=tplsets&amp;op=editimage&amp;tplset='.$tplset, 2, _MD_AM_DBUPDATED);
		}
		break;
	case 'addimage':
		$tplset = trim($tplset);
		$err = array();
		if ($tplset != 'default') {
			include_once XOOPS_ROOT_PATH.'/class/uploader.php';
			$mimetypes = array('image/gif', "image/pjpeg", "image/jpeg", "image/jpeg", "image/jpeg", "image/png", 'image/x-png', "application/x-shockwave-flash", "image/tiff", "image/tiff", 'image/bmp');
			if ($tplset == $xoopsConfig['template_set']) {
				//directly upload to cache to reduce one step ;-)
				$uploader = new XoopsMediaUploader(XOOPS_CACHE_PATH, $mimetypes, 500000);
			} else {
				$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, $mimetypes, 500000);
			}
			$image_handler =& xoops_gethandler('imagesetimg');
			if ($uploader->fetchMedia('imgfile')) {

				if (!empty($imgset)) {
					//check if an image with the same name exists
					if ($image_handler->imageExists($uploader->getMediaName(), $imgset)) {
						$err[] = 'Image file '.$uploader->getMediaName().' already exists';
					}
				}
				if (empty($err)) {
					$image =& $image_handler->create();
					if (!$uploader->upload()) {
						$err[] = $uploader->getErrors();
					} else {
						if (!$fp = @fopen($uploader->getSavedDestination(), 'rb')) {
							$err[] = 'Could not read '.$uploader->getSavedFileName();
						} else {
							$image->setVar('imgsetimg_body', @fread($fp, filesize($uploader->getSavedDestination())), true);
							@fclose($fp);
							if ($tplset != $xoopsConfig['template_set']) {
								@unlink($uploader->getSavedDestination());
							}
							$image->setVar('imgsetimg_file', $uploader->getSavedFileName());
							if (!empty($imgset)) {
								$image->setVar('imgsetimg_imgset', $imgset);
							} else {
								$imageset_handler =& xoops_gethandler('imageset');
								$imgset =& $imageset_handler->create();
								$imgset->setVar('imgset_name', $tplset);
								$imgset->setVar('imgset_refid', 0);
								if (!$imageset_handler->insert($imgset)) {
									$err[] = 'Could not create image set.';
								} else {
									$newimgsetid = $imgset->getVar('imgset_id');
									$image->setVar('imgsetimg_imgset', $newimgsetid);
									if (!$imageset_handler->linktplset($newimgsetid, $tplset)) {
										$err[] = 'Failed linking image set to template set '.$tplset;
									}
								}
							}
							if (count($err) == 0) {
								if (!$image_handler->insert($image)) {
									$err[] = 'Could not save '.$image->getVar('imgsetimg_file');
								}
							}
						}
					}
				}
			} else {
				$err[] = $uploader->getErrors();
			}
		}
		if (count($err) > 0) {
			xoops_cp_header();
			xoops_error($err);
			xoops_cp_footer();
		} else {
			redirect_header('admin.php?fct=tplsets&amp;op=editimage&amp;tplset='.$tplset, 2, _MD_AM_DBUPDATED);
		}
		break;
	case 'showimage':
		$image_id = isset($_GET['id']) ? intval($_GET['id']) : 0;
		if (empty($image_id)) {
			header('Content-type: image/gif');
			readfile(XOOPS_UPLOAD_PATH.'/blank.gif');
			exit();
		}
		$image_handler =& xoops_gethandler('imagesetimg');
		$image =& $image_handler->getObjects(new Criteria('imgsetimg_id', $image_id));
		if (count($image) > 0) {
			$mimetypes = array('gif' => 'image/gif', "jpe"=>"image/jpeg", "jpeg"=>"image/jpeg", "jpg"=>"image/jpeg", "png"=>"image/png", "swf"=>"application/x-shockwave-flash", "tif"=>"image/tiff", "tiff"=>"image/tiff", "bmp" => 'image/bmp');
			$ext = substr(strtolower(strrchr($image[0]->getVar('imgsetimg_file'), '.')), 1);
			if (in_array($ext, array_keys($mimetypes))) {
				header('Content-type: '.$mimetypes[$ext]);
			}
			header('Cache-control: max-age=31536000');
			header('Expires: '.gmdate("D, d M Y H:i:s",time()+31536000).'GMT');
			header('Content-disposition: filename='.$image[0]->getVar('imgsetimg_file'));
			header('Content-Length: '.strlen($image[0]->getVar('imgsetimg_body')));
			header('Last-Modified: '.gmdate("D, d M Y H:i:s", time()).'GMT');
			echo $image[0]->getVar('imgsetimg_body');
		} else {
			header('Content-type: image/gif');
			readfile(XOOPS_UPLOAD_PATH.'/blank.gif');
		}
		break;
*/
	case 'viewdefault':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->get($id);
		$default =& $tpltpl_handler->find('default', $tplfile->getVar('tpl_type'), $tplfile->getVar('tpl_refid'), null, $tplfile->getVar('tpl_file'));
		echo "<!DOCTYPE html PUBLIC '//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>";
		echo '<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="'._LANGCODE.'" lang="'._LANGCODE.'">
		<head>
		<meta http-equiv="content-type" content="text/html; charset='._CHARSET.'" />
		<meta http-equiv="content-language" content="'._LANGCODE.'" />
		<title>'.$xoopsConfig['sitename'].' Administration</title>
		<link rel="stylesheet" type="text/css" media="all" href="'.XOOPS_URL.'/xoops.css" />
        	<link rel="stylesheet" type="text/css" media="all" href="'.XOOPS_URL.'/modules/system/style.css" />
		</head><body>';
		if (is_object($default[0])) {
			$tpltpl_handler->loadSource($default[0]);
			$last_modified = $default[0]->getVar('tpl_lastmodified');
			$last_imported = $default[0]->getVar('tpl_lastimported');
			if ($default[0]->getVar('tpl_type') == 'block') {
				$path = XOOPS_ROOT_PATH.'/modules/'.$default[0]->getVar('tpl_module').'/blocks/'.$default[0]->getVar('tpl_file');
			} else {
				$path = XOOPS_ROOT_PATH.'/modules/'.$default[0]->getVar('tpl_module').'/'.$default[0]->getVar('tpl_file');
			}
			$colorchange = '';
			if (!file_exists($path)) {
				$filemodified_date = _MD_NOFILE;
				$lastimported_date = _MD_NOFILE;
			} else {
				$tpl_modified = filemtime($path);
				$filemodified_date = formatTimestamp($tpl_modified, 'l');
				if ($tpl_modified > $last_imported) {
					$colorchange = ' bgcolor="#ffCC99"';
				}
				$lastimported_date = formatTimestamp($last_imported, 'l');
			}
			include_once XOOPS_ROOT_PATH.'/class/xoopsformloader.php';
			$form = new XoopsThemeForm(_MD_VIEWDEFAULT, 'template_form', 'admin.php');
			$form->addElement(new XoopsFormTextArea(_MD_FILEHTML, 'html', $default[0]->getVar('tpl_source'), 25));
			$form->display();
		} else {
			echo 'Selected file does not exist';
		}
		echo '<div style="text-align:center;">[<a href="#" onclick="javascript:window.close();">'._CLOSE.'</a>]</div></body></html>';
		break;
	case 'downloadtpl':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tpl =& $tpltpl_handler->get(intval($id), true);
		if (is_object($tpl)) {
			$output = $tpl->getVar('tpl_source');
			strlen($output);
			header('Cache-Control: no-cache, must-revalidate');
			header('Pragma: no-cache');
			header('Content-Type: application/force-download');
			if (preg_match("/MSIE 5.5/", $_SERVER['HTTP_USER_AGENT'])) { 
				header('Content-Disposition: filename='.$tpl->getVar('tpl_file')); 
			} else {
				header('Content-Disposition: attachment; filename='.$tpl->getVar('tpl_file'));
			}
			header('Content-length: '.strlen($output));
			echo $output;
		}
		break;
	case 'uploadtpl':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$id = intval($_GET['id']);
		$tpl =& $tpltpl_handler->get($id);
		xoops_cp_header();
		echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;<a href="./admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$tpl->getVar('tpl_module').'&amp;tplset='.$tpl->getVar('tpl_tplset').'">'.$tpl->getVar('tpl_tplset').'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_UPLOAD.'<br /><br />';
		if (is_object($tpl)) {
			include_once XOOPS_ROOT_PATH.'/class/xoopsformloader.php';
			$form = new XoopsThemeForm(_MD_UPLOAD, 'tplupload_form', 'admin.php');
			$form->setExtra('enctype="multipart/form-data"');
			$form->addElement(new XoopsFormLabel(_MD_FILENAME, $tpl->getVar('tpl_file').' ('.$tpl->getVar('tpl_tplset').')'));
			$form->addElement(new XoopsFormFile(_MD_CHOOSEFILE.'<br /><span style="color:#ff0000;">'._MD_UPWILLREPLACE.'</span>', 'tpl_upload', 200000), true);
			$form->addElement(new XoopsFormHidden('tpl_id', $id));
			$form->addElement(new XoopsFormHidden('op', 'uploadtpl_go'));
			$form->addElement(new XoopsFormHidden('fct', 'tplsets'));
			$form->addElement(new XoopsFormButton('', 'upload_button', _MD_UPLOAD, 'submit'));
			$form->display();
			xoops_cp_footer();
			exit();
		} else {
			echo 'Selected template does not exist';
		}
		xoops_cp_footer();
		break;
	case 'uploadtpl_go':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tpl =& $tpltpl_handler->get($tpl_id);
		if (is_object($tpl)) {
			include_once XOOPS_ROOT_PATH.'/class/uploader.php';
			$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, array('text/html', 'application/x-cdf', 'text/plain'), 200000);
			$uploader->setPrefix('tmp');
			if ($uploader->fetchMedia($_POST['xoops_upload_file'][0])) {
				if (!$uploader->upload()) {
					$err = $uploader->getErrors();
				} else {
					$tpl->setVar('tpl_lastmodified', time());
					$fp = @fopen($uploader->getSavedDestination(), 'r');
					$fsource = @fread($fp, filesize($uploader->getSavedDestination()));
					@fclose($fp);
					$tpl->setVar('tpl_source', $fsource, true);
					@unlink($uploader->getSavedDestination());
					if (!$tpltpl_handler->insert($tpl)) {
						$err = 'Failed inserting data to database';
					} else {
						if ($tpl->getVar('tpl_tplset') == $xoopsConfig['template_set']) {
							include_once XOOPS_ROOT_PATH.'/class/template.php';
							xoops_template_touch($tpl_id, true);
						}
					}
				}
			} else {
				$err = 'Failed uploading file';
			}
			if (isset($err)) {
				xoops_cp_header(false);
				xoops_error($err);
				xoops_cp_footer();
				exit();
			}
			redirect_header('admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$tpl->getVar('tpl_module').'&amp;tplset='.urlencode($tpl->getVar('tpl_tplset')), 2, _MD_AM_DBUPDATED);
		}
		break;
	// upload new file
	case 'uploadtpl2':
		xoops_cp_header();
		$tplset = htmlspecialchars($tplset);
		$moddir = htmlspecialchars($moddir);
		echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;<a href="./admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'">'.$tplset.'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_UPLOAD.'<br /><br />';
		include_once XOOPS_ROOT_PATH.'/class/xoopsformloader.php';
		$form = new XoopsThemeForm(_MD_UPLOAD, 'tplupload_form', 'admin.php');
		$form->setExtra('enctype="multipart/form-data"');
		$form->addElement(new XoopsFormLabel(_MD_FILENAME, $file));
		$form->addElement(new XoopsFormFile(_MD_CHOOSEFILE.'<br /><span style="color:#ff0000;">'._MD_UPWILLREPLACE.'</span>', 'tpl_upload', 200000), true);
		$form->addElement(new XoopsFormHidden('moddir', $moddir));
		$form->addElement(new XoopsFormHidden('tplset', $tplset));
		$form->addElement(new XoopsFormHidden('file', $file));
		$form->addElement(new XoopsFormHidden('type', $type));
		$form->addElement(new XoopsFormHidden('op', 'uploadtpl2_go'));
		$form->addElement(new XoopsFormHidden('fct', 'tplsets'));
		$form->addElement(new XoopsFormButton('', 'ploadtarupload_button', _MD_UPLOAD, 'submit'));
		$form->display();
		xoops_cp_footer();
		break;
	case 'uploadtpl2_go':
		include_once XOOPS_ROOT_PATH.'/class/uploader.php';
		$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, array('text/html', 'application/x-cdf', 'text/plain'), 200000);
		$uploader->setPrefix('tmp');
		if ($uploader->fetchMedia($_POST['xoops_upload_file'][0])) {
			if (!$uploader->upload()) {
				$err = $uploader->getErrors();
			} else {
				$tpltpl_handler =& xoops_gethandler('tplfile');
				$tplfile =& $tpltpl_handler->find('default', $type, null, $moddir, $file);
				if (is_array($tplfile)) {
					$tpl =& $tplfile[0]->xoopsClone();
					$tpl->setVar('tpl_id', 0);
					$tpl->setVar('tpl_tplset', $tplset);
					$tpl->setVar('tpl_lastmodified', time());
					$fp = @fopen($uploader->getSavedDestination(), 'r');
					$fsource = @fread($fp, filesize($uploader->getSavedDestination()));
					@fclose($fp);
					$tpl->setVar('tpl_source', $fsource, true);
					@unlink($uploader->getSavedDestination());
					if (!$tpltpl_handler->insert($tpl)) {
						$err = 'Failed inserting data to database';
					} else {
						if ($tplset == $xoopsConfig['template_set']) {
							include_once XOOPS_ROOT_PATH.'/class/template.php';
							xoops_template_touch($tpl->getVar('tpl_id'), true);
						}
					}
				} else {
					$err = 'This template file does not need to be installed (PHP files using this template file does not exist)';
				}
			}
		} else {
			$err = 'Failed uploading file';
		}
		if (isset($err)) {
			xoops_cp_header(false);
			xoops_error($err);
			xoops_cp_footer();
			exit();
		}
		redirect_header('admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$moddir.'&amp;tplset='.urlencode($tplset), 2, _MD_AM_DBUPDATED);
		break;
	case 'download':
		if (isset($tplset)) {
			if (false != extension_loaded('zlib')) {
				if (isset($_GET['method']) && $_GET['method'] == 'tar') {
					if (@function_exists('gzencode')) {
						require_once(XOOPS_ROOT_PATH.'/class/tardownloader.php');
						$downloader = new XoopsTarDownloader();
					}
				} else {
					if (@function_exists('gzcompress')) {
						require_once(XOOPS_ROOT_PATH.'/class/zipdownloader.php');
						$downloader = new XoopsZipDownloader();
					}
				}
				$tplset_handler =& xoops_gethandler('tplset');
				$tplsetobj =& $tplset_handler->getByName($tplset);
				$xml = "<"."?xml version=\"1.0\"?".">\r\n<tplset>\r\n  <name>".$tplset."</name>\r\n  <dateCreated>".$tplsetobj->getVar('tplset_created')."</dateCreated>\r\n  <credits>\r\n".$tplsetobj->getVar('tplset_credits')."\r\n  </credits>\r\n  <generator>".XOOPS_VERSION."</generator>\r\n  <templates>";
				$tpltpl_handler =& xoops_gethandler('tplfile');
				$files =& $tpltpl_handler->getObjects(new Criteria('tpl_tplset', $tplset), true);
				$fcount = count($files);
				if ($fcount > 0) {
					for ($i = 0; $i < $fcount; $i++) {
						if ($files[$i]->getVar('tpl_type') == 'block') {
							$path = $tplset.'/templates/'.$files[$i]->getVar('tpl_module').'/blocks/'.$files[$i]->getVar('tpl_file');
							$xml .= "\r\n    <template name=\"".$files[$i]->getVar('tpl_file')."\">\r\n      <module>".$files[$i]->getVar('tpl_module')."</module>\r\n      <type>block</type>\r\n      <lastModified>".$files[$i]->getVar('tpl_lastmodified')."</lastModified>\r\n    </template>";
						} elseif ($files[$i]->getVar('tpl_type') == 'module') {
							$path = $tplset.'/templates/'.$files[$i]->getVar('tpl_module').'/'.$files[$i]->getVar('tpl_file');
							$xml .= "\r\n    <template name=\"".$files[$i]->getVar('tpl_file')."\">\r\n      <module>".$files[$i]->getVar('tpl_module')."</module>\r\n      <type>module</type>\r\n      <lastModified>".$files[$i]->getVar('tpl_lastmodified')."</lastModified>\r\n    </template>";
						}
						$downloader->addFileData($files[$i]->getVar('tpl_source'), $path, $files[$i]->getVar('tpl_lastmodified'));
					}

					$xml .= "\r\n  </templates>";
/*
					$xml ." "\r\n  <images>";
					$image_handler =& xoops_gethandler('imagesetimg');
					$criteria = new CriteriaCompo(new Criteria('l.tplset_name', $tplset));
					$criteria->add(new Criteria('s.imgset_refid', 0));
					$ifiles =& $image_handler->getObjects($criteria);
					$fcount = count($ifiles);
					for ($i = 0; $i < $fcount; $i++) {
						$dummyimage = XOOPS_CACHE_PATH.'/_dummyimage'.$i.time();
						$fp = @fopen($dummyimage, 'wb');
						@fwrite($fp, $ifiles[$i]->getVar('imgsetimg_body'));
						@fclose($fp);
						$downloader->addBinaryFile($dummyimage, $tplset.'/images/'.$ifiles[$i]->getVar('imgsetimg_file'));
						@unlink($dummyimage);
						$xml .= " \r\n   <image name=\"".$ifiles[$i]->getVar('imgsetimg_file')."\"></image>";
					}
*/
				}
				//$xml .= "\r\n  </images>
				$xml .= "\r\n</tplset>";
				$downloader->addFileData($xml, $tplset.'/tplset.xml', time());
				echo $downloader->download($tplset, true);
			} else {
				xoops_cp_header();
				xoops_error(_MD_NOZLIB);
				xoops_cp_footer();
			}
		}
		break;
	case 'generatetpl':
		xoops_cp_header();
		xoops_confirm(array('tplset' => $tplset, 'moddir' => $moddir, 'file' => $file, 'type' => $type, 'op' => 'generatetpl_go', 'fct' => 'tplsets'), 'admin.php', _MD_PLZGENERATE, _MD_GENERATE);
		xoops_cp_footer();
		break;
	case 'generatetpl_go':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->find('default', $type, null, $moddir, $file, true);
		if (count($tplfile) > 0) {
			$newtpl =& $tplfile[0]->xoopsClone();
			$newtpl->setVar('tpl_id', 0);
			$newtpl->setVar('tpl_tplset', $tplset);
			$newtpl->setVar('tpl_lastmodified', time());
			$newtpl->setVar('tpl_lastimported', 0);
			if (!$tpltpl_handler->insert($newtpl)) {
				$err = 'ERROR: Could not insert template <b>'.$tplfile[0]->getVar('tpl_file').'</b> to the database.';
			} else {
				if ($tplset == $xoopsConfig['template_set']) {
					include_once XOOPS_ROOT_PATH.'/class/template.php';
					xoops_template_touch($newtpl->getVar('tpl_id'));
				}
			}
		} else {
			$err = 'Selected file does not exist)';
		}
		if (!isset($err)) {
			redirect_header('admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$newtpl->getVar('tpl_module').'&amp;tplset='.urlencode($newtpl->getVar('tpl_tplset')), 2, _MD_AM_DBUPDATED);
		}
		xoops_cp_header();
		xoops_error($err);
		echo '<br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'generatemod':
		xoops_cp_header();
		xoops_confirm(array('tplset' => $tplset, 'op' => 'generatemod_go', 'fct' => 'tplsets', 'moddir' => $moddir), 'admin.php', _MD_PLZGENERATE, _MD_GENERATE);
		xoops_cp_footer();
		break;
	case 'generatemod_go':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		xoops_cp_header();
		echo '<code>';
		$tplfiles =& $tpltpl_handler->find('default', 'module', null, $moddir, null, true);
		$fcount = count($tplfiles);
		if ($fcount > 0) {
			echo 'Installing module template files for template set '.$tplset.'...<br />';
			for ($i = 0; $i < $fcount; $i++) {
				$newtpl =& $tplfiles[$i]->xoopsClone();
				$newtpl->setVar('tpl_id', 0);
				$newtpl->setVar('tpl_tplset', $tplset);
				$newtpl->setVar('tpl_lastmodified', time());
				$newtpl->setVar('tpl_lastimported', 0);
				if (!$tpltpl_handler->insert($newtpl)) {
					echo '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not insert template <b>'.$file.'</b> to the database.</span><br />';
				} else {
					if ($tplset == $xoopsConfig['template_set']) {
						include_once XOOPS_ROOT_PATH.'/class/template.php';
						xoops_template_touch($newtpl->getVar('tpl_id'));
					}
					echo '&nbsp;&nbsp;Template <b>'.$tplfiles[$i]->getVar('tpl_file').'</b> added to the database.<br />';
				}
			}
			flush();
			unset($newtpl);
		}
		unset($files);
		$tplfiles =& $tpltpl_handler->find('default', 'block', null, $moddir, null, true);
		$fcount = count($tplfiles);
		if ($fcount > 0) {
			echo '&nbsp;&nbsp;Installing block template files...<br />';
			for ($i = 0; $i < $fcount; $i++) {
				$newtpl =& $tplfiles[$i]->xoopsClone();
				$newtpl->setVar('tpl_id', 0);
				$newtpl->setVar('tpl_tplset', $tplset);
				$newtpl->setVar('tpl_lastmodified', time());
				$newtpl->setVar('tpl_lastimported', 0);
				if (!$tpltpl_handler->insert($newtpl)) {
					echo '&nbsp;&nbsp;&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not insert block template <b>'.$tplfiles[$i]->getVar('tpl_file').'</b> to the database.</span><br />';echo $newtpl->getHtmlErrors();
				} else {
					if ($tplset == $xoopsConfig['template_set']) {
						include_once XOOPS_ROOT_PATH.'/class/template.php';
						xoops_template_touch($newtpl->getVar('tpl_id'));
					}
					echo '&nbsp;&nbsp;&nbsp;&nbsp;Block template <b>'.$tplfiles[$i]->getVar('tpl_file').'</b> added to the database.<br />';
				}
			}
			flush();
			unset($newtpl);
		}
		echo '<br />Module template files for template set <b>'.$tplset.'</b> generated and installed.<br /></code><br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
		xoops_cp_footer();
		break;
	case 'previewpopup':
		$file = XOOPS_CACHE_PATH.'/'.trim($file);
		if (file_exists($file)) {
			include $file;
			@unlink($file);
		}
		break;
	case 'uploadtar_go':
		include_once XOOPS_ROOT_PATH.'/class/uploader.php';
		$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, array('application/x-gzip', 'application/gzip', 'application/gzip-compressed', 'application/x-gzip-compressed', 'application/x-tar', 'application/x-tar-compressed', 'application/octet-stream'), 1000000);
		$uploader->setPrefix('tmp');
		xoops_cp_header();
		echo '<code>';
		if ($uploader->fetchMedia($_POST['xoops_upload_file'][0])) {
			if (!$uploader->upload()) {
				xoops_error($uploader->getErrors());
			} else {
				include_once XOOPS_ROOT_PATH.'/class/class.tar.php';
				$tar = new tar();
				$tar->openTar($uploader->getSavedDestination());
				@unlink($uploader->getSavedDestination());
				$themefound = false;
				foreach ($tar->files as $id => $info) {
					$infoarr = explode('/', str_replace("\\", '/', $info['name']));
					if (!isset($tplset_name)) {
						$tplset_name = trim($infoarr[0]);
					} else {
						$tplset_name = trim($tplset_name);
						if ($tplset_name == '') {
							$tplset_name = trim($infoarr[0]);
						}
					}
					if ($tplset_name != '') {
						break;
					}
				}
				if ($tplset_name == '') {
					echo '<span style="color:#ff0000;">ERROR: Template file not found</span><br />';
				} else {
					$tplset_handler =& xoops_gethandler('tplset');
					if ($tplset_handler->getCount(new Criteria('tplset_name', $tplset_name)) > 0) {
						echo '<span style="color:#ff0000;">ERROR: Template set <b>'.$tplset_name.'</b> already exists.</span><br />';
					} else {
						$tplset =& $tplset_handler->create();
						$tplset->setVar('tplset_name', $tplset_name);
						$tplset->setVar('tplset_created', time());
						if (!$tplset_handler->insert($tplset)) {
							echo '<span style="color:#ff0000;">ERROR: Could not create template set <b>'.$tplset_name.'</b>.</span><br />';
						} else {
							$tplsetid = $tplset->getVar('tplset_id');
							echo 'Template set <b>'.$tplset_name.'</b> created. (ID: <b>'.$tplsetid.'</b>)</span><br />';
							$tpltpl_handler = xoops_gethandler('tplfile');
							$themeimages = array();
							foreach ($tar->files as $id => $info) {
								$infoarr = explode('/', str_replace("\\", '/', $info['name']));
								if (isset($infoarr[3]) && trim($infoarr[3]) == 'blocks') {
									$default =& $tpltpl_handler->find('default', 'block', null, trim($infoarr[2]), trim($infoarr[4]));
								} elseif ((!isset($infoarr[4]) || trim($infoarr[4]) == '') && $infoarr[1] == 'templates') {
									$default =& $tpltpl_handler->find('default', 'module', null, trim($infoarr[2]), trim($infoarr[3]));
								} elseif (isset($infoarr[3]) && trim($infoarr[3]) == 'images') {
									$infoarr[2] = trim($infoarr[2]);
									if (preg_match("/(.*)\.(gif|jpg|jpeg|png)$/i", $infoarr[2], $match)) {
										$themeimages[] = array('name' => $infoarr[2], 'content' => $info['file']);
									}
								}
								if (isset($default) && count($default) > 0) {
									$newtpl =& $default[0]->xoopsClone();
									$newtpl->setVar('tpl_id', 0);
									$newtpl->setVar('tpl_tplset', $tplset_name);
									$newtpl->setVar('tpl_source', $info['file'], true);
									$newtpl->setVar('tpl_lastmodified', time());
									if (!$tpltpl_handler->insert($newtpl)) {
										echo '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not insert <b>'.$info['name'].'</b> to the database.</span><br />';
									} else {
										echo '&nbsp;&nbsp;<b>'.$info['name'].'</b> inserted to the database.<br />';
									}
									unset($default);
								}
								unset($info);
							}
							$icount = count($themeimages);
							if ($icount > 0) {
								$imageset_handler =& xoops_gethandler('imageset');
								$imgset =& $imageset_handler->create();
								$imgset->setVar('imgset_name', $tplset_name);
								$imgset->setVar('imgset_refid', 0);
								if (!$imageset_handler->insert($imgset)) {
									echo '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Could not create image set.</span><br />';
								} else {
									$newimgsetid = $imgset->getVar('imgset_id');
									echo '&nbsp;&nbsp;Image set <b>'.$tplset_name.'</b> created. (ID: <b>'.$newimgsetid.'</b>)<br />';
									if (!$imageset_handler->linktplset($newimgsetid, $tplset_name)) {
										echo '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed linking image set to template set <b>'.$tplset_name.'</b></span><br />';
									}
									$image_handler =& xoops_gethandler('imagesetimg');
									for ($i = 0; $i < $icount; $i++) {
										if (isset($themeimages[$i]['name']) && $themeimages[$i]['name'] != '') {
											$image =& $image_handler->create();
											$image->setVar('imgsetimg_file', $themeimages[$i]['name']);
											$image->setVar('imgsetimg_imgset', $newimgsetid);
											$image->setVar('imgsetimg_body', $themeimages[$i]['content'], true);
											if (!$image_handler->insert($image)) {
												echo '&nbsp;&nbsp;<span style="color:#ff0000;">ERROR: Failed storing image file data to database.</span><br />';
											} else {
												echo '&nbsp;&nbsp;Image file data stored into database. (ID: <b>'.$image->getVar('imgsetimg_id').'</b>)<br />';
											}
										}
									}
								}
							}
						}
					}
				}
			}
		} else {
			echo '<span style="color:#ff0000;">ERROR: Failed uploading file</span>';
		}
		echo '</code><br /><a href="admin.php?fct=tplsets">'._MD_AM_BTOTADMIN.'</a>';
	  	xoops_cp_footer();
		break;
	case 'previewtpl':
		require_once XOOPS_ROOT_PATH.'/class/template.php';
		$myts =& MyTextsanitizer::getInstance();
		$html = $myts->stripSlashesGPC($html);
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile =& $tpltpl_handler->get($id, true);
		$xoopsTpl = new XoopsTpl();
		
		if (is_object($tplfile)) {
			$dummylayout = '<html><head><meta http-equiv="content-type" content="text/html; charset='._CHARSET.'" /><meta http-equiv="content-language" content="'._LANGCODE.'" /><title>'.$xoopsConfig['sitename'].'</title><style type="text/css" media="all">';
			$css =& $tpltpl_handler->find($xoopsConfig['template_set'], 'css', 0, null, null, true);
			$csscount = count($css);
			for ($i = 0; $i < $csscount; $i++) {
				$dummylayout .= "\n".$css[$i]->getVar('tpl_source');
			}
			$dummylayout .= "\n".'</style></head><body><{$content}></body></html>';
			if ($tplfile->getVar('tpl_type') == 'block') {
				include_once XOOPS_ROOT_PATH.'/class/xoopsblock.php';
				$block = new XoopsBlock($tplfile->getVar('tpl_refid'));
				$xoopsTpl->assign('block', $block->buildBlock());
			}
			$dummytpl = '_dummytpl_'.time().'.html';
			$fp = fopen(XOOPS_CACHE_PATH.'/'.$dummytpl, 'w');
			fwrite($fp, $html);
			fclose($fp);
			$xoopsTpl->assign('content', $xoopsTpl->fetch('file:'.XOOPS_CACHE_PATH.'/'.$dummytpl));
			$xoopsTpl->clear_compiled_tpl('file:'.XOOPS_CACHE_PATH.'/'.$dummytpl);
			unlink(XOOPS_CACHE_PATH.'/'.$dummytpl);
			$dummyfile = '_dummy_'.time().'.html';
			$fp = fopen(XOOPS_CACHE_PATH.'/'.$dummyfile, 'w');
			fwrite($fp, $dummylayout);
			fclose($fp);
			$dummyfile2 = '_dummy2_'.time().'.html';
			$fp = fopen(XOOPS_CACHE_PATH.'/'.$dummyfile2, 'w');
			fwrite($fp, $xoopsTpl->fetch('file:'.XOOPS_CACHE_PATH.'/'.$dummyfile));
			fclose($fp);
			$xoopsTpl->clear_compiled_tpl('file:'.XOOPS_CACHE_PATH.'/'.$dummyfile);
			unlink(XOOPS_CACHE_PATH.'/'.$dummyfile);
			$tplset= $tplfile->getVar('tpl_tplset');
			$tform = array('tpl_tplset' => $tplset, 'tpl_id' => $id, 'tpl_file' => $tplfile->getVar('tpl_file'), 'tpl_desc' => $tplfile->getVar('tpl_desc'), 'tpl_lastmodified' => $tplfile->getVar('tpl_lastmodified'), 'tpl_source' => htmlspecialchars($html, ENT_QUOTES), 'tpl_module' => $moddir);
			include_once XOOPS_ROOT_PATH.'/modules/system/admin/tplsets/tplform.php';
			xoops_cp_header();
			echo '<a href="admin.php?fct=tplsets">'. _MD_TPLMAIN .'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;<a href="./admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$moddir.'&amp;tplset='.$tplset.'">'.$tplset.'</a>&nbsp;<span style="font-weight:bold;">&raquo;&raquo;</span>&nbsp;'._MD_EDITTEMPLATE.'<br /><br />';
			$form->display();
			xoops_cp_footer();
			echo '<script type="text/javascript">
			<!--//
			preview_window = openWithSelfMain("'.XOOPS_URL.'/modules/system/admin.php?fct=tplsets&op=previewpopup&file='.$dummyfile2.'", "popup", 680, 450);
			//-->
			</script>';
		}
		break;
	case 'update':
		include_once XOOPS_ROOT_PATH.'/class/uploader.php';
		$uploader = new XoopsMediaUploader(XOOPS_UPLOAD_PATH, array('text/html', 'application/x-cdf'), 200000);
		$uploader->setPrefix('tmp');
		$msg = array();
		foreach ($_POST['xoops_upload_file'] as $upload_file) {
			// '.' is converted to '_' when upload
			$upload_file2 = str_replace('.', '_', $upload_file);
			if ($uploader->fetchMedia($upload_file2)) {
				if (!$uploader->upload()) {
					$msg[] = $uploader->getErrors();
				} else {
					$tpltpl_handler =& xoops_gethandler('tplfile');
					if (!isset($old_template[$upload_file])) {
						$tplfile =& $tpltpl_handler->find('default', null, null, $moddir, $upload_file);
						if (count($tplfile) > 0) {
							$tpl =& $tplfile[0]->xoopsClone();
							$tpl->setVar('tpl_id', 0);
							$tpl->setVar('tpl_tplset', $tplset);
						} else {
							$msg[] = 'Template file <b>'.$upload_file.'</b> does not need to be installed (PHP files using this template file does not exist)';
							continue;
						}
					} else {
						$tpl =& $tpltpl_handler->get($old_template[$upload_file]);
					}
					$tpl->setVar('tpl_lastmodified', time());
					$fp = @fopen($uploader->getSavedDestination(), 'r');
					$fsource = @fread($fp, filesize($uploader->getSavedDestination()));
					@fclose($fp);
					$tpl->setVar('tpl_source', $fsource, true);
					@unlink($uploader->getSavedDestination());
					if (!$tpltpl_handler->insert($tpl)) {
						$msg[] = 'Failed inserting data for '.$upload_file.' to database';
					} else {
						$msg[] = 'Template file <b>'.$upload_file.'</b> updated.';
						if ($tplset == $xoopsConfig['template_set']) {
							include_once XOOPS_ROOT_PATH.'/class/template.php';
							if (xoops_template_touch($tpl->getVar('tpl_id'), true)) {
								$msg[] = 'Template file <b>'.$upload_file.'</b> compiled.';
							}
			
						}
					}
				}
			} else {
				if ($uploader->getMediaName() == '') {
					continue;
				} else {
					$msg[] = $uploader->getErrors();
				}
			}
		}
		xoops_cp_header();
		echo '<code>';
		foreach ($msg as $m) {
			echo $m.'<br />';
		}
		echo '</code><br /><a href="admin.php?fct=tplsets&amp;op=listtpl&amp;tplset='.$tplset.'&amp;moddir='.$moddir.'">'._MD_AM_BTOTADMIN.'</a>';
	  	xoops_cp_footer();
		break;
	case 'importtpl':
		xoops_cp_header();
		if (!empty($id)) {
			xoops_confirm(array('tplset' => $tplset, 'moddir' => $moddir, 'id' => $id, 'op' => 'importtpl_go', 'fct' => 'tplsets'), 'admin.php', _MD_RUSUREIMPT, _MD_IMPORT);
		} elseif (isset($file)) {
			xoops_confirm(array('tplset' => $tplset, 'moddir' => $moddir, 'file' => $file, 'op' => 'importtpl_go', 'fct' => 'tplsets'), 'admin.php', _MD_RUSUREIMPT, _MD_IMPORT);
		}
		xoops_cp_footer();
		break;
	case 'importtpl_go':
		$tpltpl_handler =& xoops_gethandler('tplfile');
		$tplfile = '';
		if (!empty($id)) {
			$tplfile =& $tpltpl_handler->get($id, true);
		} else {
			$tplfiles =& $tpltpl_handler->find('default', null, null, null, trim($file), true);
			$tplfile = (count($tplfiles) > 0) ? $tplfiles[0] : '';
		}
		$error = true;
		if (is_object($tplfile)) {
			switch ($tplfile->getVar('tpl_type')) {
				case 'module':
					$filepath = XOOPS_ROOT_PATH.'/templates/'.$tplset.'/'.$tplfile->getVar('tpl_module').'/'.$tplfile->getVar('tpl_file');
					break;
				case 'block':
					$filepath = XOOPS_ROOT_PATH.'/templates/'.$tplset.'/'.$tplfile->getVar('tpl_module').'/blocks/'.$tplfile->getVar('tpl_file');
					break;
				default:
					break;
			}
			if (file_exists($filepath)) {
				if (false != $fp = fopen($filepath, 'r')) {
					$filesource = fread($fp, filesize($filepath));
    				fclose($fp);
					$tplfile->setVar('tpl_source', $filesource, true);
					$tplfile->setVar('tpl_tplset', $tplset);
					$tplfile->setVar('tpl_lastmodified', time());
					$tplfile->setVar('tpl_lastimported', time());
    				if (!$tpltpl_handler->insert($tplfile)) {
					} else {
						$error = false;
					}
				}
			}
		}
		if (false != $error) {
			xoops_cp_header();
			xoops_error('Could not import file '.$filepath);
			echo '<br /><a href="admin.php?fct=tplsets&amp;op=listtpl&amp;tplset='.$tplset.'&amp;moddir='.$moddir.'">'._MD_AM_BTOTADMIN.'</a>';
			xoops_cp_footer();
			exit();
		}
		redirect_header('admin.php?fct=tplsets&amp;op=listtpl&amp;moddir='.$tplfile->getVar('tpl_module').'&amp;tplset='.urlencode($tplfile->getVar('tpl_tplset')), 2, _MD_AM_DBUPDATED);
		break;
	default:
		break;
	}
}
?>
