/*
 *
 * created: Wed Aug 3 2004
 *
 * This file is part of Artemis
 *
 * Copyright(C) 2000  Genome Research Limited
 *
 * 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.
 *
 */

package uk.ac.sanger.artemis.editor;

import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
import java.util.Vector;
import java.util.Enumeration;

public class DBViewer extends ScrollPanel
                      implements FastaListener
{
  /** */
  private static final long serialVersionUID = 1L;
  /** collection of hits */
  private Vector hitInfoCollection = null;
  /** query length */
  private int qlen;
  /** viewer boundary */
  private int bound = 10;
  /** y displacement for each hit */
  private int ydisp = 5;
  /** maximum hit score */
  private float max_score = 0;
  /** colour the hits by score or by evalue */
  private boolean colourByScore = false;
  /** popup menu */
  private JPopupMenu popup;
  /** scroll bar this panel sits in */ 
  private JScrollPane jsp;
  /** initial scale */
  private float scale = 1.f;
  /** blast/fasta results text view */
  private FastaTextPane fastaTextPane;
  /** ruler */
  private JPanel ruler;
 
  /**
  *
  * Database results graphical viewer.
  * @param fastaTextPane	fasta/blast parser
  * @param jsp			scroll pane to add this object to
  *
  */
  public DBViewer(FastaTextPane fastaTextPane, final JScrollPane jsp)
  {
    super();

    this.jsp = jsp;
    this.fastaTextPane = fastaTextPane;

    hitInfoCollection = fastaTextPane.getHitCollection();
    qlen = fastaTextPane.getQueryLength();
    
    Dimension dsize = new Dimension(500, (hitInfoCollection.size()*ydisp)+(6*bound));
    setPreferredSize(dsize);
    setToolTipText("");   //enable tooltip display

    Enumeration enumHits = hitInfoCollection.elements();
    while(enumHits.hasMoreElements())
    {
      HitInfo hit = (HitInfo)enumHits.nextElement();
      float score = Float.parseFloat(hit.getScore());
      if(score > max_score)
        max_score = score;
    }

    // Popup menu
    addMouseListener(new PopupListener());
    popup = new JPopupMenu();
    getOptionsMenu(popup);
  }

  public void update()
  {
    hitInfoCollection = fastaTextPane.getHitCollection();
    qlen = fastaTextPane.getQueryLength();
    Dimension d = new Dimension(500,
                               (hitInfoCollection.size()*ydisp)+(6*bound));
    setPreferredSize(d);

    Enumeration enumHits = hitInfoCollection.elements();
    while(enumHits.hasMoreElements())
    {
      HitInfo hit = (HitInfo)enumHits.nextElement();
      float score = Float.parseFloat(hit.getScore());
      if(score > max_score)
        max_score = score;
    }
    jsp.setViewportView(this);
  }

  protected JMenu getFileMenu(final JInternalFrame jif)
  {
    JMenu fileMenu = new JMenu("File");

    JMenuItem exitMenu = new JMenuItem("Close");
    exitMenu.addActionListener(new ActionListener()
    {
      public void actionPerformed(ActionEvent e)
      {
        jif.dispose();
      }
    });
    fileMenu.add(exitMenu);
    return fileMenu;  
  }

  protected void getOptionsMenu(JComponent menuOptions)
  {
    JMenuItem zoomInMenu = new JMenuItem("Zoom In");
    zoomInMenu.setAccelerator(KeyStroke.getKeyStroke('I',
        Toolkit.getDefaultToolkit().getMenuShortcutKeyMask(), false));
    zoomInMenu.addActionListener(new ActionListener()
    {
      public void actionPerformed(ActionEvent e)
      {
        setZoom(1.1f);
      }
    });
    menuOptions.add(zoomInMenu);

    JMenuItem zoomOutMenu = new JMenuItem("Zoom Out");
    zoomOutMenu.setAccelerator(KeyStroke.getKeyStroke('O',
        Toolkit.getDefaultToolkit().getMenuShortcutKeyMask(), false));
    zoomOutMenu.addActionListener(new ActionListener()
    {
      public void actionPerformed(ActionEvent e)
      {
        setZoom(0.9f);
      }
    });
    menuOptions.add(zoomOutMenu);

    menuOptions.add(new JSeparator());

    JRadioButtonMenuItem colourScore = new JRadioButtonMenuItem("Colour by Score");
    colourScore.addActionListener(new ActionListener()
    {
      public void actionPerformed(ActionEvent e)
      {
        setColourByScore(true);
      }
    });
    menuOptions.add(colourScore);

    JRadioButtonMenuItem colourEval  = new JRadioButtonMenuItem("Colour by E-value");
    colourEval.setSelected(true);
    colourEval.addActionListener(new ActionListener()
    {
      public void actionPerformed(ActionEvent e)
      {
        setColourByScore(false);
      }
    });
    menuOptions.add(colourEval);

    ButtonGroup butt = new ButtonGroup();
    butt.add(colourScore);
    butt.add(colourEval);
  }


  /**
  *
  * Set the scale to zoom in/out by.
  * @param scale 	scale to zoom in/out by.
  *
  */
  protected void setZoom(float new_scale)
  {
    scale = scale*new_scale;
    Dimension d  = getPreferredSize();
    double width = d.getWidth()*new_scale;
    d = new Dimension((int)width,(int)d.getHeight());
    setPreferredSize(d);
    ruler.setPreferredSize(new Dimension((int)width,25));
    ruler.repaint();
    jsp.setViewportView(this);
  }


  /**
  *
  * Get the ruler
  *
  */
  protected JPanel getRuler()
  {
    ruler = new JPanel()
    {
      /** */
      private static final long serialVersionUID = 1L;

      public void paintComponent(Graphics g)
      {
        super.paintComponent(g);
        Font font = new Font("monospaced",Font.PLAIN,10);
        g.setFont(font);
        FontMetrics metrics = g.getFontMetrics();
        int hgtNumber = metrics.getAscent();

        Graphics2D g2   = (Graphics2D)g;
        int resultwidth = (int)getPreferredSize().getWidth()-(2*bound);
        g2.setColor(Color.black);
        g2.setStroke(new BasicStroke(3.f));
        g2.drawLine(bound,bound+hgtNumber,bound+resultwidth,bound+hgtNumber);

// draw ruler
        g2.setStroke(new BasicStroke(2.f));
        g2.drawLine(bound,bound+hgtNumber,bound,bound+hgtNumber-6);
        g2.drawString("0",bound,hgtNumber+3);

        //Point viewPos    = jsp.getViewport().getViewPosition();
        //Dimension extent = jsp.getViewport().getExtentSize();

        int npoints   = (int)(scale*10);
        int unit      = (int)(resultwidth/npoints);
        int blastUnit = qlen/npoints;

        for(int i=1; i<npoints; i++)
        {    
          String strPos = Integer.toString(i*blastUnit);
          int strwid = metrics.stringWidth(strPos);

          g2.drawLine(bound+(unit*i), bound+hgtNumber,
                      bound+(unit*i), bound+hgtNumber-6);
          g2.drawString(strPos,bound+(unit*i)-strwid,hgtNumber+3);
        }

        String strQlen = Integer.toString(qlen);
        int strwid = metrics.stringWidth(strQlen);

        g2.drawLine(bound+resultwidth,bound+hgtNumber,
                    bound+resultwidth,bound+hgtNumber-6);
        g2.drawString(strQlen,bound+resultwidth-strwid,hgtNumber+3);
      }
    };
    ruler.setPreferredSize(new Dimension(getPreferredSize().width,25));
    return ruler;
  }


  /**
  *
  * Override paintComponent
  * @param g    graphics
  *
  */
  public void paintComponent(Graphics g)
  {
// let UI delegate paint first (incl. background filling)
    super.paintComponent(g);
 
    Font font = new Font("monospaced",Font.PLAIN,10);
    g.setFont(font);
    //FontMetrics metrics = g.getFontMetrics();

    Graphics2D g2   = (Graphics2D)g;
    int resultwidth = (int)getPreferredSize().getWidth()-(2*bound);
    g2.setColor(Color.black);
    g2.setStroke(new BasicStroke(1.f));

// draw hits
    int ypos = 0;
    float hit_unit = (float)resultwidth/(float)qlen;
    Enumeration enumHits = hitInfoCollection.elements();
    while(enumHits.hasMoreElements())
    {
      HitInfo hit = (HitInfo)enumHits.nextElement();
 
      if(colourByScore)
      {
        float score = Float.parseFloat(hit.getScore());
        if(score > max_score/2)
          g2.setColor(Color.red);
        else if(score > max_score/4)
          g2.setColor(Color.blue);
        else
          g2.setColor(Color.cyan);
      }
      else
      {
        Double evalue = new Double(hit.getEValue());

        if(evalue.compareTo(new Double("0.005")) < 0)
          g2.setColor(Color.red);
        else if(evalue.compareTo(new Double("0.0")) < 0)
          g2.setColor(Color.blue);
        else
          g2.setColor(Color.cyan);
      }

//    g2.setStroke(new BasicStroke(1.f));
//    float hit_unit = (float)resultwidth/(float)qlen;    

      Vector queryPosition = hit.getQueryPosition();
       
      if(queryPosition.size() == 0)
        continue;

      for(int i=0; i<queryPosition.size(); i+=2)
      {
        int start = (int)(bound+(hit_unit*((Integer)queryPosition.elementAt(i)).intValue()));
        int end   = (int)(bound+(hit_unit*((Integer)queryPosition.elementAt(i+1)).intValue()));
        g2.drawLine(start,bound+ypos,end,bound+ypos);
      }

      ypos += ydisp;
//    System.out.println(hit.getID()+" "+hit.getQueryStart()+" -> "+hit.getQueryEnd()+
//                       " start "+start+" end "+end+" resultwidth "+resultwidth);
//                       ", E = "+hit.getEValue()+"  Length = "+hit.getQueryLength());
    }
  
  }


  protected void setColourByScore(boolean colourByScore)
  {
    this.colourByScore = colourByScore;
    repaint();
  }
  

  /**
  *
  * Popup menu listener
  *
  */
  class PopupListener extends MouseAdapter
  {
    public void mousePressed(MouseEvent e)
    {
      if(e.isPopupTrigger())
        maybeShowPopup(e);
      else if(e.getClickCount() == 2)
      {
//      int seqPos = (int)((e.getY()-bound-ydisp-bound-ydisp-hgtNumber)/ydisp);
        int seqPos = (int)((e.getY()-bound)/ydisp);
        HitInfo hit = (HitInfo)hitInfoCollection.get(seqPos);
        fastaTextPane.show(hit);
      }
    }

    public void mouseReleased(MouseEvent e)
    {
      maybeShowPopup(e);
    }

    private void maybeShowPopup(MouseEvent e)
    {
      if(e.isPopupTrigger())
        popup.show(e.getComponent(),
                e.getX(), e.getY());
    }
  }


  /**
  *
  * Determine the tool tip to display
  * @param e    mouse event
  * @return     tool tip
  *
  */
  public String getToolTipText(MouseEvent e)
  {
    Point loc = e.getPoint();
//  int seqPos = (int)((loc.y-bound-ydisp-bound-ydisp-hgtNumber)/ydisp);
    int seqPos = (int)((loc.y-bound)/ydisp);

    if(seqPos >= 0 && seqPos<hitInfoCollection.size())
    {
      HitInfo hit = (HitInfo)hitInfoCollection.get(seqPos);

      StringBuffer tip = new StringBuffer();
      tip.append(hit.getID()+"\n");
      if(hit.getOrganism() != null)
        tip.append(hit.getOrganism()+"\n");
      tip.append("E-value:"+hit.getEValue()+" Score:"+hit.getScore());

      return tip.toString();
    }
    return null;
  }


}