Application: gvSIG desktop

/**

 * gvSIG. Desktop Geographic Information System.

 *

 * Copyright (C) 2007-2013 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 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, 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.app.project.documents.view.legend.gui;

import java.awt.BorderLayout;

import java.awt.Color;

import java.awt.Component;

import java.awt.Dimension;

import java.awt.FlowLayout;

import java.awt.event.ActionListener;

import java.io.File;

import java.io.FileInputStream;

import java.io.FileNotFoundException;

import java.io.FileOutputStream;

import java.io.InputStream;

import java.io.OutputStream;

import java.util.ArrayList;

import java.util.Enumeration;

import java.util.Hashtable;

import java.util.Iterator;

import java.util.List;

import java.util.prefs.Preferences;

import javax.swing.ImageIcon;

import javax.swing.JButton;

import javax.swing.JComponent;

import javax.swing.JFileChooser;

import javax.swing.JLabel;

import javax.swing.JOptionPane;

import javax.swing.JPanel;

import javax.swing.JScrollPane;

import javax.swing.JSplitPane;

import javax.swing.JTextArea;

import javax.swing.JTree;

import javax.swing.filechooser.FileFilter;

import javax.swing.tree.DefaultMutableTreeNode;

import javax.swing.tree.DefaultTreeCellRenderer;

import javax.swing.tree.DefaultTreeModel;

import javax.swing.tree.MutableTreeNode;

import javax.swing.tree.TreePath;

import javax.swing.tree.TreeSelectionModel;

import org.slf4j.Logger;

import org.slf4j.LoggerFactory;

import org.gvsig.andami.PluginServices;

import org.gvsig.andami.messages.NotificationManager;

import org.gvsig.app.ApplicationLocator;

import org.gvsig.fmap.geom.Geometry;

import org.gvsig.fmap.mapcontext.MapContextLocator;

import org.gvsig.fmap.mapcontext.MapContextManager;

import org.gvsig.fmap.mapcontext.exceptions.LegendLayerException;

import org.gvsig.fmap.mapcontext.exceptions.WriteLegendException;

import org.gvsig.fmap.mapcontext.layers.FLayer;

import org.gvsig.fmap.mapcontext.layers.FLayers;

import org.gvsig.fmap.mapcontext.layers.operations.Classifiable;

import org.gvsig.fmap.mapcontext.layers.operations.ClassifiableVectorial;

import org.gvsig.fmap.mapcontext.layers.vectorial.FLyrVect;

import org.gvsig.fmap.mapcontext.rendering.legend.IClassifiedVectorLegend;

import org.gvsig.fmap.mapcontext.rendering.legend.ILegend;

import org.gvsig.fmap.mapcontext.rendering.legend.IVectorLegend;

import org.gvsig.fmap.mapcontext.rendering.legend.driver.ILegendReader;

import org.gvsig.fmap.mapcontext.rendering.legend.driver.ILegendWriter;

import org.gvsig.fmap.mapcontext.rendering.symbols.SymbolManager;

import org.gvsig.i18n.Messages;

import org.gvsig.symbology.swing.SymbologySwingLocator;

import org.gvsig.symbology.swing.SymbologySwingManager;

import org.gvsig.tools.ToolsLocator;

import org.gvsig.tools.persistence.PersistenceManager;

/**

 * Implements the panel which allows the user to control all the information

 * about the

 * legends of a layer in order to improve the information that it offers to the

 * user.

 * There are options to create, save or load an existing legend.

 * 

 * @author jaume dominguez faus - jaume.dominguez@iver.es

 */

public class LegendManager extends AbstractThemeManagerPage {

    private static final Logger logger =

        LoggerFactory.getLogger(LegendManager.class);

    private static final long serialVersionUID = 7989057553773181019L;

//    private static ArrayList<Class<? extends ILegendPanel>> legendPool =

//        new ArrayList<Class<? extends ILegendPanel>>();

    // private static ArrayList<Class<? extends IFMapLegendDriver>>

    // legendDriverPool = new ArrayList<Class<? extends IFMapLegendDriver>>();

    private FLayer layer;

    private ILegend legend; // Le asignaremos la leyenda del primer tema activo.

    private Hashtable<Class<? extends ILegendPanel>, ILegendPanel> pages =

        new Hashtable<Class<? extends ILegendPanel>, ILegendPanel>();

    private JPanel topPanel = null;

    private JTextArea titleArea = null;

    private JPanel preview = null;

    private JScrollPane jTitleScrollPane = null;

    private JTree jTreeLegends;

    private ILegendPanel activePanel;

    private JScrollPane legendTreeScrollPane;

    private boolean dirtyTree_;

    private DefaultMutableTreeNode root = new DefaultMutableTreeNode();

    private DefaultTreeModel treeModel;

    private JScrollPane jPanelContainer;

    private JPanel jCentralPanel;

    private JSplitPane jSplitPane;

    private boolean isTreeListenerDisabled;

    private JButton btnSaveLegend;

    private JButton btnLoadLegend;

    private Hashtable<FLayer, ILegend> table = null;

    private boolean empty = true;

    private JLabel iconLabel;

    public static String defaultLegendFolderPath;

    {

        Preferences prefs = Preferences.userRoot().node("gvsig.foldering");

        defaultLegendFolderPath = prefs.get("LegendsFolder", "");

    }

    private ActionListener loadSaveLegendAction = new ActionListener() {

        public void actionPerformed(java.awt.event.ActionEvent e) {

            JComponent c = (JComponent) e.getSource();

            if (c.equals(getBtnSaveLegend())) {

                try {

                    saveLegend();

                } catch (Exception exc) {

                    JOptionPane.showMessageDialog(

                        ApplicationLocator.getManager().getRootComponent(),

                        Messages.getText("_Unable_to_save_legend")

                        + "\n\n" + exc.getMessage(),

                        Messages.getText("legend"),

                        JOptionPane.WARNING_MESSAGE);

                    return;

                }

            } else

                if (c.equals(getBtnLoadLegend())) {

                    try {

                        loadLegend();

                    } catch (Exception e1) {

                        JOptionPane.showMessageDialog(

                            ApplicationLocator.getManager().getRootComponent(),

                            Messages.getText("_Unable_to_read_legend")

                            + "\n\n" + e1.getMessage(),

                            Messages.getText("legend"),

                            JOptionPane.WARNING_MESSAGE);

                        return;

                    }

                }

        }

        private void saveLegend() throws Exception {

            List<LegendFileFilter> filters = getLegendFileFilters(true);

            if (filters.size() == 0) {

                JOptionPane.showMessageDialog(

                    ApplicationLocator.getManager().getRootComponent(),

                    Messages.getText("_No_output_format_available"),

                    Messages.getText("legend"),

                    JOptionPane.WARNING_MESSAGE);

                return;

            }

            ILegend legend = activePanel.getLegend();

            MapContextManager mcoman = MapContextLocator.getMapContextManager();

            JFileChooser fileChooser = new JFileChooser();

            fileChooser.setAcceptAllFileFilterUsed(false);

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

                fileChooser.addChoosableFileFilter(filters.get(i));

            }

            if (fileChooser.showSaveDialog(

                ApplicationLocator.getManager().getRootComponent())

                == JFileChooser.APPROVE_OPTION) {

                LegendFileFilter lff = (LegendFileFilter) fileChooser.getFileFilter();

                File selfile = fileChooser.getSelectedFile();

                if (!selfile.getAbsolutePath().toLowerCase().endsWith(

                    "." + lff.getFileExtension().toLowerCase())) {

                    selfile = new File(selfile.getAbsolutePath() +

                        "." + lff.getFileExtension().toLowerCase());

                }

                ILegendWriter lw = null;

                lw = mcoman.createLegendWriter(legend.getClass(), lff.getFileExtension());

                if (lw == null) {

                    throw new WriteLegendException(legend,

                        new Exception("Unable to create legend writer."));

                } else {

                    lw.write(legend, selfile, lff.getFileExtension());

                }

            }

        }

        /**

         * 

         * @param writing true for writing; false for reading

         * @return

         */

        private List<LegendFileFilter> getLegendFileFilters(boolean writing) {

            List<LegendFileFilter> resp = new ArrayList<LegendFileFilter>();

            MapContextManager mcoman = MapContextLocator.getMapContextManager();

            List wformats = null;

            if (writing) {

                wformats = mcoman.getLegendWritingFormats();

            } else {

                wformats = mcoman.getLegendReadingFormats();

            }

            String fmt = null;

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

                fmt = (String) wformats.get(i);

                fmt = getFileExtension(fmt);

                if (fmt != null) {

                    resp.add(new LegendFileFilter(fmt));

                }

            }

            return resp;

        }

        /**

         * Returns null if mime format is not parsed properly

         * 

         * @param fmt MIME format

         * 

         * @return

         */

        private String getFileExtension(String fmt) {

            // Example: "text/xml; subtype=gml/2.1.2" => "gml"

            if (fmt == null) {

                return null;

            }

            String[] parts = fmt.split(";");

            String aux = "";

            if (parts.length > 1) {

                aux = parts[1].trim();

            } else {

                aux = parts[0].trim();

            }

            parts = aux.split("=");

            if (parts.length > 1) {

                aux = parts[1].trim();

                // Example: aux = "gml/2.1.2"

                parts = aux.split("/");

                return parts[0].length() == 0 ? null : parts[0].toLowerCase();

            } else {

                aux = parts[0].trim();

                // Example: "text/xml"

                parts = aux.split("/");

                if (parts.length > 1) {

                    return parts[1].length() == 0 ? null : parts[1].toLowerCase();

                } else {

                    return aux.length() == 0 ? null : aux.toLowerCase();

                }

            }

        }        

        private void loadLegend() throws Exception {

            List<LegendFileFilter> filters = getLegendFileFilters(false);

            if (filters.size() == 0) {

                JOptionPane.showMessageDialog(

                    ApplicationLocator.getManager().getRootComponent(),

                    Messages.getText("_No_input_format_available"),

                    Messages.getText("legend"),

                    JOptionPane.WARNING_MESSAGE);

                return;

            }

            JFileChooser fileChooser = new JFileChooser();

            fileChooser.setAcceptAllFileFilterUsed(false);

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

                fileChooser.addChoosableFileFilter(filters.get(i));

            }

            // open a file

            if (fileChooser.showOpenDialog((Component) PluginServices

                .getMainFrame()) == JFileChooser.APPROVE_OPTION) {

                File file = fileChooser.getSelectedFile();

                LegendFileFilter lff = (LegendFileFilter) fileChooser.getFileFilter();

                MapContextManager mcoman = MapContextLocator.getMapContextManager();

                ILegendReader lr = mcoman.createLegendReader(lff.getFileExtension());

                ILegend leg = lr.read(file, Geometry.TYPES.GEOMETRY);

                applyLegend(leg);

            }

        }

    };

    //

    // JLegendFileChooser jfc = new

    // JLegendFileChooser(getLegendDrivers(),true);

    // jfc.setAcceptAllFileFilterUsed(false);

    //

    //

    // File basedir = null;

    // jfc.setCurrentDirectory(basedir);

    // if (jfc.showSaveDialog((Component) PluginServices.getMainFrame())

    // == JFileChooser.APPROVE_OPTION) {

    //

    // File file = jfc.getSelectedFile();

    // String version = jfc.getDriverVersion();

    // IFMapLegendDriver driver = jfc.getSuitableDriver();

    //

    // if(!(driver instanceof FMapGVLDriver)){

    // Object[] options = {PluginServices.getText(this, "yes"),

    // PluginServices.getText(this, "no")};

    //

    // int answer =

    // JOptionPane.showOptionDialog((Component)PluginServices.getMainFrame(),

    // PluginServices.getText(this, "not_GVSLEG_save_question")+"\n"+ //GVL

    // changed to GVSLEG, be aware

    // PluginServices.getText(this, "desea_continuar"),

    // PluginServices.getText(this, "confirmation_dialog"),

    // JOptionPane.YES_NO_OPTION,

    // JOptionPane.QUESTION_MESSAGE,

    // null,

    // options, options[1]);

    // if (answer!=JOptionPane.OK_OPTION) {

    // // 'Cancel' pressed or window closed: don't save anythig, exit

    // save dialog

    // return;

    // }

    // }

    //

    // if (file.exists()) {

    // Object[] options = {PluginServices.getText(this, "yes"),

    // PluginServices.getText(this, "no"),

    // PluginServices.getText(this, "Cancel")};

    //

    // int answer =

    // JOptionPane.showOptionDialog((Component)PluginServices.getMainFrame(),

    // PluginServices.getText(this,

    // "fichero_ya_existe_seguro_desea_guardarlo"),

    // PluginServices.getText(this, "confirmation_dialog"),

    // JOptionPane.YES_NO_CANCEL_OPTION,

    // JOptionPane.QUESTION_MESSAGE,

    // null,

    // options, options[1]);

    // if (answer!=JOptionPane.OK_OPTION) {

    // // 'Cancel' pressed or window closed: don't save anythig, exit

    // save dialog

    // return;

    // }

    // }

    //

    //

    // try {

    // driver.write(layer.getMapContext().getLayers(),layer,

    // activePanel.getLegend(), file, version);

    //

    // } catch (LegendDriverException e1) {

    // int type = e1.getType();

    // String message=PluginServices.getText(this,

    // "could_not_save_legend")+":\n";

    //

    // if ((type & LegendDriverException.SAVE_LEGEND_ERROR) != 0){

    // type = type & ~LegendDriverException.SAVE_LEGEND_ERROR;

    // message += PluginServices.getText(this,

    // "error_writing_file")+".\n";

    // }

    // if ((type & LegendDriverException.UNSUPPORTED_LEGEND_CREATION) !=

    // 0){

    // type = type & ~LegendDriverException.UNSUPPORTED_LEGEND_CREATION;

    // message += "-"+ PluginServices.getText(this,

    // "legend_format_not_yet_supported")+"\n";

    // }

    // if (type != 0) {

    // message = "-"+PluginServices.getText(this, "unknown_error")+"\n";

    // }

    // JOptionPane.showMessageDialog((Component)PluginServices.getMainFrame(),

    // message);

    // }

    // }

    // } else if (c.equals(getBtnLoadLegend())) {

    //

    // JLegendFileChooser jfc = new

    // JLegendFileChooser(getLegendDrivers());

    // jfc.setAcceptAllFileFilterUsed(false);

    //

    // if (jfc.showOpenDialog((Component) PluginServices.getMainFrame())

    // == JFileChooser.APPROVE_OPTION) {

    // File file=jfc.getSelectedFile();

    // IFMapLegendDriver driver = jfc.getSuitableDriver();

    // String path = file.getAbsolutePath();

    // defaultLegendFolderPath = path.substring(0,

    // path.lastIndexOf(File.separator));

    //

    // try {

    // table = driver.read(layer.getMapContext().getLayers(),layer,

    // file);

    //

    // if(table.containsKey(layer))

    // applyLegend((ILegend) table.get(layer));

    //

    //

    // } catch (LegendDriverException e1) {

    // int type = e1.getType();

    // String message = PluginServices.getText(this,

    // "the_legend_will_not_be_applied")+":\n";

    // boolean hasReason = false;

    //

    // if ((type &

    // LegendDriverException.CLASSIFICATION_FIELDS_NOT_FOUND) != 0){

    // type = type &

    // ~LegendDriverException.CLASSIFICATION_FIELDS_NOT_FOUND;

    // message +="-"+ PluginServices.getText(this,

    // "classification_field_does_not_exists")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.LEGEND_TYPE_NOT_YET_SUPPORTED)

    // != 0){

    // type = type &

    // ~LegendDriverException.LEGEND_TYPE_NOT_YET_SUPPORTED;

    // message += "-"+ PluginServices.getText(this,

    // "legend_type_not_yet_supported")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.SYMBOL_TYPE_NOT_YET_SUPPORTED)

    // != 0){

    // type = type &

    // ~LegendDriverException.SYMBOL_TYPE_NOT_YET_SUPPORTED;

    // message += "-"+ PluginServices.getText(this,

    // "unsupported_symbol_type")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.LAYER_SHAPETYPE_MISMATCH) !=

    // 0){

    // type = type & ~LegendDriverException.LAYER_SHAPETYPE_MISMATCH;

    // message += "-"+ PluginServices.getText(this,

    // "layer_geometry_and_legend_types_are_incompatible")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.PARSE_LEGEND_FILE_ERROR) != 0){

    // type = type & ~LegendDriverException.PARSE_LEGEND_FILE_ERROR;

    // message += "-"+ PluginServices.getText(this,

    // "failed_reading_file")+"\n";

    // hasReason = true;

    // }

    // if ((type &

    // LegendDriverException.UNSUPPORTED_LEGEND_FILE_VERSION) != 0){

    // type = type &

    // ~LegendDriverException.UNSUPPORTED_LEGEND_FILE_VERSION;

    // message += "-"+ PluginServices.getText(this,

    // "unsupported_legend_file_version")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.UNSUPPORTED_LEGEND_READING) !=

    // 0){

    // type = type & ~LegendDriverException.UNSUPPORTED_LEGEND_READING;

    // message +="-"+ PluginServices.getText(this,

    // "unsupported_legend_file_format")+"\n";

    // hasReason = true;

    // }

    // if ((type & LegendDriverException.LAYER_NAME_NOT_FOUND) != 0){

    // type = type & ~LegendDriverException.UNSUPPORTED_LEGEND_READING;

    // message +="-"+ PluginServices.getText(this,

    // "could_not_find_layer")+"\n";

    // hasReason = true;

    // }

    // if (!hasReason) {

    // message = "-"+ PluginServices.getText(this,

    // "unknown_error")+"\n";

    // }

    // JOptionPane.showMessageDialog((Component)PluginServices.getMainFrame(),

    // message);

    // }

    // }

    // }

    // private IFMapLegendDriver[] getLegendDrivers() {

    // Class<?>[] legendDriverClasses = legendDriverPool.toArray(new Class[0]);

    // ArrayList<IFMapLegendDriver> drivers = new

    // ArrayList<IFMapLegendDriver>();

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

    // String message = PluginServices.getText(this,

    // "adding_legend_file_format_support")+": ";

    // try {

    // Class<?> c = legendDriverClasses[i];

    // drivers.add((IFMapLegendDriver) c.newInstance());

    // } catch (Exception e) {

    // NotificationManager.addError(message+PluginServices.getText(this,

    // "failed"), e);

    // }

    // NotificationManager.addInfo(message+PluginServices.getText(this, "OK"));

    //

    // }

    // return (IFMapLegendDriver[]) drivers.toArray(new IFMapLegendDriver[0]);

    // };

    private String getExtension(File f) {

        String ext = null;

        String s = f.getName();

        int i = s.lastIndexOf('.');

        if (i > 0 && i < s.length() - 1) {

            // ext = s.substring(i + 1).toLowerCase();

            ext = s.substring(i).toLowerCase();

        }

        return ext;

    }

    public LegendManager() {

        initialize();

    }

    private void initialize() {

        setLayout(new BorderLayout());

        add(getTopPanel(), BorderLayout.NORTH);

        add(getSplitPane(), BorderLayout.CENTER);

        setSize(500, 360);

        treeModel = new DefaultTreeModel(root);

    }

    private JSplitPane getSplitPane() {

        if (jSplitPane == null) {

            jSplitPane = new JSplitPane(JSplitPane.HORIZONTAL_SPLIT);

            JPanel aux = new JPanel(new BorderLayout(0, 5));

            aux.add(getLegendTreeScrollPane(), BorderLayout.CENTER);

            aux.add(getPreviewPanel(), BorderLayout.SOUTH);

            jSplitPane.setLeftComponent(aux);

            jSplitPane.setRightComponent(getCentralPanel());

            jSplitPane.setDividerLocation(150);

        }

        return jSplitPane;

    }

    private JPanel getCentralPanel() {

        if (jCentralPanel == null) {

            jCentralPanel = new JPanel(new BorderLayout(0, 10));

            jCentralPanel.add(getTitleScroll(), BorderLayout.NORTH);

            jCentralPanel.add(getJPanelContainer(), BorderLayout.CENTER);

        }

        return jCentralPanel;

    }

    private JScrollPane getJPanelContainer() {

        if (jPanelContainer == null) {

            jPanelContainer = new JScrollPane();

        }

        return jPanelContainer;

    }

    /**

     * This method initializes jPanel

     * 

     * @return javax.swing.JPanel

     */

    private JPanel getTopPanel() {

        if (topPanel == null) {

            topPanel = new JPanel(new FlowLayout(FlowLayout.RIGHT, 5, 0));

            topPanel.setPreferredSize(new Dimension(638, 31));

            topPanel.setBorder(javax.swing.BorderFactory.createTitledBorder(

                null, "",

                javax.swing.border.TitledBorder.DEFAULT_JUSTIFICATION,

                javax.swing.border.TitledBorder.DEFAULT_POSITION, null, null));

            topPanel.add(getBtnSaveLegend(), null);

            topPanel.add(getBtnLoadLegend(), null);

        }

        return topPanel;

    }

    private JButton getBtnSaveLegend() {

        if (btnSaveLegend == null) {

            btnSaveLegend =

                new JButton(PluginServices.getText(this, "Guardar_leyenda")

                    + "...");

            btnSaveLegend.addActionListener(loadSaveLegendAction);

        }

        return btnSaveLegend;

    }

    private JButton getBtnLoadLegend() {

        if (btnLoadLegend == null) {

            btnLoadLegend =

                new JButton(PluginServices.getText(this, "Recuperar_leyenda")

                    + "...");

            btnLoadLegend.addActionListener(loadSaveLegendAction);

        }

        return btnLoadLegend;

    }

    /**

     * This method initializes jTextArea

     * 

     * @return javax.swing.JTextArea

     */

    private JTextArea getTitleArea() {

        if (titleArea == null) {

            titleArea = new JTextArea();

            titleArea.setBackground(java.awt.SystemColor.control);

            titleArea.setLineWrap(true);

            titleArea.setRows(0);

            titleArea.setWrapStyleWord(false);

            titleArea.setEditable(false);

            titleArea.setPreferredSize(new java.awt.Dimension(495, 40));

        }

        return titleArea;

    }

    /**

     * This method initializes jPanel1

     * 

     * @return javax.swing.JPanel

     */

    private JPanel getPreviewPanel() {

        if (preview == null) {

            preview = new JPanel();

            preview.setBorder(javax.swing.BorderFactory

                .createBevelBorder(javax.swing.border.BevelBorder.LOWERED));

            preview.setBackground(java.awt.SystemColor.text);

            preview.setLayout(new BorderLayout(5, 5));

            preview.add(getIconLabel());

            preview.setPreferredSize(new Dimension(getSplitPane()

                .getDividerLocation(), 130));

            preview.setBackground(Color.white);

        }

        return preview;

    }

    private JLabel getIconLabel() {

        if (iconLabel == null) {

            iconLabel = new JLabel();

            iconLabel.setVerticalAlignment(JLabel.CENTER);

            iconLabel.setHorizontalAlignment(JLabel.CENTER);

        }

        return iconLabel;

    }

    /**

     * This method initializes jScrollPane

     * 

     * @return javax.swing.JScrollPane

     */

    private JScrollPane getLegendTreeScrollPane() {

        if (legendTreeScrollPane == null) {

            legendTreeScrollPane = new JScrollPane();

            legendTreeScrollPane.setViewportView(getJTreeLegends());

        }

        return legendTreeScrollPane;

    }

    /**

     * <p>

     * Adds a new fully-featured legend panel to the LegendManager.<br>

     * </p>

     * 

     * <p>

     * <b>CAUTION:</b> Trying to add a child page whose parent hasn't been added

     * yet causes the application to fall in an infinite loop. This is a known

     * bug, sorry. Just avoid this case or try to fix it (lol).<br>

     * </p>

     * 

     * @param page

     *            , Class of type ILegendPanel

     * @deprecated use SymbologySwingManager.registerLegendEditor

     */

    public static void addLegendPage(Class<? extends ILegendPanel> iLegendPanelClass) {

        SymbologySwingManager manager = SymbologySwingLocator.getSwingManager();

        manager.registerLegendEditor(iLegendPanelClass);

    }

    /**

     * Causes the component to be autofilled with the legend pages that

     * were added through the static method addLegendPage(ILegendPanel page)

     */

    private void fillDialog() {

        if (empty) {

            SymbologySwingManager manager = SymbologySwingLocator.getSwingManager();

            Iterator<ILegendPanel> it = manager.getLegendEditors(layer).iterator();

            while( it.hasNext() ) {

                ILegendPanel page = it.next();

                pages.put(page.getClass(), page); 

            }

            Enumeration<ILegendPanel> enume = pages.elements();

            while (enume.hasMoreElements()) {

                ILegendPanel page = enume.nextElement();

                doInsertNode(treeModel, page);

            }

            getJTreeLegends().setModel(treeModel);

            getJTreeLegends().repaint();

            empty = false;

        }

    }

    @SuppressWarnings("unchecked")

    private DefaultMutableTreeNode findNode(Class searchID) {

        String title;

        try {

            title =

                ((ILegendPanel) Class.forName(searchID.getName()).newInstance())

                    .getTitle();

        } catch (Exception e) {

            // this should be impossible, but anyway this case will be treat as

            // the node does not

            // exist.

            return null;

        }

        Enumeration e = root.breadthFirstEnumeration();

        while (e.hasMoreElements()) {

            DefaultMutableTreeNode nodeAux =

                (DefaultMutableTreeNode) e.nextElement();

            if (nodeAux != null) {

                ILegendPanel legend = (ILegendPanel) nodeAux.getUserObject();

                if (legend == null)

                    continue; // Root node

                if (legend.getTitle().equals(title)) {

                    return nodeAux;

                }

            }

        }

        return null;

    }

    /**

     * If parent_node == null, add to root.

     * Returns added node

     * 

     * @param tm

     * @param parent_node

     * @param item

     */

    private MutableTreeNode insertNodeHere(

        DefaultTreeModel tm,

        MutableTreeNode parent_node,

        ILegendPanel item) {

        MutableTreeNode pn = null;

        if (parent_node == null) {

            pn = root;

        } else {

            pn = parent_node;

        }

        DefaultMutableTreeNode nodeValue = new DefaultMutableTreeNode(item);

        int children = pn.getChildCount();

        int pos = 0;

        String pTitle = null;

        for (int i = 0; i < children; i++) {

            DefaultMutableTreeNode node =

                (DefaultMutableTreeNode) tm.getChild(pn, i);

            if (node.getUserObject() instanceof ILegendPanel) {

                pTitle = ((ILegendPanel) node.getUserObject()).getTitle();

                if (pTitle.compareTo(item.getTitle()) < 0) {

                    pos++;

                }

            }

        }

        tm.insertNodeInto(nodeValue, pn, pos);

        return nodeValue;

    }

    /**

     * Returns inserted node

     * 

     * @param tm

     * @param page

     * @return

     */

    private MutableTreeNode doInsertNode(DefaultTreeModel tm, ILegendPanel page) {

        if (tm == null || page == null) {

            return null;

        }

        MutableTreeNode aux = findNode(page.getClass()); 

        if (aux != null) {

            return aux;

        }

        Class parent_class = page.getParentClass();

        if (parent_class != null) {

            if (pages.containsKey(parent_class)) {

                ILegendPanel parent = (ILegendPanel) pages.get(parent_class);

                aux = doInsertNode(tm, parent); 

                if (aux != null) {

                    return insertNodeHere(tm, aux, page);

                } else {

                    return null;

                }

            } else {

                return null;

            }

        } else {

            // add to root

            return insertNodeHere(tm, null, page);

        }

    }

    private JScrollPane getTitleScroll() {

        if (jTitleScrollPane == null) {

            jTitleScrollPane = new JScrollPane();

            jTitleScrollPane.setBounds(2, 2, 498, 42);

            jTitleScrollPane.setViewportView(getTitleArea());

        }

        return jTitleScrollPane;

    }

    private JTree getJTreeLegends() {

        if (jTreeLegends == null) {

            jTreeLegends = new JTree();

            jTreeLegends.setRootVisible(false);

            MyTreeCellRenderer treeCellRenderer = new MyTreeCellRenderer();

            treeCellRenderer.setOpenIcon(null);

            treeCellRenderer.setClosedIcon(null);

            treeCellRenderer.setLeafIcon(null);

            jTreeLegends.setCellRenderer(treeCellRenderer);

            jTreeLegends.setShowsRootHandles(true);

            jTreeLegends

                .addTreeSelectionListener(new javax.swing.event.TreeSelectionListener() {

                    public void valueChanged(

                        javax.swing.event.TreeSelectionEvent e) {

                        if (isTreeListenerDisabled)

                            return;

                        DefaultMutableTreeNode node =

                            (DefaultMutableTreeNode) jTreeLegends

                                .getLastSelectedPathComponent();

                        if (node == null)

                            return;

                        setActivePage((ILegendPanel) node.getUserObject());

                    }

                });

            jTreeLegends.putClientProperty("JTree.linestyle", "Angled");

            jTreeLegends.getSelectionModel().setSelectionMode(

                TreeSelectionModel.SINGLE_TREE_SELECTION);

        }

        return jTreeLegends;

    }

    private void setActivePage(ILegendPanel page) {

        if (page.getPanel() == null) {

            // this is what happens when the user clicked in a parent node

            // which only acts as a folder, and does not manage any legend

            // then it expands and selects the first child

            DefaultMutableTreeNode node = findNode(page.getClass());

            if (treeModel.getChildCount(node) > 0) {

                DefaultMutableTreeNode dmn =

                    (DefaultMutableTreeNode) treeModel.getChild(node, 0);

                page = (ILegendPanel) dmn.getUserObject();

                setActivePage(page);

                expandAndSelect(page);

            }

        } else {

            // show the page

            activePanel = page;

            setIcon(activePanel.getIcon());

            activePanel.setData(layer, legend);

            getTitleArea().setText(activePanel.getDescription());

            jPanelContainer.setViewportView(activePanel.getPanel());

        }

    }

    private void setIcon(ImageIcon icon) {

        getIconLabel().setIcon(icon);

    }

    private class MyTreeCellRenderer extends DefaultTreeCellRenderer {

        private static final long serialVersionUID = -6013698992263578041L;

        public MyTreeCellRenderer() {

        }

        public Component getTreeCellRendererComponent(JTree tree, Object value,

            boolean sel, boolean expanded, boolean leaf, int row,

            boolean hasFocus) {

            super.getTreeCellRendererComponent(tree, value, sel, expanded,

                leaf, row, hasFocus);

            if (value instanceof DefaultMutableTreeNode) {

                DefaultMutableTreeNode node = (DefaultMutableTreeNode) value;

                if (node.getUserObject() instanceof ILegendPanel) {

                    ILegendPanel legend = (ILegendPanel) node.getUserObject();

                    this

                        .setText(legend.getPanel() == null ? "<html><b>"

                            + legend.getTitle() + "</b></html>" : legend

                            .getTitle());

                }

            }

            return this;

        }

    }

    private void expandAndSelect(Object node) {

        isTreeListenerDisabled = true;

        // will expand the tree and select the node

        int i = 0;

        boolean exit = false;

        TreePath tp = null;

        // find the page in the tree

        while (i < jTreeLegends.getRowCount() && !exit) {

            // see if this row is the node that we are looking for

            tp = jTreeLegends.getPathForRow(i);

            Object[] obj = tp.getPath();

            for (int j = 0; j < obj.length && !exit; j++) {

                Object o = ((DefaultMutableTreeNode) obj[j]).getUserObject();

                if (o != null && o.getClass().equals(node.getClass())

                    && o.equals(node)) {

                    // found it! collapse the tree

                    while (i >= 0) {

                        jTreeLegends.collapseRow(i);

                        i--;

                    }

                    exit = true;

                }

            }

            jTreeLegends.expandRow(i);

            i++;

        }

        // expand the tree and set the selection

        if (tp != null) {

            jTreeLegends.expandPath(tp);

            jTreeLegends.setSelectionPath(tp);

        }

        isTreeListenerDisabled = false;

    }

    public String getName() {

        return PluginServices.getText(this, "Simbologia");

    }

    public void acceptAction() {

        // automatically handled by the ThemeManagerWindow

    }

    public void cancelAction() {

        // does nothing

    }

    public void applyAction() {

        legend = activePanel.getLegend();

        if (table != null && table.size() > 1)

            applyRestOfLegends(table, layer.getMapContext().getLayers());

        /*

         * try to apply the legend to all the active layers that

         * can accept it

         */

        FLayer[] activeLyrs = layer.getMapContext().getLayers().getActives();

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

            FLayer laux = activeLyrs[i];

            if (activeLyrs[i] instanceof FLayers) {

                laux = getFirstActiveLayerVect((FLayers) activeLyrs[i]);

            }

            if (laux instanceof ClassifiableVectorial) {

                ClassifiableVectorial aux2 = (ClassifiableVectorial) laux;

                try {

                    if (legend instanceof IClassifiedVectorLegend) {

                        // Es una leyenda que necesita un recordset con un

                        // nombre de campo. Comprobamos que ese recordset

                        // tiene ese nombre de campo y es del tipo esperado

                        IClassifiedVectorLegend cl =

                            (IClassifiedVectorLegend) legend;

                        if (aux2 instanceof FLyrVect) {

                            if (cl.getValues().length == 0) {

                                JOptionPane.showMessageDialog(

                                    (Component) PluginServices.getMainFrame(),

                                    PluginServices.getText(this,

                                        "no_es_posible_aplicar_leyenda_vacia"));

                                return;

                            }

                            aux2.setLegend((IVectorLegend) legend);

                        }

                    } else

                        if (legend instanceof IVectorLegend) {

                            aux2.setLegend((IVectorLegend) legend);

                        }

                } catch (LegendLayerException e) {

                    NotificationManager.addError(PluginServices.getText(this,

                        "legend_exception"), e);

                }

            }

        }

    }

    private void applyRestOfLegends(Hashtable<FLayer, ILegend> table2,

        FLayers layers) {

        for (int i = 0; i < layers.getLayersCount(); i++) {

            FLayer my_layer = layers.getLayer(i);

            if (!(my_layer instanceof FLayers)) {

                if (my_layer instanceof ClassifiableVectorial) {

                    try {

                        if (table.containsKey(my_layer)) {

                            ClassifiableVectorial lyr =

                                (ClassifiableVectorial) my_layer;

                            lyr.setLegend((IVectorLegend) table.get(my_layer));

                        }

                    } catch (LegendLayerException e) {

                        // TODO Auto-generated catch block

                        e.printStackTrace();

                    }

                }

            } else

                applyRestOfLegends(table, (FLayers) my_layer);

        }

    }

    @Override

    public void setModel(FLayer layer) {

        this.layer = layer;

        applyLegend(((Classifiable) layer).getLegend());

    }

    /**

     * Applies the legend to the layer.

     * 

     * @param aLegend

     *            , legend that the user wants to apply

     */

    private void applyLegend(ILegend aLegend) {

        this.legend = aLegend;

        fillDialog();

        Enumeration<Class<? extends ILegendPanel>> en = pages.keys();

        while (en.hasMoreElements()) {

            ILegendPanel page = (ILegendPanel) pages.get(en.nextElement());

            if (legend.getClass().equals(page.getLegendClass())) {

                setActivePage(page);

                expandAndSelect(page);

                return;

            }

        }

        NotificationManager.addWarning(PluginServices.getText(this,

            "caution_no_registered_panel_associated_to_"

                + "loaded_legend_the_legend_wont_be_applied"));

    }

    // public static void addLegendDriver(Class<? extends IFMapLegendDriver>

    // legendDriverClass) {

    // if (!legendDriverPool.contains(legendDriverClass)) {

    // legendDriverPool.add(legendDriverClass);

    // }

    // }

}