/*
 * This file is part of JGrasstools (http://www.jgrasstools.org)
 * (C) HydroloGIS - www.hydrologis.com 
 * 
 * JGrasstools is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
package org.jgrasstools.lesto.modules.filter;
import java.io.File;
import java.text.DecimalFormat;
import java.text.MessageFormat;

import oms3.annotations.Author;
import oms3.annotations.Description;
import oms3.annotations.Execute;
import oms3.annotations.In;
import oms3.annotations.Keywords;
import oms3.annotations.Label;
import oms3.annotations.License;
import oms3.annotations.Name;
import oms3.annotations.Status;
import oms3.annotations.UI;

import org.jgrasstools.gears.io.las.core.ALasReader;
import org.jgrasstools.gears.io.las.core.ILasHeader;
import org.jgrasstools.gears.io.las.core.LasRecord;
import org.jgrasstools.gears.io.las.utils.LasUtils;
import org.jgrasstools.gears.libs.modules.JGTConstants;
import org.jgrasstools.gears.libs.modules.JGTModel;
import org.jgrasstools.gears.utils.chart.CategoryHistogram;
import org.jgrasstools.gears.utils.chart.PlotFrame;
import org.opengis.referencing.crs.CoordinateReferenceSystem;

@Description("A module that creates a histogram from a las file.")
@Author(name = "Andrea Antonello", contact = "www.hydrologis.com")
@Keywords("las, histogram ")
@Label(JGTConstants.LESTO + "/filter")
@Name("lashistogram")
@Status(Status.EXPERIMENTAL)
@License(JGTConstants.GPL3_LICENSE)
public class LasHistogram extends JGTModel {
    @Description("A las file to analyze.")
    @UI(JGTConstants.FILEIN_UI_HINT)
    @In
    public String inLas;

    @Description("Number of bins to use.")
    @In
    public int pBin = 100;

    @Description("Do plot.")
    @In
    public boolean doPlot = true;

    @Description("The value to analyze.")
    @UI("combo:" + LasUtils.INTENSITY + "," + LasUtils.ELEVATION + "," + LasUtils.CLASSIFICATION)
    @In
    public String pType = LasUtils.INTENSITY;

    @Execute
    public void process() throws Exception {
        checkNull(inLas);

        boolean doIntensity = false;
        boolean doClassification = false;
        DecimalFormat formatter = new DecimalFormat("0.0");
        if (pType.equals(LasUtils.INTENSITY)) {
            doIntensity = true;
            formatter = new DecimalFormat("0");
        }
        if (pType.equals(LasUtils.CLASSIFICATION)) {
            doClassification = true;
            formatter = new DecimalFormat("0");
        }

        CoordinateReferenceSystem crs = null;
        File lasFile = new File(inLas);
        double min = Double.POSITIVE_INFINITY;
        double max = Double.NEGATIVE_INFINITY;
        int recordsCount = 0;
        try (ALasReader reader = ALasReader.getReader(lasFile, crs)) {
            reader.open();
            ILasHeader header = reader.getHeader();
            recordsCount = (int) header.getRecordsCount();
            pm.beginTask(MessageFormat.format("Calculating range of {0} points...", recordsCount), recordsCount);
            while( reader.hasNextPoint() ) {
                LasRecord readNextLasDot = reader.getNextPoint();
                double value = readNextLasDot.z;
                if (doIntensity) {
                    value = readNextLasDot.intensity;
                }
                if (doClassification) {
                    value = readNextLasDot.classification;
                }
                min = Math.min(min, value);
                max = Math.max(max, value);
                pm.worked(1);
            }
        }
        pm.done();

        pm.message("Max: " + max);
        pm.message("Min: " + min);
        if (!Double.isFinite(max) || !Double.isFinite(min)) {
            pm.errorMessage("A problem occurred while reading the data, exiting...");
            return;
        }

        double range = max - min;
        double step = range / pBin;
        double[] count = new double[pBin];
        double[] markers = new double[pBin];
        for( int i = 0; i < markers.length; i++ ) {
            markers[i] = min + step * (i + 1);
        }

        pm.beginTask("Creating histogram...", recordsCount);
        // now read them all and split them into files following the markers
        try (ALasReader reader = ALasReader.getReader(lasFile, crs)) {
            reader.open();
            while( reader.hasNextPoint() ) {
                LasRecord readNextLasDot = reader.getNextPoint();
                double value = readNextLasDot.z;
                if (doIntensity) {
                    value = readNextLasDot.intensity;
                }
                if (doClassification) {
                    value = readNextLasDot.classification;
                }
                for( int j = 0; j < markers.length; j++ ) {
                    if (value <= markers[j]) {
                        count[j] = count[j] + 1;
                        break;
                    }
                }
                pm.worked(1);
            }
        }
        pm.done();

        pm.message("value, \tcount");
        String[] markersLabels = new String[pBin];
        for( int i = 0; i < markersLabels.length; i++ ) {
            double center = markers[i] - step / 2.0;
            markersLabels[i] = formatter.format(center);
            pm.message(markersLabels[i] + ",\t" + count[i]);
        }

        if (doPlot) {
            CategoryHistogram hi = new CategoryHistogram(markersLabels, count);
            PlotFrame frame = new PlotFrame(hi);
            frame.plot();
        }
    }

    public static void main( String[] args ) throws Exception {

        String base = "D:/Dropbox/hydrologis/lavori/OLD/2014_unibz/aurina/elaborazioni/LAS_PLOTS/";

        LasHistogram ex = new LasHistogram();
        ex.inLas = base + "uni_bz_plot777.las";
        ex.pType = LasUtils.CLASSIFICATION;

        ex.process();
        
    }
    
}