<?php

/*
 * LMS version 1.11-git
 *
 *  (C) Copyright 2001-2013 LMS Developers
 *
 *  Please, see the doc/AUTHORS for more information about authors!
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License Version 2 as
 *  published by the Free Software Foundation.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
 *  USA.
 *
 *  $Id$
 */

self::addLanguageFunctions(
    self::UI_FUNCTION,
    array(
        'uptimef' => function ($ts) {
            if ($ts < 60) {
                return trans('less than one minute ago');
            }

            $min= $ts / 60;
            $hours = $min / 60;
            $days  = floor($hours / 24);
            $hours = floor($hours - ($days * 24));
            $min= floor($min - ($days * 60 * 24) - ($hours * 60));

            $result = '';
            if ($days != 0) {
                $result = $days;
                if ($days==1) {
                    $result .= ' deň ';
                } else {
                    $result .= ' dni ';
                }
            }
            if ($hours != 0) {
                $result .= $hours;
                if ($hours==1) {
                    $result .= ' hodina ';
                } elseif (in_array($hours, array(2,3,4,22,23))) {
                    $result .= ' hodin ';
                } else {
                    $result .= ' hodin ';
                }
            }
            if ($min != 0) {
                $result .= $min;
                if ($min==1) {
                    $result .= ' minúta ';
                } elseif (in_array($min, array(2,3,4,22,23,24,32,33,34,42,43,44,52,53,54))) {
                    $result .= ' minút ';
                } else {
                    $result .= ' minut ';
                }
            }
            return $result;
        },
        'to_words' => function ($num, $power = 0, $powsuffix = '', $short_version = 0) {
            // Extracted from lang.pl.php by Piotr Klaban <makler at man dot torun dot pl>
            // from PEAR package Number_Words-0.3.1
            // 'short_version' added by alec/kubatyszko
            // added leading space trim's by alec

            if ($short_version) {
                $patterns[0] = "/0/";
                $patterns[1] = "/1/";
                $patterns[2] = "/2/";
                $patterns[3] = "/3/";
                $patterns[4] = "/4/";
                $patterns[5] = "/5/";
                $patterns[6] = "/6/";
                $patterns[7] = "/7/";
                $patterns[8] = "/8/";
                $patterns[9] = "/9/";

                $replacements[0] = "nul ";
                $replacements[1] = "jed ";
                $replacements[2] = "dva ";
                $replacements[3] = "tri ";
                $replacements[4] = "šty ";
                $replacements[5] = "päť ";
                $replacements[6] = "šes ";
                $replacements[7] = "sed ";
                $replacements[8] = "ose ";
                $replacements[9] = "dev ";

                return trim(preg_replace($patterns, $replacements, $num));
            }

            $ret = '';
            $_sep = ' ';
            $_minus = 'mínus';
            $_digits = array(0 => 'nula', 'jedna', 'dva', 'tri', 'štyri', 'päť', 'šesť', 'sedem', 'osem', 'deveť');
            $_exponent = array(
                0 => array('','',''),
                3 => array('tisíc','tisíce','tisíc'),
                6 => array('milión','milióny','miliónov'),
                9 => array('miliarda','miliardy','miliárd'),
                12 => array('bilión','bilióy','biliónov'),
                15 => array('biliarda','biliardy','biliárd'),
                18 => array('trylión','trylióny','tryliónov'),
                21 => array('tryliarda','tryliardy','tryliard'),
                24 => array('kvadrylión','kvadrylióny','kvadryliónov'),
                27 => array('kwadryliard','kwadryliardy','kwadryliardów'),
                30 => array('kwintylion','kwintyliony','kwintylionów'),
                33 => array('kwintyliiard','kwintyliardy','kwintyliardów'),
                36 => array('sekstylion','sekstyliony','sekstylionów'),
                39 => array('sekstyliard','sekstyliardy','sekstyliardów'),
                42 => array('septylion','septyliony','septylionów'),
                45 => array('septyliard','septyliardy','septyliardów'),
                48 => array('oktylion','oktyliony','oktylionów'),
                51 => array('oktyliard','oktyliardy','oktyliardów'),
                54 => array('nonylion','nonyliony','nonylionów'),
                57 => array('nonyliard','nonyliardy','nonyliardów'),
                60 => array('decylion','decyliony','decylionów'),
                63 => array('decyliard','decyliardy','decyliardów'),
                100 => array('centylion','centyliony','centylionów'),
                103 => array('centyliard','centyliardy','centyliardów'),
                120 => array('wicylion','wicylion','wicylion'),
                123 => array('wicyliard','wicyliardy','wicyliardów'),
                180 => array('trycylion','trycylion','trycylion'),
                183 => array('trycyliard','trycyliardy','trycyliardów'),
                240 => array('kwadragilion','kwadragilion','kwadragilion'),
                243 => array('kwadragiliard','kwadragiliardy','kwadragiliardów'),
                300 => array('kwinkwagilion','kwinkwagilion','kwinkwagilion'),
                303 => array('kwinkwagiliard','kwinkwagiliardy','kwinkwagiliardów'),
                360 => array('seskwilion','seskwilion','seskwilion'),
                363 => array('seskwiliard','seskwiliardy','seskwiliardów'),
                420 => array('septagilion','septagilion','septagilion'),
                423 => array('septagiliard','septagiliardy','septagiliardów'),
                480 => array('oktogilion','oktogilion','oktogilion'),
                483 => array('oktogiliard','oktogiliardy','oktogiliardów'),
                540 => array('nonagilion','nonagilion','nonagilion'),
                543 => array('nonagiliard','nonagiliardy','nonagiliardów'),
                600 => array('centylion','centyliony','centylionów'),
                603 => array('centyliard','centyliardy','centyliardów'),
                6000018 => array('milinilitrylion','milinilitryliony','milinilitrylionów')
            );

            if (substr($num, 0, 1) == '-') {
                $ret = $_minus;
                $num = substr($num, 1);
            }

            // strip excessive zero signs and spaces
            $num = trim($num);
            $num = preg_replace('/^0+/', '', $num);

            if (strlen($num) > 3) {
                $maxp = strlen($num)-1;
                $curp = $maxp;
                for ($p = $maxp; $p > 0; --$p) { // power
                    // check for highest power
                    if (isset($_exponent[$p])) { // send substr from $curp to $p
                        $snum = substr($num, $maxp - $curp, $curp - $p + 1);
                        $snum = preg_replace('/^0+/', '', $snum);
                        if ($snum !== '') {
                            $cursuffix = $_exponent[$power][count($_exponent[$power])-1];
                            if ($powsuffix != '') {
                                $cursuffix .= $_sep . $powsuffix;
                            }
                            $ret .= to_words($snum, $p, $cursuffix);
                            $ret .=' ';
                        }
                        $curp = $p - 1;
                    }
                }
                $num = substr($num, $maxp - $curp, $curp - $p + 1);
                $ret = trim($ret);
                if ($num == 0) {
                    return $ret;
                }
            } elseif ($num == 0 || $num == '') {
                return $_digits[0];
            }

            $h = $t = $d = 0;

            switch (strlen($num)) {
                // phpcs:disable PSR2.ControlStructures.SwitchDeclaration
                case 3:
                    $h = (int)substr($num, -3, 1);
                case 2:
                    $t = (int)substr($num, -2, 1);
                // phpcs:enable PSR2.ControlStructures.SwitchDeclaration
                case 1:
                    $d = (int)substr($num, -1, 1);
                    break;
                case 0:
                    return;
                    break;
            }

            switch ($h) {
                case 9:
                    $ret .= $_sep . 'deveťsto';
                    break;

                case 8:
                    $ret .= $_sep . 'osemsto';
                    break;

                case 7:
                    $ret .= $_sep . 'sedemsto';
                    break;

                case 6:
                    $ret .= $_sep . 'šesťsto';
                    break;

                case 5:
                    $ret .= $_sep . 'päťsto';
                    break;

                case 4:
                    $ret .= $_sep . 'štyristo';
                    break;

                case 3:
                    $ret .= $_sep . 'tristo';
                    break;

                case 2:
                    $ret .= $_sep . 'dvesto';
                    break;

                case 1:
                    $ret .= $_sep . 'sto';
                    break;
            }

            switch ($t) {
                case 9:
                case 8:
                case 7:
                case 6:
                case 5:
                    $ret .= $_sep . $_digits[$t] . 'päťdesiat';
                    break;

                case 4:
                    $ret .= $_sep . 'štyridsať';
                    break;

                case 3:
                    $ret .= $_sep . 'tridsať';
                    break;

                case 2:
                    $ret .= $_sep . 'dvadsať';
                    break;

                case 1:
                    switch ($d) {
                        case 0:
                            $ret .= $_sep . 'desať';
                            break;

                        case 1:
                            $ret .= $_sep . 'jedenásť';
                            break;

                        case 2:
                        case 3:
                        case 7:
                        case 8:
                            $ret .= $_sep . $_digits[$d] . 'násť';
                            break;

                        case 4:
                            $ret .= $_sep . 'štrnásť';
                            break;

                        case 5:
                            $ret .= $_sep . 'pätnásť';
                            break;

                        case 6:
                            $ret .= $_sep . 'šestnásť';
                            break;

                        case 9:
                            $ret .= $_sep . 'devetnásť';
                            break;
                    }
                    break;
            }

            if ($t != 1 && $d > 0) {
                $ret .= $_sep . $_digits[$d];
            }

            if ($t == 1) {
                $d = 0;
            }

            if (( $h + $t ) > 0 && $d == 1) {
                $d = 0;
            }

            if ($power > 0) {
                if (isset($_exponent[$power])) {
                    $lev = $_exponent[$power];
                }

                if (!isset($lev) || !is_array($lev)) {
                    return null;
                }

                switch ($d) {
                    case 1:
                        $suf = $lev[0];
                        break;
                    case 2:
                    case 3:
                    case 4:
                        $suf = $lev[1];
                        break;
                    case 0:
                    case 5:
                    case 6:
                    case 7:
                    case 8:
                    case 9:
                        $suf = $lev[2];
                        break;
                }
                $ret .= $_sep . $suf;
            }

            if ($powsuffix != '') {
                $ret .= $_sep . $powsuffix;
            }

            return trim($ret);
        },
    )
);
