/*
Copyright 2000 by Ralph Hartley
This software is licenced under the terms of the
Gnu Public Licence
*/
import java.util.*;
import java.awt.*;
import java.awt.geom.*;
import javax.swing.*;

public class Comp extends Symbol implements Editable,Region,Modable {

  private static final long serialVersionUID = Version.getSUID();

  public static int TOP = 0;
  public static int BOTTOM = 1;
  public static int ABOVE = 2;
  public static int BELOW = 3;

  Vector members = new Vector();
  boolean survey = false;
  boolean isVertical = false;

  boolean showall = true;
  Layer visible = Layer.all;
  Layer showin = Layer.none;
  Layer showout = Layer.none;
//  Layer showmodify = (Layer)Layer.lookup(Layer.class,Curve.class.toString());

  public Map regions = new HashMap();

  public Stacking stack = new Stacking();

  public static Color defbackground = Color.WHITE;

  public static Color passagecolor = Color.BLUE;
  public static Color passagelinkcolor = Color.BLUE;
  public static Color alignercolor = Color.RED;
  public static Color alignlinkcolor = Color.PINK;

  Color background = defbackground;
  Fill fill = null;

//  transient Rectangle2D bounds = null;

//  transient CompPane curpane =null;
//  transient public boolean dirty = false;

  public Comp(Point2D pos,View view,Object arg) {
    this();
  }

  public Comp() {
    members = new Vector();
  }

  public Comp(String name,Survey survey,boolean isVertical) {
    super(name);
    this.isVertical = isVertical;
    if (survey!=null) {
      add(survey);
      this.survey = true;
    }
    else this.survey = false;

    showin = (Layer)Layer.lookup(Layer.class,"In");
    showout = (Layer)Layer.lookup(Layer.class,"Out");
  }

  public Symbol importSym(Carto dest,Carto source) {

    bounds = null;

    if (survey && dest.survey==null) dest.survey = source.survey;

    if (source.complist.contains(this))
      dest.complist.add(this);

    Vector newmembers = new Vector();
    for (Iterator it = members.iterator();it.hasNext();)
      newmembers.add(((Symbol)it.next()).importSym(dest,source));
    
    members = newmembers;
    
    return(this);
  }

  public void clean(Vector segments) {
    HashSet seen = new HashSet();
    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol item = (Symbol) it.next();
      if (item instanceof Curve && ((Curve)item).points.size()==0) it.remove();
      else if (item instanceof Segment) {
        if ((!segments.contains(item))||(seen.contains(item))) it.remove();
        else seen.add(item);
      }
      else if ((item instanceof Text) && ((Text)item).contents.length()==0) it.remove(); 
      // I have seen corruption like this, I don't know if the bug that produced it still exists.
      else if ((item instanceof Sub) &&
               (((Sub)item).anchorpoint.position==null ||
        	Double.isNaN(((Sub)item).anchorpoint.position.getScaleX())))
        it.remove();
//        System.out.println("item = "+item+" anchor = "+((Sub)item).anchorpoint.position);
    }
  }

  /**
   * Prepare all members for survey update.
   */
  public void prepareForSurveyUpdate(java.util.List segments) {
    if (name.compareTo("drywater")==0) { System.out.println("Comp prep");
//    new Throwable().printStackTrace();
}

    java.util.List segs = new ArrayList();
    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol item = (Symbol)it.next();
      if (item instanceof Segment)
        segs.add(item);
    }
//    System.out.println("comp items prep segs = "+segs);

    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol sym = (Symbol)it.next();
      // If it is a Comp it gets done from Carto.prepareForSurveyUpdate()
      if (! (sym instanceof Comp)) sym.prepareForSurveyUpdate(segs);
    }
  }

  /**
   * Tell all members to use a survey update that just happened.
   */
  public void useSurveyUpdate() {
    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol sym = (Symbol)it.next();
      // If it is a Comp it gets done from Carto.useSurveyUpdate()
      if (! (sym instanceof Comp)) sym.useSurveyUpdate();
    }
    bounds = null;
  }

  public Set getPages() {
    Set res = new HashSet();
    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol item = (Symbol)it.next();
      if (item instanceof Page) res.add(item);
    }
    return(res);
  }
 
  public int getLevel() {return(super.getLevel()+2);}

  transient ColorBox colorbox = null;
  transient JCheckBox viewall = null;
  transient JComboBox showbox = null;
  transient JComboBox showinbox = null;
  transient JComboBox showoutbox = null;

//  transient JComboBox modbox = null;

  public void getPropertyEdit(Object[] edits,int slot,Set sub,Symbol parent) {
    Container res = new javax.swing.Box(BoxLayout.Y_AXIS);

    edits[slot] = res;
    res.setName("Plan");
    viewall = new JCheckBox(CompEditor.VIEWALL);
    viewall.setSelected(showall);
    res.add(viewall);

    showbox = new JComboBox(Layer.getAll(Layer.class));
    showbox.setSelectedItem(visible);
    Container row = new javax.swing.Box(BoxLayout.X_AXIS);
    row.add(new JLabel("Filter Visible"));
    row.add(showbox);
    res.add(row);

    showinbox = new JComboBox(Layer.getAll(Layer.class));
    showinbox.setSelectedItem(showin);
    row = new javax.swing.Box(BoxLayout.X_AXIS);
    row.add(new JLabel("Filter In"));
    row.add(showinbox);
    res.add(row);

    showoutbox = new JComboBox(Layer.getAll(Layer.class));
    showoutbox.setSelectedItem(showout);
    row = new javax.swing.Box(BoxLayout.X_AXIS);
    row.add(new JLabel("Filter Out"));
    row.add(showoutbox);
    res.add(row);


//    res.add(new JCheckBox("survey",survey));
    res.add(new JLabel("background colors (below) not implemented yet"));
    res.add(colorbox = new ColorBox(background,"Background"));

    if (stack==null) stack = new Stacking();
    res = stack.getPane(this);

    edits[slot-1] = res;
    res.setName("Stacking");

    super.getPropertyEdit(edits,slot-2,sub,parent);
  }

  public void acceptPropertyEdit() {
    if (colorbox!=null) {
      background = colorbox.color;

      showall = viewall.isSelected();
      viewall = null;

      visible = (Layer)showbox.getSelectedItem();
      showbox = null;

      showin = (Layer)showinbox.getSelectedItem();
      showinbox = null;

      showout = (Layer)showoutbox.getSelectedItem();
      showoutbox = null;

      stack.save();
      stack.clear();

//      showmodify = (Layer)modbox.getSelectedItem();
//      modbox = null;

      if (background == null) background = Color.WHITE;
      namefield = null;
    }
    super.acceptPropertyEdit();
  }

  public void abandonPropertyEdit() {
    colorbox = null;
    viewall = null;
    showbox = null;
    showinbox = null;
    showoutbox = null;
    stack.clear();
//    modbox = null;
    super.abandonPropertyEdit();
  }

  public Vector sortSet(Set s) {
    Vector res = new Vector();
    for (Iterator it = members.iterator();it.hasNext();) {
      Symbol item = (Symbol)it.next();
      if (s.contains(item)) res.add(item);
    }
    return(res);
  }

  public Editor getEditor(CartoFrame frame) {
    return(new CompEditor(this,frame));
  }

  public Area getIn(View view) {
    Area res = new Area();

    for (Iterator it = members.iterator(); it.hasNext();) {
      Symbol item = (Symbol)it.next();

      if (item instanceof Region) {
        Integer flag = (Integer)regions.get(item);

        if (flag!=null) {

          if (flag.intValue() == IN){
            res.add(((Region)item).getIn(view));
          }

          else if (flag.intValue() == OUT) {
            res.subtract(((Region)item).getIn(view));
          }
        }
      }
    }

    return(res);
  }

  transient Rectangle2D bounds = null;

  public Rectangle2D getApproxBounds(AffineTransform trans) {
    if (bounds==null)
      bounds = getBounds(new AffineTransform());
    return (trans.createTransformedShape(bounds).getBounds2D());
  }

  public Rectangle2D getBounds(AffineTransform trans) {

    if (regions != null && regions.size()!=0) {
      Rectangle2D res = null;
      for (Iterator it = regions.keySet().iterator(); it.hasNext();) {
        if (res == null) res = ((Symbol)it.next()).getBounds(trans);
        else res.add(((Symbol)it.next()).getBounds(trans));
      }
//      bounds = res;
      return(res);
    }

    if (members.size()==0) return(new Rectangle2D.Double(0.5,0.5,1.0,1.0));
    Rectangle2D res = null;
    Symbol item = null;
    Rectangle2D newrect = null;
    for (Iterator it = members.iterator();it.hasNext();) {
      item = (Symbol)it.next();
      if (item==null) {
        it.remove();
        continue;
      }
      newrect = item.getBounds(trans);
/*      if ((item instanceof Segment) &&// (!Segment.removeunmorphed) &&
//          !(Segment.cookinprogress) &&
          !((Segment)item).cooking &&
          !((Segment)item).isCooked() &&
          Segment.removeunmorphed &&
          JOptionPane.YES_OPTION == 
          JOptionPane.showConfirmDialog(null,
        				"Remove unmorphed segment "+item.name+
        				" from composite "+name+"?",
        				"Unmorphed",
        				JOptionPane.YES_NO_OPTION))
        it.remove();
*/
      if (res==null) res = newrect;
      else if (newrect!=null) res.add(newrect);
    }
    if (res==null) return(new Rectangle2D.Double(0.5,0.5,1.0,1.0));

//    bounds = res;
    return(res);
  }

  public Collection getSelectable(){
    return(members);
  }

  public boolean recursiveDelete(Symbol old){
    bounds = null;
    for (Iterator it=members.iterator();it.hasNext();) {
      Symbol member = (Symbol)it.next();
      if (member==old || member.recursiveDelete(old))
        it.remove();
    }
    return(members.size()==0);
  }

  public Class addType() {
    return(Symbol.class);
  }

  public void add(Symbol newmember,View v) {
    bounds = null;
    if (newmember==null) throw new NullPointerException("Attempt to add null to a Comp");
    members.add(newmember);
  }

  public void add(Symbol newmember) {
    bounds = null;
    members.add(newmember);
  }

  public void delete(Symbol oldmember) {
    bounds = null;
    members.remove(oldmember);
  }

  public void add(Symbol newmember, int level) {
    add(newmember,level,null);
  }

  public void add(Symbol newmember, int level,Set relativeset) {
    bounds = null;
    int place;
    if (relativeset==null && level==ABOVE) level=TOP;
    if (relativeset==null && level==BELOW) level=BOTTOM;
    if (level==BOTTOM || level == ABOVE) place = 0;
    else place = members.size();
    if (relativeset!=null)
      for (Iterator it = relativeset.iterator();it.hasNext();) {
        int i = members.indexOf(it.next());
        if (level == BELOW && i>place) i = place;
        else if (level == ABOVE && i<=place) place = i + 1;
      }
    members.add(place,newmember);
  }

  public Glyph group(Set parts) {
    return(null);
/*
    if (parts.size()==0) return(null);

    Glyph whole = new Glyph();
    boolean added = false;

    for (int i = 0;i<members.size();i++) {
      Symbol symb = (Symbol) it.elementAt(i);

      if (parts.contains(symb)) {
        members.remove(i);
        if (!added) members.add(i,whole);
        whole.contents.add(symb);
      }
    }

    whole.findCenter();
    return(whole);
*/
  }

  public Set unGroup(Glyph whole) {
    return(null);
/*
    Set parts = whole.transformedMembers();;
    int place = members.indexOf(whole);
    members.remove(whole);
    for (Iterator it = parts.iterator;it.hasNext();) {
      members.add(place++,it.next());
    }
    return(parts);
*/
  }

  public void change_level(Set targets,int level) {
    int dir;
    int i,j;
    Object temp;

    if (level == TOP || level == ABOVE) {
      i = members.size() - 1;
      dir = -1;
    }
    else {
      i = 0;
      dir = 1;
    }

    for (;i>=0 && i<members.size() && targets.contains(members.elementAt(i));i+=dir);
    j = i;

    for (;i>=0 && i<members.size();i+=dir)
      if (targets.contains(members.elementAt(i))) {
        if (level == ABOVE || level == BELOW) j = i - dir;
        temp = members.elementAt(i);
        members.remove(i);
        members.add(j,temp);
        j += dir;
      }
  }
  
  public boolean selectProbe(Point2D pos,View view){
    Rectangle2D rect = getBounds(new java.awt.geom.AffineTransform());
    double BOXSIZE = Size.handle.getSize(view.mapscale);

    if (pos.distance(rect.getX(),rect.getY())<BOXSIZE/view.scale) return(true);
    if (pos.distance(rect.getX()+rect.getWidth(),rect.getY())<BOXSIZE/view.scale) return(true);
    if (pos.distance(rect.getX(),rect.getY()+rect.getHeight())<BOXSIZE/view.scale) return(true);
    if (pos.distance(rect.getX()+rect.getWidth(),rect.getY()+rect.getHeight())<BOXSIZE/view.scale) return(true);
//    if (pos.distance(rect.getX(),rect.getY())<BOXSIZE/view.scale) return(true);
//    if (pos.distance(rect.getX()+rect.getWidth(),rect.getY())<BOXSIZE/view.scale) return(true);
//    if (pos.distance(rect.getX(),rect.getY()+rect.getHeight())<BOXSIZE/view.scale) return(true);
//    if (pos.distance(rect.getX()+rect.getWidth(),rect.getY()+rect.getHeight())<BOXSIZE/view.scale) return(true);

    return(false);
  }

  public void showSelected(View view) {
    int BOXSIZE = (int)Size.handle.getSize(view.mapscale);
    Rectangle2D rect = getBounds(view.trans);
    view.draw.draw(rect);
    view.draw.drawRect((int)rect.getX()                     -BOXSIZE,(int)rect.getY()                      -BOXSIZE,
        	       2*BOXSIZE,2*BOXSIZE);
    view.draw.drawRect((int)rect.getX()+(int)rect.getWidth()-BOXSIZE,(int)rect.getY()                      -BOXSIZE,
        	       2*BOXSIZE,2*BOXSIZE);
    view.draw.drawRect((int)rect.getX()                     -BOXSIZE,(int)rect.getY()+(int)rect.getHeight()-BOXSIZE,
        	       2*BOXSIZE,2*BOXSIZE);
    view.draw.drawRect((int)rect.getX()+(int)rect.getWidth()-BOXSIZE,(int)rect.getY()+(int)rect.getHeight()-BOXSIZE,
        	       2*BOXSIZE,2*BOXSIZE);
  }

  public Survey getSurvey() {
    for (Iterator it = members.iterator(); it.hasNext();) {
      Symbol sym = (Symbol)it.next();
      if (sym instanceof Survey) return((Survey)sym);
    }
    return(new Survey());
  }

  public void paint(View baseview) {
    if (!baseview.visible.isMember(this)) return;

    if (!getApproxBounds(baseview.trans).intersects(baseview.getClipBounds())) return;

    int n = members.size();

    Comp oldcomp = baseview.composite;
    baseview.composite = this;

    Area in = null;
    Area out = null;

    View inview = null;
    View outview = null;

    if (!baseview.showall &&
        regions!=null && regions.size()>0 &&
        ((showin!=null && showin!=Layer.none) ||
         (showout!=null && showout!=Layer.none))) {
      in = getIn(baseview);
      if (in!=null) {
        inview = (View)baseview.clone();
        inview.intersectClip(in);
      }

      out = new Area(baseview.getClip());
      out.subtract(in);
      if (in!=null) {
        outview = (View)baseview.clone();
        outview.intersectClip(out);
      }
    }

    for (int i=0;i<n;i++) {
      Symbol sym = (Symbol)members.elementAt(i);

      if (sym instanceof Survey) continue;

      View view = baseview;

      if (regions!=null && !regions.containsKey(sym)) {

        if (outview!=null && !showin.isMember(sym))
          view = outview;
        
        if (inview!=null && !showout.isMember(sym))
          view = inview;
      }

      Shape clip = view.getClip();

      if (view.stacking!=null) {
        view.stacking.getOverUnder(sym,view);
        Area over = view.stacking.over;
        Area under = view.stacking.under;
        Area hide = view.stacking.hide;

        if (over!=null || under!=null || hide!=null) {
          Area natclip = new Area(view.getClip());

          if (hide != null) {
            natclip.subtract(hide);
            view.setClip(natclip);
          }

          if (over!=null) {
            if (sym instanceof Modable) {
              int modsave = view.mod;
              view.mod = Stacking.OVER;
              view.intersectClip(over);
              sym.paint(view);
              view.mod = modsave;
            }
            natclip.subtract(over);
            view.setClip(natclip);
          }

          if (under!=null) {
            if (sym instanceof Modable) {
              int modsave = view.mod;
              view.mod = Stacking.UNDER;
              view.intersectClip(under);
              sym.paint(view);
              view.mod = modsave;
            }
            natclip.subtract(under);
            view.setClip(natclip);
          }
        }
      }
      if (view.mod == 0 || sym instanceof Modable) sym.paint(view);
      
      view.setClip(clip);
    }

    if (inview!=null) inview.draw.dispose();
    if (outview!=null) outview.draw.dispose();

    baseview.composite = oldcomp;
    oldcomp=null;    
  }

  public boolean stripSurveys() {
    survey = false;

    for (Iterator it =members.iterator();it.hasNext();) {
      Symbol cur = (Symbol)it.next();
      if (cur instanceof Survey) it.remove();
      else if (!cur.stripSurveys()) it.remove();
    }

    return(members.size()>0);
  }

  private void readObject(java.io.ObjectInputStream stream)
      throws java.io.IOException,java.lang.ClassNotFoundException {
    stream.defaultReadObject();
    if (visible == null) {
      visible = Layer.all;
      showall = true;
    }
    if (background == null) background = Color.WHITE;
//    if (passpriority==null)
//      passpriority = new HashMap();
  }
//  public boolean isDirty() {return(dirty);}
}