/*******************************************************************************
 * Copyright (c) 2010 Haifeng Li
 *   
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *  
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *******************************************************************************/
package smile.demo.manifold;

import java.awt.*;
import java.awt.event.ActionEvent;
import java.awt.event.ActionListener;
import javax.swing.*;
import smile.data.AttributeDataset;
import smile.data.parser.DelimitedTextParser;
import smile.plot.Palette;
import smile.plot.PlotCanvas;
import smile.manifold.TSNE;
import smile.math.Math;
import smile.projection.PCA;

/**
 *
 * @author Haifeng Li
 */
@SuppressWarnings("serial")
public class TSNEDemo extends JPanel implements Runnable, ActionListener {

    int perplexity = 20;
    JTextField perplexityField;

    private static String[] datasetName = {
            "MNIST"
    };

    double[][] data;
    int[] labels;

    JPanel optionPane;
    JComponent canvas;
    private JButton startButton;
    private JComboBox datasetBox;
    char pointLegend = '@';

    public TSNEDemo() {
        startButton = new JButton("Start");
        startButton.setActionCommand("startButton");
        startButton.addActionListener(this);

        datasetBox = new JComboBox<>();
        for (int i = 0; i < datasetName.length; i++) {
            datasetBox.addItem(datasetName[i]);
        }
        datasetBox.setSelectedIndex(0);
        datasetBox.setActionCommand("datasetBox");
        datasetBox.addActionListener(this);

        optionPane = new JPanel(new FlowLayout(FlowLayout.LEFT));
        optionPane.setBorder(BorderFactory.createRaisedBevelBorder());
        optionPane.add(startButton);
        optionPane.add(new JLabel("Dataset:"));
        optionPane.add(datasetBox);

        perplexityField = new JTextField(Integer.toString(perplexity), 5);
        optionPane.add(new JLabel("Perplexity:"));
        optionPane.add(perplexityField);

        setLayout(new BorderLayout());
        add(optionPane, BorderLayout.NORTH);
    }

    public JComponent learn() {
        JPanel pane = new JPanel(new GridLayout(1, 2));

        PCA pca = new PCA(data);
        pca.setProjection(50);
        double[][] X = pca.project(data);
        long clock = System.currentTimeMillis();
        TSNE tsne = new TSNE(X, 2, perplexity, 200, 1000);
        System.out.format("Learn t-SNE from %d samples in %dms\n", data.length, System.currentTimeMillis() - clock);

        double[][] y = tsne.getCoordinates();

        PlotCanvas plot = new PlotCanvas(Math.colMin(y), Math.colMax(y));

        for (int i = 0; i < y.length; i++) {
            plot.point(pointLegend, Palette.COLORS[labels[i]], y[i]);
        }

        plot.setTitle("tSNE");
        pane.add(plot);

        return pane;
    }

    @Override
    public void run() {
        startButton.setEnabled(false);
        datasetBox.setEnabled(false);
        perplexityField.setEnabled(false);

        try {
            JComponent plot = learn();
            if (plot != null) {
                if (canvas != null)
                    remove(canvas);
                canvas = plot;
                add(plot, BorderLayout.CENTER);
            }
            validate();
        } catch (Exception ex) {
            System.err.println(ex);
        }

        startButton.setEnabled(true);
        datasetBox.setEnabled(true);
        perplexityField.setEnabled(true);
    }

    @Override
    public void actionPerformed(ActionEvent e) {
        if ("startButton".equals(e.getActionCommand())) {
            DelimitedTextParser parser = new DelimitedTextParser();

            try {
                AttributeDataset dataset = parser.parse(smile.data.parser.IOUtils.getTestDataFile("mnist/mnist2500_X.txt"));
                data = dataset.toArray(new double[dataset.size()][]);

                dataset = parser.parse(smile.data.parser.IOUtils.getTestDataFile("mnist/mnist2500_labels.txt"));
                labels = new int[dataset.size()];
                for (int i = 0; i < labels.length; i++) {
                    labels[i] = (int) dataset.get(i).x[0];
                }
            } catch (Exception ex) {
                JOptionPane.showMessageDialog(null, "Failed to load dataset.", "ERROR", JOptionPane.ERROR_MESSAGE);
                System.err.println(ex);
            }

            try {
                perplexity = Integer.parseInt(perplexityField.getText().trim());
                if (perplexity < 10 || perplexity > 300) {
                    JOptionPane.showMessageDialog(this, "Invalid Perplexity: " + perplexity, "Error", JOptionPane.ERROR_MESSAGE);
                    return;
                }
            } catch (Exception ex) {
                JOptionPane.showMessageDialog(this, "Invalid K: " + perplexityField.getText(), "Error", JOptionPane.ERROR_MESSAGE);
                return;
            }

            Thread thread = new Thread(this);
            thread.start();
        }
    }

    @Override
    public String toString() {
        return "t-SNE";
    }

    public static void main(String argv[]) {
        TSNEDemo demo = new TSNEDemo();
        JFrame f = new JFrame("t-SNE");
        f.setSize(new Dimension(1000, 1000));
        f.setLocationRelativeTo(null);
        f.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
        f.getContentPane().add(demo);
        f.setVisible(true);
    }
}