XoopsModules25x / lexikon

    function unichr($a) {

    return mb_convert_encoding(pack("N",$a), mb_internal_encoding(), 'UCS-4BE');

    }

    for ($a = 48; $a < (48 + 10); ++$a) {

        $letterlinks             = [];

        $initial                 = unichr($a);

        $sql                     = $xoopsDB->query('SELECT entryID FROM '

                                                       . $xoopsDB->prefix('lxentries')

                                                       . " WHERE init = '$initial' AND submit = '0' AND offline ='0' AND request = '0' "

                                                       . $catperms

                                                       . '');

        $howmany                 = $xoopsDB->getRowsNum($sql);

        $letterlinks['total']    = $howmany;

        $letterlinks['id']       = unichr($a);

        $letterlinks['linktext'] = unichr($a);

        $alpha['initial'][] = $letterlinks;

    }

    for ($a = 65; $a < (65 + 26); ++$a) {

        $letterlinks             = [];

        $initial                 = unichr($a);

        $alpha['initial'][] = $letterlinks;

    }

    for ($a = 65; $a < (65 + 26); ++$a) {

        $letterlinks             = [];

        $initial                 = unichr($a);

        $sql                     = $xoopsDB->query('SELECT entryID FROM '

                                                       . $xoopsDB->prefix('lxentries')

                                                       . " WHERE init = '$initial' AND submit = '0' AND offline ='0' AND request = '0' "

                                                       . $catperms

                                                       . '');

        $howmany                 = $xoopsDB->getRowsNum($sql);

        $letterlinks['total']    = $howmany;

        $letterlinks['id']       = unichr($a);

        $letterlinks['linktext'] = unichr($a);

        $alpha['initial'][] = $letterlinks;

    }

    /*for ($a = 1040; $a < (1040 + 32); ++$a) {

        $letterlinks             = [];

        $initial                 = unichr($a);

    $catids = implode(',', $allowed_cats);

      $catperms = " AND categoryID IN ($catids) ";

    $alpha = [];

    for ($a = 65; $a < (65+26); $a++ ) {

        $letterlinks = [];

        $initial = chr($a);

        $sql = $xoopsDB -> query ( "SELECT entryID FROM " . $xoopsDB -> prefix ( "lxentries") . " WHERE init = '$initial' AND submit = '0' AND offline ='0' AND request = '0' ".$catperms."");

        $howmany = $xoopsDB -> getRowsNum( $sql );

        $letterlinks['total'] = $howmany;

        $letterlinks['id'] = chr($a);

        $letterlinks['linktext'] = chr($a);

        $alpha['initial'][] = $letterlinks;

    }

    return $alpha;

}