<?php die();

/*

	Exec: core
	
	Copyright © 2006 Jim Myhrberg.
	zynode@gmail.com

	----------
	This program is free software; you can redistributeit 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
	----------

*/


//_HEAD;
/* --- Configuration ---
Name: core
Priority: 40
Author: Jim Myhrberg
Include: language.exc.php, output.exc.php
*/
//_SCRIPT;

//==========================
//>STAGE> init
//==========================


//>Section> port_correction:20
if ( stristr($_SERVER['HTTP_HOST'], ':') !== false ) {
	$http_host = explode(':', $_SERVER['HTTP_HOST'], 2);
	$_SERVER['SERVER_PORT'] = $http_host[1];
	unset($http_host);
}
preg_match("/(.*)Port [0-9]{2,8}(.*)/i", $_SERVER['SERVER_SIGNATURE'], $serverinfo);
$_SERVER['SERVER_SIGNATURE'] = $serverinfo[1].'Port '.$_SERVER['SERVER_PORT'].$serverinfo[2];


//>Section> define_constants:30
define('DIR_URL', $dir_url);
define('DIR_PATH', $dir_path);
define('DLIST_URL', $config->dlist_url);


//>Section> dynamic_vars
$do_readdir = true;
$do_render = true;
$do_sort_items = true;
$do_sort_by = $config->default_sort;
$do_sort_reverse = false;


//==========================
//>STAGE> main
//==========================


//>Section> do_readdir
if ( $do_readdir ) {
	
	//>Section> readdir.start
	$dlist = new dirList();
	
	//>Section> readdir.options
	if ( $do_sort_items ) {
		$dlist->sort_by = $do_sort_by;
		if ( $do_sort_reverse ) $dlist->reverse = true;
	} else $dlist->sort_items = false;
	if ($config->show_hidden) $dlist->show_hidden = true;
	if ( !$config->smartdate ) $dlist->use_smartdate = false;
	$dlist->dir_url = DIR_URL;
	
	//>Section> readdir.filter_out
	if ( !empty($config->filter_out) ) $dlist->filter_out = '/'.implode('|', $config->filter_out).'/i';
	
	//>Section> readdir.hide_self
	$alt_string = ( empty($config->alt_urls) ) ? '' : '|^'.str_replace('/', '\/', implode('$|^', $config->alt_urls)).'$' ;
	$dlist->hide_self = '/^'.str_replace('/', '\/', DLIST_URL).'$'.$alt_string.'/i';
	
	//>Section> readdir.read
	$dlist->read(DIR_PATH);
	
	//>Section> do_readdir.end
	
}

//==========================
//>STAGE> render
//==========================


//_END;
?>