<?php
	/**
	 * 
     * @author Jorgen Evens <jorgen@wlab.be>
     * @package WebLab
	 * @subpackage Dispatcher
	 *
	 */
    class WebLab_Dispatcher_Visit implements WebLab_Dispatcher
    {
		protected static $_config;
    	protected static $_param;
    	
    	protected static function _setup() {
    		if( isset( self::$_config ) ) {
    			return;
    		}

    		self::$_config = WebLab_Config::getApplicationConfig()->get( 'Application.Dispatcher.Visit', WebLab_Config::OBJECT, false );
    		
    		if( !isset( self::$_config->default ) || !isset( self::$_config->prefix ) ) {
    			throw new WebLab_Exception_Dispatcher( 'Incomplete configuration.' );
    		}
    		self::$_param = WebLab_Parser_URL::getForRequest()->parameters;
    	}
    	
        public function __construct() {
			self::_setup();
        }
        
        public function execute() {
        	$alias = WebLab_Config::getApplicationConfig()->get( 'Application.Dispatcher.Aliasses', WebLab_Config::RAW, false );
            $path = $this->_parsePath();
            $default_namespace = isset( self::$_config->default_namespace ) ? self::$_config->default_namespace . NAMESPACE_SEPARATOR : '';
        	$i = count( $path );
        	
        	if( empty( $path ) && isset( $alias[""] ) ) {
        		$module = $default_namespace. self::$_config->prefix . '_' . $alias[""];
        	} else {
        		$module = $default_namespace . self::$_config->prefix . '_' . self::$_config->default;
        	}
        	
        	while( $i-- > 0 ) {
                $module_name = $this->_generateModule( $path );
                if( $module_name !== false ) {
                    $module = $module_name;
                    break;
                }

                $root_controller = ( $i == 0 ) ? array('Index') : array_slice( $path, 1 );
                $module_name = $this->_generateModule( $root_controller, $path[0] );
                if( $module_name !== false ) {
                    $module = $module_name;
                    break;
                }

                if( !empty( $default_namespace ) ) {
                    $module_name = $this->_generateModule( $path, $default_namespace );
                    if( $module_name !== false ) {
                        $module = $module_name;
                        break;
                    }
                }

                array_pop( $path );
        	}
        	
        	return new $module();
        }

        protected function _generateModule( $path, $ns=null ) {
            $alias = WebLab_Config::getApplicationConfig()->get( 'Application.Dispatcher.Aliasses', WebLab_Config::RAW, false );
            $module_name = empty( $ns ) ? '' : $ns . NAMESPACE_SEPARATOR;
            $module_name .= implode( '_', $path );

            if( isset( $alias[$module_name] ) ) {
                $module_name = $alias[$module_name];
            }

            $module_namespace = explode( NAMESPACE_SEPARATOR, trim( $module_name, NAMESPACE_SEPARATOR ) );
            $module_name = array_pop( $module_namespace );
            $module_namespace = implode( NAMESPACE_SEPARATOR, $module_namespace );
            if( !empty( $module_namespace ) )
                $module_namespace .= NAMESPACE_SEPARATOR;

            $module_name = $module_namespace . self::$_config->prefix . '_' . $module_name;

            if( class_exists( $module_name ) )
                return $module_name;

            return false;
        }

        protected function _parsePath() {
            $path = array();
            $i = 0;

            while( isset( self::$_param[$i] ) )
                if( !is_numeric( self::$_param[$i++] ) )
                    $path[] = ucfirst( self::$_param[$i-1] );

            return $path;
        }
        
        protected function _parseParam( $param ) {
        	$param = preg_replace_callback( '#-+(.)#', create_function( '$m', 'return strtoupper( $m[1] );'), $param );
        	return ucfirst( $param );
        }

        public function setPattern( $pattern ) {
            $this->_pattern = $pattern;
        }
        
        public function getPattern() {
        	return $this->_pattern;
        }

        public function setDefault( $class ) {
            $this->_default = $class;
        }
        
        public function getDefault() {
        	return $this->_default;
        }

    }