<?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(); }