<?php
/**
 * @package Sj Megamenu
 * @version 3.1.1
 * @license http://www.gnu.org/licenses/gpl-2.0.html GNU/GPL
 * @copyright (c) 2012 YouTech Company. All Rights Reserved.
 * @author YouTech Company http://www.smartaddons.com
 *
 */

defined ('_JEXEC') or die ('resticted aceess');

class SjMegaMenu {

	protected $_items = array();
	protected $active = 0;
	protected $active_tree = array();
	protected $menu = '';
	public $_params 	= null;
	public $menuname	= 'mainmenu';
	public $module_params;
	const SJMEGA_PREFIX = 'sj-megamenu';

	function __construct($class = '', $name = ''){
		$this->app = JFactory::getApplication();
		$this->template = $this->app->getTemplate(true);
		$this->_params = $this->template->params;
		$this->extraclass = $class;
		if($name) {
			$this->menuname = $name;
		} else {
			$this->menuname = $this->_params->get('menu');
		}

		$_module = JModuleHelper::getModule('mod_sj_megamenu_res');

		$this->module_params = new JRegistry($_module->params);
		$this->LoadSjMegaMenu();
		$this->renderSjMegaMenu();
	}

	public function LoadSjMegaMenu(){
		$app 	= JFactory::getApplication();
		$menu  	= $app->getMenu('site');

		$attributes 	= array('menutype');
		$menu_name     	= array($this->menuname);

		$items 			= $menu->getItems($attributes, $menu_name);
		$active_item 	= ($menu->getActive()) ? $menu->getActive() : $menu->getDefault();

		$this->active   	= $active_item ? $active_item->id : 0;
		$this->active_tree 	= $active_item->tree;

		foreach ( $items as &$item ) {
			if($item->level >= 2 && !isset($this->_items[$item->parent_id])){
				continue;
			}

			$parent                           = isset($this->children[$item->parent_id]) ? $this->children[$item->parent_id] : array();
			$parent[]                         = $item;
			$this->children[$item->parent_id] = $parent;
			$this->_items[$item->id]          = $item;
		}

		foreach ($items as &$item) {

			$class = '';
			if ($item->id == $this->active) {
				$class .= ' current-item';
			}

			if (in_array($item->id, $this->active_tree)) {
				$class .= ' active';
			}elseif ($item->type == 'alias') {				
				$aliasToId = $item->getParams()['aliasoptions'];
				if (count($this->active_tree) > 0 && $aliasToId == $this->active_tree[count($this->active_tree) - 1]) {
					$class .= ' active';
				} elseif (in_array($aliasToId, $this->active_tree)) {
					$class .= ' alias-parent-active';
				}
			}

			$item->class   = $class;
			$item->dropdown =0;
			if (isset($this->children[$item->id])) {
				$item->dropdown = 1;
			}		
			$item->megamenu = ($item->getParams()['sjmegamenu']) ? $item->getParams()['sjmegamenu'] : 0;
			$item->flink 		= $item->link;

			switch ($item->type) {
				case 'separator':
				case 'heading':
					// No further action needed.
					continue 2;

				case 'url':
					if ((strpos($item->link, 'index.php?') === 0) && (strpos($item->link, 'Itemid=') === false)) {
						$item->flink = $item->link . '&Itemid=' . $item->id;
					}
					break;

				case 'alias':
					$item->flink = 'index.php?Itemid=' . $item->getParams()['aliasoptions'];
					break;

				default:
					$item->flink = 'index.php?Itemid=' . $item->id;
					break;
			}

			if (strcasecmp(substr($item->flink, 0, 4), 'http') && (strpos($item->flink, 'index.php?') !== false)) {
				$item->flink = JRoute::_($item->flink, true, $item->getParams()['secure']);
			} else {
				$item->flink = JRoute::_($item->flink);
			}

			// We prevent the double encoding because for some reason the $item is shared for menu modules and we get double encoding
			// when the cause of that is found the argument should be removed
			$item->title = htmlspecialchars($item->title, ENT_COMPAT, 'UTF-8', false);
			$item->anchor_css   = htmlspecialchars($item->getParams()['menu-anchor_css'], ENT_COMPAT, 'UTF-8', false);
			$item->anchor_title = htmlspecialchars($item->getParams()['menu-anchor_title'], ENT_COMPAT, 'UTF-8', false);
			$item->menu_image   = $item->getParams()['menu_image'] ? htmlspecialchars($item->getParams()['menu_image'], ENT_COMPAT, 'UTF-8', false) : '';
		}
	}

	public function renderSjMegaMenu()
	{
		$this->menu = '';
		$keys = array_keys($this->_items);

		if (count($keys)) {
			$this->getNavigation(null,$keys[0]);
		}
		return $this->menu;
	}

	public function getNavigation($pitem, $start = 0, $end = 0, $class = '')
	{
		if ( $start > 0 ) {
			if (!isset($this->_items[$start]))
				return;
			$pid     = $this->_items[$start]->parent_id;
			$items   = array();
			$started = false;

			foreach ($this->children[$pid] as $item) {
				if ($started) {
					if ($item->id == $end)
						break;
					$items[] = $item;
				} else {
					if ($item->id == $start) {
						$started = true;
						$items[] = $item;
					}
				}
			}
			if (!count($items))
				return;
		}else if( $start === 0 ){
			$pid = $pitem->id;
			if (!isset($this->children[$pid]))
				return;
			$items = $this->children[$pid];
		}else{
			return;
		}

		//Parent class
		if($pid==1) {

			if($this->_params->get('menu_animation') != 'none') {
				$animation = ' ' . $this->_params->get('menu_animation');
			} else {
				$animation = '';
			}

			$class = self::SJMEGA_PREFIX.'-parent' . $animation;

			if($this->extraclass) $class = $class . ' ' . $this->extraclass;

			$this->menu .= $this->start_lvl($class);
		} else {
			$this->menu .= $this->start_lvl($class);
		}


		foreach ($items as $item) {
			$this->getItem($item);
		}

		$this->menu .= $this->end_lvl();
	}

	private function getItem($item) {

		$this->menu .= $this->start_el(array('item' => $item));
		$this->menu .= $this->item($item); // get item url

		if ( $item->megamenu ) {
			$this->mega($item);
		} else if ( $item->dropdown ) {
			$this->dropdown( $item );
		}
		else if ( ( $item->parent_id == 1 ) && ($item->megamenu == 0 ))
		{
			$menulayout = json_decode($this->_items[$item->id]->getParams()['sjmenulayout']);

			if ($menulayout) {
				$layout = $menulayout->layout;
				$attr 	= $layout[0]->attr;

				if ( $attr[0]->moduleId !== '' ) {
					$this->mega($item);
				}
			}

		}

		$this->menu .= $this->end_el();
	}

	private function dropdown($item) {
		$items     = isset($this->children[$item->id]) ? $this->children[$item->id] : array();
		$firstitem = count($items) ? $items[0]->id : 0;

		//Dropdown
		$class = ($item->level==1) ? 'sj-dropdown sj-dropdown-main' : 'sj-dropdown sj-dropdown-sub';

		$dropdown_width = $this->_items[$item->id]->getParams()['xmp_width'];

		if(!$dropdown_width) {
			$dropdown_width = 240;
		}

		$dropdown_style = 'width: '. $dropdown_width .'px;';

		if ($item->getParams()['backgroundtype'] == 'image' && $item->getParams()['backgroundimage'] != '') {
			$dropdown_style .= " background-image: url(".$item->getParams()['backgroundimage'].");";
			$dropdown_style .= "background-repeat: no-repeat;";
			$dropdown_style .= "background-color: #fff;";
			$dropdown_style .= "background-size: 100% 100%;";
		}
		else {
			$dropdown_style .= ' background-color: '. $item->getParams()['backgroundcolor'].';';
		}

		$layout = json_decode($this->_items[$item->id]->getParams()['sjmenulayout']);
		$sub_alignment = $this->_items[$item->id]->getParams()['dropdown_position'];

		if(isset($layout->menuAlign) && $layout->menuAlign) {
			$alignment = $layout->menuAlign;
		} else {
			$alignment = 'right';
		}

		if($sub_alignment=='center') {
			$dropdown_style .= '; left: -'. ($dropdown_width/2) .'px;';
		} else if( $sub_alignment == 'left' ) {
			$dropdown_style .= '; left: -'. $dropdown_width .'px;';
		} else if( $sub_alignment == 'right' ) {
			$dropdown_style .= '; right: -'. $dropdown_width .'px;';
		}

		$this->menu .= '<div class="' . $class . ' sj-menu-'. (isset($sub_alignment) && !empty($sub_alignment) ? $sub_alignment : (isset($alignment) ? $alignment : 'left')) .'" style="' . $dropdown_style . '">';
		$this->menu .= '<div class="sj-dropdown-inner">';
		$this->getNavigation($item, $firstitem, 0,  'sj-dropdown-items');

		// only module exist	
		if (count($item->getParams()) == 1) {
			$mega_json = $item->getParams()['sjmenulayout'];
			$mega = json_decode($mega_json);
			$layout = $mega->layout;

			$layout = $layout[0];
			$col = $layout->attr[0];
			$mod_ids = ($col->moduleId)? explode(',', $col->moduleId):array();

			if (count($mod_ids))
			{
				foreach ($mod_ids as $mod_id)
				{
					$this->menu .= $this->load_module($mod_id);
				}
			}
		}

		$this->menu .= '</div>';
		$this->menu .= '</div>';
	
	}

	private function mega($item)
	{
		$items     = isset($this->children[$item->id]) ? $this->children[$item->id] : array();
		$firstitem = count($items) ? $items[0]->id : 0;

		$mega_json = $item->getParams()['sjmenulayout'];
		$mega = json_decode($mega_json);
		$layout = $mega->layout;

		$mega_style = 'width: '. $mega->width .'px;';
		if ($item->getParams()['backgroundtype'] == 'image' && $item->getParams()['backgroundimage'] != '') {
			$mega_style .= ' background-image: url("'.$item->getParams()['backgroundimage'].'");';
			$mega_style .= 'background-repeat: no-repeat;';
			$mega_style .= 'background-color: #fff;';
			$mega_style .= 'background-size: 100% 100%;';
		}
		else {
			$mega_style .= ' background-color: '. $item->getParams()['backgroundcolor'].';';
		}
		
		if($mega->menuAlign=='center') {
			$mega_style .= 'left: -' . ($mega->width/2) . 'px;';
		}

		if($mega->menuAlign=='full') {
			// $mega_style = '';
			$mega->menuAlign = $mega->menuAlign . ' '.self::SJMEGA_PREFIX.'-container';
		}

		// var_dump($this->module_params->get('megamenutype'));
		// if($mega->menuAlign=='left') {
		// 	$mega_style .= '; left: -'.$mega->width.'px; right: auto;';
		// }

		// if($mega->menuAlign=='right') {
		// 	$mega_style .= '; right: -'.$mega->width.'px; left: auto;';
		// }
		
		$this->menu .='<div class="sj-dropdown sj-dropdown-main sj-dropdown-mega sj-menu-'. $mega->menuAlign .'" style="' . $mega_style . '">';
		$this->menu .='<div class="sj-dropdown-inner">';

		foreach ($layout as $row)
		{
			$this->menu .='<div class="'.self::SJMEGA_PREFIX.'-row">';
			foreach ($row->attr as $col)
			{
				$this->menu .='<div class="'.self::SJMEGA_PREFIX.'-col-sm-'.$col->colGrid.'">';

				if (count($items))
				{
					$item_ids = ($col->menuParentId)? explode(',', $col->menuParentId):array();

					if (count($item_ids))
					{
						$this->menu .= $this->start_lvl('sj-mega-group');

						foreach ($item_ids as $item_id)
						{
							if (!empty($this->_items[$item_id]))
							{
								$item 	= $this->_items[$item_id];
								$items  = isset($this->children[$item_id]) ? $this->children[$item_id] : array();

								$firstitem = count($items) ? $items[0]->id : 0;

								$this->menu .= $this->start_el(array('item' => $item));

								//Mega Group Title
								if(isset($this->children[$item_id])) {
									$this->menu .= $this->item($item, 'sj-group-title');
								} else {
									$this->menu .= $this->item($item);
								}
								if ($firstitem) {
									$this->getNavigation(null, $firstitem, 0, 'sj-mega-group-child sj-dropdown-items');
								}

								$this->menu .= $this->end_el();
							}
						}

						$this->menu .= $this->end_lvl();
					}

				}

				$mod_ids = ($col->moduleId)? explode(',', $col->moduleId):array();

				if (count($mod_ids))
				{
					foreach ($mod_ids as $mod_id)
					{					
						$this->menu .= $this->load_module($mod_id);
					}
				}

				$this->menu .='</div>';
			}
			$this->menu .='</div>';
		}

		$this->menu .='</div>';
		$this->menu .='</div>';
	}

	private function start_lvl($cls = '')
	{
		$class = trim($cls);
		return '<ul class="'.$class.' hidden-sm hidden-xs">';
	}

	private function end_lvl(){
		return '</ul>';
	}

	private function start_el( $args = array() )
	{
		$item 	= $args['item'];
		$class 	= 'sj-menu-item';

		if( !empty( $this->children[$item->id] ) ) {
			$class .= ' sj-has-child';

			$menulayout = json_decode( $this->_items[$item->id]->getParams()['sjmenulayout'] );
			if ( $menulayout ) {
				if ($menulayout->menuAlign == 'full') {
					$class .= ' '.self::SJMEGA_PREFIX.'-full-option';
				}
			}
		} else if( isset( $item->megamenu ) && ( $item->megamenu ) ) {
			$class .= ' sj-has-child';

			$menulayout = json_decode( $this->_items[$item->id]->getParams()['sjmenulayout'] );
			if ( $menulayout ) {
				if ($menulayout->menuAlign == 'full') {
					$class .= ' '.self::SJMEGA_PREFIX.'-full-option';
				}
			}
		}
		else if ( ( $item->parent_id == 1 ) && ( $item->megamenu == 0 ) )
		{
			$menulayout = json_decode( $this->_items[$item->id]->getParams()['sjmenulayout'] );

			if ( $menulayout ) {
				$layout = $menulayout->layout;
				$attr 	= $layout[0]->attr;

				if ($menulayout->menuAlign == 'full') {
					$class .= ' '.self::SJMEGA_PREFIX.'-full-option';
				}
				if ( $attr[0]->moduleId !== '' ) {
					$class .= ' sj-has-child';
				}
			}
		}

		if( $custom_class = $item->getParams()[ 'customclass' ] ) {
			$class .= ' ' . $custom_class;
		}

		$class .= ' item-'.$item->id.' level-'.$item->level.' mega-'.$item->getParams()['xmp_float'];
		$class .= ' '.$item->getParams()['xmp_tag_class'];
		
		$tag_id = '';
		if ($item->getParams()['xmp_tag_id'])
			$tag_id .= $item->getParams()['xmp_tag_id'];

		$class .= $item->class;

		if ($tag_id)
			return '<li id="'.$tag_id.'" class="'.$class.'">';
		else
			return '<li class="'.$class.'">';
	}

	private function end_el(){
		return '</li>';
	}

	private function item($item, $extra_class=''){
		$class = $extra_class;
		
        if(isset($item->anchor_title)){
			$title = 'title="' . $item->anchor_title . '" ';
		} else {
			$title = '';
		}

        if(isset($item->anchor_css)){
			$item->anchor_css = 'title="' . $item->anchor_css . '" ';
		} else {
			$item->anchor_css = '';
		}		

		$class = ($class) ? 'class="' . $class . $item->anchor_css . '" ' : '';

		if (isset($item->menu_image) && !empty($item->menu_image))
		{
			$item->getParams()['menu_text'] ?
			$linktitle = '<img src="' . $item->menu_image . '" alt="' . $item->title . '" /><span class="image-title">' . $item->title . '</span> ' :
			$linktitle = '<img src="' . $item->menu_image . '" alt="' . $item->title . '" />';
		}
		else
		{
			$linktitle = $item->title;
		}


		//Hide Link Title
		if(!$showmenutitle = $item->getParams()['showmenutitle']) {
			$linktitle = '';
		}

		//Add Menu Icon
		if ($item->getParams()['choose_icon'] == 'icon') {
			if($icon = $item->getParams()['icon']) {
				if($showmenutitle) {
					if ($item->getParams()['xmp_showsubtitle'] && $item->getParams()['xmp_description'] != '') {
						$linktitle = '<i class="fa ' . $icon . '"></i> ' . '<span //class="subtitle"><span>'.$linktitle.'</span><small>'.$item->getParams()['xmp_description'].'</small></span>';
					}else {
						$linktitle = '<i class="fa ' . $icon . '"></i> ' . '<span class="subtitle">'.$linktitle.'</span>';
					}
				} else {
					$linktitle = '<i class="fa ' . $icon . '"></i>';
				}
			}
		}
		else if ($item->getParams()['choose_icon'] == 'image') {
			if($image_icon = $item->getParams()['image_icon']) {
				if($showmenutitle) {
					if ($item->getParams()['xmp_showsubtitle'] && $item->getParams()['xmp_description']  != '') {
						$linktitle = '<img src="' . $image_icon . '" />' . '<span class="subtitle"><span>'.$linktitle.'</span><small>'.$item->getParams()['xmp_description'].'</small></span>';
					}else {
						$linktitle = '<img src="' . $image_icon . '" />' . '<span class="subtitle">'.$linktitle.'</span>';
					}
				} else {
					$linktitle = '<img src="' . $image_icon . '" />';
				}
			}
		}

		$flink = $item->flink;
		$flink = JFilterOutput::ampReplace(htmlspecialchars($flink));

		$output = '';
		if ($item->getParams()['menu_show'] != 0) {
			switch ($item->browserNav) {
				default:
				case 0:
					if ($item->getParams()['xmp_showlink']) {
						$output .= '<a '.$class.' href="'. $flink .'" '.$title.'>'.$linktitle.'</a>';	
					}
					else {
						$output .= '<span '.$class.' '.$title.'>'.$linktitle.'</span>';
					}
				break;
				case 1:
					$output .= '<a '. $class .' href="'. $flink .'" target="_blank" '. $title .'>'. $linktitle .'</a>';
				break;
				case 2:
					$options .= 'toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=yes,' . $params->get('window_open');
					$output .= '<a '. $class .' href="'. $flink .'" onclick="window.open(this.href,\'targetWindow\','. $options. ');return false;" '. $title .'>'. $linktitle .'</a>';
				break;
			}
		}

		return $output;

	}

	//Load Module by id or position
	private function load_module($mod)
	{		
		$app		= JFactory::getApplication();
		$user		= JFactory::getUser();
		$groups		= implode(',', $user->getAuthorisedViewLevels());
		$lang 		= JFactory::getLanguage()->getTag();
		$clientId 	= (int) $app->getClientId();

		$db	= JFactory::getDbo();
		$query = $db->getQuery(true);
		$query->select('id, title, module, position, content, showtitle, params');
		$query->from('#__modules AS m');

		$query->where('m.published = 1');

		if (is_numeric($mod)) {
		
			$query->where('m.id = ' . $mod);
		} else {
			$query->where('m.position = "' . $mod . '"');
		}

		$date = JFactory::getDate();
		$now = $date->toSql();
		$nullDate = $db->getNullDate();
		//$query->where('(m.publish_up = '.$db->Quote($nullDate).' OR m.publish_up <= '.$db->Quote($now).')');
		//$query->where('(m.publish_down = '.$db->Quote($nullDate).' OR m.publish_down >= '.$db->Quote($now).')');

		$query->where('m.access IN ('.$groups.')');
		$query->where('m.client_id = '. $clientId);

		// Filter by language
		if ($app->isClient('site') && $app->getLanguageFilter()) {
			$query->where('m.language IN (' . $db->Quote($lang) . ',' . $db->Quote('*') . ')');
		}

		$query->order('position, ordering');

		// Set the query
		$db->setQuery($query);

		$modules = $db->loadObjectList();
		if (!$modules) return null;

		$options = array('style' => 'sp_xhtml');
		$output = '';
		ob_start();
		foreach ($modules as $module) {
			$file				= $module->module;
			$custom				= substr($file, 0, 4) == 'mod_' ?  0 : 1;
			$module->user		= $custom;
			$module->name		= $custom ? $module->title : substr($file, 4);
			$module->style		= null;
			$module->position	= strtolower($module->position);
			$clean[$module->id]	= $module;
			echo JModuleHelper::renderModule($module, $options);
		}
		$output = ob_get_clean();
		return $output;
	}
}
