author | wenzelm |
Sat, 24 Nov 2012 14:50:19 +0100 | |
changeset 50183 | 2b3e24e1c9e7 |
parent 50127 | ff0b52a6d72f |
child 50205 | 788c8263e634 |
permissions | -rw-r--r-- |
43282
5d294220ca43
moved sources -- eliminated Netbeans artifact of jedit package directory;
wenzelm
parents:
41537
diff
changeset
|
1 |
/* Title: Tools/jEdit/src/plugin.scala |
36760 | 2 |
Author: Makarius |
3 |
||
4 |
Main Isabelle/jEdit plugin setup. |
|
5 |
*/ |
|
34407 | 6 |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
7 |
package isabelle.jedit |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
8 |
|
34429 | 9 |
|
36015 | 10 |
import isabelle._ |
11 |
||
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
12 |
import javax.swing.JOptionPane |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
13 |
|
49246 | 14 |
import scala.swing.{ListView, ScrollPane} |
34406
f81cd75ae331
restructured: independent provers in different buffers
immler@in.tum.de
parents:
34337
diff
changeset
|
15 |
|
49406 | 16 |
import org.gjt.sp.jedit.{jEdit, EBMessage, EBPlugin, Buffer, View} |
39043 | 17 |
import org.gjt.sp.jedit.textarea.{JEditTextArea, TextArea} |
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43449
diff
changeset
|
18 |
import org.gjt.sp.jedit.syntax.{Token => JEditToken, ModeProvider} |
49100
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
19 |
import org.gjt.sp.jedit.msg.{EditorStarted, BufferUpdate, EditPaneUpdate, PropertiesChanged} |
37068 | 20 |
import org.gjt.sp.jedit.gui.DockableWindowManager |
34429 | 21 |
|
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43390
diff
changeset
|
22 |
import org.gjt.sp.util.SyntaxUtilities |
39241 | 23 |
|
44721 | 24 |
import scala.actors.Actor._ |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
25 |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
26 |
|
34618 | 27 |
object Isabelle |
28 |
{ |
|
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
29 |
/* plugin instance */ |
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
30 |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
31 |
val options = new JEdit_Options |
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
32 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
33 |
@volatile var startup_failure: Option[Throwable] = None |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
34 |
@volatile var startup_notified = false |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
35 |
|
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
36 |
@volatile var plugin: Plugin = null |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
37 |
@volatile var session: Session = new Session(new JEdit_Thy_Load(Set.empty, Outer_Syntax.empty)) |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
38 |
|
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
39 |
def thy_load(): JEdit_Thy_Load = |
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
40 |
session.thy_load.asInstanceOf[JEdit_Thy_Load] |
44955 | 41 |
|
48884
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
42 |
def get_recent_syntax(): Option[Outer_Syntax] = |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
43 |
{ |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
44 |
val current_session = session |
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
45 |
if (current_session.recent_syntax == Outer_Syntax.empty) None |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
46 |
else Some(current_session.recent_syntax) |
48884
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
47 |
} |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
48 |
|
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
49 |
|
37164 | 50 |
/* font */ |
51 |
||
52 |
def font_family(): String = jEdit.getProperty("view.font") |
|
53 |
||
49701 | 54 |
def font_size(scale: String): Float = |
55 |
(jEdit.getIntegerProperty("view.fontsize", 16) * options.real(scale)).toFloat |
|
36814
dc85664dbf6d
support Isabelle plugin properties with defaults;
wenzelm
parents:
36760
diff
changeset
|
56 |
|
34618 | 57 |
|
43449 | 58 |
/* document model and view */ |
59 |
||
60 |
def document_model(buffer: Buffer): Option[Document_Model] = Document_Model(buffer) |
|
61 |
def document_view(text_area: JEditTextArea): Option[Document_View] = Document_View(text_area) |
|
62 |
||
44379 | 63 |
def document_views(buffer: Buffer): List[Document_View] = |
64 |
for { |
|
49406 | 65 |
text_area <- JEdit_Lib.jedit_text_areas(buffer).toList |
46997 | 66 |
doc_view = document_view(text_area) |
44379 | 67 |
if doc_view.isDefined |
68 |
} yield doc_view.get |
|
69 |
||
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
70 |
def exit_model(buffer: Buffer) |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
71 |
{ |
49406 | 72 |
JEdit_Lib.swing_buffer_lock(buffer) { |
73 |
JEdit_Lib.jedit_text_areas(buffer).foreach(Document_View.exit) |
|
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
74 |
Document_Model.exit(buffer) |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
75 |
} |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
76 |
} |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
77 |
|
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
78 |
def init_model(buffer: Buffer) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
79 |
{ |
49406 | 80 |
JEdit_Lib.swing_buffer_lock(buffer) { |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
81 |
val opt_model = |
49406 | 82 |
JEdit_Lib.buffer_node_name(buffer) match { |
48717
622251b2b0f1
clarified Sidekick configuration, including minor modes;
wenzelm
parents:
48709
diff
changeset
|
83 |
case Some(node_name) => |
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
84 |
document_model(buffer) match { |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
85 |
case Some(model) if model.name == node_name => Some(model) |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
86 |
case _ => Some(Document_Model.init(session, buffer, node_name)) |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
87 |
} |
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
88 |
case None => None |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
89 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
90 |
if (opt_model.isDefined) { |
49406 | 91 |
for (text_area <- JEdit_Lib.jedit_text_areas(buffer)) { |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
92 |
if (document_view(text_area).map(_.model) != opt_model) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
93 |
Document_View.init(opt_model.get, text_area) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
94 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
95 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
96 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
97 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
98 |
|
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
99 |
def init_view(buffer: Buffer, text_area: JEditTextArea) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
100 |
{ |
49406 | 101 |
JEdit_Lib.swing_buffer_lock(buffer) { |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
102 |
document_model(buffer) match { |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
103 |
case Some(model) => Document_View.init(model, text_area) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
104 |
case None => |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
105 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
106 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
107 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
108 |
|
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
109 |
def exit_view(buffer: Buffer, text_area: JEditTextArea) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
110 |
{ |
49406 | 111 |
JEdit_Lib.swing_buffer_lock(buffer) { |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
112 |
Document_View.exit(text_area) |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
113 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
114 |
} |
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
115 |
|
43449 | 116 |
|
37068 | 117 |
/* dockable windows */ |
118 |
||
119 |
private def wm(view: View): DockableWindowManager = view.getDockableWindowManager |
|
120 |
||
39515 | 121 |
def docked_session(view: View): Option[Session_Dockable] = |
122 |
wm(view).getDockableWindow("isabelle-session") match { |
|
123 |
case dockable: Session_Dockable => Some(dockable) |
|
124 |
case _ => None |
|
125 |
} |
|
126 |
||
37068 | 127 |
def docked_output(view: View): Option[Output_Dockable] = |
128 |
wm(view).getDockableWindow("isabelle-output") match { |
|
129 |
case dockable: Output_Dockable => Some(dockable) |
|
130 |
case _ => None |
|
131 |
} |
|
132 |
||
133 |
def docked_raw_output(view: View): Option[Raw_Output_Dockable] = |
|
134 |
wm(view).getDockableWindow("isabelle-raw-output") match { |
|
135 |
case dockable: Raw_Output_Dockable => Some(dockable) |
|
136 |
case _ => None |
|
137 |
} |
|
138 |
||
139 |
def docked_protocol(view: View): Option[Protocol_Dockable] = |
|
140 |
wm(view).getDockableWindow("isabelle-protocol") match { |
|
141 |
case dockable: Protocol_Dockable => Some(dockable) |
|
142 |
case _ => None |
|
143 |
} |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
144 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
145 |
|
34429 | 146 |
|
34618 | 147 |
class Plugin extends EBPlugin |
148 |
{ |
|
44577
96b6388d06c4
separate module for jEdit primitives for loading theory files;
wenzelm
parents:
44574
diff
changeset
|
149 |
/* theory files */ |
44574 | 150 |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
151 |
private lazy val delay_load = |
49288 | 152 |
Swing_Thread.delay_last(Time.seconds(Isabelle.options.real("editor_load_delay"))) |
44574 | 153 |
{ |
44963
4662dddc2fd8
explicit check_file wrt. jEdit VFS, to avoid slightly confusing empty buffer after IO error;
wenzelm
parents:
44955
diff
changeset
|
154 |
val view = jEdit.getActiveView() |
4662dddc2fd8
explicit check_file wrt. jEdit VFS, to avoid slightly confusing empty buffer after IO error;
wenzelm
parents:
44955
diff
changeset
|
155 |
|
49406 | 156 |
val buffers = JEdit_Lib.jedit_buffers().toList |
46761 | 157 |
if (buffers.forall(_.isLoaded)) { |
158 |
def loaded_buffer(name: String): Boolean = |
|
49406 | 159 |
buffers.exists(buffer => JEdit_Lib.buffer_name(buffer) == name) |
44574 | 160 |
|
46761 | 161 |
val thys = |
162 |
for (buffer <- buffers; model <- Isabelle.document_model(buffer)) |
|
163 |
yield model.name |
|
164 |
||
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
165 |
val thy_info = new Thy_Info(Isabelle.thy_load) |
46761 | 166 |
// FIXME avoid I/O in Swing thread!?! |
49098
673e0ed547af
bypass slow check for inlined files, where it is not really required;
wenzelm
parents:
48884
diff
changeset
|
167 |
val files = thy_info.dependencies(true, thys).deps.map(_._1.node). |
46761 | 168 |
filter(file => !loaded_buffer(file) && Isabelle.thy_load.check_file(view, file)) |
44574 | 169 |
|
46761 | 170 |
if (!files.isEmpty) { |
171 |
val files_list = new ListView(files.sorted) |
|
172 |
for (i <- 0 until files.length) |
|
173 |
files_list.selection.indices += i |
|
44606 | 174 |
|
46761 | 175 |
val answer = |
176 |
Library.confirm_dialog(view, |
|
177 |
"Auto loading of required files", |
|
178 |
JOptionPane.YES_NO_OPTION, |
|
179 |
"The following files are required to resolve theory imports.", |
|
180 |
"Reload selected files now?", |
|
181 |
new ScrollPane(files_list)) |
|
182 |
if (answer == 0) { |
|
183 |
files.foreach(file => |
|
184 |
if (files_list.selection.items.contains(file)) |
|
185 |
jEdit.openFile(null: View, file)) |
|
186 |
} |
|
187 |
} |
|
44606 | 188 |
} |
44574 | 189 |
} |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
190 |
|
44574 | 191 |
|
192 |
/* session manager */ |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
193 |
|
39633 | 194 |
private val session_manager = actor { |
195 |
loop { |
|
196 |
react { |
|
39735
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
197 |
case phase: Session.Phase => |
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
198 |
phase match { |
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
199 |
case Session.Failed => |
46918
1752164d916b
prefer asynchronous context switch from actor to swing thread, to reduce danger of deadlocks;
wenzelm
parents:
46771
diff
changeset
|
200 |
Swing_Thread.later { |
48022 | 201 |
Library.error_dialog(jEdit.getActiveView, "Prover process failure", |
202 |
"Isabelle Syslog", Library.scrollable_text(Isabelle.session.current_syslog())) |
|
39735
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
203 |
} |
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
204 |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
205 |
case Session.Ready => |
50127 | 206 |
Isabelle.session.global_options.event(Session.Global_Options(Isabelle.options.value)) |
49406 | 207 |
JEdit_Lib.jedit_buffers.foreach(Isabelle.init_model) |
49195 | 208 |
Swing_Thread.later { delay_load.invoke() } |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
209 |
|
46740
852baa599351
explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents:
46204
diff
changeset
|
210 |
case Session.Shutdown => |
49406 | 211 |
JEdit_Lib.jedit_buffers.foreach(Isabelle.exit_model) |
49195 | 212 |
Swing_Thread.later { delay_load.revoke() } |
46740
852baa599351
explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents:
46204
diff
changeset
|
213 |
|
39735
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
214 |
case _ => |
969ede84aac0
more uniform init/exit model/view in session_manager, trading race wrt. session.phase for race wrt. global editor state;
wenzelm
parents:
39702
diff
changeset
|
215 |
} |
49406 | 216 |
case bad => java.lang.System.err.println("session_manager: ignoring bad message " + bad) |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
217 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
218 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
219 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
220 |
|
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
221 |
|
34618 | 222 |
/* main plugin plumbing */ |
34433 | 223 |
|
34767 | 224 |
override def handleMessage(message: EBMessage) |
34618 | 225 |
{ |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
226 |
Swing_Thread.assert() |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
227 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
228 |
if (Isabelle.startup_failure.isDefined && !Isabelle.startup_notified) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
229 |
message match { |
49100
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
230 |
case msg: EditorStarted => |
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
231 |
Library.error_dialog(null, "Isabelle plugin startup failure", |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
232 |
Library.scrollable_text(Exn.message(Isabelle.startup_failure.get)), |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
233 |
"Prover IDE inactive!") |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
234 |
Isabelle.startup_notified = true |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
235 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
236 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
237 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
238 |
|
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
239 |
if (Isabelle.startup_failure.isEmpty) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
240 |
message match { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
241 |
case msg: EditorStarted => |
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
242 |
if (Isabelle.options.bool("jedit_auto_start")) |
49246 | 243 |
Isabelle.session.start(Isabelle_Logic.session_args()) |
37557
1ae272fd4082
refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents:
37241
diff
changeset
|
244 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
245 |
case msg: BufferUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
246 |
if msg.getWhat == BufferUpdate.LOADED || msg.getWhat == BufferUpdate.PROPERTIES_CHANGED => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
247 |
if (Isabelle.session.is_ready) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
248 |
val buffer = msg.getBuffer |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
249 |
if (buffer != null && !buffer.isLoading) Isabelle.init_model(buffer) |
49195 | 250 |
Swing_Thread.later { delay_load.invoke() } |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
251 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
252 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
253 |
case msg: EditPaneUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
254 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGING || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
255 |
msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
256 |
msg.getWhat == EditPaneUpdate.CREATED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
257 |
msg.getWhat == EditPaneUpdate.DESTROYED) => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
258 |
val edit_pane = msg.getEditPane |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
259 |
val buffer = edit_pane.getBuffer |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
260 |
val text_area = edit_pane.getTextArea |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
261 |
|
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
262 |
if (buffer != null && text_area != null) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
263 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
264 |
msg.getWhat == EditPaneUpdate.CREATED) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
265 |
if (Isabelle.session.is_ready) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
266 |
Isabelle.init_view(buffer, text_area) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
267 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
268 |
else Isabelle.exit_view(buffer, text_area) |
43510
17d431c92575
init/exit model/view synchronously within the swing thread -- EditBus.send in jedit-4.4.1 always runs there;
wenzelm
parents:
43487
diff
changeset
|
269 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
270 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
271 |
case msg: PropertiesChanged => |
50117 | 272 |
Isabelle.session.global_options.event(Session.Global_Options(Isabelle.options.value)) |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
273 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
274 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
275 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
276 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
277 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
278 |
|
34618 | 279 |
override def start() |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
280 |
{ |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
281 |
try { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
282 |
Isabelle.plugin = this |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
283 |
Isabelle_System.init() |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
284 |
Isabelle_System.install_fonts() |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
285 |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
286 |
val init_options = Options.init() |
49722
c91419b3a425
eliminated obsolete tooltip delay -- bypassed by Pretty_Tooltip;
wenzelm
parents:
49701
diff
changeset
|
287 |
Swing_Thread.now { Isabelle.options.update(init_options) } |
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
288 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
289 |
SyntaxUtilities.setStyleExtender(new Token_Markup.Style_Extender) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
290 |
if (ModeProvider.instance.isInstanceOf[ModeProvider]) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
291 |
ModeProvider.instance = new Token_Markup.Mode_Provider(ModeProvider.instance) |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
292 |
|
49246 | 293 |
val content = Isabelle_Logic.session_content(false) |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
294 |
val thy_load = new JEdit_Thy_Load(content.loaded_theories, content.syntax) |
49524
68796a77c42b
Thy_Syntax.consolidate_spans is subject to editor_reparse_limit, for improved experience of unbalanced comments etc.;
wenzelm
parents:
49523
diff
changeset
|
295 |
|
49288 | 296 |
Isabelle.session = new Session(thy_load) { |
297 |
override def output_delay = Time.seconds(Isabelle.options.real("editor_output_delay")) |
|
49524
68796a77c42b
Thy_Syntax.consolidate_spans is subject to editor_reparse_limit, for improved experience of unbalanced comments etc.;
wenzelm
parents:
49523
diff
changeset
|
298 |
override def reparse_limit = Isabelle.options.int("editor_reparse_limit") |
49288 | 299 |
} |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
300 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
301 |
Isabelle.session.phase_changed += session_manager |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
302 |
Isabelle.startup_failure = None |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
303 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
304 |
catch { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
305 |
case exn: Throwable => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
306 |
Isabelle.startup_failure = Some(exn) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
307 |
Isabelle.startup_notified = false |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
308 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
309 |
} |
34618 | 310 |
|
39628
f6e82967b5cd
Plugin.stop: refrain from invalidating Isabelle.session -- some actors/dockables out there might still refer to it;
wenzelm
parents:
39518
diff
changeset
|
311 |
override def stop() |
34618 | 312 |
{ |
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
313 |
if (Isabelle.startup_failure.isEmpty) |
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
314 |
Isabelle.options.value.save_prefs() |
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
315 |
|
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
316 |
Isabelle.session.phase_changed -= session_manager |
49406 | 317 |
JEdit_Lib.jedit_buffers.foreach(Isabelle.exit_model) |
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
318 |
Isabelle.session.stop() |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
319 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
320 |
} |