xref: /dokuwiki/inc/form.php (revision 42ea7f447f39fbc2f79eaaec31f8c10ede59c5d0)
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
9fa8adffeSAndreas Gohrif(!defined('DOKU_INC')) die('meh.');
10fdb8d77bSTom N Harris
11fdb8d77bSTom N Harris/**
12fdb8d77bSTom N Harris * Class for creating simple HTML forms.
13fdb8d77bSTom N Harris *
14fdb8d77bSTom N Harris * The forms is built from a list of pseudo-tags (arrays with expected keys).
15fdb8d77bSTom N Harris * Every pseudo-tag must have the key '_elem' set to the name of the element.
16fdb8d77bSTom N Harris * When printed, the form class calls functions named 'form_$type' for each
17fdb8d77bSTom N Harris * element it contains.
18fdb8d77bSTom N Harris *
19fdb8d77bSTom N Harris * Standard practice is for non-attribute keys in a pseudo-element to start
20fdb8d77bSTom N Harris * with '_'. Other keys are HTML attributes that will be included in the element
21fdb8d77bSTom N Harris * tag. That way, the element output functions can pass the pseudo-element
22fdb8d77bSTom N Harris * directly to buildAttributes.
23fdb8d77bSTom N Harris *
24fdb8d77bSTom N Harris * See the form_make* functions later in this file.
25fdb8d77bSTom N Harris *
26fdb8d77bSTom N Harris * @author Tom N Harris <tnharris@whoopdedo.org>
27fdb8d77bSTom N Harris */
28fdb8d77bSTom N Harrisclass Doku_Form {
29fdb8d77bSTom N Harris
30fdb8d77bSTom N Harris    // Form id attribute
31e351c80dSAdrian Lang    var $params = array();
32fdb8d77bSTom N Harris
33fdb8d77bSTom N Harris    // Draw a border around form fields.
34fdb8d77bSTom N Harris    // Adds <fieldset></fieldset> around the elements
35fdb8d77bSTom N Harris    var $_infieldset = false;
36fdb8d77bSTom N Harris
37fdb8d77bSTom N Harris    // Hidden form fields.
38fdb8d77bSTom N Harris    var $_hidden = array();
39fdb8d77bSTom N Harris
40fdb8d77bSTom N Harris    // Array of pseudo-tags
41fdb8d77bSTom N Harris    var $_content = array();
42fdb8d77bSTom N Harris
43fdb8d77bSTom N Harris    /**
44fdb8d77bSTom N Harris     * Constructor
45fdb8d77bSTom N Harris     *
46e351c80dSAdrian Lang     * Sets parameters and autoadds a security token. The old calling convention
47e351c80dSAdrian Lang     * with up to four parameters is deprecated, instead the first parameter
48e351c80dSAdrian Lang     * should be an array with parameters.
491b2a85e8SAndreas Gohr     *
505f0071ebSGerrit Uitslag     * @param mixed       $params  Parameters for the HTML form element; Using the deprecated
515f0071ebSGerrit Uitslag     *                             calling convention this is the ID attribute of the form
525f0071ebSGerrit Uitslag     * @param bool|string $action  (optional, deprecated) submit URL, defaults to current page
535f0071ebSGerrit Uitslag     * @param bool|string $method  (optional, deprecated) 'POST' or 'GET', default is POST
545f0071ebSGerrit Uitslag     * @param bool|string $enctype (optional, deprecated) Encoding type of the data
55*42ea7f44SGerrit Uitslag     *
56fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
57fdb8d77bSTom N Harris     */
58e351c80dSAdrian Lang    function Doku_Form($params, $action=false, $method=false, $enctype=false) {
59e351c80dSAdrian Lang        if(!is_array($params)) {
60e351c80dSAdrian Lang            $this->params = array('id' => $params);
61e351c80dSAdrian Lang            if ($action !== false) $this->params['action'] = $action;
62b4033556SMichael Klier            if ($method !== false) $this->params['method'] = strtolower($method);
63e351c80dSAdrian Lang            if ($enctype !== false) $this->params['enctype'] = $enctype;
64e351c80dSAdrian Lang        } else {
65e351c80dSAdrian Lang            $this->params = $params;
66e351c80dSAdrian Lang        }
67804e2f2fSAdrian Lang
68e351c80dSAdrian Lang        if (!isset($this->params['method'])) {
69b4033556SMichael Klier            $this->params['method'] = 'post';
70b4033556SMichael Klier        } else {
71b4033556SMichael Klier            $this->params['method'] = strtolower($this->params['method']);
72b4033556SMichael Klier        }
73b4033556SMichael Klier
74b4033556SMichael Klier        if (!isset($this->params['action'])) {
75b4033556SMichael Klier            $this->params['action'] = '';
76e351c80dSAdrian Lang        }
771b2a85e8SAndreas Gohr
781b2a85e8SAndreas Gohr        $this->addHidden('sectok', getSecurityToken());
79fdb8d77bSTom N Harris    }
80fdb8d77bSTom N Harris
81fdb8d77bSTom N Harris    /**
82fdb8d77bSTom N Harris     * startFieldset
83fdb8d77bSTom N Harris     *
84fdb8d77bSTom N Harris     * Add <fieldset></fieldset> tags around fields.
85fdb8d77bSTom N Harris     * Usually results in a border drawn around the form.
86fdb8d77bSTom N Harris     *
87fdb8d77bSTom N Harris     * @param   string  $legend Label that will be printed with the border.
88*42ea7f44SGerrit Uitslag     *
89fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
90fdb8d77bSTom N Harris     */
91fdb8d77bSTom N Harris    function startFieldset($legend) {
92fdb8d77bSTom N Harris        if ($this->_infieldset) {
93fdb8d77bSTom N Harris            $this->addElement(array('_elem'=>'closefieldset'));
94fdb8d77bSTom N Harris        }
95fdb8d77bSTom N Harris        $this->addElement(array('_elem'=>'openfieldset', '_legend'=>$legend));
96fdb8d77bSTom N Harris        $this->_infieldset = true;
97fdb8d77bSTom N Harris    }
98fdb8d77bSTom N Harris
99fdb8d77bSTom N Harris    /**
100fdb8d77bSTom N Harris     * endFieldset
101fdb8d77bSTom N Harris     *
102fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
103fdb8d77bSTom N Harris     */
104fdb8d77bSTom N Harris    function endFieldset() {
105fdb8d77bSTom N Harris        if ($this->_infieldset) {
106fdb8d77bSTom N Harris            $this->addElement(array('_elem'=>'closefieldset'));
107fdb8d77bSTom N Harris        }
108fdb8d77bSTom N Harris        $this->_infieldset = false;
109fdb8d77bSTom N Harris    }
110fdb8d77bSTom N Harris
111fdb8d77bSTom N Harris    /**
112fdb8d77bSTom N Harris     * addHidden
113fdb8d77bSTom N Harris     *
114fdb8d77bSTom N Harris     * Adds a name/value pair as a hidden field.
115fdb8d77bSTom N Harris     * The value of the field (but not the name) will be passed to
116fdb8d77bSTom N Harris     * formText() before printing.
117fdb8d77bSTom N Harris     *
118fdb8d77bSTom N Harris     * @param   string  $name   Field name.
119fdb8d77bSTom N Harris     * @param   string  $value  Field value. If null, remove a previously added field.
120*42ea7f44SGerrit Uitslag     *
121fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
122fdb8d77bSTom N Harris     */
123fdb8d77bSTom N Harris    function addHidden($name, $value) {
124fdb8d77bSTom N Harris        if (is_null($value))
125fdb8d77bSTom N Harris            unset($this->_hidden[$name]);
126fdb8d77bSTom N Harris        else
127fdb8d77bSTom N Harris            $this->_hidden[$name] = $value;
128fdb8d77bSTom N Harris    }
129fdb8d77bSTom N Harris
130fdb8d77bSTom N Harris    /**
131fdb8d77bSTom N Harris     * addElement
132fdb8d77bSTom N Harris     *
133fdb8d77bSTom N Harris     * Appends a content element to the form.
134fdb8d77bSTom N Harris     * The element can be either a pseudo-tag or string.
135fdb8d77bSTom N Harris     * If string, it is printed without escaping special chars.   *
136fdb8d77bSTom N Harris     *
1374f0bc4b2SAndreas Gohr     * @param   string|array  $elem   Pseudo-tag or string to add to the form.
138*42ea7f44SGerrit Uitslag     *
139fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
140fdb8d77bSTom N Harris     */
141fdb8d77bSTom N Harris    function addElement($elem) {
142fdb8d77bSTom N Harris        $this->_content[] = $elem;
143fdb8d77bSTom N Harris    }
144fdb8d77bSTom N Harris
145fdb8d77bSTom N Harris    /**
146fdb8d77bSTom N Harris     * insertElement
147fdb8d77bSTom N Harris     *
148fdb8d77bSTom N Harris     * Inserts a content element at a position.
149fdb8d77bSTom N Harris     *
150fdb8d77bSTom N Harris     * @param   string       $pos  0-based index where the element will be inserted.
1514f0bc4b2SAndreas Gohr     * @param   string|array $elem Pseudo-tag or string to add to the form.
152*42ea7f44SGerrit Uitslag     *
153fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
154fdb8d77bSTom N Harris     */
155fdb8d77bSTom N Harris    function insertElement($pos, $elem) {
156fdb8d77bSTom N Harris        array_splice($this->_content, $pos, 0, array($elem));
157fdb8d77bSTom N Harris    }
158fdb8d77bSTom N Harris
159fdb8d77bSTom N Harris    /**
160fdb8d77bSTom N Harris     * replaceElement
161fdb8d77bSTom N Harris     *
162fdb8d77bSTom N Harris     * Replace with NULL to remove an element.
163fdb8d77bSTom N Harris     *
164fdb8d77bSTom N Harris     * @param   int          $pos  0-based index the element will be placed at.
1654f0bc4b2SAndreas Gohr     * @param   string|array $elem Pseudo-tag or string to add to the form.
166*42ea7f44SGerrit Uitslag     *
167fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
168fdb8d77bSTom N Harris     */
169fdb8d77bSTom N Harris    function replaceElement($pos, $elem) {
170fdb8d77bSTom N Harris        $rep = array();
171fdb8d77bSTom N Harris        if (!is_null($elem)) $rep[] = $elem;
172fdb8d77bSTom N Harris        array_splice($this->_content, $pos, 1, $rep);
173fdb8d77bSTom N Harris    }
174fdb8d77bSTom N Harris
175fdb8d77bSTom N Harris    /**
176fdb8d77bSTom N Harris     * findElementByType
177fdb8d77bSTom N Harris     *
178fdb8d77bSTom N Harris     * Gets the position of the first of a type of element.
179fdb8d77bSTom N Harris     *
180fdb8d77bSTom N Harris     * @param   string  $type   Element type to look for.
181*42ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
182*42ea7f44SGerrit Uitslag     *
183fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
184fdb8d77bSTom N Harris     */
185fdb8d77bSTom N Harris    function findElementByType($type) {
186fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
187fdb8d77bSTom N Harris            if (is_array($elem) && $elem['_elem'] == $type)
188fdb8d77bSTom N Harris                return $pos;
189fdb8d77bSTom N Harris        }
190fdb8d77bSTom N Harris        return false;
191fdb8d77bSTom N Harris    }
192fdb8d77bSTom N Harris
193fdb8d77bSTom N Harris    /**
194fdb8d77bSTom N Harris     * findElementById
195fdb8d77bSTom N Harris     *
196fdb8d77bSTom N Harris     * Gets the position of the element with an ID attribute.
197fdb8d77bSTom N Harris     *
198fdb8d77bSTom N Harris     * @param   string  $id     ID of the element to find.
199*42ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
200*42ea7f44SGerrit Uitslag     *
201fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
202fdb8d77bSTom N Harris     */
203fdb8d77bSTom N Harris    function findElementById($id) {
204fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
205fdb8d77bSTom N Harris            if (is_array($elem) && isset($elem['id']) && $elem['id'] == $id)
206fdb8d77bSTom N Harris                return $pos;
207fdb8d77bSTom N Harris        }
208fdb8d77bSTom N Harris        return false;
209fdb8d77bSTom N Harris    }
210fdb8d77bSTom N Harris
211fdb8d77bSTom N Harris    /**
212fdb8d77bSTom N Harris     * findElementByAttribute
213fdb8d77bSTom N Harris     *
214fdb8d77bSTom N Harris     * Gets the position of the first element with a matching attribute value.
215fdb8d77bSTom N Harris     *
216fdb8d77bSTom N Harris     * @param   string  $name   Attribute name.
217fdb8d77bSTom N Harris     * @param   string  $value  Attribute value.
218*42ea7f44SGerrit Uitslag     * @return  int|false     position of element if found, otherwise false
219*42ea7f44SGerrit Uitslag     *
220fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
221fdb8d77bSTom N Harris     */
222fdb8d77bSTom N Harris    function findElementByAttribute($name, $value) {
223fdb8d77bSTom N Harris        foreach ($this->_content as $pos=>$elem) {
224fdb8d77bSTom N Harris            if (is_array($elem) && isset($elem[$name]) && $elem[$name] == $value)
225fdb8d77bSTom N Harris                return $pos;
226fdb8d77bSTom N Harris        }
227fdb8d77bSTom N Harris        return false;
228fdb8d77bSTom N Harris    }
229fdb8d77bSTom N Harris
230fdb8d77bSTom N Harris    /**
231fdb8d77bSTom N Harris     * getElementAt
232fdb8d77bSTom N Harris     *
233fdb8d77bSTom N Harris     * Returns a reference to the element at a position.
234fdb8d77bSTom N Harris     * A position out-of-bounds will return either the
235fdb8d77bSTom N Harris     * first (underflow) or last (overflow) element.
236fdb8d77bSTom N Harris     *
237fdb8d77bSTom N Harris     * @param   int     $pos    0-based index
238fdb8d77bSTom N Harris     * @return  array reference  pseudo-element
239*42ea7f44SGerrit Uitslag     *
240fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
241fdb8d77bSTom N Harris     */
242fdb8d77bSTom N Harris    function &getElementAt($pos) {
243fdb8d77bSTom N Harris        if ($pos < 0) $pos = count($this->_content) + $pos;
244fdb8d77bSTom N Harris        if ($pos < 0) $pos = 0;
245fdb8d77bSTom N Harris        if ($pos >= count($this->_content)) $pos = count($this->_content) - 1;
246fdb8d77bSTom N Harris        return $this->_content[$pos];
247fdb8d77bSTom N Harris    }
248fdb8d77bSTom N Harris
249fdb8d77bSTom N Harris    /**
250b81b193eSAndreas Gohr     * Return the assembled HTML for the form.
251fdb8d77bSTom N Harris     *
252fdb8d77bSTom N Harris     * Each element in the form will be passed to a function named
253fdb8d77bSTom N Harris     * 'form_$type'. The function should return the HTML to be printed.
254fdb8d77bSTom N Harris     *
255fdb8d77bSTom N Harris     * @author  Tom N Harris <tnharris@whoopdedo.org>
256*42ea7f44SGerrit Uitslag     *
257*42ea7f44SGerrit Uitslag     * @return string html of the form
258fdb8d77bSTom N Harris     */
259b81b193eSAndreas Gohr    function getForm() {
260fdb8d77bSTom N Harris        global $lang;
261b81b193eSAndreas Gohr        $form = '';
262e351c80dSAdrian Lang        $this->params['accept-charset'] = $lang['encoding'];
2639f09385fSAndreas Gohr        $form .= '<form ' . buildAttributes($this->params,false) . '><div class="no">' . DOKU_LF;
264fdb8d77bSTom N Harris        if (!empty($this->_hidden)) {
265fdb8d77bSTom N Harris            foreach ($this->_hidden as $name=>$value)
266b81b193eSAndreas Gohr                $form .= form_hidden(array('name'=>$name, 'value'=>$value));
267fdb8d77bSTom N Harris        }
268fdb8d77bSTom N Harris        foreach ($this->_content as $element) {
269fdb8d77bSTom N Harris            if (is_array($element)) {
270fdb8d77bSTom N Harris                $elem_type = $element['_elem'];
271fdb8d77bSTom N Harris                if (function_exists('form_'.$elem_type)) {
272b81b193eSAndreas Gohr                    $form .= call_user_func('form_'.$elem_type, $element).DOKU_LF;
273fdb8d77bSTom N Harris                }
274fdb8d77bSTom N Harris            } else {
275b81b193eSAndreas Gohr                $form .= $element;
276fdb8d77bSTom N Harris            }
277fdb8d77bSTom N Harris        }
278b81b193eSAndreas Gohr        if ($this->_infieldset) $form .= form_closefieldset().DOKU_LF;
279b81b193eSAndreas Gohr        $form .= '</div></form>'.DOKU_LF;
280b81b193eSAndreas Gohr
281b81b193eSAndreas Gohr        return $form;
282b81b193eSAndreas Gohr    }
283b81b193eSAndreas Gohr
284b81b193eSAndreas Gohr    /**
285b81b193eSAndreas Gohr     * Print the assembled form
286b81b193eSAndreas Gohr     *
287b81b193eSAndreas Gohr     * wraps around getForm()
288b81b193eSAndreas Gohr     */
289b81b193eSAndreas Gohr    function printForm(){
290b81b193eSAndreas Gohr        echo $this->getForm();
291fdb8d77bSTom N Harris    }
292fdb8d77bSTom N Harris
2935b75cd1fSAdrian Lang    /**
2945b75cd1fSAdrian Lang     * Add a radio set
2955b75cd1fSAdrian Lang     *
2965b75cd1fSAdrian Lang     * This function adds a set of radio buttons to the form. If $_POST[$name]
2975b75cd1fSAdrian Lang     * is set, this radio is preselected, else the first radio button.
2985b75cd1fSAdrian Lang     *
2995b75cd1fSAdrian Lang     * @param string    $name    The HTML field name
3005b75cd1fSAdrian Lang     * @param array     $entries An array of entries $value => $caption
3015b75cd1fSAdrian Lang     *
3025b75cd1fSAdrian Lang     * @author Adrian Lang <lang@cosmocode.de>
3035b75cd1fSAdrian Lang     */
3045b75cd1fSAdrian Lang
3055b75cd1fSAdrian Lang    function addRadioSet($name, $entries) {
306f0859d4bSTom N Harris        global $INPUT;
307f0859d4bSTom N Harris        $value = (array_key_exists($INPUT->post->str($name), $entries)) ?
308f0859d4bSTom N Harris                 $INPUT->str($name) : key($entries);
3095b75cd1fSAdrian Lang        foreach($entries as $val => $cap) {
3105b75cd1fSAdrian Lang            $data = ($value === $val) ? array('checked' => 'checked') : array();
3115b75cd1fSAdrian Lang            $this->addElement(form_makeRadioField($name, $val, $cap, '', '', $data));
3125b75cd1fSAdrian Lang        }
3135b75cd1fSAdrian Lang    }
3145b75cd1fSAdrian Lang
315fdb8d77bSTom N Harris}
316fdb8d77bSTom N Harris
317fdb8d77bSTom N Harris/**
318fdb8d77bSTom N Harris * form_makeTag
319fdb8d77bSTom N Harris *
320fdb8d77bSTom N Harris * Create a form element for a non-specific empty tag.
321fdb8d77bSTom N Harris *
322fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
323fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
324fdb8d77bSTom N Harris * @return  array   pseudo-tag
325*42ea7f44SGerrit Uitslag *
326fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
327fdb8d77bSTom N Harris */
328fdb8d77bSTom N Harrisfunction form_makeTag($tag, $attrs=array()) {
329fdb8d77bSTom N Harris    $elem = array('_elem'=>'tag', '_tag'=>$tag);
330fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
331fdb8d77bSTom N Harris}
332fdb8d77bSTom N Harris
333fdb8d77bSTom N Harris/**
334fdb8d77bSTom N Harris * form_makeOpenTag
335fdb8d77bSTom N Harris *
336fdb8d77bSTom N Harris * Create a form element for a non-specific opening tag.
337fdb8d77bSTom N Harris * Remember to put a matching close tag after this as well.
338fdb8d77bSTom N Harris *
339fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
340fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
341fdb8d77bSTom N Harris * @return  array   pseudo-tag
342*42ea7f44SGerrit Uitslag *
343fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
344fdb8d77bSTom N Harris */
345fdb8d77bSTom N Harrisfunction form_makeOpenTag($tag, $attrs=array()) {
346fdb8d77bSTom N Harris    $elem = array('_elem'=>'opentag', '_tag'=>$tag);
347fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
348fdb8d77bSTom N Harris}
349fdb8d77bSTom N Harris
350fdb8d77bSTom N Harris/**
351fdb8d77bSTom N Harris * form_makeCloseTag
352fdb8d77bSTom N Harris *
353fdb8d77bSTom N Harris * Create a form element for a non-specific closing tag.
354fdb8d77bSTom N Harris * Careless use of this will result in invalid XHTML.
355fdb8d77bSTom N Harris *
356fdb8d77bSTom N Harris * @param   string  $tag    Tag name.
357fdb8d77bSTom N Harris * @return  array   pseudo-tag
358*42ea7f44SGerrit Uitslag *
359fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
360fdb8d77bSTom N Harris */
361fdb8d77bSTom N Harrisfunction form_makeCloseTag($tag) {
362fdb8d77bSTom N Harris    return array('_elem'=>'closetag', '_tag'=>$tag);
363fdb8d77bSTom N Harris}
364fdb8d77bSTom N Harris
365fdb8d77bSTom N Harris/**
366fdb8d77bSTom N Harris * form_makeWikiText
367fdb8d77bSTom N Harris *
368fdb8d77bSTom N Harris * Create a form element for a textarea containing wiki text.
369fdb8d77bSTom N Harris * Only one wikitext element is allowed on a page. It will have
370fdb8d77bSTom N Harris * a name of 'wikitext' and id 'wiki__text'. The text will
371fdb8d77bSTom N Harris * be passed to formText() before printing.
372fdb8d77bSTom N Harris *
373fdb8d77bSTom N Harris * @param   string  $text   Text to fill the field with.
374fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
375fdb8d77bSTom N Harris * @return  array   pseudo-tag
376*42ea7f44SGerrit Uitslag *
377fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
378fdb8d77bSTom N Harris */
379fdb8d77bSTom N Harrisfunction form_makeWikiText($text, $attrs=array()) {
380b2bc77d5STom N Harris    $elem = array('_elem'=>'wikitext', '_text'=>$text,
381b2bc77d5STom N Harris                        'class'=>'edit', 'cols'=>'80', 'rows'=>'10');
382fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
383fdb8d77bSTom N Harris}
384fdb8d77bSTom N Harris
385fdb8d77bSTom N Harris/**
386fdb8d77bSTom N Harris * form_makeButton
387fdb8d77bSTom N Harris *
388fdb8d77bSTom N Harris * Create a form element for an action button.
389fdb8d77bSTom N Harris * A title will automatically be generated using the value and
390fdb8d77bSTom N Harris * accesskey attributes, unless you provide one.
391fdb8d77bSTom N Harris *
392fdb8d77bSTom N Harris * @param   string  $type   Type attribute. 'submit' or 'cancel'
393fdb8d77bSTom N Harris * @param   string  $act    Wiki action of the button, will be used as the do= parameter
394fdb8d77bSTom N Harris * @param   string  $value  (optional) Displayed label. Uses $act if not provided.
395fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
396fdb8d77bSTom N Harris * @return  array   pseudo-tag
397*42ea7f44SGerrit Uitslag *
398fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
399fdb8d77bSTom N Harris */
400fdb8d77bSTom N Harrisfunction form_makeButton($type, $act, $value='', $attrs=array()) {
401fdb8d77bSTom N Harris    if ($value == '') $value = $act;
402b2bc77d5STom N Harris    $elem = array('_elem'=>'button', 'type'=>$type, '_action'=>$act,
403b2bc77d5STom N Harris                        'value'=>$value, 'class'=>'button');
404fdb8d77bSTom N Harris    if (!empty($attrs['accesskey']) && empty($attrs['title'])) {
40507493d05SAnika Henke        $attrs['title'] = $value . ' ['.strtoupper($attrs['accesskey']).']';
406fdb8d77bSTom N Harris    }
407fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
408fdb8d77bSTom N Harris}
409fdb8d77bSTom N Harris
410fdb8d77bSTom N Harris/**
411fdb8d77bSTom N Harris * form_makeField
412fdb8d77bSTom N Harris *
413fdb8d77bSTom N Harris * Create a form element for a labelled input element.
414fdb8d77bSTom N Harris * The label text will be printed before the input.
415fdb8d77bSTom N Harris *
416fdb8d77bSTom N Harris * @param   string  $type   Type attribute of input.
417fdb8d77bSTom N Harris * @param   string  $name   Name attribute of the input.
418fdb8d77bSTom N Harris * @param   string  $value  (optional) Default value.
419fdb8d77bSTom N Harris * @param   string  $class  Class attribute of the label. If this is 'block',
420fdb8d77bSTom N Harris *                          then a line break will be added after the field.
421fdb8d77bSTom N Harris * @param   string  $label  Label that will be printed before the input.
422fdb8d77bSTom N Harris * @param   string  $id     ID attribute of the input. If set, the label will
423fdb8d77bSTom N Harris *                          reference it with a 'for' attribute.
424fdb8d77bSTom N Harris * @param   array   $attrs  Optional attributes.
425fdb8d77bSTom N Harris * @return  array   pseudo-tag
426*42ea7f44SGerrit Uitslag *
427fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
428fdb8d77bSTom N Harris */
429fdb8d77bSTom N Harrisfunction form_makeField($type, $name, $value='', $label=null, $id='', $class='', $attrs=array()) {
430fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
431fdb8d77bSTom N Harris    $elem = array('_elem'=>'field', '_text'=>$label, '_class'=>$class,
432fdb8d77bSTom N Harris                        'type'=>$type, 'id'=>$id, 'name'=>$name, 'value'=>$value);
433fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
434fdb8d77bSTom N Harris}
435fdb8d77bSTom N Harris
436fdb8d77bSTom N Harris/**
437fdb8d77bSTom N Harris * form_makeFieldRight
438fdb8d77bSTom N Harris *
439fdb8d77bSTom N Harris * Create a form element for a labelled input element.
440fdb8d77bSTom N Harris * The label text will be printed after the input.
441fdb8d77bSTom N Harris *
442fdb8d77bSTom N Harris * @see     form_makeField
443fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
444fdb8d77bSTom N Harris */
445fdb8d77bSTom N Harrisfunction form_makeFieldRight($type, $name, $value='', $label=null, $id='', $class='', $attrs=array()) {
446fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
447fdb8d77bSTom N Harris    $elem = array('_elem'=>'fieldright', '_text'=>$label, '_class'=>$class,
448fdb8d77bSTom N Harris                        'type'=>$type, 'id'=>$id, 'name'=>$name, 'value'=>$value);
449fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
450fdb8d77bSTom N Harris}
451fdb8d77bSTom N Harris
452fdb8d77bSTom N Harris/**
453fdb8d77bSTom N Harris * form_makeTextField
454fdb8d77bSTom N Harris *
455fdb8d77bSTom N Harris * Create a form element for a text input element with label.
456fdb8d77bSTom N Harris *
457fdb8d77bSTom N Harris * @see     form_makeField
458fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
459fdb8d77bSTom N Harris */
460fdb8d77bSTom N Harrisfunction form_makeTextField($name, $value='', $label=null, $id='', $class='', $attrs=array()) {
461fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
462fdb8d77bSTom N Harris    $elem = array('_elem'=>'textfield', '_text'=>$label, '_class'=>$class,
463b2bc77d5STom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value, 'class'=>'edit');
464fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
465fdb8d77bSTom N Harris}
466fdb8d77bSTom N Harris
467fdb8d77bSTom N Harris/**
468fdb8d77bSTom N Harris * form_makePasswordField
469fdb8d77bSTom N Harris *
470fdb8d77bSTom N Harris * Create a form element for a password input element with label.
471fdb8d77bSTom N Harris * Password elements have no default value, for obvious reasons.
472fdb8d77bSTom N Harris *
473fdb8d77bSTom N Harris * @see     form_makeField
474fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
475fdb8d77bSTom N Harris */
476fdb8d77bSTom N Harrisfunction form_makePasswordField($name, $label=null, $id='', $class='', $attrs=array()) {
477fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
478fdb8d77bSTom N Harris    $elem = array('_elem'=>'passwordfield', '_text'=>$label, '_class'=>$class,
479b2bc77d5STom N Harris                        'id'=>$id, 'name'=>$name, 'class'=>'edit');
480fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
481fdb8d77bSTom N Harris}
482fdb8d77bSTom N Harris
483fdb8d77bSTom N Harris/**
48412bbca2eSMichael Klier * form_makeFileField
48512bbca2eSMichael Klier *
48612bbca2eSMichael Klier * Create a form element for a file input element with label
48712bbca2eSMichael Klier *
48812bbca2eSMichael Klier * @see     form_makeField
48912bbca2eSMichael Klier * @author  Michael Klier <chi@chimeric.de>
49012bbca2eSMichael Klier */
49112bbca2eSMichael Klierfunction form_makeFileField($name, $label=null, $id='', $class='', $attrs=array()) {
49212bbca2eSMichael Klier    if (is_null($label)) $label = $name;
49312bbca2eSMichael Klier    $elem = array('_elem'=>'filefield', '_text'=>$label, '_class'=>$class,
49412bbca2eSMichael Klier                        'id'=>$id, 'name'=>$name, 'class'=>'edit');
49512bbca2eSMichael Klier    return array_merge($elem, $attrs);
49612bbca2eSMichael Klier}
49712bbca2eSMichael Klier
49812bbca2eSMichael Klier/**
499fdb8d77bSTom N Harris * form_makeCheckboxField
500fdb8d77bSTom N Harris *
501fdb8d77bSTom N Harris * Create a form element for a checkbox input element with label.
5022f10258cSAdrian Lang * If $value is an array, a hidden field with the same name and the value
5032f10258cSAdrian Lang * $value[1] is constructed as well.
504fdb8d77bSTom N Harris *
505fdb8d77bSTom N Harris * @see     form_makeFieldRight
506fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
507fdb8d77bSTom N Harris */
508fdb8d77bSTom N Harrisfunction form_makeCheckboxField($name, $value='1', $label=null, $id='', $class='', $attrs=array()) {
509fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
510fdb8d77bSTom N Harris    if (is_null($value) || $value=='') $value='0';
511fdb8d77bSTom N Harris    $elem = array('_elem'=>'checkboxfield', '_text'=>$label, '_class'=>$class,
512fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value);
513fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
514fdb8d77bSTom N Harris}
515fdb8d77bSTom N Harris
516fdb8d77bSTom N Harris/**
517fdb8d77bSTom N Harris * form_makeRadioField
518fdb8d77bSTom N Harris *
519fdb8d77bSTom N Harris * Create a form element for a radio button input element with label.
520fdb8d77bSTom N Harris *
521fdb8d77bSTom N Harris * @see     form_makeFieldRight
522fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
523fdb8d77bSTom N Harris */
524fdb8d77bSTom N Harrisfunction form_makeRadioField($name, $value='1', $label=null, $id='', $class='', $attrs=array()) {
525fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
526fdb8d77bSTom N Harris    if (is_null($value) || $value=='') $value='0';
527fdb8d77bSTom N Harris    $elem = array('_elem'=>'radiofield', '_text'=>$label, '_class'=>$class,
528fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name, 'value'=>$value);
529fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
530fdb8d77bSTom N Harris}
531fdb8d77bSTom N Harris
532fdb8d77bSTom N Harris/**
533fdb8d77bSTom N Harris * form_makeMenuField
534fdb8d77bSTom N Harris *
535fdb8d77bSTom N Harris * Create a form element for a drop-down menu with label.
536fdb8d77bSTom N Harris * The list of values can be strings, arrays of (value,text),
537fdb8d77bSTom N Harris * or an associative array with the values as keys and labels as values.
538fdb8d77bSTom N Harris * An item is selected by supplying its value or integer index.
539fdb8d77bSTom N Harris * If the list of values is an associative array, the selected item must be
540fdb8d77bSTom N Harris * a string.
541fdb8d77bSTom N Harris *
542fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
543*42ea7f44SGerrit Uitslag *
544*42ea7f44SGerrit Uitslag * @param string           $name     Name attribute of the input.
545*42ea7f44SGerrit Uitslag * @param string[]|array[] $values   The list of values can be strings, arrays of (value,text),
546*42ea7f44SGerrit Uitslag *                                   or an associative array with the values as keys and labels as values.
547*42ea7f44SGerrit Uitslag * @param string|int       $selected default selected value, string or index number
548*42ea7f44SGerrit Uitslag * @param string           $class    Class attribute of the label. If this is 'block',
549*42ea7f44SGerrit Uitslag *                                   then a line break will be added after the field.
550*42ea7f44SGerrit Uitslag * @param string           $label    Label that will be printed before the input.
551*42ea7f44SGerrit Uitslag * @param string           $id       ID attribute of the input. If set, the label will
552*42ea7f44SGerrit Uitslag *                                   reference it with a 'for' attribute.
553*42ea7f44SGerrit Uitslag * @param array            $attrs    Optional attributes.
554*42ea7f44SGerrit Uitslag * @return array   pseudo-tag
555fdb8d77bSTom N Harris */
556fdb8d77bSTom N Harrisfunction form_makeMenuField($name, $values, $selected='', $label=null, $id='', $class='', $attrs=array()) {
557fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
558fdb8d77bSTom N Harris    $options = array();
559fdb8d77bSTom N Harris    reset($values);
560fdb8d77bSTom N Harris    // FIXME: php doesn't know the difference between a string and an integer
561fdb8d77bSTom N Harris    if (is_string(key($values))) {
562fdb8d77bSTom N Harris        foreach ($values as $val=>$text) {
563fdb8d77bSTom N Harris            $options[] = array($val,$text, (!is_null($selected) && $val==$selected));
564fdb8d77bSTom N Harris        }
565fdb8d77bSTom N Harris    } else {
566fdb8d77bSTom N Harris        if (is_integer($selected)) $selected = $values[$selected];
567fdb8d77bSTom N Harris        foreach ($values as $val) {
568fdb8d77bSTom N Harris            if (is_array($val))
569fdb8d77bSTom N Harris                @list($val,$text) = $val;
570fdb8d77bSTom N Harris            else
571fdb8d77bSTom N Harris                $text = null;
572fdb8d77bSTom N Harris            $options[] = array($val,$text,$val===$selected);
573fdb8d77bSTom N Harris        }
574fdb8d77bSTom N Harris    }
575fdb8d77bSTom N Harris    $elem = array('_elem'=>'menufield', '_options'=>$options, '_text'=>$label, '_class'=>$class,
576fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name);
577fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
578fdb8d77bSTom N Harris}
579fdb8d77bSTom N Harris
580fdb8d77bSTom N Harris/**
581fdb8d77bSTom N Harris * form_makeListboxField
582fdb8d77bSTom N Harris *
583fdb8d77bSTom N Harris * Create a form element for a list box with label.
584fdb8d77bSTom N Harris * The list of values can be strings, arrays of (value,text),
585fdb8d77bSTom N Harris * or an associative array with the values as keys and labels as values.
586fdb8d77bSTom N Harris * Items are selected by supplying its value or an array of values.
587fdb8d77bSTom N Harris *
588fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
589*42ea7f44SGerrit Uitslag *
590*42ea7f44SGerrit Uitslag * @param string           $name     Name attribute of the input.
591*42ea7f44SGerrit Uitslag * @param string[]|array[] $values   The list of values can be strings, arrays of (value,text),
592*42ea7f44SGerrit Uitslag *                                   or an associative array with the values as keys and labels as values.
593*42ea7f44SGerrit Uitslag * @param array|string     $selected value or array of values of the items that need to be selected
594*42ea7f44SGerrit Uitslag * @param string           $class    Class attribute of the label. If this is 'block',
595*42ea7f44SGerrit Uitslag *                                   then a line break will be added after the field.
596*42ea7f44SGerrit Uitslag * @param string           $label    Label that will be printed before the input.
597*42ea7f44SGerrit Uitslag * @param string           $id       ID attribute of the input. If set, the label will
598*42ea7f44SGerrit Uitslag *                                   reference it with a 'for' attribute.
599*42ea7f44SGerrit Uitslag * @param array            $attrs    Optional attributes.
600*42ea7f44SGerrit Uitslag * @return array   pseudo-tag
601fdb8d77bSTom N Harris */
602fdb8d77bSTom N Harrisfunction form_makeListboxField($name, $values, $selected='', $label=null, $id='', $class='', $attrs=array()) {
603fdb8d77bSTom N Harris    if (is_null($label)) $label = $name;
604fdb8d77bSTom N Harris    $options = array();
605fdb8d77bSTom N Harris    reset($values);
606eeb8f429SGerrit Uitslag    if (is_null($selected) || $selected == '') {
607fdb8d77bSTom N Harris        $selected = array();
608eeb8f429SGerrit Uitslag    } elseif (!is_array($selected)) {
609fdb8d77bSTom N Harris        $selected = array($selected);
610eeb8f429SGerrit Uitslag    }
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,in_array($val,$selected));
615fdb8d77bSTom N Harris        }
616fdb8d77bSTom N Harris    } else {
617fdb8d77bSTom N Harris        foreach ($values as $val) {
618eeb8f429SGerrit Uitslag            $disabled = false;
619eeb8f429SGerrit Uitslag            if (is_array($val)) {
620eeb8f429SGerrit Uitslag                @list($val,$text,$disabled) = $val;
621eeb8f429SGerrit Uitslag            } else {
622fdb8d77bSTom N Harris                $text = null;
623eeb8f429SGerrit Uitslag            }
624eeb8f429SGerrit Uitslag            $options[] = array($val,$text,in_array($val,$selected),$disabled);
625fdb8d77bSTom N Harris        }
626fdb8d77bSTom N Harris    }
627fdb8d77bSTom N Harris    $elem = array('_elem'=>'listboxfield', '_options'=>$options, '_text'=>$label, '_class'=>$class,
628fdb8d77bSTom N Harris                        'id'=>$id, 'name'=>$name);
629fdb8d77bSTom N Harris    return array_merge($elem, $attrs);
630fdb8d77bSTom N Harris}
631fdb8d77bSTom N Harris
632fdb8d77bSTom N Harris/**
633fdb8d77bSTom N Harris * form_tag
634fdb8d77bSTom N Harris *
635fdb8d77bSTom N Harris * Print the HTML for a generic empty tag.
636fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
637fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
638fdb8d77bSTom N Harris *
639fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
640*42ea7f44SGerrit Uitslag *
641*42ea7f44SGerrit Uitslag * @param array $attrs attributes
642*42ea7f44SGerrit Uitslag * @return string html of tag
643fdb8d77bSTom N Harris */
644fdb8d77bSTom N Harrisfunction form_tag($attrs) {
645c277a6bdSTom N Harris    return '<'.$attrs['_tag'].' '.buildAttributes($attrs,true).'/>';
646fdb8d77bSTom N Harris}
647fdb8d77bSTom N Harris
648fdb8d77bSTom N Harris/**
649fdb8d77bSTom N Harris * form_opentag
650fdb8d77bSTom N Harris *
651fdb8d77bSTom N Harris * Print the HTML for a generic opening tag.
652fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
653fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
654fdb8d77bSTom N Harris *
655fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
656*42ea7f44SGerrit Uitslag *
657*42ea7f44SGerrit Uitslag * @param array $attrs attributes
658*42ea7f44SGerrit Uitslag * @return string html of tag
659fdb8d77bSTom N Harris */
660fdb8d77bSTom N Harrisfunction form_opentag($attrs) {
661fdb8d77bSTom N Harris    return '<'.$attrs['_tag'].' '.buildAttributes($attrs,true).'>';
662fdb8d77bSTom N Harris}
663fdb8d77bSTom N Harris
664fdb8d77bSTom N Harris/**
665fdb8d77bSTom N Harris * form_closetag
666fdb8d77bSTom N Harris *
667fdb8d77bSTom N Harris * Print the HTML for a generic closing tag.
668fdb8d77bSTom N Harris * Requires '_tag' key with name of the tag.
669fdb8d77bSTom N Harris * There are no attributes.
670fdb8d77bSTom N Harris *
671fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
672*42ea7f44SGerrit Uitslag *
673*42ea7f44SGerrit Uitslag * @param array $attrs attributes
674*42ea7f44SGerrit Uitslag * @return string html of tag
675fdb8d77bSTom N Harris */
676fdb8d77bSTom N Harrisfunction form_closetag($attrs) {
677fdb8d77bSTom N Harris    return '</'.$attrs['_tag'].'>';
678fdb8d77bSTom N Harris}
679fdb8d77bSTom N Harris
680fdb8d77bSTom N Harris/**
681fdb8d77bSTom N Harris * form_openfieldset
682fdb8d77bSTom N Harris *
683fdb8d77bSTom N Harris * Print the HTML for an opening fieldset tag.
684fdb8d77bSTom N Harris * Uses the '_legend' key.
685fdb8d77bSTom N Harris * Attributes are passed to buildAttributes()
686fdb8d77bSTom N Harris *
687fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
688*42ea7f44SGerrit Uitslag *
689*42ea7f44SGerrit Uitslag * @param array $attrs attributes
690*42ea7f44SGerrit Uitslag * @return string html
691fdb8d77bSTom N Harris */
692fdb8d77bSTom N Harrisfunction form_openfieldset($attrs) {
693fdb8d77bSTom N Harris    $s = '<fieldset '.buildAttributes($attrs,true).'>';
694fdb8d77bSTom N Harris    if (!is_null($attrs['_legend'])) $s .= '<legend>'.$attrs['_legend'].'</legend>';
695fdb8d77bSTom N Harris    return $s;
696fdb8d77bSTom N Harris}
697fdb8d77bSTom N Harris
698fdb8d77bSTom N Harris/**
699fdb8d77bSTom N Harris * form_closefieldset
700fdb8d77bSTom N Harris *
701fdb8d77bSTom N Harris * Print the HTML for a closing fieldset tag.
702fdb8d77bSTom N Harris * There are no attributes.
703fdb8d77bSTom N Harris *
704fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
705*42ea7f44SGerrit Uitslag *
706*42ea7f44SGerrit Uitslag * @return string html
707fdb8d77bSTom N Harris */
708fdb8d77bSTom N Harrisfunction form_closefieldset() {
709fdb8d77bSTom N Harris    return '</fieldset>';
710fdb8d77bSTom N Harris}
711fdb8d77bSTom N Harris
712fdb8d77bSTom N Harris/**
713fdb8d77bSTom N Harris * form_hidden
714fdb8d77bSTom N Harris *
715fdb8d77bSTom N Harris * Print the HTML for a hidden input element.
716fdb8d77bSTom N Harris * Uses only 'name' and 'value' attributes.
717fdb8d77bSTom N Harris * Value is passed to formText()
718fdb8d77bSTom N Harris *
719fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
720*42ea7f44SGerrit Uitslag *
721*42ea7f44SGerrit Uitslag * @param array $attrs attributes
722*42ea7f44SGerrit Uitslag * @return string html
723fdb8d77bSTom N Harris */
724fdb8d77bSTom N Harrisfunction form_hidden($attrs) {
725fdb8d77bSTom N Harris    return '<input type="hidden" name="'.$attrs['name'].'" value="'.formText($attrs['value']).'" />';
726fdb8d77bSTom N Harris}
727fdb8d77bSTom N Harris
728fdb8d77bSTom N Harris/**
729fdb8d77bSTom N Harris * form_wikitext
730fdb8d77bSTom N Harris *
731fdb8d77bSTom N Harris * Print the HTML for the wiki textarea.
732fdb8d77bSTom N Harris * Requires '_text' with default text of the field.
733fdb8d77bSTom N Harris * Text will be passed to formText(), attributes to buildAttributes()
734fdb8d77bSTom N Harris *
735fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
736*42ea7f44SGerrit Uitslag *
737*42ea7f44SGerrit Uitslag * @param array $attrs attributes
738*42ea7f44SGerrit Uitslag * @return string html
739fdb8d77bSTom N Harris */
740fdb8d77bSTom N Harrisfunction form_wikitext($attrs) {
741b2bc77d5STom N Harris    // mandatory attributes
742b2bc77d5STom N Harris    unset($attrs['name']);
743b2bc77d5STom N Harris    unset($attrs['id']);
7440d39ad11SAnika Henke    return '<textarea name="wikitext" id="wiki__text" dir="auto" '
745804e2f2fSAdrian Lang                 .buildAttributes($attrs,true).'>'.DOKU_LF
746fdb8d77bSTom N Harris                 .formText($attrs['_text'])
747fdb8d77bSTom N Harris                 .'</textarea>';
748fdb8d77bSTom N Harris}
749fdb8d77bSTom N Harris
750fdb8d77bSTom N Harris/**
751fdb8d77bSTom N Harris * form_button
752fdb8d77bSTom N Harris *
753fdb8d77bSTom N Harris * Print the HTML for a form button.
754fdb8d77bSTom N Harris * If '_action' is set, the button name will be "do[_action]".
755fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes()
756fdb8d77bSTom N Harris *
757fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
758*42ea7f44SGerrit Uitslag *
759*42ea7f44SGerrit Uitslag * @param array $attrs attributes
760*42ea7f44SGerrit Uitslag * @return string html
761fdb8d77bSTom N Harris */
762fdb8d77bSTom N Harrisfunction form_button($attrs) {
763fdb8d77bSTom N Harris    $p = (!empty($attrs['_action'])) ? 'name="do['.$attrs['_action'].']" ' : '';
764b2bc77d5STom N Harris    return '<input '.$p.buildAttributes($attrs,true).' />';
765fdb8d77bSTom N Harris}
766fdb8d77bSTom N Harris
767fdb8d77bSTom N Harris/**
768fdb8d77bSTom N Harris * form_field
769fdb8d77bSTom N Harris *
770fdb8d77bSTom N Harris * Print the HTML for a form input field.
771fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
772fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
773fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
774fdb8d77bSTom N Harris *
775fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
776*42ea7f44SGerrit Uitslag *
777*42ea7f44SGerrit Uitslag * @param array $attrs attributes
778*42ea7f44SGerrit Uitslag * @return string html
779fdb8d77bSTom N Harris */
780fdb8d77bSTom N Harrisfunction form_field($attrs) {
781a57c7cafSAnika Henke    $s = '<label';
782a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
783fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
784fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span>';
785fdb8d77bSTom N Harris    $s .= ' <input '.buildAttributes($attrs,true).' /></label>';
786fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
787fdb8d77bSTom N Harris        $s .= '<br />';
788fdb8d77bSTom N Harris    return $s;
789fdb8d77bSTom N Harris}
790fdb8d77bSTom N Harris
791fdb8d77bSTom N Harris/**
792fdb8d77bSTom N Harris * form_fieldright
793fdb8d77bSTom N Harris *
794fdb8d77bSTom N Harris * Print the HTML for a form input field. (right-aligned)
795fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
796fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
797fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
798fdb8d77bSTom N Harris *
799fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
800*42ea7f44SGerrit Uitslag *
801*42ea7f44SGerrit Uitslag * @param array $attrs attributes
802*42ea7f44SGerrit Uitslag * @return string html
803fdb8d77bSTom N Harris */
804fdb8d77bSTom N Harrisfunction form_fieldright($attrs) {
805a57c7cafSAnika Henke    $s = '<label';
806a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
807fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
808fdb8d77bSTom N Harris    $s .= '><input '.buildAttributes($attrs,true).' />';
809fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
810fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
811fdb8d77bSTom N Harris        $s .= '<br />';
812fdb8d77bSTom N Harris    return $s;
813fdb8d77bSTom N Harris}
814fdb8d77bSTom N Harris
815fdb8d77bSTom N Harris/**
816fdb8d77bSTom N Harris * form_textfield
817fdb8d77bSTom N Harris *
818fdb8d77bSTom N Harris * Print the HTML for a text input field.
819fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
820fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
821fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
822fdb8d77bSTom N Harris *
823fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
824*42ea7f44SGerrit Uitslag *
825*42ea7f44SGerrit Uitslag * @param array $attrs attributes
826*42ea7f44SGerrit Uitslag * @return string html
827fdb8d77bSTom N Harris */
828fdb8d77bSTom N Harrisfunction form_textfield($attrs) {
829b2bc77d5STom N Harris    // mandatory attributes
830b2bc77d5STom N Harris    unset($attrs['type']);
831a57c7cafSAnika Henke    $s = '<label';
832a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
833fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
834fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
835b2bc77d5STom N Harris    $s .= '<input type="text" '.buildAttributes($attrs,true).' /></label>';
836fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
837fdb8d77bSTom N Harris        $s .= '<br />';
838fdb8d77bSTom N Harris    return $s;
839fdb8d77bSTom N Harris}
840fdb8d77bSTom N Harris
841fdb8d77bSTom N Harris/**
842fdb8d77bSTom N Harris * form_passwordfield
843fdb8d77bSTom N Harris *
844fdb8d77bSTom N Harris * Print the HTML for a password input field.
845fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
846fdb8d77bSTom N Harris *   _text  : Text to display before the input. Not escaped.
847fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
848fdb8d77bSTom N Harris *
849fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
850*42ea7f44SGerrit Uitslag *
851*42ea7f44SGerrit Uitslag * @param array $attrs attributes
852*42ea7f44SGerrit Uitslag * @return string html
853fdb8d77bSTom N Harris */
854fdb8d77bSTom N Harrisfunction form_passwordfield($attrs) {
855b2bc77d5STom N Harris    // mandatory attributes
856b2bc77d5STom N Harris    unset($attrs['type']);
857a57c7cafSAnika Henke    $s = '<label';
858a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
859fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
860fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
861b2bc77d5STom N Harris    $s .= '<input type="password" '.buildAttributes($attrs,true).' /></label>';
862fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
863fdb8d77bSTom N Harris        $s .= '<br />';
864fdb8d77bSTom N Harris    return $s;
865fdb8d77bSTom N Harris}
866fdb8d77bSTom N Harris
867fdb8d77bSTom N Harris/**
86812bbca2eSMichael Klier * form_filefield
86912bbca2eSMichael Klier *
87012bbca2eSMichael Klier * Print the HTML for a file input field.
87112bbca2eSMichael Klier *   _class     : class attribute used on the label tag
87212bbca2eSMichael Klier *   _text      : Text to display before the input. Not escaped
87312bbca2eSMichael Klier *   _maxlength : Allowed size in byte
87412bbca2eSMichael Klier *   _accept    : Accepted mime-type
87512bbca2eSMichael Klier * Other attributes are passed to buildAttributes() for the input tag
87612bbca2eSMichael Klier *
87712bbca2eSMichael Klier * @author  Michael Klier <chi@chimeric.de>
878*42ea7f44SGerrit Uitslag *
879*42ea7f44SGerrit Uitslag * @param array $attrs attributes
880*42ea7f44SGerrit Uitslag * @return string html
88112bbca2eSMichael Klier */
88212bbca2eSMichael Klierfunction form_filefield($attrs) {
883a57c7cafSAnika Henke    $s = '<label';
884a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
88512bbca2eSMichael Klier    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
88612bbca2eSMichael Klier    $s .= '><span>'.$attrs['_text'].'</span> ';
88712bbca2eSMichael Klier    $s .= '<input type="file" '.buildAttributes($attrs,true);
88812bbca2eSMichael Klier    if (!empty($attrs['_maxlength'])) $s .= ' maxlength="'.$attrs['_maxlength'].'"';
88912bbca2eSMichael Klier    if (!empty($attrs['_accept'])) $s .= ' accept="'.$attrs['_accept'].'"';
89012bbca2eSMichael Klier    $s .= ' /></label>';
89112bbca2eSMichael Klier    if (preg_match('/(^| )block($| )/', $attrs['_class']))
89212bbca2eSMichael Klier        $s .= '<br />';
89312bbca2eSMichael Klier    return $s;
89412bbca2eSMichael Klier}
89512bbca2eSMichael Klier
89612bbca2eSMichael Klier/**
897fdb8d77bSTom N Harris * form_checkboxfield
898fdb8d77bSTom N Harris *
899fdb8d77bSTom N Harris * Print the HTML for a checkbox input field.
900fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
901fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
902fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
9032f10258cSAdrian Lang * If value is an array, a hidden field with the same name and the value
9042f10258cSAdrian Lang * $attrs['value'][1] is constructed as well.
905fdb8d77bSTom N Harris *
906fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
907*42ea7f44SGerrit Uitslag *
908*42ea7f44SGerrit Uitslag * @param array $attrs attributes
909*42ea7f44SGerrit Uitslag * @return string html
910fdb8d77bSTom N Harris */
911fdb8d77bSTom N Harrisfunction form_checkboxfield($attrs) {
912b2bc77d5STom N Harris    // mandatory attributes
913b2bc77d5STom N Harris    unset($attrs['type']);
914a57c7cafSAnika Henke    $s = '<label';
915a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
916fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
9172f10258cSAdrian Lang    $s .= '>';
9182f10258cSAdrian Lang    if (is_array($attrs['value'])) {
9192f10258cSAdrian Lang        echo '<input type="hidden" name="' . hsc($attrs['name']) .'"'
9202f10258cSAdrian Lang                 . ' value="' . hsc($attrs['value'][1]) . '" />';
9212f10258cSAdrian Lang        $attrs['value'] = $attrs['value'][0];
9222f10258cSAdrian Lang    }
9232f10258cSAdrian Lang    $s .= '<input type="checkbox" '.buildAttributes($attrs,true).' />';
924fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
925fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
926fdb8d77bSTom N Harris        $s .= '<br />';
927fdb8d77bSTom N Harris    return $s;
928fdb8d77bSTom N Harris}
929fdb8d77bSTom N Harris
930fdb8d77bSTom N Harris/**
931fdb8d77bSTom N Harris * form_radiofield
932fdb8d77bSTom N Harris *
933fdb8d77bSTom N Harris * Print the HTML for a radio button input field.
934fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
935fdb8d77bSTom N Harris *   _text  : Text to display after the input. Not escaped.
936fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
937fdb8d77bSTom N Harris *
938fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
939*42ea7f44SGerrit Uitslag *
940*42ea7f44SGerrit Uitslag * @param array $attrs attributes
941*42ea7f44SGerrit Uitslag * @return string html
942fdb8d77bSTom N Harris */
943fdb8d77bSTom N Harrisfunction form_radiofield($attrs) {
944b2bc77d5STom N Harris    // mandatory attributes
945b2bc77d5STom N Harris    unset($attrs['type']);
946a57c7cafSAnika Henke    $s = '<label';
947a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
948fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
949fdb8d77bSTom N Harris    $s .= '><input type="radio" '.buildAttributes($attrs,true).' />';
950fdb8d77bSTom N Harris    $s .= ' <span>'.$attrs['_text'].'</span></label>';
951fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
952fdb8d77bSTom N Harris        $s .= '<br />';
953fdb8d77bSTom N Harris    return $s;
954fdb8d77bSTom N Harris}
955fdb8d77bSTom N Harris
956fdb8d77bSTom N Harris/**
957fdb8d77bSTom N Harris * form_menufield
958fdb8d77bSTom N Harris *
959fdb8d77bSTom N Harris * Print the HTML for a drop-down menu.
960fdb8d77bSTom N Harris *   _options : Array of (value,text,selected) for the menu.
961fdb8d77bSTom N Harris *              Text can be omitted. Text and value are passed to formText()
962fdb8d77bSTom N Harris *              Only one item can be selected.
963fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
964fdb8d77bSTom N Harris *   _text  : Text to display before the menu. Not escaped.
965fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
966fdb8d77bSTom N Harris *
967fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
968*42ea7f44SGerrit Uitslag *
969*42ea7f44SGerrit Uitslag * @param array $attrs attributes
970*42ea7f44SGerrit Uitslag * @return string html
971fdb8d77bSTom N Harris */
972fdb8d77bSTom N Harrisfunction form_menufield($attrs) {
973fdb8d77bSTom N Harris    $attrs['size'] = '1';
974a57c7cafSAnika Henke    $s = '<label';
975a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
976fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
977fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span>';
978804e2f2fSAdrian Lang    $s .= ' <select '.buildAttributes($attrs,true).'>'.DOKU_LF;
979fdb8d77bSTom N Harris    if (!empty($attrs['_options'])) {
980fdb8d77bSTom N Harris        $selected = false;
98149eb6e38SAndreas Gohr
98249eb6e38SAndreas Gohr        $cnt = count($attrs['_options']);
98349eb6e38SAndreas Gohr        for($n=0; $n < $cnt; $n++){
984fdb8d77bSTom N Harris            @list($value,$text,$select) = $attrs['_options'][$n];
985fdb8d77bSTom N Harris            $p = '';
986fdb8d77bSTom N Harris            if (!is_null($text))
987fdb8d77bSTom N Harris                $p .= ' value="'.formText($value).'"';
988fdb8d77bSTom N Harris            else
989fdb8d77bSTom N Harris                $text = $value;
990fdb8d77bSTom N Harris            if (!empty($select) && !$selected) {
991fdb8d77bSTom N Harris                $p .= ' selected="selected"';
992fdb8d77bSTom N Harris                $selected = true;
993fdb8d77bSTom N Harris            }
994fdb8d77bSTom N Harris            $s .= '<option'.$p.'>'.formText($text).'</option>';
995fdb8d77bSTom N Harris        }
996fdb8d77bSTom N Harris    } else {
997fdb8d77bSTom N Harris        $s .= '<option></option>';
998fdb8d77bSTom N Harris    }
999804e2f2fSAdrian Lang    $s .= DOKU_LF.'</select></label>';
1000fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
1001fdb8d77bSTom N Harris        $s .= '<br />';
1002fdb8d77bSTom N Harris    return $s;
1003fdb8d77bSTom N Harris}
1004fdb8d77bSTom N Harris
1005fdb8d77bSTom N Harris/**
1006fdb8d77bSTom N Harris * form_listboxfield
1007fdb8d77bSTom N Harris *
1008fdb8d77bSTom N Harris * Print the HTML for a list box.
1009fdb8d77bSTom N Harris *   _options : Array of (value,text,selected) for the list.
1010fdb8d77bSTom N Harris *              Text can be omitted. Text and value are passed to formText()
1011fdb8d77bSTom N Harris *   _class : class attribute used on the label tag
1012fdb8d77bSTom N Harris *   _text  : Text to display before the menu. Not escaped.
1013fdb8d77bSTom N Harris * Other attributes are passed to buildAttributes() for the input tag.
1014fdb8d77bSTom N Harris *
1015fdb8d77bSTom N Harris * @author  Tom N Harris <tnharris@whoopdedo.org>
1016*42ea7f44SGerrit Uitslag *
1017*42ea7f44SGerrit Uitslag * @param array $attrs attributes
1018*42ea7f44SGerrit Uitslag * @return string html
1019fdb8d77bSTom N Harris */
1020fdb8d77bSTom N Harrisfunction form_listboxfield($attrs) {
1021a57c7cafSAnika Henke    $s = '<label';
1022a57c7cafSAnika Henke    if ($attrs['_class']) $s .= ' class="'.$attrs['_class'].'"';
1023fdb8d77bSTom N Harris    if (!empty($attrs['id'])) $s .= ' for="'.$attrs['id'].'"';
1024fdb8d77bSTom N Harris    $s .= '><span>'.$attrs['_text'].'</span> ';
1025804e2f2fSAdrian Lang    $s .= '<select '.buildAttributes($attrs,true).'>'.DOKU_LF;
1026fdb8d77bSTom N Harris    if (!empty($attrs['_options'])) {
1027fdb8d77bSTom N Harris        foreach ($attrs['_options'] as $opt) {
1028eeb8f429SGerrit Uitslag            @list($value,$text,$select,$disabled) = $opt;
1029fdb8d77bSTom N Harris            $p = '';
1030a0fe6e28SAdrian Lang            if(is_null($text)) $text = $value;
1031fdb8d77bSTom N Harris            $p .= ' value="'.formText($value).'"';
1032fdb8d77bSTom N Harris            if (!empty($select)) $p .= ' selected="selected"';
1033eeb8f429SGerrit Uitslag            if ($disabled) $p .= ' disabled="disabled"';
1034fdb8d77bSTom N Harris            $s .= '<option'.$p.'>'.formText($text).'</option>';
1035fdb8d77bSTom N Harris        }
1036fdb8d77bSTom N Harris    } else {
1037fdb8d77bSTom N Harris        $s .= '<option></option>';
1038fdb8d77bSTom N Harris    }
1039804e2f2fSAdrian Lang    $s .= DOKU_LF.'</select></label>';
1040fdb8d77bSTom N Harris    if (preg_match('/(^| )block($| )/', $attrs['_class']))
1041fdb8d77bSTom N Harris        $s .= '<br />';
1042fdb8d77bSTom N Harris    return $s;
1043fdb8d77bSTom N Harris}
1044