src/Tools/GraphBrowser/graphbrowser/TreeNode.java
author wenzelm
Fri, 16 Jul 2021 12:55:02 +0200
changeset 74015 12b1f4649ab1
parent 74014 src/Tools/GraphBrowser/GraphBrowser/TreeNode.java@3b8b1da2ff29
permissions -rw-r--r--
clarified names;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     1
/***************************************************************************
74015
12b1f4649ab1 clarified names;
wenzelm
parents: 74014
diff changeset
     2
  Title:      graphbrowser/TreeNode.java
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     3
  Author:     Stefan Berghofer, TU Muenchen
50473
ca4088bf8365 added speculative options for jEdit;
wenzelm
parents: 33686
diff changeset
     4
  Options:    :tabSize=4:
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     5
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     6
  This class contains methods for storing and manipulating directory
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     7
  trees (e.g. collapsing / uncollapsing directory branches).
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     8
***************************************************************************/
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     9
74015
12b1f4649ab1 clarified names;
wenzelm
parents: 74014
diff changeset
    10
package isabelle.graphbrowser;
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    11
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    12
import java.awt.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    13
import java.util.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    14
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
public class TreeNode
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    17
{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    18
	int starty,endy,number;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    19
	String name,path;
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
	Vector leaves=new Vector(10,10);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    22
	boolean unfold=false;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    23
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    24
	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
    25
		if (d.length()==0) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    26
			leaves.addElement(new TreeNode(n,p,num));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    27
			unfold=unfold||u;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    28
		} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    29
			unfold=unfold||u;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    30
			String str1,str2;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    31
			if (d.indexOf('/')<0) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    32
				str1=d;str2="";
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    33
			} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    34
				str1=d.substring(0,d.indexOf('/'));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    35
				str2=d.substring(d.indexOf('/')+1);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    36
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    37
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    38
			Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    39
			TreeNode nd=null;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    40
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    41
			while (e1.hasMoreElements()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    42
				TreeNode nd2=(TreeNode)(e1.nextElement());
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    43
				if (nd2.name.equals(str1)) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    44
					nd=nd2;break;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    45
				}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    46
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    47
			if (nd==null) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    48
				nd=new TreeNode(str1,"",-1);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    49
				leaves.addElement(nd);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    50
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    51
			nd.insertNode(n,str2,p,num,u);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    52
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    53
	}
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
	public TreeNode(String n,String p,int num) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    56
		name=n;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    57
		path=p;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    58
		number=num;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    59
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    60
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    61
	public TreeNode(String n,String p,int num,boolean u) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    62
		this(n,p,num);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    63
		unfold=u;
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    66
	public int getNumber() { return number; }
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    67
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    68
	public TreeNode lookup(int y)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    69
	{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    70
		if (y>=starty && y<endy) return this;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    71
		else
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    72
		if (unfold)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    73
			for (int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    74
			{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    75
				TreeNode t=((TreeNode)leaves.elementAt(i)).lookup(y);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    76
				if (t!=null) return t;
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
		return null;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    79
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    80
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    81
	public boolean select()
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
		if (!leaves.isEmpty()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    84
			if (unfold) collapse();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    85
			else unfold=true;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    86
			return true;
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
		return false; 
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    89
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    90
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    91
	public void collapse()
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
		unfold=false;
74014
3b8b1da2ff29 tuned --- fewer warnings;
wenzelm
parents: 74011
diff changeset
    94
		/*Integer.valueOf
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    95
		for(int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    96
			((Tree)leaves.elementAt(i)).collapse();
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   100
	void collapsedNodes(Vector v) {
74014
3b8b1da2ff29 tuned --- fewer warnings;
wenzelm
parents: 74011
diff changeset
   101
		if (number>=0) v.addElement(Integer.valueOf(number));
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   102
		Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   103
		while (e1.hasMoreElements())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   104
			((TreeNode)(e1.nextElement())).collapsedNodes(v);
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   107
	public void collapsedDirectories(Vector v) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   108
		if (!unfold) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   109
			Vector v2=new Vector(10,10);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   110
			v.addElement(new Directory(this,name,v2));
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   111
			collapsedNodes(v2);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   112
		} else {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   113
			Enumeration e1=leaves.elements();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   114
			while (e1.hasMoreElements()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   115
				TreeNode tn=(TreeNode)(e1.nextElement());
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   116
				if (!tn.leaves.isEmpty())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   117
					tn.collapsedDirectories(v);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   118
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   119
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   120
	}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   121
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   122
	public Dimension draw(Graphics g,int x,int y,TreeNode t)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   123
	{
11873
38dc46b55d7e Moved font settings from TreeNode to TreeBrowser.
berghofe
parents: 9407
diff changeset
   124
		FontMetrics fm=g.getFontMetrics(g.getFont());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   125
		int h=fm.getHeight();
9407
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   126
		int e=(int) (h / 10) + 1;
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   127
		int down_x[]={x + e, x + h - e, x + (int)(h / 2)};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   128
		int down_y[]={y + e, y + e, y + (int)(3 * h / 4) - e};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   129
		int right_x[]={x + e, x + (int)(3 * h / 4) - e, x + e};
e8f6d918fde9 renamed "Directories" to "Sessions";
wenzelm
parents: 6657
diff changeset
   130
		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
   131
		int dx=0;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   132
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   133
		if (unfold)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   134
		{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   135
			g.setColor(Color.green);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   136
			g.fillPolygon(down_x,down_y,3);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   137
			g.setColor(Color.black);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   138
			g.drawString(name,x+h+4,y+fm.getAscent());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   139
			starty=y;endy=y+h;
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   140
			dx=Math.max(dx,x+h+4+fm.stringWidth(name));
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   141
			y+=h+5;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   142
			for(int i=0;i<leaves.size();i++)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   143
			{
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   144
				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
   145
				y=d.height;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   146
				dx=Math.max(dx,d.width);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   147
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   148
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   149
		else
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
			g.setColor(leaves.isEmpty() ? Color.blue : Color.red);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   152
			g.fillPolygon(right_x,right_y,3);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   153
			if (this==t && leaves.isEmpty())
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   154
			{
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   155
				g.setColor(Color.white);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   156
				g.fillRect(x+h+4,y,fm.stringWidth(name),h);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   157
			}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   158
			g.setColor(Color.black);
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   159
			g.drawString(name,x+h+4,y+fm.getAscent());
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   160
			starty=y;endy=y+h;
6657
9627197bd9e1 tuned arrows;
wenzelm
parents: 6541
diff changeset
   161
			dx=Math.max(dx,x+h+4+fm.stringWidth(name));
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   162
			y+=h+5;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   163
		}
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   164
		return new Dimension(dx,y);
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   168