lib/browser/GraphBrowser/TreeNode.java
author oheimb
Wed, 03 Apr 2002 10:21:13 +0200
changeset 13076 70704dd48bd5
parent 11873 38dc46b55d7e
child 13973 9170772bf420
permissions -rw-r--r--
bugfix concerning claset(), added limited support for ALLGOALS + fast_tac etc.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     1
/***************************************************************************
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     2
  Title:      GraphBrowser/TreeNode.java
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     3
  ID:         $Id$
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     4
  Author:     Stefan Berghofer, TU Muenchen
11873
38dc46b55d7e Moved font settings from TreeNode to TreeBrowser.
berghofe
parents: 9407
diff changeset
     5
  License:    GPL (GNU GENERAL PUBLIC LICENSE)
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     6
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     7
  This class contains methods for storing and manipulating directory
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     8
  trees (e.g. collapsing / uncollapsing directory branches).
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     9
***************************************************************************/
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    10
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    11
package GraphBrowser;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    12
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    13
import java.awt.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    14
import java.util.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    15
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    16
class Directory {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    17
	TreeNode node;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    18
	String name;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    19
	Vector collapsed;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    20
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    21
	public Directory(TreeNode nd,String n,Vector col) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    22
		collapsed=col;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    23
		name=n;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    24
		node=nd;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    25
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    26
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    27
	public TreeNode getNode() { return node; }
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    28
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    29
	public String getName() { return name; }
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    30
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    31
	public Vector getCollapsed() { return collapsed; }
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    32
}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    33
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    34
public class TreeNode
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    35
{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    36
	int starty,endy,number;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    37
	String name,path;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    38
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    39
	Vector leaves=new Vector(10,10);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    40
	boolean unfold=false;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    41
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    42
	public void insertNode(String n,String d,String p,int num,boolean u) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    43
		if (d.length()==0) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    44
			leaves.addElement(new TreeNode(n,p,num));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    45
			unfold=unfold||u;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    46
		} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    47
			unfold=unfold||u;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    48
			String str1,str2;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    49
			if (d.indexOf('/')<0) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    50
				str1=d;str2="";
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    51
			} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    52
				str1=d.substring(0,d.indexOf('/'));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    53
				str2=d.substring(d.indexOf('/')+1);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    54
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    55
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    56
			Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    57
			TreeNode nd=null;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    58
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    59
			while (e1.hasMoreElements()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    60
				TreeNode nd2=(TreeNode)(e1.nextElement());
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    61
				if (nd2.name.equals(str1)) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    62
					nd=nd2;break;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    63
				}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    64
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    65
			if (nd==null) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    66
				nd=new TreeNode(str1,"",-1);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    67
				leaves.addElement(nd);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    68
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    69
			nd.insertNode(n,str2,p,num,u);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    70
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    71
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    72
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    73
	public TreeNode(String n,String p,int num) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    74
		name=n;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    75
		path=p;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    76
		number=num;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    77
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    78
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    79
	public TreeNode(String n,String p,int num,boolean u) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    80
		this(n,p,num);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    81
		unfold=u;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    82
	}	
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    83
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    84
	public int getNumber() { return number; }
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    85
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    86
	public TreeNode lookup(int y)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    87
	{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    88
		if (y>=starty && y<endy) return this;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    89
		else
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    90
		if (unfold)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    91
			for (int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    92
			{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    93
				TreeNode t=((TreeNode)leaves.elementAt(i)).lookup(y);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    94
				if (t!=null) return t;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    95
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    96
		return null;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    97
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    98
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    99
	public boolean select()
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   100
	{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   101
		if (!leaves.isEmpty()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   102
			if (unfold) collapse();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   103
			else unfold=true;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   104
			return true;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   105
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   106
		return false; 
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   107
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   108
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   109
	public void collapse()
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   110
	{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   111
		unfold=false;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   112
		/*
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   113
		for(int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   114
			((Tree)leaves.elementAt(i)).collapse();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   115
		*/
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   116
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   117
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   118
	void collapsedNodes(Vector v) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   119
		if (number>=0) v.addElement(new Integer(number));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   120
		Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   121
		while (e1.hasMoreElements())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   122
			((TreeNode)(e1.nextElement())).collapsedNodes(v);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   123
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   124
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   125
	public void collapsedDirectories(Vector v) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   126
		if (!unfold) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   127
			Vector v2=new Vector(10,10);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   128
			v.addElement(new Directory(this,name,v2));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   129
			collapsedNodes(v2);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   130
		} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   131
			Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   132
			while (e1.hasMoreElements()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   133
				TreeNode tn=(TreeNode)(e1.nextElement());
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   134
				if (!tn.leaves.isEmpty())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   135
					tn.collapsedDirectories(v);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   136
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   137
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   138
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   139
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   140
	public Dimension draw(Graphics g,int x,int y,TreeNode t)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   141
	{
11873
38dc46b55d7e Moved font settings from TreeNode to TreeBrowser.
berghofe
parents: 9407
diff changeset
   142
		FontMetrics fm=g.getFontMetrics(g.getFont());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   143
		int h=fm.getHeight();
9407
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   144
		int e=(int) (h / 10) + 1;
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   145
		int down_x[]={x + e, x + h - e, x + (int)(h / 2)};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   146
		int down_y[]={y + e, y + e, y + (int)(3 * h / 4) - e};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   147
		int right_x[]={x + e, x + (int)(3 * h / 4) - e, x + e};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   148
		int right_y[]={y + e, y + (int)(h / 2), y + h - e};
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   149
		int dx=0;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   150
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   151
		if (unfold)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   152
		{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   153
			g.setColor(Color.green);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   154
			g.fillPolygon(down_x,down_y,3);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   155
			g.setColor(Color.black);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   156
			g.drawString(name,x+h+4,y+fm.getAscent());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   157
			starty=y;endy=y+h;
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   158
			dx=Math.max(dx,x+h+4+fm.stringWidth(name));
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   159
			y+=h+5;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   160
			for(int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   161
			{
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   162
				Dimension d=((TreeNode)leaves.elementAt(i)).draw(g,x+h+4,y,t);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   163
				y=d.height;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   164
				dx=Math.max(dx,d.width);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   165
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   166
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   167
		else
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   168
		{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   169
			g.setColor(leaves.isEmpty() ? Color.blue : Color.red);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   170
			g.fillPolygon(right_x,right_y,3);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   171
			if (this==t && leaves.isEmpty())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   172
			{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   173
				g.setColor(Color.white);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   174
				g.fillRect(x+h+4,y,fm.stringWidth(name),h);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   175
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   176
			g.setColor(Color.black);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   177
			g.drawString(name,x+h+4,y+fm.getAscent());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   178
			starty=y;endy=y+h;
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   179
			dx=Math.max(dx,x+h+4+fm.stringWidth(name));
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   180
			y+=h+5;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   181
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   182
		return new Dimension(dx,y);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   183
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   184
}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   185
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   186