site-menu-widget/app/controllers/site_menu_widgets_controller.rb

class SiteMenuWidgetsController < ApplicationController
	def create_json(pages)
		items = []
		pages.each do |page|
			item = {}
			item["obj"] = page
			if page.child_page.size > 0
				item["page_name"] = page.name
				item["children"] = create_json(page.sorted_published_child_pages)
				if page.page_type == "page" or page.page_type == "link"
					item["url"] = (page.page_type == "link") ? "/#{locale.to_s}" + page.external_url : "/#{locale.to_s}" + page.url
					item["target"] = "_self"
				else
					item["url"] = "/#{locale.to_s}" + page.url
					item["target"] = "_blank"
				end
			else
				item["page_name"] = page.name
				item["children"] = []
				if page.page_type == "page"
					item["url"] = "/#{locale.to_s}" + page.url
					item["target"] = "_self"
				else
					item["url"] = page.external_url
					item["target"] = (is_internal_url?(page.external_url) ? "_self" : "_blank") rescue "_blank"
				end
			end
			items << item
		end
		items
	end
	def create_menu_bool_object (items)
		#item_all = []
		items.each do |item1|
			#item = []
			@count += 1
			if (!item1["children"].nil? && item1["children"].length!=0)
				@li_index << @count
				if children_is_current(item1['obj'])
					@ul_index << ( @li_index.length - 1 )
				end
				create_menu_bool_object(item1['children'])
				#item = [children_is_current(item1['obj']),item1['obj'].id==@page_id,create_menu_bool_object(item1['children'])]
			else
				#item = [children_is_current(item1['obj']),item1['obj'].id==@page_id]
			end
			#item_all << item
		end
		#item_all
	end
	def children_is_current (page)
		page.sorted_published_child_pages.select{|v| v.id==@page_id}.length!=0 rescue false
	end
	def widget
		subpart = OrbitHelper.get_current_widget
		params = OrbitHelper.params
		page = Page.where(:page_id => params[:page_id]).first
		@page_id = page.id
		@expand_layer = false
		if page.parent_page == Page.root
			@pages = page.sorted_published_child_pages
		else
			@pages = page.parent_page.sorted_published_child_pages
			if subpart.methods.include? 'select_options'.to_sym
				OrbitWidget.all.select{|tmp| tmp.key.to_s=='site_menu_widget'}.each do |orbit_widget|
			      @show_options = orbit_widget.show_options rescue nil
			    end
				subpart.select_options.each do |select_option|
				    puts ['show',@show_options]
				    if !(@show_options.nil?) && select_option.field_name == @show_options.keys.first.to_s
				    	value = YAML.load(select_option.value)
				    	if value[I18n.locale] == t('site_menu.yes')
				    		if page.parent_page.parent_page == Page.root
				    			@pages = Array(page.parent_page)
				    		else
					    		@pages = page.parent_page.parent_page.sorted_published_child_pages
					    	end
				    	end
				    elsif !(@show_options.nil?) && select_option.field_name == @show_options.keys[1].to_s
				    	value = YAML.load(select_option.value)
				    	if value[I18n.locale] == t('site_menu.yes')
				    		@expand_layer = true
				    	end 
				    end
				end
			end
		end
		@ul_index=[]
		@li_index= []
		@count = -1
		title = subpart.title
		items = create_json(@pages)
		create_menu_bool_object(items)
		if @expand_layer  
			temp = @ul_index.reverse.collect do |ul_index|
					tp = @li_index[ul_index] + 1
					"var ul_tp = $('div[data-subpart-id=#{subpart.id}]').find('ul').eq(#{tp})
					 ul_tp.removeClass('dropdown-menu')
					 $('div[data-subpart-id=#{subpart.id}]').find('li').eq(#{@li_index[ul_index]}).find('span').eq(0).remove()
					"
				end
			if temp.length != 0
				temp = temp.join(' ')
				expand_script = "<script type='text/javascript'>" + 
								"$('div[data-subpart-id=#{subpart.id}]').ready(function(){" + 
								temp + '})'+
								"</script>"
			else
				expand_script = ''
			end
		else
			expand_script=""
		end
		{
			"pages" => items,
			"extras" => {"widget_title" => title.to_s,"expand-script"=>expand_script}
		}
		
	end

	def is_internal_url?(link)
		internal = false
		if !link.nil?
	  		link = link.split("?").first
			temp_url = URI.parse(link)
			if temp_url.host.nil?
				internal = true
			end
		end
		return internal
	end
end