EDIT

/**

* Copyright (C) 2007 EDIT

* European Distributed Institute of Taxonomy 

* http://www.e-taxonomy.eu

* 

* The contents of this file are subject to the Mozilla Public License Version 1.1

* See LICENSE.TXT at the top of this package for the full license terms.

*/

package eu.etaxonomy.cdm.io.csv.redlist.out;

import java.io.File;

import java.io.FileNotFoundException;

import java.io.FileOutputStream;

import java.io.IOException;

import java.io.OutputStream;

import java.io.OutputStreamWriter;

import java.io.PrintWriter;

import java.io.UnsupportedEncodingException;

import java.util.HashSet;

import java.util.List;

import java.util.Set;

import java.util.UUID;

import javax.xml.stream.XMLOutputFactory;

import javax.xml.stream.XMLStreamException;

import javax.xml.stream.XMLStreamWriter;

import org.apache.commons.lang.StringUtils;

import org.apache.log4j.Logger;

import eu.etaxonomy.cdm.common.CdmUtils;

import eu.etaxonomy.cdm.io.common.CdmExportBase;

import eu.etaxonomy.cdm.io.common.ICdmExport;

import eu.etaxonomy.cdm.io.common.mapping.out.IExportTransformer;

import eu.etaxonomy.cdm.model.common.CdmBase;

import eu.etaxonomy.cdm.model.common.IOriginalSource;

import eu.etaxonomy.cdm.model.common.ISourceable;

import eu.etaxonomy.cdm.model.location.Country;

import eu.etaxonomy.cdm.model.location.NamedArea;

import eu.etaxonomy.cdm.model.taxon.Taxon;

import eu.etaxonomy.cdm.model.taxon.TaxonBase;

import eu.etaxonomy.cdm.model.taxon.TaxonNode;

/**

 * @author a.mueller, a.oppermann

 * @date 18.10.2012

 *

 */

public abstract class CsvExportBaseRedlist extends CdmExportBase<CsvTaxExportConfiguratorRedlist, CsvTaxExportStateRedlist, IExportTransformer> implements ICdmExport<CsvTaxExportConfiguratorRedlist, CsvTaxExportStateRedlist>{

	private static final Logger logger = Logger.getLogger(CsvExportBaseRedlist.class);

	protected static final boolean IS_CORE = true;

	protected Set<Integer> existingRecordIds = new HashSet<Integer>();

	protected Set<UUID> existingRecordUuids = new HashSet<UUID>();

	/* (non-Javadoc)

	 * @see eu.etaxonomy.cdm.io.common.CdmIoBase#countSteps()

	 */

	@Override

	public int countSteps() {

		List<TaxonNode> allNodes =  getClassificationService().getAllNodes();

		return allNodes.size();

	}

	/**

	 * Returns all children of the given taxon node and the node itself if the node has

	 *  a {@link Taxon} attached (empty taxon nodes should not but do exist in CDM databases).

	 * @return

	 */

	protected Set<TaxonNode> getAllNodes(Set<TaxonNode> taxonNodes) {

		//handle empty list as no filter defined

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

			taxonNodes = null;

		}

		List<TaxonNode> allNodes =  getClassificationService().getAllNodes();

		Set<TaxonNode> result = new HashSet<TaxonNode>();

		for (TaxonNode node : allNodes){

			if (node.getClassification() == null ){

				continue;

			}else if (taxonNodes != null && ! taxonNodes.contains(node.getClassification())){

				continue;

			}else{

				Taxon taxon = CdmBase.deproxy(node.getTaxon(), Taxon.class);

				if (taxon == null){

					String message = "There is a taxon node without taxon: " + node.getId();

					logger.warn(message);

					continue;

				}

				result.add(node);

			}

		}

		return result;

	}

	/**

	 * Creates the locationId, locality, countryCode triple

	 * @param record

	 * @param area

	 */

	protected void handleArea(ICsvAreaRecord record, NamedArea area, TaxonBase<?> taxon, boolean required) {

		if (area != null){

			record.setLocationId(area);

			record.setLocality(area.getLabel());

			if (area.isInstanceOf(Country.class)){

				Country country = CdmBase.deproxy(area, Country.class);

				record.setCountryCode(country.getIso3166_A2());

			}

		}else{

			if (required){

				String message = "Description requires area but area does not exist for taxon " + getTaxonLogString(taxon);

				logger.warn(message);

			}

		}

	}

	protected String getTaxonLogString(TaxonBase<?> taxon) {

		return taxon.getTitleCache() + "(" + taxon.getId() + ")";

	}

	/**

	 * @param el

	 * @return

	 */

	protected boolean recordExists(CdmBase el) {

		return existingRecordIds.contains(el.getId());

	}

	/**

	 * @param sec

	 */

	protected void addExistingRecord(CdmBase cdmBase) {

		existingRecordIds.add(cdmBase.getId());

	}

	/**

	 * @param el

	 * @return

	 */

	protected boolean recordExistsUuid(CdmBase el) {

		return existingRecordUuids.contains(el.getUuid());

	}

	/**

	 * @param sec

	 */

	protected void addExistingRecordUuid(CdmBase cdmBase) {

		existingRecordUuids.add(cdmBase.getUuid());

	}

	protected String getSources(ISourceable<?> sourceable, CsvTaxExportConfiguratorRedlist config) {

		String result = "";

		for (IOriginalSource source: sourceable.getSources()){

			if (StringUtils.isBlank(source.getIdInSource())){//idInSource indicates that this source is only data provenance, may be changed in future

				if (source.getCitation() != null){

					String ref = source.getCitation().getTitleCache();

					result = CdmUtils.concat(config.getSetSeparator(), result, ref);

				}

			}

		}

		return result;

	}

	/**

	 * @param config

	 * @return

	 * @throws IOException

	 * @throws FileNotFoundException

	 */

	protected FileOutputStream createFileOutputStream(CsvTaxExportConfiguratorRedlist config, String thisFileName) throws IOException, FileNotFoundException {

		String filePath = config.getDestinationNameString();

		String fileName = filePath + File.separatorChar + thisFileName;

		File f = new File(fileName);

		if (!f.exists()){

			f.createNewFile();

		}

		FileOutputStream fos = new FileOutputStream(f);

		return fos;

	}

	/**

	 * @param config

	 * @param factory

	 * @return

	 * @throws IOException

	 * @throws FileNotFoundException

	 * @throws XMLStreamException

	 */

	protected XMLStreamWriter createXmlStreamWriter(CsvTaxExportStateRedlist state, String fileName)

			throws IOException, FileNotFoundException, XMLStreamException {

		XMLOutputFactory factory = XMLOutputFactory.newInstance(); 

		OutputStream os;

		boolean useZip = state.isZip();

		if (useZip){

			os = state.getZipStream(fileName);

		}else{

			os = createFileOutputStream(state.getConfig(), fileName);

		}

		XMLStreamWriter  writer = factory.createXMLStreamWriter(os);

		return writer;

	}

	/**

	 * @param coreTaxFileName

	 * @param config

	 * @return

	 * @throws IOException

	 * @throws FileNotFoundException

	 * @throws UnsupportedEncodingException

	 */

	protected PrintWriter createPrintWriter(final String fileName, CsvTaxExportStateRedlist state) 

					throws IOException, FileNotFoundException, UnsupportedEncodingException {

		OutputStream os;

		boolean useZip = state.isZip();

		if (useZip){

			os = state.getZipStream(fileName);

		}else{

			os = createFileOutputStream(state.getConfig(), fileName);

		}

		PrintWriter writer = new PrintWriter(new OutputStreamWriter(os, "UTF8"), true);

		return writer;

	}

	/**

	 * Closes the writer

	 * @param writer

	 * @param state

	 */

	protected void closeWriter(PrintWriter writer, CsvTaxExportStateRedlist state) {

		if (writer != null && state.isZip() == false){

			writer.close();

		}

	}

	/**

	 * Closes the writer.

	 * Note: XMLStreamWriter does not close the underlying stream.

	 * @param writer

	 * @param state

	 */

	protected void closeWriter(XMLStreamWriter writer, CsvTaxExportStateRedlist state) {

		if (writer != null && state.isZip() == false){

			try {

				writer.close();

			} catch (XMLStreamException e) {

				throw new RuntimeException(e);

			}

		}

	}

	protected void clearExistingRecordIds(){

		existingRecordIds.clear();

	}

}

/**

 * Copyright (C) 2007 EDIT

 * European Distributed Institute of Taxonomy 

 * http://www.e-taxonomy.eu

 * 

 * The contents of this file are subject to the Mozilla Public License Version 1.1

 * See LICENSE.TXT at the top of this package for the full license terms.

 */

package eu.etaxonomy.cdm.io.csv.redlist.out;

import java.io.ByteArrayOutputStream;

import java.io.File;

import java.util.ArrayList;

import java.util.HashSet;

import java.util.List;

import java.util.Set;

import java.util.UUID;

import org.apache.log4j.Logger;

import eu.etaxonomy.cdm.database.ICdmDataSource;

import eu.etaxonomy.cdm.io.common.XmlExportConfiguratorBase;

import eu.etaxonomy.cdm.io.common.mapping.out.IExportTransformer;

import eu.etaxonomy.cdm.model.description.Feature;

import eu.etaxonomy.cdm.model.location.NamedArea;

/**

 * @author a.oppermann

 * @created 17.10.2012

 */

public class CsvTaxExportConfiguratorRedlist extends XmlExportConfiguratorBase<CsvTaxExportStateRedlist> {

	@SuppressWarnings("unused")

	private static final Logger logger = Logger.getLogger(CsvTaxExportConfiguratorRedlist.class);

	private String encoding = "UTF-8";

	private String linesTerminatedBy = "\r\n";

	private String fieldsEnclosedBy = "\"";

	private boolean hasHeaderLines = true;

	private String fieldsTerminatedBy=",";

	private boolean doTaxa = true;

	private boolean doDistributions = false;

	private ByteArrayOutputStream baos;

	private boolean isUseIdWherePossible = false;

	private boolean includeBasionymsInResourceRelations;

	private boolean includeMisappliedNamesInResourceRelations;

	private String defaultBibliographicCitation = null;

	private List<UUID> featureExclusions = new ArrayList<UUID>();

	//filter on the classifications to be exported

	private Set<UUID> classificationUuids = new HashSet<UUID>();   

	private boolean withHigherClassification = false;

	private String setSeparator = ";";

	private List<Feature> features;

	private String classificationTitleCache;

	private List<NamedArea> areas;

	//TODO

	private static IExportTransformer defaultTransformer = null;

	public static CsvTaxExportConfiguratorRedlist NewInstance(ICdmDataSource source, File destinationFolder) { 

		return new CsvTaxExportConfiguratorRedlist(source, destinationFolder);

	}

	@Override

	@SuppressWarnings("unchecked")

	protected void makeIoClassList() {

		ioClassList = new Class[] {

				CsvTaxExportRedlist.class

		};

	}

	/**

	 * @param url

	 * @param destination

	 */

	private CsvTaxExportConfiguratorRedlist(ICdmDataSource source, File destination) {

		super(destination, source, defaultTransformer);

	}

	/* (non-Javadoc)

	 * @see eu.etaxonomy.cdm.io.common.ImportConfiguratorBase#getSource()

	 */

	@Override

	public File getDestination() {

		return super.getDestination();

	}

	/**

	 * @param file

	 */

	@Override

	public void setDestination(File fileName) {

		super.setDestination(fileName);

	}

	/* (non-Javadoc)

	 * @see eu.etaxonomy.cdm.io.common.IExportConfigurator#getDestinationNameString()

	 */

	@Override

	public String getDestinationNameString() {

		if (this.getDestination() == null) {

			return null;

		} else {

			return this.getDestination().toString();

		}

	}

	/* (non-Javadoc)

	 * @see eu.etaxonomy.cdm.io.common.IExportConfigurator#getNewState()

	 */

	public CsvTaxExportStateRedlist getNewState() {

		return new CsvTaxExportStateRedlist(this);

	}

	public boolean isDoTaxa() {

		return doTaxa;

	}

	public void setDoTaxa(boolean doTaxa) {

		this.doTaxa = doTaxa;

	}

	public boolean isDoDistributions() {

		return doDistributions;

	}

	public void setDoDistributions(boolean doDistributions) {

		this.doDistributions = doDistributions;

	}

	public void setFeatureExclusions(List<UUID> featureExclusions) {

		this.featureExclusions = featureExclusions;

	}

	public List<UUID> getFeatureExclusions() {

		return featureExclusions;

	}

	public String getEncoding() {

		return encoding;

	}

	public void setEncoding(String encoding) {

		this.encoding = encoding;

	}

	public String getLinesTerminatedBy() {

		return linesTerminatedBy;

	}

	public void setLinesTerminatedBy(String linesTerminatedBy) {

		this.linesTerminatedBy = linesTerminatedBy;

	}

	public String getFieldsEnclosedBy() {

		return fieldsEnclosedBy;

	}

	public void setFieldsEnclosedBy(String fieldsEnclosedBy) {

		this.fieldsEnclosedBy = fieldsEnclosedBy;

	}

	/**

	 * Equals darwin core archive ignoreHeaderLines attribute

	 * @return

	 */

	public boolean isHasHeaderLines() {

		return hasHeaderLines;

	}

	public void setHasHeaderLines(boolean hasHeaderLines) {

		this.hasHeaderLines = hasHeaderLines;

	}

	public boolean isIncludeBasionymsInResourceRelations() {

		return includeBasionymsInResourceRelations;

	}

	public void setIncludeBasionymsInResourceRelations(boolean includeBasionymsInResourceRelations) {

		this.includeBasionymsInResourceRelations = includeBasionymsInResourceRelations;

	}

	public boolean isIncludeMisappliedNamesInResourceRelations() {

		return includeMisappliedNamesInResourceRelations;

	}

	public void setIncludeMisappliedNamesInResourceRelations(boolean includeMisappliedNamesInResourceRelations) {

		this.includeMisappliedNamesInResourceRelations = includeMisappliedNamesInResourceRelations;

	}

	public boolean isUseIdWherePossible() {

		return this.isUseIdWherePossible;

	}

	public void setUseIdWherePossible(boolean isUseIdWherePossible) {

		this.isUseIdWherePossible = isUseIdWherePossible;

	}

	public void setDefaultBibliographicCitation(String defaultBibliographicCitation) {

		this.defaultBibliographicCitation = defaultBibliographicCitation;

	}

	public String getDefaultBibliographicCitation() {

		return defaultBibliographicCitation;

	}

	/**

	 * The default value for the taxon.source column. This may be a column linking to a url that provides 

	 * data about the given taxon. The id is replaced by a placeholder, 

	 * e.g. http://wp6-cichorieae.e-taxonomy.eu/portal/?q=cdm_dataportal/taxon/{id}.

	 * NOTE: This may be replaced in future versions by concrete CDM server implementations.

	 * 

	 * @return the taxonSourceDefault

	 */

	public boolean isWithHigherClassification() {

		return withHigherClassification;

	}

	public void setWithHigherClassification(boolean withHigherClassification) {

		this.withHigherClassification = withHigherClassification;

	}

	/**

	 * @return the setSeparator

	 */

	public String getSetSeparator() {

		return setSeparator;

	}

	/**

	 * @param setSeparator the setSeparator to set

	 */

	public void setSetSeparator(String setSeparator) {

		this.setSeparator = setSeparator;

	}

	public void setFieldsTerminatedBy(String fieldsTerminatedBy) {

		this.fieldsTerminatedBy = fieldsTerminatedBy;

	}

	public String getFieldsTerminatedBy() {

		return fieldsTerminatedBy;

	}

	public Set<UUID> getTaxonNodeUuids() {

		return classificationUuids;

	}

	public void setTaxonNodeUuids(Set<UUID> classificationUuids) {

		this.classificationUuids = classificationUuids;

	}

	public ByteArrayOutputStream getByteArrayOutputStream() {

		return baos;

	}

	public void setByteArrayOutputStream(ByteArrayOutputStream baos) {

		this.baos = baos;

	}

	public void setFeatures(List<Feature> features) {

		this.features = features;

	}

	public List<Feature>  getFeatures() {

		return features;

	}

	public void setClassificationTitleCache(String classificationTitleCache) {

		this.classificationTitleCache = classificationTitleCache;

	}

	public String getClassificationTitleCache() {

		return classificationTitleCache;

	}

	/**

	 * @param areas

	 */

	public void setNamedAreas(List<NamedArea> areas) {

		// TODO Auto-generated method stub

		this.areas = areas;

	}

	public List<NamedArea> getNamedAreas(){

		return areas;

	}

/**

* Copyright (C) 2007 EDIT

* European Distributed Institute of Taxonomy 

* http://www.e-taxonomy.eu

* 

* The contents of this file are subject to the Mozilla Public License Version 1.1

* See LICENSE.TXT at the top of this package for the full license terms.

*/

package eu.etaxonomy.cdm.io.csv.redlist.out;

import java.io.ByteArrayOutputStream;

import java.io.PrintWriter;

import java.util.ArrayList;

import java.util.Collections;

import java.util.Comparator;

import java.util.HashSet;

import java.util.List;

import java.util.Set;

import java.util.UUID;

import org.apache.log4j.Logger;

import org.springframework.stereotype.Component;

import org.springframework.transaction.TransactionStatus;

import eu.etaxonomy.cdm.model.common.CdmBase;

import eu.etaxonomy.cdm.model.common.Language;

import eu.etaxonomy.cdm.model.common.RelationshipTermBase;

import eu.etaxonomy.cdm.model.description.CategoricalData;

import eu.etaxonomy.cdm.model.description.DescriptionElementBase;

import eu.etaxonomy.cdm.model.description.Distribution;

import eu.etaxonomy.cdm.model.description.Feature;

import eu.etaxonomy.cdm.model.description.State;

import eu.etaxonomy.cdm.model.description.TaxonDescription;

import eu.etaxonomy.cdm.model.description.TextData;

import eu.etaxonomy.cdm.model.location.NamedArea;

import eu.etaxonomy.cdm.model.name.NonViralName;

import eu.etaxonomy.cdm.model.taxon.Classification;

import eu.etaxonomy.cdm.model.taxon.Synonym;

import eu.etaxonomy.cdm.model.taxon.SynonymRelationship;

import eu.etaxonomy.cdm.model.taxon.SynonymRelationshipType;

import eu.etaxonomy.cdm.model.taxon.Taxon;

import eu.etaxonomy.cdm.model.taxon.TaxonBase;

import eu.etaxonomy.cdm.model.taxon.TaxonNode;

import eu.etaxonomy.cdm.model.taxon.TaxonRelationship;

import eu.etaxonomy.cdm.model.taxon.TaxonRelationshipType;

/**

 * @author a.oppermann

 * @created 18.10.2012

 */

@Component

public class CsvTaxExportRedlist extends CsvExportBaseRedlist {

	private static final Logger logger = Logger.getLogger(CsvTaxExportRedlist.class);

	private static final String ROW_TYPE = "http://rs.tdwg.org/dwc/terms/Taxon";

	private static final String fileName = "RedlistCoreTax.csv";

	public CsvTaxExportRedlist() {

		super();

		this.ioName = this.getClass().getSimpleName();

	}

	/** Retrieves data from a CDM DB and serializes them CDM to CSV.

	 * Starts with root taxa and traverses the classification to retrieve 

	 * children taxa, synonyms, relationships, descriptive data, red list 

	 * status (features). 

	 * Taxa that are not part of the classification are not found.

	 * 

	 * @param exImpConfig

	 * @param dbname

	 * @param filename

	 */

	@Override

	protected void doInvoke(CsvTaxExportStateRedlist state){

		CsvTaxExportConfiguratorRedlist config = state.getConfig();

		TransactionStatus txStatus = startTransaction(true);

		List<NamedArea> selectedAreas = config.getNamedAreas();

		Set<TaxonNode> taxonNodes = assembleTaxonNodeSet(config);

		PrintWriter writer = null;

		ByteArrayOutputStream byteArrayOutputStream;

		try {

			byteArrayOutputStream = config.getByteArrayOutputStream();

			writer = new PrintWriter(byteArrayOutputStream); 

			//geographical Filter

			List<TaxonNode> filteredNodes = handleGeographicalFilter(selectedAreas, taxonNodes);

			//sorting List

			Collections.sort(filteredNodes, new Comparator<TaxonNode>() {

				@Override

				public int compare(TaxonNode tn1, TaxonNode tn2) {

					Taxon taxon1 = tn1.getTaxon();

					Taxon taxon2 = tn2.getTaxon();

					if(taxon1 != null && taxon2 != null){

						return taxon1.getTitleCache().compareTo(taxon2.getTitleCache());

					}

					else{

						return 0;

					}

				}

			});

			for (TaxonNode node : filteredNodes){

				Taxon taxon = CdmBase.deproxy(node.getTaxon(), Taxon.class);

				CsvTaxRecordRedlist record = assembleRecord(state);

				NonViralName<?> name = CdmBase.deproxy(taxon.getName(), NonViralName.class);

				Classification classification = node.getClassification();

				config.setClassificationTitleCache(classification.getTitleCache());	

				if (! this.recordExists(taxon)){

					handleTaxonBase(record, taxon, name, taxon, classification, null, false, false, config);

					record.write(writer);

					this.addExistingRecord(taxon);

				}

				//misapplied names

				handleMisapplication(taxon, writer, classification, record, config);

				writer.flush();

			}

		} catch (ClassCastException e) {

			e.printStackTrace();

		}

		finally{

			writer.close();

			this.clearExistingRecordIds();

		}

		commitTransaction(txStatus);

		return;

	}

	//TODO: Exception handling

	protected Set<TaxonNode> assembleTaxonNodeSet(CsvTaxExportConfiguratorRedlist config){

		Set<TaxonNode> taxonNodes = new HashSet<>();

		if(config != null){

			Set<UUID> taxonNodeUuidSet = config.getTaxonNodeUuids();

			taxonNodes.addAll(getTaxonNodeService().find(taxonNodeUuidSet));

		}

		return taxonNodes;

	}

	//TODO: Exception handling

	private CsvTaxRecordRedlist assembleRecord(CsvTaxExportStateRedlist state) {

		if(state!=null){

			CsvTaxExportConfiguratorRedlist config = state.getConfig();

			CsvMetaDataRecordRedlist metaRecord = new CsvMetaDataRecordRedlist(true, fileName, ROW_TYPE);

			state.addMetaRecord(metaRecord);

			CsvTaxRecordRedlist record = new CsvTaxRecordRedlist(metaRecord, config);

			return record;

		}

		return null;

	}

	/**

	 * Takes positive List of areas and iterates over a given taxon node 

	 * and their {@link Taxon} to return all {@link Taxon} with the desired 

	 * geographical attribute.

	 * 

	 * <p><p>

	 *

	 * If selectedAreas is null all child {@link TaxonNode}s of the given taxon node will be returned.

	 * 

	 * @param selectedAreas 

	 * @param taxonNodes

	 * @return

	 */

	protected List<TaxonNode> handleGeographicalFilter(List<NamedArea> selectedAreas,

			Set<TaxonNode> taxonNodes) {

		List<TaxonNode> filteredNodes = new ArrayList<TaxonNode>();

		List<TaxonNode> allNodes =  new ArrayList(getAllNodes(taxonNodes));

		//Geographical filter

		logger.info(selectedAreas.size());

		if(selectedAreas != null && !selectedAreas.isEmpty() && selectedAreas.size() < 16){

//				if(selectedAreas.size() == 16){

//					//Germany TDWG Level 3

//					String germany="uu7b7c2db5-aa44-4302-bdec-6556fd74b0b9id";

//					selectedAreas.add((NamedArea) getTermService().find(UUID.fromString(germany)));

//				}

			for (TaxonNode node : allNodes){

				Taxon taxon = CdmBase.deproxy(node.getTaxon(), Taxon.class);

				Set<TaxonDescription> descriptions = taxon.getDescriptions();

				for (TaxonDescription description : descriptions){

					for (DescriptionElementBase el : description.getElements()){

						if (el.isInstanceOf(Distribution.class) ){

							Distribution distribution = CdmBase.deproxy(el, Distribution.class);

							NamedArea area = distribution.getArea();

							for(NamedArea selectedArea:selectedAreas){

								if(selectedArea.getUuid().equals(area.getUuid())){

									filteredNodes.add(node);

								}

							}

						}

					}

				}

			}

		}else{

			filteredNodes = allNodes;

		}

		return filteredNodes;

	}

	/**

	 * handles misapplied {@link Taxon}

	 * @param taxon

	 * @param writer

	 * @param classification

	 * @param metaRecord

	 * @param config

	 */

	private void handleMisapplication(Taxon taxon, PrintWriter writer, Classification classification, CsvTaxRecordRedlist record, CsvTaxExportConfiguratorRedlist config) {

		Set<Taxon> misappliedNames = taxon.getMisappliedNames();

		for (Taxon misappliedName : misappliedNames ){

//			CsvTaxRecordRedlist record = new CsvTaxRecordRedlist(metaRecord, config);

			TaxonRelationshipType relType = TaxonRelationshipType.MISAPPLIED_NAME_FOR();

			NonViralName<?> name = CdmBase.deproxy(misappliedName.getName(), NonViralName.class);

			if (! this.recordExists(misappliedName)){

				handleTaxonBase(record, misappliedName, name, taxon, classification, relType, false, false, config);

				record.write(writer);

				this.addExistingRecord(misappliedName);

			}

		}	

	}

	/**

	 * handles the information record for the actual {@link Taxon} including {@link Classification classification}, Taxon Name, Taxon ID,

	 * Taxon Status, Synonyms, {@link Feature features} data 

	 * @param record the concrete information record

	 * @param taxonBase {@link Taxon}

	 * @param name

	 * @param acceptedTaxon

	 * @param parent

	 * @param basionym

	 * @param isPartial 

	 * @param isProParte 

	 * @param config 

	 * @param type

	 */

	private void handleTaxonBase(CsvTaxRecordRedlist record,TaxonBase<?> taxonBase,

			NonViralName<?> name, Taxon acceptedTaxon, Classification classification, 

			RelationshipTermBase<?> relType, boolean isProParte, boolean isPartial, 

			CsvTaxExportConfiguratorRedlist config) {

		List<Feature> features = config.getFeatures();

		record.setHeadLinePrinted(config.isHasHeaderLines());

		if(features != null)record.setPrintFeatures(features);

		config.setHasHeaderLines(false);

		record.setDatasetName(classification.getTitleCache());

		record.setScientificName(name.getTitleCache());

		record.setScientificNameId(name.getUuid().toString());

		handleTaxonomicStatus(record, name, relType, isProParte, isPartial);

		//synonyms

		handleSynonyms(record,(Taxon) taxonBase);

		//distribution

		handleDiscriptionData(record, (Taxon) taxonBase);

		if(features!= null) {

			List<List<String>> featureCells = new ArrayList<List<String>>(features.size());

			for(int i = 0; i < features.size(); i++) {

				featureCells.add(new ArrayList<String>());

			}

			handleRelatedRedlistStatus(record, (Taxon)taxonBase, false, featureCells, features);

			handleRelatedRedlistStatus(record, (Taxon)taxonBase, true, featureCells, features);

		}

		return;

	}

	private void handleTaxonomicStatus(

			CsvTaxRecordRedlist record,

			NonViralName<?> name, 

			RelationshipTermBase<?> type,

			boolean isProParte,

			boolean isPartial) {

		if (type == null){

			record.setTaxonomicStatus(name.getNomenclaturalCode().acceptedTaxonStatusLabel());

		}else{

			String status = name.getNomenclaturalCode().synonymStatusLabel();

			if (type.equals(SynonymRelationshipType.HETEROTYPIC_SYNONYM_OF())){

				status = "heterotypicSynonym";

			}else if(type.equals(SynonymRelationshipType.HOMOTYPIC_SYNONYM_OF())){

				status = "homotypicSynonym";

			}else if(type.equals(TaxonRelationshipType.MISAPPLIED_NAME_FOR())){

				status = "misapplied";

			}

			if (isProParte){

				status = "proParteSynonym";

			}else if (isPartial){

				String message = "Partial synonym is not part of the gbif toxonomic status vocabulary";

				logger.warn(message);

				status = "partialSynonym";

			}

			record.setTaxonomicStatus(status);

		}

	}

	private void handleSynonyms(CsvTaxRecordRedlist record, Taxon taxon) {

		Set<SynonymRelationship> synRels = taxon.getSynonymRelations();

		ArrayList<String> synonyms = new ArrayList<String>(); 

		for (SynonymRelationship synRel :synRels ){

			Synonym synonym = synRel.getSynonym();

			SynonymRelationshipType type = synRel.getType();

			if (type == null){ // should not happen

				type = SynonymRelationshipType.SYNONYM_OF();

			}

			NonViralName<?> name = CdmBase.deproxy(synonym.getName(), NonViralName.class);

			synonyms.add(name.getTitleCache());

		}

		record.setSynonyms(synonyms);

	}

	private void handleDiscriptionData(CsvTaxRecordRedlist record, Taxon taxon) {

		Set<TaxonDescription> descriptions = taxon.getDescriptions();

		ArrayList<String> distributions = new ArrayList<String>();

		for (TaxonDescription description : descriptions){

			for (DescriptionElementBase el : description.getElements()){

				if (el.isInstanceOf(Distribution.class) ){

						Distribution distribution = CdmBase.deproxy(el, Distribution.class);

						NamedArea area = distribution.getArea();

						distributions.add(area.getTitleCache());

				}

			}

		}

		record.setCountryCode(distributions);

	}

	private void handleRedlistStatus(CsvTaxRecordRedlist record, Taxon taxon, List<List<String>> featureCells, List<Feature> features){

		Set<TaxonDescription> descriptions = taxon.getDescriptions();

		for (TaxonDescription description : descriptions){

			for (DescriptionElementBase el : description.getElements()){

				if(el.isInstanceOf(CategoricalData.class)){

					CategoricalData categoricalData = CdmBase.deproxy(el, CategoricalData.class);

					for(State state:categoricalData.getStatesOnly()){

						Feature stateFeature = categoricalData.getFeature();

						// find matching feature and put data into according cell

						for(int i = 0; i < features.size(); i++) {

							if(features.get(i).equals(stateFeature)){

								List<String> cell = featureCells.get(i);

								cell.add(state.toString());

							}

						}

					}

				}else if(el.isInstanceOf(TextData.class)){

					TextData textData = CdmBase.deproxy(el, TextData.class);

					Feature textFeature = textData.getFeature();

					// find matching feature and put data into according cell

					for(int i = 0; i < features.size(); i++) {

						if(features.get(i).equals(textFeature)){

							List<String> cell = featureCells.get(i);

							String text = textData.getText(Language.GERMAN());

							text = text.replaceAll(System.getProperty("line.separator"), "");

							text = text.replaceAll("                            ", " ");

							cell.add(text);

						}

					}

				}

			}

		}

		record.setFeatures(featureCells);

	}

	private void handleRelatedRedlistStatus(CsvTaxRecordRedlist record, Taxon taxon, boolean relationFrom, List<List<String>> featureCells, List<Feature> features) {

		if (relationFrom)handleRedlistStatus(record, taxon, featureCells, features);

		Set<TaxonRelationship> taxRels;

		if(relationFrom){

			taxRels = taxon.getRelationsFromThisTaxon();

		}else{

			taxRels = taxon.getRelationsToThisTaxon();

		}

		for (TaxonRelationship taxRel:taxRels){