break;
 case 'edit':
     xoops_cp_header();
     debaseradminMenu(_AM_DEBASER_MMIMETYPES);
     edit_mimetype($_GET['mime_id']);
     xoops_cp_footer();
     break;
 case 'main':
 default:
     global $xoopsUser, $xoopsDB, $xoopsModuleConfig;
     $start = isset($_GET['start']) ? intval($_GET['start']) : 0;
     $query = "\r\n\tSELECT * \r\n\tFROM " . $xoopsDB->prefix('debaser_mimetypes') . " \r\n\tORDER BY mime_name";
     $mime_array = $xoopsDB->query($query, 20, $start);
     $mime_num = $xoopsDB->getRowsNum($xoopsDB->query($query));
     xoops_cp_header();
     debaseradminMenu(_AM_DEBASER_MMIMETYPES);
     echo '<div style="float:left; width:100%">';
     echo "\r\n\t\t<fieldset><legend style='font-weight: bold; color: #900;'>" . _AM_DEBASER_MIME_MODIFYF . "</legend>\n\r\n\t\t<div style='padding: 8px;'>" . _AM_DEBASER_MIME_INFOTEXT . "</div>\n\r\n\t\t</fieldset>\n\r\n\t\t";
     edit_mimetype();
     echo "\r\n\t\t<div style='float:left; width:100%;'><fieldset><legend style='font-weight: bold; color: #900;'>" . _AM_DEBASER_MIME_ADMINF . "</legend>\n\r\n\t\t<div style='padding: 8px;'>" . _AM_DEBASER_MIME_ADMINFINFO . "</div>\n\r\n\t\t";
     $query = "\r\n\tSELECT mime_ext FROM " . $xoopsDB->prefix('debaser_mimetypes') . " \r\n\tWHERE mime_admin = 1 \r\n\tORDER by mime_ext";
     $result = $xoopsDB->query($query);
     $allowmimetypes = '';
     while ($mime_arr = $xoopsDB->fetchArray($result)) {
         $allowmimetypes .= $mime_arr['mime_ext'] . " | ";
     }
     if ($allowmimetypes) {
         echo "<div style='padding: 8px;'>" . $allowmimetypes . "</div>";
     } else {
         echo "<div style='padding: 8px;'>" . _AM_DEBASER_MIME_NOMIMEINFO . "</div>";
     }
function singleupload()
{
    require_once XOOPS_ROOT_PATH . '/class/template.php';
    if (!isset($xoopsTpl)) {
        $xoopsTpl = new XoopsTpl();
    }
    global $xoopsDB, $xoopsModuleConfig, $xoopsUser, $xoopsModule;
    $xoopsTpl->assign('uploadmax', $xoopsModuleConfig['debasermaxsize']);
    debaseradminMenu(4, _AM_DEBASER_SINGLEUP);
    echo "<br />";
    $fileform = new XoopsThemeForm(_MD_DEBASER_ADDMPEG, 'extfile', xoops_getenv('PHP_SELF'));
    if ($xoopsModuleConfig['debaserupsel'] == 1 || $xoopsModuleConfig['debaserupsel'] == 3) {
        $fileform->setExtra('enctype="multipart/form-data"');
    }
    $xfid = isset($_POST['xfid']) ? $_POST['xfid'] : 0;
    $member_handler =& xoops_gethandler('member');
    $group_list =& $member_handler->getGroupList();
    $gperm_handler =& xoops_gethandler('groupperm');
    $groups = $gperm_handler->getGroupIds('DebaserFilePerm', $xfid, $xoopsModule->getVar('mid'));
    $groups = $groups;
    if ($xoopsModuleConfig['usefileperm'] == 1) {
        $fileform->addElement(new XoopsFormSelectGroup(_AM_DEBASER_FCATEGORY_GROUPPROMPT, "groups", true, $groups, 5, true));
    }
    if ($xoopsModuleConfig['debaserupsel'] == 1 || $xoopsModuleConfig['debaserupsel'] == 3) {
        $fileform->addElement(new XoopsFormFile(_AM_DEBASER_FILE, 'mp3file', 0));
    }
    if ($xoopsModuleConfig['debaserupsel'] == 2 || $xoopsModuleConfig['debaserupsel'] == 3) {
        $formlink = new XoopsFormText(_MD_DEBASER_EXTLINK, 'link', 50, 255);
        $fileform->addElement($formlink);
    }
    $formtitle = new XoopsFormText(_MD_DEBASER_TITLE, 'title', 50, 100);
    $fileform->addElement($formtitle);
    //$formalbum = new XoopsFormText(_MD_DEBASER_ALBUM, 'album', 50, 50);
    //$fileform->addElement($formalbum);
    //$formyear = new XoopsFormText(_MD_DEBASER_YEAR, 'year', 4, 4);
    //$fileform->addElement($formyear);
    include_once XOOPS_ROOT_PATH . '/fck/fckeditor.php';
    $oFCKeditor = new FCKeditor('comment');
    $oFCKeditor->Value = '';
    $oFCKeditor->Height = '200';
    $fileform->addElement(new XoopsFormLabel(_MD_DEBASER_COMMENT, $oFCKeditor->CreateHTML()));
    //$formcomment = new XoopsFormDhtmlTextArea(_MD_DEBASER_COMMENT, 'comment', '', 10, 50);
    //$fileform->addElement($formcomment);
    if ($xoopsModuleConfig['autogenresingle'] != 1) {
        $mytreechose = new debaserTree($xoopsDB->prefix("debaser_genre"), 'genreid', 'subgenreid');
        ob_start();
        $mytreechose->debaserSelBox("genretitle", "genretitle", 0, 1, "genrefrom");
        $formgenre = new XoopsFormLabel(_MD_DEBASER_GENRE, ob_get_contents());
        ob_end_clean();
        $fileform->addElement($formgenre, true);
    }
    //$formtrack = new XoopsFormText(_MD_DEBASER_TRACK, 'track', 3, 3);
    //$fileform->addElement($formtrack);
    //$formartist = new XoopsFormText(_MD_DEBASER_TAMANHO, 'artist', 15, 50);
    //$fileform->addElement($formartist, true);
    $formalbum = new XoopsFormText(_MD_DEBASER_TAMANHO, 'album', 15, 50);
    $fileform->addElement($formalbum, true);
    $formlength = new XoopsFormText(_MD_DEBASER_LENGTH, 'length', 5, 5);
    $fileform->addElement($formlength, true);
    //$formbitrate = new XoopsFormText(_MD_DEBASER_BITRATE, 'bitrate', 3, 3);
    //$fileform->addElement($formbitrate);
    //$formfrequence = new XoopsFormText(_MD_DEBASER_FREQUENCY, 'frequence', 5, 5);
    //$fileform->addElement($formfrequence);
    $formweight = new XoopsFormText(_AM_DEBASER_WEIGHT, 'weight', 4, 4, 0);
    $fileform->addElement($formweight);
    $op_hidden = new XoopsFormHidden('op', 'extfile');
    $fileform->addElement($op_hidden);
    $submit_button = new XoopsFormButton("", "filesubmit", _SUBMIT, "button");
    $submit_button->setExtra("onclick=\"if(document.extfile.genrefrom.options[document.extfile.genrefrom.selectedIndex].value=='0') alert('Selecione categoria'); else submit();\"");
    $fileform->addElement($submit_button);
    $xoopsTpl->assign('extfileform', $fileform->render());
    $xoopsTpl->display('db:debaser_amupload.html');
}
function editgenre()
{
    require_once XOOPS_ROOT_PATH . '/class/template.php';
    if (!isset($xoopsTpl)) {
        $xoopsTpl = new XoopsTpl();
    }
    global $xoopsDB, $genrecat, $xoopsModuleConfig, $xoopsModule;
    $sql = "SELECT genreid, subgenreid, genretitle, imgurl, catweight FROM " . $xoopsDB->prefix('debaser_genre') . " WHERE genreid=" . intval($_GET['genreid']) . "";
    $result = $xoopsDB->query($sql);
    list($genreid, $subgenreid, $genretitle, $imgurl, $catweight) = $xoopsDB->fetchRow($result);
    $member_handler =& xoops_gethandler('member');
    $group_list =& $member_handler->getGroupList();
    $gperm_handler =& xoops_gethandler('groupperm');
    $groups = $gperm_handler->getGroupIds('DebaserCatPerm', $genreid, $xoopsModule->getVar('mid'));
    $groups = $groups;
    $edform = new XoopsThemeForm(_AM_DEBASER_EDITGENRE, "editgenre", "category.php");
    if ($xoopsModuleConfig['usecatperm'] == 1) {
        $edform->addElement(new XoopsFormSelectGroup(_AM_DEBASER_FCATEGORY_GROUPPROMPT, "groups", true, $groups, 5, true));
    }
    $formgenrename = new XoopsFormText(_AM_DEBASER_GENRE, "genrenew", 50, 50, $genretitle);
    if ($subgenreid == 0) {
        $graph_array =& XoopsLists::getFileListAsArray(XOOPS_ROOT_PATH . "/" . $xoopsModuleConfig['catimage']);
        $indeximage_select = new XoopsFormSelect('', 'imgurl', $imgurl);
        $indeximage_select->addOption('', '----------');
        $indeximage_select->addOptionArray($graph_array);
        $indeximage_select->setExtra("onchange='showImgSelected(\"image\", \"imgurl\", \"" . $xoopsModuleConfig['catimage'] . "\", \"\", \"" . XOOPS_URL . "\")'");
        $indeximage_tray = new XoopsFormElementTray(_AM_DEBASER_FCATEGORY_CIMAGE, '&nbsp;');
        $indeximage_tray->addElement($indeximage_select);
        if (!empty($imgurl)) {
            $indeximage_tray->addElement(new XoopsFormLabel('', "<br /><br /><img src='" . XOOPS_URL . "/" . $xoopsModuleConfig['catimage'] . "/" . $imgurl . "' name='image' id='image' alt='' />"));
        } else {
            $indeximage_tray->addElement(new XoopsFormLabel('', "<br /><br /><img src='" . XOOPS_URL . "/uploads/blank.gif' name='image' id='image' alt='' />"));
        }
    }
    $formgenreweight = new XoopsFormText(_AM_DEBASER_WEIGHT, 'catweight', 4, 4, $catweight);
    $op_hidden = new XoopsFormHidden("op", "editgenresave");
    $genreid_hidden = new XoopsFormHidden('genreid', $genreid);
    $genrecat_hidden = new XoopsFormHidden('genrecat', $genretitle);
    $submit_button = new XoopsFormButton("", "dbsubmit", _SUBMIT, "submit");
    $edform->addElement($formgenrename);
    $edform->addElement($indeximage_tray);
    $edform->addElement($formgenreweight);
    $edform->addElement($op_hidden);
    $edform->addElement($genreid_hidden);
    $edform->addElement($genrecat_hidden);
    $edform->addElement($submit_button);
    $xoopsTpl->assign('editgenre', $edform->render());
    $xoopsTpl->assign('genrecat', $genrecat);
    $xoopsTpl->assign('adminmenu', debaseradminMenu(2, _AM_DEBASER_EDITGENRE . ' : ' . $genretitle));
    $xoopsTpl->display('db:debaser_ameditgenre.html');
}
<?php

/**
 * $Id: permissions.php v 1.03 05 july 2004 Liquid Exp $
 * Module: WF-Downloads
 * Version: v2.0.4
 * Release Date: 11 july 2004
 * Author: WF-Sections
 * Licence: GNU
 */
include 'admin_header.php';
include_once XOOPS_ROOT_PATH . '/class/xoopsform/grouppermform.php';
include_once XOOPS_ROOT_PATH . '/modules/debaser/include/functions.php';
xoops_cp_header();
debaseradminMenu(_AM_DEBASER_PERM_MANAGEMENT);
if ($xoopsModuleConfig['usecatperm'] == 1) {
    echo "\r\n\t\t<div style='float: left; width:100%;'>\r\n\t\t<fieldset><legend style='font-weight: bold; color: #900;'>" . _AM_DEBASER_PERM_CPERMISSIONS . "</legend>\n\r\n\t\t<div style='padding: 2px;'>\n";
    $cat_form = new XoopsGroupPermForm('', $xoopsModule->getVar('mid'), 'DebaserCatPerm', _AM_DEBASER_PERM_CSELECTPERMISSIONS);
    $result = $xoopsDB->query("\r\n\tSELECT genreid, subgenreid, genretitle \r\n\tFROM " . $xoopsDB->prefix('debaser_genre'));
    if ($xoopsDB->getRowsNum($result)) {
        while ($cat_row = $xoopsDB->fetchArray($result)) {
            $cat_form->addItem($cat_row['genreid'], $cat_row['genretitle'], $cat_row['subgenreid']);
        }
        echo $cat_form->render();
    } else {
        echo "<div><strong>" . _AM_DEBASER_PERM_CNOCATEGORY . "</strong></div>";
    }
    echo "</div></fieldset></div><br />";
    unset($cat_form);
}
/*
function editplayer()
{
    require_once XOOPS_ROOT_PATH . '/class/template.php';
    if (!isset($xoopsTpl)) {
        $xoopsTpl = new XoopsTpl();
    }
    global $xoopsDB, $playertype, $myts;
    $result = $xoopsDB->query("\r\n\tSELECT name, html_code, height, width, autostart FROM " . $xoopsDB->prefix('debaser_player') . "\r\n\tWHERE name=" . $xoopsDB->quoteString($playertype) . " ");
    list($name, $html_code, $height, $width, $autostart) = $xoopsDB->fetchRow($result);
    $edform = new XoopsThemeForm(_AM_DEBASER_EDITPLAYER, "editplayerform", "index.php");
    $formplayername = new XoopsFormText(_AM_DEBASER_NAME, "namenew", 50, 50, $name);
    $formplayercode = new XoopsFormTextArea(_AM_DEBASER_CODE, 'playernew', $myts->htmlSpecialChars($html_code), 20, 50);
    $formplayerheight = new XoopsFormText(_AM_DEBASER_HEIGHT, 'playerheight', 4, 4, $height);
    $formplayerwidth = new XoopsFormText(_AM_DEBASER_WIDTH, 'playerwidth', 4, 4, $width);
    $formplayerautostart = new XoopsFormRadioYN(_AM_DEBASER_AUTOSTART, 'autostart', $autostart, _YES, _NO);
    $op_hidden = new XoopsFormHidden("op", "changeplayer");
    $name_hidden = new XoopsFormHidden('name', $name);
    $submit_button = new XoopsFormButton("", "dbsubmit", _SUBMIT, "submit");
    $edform->addElement($formplayername);
    $edform->addElement($formplayercode);
    $edform->addElement($formplayerheight);
    $edform->addElement($formplayerwidth);
    $edform->addElement($formplayerautostart);
    $edform->addElement($op_hidden);
    $edform->addElement($name_hidden);
    $edform->addElement($submit_button);
    $xoopsTpl->assign('adminmenu', debaseradminMenu(3, _AM_DEBASER_EDITPLAYER . ' : ' . $name));
    $xoopsTpl->assign('editplayer', $edform->render());
    $xoopsTpl->display('db:debaser_ameditplay.html');
}
/**
* $Id: admin/about.php v 1.5 23 August 2004 hsalazar Exp $
* Module: Wordbook
* Version: v 1.5
* Release Date:
* Author: hsalazar
* License: GNU
*/
include 'admin_header.php';
include_once XOOPS_ROOT_PATH . '/modules/debaser/include/functions.php';
$myts =& MyTextSanitizer::getInstance();
xoops_cp_header();
$module_handler =& xoops_gethandler('module');
$versioninfo =& $module_handler->get($xoopsModule->getVar('mid'));
debaseradminMenu(-1, _AM_DEBASER_ABOUT . " " . $versioninfo->getInfo('name'));
// Left headings...
echo "<img src='" . XOOPS_URL . "/modules/" . $xoopsModule->dirname() . "/" . $versioninfo->getInfo('image') . "' alt='' hspace='0' vspace='0' align='left' style='margin-right: 10px; '></a>";
echo "<div style='margin-top: 10px; color: #33538e; margin-bottom: 4px; font-size: 18px; line-height: 18px; font-weight: bold; display: block;'>" . $versioninfo->getInfo('name') . " version " . $versioninfo->getInfo('version') . "</div>";
if ($versioninfo->getInfo('author_realname') != '') {
    $author_name = $versioninfo->getInfo('author') . " (" . $versioninfo->getInfo('author_realname') . ")";
} else {
    $author_name = $versioninfo->getInfo('author');
}
echo "<div style='line-height:16px;font-weight:bold;display:block;'>" . _AM_DEBASER_BY . " " . $author_name . "</div>";
echo "<div style='line-height:16px;display:block;'>" . $versioninfo->getInfo('license') . "</div><br></>\n";
// Author information
echo "<table width='100%' cellspacing='1' cellpadding='3' border='0' class='outer'>";
echo "<tr>";
echo "<td colspan='2' class='bg3' align='left'><b>" . _MI_DEBASER_AUTHOR_INFO . "</b></td>";
echo "</tr>";
function IRnew()
{
    global $radioid, $xoopsDB;
    debaseradminMenu(1, _AM_DEBASERRAD_ADMIN . ' : ' . _AM_DEBASERRAD_NEW);
    echo "\r\n\t\t<div style='float:left; width:100%;'><table width='100%'>\r\n\t\t<tr>\r\n\t\t<td>";
    $nuform = new XoopsThemeForm(_AM_DEBASERRAD_NEW, "IRnew", "radioindex.php");
    $formradioname = new XoopsFormText(_AM_DEBASERRAD_NAME, "radioname", 50, 50);
    $formradiourl = new XoopsFormText(_AM_DEBASERRAD_URL, "radiourl", 50, 50, "http://");
    $formradiostream = new XoopsFormText(_AM_DEBASERRAD_STREAM, "radiostream", 50, 255, "http://");
    $formradiopict = new XoopsFormText(_AM_DEBASERRAD_PICT, "radiopicture", 50, 50);
    $op_hidden = new XoopsFormHidden("op", "IRadd");
    $submit_button = new XoopsFormButton("", "dbsubmit", _SUBMIT, "submit");
    $nuform->addElement($formradioname);
    $nuform->addElement($formradiourl);
    $nuform->addElement($formradiostream);
    $nuform->addElement($formradiopict);
    $nuform->addElement($op_hidden);
    $nuform->addElement($submit_button);
    $nuform->setRequired($formradioname);
    $nuform->setRequired($formradiostream);
    $nuform->display();
    echo "\r\n\t\t</td>\r\n\t\t</tr>\r\n\t\t</table>\r\n\t\t<br /><a href='http://www.radio-locator.com' target='_blank'>Open MIT Radio Locator</a><hr /></div>";
}