<?php

/*
 * SlimStat: simple web analytics
 * Copyright (C) 2010 Pieces & Bits Limited
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

require_once( realpath( dirname( __FILE__ ) ).'/_lib/config.php' );
require_once( realpath( dirname( __FILE__ ) ).'/_lib/i18n.php' );
require_once( realpath( dirname( __FILE__ ) ).'/_lib/functions.php' );

if ( array_key_exists( 'page', $_GET ) ) {
	$query_string_page = preg_replace( "/[^A-Za-z]/", '', $_GET['page'] );
} elseif ( array_key_exists( 'QUERY_STRING', $_SERVER ) ) {
	$query_string_page = preg_replace( "/[^A-Za-z]/", '', $_SERVER['QUERY_STRING'] );
} else {
	$query_string_page = '';
}

if ( $query_string_page == 'js' ) {
	// no need to connect to database, so do this first
	require_once( realpath( dirname( __FILE__ ) ).'/_lib/js.php' );
	exit;
}

$config =& SlimStatConfig::get_instance();
$i18n =& SlimStatI18n::get_instance();

$is_handheld = is_handheld();

if ( file_exists( realpath( dirname( __FILE__ ) ).'/page/setup.php' ) ) {
	$query_string_page = 'setup';
	if ( @include_once( realpath( dirname( __FILE__ ) ).'/page/setup.php' ) ) {
		exit;
	}
}

if ( $config->slimstat_use_auth ) {
	session_start();
	if ( $query_string_page == 'logout' ) {
		logout();
	}
	if ( !( $query_string_page == 'login' ) && !check_login() ) {
		request_login();
		exit;
	}
}

if ( !file_exists( realpath( dirname( __FILE__ ) ).'/page/'.$query_string_page.'.php' ) ) {
	$query_string_page = '';
}

$connection = SlimStat::connect();

if ( $query_string_page == '' || !file_exists( realpath( dirname( __FILE__ ) ).'/page/'.$query_string_page.'.php' ) ) {
	$query_string_page = 'details';
}
require_once( realpath( dirname( __FILE__ ) ).'/page/'.$query_string_page.'.php' );

if ( function_exists( 'render_page' ) ) {
	render_page();
}

function page_head() {
	global $config, $i18n, $filters, $query_string_page;
	
	include( realpath( dirname( __FILE__ ) ).'/page/_head.php' );
}

function page_foot() {
	global $config;
	
	include( realpath( dirname( __FILE__ ) ).'/page/_foot.php' );
}

function filter_url( $_filters, $_first_separator='?' ) {
	if ( !is_array( $_filters ) ) {
		return '';
	}
	
	$shown_first = false;
	$str = '';
	$cleaned_filters = $_filters;
	
	if ( array_key_exists( 'yr', $_filters ) && $_filters['yr'] == date( 'Y' ) ) {
		unset( $cleaned_filters['yr'] );
		if ( array_key_exists( 'mo', $_filters ) && $_filters['mo'] == date( 'n' ) ) {
			unset( $cleaned_filters['mo'] );
		}
	}
	
	foreach ( $cleaned_filters as $key => $value ) {
		if ( $shown_first ) {
			$str .= '&amp;';
		} else {
			$str .= $_first_separator;
			$shown_first = true;
		}
		$str .= 'filter_'.urlencode( $key ).'='.urlencode( $value );
	}
	
	return $str;
}

function format_number( $_number, $_dp=1 ) {
	$i18n =& SlimStatI18n::get_instance();
	$decimal = $i18n->_( 'core', 'decimal_point' );
	$thousands = $i18n->_( 'core', 'thousands_separator' );
	$str = number_format( $_number, $_dp, $decimal, $thousands );
	if ( $str == '0'.$decimal.'0' && $_dp == 1 ) {
		$str2 = number_format( $_number, 2, $decimal, $thousands );
		if ( $str2 != '0'.$decimal.'00' ) {
			return $str2;
		}
	}
	return $str;
}

/**
 * Detects whether a user is logged in
 */
function is_logged_in() {
	$config =& SlimStatConfig::get_instance();
	
	if ( $config->slimstat_use_auth ) {
		return ( isset( $_SESSION ) && array_key_exists( 'slimstatuser', $_SESSION ) && $_SESSION['slimstatuser'] == true );
	} else {
		return true;
	}
}

function check_login() {
	if ( is_logged_in() ) {
		set_login_cookie();
		return true;
	}
	
	$config =& SlimStatConfig::get_instance();
	
	if ( !$config->slimstat_use_auth ) {
		return true;
	}
	
	if ( isset( $_COOKIE['slimstatuser'] ) &&
	     $_COOKIE['slimstatuser'] == SlimStat::build_cookie( $config->slimstat_username, $config->slimstat_password ) ) {
		$_SESSION['slimstatuser'] = true;
		set_login_cookie();
	} elseif ( isset( $_SERVER['PHP_AUTH_USER'] ) && $_SERVER['PHP_AUTH_USER'] == $config->slimstat_username &&
	     isset( $_SERVER['PHP_AUTH_PW'] ) && $_SERVER['PHP_AUTH_PW'] == $config->slimstat_password ) {
		$_SESSION['slimstatuser'] = true;
		set_login_cookie();
	} elseif ( isset( $_POST['username'] ) && $_POST['username'] == $config->slimstat_username &&
	           isset( $_POST['password'] ) && $_POST['password'] == $config->slimstat_password ) {
		$_SESSION['slimstatuser'] = true;
		set_login_cookie();
	}
	
	return is_logged_in();
}

function request_login() {
	if ( array_key_exists( 'format', $_GET ) && $_GET['format'] == 'rss' ) {
		// send www-auth before http header to keep old IE versions happy
		header( 'WWW-Authenticate: Basic realm="SlimStat"' );
		header( 'Status: 401 Unauthorized' );
	} else {
		header( 'Status: 302 Moved Temporarily' );
		header( 'Location: '.dirname( $_SERVER['PHP_SELF'] ).'/?login' );
	}
	
	exit();
}

function set_login_cookie() {
	if ( !is_logged_in() ) {
		return;
	}
	
	$config =& SlimStatConfig::get_instance();
	
	if ( !$config->slimstat_use_auth ) {
		return;
	}
	
	$cookie = SlimStat::build_cookie( $config->slimstat_username, $config->slimstat_password );
	@setcookie( 'slimstatuser', $cookie, time() + 31536000, '/', '' );
}

function logout() {
	global $config;
	
	session_destroy();
	
	@setcookie( 'slimstatuser', '', time() + 31536000, '/', '' );
	
	request_login();
}

function sp2nb( $_str ) {
	return str_replace( ' ', '&nbsp;', $_str );
}

function is_handheld() {
	return strstr( $_SERVER['HTTP_USER_AGENT'], 'iPod' )
	    || strstr( $_SERVER['HTTP_USER_AGENT'], 'iPhone' )
	    || strstr( $_SERVER['HTTP_USER_AGENT'], 'MobileSafari' )
	    || strstr( $_SERVER['HTTP_USER_AGENT'], 'Android' );
}