ImpressCMS/impresscms

<?php

// $Id: system_blocks.php 12313 2013-09-15 21:14:35Z skenow $
// ------------------------------------------------------------------------ //
// XOOPS - PHP Content Management System //
// Copyright (c) 2000 XOOPS.org //
// <http://www.xoops.org/> //
// ------------------------------------------------------------------------ //
// This program is free software; you can redistribute it and/or modify //
// it under the terms of the GNU General Public License as published by //
// the Free Software Foundation; either version 2 of the License, or //
// (at your option) any later version. //
// //
// You may not change or alter any portion of this comment or credits //
// of supporting developers from this source code or any supporting //
// source code which is considered copyrighted (c) material of the //
// original comment or credit authors. //
// //
// 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 //
// ------------------------------------------------------------------------ //
// Author: Kazumi Ono (AKA onokazu) //
// URL: http://www.myweb.ne.jp/, http://www.xoops.org/, http://jp.xoops.org/ //
// Project: The XOOPS Project //
// ------------------------------------------------------------------------- //
/**
 * Good ol' system blocks
 *
 * @copyright http://www.impresscms.org/ The ImpressCMS Project
 * @license LICENSE.txt
 * @package System
 * @subpackage Blocks
 * @version SVN: $Id: system_blocks.php 12313 2013-09-15 21:14:35Z skenow $
 */
/**
 * Shows which users and guests are online
 *
 * @return mixed $block or FALSE if no users were online
 */
function b_system_online_show() {
    $online_handler = icms::handler('icms_core_Online');
    mt_srand((double) microtime() * 1000000);
    // set gc probabillity to 10% for now..
    if (mt_rand(1, 100) < 11) {
        $online_handler->gc(300);
    }
    if (is_object(icms::$user)) {
        $uid = icms::$user->getVar('uid');
        $uname = icms::$user->getVar('uname');
    } else {
        $uid = 0;
        $uname = '';
    }
    if (is_object(icms::$module)) {
        $online_handler->write($uid, $uname, time(), icms::$module->getVar('mid'), $_SERVER['REMOTE_ADDR']);
    } else {
        $online_handler->write($uid, $uname, time(), 0, $_SERVER['REMOTE_ADDR']);
    }
    $onlines = $online_handler->getAll();
    if (FALSE !== $onlines) {
        $total = count($onlines);
        $block = array();
        $guests = 0;
        $members = '';
        for ($i = 0; $i < $total; $i++ ) {
            if ($onlines[$i]['online_uid'] > 0) {
                $members .= ' <a href="' . ICMS_URL . '/userinfo.php?uid=' . $onlines[$i]['online_uid'] . '" title="' . $onlines[$i]['online_uname'] . '\'s ' . _PROFILE . '">' . $onlines[$i]['online_uname'] . '</a>, ';
            } else {
                $guests++ ;
            }
        }
        $block['online_total'] = sprintf(_ONLINEPHRASE, $total);
        if (is_object(icms::$module)) {
            $mytotal = $online_handler->getCount(new icms_db_criteria_Item('online_module', icms::$module->getVar('mid')));
            $block['online_total'] .= ' (' . sprintf(_ONLINEPHRASEX, $mytotal, icms::$module->getVar('name')) . ')';
        }
        $block['lang_members'] = _MEMBERS;
        $block['lang_guests'] = _GUESTS;
        $block['online_names'] = $members;
        $block['online_members'] = $total - $guests;
        $block['online_guests'] = $guests;
        $block['lang_more'] = _MORE;
        return $block;
    } else {
        return FALSE;
    }
}

/**
 * Shows the login block
 *
 * @return mixed $block or FALSE if no users were online
 */
function b_system_login_show() {
    global $icmsConfig, $icmsConfigAuth, $icmsConfigUser;
    if (!icms::$user) {
        $block = array();
        $block['lang_username'] = _USERNAME;
        $block['unamevalue'] = "";
        if (isset($_COOKIE[$icmsConfig['usercookie']])) {
            $block['unamevalue'] = $_COOKIE[$icmsConfig['usercookie']];
        }
        $block['lang_password'] = _PASSWORD;
        $block['lang_login'] = _LOGIN;
        $block['lang_lostpass'] = _MB_SYSTEM_LPASS;
        $block['lang_registernow'] = _MB_SYSTEM_RNOW;
        $block['lang_rememberme'] = _MB_SYSTEM_REMEMBERME;
        if ($icmsConfig['use_ssl'] == 1 && $icmsConfig['sslloginlink'] != '') {
            $block['sslloginlink'] = "<a href=\"javascript:openWithSelfMain('" . $icmsConfig['sslloginlink'] . "', 'ssllogin', 300, 200);\">" . _MB_SYSTEM_SECURE . "</a>";
        }

        if ($icmsConfigUser['allow_register'] == 1) {
            $block['registration'] = $icmsConfigUser['allow_register'];
        }

        if ($icmsConfigUser['remember_me'] == 1) {
            $block['rememberme'] = $icmsConfigUser['remember_me'];
        }
        return $block;
    }
    return FALSE;
}

/**
 * Shows the main menu block
 *
 * @return array $block the main menu block array
 */
function b_system_main_show() {
    global $icmsConfigUser;

    $block = array();
    $block['lang_home'] = _MB_SYSTEM_HOME;
    if ($icmsConfigUser['priv_dpolicy'] == 1) {
        $block['priv_enabled'] = TRUE;
        $block['lang_privpolicy'] = _MB_SYSTEM_PRIVPOLICY;
    }
    $block['lang_close'] = _CLOSE;
    $module_handler = icms::handler('icms_module');
    $criteria = new icms_db_criteria_Compo(new icms_db_criteria_Item('hasmain', 1));
    $criteria->add(new icms_db_criteria_Item('isactive', 1));
    $criteria->add(new icms_db_criteria_Item('weight', 0, '>'));
    $modules = $module_handler->getObjects($criteria, TRUE);
    $moduleperm_handler = icms::handler('icms_member_groupperm');
    $groups = is_object(icms::$user) ? icms::$user->getGroups() : XOOPS_GROUP_ANONYMOUS;
    $read_allowed = $moduleperm_handler->getItemIds('module_read', $groups);
    foreach (array_keys($modules) as $i) {
        if (in_array($i, $read_allowed)) {
            $block['modules'][$i]['name'] = $modules[$i]->getVar('name');
            $block['modules'][$i]['directory'] = $modules[$i]->getVar('dirname');
            $sublinks = $modules[$i]->subLink();
            if ((count($sublinks) > 0) && (!empty(icms::$module)) && ($i == icms::$module->getVar('mid'))) {
                foreach ($sublinks as $sublink) {
                    $block['modules'][$i]['sublinks'][] = array('name' => $sublink['name'], 'url' => ICMS_MODULES_URL . '/' . $modules[$i]->getVar('dirname') . '/' . $sublink['url']);
                }
            } else {
                $block['modules'][$i]['sublinks'] = array();
            }
        }
    }
    return $block;
}

/**
 * Shows the search block
 *
 * @return array $block The search block
 */
function b_system_search_show() {
    $block = array();
    $block['lang_search'] = _MB_SYSTEM_SEARCH;
    $block['lang_advsearch'] = _MB_SYSTEM_ADVS;
    return $block;
}

/**
 * Shows the user menu block
 *
 * @return mixed $block or FALSE if the user is a guest
 */
function b_system_user_show() {
    if (is_object(icms::$user)) {
        $pm_handler = icms::handler('icms_data_privmessage');
        $block = array();
        $block['lang_youraccount'] = _MB_SYSTEM_VACNT;
        $block['lang_editaccount'] = _MB_SYSTEM_EACNT;
        $block['lang_notifications'] = _MB_SYSTEM_NOTIF;
        $block['uid'] = icms::$user->getVar('uid');
        $block['lang_logout'] = _MB_SYSTEM_LOUT;
        $criteria = new icms_db_criteria_Compo(new icms_db_criteria_Item('read_msg', 0));
        $criteria->add(new icms_db_criteria_Item('to_userid', icms::$user->getVar('uid')));
        $block['new_messages'] = $pm_handler->getCount($criteria);
        $block['lang_inbox'] = _MB_SYSTEM_INBOX;
        $block['lang_adminmenu'] = _MB_SYSTEM_ADMENU;
        return $block;
    }
    return FALSE;
}

/**
 * Shows information about the user
 *
 * @param array $options The block options
 * @return array $block the block array
 */
function b_system_info_show($options) {
    global $icmsConfig;
    $block = array();
    if (!empty($options[3])) {
        $block['showgroups'] = TRUE;
        $result = icms::$xoopsDB->query("SELECT u.uid, u.uname, u.email, u.user_viewemail, u.user_avatar, g.name AS groupname FROM " . icms::$xoopsDB->prefix("groups_users_link") . " l LEFT JOIN " . icms::$xoopsDB->prefix("users") . " u ON l.uid=u.uid LEFT JOIN " . icms::$xoopsDB->prefix("groups") . " g ON l.groupid=g.groupid WHERE g.group_type='Admin' ORDER BY l.groupid, u.uid");
        if (icms::$xoopsDB->getRowsNum($result) > 0) {
            $prev_caption = "";
            $i = 0;
            while ($userinfo = icms::$xoopsDB->fetchArray($result)) {
                if ($prev_caption != $userinfo['groupname']) {
                    $prev_caption = $userinfo['groupname'];
                    $block['groups'][$i]['name'] = icms_core_DataFilter::htmlSpecialChars($userinfo['groupname']);
                }
                if (isset(icms::$user) && is_object(icms::$user)) {
                    $block['groups'][$i]['users'][] = array(
                        'id' => $userinfo['uid'],
                        'name' => icms_core_DataFilter::htmlSpecialChars($userinfo['uname']),
                        'msglink' => "<a href=\"javascript:openWithSelfMain('" . ICMS_URL . "/pmlite.php?send2=1&amp;to_userid=" . $userinfo['uid'] . "','pmlite',800,680);\"><img src=\"" . ICMS_URL . "/images/icons/" . $GLOBALS["icmsConfig"]["language"] . "/pm_small.gif\" width=\"27px\" height=\"17px\" alt=\"\" /></a>",
                        'avatar' => ICMS_UPLOAD_URL . '/' . $userinfo['user_avatar']);
                } else {
                    if ($userinfo['user_viewemail']) {
                        $block['groups'][$i]['users'][] = array(
                            'id' => $userinfo['uid'],
                            'name' => icms_core_DataFilter::htmlSpecialChars($userinfo['uname']),
                            'msglink' => '<a href="mailto:' . $userinfo['email'] . '"><img src="' . ICMS_URL . '/images/icons/' . $GLOBALS["icmsConfig"]["language"] . '/em_small.gif" width="16px" height="14px" alt="" /></a>',
                            'avatar' => ICMS_UPLOAD_URL . '/' . $userinfo['user_avatar']);
                    } else {
                        $block['groups'][$i]['users'][] = array('id' => $userinfo['uid'], 'name' => icms_core_DataFilter::htmlSpecialChars($userinfo['uname']), 'msglink' => '&nbsp;', 'avatar' => ICMS_UPLOAD_URL . '/' . $userinfo['user_avatar']);
                    }
                }
                $i++ ;
            }
        }
    } else {
        $block['showgroups'] = FALSE;
    }
    $block['logourl'] = ICMS_URL . '/images/' . $options[2];
    $block['recommendlink'] = "<a href=\"javascript:openWithSelfMain('" . ICMS_URL . "/misc.php?action=showpopups&amp;type=friend&amp;op=sendform&amp;t=" . time() . "','friend'," . $options[0] . "," . $options[1] . ")\">" . _MB_SYSTEM_RECO . "</a>";
    return $block;
}

/**
 * Shows the latest members that were added
 *
 * @param array $options The block options
 * @return array $block The newest members block array
 */
function b_system_newmembers_show($options) {
    global $icmsConfigUser;

    $block = array();
    $criteria = new icms_db_criteria_Compo(new icms_db_criteria_Item('level', 0, '>'));
    $limit = (!empty($options[0])) ? $options[0] : 10;
    $criteria->setOrder('DESC');
    $criteria->setSort('user_regdate');
    $criteria->setLimit($limit);
    $member_handler = icms::handler('icms_member');
    $newmembers = $member_handler->getUsers($criteria);
    $count = count($newmembers);
    for ($i = 0; $i < $count; $i++ ) {
        if ($options[1] == 1) {
            if ($newmembers[$i]->getVar('user_avatar') && $newmembers[$i]->getVar('user_avatar') != 'blank.gif' && $newmembers[$i]->getVar('user_avatar') != '') {
                $block['users'][$i]['avatar'] = ICMS_UPLOAD_URL . '/' . $newmembers[$i]->getVar('user_avatar');
            } elseif ($icmsConfigUser['avatar_allow_gravatar'] == 1) {
                $block['users'][$i]['avatar'] = $newmembers[$i]->gravatar('G', $icmsConfigUser['avatar_width']);
            } else {
                $block['users'][$i]['avatar'] = '';
            }
        } else {
            $block['users'][$i]['avatar'] = '';
        }
        $block['users'][$i]['id'] = $newmembers[$i]->getVar('uid');
        $block['users'][$i]['name'] = $newmembers[$i]->getVar('uname');
        $block['users'][$i]['joindate'] = formatTimestamp($newmembers[$i]->getVar('user_regdate'), 's');
        $block['users'][$i]['login_name'] = $newmembers[$i]->getVar('login_name');
    }
    if (!empty($options[2]) && $options[2] == 1) {
        $block['index_enabled'] = TRUE;
        $block['registered'] = icms_conv_nr2local($member_handler->getUserCount(new icms_db_criteria_Item('level')));
        $block['inactive'] = icms_conv_nr2local($member_handler->getUserCount(new icms_db_criteria_Item('level', 0)));
        $block['active'] = icms_conv_nr2local($member_handler->getUserCount(new icms_db_criteria_Item('level', 0, '>')));
        $block['lang_totalusers'] = _MB_SYSTEM_TOTAL_USERS;
        $block['lang_activeusers'] = _MB_SYSTEM_ACT_USERS;
        $block['lang_inactiveusers'] = _MB_SYSTEM_INACT_USERS;
    }
    return $block;
}

/**
 * Shows the top posters block
 *
 * @param array $options The block options
 * @return mixed $block or FALSE if no users were online
 */
function b_system_topposters_show($options) {
    global $icmsConfigUser;

    $block = array();
    $criteria = new icms_db_criteria_Compo(new icms_db_criteria_Item('level', 0, '>'));
    $limit = (!empty($options[0])) ? $options[0] : 10;
    $size = count($options);
    for ($i = 2; $i < $size; $i++ ) {
        $criteria->add(new icms_db_criteria_Item('rank', $options[$i], '<>'));
    }
    $criteria->setOrder('DESC');
    $criteria->setSort('posts');
    $criteria->setLimit($limit);
    $member_handler = icms::handler('icms_member');
    $topposters = $member_handler->getUsers($criteria);
    $count = count($topposters);
    for ($i = 0; $i < $count; $i++ ) {
        if ($options[1] == 1) {
            if ($topposters[$i]->getVar('user_avatar') && $topposters[$i]->getVar('user_avatar') != 'blank.gif' && $topposters[$i]->getVar('user_avatar') != '') {
                $block['users'][$i]['avatar'] = ICMS_UPLOAD_URL . '/' . $topposters[$i]->getVar('user_avatar');
            } elseif ($icmsConfigUser['avatar_allow_gravatar'] == 1) {
                $block['users'][$i]['avatar'] = $topposters[$i]->gravatar('G', $icmsConfigUser['avatar_width']);
            } else {
                $block['users'][$i]['avatar'] = '';
            }
        } else {
            $block['users'][$i]['avatar'] = '';
        }
        $block['users'][$i]['id'] = $topposters[$i]->getVar('uid');
        $block['users'][$i]['name'] = $topposters[$i]->getVar('uname');
        $block['users'][$i]['posts'] = $topposters[$i]->getVar('posts');
    }
    return $block;
}

/**
 * Shows The latest comments
 *
 * @param array $options The block options
 * @return array $block the block array
 */
function b_system_comments_show($options) {
    $block = array();
    include_once ICMS_ROOT_PATH . '/include/comment_constants.php';
    $comment_handler = icms::handler('icms_data_comment');
    $criteria = new icms_db_criteria_Compo(new icms_db_criteria_Item('com_status', XOOPS_COMMENT_ACTIVE));
    $criteria->setLimit((int) $options[0]);
    $criteria->setSort('com_created');
    $criteria->setOrder('DESC');

    // Check modules permissions
    $moduleperm_handler = icms::handler('icms_member_groupperm');
    $gperm_groupid = is_object(icms::$user) ? icms::$user->getGroups() : array(XOOPS_GROUP_ANONYMOUS);
    $criteria1 = new icms_db_criteria_Compo(new icms_db_criteria_Item('gperm_name', 'module_read', '='));
    $criteria1->add(new icms_db_criteria_Item('gperm_groupid', '(' . implode(',', $gperm_groupid) . ')', 'IN'));
    $perms = $moduleperm_handler->getObjects($criteria1, TRUE);
    $modIds = array();
    foreach ($perms as $item) {
        $modIds[] = $item->getVar('gperm_itemid');
    }
    if (count($modIds) > 0) {
        $modIds = array_unique($modIds);
        $criteria->add(new icms_db_criteria_Item('com_modid', '(' . implode(',', $modIds) . ')', 'IN'));
    }
    // Check modules permissions

    $comments = $comment_handler->getObjects($criteria, TRUE);
    $member_handler = icms::handler('icms_member');
    $module_handler = icms::handler('icms_module');
    $modules = $module_handler->getObjects(new icms_db_criteria_Item('hascomments', 1), TRUE);
    $comment_config = array();
    foreach (array_keys($comments) as $i) {
        $mid = $comments[$i]->getVar('com_modid');
        $com['module'] = '<a href="' . ICMS_MODULES_URL . '/' . $modules[$mid]->getVar('dirname') . '/">' . $modules[$mid]->getVar('name') . '</a>';
        if (!isset($comment_config[$mid])) {
            $comment_config[$mid] = $modules[$mid]->getInfo('comments');
        }
        $com['id'] = $i;
        $com['title'] = '<a href="' . ICMS_MODULES_URL . '/' . $modules[$mid]->getVar('dirname') . '/' . $comment_config[$mid]['pageName'] . '?' . $comment_config[$mid]['itemName'] . '=' . $comments[$i]->getVar('com_itemid') . '&amp;com_id=' . $i . '&amp;com_rootid=' . $comments[$i]->getVar('com_rootid') . '&amp;' . htmlspecialchars($comments[$i]->getVar('com_exparams')) . '#comment' . $i . '">' . $comments[$i]->getVar('com_title') . '</a>';
        $com['icon'] = htmlspecialchars($comments[$i]->getVar('com_icon'), ENT_QUOTES);
        $com['icon'] = ($com['icon'] != '') ? $com['icon'] : 'icon1.gif';
        $com['time'] = formatTimestamp($comments[$i]->getVar('com_created'), 'm');
        if ($comments[$i]->getVar('com_uid') > 0) {
            $poster = &$member_handler->getUser($comments[$i]->getVar('com_uid'));
            if (is_object($poster)) {
                $com['poster'] = '<a href="' . ICMS_URL . '/userinfo.php?uid=' . $comments[$i]->getVar('com_uid') . '">' . $poster->getVar('uname') . '</a>';
            } else {
                $com['poster'] = $GLOBALS['icmsConfig']['anonymous'];
            }
        } else {
            $com['poster'] = $GLOBALS['icmsConfig']['anonymous'];
        }
        $block['comments'][] = &$com;
        unset($com);
    }
    return $block;
}

// RMV-NOTIFY
/**
 * Shows The latest notifications
 *
 * @param array $options The block options
 * @return array $block the block array
 */
function b_system_notification_show() {
    icms_loadLanguageFile('core', 'notification');
    // Notification must be enabled, and user must be logged in
    if (empty(icms::$user) || !icms_data_notification_Handler::isEnabled('block')) {
        return false; // do not display block
    }
    $notification_handler = icms::handler('icms_data_notification');
    // Now build the a nested associative array of info to pass
    // to the block template.
    $block = array();
    $categories = &$notification_handler->subscribableCategoryInfo();
    if (empty($categories)) {
        return false;
    }
    foreach ($categories as $category) {
        $section['name'] = $category['name'];
        $section['title'] = $category['title'];
        $section['description'] = $category['description'];
        $section['itemid'] = $category['item_id'];
        $section['events'] = array();
        $subscribed_events = $notification_handler->getSubscribedEvents($category['name'], $category['item_id'], icms::$module->getVar('mid'), icms::$user->getVar('uid'));
        foreach ($notification_handler->categoryEvents($category['name'], true) as $event) {
            if (!empty($event['admin_only']) && !icms::$user->isAdmin(icms::$module->getVar('mid'))) {
                continue;
            }
            $subscribed = in_array($event['name'], $subscribed_events) ? 1 : 0;
            $section['events'][$event['name']] = array('name' => $event['name'], 'title' => $event['title'], 'caption' => $event['caption'], 'description' => $event['description'], 'subscribed' => $subscribed);
        }
        $block['categories'][$category['name']] = $section;
    }
    // Additional form data
    $block['target_page'] = "notification_update.php";
    // FIXME: better or more standardized way to do this?
    $script_url = explode('/', $_SERVER['PHP_SELF']);
    $script_name = $script_url[count($script_url) - 1];
    $block['redirect_script'] = $script_name;
    $block['submit_button'] = _NOT_UPDATENOW;
    $block['notification_token'] = icms::$security->createToken();
    return $block;
}

/**
 * Shows The multilanguage (flags) block
 *
 * @return array $block the block array
 */
function b_system_multilanguage_show()
{
    global $icmsConfigMultilang, $icmsConfig;

    $block = array();


    $language_tags = explode(',', $icmsConfigMultilang['ml_tags']);
    $language_names = explode(',', $icmsConfigMultilang['ml_captions']);
    $block['current_language'] = $icmsConfig['language'];
    foreach ($language_tags as $tagkey=>$language_tag) {
        $block['ml_tag'][$tagkey]['tag'] = $language_tag;

    }
    foreach ($language_names as $namekey=>$language_name){
        $block['ml_tag'][$namekey]['name'] = $language_name;
        $block['ml_tag'][$namekey]['image'] = ICMS_URL . '/images/flags/' . strtolower($language_name) . '.gif';
    }
    return $block;
}

/**
 * Shows the form to edit the comments
 *
 * @param array $options The block options
 * @return string $form The edit comments form HTML string
 */
function b_system_comments_edit($options) {
    $inputtag = "<input type='text' name='options[]' value='" . (int) $options[0] . "' />";
    $form = sprintf(_MB_SYSTEM_DISPLAYC, $inputtag);
    return $form;
}

/**
 * Shows the form to edit the top posters
 *
 * @param array $options The block options
 * @return string $form The edit top posters form HTML string
 */
function b_system_topposters_edit($options) {
    $inputtag = "<input type='text' name='options[]' value='" . (int) $options[0] . "' />";
    $form = sprintf(_MB_SYSTEM_DISPLAY, $inputtag);
    $form .= "<br />" . _MB_SYSTEM_DISPLAYA . "&nbsp;<input type='radio' id='options[]' name='options[]' value='1'";
    if ($options[1] == 1) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _YES . "<input type='radio' id='options[]' name='options[]' value='0'";
    if ($options[1] == 0) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _NO . "";
    $form .= "<br />" . _MB_SYSTEM_NODISPGR . "<br /><select id='options[]' name='options[]' multiple='multiple'>";
    $ranks = icms_getModuleHandler("userrank", "system")->getList(icms_buildCriteria(array('rank_special' => '1')));
    $size = count($options);
    foreach ($ranks as $k => $v) {
        $sel = "";
        for ($i = 2; $i < $size; $i++ ) {
            if ($k == $options[$i]) {
                $sel = " selected='selected'";
            }
        }
        $form .= "<option value='$k'$sel>$v</option>";
    }
    $form .= "</select>";
    return $form;
}

/**
 * Shows the form to edit the newest members
 *
 * @param array $options The block options
 * @return string $form The edit newest members form HTML string
 */
function b_system_newmembers_edit($options) {
    $inputtag = "<input type='text' name='options[0]' value='" . $options[0] . "' />";
    $form = sprintf(_MB_SYSTEM_DISPLAY, $inputtag);
    $form .= "<br />" . _MB_SYSTEM_DISPLAYA . "&nbsp;<input type='radio' id='options[1]' name='options[1]' value='1'";
    if ($options[1] == 1) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _YES . "<input type='radio' id='options[1]' name='options[1]' value='0'";
    if ($options[1] == 0) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _NO . "";
    $form .= "<br />" . _MB_SYSTEM_DISPLAYTOT . "&nbsp;<input type='radio' id='options[2]' name='options[2]' value='1'";
    if ($options[2] == 1) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _YES . "<input type='radio' id='options[2]' name='options[2]' value='0'";
    if ($options[2] == 0) {
        $form .= " checked='checked'";
    }
    $form .= " />&nbsp;" . _NO . "";
    return $form;
}

/**
 * Shows the form to edit the sysem info
 *
 * @param array $options The block options
 * @return string $form The edit system info form HTML string
 */
function b_system_info_edit($options) {
    $form = _MB_SYSTEM_PWWIDTH . "&nbsp;";
    $form .= "<input type='text' name='options[]' value='" . $options[0] . "' />";
    $form .= "<br />" . _MB_SYSTEM_PWHEIGHT . "&nbsp;";
    $form .= "<input type='text' name='options[]' value='" . $options[1] . "' />";
    $form .= "<br />" . sprintf(_MB_SYSTEM_LOGO, ICMS_URL . "/images/") . "&nbsp;";
    $form .= "<input type='text' name='options[]' value='" . $options[2] . "' />";
    $chk = "";
    $form .= "<br />" . _MB_SYSTEM_SADMIN . "&nbsp;";
    if ($options[3] == 1) {
        $chk = " checked='checked'";
    }
    $form .= "<input type='radio' name='options[3]' value='1'" . $chk . " />&nbsp;" . _YES . "";
    $chk = "";
    if ($options[3] == 0) {
        $chk = " checked=\"checked\"";
    }
    $form .= "&nbsp;<input type='radio' name='options[3]' value='0'" . $chk . " />" . _NO . "";
    return $form;
}

/**
 * Shows the activated themes
 *
 * @param array $options The block options
 * @return array $block The themes block array with the elements, not the HTML anymore
 */
function b_system_themes_show($options){
    global $icmsConfig;

    $block = array();
    $block['current_theme'] = $icmsConfig['theme_set'];
    foreach ($icmsConfig['theme_set_allowed'] as $theme) {
        $imagefile = ICMS_THEME_URL . "/" . $theme . "/shot.gif";

        $block['theme_select'][$theme]['name'] = $theme;
        $block['theme_select'][$theme]['folder'] = $theme;
        $block['theme_select'][$theme]['current'] = $theme == $icmsConfig['theme_set'];
        $block['theme_select'][$theme]['option'] = $options[0];
        if($options[0]==1)
            $block['theme_select'][$theme]['image'] = $imagefile;
    }
    return $block;
}


/**
 * Shows the form to edit the themes
 *
 * @param array $options The block options
 * @return string $form The edit themes form HTML string
 */
function b_system_themes_edit($options) {
    $chk = "";
    $form = _MB_SYSTEM_THSHOW . "&nbsp;";
    if ($options[0] == 1) {
        $chk = " checked='checked'";
    }
    $form .= "<input type='radio' name='options[0]' value='1'" . $chk . " />&nbsp;" . _YES;
    $chk = "";
    if ($options[0] == 0) {
        $chk = ' checked="checked"';
    }
    $form .= '&nbsp;<input type="radio" name="options[0]" value="0"' . $chk . ' />' . _NO;
    $form .= '<br />' . _MB_SYSTEM_THWIDTH . '&nbsp;';
    $form .= "<input type='text' name='options[1]' value='" . $options[1] . "' />";
    return $form;
}

/**
 * Gathers and displays the current user's bookmarks
 *
 * @since 1.2
 * @return array Array of bookmark links for the current user
 */
function b_system_bookmarks_show() {
    global $icmsConfig;
    $block = array();
    icms_loadLanguageFile('core', 'notification');
    // User must be logged in
    if (empty(icms::$user)) {
        return FALSE; // do not display block
    }
    // Get an array of all notifications for the selected user

    $notification_handler = icms::handler('icms_data_notification');
    $notifications = &$notification_handler->getByUser(icms::$user->getVar('uid'));

    // Generate the info for the template

    $module_handler = icms::handler('icms_module');

    $prev_modid = -1;

    $prev_item = -1;
    foreach ($notifications as $n) {
        $modid = $n->getVar('not_modid');
        if ($modid != $prev_modid) {
            $prev_modid = $modid;

            $prev_item = -1;
            $module = &$module_handler->get($modid);
            $module_name = $module->getVar('name');
            // Get the lookup function, if exists
            $not_config = $module->getInfo('notification');
            $lookup_func = '';
            if (!empty($not_config['lookup_file'])) {
                $lookup_file = ICMS_MODULES_PATH . '/' . $module->getVar('dirname') . '/' . $not_config['lookup_file'];
                if (file_exists($lookup_file)) {
                    include_once $lookup_file;
                    if (!empty($not_config['lookup_func']) && function_exists($not_config['lookup_func'])) {
                        $lookup_func = $not_config['lookup_func'];
                    }
                }
            }
        }

        $category = $n->getVar('not_category');
        $item = $n->getVar('not_itemid');
        if ($item != $prev_item) {
            $prev_item = $item;
            if (!empty($lookup_func)) {
                $item_info = $lookup_func($category, $item);
            } else {
                $item_info = array('name' => '[' . _NOT_NAMENOTAVAILABLE . ']', 'url' => '');
            }
        }

        if ($n->getVar('not_event') == 'bookmark') {
            $block[$module_name][] = array('name' => $item_info['name'], 'url' => $item_info['url']);
        }
    }

    return $block;
}

/**
 *
 * @param array $options block config options
 */
function b_system_social_show($options) {
    $block = array();
    $block['provider'] = array();

    $i = 0;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://twitter.com/home?status='+encodeURIComponent(location.href)+'&amp;description=&amp;tags=&amp;title='+encodeURIComponent(document.title)+'&amp;popup=yes'",
        'image' => "twitter.gif");
    $i++ ;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://www.facebook.com/sharer.php?u='+encodeURIComponent(location.href)+'&amp;description=&amp;tags=&amp;title='+encodeURIComponent(document.title)+'&amp;popup=yes'",
        'image' => "facebook.gif");
    $i++ ;

    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://del.icio.us/post?v=2&amp;url='+encodeURIComponent(location.href)+'&amp;notes=&amp;tags=&amp;title='+encodeURIComponent(document.title)",
        'image' => "del.gif");
    $i++ ;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://myjeeves.ask.com/mysearch/BookmarkIt?v=1.2&amp;t=webpages&amp;url='+encodeURIComponent(location.href)+'&amp;description=&amp;tags=&amp;title='+encodeURIComponent(document.title)+'&amp;popup=yes'",
        'image' => "ask.gif");
    $i++ ;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://digg.com/submit?phase=2&amp;url='+encodeURIComponent(location.href)+'&amp;bodytext=&amp;tags=&amp;title='+encodeURIComponent(document.title)",
        'image' => "digg.gif");
    $i++ ;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://myweb2.search.yahoo.com/myresults/bookmarklet?t='+encodeURIComponent(document.title)+'&amp;d=&amp;tag=&amp;u='+encodeURIComponent(location.href)",
        'image' => "yahoo.gif");
    $i++ ;
    if ($options[$i]) $block['provider'][$i] = array(
        'title' => _MB_SYSTEM_SOCIAL_PROVIDER_BOOKMARK . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i),
        'link' => "'http://www.diigo.com/post?url='+encodeURIComponent(location.href)+'&amp;title='+encodeURIComponent(document.title)+'&amp;tag=&amp;comments='",
        'image' => "diigo.gif");
    $i++ ;

    $block['imagepath'] = ICMS_IMAGES_URL . '/icons/social/';
    return $block;
}

/**
 *
 * @param array $options block config options
 * @return string $form The edit social bookmarks form HTML string
 */
function b_system_social_edit($options) {
    $form = '<strong>' . _MB_SYSTEM_SOCIAL_PROVIDER_SELECT . ':</strong><br /><br />';
    $form .= '<table width="100%">';

    foreach ($options as $i => $option) {
        $yesno = new icms_form_elements_Radioyn('', 'options[' . $i . ']', $option);
        $form .= '<tr><td width="25%">' . constant('_MB_SYSTEM_SOCIAL_PROVIDER_' . $i) . '</td><td>' . $yesno->render() . '</td></tr>';
    }
    $form .= '</table>';

    return $form;
}