<?php

include_once('internal/Smarty.class.php');
$main_smarty = new Smarty;

include('config.php');
include(mnminclude.'html1.php');
include(mnminclude.'link.php');
include(mnminclude.'smartyvariables.php');

check_referrer();

force_authentication();

// restrict access to admins
$canIhaveAccess = 0;
$canIhaveAccess = $canIhaveAccess + checklevel('admin');
if($canIhaveAccess == 0){
    header("Location: " . getmyurl('login', $_SERVER['REQUEST_URI']));
    die();
}

function dowork(){
    $canIhaveAccess = 0;
    $canIhaveAccess = $canIhaveAccess + checklevel('admin');
    if($canIhaveAccess == 1)
    {
        if(is_writable('settings.php') == 0){
            die("Error: settings.php is not writeable.");
        }
        if(isset($_REQUEST['action'])){
            $action = $_REQUEST['action'];
        } else {
            $action = "view";
        }
        if($action == "view"){
            $config = new kliqqiconfig;
            if(isset($_REQUEST['page'])){
                $config->var_page = $_REQUEST['page'];
                $config->showpage();
            }
        }
        if($action == "save"){
            $config = new kliqqiconfig;
            $config->var_id = substr($_REQUEST['var_id'], 6, 10);
            $config->var_value = $_REQUEST['var_value'];
            $config->store();
        }
    }
}

// pagename
define('pagename', 'delete');
$main_smarty->assign('pagename', pagename);
if(isset($_REQUEST['link_id'])){
    global $db;
    $link_id = $_REQUEST['link_id'];
    if(!is_numeric($link_id)){die();}
    $linkres = new Link;
    $linkres->id = $link_id;
    $linkres->read();
    totals_adjust_count($linkres->status, -1);

    // module system hook
    $vars = array('link_id' => $linkres->id);
    check_actions('admin_story_delete', $vars);

    /*********find out the page slug dynamically ***********/
    $linkslugvalue =  $db->get_results("SELECT ".table_links.".link_category, ".table_categories.".category_safe_name FROM ".table_categories." LEFT JOIN ".table_links. " ON ".table_links.".link_category = ".table_categories.".category__auto_id WHERE ".table_links.".link_id = '".$link_id."' LIMIT 0,1");

    $linkslug = '';
    foreach($linkslugvalue as $slug)
        $linkslug = $slug->category_safe_name;

    $delete_referrer = $_SERVER["HTTP_REFERER"];

if ($URLMethod == 1) {
    $delete_referrer_no_query= strtok($_SERVER["HTTP_REFERER"],'?');
    if (strstr($delete_referrer, 'group_story.php')) {
        $redirectUrl = $delete_referrer;
    }elseif (strstr($delete_referrer, 'story.php')) {
        if ($linkres->status == 'new') {
            $redirectUrl = $my_base_url.$my_kliqqi_base . "/".$linkres->status.".php?category=$linkslug";
        }else{
            $redirectUrl = $my_base_url.$my_kliqqi_base . "/?category=$linkslug";
        }
    }else{
        $redirectUrl = $delete_referrer;
    }
}elseif ($URLMethod == 2) {
    /*Redwine: the first part of the below conditional stattement: strstr($delete_referrer, "story.php?title=".$linkres->title_url) is to account for when an Admin is discarding a story; the links are in url method 1 and having the link safe title instead of the link id!*/
    if (strstr($delete_referrer, "story.php?title=".$linkres->title_url) || strstr($delete_referrer, "/$linkslug/".$linkres->title_url)) {
        if ($linkres->status == 'new') {
            $redirectUrl = $my_base_url.$my_kliqqi_base . "/".$linkres->status."/$linkslug/";
        }else{
            $redirectUrl = $my_base_url.$my_kliqqi_base . "/$linkslug/";
        }
    }else{
        $redirectUrl = $delete_referrer;
    }
}

    $link_delete = $db->query(" Delete from ".table_links." where link_id =".$linkres->id);
    $vote_delete = $db->query(" Delete from ".table_votes." where vote_link_id =".$linkres->id);
    $comment_delete = $db->query(" Delete from ".table_comments." where comment_link_id =".$linkres->id);
    $tag_delete = $db->query(" Delete from ".table_tags." where tag_link_id =".$linkres->id);
    $saved_delete = $db->query(" Delete from ".table_saved_links." where saved_link_id =".$linkres->id);
    $trackback_delete = $db->query(" Delete from ".table_trackbacks." where trackback_link_id =".$linkres->id);

    $db->query("DELETE FROM ".table_additional_categories." WHERE ac_link_id =".$linkres->id);

    $db->query("DELETE FROM ".table_tag_cache);

    # Redwine - Sidebar tag cache fix
    $db->query($sql="INSERT INTO ".table_tag_cache." select tag_words, count(DISTINCT link_id) as count FROM ".table_tags.", ".table_links." WHERE tag_lang='en' and link_id = tag_link_id and (link_status='published' OR link_status='new') GROUP BY tag_words order by count desc");

    if ($_SERVER['HTTP_REFERER'] && strpos($_SERVER['HTTP_REFERER'], $my_base_url.$my_kliqqi_base)  !== false){
        header('Location: '.$redirectUrl);
    }else{
        header('Location: '.$my_base_url.$my_kliqqi_base);
    }
}


if(isset($_REQUEST['comment_id'])){

    global $db;
    $comment_id = $_REQUEST['comment_id'];
    if(!is_numeric($comment_id)){die();}
    $link_id = $db->get_var("SELECT comment_link_id FROM `" . table_comments . "` WHERE `comment_id` = $comment_id");

    $vars = array('comment_id' => $comment_id);
    check_actions('comment_deleted', $vars);

    $db->query('DELETE FROM `' . table_comments . '` WHERE `comment_id` = "'.$comment_id.'"');
    $comments = $db->get_results($sql="SELECT comment_id FROM " . table_comments . " WHERE `comment_parent` = '$comment_id'");
    if (!empty($comments)) {
        foreach($comments as $comment)
        {
            $vars = array('comment_id' => $comment->comment_id);
            check_actions('comment_deleted', $vars);
        }
    }
    $db->query('DELETE FROM `' . table_comments . '` WHERE `comment_parent` = "'.$comment_id.'"');
    $link = new Link;
    $link->id=$link_id;
    $link->read();
    $link->recalc_comments();
    $link->store();
    $link='';

    if ($_SERVER['HTTP_REFERER'] && strpos($_SERVER['HTTP_REFERER'], $my_base_url.$my_kliqqi_base)===0)
       header('Location: '.$_SERVER['HTTP_REFERER']);
    else
        header('Location: '.$redirectUrl);
}
?>