<?php
$ro_perm = $objSession->HasSystemPermission("SYSTEM_ACCESS.READONLY");

// Session expiration related

require_login( !admin_login() && $Action, 'expired=1', true );

// End session exipration related

	switch($Action)
	{
     	case "m_cat_delete":
            if($ro_perm) break;
     		if(isset($CatDeleteList))
            {
                $objLinkLink->BasePermission="";
                $CatList = $CatDeleteList;
                if(is_array($CatList))
                {
                    for($i=0;$i<count($CatList);$i++)
                    {
                        $c = $CatList[$i];
                        $objLinkList->ClearCategoryItems($c,"CategoryItems");
                    }
                }
                else
                {
                    if(is_numeric($CatList))
                    {
                        $objLinkList->ClearCategoryItems($CatList,"CategoryItems");
                    }
                }
                $objLinkLink->BasePermission="LINK";
                if(!is_array($CatList)) $CatList=Array($CatList);
                UpdateCategoryCount("Link",$CatList, $objLinkList->GetListTypes() );
            }
        break;
        case "m_paste": /* category paste */
        	if($ro_perm) break;
             if($PastedCatIds)
             {
                 $objLinkLink->BasePermission="";
                 $cache_cat_ids=Array();
                 foreach($PastedCatIds as $SourceCat => $DestCat) // for each pasted category paste links in it
                 {
                    $cache_cat_ids[$SourceCat]=1;
                    $cache_cat_ids[$DestCat]=1;
                 	$objLinkList->Clear();
                     $objLinkList->Query_Link(GetTablePrefix()."CategoryItems.CategoryId=$SourceCat"); // get cat links
                     if($objLinkList->NumItems()>0)
                     {
                         foreach($objLinkList->Items as $item)
                         {
                             /* fields from categoryitems table */
                             $item->UnsetField("CategoryId");
                             $item->UnsetField("ItemResourceId");
                             $item->UnsetField("PrimaryCat");
                             $item->UnsetField("CachedNavBar");                             
                             $item->CopyToNewResource($DestCat);
                             $item->AddToCategory($DestCat);
                         }
                     }
                 }
                 $objLinkLink->BasePermission="LINK";
                 UpdateCategoryCount("Link", array_keys($cache_cat_ids), $objLinkList->GetListTypes());
             }
        break;

		// Used from JS
		case "link_paste":
			if($ro_perm) break;
			if($objLinkList->ItemsOnClipboard()>0)
			{
			  $objLinkList->PasteFromClipboard($objCatList->CurrentCategoryID(),"Name");
			  UpdateCategoryCount('Link', 0);
			}		   
			break; 
	 	
        case "l_add_category":
             $objEditItems = new clsLinkList();
             $objEditItems->SourceTable = $objSession->GetEditTable("Link");
             $r = $_POST["ResourceId"];
             $l = $objEditItems->GetItemByField("ResourceId",$_POST["ResourceId"]);
             if(is_object($l))
             {
                 $table = $objSession->GetEditTable("CategoryItems");
                 $CatList = explode(",",$_POST["CatList"]);  
                 
                 // Get List of currect categories link is in
                 $link_cats = $l->CategoryMemberList($table);
                 $link_cats_arr = explode(",", $link_cats);  
                 $objSession->SetVariable("HasChanges", 1);
                 if (count($CatList))
                 {             
	                 for($i=0;$i<count($CatList);$i++)
	                 {
	                    if($CatList[$i])
	                    {                    
	                      $c = $objCatList->GetByResource($CatList[$i]);
	                      $cat = $c->Get("CategoryId");
	                      if(($cat>0) && !in_array($cat, $link_cats_arr))
	                      {                  
	                        $l->AddToCategory($cat,$table);
	                      }
	                    }
	                 }   
                 }
             }
        break;        
        case "l_cat_delete":        
        	 $objSession->SetVariable("HasChanges", 1);
             $objEditItems = new clsLinkList();
             $objEditItems->SourceTable = $objSession->GetEditTable("Link");
             $table = $objSession->GetEditTable("CategoryItems");
             $r = $_POST["ResourceId"];
             $i = $objEditItems->GetItemByField("ResourceId",$_POST["ResourceId"]);
             if(is_object($i))
             {
                 $CatCount = $i->CategoryMemberCount($table);
                 $Primary = $i->GetPrimaryCategory();
                 if($CatCount==count($CatList))
                 {
                   $sql = "DELETE FROM $table WHERE CategoryId=$cat AND ItemResourceId=$r AND PrimaryCat=0";
//                   echo $sql;
                 }
                 else
                 {             
                   $CatList = $_POST["itemlist"];
                   $ado = &GetADODBConnection();
                   for($x=0;$x<count($CatList);$x++)
                   {                 
                     $cat = $CatList[$x];
                     if(is_numeric($cat))
                     {                  
                         if($cat!=$Primary)
                         {                     
                           $sql = "DELETE FROM $table WHERE CategoryId=$cat AND ItemResourceId=$r";
                           $ado->Execute($sql);
                           $CatCount--;
                         }
                     }                 
                   }
    
                   for($x=0;$x<count($CatList);$x++)
                   {
                     $cat = $CatList[$x];
                     if(is_numeric($cat))
                     {                  
                         if($cat==$Primary && $CatCount>1)
                         {                     
                           $sql = "DELETE FROM $table WHERE CategoryId=$cat AND ItemResourceId=$r"; 	
                           $ado->Execute($sql);
                           $CatCount--;
                         }
                     }                 
                   }
                 }
             }        
        break;
		
		case 'l_primary_cat':
			// change primary category of the link
			$objEditItems = new clsLinkList();
            $objEditItems->SourceTable = $objSession->GetEditTable("Link");
            $link = $objEditItems->GetItemByField('ResourceId', $_REQUEST['ResourceId']);
			if( is_object($link) )
			{
				$new_cat = array_shift($_REQUEST['itemlist']);
				$ci_table = $objSession->GetEditTable('CategoryItems');
				$link->SetPrimaryCategory($new_cat, $ci_table);
			}
			break;
		
        case "l_link_delete":
        	if($ro_perm) break;
			if (count($_POST["linklist"]) >0)
			{
				$objLinkList->FlushCache($_POST["linklist"]);
				foreach($_POST["linklist"] as $linkid)
				{
					$objLinkList->Delete_Item($linkid);
				}
			}
			break;	

        case "l_link_add":            

            if($_POST["LinkEditStatus"]!=2)
            {            			  
              $CreatedOn = DateTimestamp($_POST['link_date'],GetDateFormat(0, true));
              $CreatedOn += adodb_date('H')*3600 + adodb_date('i')*60 + adodb_date('s');
              
              if(strlen($_POST["link_expire"]) && ((int)$_POST["link_expire"]>0))
              	$Expire = DateTimestamp($_POST["link_expire"],GetDateFormat(0, true));
              else
              	$Expire = 0; 
              	                           
              $link_pick = (int)$_POST["link_pick"];       
            
              $Status = (int)$_POST["status"];
              $Hot=(int)$_POST["itemhot"];
              $Pop = (int)$_POST["itempop"];      
              $New = (int)$_POST["itemnew"];

              $html = (int)$_POST["html_enable"]; 
              $Name = inp_escape($_POST["link_name"],$html);
              $Desc = inp_escape($_POST["link_desc"],$html);
              $Priority = (int)$_POST["link_priority"];

              //echo "Category:".$objCatList->CurrentCategoryID()."<br>";
              $objEditItems = new clsLinkList();
              $objEditItems->SourceTable = $objSession->GetEditTable("Link");
                            
              if(strlen($_POST["link_owner"]))
              {
                if($_POST["link_owner"] == "root")
                {
                	$CreatedById = -1;
                }
                else
                {
              		$u = $objUsers->GetItemByField("Login",$_POST["link_owner"]);
              		if(is_object($u))
              		{
              		  $CreatedById = $u->Get("PortalUserId");
              		}
              		else
              		  $CreatedById = $objSession->Get("PortalUserId");
                }
              }
              else
                $CreatedById = $objSession->Get("PortalUserId");
                
              $posted_hits = $_POST['link_hits_show'];
              
              $posted_hits_arr = explode('.', $_POST['link_hits']);
              
              
              $save_hits = $_POST['link_hits'];
              if ($posted_hits_arr[0] != $posted_hits) {
              	$save_hits = $posted_hits;
              }
              
              $l = $objEditItems->Add_Link($objCatList->CurrentCategoryID(), $Name, $Desc, $_POST["link_url"], $CreatedOn, $Expire, $Status, $link_pick, $New, $Pop, $Hot, $CreatedById, (int)$_POST["link_rating"], (int)$_POST["link_votes"],$save_hits, $Priority, GetVar('auto_filename'), GetVar('filename') );
              
              // Erasing tag cache
              //ClearTagCache();
/*            // Erasing count cache
              EraseCountCache();*/
              
              $objCustomEdit = new clsCustomDataList($objSession->GetEditTable("CustomMetaData"));
              $objCustomEdit->LoadResource($l->Get("ResourceId"));
              $CustomFields = new clsCustomFieldList(4);
              $DataChanged = FALSE;
              foreach($_POST as $key=>$value)
              {
            	if(substr($key,0,1)=="_")
            	{
            		$field = substr($key,1);
            		$cvalue = $CustomFields->GetItemByField("FieldName",$field,FALSE);
            		
            		if(is_object($cvalue))
            		{
            			$objCustomEdit->SetFieldValue($cvalue->Get("CustomFieldId"),$l->Get("ResourceId"),$value);
            			$DataChanged = TRUE;
            		}
            	}
              }          	
              if($DataChanged)
            	$objCustomEdit->SaveData();                                       
            }
        break;

        case "l_edit_link":
          if($_POST["LinkEditStatus"]!=2)
          {          
            $CreatedOn = DateTimestamp($_POST["link_date"],GetDateFormat(0, true));

            if(strlen($_POST["link_expire"]) && ((int)$_POST["link_expire"]>0))
              	$Expire = DateTimestamp($_POST["link_expire"],GetDateFormat(0, true));
            else
              	$Expire = 0;              
           
            $Status = (int)$_POST["status"];
            $Hot=(int)$_POST["itemhot"];
            $Pop = (int)$_POST["itempop"];      
            $New = (int)$_POST["itemnew"];
			$link_pick = (int)$_POST["link_pick"];

            $html = (int)$_POST["html_enable"]; 
            $Name = inp_escape($_POST["link_name"],$html);
            $Desc = inp_escape($_POST["link_desc"],$html);
            $Priority = (int)$_POST["link_priority"];

              if(strlen($_POST["link_owner"]))
              {
                if($_POST["link_owner"] == "root")
                {
                	$CreatedById = -1;
                }
                else
                {
              		$u = $objUsers->GetItemByField("Login",$_POST["link_owner"]);
              		if(is_object($u))
              		{
              		  $CreatedById = $u->Get("PortalUserId");
              		}
              		else
              		  $CreatedById = $objSession->Get("PortalUserId");
                }
              }
              else
                $CreatedById = $objSession->Get("PortalUserId");  
                
			  $posted_hits = $_POST['link_hits_show'];
              
              $posted_hits_arr = explode('.', $_POST['link_hits']);
              
              
              $save_hits = $_POST['link_hits'];
              if ($posted_hits_arr[0] != $posted_hits) {
              	$save_hits = $posted_hits;
              }                          
              
              $objEditItems = new clsLinkList();
              $objEditItems->SourceTable = $objSession->GetEditTable("Link");
			  $l = $objEditItems->Edit_Link($_POST["LinkId"], 
			  								inp_escape($Name, $html),
											inp_escape($Desc, $html), 
											inp_escape($_POST["link_url"], $html), 
                                         $CreatedOn, $Expire, $Status, $link_pick, $New, $Pop, $Hot,
                                         $_POST["link_rating"],(int)$_POST["link_votes"], 
                                         $save_hits,$Priority, GetVar('auto_filename'), GetVar('filename') );  
			  $l->Set("CreatedById",$CreatedById);
			  $l->Update();			  	                                        
              $objCustomEdit = new clsCustomDataList($objSession->GetEditTable("CustomMetaData"));
              $objCustomEdit->LoadResource($l->Get("ResourceId"));
              $CustomFields = new clsCustomFieldList(4);
              $DataChanged = FALSE;
              foreach($_POST as $key=>$value)
              {
            	if(substr($key,0,1)=="_")
            	{
            		$field = substr($key,1);
            		$cvalue = $CustomFields->GetItemByField("FieldName",$field,FALSE);
            		
            		if(is_object($cvalue))
            		{
            			$objCustomEdit->SetFieldValue($cvalue->Get("CustomFieldId"),$l->Get("ResourceId"),$value);
            			$DataChanged = TRUE;
            		}
            	}
              }          	
              if($DataChanged)
            	$objCustomEdit->SaveData();                                            			
          }
		break;

		case "l_link_cut":
			if($ro_perm) break;
			if(isset($_POST["linklist"]))
			{
				$objLinkList->CopyToClipboard("CUT","ResourceId",$_POST["linklist"]);
			//	UpdateCategoryCount("Link");
			}
			break;

		case "l_link_copy":
			if($ro_perm) break;
			if(isset($_POST["linklist"]))
			{
				$objLinkList->CopyToClipboard("COPY","ResourceId",$_POST["linklist"]);
			}
			break;
		
        case "l_link_move_up":
            if($ro_perm) break;
        	if(isset($_POST["linklist"]))
				foreach($_POST["linklist"] as $linkid)
				{	
					$link = $objLinkList->GetItem($linkid);
					$link->MoveUp();
				}
			break;
		
		case "l_link_move_down":
			if($ro_perm) break;
			if (isset($_POST["linklist"]))
			{	$linklist=array_reverse($_POST["linklist"]);
				foreach($linklist as $linkid)
				{
					$link = $objLinkList->GetItem($linkid);
					$link->MoveDown();
				}
			}
			break;
			
        case "l_link_approve":
        	if($ro_perm) break; 
        	if (isset($_POST["linklist"]))
        	{
        		$cat_ids=Array();
        		$db =& GetADODBConnection();
        		$update_sql = 'UPDATE '.GetTablePrefix().'Listings SET ItemResourceId = %s WHERE ItemResourceId = %s';
        		foreach($_POST["linklist"] as $id)
        		{
        			$l = $objLinkList->GetItem($id);
        			if($l->Get("Status")==-2)
        			{
        				$OrgId = $l->Get("OrgId");
        				if($OrgId)
        				{
        					$org = $objLinkList->GetItem($OrgId);
        					$OldResId = $org->Get("ResourceId");
        					$NewResId = $l->Get("ResourceId");
        					
        					if ($OldResId) {
        					$db->Execute( sprintf($update_sql, $NewResId, $OldResId) );
        					}
        					elseif(IsDebugMode()) {
        						
        						echo 'Invalid ResourceID of Original Link: ';
        						print_pre($org->Data);
        					}
        					
        					
        					$ExpireInterval = $objConfig->Get("link_ExpireMod_Value") * $objConfig->Get("link_ExpireMod_Interval");
        					if($ExpireInterval>0)
        					$l->Set("Expire",adodb_date("U")+$ExpireInterval);
        					$l->Set("OrgId",0);
        					$l->Approve();
        					$cat_ids[]=$org->GetPrimaryCategory();
        					$org->DeleteCustomData();
        					$org->Delete(TRUE);
        				}
        				/*else
        				{
        					$ExpireInterval = $objConfig->Get("link_Expire_Value") * $objConfig->Get("link_Expire_Interval");
        					if($ExpireInterval>0)
        					$link->Set("Expire",adodb_date("U")+$ExpireInterval);
        				}*/
        			}
        			else
        			{
        				$l->Approve();
        				$cat_ids[]=$l->GetPrimaryCategory();
        			}
        		}
        		if($cat_ids) UpdateCategoryCount("Link",$cat_ids,$objLinkList->GetListTypes() );
        	}
        	break;
        	
        case "l_link_decline":
        	if($ro_perm) break;  
        	if (isset($_POST["linklist"]))
        	{
        		$cat_ids = Array();
        		foreach($_POST["linklist"] as $id)
        		{
        			$l = $objLinkList->GetItem($id);
        			$cat_ids[] = $l->GetPrimaryCategory();
        			if($l->Get("Status")==-2)
        			{
        				$l->Delete();
        			}
        			else 
        			{        				
        				$l->Deny();
        			}
        			
        		}
        		UpdateCategoryCount("Link", $cat_ids, $objLinkList->GetListTypes());
        	}
        	break;
        
        case "l_deny_val_link": // deny
        if($ro_perm) break;
         if (isset($_POST["itemlist"]))
         {        
         	 $cat_ids = Array();
             foreach($_POST["itemlist"] as $id)
             {
                 $l = $objLinkList->GetItem($id);
                 $cat_ids[] = $l->GetPrimaryCategory();
                 $l->Deny();
             }
             UpdateCategoryCount("Link", $cat_ids, $objLinkList->GetListTypes());
         }
         
        break;     
        
        case "l_approve_val_link": // approve
	        if($ro_perm) break;
	        if (isset($_POST["itemlist"]))
	        {
	        	$cat_ids = Array();
	        	foreach($_POST["itemlist"] as $id)
	        	{
	        		$l = $objLinkList->GetItem($id);
	        		$cat_ids[] = $l->GetPrimaryCategory();
	        		$l->Approve();
	        	}
	        	UpdateCategoryCount("Link", $cat_ids, $objLinkList->GetListTypes());
	        }
        	break;
        
        case "l_delete_val_link": // delete
	        if($ro_perm) break;
	        if (count($_POST["itemlist"]) >0)
	        {
	        	$cat_ids = Array();
	        	foreach($_POST["itemlist"] as $id)
	        	{
	        		$l = $objLinkList->GetItem($id);
	        		$cat_ids[] = $l->GetPrimaryCategory();
	        		$objLinkList->Delete_Item($id, true);
	        	}
	        }
	        UpdateCategoryCount("Link", $cat_ids, $objLinkList->GetListTypes());
	        break;
       
        case "l_reset_val_status_sel": // reset validation status        	
        if($ro_perm) break;
         if (count($_POST["itemlist"]) >0)
		 {
			  foreach($_POST["itemlist"] as $id)
              	$linksToReset.= $id.", ";
              
			  $linksToReset = ereg_replace(", $", "", $linksToReset);                                   if (strlen($linksToReset))
              {
	              $sql = "DELETE FROM ".GetTablePrefix()."LinkValidation WHERE LinkId IN ($linksToReset)";
	              $conn1 = &GetADODBConnection();
	              $conn1->Execute($sql);	             
              }
		 }			
        break;    

        case "l_config_general":
        	if($ro_perm) break;
        	$init = $_POST["init_cat"];
        	$newcat = (int)$_POST["rootcat"];
        	
//        	echo "INIT: $init; NEW: $newcat";
        	
        	if($init != $newcat)
        	{
        		if($newcat != 0)
        		{
        			$c = $objCatList->GetItemByField('ResourceId',$newcat);
        			$newcat = is_object($c) ? $c->UniqueId() : 0;
        		}
        		$objModules->SetModuleRoot("In-Link",$newcat);
        	}
        	break;
     }


if( ! $objSession->HasSystemPermission("SYSTEM_ACCESS.READONLY") )
{     
	if( GetVar('LinkEditStatus') == 1 )
	{	
		$link_ids = $objLinkList->CopyFromEditTable("LinkId");
		if($link_ids)
		{
			$db =& GetADODBConnection();
			$sql = 'SELECT ResourceId FROM '.$objLinkList->SourceTable.' WHERE LinkId IN ('.implode(',', $link_ids).')';
			$rids = $db->GetCol($sql);
			$objCustomDataList->CopyFromEditTable("CustomDataId", $rids);
		}
		
	    $objImages = new clsImageList();
	    $objImages->CopyFromEditTable("ImageId");
	    $objLinkList->Clear();
	    
	   	$objLinkList->FlushCache($link_ids);
	}
	
	if( GetVar('LinkEditStatus') == 2 )
	{
		$objLinkList->PurgeEditTable("LinkId");
	    $objLinkList->PurgeCatListEditTable();
	    
	    $objReviewList = new clsItemReviewList();
	    $objReviewList->PurgeEditTable();
	    
	    $objImages = new clsImageList();
		$objImages->PurgeEditTable("ImageId");    
	    $objCustomDataList->PurgeEditTable("CustomDataId");
	    $objLinkList->Clear();
	}
}
?>