xref: /dokuwiki/inc/form.php (revision aba86f383f2a5af0340d1bc69cf4f6853b03bf77)
1fdb8d77bSTom N Harris<?php
2fdb8d77bSTom N Harris/**
3fdb8d77bSTom N Harris * DokuWiki XHTML Form
4fdb8d77bSTom N Harris *
5fdb8d77bSTom N Harris * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
6fdb8d77bSTom N Harris * @author     Tom N Harris <tnharris@whoopdedo.org>
7fdb8d77bSTom N Harris */
8fdb8d77bSTom N Harris
9fdb8d77bSTom N Harris/**
10fdb8d77bSTom N Harris * Class for creating simple HTML forms.
11fdb8d77bSTom N Harris *
12fdb8d77bSTom N Harris * The forms is built from a list of pseudo-tags (arrays with expected keys).
13fdb8d77bSTom N Harris * Every pseudo-tag must have the key '_elem' set to the name of the element.
14fdb8d77bSTom N Harris * When printed, the form class calls functions named 'form_$type' for each
15fdb8d77bSTom N Harris * element it contains.
16fdb8d77bSTom N Harris *
17fdb8d77bSTom N Harris * Standard practice is for non-attribute keys in a pseudo-element to start
18fdb8d77bSTom N Harris * with '_'. Other keys are HTML attributes that will be included in the element
19fdb8d77bSTom N Harris * tag. That way, the element output functions can pass the pseudo-element
20fdb8d77bSTom N Harris * directly to buildAttributes.
21fdb8d77bSTom N Harris *
22fdb8d77bSTom N Harris * See the form_make* functions later in this file.
23fdb8d77bSTom N Harris *
24fdb8d77bSTom N Harris * @author Tom N Harris <tnharris@whoopdedo.org>
25fdb8d77bSTom N Harris */
26fdb8d77bSTom N Harrisclass Doku_Form {
27fdb8d77bSTom N Harris
28fdb8d77bSTom N Harris    // Form id attribute
291534dc5bSAndreas Gohr    public $params = array();
30fdb8d77bSTom N Harris
31fdb8d77bSTom N Harris    // Draw a border around form fields.
32fdb8d77bSTom N Harris    // Adds <fieldset></fieldset> around the elements
331534dc5bSAndreas Gohr    public $_infieldset = false;
34fdb8d77bSTom N Harris
35fdb8d77bSTom N Harris    // Hidden form fields.
361534dc5bSAndreas Gohr    public $_hidden = array();
37fdb8d77bSTom N Harris
38fdb8d77bSTom N Harris    // Array of pseudo-tags
391534dc5bSAndreas Gohr    public $_content = array();
40fdb8d77bSTom N Harris
41fdb8d77bSTom N Harris    /**
42fdb8d77bSTom N Harris     * Constructor
43fdb8d77bSTom N Harris     *
44e351c80dSAdrian Lang     * Sets parameters and autoadds a security token. The old calling convention
45e351c80dSAdrian Lang     * with up to four parameters is deprecated, instead the first parameter
46e351c80dSAdrian Lang     * should be an array with parameters.
471b2a85e8SAndreas Gohr     *
485f0071ebSGerrit Uitslag     * @param mixed       $params  Parameters for the HTML form element; Using the deprecated
495f0071ebSGerrit Uitslag     *                             calling convention this is the ID attribute of the form
505f0071ebSGerrit Uitslag     * @param bool|string $action  (optional, deprecated) submit URL, defaults to current page
515f0071ebSGerrit Uitslag     * @param bool|string $method  (optional, deprecated) 'POST' or 'GET', default is POST
525f0071ebSGerrit Uitslag     * @param bool|string $enctype (optional, deprecated) Encoding type of the data
5342ea7f44SGerrit Uitslag     *
54fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
55fdb8d77bSTom N Harris     */
56*aba86f38SAndreas Gohr    public function __construct($params, $action=false, $method=false, $enctype=false) {
57e351c80dSAdrian Lang        if(!is_array($params)) {
58e351c80dSAdrian Lang            $this->params = array('id' => $params);
59e351c80dSAdrian Lang            if ($action !== false) $this->params['action'] = $action;
60b4033556SMichael Klier            if ($method !== false) $this->params['method'] = strtolower($method);
61e351c80dSAdrian Lang            if ($enctype !== false) $this->params['enctype'] = $enctype;
62e351c80dSAdrian Lang        } else {
63e351c80dSAdrian Lang            $this->params = $params;
64e351c80dSAdrian Lang        }
65804e2f2fSAdrian Lang
66e351c80dSAdrian Lang        if (!isset($this->params['method'])) {
67b4033556SMichael Klier            $this->params['method'] = 'post';
68b4033556SMichael Klier        } else {
69b4033556SMichael Klier            $this->params['method'] = strtolower($this->params['method']);
70b4033556SMichael Klier        }
71b4033556SMichael Klier
72b4033556SMichael Klier        if (!isset($this->params['action'])) {
73b4033556SMichael Klier            $this->params['action'] = '';
74e351c80dSAdrian Lang        }
751b2a85e8SAndreas Gohr
761b2a85e8SAndreas Gohr        $this->addHidden('sectok', getSecurityToken());
77fdb8d77bSTom N Harris    }
78fdb8d77bSTom N Harris
79fdb8d77bSTom N Harris    /**
80fdb8d77bSTom N Harris     * startFieldset
81fdb8d77bSTom N Harris     *
82fdb8d77bSTom N Harris     * Add <fieldset></fieldset> tags around fields.
83fdb8d77bSTom N Harris     * Usually results in a border drawn around the form.
84fdb8d77bSTom N Harris     *
85fdb8d77bSTom N Harris     * @param   string  $legend Label that will be printed with the border.
8642ea7f44SGerrit Uitslag     *
87fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
88fdb8d77bSTom N Harris     */
89*aba86f38SAndreas Gohr    public function startFieldset($legend) {
90fdb8d77bSTom N Harris        if ($this->_infieldset) {
91fdb8d77bSTom N Harris            $this->addElement(array('_elem'=>'closefieldset'));
92fdb8d77bSTom N Harris        }
93fdb8d77bSTom N Harris        $this->addElement(array('_elem'=>'openfieldset', '_legend'=>$legend));
94fdb8d77bSTom N Harris        $this->_infieldset = true;
95fdb8d77bSTom N Harris    }
96fdb8d77bSTom N Harris
97fdb8d77bSTom N Harris    /**
98fdb8d77bSTom N Harris     * endFieldset
99fdb8d77bSTom N Harris     *
100fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
101fdb8d77bSTom N Harris     */
102*aba86f38SAndreas Gohr    public function endFieldset() {
103fdb8d77bSTom N Harris        if ($this->_infieldset) {
104fdb8d77bSTom N Harris            $this->addElement(array('_elem'=>'closefieldset'));
105fdb8d77bSTom N Harris        }
106fdb8d77bSTom N Harris        $this->_infieldset = false;
107fdb8d77bSTom N Harris    }
108fdb8d77bSTom N Harris
109fdb8d77bSTom N Harris    /**
110fdb8d77bSTom N Harris     * addHidden
111fdb8d77bSTom N Harris     *
112fdb8d77bSTom N Harris     * Adds a name/value pair as a hidden field.
113fdb8d77bSTom N Harris     * The value of the field (but not the name) will be passed to
114fdb8d77bSTom N Harris     * formText() before printing.
115fdb8d77bSTom N Harris     *
116fdb8d77bSTom N Harris     * @param   string  $name   Field name.
117fdb8d77bSTom N Harris     * @param   string  $value  Field value. If null, remove a previously added field.
11842ea7f44SGerrit Uitslag     *
119fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
120fdb8d77bSTom N Harris     */
121*aba86f38SAndreas Gohr    public function addHidden($name, $value) {
122fdb8d77bSTom N Harris        if (is_null($value))
123fdb8d77bSTom N Harris            unset($this->_hidden[$name]);
124fdb8d77bSTom N Harris        else
125fdb8d77bSTom N Harris            $this->_hidden[$name] = $value;
126fdb8d77bSTom N Harris    }
127fdb8d77bSTom N Harris
128fdb8d77bSTom N Harris    /**
129fdb8d77bSTom N Harris     * addElement
130fdb8d77bSTom N Harris     *
131fdb8d77bSTom N Harris     * Appends a content element to the form.
132fdb8d77bSTom N Harris     * The element can be either a pseudo-tag or string.
133fdb8d77bSTom N Harris     * If string, it is printed without escaping special chars.   *
134fdb8d77bSTom N Harris     *
1354f0bc4b2SAndreas Gohr     * @param   string|array  $elem   Pseudo-tag or string to add to the form.
13642ea7f44SGerrit Uitslag     *
137fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
138fdb8d77bSTom N Harris     */
139*aba86f38SAndreas Gohr    public function addElement($elem) {
140fdb8d77bSTom N Harris        $this->_content[] = $elem;
141fdb8d77bSTom N Harris    }
142fdb8d77bSTom N Harris
143fdb8d77bSTom N Harris    /**
144fdb8d77bSTom N Harris     * insertElement
145fdb8d77bSTom N Harris     *
146fdb8d77bSTom N Harris     * Inserts a content element at a position.
147fdb8d77bSTom N Harris     *
148fdb8d77bSTom N Harris     * @param   string       $pos  0-based index where the element will be inserted.
1494f0bc4b2SAndreas Gohr     * @param   string|array $elem Pseudo-tag or string to add to the form.
15042ea7f44SGerrit Uitslag     *
151fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
152fdb8d77bSTom N Harris     */
153*aba86f38SAndreas Gohr    public function insertElement($pos, $elem) {
154fdb8d77bSTom N Harris        array_splice($this->_content, $pos, 0, array($elem));
155fdb8d77bSTom N Harris    }
156fdb8d77bSTom N Harris
157fdb8d77bSTom N Harris    /**
158fdb8d77bSTom N Harris     * replaceElement
159fdb8d77bSTom N Harris     *
160fdb8d77bSTom N Harris     * Replace with NULL to remove an element.
161fdb8d77bSTom N Harris     *
162fdb8d77bSTom N Harris     * @param   int          $pos  0-based index the element will be placed at.
1634f0bc4b2SAndreas Gohr     * @param   string|array $elem Pseudo-tag or string to add to the form.
16442ea7f44SGerrit Uitslag     *
165fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
166fdb8d77bSTom N Harris     */
167*aba86f38SAndreas Gohr    public function replaceElement($pos, $elem) {
168fdb8d77bSTom N Harris        $rep = array();
169fdb8d77bSTom N Harris        if (!is_null($elem)) $rep[] = $elem;
170fdb8d77bSTom N Harris        array_splice($this->_content, $pos, 1, $rep);
171fdb8d77bSTom N Harris    }
172fdb8d77bSTom N Harris
173fdb8d77bSTom N Harris    /**
174fdb8d77bSTom N Harris     * findElementByType
175fdb8d77bSTom N Harris     *
176fdb8d77bSTom N Harris     * Gets the position of the first of a type of element.
177fdb8d77bSTom N Harris     *
178fdb8d77bSTom N Harris     * @param   string  $type   Element type to look for.
17942ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
18042ea7f44SGerrit Uitslag     *
181fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
182fdb8d77bSTom N Harris     */
183*aba86f38SAndreas Gohr    public function findElementByType($type) {
184fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
185fdb8d77bSTom N Harris            if (is_array($elem) && $elem['_elem'] == $type)
186fdb8d77bSTom N Harris                return $pos;
187fdb8d77bSTom N Harris        }
188fdb8d77bSTom N Harris        return false;
189fdb8d77bSTom N Harris    }
190fdb8d77bSTom N Harris
191fdb8d77bSTom N Harris    /**
192fdb8d77bSTom N Harris     * findElementById
193fdb8d77bSTom N Harris     *
194fdb8d77bSTom N Harris     * Gets the position of the element with an ID attribute.
195fdb8d77bSTom N Harris     *
196fdb8d77bSTom N Harris     * @param   string  $id     ID of the element to find.
19742ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
19842ea7f44SGerrit Uitslag     *
199fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
200fdb8d77bSTom N Harris     */
201*aba86f38SAndreas Gohr    public function findElementById($id) {
202fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
203fdb8d77bSTom N Harris            if (is_array($elem) && isset($elem['id']) && $elem['id'] == $id)
204fdb8d77bSTom N Harris                return $pos;
205fdb8d77bSTom N Harris        }
206fdb8d77bSTom N Harris        return false;
207fdb8d77bSTom N Harris    }
208fdb8d77bSTom N Harris
209fdb8d77bSTom N Harris    /**
210fdb8d77bSTom N Harris     * findElementByAttribute
211fdb8d77bSTom N Harris     *
212fdb8d77bSTom N Harris     * Gets the position of the first element with a matching attribute value.
213fdb8d77bSTom N Harris     *
214fdb8d77bSTom N Harris     * @param   string  $name   Attribute name.
215fdb8d77bSTom N Harris     * @param   string  $value  Attribute value.
21642ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
21742ea7f44SGerrit Uitslag     *
218fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
219fdb8d77bSTom N Harris     */
220*aba86f38SAndreas Gohr    public function findElementByAttribute($name, $value) {
221fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
222fdb8d77bSTom N Harris            if (is_array($elem) && isset($elem[$name]) && $elem[$name] == $value)
223fdb8d77bSTom N Harris                return $pos;
224fdb8d77bSTom N Harris        }
225fdb8d77bSTom N Harris        return false;
226fdb8d77bSTom N Harris    }
227fdb8d77bSTom N Harris
228fdb8d77bSTom N Harris    /**
229fdb8d77bSTom N Harris     * getElementAt
230fdb8d77bSTom N Harris     *
231fdb8d77bSTom N Harris     * Returns a reference to the element at a position.
232fdb8d77bSTom N Harris     * A position out-of-bounds will return either the
233fdb8d77bSTom N Harris     * first (underflow) or last (overflow) element.
234fdb8d77bSTom N Harris     *
235fdb8d77bSTom N Harris     * @param   int     $pos    0-based index
236fdb8d77bSTom N Harris     * @return  array reference  pseudo-element
23742ea7f44SGerrit Uitslag     *
238fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
239fdb8d77bSTom N Harris     */
240*aba86f38SAndreas Gohr    public function &getElementAt($pos) {
241fdb8d77bSTom N Harris        if ($pos < 0) $pos = count($this->_content) + $pos;
242fdb8d77bSTom N Harris        if ($pos < 0) $pos = 0;
243fdb8d77bSTom N Harris        if ($pos >= count($this->_content)) $pos = count($this->_content) - 1;
244fdb8d77bSTom N Harris        return $this->_content[$pos];
245fdb8d77bSTom N Harris    }
246fdb8d77bSTom N Harris
247fdb8d77bSTom N Harris    /**
248b81b193eSAndreas Gohr     * Return the assembled HTML for the form.
249fdb8d77bSTom N Harris     *
250fdb8d77bSTom N Harris     * Each element in the form will be passed to a function named
251fdb8d77bSTom N Harris     * 'form_$type'. The function should return the HTML to be printed.
252fdb8d77bSTom N Harris     *
253fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
25442ea7f44SGerrit Uitslag     *
25542ea7f44SGerrit Uitslag     * @return string html of the form
256fdb8d77bSTom N Harris     */
257*aba86f38SAndreas Gohr    public function getForm() {
258fdb8d77bSTom N Harris        global $lang;
259b81b193eSAndreas Gohr        $form = '';
260e351c80dSAdrian Lang        $this->params['accept-charset'] = $lang['encoding'];
2619f09385fSAndreas Gohr        $form .= '<form ' . buildAttributes($this->params,false) . '><div class="no">' . DOKU_LF;
262fdb8d77bSTom N Harris        if (!empty($this->_hidden)) {
263fdb8d77bSTom N Harris            foreach ($this->_hidden as $name=>$value)
264b81b193eSAndreas Gohr                $form .= form_hidden(array('name'=>$name, 'value'=>$value));
265fdb8d77bSTom N Harris        }
266fdb8d77bSTom N Harris        foreach ($this->_content as $element) {
267fdb8d77bSTom N Harris            if (is_array($element)) {
268fdb8d77bSTom N Harris                $elem_type = $element['_elem'];
269fdb8d77bSTom N Harris                if (function_exists('form_'.$elem_type)) {
270b81b193eSAndreas Gohr                    $form .= call_user_func('form_'.$elem_type, $element).DOKU_LF;
271fdb8d77bSTom N Harris                }
272fdb8d77bSTom N Harris            } else {
273b81b193eSAndreas Gohr                $form .= $element;
274fdb8d77bSTom N Harris            }
275fdb8d77bSTom N Harris        }
276b81b193eSAndreas Gohr        if ($this->_infieldset) $form .= form_closefieldset().DOKU_LF;
277b81b193eSAndreas Gohr        $form .= '</div></form>'.DOKU_LF;
278b81b193eSAndreas Gohr
279b81b193eSAndreas Gohr        return $form;
280b81b193eSAndreas Gohr    }
281b81b193eSAndreas Gohr
282b81b193eSAndreas Gohr    /**
283b81b193eSAndreas Gohr     * Print the assembled form
284b81b193eSAndreas Gohr     *
285b81b193eSAndreas Gohr     * wraps around getForm()
286b81b193eSAndreas Gohr     */
287*aba86f38SAndreas Gohr    public function printForm(){
288b81b193eSAndreas Gohr        echo $this->getForm();
289fdb8d77bSTom N Harris    }
290fdb8d77bSTom N Harris
2915b75cd1fSAdrian Lang    /**
2925b75cd1fSAdrian Lang     * Add a radio set
2935b75cd1fSAdrian Lang     *
2945b75cd1fSAdrian Lang     * This function adds a set of radio buttons to the form. If $_POST[$name]
2955b75cd1fSAdrian Lang     * is set, this radio is preselected, else the first radio button.
2965b75cd1fSAdrian Lang     *
2975b75cd1fSAdrian Lang     * @param string    $name    The HTML field name
2985b75cd1fSAdrian Lang     * @param array     $entries An array of entries $value => $caption
2995b75cd1fSAdrian Lang     *
3005b75cd1fSAdrian Lang     * @author Adrian Lang <lang@cosmocode.de>
3015b75cd1fSAdrian Lang     */
3025b75cd1fSAdrian Lang
303*aba86f38SAndreas Gohr    public function addRadioSet($name, $entries) {
304f0859d4bSTom N Harris        global $INPUT;
305f0859d4bSTom N Harris        $value = (array_key_exists($INPUT->post->str($name), $entries)) ?
306f0859d4bSTom N Harris                 $INPUT->str($name) : key($entries);
3075b75cd1fSAdrian Lang        foreach($entries as $val => $cap) {
3085b75cd1fSAdrian Lang            $data = ($value === $val) ? array('checked' => 'checked') : array();
3095b75cd1fSAdrian Lang            $this->addElement(form_makeRadioField($name, $val, $cap, '', '', $data));
3105b75cd1fSAdrian Lang        }
3115b75cd1fSAdrian Lang    }
3125b75cd1fSAdrian Lang
313fdb8d77bSTom N Harris}
314fdb8d77bSTom N Harris
315fdb8d77bSTom N Harris/**
316fdb8d77bSTom N Harris * form_makeTag
317fdb8d77bSTom N Harris *
318fdb8d77bSTom N Harris * Create a form element for a non-specific empty tag.
319fdb8d77bSTom N Harris *
320fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
321fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
322fdb8d77bSTom N Harris * @return  array   pseudo-tag
32342ea7f44SGerrit Uitslag *
324fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
325fdb8d77bSTom N Harris */
326fdb8d77bSTom N Harrisfunction form_makeTag($tag, $attrs=array()) {
327fdb8d77bSTom N Harris    $elem = array('_elem'=>'tag', '_tag'=>$tag);
328fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
329fdb8d77bSTom N Harris}
330fdb8d77bSTom N Harris
331fdb8d77bSTom N Harris/**
332fdb8d77bSTom N Harris * form_makeOpenTag
333fdb8d77bSTom N Harris *
334fdb8d77bSTom N Harris * Create a form element for a non-specific opening tag.
335fdb8d77bSTom N Harris * Remember to put a matching close tag after this as well.
336fdb8d77bSTom N Harris *
337fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
338fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
339fdb8d77bSTom N Harris * @return  array   pseudo-tag
34042ea7f44SGerrit Uitslag *
341fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
342fdb8d77bSTom N Harris */
343fdb8d77bSTom N Harrisfunction form_makeOpenTag($tag, $attrs=array()) {
344fdb8d77bSTom N Harris    $elem = array('_elem'=>'opentag', '_tag'=>$tag);
345fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
346fdb8d77bSTom N Harris}
347fdb8d77bSTom N Harris
348fdb8d77bSTom N Harris/**
349fdb8d77bSTom N Harris * form_makeCloseTag
350fdb8d77bSTom N Harris *
351fdb8d77bSTom N Harris * Create a form element for a non-specific closing tag.
352fdb8d77bSTom N Harris * Careless use of this will result in invalid XHTML.
353fdb8d77bSTom N Harris *
354fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
355fdb8d77bSTom N Harris * @return  array   pseudo-tag
35642ea7f44SGerrit Uitslag *
357fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
358fdb8d77bSTom N Harris */
359fdb8d77bSTom N Harrisfunction form_makeCloseTag($tag) {
360fdb8d77bSTom N Harris    return array('_elem'=>'closetag', '_tag'=>$tag);
361fdb8d77bSTom N Harris}
362fdb8d77bSTom N Harris
363fdb8d77bSTom N Harris/**
364fdb8d77bSTom N Harris * form_makeWikiText
365fdb8d77bSTom N Harris *
366fdb8d77bSTom N Harris * Create a form element for a textarea containing wiki text.
367fdb8d77bSTom N Harris * Only one wikitext element is allowed on a page. It will have
368fdb8d77bSTom N Harris * a name of 'wikitext' and id 'wiki__text'. The text will
369fdb8d77bSTom N Harris * be passed to formText() before printing.
370fdb8d77bSTom N Harris *
371fdb8d77bSTom N Harris * @param   string  $text   Text to fill the field with.
372fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
373fdb8d77bSTom N Harris * @return  array   pseudo-tag
37442ea7f44SGerrit Uitslag *
375fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
376fdb8d77bSTom N Harris */
377fdb8d77bSTom N Harrisfunction form_makeWikiText($text, $attrs=array()) {
378b2bc77d5STom N Harris    $elem = array('_elem'=>'wikitext', '_text'=>$text,
379b2bc77d5STom N Harris                        'class'=>'edit', 'cols'=>'80', 'rows'=>'10');
380fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
381fdb8d77bSTom N Harris}
382fdb8d77bSTom N Harris
383fdb8d77bSTom N Harris/**
384fdb8d77bSTom N Harris * form_makeButton
385fdb8d77bSTom N Harris *
386fdb8d77bSTom N Harris * Create a form element for an action button.
387fdb8d77bSTom N Harris * A title will automatically be generated using the value and
388fdb8d77bSTom N Harris * accesskey attributes, unless you provide one.
389fdb8d77bSTom N Harris *
390fdb8d77bSTom N Harris * @param   string  $type   Type attribute. 'submit' or 'cancel'
391fdb8d77bSTom N Harris * @param   string  $act    Wiki action of the button, will be used as the do= parameter
392fdb8d77bSTom N Harris * @param   string  $value  (optional) Displayed label. Uses $act if not provided.
393fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
394fdb8d77bSTom N Harris * @return  array   pseudo-tag
39542ea7f44SGerrit Uitslag *
396fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
397fdb8d77bSTom N Harris */
398fdb8d77bSTom N Harrisfunction form_makeButton($type, $act, $value='', $attrs=array()) {
399fdb8d77bSTom N Harris    if ($value == '') $value = $act;
400b2bc77d5STom N Harris    $elem = array('_elem'=>'button', 'type'=>$type, '_action'=>$act,
401ae614416SAnika Henke                        'value'=>$value);
402fdb8d77bSTom N Harris    if (!empty($attrs['accesskey']) && empty($attrs['title'])) {
40307493d05SAnika Henke        $attrs['title'] = $value . ' ['.strtoupper($attrs['accesskey']).']';
404fdb8d77bSTom N Harris    }
405fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
406fdb8d77bSTom N Harris}
407fdb8d77bSTom N Harris
408fdb8d77bSTom N Harris/**
409fdb8d77bSTom N Harris * form_makeField
410fdb8d77bSTom N Harris *
411fdb8d77bSTom N Harris * Create a form element for a labelled input element.
412fdb8d77bSTom N Harris * The label text will be printed before the input.
413fdb8d77bSTom N Harris *
414fdb8d77bSTom N Harris * @param   string  $type   Type attribute of input.
415fdb8d77bSTom N Harris * @param   string  $name   Name attribute of the input.
416fdb8d77bSTom N Harris * @param   string  $value  (optional) Default value.
417fdb8d77bSTom N Harris * @param   string  $class  Class attribute of the label. If this is 'block',
418fdb8d77bSTom N Harris *                          then a line break will be added after the field.
419fdb8d77bSTom N Harris * @param   string  $label  Label that will be printed before the input.
420fdb8d77bSTom N Harris * @param   string  $id     ID attribute of the input. If set, the label will
421fdb8d77bSTom N Harris *                          reference it with a 'for' attribute.
422fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
423fdb8d77bSTom N Harris * @return  array   pseudo-tag
42442ea7f44SGerrit Uitslag *
425fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
426fdb8d77bSTom N Harris */
427fdb8d77bSTom N Harrisfunction form_makeField($type, $name, $value='', $label=null, $id='', $class='', $attrs=array()) {
428fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
429fdb8d77bSTom N Harris    $elem = array('_elem'=>'field', '_text'=>$label, '_class'=>$class,
430fdb8d77bSTom N Harris                        'type'=>$type, 'id'=>$id, 'name'=>$name, 'value'=>$value);
431fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
432fdb8d77bSTom N Harris}
433fdb8d77bSTom N Harris
434fdb8d77bSTom N Harris/**
435fdb8d77bSTom N Harris * form_makeFieldRight
436fdb8d77bSTom N Harris *
437fdb8d77bSTom N Harris * Create a form element for a labelled input element.
438fdb8d77bSTom N Harris * The label text will be printed after the input.
439fdb8d77bSTom N Harris *
440fdb8d77bSTom N Harris * @see     form_makeField
441fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
442f50a239bSTakamura *
443f50a239bSTakamura * @param string $type
444f50a239bSTakamura * @param string $name
445f50a239bSTakamura * @param string $value
446f50a239bSTakamura * @param null|string $label
447f50a239bSTakamura * @param string $id
448f50a239bSTakamura * @param string $class
449f50a239bSTakamura * @param array $attrs
450f50a239bSTakamura *
451f50a239bSTakamura * @return array
452fdb8d77bSTom N Harris */
453fdb8d77bSTom N Harrisfunction form_makeFieldRight($type, $name, $value='', $label=null, $id='', $class='', $attrs=array()) {
454fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
455fdb8d77bSTom N Harris    $elem = array('_elem'=>'fieldright', '_text'=>$label, '_class'=>$class,
456fdb8d77bSTom N Harris                        'type'=>$type, 'id'=>$id, 'name'=>$name, 'value'=>$value);
457fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
458fdb8d77bSTom N Harris}
459fdb8d77bSTom N Harris
460fdb8d77bSTom N Harris/**
461fdb8d77bSTom N Harris * form_makeTextField
462fdb8d77bSTom N Harris *
463fdb8d77bSTom N Harris * Create a form element for a text input element with label.
464fdb8d77bSTom N Harris *
465fdb8d77bSTom N Harris * @see     form_makeField
466fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
467f50a239bSTakamura *
468f50a239bSTakamura * @param string $name
469f50a239bSTakamura * @param string $value
470f50a239bSTakamura * @param null|string $label
471f50a239bSTakamura * @param string $id
472f50a239bSTakamura * @param string $class
473f50a239bSTakamura * @param array $attrs
474f50a239bSTakamura *
475f50a239bSTakamura * @return array
476fdb8d77bSTom N Harris */
477fdb8d77bSTom N Harrisfunction form_makeTextField($name, $value='', $label=null, $id='', $class='', $attrs=array()) {
478fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
479fdb8d77bSTom N Harris    $elem = array('_elem'=>'textfield', '_text'=>$label, '_class'=>$class,
480b2bc77d5STom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value, 'class'=>'edit');
481fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
482fdb8d77bSTom N Harris}
483fdb8d77bSTom N Harris
484fdb8d77bSTom N Harris/**
485fdb8d77bSTom N Harris * form_makePasswordField
486fdb8d77bSTom N Harris *
487fdb8d77bSTom N Harris * Create a form element for a password input element with label.
488fdb8d77bSTom N Harris * Password elements have no default value, for obvious reasons.
489fdb8d77bSTom N Harris *
490fdb8d77bSTom N Harris * @see     form_makeField
491fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
492f50a239bSTakamura *
493f50a239bSTakamura * @param string $name
494f50a239bSTakamura * @param null|string $label
495f50a239bSTakamura * @param string $id
496f50a239bSTakamura * @param string $class
497f50a239bSTakamura * @param array $attrs
498f50a239bSTakamura *
499f50a239bSTakamura * @return array
500fdb8d77bSTom N Harris */
501fdb8d77bSTom N Harrisfunction form_makePasswordField($name, $label=null, $id='', $class='', $attrs=array()) {
502fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
503fdb8d77bSTom N Harris    $elem = array('_elem'=>'passwordfield', '_text'=>$label, '_class'=>$class,
504b2bc77d5STom N Harris                        'id'=>$id, 'name'=>$name, 'class'=>'edit');
505fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
506fdb8d77bSTom N Harris}
507fdb8d77bSTom N Harris
508fdb8d77bSTom N Harris/**
50912bbca2eSMichael Klier * form_makeFileField
51012bbca2eSMichael Klier *
51112bbca2eSMichael Klier * Create a form element for a file input element with label
51212bbca2eSMichael Klier *
51312bbca2eSMichael Klier * @see     form_makeField
51412bbca2eSMichael Klier * @author  Michael Klier <chi@chimeric.de>
515f50a239bSTakamura *
516f50a239bSTakamura * @param string $name
517f50a239bSTakamura * @param null|string $label
518f50a239bSTakamura * @param string $id
519f50a239bSTakamura * @param string $class
520f50a239bSTakamura * @param array $attrs
521f50a239bSTakamura *
522f50a239bSTakamura * @return array
52312bbca2eSMichael Klier */
52412bbca2eSMichael Klierfunction form_makeFileField($name, $label=null, $id='', $class='', $attrs=array()) {
52512bbca2eSMichael Klier    if (is_null($label)) $label = $name;
52612bbca2eSMichael Klier    $elem = array('_elem'=>'filefield', '_text'=>$label, '_class'=>$class,
52712bbca2eSMichael Klier                        'id'=>$id, 'name'=>$name, 'class'=>'edit');
52812bbca2eSMichael Klier    return array_merge($elem, $attrs);
52912bbca2eSMichael Klier}
53012bbca2eSMichael Klier
53112bbca2eSMichael Klier/**
532fdb8d77bSTom N Harris * form_makeCheckboxField
533fdb8d77bSTom N Harris *
534fdb8d77bSTom N Harris * Create a form element for a checkbox input element with label.
5352f10258cSAdrian Lang * If $value is an array, a hidden field with the same name and the value
5362f10258cSAdrian Lang * $value[1] is constructed as well.
537fdb8d77bSTom N Harris *
538fdb8d77bSTom N Harris * @see     form_makeFieldRight
539fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
540f50a239bSTakamura *
541f50a239bSTakamura * @param string $name
542f50a239bSTakamura * @param string $value
543f50a239bSTakamura * @param null|string $label
544f50a239bSTakamura * @param string $id
545f50a239bSTakamura * @param string $class
546f50a239bSTakamura * @param array $attrs
547f50a239bSTakamura *
548f50a239bSTakamura * @return array
549fdb8d77bSTom N Harris */
550fdb8d77bSTom N Harrisfunction form_makeCheckboxField($name, $value='1', $label=null, $id='', $class='', $attrs=array()) {
551fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
552fdb8d77bSTom N Harris    if (is_null($value) || $value=='') $value='0';
553fdb8d77bSTom N Harris    $elem = array('_elem'=>'checkboxfield', '_text'=>$label, '_class'=>$class,
554fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value);
555fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
556fdb8d77bSTom N Harris}
557fdb8d77bSTom N Harris
558fdb8d77bSTom N Harris/**
559fdb8d77bSTom N Harris * form_makeRadioField
560fdb8d77bSTom N Harris *
561fdb8d77bSTom N Harris * Create a form element for a radio button input element with label.
562fdb8d77bSTom N Harris *
563fdb8d77bSTom N Harris * @see     form_makeFieldRight
564fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
565f50a239bSTakamura *
566f50a239bSTakamura * @param string $name
567f50a239bSTakamura * @param string $value
568f50a239bSTakamura * @param null|string $label
569f50a239bSTakamura * @param string $id
570f50a239bSTakamura * @param string $class
571f50a239bSTakamura * @param array $attrs
572f50a239bSTakamura *
573f50a239bSTakamura * @return array
574fdb8d77bSTom N Harris */
575fdb8d77bSTom N Harrisfunction form_makeRadioField($name, $value='1', $label=null, $id='', $class='', $attrs=array()) {
576fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
577fdb8d77bSTom N Harris    if (is_null($value) || $value=='') $value='0';
578fdb8d77bSTom N Harris    $elem = array('_elem'=>'radiofield', '_text'=>$label, '_class'=>$class,
579fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value);
580fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
581fdb8d77bSTom N Harris}
582fdb8d77bSTom N Harris
583fdb8d77bSTom N Harris/**
584fdb8d77bSTom N Harris * form_makeMenuField
585fdb8d77bSTom N Harris *
586fdb8d77bSTom N Harris * Create a form element for a drop-down menu with label.
587fdb8d77bSTom N Harris * The list of values can be strings, arrays of (value,text),
588fdb8d77bSTom N Harris * or an associative array with the values as keys and labels as values.
589fdb8d77bSTom N Harris * An item is selected by supplying its value or integer index.
590fdb8d77bSTom N Harris * If the list of values is an associative array, the selected item must be
591fdb8d77bSTom N Harris * a string.
592fdb8d77bSTom N Harris *
593fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
59442ea7f44SGerrit Uitslag *
59542ea7f44SGerrit Uitslag * @param string           $name     Name attribute of the input.
59642ea7f44SGerrit Uitslag * @param string[]|array[] $values   The list of values can be strings, arrays of (value,text),
59742ea7f44SGerrit Uitslag *                                   or an associative array with the values as keys and labels as values.
59842ea7f44SGerrit Uitslag * @param string|int       $selected default selected value, string or index number
59942ea7f44SGerrit Uitslag * @param string           $class    Class attribute of the label. If this is 'block',
60042ea7f44SGerrit Uitslag *                                   then a line break will be added after the field.
60142ea7f44SGerrit Uitslag * @param string           $label    Label that will be printed before the input.
60242ea7f44SGerrit Uitslag * @param string           $id       ID attribute of the input. If set, the label will
60342ea7f44SGerrit Uitslag *                                   reference it with a 'for' attribute.
60442ea7f44SGerrit Uitslag * @param array            $attrs    Optional attributes.
60542ea7f44SGerrit Uitslag * @return array   pseudo-tag
606fdb8d77bSTom N Harris */
607fdb8d77bSTom N Harrisfunction form_makeMenuField($name, $values, $selected='', $label=null, $id='', $class='', $attrs=array()) {
608fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
609fdb8d77bSTom N Harris    $options = array();
610fdb8d77bSTom N Harris    reset($values);
611fdb8d77bSTom N Harris    // FIXME: php doesn't know the difference between a string and an integer
612fdb8d77bSTom N Harris    if (is_string(key($values))) {
613fdb8d77bSTom N Harris        foreach ($values as $val=>$text) {
614fdb8d77bSTom N Harris            $options[] = array($val,$text, (!is_null($selected) && $val==$selected));
615fdb8d77bSTom N Harris        }
616fdb8d77bSTom N Harris    } else {
617fdb8d77bSTom N Harris        if (is_integer($selected)) $selected = $values[$selected];
618fdb8d77bSTom N Harris        foreach ($values as $val) {
619fdb8d77bSTom N Harris            if (is_array($val))
620fdb8d77bSTom N Harris                @list($val,$text) = $val;
621fdb8d77bSTom N Harris            else
622fdb8d77bSTom N Harris                $text = null;
623fdb8d77bSTom N Harris            $options[] = array($val,$text,$val===$selected);
624fdb8d77bSTom N Harris        }
625fdb8d77bSTom N Harris    }
626fdb8d77bSTom N Harris    $elem = array('_elem'=>'menufield', '_options'=>$options, '_text'=>$label, '_class'=>$class,
627fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name);
628fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
629fdb8d77bSTom N Harris}
630fdb8d77bSTom N Harris
631fdb8d77bSTom N Harris/**
632fdb8d77bSTom N Harris * form_makeListboxField
633fdb8d77bSTom N Harris *
634fdb8d77bSTom N Harris * Create a form element for a list box with label.
635fdb8d77bSTom N Harris * The list of values can be strings, arrays of (value,text),
636fdb8d77bSTom N Harris * or an associative array with the values as keys and labels as values.
637fdb8d77bSTom N Harris * Items are selected by supplying its value or an array of values.
638fdb8d77bSTom N Harris *
639fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
64042ea7f44SGerrit Uitslag *
64142ea7f44SGerrit Uitslag * @param string           $name     Name attribute of the input.
64242ea7f44SGerrit Uitslag * @param string[]|array[] $values   The list of values can be strings, arrays of (value,text),
64342ea7f44SGerrit Uitslag *                                   or an associative array with the values as keys and labels as values.
64442ea7f44SGerrit Uitslag * @param array|string     $selected value or array of values of the items that need to be selected
64542ea7f44SGerrit Uitslag * @param string           $class    Class attribute of the label. If this is 'block',
64642ea7f44SGerrit Uitslag *                                   then a line break will be added after the field.
64742ea7f44SGerrit Uitslag * @param string           $label    Label that will be printed before the input.
64842ea7f44SGerrit Uitslag * @param string           $id       ID attribute of the input. If set, the label will
64942ea7f44SGerrit Uitslag *                                   reference it with a 'for' attribute.
65042ea7f44SGerrit Uitslag * @param array            $attrs    Optional attributes.
65142ea7f44SGerrit Uitslag * @return array   pseudo-tag
652fdb8d77bSTom N Harris */
653fdb8d77bSTom N Harrisfunction form_makeListboxField($name, $values, $selected='', $label=null, $id='', $class='', $attrs=array()) {
654fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
655fdb8d77bSTom N Harris    $options = array();
656fdb8d77bSTom N Harris    reset($values);
657eeb8f429SGerrit Uitslag    if (is_null($selected) || $selected == '') {
658fdb8d77bSTom N Harris        $selected = array();
659eeb8f429SGerrit Uitslag    } elseif (!is_array($selected)) {
660fdb8d77bSTom N Harris        $selected = array($selected);
661eeb8f429SGerrit Uitslag    }
662fdb8d77bSTom N Harris    // FIXME: php doesn't know the difference between a string and an integer
663fdb8d77bSTom N Harris    if (is_string(key($values))) {
664fdb8d77bSTom N Harris        foreach ($values as $val=>$text) {
665fdb8d77bSTom N Harris            $options[] = array($val,$text,in_array($val,$selected));
666fdb8d77bSTom N Harris        }
667fdb8d77bSTom N Harris    } else {
668fdb8d77bSTom N Harris        foreach ($values as $val) {
669eeb8f429SGerrit Uitslag            $disabled = false;
670eeb8f429SGerrit Uitslag            if (is_array($val)) {
671eeb8f429SGerrit Uitslag                @list($val,$text,$disabled) = $val;
672eeb8f429SGerrit Uitslag            } else {
673fdb8d77bSTom N Harris                $text = null;
674eeb8f429SGerrit Uitslag            }
675eeb8f429SGerrit Uitslag            $options[] = array($val,$text,in_array($val,$selected),$disabled);
676fdb8d77bSTom N Harris        }
677fdb8d77bSTom N Harris    }
678fdb8d77bSTom N Harris    $elem = array('_elem'=>'listboxfield', '_options'=>$options, '_text'=>$label, '_class'=>$class,
679fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name);
680fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
681fdb8d77bSTom N Harris}
682fdb8d77bSTom N Harris
683fdb8d77bSTom N Harris/**
684fdb8d77bSTom N Harris * form_tag
685fdb8d77bSTom N Harris *
686fdb8d77bSTom N Harris * Print the HTML for a generic empty tag.
687fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
688fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
689fdb8d77bSTom N Harris *
690fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
69142ea7f44SGerrit Uitslag *
69242ea7f44SGerrit Uitslag * @param array $attrs attributes
69342ea7f44SGerrit Uitslag * @return string html of tag
694fdb8d77bSTom N Harris */
695fdb8d77bSTom N Harrisfunction form_tag($attrs) {
696c277a6bdSTom N Harris    return '<'.$attrs['_tag'].' '.buildAttributes($attrs,true).'/>';
697fdb8d77bSTom N Harris}
698fdb8d77bSTom N Harris
699fdb8d77bSTom N Harris/**
700fdb8d77bSTom N Harris * form_opentag
701fdb8d77bSTom N Harris *
702fdb8d77bSTom N Harris * Print the HTML for a generic opening tag.
703fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
704fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
705fdb8d77bSTom N Harris *
706fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
70742ea7f44SGerrit Uitslag *
70842ea7f44SGerrit Uitslag * @param array $attrs attributes
70942ea7f44SGerrit Uitslag * @return string html of tag
710fdb8d77bSTom N Harris */
711fdb8d77bSTom N Harrisfunction form_opentag($attrs) {
712fdb8d77bSTom N Harris    return '<'.$attrs['_tag'].' '.buildAttributes($attrs,true).'>';
713fdb8d77bSTom N Harris}
714fdb8d77bSTom N Harris
715fdb8d77bSTom N Harris/**
716fdb8d77bSTom N Harris * form_closetag
717fdb8d77bSTom N Harris *
718fdb8d77bSTom N Harris * Print the HTML for a generic closing tag.
719fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
720fdb8d77bSTom N Harris * There are no attributes.
721fdb8d77bSTom N Harris *
722fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
72342ea7f44SGerrit Uitslag *
72442ea7f44SGerrit Uitslag * @param array $attrs attributes
72542ea7f44SGerrit Uitslag * @return string html of tag
726fdb8d77bSTom N Harris */
727fdb8d77bSTom N Harrisfunction form_closetag($attrs) {
728fdb8d77bSTom N Harris    return '</'.$attrs['_tag'].'>';
729fdb8d77bSTom N Harris}
730fdb8d77bSTom N Harris
731fdb8d77bSTom N Harris/**
732fdb8d77bSTom N Harris * form_openfieldset
733fdb8d77bSTom N Harris *
734fdb8d77bSTom N Harris * Print the HTML for an opening fieldset tag.
735fdb8d77bSTom N Harris * Uses the '_legend' key.
736fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
737fdb8d77bSTom N Harris *
738fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
73942ea7f44SGerrit Uitslag *
74042ea7f44SGerrit Uitslag * @param array $attrs attributes
74142ea7f44SGerrit Uitslag * @return string html
742fdb8d77bSTom N Harris */
743fdb8d77bSTom N Harrisfunction form_openfieldset($attrs) {
744fdb8d77bSTom N Harris    $s = '<fieldset '.buildAttributes($attrs,true).'>';
745fdb8d77bSTom N Harris    if (!is_null($attrs['_legend'])) $s .= '<legend>'.$attrs['_legend'].'</legend>';
746fdb8d77bSTom N Harris    return $s;
747fdb8d77bSTom N Harris}
748fdb8d77bSTom N Harris
749fdb8d77bSTom N Harris/**
750fdb8d77bSTom N Harris * form_closefieldset
751fdb8d77bSTom N Harris *
752fdb8d77bSTom N Harris * Print the HTML for a closing fieldset tag.
753fdb8d77bSTom N Harris * There are no attributes.
754fdb8d77bSTom N Harris *
755fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
75642ea7f44SGerrit Uitslag *
75742ea7f44SGerrit Uitslag * @return string html
758fdb8d77bSTom N Harris */
759fdb8d77bSTom N Harrisfunction form_closefieldset() {
760fdb8d77bSTom N Harris    return '</fieldset>';
761fdb8d77bSTom N Harris}
762fdb8d77bSTom N Harris
763fdb8d77bSTom N Harris/**
764fdb8d77bSTom N Harris * form_hidden
765fdb8d77bSTom N Harris *
766fdb8d77bSTom N Harris * Print the HTML for a hidden input element.
767fdb8d77bSTom N Harris * Uses only 'name' and 'value' attributes.
768fdb8d77bSTom N Harris * Value is passed to formText()
769fdb8d77bSTom N Harris *
770fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
77142ea7f44SGerrit Uitslag *
77242ea7f44SGerrit Uitslag * @param array $attrs attributes
77342ea7f44SGerrit Uitslag * @return string html
774fdb8d77bSTom N Harris */
775fdb8d77bSTom N Harrisfunction form_hidden($attrs) {
776fdb8d77bSTom N Harris    return '<input type="hidden" name="'.$attrs['name'].'" value="'.formText($attrs['value']).'" />';
777fdb8d77bSTom N Harris}
778fdb8d77bSTom N Harris
779fdb8d77bSTom N Harris/**
780fdb8d77bSTom N Harris * form_wikitext
781fdb8d77bSTom N Harris *
782fdb8d77bSTom N Harris * Print the HTML for the wiki textarea.
783fdb8d77bSTom N Harris * Requires '_text' with default text of the field.
784fdb8d77bSTom N Harris * Text will be passed to formText(), attributes to buildAttributes()
785fdb8d77bSTom N Harris *
786fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
78742ea7f44SGerrit Uitslag *
78842ea7f44SGerrit Uitslag * @param array $attrs attributes
78942ea7f44SGerrit Uitslag * @return string html
790fdb8d77bSTom N Harris */
791fdb8d77bSTom N Harrisfunction form_wikitext($attrs) {
792b2bc77d5STom N Harris    // mandatory attributes
793b2bc77d5STom N Harris    unset($attrs['name']);
794b2bc77d5STom N Harris    unset($attrs['id']);
7950d39ad11SAnika Henke    return '<textarea name="wikitext" id="wiki__text" dir="auto" '
796804e2f2fSAdrian Lang                 .buildAttributes($attrs,true).'>'.DOKU_LF
797fdb8d77bSTom N Harris                 .formText($attrs['_text'])
798fdb8d77bSTom N Harris                 .'</textarea>';
799fdb8d77bSTom N Harris}
800fdb8d77bSTom N Harris
801fdb8d77bSTom N Harris/**
802fdb8d77bSTom N Harris * form_button
803fdb8d77bSTom N Harris *
804fdb8d77bSTom N Harris * Print the HTML for a form button.
805fdb8d77bSTom N Harris * If '_action' is set, the button name will be "do[_action]".
806fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes()
807fdb8d77bSTom N Harris *
808fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
80942ea7f44SGerrit Uitslag *
81042ea7f44SGerrit Uitslag * @param array $attrs attributes
81142ea7f44SGerrit Uitslag * @return string html
812fdb8d77bSTom N Harris */
813fdb8d77bSTom N Harrisfunction form_button($attrs) {
814fdb8d77bSTom N Harris    $p = (!empty($attrs['_action'])) ? 'name="do['.$attrs['_action'].']" ' : '';
815ae614416SAnika Henke    $value = $attrs['value'];
816ae614416SAnika Henke    unset($attrs['value']);
817ae614416SAnika Henke    return '<button '.$p.buildAttributes($attrs,true).'>'.$value.'</button>';
818fdb8d77bSTom N Harris}
819fdb8d77bSTom N Harris
820fdb8d77bSTom N Harris/**
821fdb8d77bSTom N Harris * form_field
822fdb8d77bSTom N Harris *
823fdb8d77bSTom N Harris * Print the HTML for a form input field.
824fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
825fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
826fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
827fdb8d77bSTom N Harris *
828fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
82942ea7f44SGerrit Uitslag *
83042ea7f44SGerrit Uitslag * @param array $attrs attributes
83142ea7f44SGerrit Uitslag * @return string html
832fdb8d77bSTom N Harris */
833fdb8d77bSTom N Harrisfunction form_field($attrs) {
834a57c7cafSAnika Henke    $s = '<label';
835a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
836fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
837fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span>';
838fdb8d77bSTom N Harris    $s .= ' <input '.buildAttributes($attrs,true).' /></label>';
839fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
840fdb8d77bSTom N Harris        $s .= '<br />';
841fdb8d77bSTom N Harris    return $s;
842fdb8d77bSTom N Harris}
843fdb8d77bSTom N Harris
844fdb8d77bSTom N Harris/**
845fdb8d77bSTom N Harris * form_fieldright
846fdb8d77bSTom N Harris *
847fdb8d77bSTom N Harris * Print the HTML for a form input field. (right-aligned)
848fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
849fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
850fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
851fdb8d77bSTom N Harris *
852fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
85342ea7f44SGerrit Uitslag *
85442ea7f44SGerrit Uitslag * @param array $attrs attributes
85542ea7f44SGerrit Uitslag * @return string html
856fdb8d77bSTom N Harris */
857fdb8d77bSTom N Harrisfunction form_fieldright($attrs) {
858a57c7cafSAnika Henke    $s = '<label';
859a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
860fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
861fdb8d77bSTom N Harris    $s .= '><input '.buildAttributes($attrs,true).' />';
862fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
863fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
864fdb8d77bSTom N Harris        $s .= '<br />';
865fdb8d77bSTom N Harris    return $s;
866fdb8d77bSTom N Harris}
867fdb8d77bSTom N Harris
868fdb8d77bSTom N Harris/**
869fdb8d77bSTom N Harris * form_textfield
870fdb8d77bSTom N Harris *
871fdb8d77bSTom N Harris * Print the HTML for a text input field.
872fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
873fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
874fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
875fdb8d77bSTom N Harris *
876fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
87742ea7f44SGerrit Uitslag *
87842ea7f44SGerrit Uitslag * @param array $attrs attributes
87942ea7f44SGerrit Uitslag * @return string html
880fdb8d77bSTom N Harris */
881fdb8d77bSTom N Harrisfunction form_textfield($attrs) {
882b2bc77d5STom N Harris    // mandatory attributes
883b2bc77d5STom N Harris    unset($attrs['type']);
884a57c7cafSAnika Henke    $s = '<label';
885a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
886fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
887fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
888b2bc77d5STom N Harris    $s .= '<input type="text" '.buildAttributes($attrs,true).' /></label>';
889fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
890fdb8d77bSTom N Harris        $s .= '<br />';
891fdb8d77bSTom N Harris    return $s;
892fdb8d77bSTom N Harris}
893fdb8d77bSTom N Harris
894fdb8d77bSTom N Harris/**
895fdb8d77bSTom N Harris * form_passwordfield
896fdb8d77bSTom N Harris *
897fdb8d77bSTom N Harris * Print the HTML for a password input field.
898fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
899fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
900fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
901fdb8d77bSTom N Harris *
902fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
90342ea7f44SGerrit Uitslag *
90442ea7f44SGerrit Uitslag * @param array $attrs attributes
90542ea7f44SGerrit Uitslag * @return string html
906fdb8d77bSTom N Harris */
907fdb8d77bSTom N Harrisfunction form_passwordfield($attrs) {
908b2bc77d5STom N Harris    // mandatory attributes
909b2bc77d5STom N Harris    unset($attrs['type']);
910a57c7cafSAnika Henke    $s = '<label';
911a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
912fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
913fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
914b2bc77d5STom N Harris    $s .= '<input type="password" '.buildAttributes($attrs,true).' /></label>';
915fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
916fdb8d77bSTom N Harris        $s .= '<br />';
917fdb8d77bSTom N Harris    return $s;
918fdb8d77bSTom N Harris}
919fdb8d77bSTom N Harris
920fdb8d77bSTom N Harris/**
92112bbca2eSMichael Klier * form_filefield
92212bbca2eSMichael Klier *
92312bbca2eSMichael Klier * Print the HTML for a file input field.
92412bbca2eSMichael Klier *   _class     : class attribute used on the label tag
92512bbca2eSMichael Klier *   _text      : Text to display before the input. Not escaped
92612bbca2eSMichael Klier *   _maxlength : Allowed size in byte
92712bbca2eSMichael Klier *   _accept    : Accepted mime-type
92812bbca2eSMichael Klier * Other attributes are passed to buildAttributes() for the input tag
92912bbca2eSMichael Klier *
93012bbca2eSMichael Klier * @author  Michael Klier <chi@chimeric.de>
93142ea7f44SGerrit Uitslag *
93242ea7f44SGerrit Uitslag * @param array $attrs attributes
93342ea7f44SGerrit Uitslag * @return string html
93412bbca2eSMichael Klier */
93512bbca2eSMichael Klierfunction form_filefield($attrs) {
936a57c7cafSAnika Henke    $s = '<label';
937a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
93812bbca2eSMichael Klier    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
93912bbca2eSMichael Klier    $s .= '><span>'.$attrs['_text'].'</span> ';
94012bbca2eSMichael Klier    $s .= '<input type="file" '.buildAttributes($attrs,true);
94112bbca2eSMichael Klier    if (!empty($attrs['_maxlength'])) $s .= ' maxlength="'.$attrs['_maxlength'].'"';
94212bbca2eSMichael Klier    if (!empty($attrs['_accept'])) $s .= ' accept="'.$attrs['_accept'].'"';
94312bbca2eSMichael Klier    $s .= ' /></label>';
94412bbca2eSMichael Klier    if (preg_match('/(^| )block($| )/', $attrs['_class']))
94512bbca2eSMichael Klier        $s .= '<br />';
94612bbca2eSMichael Klier    return $s;
94712bbca2eSMichael Klier}
94812bbca2eSMichael Klier
94912bbca2eSMichael Klier/**
950fdb8d77bSTom N Harris * form_checkboxfield
951fdb8d77bSTom N Harris *
952fdb8d77bSTom N Harris * Print the HTML for a checkbox input field.
953fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
954fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
955fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
9562f10258cSAdrian Lang * If value is an array, a hidden field with the same name and the value
9572f10258cSAdrian Lang * $attrs['value'][1] is constructed as well.
958fdb8d77bSTom N Harris *
959fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
96042ea7f44SGerrit Uitslag *
96142ea7f44SGerrit Uitslag * @param array $attrs attributes
96242ea7f44SGerrit Uitslag * @return string html
963fdb8d77bSTom N Harris */
964fdb8d77bSTom N Harrisfunction form_checkboxfield($attrs) {
965b2bc77d5STom N Harris    // mandatory attributes
966b2bc77d5STom N Harris    unset($attrs['type']);
967a57c7cafSAnika Henke    $s = '<label';
968a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
969fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
9702f10258cSAdrian Lang    $s .= '>';
9712f10258cSAdrian Lang    if (is_array($attrs['value'])) {
9722f10258cSAdrian Lang        echo '<input type="hidden" name="' . hsc($attrs['name']) .'"'
9732f10258cSAdrian Lang                 . ' value="' . hsc($attrs['value'][1]) . '" />';
9742f10258cSAdrian Lang        $attrs['value'] = $attrs['value'][0];
9752f10258cSAdrian Lang    }
9762f10258cSAdrian Lang    $s .= '<input type="checkbox" '.buildAttributes($attrs,true).' />';
977fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
978fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
979fdb8d77bSTom N Harris        $s .= '<br />';
980fdb8d77bSTom N Harris    return $s;
981fdb8d77bSTom N Harris}
982fdb8d77bSTom N Harris
983fdb8d77bSTom N Harris/**
984fdb8d77bSTom N Harris * form_radiofield
985fdb8d77bSTom N Harris *
986fdb8d77bSTom N Harris * Print the HTML for a radio button input field.
987fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
988fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
989fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
990fdb8d77bSTom N Harris *
991fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
99242ea7f44SGerrit Uitslag *
99342ea7f44SGerrit Uitslag * @param array $attrs attributes
99442ea7f44SGerrit Uitslag * @return string html
995fdb8d77bSTom N Harris */
996fdb8d77bSTom N Harrisfunction form_radiofield($attrs) {
997b2bc77d5STom N Harris    // mandatory attributes
998b2bc77d5STom N Harris    unset($attrs['type']);
999a57c7cafSAnika Henke    $s = '<label';
1000a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
1001fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
1002fdb8d77bSTom N Harris    $s .= '><input type="radio" '.buildAttributes($attrs,true).' />';
1003fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
1004fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
1005fdb8d77bSTom N Harris        $s .= '<br />';
1006fdb8d77bSTom N Harris    return $s;
1007fdb8d77bSTom N Harris}
1008fdb8d77bSTom N Harris
1009fdb8d77bSTom N Harris/**
1010fdb8d77bSTom N Harris * form_menufield
1011fdb8d77bSTom N Harris *
1012fdb8d77bSTom N Harris * Print the HTML for a drop-down menu.
1013fdb8d77bSTom N Harris *   _options : Array of (value,text,selected) for the menu.
1014fdb8d77bSTom N Harris *              Text can be omitted. Text and value are passed to formText()
1015fdb8d77bSTom N Harris *              Only one item can be selected.
1016fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
1017fdb8d77bSTom N Harris *   _text  : Text to display before the menu. Not escaped.
1018fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
1019fdb8d77bSTom N Harris *
1020fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
102142ea7f44SGerrit Uitslag *
102242ea7f44SGerrit Uitslag * @param array $attrs attributes
102342ea7f44SGerrit Uitslag * @return string html
1024fdb8d77bSTom N Harris */
1025fdb8d77bSTom N Harrisfunction form_menufield($attrs) {
1026fdb8d77bSTom N Harris    $attrs['size'] = '1';
1027a57c7cafSAnika Henke    $s = '<label';
1028a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
1029fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
1030fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span>';
1031804e2f2fSAdrian Lang    $s .= ' <select '.buildAttributes($attrs,true).'>'.DOKU_LF;
1032fdb8d77bSTom N Harris    if (!empty($attrs['_options'])) {
1033fdb8d77bSTom N Harris        $selected = false;
103449eb6e38SAndreas Gohr
103549eb6e38SAndreas Gohr        $cnt = count($attrs['_options']);
103649eb6e38SAndreas Gohr        for($n=0; $n < $cnt; $n++){
1037fdb8d77bSTom N Harris            @list($value,$text,$select) = $attrs['_options'][$n];
1038fdb8d77bSTom N Harris            $p = '';
1039fdb8d77bSTom N Harris            if (!is_null($text))
1040fdb8d77bSTom N Harris                $p .= ' value="'.formText($value).'"';
1041fdb8d77bSTom N Harris            else
1042fdb8d77bSTom N Harris                $text = $value;
1043fdb8d77bSTom N Harris            if (!empty($select) && !$selected) {
1044fdb8d77bSTom N Harris                $p .= ' selected="selected"';
1045fdb8d77bSTom N Harris                $selected = true;
1046fdb8d77bSTom N Harris            }
1047fdb8d77bSTom N Harris            $s .= '<option'.$p.'>'.formText($text).'</option>';
1048fdb8d77bSTom N Harris        }
1049fdb8d77bSTom N Harris    } else {
1050fdb8d77bSTom N Harris        $s .= '<option></option>';
1051fdb8d77bSTom N Harris    }
1052804e2f2fSAdrian Lang    $s .= DOKU_LF.'</select></label>';
1053fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
1054fdb8d77bSTom N Harris        $s .= '<br />';
1055fdb8d77bSTom N Harris    return $s;
1056fdb8d77bSTom N Harris}
1057fdb8d77bSTom N Harris
1058fdb8d77bSTom N Harris/**
1059fdb8d77bSTom N Harris * form_listboxfield
1060fdb8d77bSTom N Harris *
1061fdb8d77bSTom N Harris * Print the HTML for a list box.
1062fdb8d77bSTom N Harris *   _options : Array of (value,text,selected) for the list.
1063fdb8d77bSTom N Harris *              Text can be omitted. Text and value are passed to formText()
1064fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
1065fdb8d77bSTom N Harris *   _text  : Text to display before the menu. Not escaped.
1066fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
1067fdb8d77bSTom N Harris *
1068fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
106942ea7f44SGerrit Uitslag *
107042ea7f44SGerrit Uitslag * @param array $attrs attributes
107142ea7f44SGerrit Uitslag * @return string html
1072fdb8d77bSTom N Harris */
1073fdb8d77bSTom N Harrisfunction form_listboxfield($attrs) {
1074a57c7cafSAnika Henke    $s = '<label';
1075a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
1076fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
1077fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
1078804e2f2fSAdrian Lang    $s .= '<select '.buildAttributes($attrs,true).'>'.DOKU_LF;
1079fdb8d77bSTom N Harris    if (!empty($attrs['_options'])) {
1080fdb8d77bSTom N Harris        foreach ($attrs['_options'] as $opt) {
1081eeb8f429SGerrit Uitslag            @list($value,$text,$select,$disabled) = $opt;
1082fdb8d77bSTom N Harris            $p = '';
1083a0fe6e28SAdrian Lang            if(is_null($text)) $text = $value;
1084fdb8d77bSTom N Harris            $p .= ' value="'.formText($value).'"';
1085fdb8d77bSTom N Harris            if (!empty($select)) $p .= ' selected="selected"';
1086eeb8f429SGerrit Uitslag            if ($disabled) $p .= ' disabled="disabled"';
1087fdb8d77bSTom N Harris            $s .= '<option'.$p.'>'.formText($text).'</option>';
1088fdb8d77bSTom N Harris        }
1089fdb8d77bSTom N Harris    } else {
1090fdb8d77bSTom N Harris        $s .= '<option></option>';
1091fdb8d77bSTom N Harris    }
1092804e2f2fSAdrian Lang    $s .= DOKU_LF.'</select></label>';
1093fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
1094fdb8d77bSTom N Harris        $s .= '<br />';
1095fdb8d77bSTom N Harris    return $s;
1096fdb8d77bSTom N Harris}
1097