<%--

 CDDL HEADER START

 The contents of this file are subject to the terms of the
 Common Development and Distribution License, Version 1.0 only
 (the "License"). You may not use this file except in compliance
 with the License.

 You can obtain a copy of the license at license/ESCIDOC.LICENSE
 or http://www.escidoc.org/license.
 See the License for the specific language governing permissions
 and limitations under the License.

 When distributing Covered Code, include this CDDL HEADER in each
 file and include the License file at license/ESCIDOC.LICENSE.
 If applicable, add the following below this CDDL HEADER, with the
 fields enclosed by brackets "[]" replaced with your own identifying
 information: Portions Copyright [yyyy] [name of copyright owner]

 CDDL HEADER END


 Copyright 2006-2012 Fachinformationszentrum Karlsruhe Gesellschaft
 für wissenschaftlich-technische Information mbH and Max-Planck-
 Gesellschaft zur Förderung der Wissenschaft e.V.
 All rights reserved. Use is subject to license terms.
--%>

<%@page import="de.mpg.escidoc.services.cone.web.Login"%>
<%@page import="de.mpg.escidoc.services.cone.ModelList.Predicate"%>
<%@ page language="java" contentType="text/html; charset=UTF-8" pageEncoding="UTF-8" %>
<%
	request.setCharacterEncoding("UTF-8");
	response.setCharacterEncoding("UTF-8");
	
	
%>

<%@page import="java.util.List"%>
<%@ page import="java.util.Arrays" %>
<%@ page import="java.util.ArrayList" %>
<%@page import="de.mpg.escidoc.services.cone.ModelList.Model"%>
<%@page import="de.mpg.escidoc.services.cone.ModelList"%>
<%@page import="java.util.Set"%>
<%@page import="de.mpg.escidoc.services.cone.Querier"%>
<%@page import="de.mpg.escidoc.services.cone.QuerierFactory"%>

<%@page import="org.apache.commons.fileupload.FileUpload"%>
<%@page import="org.apache.commons.fileupload.servlet.ServletFileUpload"%>
<%@page import="org.apache.commons.fileupload.FileItemFactory"%>
<%@page import="org.apache.commons.fileupload.disk.DiskFileItemFactory"%>
<%@page import="org.apache.commons.fileupload.FileItem"%>
<%@page import="java.io.InputStream"%>
<%@page import="javax.xml.parsers.SAXParser"%>
<%@page import="javax.xml.parsers.SAXParserFactory"%>
<%@page import="de.mpg.escidoc.services.cone.rdfimport.RDFHandler"%>
<%@page import="de.mpg.escidoc.services.cone.util.LocalizedTripleObject"%>
<%@page import="de.mpg.escidoc.services.cone.util.TreeFragment"%>
<%@page import="de.mpg.escidoc.services.cone.ModelList.Model"%>
<%@page import="de.mpg.escidoc.services.framework.PropertyReader"%>
<%@page import="java.util.regex.Pattern"%>
<%@page import="java.util.regex.Matcher"%>
<%@page import="de.mpg.escidoc.services.cone.util.LocalizedString"%>
<%@page import="org.apache.log4j.Logger"%>

<%!
	private void removeIdentifierPrefixes(TreeFragment fragment, Model model) throws Exception
	{
		for (String nodeName : fragment.keySet())
		{
			if (model.getPredicate(nodeName)==null)
			{
				throw new RuntimeException("Predicate for node \"" + nodeName + "\" not found in model " + model.getName());
			}
			if (model.getPredicate(nodeName).isResource())
			{
				for (LocalizedTripleObject listItem : fragment.get(nodeName))
				{
					if (listItem instanceof TreeFragment && ((TreeFragment) listItem).getSubject().startsWith(PropertyReader.getProperty("escidoc.cone.service.url")))
				    {
						((TreeFragment) listItem).setSubject(((TreeFragment) listItem).getSubject().substring(PropertyReader.getProperty("escidoc.cone.service.url").length()));
				    }
				}
			}
		}
	}
%>

<% List<String> errors = new ArrayList<String>(); %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
	<jsp:include page="header.jsp"/>
	<body>
		<div class="full wrapper">
			<jsp:include page="navigation.jsp"/>
			<div id="content" class="full_area0 clear">
			<!-- begin: content section (including elements that visually belong to the header (breadcrumb, headline, subheader and content menu)) -->
				<div class="clear">
					<div id="headerSection">
						<div id="headLine" class="clear headLine">
							<!-- Headline starts here -->
							<h1>Importing...</h1>
							<!-- Headline ends here -->
						</div>
						<div class="small_marginLIncl subHeaderSection">
							<div class="contentMenu">
								<div class="free_area0 sub">
									&nbsp;
								</div>
							</div>
							<div class="subHeader">
								<%
									errors = new ArrayList<String>();
									boolean loggedIn = Login.getLoggedIn(request);
									Logger logger = Logger.getLogger( "upload.jsp" );
									
									if (!loggedIn)
									{
									    errors.add("You are not logged in!");
									}
									else
									{
										boolean isMigrateNamespace = true;
									
										boolean isMultipart = ServletFileUpload.isMultipartContent(request);
										// Create a factory for disk-based file items
										FileItemFactory factory = new DiskFileItemFactory();
										
										// Create a new file upload handler
										ServletFileUpload upload = new ServletFileUpload(factory);
										
										// Parse the request
										List<FileItem> items = upload.parseRequest(request);
										InputStream uploadedStream = null;
										ModelList.Model model = null;
										String workflow = "SKIP";
										boolean createRelations = false;
										for (FileItem item : items)
										{
											if (item.isFormField())
											{
												if ("model".equals(item.getFieldName()))
												{
													model = ModelList.getInstance().getModelByAlias(item.getString());
												}
												else if ("workflow".equals(item.getFieldName()))
												{
													workflow = item.getString();
												}
												else if ("create-relations".equals(item.getFieldName()))
												{
													createRelations = ("true".equals(item.getString()));
												}
											}
											else
											{
												uploadedStream = item.getInputStream();
											}
										}
										
										SAXParserFactory spf = SAXParserFactory.newInstance();
										spf.setNamespaceAware(true);
										SAXParser parser = spf.newSAXParser();
										RDFHandler rdfHandler = new RDFHandler(loggedIn, model);
										try {
											parser.parse(uploadedStream, rdfHandler);
										}
										catch(Exception e)
										{
											logger.error("Error while parsing RDF import file", e);
											errors.add("Invalid RDF file!<br/>" + e.getMessage());
										}

										Querier querier = QuerierFactory.newQuerier(loggedIn);
										
										List<LocalizedTripleObject> results = rdfHandler.getResult();
										
										for (LocalizedTripleObject result : results)
										{
											if (result instanceof TreeFragment)
											{
												out.println("Importing item");
												String id;
												if ((((TreeFragment) result).getSubject() == null) && model.isGenerateIdentifier())
												{
													id = model.getSubjectPrefix() + querier.createUniqueIdentifier(model.getName());
													out.println(PropertyReader.getProperty("escidoc.cone.service.url") + id + " (generated)");
												}
												else if (((TreeFragment) result).getSubject() != null)
												{
												    if (((TreeFragment) result).getSubject().startsWith(PropertyReader.getProperty("escidoc.cone.service.url")))
												    {
												        id = ((TreeFragment) result).getSubject().substring(PropertyReader.getProperty("escidoc.cone.service.url").length());
												        TreeFragment existingObject = querier.details(model.getName(), id, "*");
												        out.println(PropertyReader.getProperty("escidoc.cone.service.url") + id);
												        
												        if (existingObject != null && !existingObject.isEmpty() && "skip".equals(workflow))
												        {
											        		out.println(" (skipped)<br/>");
											        		continue;
												        }
												        else if (existingObject != null && !existingObject.isEmpty() && "overwrite".equals(workflow))
														{
												        	out.println(" ... deleting existing object ...");
															querier.delete(model.getName(), id);
															out.println(" (replaced)");
														}
												        else if (existingObject != null && "update-overwrite".equals(workflow))
														{
												        	out.println(" ... updating existing object ...");
												        	existingObject.merge((TreeFragment) result, true);
												        	result = existingObject;
															querier.delete(model.getName(), id);
															out.println(" (updated)");
														}
												        else if (existingObject != null && "update-add".equals(workflow))
														{
												        	out.println(" ... updating existing object ...");
												        	for (Predicate predicate : model.getPredicates())
												        	{
												        	    if (!predicate.isMultiple() && ((TreeFragment) result).containsKey(predicate.getId()) && existingObject.containsKey(predicate.getId()))
												        	    {
												        	        for (LocalizedTripleObject res : ((TreeFragment) result).get(predicate.getId()))
												        	        {
												        	            for (LocalizedTripleObject existing : existingObject.get(predicate.getId()))
													        	        {
												        	                if ((existing.getLanguage() == null && res.getLanguage() == null) || existing.getLanguage().equals(res.getLanguage()))
												        	                {
												        	                    existingObject.get(predicate.getId()).remove(existing);
												        	                    break;
												        	                }
													        	        }
												        	        }
												        	    }
												        	}
												        	existingObject.merge((TreeFragment) result, false);
												        	result = existingObject;
															querier.delete(model.getName(), id);
															out.println(" (updated)");
														}
											            
												    }
												    else if (isMigrateNamespace)
												    {
												        Pattern pattern = Pattern.compile("[^/]+/resource/.+$");
												        Matcher matcher = pattern.matcher(((TreeFragment) result).getSubject());
												        if (matcher.find())
												        {
												            id = matcher.group();
													        TreeFragment existingObject = querier.details(model.getName(), id, "*");
													        
													        out.println(PropertyReader.getProperty("escidoc.cone.service.url") + id);
													        
													        if (existingObject != null && !existingObject.isEmpty() && "skip".equals(workflow))
													        {
												        		out.println(" (skipped)<br/>");
												        		continue;
													        }
													        else if (existingObject != null && !existingObject.isEmpty() && "overwrite".equals(workflow))
															{
													        	out.println(" ... deleting existing object ...");
																querier.delete(model.getName(), id);
																out.println(" (replaced)");
															}
													        else if (existingObject != null && "update-overwrite".equals(workflow))
															{
													        	out.println(" ... updating existing object ...");
													        	existingObject.merge((TreeFragment) result, true);
													        	result = existingObject;
																querier.delete(model.getName(), id);
																out.println(" (updated)");
															}
													        else if (existingObject != null && "update-add".equals(workflow))
															{
													        	out.println(" ... updating existing object ...");
													        	for (Predicate predicate : model.getPredicates())
													        	{
													        	    if (!predicate.isMultiple() && ((TreeFragment) result).containsKey(predicate.getId()) && existingObject.containsKey(predicate.getId()))
													        	    {
													        	        for (LocalizedTripleObject res : ((TreeFragment) result).get(predicate.getId()))
													        	        {
													        	            for (LocalizedTripleObject existing : existingObject.get(predicate.getId()))
														        	        {
													        	                if ((existing.getLanguage() == null && res.getLanguage() == null) || existing.getLanguage().equals(res.getLanguage()))
													        	                {
													        	                    existingObject.get(predicate.getId()).remove(existing);
													        	                    break;
													        	                }
														        	        }
													        	        }
													        	    }
													        	}
													        	existingObject.merge((TreeFragment) result, false);
													        	result = existingObject;
																querier.delete(model.getName(), id);
																out.println(" (updated)");
															}
												        }
												        else
												        {
												            throw new RuntimeException("Identifier '" + ((TreeFragment) result).getSubject() + "' does not match required format");
												        }
												    }
												    else
												    {
												        throw new RuntimeException("Identifier '" + ((TreeFragment) result).getSubject() + "' is no local URL, but migration is no allowed");
												    }
												}
												else
												{
													throw new RuntimeException("Identifier expected");
												}
												
												try
												{
													removeIdentifierPrefixes((TreeFragment) result, model);
													querier.create(model.getName(), id, (TreeFragment) result);
													out.println(" ...done!<br/>");
												}
												catch (Exception e)
												{
													out.println("<li class=\"messageError\"><b>Error: </b> "+e.getMessage() + "</li>");
												}
												
												
												
											}
											else
											{
												throw new RuntimeException("Wrong RDF structure at " + result);
											}
										}
															
									}				
								%>
								<hr/>
								<% 
								
									if (errors!=null && errors.size() > 0) { %>
									<ul>
										<% for (String error : errors) { %>
											<li class="messageError"><b>Error: </b><%= error %></li>
										<% } %>
									</ul>
								<% } %>
								&nbsp;
							</div>
						</div>
					</div>
				</div>
				<div class="full_area0">
				
					
				</div>
			</div>
		</div>
	</body>
</html>