/*
    * Copyright 2004-2006 the Seasar Foundation and the Others.
    *
    * Licensed under the Apache License, Version 2.0 (the "License");
    * you may not use this file except in compliance with the License.
    * You may obtain a copy of the License at
    *
    *     http://www.apache.org/licenses/LICENSE-2.0
    *
   * Unless required by applicable law or agreed to in writing, software
   * distributed under the License is distributed on an "AS IS" BASIS,
   * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, 
   * either express or implied. See the License for the specific language
   * governing permissions and limitations under the License.
   */
  package org.seasar.tuigwaa.controller;
  
  import java.util.Enumeration;
  import java.util.List;
  import java.util.Properties;
  
  import javax.servlet.http.HttpServletRequest;
  import javax.servlet.http.HttpServletResponse;
  
  import org.apache.commons.logging.Log;
  import org.apache.commons.logging.LogFactory;
  import org.apache.struts.action.ActionForm;
  import org.apache.struts.action.ActionForward;
  import org.apache.struts.action.ActionMapping;
  import org.apache.struts.action.ActionMessage;
  import org.apache.struts.action.ActionMessages;
  import org.apache.struts.actions.MappingDispatchAction;
  import org.seasar.tuigwaa.cms.ContentsStoreService;
  import org.seasar.tuigwaa.cms.core.CmsConstants;
  import org.seasar.tuigwaa.logic.LogicService;
  import org.seasar.tuigwaa.logic.TgwEvent;
  import org.seasar.tuigwaa.logic.TgwFunction;
  import org.seasar.tuigwaa.logic.TgwLogic;
  import org.seasar.tuigwaa.logic.functor.PageJumpProcedure;
  import org.seasar.tuigwaa.system.Constants;
  import org.seasar.tuigwaa.system.DesignConfig;
  import org.seasar.tuigwaa.system.DesignService;
  import org.seasar.tuigwaa.system.SiteConfig;
  import org.seasar.tuigwaa.util.TgwContext;
  import org.seasar.tuigwaa.util.TgwResource;
  import org.seasar.tuigwaa.util.functor.TruePredicate;
  
  import com.isenshi.util.CharUtil;
  
  
  /***
   * @author someda
   */
  public class PageSettingAction extends MappingDispatchAction {	
  	
  	private Log log = LogFactory.getLog(getClass());
  	
  	private ContentsStoreService contentsStoreService;
  	
  	private DesignService designService;
  	
  	private LogicService logicService;
  	
  	public PageSettingAction(ContentsStoreService contentsStoreService, DesignService designService, LogicService logicService){
  		this.contentsStoreService = contentsStoreService;
  		this.designService = designService;
  		this.logicService = logicService;
  	}	
  	
  	public ActionForward edit(ActionMapping mapping, ActionForm form, HttpServletRequest request, HttpServletResponse response) throws Exception {
  		
  		TgwContext.initPageName();
  		String pageName = TgwContext.getPageName();
  		String siteName = TgwContext.getSiteName();		
  		TgwContext.bindPageName(pageName);
  		
  		bindPageList(request);
  		bindSkinList(request);
  		
  		Properties props = contentsStoreService.getProperty(siteName,pageName);
  		PageSettingForm pageSettingForm = new PageSettingForm();
  		pageSettingForm.setSettings(props);		
  		
  		String lockUser = props.getProperty(CmsConstants.PROPERTY_LOCKUSER);
  		if(lockUser != null){
  			pageSettingForm.setLock(true);			
  			if(!isUserAbleToOverwrite(request,lockUser)){
  				request.setAttribute(Constants.RATTR_PAGELOCK,"true");
  			}
  		}
  		
  		TgwLogic logic = logicService.getLogic(siteName,getAliasLogicName(pageName));
  		if(logic != null){	
  			TgwEvent event = logic.getEvent();
  			if(TgwEvent.PAGE_VIEW.equals(event.getType())){				
  				pageSettingForm.setAlias(event.getOption());				
  			}			
  		}		
  		request.setAttribute(Constants.RATTR_PAGESETTINGFORM,pageSettingForm);		
 		return mapping.findForward(Constants.LOCAL_FORWARD_SUCCESS);		
 	}
 	
 	public ActionForward save(ActionMapping mapping, ActionForm form, HttpServletRequest request, HttpServletResponse response) throws Exception {
 		PageSettingForm pageSettingForm = (PageSettingForm)form;
 		TgwContext.initPageName();
 		String pageName = pageSettingForm.getPageName();
 		String siteName = TgwContext.getSiteName();
 		TgwContext.bindPageName(pageName);
 		
 		bindPageList(request);
 		bindSkinList(request);
 		
 		boolean isInitialize = (request.getParameter("initialize") != null);
 		
 		ActionMessages msgs = new ActionMessages();		
 		if(isInitialize){
 			doInitialize(msgs,siteName,pageName);
 		}else{		
 			doSave(request,msgs,pageSettingForm,siteName,pageName);
 		}
 
 		if(logicService.getLogicList(siteName) != null){
 			logicService.saveLogics(siteName);
 		}
 		
 		saveMessages(request, msgs);
 		return mapping.findForward(Constants.LOCAL_FORWARD_SUCCESS);
 	}
 	
 	private void doInitialize(ActionMessages msgs, String siteName, String pageName) throws Exception{
 		Properties props = contentsStoreService.getProperty(siteName,pageName);
 		
 		if(props != null){
 			Enumeration penum = props.keys();
 			while(penum.hasMoreElements()){
 				String key = (String)penum.nextElement();
 				contentsStoreService.removeProperty(siteName,pageName,key);				
 			}			
 		}			
 		logicService.deleteLogic(siteName,getAliasLogicName(pageName));		
 		msgs.add(ActionMessages.GLOBAL_MESSAGE,
 				new ActionMessage("msg.pageSetting.initialize"));
 	}
 	
 	private void doSave(HttpServletRequest request,ActionMessages msgs, PageSettingForm pageSettingForm,String siteName, String pageName)
 	throws Exception{
 		// lock handling
 		handleLock(request,pageSettingForm,msgs);			
 		contentsStoreService.setProperty(siteName,pageName,pageSettingForm.getSettings());
 				
 		String alias = pageSettingForm.getAlias();
 		if(alias != null && !"".equals(alias)){
 			TgwEvent event = TgwEvent.createPageViewEvent(alias);
 			TgwFunction function = new TgwFunction();
 			function.setPredicate(TruePredicate.INSTANCE);
 			function.setProcedure(new PageJumpProcedure(CharUtil.charpop(pageName,'/')));
 			TgwLogic logic = new TgwLogic(getAliasLogicName(pageName),event,function);
 			logicService.editLogic(siteName,logic);
 		}else{
 			logicService.deleteLogic(siteName,getAliasLogicName(pageName));			
 		}
 		
 		msgs.add(ActionMessages.GLOBAL_MESSAGE,
 				new ActionMessage("msg.pageSetting.save"));		
 	}	
 	
 	private void handleLock(HttpServletRequest request,PageSettingForm pageSettingForm,ActionMessages msgs){
 		
 		String pageName = TgwContext.getPageName();
 		String siteName = TgwContext.getSiteName();
 		boolean isLock = pageSettingForm.isLock();
 		
 		try{		
 			Properties oldProps = contentsStoreService.getProperty(siteName,pageName);			
 			String oldLockUser = oldProps.getProperty(CmsConstants.PROPERTY_LOCKUSER);
 			if(isLock){// page-lock			
 				bindLock(request,oldLockUser,pageSettingForm,msgs);				
 			}else{// page-unlock			
 				unbindLock(request,oldLockUser);
 			}
 		}catch(Exception e){
 			log.error("failed to handle lock/unlock request");
 			e.printStackTrace();
 		}		
 	}
 	
 	private void bindLock(HttpServletRequest request,String oldLockUser,PageSettingForm pageSettingForm,ActionMessages msgs){
 
 		String remoteUser = request.getRemoteUser();
 		String pageName = TgwContext.getPageName();
 		
 		Properties props = pageSettingForm.getSettings();
 		
 		if(remoteUser == null){
 			// unauthorized user cannot lock page
 			pageSettingForm.setLock(false); // change un-lock, only display issue
 			msgs.add(ActionMessages.GLOBAL_MESSAGE, 
 					new ActionMessage("msg.pageSetting.failtolock"));				
 		}else{
 			if(oldLockUser == null || isUserAbleToOverwrite(request,oldLockUser)){
 				props.setProperty(CmsConstants.PROPERTY_LOCKUSER,remoteUser);
 				log.info("lock page " + pageName + " with user " + remoteUser);					
 			}else{
 				log.warn("current user cannot have enough priviledge to override lock settings.");					
 			}
 		}
 	}
 	
 	private void unbindLock(HttpServletRequest request,String oldLockUser) throws Exception{
 		
 		String remoteUser = request.getRemoteUser();
 		String pageName = TgwContext.getPageName();
 		String siteName = TgwContext.getSiteName();
 		
 		if(remoteUser == null){
 			if(oldLockUser != null){
 				log.warn("unauthorized user cannot unlock page, this should not be happen.");
 			}
 		}else{
 			if(oldLockUser != null){
 				if(isUserAbleToOverwrite(request,oldLockUser)){
 					contentsStoreService.removeProperty(siteName,pageName,CmsConstants.PROPERTY_LOCKUSER);
 					log.info("unlock page " + pageName + " by user " + remoteUser);
 				}else{
 					log.warn("current user cannot have enough priviledge to override lock settings.");							
 				}
 			}				
 		}		
 	}
 	
 	private boolean isUserAbleToOverwrite(HttpServletRequest request, String targetUser){
 		boolean flag = false;
 				
 		if(request.isUserInRole(TgwResource.getProperty("ldap.admin.rolename"))){// user is in admin role
 			flag = true;
 		}else{
 			String remoteUser = request.getRemoteUser();
 			if(targetUser.equals(remoteUser)){
 				flag = true;
 			}			
 		}				
 		return flag;		
 	}	
 	
 	private void bindPageList(HttpServletRequest request){
 		String siteName = TgwContext.getSiteName();
 		try{
 			List list = contentsStoreService.getRecursivePageList(siteName,"");		
 			request.setAttribute(Constants.RATTR_PAGELIST,list);
 		}catch(Exception e){
 			log.error("failed to retrieve page list : " + e.getMessage());			
 		}
 	}
 	
 	private void bindSkinList(HttpServletRequest request){		
 		SiteConfig siteConfig = TgwContext.getSiteConfig();	
 		DesignConfig config = designService.getDesignConfig(siteConfig.getSkin());
 		request.setAttribute(Constants.RATTR_SKIN_PAGELIST,config.getAvailablePages());		
 	}
 	
 	private String getAliasLogicName(String pageName){		
 		pageName = CharUtil.charpop(pageName,'/');		
 		return pageName + Constants.LOGIC_PAGEALIAS_SUFFIX;		
 	}
 			
 }