Application: gvSIG desktop

/* gvSIG. Sistema de Informaci?n Geogr?fica de la Generalitat Valenciana

*

* Copyright (C) 2004 IVER T.I. and Generalitat Valenciana.

*

* 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., 59 Temple Place - Suite 330, Boston, MA  02111-1307,USA.

*

* For more information, contact:

*

*  Generalitat Valenciana

*   Conselleria d'Infraestructures i Transport

*   Av. Blasco Ib??ez, 50

*   46010 VALENCIA

*   SPAIN

*

*      +34 963862235

*   gvsig@gva.es

*      www.gvsig.gva.es

*

*    or

*

*   IVER T.I. S.A

*   Salamanca 50

*   46005 Valencia

*   Spain

*

*   +34 963163400

*   dac@iver.es

*/

package com.iver.cit.gvsig.fmap.layers;

import java.awt.Component;

import java.awt.Dimension;

import java.awt.Graphics2D;

import java.awt.Image;

import java.awt.Point;

import java.awt.Rectangle;

import java.awt.geom.AffineTransform;

import java.awt.geom.NoninvertibleTransformException;

import java.awt.geom.Point2D;

import java.awt.geom.Rectangle2D;

import java.awt.image.BufferedImage;

import java.io.File;

import java.io.IOException;

import java.lang.ref.WeakReference;

import java.lang.reflect.Constructor;

import java.lang.reflect.InvocationTargetException;

import java.net.MalformedURLException;

import java.net.URL;

import java.util.ArrayList;

import java.util.HashMap;

import java.util.Hashtable;

import java.util.Iterator;

import java.util.List;

import java.util.Map;

import java.util.Vector;

import java.util.logging.Logger;

import java.util.prefs.Preferences;

import java.util.regex.Matcher;

import java.util.regex.Pattern;

import javax.print.attribute.PrintRequestAttributeSet;

import javax.swing.ImageIcon;

import javax.swing.JOptionPane;

import org.cresques.cts.IProjection;

import org.cresques.geo.ViewPortData;

import org.cresques.px.Extent;

import org.exolab.castor.xml.ValidationException;

import org.gvsig.fmap.raster.layers.FLyrRasterSE;

import org.gvsig.fmap.raster.layers.IRasterLayerActions;

import org.gvsig.fmap.raster.layers.IStatusRaster;

import org.gvsig.fmap.raster.layers.StatusLayerRaster;

import org.gvsig.raster.dataset.CompositeDataset;

import org.gvsig.raster.dataset.IBuffer;

import org.gvsig.raster.dataset.MosaicNotValidException;

import org.gvsig.raster.dataset.MultiRasterDataset;

import org.gvsig.raster.dataset.NotSupportedExtensionException;

import org.gvsig.raster.dataset.io.RasterDriverException;

import org.gvsig.raster.grid.GridPalette;

import org.gvsig.raster.grid.GridTransparency;

import org.gvsig.raster.grid.filter.FilterTypeException;

import org.gvsig.raster.grid.filter.RasterFilterList;

import org.gvsig.raster.grid.filter.RasterFilterListManager;

import org.gvsig.raster.grid.filter.bands.ColorTableFilter;

import org.gvsig.raster.grid.filter.bands.ColorTableListManager;

import org.gvsig.remoteClient.utils.Utilities;

import org.gvsig.remoteClient.wms.ICancellable;

import org.gvsig.remoteClient.wms.WMSStatus;

import com.hardcode.gdbms.driver.exceptions.ReadDriverException;

import com.hardcode.gdbms.engine.data.driver.DriverException;

import com.iver.andami.PluginServices;

import com.iver.andami.messages.NotificationManager;

import com.iver.cit.gvsig.exceptions.layers.ConnectionErrorLayerException;

import com.iver.cit.gvsig.exceptions.layers.LoadLayerException;

import com.iver.cit.gvsig.exceptions.layers.URLLayerException;

import com.iver.cit.gvsig.exceptions.layers.UnsupportedVersionLayerException;

import com.iver.cit.gvsig.fmap.ConnectionErrorExceptionType;

import com.iver.cit.gvsig.fmap.MapContext;

import com.iver.cit.gvsig.fmap.ViewPort;

import com.iver.cit.gvsig.fmap.WMSDriverExceptionType;

import com.iver.cit.gvsig.fmap.crs.CRSFactory;

import com.iver.cit.gvsig.fmap.drivers.DriverIOException;

import com.iver.cit.gvsig.fmap.drivers.wms.FMapWMSDriver;

import com.iver.cit.gvsig.fmap.drivers.wms.FMapWMSDriverFactory;

import com.iver.cit.gvsig.fmap.drivers.wms.WMSException;

import com.iver.cit.gvsig.fmap.layers.WMSLayerNode.FMapWMSStyle;

import com.iver.cit.gvsig.fmap.layers.layerOperations.ComposedLayer;

import com.iver.cit.gvsig.fmap.layers.layerOperations.IHasImageLegend;

import com.iver.cit.gvsig.fmap.layers.layerOperations.StringXMLItem;

import com.iver.cit.gvsig.fmap.layers.layerOperations.XMLItem;

import com.iver.cit.gvsig.fmap.rendering.ILegend;

import com.iver.cit.gvsig.fmap.rendering.XmlBuilder;

import com.iver.cit.gvsig.wmc.WebMapContextTags;

import com.iver.utiles.StringUtilities;

import com.iver.utiles.XMLEntity;

import com.iver.utiles.swing.threads.Cancellable;

/**

* FMap's WMS Layer class.

*

* Las capas WMS son tileadas para descargarlas del servidor. Esto quiere decir que

* est?n formadas por multiples ficheros raster. Por esto la fuente de datos raster (IRasterDatasource)

* de la capa FLyrWMS es un objeto de tipo CompositeDataset. Este objeto est? compuesto por un array

* bidimensional de MultiRasterDataset. Cada uno de los MultiRasterDataset corresponde con un tile

* salvado en disco. Estos MultiRasterDataset se crean cada vez que se repinta ya que en WMS a cada

* zoom varian los ficheros fuente. La secuencia de creaci?n de un CompositeDataset ser?a la siguiente:

* <UL>

* <LI>Se hace una petici?n de dibujado por parte del usuario llamando al m?todo draw de FLyrWMS</LI>

* <LI>Se tilea la petici?n</LI>

* <LI>Cada tile se dibuja abriendo una FLyerRaster para ese tile</LI>

* <LI>Si es el primer dibujado se guarda una referencia en la capa WMS a las propiedades de renderizado, orden de bandas,

* transparencia, filtros aplicados, ...</LI>

* <LI>Si no es el primer dibujado se asignan las propiedades de renderizado cuya referencia se guarda en la capa WMS</LI>

* <LI>Se guarda el MultiRasterDataset de cada tile</LI>

* <LI>Al acabar todos los tiles creamos un CompositeDataset con los MultiRasterDataset de todos los tiles</LI>

* <LI>Asignamos a la capa la referencia de las propiedades de renderizado que tenemos almacenadas. De esta forma si hay

* alguna modificaci?n desde el cuadro de propiedades ser? efectiva sobre los tiles que se dibujan.</LI>

* </UL>

*

*

* @author Jaume Dominguez Faus

*

*/

public class FLyrWMS extends FLyrRasterSE implements IHasImageLegend{

        private boolean                                         isPrinting = false;

        private boolean                                         mustTileDraw = true;

        private boolean                                         mustTilePrint = true;

        private final int                                         maxTileDrawWidth = 1023;

        private final int                                         maxTileDrawHeight = 1023;

        private final int                                         maxTilePrintWidth = 1023;

        private final int                                         maxTilePrintHeight = 1023;

        private final int                                        minTilePrintWidth = 12;

        private final int                                        minTilePrintHeight = 12;

        public URL                                                         host;

        public String                                                 m_Format;

        private String                                                 m_SRS;

        private String                                                 layerQuery;

        private String                                                 infoLayerQuery;

        private FMapWMSDriver                                 wms;

        private WMSStatus                                         wmsStatus = new WMSStatus();

        private Rectangle2D                                 fullExtent;

        private boolean                                                wmsTransparency;

        private Vector                                                 styles;

        private Vector                                                 dimensions;

        private boolean                                                firstLoad = false;

        private Hashtable                                         onlineResources = new Hashtable();

        private Dimension                                         fixedSize;

        private boolean                                         queryable = true;

        private VisualStatus                                visualStatus = new VisualStatus();

        /**

         * Lista de filtros aplicada en la renderizaci?n

         */

        private RasterFilterList            filterList = null;

        private GridTransparency                        transparency = null;

        private int[]                       renderBands = null;

        private FLyrRasterSE[]                                layerRaster = null;

        private ArrayList                   filterArguments = null;

        private List                                                disableUpdateDrawVersion;

        private int                         lastNColumns = 0;

        private int                         lastNRows = 0;

        private boolean                                         hasImageLegend = false;

        private int cachedAxisOrientation = WMSStatus.CRS_AXIS_OTHER_OR_UNKNOWN;

        /***

         * WMS 1.3 standard defines a fixed pixel size of 0.28 mm for the server.

         * As

         *   1 inch = 25.4 mm

         * then the server is supposed to have the following DPI:

         *   25.4 / 0.28 = 90.714285714 dpi

         */

        private final double WMS_DPI = 90.714285714;

        private String infoFormat;

        private class MyCancellable implements ICancellable

        {

                private Cancellable original;

                public MyCancellable(Cancellable cancelOriginal)

                {

                        this.original = cancelOriginal;

                }

                public boolean isCanceled() {

                        if (original == null) return false;

                        return original.isCanceled();

                }

                public Object getID() {

                        return this;

                }

        }

        public FLyrWMS(){

                super();

                this.updateDrawVersion();

        }

        public FLyrWMS(Map args) throws LoadLayerException{

                this.updateDrawVersion();

                FMapWMSDriver drv = null;

                String host = (String)args.get("host");

                String sLayer = (String)args.get("layer");

                Rectangle2D fullExtent = (Rectangle2D)args.get("FullExtent");

                String sSRS = (String)args.get("SRS");

                String sFormat = (String)args.get("Format");

                String[] sLayers = sLayer.split(",");

                try {

                        this.setHost(new URL(host));

                } catch (MalformedURLException e) {

                        //e.printStackTrace();

                        throw new URLLayerException(getName(),e);

                }

                        try {

                                drv = this.getDriver();

                        } catch (IllegalStateException e) {

                                throw new LoadLayerException(getName(),e);

                        } catch (ValidationException e) {

                                throw new LoadLayerException(getName(),e);

                        } catch (IOException e) {

                                throw new ConnectionErrorLayerException(getName(),e);

                        }

                if( sFormat == null || sSRS == null || fullExtent == null ) {

                        if (!drv.connect(null))

                                throw new ConnectionErrorLayerException(getName(),null);

                        WMSLayerNode wmsNode = drv.getLayer(sLayer);

                        if (wmsNode == null){

                                throw new LoadLayerException(getName(),null);

                        }

                        if( sFormat == null ) {

                                sFormat = this.getGreatFormat(drv.getFormats());

                        }

                        // SRS

                        Vector allSrs = wmsNode.getAllSrs();

                        boolean isSRSSupported = false;

                        if( sSRS != null ) {

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

                                                 if (((String)allSrs.get(i)).compareTo(sSRS) == 0){

                                                         isSRSSupported = true;

                                                 }

                                         }

                        }

                                 if(!isSRSSupported) {

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

                                                 if (((String)wmsNode.getAllSrs().get(i)).compareTo("EPSG:4326") == 0){

                                                         sSRS = (String)wmsNode.getAllSrs().get(i);

                                                 }

                                         }

                                         if (sSRS==null){

                                                 sSRS = (String)wmsNode.getAllSrs().get(0);

                                         }

                                 }

                        if( fullExtent == null ) {

                                fullExtent = drv.getLayersExtent(sLayers,sSRS);

                        }

                }

                this.setFullExtent(fullExtent);

                this.setFormat(sFormat);

                this.setLayerQuery(sLayer);

                this.setInfoLayerQuery("");

                this.setSRS(sSRS);

                this.setName(sLayer);

                this.setOnlineResources(drv.getOnlineResources());

                if (drv.getInfoFormats() != null) {

                        if (drv.getInfoFormats().size() > 0)

                                this.setInfoFormat((String) drv.getInfoFormats().get(0));

                }

                this.setDriver(drv);

                initServerScale();

                load();

        }

        private void setInfoFormat(String infoFormat) {

                this.infoFormat = infoFormat;

        }

        /**

         * It choose the best format to load different maps if the server

         * supports it. This format could be png, because it supports

         * transparency.

         * @param formats

         * Arraywith all the formats supported by the server

         * @return

         */

        private String getGreatFormat(Vector formats){

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

                                        String format = (String) formats.get(i);

                                if (format.equals("image/jpg")){

                                                        return format;

                                }

                                if (format.equals("image/jpeg")){

                                                        return format;

                                }

                        }

                        return (String)formats.get(0);

        }

        /**

         * Clase que contiene los datos de visualizaci?n de WMS.

         * @author Nacho Brodin (brodin_ign@gva.es)

         */

        private class VisualStatus{

                /**

                 * Ancho y alto de la imagen o del conjunto de tiles si los tiene. Coincide con

                 * el ancho y alto del viewPort

                 */

                private double                                                minX = 0D;

                private double                                                minY = 0D;

                private double                                                maxX = 0D;

                private double                                                maxY = 0D;

                /**

                 * Lista de nombre de fichero que componen toda la visualizaci?n.

                 */

                private String[]                                        fileNames = null;

                public Object clone() {

                        VisualStatus s = new VisualStatus();

                        s.maxX = maxX;

                        s.maxY = maxY;

                        s.minX = minX;

                        s.minY = minY;

                        s.fileNames = new String[fileNames.length];

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

                                s.fileNames[i] = fileNames[i];

                        return s;

                }

        }

        /**

         * Devuelve el XMLEntity con la informaci?n necesaria para reproducir la

         * capa.

         *

         * @return XMLEntity.

         * @throws XMLException

         */

        public XMLEntity getXMLEntity() throws XMLException {

                XMLEntity xml = super.getXMLEntityWithoutChecks();

                if (xml != null){

                        // Full extent

                        xml.putProperty("fullExtent", StringUtilities.rect2String(fullExtent));

                        // Host

                        xml.putProperty("host", host.toExternalForm());

                        // Part of the query that is not the host, or the

                        // layer names, or other not listed bellow

                        xml.putProperty("infoLayerQuery", infoLayerQuery);

                        // Part of the query containing the layer names

                        xml.putProperty("layerQuery", layerQuery);

                        // Format

                        xml.putProperty("format", m_Format);

                        // SRS

                        xml.putProperty("srs", m_SRS);

                        if (status!=null)

                                status.getXMLEntity(xml, true, this);

                        else{

                                status = new StatusLayerRaster();

                                status.getXMLEntity(xml, true, this);

                        }

                        // Transparency

                        xml.putProperty("wms_transparency", wmsTransparency);

                        // Styles

                        if (styles!=null){

                                String stylePr = "";

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

                                        stylePr += styles.get(i).toString();

                                        if (i<styles.size()-1)

                                                stylePr += ",";

                                }

                                if (stylePr.endsWith(","))

                                        stylePr += " ";

                                xml.putProperty("styles", stylePr);

                        }

                        // Dimensions

                        if (dimensions!=null){

                                String dim = "";

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

                                        dim += (String) dimensions.get(i);

                                        if (i<dimensions.size()-1)

                                                dim += ",";

                                }

                                if (dim.endsWith(","))

                                        dim += " ";

                                xml.putProperty("dimensions", dim);

                        }

                        // OnlineResources

                        Iterator it = onlineResources.keySet().iterator();

                        String strOnlines = "";

                        while (it.hasNext()) {

                                String key = (String) it.next();

                                String value = (String) onlineResources.get(key);

                                strOnlines += key+"~##SEP2##~"+value;

                                if (it.hasNext())

                                        strOnlines += "~##SEP1##~";

                        }

                        xml.putProperty("onlineResources", strOnlines);

                        // Queryable

                        xml.putProperty("queryable", queryable);

                        if(wms != null)

                                xml.putProperty("hasImageLegend", wms.hasLegendGraphic());

                        // fixedSize

                        if (isSizeFixed()) {

                                xml.putProperty("fixedSize", true);

                                xml.putProperty("fixedWidth", fixedSize.width);

                                xml.putProperty("fixedHeight", fixedSize.height);

                        }

                }

                return xml;

        }

        /**

         * A partir del XMLEntity reproduce la capa.

         *

         * @param xml XMLEntity

         *

         * @throws XMLException

         * @throws DriverException

         * @throws DriverIOException

         */

        public void setXMLEntity03(XMLEntity xml)

                throws XMLException {

                super.setXMLEntity(xml);

                fullExtent = StringUtilities.string2Rect(xml.getStringProperty(

                                        "fullExtent"));

                try {

                        host = new URL(xml.getStringProperty("host"));

                } catch (MalformedURLException e) {

                        throw new XMLException(e);

                }

                infoLayerQuery = xml.getStringProperty("infoLayerQuery");

                layerQuery = xml.getStringProperty("layerQuery");

                m_Format = xml.getStringProperty("format");

                m_SRS = xml.getStringProperty("srs");

        }

        /**

         * A partir del XMLEntity reproduce la capa.

         *

         * @param xml XMLEntity

         *

         * @throws XMLException

         * @throws DriverException

         * @throws DriverIOException

         */

        public void setXMLEntity(XMLEntity xml)

                throws XMLException {

                for (int i = 0; i < xml.getPropertyCount(); i++) {

                        String key = xml.getPropertyName(i);

                        if(key.startsWith("raster.file")) {

                                xml.putProperty(key, "");

                        }

                }

                super.setXMLEntity(xml);

                fullExtent = StringUtilities.string2Rect(xml.getStringProperty(

                                        "fullExtent"));

                // Host

                try {

                        host = new URL(xml.getStringProperty("host"));

                } catch (MalformedURLException e) {

                        throw new XMLException(e);

                }

                // Part of the query that is not the host, or the

                // layer names, or other not listed bellow

                infoLayerQuery = xml.getStringProperty("infoLayerQuery");

                // Part of the query containing the layer names

                layerQuery = xml.getStringProperty("layerQuery");

                // Format

                m_Format = xml.getStringProperty("format");

                // SRS

                m_SRS = xml.getStringProperty("srs");

                String claseStr = StatusLayerRaster.defaultClass;

                if (xml.contains("raster.class")) {

                        claseStr = xml.getStringProperty("raster.class");

                }

                // Transparency

                                if (xml.contains("wms_transparency"))

                                                wmsTransparency = xml.getBooleanProperty("wms_transparency");

                                // Styles

                                if (xml.contains("styles")){

                                                styles = new Vector();

                                                String[] stl = xml.getStringProperty("styles").split(",");

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

                                                        if (stl[i].equals(" "))

                                                                stl[i]="";

                                                                styles.add(stl[i]);

                                                }

                                }

                                // Dimensions

                                if (xml.contains("dimensions")){

                                                dimensions = new Vector();

                                                String[] dims = xml.getStringProperty("dimensions").split(",");

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

                                                        if (dims[i].equals(" "))

                                                                dims[i]="";

                                                                dimensions.add(dims[i]);

                                                }

                                }

                                // OnlineResources

                                if (xml.contains("onlineResources")) {

                                        String[] operations = xml.getStringProperty("onlineResources").split("~##SEP1##~");

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

                                String[] resources = operations[i].split("~##SEP2##~");

                                if (resources.length==2 && resources[1]!="")

                                        onlineResources.put(resources[0], resources[1]);

                        }

                                }

                                // Queryable

                                queryable = true; // let's assume that the layer is queryable by default

                                if (xml.contains("queryable"))

                                        queryable = xml.getBooleanProperty("queryable");

                                hasImageLegend=false;

                                if (xml.contains("hasImageLegend")){

                                        hasImageLegend=xml.getBooleanProperty("hasImageLegend");

                                }

                                // fixedSize

                                if (xml.contains("fixedSize")) {

                                        fixedSize = new Dimension(xml.getIntProperty("fixedWidth"),

                                                                                                                                xml.getIntProperty("fixedHeight"));

                                }

                if(status!=null)

                        status.setXMLEntity(xml, this);

                else{

                        if(claseStr != null && !claseStr.equals("")){

                                try{

                                        Class clase = LayerFactory.getLayerClassForLayerClassName(claseStr);

                                        Constructor constr = clase.getConstructor(null);

                                        status = (IStatusRaster)constr.newInstance(null);

                                        if(status != null) {

                                                ((StatusLayerRaster)status).setNameClass(claseStr);

                                                status.setXMLEntity(xml, this);

                                                filterArguments = status.getFilterArguments();

                                                transparency = status.getTransparency();

                                                renderBands = status.getRenderBands();

                                        }

                                }catch(ClassNotFoundException exc){

                                        exc.printStackTrace();

                                }catch(InstantiationException exc){

                                        exc.printStackTrace();

                                }catch(IllegalAccessException exc){

                                        exc.printStackTrace();

                                }catch(NoSuchMethodException exc){

                                        exc.printStackTrace();

                                }catch(InvocationTargetException exc){

                                        exc.printStackTrace();

                                }

                        }

                }

                firstLoad = true;

        }

        /**

         * @throws ReadDriverException

         * @throws LoadLayerException

         * @see com.iver.cit.gvsig.fmap.layers.layerOperations.InfoByPoint#queryByPoint(com.iver.cit.gvsig.fmap.operations.QueriedPoint)

         */

        public XMLItem[] getInfo(Point p, double tolerance, Cancellable cancellable) throws ReadDriverException {

                XMLItem[] item = new XMLItem[1];

                try {

                        if (queryable)         {

                                //TODO

                                // check if there are layers which are not queryable

                                ViewPort viewPort = getMapContext().getViewPort();

                                Point tiledPoint = new Point((int) p.getX() % maxTilePrintWidth, (int) p.getY() % maxTilePrintHeight);

                                Rectangle rect = new Rectangle(0, 0, viewPort.getImageWidth() - 1, viewPort.getImageHeight() - 1);

                                Tiling tiles = new Tiling(maxTilePrintWidth, maxTilePrintHeight, rect);

                                tiles.setAffineTransform((AffineTransform) viewPort.getAffineTransform().clone());

                                int nCols = tiles.getNumCols();

                                int col = (int) p.getX() / maxTilePrintWidth;

                                int row = (int) p.getY() / maxTilePrintHeight;

                                int tileIndex = (row*nCols) + col;

                                ViewPort vp = tiles.getTileViewPort(viewPort, tileIndex);

                                wmsStatus.setExtent(vp.getAdjustedExtent());

                                wmsStatus.setHeight(vp.getImageHeight());

                                wmsStatus.setWidth(vp.getImageWidth());

                                wmsStatus.setOnlineResource((String) onlineResources.get("GetFeatureInfo"));

                                // We search for application string

                                // TODO: Maybe the user wants to select the format        

                                if (infoFormat == null) {

                                        try {

                                                infoFormat = "text/xml"; // bydefault

                                                if (getDriver().getInfoFormats().size() > 0) {

                                                        for (int iFormat = 0; iFormat < getDriver().getInfoFormats().size(); iFormat++ ) {

                                                                String auxFormat = (String) getDriver().getInfoFormats().get(iFormat);

                                                                if (auxFormat.contains("vnd.ogc")) {

                                                                        infoFormat = auxFormat;

                                                                        break;

                                                                }

                                                        }

                                                }

                                        } catch (UnsupportedVersionLayerException e) {

                                                e.printStackTrace();

                                                throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - UnsupportedVersionLayerException", e);

                                        } catch (IllegalStateException e) {

                                                e.printStackTrace();

                                                throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - UnsupportedVersionLayerException", e);

                                        }

                                }

                                wmsStatus.setInfoFormat(infoFormat);

                                wmsStatus.setFormat( m_Format );

                                wmsStatus.setLayerNames(Utilities.createVector(layerQuery,","));

                                wmsStatus.setSrs(m_SRS);

                                wmsStatus.setCrsAxisOrder(cachedAxisOrientation);

                                wmsStatus.setStyles(styles);

                                wmsStatus.setDimensions(dimensions);

                                wmsStatus.setTransparency(wmsTransparency);

                                MyCancellable c = new MyCancellable(cancellable);

                                try {

                                        item[0] = new StringXMLItem(new String(getDriver()

                                                        .getFeatureInfo(wmsStatus, (int) tiledPoint.getX(), (int) tiledPoint.getY(), Integer.MAX_VALUE, c)),this);

                                } catch (UnsupportedVersionLayerException e) {

                                        throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - UnsupportedVersionLayerException", e);

                                } catch (IllegalStateException e) {

                                        throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - IllegalStateException", e);

                                }

                                return item;

                        }

                        else

                        {

                                JOptionPane.showMessageDialog((Component)PluginServices.getMainFrame(),this.getName() + " " +

                                                PluginServices.getText(this,"layer_not_queryable"));

                                item[0] =  new StringXMLItem("<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?><info></info>",this);

                                return item;

                                //return null;

                        }

                } catch (WMSException  e) {

                        item[0] = new StringXMLItem("<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?><exception>" +

                        e.getMessage() + "</exception>", this);

                        return item;

                } catch (ValidationException e) {

                        throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - ValidationException", e);

                } catch (IOException e) {

                        throw new ReadDriverException(FMapWMSDriver.class.getName()+"::"+getName()+" - IOException", e);

                } catch (NoninvertibleTransformException e) {

                        NotificationManager.addError("NotinvertibleTransform", e);

                }

                return null;

        }

        /*

         * @see com.iver.cit.gvsig.fmap.layers.FLayer#getFullExtent()

         */

        public Rectangle2D getFullExtent() {

                return fullExtent;

        }

        /*

         *

         * @see com.iver.cit.gvsig.fmap.layers.FLayer#draw(java.awt.image.BufferedImage,

         *                 java.awt.Graphics2D, com.iver.cit.gvsig.fmap.ViewPort,

         *                 com.iver.cit.gvsig.fmap.operations.Cancellable)

         */

        private int callCount; // mess code, represents the amount of times the methods drawFixedSize or drawTile where tried for an extent

        private static final int MAX_RETRY_TIMES = 5; // mess code, represents the max amount of retries allowed.

        public void draw(BufferedImage image, Graphics2D g, ViewPort viewPort,

                        Cancellable cancel,double scale) throws ReadDriverException {

                callCount = 0; // mess code

                lastNColumns = lastNRows = 0;

                enableStopped();

                closeAndFree();

                if (isWithinScale(scale)){

                        Point2D p = viewPort.getOffset();

                        // p will be (0, 0) when drawing a view or other when painting onto

                        // the Layout.

                        visualStatus.minX = viewPort.getAdjustedExtent().getMinX();

                        visualStatus.minY = viewPort.getAdjustedExtent().getMinY();

                        visualStatus.maxX = viewPort.getAdjustedExtent().getMaxX();

                        visualStatus.maxY = viewPort.getAdjustedExtent().getMaxY();

                        if (isSizeFixed()) {

                                // This condition handles those situations in which the server can

                                // only give static extent and resolution maps despite we need

                                // a specific BBOX and pixel WIDTH and HEIGHT

                                try {

                                        visualStatus.fileNames = new String[1];

                                        layerRaster = new FLyrRasterSE[1];

                                        drawFixedSize(g, viewPort, cancel, scale);

                                        if(layerRaster != null && layerRaster[0] != null) {

                                                dataset = layerRaster[0].getDataSource();

                                                initializeRasterLayer(null, new IBuffer[][]{{layerRaster[0].getRender().getLastRenderBuffer()}});

                                                getRender().setLastRenderBuffer(layerRaster[0].getRender().getLastRenderBuffer());

                                        }

                                } catch (LoadLayerException e) {

                                        // TODO Auto-generated catch block

                                        e.printStackTrace();

                                } catch (InterruptedException e) {

                                }

                        } else {

                                if(mustTileDraw){

                                        Rectangle r = new Rectangle((int) p.getX(), (int) p.getY(), viewPort.getImageWidth(), viewPort.getImageHeight());

                                        Tiling tiles = new Tiling(maxTileDrawWidth, maxTileDrawHeight, r);

                                        tiles.setAffineTransform((AffineTransform) viewPort.getAffineTransform().clone());

                                        visualStatus.fileNames = new String[tiles.getNumTiles()];

                                        MultiRasterDataset[][] datasets = new MultiRasterDataset[tiles.getNumRows()][tiles.getNumCols()];

                                        IBuffer[][] buf = new IBuffer[tiles.getNumRows()][tiles.getNumCols()];

                                        layerRaster = new FLyrRasterSE[tiles.getNumTiles()];

                                        lastNColumns = tiles.getNumCols();

                                        lastNRows = tiles.getNumRows();

                                        for (int tileNr = 0; tileNr < tiles.getNumTiles(); tileNr++) {

                                                // drawing part

                                                try {

                                                        ViewPort vp = tiles.getTileViewPort(viewPort, tileNr);

                                                        boolean painted = drawTile(g, vp, cancel, tileNr, scale, tileNr);

                                                        if(        layerRaster != null &&

                                                                        layerRaster[tileNr] != null &&

                                                                        painted) {

                                                                        datasets[(int)(tileNr / tiles.getNumCols())][tileNr % tiles.getNumCols()] = (MultiRasterDataset)layerRaster[tileNr].getDataSource().newDataset();

                                                                        buf[(int)(tileNr / tiles.getNumCols())][tileNr % tiles.getNumCols()] = layerRaster[tileNr].getRender().getLastRenderBuffer();

                                                                }

                                                } catch (NoninvertibleTransformException e) {

                                                        e.printStackTrace();

                                                } catch (LoadLayerException e) {

                                                        // TODO Auto-generated catch block

                                                        e.printStackTrace();

                                                }

                                        }

                                        try {

                                                if(datasets != null && datasets[0][0] != null) {

                                                        dataset = new CompositeDataset(datasets);

                                                        initializeRasterLayer(datasets, buf);

                                                        buf = null;

                                                }

                                        } catch (MosaicNotValidException e) {

                                                throw new ReadDriverException("No hay continuidad en el mosaico.", e);

                                        } catch (LoadLayerException e) {

                                                throw new ReadDriverException("Error inicializando la capa.", e);

                                        } catch (InterruptedException e) {

                                        }

                                } else

                                        try {

                                                layerRaster = new FLyrRasterSE[1];

                                                visualStatus.fileNames = new String[1];

                                                drawTile(g, viewPort, cancel, 0, scale, 0);

                                                if(layerRaster != null && layerRaster[0] != null) {

                                                        dataset = layerRaster[0].getDataSource();

                                                        getRender().setLastRenderBuffer(layerRaster[0].getRender().getLastRenderBuffer());

                                                        initializeRasterLayer(null, new IBuffer[][]{{layerRaster[0].getRender().getLastRenderBuffer()}});

                                                }

                                        } catch (LoadLayerException e) {

                                                // TODO Auto-generated catch block

                                                e.printStackTrace();

                                        } catch (InterruptedException e) {

                                        }

                        }

                }

                disableStopped();

                /*Runtime r = Runtime.getRuntime();

                System.err.println("********************WMS**********************");

                System.err.println("Memoria Total: " + (r.totalMemory() / 1024) +"KB");

                System.err.println("Memoria Usada: " + ((r.totalMemory() - r.freeMemory()) / 1024) +"KB");

                System.err.println("Memoria Libre: " + (r.freeMemory() / 1024) +"KB");

                System.err.println("Memoria MaxMemory: " + (r.maxMemory() / 1024) +"KB");

                System.err.println("*********************************************");*/

        }

        /**

         * Closes files and releases memory (pointers to null)

         */

        synchronized private void closeAndFree() {

                int count = 0;

                while(readingData != null && readingData.compareTo(Thread.currentThread().toString()) != 0)

                        try {

                                Thread.sleep(100);

                                count++;

                                if (count==1000)

                                        readingData = null;

                        } catch (InterruptedException e) {

                        }

                if(dataset != null) {

                        dataset.close();

                        dataset = null;

                }

                //Cerramos el dataset asociado a la capa si est? abierto.

                if(layerRaster != null) {

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

                                if(layerRaster[i] != null) {

                                        layerRaster[i].setRemoveRasterFlag(true);

                                        layerRaster[i].getDataSource().close();

                                        System.out.println("CloseAndFree WMS" + this.getName());

                                        if (layerRaster[i] != null) {

                                                layerRaster[i].getRender().free();

                                                System.out.println("CloseAndFree WMS after render free" + this.getName());

                                                if(layerRaster[i].getBufferFactory() != null)

                                                        layerRaster[i].getBufferFactory().free();

                                                layerRaster[i] = null;

                                                System.out.println("CloseAndFree WMS after bufferFactory free");

                                        }

                                }

                        }

                }

                if (getRender() != null)

                        getRender().free();

                System.out.println("CloseAndFree WMS before System.gc");

                System.gc();

        }

        /**

         * Acciones que se realizan despu?s de asignar la fuente de datos a

         * la capa raster.

         *

         * @throws LoadLayerException

         * @throws InterruptedException

         */

        private void initializeRasterLayer(MultiRasterDataset[][] datasets, IBuffer[][] buf) throws LoadLayerException, InterruptedException {

                if(this.filterList != null)

                        getRender().setFilterList(filterList);

                if(this.transparency != null)

                        getRender().setLastTransparency(transparency);

                if(this.renderBands != null)

                        getRender().setRenderBands(renderBands);

                if(datasets != null) {

                        String[][] names = new String[datasets.length][datasets[0].length];

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

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

                                        if(datasets[i][j] != null)

                                                names[i][j] = datasets[i][j].getDataset(0)[0].getFName();

                                }

                        }

                        super.setLoadParams(names);

                }

                super.init();

                if(buf != null && buf[0][0] != null) {

                        int drawablesBandCount = layerRaster[0].getDataSource().getBands().getDrawableBandsCount();

                        IBuffer buff = null;

                        if(dataset instanceof CompositeDataset)

                                buff = ((CompositeDataset)dataset).generateBuffer(buf, drawablesBandCount);

                        else

                                buff = buf[0][0];

                        if(getRender().getLastRenderBuffer() != null)

                                getRender().getLastRenderBuffer().free();

                        getRender().setLastRenderBuffer(buff);

                }

        }

        private void drawFixedSize(Graphics2D g, ViewPort vp, Cancellable cancel, double scale) throws ReadDriverException, LoadLayerException {

                callCount++; // mess code, it is not unusual a wms server to response an error which is completely

                                         // temporal and the response is available if we retry requesting.

                                         //

                // This is the extent that will be requested

                Rectangle2D bBox = getFullExtent();

                MyCancellable c = new MyCancellable(cancel);

                try {

                        wmsStatus.setExtent( bBox );

                        wmsStatus.setFormat( m_Format );

                        wmsStatus.setHeight( fixedSize.height );

                        wmsStatus.setWidth( fixedSize.width );

                        wmsStatus.setLayerNames(Utilities.createVector(layerQuery,","));

                        wmsStatus.setSrs(m_SRS);

                        wmsStatus.setCrsAxisOrder(cachedAxisOrientation);

                        wmsStatus.setStyles(styles);

                        wmsStatus.setDimensions(dimensions);

                        wmsStatus.setTransparency(wmsTransparency);

                        wmsStatus.setOnlineResource((String) onlineResources.get("GetMap"));

                        File f = getDriver().getMap(wmsStatus, c);

                        if (f == null)

                                return;

                        String nameWorldFile = f.getPath() + getExtensionWorldFile();

                        com.iver.andami.Utilities.createTemp(nameWorldFile, this.getDataWorldFile(bBox, fixedSize));

                        IStatusRaster status = getStatus();

                        if(status!=null && firstLoad){

                                try {

                                        status.applyStatus(this);

                                } catch (NotSupportedExtensionException e) {

                                        throw new ReadDriverException("", e);

                                } catch (RasterDriverException e) {

                                        throw new ReadDriverException("", e);

                                } catch (FilterTypeException e) {

                                        throw new ReadDriverException("", e);

                                }

                                firstLoad = false;

                        }

                        // And finally, obtain the extent intersecting the view and the BBox

                        // to draw to.

                        Rectangle2D extent = new Rectangle2D.Double();

                        Rectangle2D.intersect(vp.getAdjustedExtent(), bBox, extent);

                        ViewPortData vpData = new ViewPortData(

                                vp.getProjection(), new Extent(extent), fixedSize );

                        vpData.setMat(vp.getAffineTransform());

                        String filePath = f.getAbsolutePath();

                        visualStatus.fileNames[0] = filePath;

                        try {

                                rasterProcess(filePath, g, vp, scale, cancel, 0);

                                this.updateDrawVersion();

                        } catch (FilterTypeException e) {

                        }

                } catch (ValidationException e) {

                        if (!c.isCanceled())

                        {

                                LoadLayerException exception = new LoadLayerException(getName(),e);

                                throw exception;

                        }

                } catch (IOException e) {

                        if (!c.isCanceled())

                                if (callCount<MAX_RETRY_TIMES) { // mess code

                                        NotificationManager.addWarning("\n[ FLyrWMS.drawFixedSize() ]  Failed in trying " + callCount + "/" + MAX_RETRY_TIMES + ")\n", null); // mess code

                                        // I'll try again requesting up to MAX_RETRY_TIMES times before throw an error // mess code

                                        // (this is mess code, should be replaced by a layer status handler which is scheduled for version > 1.0) // mess code

                                        drawFixedSize(g, vp, cancel, scale); // mess code

                                } // mess code

                                if (callCount == 1) { // mess code

                                        ConnectionErrorExceptionType type = new ConnectionErrorExceptionType();

                                        type.setLayerName(getName());

                                        try {

                                                type.setDriverName("WMS Driver");

                                        } catch (Exception e1) {

                                        }

                                        type.setHost(host);

                                        throw new ConnectionErrorLayerException(getName(),e);

                                } // mess code

                } catch (WMSException e) {

                        if (!c.isCanceled()) {

                                if (callCount<MAX_RETRY_TIMES) { // mess code

                                        NotificationManager.addWarning("\n[ FLyrWMS.drawFixedSize() ]  Failed in trying " + callCount + "/" + MAX_RETRY_TIMES + ")\n", null); // mess code

                                        // I'll try again requesting up to MAX_RETRY_TIMES times before throw an error // mess code

                                        // (this is mess code, should be replaced by a layer status handler which is scheduled for version > 1.0) // mess code

                                        drawFixedSize(g, vp, cancel, scale); // mess code

                                } // mess code

                                if (callCount == 1) { // mess code

                                        if (!isPrinting)

                                                this.setVisible(false);

                                        throw new LoadLayerException(getName(),e);

                                } // mess code

                        }

                }catch (NullPointerException e) {

                        this.setVisible(false);

                }

                callCount--; // mess code

        }

        /**

         * Carga y dibuja el raster usando la librer?a

         * @param filePath Ruta al fichero en disco

         * @param g Graphics2D

         * @param vp ViewPort

         * @param scale Escala para el draw

         * @param cancel Cancelaci?n para el draw

         * @throws ReadDriverException

         * @throws LoadLayerException

         */

        private void rasterProcess(String filePath, Graphics2D g, ViewPort vp, double scale, Cancellable cancel, int nLyr) throws ReadDriverException, LoadLayerException, FilterTypeException {

                //Cargamos el dataset con el raster de disco.

                layerRaster[nLyr] = FLyrRasterSE.createLayer("", filePath, vp.getProjection());

                //layerRaster[nLyr].getRender().setBufferFactory(layerRaster[nLyr].getBufferFactory());

                layerRaster[nLyr].setNoDataValue(getNoDataValue());

                layerRaster[nLyr].setNoDataType(getNoDataType());

//                layerRaster[nLyr].init();

                //Obtenemos la tabla de color del raster abierto ya que se le va a sustituir la lista

                //de filtros y el de tabla de color no queremos sustituirlo.

                RasterFilterList rasterFilterList = layerRaster[nLyr].getRender().getFilterList();

                ColorTableFilter ct = (ColorTableFilter)rasterFilterList.getFilterByBaseClass(ColorTableFilter.class);

                Object param = null;

                if(ct != null)

                        param = ct.getParam("colorTable");

                //En caso de cargar un proyecto con XMLEntity se crean los filtros

                if(filterArguments != null) {

                        RasterFilterList fl = new RasterFilterList();

                        fl.addEnvParam("IStatistics", layerRaster[nLyr].getDataSource().getStatistics());

                        fl.addEnvParam("MultiRasterDataset", layerRaster[nLyr].getDataSource());

                        fl.setInitDataType(layerRaster[nLyr].getDataType()[0]);

                        RasterFilterListManager filterListManager = new RasterFilterListManager(fl);

                        filterListManager.createFilterListFromStrings(filterArguments);

                        filterArguments = null;

                        filterList = fl;

                }

                //Como el raster se carga a cada zoom el render se crea nuevamente y la lista de

                //filtros siempre estar? vacia a cada visualizaci?n. Para evitarlo tenemos que

                //guardar la lista de filtro aplicada en la visualizaci?n anterior.

                if(this.filterList != null) {

                        this.disableUpdateDrawVersion();

                        //Si ten?a tabla de color le asignamos la original

                        if(param != null && param instanceof GridPalette) {

                                this.filterList.remove(ColorTableFilter.class);

                                RasterFilterListManager filterManager = new RasterFilterListManager(filterList);

                                ColorTableListManager ctm = new ColorTableListManager(filterManager);

                                ctm.addColorTableFilter((GridPalette)param);

                                filterList.move(ColorTableFilter.class, 0);

                                filterList.controlTypes();

                        }

                        layerRaster[nLyr].getRender().setFilterList(filterList);

                        this.enableUpdateDrawVersion();

                }

                if(this.transparency != null)

                        layerRaster[nLyr].getRender().setLastTransparency(transparency);

                if(this.renderBands != null)

                        layerRaster[nLyr].getRender().setRenderBands(renderBands);

                //Dibujamos

                disableUpdateDrawVersion();

                layerRaster[nLyr].draw(null, g, vp, cancel, scale);

                enableUpdateDrawVersion();

                //La primera vez asignamos la lista de filtros asociada al renderizador. Guardamos una referencia

                //en esta clase para que a cada zoom no se pierda.

                if (this.filterList == null)

                        filterList = layerRaster[nLyr].getRender().getFilterList();

                if (this.transparency == null)

                        transparency = layerRaster[nLyr].getRender().getLastTransparency();

                if (this.renderBands == null)

                        renderBands = layerRaster[nLyr].getRender().getRenderBands();

        }

        /*

         * (non-Javadoc)

         * @see org.gvsig.fmap.raster.IRasterRendering#getRenderFilterList()

         */

        public RasterFilterList getRenderFilterList(){

                return (filterList != null) ? filterList : getRender().getFilterList();

        }

        /*

         * (non-Javadoc)

         * @see org.gvsig.raster.hierarchy.IRasterRendering#setRenderFilterList(org.gvsig.raster.grid.filter.RasterFilterList)

         */

        public void setRenderFilterList(RasterFilterList filterList) {

                if (filterList == this.filterList){

                        return;

                }

                this.filterList = filterList;

                this.updateDrawVersion();

                super.getRender().setFilterList(filterList);

        }

        /*

         * (non-Javadoc)

         * @see org.gvsig.fmap.raster.IRasterRendering#getRenderTransparency()

         */

        public GridTransparency getRenderTransparency() {

                return (transparency != null) ? transparency : getRender().getLastTransparency();

        }

        /*

         * (non-Javadoc)

         * @see org.gvsig.raster.hierarchy.IRasterRendering#getRenderBands()

         */

        public int[] getRenderBands() {

                return (renderBands != null) ? renderBands : getRender().getRenderBands();

        }

        /*

         * (non-Javadoc)

         * @see org.gvsig.raster.hierarchy.IRasterRendering#setRenderBands(int[])

         */

        public void setRenderBands(int[] renderBands) {

                //TODO: Comprobar si hay cambios

                this.renderBands = renderBands;

                this.updateDrawVersion();

                getRender().setRenderBands(renderBands);

        }

        /**

         * This is the method used to draw a tile in a WMS mosaic layer.

         * @throws LoadLayerException

         * @throws ReadDriverException

         * @return true when a tile has been painted

         */

        private boolean drawTile(Graphics2D g, ViewPort vp, Cancellable cancel, int tile, double scale, int nLyr) throws LoadLayerException, ReadDriverException {

                callCount++;

                // Compute the query geometry

                // 1. Check if it is within borders

//                Rectangle2D extent = getFullExtent();

//                                if ((vp.getAdjustedExtent().getMinX() > extent.getMaxX()) ||

//                                                                (vp.getAdjustedExtent().getMinY() > extent.getMaxY()) ||

//                                                                (vp.getAdjustedExtent().getMaxX() < extent.getMinX()) ||

//                                                                (vp.getAdjustedExtent().getMaxY() < extent.getMinY())) {

//                                                return false;

//                                }

                                // 2. Compute extent to be requested.

//                                Rectangle2D bBox = new Rectangle2D.Double();

//                                Rectangle2D.intersect(vp.getAdjustedExtent(), extent, bBox); // FIXME: ESTO PROVOCA FALLOS SI EL EXTENT (fullextent) no es correcto

                                Rectangle2D bBox = vp.getAdjustedExtent();

                                // 3. Compute size in pixels

                                double scalex = vp.getAffineTransform().getScaleX();

                                double scaley = vp.getAffineTransform().getScaleY();

                                int wImg = (int) Math.ceil(Math.abs(bBox.getWidth() * scalex) + 1);

                                int hImg = (int) Math.ceil(Math.abs(bBox.getHeight() * scaley) + 1);

                                Dimension sz = new Dimension(wImg, hImg);

                                if ((wImg <= 0) || (hImg <= 0)) {

                                                return false;

                                }

                                MyCancellable c = new MyCancellable(cancel);

                try {

                        sz = new Dimension(wImg, hImg);

                        // Rectangle2D.intersect(vp.getAdjustedExtent(), extent, bBox);

                        wmsStatus.setExtent( bBox );

                        wmsStatus.setFormat(m_Format);

                        wmsStatus.setHeight( hImg );

                        wmsStatus.setWidth( wImg );

                        wmsStatus.setLayerNames(Utilities.createVector(layerQuery,","));

                        wmsStatus.setSrs(m_SRS);

                        wmsStatus.setCrsAxisOrder(cachedAxisOrientation);

                        wmsStatus.setStyles(styles);

                        wmsStatus.setDimensions(dimensions);

                        wmsStatus.setTransparency(wmsTransparency);

                        wmsStatus.setOnlineResource((String) onlineResources.get("GetMap"));

                        // begin patch; Avoid to request too small tiles.

                        // This generally occurs when printing

                        if (wImg < minTilePrintWidth) {

                                double wScale = (double) minTilePrintWidth / wImg;

                                wmsStatus.setWidth(minTilePrintWidth);

                                Rectangle2D sExtent = wmsStatus.getExtent();