/*
 * Copyright 2001-2003 The eXo platform SARL All rights reserved.
 * Please look at license.txt in info directory for more license detail. 
 *  
 * Created on 16 janv. 2004
 */
package org.exoplatform.services.wsrp.producer.impl;

import java.util.Collection;
import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Locale;
import java.util.Map;
import java.util.MissingResourceException;
import java.util.Set;

import javax.portlet.WindowState;

import org.apache.commons.lang.StringUtils;
import org.apache.commons.logging.Log;
import org.exoplatform.Constants;
import org.exoplatform.services.log.LogService;
import org.exoplatform.services.portletcontainer.*;
import org.exoplatform.services.portletcontainer.pci.*;
import org.exoplatform.services.portletcontainer.pci.model.*;
import org.exoplatform.services.wsrp.WSRPConstants;
import org.exoplatform.services.wsrp.exceptions.Faults;
import org.exoplatform.services.wsrp.exceptions.WSRPException;
import org.exoplatform.services.wsrp.producer.PortletContainerProxy;
import org.exoplatform.services.wsrp.producer.impl.helpers.WSRPHttpServletRequest;
import org.exoplatform.services.wsrp.producer.impl.helpers.WSRPHttpServletResponse;
import org.exoplatform.services.wsrp.type.LocalizedString;
import org.exoplatform.services.wsrp.type.MarkupType;
import org.exoplatform.services.wsrp.type.PortletDescription;
import org.exoplatform.services.wsrp.type.Property;
import org.exoplatform.services.wsrp.type.PropertyList;
import org.exoplatform.services.wsrp.type.ResourceList;
import org.exoplatform.services.wsrp.utils.Utils;


/**
 * @author Mestrallet Benjamin
 *         benjmestrallet@users.sourceforge.net
 */
public class JSR168ContainerProxyImpl implements PortletContainerProxy {

  private Log log;
  private PortletContainerService service_;
  private WSRPConfiguration conf;
  private WSRPPortletPreferencesPersister persister;

  public JSR168ContainerProxyImpl(PortletContainerService service,
                                  WSRPConfiguration conf,
                                  LogService logService) {
    service_ = service;
    this.log = logService.getLog("org.exoplatform.services.wsrp");
    this.conf = conf;
    this.persister = WSRPPortletPreferencesPersister.getInstance();
  }

  public boolean isPortletOffered(String portletHandle) {
    String[] key = StringUtils.split(portletHandle, Constants.PORTLET_HANDLE_ENCODER);
    if (service_.getAllPortletMetaData().get(key[0] + Constants.PORTLET_HANDLE_ENCODER + key[1]) != null) {
      return true;
    }
    return false;
  }

  public ResourceList getResourceList(String[] desiredLocales) {
    //TODO discover what a resource is
    return new ResourceList();
  }

  public PortletDescription getPortletDesciption(String portletHandle,
                                                 String[] desiredLocales) {
    String[] k = StringUtils.split(portletHandle, Constants.PORTLET_META_DATA_ENCODER);
    String portletApplicationName = k[0];
    String portletName = k[1];
    log.debug("get description of portlet in application : " + portletApplicationName);
    log.debug("get description of portlet : " + portletName);

    Map portletMetaDatas = service_.getAllPortletMetaData();
    PortletData portlet = (PortletData) portletMetaDatas.get(k[0] + Constants.PORTLET_META_DATA_ENCODER + k[1]);
    PortletDescription pD = new PortletDescription();
     
    //delegation to JSR 168 specs
    pD.setPortletHandle(portletHandle);
    pD.setOnlySecure(new Boolean(portlet.isSecure()));
    pD.setDefaultMarkupSecure(new Boolean(portlet.isSecure()));
    List portletDescriptions = portlet.getDescription();
    if (!(portletDescriptions == null || portletDescriptions.size() == 0)) {
      pD.setDescription(getDescription(portletDescriptions, desiredLocales));
    }
    List portletDisplayNames = portlet.getDisplayName();
    if (!(portletDisplayNames == null || portletDisplayNames.size() == 0)) {
      pD.setDisplayName(getDisplayName(portletDisplayNames, desiredLocales));
    }
    pD.setGroupID(portletApplicationName);
    pD.setKeywords(getKeyWords(portletApplicationName, portletName, desiredLocales));
    pD.setMarkupTypes(setMarkupTypes(portlet.getSupports(),
        service_.getWindowStates(portletApplicationName),
        desiredLocales));

    pD.setShortTitle(getShortTitle(portletApplicationName, portletName, desiredLocales));
    pD.setTitle(getTitle(portletApplicationName, portletName, desiredLocales));
    pD.setUserProfileItems(getUserProfileItems(portlet.getUserAttributes()));
    
    //WSRP specific issues
    pD.setHasUserSpecificState(new Boolean(conf.isHasUserSpecificState()));
    pD.setDoesUrlTemplateProcessing(new Boolean(conf.isDoesUrlTemplateProcessing()));
    pD.setTemplatesStoredInSession(new Boolean(conf.isTemplatesStoredInSession()));
    pD.setUserContextStoredInSession(new Boolean(conf.isUserContextStoredInSession()));
    pD.setUsesMethodGet(new Boolean(conf.isUsesMethodGet()));
    //pD.setUserCategories(null);

    return pD;
  }


  public void setPortletProperties(String portletHandle,
                                   String owner,
                                   PropertyList propertyList)
      throws WSRPException {
    // key[0] = application name , key[1] portlet name
    log.debug("portlet handle to split in setPortletProperties : " + portletHandle);
    String[] key = StringUtils.split(portletHandle, Constants.PORTLET_META_DATA_ENCODER);
    //mapping WSRP / JSR 168 : a property is a preference type
    Property[] properties = propertyList.getProperties();
    Map propertiesMap = new HashMap();
    for (int i = 0; i < properties.length; i++) {
      Property property = properties[i];
      //Locale locale = new Locale(property.getLang());//No mapping available in JSR 168
      String preferenceName = property.getName();
      String preferenceValue = property.getStringValue();
      propertiesMap.put(preferenceName, preferenceValue);
    }
    Input input = new Input();
    ExoWindowID windowID = new ExoWindowID();
    windowID.setOwner(owner);
    windowID.setPortletApplicationName(key[0]);
    windowID.setPortletName(key[1]);
    windowID.setUniqueID(key[2]);
    input.setWindowID(windowID);
    input.setPortletPreferencesPersister(persister);
    try {
      service_.setPortletPreference(input, propertiesMap);
    } catch (Exception e) {
      log.error("error while storing preferences", e);
      throw new WSRPException(Faults.OPERATION_FAILED_FAULT);
    }

  }

  public Map getPortletProperties(String portletHandle, String owner)
      throws WSRPException {
    // key[0] = application name , key[1] portlet name
    String[] key = StringUtils.split(portletHandle, Constants.PORTLET_META_DATA_ENCODER);
    try {
      Input input = new Input();
      ExoWindowID windowID = new ExoWindowID();
      windowID.setOwner(owner);
      windowID.setPortletApplicationName(key[0]);
      windowID.setPortletName(key[1]);
      windowID.setUniqueID(key[2]);
      input.setWindowID(windowID);
      input.setPortletPreferencesPersister(persister);
      return service_.getPortletPreference(input);
    } catch (Exception e) {
      throw new WSRPException(Faults.OPERATION_FAILED_FAULT);
    }
  }

  public Map getAllPortletMetaData() {
    return service_.getAllPortletMetaData();
  }

  public Collection getWindowStates(String s) {
    return service_.getWindowStates(s);
  }

  public Collection getSupportedWindowStates() {
    return service_.getSupportedWindowStates();
  }

  public RenderOutput render(WSRPHttpServletRequest request, WSRPHttpServletResponse response, RenderInput input)
      throws WSRPException {
    try {
      return service_.render(request, response, input);
    } catch (PortletContainerException e) {
      throw new WSRPException(Faults.OPERATION_FAILED_FAULT, e);
    }
  }

  public ActionOutput processAction(WSRPHttpServletRequest request, WSRPHttpServletResponse response, ActionInput input)
      throws WSRPException {
    try {
      ActionOutput out = service_.processAction(request, response, input);
      Map propertiesMap = out.getProperties();
      Set set = propertiesMap.keySet();
      for (Iterator iterator = set.iterator(); iterator.hasNext();) {
        String key = (String) iterator.next();
        if (key.startsWith(PortletContainerConstants.EXCEPTION)) {
          log.error("Error body : " + propertiesMap.get(key));
          throw new WSRPException(Faults.PORTLET_STATE_CHANGE_REQUIRED_FAULT);
        }
      }
      return out;
    } catch (PortletContainerException e) {
      throw new WSRPException(Faults.OPERATION_FAILED_FAULT, e);
    }
  }

  public Collection getSupportedPortletModesWithDescriptions() {
    return service_.getSupportedPortletModesWithDescriptions();
  }

  public Collection getSupportedWindowStatesWithDescriptions() {
    return service_.getSupportedWindowStatesWithDescriptions();
  }

  private LocalizedString getDescription(List list, String[] desiredLocales) {
    for (int i = 0; i < desiredLocales.length; i++) {
      String desiredLocale = desiredLocales[i];
      for (Iterator iter = list.iterator(); iter.hasNext();) {
        Description desc = (Description) iter.next();        
        if (desc.getLang().equalsIgnoreCase(desiredLocale)) {
          return Utils.getLocalizedString(desc.getDescription(), desiredLocale);
        }
      }
    }
    return null;
  }

  private LocalizedString getDisplayName(List list, String[] desiredLocales) {
    for (int i = 0; i < desiredLocales.length; i++) {
      String desiredLocale = desiredLocales[i];
      for (Iterator iter = list.iterator(); iter.hasNext();) {
        DisplayName displayName = (DisplayName) iter.next();
        if (displayName.getLang().equalsIgnoreCase(desiredLocale)) {
          return Utils.getLocalizedString(displayName.getDisplayName(), desiredLocale);
        }
      }
    }
    return null;
  }

  private LocalizedString[] getKeyWords(String portletAppName,
                                        String portletName,
                                        String[] desiredLocales) {
    for (int i = 0; i < desiredLocales.length; i++) {
      String desiredLocale = desiredLocales[i];
      java.util.ResourceBundle resourceBundle = getBundle(portletAppName, portletName,
          new Locale(desiredLocale));
      if (resourceBundle.getLocale().getLanguage().equalsIgnoreCase(desiredLocale)
          || i == desiredLocales.length - 1) {
        try {
          String keyWords = resourceBundle.getString(PortletData.KEYWORDS);
          String[] a = StringUtils.split(keyWords, ",");
          LocalizedString[] b = new LocalizedString[a.length];
          for (int j = 0; j < a.length; j++) {
            b[j] = Utils.getLocalizedString(a[j], desiredLocale);
          }
          return b;          
        } catch (MissingResourceException ex){
          log.debug("No keyword defined for the portlet " + portletAppName + "/" + portletName);
          return null;
        }
      }
    }
    return null;
  }

  private MarkupType[] setMarkupTypes(List list, Collection windowStates, String[] locales) {
    MarkupType[] array = new MarkupType[list.size()];
    int i = 0;
    MarkupType mT = null;
    for (Iterator iter = list.iterator(); iter.hasNext(); i++) {
      Supports element = (Supports) iter.next();
      mT = new MarkupType();
      mT.setMimeType(element.getMimeType());
      List modes = element.getPortletMode();
      String[] modesInArray = new String[modes.size()];
      int j = 0;
      for (Iterator iterator = modes.iterator(); iterator.hasNext(); j++) {
        String pM = (String) iterator.next();
        modesInArray[j] = WSRPConstants.WSRP_PREFIX + pM.toString();
      }
      mT.setModes(modesInArray);
      j = 0;
      String[] windowStatesInArray = new String[windowStates.size()];
      for (Iterator iterator = windowStates.iterator(); iterator.hasNext(); j++) {
        WindowState wS = (WindowState) iterator.next();
        windowStatesInArray[j] = WSRPConstants.WSRP_PREFIX + wS.toString();
      }
      mT.setWindowStates(windowStatesInArray);
      mT.setLocales(locales);
      array[i] = mT;
    }
    return array;
  }

  private LocalizedString getTitle(String portletAppName,
                                   String portletName,
                                   String[] desiredLocales) {
    for (int i = 0; i < desiredLocales.length; i++) {
      String desiredLocale = desiredLocales[i];
      java.util.ResourceBundle resourceBundle = getBundle(portletAppName, portletName,
          new Locale(desiredLocale));
      if (resourceBundle.getLocale().getLanguage().equalsIgnoreCase(desiredLocale)
          || i == desiredLocales.length - 1) {
        return Utils.getLocalizedString(resourceBundle.getString(PortletData.PORTLET_TITLE),
            desiredLocale);
      }
    }
    return null;
  }

  private LocalizedString getShortTitle(String portletAppName,
                                        String portletName,
                                        String[] desiredLocales) {
    for (int i = 0; i < desiredLocales.length; i++) {
      String desiredLocale = desiredLocales[i];
      java.util.ResourceBundle resourceBundle = getBundle(portletAppName, portletName,
          new Locale(desiredLocale));
      if (resourceBundle.getLocale().getLanguage().equalsIgnoreCase(desiredLocale)
          || i == desiredLocales.length - 1) {
        try{
          return Utils.getLocalizedString(resourceBundle.getString(PortletData.PORTLET_SHORT_TITLE),
              desiredLocale);
        } catch (MissingResourceException ex){          
          log.debug("No short title defined for the portlet " + portletAppName + "/" + portletName);
          return null;
        }
      }
    }
    return null;
  }

  private String[] getUserProfileItems(List userAttributes) {
    String[] toReturnArray = new String[userAttributes.size()];
    int i = 0;
    for (Iterator iter = userAttributes.iterator(); iter.hasNext(); i++) {
      UserAttribute userAttr = (UserAttribute) iter.next();
      toReturnArray[i] = userAttr.getName();
    }
    return toReturnArray;
  }

  private java.util.ResourceBundle getBundle(String portletAppName, String portletName, Locale locale) {
    try {
      WSRPHttpServletRequest request = new WSRPHttpServletRequest(null);
      WSRPHttpServletResponse response = new WSRPHttpServletResponse();
      return service_.getBundle(request, response,
          portletAppName, portletName,
          locale);
    } catch (PortletContainerException e) {
      e.printStackTrace();
    }
    return null;
  }
}