lib/browser/GraphBrowser/GraphBrowserFrame.java
author nipkow
Wed, 04 Mar 2009 10:47:20 +0100
changeset 30235 58d147683393
parent 14981 e73f8140af78
child 33686 8e33ca8832b1
permissions -rw-r--r--
Made Option a separate theory and renamed option_map to Option.map
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/GraphBrowserFrame.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
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 is the frame for the stand-alone application. It contains
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
     7
  methods for handling menubar events.
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    10
package GraphBrowser;
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.*;
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    13
import java.awt.event.*;
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    14
import java.io.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    15
import awtUtilities.*;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    16
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    17
public class GraphBrowserFrame extends Frame implements ActionListener {
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    18
	GraphBrowser gb;
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    19
	MenuItem i1, i2;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    20
	String graphDir, psDir;
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    21
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    22
	public void checkMenuItems() {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    23
		if (gb.isEmpty()) {
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    24
			i1.setEnabled(false);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    25
			i2.setEnabled(false);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    26
		} else {
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    27
			i1.setEnabled(true);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    28
			i2.setEnabled(true);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    29
		}
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
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    32
	public void actionPerformed(ActionEvent evt) {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    33
		String label = evt.getActionCommand();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    34
		if (label.equals("Quit"))
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    35
			System.exit(0);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    36
		else if (label.equals("Export to PostScript")) {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    37
			PS(true, label);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    38
			return;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    39
		} else if (label.equals("Export to EPS")) {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    40
			PS(false, label);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    41
			return;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    42
		} else if (label.equals("Open ...")) {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    43
			FileDialog fd = new FileDialog(this, "Open graph file", FileDialog.LOAD);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    44
			if (graphDir != null)
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    45
				fd.setDirectory(graphDir);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    46
			fd.setVisible(true);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    47
			if (fd.getFile() == null) return;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    48
			graphDir = fd.getDirectory();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    49
			String fname = graphDir + fd.getFile();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    50
			GraphBrowser gb2 = new GraphBrowser(fname);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    51
			try {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    52
				InputStream is = new FileInputStream(fname);
11875
5fcf6b6436af initBrowser now has additional noAWT argument.
berghofe
parents: 6541
diff changeset
    53
				gb2.initBrowser(is, false);
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    54
				is.close();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    55
			} catch (IOException exn) {
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    56
				String button[] = {"OK"};
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    57
				MessageDialog md = new MessageDialog(this, "Error",
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    58
					"Can't open file " + fname + ".", button);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    59
				md.setSize(350, 200);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    60
				md.setVisible(true);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    61
				return;
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    62
			}
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    63
			remove(gb);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    64
			add("Center", gb2);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    65
			gb = gb2;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    66
			checkMenuItems();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    67
			validate();
3599
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
	}
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
	public void PS(boolean printable,String label) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    72
		FileDialog fd=new FileDialog(this,label,FileDialog.SAVE);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    73
		if (psDir!=null)
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    74
			fd.setDirectory(psDir);
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    75
		fd.setVisible(true);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    76
		if (fd.getFile()==null) return;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    77
		psDir=fd.getDirectory();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    78
		String fname=psDir+fd.getFile();
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
		if ((new File(fname)).exists()) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    81
			String buttons[]={"Overwrite","Cancel"};
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    82
			MessageDialog md=new MessageDialog(this,"Warning",
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    83
			      "Warning: File "+fname+" already exists. Overwrite?",
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    84
			      buttons);
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    85
			md.setSize(350,200);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    86
			md.setVisible(true);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    87
			if (md.getText().equals("Cancel")) return;
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    88
		}
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
		try {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    91
			gb.PS(fname,printable);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    92
		} catch (IOException exn) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    93
			String button[]={"OK"};
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    94
			MessageDialog md=new MessageDialog(this,"Error",
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
    95
			      "Unable to write file "+fname+".",button);
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    96
			md.setSize(350,200);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
    97
			md.setVisible(true);
3599
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
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   101
	public GraphBrowserFrame(GraphBrowser br) {
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   102
		super("GraphBrowser");
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   103
		MenuItem i3, i4;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   104
		gb = br;
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   105
		MenuBar mb = new MenuBar();
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   106
		Menu m1 = new Menu("File");
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   107
		m1.add(i3 = new MenuItem("Open ..."));
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   108
		m1.add(i1 = new MenuItem("Export to PostScript"));
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   109
		m1.add(i2 = new MenuItem("Export to EPS"));
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   110
		m1.add(i4 = new MenuItem("Quit"));
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   111
		i1.addActionListener(this);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   112
		i2.addActionListener(this);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   113
		i3.addActionListener(this);
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   114
		i4.addActionListener(this);
3599
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   115
		checkMenuItems();
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   116
		mb.add(m1);
89cbba12863d Source files for Isabelle theory graph browser.
berghofe
parents:
diff changeset
   117
		setMenuBar(mb);
6541
d3ac35b2bfbf Updated to JDK 1.1.x
berghofe
parents: 3599
diff changeset
   118
		add("Center", br);
11931
a5d1c9b34900 added windowlistener (can now close the frame by window controls)
kleing
parents: 11875
diff changeset
   119
    addWindowListener( new WindowAdapter() {
a5d1c9b34900 added windowlistener (can now close the frame by window controls)
kleing
parents: 11875
diff changeset
   120
      public void windowClosing(WindowEvent e) {
a5d1c9b34900 added windowlistener (can now close the frame by window controls)
kleing
parents: 11875
diff changeset
   121
        System.exit(0);
a5d1c9b34900 added windowlistener (can now close the frame by window controls)
kleing
parents: 11875
diff changeset
   122
      }
a5d1c9b34900 added windowlistener (can now close the frame by window controls)
kleing
parents: 11875
diff changeset
   123
    });
3599
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
}