<?php
// ------------------------------------------------------------------------- //
//                XOOPS - PHP Content Management System                      //
//                       <http://www.xoops.org/>                             //
// ------------------------------------------------------------------------- //
// Based on:                                     //
// myPHPNUKE Web Portal System - http://myphpnuke.com/               //
// PHP-NUKE Web Portal System - http://phpnuke.org/              //
// Thatware - http://thatware.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.                                      //
//                                                                           //
//  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 //
// ------------------------------------------------------------------------- //
include '../../../include/cp_header.php';
if ( file_exists("../language/".$xoopsConfig['language']."/main.php") ) {
    include "../language/".$xoopsConfig['language']."/main.php";
} else {
    include "../language/english/main.php";
}
include '../include/functions.php';
include_once XOOPS_ROOT_PATH.'/class/xoopstree.php';
include_once XOOPS_ROOT_PATH."/class/xoopslists.php";
include_once XOOPS_ROOT_PATH."/include/xoopscodes.php";
include_once XOOPS_ROOT_PATH.'/class/module.errorhandler.php';
$myts =& MyTextSanitizer::getInstance();
$eh = new ErrorHandler;
$mytree = new XoopsTree($xoopsDB->prefix("mylinks_cat"),"cid","pid");

function mylinks()
{
    global $xoopsDB, $xoopsModule;
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
        echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
        ."<tr class=\"odd\"><td>";
    // Temporarily 'homeless' links (to be revised in admin.php breakup)
        $result = $xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_broken")."");
        list($totalbrokenlinks) = $xoopsDB->fetchRow($result);
    if($totalbrokenlinks>0){
        $totalbrokenlinks = "<span style='color: #ff0000; font-weight: bold'>$totalbrokenlinks</span>";
    }
        $result2 = $xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_mod")."");
        list($totalmodrequests) = $xoopsDB->fetchRow($result2);
    if($totalmodrequests>0){
        $totalmodrequests = "<span style='color: #ff0000; font-weight: bold'>$totalmodrequests</span>";
    }
    $result3 = $xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_links")." where status=0");
        list($totalnewlinks) = $xoopsDB->fetchRow($result3);
    if($totalnewlinks>0){
        $totalnewlinks = "<span style='color: #ff0000; font-weight: bold'>$totalnewlinks</span>";
    }
    echo " - <a href='".XOOPS_URL."/modules/system/admin.php?fct=preferences&amp;op=showmod&amp;mod=".$xoopsModule->getVar('mid')."'>"._MD_GENERALSET."</a>";
    echo "<br /><br />";
    echo " - <a href=index.php?op=linksConfigMenu>"._MD_ADDMODDELETE."</a>";
    echo "<br /><br />";
    echo " - <a href=index.php?op=listNewLinks>"._MD_LINKSWAITING." ($totalnewlinks)</a>";
    echo "<br /><br />";
    echo " - <a href=index.php?op=listBrokenLinks>"._MD_BROKENREPORTS." ($totalbrokenlinks)</a>";
    echo "<br /><br />";
    echo " - <a href=index.php?op=listModReq>"._MD_MODREQUESTS." ($totalmodrequests)</a>";
    $result=$xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_links")." where status>0");
    list($numrows) = $xoopsDB->fetchRow($result);
    echo "<br /><br /><div>";
    printf(_MD_THEREARE,$numrows);  echo "</div>";
    echo"</td></tr></table>";
    xoops_cp_footer();
}

function listNewLinks()
{
    global $xoopsDB, $xoopsConfig, $myts, $eh, $mytree;
    // List links waiting for validation
    $linkimg_array = XoopsLists::getImgListAsArray(XOOPS_ROOT_PATH."/modules/mylinks/images/shots/");
    $result = $xoopsDB->query("select lid, cid, title, url, logourl, submitter from ".$xoopsDB->prefix("mylinks_links")." where status=0 order by date DESC");
    $numrows = $xoopsDB->getRowsNum($result);
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
        echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
           ."<tr class=\"odd\"><td>";
    echo "<h4>"._MD_LINKSWAITING."&nbsp;($numrows)</h4><br />";
    if ( $numrows > 0 ) {
        while(list($lid, $cid, $title, $url, $logourl, $submitterid) = $xoopsDB->fetchRow($result)) {
            $result2 = $xoopsDB->query("select description from ".$xoopsDB->prefix("mylinks_text")." where lid=$lid");
            list($description) = $xoopsDB->fetchRow($result2);
            $title = $myts->makeTboxData4Edit($title);
            $url = $myts->makeTboxData4Edit($url);
            //      $url = urldecode($url);
            //      $logourl = $myts->makeTboxData4Edit($logourl);
            //      $logourl = urldecode($logourl);
            $description = $myts->makeTareaData4Edit($description);
            $submitter = XoopsUser::getUnameFromId($submitterid);
            echo "<form action=\"index.php\" method='post'>\n";
            echo "<table width=\"80%\">";
            echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_SUBMITTER."</td><td>\n";
            echo "<a href=\"".XOOPS_URL."/userinfo.php?uid=".$submitterid."\">$submitter</a>";
            echo "</td></tr>\n";
            echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_SITETITLE."</td><td>";
            echo "<input type=\"text\" name=\"title\" size=\"50\" maxlength=\"100\" value=\"$title\" />";
            echo "</td></tr><tr><td align=\"right\" nowrap=\"nowrap\">"._MD_SITEURL."</td><td>";
            echo "<input type=\"text\" name=\"url\" size=\"50\" maxlength=\"250\" value=\"$url\" />";
            echo "&nbsp;[&nbsp;<a href=\"".preg_replace("/javascript:/si", 'java script:', $url)."\" target=\"_blank\">"._MD_VISIT."</a>&nbsp;]";
            echo "</td></tr>";
            echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_CATEGORYC."</td><td>";
            $mytree->makeMySelBox("title", "title", $cid);
            echo "</td></tr>\n";
            echo "<tr><td align=\"right\" valign=\"top\" nowrap=\"nowrap\">"._MD_DESCRIPTIONC."</td><td>\n";
            echo "<textarea name='description' cols=\"60\" rows=\"5\">$description</textarea>\n";
            echo "</td></tr>\n";
            echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_SHOTIMAGE."</td><td>\n";
            //echo "<input type=\"text\" name=\"logourl\" size=\"50\" maxlength=\"60\">\n";
            echo "<select size='1' name='logourl'>";
            echo "<option value=' '>------</option>";
            foreach($linkimg_array as $image){
                echo "<option value='".$image."'>".$image."</option>";
            }
            echo "</select>";
            echo "</td></tr><tr><td></td><td>";
            $shotdir = "<b>".XOOPS_URL."/modules/mylinks/images/shots/</b>";
            printf(_MD_SHOTMUST,$shotdir);
            echo "</td></tr>\n";
            echo "</table>\n";
            echo "<br /><input type=\"hidden\" name=\"op\" value=\"approve\" />";
            echo "<input type=\"hidden\" name=\"lid\" value=\"$lid\" />";
            echo "<input type=\"submit\" value=\""._MD_APPROVE."\" /></form>\n";
            echo myTextForm("index.php?op=delNewLink&lid=$lid",_MD_DELETE);
            echo "<br /><br />";
        }
    } else {
        echo ""._MD_NOSUBMITTED."";
    }
    echo"</td></tr></table>";
    xoops_cp_footer();
}

function linksConfigMenu()
{
    global $xoopsDB,$xoopsConfig, $myts, $eh, $mytree;
    // Add a New Main Category
    xoops_cp_header();
    $linkimg_array = XoopsLists::getImgListAsArray(XOOPS_ROOT_PATH."/modules/mylinks/images/shots/");
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
    echo "<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
    echo "<form method='post' action='index.php'>\n";
        echo "<h4>"._MD_ADDMAIN."</h4><br />"._MD_TITLEC."<input type='text' name='title' size='30' maxlength='50' /><br />";
    echo ""._MD_IMGURL."<br /><input type=\"text\" name=\"imgurl\" size=\"100\" maxlength=\"150\" value=\"http://\" /><br /><br />";
    echo "<input type='hidden' name='cid' value='0' />\n";
    echo "<input type='hidden' name='op' value='addCat' />";
    echo "<input type='submit' value='"._MD_ADD."' /><br /></form>";
    echo"</td></tr></table>";
    echo "<br />";
    // Add a New Sub-Category
    $result=$xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_cat")."");
    list($numrows)=$xoopsDB->fetchRow($result);
    if ( $numrows > 0 ) {
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
        echo "<form method='post' action='index.php'>";
        echo "<h4>"._MD_ADDSUB."</h4><br />"._MD_TITLEC."<input type='text' name='title' size='30' maxlength='50' />&nbsp;"._MD_IN."&nbsp;";
        $mytree->makeMySelBox("title", "title");
        #       echo "<br />"._MD_IMGURL."<br /><input type=\"text\" name=\"imgurl\" size=\"100\" maxlength=\"150\">\n";
        echo "<input type='hidden' name='op' value='addCat' /><br /><br />";
        echo "<input type='submit' value='"._MD_ADD."' /><br /></form>";
        echo"</td></tr></table>";
        echo "<br />";
        // If there is a category, add a New Link

    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
        echo "<form method='post' action='index.php'>\n";
        echo "<h4>"._MD_ADDNEWLINK."</h4><br />\n";
        echo "<table width=\"80%\"><tr>\n";
        echo "<td align=\"right\">"._MD_SITETITLE."</td><td>";
        echo "<input type='text' name='title' size='50' maxlength='100' />";
        echo "</td></tr><tr><td align='right' nowrap='nowrap'>"._MD_SITEURL."</td><td>";
        echo "<input type='text' name='url' size='50' maxlength='250' value='http://' />";
        echo "</td></tr>";
        echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_CATEGORYC."</td><td>";
        $mytree->makeMySelBox("title", "title");
        echo "<tr><td align=\"right\" valign=\"top\" nowrap=\"nowrap\">"._MD_DESCRIPTIONC."</td><td>\n";
        xoopsCodeTarea("description",60,8);
        xoopsSmilies("description");
        //echo "<textarea name=description cols=60 rows=5></textarea>\n";
        echo "</td></tr>\n";
        echo "<tr><td align=\"right\" nowrap=\"nowrap\">"._MD_SHOTIMAGE."</td><td>\n";
        //echo "<input type=\"text\" name=\"logourl\" size=\"50\" maxlength=\"60\">";
        echo "<select size='1' name='logourl'>";
        echo "<option value=' '>------</option>";
        foreach($linkimg_array as $image){
            echo "<option value='".$image."'>".$image."</option>";
        }
        echo "</select>";
        echo "</td></tr>\n";
        $shotdir = "<b>".XOOPS_URL."/modules/mylinks/images/shots/</b>";
        echo "<tr><td></td><td>";
        printf(_MD_SHOTMUST,$shotdir);
        echo "</td></tr>\n";
        echo "</table>\n<br />";
        echo  "<input type=\"hidden\" name=\"op\" value=\"addLink\"></input>";
        echo "<input type=\"submit\" class=\"button\" value=\""._MD_ADD."\"></input>\n";
        echo "</form>";
        echo"</td></tr></table>";
        echo "<br />";

        // Modify Category
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
        echo "
        </center><form method='post' action='index.php'>
        <h4>"._MD_MODCAT."</h4><br />";
        echo _MD_CATEGORYC;
        $mytree->makeMySelBox("title", "title");
        echo "<br /><br />\n";
        echo "<input type='hidden' name='op' value='modCat' />\n";
        echo "<input type='submit' value='"._MD_MODIFY."' />\n";
        echo "</form>";
        echo"</td></tr></table>";
        echo "<br />";
    }
    // Modify Link
    $result2 = $xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_links")."");
    list($numrows2) = $xoopsDB->fetchRow($result2);
    if ( $numrows2 > 0 ) {
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
        echo "<form method='get' action=\"index.php\">\n";
        echo "<h4>"._MD_MODLINK."</h4><br />\n";
        echo _MD_LINKID."<input type='text' name='lid' size='12' maxlength='11' />\n";
        echo "<input type='hidden' name='fct' value='mylinks' />\n";
        echo "<input type='hidden' name='op' value='modLink' /><br /><br />\n";
        echo "<input type='submit' value='"._MD_MODIFY."' /></form>\n";
        echo"</td></tr></table>";
    }
    xoops_cp_footer();
}

function modLink()
{
    global $xoopsDB, $HTTP_GET_VARS, $myts, $eh, $mytree, $xoopsConfig;
    $linkimg_array = XoopsLists::getImgListAsArray(XOOPS_ROOT_PATH."/modules/mylinks/images/shots/");
    $lid = $HTTP_GET_VARS['lid'];
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
    $result = $xoopsDB->query("select cid, title, url, logourl from ".$xoopsDB->prefix("mylinks_links")." where lid=$lid") or $eh->show("0013");
    echo "<h4>"._MD_MODLINK."</h4><br />";
    list($cid, $title, $url, $logourl) = $xoopsDB->fetchRow($result);
    $title = $myts->makeTboxData4Edit($title);
    $url = $myts->makeTboxData4Edit($url);
    //      $url = urldecode($url);
    $logourl = $myts->makeTboxData4Edit($logourl);
    //      $logourl = urldecode($logourl);
    $result2 = $xoopsDB->query("select description from ".$xoopsDB->prefix("mylinks_text")." where lid=$lid");
    list($description)=$xoopsDB->fetchRow($result2);
    $GLOBALS['description'] = $myts->makeTareaData4Edit($description);
    echo "<table>";
    echo "<form method='post' action='index.php'>";
    echo "<tr><td>"._MD_LINKID."</td><td><b>$lid</b></td></tr>";
    echo "<tr><td>"._MD_SITETITLE."</td><td><input type='text' name='title' value=\"$title\" size='50' maxlength='100' /></td></tr>\n";
    echo "<tr><td>"._MD_SITEURL."</td><td><input type='text' name='url' value=\"$url\" size='50' maxlength='250' /></td></tr>\n";
    echo "<tr><td valign=\"top\">"._MD_DESCRIPTIONC."</td><td>";
    xoopsCodeTarea("description",60,8);
    xoopsSmilies("description");
    //echo "<textarea name=description cols=60 rows=5>$description</textarea>";
    echo "</td></tr>";
    echo "<tr><td>"._MD_CATEGORYC."</td><td>";
    $mytree->makeMySelBox("title", "title", $cid);
    echo "</td></tr>\n";
    echo "<tr><td>"._MD_SHOTIMAGE."</td><td>";
    //echo "<input type=text name=logourl value=\"$logourl\" size=\"50\" maxlength=\"60\"></input>
    echo "<select size='1' name='logourl'>";
    echo "<option value=' '>------</option>";
    foreach($linkimg_array as $image){
        if ( $image == $logourl ) {
            $opt_selected = "selected='selected'";
        }else{
            $opt_selected = "";
        }
        echo "<option value='".$image."' $opt_selected>".$image."</option>";
    }
    echo "</select>";
    echo "</td></tr>\n";
    $shotdir = "<b>".XOOPS_URL."/modules/mylinks/images/shots/</b>";
    echo "<tr><td></td><td>";
    printf(_MD_SHOTMUST,$shotdir);
    echo "</td></tr>\n";
    echo "</table>";
    echo "<br /><br /><input type='hidden' name='lid' value='$lid' />\n";
    echo "<input type='hidden' name='op' value='modLinkS' /><input type='submit' value='"._MD_MODIFY."' />";


    echo "</form>\n";

    echo "<table><tr><td>\n";
    echo myTextForm("index.php?op=delLink&lid=".$lid , _MD_DELETE);
    echo "</td><td>\n";
    echo myTextForm("index.php?op=linksConfigMenu", _MD_CANCEL);
    echo "</td></tr></table>\n";
    echo "<hr />";

    $result5=$xoopsDB->query("SELECT count(*) FROM ".$xoopsDB->prefix("mylinks_votedata")." WHERE lid = $lid");
    list($totalvotes) = $xoopsDB->fetchRow($result5);
    echo "<table width='100%'>\n";
    echo "<tr><td colspan='7'><b>";
    printf(_MD_TOTALVOTES,$totalvotes);
    echo "</b><br /><br /></td></tr>\n";
    // Show Registered Users Votes
    $result5=$xoopsDB->query("SELECT ratingid, ratinguser, rating, ratinghostname, ratingtimestamp FROM ".$xoopsDB->prefix("mylinks_votedata")." WHERE lid = $lid AND ratinguser >0 ORDER BY ratingtimestamp DESC");
    $votes = $xoopsDB->getRowsNum($result5);
    echo "<tr><td colspan='7'><br /><br /><b>";
    printf(_MD_USERTOTALVOTES,$votes);
    echo "</b><br /><br /></td></tr>\n";
    echo "<tr><td><b>" ._MD_USER."  </b></td><td><b>" ._MD_IP."  </b></td><td><b>" ._MD_RATING."  </b></td><td><b>" ._MD_USERAVG."  </b></td><td><b>" ._MD_TOTALRATE."  </b></td><td><b>" ._MD_DATE."  </b></td><td align=\"center\"><b>" ._MD_DELETE."</b></td></tr>\n";
    if ($votes == 0){
        echo "<tr><td align=\"center\" colspan=\"7\">" ._MD_NOREGVOTES."<br /></td></tr>\n";
    }
    $x=0;
    $colorswitch="dddddd";
    while(list($ratingid, $ratinguser, $rating, $ratinghostname, $ratingtimestamp)=$xoopsDB->fetchRow($result5)) {
        //  $ratingtimestamp = formatTimestamp($ratingtimestamp);
        //Individual user information
        $result2=$xoopsDB->query("SELECT rating FROM ".$xoopsDB->prefix("mylinks_votedata")." WHERE ratinguser = '$ratinguser'");
        $uservotes = $xoopsDB->getRowsNum($result2);
        $useravgrating = 0;
        while ( list($rating2) = $xoopsDB->fetchRow($result2) ) {
            $useravgrating = $useravgrating + $rating2;
        }
        $useravgrating = $useravgrating / $uservotes;
        $useravgrating = number_format($useravgrating, 1);
        $ratingusername = XoopsUser::getUnameFromId($ratinguser);
        echo "<tr><td bgcolor=\"".$colorswitch."\">".$ratingusername."</td><td bgcolor=\"$colorswitch\">".$ratinghostname."</td><td bgcolor=\"$colorswitch\">$rating</td><td bgcolor=\"$colorswitch\">".$useravgrating."</td><td bgcolor=\"$colorswitch\">".$uservotes."</td><td bgcolor=\"$colorswitch\">".$ratingtimestamp."</td><td bgcolor=\"$colorswitch\" align=\"center\"><b>".myTextForm("index.php?op=delVote&lid=$lid&rid=$ratingid", "X")."</b></td></tr>\n";
        $x++;
        if ( $colorswitch == "dddddd" ) {
            $colorswitch="ffffff";
        } else {
            $colorswitch="dddddd";
        }
    }
    // Show Unregistered Users Votes
    $result5=$xoopsDB->query("SELECT ratingid, rating, ratinghostname, ratingtimestamp FROM ".$xoopsDB->prefix("mylinks_votedata")." WHERE lid = $lid AND ratinguser = 0 ORDER BY ratingtimestamp DESC");
    $votes = $xoopsDB->getRowsNum($result5);
    echo "<tr><td colspan='7'><b><br /><br />";
    printf(_MD_ANONTOTALVOTES,$votes);
    echo "</b><br /><br /></td></tr>\n";
    echo "<tr><td colspan='2'><b>" ._MD_IP."  </b></td><td colspan='3'><b>" ._MD_RATING."  </b></td><td><b>" ._MD_DATE."  </b></b></td><td align=\"center\"><b>" ._MD_DELETE."</b></td><br /></tr>";
    if ( $votes == 0 ) {
        echo "<tr><td colspan=\"7\" align=\"center\">" ._MD_NOUNREGVOTES."<br /></td></tr>";
    }
    $x=0;
    $colorswitch="dddddd";
    while ( list($ratingid, $rating, $ratinghostname, $ratingtimestamp)=$xoopsDB->fetchRow($result5) ) {
        $formatted_date = formatTimestamp($ratingtimestamp);
        echo "<td colspan=\"2\" bgcolor=\"$colorswitch\">$ratinghostname</td><td colspan=\"3\" bgcolor=\"$colorswitch\">$rating</td><td bgcolor=\"$colorswitch\">$formatted_date</td><td bgcolor=\"$colorswitch\" aling=\"center\"><b>".myTextForm("index.php?op=delVote&lid=$lid&rid=$ratingid", "X")."</b></td></tr>";
        $x++;
        if ( $colorswitch == "dddddd" ) {
            $colorswitch="ffffff";
        } else {
            $colorswitch="dddddd";
        }
    }
    echo "<tr><td colspan=\"6\">&nbsp;<br /></td></tr>\n";
    echo "</table>\n";
    echo"</td></tr></table>";
    xoops_cp_footer();
}

function delVote()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh;
    $rid = $HTTP_GET_VARS['rid'];
    $lid = $HTTP_GET_VARS['lid'];
    $sql = sprintf("DELETE FROM %s WHERE ratingid = %u", $xoopsDB->prefix("mylinks_votedata"), $rid);
    $xoopsDB->query($sql) or $eh->show("0013");
    updaterating($lid);
    redirect_header("index.php",1,_MD_VOTEDELETED);
    exit();
}

function listBrokenLinks()
{
    global $xoopsDB, $eh;
    $result = $xoopsDB->query("select * from ".$xoopsDB->prefix("mylinks_broken")." group by lid order by reportid DESC");
    $totalbrokenlinks = $xoopsDB->getRowsNum($result);
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
    echo "<h4>"._MD_BROKENREPORTS." ($totalbrokenlinks)</h4><br />";

    if ( $totalbrokenlinks == 0 ) {
        echo _MD_NOBROKEN;
    } else {
        echo "<center>
        "._MD_IGNOREDESC."<br />
        "._MD_DELETEDESC."</center><br /><br /><br />";
        $colorswitch="dddddd";
        echo "<table align=\"center\" width=\"90%\">";
        echo "
        <tr>
        <td><b>Link Name</b></td>
        <td><b>" ._MD_REPORTER."</b></td>
        <td><b>" ._MD_LINKSUBMITTER."</b></td>
        <td><b>" ._MD_IGNORE."</b></td>
        <td><b>" ._EDIT."</b></td>
        <td><b>" ._MD_DELETE."</b></td>
        </tr>";
        while ( list($reportid, $lid, $sender, $ip)=$xoopsDB->fetchRow($result) ) {
            $result2 = $xoopsDB->query("select title, url, submitter from ".$xoopsDB->prefix("mylinks_links")." where lid=$lid");
            if ( $sender != 0 ) {
                $result3 = $xoopsDB->query("select uname, email from ".$xoopsDB->prefix("users")." where uid=$sender");
                list($uname, $email)=$xoopsDB->fetchRow($result3);
            }
            list($title, $url, $ownerid)=$xoopsDB->fetchRow($result2);
            //          $url=urldecode($url);
            $result4 = $xoopsDB->query("select uname, email from ".$xoopsDB->prefix("users")." where uid='$ownerid'");
            list($owner, $owneremail)=$xoopsDB->fetchRow($result4);
            echo "<tr><td bgcolor=$colorswitch><a href=$url target='_blank'>$title</a></td>";
            if ( $email=='' ) {
                echo "<td bgcolor=\"".$colorswitch."\">".$sender." (".$ip.")";
            } else {
                echo "<td bgcolor=\"".$colorswitch."\"><a href=\"mailto:".$email."\">".$uname."</a> (".$ip.")";
            }
            echo "</td>";
            if ( $owneremail == '' ) {
                echo "<td bgcolor=\"".$colorswitch."\">".$owner."";
            } else {
                echo "<td bgcolor=\"".$colorswitch."\"><a href=\"mailto:".$owneremail."\">".$owner."</a>";
            }

            echo "</td><td bgcolor='$colorswitch' align='center'>\n";
            echo myTextForm("index.php?op=ignoreBrokenLinks&lid=$lid" , "X");
            echo "</td><td bgcolor='$colorswitch' align='center'>\n";
            echo myTextForm("index.php?op=modLink&lid=$lid" , "X");
            echo "</td><td align='center' bgcolor='$colorswitch'>\n";
            echo myTextForm("index.php?op=delBrokenLinks&lid=$lid" , "X");
            echo "</td></tr>\n";

            if ( $colorswitch == "#dddddd" ) {
                $colorswitch="#ffffff";
            } else {
                $colorswitch="#dddddd";
            }
        }
        echo "</table>";
    }

    echo"</td></tr></table>";
    xoops_cp_footer();
}

function delBrokenLinks()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh;
    $lid = $HTTP_GET_VARS['lid'];
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_broken"), $lid);
    $xoopsDB->query($sql) or $eh->show("0013");
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $lid);
    $xoopsDB->query($sql) or $eh->show("0013");
    redirect_header("index.php",1,_MD_LINKDELETED);
    exit();
}

function ignoreBrokenLinks()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh;
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_broken"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    redirect_header("index.php",1,_MD_BROKENDELETED);
    exit();
}

function listModReq()
{
    global $xoopsDB, $myts, $eh, $mytree, $xoopsModuleConfig;
    $result = $xoopsDB->query("select requestid,lid,cid,title,url,logourl,description,modifysubmitter from ".$xoopsDB->prefix("mylinks_mod")." order by requestid");
    $totalmodrequests = $xoopsDB->getRowsNum($result);
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
    echo "<h4>"._MD_USERMODREQ." ($totalmodrequests)</h4><br />";
    if ( $totalmodrequests > 0 ) {
        echo "<table width='95%'><tr><td>";
        $lookup_lid = array();
        while ( list($requestid, $lid, $cid, $title, $url, $logourl, $description, $submitterid)=$xoopsDB->fetchRow($result) ) {
            $lookup_lid[$requestid] = $lid;
            $result2 = $xoopsDB->query("select cid, title, url, logourl, submitter from ".$xoopsDB->prefix("mylinks_links")." where lid=$lid");
            list($origcid, $origtitle, $origurl, $origlogourl, $ownerid)=$xoopsDB->fetchRow($result2);
            $result2 = $xoopsDB->query("select description from ".$xoopsDB->prefix("mylinks_text")." where lid=$lid");
            list($origdescription) = $xoopsDB->fetchRow($result2);
            $result7 = $xoopsDB->query("select uname, email from ".$xoopsDB->prefix("users")." where uid='$submitterid'");
            $result8 = $xoopsDB->query("select uname, email from ".$xoopsDB->prefix("users")." where uid='$ownerid'");
            $cidtitle=$mytree->getPathFromId($cid, "title");
            $origcidtitle=$mytree->getPathFromId($origcid, "title");
            list($submitter, $submitteremail)=$xoopsDB->fetchRow($result7);
            list($owner, $owneremail)=$xoopsDB->fetchRow($result8);
            $title = $myts->makeTboxData4Show($title);
            $url = $myts->makeTboxData4Show($url);
            //          $url = urldecode($url);

            // use original image file to prevent users from changing screen shots file
            $origlogourl = $myts->makeTboxData4Show($origlogourl);
            $logourl = $origlogourl;

            //          $logourl = urldecode($logourl);
            $description = $myts->makeTareaData4Show($description, 0);
            $origurl = $myts->makeTboxData4Show($origurl);
            //          $origurl = urldecode($origurl);
            //          $origlogourl = urldecode($origlogourl);
            $origdescription = $myts->makeTareaData4Show($origdescription, 0);
            if ( $owner == "" ) {
                $owner="administration";
            }
            echo "<table border='1' bordercolor='black' cellpadding='5' cellspacing='0' align='center' width='450'><tr><td>
            <table width='100%' bgcolor='#dddddd'>
            <tr>
            <td valign='top' width='45%'><b>"._MD_ORIGINAL."</b></td>
            <td rowspan='14' valign='top' align='left'><small><br />"._MD_DESCRIPTIONC."<br />$origdescription</small></td>
            </tr>
            <tr><td valign='top' width='45%'><small>"._MD_SITETITLE."$origtitle</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_SITEURL."".$origurl."</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_CATEGORYC."$origcidtitle</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_SHOTIMAGE."</small>";
            if ( $xoopsModuleConfig['useshots'] && !empty($origlogourl) ) {
                echo "<img src=\"".XOOPS_URL."/modules/mylinks/images/shots/".$origlogourl."\" width=\"".$xoopsModuleConfig['shotwidth']."\" />";
            } else {
                echo "&nbsp;";
            }
            echo "</td></tr>
            </table></td></tr><tr><td>
            <table width=100%>
            <tr>
            <td valign='top' width='45%'><b>"._MD_PROPOSED."</b></td>
            <td rowspan='14' valign='top' align='left'><small><br />"._MD_DESCRIPTIONC."<br />$description</small></td>
            </tr>
            <tr><td valign='top' width='45%'><small>"._MD_SITETITLE."$title</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_SITEURL."".$url."</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_CATEGORYC."$cidtitle</small></td></tr>
            <tr><td valign='top' width='45%'><small>"._MD_SHOTIMAGE."</small>";
            if ( $xoopsModuleConfig['useshots'] == 1 && !empty($logourl) ) {
                echo "<img src=\"".XOOPS_URL."/modules/mylinks/images/shots/".$logourl."\" width=\"".$xoopsModuleConfig['shotwidth']."\" alt=\"/\" />";
            } else {
                echo "&nbsp;";
            }
            echo "</td></tr>
            </table></td></tr></table>
            <table align='center' width='450'>
            <tr>";
            if ( $submitteremail == "" ) {
                echo "<td align='left'><small>"._MD_SUBMITTER."$submitter</small></td>";
            } else {
                echo "<td align='left'><small>"._MD_SUBMITTER."<a href=mailto:".$submitteremail.">".$submitter."</a></small></td>";
            }
            if ( $owneremail == "" ) {
                echo "<td align='center'><small>"._MD_OWNER."".$owner."</small></td>";
            } else {
                echo "<td align='center'><small>"._MD_OWNER."<a href=mailto:".$owneremail.">".$owner."</a></small></td>";
            }
            echo "<td align='right'><small>\n";
            echo "<table><tr><td>\n";
            echo myTextForm("index.php?op=changeModReq&requestid=$requestid" , _MD_APPROVE);
            echo "</td><td>\n";
            echo myTextForm("index.php?op=modLink&lid=$lookup_lid[$requestid]", _EDIT);
            echo "</td><td>\n";
            echo myTextForm("index.php?op=ignoreModReq&requestid=$requestid", _MD_IGNORE);
            echo "</td></tr></table>\n";
            echo "</small></td></tr>\n";
            echo "</table><br /><br />";
        }
        echo "</td></tr></table>";
    } else {
        echo _MD_NOMODREQ;
    }
    echo"</td></tr></table>";
    xoops_cp_footer();
}

function changeModReq()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh, $myts;
    $requestid = $HTTP_GET_VARS['requestid'];
    $query = "select lid, cid, title, url, logourl, description from ".$xoopsDB->prefix("mylinks_mod")." where requestid=".$requestid."";
    $result = $xoopsDB->query($query);
    while ( list($lid, $cid, $title, $url, $logourl, $description)=$xoopsDB->fetchRow($result) ) {
        if ( get_magic_quotes_runtime() ) {
            $title = stripslashes($title);
            $url = stripslashes($url);
            $logourl = stripslashes($logourl);
            $description = stripslashes($description);
        }
        $title = addslashes($title);
        $url = addslashes($url);
        $logourl = addslashes($logourl);
        $description = addslashes($description);
        $sql= sprintf("UPDATE %s SET cid = %u, title = '%s', url = '%s', logourl = '%s', status = 2, date = %u WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $cid, $title, $url, $logourl, time(), $lid);
        $xoopsDB->query($sql) or $eh->show("0013");
        $sql = sprintf("UPDATE %s SET description = '%s' WHERE lid = %u", $xoopsDB->prefix("mylinks_text"), $description, $lid);
        $xoopsDB->query($sql) or $eh->show("0013");
        $sql = sprintf("DELETE FROM %s WHERE requestid = %u", $xoopsDB->prefix("mylinks_mod"), $requestid);
        $xoopsDB->query($sql) or $eh->show("0013");
    }
    redirect_header("index.php",1,_MD_DBUPDATED);
    exit();
}

function ignoreModReq()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh;
    $sql = sprintf("DELETE FROM %s WHERE requestid = %u", $xoopsDB->prefix("mylinks_mod"), $HTTP_GET_VARS['requestid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    redirect_header("index.php",1,_MD_MODREQDELETED);
    exit();
}

function modLinkS()
{
    global $xoopsDB, $HTTP_POST_VARS, $myts, $eh;
    $cid = $HTTP_POST_VARS["cid"];
    if ( ($HTTP_POST_VARS["url"]) || ($HTTP_POST_VARS["url"]!="") ) {
        //      $url = $myts->formatURL($HTTP_POST_VARS["url"]);
        //      $url = urlencode($url);
        $url = $myts->makeTboxData4Save($HTTP_POST_VARS["url"]);
    }
    $logourl = $myts->makeTboxData4Save($HTTP_POST_VARS["logourl"]);
    $title = $myts->makeTboxData4Save($HTTP_POST_VARS["title"]);

    $description = $myts->makeTareaData4Save($HTTP_POST_VARS["description"]);
    $xoopsDB->query("update ".$xoopsDB->prefix("mylinks_links")." set cid='$cid', title='$title', url='$url', logourl='$logourl', status=2, date=".time()." where lid=".$HTTP_POST_VARS['lid']."")  or $eh->show("0013");
    $xoopsDB->query("update ".$xoopsDB->prefix("mylinks_text")." set description='$description' where lid=".$HTTP_POST_VARS['lid']."")  or $eh->show("0013");
    redirect_header("index.php",1,_MD_DBUPDATED);
    exit();
}

function delLink()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh, $xoopsModule;
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_text"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_votedata"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    // delete comments
    xoops_comment_delete($xoopsModule->getVar('mid'), $HTTP_GET_VARS['lid']);
    // delete notifications
    xoops_notification_deletebyitem ($xoopsModule->getVar('mid'), 'link', $HTTP_GET_VARS['lid']);

    redirect_header("index.php",1,_MD_LINKDELETED);
    exit();
}

function modCat()
{
    global $xoopsDB, $HTTP_POST_VARS, $myts, $eh, $mytree;
    $cid = $HTTP_POST_VARS["cid"];
    xoops_cp_header();
    echo "<h4>"._MD_WEBLINKSCONF."</h4>";
    echo"<table width='100%' border='0' cellspacing='1' class='outer'>"
    ."<tr class=\"odd\"><td>";
    echo "<h4>"._MD_MODCAT."</h4><br />";
    $result=$xoopsDB->query("select pid, title, imgurl from ".$xoopsDB->prefix("mylinks_cat")." where cid=$cid");
    list($pid,$title,$imgurl) = $xoopsDB->fetchRow($result);
    $title = $myts->makeTboxData4Edit($title);
    $imgurl = $myts->makeTboxData4Edit($imgurl);
    echo "<form action='index.php' method='post'>"._MD_TITLEC."<input type='text' name='title' value='$title' size='51' maxlength='50' /><br /><br />"._MD_IMGURLMAIN."<br /><input type='text' name='imgurl' value='$imgurl' size='100' maxlength='150' /><br /><br />";
    echo _MD_PARENT."&nbsp;";
    $mytree->makeMySelBox("title", "title", $pid, 1, "pid");
    //  <input type=hidden name=pid value=\"$pid\">
    echo "<br /><input type='hidden' name='cid' value='".$cid."' />
    <input type=\"hidden\" name=\"op\" value=\"modCatS\" /><br />
    <input type=\"submit\" value=\""._MD_SAVE."\" />
    <input type=\"button\" value=\""._MD_DELETE."\" onClick=\"location='index.php?pid=$pid&amp;cid=$cid&amp;op=delCat'\" />";
    echo "&nbsp;<input type=\"button\" value=\""._MD_CANCEL."\" onclick=\"javascript:history.go(-1)\ /\" />";
    echo "</form>";
    echo"</td></tr></table>";
    xoops_cp_footer();
}

function modCatS()
{
    global $xoopsDB, $HTTP_POST_VARS, $myts, $eh;
    $cid =  $HTTP_POST_VARS['cid'];
    $pid =  $HTTP_POST_VARS['pid'];
    $title =  $myts->makeTboxData4Save($HTTP_POST_VARS['title']);
    if (empty($title)) {
        redirect_header("index.php", 2, _MD_ERRORTITLE);
    }
    if ( ($HTTP_POST_VARS["imgurl"]) || ($HTTP_POST_VARS["imgurl"]!="") ) {
        $imgurl = $myts->makeTboxData4Save($HTTP_POST_VARS["imgurl"]);
    }
    $xoopsDB->query("update ".$xoopsDB->prefix("mylinks_cat")." set pid=$pid, title='$title', imgurl='$imgurl' where cid=$cid") or $eh->show("0013");
    redirect_header("index.php",1,_MD_DBUPDATED);
}

function delCat()
{
    global $xoopsDB, $HTTP_GET_VARS, $HTTP_POST_VARS, $eh, $mytree, $xoopsModule;
    $cid =  isset($HTTP_POST_VARS['cid']) ? intval($HTTP_POST_VARS['cid']) : intval($HTTP_GET_VARS['cid']);
    $ok =  isset($HTTP_POST_VARS['ok']) ? intval($HTTP_POST_VARS['ok']) : 0;
    if ( $ok == 1 ) {
        //get all subcategories under the specified category
        $arr=$mytree->getAllChildId($cid);
        $dcount=count($arr);
        for ( $i=0;$i<$dcount;$i++ ) {
            //get all links in each subcategory
            $result=$xoopsDB->query("select lid from ".$xoopsDB->prefix("mylinks_links")." where cid=".$arr[$i]."") or $eh->show("0013");
            //now for each link, delete the text data and vote ata associated with the link
            while ( list($lid)=$xoopsDB->fetchRow($result) ) {
                $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_text"), $lid);
                $xoopsDB->query($sql) or $eh->show("0013");
                $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_votedata"), $lid);
                $xoopsDB->query($sql) or $eh->show("0013");
                $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $lid);
                $xoopsDB->query($sql) or $eh->show("0013");
                xoops_comment_delete($xoopsModule->getVar('mid'), $lid);
                xoops_notification_deletebyitem($xoopsModule->getVar('mid'), 'link', $lid);
            }
            xoops_notification_deletebyitem($xoopsModule->getVar('mid'), 'category', $arr[$i]);

            //all links for each subcategory is deleted, now delete the subcategory data
            $sql = sprintf("DELETE FROM %s WHERE cid = %u", $xoopsDB->prefix("mylinks_cat"), $arr[$i]);
            $xoopsDB->query($sql) or $eh->show("0013");
        }
        //all subcategory and associated data are deleted, now delete category data and its associated data
        $result=$xoopsDB->query("select lid from ".$xoopsDB->prefix("mylinks_links")." where cid=".$cid."") or $eh->show("0013");
        while ( list($lid)=$xoopsDB->fetchRow($result) ) {
            $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $lid);
            $xoopsDB->query($sql) or $eh->show("0013");
            $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_text"), $lid);
            $xoopsDB->query($sql) or $eh->show("0013");
            $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_votedata"), $lid);
            $xoopsDB->query($sql) or $eh->show("0013");
            // delete comments
            xoops_comment_delete($xoopsModule->getVar('mid'), $lid);
            // delete notifications
            xoops_notification_deletebyitem($xoopsModule->getVar('mid'), 'link', $lid);
        }
        $sql = sprintf("DELETE FROM %s WHERE cid = %u", $xoopsDB->prefix("mylinks_cat"), $cid);
        $xoopsDB->query($sql) or $eh->show("0013");
        xoops_notification_deletebyitem($xoopsModule->getVar('mid'), 'category', $cid);
        redirect_header("index.php",1,_MD_CATDELETED);
        exit();
    } else {
        xoops_cp_header();
        xoops_confirm(array('op' => 'delCat', 'cid' => $cid, 'ok' => 1), 'index.php', _MD_WARNING);
        xoops_cp_footer();
    }
}

function delNewLink()
{
    global $xoopsDB, $HTTP_GET_VARS, $eh, $xoopsModule;
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_links"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    $sql = sprintf("DELETE FROM %s WHERE lid = %u", $xoopsDB->prefix("mylinks_text"), $HTTP_GET_VARS['lid']);
    $xoopsDB->query($sql) or $eh->show("0013");
    // delete comments
    xoops_comment_delete($xoopsModule->getVar('mid'), $HTTP_GET_VARS['lid']);
    // delete notifications
    xoops_notification_deletebyitem($xoopsModule->getVar('mid'), 'link', $HTTP_GET_VARS['lid']);
    redirect_header("index.php",1,_MD_LINKDELETED);
}

function addCat()
{
    global $xoopsDB, $HTTP_POST_VARS, $myts, $eh;
    $pid = $HTTP_POST_VARS["cid"];
    $title = $myts->makeTboxData4Save($HTTP_POST_VARS["title"]);
    if (empty($title)) {
        redirect_header("index.php",2,_MD_ERRORTITLE);
        exit();
    }
    if ( ($HTTP_POST_VARS["imgurl"]) || ($HTTP_POST_VARS["imgurl"]!="") ) {
        //      $imgurl = $myts->formatURL($HTTP_POST_VARS["imgurl"]);
        //      $imgurl = urlencode($imgurl);
        $imgurl = $myts->makeTboxData4Save($HTTP_POST_VARS["imgurl"]);
    }
    $newid = $xoopsDB->genId($xoopsDB->prefix("mylinks_cat")."_cid_seq");
    $sql = sprintf("INSERT INTO %s (cid, pid, title, imgurl) VALUES (%u, %u, '%s', '%s')", $xoopsDB->prefix("mylinks_cat"), $newid, $pid, $title, $imgurl);
    $xoopsDB->query($sql) or $eh->show("0013");
    if ($newid == 0) {
        $newid = $xoopsDB->getInsertId();
    }
    global $xoopsModule;
    $tags = array();
    $tags['CATEGORY_NAME'] = $title;
    $tags['CATEGORY_URL'] = XOOPS_URL . '/modules/' . $xoopsModule->getVar('dirname') . '/viewcat.php?cid=' . $newid;
    $notification_handler =& xoops_gethandler('notification');
    $notification_handler->triggerEvent('global', 0, 'new_category', $tags);
    redirect_header("index.php",1,_MD_NEWCATADDED);
}

function addLink()
{
    global $xoopsConfig, $xoopsDB, $myts, $xoopsUser, $xoopsModule, $eh, $HTTP_POST_VARS;
    if ( ($HTTP_POST_VARS["url"]) || ($HTTP_POST_VARS["url"]!="") ) {
        //  $url=$myts->formatURL($HTTP_POST_VARS["url"]);
        //      $url = urlencode($url);
        $url = $myts->makeTboxData4Save($HTTP_POST_VARS["url"]);
    }
    $logourl = $myts->makeTboxData4Save($HTTP_POST_VARS["logourl"]);
    $title = $myts->makeTboxData4Save($HTTP_POST_VARS["title"]);
    $description = $myts->makeTareaData4Save($HTTP_POST_VARS["description"]);
    $submitter = $xoopsUser->uid();
    $result = $xoopsDB->query("select count(*) from ".$xoopsDB->prefix("mylinks_links")." where url='$url'");
    list($numrows) = $xoopsDB->fetchRow($result);
    $errormsg = "";
    $error = 0;
    if ( $numrows > 0 ) {
        $errormsg .= "<h4 style='color: #ff0000'>";
        $errormsg .= _MD_ERROREXIST."</h4>";
        $error = 1;
    }
    // Check if Title exist
    if ( $title == "" ) {
        $errormsg .= "<h4 style='color: #ff0000'>";
        $errormsg .= _MD_ERRORTITLE."</h4>";
        $error =1;
    }

    // Check if Description exist
    if ( $description == "" ) {
        $errormsg .= "<h4 style='color: #ff0000'>";
        $errormsg .= _MD_ERRORDESC."</h4>";
        $error =1;
    }
    if ( $error == 1 ) {
        xoops_cp_header();
        echo $errormsg;
        xoops_cp_footer();
        exit();
    }
    if ( !empty($HTTP_POST_VARS['cid']) ) {
        $cid = $HTTP_POST_VARS['cid'];
    } else {
        $cid = 0;
    }
    $newid = $xoopsDB->genId($xoopsDB->prefix("mylinks_links")."_lid_seq");
    $sql = sprintf("INSERT INTO %s (lid, cid, title, url, logourl, submitter, status, date, hits, rating, votes, comments) VALUES (%u, %u, '%s', '%s', '%s', %u, %u, %u, %u, %u, %u, %u)", $xoopsDB->prefix("mylinks_links"), $newid, $cid, $title, $url, $logourl, $submitter, 1, time(), 0, 0, 0, 0);
    $xoopsDB->query($sql) or $eh->show("0013");
    if ( $newid == 0 ) {
        $newid = $xoopsDB->getInsertId();
    }
    $sql = sprintf("INSERT INTO %s (lid, description) VALUES (%u, '%s')", $xoopsDB->prefix("mylinks_text"), $newid, $description);
    $xoopsDB->query($sql) or $eh->show("0013");
    $tags = array();
    $tags['LINK_NAME'] = $title;
    $tags['LINK_URL'] = XOOPS_URL . '/modules/'. $xoopsModule->getVar('dirname') . '/singlelink.php?cid=' . $cid . '&amp;lid=' . $newid;
    $sql = "SELECT title FROM " . $xoopsDB->prefix("mylinks_cat") . " WHERE cid=" . $cid;
    $result = $xoopsDB->query($sql);
    $row = $xoopsDB->fetchArray($result);
    $tags['CATEGORY_NAME'] = $row['title'];
    $tags['CATEGORY_URL'] = XOOPS_URL . '/modules/' . $xoopsModule->getVar('dirname') . '/viewcat.php?cid=' . $cid;
    $notification_handler =& xoops_gethandler('notification');
    $notification_handler->triggerEvent('global', 0, 'new_link', $tags);
    $notification_handler->triggerEvent('category', $cid, 'new_link', $tags);
    redirect_header("index.php?op=linksConfigMenu",1,_MD_NEWLINKADDED);
}

function approve()
{
    global $xoopsConfig, $xoopsDB, $HTTP_POST_VARS, $myts, $eh;
    $lid = $HTTP_POST_VARS['lid'];
    $title = $HTTP_POST_VARS['title'];
    $cid = $HTTP_POST_VARS['cid'];
    if ( empty($cid) ) {
        $cid = 0;
    }
    $description = $HTTP_POST_VARS['description'];
    if (($HTTP_POST_VARS["url"]) || ($HTTP_POST_VARS["url"]!="")) {
        //      $url=$myts->formatURL($HTTP_POST_VARS["url"]);
        //      $url = urlencode($url);
        $url = $myts->makeTboxData4Save($HTTP_POST_VARS["url"]);
    }
    $logourl = $myts->makeTboxData4Save($HTTP_POST_VARS["logourl"]);
    $title = $myts->makeTboxData4Save($title);
    $description = $myts->makeTareaData4Save($description);
    $query = "update ".$xoopsDB->prefix("mylinks_links")." set cid='$cid', title='$title', url='$url', logourl='$logourl', status=1, date=".time()." where lid=".$lid."";
    $xoopsDB->query($query) or $eh->show("0013");
    $query = "update ".$xoopsDB->prefix("mylinks_text")." set description='$description' where lid=".$lid."";
    $xoopsDB->query($query) or $eh->show("0013");
    global $xoopsModule;
    $tags=array();
    $tags['LINK_NAME'] = $title;
    $tags['LINK_URL'] = XOOPS_URL . '/modules/'. $xoopsModule->getVar('dirname') . '/singlelink.php?cid=' . $cid . '&amp;lid=' . $lid;
    $sql = "SELECT title FROM " . $xoopsDB->prefix("mylinks_cat") . " WHERE cid=" . $cid;
    $result = $xoopsDB->query($sql);
    $row = $xoopsDB->fetchArray($result);
    $tags['CATEGORY_NAME'] = $row['title'];
    $tags['CATEGORY_URL'] = XOOPS_URL . '/modules/' . $xoopsModule->getVar('dirname') . '/viewcat.php?cid=' . $cid;
    $notification_handler =& xoops_gethandler('notification');
    $notification_handler->triggerEvent('global', 0, 'new_link', $tags);
    $notification_handler->triggerEvent('category', $cid, 'new_link', $tags);
    $notification_handler->triggerEvent('link', $lid, 'approve', $tags);
    redirect_header("index.php",1,_MD_NEWLINKADDED);
}
if(!isset($HTTP_POST_VARS['op'])) {
    $op = isset($HTTP_GET_VARS['op']) ? $HTTP_GET_VARS['op'] : 'main';
} else {
    $op = $HTTP_POST_VARS['op'];
}
switch ($op) {
case "delNewLink":
    delNewLink();
    break;
case "approve":
    approve();
    break;
case "addCat":
    addCat();
    break;
case "addLink":
    addLink();
    break;
case "listBrokenLinks":
    listBrokenLinks();
    break;
case "delBrokenLinks":
    delBrokenLinks();
    break;
case "ignoreBrokenLinks":
    ignoreBrokenLinks();
    break;
case "listModReq":
    listModReq();
    break;
case "changeModReq":
    changeModReq();
    break;
case "ignoreModReq":
    ignoreModReq();
    break;
case "delCat":
    delCat();
    break;
case "modCat":
    modCat();
    break;
case "modCatS":
    modCatS();
    break;
case "modLink":
    modLink();
    break;
case "modLinkS":
    modLinkS();
    break;
case "delLink":
    delLink();
    break;
case "delVote":
    delVote();
    break;
case "linksConfigMenu":
    linksConfigMenu();
    break;
case "listNewLinks":
    listNewLinks();
    break;
case 'main':
default:
    mylinks();
    break;
}
?>
