// string mkwarn(char *warning); // string mkerror(char *error); // string mkradio(char *name, char *value); // string mkcheckbox(char *name, char *value); // string mktext(char *name); // string mkhidden(char *name, char *$value) // string mktextarea(char *name, int rows, int cols, char *wordwrap); // string mkselect(char *name, char *options[]); // string mkfile(char *name); /* {{{ proto string mkwarn(string message) Returns HTML format for an warning message. */ function mkwarn ($msg) { return("${msg}\n"); } /* }}} */ /* {{{ proto string mkerror(string message) Returns HTML format for an error message. */ function mkerror ($msg) { return("[ ${msg} ]\n"); } /* }}} */ /* {{{ proto string mkradio(string name, string value) Returns HTML format for a radio button. */ function mkradio ($_name, $value, $varr = null) { if ($varr == null) $varr =& $_POST; $str = ''); return(''); } /* }}} */ /* {{{ proto string mkpass(string name) Returns HTML format for a password entry line. */ function mkpass ($_name) { return(''); } /* }}} */ /* {{{ proto string mkhidden(string name) Returns HTML format for a hidden form field. */ function mkhidden ($_name, $varr = null) { if ($varr == null) $varr =& $_POST; if (isset($varr[$_name])) return(''); return(''); } /* }}} */ /* {{{ proto string mktextarea(string name, int rows, int cols, string wrap_type) Returns HTML format for a text entry box. */ function mktextarea ($_name, $rows, $cols, $wrap, $varr = null) { if ($varr == null) $varr =& $_POST; $str = ''; return($str); } /* }}} */ /* {{{ proto string mkselect(string name, array options) Returns HTML format for a select box (dropdown). */ function mkselect ($_name, $options, $varr = null) { if ($varr == null) $varr =& $_POST; $str = "\n"; return($str); } /* }}} */ /* {{{ proto string mkfile(string name) Returns HTML format for a file selection button. */ function mkfile ($_name) { return(''); } /* }}} */ /* {{{ proto string mksubmit(string name, string value) Returns HTML format for a submit button. */ function mksubmit($_name, $_value = null, $_attrs = array ()) { if ($_value == null) $_value = _('Submit'); if (!empty($_value)) $_value = ' value="'.htmlspecialchars($_value).'"'; $_extra = make_element_attrs_from_array($_attrs); return sprintf('', htmlspecialchars($_name), $_value, $_extra); } /* }}} */ /* {{{ proto string show_login(string surveyname, string message, string css, string title) Returns HTML login form */ function show_login($_surveyname = null, $_message = null, $_css = null, $_title = "Survey Login") { $str = ""; $str .="\n"; if(!empty($GLOBALS['ESPCONFIG']['charset'])) { echo('\n"); } $str .="Survey Login: $_title\n"; if (empty($_css)) { $_css = "default.css"; } $str .= ''; if(!empty($GLOBALS['ESPCONFIG']['favicon'])) { $str .= "\n"; } $str .= "\n\n\n"; $str .= '
'; $str .= '
'; if ($_title) { $str .= "

$_title

\n"; } if ($_message) { $str .= mkerror($_message); } $str .= '
'; $str .= "\n
\n"; $str .= '
'; $str .= ''; $str .= mktext("username"); $str .= "\n".'
'."\n"; $str .= ''; $str .= mkpass("password"); $str .= "\n".'
'."\n"; # if the variable $lang is set, we assume we don't need to ask for the language if ((!isset($_REQUEST['lang']) && !isset($_SESSION['language'])) || empty($_SESSION['language'])) { $str .= _('Language:'); $_languages=array(); foreach (esp_getlocales() as $_lang) { $_languages[$_lang]=$_lang; } $str .= mkselect("lang",$_languages); $str .= "\n".'
'."\n"; } $str .= mksubmit("Login"); if ($_surveyname != "") { $str .= ' value pairs into an HTML attributes specification key="value" */ function make_element_attrs_from_array($attrs) { $extra = ''; foreach ($attrs as $attr => $value) { $extra .= sprintf(' %s="%s"', $attr, htmlspecialchars($value)); } return trim($extra); } // }}} ?>