EDIT

/**

* Copyright (C) 2016 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.greece;

import java.io.File;

import java.io.IOException;

import java.net.URI;

import java.util.ArrayList;

import java.util.List;

import org.apache.log4j.Logger;

import org.apache.sanselan.ImageReadException;

import org.apache.sanselan.Sanselan;

import org.apache.sanselan.common.IImageMetadata;

import org.apache.sanselan.common.ImageMetadata.Item;

import org.springframework.stereotype.Component;

import org.springframework.transaction.TransactionStatus;

import eu.etaxonomy.cdm.api.service.config.MatchingTaxonConfigurator;

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

import eu.etaxonomy.cdm.io.mexico.SimpleExcelTaxonImportState;

import eu.etaxonomy.cdm.model.agent.Person;

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

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

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

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

import eu.etaxonomy.cdm.model.media.Media;

import eu.etaxonomy.cdm.model.reference.Reference;

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

/**

 * Import for the Flora Hellenica images.

 *

 * @author a.mueller

 * @date 03.04.2017

 */

@Component

public class FloraHellenicaImageImport<CONFIG extends FloraHellenicaImportConfigurator>

        extends CdmImportBase<CONFIG,SimpleExcelTaxonImportState<CONFIG>>{

    private static final long serialVersionUID = 7118028793298922703L;

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

    private static final String BASE_URL = "https://media.e-taxonomy.eu/flora-greece/";

    private static final String IMAGE_FOLDER = "////BGBM-PESIHPC/Greece/thumbs/";

    /**

     * {@inheritDoc}

     */

    @Override

    protected void doInvoke(SimpleExcelTaxonImportState<CONFIG> state) {

        TransactionStatus tx = this.startTransaction();

        for (int plate = 1; plate < 22 ; plate++){

            try {

                handleSinglePlate(state, plate);

            } catch (Exception e) {

                logger.error("Error when handling plate " + plate);

                e.printStackTrace();

            }

        }

        this.commitTransaction(tx);

    }

    /**

     * @param state

     * @param plate

     */

    private void handleSinglePlate(SimpleExcelTaxonImportState<CONFIG> state, int plate) {

        String fill = plate < 10 ? "0" : "";

        String plateStr = "Plate_" + fill + plate + "/";

        String fullFolderUrl = BASE_URL + plateStr;

        String fullThumbUrl = BASE_URL + "thumbs/" + plateStr;

        String folderStr = IMAGE_FOLDER + plateStr;

        File file = new File(folderStr);

        String[] list = file.list();

        for (String fileStr : list){

            try {

                handleSingleFile(state, fullFolderUrl, fullThumbUrl, fileStr);

            } catch (Exception e) {

                logger.error("Error when handling file: " + fileStr + " in plate " + plate);

                e.printStackTrace();

            }

        }

    }

    /**

     * @param state

     * @param fullFolderUrl

     * @param fullThumbUrl

     * @param fileStr

     */

    private void handleSingleFile(SimpleExcelTaxonImportState<CONFIG> state, String fullFolderUrl, String fullThumbUrl, String fileStr) {

        String[] taxonNameAndArtist = getTaxonName(fileStr);

        String taxonNameStr = taxonNameAndArtist[0];

        String taxonNameStr2 = null;

        String artistStr = taxonNameAndArtist[1];

        if (fileStr.equals("RamondaSerbica(L)+Nathaliae(R)1.jpg")){

            taxonNameStr = "Ramonda serbica";

            taxonNameStr2 = "Ramonda nathaliae";

        }

        try {

            Media media = getImageMedia(fullFolderUrl + fileStr, fullThumbUrl + fileStr, true);

            //image metadata

            URI uri = URI.create(fullThumbUrl + fileStr);

            try{

                IImageMetadata metadata = Sanselan.getMetadata(uri.toURL().openStream(), null);

                ArrayList<?> items = metadata.getItems();

                for (Object object : items){

                    Item item = (Item) object;

//                    System.out.println(item.getKeyword() +  ":    " + item.getText());

                    String keyword = item.getKeyword().toLowerCase();

                    String value = item.getText();

                    if("image description".equals(keyword)){

                        media.putDescription(Language.DEFAULT(), value);

                    }else if ("artist".equals(item.getKeyword().toLowerCase())){

                        if (isNotBlank(artistStr) && ! value.contains(artistStr)){

                            logger.warn("Artist and artistStr are different: " +  artistStr  + "; " + value);

                        }

                        artistStr = value;

                    }

                }

            } catch (ImageReadException | IOException e1) {

                e1.printStackTrace();

            }

            if (isNotBlank(artistStr)){

                Person person = Person.NewInstance();

                person.setLastname(artistStr);

                media.setArtist(person);

            }

            media.addPrimaryMediaSource(getSecReference(state), null);

            Taxon taxon = getAcceptedTaxon(taxonNameStr);

            makeTextData(fileStr, media, taxon);

            if (taxonNameStr2 != null){

                getAcceptedTaxon(taxonNameStr);

                makeTextData(fileStr, media, taxon);

            }

            if (taxonNameStr2 == null){

                media.putTitle(Language.LATIN(), taxon == null ? "taxonNameStr" :

                    taxon.getName().getTitleCache());

            }else{

                media.putTitle(Language.LATIN(), "Ramonda serbica(L) + R. nathaliae(R)");

            }

        } catch (Exception e) {

            e.printStackTrace();

            return;

        }

    }

    private Reference secReference;

    private Reference getSecReference(SimpleExcelTaxonImportState<CONFIG> state) {

        if (secReference != null){

            secReference = getReferenceService().find(state.getConfig().getSecReference().getUuid());

        }

        return secReference;

    }

    /**

     * @param fileStr

     * @param media

     * @param taxon

     * @return

     */

    private void makeTextData(String fileStr, Media media, Taxon taxon) {

        if (taxon == null){

            logger.warn("Taxon not found for image " + fileStr + "."

                    + "Media could not be attached to taxon.");

            getMediaService().saveOrUpdate(media);

            return;

        }

        TaxonDescription imageGallery = taxon.getImageGallery(true);

        TextData textData = TextData.NewInstance();

        textData.setFeature(Feature.IMAGE());

        imageGallery.addElement(textData);

        textData.addMedia(media);

    }

    /**

     * @param taxonNameStr

     * @return

     */

    private Taxon getAcceptedTaxon(String taxonNameStr) {

        MatchingTaxonConfigurator config = new MatchingTaxonConfigurator();

        config.setTaxonNameTitle(taxonNameStr);

        config.setIncludeSynonyms(false);

        List<Taxon> list = (List)getTaxonService().findTaxaByName(config);

        if (list.isEmpty()){

            logger.warn("Taxon not found for media: " + taxonNameStr);

            return null;

        }else{

            if (list.size()>1){

                logger.warn("More than 1 taxon found for media: " + taxonNameStr);

            }

            return list.get(0);

        }

    }

    /**

     * @param fileStr

     * @return

     */

    private String[] getTaxonName(String fileStr) {

        String[] result = new String[2];

        fileStr = fileStr.split("\\.")[0];

        fileStr = fileStr.replaceAll("[0-9]", "");

        String[] x = fileStr.split("_");

        if (x.length == 2){

            result[1] = x[1];

        }

        fileStr = splitCamelCase(x[0]);

        String[] split = fileStr.split(" ");

        String name = split[0] + " " + split[1].toLowerCase() +

                (split.length > 2 ? " subsp. " + split[2].toLowerCase() : "");

        result[0] = name;

        System.out.println(result[0] + (result[1] != null ?  "   Artist: " + result[1]: ""));

        return result;

    }

    //from http://stackoverflow.com/questions/2559759/how-do-i-convert-camelcase-into-human-readable-names-in-java

    static String splitCamelCase(String s) {

        return s.replaceAll(

           String.format("%s",

//              "(?<=[A-Z])(?=[A-Z][a-z])",

              "(?<=[^A-Z])(?=[A-Z])"

//              "(?<=[A-Za-z])(?=[^A-Za-z])"

           ),

           " "

        );

     }

    /**

     * {@inheritDoc}

     */

    @Override

    protected boolean doCheck(SimpleExcelTaxonImportState<CONFIG> state) {

        return false;

    }

    /**

     * {@inheritDoc}

     */

    @Override

    protected boolean isIgnore(SimpleExcelTaxonImportState<CONFIG> state) {

        return ! state.getConfig().isDoImages();

    }

}