/*
 * Created on Nov 10, 2005
 *	by angela
 */
package net.sourceforge.fenixedu.presentationTier.backBeans.person;

import java.util.ArrayList;
import java.util.Collections;
import java.util.Comparator;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.ResourceBundle;
import java.util.Set;
import java.util.TreeMap;
import java.util.TreeSet;

import javax.faces.component.html.HtmlInputHidden;
import javax.faces.context.FacesContext;
import javax.faces.model.SelectItem;

import net.sourceforge.fenixedu._development.PropertiesManager;
import net.sourceforge.fenixedu.applicationTier.Filtro.exception.FenixFilterException;
import net.sourceforge.fenixedu.applicationTier.Servico.exceptions.FenixServiceException;
import net.sourceforge.fenixedu.domain.ExecutionYear;
import net.sourceforge.fenixedu.domain.Person;
import net.sourceforge.fenixedu.domain.organizationalStructure.AccountabilityTypeEnum;
import net.sourceforge.fenixedu.domain.organizationalStructure.Contract;
import net.sourceforge.fenixedu.domain.organizationalStructure.Function;
import net.sourceforge.fenixedu.domain.organizationalStructure.PartyTypeEnum;
import net.sourceforge.fenixedu.domain.organizationalStructure.PersonFunction;
import net.sourceforge.fenixedu.domain.organizationalStructure.Unit;
import net.sourceforge.fenixedu.domain.organizationalStructure.UnitUtils;
import net.sourceforge.fenixedu.persistenceTier.ExcepcaoPersistencia;
import net.sourceforge.fenixedu.presentationTier.Action.sop.utils.ServiceUtils;
import net.sourceforge.fenixedu.presentationTier.backBeans.base.FenixBackingBean;
import net.sourceforge.fenixedu.util.LanguageUtils;
import net.sourceforge.fenixedu.util.PeriodState;

import org.apache.commons.lang.StringUtils;
import org.joda.time.YearMonthDay;

public class OrganizationalStructureBackingBean extends FenixBackingBean {

    public Integer choosenExecutionYearID;
    
    public Unit parentUnit;

    public Integer personID;

    public ResourceBundle bundle;

    public String listType;

    private HtmlInputHidden unitIDHidden;

    public OrganizationalStructureBackingBean() {
	if (getRequestParameter("unitID") != null) {
	    getUnitIDHidden().setValue(getRequestParameter("unitID"));
	}	
	this.bundle = ResourceBundle.getBundle("resources.EnumerationResources", LanguageUtils
		.getLocale());
    }

    public List getExecutionYears() throws FenixFilterException, FenixServiceException {
	final Set<ExecutionYear> executionYears = rootDomainObject.getExecutionYearsSet();

	List<SelectItem> result = new ArrayList<SelectItem>(executionYears.size());
	for (ExecutionYear executionYear : executionYears) {
	    if (executionYear.getYear().compareTo("2005/2006") >= 0) {
		result.add(new SelectItem(executionYear.getIdInternal(), executionYear.getYear(),
			executionYear.getState().getStateCode()));
	    }
	}

	Collections.reverse(result);
	if (getChoosenExecutionYearID() == null) {
	    for (SelectItem selectExecutionYear : result) {
		if (selectExecutionYear.getDescription().equals(PeriodState.CURRENT_CODE)) {		   
		    setChoosenExecutionYearID((Integer) selectExecutionYear.getValue());
		}
	    }
	}

	return result;
    }

    public String getUnits() throws FenixFilterException, FenixServiceException, ExcepcaoPersistencia {
	StringBuilder buffer = new StringBuilder();
	YearMonthDay currentDate = new YearMonthDay();
	PartyTypeEnum partyType = null;
	boolean writeSeparatorLine = false;

	Map<PartyTypeEnum, Set<Unit>> allInstitutionSubUnits = getAllInstitutionSubUnits();

	for (PartyTypeEnum partyTypeEnum : allInstitutionSubUnits.keySet()) {
	    for (Unit unit : allInstitutionSubUnits.get(partyTypeEnum)) {
		if (unit.getType() != null) {

		    // Title
		    if (partyType == null || !partyType.equals(unit.getType())) {
			partyType = unit.getType();
			buffer.append("<h3 class='mtop2'>").append(
				this.bundle.getString(partyType.getName())).append("</h3>\r\n");
		    }

		} else if (unit.getType() == null) {

		    // End Separator Line
		    if (writeSeparatorLine == false) {
			buffer
				.append("<div class='mtop2' style='color: #aaa;'>- - - - - - - -</div>\r\n");
			buffer.append("<h3 class='mtop2'>").append(
				this.bundle.getString(PartyTypeEnum.UNKNOWN.getName())).append(
				"</h3>\r\n");
			writeSeparatorLine = true;
		    }
		}

		buffer.append("<ul class='padding nobullet'>\r\n");

		List<Unit> activeSubUnits = unit.getActiveSubUnits(currentDate,
			AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE);
		Collections.sort(activeSubUnits, Unit.UNIT_COMPARATOR_BY_NAME);

		if (!activeSubUnits.isEmpty()) {

		    buffer.append("\t<li><img ").append("src='").append(getContextPath()).append(
			    "/images/toggle_plus10.gif' id='img").append(unit.getIdInternal()).append("'")
			    .append("onClick=\"check(document.getElementById('aa")
			    .append(unit.getIdInternal()).append("'),document.getElementById('").append(
				    unit.getIdInternal()).append("'));return false;\"/> ");

		    buffer.append("<a href='").append(getContextPath()).append(
			    "/messaging/organizationalStructure/chooseUnit.faces?unitID=").append(
			    unit.getIdInternal()).append("'>").append(unit.getNameWithAcronym()).append(
			    "</a></li>\r\n");

		} else {

		    buffer.append("\t<li><a href='").append(getContextPath()).append(
			    "/messaging/organizationalStructure/chooseUnit.faces?unitID=").append(
			    unit.getIdInternal()).append("'>").append(unit.getNameWithAcronym()).append(
			    "</a></li>\r\n");

		}

		getInstitutionSubUnitsTree(buffer, unit, activeSubUnits, currentDate);
		buffer.append("</ul>\r\n");
	    }
	}

	return buffer.toString();
    }

    private void getInstitutionSubUnitsTree(StringBuilder buffer, Unit parentUnit,
	    List<Unit> activeSubUnits, YearMonthDay currentDate) {

	if (!activeSubUnits.isEmpty()) {
	    buffer.append("\t<li class='nobullet'><ul class='mvert0' id='aa").append(parentUnit.getIdInternal()).append(
		    "' style='display:none'>\r\n");
	    for (Unit subUnit : activeSubUnits) {
		getSubUnitsWithoutAggregatedUnitsList(buffer, currentDate, subUnit);
	    }
	    buffer.append("\t</ul></li>\r\n");
	}
    }

    private void getSubUnitsList(Unit parentUnit, StringBuilder buffer, YearMonthDay currentDate) {

	buffer.append("\t\t<li><a href='").append(getContextPath()).append(
		"/messaging/organizationalStructure/chooseUnit.faces?unitID=").append(
		parentUnit.getIdInternal()).append("'>").append(parentUnit.getNameWithAcronym()).append(
		"</a></li>\r\n");

	List<Unit> activeSubUnits = parentUnit.getActiveSubUnits(currentDate,
		AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE);

	if (!activeSubUnits.isEmpty()) {
	    buffer.append("\t\t<li class='nobullet'><ul class='mvert0'>\r\n");
	}

	for (Unit subUnit : activeSubUnits) {
	    getSubUnitsWithoutAggregatedUnitsList(buffer, currentDate, subUnit);
	}

	if (!activeSubUnits.isEmpty()) {
	    buffer.append("\t\t</ul></li>\r\n");
	}
    }

    private void getSubUnitsWithoutAggregatedUnitsList(StringBuilder buffer, YearMonthDay currentDate,
	    Unit subUnit) {
	List<Unit> validInstitutionSubUnits = null;
	if (subUnit.getType() != null && subUnit.getType().equals(PartyTypeEnum.AGGREGATE_UNIT)) {
	    validInstitutionSubUnits = getValidInstitutionSubUnits(subUnit, currentDate);
	}
	if (validInstitutionSubUnits != null) {
	    for (Unit validSubUnit : validInstitutionSubUnits) {
		getSubUnitsList(validSubUnit, buffer, currentDate);
	    }
	} else {
	    getSubUnitsList(subUnit, buffer, currentDate);
	}
    }

    public Map<PartyTypeEnum, Set<Unit>> getAllInstitutionSubUnits() throws FenixFilterException,
	    FenixServiceException, ExcepcaoPersistencia {

	YearMonthDay currentDate = new YearMonthDay();
	List<Unit> othersUnits = new ArrayList<Unit>();
	Map<PartyTypeEnum, Set<Unit>> resultMap = new TreeMap<PartyTypeEnum, Set<Unit>>(
		new Comparator() {
		    public int compare(Object arg0, Object arg1) {
			PartyTypeEnum partyTypeEnum1 = (PartyTypeEnum) arg0;
			PartyTypeEnum partyTypeEnum2 = (PartyTypeEnum) arg1;
			return partyTypeEnum1.compareTo(partyTypeEnum2);
		    }
		});

	Unit istUnit = UnitUtils.readInstitutionUnit();
	if (istUnit == null) {
	    return new HashMap<PartyTypeEnum, Set<Unit>>();
	}

	for (Unit subUnit : istUnit.getActiveSubUnits(currentDate,
		AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE)) {

	    if (subUnit.getType() != null && subUnit.getType().equals(PartyTypeEnum.AGGREGATE_UNIT)) {
		othersUnits.addAll(getValidInstitutionSubUnits(subUnit, currentDate));
		for (Unit unit : othersUnits) {
		    addUnitToMap(resultMap, unit);
		}
	    } else {
		addUnitToMap(resultMap, subUnit);
	    }
	}

	return resultMap;
    }

    private void addUnitToMap(Map<PartyTypeEnum, Set<Unit>> resultMap, Unit subUnit) {
	PartyTypeEnum type = subUnit.getType();
	if (type == null) {
	    type = PartyTypeEnum.UNKNOWN;
	}

	if (!resultMap.containsKey(type)) {
	    Set newSet = new TreeSet<Unit>(Unit.UNIT_COMPARATOR_BY_NAME);
	    newSet.add(subUnit);
	    resultMap.put(type, newSet);
	} else {
	    resultMap.get(type).add(subUnit);
	}
    }

    private List<Unit> getValidInstitutionSubUnits(Unit unit, YearMonthDay currentDate) {
	List<Unit> result = new ArrayList<Unit>();
	for (Unit subUnit : unit.getActiveSubUnits(currentDate,
		AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE)) {
	    if (subUnit.getType() == null || !subUnit.getType().equals(PartyTypeEnum.AGGREGATE_UNIT)) {
		result.add(subUnit);
	    } else if (subUnit.getType().equals(PartyTypeEnum.AGGREGATE_UNIT)) {
		result.addAll(getValidInstitutionSubUnits(subUnit, currentDate));
	    }
	}
	return result;
    }

    public String getInstituitionName() throws ExcepcaoPersistencia, FenixServiceException {
	Unit institution = UnitUtils.readInstitutionUnit();
	if (institution != null) {
	    return institution.getName();
	}
	return null;
    }

    public String getTitle() throws ExcepcaoPersistencia, FenixFilterException, FenixServiceException {
	StringBuffer buffer = new StringBuffer();
	buffer.append("<p><em>");
	buffer.append(this.getUnit().getParentUnitsPresentationName());
	buffer.append("</em></p>");
	buffer.append("<h2>").append(this.getUnit().getNameWithAcronym()).append("</h2>");
	return buffer.toString();
    }

    public String getFunctions() throws FenixFilterException, FenixServiceException {

	StringBuffer buffer = new StringBuffer();
	YearMonthDay currentDate = new YearMonthDay();
	Unit chooseUnit = this.getUnit();
	ExecutionYear iExecutionYear = getExecutionYear(getChoosenExecutionYearID());

	buffer.append("<ul class='mtop3 nobullet'><li>");
	// buffer.append("<image
	// src='").append(getContextPath()).append("/images/unit-icon.gif'/>")
	// .append(" ");
	buffer.append("<strong class='highlight6' id='aa");
	buffer.append(chooseUnit.getIdInternal()).append("'>");
	buffer.append(chooseUnit.getName()).append("</strong>");

	if (StringUtils.isEmpty(getListType()) || getListType().equals("#") || getListType().equals("0")) {
	    printUnitWorkingEmployees(chooseUnit, iExecutionYear, buffer);
	}

	for (Function function : getSortFunctionList(chooseUnit)) {
	    if (function.belongsToPeriod(iExecutionYear.getBeginDateYearMonthDay(), iExecutionYear
		    .getEndDateYearMonthDay())) {
		if (StringUtils.isEmpty(getListType()) || getListType().equals("#")
			|| getListType().equals("1")) {
		    buffer.append("<ul><li class='tree_label'>").append(function.getName()).append(": ");
		    buffer.append((function.getParentInherentFunction() != null) ? " (Cargo Inerente)"
			    : "");
		    getPersonFunctionsList(chooseUnit, function, buffer, iExecutionYear);
		    buffer.append("</li></ul>");
		}
	    }
	}

	List<Unit> activeSubUnit = chooseUnit.getActiveSubUnits(currentDate,
		AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE);
	Collections.sort(activeSubUnit, Unit.UNIT_COMPARATOR_BY_NAME);

	for (Unit subUnit : activeSubUnit) {
	    getSubUnitsWithoutAggregatedUnitsToFunctionList(buffer, iExecutionYear, currentDate, subUnit);
	}

	buffer.append("</li></ul>");
	return buffer.toString();
    }

    private void getSubUnitsFunctions(Unit subUnit, YearMonthDay currentDate,
	    ExecutionYear iExecutionYear, StringBuffer buffer) {

	buffer.append("<ul class='mtop1 nobullet'><li>");
	// buffer.append("<image
	// src='").append(getContextPath()).append("/images/unit-icon.gif'/>")
	// .append(" ");
	buffer.append("<strong id='aa").append(subUnit.getIdInternal()).append("' >").append(
		subUnit.getName()).append("</strong>");

	if (StringUtils.isEmpty(getListType()) || getListType().equals("#") || getListType().equals("0")) {
	    printUnitWorkingEmployees(subUnit, iExecutionYear, buffer);
	}

	for (Function function : getSortFunctionList(subUnit)) {
	    if (function.belongsToPeriod(iExecutionYear.getBeginDateYearMonthDay(), iExecutionYear
		    .getEndDateYearMonthDay())) {
		if (StringUtils.isEmpty(getListType()) || getListType().equals("#")
			|| getListType().equals("1")) {
		    buffer.append("<ul><li class='tree_label'>").append(function.getName()).append(": ");
		    buffer.append((function.getParentInherentFunction() != null) ? " (Cargo Inerente)"
			    : "");
		    getPersonFunctionsList(subUnit, function, buffer, iExecutionYear);
		    buffer.append("</li></ul>");
		}
	    }
	}

	for (Unit subUnit2 : subUnit.getActiveSubUnits(currentDate,
		AccountabilityTypeEnum.ORGANIZATIONAL_STRUCTURE)) {
	    getSubUnitsWithoutAggregatedUnitsToFunctionList(buffer, iExecutionYear, currentDate,
		    subUnit2);
	}

	buffer.append("</li></ul>");
    }

    private String getHomePageUrl(Person person) {
	StringBuffer buffer = new StringBuffer();
	if (person.getHomepage() != null && person.getHomepage().getActivated()) {
	    buffer.append(getRequest().getScheme()).append("://").append(getRequest().getServerName())
		    .append(":").append(getRequest().getServerPort()).append("/").append(
			    PropertiesManager.getProperty("app.context")).append("/homepage/").append(
			    person.getIstUsername());
	}
	return buffer.toString();
    }

    private void printPersonHomePage(Person person, StringBuffer buffer) {
	String homePageUrl = getHomePageUrl(person);
	if (!StringUtils.isEmpty(homePageUrl)) {
	    buffer.append("<a href='").append(homePageUrl).append("' target='_blank'>").append(
		    person.getNickname()).append("</a>");
	    // buffer.append(" <image
	    // src='").append(getContextPath()).append("/images/external.gif'/>");
	} else {
	    buffer.append(person.getNickname());
	}
    }

    private void printUnitWorkingEmployees(Unit subUnit, ExecutionYear iExecutionYear,
	    StringBuffer buffer) {

	buffer.append("<ul class='unit3'>");
	List<Contract> contractsByContractType = subUnit.getWorkingContracts();
	Collections.sort(contractsByContractType, Contract.CONTRACT_COMPARATOR_BY_PERSON_NAME);

	for (Contract contract : contractsByContractType) {
	    if (contract.belongsToPeriod(iExecutionYear.getBeginDateYearMonthDay(), iExecutionYear
		    .getEndDateYearMonthDay())) {

		buffer.append("<li>");

		// if
		// (contract.getEmployee().getPerson().getGender().equals(Gender.MALE))
		// {
		// buffer.append("<image
		// src='").append(getContextPath()).append(
		// "/images/worker-icon.png'/>").append(" ");
		// } else if
		// (contract.getEmployee().getPerson().getGender().equals(Gender.FEMALE))
		// {
		// buffer.append("<image
		// src='").append(getContextPath()).append(
		// "/images/woman-icon.png'/>").append(" ");
		// } else {
		// buffer.append("<image
		// src='").append(getContextPath()).append(
		// "/images/person-icon.gif'/>").append(" ");
		// }

		printPersonHomePage(contract.getPerson(), buffer);
		buffer.append("</li>");
	    }
	}
	buffer.append("</ul>");
    }

    private void getSubUnitsWithoutAggregatedUnitsToFunctionList(StringBuffer buffer,
	    ExecutionYear iExecutionYear, YearMonthDay currentDate, Unit subUnit) {
	List<Unit> validInstitutionSubUnits = null;
	if (subUnit.getType() != null && subUnit.getType().equals(PartyTypeEnum.AGGREGATE_UNIT)) {
	    validInstitutionSubUnits = getValidInstitutionSubUnits(subUnit, currentDate);
	}
	if (validInstitutionSubUnits != null) {
	    for (Unit validSubUnit : validInstitutionSubUnits) {
		getSubUnitsFunctions(validSubUnit, currentDate, iExecutionYear, buffer);
	    }
	} else {
	    getSubUnitsFunctions(subUnit, currentDate, iExecutionYear, buffer);
	}
    }

    private void getPersonFunctionsList(Unit unit, Function function, StringBuffer buffer,
	    ExecutionYear iExecutionYear) {

	addPersonFunctions(function, buffer, iExecutionYear);
	if (function.getParentInherentFunction() != null) {
	    addPersonFunctions(function.getParentInherentFunction(), buffer, iExecutionYear);
	}
    }

    private void addPersonFunctions(Function function, StringBuffer buffer, ExecutionYear iExecutionYear) {
	List<PersonFunction> validPersonFunction = getValidPersonFunction(iExecutionYear, function);
	if (!validPersonFunction.isEmpty()) {
	    buffer.append("<ul class='unit1'>");
	    for (PersonFunction personFunction : validPersonFunction) {
		buffer.append("<li>");
		// buffer.append("<image
		// src='").append(getContextPath()).append(
		// "/images/person-icon.gif'/>").append(" ");
		printPersonHomePage(personFunction.getPerson(), buffer);
		buffer.append(" (");
		buffer.append(personFunction.getBeginDate().toString()).append(" - ");
		buffer.append(personFunction.getEndDate().toString()).append(")");
		buffer.append("</li>");
	    }
	    buffer.append("</ul>");
	}
    }

    private List<Function> getSortFunctionList(Unit unit) {
	List<Function> allFunctions = new ArrayList<Function>();
	allFunctions.addAll(unit.getFunctions());
	Collections.sort(allFunctions, new Comparator() {
	    public int compare(Object arg0, Object arg1) {
		Function function1 = (Function) arg0;
		Function function2 = (Function) arg1;
		if (function1.getFunctionType() != null && function2.getFunctionType() != null) {
		    return function1.getFunctionType().compareTo(function2.getFunctionType());
		} else if (function1.getFunctionType() == null && function2.getFunctionType() != null) {
		    return -1;
		} else if (function1.getFunctionType() != null && function2.getFunctionType() == null) {
		    return 1;
		}
		return 0;
	    }
	});
	return allFunctions;
    }

    public ExecutionYear getExecutionYear(Integer executionYear) throws FenixFilterException,
	    FenixServiceException {
	final Object[] argsexecutionYearToRead = { executionYear };
	ExecutionYear iExecutionYear = (ExecutionYear) ServiceUtils.executeService(null,
		"ReadExecutionYearsService", argsexecutionYearToRead);
	return iExecutionYear;
    }

    public List<PersonFunction> getValidPersonFunction(ExecutionYear iExecutionYear, Function function) {
	List<PersonFunction> list = new ArrayList<PersonFunction>();
	for (PersonFunction personFunction : function.getPersonFunctions()) {
	    if (personFunction.belongsToPeriod(iExecutionYear.getBeginDateYearMonthDay(), iExecutionYear
		    .getEndDateYearMonthDay())) {
		list.add((PersonFunction) personFunction);
	    }
	}
	Collections.sort(list, PersonFunction.COMPARATOR_BY_PERSON_NAME);
	return list;
    }

    public List<SelectItem> getListingType() {
	List<SelectItem> list = new ArrayList<SelectItem>();

	SelectItem selectItem = new SelectItem();
	selectItem.setLabel("Funcionários");
	selectItem.setValue("0");
	SelectItem selectItem2 = new SelectItem();
	selectItem2.setLabel("Cargos de Gestão");
	selectItem2.setValue("1");

	list.add(selectItem);
	list.add(selectItem2);

	ResourceBundle bundle = getResourceBundle("resources/MessagingResources");
	addDefaultSelectedItem(list, bundle);

	return list;
    }

    private void addDefaultSelectedItem(List<SelectItem> list, ResourceBundle bundle) {
	SelectItem firstItem = new SelectItem();
	firstItem.setLabel(bundle.getString("label.find.organization.listing.type.default"));
	firstItem.setValue("#");
	list.add(0, firstItem);
    }

    public Unit getUnit() throws FenixFilterException, FenixServiceException {
	if (parentUnit == null) {
	    this.parentUnit = (Unit) rootDomainObject.readPartyByOID(Integer.valueOf((String) getUnitIDHidden()
		    .getValue()));
	}
	return parentUnit;
    }

    public void setUnit(Unit unit) {
	this.parentUnit = unit;
    }

    public Integer getPersonID() {
	return personID;
    }

    public void setPersonID(Integer personID) {
	this.personID = personID;
    }

    protected String getRequestParameter(String parameterName) {
	return (String) FacesContext.getCurrentInstance().getExternalContext().getRequestParameterMap()
		.get(parameterName);
    }

    public ResourceBundle getBundle() {
	return bundle;
    }

    public void setBundle(ResourceBundle bundle) {
	this.bundle = bundle;
    }

    public String getListType() {
	return listType;
    }

    public void setListType(String listType) {
	this.listType = listType;
    }
   
    public HtmlInputHidden getUnitIDHidden() {
	if (this.unitIDHidden == null) {
	    this.unitIDHidden = new HtmlInputHidden();
	}
	return unitIDHidden;
    }

    public void setUnitIDHidden(HtmlInputHidden unitIDHidden) {
	this.unitIDHidden = unitIDHidden;
    }

    public Integer getChoosenExecutionYearID() {
        return choosenExecutionYearID;
    }

    public void setChoosenExecutionYearID(Integer choosenExecutionYearID) {
        this.choosenExecutionYearID = choosenExecutionYearID;
    }
}