Application: gvSIG desktop

/* gvSIG. Desktop Geographic Information System.

 *

 * Copyright ? 2007-2017 gvSIG Association

 *

 * This program 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 2

 * 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, write to the Free Software

 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,

 * MA  02110-1301, USA.

 *

 * For any additional information, do not hesitate to contact us

 * at info AT gvsig.com, or visit our website www.gvsig.com.

 */

package org.gvsig.raster.lib.legend.impl.operations.grayscale;

import java.util.ArrayList;

import java.util.Iterator;

import java.util.List;

import org.gvsig.fmap.geom.exception.CreateEnvelopeException;

import org.gvsig.raster.lib.buffer.api.Band;

import org.gvsig.raster.lib.buffer.api.BufferLocator;

import org.gvsig.raster.lib.buffer.api.BufferManager;

import org.gvsig.raster.lib.buffer.api.NoData;

import org.gvsig.raster.lib.buffer.api.exceptions.BufferException;

import org.gvsig.raster.lib.buffer.api.exceptions.BufferOperationException;

import org.gvsig.raster.lib.buffer.api.operations.OperationFactory;

import org.gvsig.raster.lib.buffer.spi.exceptions.ProcessingOperationException;

import org.gvsig.raster.lib.buffer.spi.operations.AbstractOperation;

import org.gvsig.raster.lib.legend.api.RasterLegendLocator;

import org.gvsig.raster.lib.legend.api.RasterLegendManager;

import org.gvsig.raster.lib.legend.api.colorinterpretation.ColorInterpretation;

import org.gvsig.raster.lib.legend.spi.AbstractColoredOperation;

import org.gvsig.tools.locator.LocatorException;

/**

 * @author fdiaz

 *

 */

public class GrayScaleOperation extends AbstractColoredOperation {

    /**

     * @param factory

     *

     */

    public GrayScaleOperation(OperationFactory factory) {

        this.factory = factory;

    }

    @Override

    public void preProcess() throws BufferOperationException {

        super.preProcess();

        BufferManager manager = BufferLocator.getBufferManager();

        RasterLegendManager legendManager = RasterLegendLocator.getRasterLegendManager();

        try {

            if (!(colorInterpretation.hasAnyRGBBand() || colorInterpretation.hasAnyGrayBand())) {

                throw new UnsupportedOperationException(

                    "The color interpretation of input buffer isn't RGB nor GRAYSCALE");

            }

            int[] inputBandTypes = buffer.getBandTypes();

            if (colorInterpretation.hasAnyRGBBand()) {

                if ((colorInterpretation.getBand(ColorInterpretation.RED_BAND)>=0 && inputBandTypes[colorInterpretation.getBand(ColorInterpretation.RED_BAND)] != BufferManager.TYPE_BYTE)

                    || (colorInterpretation.getBand(ColorInterpretation.GREEN_BAND)>=0 && inputBandTypes[colorInterpretation.getBand(ColorInterpretation.GREEN_BAND)] != BufferManager.TYPE_BYTE)

                    || (colorInterpretation.getBand(ColorInterpretation.BLUE_BAND)>=0 && inputBandTypes[colorInterpretation.getBand(ColorInterpretation.BLUE_BAND)] != BufferManager.TYPE_BYTE)) {

                    throw new UnsupportedOperationException("The type of bands isn't BYTE");

                }

            } else if (colorInterpretation.hasAnyGrayBand()) {

                if ((colorInterpretation.getBand(ColorInterpretation.GRAY_BAND)>=0 && inputBandTypes[colorInterpretation.getBand(ColorInterpretation.GRAY_BAND)] != BufferManager.TYPE_BYTE)) {

                    throw new UnsupportedOperationException("The type of band gray isn't BYTE");

                }

            } else {

                throw new UnsupportedOperationException(

                    "The color interpretation of input buffer isn't RGB nor GRAYSCALE");

            }

            int sourceBands = this.buffer.getBandCount();

            NoData[] sourceNoDatas = this.buffer.getBandNoData();

            int[] sourceTypes = this.buffer.getBandTypes();

            List<String> colorInterpretations = new ArrayList<String>();

            List<NoData> noDatas = new ArrayList<NoData>();

            List<Integer> types = new ArrayList<Integer>();

            colorInterpretations.add(ColorInterpretation.GRAY_BAND);

            types.add(BufferManager.TYPE_BYTE);

            noDatas.add(null);

            if (colorInterpretation.hasAlphaBand()) {

                if(sourceTypes[colorInterpretation.getAlphaBand()]!=BufferManager.TYPE_BYTE){

                    throw new UnsupportedOperationException("The type of ALPHA band isn't BYTE");

                }

                colorInterpretations.add(ColorInterpretation.ALPHA_BAND);

                types.add(sourceTypes[colorInterpretation.getAlphaBand()]);

                noDatas.add(sourceNoDatas[colorInterpretation.getAlphaBand()]);

            }

            if (copyUnprocessedBands) {

                for (int band = 0; band < sourceBands; band++) {

                    if (!isProcessableBand(band) && !colorInterpretation.isAlphaInterpretation(band)) {

                        colorInterpretations.add(colorInterpretation.get(band));

                        noDatas.add(sourceNoDatas[band]);

                        types.add(this.buffer.getBandTypes()[band]);

                    }

                }

            }

            outputColorInterpretation =

                legendManager.createColorInterpretation(colorInterpretations.toArray(new String[0]));

            this.parameters.setDynValue(OUTPUT_COLOR_INTERPRETATION_PARAM, outputColorInterpretation);

            int[] typesInt = new int[types.size()];

            for (Iterator<Integer> iterator = types.iterator(); iterator.hasNext();) {

                int i = 0;

                Integer type = (Integer) iterator.next();

                typesInt[i] = type.intValue();

            }

            this.outputBuffer =

                manager.createBuffer(this.buffer.getRows(), this.buffer.getColumns(), typesInt,

                    noDatas.toArray(new NoData[0]), this.buffer.getProjection(), this.buffer.getEnvelope());

        } catch (LocatorException | BufferException | CreateEnvelopeException e) {

            throw new ProcessingOperationException(e);

        }

    }

    @Override

    public void process() throws ProcessingOperationException {

        try {

            super.process();

            List<Integer> bandsToProcess = new ArrayList<Integer>();

            Band outputBufferBand = outputBuffer.getBand(0);

            boolean processed = false;

            if (copyUnprocessedBands) {

                int bands = this.buffer.getBandCount();

                int outBand = colorInterpretation.hasAlphaBand() ? 2 : 1;

                for (int band = 0; band < bands; band++) {

                    if (isProcessableBand(band)) {

                        if (colorInterpretation.isGrayInterpretation(band)) {

                            outputBufferBand.copyFrom(this.buffer.getBand(band));

                            processed = true;

                        } else {

                            bandsToProcess.add(band);

                        }

                    } else if (colorInterpretation.isAlphaInterpretation(band)) {

                        outputBuffer.getBand(outputColorInterpretation.getAlphaBand()).copyFrom(

                            this.buffer.getBand(band));

                    } else {

                        outputBuffer.getBand(outBand).copyFrom(

                            this.buffer.getBand(band));

                        outBand++;

                    }

                }

            }

            if (!processed) {

                Object[] rowBandsBuffer = new Object[bandsToProcess.size()];

                for (int row = 0; row < this.buffer.getRows(); row++) {

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

                        Integer band = bandsToProcess.get(i);

                        if (isProcessableBand(band)) {

                            Band bufferBand = buffer.getBand(band);

                            rowBandsBuffer[i] = bufferBand.createRowBuffer();

                            bufferBand.fetchRow(row, rowBandsBuffer[i]);

                        }

                    }

                    Object outputRowBuffer = outputBufferBand.createRowBuffer();

                    processRow(rowBandsBuffer, outputRowBuffer);

                    outputBufferBand.putRow(row, outputRowBuffer);

                }

            }

        } catch (Exception e) {

            throw new ProcessingOperationException(e);

        }

    }

    /**

     * @param band

     * @return

     */

    private boolean isProcessableBand(int band) {

        return isRGBorGrayBand(band) && this.buffer.getBandTypes()[band] == BufferManager.TYPE_BYTE;

    }

    private boolean isRGBorGrayBand(int band) {

        String bandColorInterpretation = colorInterpretation.get(band);

        return (bandColorInterpretation.equals(ColorInterpretation.RED_BAND)

            || bandColorInterpretation.equals(ColorInterpretation.GREEN_BAND)

            || bandColorInterpretation.equals(ColorInterpretation.BLUE_BAND) || bandColorInterpretation

                .equals(ColorInterpretation.GRAY_BAND));

    }

    @Override

    public void postProcess() throws BufferOperationException {

        super.postProcess();

    }

    private void processRow(Object[] inputRows, Object outputRow) {

        byte[][] inputByteRows = new byte[inputRows.length][((byte[]) inputRows[0]).length];

        for (int i = 0; i < inputRows.length; i++) {

            inputByteRows[i] = (byte[]) inputRows[i];

        }

        byte[] outputByteRow = (byte[]) outputRow;

        for (int i = 0; i < inputByteRows[0].length; i++) {

            int tmp = 0;

            for (int band = 0; band < inputRows.length; band++) {

                tmp += 0xFF & ((Byte) inputByteRows[band][i]).byteValue();

            }

            outputByteRow[i] = (byte) (tmp / inputRows.length);

        }

    }

}