author | wenzelm |
Sun, 25 Nov 2012 21:40:34 +0100 | |
changeset 50209 | 907373a080b9 |
parent 50208 | 1382ad6d4774 |
child 50344 | 608265769ce0 |
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} |
34429 | 20 |
|
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43390
diff
changeset
|
21 |
import org.gjt.sp.util.SyntaxUtilities |
39241 | 22 |
|
44721 | 23 |
import scala.actors.Actor._ |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
24 |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
25 |
|
50205 | 26 |
object PIDE |
34618 | 27 |
{ |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
28 |
/* plugin instance */ |
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
29 |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
30 |
val options = new JEdit_Options |
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
31 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
32 |
@volatile var startup_failure: Option[Throwable] = None |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
33 |
@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
|
34 |
|
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
35 |
@volatile var plugin: Plugin = null |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
36 |
@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
|
37 |
|
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
38 |
def thy_load(): JEdit_Thy_Load = |
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
39 |
session.thy_load.asInstanceOf[JEdit_Thy_Load] |
44955 | 40 |
|
48884
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
41 |
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
|
42 |
{ |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
43 |
val current_session = session |
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
44 |
if (current_session.recent_syntax == Outer_Syntax.empty) None |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
45 |
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
|
46 |
} |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
47 |
|
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
48 |
|
43449 | 49 |
/* document model and view */ |
50 |
||
51 |
def document_model(buffer: Buffer): Option[Document_Model] = Document_Model(buffer) |
|
52 |
def document_view(text_area: JEditTextArea): Option[Document_View] = Document_View(text_area) |
|
53 |
||
44379 | 54 |
def document_views(buffer: Buffer): List[Document_View] = |
55 |
for { |
|
49406 | 56 |
text_area <- JEdit_Lib.jedit_text_areas(buffer).toList |
46997 | 57 |
doc_view = document_view(text_area) |
44379 | 58 |
if doc_view.isDefined |
59 |
} yield doc_view.get |
|
60 |
||
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
61 |
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
|
62 |
{ |
49406 | 63 |
JEdit_Lib.swing_buffer_lock(buffer) { |
64 |
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
|
65 |
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
|
66 |
} |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
67 |
} |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
68 |
|
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
|
69 |
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
|
70 |
{ |
49406 | 71 |
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
|
72 |
val opt_model = |
49406 | 73 |
JEdit_Lib.buffer_node_name(buffer) match { |
48717
622251b2b0f1
clarified Sidekick configuration, including minor modes;
wenzelm
parents:
48709
diff
changeset
|
74 |
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
|
75 |
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
|
76 |
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
|
77 |
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
|
78 |
} |
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
79 |
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
|
80 |
} |
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 |
if (opt_model.isDefined) { |
49406 | 82 |
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
|
83 |
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
|
84 |
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
|
85 |
} |
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
|
86 |
} |
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 |
} |
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
|
88 |
} |
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 |
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
|
91 |
{ |
49406 | 92 |
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
|
93 |
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
|
94 |
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
|
95 |
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
|
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 |
|
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 |
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
|
101 |
{ |
49406 | 102 |
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
|
103 |
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
|
104 |
} |
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 |
} |
50209 | 106 |
|
107 |
||
108 |
/* full checking */ |
|
109 |
||
110 |
def check_buffer(buffer: Buffer) |
|
111 |
{ |
|
112 |
PIDE.document_model(buffer) match { |
|
113 |
case None => |
|
114 |
case Some(model) => model.full_perspective() |
|
115 |
} |
|
116 |
} |
|
117 |
||
118 |
def cancel_execution() { PIDE.session.cancel_execution() } |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
119 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
120 |
|
34429 | 121 |
|
34618 | 122 |
class Plugin extends EBPlugin |
123 |
{ |
|
44577
96b6388d06c4
separate module for jEdit primitives for loading theory files;
wenzelm
parents:
44574
diff
changeset
|
124 |
/* theory files */ |
44574 | 125 |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
126 |
private lazy val delay_load = |
50207 | 127 |
Swing_Thread.delay_last(PIDE.options.seconds("editor_load_delay")) |
44574 | 128 |
{ |
44963
4662dddc2fd8
explicit check_file wrt. jEdit VFS, to avoid slightly confusing empty buffer after IO error;
wenzelm
parents:
44955
diff
changeset
|
129 |
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
|
130 |
|
49406 | 131 |
val buffers = JEdit_Lib.jedit_buffers().toList |
46761 | 132 |
if (buffers.forall(_.isLoaded)) { |
133 |
def loaded_buffer(name: String): Boolean = |
|
49406 | 134 |
buffers.exists(buffer => JEdit_Lib.buffer_name(buffer) == name) |
44574 | 135 |
|
46761 | 136 |
val thys = |
50205 | 137 |
for (buffer <- buffers; model <- PIDE.document_model(buffer)) |
46761 | 138 |
yield model.name |
139 |
||
50205 | 140 |
val thy_info = new Thy_Info(PIDE.thy_load) |
46761 | 141 |
// 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
|
142 |
val files = thy_info.dependencies(true, thys).deps.map(_._1.node). |
50205 | 143 |
filter(file => !loaded_buffer(file) && PIDE.thy_load.check_file(view, file)) |
44574 | 144 |
|
46761 | 145 |
if (!files.isEmpty) { |
146 |
val files_list = new ListView(files.sorted) |
|
147 |
for (i <- 0 until files.length) |
|
148 |
files_list.selection.indices += i |
|
44606 | 149 |
|
46761 | 150 |
val answer = |
151 |
Library.confirm_dialog(view, |
|
152 |
"Auto loading of required files", |
|
153 |
JOptionPane.YES_NO_OPTION, |
|
154 |
"The following files are required to resolve theory imports.", |
|
155 |
"Reload selected files now?", |
|
156 |
new ScrollPane(files_list)) |
|
157 |
if (answer == 0) { |
|
158 |
files.foreach(file => |
|
159 |
if (files_list.selection.items.contains(file)) |
|
160 |
jEdit.openFile(null: View, file)) |
|
161 |
} |
|
162 |
} |
|
44606 | 163 |
} |
44574 | 164 |
} |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
165 |
|
44574 | 166 |
|
167 |
/* session manager */ |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
168 |
|
39633 | 169 |
private val session_manager = actor { |
170 |
loop { |
|
171 |
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
|
172 |
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
|
173 |
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
|
174 |
case Session.Failed => |
46918
1752164d916b
prefer asynchronous context switch from actor to swing thread, to reduce danger of deadlocks;
wenzelm
parents:
46771
diff
changeset
|
175 |
Swing_Thread.later { |
48022 | 176 |
Library.error_dialog(jEdit.getActiveView, "Prover process failure", |
50205 | 177 |
"Isabelle Syslog", Library.scrollable_text(PIDE.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
|
178 |
} |
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
|
179 |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
180 |
case Session.Ready => |
50205 | 181 |
PIDE.session.global_options.event(Session.Global_Options(PIDE.options.value)) |
182 |
JEdit_Lib.jedit_buffers.foreach(PIDE.init_model) |
|
49195 | 183 |
Swing_Thread.later { delay_load.invoke() } |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
184 |
|
46740
852baa599351
explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents:
46204
diff
changeset
|
185 |
case Session.Shutdown => |
50205 | 186 |
JEdit_Lib.jedit_buffers.foreach(PIDE.exit_model) |
49195 | 187 |
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
|
188 |
|
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
|
189 |
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
|
190 |
} |
49406 | 191 |
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
|
192 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
193 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
194 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
195 |
|
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
196 |
|
34618 | 197 |
/* main plugin plumbing */ |
34433 | 198 |
|
34767 | 199 |
override def handleMessage(message: EBMessage) |
34618 | 200 |
{ |
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
|
201 |
Swing_Thread.assert() |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
202 |
|
50205 | 203 |
if (PIDE.startup_failure.isDefined && !PIDE.startup_notified) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
204 |
message match { |
49100
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
205 |
case msg: EditorStarted => |
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
206 |
Library.error_dialog(null, "Isabelle plugin startup failure", |
50205 | 207 |
Library.scrollable_text(Exn.message(PIDE.startup_failure.get)), |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
208 |
"Prover IDE inactive!") |
50205 | 209 |
PIDE.startup_notified = true |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
210 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
211 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
212 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
213 |
|
50205 | 214 |
if (PIDE.startup_failure.isEmpty) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
215 |
message match { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
216 |
case msg: EditorStarted => |
50205 | 217 |
if (PIDE.options.bool("jedit_auto_start")) |
218 |
PIDE.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
|
219 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
220 |
case msg: BufferUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
221 |
if msg.getWhat == BufferUpdate.LOADED || msg.getWhat == BufferUpdate.PROPERTIES_CHANGED => |
50205 | 222 |
if (PIDE.session.is_ready) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
223 |
val buffer = msg.getBuffer |
50205 | 224 |
if (buffer != null && !buffer.isLoading) PIDE.init_model(buffer) |
49195 | 225 |
Swing_Thread.later { delay_load.invoke() } |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
226 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
227 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
228 |
case msg: EditPaneUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
229 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGING || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
230 |
msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
231 |
msg.getWhat == EditPaneUpdate.CREATED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
232 |
msg.getWhat == EditPaneUpdate.DESTROYED) => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
233 |
val edit_pane = msg.getEditPane |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
234 |
val buffer = edit_pane.getBuffer |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
235 |
val text_area = edit_pane.getTextArea |
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 |
if (buffer != null && text_area != null) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
238 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
239 |
msg.getWhat == EditPaneUpdate.CREATED) { |
50205 | 240 |
if (PIDE.session.is_ready) |
241 |
PIDE.init_view(buffer, text_area) |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
242 |
} |
50205 | 243 |
else PIDE.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
|
244 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
245 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
246 |
case msg: PropertiesChanged => |
50205 | 247 |
PIDE.session.global_options.event(Session.Global_Options(PIDE.options.value)) |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
248 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
249 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
250 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
251 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
252 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
253 |
|
34618 | 254 |
override def start() |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
255 |
{ |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
256 |
try { |
50205 | 257 |
PIDE.plugin = this |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
258 |
Isabelle_System.init() |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
259 |
Isabelle_System.install_fonts() |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
260 |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
261 |
val init_options = Options.init() |
50205 | 262 |
Swing_Thread.now { PIDE.options.update(init_options) } |
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
263 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
264 |
SyntaxUtilities.setStyleExtender(new Token_Markup.Style_Extender) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
265 |
if (ModeProvider.instance.isInstanceOf[ModeProvider]) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
266 |
ModeProvider.instance = new Token_Markup.Mode_Provider(ModeProvider.instance) |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
267 |
|
49246 | 268 |
val content = Isabelle_Logic.session_content(false) |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
269 |
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
|
270 |
|
50205 | 271 |
PIDE.session = new Session(thy_load) { |
50207 | 272 |
override def output_delay = PIDE.options.seconds("editor_output_delay") |
50205 | 273 |
override def reparse_limit = PIDE.options.int("editor_reparse_limit") |
49288 | 274 |
} |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
275 |
|
50205 | 276 |
PIDE.session.phase_changed += session_manager |
277 |
PIDE.startup_failure = None |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
278 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
279 |
catch { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
280 |
case exn: Throwable => |
50205 | 281 |
PIDE.startup_failure = Some(exn) |
282 |
PIDE.startup_notified = false |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
283 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
284 |
} |
34618 | 285 |
|
39628
f6e82967b5cd
Plugin.stop: refrain from invalidating Isabelle.session -- some actors/dockables out there might still refer to it;
wenzelm
parents:
39518
diff
changeset
|
286 |
override def stop() |
34618 | 287 |
{ |
50205 | 288 |
if (PIDE.startup_failure.isEmpty) |
289 |
PIDE.options.value.save_prefs() |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
290 |
|
50205 | 291 |
PIDE.session.phase_changed -= session_manager |
292 |
JEdit_Lib.jedit_buffers.foreach(PIDE.exit_model) |
|
293 |
PIDE.session.stop() |
|
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
294 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
295 |
} |