<?php
// Commands for calling blocks by title
// All platforms
//
$blocklist = atBlockList();
foreach ($blocklist as $title) {
$extracmd['all'][$title] = "atBlockDisplay('', '{$title}');";
}
function AutoTheme_admin_blockmain($var)
{
$blocklist = atBlockList();
$var = atExportVar($var);
extract($var);
if (file_exists(AT_DIRPREFIX . "themes/{$themedir}/theme.cfg")) {
$filelist = at_listfiles(AT_DIRPREFIX . "themes/{$themedir}", "htm");
include AT_DIRPREFIX . "themes/{$themedir}/theme.cfg";
} elseif (file_exists("{$themedir}/theme.cfg")) {
$filelist = at_listfiles($themedir, "htm");
include "{$themedir}/theme.cfg";
}
if ($modops) {
$where = "{$thememod} > {$modops}";
} else {
$thememod = "default";
$where = _AT_THEMEDEF;
}
if (!is_array($blocktemplate['default'])) {
$temp = $blocktemplate;
unset($blocktemplate);
$blocktemplate['default'] = $temp;
if ($modops) {
$blocktemplate[$thememod][$modops] = $temp;
} else {
$blocktemplate[$thememod] = $temp;
}
$var = compact("blocktemplate");
atSaveThemeConfig($themedir, $var);
}
atAdminThemeLinks($themedir, _AT_CUSTBLOCKS, $var, 1);
atAdminOpenTable();
echo "<form method=\"POST\" action=\"" . AT_ADMINPAGE . "\">\n" . " <input type=\"hidden\" name=\"op\" value=\"updateblock\">\n" . " <input type=\"hidden\" name=\"module\" value=\"AutoTheme\">\n" . " <input type=\"hidden\" name=\"themedir\" value=\"{$themedir}\">\n" . " <input type=\"hidden\" name=\"thememod\" value=\"{$thememod}\">\n" . " <input type=\"hidden\" name=\"modops\" value=\"{$modops}\">\n" . "<b>" . _AT_BLOCK . "</b></td><td><b>" . _AT_FILENAME . "</b></td><td><b>" . _AT_ACTION . "</b></td></tr><tr><td>\n";
if ($modops) {
$blocktemplate = $blocktemplate[$thememod][$modops];
} else {
$blocktemplate = $blocktemplate[$thememod];
}
if ($blocktemplate) {
ksort($blocktemplate);
foreach ($blocktemplate as $themeblock => $filename) {
$blockvar = strtolower(preg_replace("^\\W|_^", "", $themeblock));
$varval = htmlentities(urlencode($themeblock));
echo $themeblock . "</td>\n" . at_file_select($themedir, $blockvar . "file", $filename, $filelist) . "<td>\n" . "[ <a href=\"" . AT_ADMINPAGE . "?module=AutoTheme&op=delblock&themedir=" . htmlentities(urlencode($themedir)) . "&themeblock={$varval}&thememod=" . htmlentities(urlencode($thememod)) . "&modops=" . htmlentities(urlencode($modops)) . "\">" . _AT_REMOVE . "</a> ]\n" . "</td></tr><tr><td>\n";
}
echo "<input type=\"submit\" value=\"" . _AT_SAVE . "\" name=\"B1\">\n" . "</form></td><td>\n";
} else {
echo _AT_NOCUSTBLOCKS;
}
echo " </td><td> ";
atAdminCloseTable();
echo "<br />\n";
atAdminOpenTable();
echo "<form method=\"POST\" action=\"" . AT_ADMINPAGE . "\">\n" . "<b>" . _AT_ADDBLOCK . "</b><br />\n" . "<select name=\"themeblock\">\n";
foreach ($blocklist as $block) {
if (!array_key_exists($block, $blocktemplate)) {
echo "<option>{$block}</option>";
}
}
echo "</select>" . "<input type=\"hidden\" name=\"themedir\" value=\"{$themedir}\">\n" . "<input type=\"hidden\" name=\"thememod\" value=\"{$thememod}\">\n" . "<input type=\"hidden\" name=\"modops\" value=\"{$modops}\">\n" . "<input type=\"hidden\" name=\"op\" value=\"addblock\">\n" . "<input type=\"hidden\" name=\"module\" value=\"AutoTheme\">\n" . "<input type=\"submit\" value=\"" . _AT_ADD . "\" name=\"B1\">\n" . "</form>\n";
atAdminCloseTable();
atAdminFooter();
}
