function setMacros() { $this->trace(TC_Init, 'setMacros'); if (($this->fMacroBasarName = dbGetParam($this, Theme_All, Param_BasarName)) == '') { $this->fMacroBasarName = 'InfoBasar'; } $this->fMacroScriptBase = dbGetParam($this, Theme_All, Param_BaseModule); dbReadMacros($this, Theme_All, TM_MacroPrefix . TM_StandardMacroPrefix, $this->fMacroReplacementKeys = array(), $this->fMacroReplacementValues = array()); dbReadMacros($this, $this->fUserTheme, TM_MacroPrefix . TM_ThemeMacroPrefix, $this->fMacroReplacementKeys, $this->fMacroReplacementValues); $this->trace(TC_Init, 'setMacros: ' . count($this->fMacroReplacementKeys)); for ($ii = 0; $ii < count($this->fMacroReplacementKeys); $ii++) { $this->trace(TC_Session3, $this->fMacroReplacementKeys[$ii] . ' -> ' . $this->fMacroReplacementValues[$ii]); } }
function dbGetAndStoreMacroPattern(&$session) { $session->trace(TC_Db2, 'dbGetAndStoreMacroPattern:'); $theme = $session->fUserTheme; $pattern = dbGetParam($session, $theme, Th_MacroPattern); if (empty($pattern)) { $row = dbFirstRecord($session, 'select name from ' . dbTable($session, T_Macro) . ' where theme=' . Theme_All . ' or theme=' . ($theme + 0) . ' order by name'); $last_var = null; $open_parenthesis = false; while ($row) { $pos = strpos($row[0], ':'); if ($pos <= 0) { $val = $row[0]; $var = null; } else { $var = substr($row[0], 0, $pos + 1); $val = substr($row[0], $pos + 1); } $session->trace(TC_Db3, 'dbGetAndStoreMacroPattern-2: ' . $pos . ' ' . $var . ' / ' . $val); if ($var != $last_var) { $session->trace(TC_Db2, 'dbGetAndStoreMacroPattern-3: '); if ($open_parenthesis) { $session->trace(TC_Db2, 'dbGetAndStoreMacroPattern-4: '); $pattern .= ')'; $open_parenthesis = false; } $last_var = $var; if (!empty($var)) { $session->trace(TC_Db2, 'dbGetAndStoreMacroPattern-5: ' . $pattern); $val = $var . '(' . $val; $open_parenthesis = true; } } $new = '|' . $val; if (getPos($pattern, $new . '|') < 0) { $pattern .= $new; } $row = dbNextRecord($session); } if ($open_parenthesis) { $pattern .= ')'; } $id = dbSingleValue($session, 'select id from ' . dbTable($session, T_Param) . ' where theme=' . (0 + $theme) . ' and pos=' . Th_MacroPattern); if ($id > 0) { dbUpdateRaw($session, T_Param, $id, 'text=' . dbSqlString($session, $pattern)); $session->trace(TC_Db1, "dbGetAndStoreMacroPattern: Id: {$id} Th: {$theme} P: {$pattern}"); } } return $pattern; }
function baseInfo(&$session) { guiStandardHeader($session, 'Infobasar-Info', Th_InfoHeader, null); guiParagraph($session, '(C) Hamatoma AT gmx DOT de 2004', 0); echo '<table border="0"><tr><td><b>Gegenstand</b></td>'; echo '<td><b>Version</b></td></tr>' . "\n"; echo '<tr><td>PHP-Klasse:</td><td>'; echo PHP_ClassVersion; echo '<tr><td>PHP-Basismodul:</td><td>'; echo PHP_ModuleVersion; echo '</td></tr><tr><td>DB-Schema:</td><td>'; echo htmlentities(dbGetParam($session, Theme_All, Param_DBScheme)); echo '<tr><td>DB-Basisinhalt:</td><td>'; echo htmlentities(dbGetParam($session, Theme_All, Param_DBBaseContent)); echo '<tr><td>DB-Erweiterungen:</td><td>'; echo htmlentities(dbGetParam($session, Theme_All, Param_DBExtensions)); echo '</td></tr></table>' . "\n"; guiStandardBodyEnd($session, Th_InfoBodyEnd); }