D-Net

package eu.dnetlib.functionality.modular.ui.workflows.controllers;

import java.awt.image.BufferedImage;

import java.io.IOException;

import java.io.OutputStream;

import java.io.StringReader;

import java.io.StringWriter;

import java.util.Collection;

import java.util.Collections;

import java.util.Iterator;

import java.util.List;

import java.util.Map;

import java.util.Set;

import java.util.UUID;

import javax.annotation.Resource;

import javax.imageio.ImageIO;

import javax.servlet.http.HttpServletResponse;

import org.apache.commons.lang.math.NumberUtils;

import org.apache.commons.logging.Log;

import org.apache.commons.logging.LogFactory;

import org.dom4j.Document;

import org.dom4j.DocumentException;

import org.dom4j.Node;

import org.dom4j.io.SAXReader;

import org.joda.time.DateTime;

import org.joda.time.format.DateTimeFormat;

import org.joda.time.format.DateTimeFormatter;

import org.springframework.beans.factory.annotation.Autowired;

import org.springframework.stereotype.Controller;

import org.springframework.web.bind.annotation.RequestMapping;

import org.springframework.web.bind.annotation.RequestParam;

import org.springframework.web.bind.annotation.ResponseBody;

import com.google.common.base.Function;

import com.google.common.collect.Iterators;

import com.google.common.collect.Lists;

import com.google.common.collect.Maps;

import com.google.gson.Gson;

import com.google.gson.reflect.TypeToken;

import eu.dnetlib.common.logging.DnetLogger;

import eu.dnetlib.common.logging.LogMessage;

import eu.dnetlib.enabling.datastructures.MetaWorkflow;

import eu.dnetlib.enabling.datastructures.Workflow;

import eu.dnetlib.enabling.datastructures.WorkflowInstance;

import eu.dnetlib.enabling.datastructures.WorkflowInstance.StartMode;

import eu.dnetlib.enabling.is.client.InformationServiceClient;

import eu.dnetlib.functionality.modular.ui.AbstractAjaxController;

import eu.dnetlib.functionality.modular.ui.workflows.objects.NodeInfo;

import eu.dnetlib.functionality.modular.ui.workflows.sarasvati.viewer.ProcessGraphGenerator;

import eu.dnetlib.miscutils.DateUtils;

import eu.dnetlib.msro.dispatcher.ProcessInfo;

import eu.dnetlib.msro.dispatcher.WorkflowDispatcher;

import eu.dnetlib.msro.dispatcher.WorkflowRegistry;

import eu.dnetlib.msro.worker.WorkflowConstants;

import eu.dnetlib.rmi.objects.is.BlackboardActionStatus;

import eu.dnetlib.rmi.objects.is.DnetDataStructure;

import eu.dnetlib.rmi.soap.exceptions.InformationServiceException;

/**

 * Web controller for the UI

 * 

 * @author Michele Artini

 */

@Controller

public class WorkflowsController extends AbstractAjaxController {

	private final class JournalEntryFunction implements Function<Map<String, String>, ProcessInfo> {

		@Override

		public ProcessInfo apply(final Map<String, String> input) {

			final String name = input.get(WorkflowConstants.SYSTEM_WF_PROFILE_NAME);

			String repo = "";

			if (input.containsKey(WorkflowConstants.DATAPROVIDER_NAME)) {

				repo += input.get(WorkflowConstants.DATAPROVIDER_NAME);

			}

			final String procId = input.get(WorkflowConstants.SYSTEM_WF_PROCESS_ID);

			final String metaWfId = input.get(WorkflowConstants.SYSTEM_METAWF_ID);

			final String family = input.get(WorkflowConstants.SYSTEM_WF_PROFILE_FAMILY);

			final long date = NumberUtils.toLong(input.get(LogMessage.LOG_DATE_FIELD), 0);

			final BlackboardActionStatus status = Boolean.valueOf(input.get(WorkflowConstants.SYSTEM_COMPLETED_SUCCESSFULLY)) ? BlackboardActionStatus.DONE

					: BlackboardActionStatus.FAILED;

			final ProcessInfo info = new ProcessInfo(metaWfId, name, repo, family, procId);

			info.setLastActivityDate(date);

			info.setStatus(status);

			return info;

		}

	}

	@Autowired

	private WorkflowDispatcher dispatcher;

	@Autowired

	private WorkflowRegistry wfRegistry;

	@Autowired

	private InformationServiceClient isClient;

	@Resource

	private ProcessGraphGenerator processGraphGenerator;

	@Resource(name = "msroWorkflowLogger")

	private DnetLogger dnetLogger;

	private static final Log log = LogFactory.getLog(WorkflowsController.class);

	@RequestMapping("/ui/list_metaworkflows.json")

	public @ResponseBody

	List<MetaWorkflow> listMetaWorflowsForSection(@RequestParam(value = "section", required = false) final String sectionName,

			@RequestParam(value = "dsId", required = false) final String dsId) {

		if (sectionName != null || dsId != null) {

			final StringWriter sql = new StringWriter();

			sql.append("SELECT ds.content ");

			sql.append("FROM datastructures ds ");

			sql.append("LEFT OUTER JOIN resource_properties p ON (ds.id = p.resource) ");

			sql.append("WHERE ds.type = 'MetaWorkflow' ");

			sql.append("AND ");

			sql.append(sectionName != null ? "p.name='section' AND p.value='" + sectionName + "'" : "p.name='datasource' AND p.value='" + dsId + "'");

			try {

				return isClient.searchResourceByQuery(sql.toString(), MetaWorkflow.class);

			} catch (InformationServiceException e) {

				log.error("Error obtaining MetaWorkflows, using query: " + sql, e);

			}

		}

		return Lists.newArrayList();

	}

	@RequestMapping("/ui/wf_metaworkflow.json")

	public @ResponseBody

	MetaWorkflow getMetaWorkflow(@RequestParam(value = "id", required = true) final String id) throws Exception {

		return isClient.getResourceByCode(id, MetaWorkflow.class);

	}

	@RequestMapping("/ui/workflow.img")

	public void getWorkflowImage(final HttpServletResponse response, @RequestParam(value = "code", required = true) final String code) throws Exception {

		final DnetDataStructure ds = isClient.getDatastructureByCode(code, Workflow.class);

		final BufferedImage image = processGraphGenerator.getWfDescImage(code, ds.getName(), ds.getContent());

		sendImage(response, image);

	}

	@RequestMapping("/ui/workflow.map")

	public @ResponseBody

	String getWorkflowImageMap(@RequestParam(value = "code", required = true) final String code) throws Exception {

		final DnetDataStructure ds = isClient.getDatastructureByCode(code, Workflow.class);

		return processGraphGenerator.getWfDescImageMap(code, ds.getName(), ds.getContent());

	}

	private void sendImage(final HttpServletResponse response, final BufferedImage image) throws IOException {

		response.setContentType("image/png");

		OutputStream out = response.getOutputStream();

		ImageIO.write(image, "png", out);

		out.flush();

		out.close();

	}

	@RequestMapping("/ui/wf.start")

	public @ResponseBody

	String startWorkflow(@RequestParam(value = "metaWf", required = true) final String metaWfId,

			@RequestParam(value = "wf", required = true) final String wfName) throws Exception {

		return dispatcher.dispatchWorkFlow(metaWfId, wfName);

	}

	@RequestMapping("/ui/metawf.start")

	public @ResponseBody

	String startMetaWorkflow(@RequestParam(value = "metaWf", required = true) final String metaWfId) throws Exception {

		return dispatcher.dispatchMetaWorkFlow(metaWfId);

	}

	@RequestMapping("/ui/wf_workflow_node.json")

	public @ResponseBody

	NodeInfo workflowNode_info(@RequestParam(value = "wf", required = true) final String wfCode,

			@RequestParam(value = "node", required = true) final String nodeName) throws InformationServiceException, DocumentException {

		final String xml = isClient.getXmlResourceByCode(wfCode, Workflow.class);

		final Document doc = new SAXReader().read(new StringReader(xml));

		final Node n = doc.selectSingleNode("//NODE[@name='" + nodeName + "']");

		final String name = nodeName;

		final String description = n.valueOf("./DESCRIPTION");

		final boolean start = "true".equalsIgnoreCase(n.valueOf("@isStart"));

		final boolean join = "true".equalsIgnoreCase(n.valueOf("@isJoin"));

		final Map<String, String> params = Maps.newHashMap();

		for (Object o : n.selectNodes("./PARAMETER/PARAM")) {

			final Node p = (Node) o;

			params.put(p.valueOf("@name"), p.getText());

		}

		return new NodeInfo(name, description, start, join, params);

	}

	@RequestMapping("/ui/wf_metaworkflow.edit")

	public @ResponseBody

	boolean editMetaWd(@RequestParam(value = "json", required = true) final String json) throws Exception {

		final MetaWorkflow metaWf = new Gson().fromJson(json, MetaWorkflow.class);

		log.info("Updating metaWorkflow " + metaWf.getName());

		isClient.updateResource(metaWf);

		return true;

	}

	@RequestMapping("/ui/clone_metaworkflow.do")

	public @ResponseBody

	String cloneMetaWf(@RequestParam(value = "code", required = true) final String code,

			@RequestParam(value = "name", required = true) final String newName) throws Exception {

		if (newName.trim().length() > 0) {

			final String newCode = "metawf-" + UUID.randomUUID();

			final MetaWorkflow metaWf = isClient.getResourceByCode(code, MetaWorkflow.class);

			metaWf.setCode(newCode);

			metaWf.setName(newName);

			isClient.registerResource(metaWf);

			return newCode;

		} else {

			throw new IllegalArgumentException("Name is empty");

		}

	}

	/*

	 * @RequestMapping("/ui/wf_proc_node.json") public @ResponseBody NodeTokenInfo getProcessWorkflowNode(@RequestParam(value = "id",

	 * required = true) final String pid,

	 * 

	 * @RequestParam(value = "node", required = true) final long nid) throws Exception {

	 * 

	 * final NodeToken token = findNodeToken(pid, nid);

	 * 

	 * final NodeTokenInfo info = token == null ? new NodeTokenInfo(findNodeName(pid, nid)) : new NodeTokenInfo(token);

	 * 

	 * return info; }

	 */

	/*

	 * private NodeToken findNodeToken(final String pid, final long nid) { final GraphProcess process =

	 * graphProcessRegistry.findProcess(pid); if (process != null) { for (NodeToken token : process.getNodeTokens()) { if

	 * (token.getNode().getId() == nid) { return token; } } } return null; }

	 * 

	 * private String findNodeName(final String pid, final long nid) { final GraphProcess process = graphProcessRegistry.findProcess(pid);

	 * if (process != null) { for (Node node : process.getGraph().getNodes()) { if (node.getId() == nid) { return node.getName(); } } }

	 * return "-"; }

	 */

	@RequestMapping("/ui/wf_proc.img")

	public void showProcessWorkflow(final HttpServletResponse response, @RequestParam(value = "id", required = true) final String id) throws Exception {

		BufferedImage image = processGraphGenerator.getProcessImage(id);

		sendImage(response, image);

	}

	@RequestMapping("/ui/wf_proc.kill")

	public @ResponseBody

	boolean killProcessWorkflow(@RequestParam(value = "id", required = true) final String id) throws Exception {

		/*

		 * GraphProcess proc = graphProcessRegistry.findProcess(id); proc.setState(ProcessState.Canceled); return true;

		 */

		// TODO

		return false;

	}

	@RequestMapping("/ui/wf_journal.range")

	public @ResponseBody

	Collection<ProcessInfo> rangeWfJournal(@RequestParam(value = "start", required = true) final String start,

			@RequestParam(value = "end", required = true) final String end) throws Exception {

		final Map<String, ProcessInfo> res = Maps.newHashMap();

		final DateTimeFormatter formatter = DateTimeFormat.forPattern("yyyy-MM-dd");

		final DateTime startDate = formatter.parseDateTime(start);

		final DateTime endDate = formatter.parseDateTime(end).plusHours(23).plusMinutes(59).plusSeconds(59);

		final Iterator<ProcessInfo> iter = Iterators.transform(dnetLogger.range(startDate.toDate(), endDate.toDate()), new JournalEntryFunction());

		while (iter.hasNext()) {

			ProcessInfo e = iter.next();

			res.put(e.getProcId(), e);

		}

		long now = DateUtils.now();

		if (startDate.isBefore(now) && endDate.isAfter(now)) {

			for (String pid : wfRegistry.listProcIds()) {

				res.put(pid, wfRegistry.findProcess(pid));

			}

		}

		return res.values();

	}

	@RequestMapping("/ui/wf_journal.find")

	public @ResponseBody

	Collection<ProcessInfo> findWfJournal(@RequestParam(value = "wfs", required = true) final String wfs) {

		final Map<String, ProcessInfo> res = Maps.newHashMap();

		final Set<String> wfFilter = new Gson().fromJson(wfs, new TypeToken<Set<String>>() {}.getType());

		for (String wfId : wfFilter) {

			final Iterator<ProcessInfo> iter = Iterators.transform(dnetLogger.find(WorkflowConstants.SYSTEM_METAWF_ID, wfId),

					new JournalEntryFunction());

			while (iter.hasNext()) {

				ProcessInfo e = iter.next();

				res.put(e.getProcId(), e);

			}

		}

		for (String pid : wfRegistry.listProcIds()) {

			final ProcessInfo proc = wfRegistry.findProcess(pid);

			if (wfFilter.contains(proc.getMetaWfId())) {

				res.put(pid, proc);

			}

		}

		return res.values();

	}

	@RequestMapping("/ui/wf_journal_byFamily.find")

	public @ResponseBody

	Collection<ProcessInfo> findWfJournalByFamily(@RequestParam(value = "family", required = true) final String family) throws IOException {

		final Iterator<ProcessInfo> iter = Iterators.transform(dnetLogger.find(WorkflowConstants.SYSTEM_WF_PROFILE_FAMILY, family),

				new JournalEntryFunction());

		return Lists.newArrayList(iter);

	}

	@RequestMapping("/ui/wf_journal.get")

	public @ResponseBody

	Map<String, Object> getWfJournalLog(@RequestParam(value = "id", required = true) final String id) throws Exception {

		final Map<String, Object> res = Maps.newHashMap();

		final Map<String, String> logs = dnetLogger.findOne("system:processId", id);

		if (logs != null && !logs.isEmpty()) {

			final List<String> keys = Lists.newArrayList(logs.keySet());

			Collections.sort(keys);

			final List<Map<String, String>> journalEntry = Lists.newArrayList();

			for (String k : keys) {

				final Map<String, String> m = Maps.newHashMap();

				m.put("name", k);

				m.put("value", logs.get(k));

				journalEntry.add(m);

			}

			res.put("journal", journalEntry);

		}

		final ProcessInfo process = wfRegistry.findProcess(id);

		if (process != null) {

			/*

			 * final String mapContent = process.getState() == ProcessState.Created ? "" : processGraphGenerator.getProcessImageMap(id);

			 * 

			 * String status = ""; if (!process.isComplete()) { status = process.getState().toString().toUpperCase(); } else if

			 * ("true".equals(process.getEnv().getAttribute(WorkflowConstants.SYSTEM_COMPLETED_SUCCESSFULLY))) { status = "SUCCESS"; } else

			 * { status = "FAILURE"; }

			 * 

			 * final String img = process.getState() == ProcessState.Created ? "../resources/img/notStarted.gif" : "wf_proc.img?id=" + id +

			 * "&t=" + DateUtils.now();

			 * 

			 * final String name = process.getGraph().getName();

			 * 

			 * final long startDate = NumberUtils.toLong(process.getEnv().getAttribute(WorkflowConstants.SYSTEM_START_DATE), 0); final long

			 * endDate = NumberUtils.toLong(process.getEnv().getAttribute(WorkflowConstants.SYSTEM_END_DATE), 0);

			 * 

			 * final AtomicWorkflowDescriptor wf = new AtomicWorkflowDescriptor(id, name, status, mapContent, img, true, "auto", "RUNNING",

			 * startDate, endDate);

			 * 

			 * res.put("graph", wf);

			 */

			// TODO

		}

		return res;

	}

	@RequestMapping("/ui/wf_atomic_workflow.enable")

	public @ResponseBody

	String enableAtomicWf(@RequestParam(value = "metaWf", required = true) final String metaWfId,

			@RequestParam(value = "wf", required = true) final String wfName,

			@RequestParam(value = "start", required = true) final String value) throws Exception {

		final MetaWorkflow metaWf = isClient.getResourceByCode(metaWfId, MetaWorkflow.class);

		final WorkflowInstance wfi = metaWf.findWorkflowInstanceByName(wfName);

		if (wfi != null) {

			wfi.setStartMode(StartMode.valueOf(value.toUpperCase()));

			isClient.updateResource(metaWf);

		}

		return value;

	}

	/*

	 * @RequestMapping("/ui/workflow_user_params.json") public @ResponseBody List<NodeWithUserParams>

	 * listWorkflowUserParams(@RequestParam(value = "wf", required = true) final String wfId) throws Exception { return

	 * isLookupClient.listWorkflowUserParams(wfId); }

	 * 

	 * @RequestMapping(value = "/ui/save_user_params.do") public @ResponseBody boolean saveWorkflowUserParams(@RequestParam(value = "wf",

	 * required = true) final String wfId,

	 * 

	 * @RequestParam(value = "params", required = true) final String jsonParams) throws Exception {

	 * 

	 * final String xml = isLookupClient.getProfile(wfId);

	 * 

	 * final List<NodeWithUserParams> params = new Gson().fromJson(jsonParams, new TypeToken<List<NodeWithUserParams>>() {}.getType());

	 * 

	 * boolean res = isRegistryClient.updateSarasvatiWorkflow(wfId, xml, params);

	 * 

	 * for (String metaWfId : isLookupClient.listMetaWorflowsForWfId(wfId)) { if (isLookupClient.isExecutable(metaWfId)) {

	 * isRegistryClient.updateMetaWorkflowStatus(metaWfId, WorkflowStatus.EXECUTABLE); } else {

	 * isRegistryClient.updateMetaWorkflowStatus(metaWfId, WorkflowStatus.WAIT_USER_SETTINGS); } }

	 * 

	 * return res; }

	 */

}