½gXb†föÎB#¨ˆêØ)ªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIß4&ðºDÝ.5ú;³AÏ³Þ†:ü}W¹«Û»¨õ¼p%¡©äè”ûÔ7Þ”²ž_”#žÐâ5üLÂ<mÃ‹$ã mèJÑ$Þl“`ÉäHÜ¹¾&ºÏ9Iëc×sàúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]O5&'0…·ÝºÚoaW	I¿<áÁëî7
ÉA—ÆR(ÿ=³Ò£ÃFIÎ§ÅZœª)SÙÊ¯u›N4«ý——0šúw½ÊgÖFœN5¶·Ký]O~¤*™ b£-!&iª˜Ùúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oê'pµøÂ¾g`««ÈB§L™Vçœ¿“û:þ"EqŠôã•¸QR:ÅárÄU!îttO•p­x5>¬@?sóÚs®\òÀ,óøÊþfÒa\eðž¤C®h¾›É›+æM“¯ ÎÂîM«¡àXå,¬½-º\_Œ[¿½®‚6¥E·q_uC”¢ó^a›vh²->]+óŒ/½‹öWìg¾¢×¿·ÿ>|ºüüÕ÷€â"×d2ŸD„œŒ^1=“«]ŠmÂúw½ÊgÖFœN5¶·Ký]OÝElfÛ5ÇàFÓ \Áúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oþ’[_·×®æ¢ |Sü 6iS‰&ÚXVÅ°ÁÄ¯úw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]Oúw½ÊgÖFœN5¶·Ký]O?C„KÙº²PÀi1Ä†­
ƒg@öi…ÍÄ?‚™Ó“i©Ë¿
|zí—ËÖSü¢àÿL='¨ŠNå¯úw½ÊgÖFœN5¶·Ký]OQ+RýÅžÔ²&M.ÅxªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIß„”}•æBóúškH1å<÷ýhKÏÀ­‡±tc<ýBÒŠ\=Õ,½94%âGkQ²†êf
*<wGî	úw½ÊgÖFœN5¶·Ký]O‘1èñ”%éÉ#zÕhÜªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßªÛ»bi—s²_‹ØIIßIêìw¥Æe«;e¬Êâ<ÅôÔÂH»ùñ…<ƒ)ÄÅCI‘VÜ½N›ÀD a”P¶Ò ¤=ÊR¹9žæ&çA•­oèˆnÇÙÛ1G¾”Ñèá¹.…èçÓK­wtŠ3âüª9Mut”?D§vsxå
ÌæyLya¤´}d™ßËd¾!„f-…àßæ4í=kÐKíþÊ=¾ßR"Á’5%µ¯"ÀÄãK’(lªNÞ•ÖŠÇ…ãÜª&‰"Ü«ÕùìUDè/ó·0Ûü¬(^yF^ ~b3dä“—ù2ì/À/àM÷Ï¤s®|Ì®@ìmÄ:UËu]0-PžÞ(ÝgŽîgR€¶’”Å°ü²…Îö¤X H¦%´Ý–\/ñqš.ã }š0×.'š1ÝQRúVsz`¢Î):ìd3ÚN@ïîå€ëþ89”§HÌ Ì¾ú¶2éqÃWŽEØ$FNîÑØœ{žt ;–]XªÙ¡Ý( Qq‹bõSëeCoËá “™*ékæXþ×é’Š„þÛ_~Bfkž;Xfa$R¯5ÝçÝ~d$…qÝ0*§u«gFÁ¤×U¤ÀD<)*¦à‚ùéæ@]ä¡‘7€”³!H:iÑ2è“ÊWWØ"2á2€O{'à6[u×ÅÔO,íQÌƒ^’ì±{ö.™mW£›¹ÝõþoH7ÛÅ¿;;{Û¬2R$˜­I“?«ê»¾ícŽC÷~#`£ví¡t	mi[îL«·èY_M:$gc‡8¿›Ÿ_Œ|ùÑÔË’\P¥‡.¶±Ô’¼êrYõhà/þú×&OxŽ„÷»¨@ø+OÜûj¨Ê¬;:`,ÆÍ/³ú­$â2]›»Ê
¤>æÐ·cl¾\qƒÉƒûG•‘ugErñ&…Þ£Ú~üiBžòˆ»ÏbËÀ…whAžÖfÉ1y†“²"ËÌ*"a2×ºxÐ<µ‘Eí„9·[vó~Õh7)Š:Uf¥xÅO)ïg®^©¡/|(•¨éëMÊN·,öt&ZÝgcïÌµ-¯ìEÇJãø—°o¹Œ4âõÃ“ÏždQá§[b¸|^v»Zˆgl^¯sÄ=âÕ×}þ}ó¡²H PœEë‹w¬oyÙ&	#
Úašw–ÍÒ“Àˆ´‘)ª´ä2„¼{lê!®™»í~¯E{y.èÃÞÈKf\y×î§dm½¦2ßà0àE›°gB=§&Ÿ™f¹{Í‡}'ò¾ÉA‹ øÙm§Ðs•ëlî©?¸oÈ$«èq³h’ü,´Õ”¯öâyÑ!ZÕƒ(,»
 dÎí™ý”h2”;PäâAe³Kæ8ÃÉ«R<ÁØ™6´ÜÖ§Ún° ­,iHJ!É»a¦ÀèX2žù 2úÀ5ˆt†8Á‘qX(¶/ë}£{ÿå§ñt€2‰(“ƒ½Jæ/ƒòI\Tç8Úò¦×îó¶ùsÓu½÷{iØþåO½Kå$`
»xˆ54<œâ	jV¯cq~Skçà'Çµ¦O]¡ó{¿(˜øÑ#Ô²?ÛÈ¾)Ù"¹
ÆÆdi¨!¡7{"7ÜkqÛ÷r¡BÒ*G»jŽIk¡pªK
qwj×–ôÁ®¬ÈÕjõ|?y%bÝ±”êu§^,÷4õ÷2Òpáæ^ýÇ2J]ŠžZ’¥íjîˆSˆ·a	œÉcªÿÞ¸+l™ª&“Dû3A´:(é ˆõ;Â€¦æÓjþû‰àò !ÂàãþëÔ kd §ê“Í:—M®|±êzwa§{7ìcÒ> ðlÞ¾Ý™Þs#™EÞÉ¿ÞLœQK>ý0eeKÊÎWÐ	E®ôQúFV­UfY$›˜óåÕ%@I0žÞE‰Ÿßä§×|yŸºçè¹hÖ±ar^Ü]ª±§îc[SÂÓÅÿ¡²¬ Ç'’îëÉ6=[<©ÂÜ¤Å¡ ôd@7Âˆ¼S%¸ì…žÛL£ìêÂÊÐŒ˜ÀB„
F L{§¬íe,*Z÷ØÆá)Jª¿ßZ³-·>&‚§Šü˜û/Š,[?ª…ß¸ØÄ”úZ?4‡0º÷„ctm»äØ¶uOR¬“»ãUè¾’Kn38Ëã²ÿ Í¥DÈ#¿ß;"«`G‹Þÿ>øJ¡Ém¥“ÉÊšÌßÀOŽV…­¹¾}VõX¨áÂ¤R(Âú¾XÔÛ¾`Þà»'YGåsdËâ@ƒž'£×îÓ-Œ+r•¢¾?¯"KV#w>'â¹!÷x¬ÄÎ:{…{oUýKyÄ¶›9fˆ€¿·¹QÌH?"v’ÁÈJ)¤?VáïZ¶¹½x/ßæ&¸zûÙÉ¼orùb–F¬ÂqÜ²=vu¤'’°]0‹ŠH?5J e™Ÿ>Gc–²œ¥ßàIqCË„^ëé=Ê0ÿeK4'nùh1ÃÀ .m&$Ô š†`]}ã!Öï·AÄ"•½ÞŽ”ƒØ-?oÚ,œcîë˜'¶Âr'‹·—Î~“>Wú¶/áúB[Å"u;qWÍy°¯únÞœ•_ˆX 2 ”‘ô½ÒLuóÅ—‡&ƒÆû6µyn…ÏnXCXª«ÎÁæäBƒìÕ|T<ãWR:µû¡î9´»þŠ%˜eÞPÒ\QX¡ÞûÄ‹Î>ªªŠÕaK~úim|á	oêæñÂŠxùüè#]Öö^´]¥ÃÓÐ~ÐT‘jC¬~Ã²"x:)@9ó¢ ¡9¦[pUãlS/Î«–÷4õOnÍœÎMÜ†F%ux#2ÄeµbsÜ'RhŸ.«îæHÃ³eCe…²|ûh—« eç$Nò¾~“,®ží‰\à—«±zî,Š¡[O¦ÝÒgðVC=M¶ìmïopåÊ²Éƒ§¤¾sUP#Š£¡1È«·df›Vö›|¦úK{T\BLmÿ\¢wgø¡ÃÊ„	µR¡AÍ}bñË1säu¾é›†'ÏÜ9Â‚/ýD¦Ýˆ–‡˜êxdÙš.š¾]«ÈÌèÜŠU"EÛÂnMIõßHë›“»£$ß¢ëÒ•k©!'ÅÌ×7dGÀ›÷1é¿â;Fí˜4<öNËÛ(×L¶ê¡äkÖÇÿ¥/>ÑOy>—Y;T¶í'i(k.ùAAu±ÿÅ¬3Ð¨¥»#ZÎ †y]‚)þç¯Q@5}4zÓ/f&¶X®aœÏY®¨aÒ¯9ôÿ+±¾ãßÛ¸q®Û&^?P'!"öèèjÐ1¤%8)ªèúµ·Ø/_(ŠÝñT	Ý8‰¹’èÄ€Å–Uð‚:ª(ZƒÁ®ÈU±¸ÐõX™Ü[ÃQÀk	m5Å|@ZóˆÁ{âò@Ë¡-±¦Ö5\úô¡«‡?gÀ‰NmÌX§¶›§ÚL áüŒ†.T‹Î•¢8jyè,Ä¿óŽìÁ™ÃÃv-V¿8Ïÿi·žxâ $Ùô§«Lù?j¢~ãéñ=Ä|ûâØ,-˜¸‡×‘W§²E@IV¾ýû€ ~íaì¢#
ÃT+ÚŒ;!K¹”ÏâÝvv[Ýó»HÄyTì¼@Ï?
]â…# ”C~yÛ¿iOôš§ýe…¿áWwQxz£†¼§öBf_>T¿Nq³.`Õ‰vðbÄ<ûÊ‚¸“ŽyJ†îÃÏí¡º$ Ñ Î/ý‡ëfÉ®íÃ±9Š]"ðhðcÄ„çË-¤–E+·aõiÃ
zà½”•~œ ½ñe0Ž¯u¥'~a²Õ–´Ÿ2ç“ÏÃ6R7lÌN?Åá!ß¶Òár‹Ì>hÄ|…\uï<‘&öI<+Ayï¬L—«±$˜Óªøê¶Bu”¼ïŒQÖ ! k>ˆðpíÈûÀÕÆØ¯´³·×°wQõél!/»wlTKŠž¼—ÔÏö&'2yæ j?k×àh‰4«[CZšwu~‰5&t‡ì‘0^ÏvæFKt`?uGáŠ">',
            'xhtml-strict' => '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">',
        ];

        if (!empty($doctypes[$type])) {
            self::$doctype = preg_replace('/-\w+$/', '', $type);
            return $doctypes[$type];
        }

        return '';
    }

    /**
     * Derived method for <div> containers
     *
     * @param mixed  $attr Hash array with tag attributes or string with class name
     * @param string $cont Div content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function div($attr = null, $cont = null)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        return self::tag('div', $attr, $cont, array_merge(self::$common_attrib, ['onclick']));
    }

    /**
     * Derived method for <p> blocks
     *
     * @param mixed  $attr Hash array with tag attributes or string with class name
     * @param string $cont Paragraph content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function p($attr = null, $cont = null)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        return self::tag('p', $attr, $cont, self::$common_attrib);
    }

    /**
     * Derived method to create <img />
     *
     * @param string|array $attr Hash array with tag attributes or string with image source (src)
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function img($attr = null)
    {
        if (is_string($attr)) {
            $attr = ['src' => $attr];
        }

        $allowed = ['src','alt','width','height','border','usemap','onclick','onerror','onload'];

        return self::tag('img', $attr + ['alt' => ''], null, array_merge(self::$common_attrib, $allowed));
    }

    /**
     * Derived method for link tags
     *
     * @param string|array $attr Hash array with tag attributes or string with link location (href)
     * @param string       $cont Link content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function a($attr, $cont)
    {
        if (is_string($attr)) {
            $attr = ['href' => $attr];
        }

        $allowed = ['href','target','name','rel','onclick','onmouseover','onmouseout','onmousedown','onmouseup'];

        return self::tag('a', $attr, $cont, array_merge(self::$common_attrib, $allowed));
    }

    /**
     * Derived method for inline span tags
     *
     * @param string|array $attr Hash array with tag attributes or string with class name
     * @param string       $cont Tag content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function span($attr, $cont)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        return self::tag('span', $attr, $cont, self::$common_attrib);
    }

    /**
     * Derived method for form element labels
     *
     * @param string|array $attr Hash array with tag attributes or string with 'for' attrib
     * @param string       $cont Tag content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function label($attr, $cont)
    {
        if (is_string($attr)) {
            $attr = ['for' => $attr];
        }

        return self::tag('label', $attr, $cont, array_merge(self::$common_attrib, ['for','onkeypress']));
    }

    /**
     * Derived method to create <iframe></iframe>
     *
     * @param string|array $attr Hash array with tag attributes or string with frame source (src)
     * @param string       $cont Tag content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function iframe($attr = null, $cont = null)
    {
        if (is_string($attr)) {
            $attr = ['src' => $attr];
        }

        $allowed = ['src','name','width','height','border','frameborder','onload','allowfullscreen'];

        return self::tag('iframe', $attr, $cont, array_merge(self::$common_attrib, $allowed));
    }

    /**
     * Derived method to create <script> tags
     *
     * @param string|array $attr Hash array with tag attributes or string with script source (src)
     * @param string       $cont Javascript code to be placed as tag content
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function script($attr, $cont = null)
    {
        if (is_string($attr)) {
            $attr = ['src' => $attr];
        }

        if ($cont) {
            if (self::$doctype == 'xhtml') {
                $cont = "/* <![CDATA[ */\n{$cont}\n/* ]]> */";
            }

            $cont = "\n{$cont}\n";
        }

        if (self::$doctype == 'xhtml') {
            $attr += ['type' => 'text/javascript'];
        }

        return self::tag('script', $attr + ['nl' => true], $cont,
            array_merge(self::$common_attrib, ['src', 'type', 'charset']));
    }

    /**
     * Derived method for line breaks
     *
     * @param array $attrib Associative array with tag attributes
     *
     * @return string HTML code
     * @see html::tag()
     */
    public static function br($attrib = [])
    {
        return self::tag('br', $attrib);
    }

    /**
     * Create string with attributes
     *
     * @param array $attrib  Associative array with tag attributes
     * @param array $allowed List of allowed attributes
     *
     * @return string Valid attribute string
     */
    public static function attrib_string($attrib = [], $allowed = null)
    {
        if (empty($attrib)) {
            return '';
        }

        $allowed_f  = array_flip((array) $allowed);
        $attrib_arr = [];

        foreach ($attrib as $key => $value) {
            // skip size if not numeric
            if ($key == 'size' && !is_numeric($value)) {
                continue;
            }

            // ignore "internal" or empty attributes
            if ($key == 'nl' || $value === null) {
                continue;
            }

            // ignore not allowed attributes, except aria-* and data-*
            if (!empty($allowed)) {
                $is_data_attr = @substr_compare($key, 'data-', 0, 5) === 0;
                $is_aria_attr = @substr_compare($key, 'aria-', 0, 5) === 0;
                if (!$is_aria_attr && !$is_data_attr && !isset($allowed_f[$key])) {
                    continue;
                }
            }

            // skip empty eventhandlers
            if (preg_match('/^on[a-z]+/', $key) && !$value) {
                continue;
            }

            // attributes with no value
            if (in_array($key, self::$bool_attrib)) {
                if (!empty($value)) {
                    $value = $key;
                    if (self::$doctype == 'xhtml') {
                        $value .= '="' . $value . '"';
                    }

                    $attrib_arr[] = $value;
                }
            }
            else {
                $attrib_arr[] = $key . '="' . self::quote((string) $value) . '"';
            }
        }

        return count($attrib_arr) ? ' '.implode(' ', $attrib_arr) : '';
    }

    /**
     * Convert a HTML attribute string attributes to an associative array (name => value)
     *
     * @param string $str Input string
     *
     * @return array Key-value pairs of parsed attributes
     */
    public static function parse_attrib_string($str)
    {
        $attrib = [];
        $html   = '<html>'
            . '<head><meta http-equiv="Content-Type" content="text/html; charset=' . RCUBE_CHARSET . '" /></head>'
            . '<body><div ' . rtrim($str, '/ ') . ' /></body>'
            . '</html>';

        $document = new DOMDocument('1.0', RCUBE_CHARSET);
        @$document->loadHTML($html);

        if ($node = $document->getElementsByTagName('div')->item(0)) {
            foreach ($node->attributes as $name => $attr) {
                $attrib[strtolower($name)] = $attr->nodeValue;
            }
        }

        return $attrib;
    }

    /**
     * Replacing specials characters in html attribute value
     *
     * @param string $str Input string
     *
     * @return string The quoted string
     */
    public static function quote($str)
    {
        // PHP8 does not like e.g. an array as htmlspecialchars() argument
        if (!is_string($str)) {
            return (string) $str;
        }

        return @htmlspecialchars($str, ENT_COMPAT | ENT_SUBSTITUTE, RCUBE_CHARSET);
    }
}


/**
 * Class to create an HTML input field
 *
 * @package    Framework
 * @subpackage View
 */
class html_inputfield extends html
{
    protected $tagname = 'input';
    protected $type    = 'text';
    protected $allowed = [
        'type','name','value','size','tabindex','autocapitalize','required',
        'autocomplete','checked','onchange','onclick','disabled','readonly',
        'spellcheck','results','maxlength','src','multiple','accept',
        'placeholder','autofocus','pattern','oninput'
    ];

    /**
     * Object constructor
     *
     * @param array $attrib Associative array with tag attributes
     */
    public function __construct($attrib = [])
    {
        if (is_array($attrib)) {
            $this->attrib = $attrib;
        }

        if (!empty($attrib['type'])) {
            $this->type = $attrib['type'];
        }
    }

    /**
     * Compose input tag
     *
     * @param string $value  Field value
     * @param array  $attrib Additional attributes to override
     *
     * @return string HTML output
     */
    public function show($value = null, $attrib = null)
    {
        // overwrite object attributes
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        // set value attribute
        if ($value !== null) {
            $this->attrib['value'] = $value;
        }
        // set type
        $this->attrib['type'] = $this->type;

        return parent::show();
    }
}

/**
 * Class to create an HTML password field
 *
 * @package    Framework
 * @subpackage View
 */
class html_passwordfield extends html_inputfield
{
    protected $type = 'password';
}

/**
 * Class to create an hidden HTML input field
 *
 * @package    Framework
 * @subpackage View
 */
class html_hiddenfield extends html
{
    protected $tagname = 'input';
    protected $type    = 'hidden';
    protected $allowed = ['type','name','value','onchange','disabled','readonly'];
    protected $fields  = [];

    /**
     * Constructor
     *
     * @param array $attrib Named tag attributes
     */
    public function __construct($attrib = null)
    {
        if (is_array($attrib)) {
            $this->add($attrib);
        }
    }

    /**
     * Add a hidden field to this instance
     *
     * @param array $attrib Named tag attributes
     */
    public function add($attrib)
    {
        $this->fields[] = $attrib;
    }

    /**
     * Create HTML code for the hidden fields
     *
     * @return string Final HTML code
     */
    public function show()
    {
        $out = '';

        foreach ($this->fields as $attrib) {
            $out .= self::tag($this->tagname, ['type' => $this->type] + $attrib);
        }

        return $out;
    }
}

/**
 * Class to create HTML checkboxes
 *
 * @package    Framework
 * @subpackage View
 */
class html_checkbox extends html_inputfield
{
    protected $type = 'checkbox';

    /**
     * Get HTML code for this object
     *
     * @param string $value  Value of the checked field
     * @param array  $attrib Additional attributes to override
     *
     * @return string HTML output
     */
    public function show($value = '', $attrib = null)
    {
        // overwrite object attributes
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        // set 'checked' attribute
        $this->attrib['checked'] = (string) $value === (string) ($this->attrib['value'] ?? '');

        return parent::show();
    }
}

/**
 * Class to create HTML radio buttons
 *
 * @package    Framework
 * @subpackage View
 */
class html_radiobutton extends html_checkbox
{
    protected $type = 'radio';
}

/**
 * Class to create HTML button
 *
 * @package    Framework
 * @subpackage View
 */
class html_button extends html_inputfield
{
    protected $tagname = 'button';
    protected $type    = 'button';

    /**
     * Get HTML code for this object
     *
     * @param string $content Text Content of the button
     * @param array  $attrib  Additional attributes to override
     *
     * @return string HTML output
     */
    public function show($content = '', $attrib = null)
    {
        // overwrite object attributes
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        $this->content = $content;

        return parent::show();
    }
}

/**
 * Class to create an HTML textarea
 *
 * @package    Framework
 * @subpackage View
 */
class html_textarea extends html
{
    protected $tagname = 'textarea';
    protected $allowed = ['name','rows','cols','wrap','tabindex',
        'onchange','disabled','readonly','spellcheck'];

    /**
     * Get HTML code for this object
     *
     * @param string $value  Textbox value
     * @param array  $attrib Additional attributes to override
     *
     * @return string HTML output
     */
    public function show($value = '', $attrib = null)
    {
        // overwrite object attributes
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        // take value attribute as content
        if (empty($value) && !empty($this->attrib['value'])) {
            $value = $this->attrib['value'];
        }

        // make shure we don't print the value attribute
        if (isset($this->attrib['value'])) {
            unset($this->attrib['value']);
        }

        if (!empty($value) && empty($this->attrib['is_escaped'])) {
            $value = self::quote($value);
        }

        return self::tag($this->tagname, $this->attrib, $value,
            array_merge(self::$common_attrib, $this->allowed));
    }
}

/**
 * Builder for HTML drop-down menus
 * Syntax:<pre>
 * // create instance. arguments are used to set attributes of select-tag
 * $select = new html_select(['name' => 'fieldname']);
 *
 * // add one option
 * $select->add('Switzerland', 'CH');
 *
 * // add multiple options
 * $select->add(['Switzerland','Germany'], ['CH','DE']);
 *
 * // generate pulldown with selection 'Switzerland'  and return html-code
 * // as second argument the same attributes available to instantiate can be used
 * print $select->show('CH');
 * </pre>
 *
 * @package    Framework
 * @subpackage View
 */
class html_select extends html
{
    protected $tagname = 'select';
    protected $options = [];
    protected $allowed = ['name','size','tabindex','autocomplete',
        'multiple','onchange','disabled','rel'];

    /**
     * Add a new option to this drop-down
     *
     * @param mixed $names  Option name or array with option names
     * @param mixed $values Option value or array with option values
     * @param array $attrib Additional attributes for the option entry
     */
    public function add($names, $values = null, $attrib = [])
    {
        if (is_array($names)) {
            foreach ($names as $i => $text) {
                $this->options[] = [
                    'text'  => $text,
                    'value' => $values[$i] ?? $i
                ] + $attrib;
            }
        }
        else {
            $this->options[] = ['text' => $names, 'value' => $values] + $attrib;
        }
    }

    /**
     * Get HTML code for this object
     *
     * @param string $select Value of the selection option
     * @param array  $attrib Additional attributes to override
     *
     * @return string HTML output
     */
    public function show($select = [], $attrib = null)
    {
        // overwrite object attributes
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        $this->content = "\n";
        $select = (array) $select;
        foreach ($this->options as $option) {
            $attr = [
                'value' => $option['value'],
                'selected' => (in_array($option['value'], $select, true) ||
                    in_array($option['text'], $select, true)) ? 1 : null
            ];

            $option_content = $option['text'];
            if (empty($this->attrib['is_escaped'])) {
                $option_content = self::quote($option_content);
            }

            $allowed = ['value','label','class','style','title','disabled','selected'];

            $this->content .= self::tag('option', $attr + $option, $option_content, $allowed);
        }

        return parent::show();
    }
}

/**
 * Class to build an HTML table
 *
 * @package    Framework
 * @subpackage View
 */
class html_table extends html
{
    protected $tagname = 'table';
    protected $allowed = ['id','class','style','width','summary',
        'cellpadding','cellspacing','border'];

    private $header   = null;
    private $rows     = [];
    private $rowindex = 0;
    private $colindex = 0;

    /**
     * Constructor
     *
     * @param array $attrib Named tag attributes
     */
    public function __construct($attrib = [])
    {
        $default_attrib = self::$doctype == 'xhtml' ? ['border' => '0'] : [];
        $this->attrib   = array_merge($attrib, $default_attrib);

        if (!empty($attrib['tagname']) && $attrib['tagname'] != 'table') {
          $this->tagname = $attrib['tagname'];
          $this->allowed = self::$common_attrib;
        }
    }

    /**
     * Add a table cell
     *
     * @param array  $attr Cell attributes
     * @param string $cont Cell content
     */
    public function add($attr, $cont)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        $cell = new stdClass;
        $cell->attrib  = $attr;
        $cell->content = $cont;

        if (!isset($this->rows[$this->rowindex])) {
            $this->rows[$this->rowindex] = new stdClass;
            $this->rows[$this->rowindex]->attrib = [];
        }

        $this->rows[$this->rowindex]->cells[$this->colindex] = $cell;
        $this->colindex += max(1, isset($attr['colspan']) ? intval($attr['colspan']) : 0);

        if (!empty($this->attrib['cols']) && $this->colindex >= $this->attrib['cols']) {
            $this->add_row();
        }
    }

    /**
     * Add a table header cell
     *
     * @param string|array $attr Cell attributes array or class name
     * @param string       $cont Cell content
     */
    public function add_header($attr, $cont)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        $cell = new stdClass;
        $cell->attrib  = $attr;
        $cell->content = $cont;

        if (empty($this->header)) {
            $this->header = new stdClass;
            $this->header->attrib = [];
        }

        $this->header->cells[] = $cell;
    }

    /**
     * Remove a column from a table
     * Useful for plugins making alterations
     *
     * @param string $class Class name
     */
    public function remove_column($class)
    {
        // Remove the header
        foreach ($this->header->cells as $index => $header) {
            if ($header->attrib['class'] == $class) {
                unset($this->header[$index]);
                break;
            }
        }

        // Remove cells from rows
        foreach ($this->rows as $i => $row) {
            foreach ($row->cells as $j => $cell) {
                if ($cell->attrib['class'] == $class) {
                    unset($this->rows[$i]->cells[$j]);
                    break;
                }
            }
        }
    }

    /**
     * Jump to next row
     *
     * @param array $attr Row attributes
     */
    public function add_row($attr = [])
    {
        $this->rowindex++;
        $this->colindex = 0;
        $this->rows[$this->rowindex] = new stdClass;
        $this->rows[$this->rowindex]->attrib = $attr;
        $this->rows[$this->rowindex]->cells  = [];
    }

    /**
     * Set header attributes
     *
     * @param string|array $attr Row attributes array or class name
     */
    public function set_header_attribs($attr = [])
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        if (empty($this->header)) {
            $this->header = new stdClass;
        }

        $this->header->attrib = $attr;
    }

    /**
     * Set row attributes
     *
     * @param string|array $attr  Row attributes array or class name
     * @param int          $index Optional row index (default current row index)
     */
    public function set_row_attribs($attr = [], $index = null)
    {
        if (is_string($attr)) {
            $attr = ['class' => $attr];
        }

        if ($index === null) {
            $index = $this->rowindex;
        }

        // make sure row object exists (#1489094)
        if (empty($this->rows[$index])) {
            $this->rows[$index] = new stdClass;
        }

        $this->rows[$index]->attrib = $attr;
    }

    /**
     * Get row attributes
     *
     * @param int $index Row index
     *
     * @return array Row attributes
     */
    public function get_row_attribs($index = null)
    {
        if ($index === null) {
            $index = $this->rowindex;
        }

        return !empty($this->rows[$index]) ? $this->rows[$index]->attrib : null;
    }

    /**
     * Build HTML output of the table data
     *
     * @param array $attrib Table attributes
     *
     * @return string The final table HTML code
     */
    public function show($attrib = null)
    {
        if (is_array($attrib)) {
            $this->attrib = array_merge($this->attrib, $attrib);
        }

        $thead        = '';
        $tbody        = '';
        $col_tagname  = $this->_col_tagname();
        $row_tagname  = $this->_row_tagname();
        $head_tagname = $this->_head_tagname();

        // include <thead>
        if (!empty($this->header)) {
            $rowcontent = '';
            foreach ($this->header->cells as $c => $col) {
                $rowcontent .= self::tag($head_tagname, $col->attrib, $col->content);
            }
            $thead = $this->tagname == 'table' ? self::tag('thead', null, self::tag('tr', $this->header->attrib ?: null, $rowcontent, parent::$common_attrib)) :
                self::tag($row_tagname, ['class' => 'thead'], $rowcontent, parent::$common_attrib);
        }

        foreach ($this->rows as $r => $row) {
            $rowcontent = '';
            foreach ($row->cells as $c => $col) {
                if ($row_tagname == 'li' && empty($col->attrib) && count($row->cells) == 1) {
                    $rowcontent .= $col->content;
                }
                else {
                    $rowcontent .= self::tag($col_tagname, $col->attrib, $col->content);
                }
            }

            if ($r < $this->rowindex || count($row->cells)) {
                $tbody .= self::tag($row_tagname, $row->attrib, $rowcontent, parent::$common_attrib);
            }
        }

        if (!empty($this->attrib['rowsonly'])) {
            return $tbody;
        }

        // add <tbody>
        $this->content = $thead . ($this->tagname == 'table' ? self::tag('tbody', null, $tbody) : $tbody);

        unset($this->attrib['cols'], $this->attrib['rowsonly']);

        return parent::show();
    }

    /**
     * Count number of rows
     *
     * @return int The number of rows
     */
    public function size()
    {
        return count($this->rows);
    }

    /**
     * Remove table body (all rows)
     */
    public function remove_body()
    {
        $this->rows     = [];
        $this->rowindex = 0;
    }

    /**
     * Getter for the corresponding tag name for table row elements
     */
    private function _row_tagname()
    {
        static $row_tagnames = ['table' => 'tr', 'ul' => 'li', '*' => 'div'];
        return !empty($row_tagnames[$this->tagname]) ? $row_tagnames[$this->tagname] : $row_tagnames['*'];
    }

    /**
     * Getter for the corresponding tag name for table row elements
     */
    private function _head_tagname()
    {
        static $head_tagnames = ['table' => 'th', '*' => 'span'];
        return !empty($head_tagnames[$this->tagname]) ? $head_tagnames[$this->tagname] : $head_tagnames['*'];
    }

    /**
     * Getter for the corresponding tag name for table cell elements
     */
    private function _col_tagname()
    {
        static $col_tagnames = ['table' => 'td', '*' => 'span'];
        return !empty($col_tagnames[$this->tagname]) ? $col_tagnames[$this->tagname] : $col_tagnames['*'];
    }
}