php-e107/e107_admin/download.php

<?php
/*
 * e107 website system
 *
 * Copyright (C) 2008-2009 e107 Inc (e107.org)
 * Released under the terms and conditions of the
 * GNU General Public License (http://www.gnu.org/licenses/gpl.txt)
 *
 *
 *
 * $Source: /cvs_backup/e107_0.8/e107_admin/download.php,v $
 * $Revision$
 * $Date$
 * $Author$
 */

define('DOWNLOAD_DEBUG',FALSE);

require_once("../class2.php");
if (!getperms("R"))
{
	header("location:".e_BASE."index.php");
	exit;
}

include_lan(e_LANGUAGEDIR.e_LANGUAGE.'/admin/lan_'.e_PAGE);

/*
require_once(e_HANDLER."calendar/calendar_class.ph_");
$cal = new DHTML_Calendar(true);
function headerjs()
{
	global $cal;
	return $cal->load_files();
}
*/

$e_sub_cat = 'download';

require_once(e_HANDLER."form_handler.php");
require_once(e_HANDLER."userclass_class.php");
require_once(e_HANDLER."file_class.php");

$fl = new e_file;


$rs = new form;
$frm = new e_form;
$download = new download;

require_once("auth.php");





$sub_action = '';
if (e_QUERY)
{
	$tmp = explode(".", e_QUERY);
	$action = $tmp[0];
	$sub_action = varset($tmp[1],'');
	$id = intval(varset($tmp[2],''));
	$from = varset($tmp[3], 0);
	unset($tmp);
}


if(isset($_POST['delete']))
{
	$tmp = array_keys($_POST['delete']);
	list($delete, $del_id) = explode("_", $tmp[0]);
	$del_id = intval($del_id);
	unset($_POST['searchquery']);
}

$from = ($from ? $from : 0);
$amount = 50;


if($file_array = $fl->get_files(e_DOWNLOAD, "","standard",5))
{
		sort($file_array);
}


if($public_array = $fl->get_files(e_UPLOAD))
{
  foreach($public_array as $key=>$val)
  {
    	$file_array[] = str_replace(e_UPLOAD,"",$val);
	}
}



if ($sql->db_Select("rbinary"))
{
  while ($row = $sql->db_Fetch())
  {
		extract($row);
		$file_array[] = "Binary ".$binary_id."/".$binary_name;
	}
}



if($image_array = $fl->get_files(e_FILE.'downloadimages/', '\.gif$|\.jpg$|\.png$|\.GIF$|\.JPG$|\.PNG$','standard',2))
{
	sort($image_array);
}

if($thumb_array = $fl->get_files(e_FILE.'downloadimages/', '\.gif$|\.jpg$|\.png$|\.GIF$|\.JPG$|\.PNG$','standard',2))
{
	sort($thumb_array);
}



if(isset($_POST))
{
	$e107cache->clear("download_cat");
}

if (isset($_POST['add_category']))
{
	$download->create_category($sub_action, $id);
}


if (isset($_POST['submit_download']))
{
	$download->submit_download($sub_action, $id);
	$action = "main";
	unset($sub_action, $id);
}


if(isset($_POST['update_catorder']))
{
	foreach($_POST['catorder'] as $key=>$order)
	{
		if (is_numeric($_POST['catorder'][$key]))
		{
			$sql -> db_Update("download_category", "download_category_order='".intval($order)."' WHERE download_category_id='".intval($key)."'");
		}
	}
	$admin_log->log_event('DOWNL_08',implode(',',array_keys($_POST['catorder'])),E_LOG_INFORMATIVE,'');
	$ns->tablerender("", "<div style='text-align:center'><b>".LAN_UPDATED."</b></div>");
}


if (isset($_POST['updateoptions']))
{
	unset($temp);
	$temp['download_php'] = $_POST['download_php'];
	$temp['download_view'] = $_POST['download_view'];
	$temp['download_sort'] = $_POST['download_sort'];
	$temp['download_order'] = $_POST['download_order'];
	$temp['agree_flag'] = $_POST['agree_flag'];
	$temp['download_email'] = $_POST['download_email'];
	$temp['agree_text'] = $tp->toDB($_POST['agree_text']);
	$temp['download_denied'] = $tp->toDB($_POST['download_denied']);
	$temp['download_reportbroken'] = $_POST['download_reportbroken'];
	if ($_POST['download_subsub']) $temp['download_subsub'] = '1'; else $temp['download_subsub'] = '0';
	if ($_POST['download_incinfo']) $temp['download_incinfo'] = '1'; else $temp['download_incinfo'] = '0';
	if ($admin_log->logArrayDiffs($temp, $pref, 'DOWNL_01'))
	{
		save_prefs();
		$message = DOWLAN_65;
	}
	else
	{
		$message = DOWLAN_8;
	}
}

$targetFields = array('gen_datestamp', 'gen_user_id', 'gen_ip', 'gen_intdata', 'gen_chardata');		// Fields for download limits

if(isset($_POST['addlimit']))
{
	if($sql->db_Select('generic','gen_id',"gen_type = 'download_limit' AND gen_datestamp = {$_POST['newlimit_class']}"))
	{
		$message = DOWLAN_116;
	}
	else
	{
		$vals = array();
		$vals['gen_type'] = 'download_limit';
		foreach(array('newlimit_class','new_bw_num','new_bw_days','new_count_num','new_count_days') as $k => $lName)
		{
			$vals[$targetFields[$k]] = intval($_POST[$lName]);
		}
		$valString = implode(',',$vals);
		if($sql->db_Insert('generic',$vals))
		{
			$message = DOWLAN_117;
			$admin_log->log_event('DOWNL_09',$valString,E_LOG_INFORMATIVE,'');
		}
		else
		{
			$message = DOWLAN_118;
		}
		unset($vals);
	}
}


if(isset($_POST['updatelimits']))
{

	if($pref['download_limits'] != $_POST['download_limits'])
	{
		$pref['download_limits'] = ($_POST['download_limits'] == 'on') ? 1 : 0;
		save_prefs();
		$message .= DOWLAN_126."<br />";
	}
	foreach(array_keys($_POST['count_num']) as $idLim)
	{
		$idLim = intval($idLim);
		if(!$_POST['count_num'][$idLim] && !$_POST['count_days'][$idLim] && !$_POST['bw_num'][$idLim] && !$_POST['bw_days'][$idLim])
		{
			//All entries empty - Remove record
			if($sql->db_Delete('generic',"gen_id = {$idLim}"))
			{
				$message .= $idLim." - ".DOWLAN_119."<br />";
				$admin_log->log_event('DOWNL_11','ID: '.$idLim,E_LOG_INFORMATIVE,'');
			}
			else
			{
				$message .= $idLim." - ".DOWLAN_120."<br />";
			}
		}
		else
		{
			$vals = array();
			foreach(array('bw_num','bw_days','count_num','count_days') as $k => $lName)
			{
				$vals[$targetFields[$k+1]] = intval($_POST[$lName][$idLim]);
			}
			$valString = implode(',',$vals);
			$sql->db_UpdateArray('generic',$vals," WHERE gen_id = {$idLim}");
			$admin_log->log_event('DOWNL_10',$idLim.', '.$valString,E_LOG_INFORMATIVE,'');
			$message .= $idLim." - ".DOWLAN_121."<br />";
			unset($vals);
		}
	}
}


if(isset($_POST['submit_mirror']))
{
	$download->submit_mirror($sub_action, $id);
}


if($action == "mirror")
{
	$download -> show_existing_mirrors();
}


if ($action == "dlm")
{
	$action = "create";
	$id = $sub_action;
	$sub_action = "dlm";
}


if ($action == "create")
{
	$download->create_download($sub_action, $id);
}


if ($delete == 'category')
{
  if (e107::getMessage()->addAuto($sql->db_Delete('download_category', 'download_category_id='.$del_id), 'delete', DOWLAN_49." #".$del_id." ".DOWLAN_36))
  {
		$sql->db_Delete('download_category', 'download_category_parent='.$del_id);
		$admin_log->log_event('DOWNL_04',$del_id,E_LOG_INFORMATIVE,'');
	}
}


if ($action == 'cat')
{
	$download->show_categories($sub_action, $id);
}


if ($delete == 'main')
{
	$result = e107::getMessage()->addAuto($sql->db_Delete('download', 'download_id='.$del_id), 'delete', DOWLAN_27." #".$del_id." ".DOWLAN_36);
	if($result)
	{
		$admin_log->log_event('DOWNL_07',$del_id,E_LOG_INFORMATIVE,'');
		admin_purge_related('download', $del_id);
		$e_event->trigger('dldelete', $del_id);
	}
	unset($sub_action, $id);
}


if (isset($message))
{
	$ns->tablerender("", "<div style='text-align:center'><b>".$message."</b></div>");
}



if (!e_QUERY || $action == "main")
{
	$download->show_existing_items($action, $sub_action, $id, $from, $amount);
}




if ($action == "opt")
{
	global $pref, $ns;
	$agree_flag = $pref['agree_flag'];
	$agree_text = $pref['agree_text'];
	$text = "<div style='text-align:center'>
		<form method='post' action='".e_SELF."?".e_QUERY."'>\n
		<table style='".ADMIN_WIDTH."' class='fborder'>
		<colgroup>
		<col style='width:70%' />
		<col style='width:30%' />
		</colgroup>
		<tr>
		<td class='forumheader3'>".DOWLAN_69."</td>
		<td class='forumheader3' style='text-align:left'>";
	$c = $pref['download_php'] ? " checked = 'checked' " : "";
	$ssc = ((!isset($pref['download_subsub'])) || ($pref['download_subsub'] == '1')) ? " checked = 'checked' " : "";
	$sacc = (varset($pref['download_incinfo'],0) == '1') ? " checked = 'checked' " : "";
	$text .= "<input type='checkbox' name='download_php' value='1' {$c} /> <span class='smalltext'>".DOWLAN_70."</span></td>
		</tr>

		<tr>
		<td class='forumheader3'>".DOWLAN_158."</td>
		<td class='forumheader3' style='text-align:left'>
		<input type='checkbox' name='download_subsub' value='1' {$ssc} /> </td>
		</tr>

		<tr>
		<td class='forumheader3'>".DOWLAN_159."</td>
		<td class='forumheader3' style='text-align:left'>
		<input type='checkbox' name='download_incinfo' value='1' {$sacc} /> </td>
		</tr>

		<tr>
		<td class='forumheader3'>
		".DOWLAN_55."
		</td>
		<td class='forumheader3' style='text-align:left'>
		<select name='download_view' class='tbox'>". ($pref['download_view'] == 5 ? "<option selected='selected'>5</option>" : "<option>5</option>"). ($pref['download_view'] == 10 ? "<option selected='selected'>10</option>" : "<option>10</option>"). ($pref['download_view'] == 15 ? "<option selected='selected'>15</option>" : "<option>15</option>"). ($pref['download_view'] == 20 ? "<option selected='selected'>20</option>" : "<option>20</option>"). ($pref['download_view'] == 50 ? "<option selected='selected'>50</option>" : "<option>50</option>")."
		</select>
		</td>
		</tr>

		<tr><td class='forumheader3'>
		".DOWLAN_56."
		</td>
		<td class='forumheader3' style='text-align:left'>

		<select name='download_order' class='tbox'>";
		$order_options = array("download_id"=>"Id No.","download_datestamp"=>LAN_DATE,"download_requested"=>ADLAN_24,"download_name"=>DOWLAN_59,"download_author"=>DOWLAN_15);
		foreach($order_options as $value=>$label){
			$select = ($pref['download_order'] == $value) ? "selected='selected'" : "";
			$text .= "<option value='$value' $select >$label</option>\n";
		}

		$text .= "</select>
		</td>
		</tr>
		<tr><td class='forumheader3'>
		".LAN_ORDER."
		</td>
		<td class='forumheader3' text-align:left'>
		<select name='download_sort' class='tbox'>". ($pref['download_sort'] == "ASC" ? "<option value='ASC' selected='selected'>".DOWLAN_62."</option>" : "<option value='ASC'>".DOWLAN_62."</option>"). ($pref['download_sort'] == "DESC" ? "<option value='DESC' selected='selected'>".DOWLAN_63."</option>" : "<option value='DESC'>".DOWLAN_63."</option>")."
		</select>
		</td>
		</tr>

		<tr>
		<td class='forumheader3'>".DOWLAN_151."</td>
		<td class='forumheader3' style='text-align:left'>". r_userclass("download_reportbroken", $pref['download_reportbroken'])."</td>
		</tr>

		<tr>
		<td class='forumheader3'>".DOWLAN_150."</td>
		<td class='forumheader3' style='text-align:left'>". ($pref['download_email'] ? "<input type='checkbox' name='download_email' value='1' checked='checked' />" : "<input type='checkbox' name='download_email' value='1' />")."</td>
		</tr>

		<tr>
		<td class='forumheader3'>".DOWLAN_100."</td>
		<td class='forumheader3' style='text-align:left'>". ($agree_flag ? "<input type='checkbox' name='agree_flag' value='1' checked='checked' />" : "<input type='checkbox' name='agree_flag' value='1' />")."</td>
		</tr>



		<tr><td class='forumheader3'>
		".DOWLAN_101."
		</td>
		<td class='forumheader3' style='text-align:left'>
		<textarea class='tbox' name='agree_text' cols='59' rows='3'>{$agree_text}</textarea>
		</td>
		</tr>

		<tr><td class='forumheader3'>
		".DOWLAN_146."
		</td>
		<td class='forumheader3' style='text-align:left'>
		<textarea class='tbox' name='download_denied' cols='59' rows='3'>".$pref['download_denied']."</textarea>
		</td>
		</tr>

		<tr style='vertical-align:top'>
		<td colspan='2'  style='text-align:center' class='forumheader'>
		<input class='button' type='submit' name='updateoptions' value='".DOWLAN_64."' />
		</td>
		</tr>

		</table>
		</form>
		</div>";
	$ns->tablerender(DOWLAN_54, $text);
}



if($action == 'limits')
{
	if($sql->db_Select('userclass_classes','userclass_id, userclass_name'))
	{
		$classList = $sql->db_getList();
	}
	if($sql->db_Select("generic", "gen_id as limit_id, gen_datestamp as limit_classnum, gen_user_id as limit_bw_num, gen_ip as limit_bw_days, gen_intdata as limit_count_num, gen_chardata as limit_count_days", "gen_type = 'download_limit'"))
	{
		while($row = $sql->db_Fetch())
		{
			$limitList[$row['limit_classnum']] = $row;
		}
	}
	$txt = "
		<form method='post' action='".e_SELF."?".e_QUERY."'>
		<table class='fborder' style='width:100%'>
		<tr>
			<td colspan='4' class='forumheader3' style='text-align:left'>
		";
		if($pref['download_limits'] == 1)
		{
			$chk = "checked = 'checked'";
		}
		else
		{
			$chk = "";
		}

		$txt .= "
			<input type='checkbox' name='download_limits' {$chk} /> ".DOWLAN_125."
			</td>
		</tr>
		<tr>
			<td class='fcaption'>".DOWLAN_67."</td>
			<td class='fcaption'>".DOWLAN_113."</td>
			<td class='fcaption'>".DOWLAN_107."</td>
			<td class='fcaption'>".DOWLAN_108."</td>
		</tr>
	";

	foreach($limitList as $row)
	{
		$txt .= "
		<tr>
		<td class='forumheader3'>".$row['limit_id']."</td>
		<td class='forumheader3'>".r_userclass_name($row['limit_classnum'])."</td>
		<td class='forumheader3'>
			<input type='text' class='tbox' size='5' name='count_num[{$row['limit_id']}]' value='".($row['limit_count_num'] ? $row['limit_count_num'] : "")."' /> ".DOWLAN_109."
			<input type='text' class='tbox' size='5' name='count_days[{$row['limit_id']}]' value='".($row['limit_count_days'] ? $row['limit_count_days'] : "")."' /> ".DOWLAN_110."
		</td>
		<td class='forumheader3'>
			<input type='text' class='tbox' size='5' name='bw_num[{$row['limit_id']}]' value='".($row['limit_bw_num'] ? $row['limit_bw_num'] : "")."' /> ".DOWLAN_111." ".DOWLAN_109."
			<input type='text' class='tbox' size='5' name='bw_days[{$row['limit_id']}]' value='".($row['limit_bw_days'] ? $row['limit_bw_days'] : "")."' /> ".DOWLAN_110."
		</td>
		</tr>
		";
	}

	$txt .= "
	<tr>
	<td class='forumheader' colspan='4' style='text-align:center'>
	<input type='submit' class='button' name='updatelimits' value='".DOWLAN_115."' />
	</td>
	</tr>
	<tr>
	<td colspan='4'><br /><br /></td>
	</tr>
	<tr>
	<td colspan='2' class='forumheader3'>".r_userclass("newlimit_class", 0, "off", "guest, member, admin, classes, language")."</td>
	<td class='forumheader3'>
		<input type='text' class='tbox' size='5' name='new_count_num' value='' /> ".DOWLAN_109."
		<input type='text' class='tbox' size='5' name='new_count_days' value='' /> ".DOWLAN_110."
	</td>
	<td class='forumheader3'>
		<input type='text' class='tbox' size='5' name='new_bw_num' value='' /> ".DOWLAN_111." ".DOWLAN_109."
		<input type='text' class='tbox' size='5' name='new_bw_days' value='' /> ".DOWLAN_110."
	</td>
	</tr>
	<tr>
	<td class='forumheader' colspan='4' style='text-align:center'>
	<input type='submit' class='button' name='addlimit' value='".DOWLAN_114."' />
	</td>
	</tr>
	";

	$txt .= "</table></form>";

	$ns->tablerender(DOWLAN_112, $txt);
	require_once(e_ADMIN.'footer.php');
	exit;
}

require_once("footer.php");
exit;




class download
{
	function show_existing_items($action, $sub_action, $id, $from, $amount)
	{
		global $sql, $rs, $ns, $tp, $mySQLdefaultdb, $pref;
		$text = "<div style='text-align:center'><div style='padding : 1px; ".ADMIN_WIDTH."; margin-left: auto; margin-right: auto;'>";
        $sortorder = ($pref['download_order']) ? $pref['download_order'] : "download_datestamp";
		$sortdirection = ($pref['download_sort']) ? strtolower($pref['download_sort']) : "desc";
		if ($sortdirection != 'desc') $sortdirection = 'asc';
		if(isset($_POST['searchdisp']))
		{
			$pref['admin_download_disp'] = implode("|",$_POST['searchdisp']);
			save_prefs();
		}

		if(!$pref['admin_download_disp'])
		{
			$search_display = array("download_name","download_class");
		}
		else
		{
            $search_display = explode("|",$pref['admin_download_disp']);
		}

         $query = "SELECT d.*, dc.* FROM `#download` AS d	LEFT JOIN `#download_category` AS dc ON dc. download_category_id  = d.download_category";

		if (isset($_POST['searchquery']) && $_POST['searchquery'] != "")
		{
			$query .= " WHERE  download_url REGEXP('".$_POST['searchquery']."') OR download_author REGEXP('".$_POST['searchquery']."') OR download_description  REGEXP('".$_POST['searchquery']."') ";
          foreach($search_display as $disp)
		  {
		  		$query .= " OR $disp REGEXP('".$_POST['searchquery']."') ";
			}
          $query .= " ORDER BY {$sortorder} {$sortdirection}";
		}
		else
		{
		  $query .= " ORDER BY ".($sub_action ? $sub_action : $sortorder)." ".($id ? $id : $sortdirection)."  LIMIT $from, $amount";
		}

      	if ($dl_count = $sql->db_Select_gen($query))
		{
		  $text .= $rs->form_open("post", e_SELF."?".e_QUERY, "myform")."
				<table class='fborder' style='width:99%'>
				<tr>
				<td style='width:5%' class='fcaption'>ID</td>
				";

			// Search Display Column header.----------
		  foreach($search_display as $disp)
		  {
			if($disp == "download_name")
			{  // Toggle direction
			  $text .= "<td class='fcaption'><a href='".e_SELF."?main.download_name.".($id == "desc" ? "asc" : "desc").".$from'>".DOWLAN_27."</a></td>";
			}
			else
			{
			  $repl = array("download_","_");
			  $text .= "<td class='fcaption'><a href='".e_SELF."?main.{$disp}.".($id == "desc" ? "asc" : "desc").".$from'>".ucwords(str_replace($repl," ",$disp))."</a></td>";
			}
		  }


		  $text .="<td style='width:10%' class='fcaption'>".LAN_OPTIONS."</td></tr>";

		  while ($row = $sql->db_Fetch())
		  {
			$text .= "<tr><td style='width:5%;vertical-align:top' class='forumheader3'>".$row['download_id']."</td>";

			// Display Chosen options
			foreach($search_display as $disp)
			{
			  $text .= "<td class='forumheader3' style='vertical-align:top'>";
			  switch ($disp)
			  {
			    case "download_name" :
        		  $text .= "<a href='".e_BASE."download.php?view.".$row['download_id']."'>".$row['download_name']."</a>";
				  break;
				case "download_category" :
				  $text .= $row['download_category_name']."&nbsp;";
				  break;
				case "download_datestamp" :
				  $text .= ($row[$disp]) ? strftime($pref['shortdate'],$row[$disp])."&nbsp;" : "&nbsp";
				  break;
				case "download_class" :
				case "download_visible" :
				  $text .= r_userclass_name($row[$disp])."&nbsp;";
				  break;
				case "download_filesize" :
				  $text .= ($row[$disp]) ? round(($row[$disp] / 1000))." Kb&nbsp;" : "&nbsp";
				  break;
				case "download_thumb" :
				  $text .= ($row[$disp]) ? "<img src='".e_FILE."downloadthumbs/".$row[$disp]."' alt='' />" : "";
				  break;
				case "download_image" :
				  $text .= "<a rel='external' href='".e_FILE."downloadimages/".$row[$disp]."' >".$row[$disp]."</a>&nbsp;";
				  break;
				case "download_description" :
				  $text .= $tp->toHTML($row[$disp],TRUE)."&nbsp;";
				  break;
				case "download_active" :
				  if($row[$disp]== 1)
				  {
				    $text .= "<img src='".ADMIN_TRUE_ICON_PATH."' title='".DOWLAN_123."' alt='' style='cursor:help' />\n";
				  }
				  elseif($row[$disp]== 2)
				  {
				    $text .= "<img src='".ADMIN_TRUE_ICON_PATH."' title='".DOWLAN_124."' alt='' style='cursor:help' /><img src='".ADMIN_TRUE_ICON_PATH."' title='".DOWLAN_124."' alt='' style='cursor:help' />\n";
				  }
				  else
				  {
				    $text .= "<img src='".ADMIN_FALSE_ICON_PATH."' title='".DOWLAN_122."' alt='' style='cursor:help' />\n";
				  }
				  break;
				case "download_comment" :
                  $text .= ($row[$disp]) ? ADMIN_TRUE_ICON : "&nbsp;";
				  break;
				default :
				  $text .= $row[$disp]."&nbsp;";
			  }
			  $text .= "</td>";
			}


			$text .= "
					<td style='width:20%;vertical-align:top; text-align:center' class='forumheader3'>
					<a href='".e_SELF."?create.edit.".$row['download_id']."'>".ADMIN_EDIT_ICON."</a>
					<input type='image' title='".LAN_DELETE."' name='delete[main_".$row['download_id']."]' src='".ADMIN_DELETE_ICON_PATH."' onclick=\"return jsconfirm('".$tp->toJS(DOWLAN_33." [ID: ".$row['download_id']." ]")."') \" />
					</td>
					</tr>";
		  }
		  $text .= "</table></form>";
		}
		else
		{	// 'No downloads yet'
		  $text .= "<div style='text-align:center'>".DOWLAN_6."</div>";
		}
		$text .= "</div>";

		// Next-Previous.
		$downloads = $sql->db_Count("download");
		if ($downloads > $amount && !$_POST['searchquery'])
		{
		  $parms = "{$downloads},{$amount},{$from},".e_SELF."?".(e_QUERY ? "$action.$sub_action.$id." : "main.{$sortorder}.{$sortdirection}.")."[FROM]";
			$text .= "<br />".$tp->parseTemplate("{NEXTPREV={$parms}}");
		}


		// Search  & display options etc.
		$text .= "<br /><form method='post' action='".e_SELF."'>\n<p>\n<input class='tbox' type='text' name='searchquery' size='20' value='' maxlength='50' />\n<input class='button' type='submit' name='searchsubmit' value='".DOWLAN_51."' />\n</p>";

		$text .= "<div style='cursor:pointer' onclick=\"expandit('sdisp')\">".LAN_DISPLAYOPT."</div>";
		$text .= "<div id='sdisp' style='padding-top:4px;display:none;text-align:center;margin-left:auto;margin-right:auto'>
		<table class='forumheader3' style='width:95%'><tr>";
		$fields = mysql_list_fields($mySQLdefaultdb, MPREFIX."download");
		$columns = mysql_num_fields($fields);
		for ($i = 0; $i < $columns; $i++) {
			$fname[] = mysql_field_name($fields, $i);
		}
        $m = 0;
		$replacechar = array("download_","_");
	foreach($fname as $fcol)
	{
        $checked = (in_array($fcol,$search_display)) ? "checked='checked'" : "";
			$text .= "<td style='text-align:left; padding:0px'>";
			$text .= "<input type='checkbox' name='searchdisp[]' value='".$fcol."' $checked />".str_replace($replacechar," ",$fcol) . "</td>\n";
			$m++;
	  if($m == 5)
	  {
				$text .= "</tr><tr>";
				$m = 0;
			 }
        }

		$text .= "</table></div>
		</form>\n
		</div>";


		$ns->tablerender(DOWLAN_7, $text);
	}

	function show_options($action) {

		if ($action == "") {
			$action = "main";
		}
		$var['main']['text'] = DOWLAN_29;
		$var['main']['link'] = e_SELF;

		$var['create']['text'] = DOWLAN_30;
		$var['create']['link'] = e_SELF."?create";

		$var['cat']['text'] = DOWLAN_31;
		$var['cat']['link'] = e_SELF."?cat";
		$var['cat']['perm'] = "Q";

		$var['opt']['text'] = LAN_OPTIONS;
		$var['opt']['link'] = e_SELF."?opt";

		$var['limits']['text'] = DOWLAN_112;
		$var['limits']['link'] = e_SELF."?limits";

		$var['mirror']['text'] = DOWLAN_128;
		$var['mirror']['link'] = e_SELF."?mirror";

		show_admin_menu(DOWLAN_32, $action, $var);

	}


// ---------------------------------------------------------------------------


	// Given the string which is stored in the DB, turns it into an array of mirror entries
	// If $byID is true, the array index is the mirror ID. Otherwise its a simple array
	function makeMirrorArray($source, $byID = FALSE)
	{
		$ret = array();
		if($source)
		{
			$mirrorTArray = explode(chr(1), $source);

			$count = 0;
			foreach($mirrorTArray as $mirror)
			{
				if ($mirror)
				{
					list($mid, $murl, $mreq) = explode(",", $mirror);
					$ret[$byID ? $mid : $count] = array('id' => $mid, 'url' => $murl, 'requests' => $mreq);
					$count++;
				}
			}
		}
		return $ret;
	}


	// Turn the array into a string which can be stored in the DB
	function compressMirrorArray($source)
	{
		if (!is_array($source) || !count($source)) return '';
		$inter = array();
		foreach ($source as $s)
		{
			$inter[] = $s['id'].','.$s['url'].','.$s['requests'];
		}
		return implode(chr(1),$inter);
	}



	function create_download($sub_action, $id)
	{
		global $cal,$tp, $sql, $fl, $rs, $ns, $file_array, $image_array, $thumb_array;
		require_once(e_CORE."shortcodes/batch/download_shortcodes.php");

		$mirrorArray = array();

		$download_status[0] = DOWLAN_122;
		$download_status[1] = DOWLAN_123;
		$download_status[2] = DOWLAN_124;


		if (!$sql->db_Select("download_category"))
		{
			$ns->tablerender(ADLAN_24, "<div style='text-align:center'>".DOWLAN_5."</div>");
			return;
		}
		$download_active = 1;
		if ($sub_action == "edit" && !$_POST['submit'])
		{
			if ($sql->db_Select("download", "*", "download_id=".$id))
			{
				$row = $sql->db_Fetch();
				extract($row);

				$mirrorArray = $this->makeMirrorArray($row['download_mirror']);
			}
		}

		if ($sub_action == "dlm" && !$_POST['submit'])
		{
			if ($sql->db_Select("upload", "*", "upload_id=".$id))
			{
				$row = $sql->db_Fetch();

				$download_category = $row['upload_category'];
				$download_name = $row['upload_name'].($row['upload_version'] ? " v" . $row['upload_version'] : "");
				$download_url = $row['upload_file'];
				$download_author_email = $row['upload_email'];
				$download_author_website = $row['upload_website'];
				$download_description = $row['upload_description'];
				$download_image = $row['upload_ss'];
				$download_filesize = $row['upload_filesize'];
				$image_array[] = array("path" => "", "fname" => $row['upload_ss']);
				$download_author = substr($row['upload_poster'], (strpos($row['upload_poster'], ".")+1));
			}
		}


		$text = "
			<div style='text-align:center'>
			<form method='post' action='".e_SELF."?".e_QUERY."' id='myform'>
			<table style='".ADMIN_WIDTH."' class='fborder'>
			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_11."</td>
			<td style='width:80%' class='forumheader3'>";

        $text .= $tp->parseTemplate("{DOWNLOAD_CATEGORY_SELECT={$download_category}}",true,$download_shortcodes);

		$text .= "</td>
			</tr>

			<tr>
			<td style='width:20%; vertical-align:top' class='forumheader3'><span style='text-decoration:underline'>".DOWLAN_12."</span>:</td>
			<td style='width:80%' class='forumheader3'>
			<input class='tbox' type='text' name='download_name' size='60' value=\"".$tp->toForm($download_name)."\" maxlength='200' />
			</td>
			</tr>

			<tr>
			<td style='width:20%; vertical-align:top' class='forumheader3'><span style='text-decoration:underline;cursor:help' title='".DOWLAN_127."' >".DOWLAN_13."</span>:</td>
			<td style='width:80%' class='forumheader3'><div style='padding-bottom:5px'>".DOWLAN_131."&nbsp;&nbsp;

		   <select name='download_url' class='tbox'>
			<option value=''>&nbsp;</option>
			";

		$counter = 0;
		while (isset($file_array[$counter]))
		{
			$fpath = str_replace(e_DOWNLOAD,"",$file_array[$counter]['path']).$file_array[$counter]['fname'];
			$selected = '';
			if (stristr($fpath, $download_url) !== FALSE)
			{
				$selected = " selected='selected'";
				$found = 1;
			}

			$text .= "<option value='".$fpath."' $selected>".$fpath."</option>\n";
			$counter++;
		}

		$dt = 'display:none';
		if (preg_match("/http:|ftp:/", $download_url))
		{
			$download_url_external = $download_url;
			$download_url = '';
			$dt = '';
		}

		$etext = " - (".DOWLAN_68.")";
		if (file_exists(e_UPLOAD.$download_url))
		{
			$etext = "";
		}

		if (!$found && $download_url)
		{
			$text .= "<option value='".$download_url."' selected='selected'>".$download_url.$etext."</option>\n";
		}

		$text .= "</select></div>
            <span style='padding-top:6px;cursor:pointer;text-decoration:underline' onclick='expandit(this)' title='".DOWLAN_14."'>".DOWLAN_149."</span>
			<div id='use_ext' style='padding-top:6px;{$dt}'>
           URL:&nbsp;

			<input class='tbox' type='text' name='download_url_external' size='70' value='{$download_url_external}' maxlength='255' />
			&nbsp;&nbsp;&nbsp;".DOWLAN_66."
			<input class='tbox' type='text' name='download_filesize_external' size='8' value='{$download_filesize}' maxlength='10' />
           </div>

			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'><span title='".DOWLAN_129."' style='cursor:help'>".DOWLAN_128."</span>:</td>
			<td style='width:80%' class='forumheader3'>";


		// See if any mirrors to display
		if(!$sql -> db_Select("download_mirror"))
		{	// No mirrors defined here
			$text .= DOWLAN_144."</tr>";
		}
		else
		{
			$text .= DOWLAN_132."<br />
			<div id='mirrorsection'>";

			$mirrorList = $sql -> db_getList();			// Get the list of possible mirrors

			$m_count = (count($mirrorArray) ? count($mirrorArray) : 1);		// Count of mirrors actually in use (or count of 1 if none defined yet)

			for($count = 1; $count <= $m_count; $count++)
			{

				$opt = ($count==1) ? "id='mirror'" : "";
				$text .="<span {$opt}>
				<select name='download_mirror_name[]' class='tbox'>
					<option value=''>&nbsp;</option>";

				foreach ($mirrorList as $mirror)
				{
					extract($mirror);
					$text .= "<option value='{$mirror_id}'".($mirror_id == $mirrorArray[($count-1)]['id'] ? " selected='selected'" : "").">{$mirror_name}</option>\n";
				}

				$text .= "</select>
				<input  class='tbox' type='text' name='download_mirror[]' style='width: 75%;' value=\"".$mirrorArray[($count-1)]['url']."\" maxlength='200' />";
				if (DOWNLOAD_DEBUG)
				{
					if ($id)
					{
						$text .= '('.$mirrorArray[($count-1)]['requests'].')';
					}
					else
					{
					$text .= "
				<input  class='tbox' type='text' name='download_mirror_requests[]' style='width: 10%;' value=\"".$mirrorArray[($count-1)]['requests']."\" maxlength='10' />";
					}
				}
				$text .= "</span><br />";
			}

			$text .="</div><input class='button' type='button' name='addoption' value='".DOWLAN_130."' onclick=\"duplicateHTML('mirror','mirrorsection')\" /><br />

			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3' ><span style='cursor:help' title='".DOWLAN_154."'>".DOWLAN_155."</span></td>
			<td style='width:80%' class='forumheader3'>

			<input type='radio' name='download_mirror_type' value='1'".($download_mirror_type ? " checked='checked'" : "")." /> ".DOWLAN_156."<br />
			<input type='radio' name='download_mirror_type' value='0'".(!$download_mirror_type ? " checked='checked'" : "")." /> ".DOWLAN_157."
			</td>
			</tr>";
		}		// End of mirror-related stuff

			$text .= "<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_15.":</td>
			<td style='width:80%' class='forumheader3'>
			<input class='tbox' type='text' name='download_author' size='60' value='$download_author' maxlength='100' />
			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_16.":</td>
			<td style='width:80%' class='forumheader3'>
			<input class='tbox' type='text' name='download_author_email' size='60' value='$download_author_email' maxlength='100' />
			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_17.":</td>
			<td style='width:80%' class='forumheader3'>
			<input class='tbox' type='text' name='download_author_website' size='60' value='$download_author_website' maxlength='100' />
			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'><span style='text-decoration:underline'>".DOWLAN_18."</span>: </td>
			<td style='width:80%' class='forumheader3'>
			<textarea class='tbox' name='download_description' cols='50' rows='5' style='width:90%'>$download_description</textarea>
			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_19.":</td>
			<td style='width:80%' class='forumheader3'>
			<select name='download_image' class='tbox'>
			<option value=''>&nbsp;</option>";

			foreach($image_array as $img)
			{
				$fpath = str_replace(e_FILE."downloadimages/","",$img['path'].$img['fname']);
            	$sel = ($download_image == $fpath) ? " selected='selected'" : "";
            	$text .= "<option value='".$fpath."' $sel>".$fpath."</option>\n";
			}

		$text .= "
			</select>";

			if($sub_action == "dlm" && $download_image)
			{
            	$text .= "
				<input type='hidden' name='move_image' value='1' />\n";
			}

		$text .= "
			</td>
			</tr>

			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_20.":</td>
			<td style='width:80%' class='forumheader3'>
			<select name='download_thumb' class='tbox'>
			<option value=''>&nbsp;</option>
			";

			foreach($thumb_array as $thm){
				$tpath = str_replace(e_FILE."downloadthumbs/","",$thm['path'].$thm['fname']);
            	$sel = ($download_thumb == $tpath) ? " selected='selected'" : "";
            	$text .= "<option value='".$tpath."' $sel>".$tpath."</option>\n";
			}

		$text .= "</select>
			</td>
			</tr>


		<tr>
		<td style='width:20%' class='forumheader3'>".LAN_DATESTAMP.":</td>
		<td style='width:80%' class='forumheader3'>
		";
        if(!$download_datestamp){
        	$download_datestamp = time();
	   	}
		$cal_options['showsTime'] = false;
		$cal_options['showOthers'] = false;
		$cal_options['weekNumbers'] = false;
		$cal_options['ifFormat'] = "%d/%m/%Y %H:%M:%S";
		$cal_options['timeFormat'] = "24";
		$cal_attrib['class'] = "tbox";
		$cal_attrib['size'] = "12";
		$cal_attrib['name'] = "download_datestamp";
		$cal_attrib['value'] = date("d/m/Y H:i:s", $download_datestamp);
		$text .= $cal->make_input_field($cal_options, $cal_attrib);

		$update_checked = ($_POST['update_datestamp']) ? "checked='checked'" : "";
		$text .= "&nbsp;&nbsp;<span><input type='checkbox' value='1' name='update_datestamp' $update_checked />".DOWLAN_148."
		</span>
		</td>
		</tr>



			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_21.":</td>
			<td style='width:80%' class='forumheader3'>
			<select name='download_active' class='tbox'>
			";

			foreach($download_status as $key => $val){
				$sel = ($download_active == $key) ? " selected = 'selected' " : "";
            	$text .= "<option value='{$key}' {$sel}>{$val}</option>\n";
			}
			$text .= "</select>";

		$text .= "</td>
			</tr>


			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_102.":</td>
			<td style='width:80%' class='forumheader3'>";


		if ($download_comment == "0") {
			$text .= LAN_YES.": <input type='radio' name='download_comment' value='1' />
				".LAN_NO.": <input type='radio' name='download_comment' value='0' checked='checked' />";
		} else {
			$text .= LAN_YES.": <input type='radio' name='download_comment' value='1' checked='checked' />
				".LAN_NO.": <input type='radio' name='download_comment' value='0' />";
		}

		$text .= "</td>
			</tr>";


		$text .= "
			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_145.":</td>
			<td style='width:80%' class='forumheader3'>".r_userclass('download_visible', $download_visible, 'off', 'public, nobody, member, admin, classes, language')."</td>
			</tr>


			<tr>
			<td style='width:20%' class='forumheader3'>".DOWLAN_106.":</td>
			<td style='width:80%' class='forumheader3'>".r_userclass('download_class', $download_class, 'off', 'public, nobody, member, admin, classes, language')."</td>
			</tr>
			";

		if ($sub_action == "dlm") {
			$text .= "

			<tr>
				<td style='width:30%' class='forumheader3'>".DOWLAN_153.":<br /></td>
				<td style='width:70%' class='forumheader3'>
				<select name='move_file' class='tbox'>
				<option value=''>".LAN_NO."</option>
				";

            	$dl_dirlist = $fl->get_dirs(e_DOWNLOAD);
               	if($dl_dirlist){
					sort($dl_dirlist);
					$text .= "<option value='".e_DOWNLOAD."'>/</option>\n";
					foreach($dl_dirlist as $dirs)
					{
        				$text .= "\t\t\t\t<option value='". e_DOWNLOAD.$dirs."/'>".$dirs."/</option>\n";
					}
				}
				else
				{
                	$text .= "\t\t\t\t<option value='".e_DOWNLOAD."'>".LAN_YES."</option>\n";
				}

			$text .= "</select>
				</td>
			</tr>


			<tr>
				<td style='width:30%' class='forumheader3'>".DOWLAN_103.":<br /></td>
				<td style='width:70%' class='forumheader3'>
				<input type='checkbox' name='remove_upload' value='1' />
				<input type='hidden' name='remove_id' value='$id' />
				</td>
			</tr>
            ";
		}

		$text .= "
			<tr style='vertical-align:top'>
			<td colspan='2' style='text-align:center' class='forumheader'>";


		if ($id && $sub_action == "edit") {
			$text .= "<input class='button' type='submit' name='submit_download' value='".DOWLAN_24."' /> ";
		} else {
			$text .= "<input class='button' type='submit' name='submit_download' value='".DOWLAN_25."' />";
		}

		$text .= "</td>
			</tr>
			</table>
			</form>
			</div>";
		$ns->tablerender(ADLAN_24, $text);
	}


// -----------------------------------------------------------------------------

	function show_message($message) {
		global $ns;
		$ns->tablerender("", "<div style='text-align:center'><b>".$message."</b></div>");
	}

// -----------------------------------------------------------------------------


	// Actually save a new or edited download to the DB
	function submit_download($sub_action, $id)
	{
		global $tp, $sql, $DOWNLOADS_DIRECTORY, $e_event;

		$dlInfo = array();
		$dlMirrors = array();

		if($sub_action == 'edit')
		{
			if($_POST['download_url_external'] == '')
			{
				$_POST['download_filesize_external'] = FALSE;
			}
		}

		if ($_POST['download_url_external'] && $_POST['download_url'] == '')
		{
			$dlInfo['download_url'] = $tp->toDB($_POST['download_url_external']);
			$filesize = intval($_POST['download_filesize_external']);
		}
		else
		{
			$dlInfo['download_url'] = $tp->toDB($_POST['download_url']);
			if($_POST['download_filesize_external'])
			{
				$filesize = intval($_POST['download_filesize_external']);
			}
			else
			{
				if (strpos($DOWNLOADS_DIRECTORY, "/") === 0 || strpos($DOWNLOADS_DIRECTORY, ":") >= 1)
				{
					$filesize = filesize($DOWNLOADS_DIRECTORY.$dlInfo['download_url']);
				}
				else
				{
					$filesize = filesize(e_BASE.$DOWNLOADS_DIRECTORY.$dlInfo['download_url']);
				}
			}
		}

		if (!$filesize)
		{
			if($sql->db_Select("upload", "upload_filesize", "upload_file='{$dlInfo['download_url']}'"))
			{
				$row = $sql->db_Fetch();
				$filesize = $row['upload_filesize'];
			}
		}
		$dlInfo['download_filesize'] = $filesize;


		//  ----   Move Images and Files ------------
		if($_POST['move_image'])
		{
			if($_POST['download_thumb'])
			{
				$oldname = e_UPLOAD.$_POST['download_thumb'];
				$newname = e_FILE."downloadthumbs/".$_POST['download_thumb'];
				if(!$this -> move_file($oldname,$newname))
				{
            		return;
				}
			}
			if($_POST['download_image'])
			{
				$oldname = e_UPLOAD.$_POST['download_image'];
				$newname = e_FILE."downloadimages/".$_POST['download_image'];
				if(!$this -> move_file($oldname,$newname))
				{
            		return;
				}
			}
		}

        if($_POST['move_file'] && $_POST['download_url'])
		{
        	$oldname = e_UPLOAD.$_POST['download_url'];
			$newname = $_POST['move_file'].$_POST['download_url'];
			if(!$this -> move_file($oldname,$newname))
			{
            	return;
			}
            $dlInfo['download_url'] = str_replace(e_DOWNLOAD,"",$newname);
		}


       // ------------------------------------------


		$dlInfo['download_description'] = $tp->toDB($_POST['download_description']);
		$dlInfo['download_name'] = $tp->toDB($_POST['download_name']);
		$dlInfo['download_author'] = $tp->toDB($_POST['download_author']);
		$dlInfo['download_author_email'] = $tp->toDB($_POST['download_author_email']);
		$dlInfo['download_author_website'] = $tp->toDB($_POST['download_author_website']);
		$dlInfo['download_category'] = intval($_POST['download_category']);
		$dlInfo['download_active']  = intval($_POST['download_active']);
		$dlInfo['download_thumb'] = $tp->toDB($_POST['download_thumb']);
		$dlInfo['download_image'] = $tp->toDB($_POST['download_image']);
		$dlInfo['download_comment'] = $tp->toDB($_POST['download_comment']);
		$dlInfo['download_class'] = intval($_POST['download_class']);
		$dlInfo['download_visible'] =intval($_POST['download_visible']);

		if (preg_match("#(.*?)/(.*?)/(.*?) (.*?):(.*?):(.*?)$#", $_POST['download_datestamp'], $matches))
		{
			$dlInfo['download_datestamp'] = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[1], $matches[3]);
		}
		else
		{
           $dlInfo['download_datestamp'] = time();
		}

		if($_POST['update_datestamp'])
		{
			$dlInfo['download_datestamp'] = time();
		}

		$mirrorStr = "";
		$mirrorFlag = FALSE;

		// See if any mirrors defined
		// Need to check all the possible mirror names - might have deleted the first one if we're in edit mode
		foreach ($_POST['download_mirror_name'] as $mn)
		{
			if ($mn)
			{
				$mirrorFlag = TRUE;
				break;
			}
		}
		if($mirrorFlag)
		{
			$mirrors = count($_POST['download_mirror_name']);
			$mirrorArray = array();
			$newMirrorArray = array();
			if ($id && $sql->db_Select('download','download_mirror', 'download_id = '.$id))		// Get existing download stats
			{
				if ($row = $sql->db_Fetch())
				{
					$mirrorArray = $this->makeMirrorArray($row['download_mirror'], TRUE);
				}
			}
			for($a=0; $a<$mirrors; $a++)
			{
				$mid = trim($_POST['download_mirror_name'][$a]);
				$murl = trim($_POST['download_mirror'][$a]);
				if ($mid && $murl)
				{
					$newMirrorArray[$mid] = array('id' => $mid, 'url' => $murl, 'requests' => 0);
					if (DOWNLOAD_DEBUG && !$id)
					{
						$newMirrorArray[$mid]['requests'] = intval($_POST['download_mirror_requests'][$a]);
					}
				}
			}
			// Now copy across any existing usage figures
			foreach ($newMirrorArray as $k => $m)
			{
				if (isset($mirrorArray[$k]))
				{
					$newMirrorArray[$k]['requests'] = $mirrorArray[$k]['requests'];
				}
			}
			$mirrorStr = $this->compressMirrorArray($newMirrorArray);
		}

		$dlMirrors['download_mirror']=$mirrorStr;
		$dlMirrors['download_mirror_type']=intval($_POST['download_mirror_type']);

		if ($id)
		{	// Its an edit
			e107::getMessage()->addAuto($sql->db_UpdateArray('download',array_merge($dlInfo,$dlMirrors),'WHERE download_id='.intval($id)), 'update', DOWLAN_2." (<a href='".e_BASE."download.php?view.".$id."'>".$_POST['download_name']."</a>)");
			$dlInfo['download_id'] = $id;
			$this->downloadLog('DOWNL_06',$dlInfo,$dlMirrors);
			$dlInfo['download_datestamp'] = $time;		// This is what 0.7 did, regardless of settings
			unset($dlInfo['download_class']);			// Also replicating 0.7
			$e_event->trigger('dlupdate', $dlInfo);
		}
		else
		{
			if (e107::getMessage()->addAuto($download_id = $sql->db_Insert('download',array_merge($dlInfo,$dlMirrors)), 'insert', DOWLAN_1." (<a href='".e_BASE."download.php?view.".$download_id."'>".$_POST['download_name']."</a>)"))
			{
				$dlInfo['download_id'] = $download_id;
				$this->downloadLog('DOWNL_05',$dlInfo,$dlMirrors);
				$dlInfo['download_datestamp'] = $time;		// This is what 0.7 did, regardless of settings
				unset($dlInfo['download_class']);			// Also replicating 0.7
				$e_event->trigger("dlpost", $dlInfo);

				if ($_POST['remove_upload'])
				{
					$sql->db_Update("upload", "upload_active='1' WHERE upload_id='".$_POST['remove_id']."'");
					$mes = "<br />".$_POST['download_name']." ".DOWLAN_104;
					$mes .= "<br /><br /><a href='".e_ADMIN."upload.php'>".DOWLAN_105."</a>";
					$this->show_message($mes);
				}
			}
		}
	}


	function downloadLog($aText, &$dlInfo, &$mirrorInfo=NULL)
	{
		global $admin_log;
		$logString = DOWLAN_9;
		foreach ($dlInfo as $k => $v)
		{
			$logString .= '[!br!]'.$k.'=>'.$v;
		}
		if ($mirrorInfo != NULL)
		{
			foreach ($mirrorInfo as $k => $v)
			{
				$logString .= '[!br!]'.$k.'=>'.$v;
			}
		}
		$admin_log->log_event($aText,$logString,E_LOG_INFORMATIVE,'');
	}

// -----------------------------------------------------------------------------

	function show_categories($sub_action, $id)
	{
		global $sql, $rs, $ns, $tp;

		if (!is_object($sql2)) {
			$sql2 = new db;
		}
		$text = $rs->form_open("post", e_SELF."?".e_QUERY, "myform");
		$text .= "<div style='padding : 1px; ".ADMIN_WIDTH."; height : 200px; overflow : auto; margin-left: auto; margin-right: auto;'>";

		$qry = "
		SELECT dc.*, COUNT(d.download_id) AS filecount FROM #download_category AS dc
		LEFT JOIN #download AS d ON d.download_category = dc.download_category_id
		GROUP BY dc.download_category_id
		ORDER BY dc.download_category_order
		";
		if($sql->db_Select_gen($qry))
		{
			$categories = $sql->db_getList();
			foreach($categories as $cat)
			{
				$cat_array[$cat['download_category_parent']][] = $cat;
			}

			$text .= "
			<table class='fborder' style='width:99%'>
				<tr>
				<td style='width:5%; text-align:center' class='fcaption'>&nbsp;</td>
				<td style='width:70%; text-align:center' class='fcaption'>".DOWLAN_11."</td>
				<td style='width:5%; text-align:center' class='fcaption'>".DOWLAN_52."</td>
				<td style='width:5%; text-align:center' class='fcaption'>".LAN_ORDER."</td>
				<td style='width:20%; text-align:center' class='fcaption'>".LAN_OPTIONS."</td>
				</tr>";


			//Start displaying parent categories
			foreach($cat_array[0] as $parent)
			{
				if(strstr($parent['download_category_icon'], chr(1)))
				{
					list($parent['download_category_icon'], $parent['download_category_icon_empty']) = explode(chr(1), $parent['download_category_icon']);
				}

				$text .= "<tr>
					<td style='width:5%; text-align:center' class='forumheader'>".($parent['download_category_icon'] ? "<img src='".e_IMAGE."icons/{$parent['download_category_icon']}' style='vertical-align:middle; border:0' alt='' />" : "&nbsp;")."</td>
					<td colspan='2' style='width:70%' class='forumheader'><b>{$parent['download_category_name']}</b></td>
					<td class='forumheader3'>
					 <input class='tbox' type='text' name='catorder[{$parent['download_category_id']}]' value='{$parent['download_category_order']}' size='3' />
					</td>
					<td style='text-align:left;padding-left:12px' class='forumheader'>
					<a href='".e_SELF."?cat.edit.{$parent['download_category_id']}'>".ADMIN_EDIT_ICON."</a>
					";
					if(!is_array($cat_array[$parent['download_category_id']]))
					{
						$text .= "<input type='image' title='".LAN_DELETE."' name='delete[category_{$parent['download_category_id']}]' src='".ADMIN_DELETE_ICON_PATH."' onclick=\"return jsconfirm('".$tp->toJS(DOWLAN_34." [ID: {$parent['download_category_id']} ]")."') \"/>";
					}
				$text .= "
					</td>
					</tr>
					";

				//Show main categories

				if(is_array($cat_array[$parent['download_category_id']]))
				{
					foreach($cat_array[$parent['download_category_id']] as $main)
					{

						if(strstr($main['download_category_icon'], chr(1)))
						{
							list($main['download_category_icon'], $main['download_category_icon_empty']) = explode(chr(1), $main['download_category_icon']);
						}
						$text .= "<tr>
						<td style='width:5%; text-align:center' class='forumheader3'>".($main['download_category_icon'] ? "<img src='".e_IMAGE."icons/{$main['download_category_icon']}' style='vertical-align:middle; border:0' alt='' />" : "&nbsp;")."</td>
						<td style='width:70%' class='forumheader3'>{$main['download_category_name']}<br /><span class='smalltext'>{$main['download_category_description']}</span></td>
						<td style='width:5%; text-align:center' class='forumheader3'>{$main['filecount']}</td>
						<td class='forumheader3'>
							<input class='tbox' type='text' name='catorder[{$main['download_category_id']}]' value='{$main['download_category_order']}' size='3' />
						</td>
						<td style='width:20%; text-align:left;padding-left:12px' class='forumheader3'>
						<a href='".e_SELF."?cat.edit.{$main['download_category_id']}'>".ADMIN_EDIT_ICON."</a>";
						if(!is_array($cat_array[$main['download_category_id']]) && !$main['filecount'])
						{
							$text .= "<input type='image' title='".LAN_DELETE."' name='delete[category_{$main['download_category_id']}]' src='".ADMIN_DELETE_ICON_PATH."' onclick=\"return jsconfirm('".$tp->toJS(DOWLAN_34." [ID: {$main['download_category_id']} ]")."') \"/>";
						}
						$text .= "
						</td>
						</tr>";

						//Show sub categories
						if(is_array($cat_array[$main['download_category_id']]))
						{
							foreach($cat_array[$main['download_category_id']] as $sub)
							{

								if(strstr($sub['download_category_icon'], chr(1)))
								{
									list($sub['download_category_icon'], $sub['download_category_icon_empty']) = explode(chr(1), $sub['download_category_icon']);
								}
								$text .= "<tr>
									<td style='width:5%; text-align:center' class='forumheader3'>".($sub['download_category_icon'] ? "<img src='".e_IMAGE."icons/{$sub['download_category_icon']}' style='vertical-align:middle; border:0' alt='' />" : "&nbsp;")."</td>
									<td style='width:70%' class='forumheader3'>&nbsp;&nbsp;&nbsp;&nbsp;".DOWLAN_53.": {$sub['download_category_name']}<br />&nbsp;&nbsp;&nbsp;&nbsp;<span class='smalltext'>{$sub['download_category_description']}</span></td>
									<td style='width:5%; text-align:center' class='forumheader3'>{$sub['filecount']}</td>
									<td class='forumheader3'>
										<input class='tbox' type='text' name='catorder[{$sub['download_category_id']}]' value='{$sub['download_category_order']}' size='3' />
									</td>
									<td style='width:20%; text-align:left;padding-left:12px' class='forumheader3'>
									<a href='".e_SELF."?cat.edit.{$sub['download_category_id']}'>".ADMIN_EDIT_ICON."</a>
									";
									if(!$sub['filecount'])
									{
										$text .= "<input type='image' title='".LAN_DELETE."' name='delete[category_{$sub['download_category_id']}]' src='".ADMIN_DELETE_ICON_PATH."' onclick=\"return jsconfirm('".$tp->toJS(DOWLAN_34." [ID: {$sub['download_category_id']} ]")."') \"/>";
									}
								$text .= "
									</td>
									</tr>";
							}
						}
					}
				}

			}

			$text .= "</table></div>";
			$text .= "<div style='text-align:center'>
				<input class='button' type='submit' name='update_catorder' value='".LAN_UPDATE."' />
				</div>";
		}
		else
		{
			$text .= "<div style='text-align:center'>".DOWLAN_38."</div>";
		}
		$text .= "</form>";
		$ns->tablerender(DOWLAN_37, $text);

		unset($download_category_id, $download_category_name, $download_category_description, $download_category_parent, $download_category_icon, $download_category_class);

		$handle = opendir(e_IMAGE."icons");
		while ($file = readdir($handle)) {
			if ($file != "." && $file != ".." && $file != "/" && $file != "CVS") {
				$iconlist[] = $file;
			}
		}
		closedir($handle);

		if ($sub_action == "edit" && !$_POST['add_category']) {
			if ($sql->db_Select("download_category", "*", "download_category_id=$id")) {
				$row = $sql->db_Fetch();
				 extract($row);
				$main_category_parent = $download_category_parent;
				if(strstr($download_category_icon, chr(1)))
				{
					list($download_category_icon, $download_category_icon_empty) = explode(chr(1), $download_category_icon);
				}
				else
				{
					$download_category_icon_empty = "";
				}
			}
		}


		extract($preset);

		$frm_action = (isset($_POST['add_category'])) ? e_SELF."?cat" : e_SELF."?".e_QUERY;
		$text = "<div style='text-align:center'>
			<form method='post' action='{$frm_action}' id='dlform'>
			<table style='".ADMIN_WIDTH."' class='fborder'>
			<tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_37.": </td>
			<td style='width:70%' class='forumheader3'>";

		if (!$download_cats = $sql->db_Select("download_category")) {
			$text .= "
				<select name='download_category_parent' class='tbox'>
				<option>".DOWLAN_40."</option>
				</select>\n";
		} else {
            $text .= "
				<select name='download_category_parent' class='tbox'>
				<option>".DOWLAN_40."</option>";

			while (list($cat_id, $cat_name, $null, $null, $cat_parent) = $sql->db_Fetch()) {
				$sql2->db_Select("download_category", "download_category_parent", "download_category_id='$cat_parent'", TRUE);
				$row = $sql2->db_Fetch();
				 extract($row);
				if (!$download_category_parent || !$cat_parent) {
					$text .= ($main_category_parent == $cat_id ? "<option value='$cat_id' selected='selected'>".$cat_name."</option>" : "<option value='$cat_id'>".$cat_name."</option>");
				}
			}
			$text .= "</select>";
		}
		$text .= "</td></tr><tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_12.": </td>
			<td style='width:70%' class='forumheader3'>
			<input class='tbox' type='text' name='download_category_name' size='40' value='$download_category_name' maxlength='100' />
			</td>
			</tr>

			<tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_18.": </td>
			<td style='width:70%' class='forumheader3'>
			<textarea class='tbox' name='download_category_description' cols='59' rows='3'>$download_category_description</textarea>
			</td>
			</tr>

			<tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_41.": </td>
			<td style='width:70%' class='forumheader3'>
			<input class='tbox' type='text' id='download_category_icon' name='download_category_icon' size='60' value='$download_category_icon' maxlength='100' />

			<br />
			<input class='button' type ='button' style='cursor:pointer' size='30' value='".DOWLAN_42."' onclick='expandit(this)' />
			<div id='cat_icn' style='display:none;{head}' >";

		while (list($key, $icon) = each($iconlist)) {
			$text .= "<a href=\"javascript:insertext('$icon','download_category_icon','cat_icn')\"><img src='".e_IMAGE."icons/".$icon."' style='border:0' alt='' /></a> ";
		}

		reset($iconlist);

		$text .= "
			</div></td>
			</tr>

			<tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_147.": </td>
			<td style='width:70%' class='forumheader3'>
			<input class='tbox' type='text' id='download_category_icon_empty' name='download_category_icon_empty' size='60' value='$download_category_icon_empty' maxlength='100' />

			<br />
			<input class='button' type ='button' style='cursor:pointer' size='30' value='".DOWLAN_42."' onclick='expandit(this)' />
			<div id='cat_icn_empty' style='display:none;{head}' >";

		while (list($key, $icon) = each($iconlist)) {
			$text .= "<a href=\"javascript:insertext('$icon','download_category_icon_empty','cat_icn_empty')\"><img src='".e_IMAGE."icons/".$icon."' style='border:0' alt='' /></a> ";
		}

		$text .= "
			</div></td>
			</tr>



			<tr>
			<td style='width:30%' class='forumheader3'>".DOWLAN_43.":<br /><span class='smalltext'>(".DOWLAN_44.")</span></td>
			<td style='width:70%' class='forumheader3'>".r_userclass("download_category_class", $download_category_class, 'off', 'public, nobody, member, admin, classes, language')."

			</td></tr>";


		$text .= "
			<tr style='vertical-align:top'>
			<td colspan='2' style='text-align:center' class='forumheader'>";
		if ($id && $sub_action == "edit" && !isset($_POST['add_category'])) {
			$text .= "<input class='button' type='submit' name='add_category' value='".DOWLAN_46."' /> ";
		} else {
			$text .= "<input class='button' type='submit' name='add_category' value='".DOWLAN_45."' />";
		}
		$text .= "</td>
			</tr>
			</table>
			</form>
			</div>";
		$ns->tablerender(DOWLAN_39, $text);
	}

	function create_category($sub_action, $id)
	{
		global $sql, $tp, $admin_log, $frm;
		$download_category_name = $tp->toDB($_POST['download_category_name']);
		$download_category_description = $tp->toDB($_POST['download_category_description']);
	  	$download_category_icon = $tp->toDB($_POST['download_category_icon']);
		$download_category_class = $tp->toDB($_POST['download_category_class']);
		$download_categoory_parent = intval($_POST['download_category_parent']);

		if(isset($_POST['download_category_icon_empty']) && $_POST['download_category_icon_empty'] != "")
		{
		  $download_category_icon .= trim(chr(1).$tp->toDB($_POST['download_category_icon_empty']));
		}

		if ($id)
		{
			e107::getMessage()->addAuto($sql->db_Update("download_category", "download_category_name='{$download_category_name}', download_category_description='{$download_category_description}', download_category_icon ='{$download_category_icon}', download_category_parent= '{$download_categoory_parent}', download_category_class='{$download_category_class}' WHERE download_category_id='{$id}'"), 'update', DOWLAN_48);
			$admin_log->log_event('DOWNL_03',$download_category_name.'[!br!]'.$download_category_description,E_LOG_INFORMATIVE,'');
		}
		else
		{
			e107::getMessage()->addAuto($sql->db_Insert("download_category", "0, '{$download_category_name}', '{$download_category_description}', '{$download_category_icon}', '{$download_categoory_parent}', '{$download_category_class}', 0 "), 'insert', DOWLAN_47);
			$admin_log->log_event('DOWNL_02',$download_category_name.'[!br!]'.$download_category_description,E_LOG_INFORMATIVE,'');
		}
		if ($sub_action == "sn")
		{
			$sql->db_Delete("tmp", "tmp_time='{$id}' ");
		}
	}



	function show_existing_mirrors()
	{

		global $sql, $ns, $tp, $sub_action, $id, $delete, $del_id, $admin_log;

		if($delete == "mirror")
		{
			e107::getMessage()->addAuto($sql -> db_Delete("download_mirror", "mirror_id=".$del_id), delete, DOWLAN_135);
			$admin_log->log_event('DOWNL_14','ID: '.$del_id,E_LOG_INFORMATIVE,'');
		}


		if(!$sql -> db_Select("download_mirror"))
		{
			$text = "<div style='text-align:center;'>".DOWLAN_144."</div>"; // No mirrors defined yet
		}
		else
		{

			$text = "<div style='text-align:center'>
			<form method='post' action='".e_SELF."?".e_QUERY."'>
			<table style='".ADMIN_WIDTH."' class='fborder'>
			<tr>
			<td style='width: 10%; text-align: center;' class='forumheader'>ID</td>
			<td style='width: 30%;' class='forumheader'>".DOWLAN_12."</td>
			<td style='width: 30%;' class='forumheader'>".DOWLAN_136."</td>
			<td style='width: 30%; text-align: center;' class='forumheader'>".LAN_OPTIONS."</td>
			</tr>
			";

			$mirrorList = $sql -> db_getList();

			foreach($mirrorList as $mirror)
			{
				extract($mirror);
				$text .= "

				<tr>
				<td style='width: 10%; text-align: center;' class='forumheader3'>$mirror_id</td>
				<td style='width: 30%;' class='forumheader3'>".$tp -> toHTML($mirror_name)."</td>
				<td style='width: 30%;' class='forumheader3'>".($mirror_image ? "<img src='".e_FILE."downloadimages/".$mirror_image."' alt='' />" : DOWLAN_28)."</td>
				<td style='width: 30%; text-align: center;' class='forumheader3'>
				<a href='".e_SELF."?mirror.edit.{$mirror_id}'>".ADMIN_EDIT_ICON."</a>
				<input type='image' title='".LAN_DELETE."' name='delete[mirror_{$mirror_id}]' src='".ADMIN_DELETE_ICON_PATH."' onclick=\"return jsconfirm('".DOWLAN_137." [ID: $mirror_id ]')\"/>
				</td>
				</tr>
				";
			}
			$text .= "</table></form></div>";

		}

		$ns -> tablerender(DOWLAN_138, $text);

		require_once(e_HANDLER."file_class.php");
		$fl = new e_file;
		$imagelist = $fl->get_files(e_FILE.'downloadimages/');

		if($sub_action == "edit" && !defined("SUBMITTED"))
		{
			$sql -> db_Select("download_mirror", "*", "mirror_id='".intval($id)."' ");
			$mirror = $sql -> db_Fetch();
			extract($mirror);
			$edit = TRUE;
		}
		else
		{
			unset($mirror_name, $mirror_url, $mirror_image, $mirror_location, $mirror_description);
			$edit = FALSE;
		}

		$text = "<div style='text-align:center'>
		<form method='post' action='".e_SELF."?".e_QUERY."' id='dataform'>\n
		<table style='".ADMIN_WIDTH."' class='fborder'>

		<tr>
		<td style='width: 30%;' class='forumheader3'>".DOWLAN_12."</td>
		<td style='width: 70%;' class='forumheader3'>
		<input class='tbox' type='text' name='mirror_name' size='60' value='{$mirror_name}' maxlength='200' />
		</td>
		</tr>

		<tr>
		<td style='width: 30%;' class='forumheader3'>".DOWLAN_139."</td>
		<td style='width: 70%;' class='forumheader3'>
		<input class='tbox' type='text' name='mirror_url' size='70' value='{$mirror_url}' maxlength='255' />
		</td>
		</tr>

		<tr>
		<td style='width: 30%;' class='forumheader3'>".DOWLAN_136."</td>
		<td style='width: 70%;' class='forumheader3'>
		<input class='tbox' type='text' id='mirror_image' name='mirror_image' size='60' value='{$mirror_image}' maxlength='200' />


		<br /><input class='button' type ='button' style='cursor:pointer' size='30' value='".DOWLAN_42."' onclick='expandit(this)' />
		<div id='imagefile' style='display:none;{head}'>";

		$text .= DOWLAN_140."<br /><br />";

		foreach($imagelist as $file)
		{
			$text .= "<a href=\"javascript:insertext('".$file['fname']."','mirror_image','imagefile')\"><img src='".e_FILE."downloadimages/".$file['fname']."' alt='' /></a> ";
		}

		$text .= "</div>
		</td>
		</tr>

		<tr>
		<td style='width: 30%;' class='forumheader3'>".DOWLAN_141."</td>
		<td style='width: 70%;' class='forumheader3'>
		<input class='tbox' type='text' name='mirror_location' size='60' value='$mirror_location' maxlength='200' />
		</td>
		</tr>

		<tr>
		<td style='width: 30%;' class='forumheader3'>".DOWLAN_18."</td>
		<td style='width: 70%;' class='forumheader3'>
		<textarea class='tbox' name=' mirror_description' cols='70' rows='6'>$mirror_description</textarea>
		</td>
		</tr>

		<tr>
		<td colspan='2' class='forumheader' style='text-align:center;'>
		".($edit ? "<input class='button' type='submit' name='submit_mirror' value='".DOWLAN_142."' /><input type='hidden' name='id' value='{$mirror_id}' />" : "<input class='button' type='submit' name='submit_mirror' value='".DOWLAN_143."' />")."
		</td>
		</tr>

		</table>
		</form>
		</div>";

		$caption = ($edit ? DOWLAN_142 : DOWLAN_143);

		$ns -> tablerender($caption, $text);
	}



	function submit_mirror()
	{
		global $tp, $sql, $admin_log;
		define("SUBMITTED", TRUE);
		if(isset($_POST['mirror_name']) && isset($_POST['mirror_url']))
		{
			$name = $tp -> toDB($_POST['mirror_name']);
			$url = $tp -> toDB($_POST['mirror_url']);
			$location = $tp -> toDB($_POST['mirror_location']);
			$description = $tp -> toDB($_POST['mirror_description']);

			$logString = $name.'[!br!]'.$url.'[!br!]'.$location.'[!br!]'.$description;

			if (isset($_POST['id']))
			{
				e107::getMessage()->addAuto($sql -> db_Update("download_mirror", "mirror_name='{$name}', mirror_url='{$url}', mirror_image='".$tp->toDB($_POST['mirror_image'])."', mirror_location='{$location}', mirror_description='{$description}' WHERE mirror_id=".intval($_POST['id'])), 'update', DOWLAN_133);
				$admin_log->log_event('DOWNL_13','ID: '.intval($_POST['id']).'[!br!]'.$logString,E_LOG_INFORMATIVE,'');
			}
			else
			{
				e107::getMessage()->addAuto($sql -> db_Insert("download_mirror", "0, '{$name}', '{$url}', '".$tp->toDB($_POST['mirror_image'])."', '{$location}', '{$description}', 0"), 'insert', DOWLAN_134);
				$admin_log->log_event('DOWNL_12',$logString,E_LOG_INFORMATIVE,'');
			}
		}
	}

 // ---------------------------------------------------------------------------

    function move_file($oldname,$newname)
	{
		global $ns;
		if(file_exists($newname))
		{
        	return TRUE;
		}

		if(!file_exists($oldname) || is_dir($oldname))
		{
			$ns -> tablerender(LAN_ERROR,DOWLAN_68 . " : ".$oldname);
        	return FALSE;
		}

		$directory = dirname($newname);
		if(is_writable($directory))
		{
			if(!rename($oldname,$newname))
			{
				$ns -> tablerender(LAN_ERROR,DOWLAN_152." ".$oldname ." -> ".$newname);
				return FALSE;
			}
			else
			{
				return TRUE;
			}
		}
		else
		{
            $ns -> tablerender(LAN_ERROR,$directory ." ".LAN_NOTWRITABLE);
			return FALSE;
		}
	}

// -------------------------------------------------------------------------


} // end class.


function download_adminmenu($parms)
{
	global $download;
	global $action;
	$download->show_options($action);
}





?>