<%-- $This file is distributed under the terms of the license in /doc/license.txt$ --%>

<%@ taglib uri="http://java.sun.com/jstl/core" prefix="c" %>
<%@ taglib uri="http://java.sun.com/jsp/jstl/functions" prefix="fn" %>
<%@ taglib uri="http://vitro.mannlib.cornell.edu/vitro/tags/PropertyEditLink" prefix="edLnk" %>
<%@ taglib uri="http://vitro.mannlib.cornell.edu/vitro/tags/StringProcessorTag" prefix="p" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.Individual" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.Portal" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.controller.VitroRequest" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.dao.WebappDaoFactory" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.dao.PropertyInstanceDao" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.dao.DataPropertyDao" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.PropertyInstance" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.Property" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.KeywordProperty" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.PropertyGroup" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.dao.PropertyGroupDao" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.ObjectProperty" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.ObjectPropertyStatement" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.dao.ObjectPropertyDao" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.DataProperty" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.beans.DataPropertyStatement" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.edit.n3editing.RdfLiteralHash" %>
<%@ page import="java.util.Collection" %>
<%@ page import="java.util.Collections" %>
<%@ page import="java.util.Comparator" %>
<%@ page import="java.util.List" %>
<%@ page import="java.util.ArrayList" %>
<%@ page import="java.util.Iterator" %>
<%@ page import="java.util.HashSet" %>
<%@ page import="org.apache.commons.logging.Log" %>
<%@ page import="org.apache.commons.logging.LogFactory" %>
<%@ page import="edu.cornell.mannlib.vitro.webapp.filters.VitroRequestPrep" %>
<%@ page import="edu.cornell.mannlib.vedit.beans.LoginStatusBean" %>

<%@page import="edu.cornell.mannlib.vitro.webapp.web.MiscWebUtils"%>
<%! 
public static Log log = LogFactory.getLog("edu.cornell.mannlib.vitro.webapp.jsp.templates.entity.entityMergedPropsList.jsp");
%>
<%  if( VitroRequestPrep.isSelfEditing(request) ) {
        log.debug("setting showSelfEdits true");%>
        <c:set var="showSelfEdits" value="${true}"/>     
<%  }
    if (LoginStatusBean.getBean(request).isLoggedIn()) {
        log.debug("setting showCuratorEdits true");%>
        <c:set var="showCuratorEdits" value="${true}"/>
        <c:set var='themeDir'><c:out value='${portalBean.themeDir}' /></c:set>
<%  }
	String unassignedPropGroupName=null;
	String unassignedName = (String) request.getAttribute("unassignedPropsGroupName");
	if (unassignedName != null && unassignedName.length()>0) {
	    unassignedPropGroupName=unassignedName;
	    log.debug("found temp group attribute \""+unassignedName+"\" for unassigned properties");
	}%>
    <c:set var='entity' value='${requestScope.entity}'/><%-- just moving this into page scope for easy use --%>
    <c:set var='portal' value='${requestScope.portalBean}'/><%-- likewise --%>
    <c:set var="hiddenDivCount" value="0"/>
<%  Individual subject = (Individual) request.getAttribute("entity");
    if (subject==null) {
        throw new Error("Subject individual must be in request scope for entityMergedPropsList.jsp");
    }

    
    // Nick wants not to use explicit parameters to trigger visibility of a div, but for now we don't just want to always show the 1st one
    String openingGroupLocalName = (String) request.getParameter("curgroup");
    VitroRequest vreq = new VitroRequest(request);
    // added to permit distinguishing links outside the current portal
    int currentPortalId = -1;
    Portal currentPortal = vreq.getPortal();
    if (currentPortal!=null) {
    	currentPortalId = currentPortal.getPortalId();
    }

    WebappDaoFactory wdf = vreq.getWebappDaoFactory();
    PropertyGroupDao pgDao = wdf.getPropertyGroupDao();
    ArrayList<PropertyGroup> groupsList = (ArrayList) request.getAttribute("groupsList");
    if (groupsList!=null && groupsList.size()>0) { // first do the list of headers 
        if (groupsList.size()==1) {
            for (PropertyGroup pg : groupsList) {
                if (unassignedPropGroupName != null && !unassignedPropGroupName.equalsIgnoreCase(pg.getName())) {
                    log.debug("only one group ["+pg.getName() +"] so rendering without group headers");
                }
                request.setAttribute("mergedList",pg.getPropertyList());
            }
            %><jsp:include page="entityMergedPropsListUngrouped.jsp" flush="true"/><%
            return;
    	}%>
    	
    	<%-- 
        <ul id="profileCats">
<%      for (PropertyGroup pg : groupsList ) {
            if (openingGroupLocalName == null || openingGroupLocalName.equals("")) {
                openingGroupLocalName = pg.getLocalName();
            }
            String styleStr = "display: inline;";
            if (openingGroupLocalName.equals(pg.getLocalName())) {%>
                <li class="currentCat"><a id="currentCat" href="#<%=pg.getLocalName()%>" title="<%=pg.getName()%>"><%=pg.getName()%></a></li>
<%          } else { %>
                <li><a href="#<%=pg.getLocalName()%>" title="<%=pg.getName()%>"><%=pg.getName()%></a></li>
<%          }
        } %>
        </ul>
	--%>

		
<%      // now display the properties themselves, by group
        for (PropertyGroup g : groupsList) {%>
            <c:set var="group" value="<%=g%>"/>
            <c:set var="groupStyle" value="display: block;"/>
            <c:if test="${group.statementCount==0}"><c:set var="groupStyle" value="display: block"/></c:if>


        <%-- Getting the count of properties in each group --%>
				<c:set var="counter" value="0"/>
        <c:set var="propTotal" value="0"/>
				<% int propTotal = g.getPropertyList().size(); %>
				<c:set var="propTotal" value="<%=propTotal%>" />
				
    <c:if test="${propTotal>0}">  
			<div class="propsCategory" id="<%=g.getLocalName()%>">
				<h3><strong><%=g.getName()%></strong></h3>
				<div class="propsWrap">
<%				for (Property p : g.getPropertyList()) {%>
<%					if (p instanceof ObjectProperty) {
    					ObjectProperty op = (ObjectProperty)p;%>
    					<c:set var="objProp" value="<%=op%>"/>
    					<c:set var="editableInSomeWay" value="${false}"/>
    					<c:if test="${showSelfEdits || showCuratorEdits}">
				    		<edLnk:editLinks item="${objProp}" var="links" />
				    		<c:if test="${!empty links}">
				    			<c:set var="editableInSomeWay" value="${true}"/>
				    		</c:if>                                                       
	        			</c:if>
				    	<c:set var="objStyle" value="display: block;"/>
				    	
				    	<%-- rjy7 We have a logic problem here: if the custom short view dictates that the item NOT be rendered,
                        and because of this there are NO items to render, we shouldn't show the label when not in edit mode. 
                        Example: people ( = positionHistory) of an organization don't render if the position end date is in the past.
                        So the organization might not have any current people, in which case we shouldn't show the "people" label.
                        We need to compute objRows on the basis of the rendering, not the number of objectPropertyStatements.
                        See NIHVIVO-512. --%>
                        
				    	<c:set var="objRows" value="${fn:length(objProp.objectPropertyStatements)}"/>
				    	<c:if test="${objRows==0}"><c:set var="objStyle" value="display: block;"/></c:if>
				    	<%-- nac26 Changing the test on objRows here to be GTE so that properties marked with an update level of "nobody" are still rendered --%>				    					    	
				    	<c:if test="${editableInSomeWay || objRows>=0}">
				    		<c:set var="first" value=""/><c:if test="${counter == 0}"><c:set var="first" value=" first"/></c:if>
            		        <c:set var="last" value=""/><c:if test="${(counter+1) == propTotal}"><c:set var="last" value=" last"/></c:if>
                            <div class="propsItem${first}${last}" id="${objProp.localName}">
                                <h4>${objProp.editLabel}</h4>
					    		<c:if test="${showSelfEdits || showCuratorEdits}"><edLnk:editLinks item="${objProp}" icons="false" /></c:if>
					    		<%-- Verbose property display additions for object properties, using context variable verbosePropertyListing --%>
                          <c:if test="${showCuratorEdits && verbosePropertyListing}">
                              <c:url var="propertyEditLink" value="/propertyEdit">
                                  <c:param name="home" value="${portal.portalId}"/>
                                  <c:param name="uri" value="${objProp.URI}"/>
                              </c:url>
                              <c:choose>
                                  <c:when test="${!empty objProp.hiddenFromDisplayBelowRoleLevel.label}"><c:set var="displayCue" value="${objProp.hiddenFromDisplayBelowRoleLevel.label}"/></c:when>
                                  <c:otherwise><c:set var="displayCue" value="unspecified"/></c:otherwise>
                              </c:choose>
                              <c:choose>
                                  <c:when test="${!empty objProp.prohibitedFromUpdateBelowRoleLevel.label}"><c:set var="updateCue" value="${objProp.prohibitedFromUpdateBelowRoleLevel.label}"/></c:when>
                                  <c:otherwise><c:set var="updateCue" value="unspecified"/></c:otherwise>
                              </c:choose>
                              <c:choose>
                                  <c:when test="${!empty objProp.localNameWithPrefix}"><c:set var="localName" value="${objProp.localNameWithPrefix}"/></c:when>
                                  <c:otherwise><c:set var="localName" value="no local name"/></c:otherwise>
                              </c:choose>
                              <c:choose>
                                  <c:when test="${!empty objProp.domainDisplayTier}"><c:set var="displayTier" value="${objProp.domainDisplayTier}"/></c:when>
                                  <c:otherwise><c:set var="displayTier" value="blank"/></c:otherwise>
                              </c:choose>
                              <c:choose>
                                  <c:when test="${!empty objProp.groupURI}">
      <%                              PropertyGroup pg = pgDao.getGroupByURI(op.getGroupURI());
                                      if (pg!=null && pg.getName()!=null) {
                                          request.setAttribute("groupName",pg.getName());%>
                                          <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (object property); display tier ${displayTier} within group ${groupName}; display level: ${displayCue}; update level: ${updateCue}</span>
      <%                              } else {%>
                                          <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (object property); display tier ${displayTier}; display level: ${displayCue}; update level: ${updateCue}</span>
      <%                              } %>
                                  </c:when>
                                  <c:otherwise>
                                      <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (object property); display tier ${displayTier}; display level: ${displayCue}; update level: ${updateCue}</span>
                                  </c:otherwise>
                              </c:choose>
                          </c:if>
        					<%-- end Verbose property display additions for object properties --%>
					    		
	    						<c:set var="displayLimit" value="${objProp.domainDisplayLimit}"/>

								<c:if test="${displayLimit<0}">
								    <c:set var="displayLimit" value="32"/> <% /* arbitrary limit if value is unset, i.e. -1 */ %>
								</c:if>

								<c:if test="${objRows>0}">
	        						<ul class='properties'>
	    						</c:if>
	    						<c:set var="collateByClass" value="<%=op.getCollateBySubclass()%>"/>
        					<c:if test="${collateByClass}" >
        						<c:set var="collateClassesShownCount" value="0"/>
        						<c:set var="collateCurrentClass" value="_firstOne"/>        						        										
        					</c:if>
					        <c:forEach items="${objProp.objectPropertyStatements}" var="objPropertyStmt">					        					        
						        <c:set var="sameClass" value="false"/>
						        <c:forEach items="${objPropertyStmt.object.VClasses}" var="vclass">
						           <c:if test="${ vclass.URI == collateCurrentClass }">
										<c:set var="sameClass" value="true"/>																			
								   </c:if>					           
					            </c:forEach>
					        
						        <c:if test="${ collateByClass && ( !sameClass || collateCurrentClass == '_firstOne') }">						   
				            		<c:if test="${ collateClassesShownCount > 0 }">
				            			</ul></li><!-- collateClasses -->
				            		</c:if>
				            		<c:set var="collateCurrentClass" value="${objPropertyStmt.object.VClassURI}" />				            			            
				            		<c:set var="collateCurrentClassName" value="${objPropertyStmt.object.VClass.name}" />
				            		<c:set var="collateClassesShownCount" value="${collateClassesShown + 1}"/>		            		
				            		<li>
				            		<h5 class="collate">${collateCurrentClassName}</h5>
				            		<ul class='properties'><!-- collateClasses -->
	      		                </c:if>
	      		                
                                    <li><span class="statementWrap">
     								<c:set var="opStmt" value="${objPropertyStmt}" scope="request"/>
           							<c:url var="propertyLink" value="/entity">
               							<c:param name="home" value="${portal.portalId}"/>
               							<c:param name="uri" value="${objPropertyStmt.object.URI}"/>
           							</c:url>
           							
           							<% String customShortView = MiscWebUtils.getCustomShortView(request); %>
	         						<c:set var="altRenderJsp" value="<%= customShortView %>" />	         						
									<c:remove var="opStmt" scope="request"/>
									
                                    <c:choose>
                                        <c:when test="${!empty altRenderJsp}">
                                            <c:set scope="request" var="individual" value="${objPropertyStmt.object}"/>
											<c:set scope="request" var="predicateUri" value="${objProp.URI}"/>
                                            <jsp:include page="${altRenderJsp}" flush="true"/>
                                            <c:remove var="altRenderJsp"/>
                                        </c:when>
                                        <c:otherwise>
                                            <a class="propertyLink" href='<c:out value="${propertyLink}"/>'><p:process><c:out value="${objPropertyStmt.object.name}"/></p:process></a>
                                            <c:if test="${!empty objPropertyStmt.object.moniker}">
                                                <p:process><c:out value="| ${objPropertyStmt.object.moniker}"/></p:process>
                                            </c:if>
                                        </c:otherwise>
                                    </c:choose>
                                    <c:if test="${showSelfEdits || showCuratorEdits}">
          					                  <c:set var="editLinks"><edLnk:editLinks item="${objPropertyStmt}" icons="false"/></c:set>
                           					  <c:if test="${!empty editLinks}"><span class="editLinks">${editLinks}</span></c:if>
                           					  <c:if test="${empty editLinks}"><em class="nonEditable">(non-editable)</em></c:if>
          					                </c:if>
                                    </span></li>
							</c:forEach>
                            <c:if test="${ collateByClass && collateClassesShownCount > 0 }"></ul></li><!-- collate end --></c:if>
                            <c:if test="${objRows > 0}"></ul></c:if>
                            </div><!-- ${objProp.localName} -->
                        </c:if>
<%                  } else if (p instanceof DataProperty) {
                        DataProperty dp = (DataProperty)p;%>
                        <c:set var="dataProp" value="<%=dp%>"/>
                        <c:set var="dataRows" value="${fn:length(dataProp.dataPropertyStatements)}"/>
                        <c:set var="dataStyle" value="display: block;"/>
						<c:set var="displayLimit" value="${dataProp.displayLimit}"/>
                        <c:if test="${dataRows==0}"><c:set var="dataStyle" value="display: block;"/></c:if>

						<c:set var="first" value=""/><c:if test="${counter == 0}"><c:set var="first" value=" first"/></c:if>
            			<c:set var="last" value=""/><c:if test="${(counter+1) == propTotal}"><c:set var="last" value=" last"/></c:if>
            			<c:set var="multiItem" value=""/><c:if test="${dataRows > 1 && displayLimit == 1}"><c:set var="multiItem" value=" multiItem"/></c:if>
            			<c:set var="addable" value=""/><c:if test="${dataRows >= 1 && displayLimit > 1}"><c:set var="addable" value=" addable"/></c:if>
            			
						<div id="${dataProp.localName}" class="propsItem dataItem${first}${last}${multiItem}${addable}" style="${dataStyle}">
							<h4>${dataProp.editLabel}</h4>
					    	<c:if test="${showSelfEdits || showCuratorEdits}">
                                <c:choose>
                                    <c:when test="${dataRows == 1 && displayLimit==1 }">
                                    	<%-- just put in a single "edit" link, not an "add" link that expands to reveal edit/delete links --%>
                                        <c:set var="editLinks"><edLnk:editLinks item="${dataProp.dataPropertyStatements[0]}" icons="false"/></c:set>
                             					  <c:if test="${!empty editLinks}"><span class="editLinks">${editLinks}</span></c:if>
                             					  <c:if test="${empty editLinks}"><em class="nonEditable">(non-editable)</em></c:if>
                                    </c:when>
                                    <c:otherwise><%-- creates an add link, even if displayLimit is unset, i.e. -1 --%>
                                        <edLnk:editLinks item="${dataProp}" icons="false"/>
                                    </c:otherwise>
                                </c:choose>
                            </c:if>
                            
                            <%-- Verbose property display additions for data properties, using context variable verbosePropertyListing --%>
                	                <c:if test="${showCuratorEdits && verbosePropertyListing}">
                	                    <c:url var="propertyEditLink" value="/datapropEdit">
                	                        <c:param name="home" value="${portal.portalId}"/>
                	                        <c:param name="uri" value="${dataProp.URI}"/>
                	                    </c:url>
                	                    <c:choose>
                	                        <c:when test="${!empty dataProp.hiddenFromDisplayBelowRoleLevel.label}"><c:set var="displayCue" value="${dataProp.hiddenFromDisplayBelowRoleLevel.label}"/></c:when>
                	                        <c:otherwise><c:set var="displayCue" value="unspecified"/></c:otherwise>
                	                    </c:choose>
                	                    <c:choose>
                	                        <c:when test="${!empty dataProp.prohibitedFromUpdateBelowRoleLevel.label}"><c:set var="updateCue" value="${dataProp.prohibitedFromUpdateBelowRoleLevel.label}"/></c:when>
                	                        <c:otherwise><c:set var="updateCue" value="unspecified"/></c:otherwise>
                	                    </c:choose>
                	                    <c:choose>
                	                        <c:when test="${!empty dataProp.localNameWithPrefix}"><c:set var="localName" value="${dataProp.localNameWithPrefix}"/></c:when>
                	                        <c:otherwise><c:set var="localName" value="no local name"/></c:otherwise>
                	                    </c:choose>
                	                    <c:choose>
                	                        <c:when test="${!empty dataProp.displayTier}"><c:set var="displayTier" value="${dataProp.displayTier}"/></c:when>
                	                        <c:otherwise><c:set var="displayTier" value="blank"/></c:otherwise>
                	                    </c:choose>
                	                    <c:choose>
                	                        <c:when test="${!empty dataProp.groupURI}">
                	<%                          PropertyGroup pg = pgDao.getGroupByURI(dp.getGroupURI());
                	                            if (pg!=null && pg.getName()!=null) {
                	                                request.setAttribute("groupName",pg.getName());%>
                	                                <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (data property); display tier ${displayTier} within group ${groupName}; display level: ${displayCue}; update level: ${updateCue}</span>
                	<%                          } else {%>
                	                                <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (data property); display tier ${displayTier}; display level: ${displayCue}; update level: ${updateCue}</span>
                	<%                          } %>
                	                        </c:when>
                	                        <c:otherwise>
                	                            <span class="verbosePropertyListing"><a class="propertyLink" href="${propertyEditLink}"/>${localName}</a> (data property); display tier ${displayTier}; display level: ${displayCue}; update level: ${updateCue}</span>
                	                        </c:otherwise>
                	                    </c:choose>
                	                </c:if>
                	                <%-- end Verbose property display additions for data properties --%>
                            
                            <c:if test="${displayLimit<0}">
                            	<%-- set to an arbitrary but high positive limit if unset on property, i.e. -1 --%>
                                <c:set var="displayLimit" value="32"/>
                            </c:if>
                            <c:if test="${fn:length(dataProp.dataPropertyStatements)-displayLimit==1}">
                                <%-- don't leave just one statement to expand --%>
                                <c:set var="displayLimit" value="${displayLimit+1}"/>
                            </c:if>
                            <%-- c:if test="${displayLimit < 0}"><c:set var="displayLimit" value="20"/></c:if --%>
                            <c:if test="${dataRows > 0}">
                                <div class="datatypeProperties">
                                    <c:if test="${dataRows > 1}"><ul class="datatypePropertyValue"></c:if>
                                    <c:if test="${dataRows == 1}"><div class="datatypePropertyValue"></c:if>
                                    <c:forEach items="${dataProp.dataPropertyStatements}" var="dataPropertyStmt">
                                        <p:process>
                                        <c:choose>
                                            <c:when test='${dataRows==1}'>
                                              <span class="statementWrap">
                                              	${dataPropertyStmt.data}
                                            	<c:if test='${showSelfEdits || showCuratorEdits}'>
                                            	    <c:set var="editLinks"><edLnk:editLinks item="${dataPropertyStmt}" icons="false"/></c:set>
                                       					  <c:if test="${!empty editLinks}"><span class="editLinks">${editLinks}</span></c:if>
                                       					  <c:if test="${empty editLinks}"><em class="nonEditable">(non-editable)</em></c:if>
                                            	</c:if>
                                            	</span>
                                            </c:when>
                                            <c:otherwise>
                                                <li><span class="statementWrap">
                                                  ${dataPropertyStmt.data}
                                                    <c:if test="${dataRows > 1 || displayLimit != 1 }">
                                                        <c:if test="${showSelfEdits || showCuratorEdits}">
                                                            <c:set var="editLinks"><edLnk:editLinks item="${dataPropertyStmt}" icons="false"/></c:set>
                                                 					  <c:if test="${!empty editLinks}"><span class="editLinks">${editLinks}</span></c:if>
                                                 					  <c:if test="${empty editLinks}"><em class="nonEditable">(non-editable)</em></c:if>
                                                        </c:if>
                                                    </c:if>
                                                </span></li>
                                            </c:otherwise>
                                        </c:choose>
                                        </p:process>
                                    </c:forEach>
                                    <c:choose>
                                    	<c:when test="${dataRows==1}"></div></c:when>
                                    	<c:otherwise></ul></c:otherwise>
                                    </c:choose>
                                </div><!-- datatypeProperties -->
                            </c:if>
						</div><!-- ${dataProp.localName} -->
						
<%					} else { // keyword property -- ignore
				    	if (p instanceof KeywordProperty) {%>
							<p>Not expecting keyword properties here.</p>
<%						} else {
    						log.warn("unexpected unknown property type found");%>
    						<p>Unknown property type found</p>
<%						}
					} 
				
				%><c:set var="counter" value="${counter+1}"/><%
    			
				} // end for (Property p : g.getPropertyList()
				%>
				</div><!-- propsWrap -->
			</div><!-- class="propsCategory" -->
		</c:if>
			<c:if test="${showSelfEdits || showCuratorEdits}">
		    	<a class="backToTop" href="#content" title="jump to top of the page">back to top</a>
			</c:if>
<%		} // end for (PropertyGroup g : groupsList)
    } else {
        log.debug("incoming groups list with merged properties not found as request attribute for subject "+subject.getName()+"\n");
    }
%>