/*
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */

/*
 * RecentUrisGUI.java
 *
 * Created on Apr 5, 2011, 10:26:30 AM
 */

package org.autoplot;

import java.awt.Component;
import java.awt.EventQueue;
import java.io.File;
import java.io.FileNotFoundException;
import java.text.ParseException;
import java.util.Calendar;
import java.util.Iterator;
import java.util.LinkedHashMap;
import java.util.Map.Entry;
import java.util.Scanner;
import java.util.SortedMap;
import java.util.TreeMap;
import java.util.logging.Level;
import java.util.logging.Logger;
import java.util.regex.Pattern;
import javax.swing.JLabel;
import javax.swing.JOptionPane;
import javax.swing.JTree;
import javax.swing.SwingUtilities;
import javax.swing.event.TreeModelListener;
import javax.swing.event.TreeSelectionEvent;
import javax.swing.event.TreeSelectionListener;
import javax.swing.tree.DefaultMutableTreeNode;
import javax.swing.tree.DefaultTreeCellRenderer;
import javax.swing.tree.DefaultTreeModel;
import javax.swing.tree.TreeModel;
import javax.swing.tree.TreePath;
import org.das2.components.DasProgressPanel;
import org.das2.datum.Datum;
import org.das2.datum.DatumRange;
import org.das2.datum.LoggerManager;
import org.das2.datum.TimeParser;
import org.das2.datum.TimeUtil;
import org.das2.datum.Units;
import org.das2.util.filesystem.Glob;
import org.das2.util.monitor.ProgressMonitor;
import org.autoplot.datasource.AutoplotSettings;

/**
 * This presents the URI history in a useful dialog where URIs are
 * sorted into today, yesterday, last week, etc.  The URI history is
 * stored in ~/autoplot_data/bookmarks/history.txt.  Times in the history file
 * in UT, not the local time.
 * 
 * This useful dialog needs to be rewritten.  
 * See https://sourceforge.net/p/autoplot/bugs/1019/
 * @author jbf
 */
public class RecentUrisGUI extends javax.swing.JPanel {

    String selectedURI=null;
    boolean empty= false;

    DefaultTreeModel deftree= new DefaultTreeModel( new DefaultMutableTreeNode("") );
    MyTreeModel theModel=null;

    private static final Logger logger= LoggerManager.getLogger("autoplot.gui");
            
    /** Creates new form RecentUrisGUI */
    public RecentUrisGUI() {
        initComponents();

        deftree.insertNodeInto( new DefaultMutableTreeNode("moment..."), (DefaultMutableTreeNode)deftree.getRoot(), 0 );
        jTree1.setModel( deftree );

        jTree1.addTreeSelectionListener( new TreeSelectionListener() {
            @Override
            public void valueChanged(TreeSelectionEvent e) {
                Object o= e.getPath().getLastPathComponent();
                if ( o instanceof String[] ) {
                    String[] pp= (String[]) o;
                    selectedURI= pp[1];
                }
            }
        });
    }


    public String getSelectedURI() {
        return selectedURI;
    }

    public static void main( String[] args ) {
        RecentUrisGUI t= new RecentUrisGUI();
        t.setFilter("");
        int i= JOptionPane.showConfirmDialog( null, t );
        if ( i==JOptionPane.OK_OPTION ) {
            System.err.println( t.getSelectedURI() );
        }
    }

    private String filter;

    /**
     * this should be called once with "" to initialize
     * @param filter
     */
    public void setFilter(String filter) {
        jTree1.setModel( deftree );
        jTree1.setCellRenderer( new DefaultTreeCellRenderer() );
        jTree1.repaint();
        this.filter= filter;
        DasProgressPanel label= DasProgressPanel.createFramed( SwingUtilities.getWindowAncestor(RecentUrisGUI.this),"reading history");
        new Thread( getUpdateRunnable(label), "updateRecentUris").start();
    }

    private Runnable getUpdateRunnable( final ProgressMonitor mon) {
        return new Runnable() {
            @Override
            public void run() {
                update(mon);
            };
        };
    }
    
    private void update( ProgressMonitor mon ) {
        MyTreeModel ltheModel= new MyTreeModel(mon);
        synchronized ( this ) {
            theModel= ltheModel;
        }

        Runnable run= new Runnable() {
            @Override
            public void run() {
                synchronized ( RecentUrisGUI.this ) {
                    jTree1.setModel( theModel );
                }
                jTree1.setCellRenderer( new MyCellRenderer() );
                
                Object r= jTree1.getModel().getRoot();

                // show >30 URIs if possible
                int c=0; //URIS
                int i=0; //index
                final int SHOW_URIS=30;
                TreeModel jt= jTree1.getModel();
                while ( i<jt.getChildCount(jt.getRoot()) && c<SHOW_URIS ) {
                    Object child= jt.getChild( r,i );
                    jTree1.expandPath( new TreePath( new Object[] { r, child  } ) );
                    c+= jt.getChildCount(child);
                    i++;
                }

            }
        };
        SwingUtilities.invokeLater(run);

    }

    private class MyCellRenderer extends DefaultTreeCellRenderer {

        @Override
        public Component getTreeCellRendererComponent(JTree tree, Object value, boolean sel, boolean expanded, boolean leaf, int row, boolean hasFocus) {
            String tooltip= null;
            if (value instanceof String[]) {
                tooltip= ((String[])value)[0];
                value= ((String[])value)[1];
                //value= tooltip + " " + ((String[])value)[1];
            } else if ( value instanceof DatumRange ) {
                tooltip= ((DatumRange)value).toString();               
                int count= tree.getModel().getChildCount(value);
                MyTreeModel ltheModel;
                synchronized ( RecentUrisGUI.this ) {
                    ltheModel= theModel;
                }
                value= String.format( "%s (%d)", ltheModel.nameFor((DatumRange)value), count );
            }
            Component c= super.getTreeCellRendererComponent(tree, value, sel, expanded, leaf, row, hasFocus);
            if ( c instanceof JLabel ) {
                JLabel l= (JLabel)c;
                l.setToolTipText(tooltip); // this doesn't work on Linux...
            }
            return c;
        }
    }

    private final class MyTreeModel implements TreeModel {

        private final Object root= new Object();

        private TreeMap<Datum,String[]> uris;

        private DatumRange[] list;
        private boolean[] skip;

        MyTreeModel( ProgressMonitor mon ) {
            update( mon );
        }

        private String nameFor( DatumRange dr ) {
            if ( dr==list[0] ) {
                return "today";
            } else if ( dr==list[1] ) {
                return "yesterday";
            } else if ( dr==list[2] ) {
                return "previous week";
            } else {
                return dr.toString();
            }

        }

        private void update( ProgressMonitor mon ) {
            if ( EventQueue.isDispatchThread() ) {
                throw new IllegalStateException("should not be called from event queue");
            }
            Datum tz= Units.milliseconds.createDatum( Calendar.getInstance().getTimeZone().getRawOffset() );
            Datum now = TimeUtil.now().add(tz);
            list = new DatumRange[8];
            list[0] = new DatumRange(TimeUtil.prevMidnight(now).subtract(tz), TimeUtil.nextMidnight(now).subtract(tz) );
            list[1] = list[0].previous();
            list[2] = new DatumRange(TimeUtil.prevWeek(list[1].min()), list[1].min());
            list[3] = new DatumRange(TimeUtil.prev(TimeUtil.MONTH, list[2].min()), list[2].min());
            list[4] = new DatumRange(TimeUtil.prev(TimeUtil.QUARTER, list[3].min()), list[3].min());
            list[5] = new DatumRange(TimeUtil.prev(TimeUtil.QUARTER, list[4].min()), list[4].min());
            list[6] = new DatumRange(TimeUtil.prev(TimeUtil.HALF_YEAR, list[5].min()), list[5].min());
            list[7] = new DatumRange(Datum.create(0, Units.t1970), list[6].min());
            File f2 = new File(AutoplotSettings.settings().resolveProperty(AutoplotSettings.PROP_AUTOPLOTDATA), "bookmarks/");
            if (!f2.exists()) {
                boolean ok = f2.mkdirs();
                if (!ok) {
                    throw new RuntimeException("unable to create folder " + f2);
                }
            }
            uris= new TreeMap<Datum, String[]>();
            TimeParser tp= TimeParser.create( TimeParser.TIMEFORMAT_Z);

            LinkedHashMap<String,String> daysURIs= new LinkedHashMap<String,String>(); // things we've already displayed

            Pattern filtPattern= null;
            String filt= RecentUrisGUI.this.filter;
            if ( filt!=null && filt.length()==0 ) filt=null;
            if ( filt!=null ) filt= filt.toLowerCase();
            if ( filt!=null ) { // make into regex
                filt= "(?i)"+ Glob.getRegex(filt);
                filtPattern= Pattern.compile(filt);
            }
            long tzOffsetMs= Calendar.getInstance().getTimeZone().getRawOffset();

            String midnight= tp.format( Units.t1970.createDatum(0).subtract( tzOffsetMs,Units.milliseconds ), null );
            
            mon.started();
            try {
                mon.setTaskSize(50000);

                int iline=0;
                final File f3 = new File(f2, "history.txt");
                if ( f3.exists()&&f3.canRead() ) {
                    Scanner scan;
                    try {
                        scan= new Scanner(f3);
                    } catch ( FileNotFoundException ex ) {
                        throw new IllegalStateException(ex);
                    }

                    while (scan.hasNextLine()) {
                        String line = scan.nextLine();
                        iline++;
                        String[] ss= line.split("\\s+",2);
                        mon.setTaskProgress(iline);
                        mon.setProgressMessage(ss[0]);
                        if ( ss.length<2 ) {
                            continue; // RTE rte_1707706522_20110907_150419_Terrance*.xml
                        }
                        try {
                            String suri= ss[1];
                            if ( suri.startsWith("file://" ) && suri.length()>7 && suri.charAt(7)!='/' ) { // kludge for Windows
                                suri= "file:/" + suri.substring(7);
                                ss[1]= suri;
                            }
                            if ( filtPattern!=null && !filtPattern.matcher(ss[1]).find() ) {
                                continue;
                            }
                            if ( ss[0].compareTo( midnight )>0 || !scan.hasNextLine() ) {
                                if ( !scan.hasNextLine() ) {
                                    daysURIs.remove( ss[1] );
                                    daysURIs.put( ss[1], ss[0] );
                                }
                                Datum tlocal= null;
                                for ( Entry<String,String> ent: daysURIs.entrySet() ) {
                                    String uri= ent.getKey();
                                    tlocal= tp.parse( ent.getValue() ).getTimeDatum().add(tzOffsetMs,Units.milliseconds);
                                    uris.put( tlocal, new String[] { tp.format(tlocal,null), uri } );
                                }
                                daysURIs= new LinkedHashMap<String,String>();
                                if ( tlocal==null ) tlocal= tp.parse(ss[0]).getTimeDatum().add(tzOffsetMs,Units.milliseconds);
                                midnight= tp.format( TimeUtil.nextMidnight( tlocal ).subtract(tzOffsetMs,Units.milliseconds), null );
                            }
                            daysURIs.remove( ss[1] );
                            daysURIs.put( ss[1], ss[0] );

                        } catch (ParseException ex) {
                            logger.log( Level.WARNING, ex.getMessage(), ex );
                        }
                    }
                    scan.close();

                    for ( Entry<String,String> entry: daysURIs.entrySet() ) {
                        try {
                            String uri= entry.getKey();
                            Datum tlocal= tp.parse(entry.getValue()).getTimeDatum().add(tzOffsetMs,Units.milliseconds);
                            uris.put( tlocal, new String[] { tp.format(tlocal,null), uri } );
                        } catch ( ParseException ex ) {
                            logger.log( Level.WARNING, ex.getMessage(), ex );
                        }
                    }

                }

                skip= new boolean[8];

                // remove empty elements.
                int newListLen= list.length;
                for ( int i=0; i<list.length; i++ ) {
                    if ( false && getChildCount(list[i])==0 ) {
                        skip[i]=true;
                        newListLen--;
                    } else {
                        skip[i]= false;
                    }
                }

                if ( newListLen==0 ) {
                    empty= true; // we'll print a nice message
                    newListLen= 1;
                    skip[0]= false;
                } else {
                    empty= false;
                }

                DatumRange[] newlist = new DatumRange[newListLen];
                int j=0;
                for ( int i=0; i<list.length; i++ ) {
                    if ( !skip[i] ) {
                        newlist[j]= list[i];
                        j++;
                    }
                }
                list= newlist;

            } finally {
                mon.finished();
            }

        }

        @Override
        public Object getRoot() {
            return root;
        }

        @Override
        public Object getChild( Object parent, int index ) {
            if ( parent==root ) {
                if ( empty ) {
                    return "no items in history";
                } else {
                    return list[index];
                }
            }else if (parent instanceof DatumRange) {
                DatumRange range = (DatumRange)parent;
                SortedMap<Datum,String[]> submap = uris.subMap(range.min(), range.max());
                Iterator i= submap.values().iterator();
                for ( int j=submap.size()-1; j>index; j-- ) {
                    i.next();
                }
                return i.next();
            } else {
                return new IndexOutOfBoundsException("no child at index="+index);
            }
        }

        @Override
        public int getChildCount( Object parent ) {
            if ( parent==root ) {
                return list.length;
            } else if (parent instanceof DatumRange) {
                DatumRange range = (DatumRange)parent;
                SortedMap<Datum,String[]> submap = uris.subMap(range.min(), range.max());
                return submap.size();
            } else {
                return 0;
            }
        }

        @Override
        public boolean isLeaf(Object node) {
            return ( node instanceof String[] ) || getChildCount(node)==0;
        }

        @Override
        public void valueForPathChanged(TreePath path, Object newValue) {
            
        }

        @Override
        public int getIndexOfChild(Object parent, Object child) {
            for ( int i=0; i<getChildCount(parent); i++ ) {
                if ( getChild(parent,i)==child ) {
                    return i;
                }
            }
            return -1;
        }

        @Override
        public void addTreeModelListener(TreeModelListener l) {
            
        }

        @Override
        public void removeTreeModelListener(TreeModelListener l) {
            
        }

    }

    protected JTree getTree() {
        return this.jTree1;
    }


    /** This method is called from within the constructor to
     * initialize the form.
     * WARNING: Do NOT modify this code. The content of this method is
     * always regenerated by the Form Editor.
     */
    @SuppressWarnings("unchecked")
    // <editor-fold defaultstate="collapsed" desc="Generated Code">//GEN-BEGIN:initComponents
    private void initComponents() {

        jScrollPane1 = new javax.swing.JScrollPane();
        jTree1 = new javax.swing.JTree();

        jTree1.setRootVisible(false);
        jScrollPane1.setViewportView(jTree1);

        org.jdesktop.layout.GroupLayout layout = new org.jdesktop.layout.GroupLayout(this);
        this.setLayout(layout);
        layout.setHorizontalGroup(
            layout.createParallelGroup(org.jdesktop.layout.GroupLayout.LEADING)
            .add(jScrollPane1, org.jdesktop.layout.GroupLayout.DEFAULT_SIZE, 400, Short.MAX_VALUE)
        );
        layout.setVerticalGroup(
            layout.createParallelGroup(org.jdesktop.layout.GroupLayout.LEADING)
            .add(jScrollPane1, org.jdesktop.layout.GroupLayout.DEFAULT_SIZE, 300, Short.MAX_VALUE)
        );
    }// </editor-fold>//GEN-END:initComponents


    // Variables declaration - do not modify//GEN-BEGIN:variables
    private javax.swing.JScrollPane jScrollPane1;
    private javax.swing.JTree jTree1;
    // End of variables declaration//GEN-END:variables

}