author | wenzelm |
Thu, 29 Aug 2013 10:01:59 +0200 | |
changeset 53272 | 0dfd78ff7696 |
parent 53246 | 8d34caf5bf82 |
child 53274 | 1760c01f1c78 |
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 |
||
50362 | 4 |
Main plumbing for PIDE infrastructure as jEdit plugin. |
36760 | 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 |
|
50709
985c081a4f11
disable search dialog pool on all platforms -- to prevent GUI synchronization problems seen on KDE (e.g. Kubuntu 12.10);
wenzelm
parents:
50566
diff
changeset
|
16 |
import org.gjt.sp.jedit.{jEdit, EBMessage, EBPlugin, Buffer, View, Debug} |
39043 | 17 |
import org.gjt.sp.jedit.textarea.{JEditTextArea, TextArea} |
50362 | 18 |
import org.gjt.sp.jedit.syntax.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 |
|
53074 | 38 |
def options_changed() { |
39 |
session.global_options.event(Session.Global_Options(options.value)) |
|
40 |
plugin.load_theories() |
|
41 |
} |
|
52815
eaad5fe7bb1b
actions and shortcuts to change node_required status, with painter that looks like CheckBox (non-clickable);
wenzelm
parents:
52807
diff
changeset
|
42 |
|
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
43 |
def thy_load(): JEdit_Thy_Load = |
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
44 |
session.thy_load.asInstanceOf[JEdit_Thy_Load] |
44955 | 45 |
|
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 |
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
|
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 |
val current_session = session |
49101
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
49 |
if (current_session.recent_syntax == Outer_Syntax.empty) None |
21c8d2070be9
continue with more robust dummy session after failed startup;
wenzelm
parents:
49100
diff
changeset
|
50 |
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
|
51 |
} |
963b50ec6d73
clarified global get_recent_syntax: session always has its base_syntax, but it might be absent itself;
wenzelm
parents:
48872
diff
changeset
|
52 |
|
52971
31926d2c04ee
tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
52876
diff
changeset
|
53 |
lazy val editor = new JEdit_Editor |
31926d2c04ee
tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
52876
diff
changeset
|
54 |
|
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
55 |
|
53244 | 56 |
/* popups */ |
57 |
||
58 |
def dismissed_popups(view: View): Boolean = |
|
59 |
{ |
|
53272 | 60 |
var dismissed = false |
61 |
||
62 |
for { |
|
63 |
text_area <- JEdit_Lib.jedit_text_areas(view) |
|
64 |
doc_view <- document_view(text_area) |
|
65 |
} { if (doc_view.dismissed_popups()) dismissed = true } |
|
66 |
||
67 |
if (Pretty_Tooltip.dismissed_all()) dismissed = true |
|
68 |
||
69 |
dismissed |
|
53244 | 70 |
} |
71 |
||
72 |
||
43449 | 73 |
/* document model and view */ |
74 |
||
75 |
def document_model(buffer: Buffer): Option[Document_Model] = Document_Model(buffer) |
|
76 |
def document_view(text_area: JEditTextArea): Option[Document_View] = Document_View(text_area) |
|
77 |
||
44379 | 78 |
def document_views(buffer: Buffer): List[Document_View] = |
79 |
for { |
|
49406 | 80 |
text_area <- JEdit_Lib.jedit_text_areas(buffer).toList |
46997 | 81 |
doc_view = document_view(text_area) |
44379 | 82 |
if doc_view.isDefined |
83 |
} yield doc_view.get |
|
84 |
||
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
85 |
def exit_models(buffers: List[Buffer]) |
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
86 |
{ |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
87 |
Swing_Thread.now { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
88 |
buffers.foreach(buffer => |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
89 |
JEdit_Lib.buffer_lock(buffer) { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
90 |
JEdit_Lib.jedit_text_areas(buffer).foreach(Document_View.exit) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
91 |
Document_Model.exit(buffer) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
92 |
}) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
93 |
} |
47058
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
94 |
} |
34761733526c
refined init_model: allow change of buffer name as caused by "Save as", for example;
wenzelm
parents:
46997
diff
changeset
|
95 |
|
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
96 |
def init_models(buffers: List[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
|
97 |
{ |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
98 |
Swing_Thread.now { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
99 |
val init_edits = |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
100 |
(List.empty[Document.Edit_Text] /: buffers) { case (edits, buffer) => |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
101 |
JEdit_Lib.buffer_lock(buffer) { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
102 |
val (model_edits, opt_model) = |
50566
b43c4f660320
tuned signature: use thy_load to adapt to prover/editor specific view on sources;
wenzelm
parents:
50414
diff
changeset
|
103 |
thy_load.buffer_node_name(buffer) match { |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
104 |
case Some(node_name) => |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
105 |
document_model(buffer) match { |
52973 | 106 |
case Some(model) if model.node_name == node_name => (Nil, Some(model)) |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
107 |
case _ => |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
108 |
val model = Document_Model.init(session, buffer, node_name) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
109 |
(model.init_edits(), Some(model)) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
110 |
} |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
111 |
case None => (Nil, None) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
112 |
} |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
113 |
if (opt_model.isDefined) { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
114 |
for (text_area <- JEdit_Lib.jedit_text_areas(buffer)) { |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
115 |
if (document_view(text_area).map(_.model) != opt_model) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
116 |
Document_View.init(opt_model.get, text_area) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
117 |
} |
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
|
118 |
} |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
119 |
model_edits ::: edits |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
120 |
} |
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
|
121 |
} |
50566
b43c4f660320
tuned signature: use thy_load to adapt to prover/editor specific view on sources;
wenzelm
parents:
50414
diff
changeset
|
122 |
session.update(init_edits) |
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
|
123 |
} |
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
|
124 |
} |
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
|
125 |
|
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
|
126 |
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
|
127 |
{ |
49406 | 128 |
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
|
129 |
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
|
130 |
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
|
131 |
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
|
132 |
} |
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
|
133 |
} |
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
|
134 |
} |
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
|
135 |
|
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
|
136 |
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
|
137 |
{ |
49406 | 138 |
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
|
139 |
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
|
140 |
} |
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
|
141 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
142 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
143 |
|
34429 | 144 |
|
34618 | 145 |
class Plugin extends EBPlugin |
146 |
{ |
|
44577
96b6388d06c4
separate module for jEdit primitives for loading theory files;
wenzelm
parents:
44574
diff
changeset
|
147 |
/* theory files */ |
44574 | 148 |
|
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
149 |
private lazy val delay_init = |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
150 |
Swing_Thread.delay_last(PIDE.options.seconds("editor_load_delay")) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
151 |
{ |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
152 |
PIDE.init_models(JEdit_Lib.jedit_buffers().toList) |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
153 |
} |
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
154 |
|
53074 | 155 |
def load_theories() { Swing_Thread.later { delay_load.invoke() }} |
156 |
||
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
157 |
private lazy val delay_load = |
50207 | 158 |
Swing_Thread.delay_last(PIDE.options.seconds("editor_load_delay")) |
44574 | 159 |
{ |
53074 | 160 |
if (Isabelle.continuous_checking) { |
161 |
val view = jEdit.getActiveView() |
|
44963
4662dddc2fd8
explicit check_file wrt. jEdit VFS, to avoid slightly confusing empty buffer after IO error;
wenzelm
parents:
44955
diff
changeset
|
162 |
|
53074 | 163 |
val buffers = JEdit_Lib.jedit_buffers().toList |
164 |
if (buffers.forall(_.isLoaded)) { |
|
165 |
def loaded_buffer(name: String): Boolean = |
|
166 |
buffers.exists(buffer => JEdit_Lib.buffer_name(buffer) == name) |
|
44574 | 167 |
|
53074 | 168 |
val thys = |
169 |
for (buffer <- buffers; model <- PIDE.document_model(buffer)) |
|
170 |
yield model.node_name |
|
46761 | 171 |
|
53074 | 172 |
val thy_info = new Thy_Info(PIDE.thy_load) |
173 |
// FIXME avoid I/O in Swing thread!?! |
|
174 |
val files = thy_info.dependencies(thys).deps.map(_.name.node). |
|
175 |
filter(file => !loaded_buffer(file) && PIDE.thy_load.check_file(view, file)) |
|
44574 | 176 |
|
53074 | 177 |
if (!files.isEmpty) { |
178 |
val files_list = new ListView(files.sorted) |
|
179 |
for (i <- 0 until files.length) |
|
180 |
files_list.selection.indices += i |
|
44606 | 181 |
|
53074 | 182 |
val answer = |
183 |
GUI.confirm_dialog(view, |
|
184 |
"Auto loading of required files", |
|
185 |
JOptionPane.YES_NO_OPTION, |
|
186 |
"The following files are required to resolve theory imports.", |
|
187 |
"Reload selected files now?", |
|
188 |
new ScrollPane(files_list)) |
|
189 |
if (answer == 0) { |
|
190 |
files.foreach(file => |
|
191 |
if (files_list.selection.items.contains(file)) |
|
192 |
jEdit.openFile(null: View, file)) |
|
193 |
} |
|
46761 | 194 |
} |
195 |
} |
|
44606 | 196 |
} |
44574 | 197 |
} |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
198 |
|
44574 | 199 |
|
200 |
/* session manager */ |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
201 |
|
39633 | 202 |
private val session_manager = actor { |
203 |
loop { |
|
204 |
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
|
205 |
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
|
206 |
phase match { |
50808
1702ed63c2db
more general prover termination dialog, which might indicate undetected failure or just ML "exit 0";
wenzelm
parents:
50709
diff
changeset
|
207 |
case Session.Inactive | Session.Failed => |
46918
1752164d916b
prefer asynchronous context switch from actor to swing thread, to reduce danger of deadlocks;
wenzelm
parents:
46771
diff
changeset
|
208 |
Swing_Thread.later { |
51616 | 209 |
GUI.error_dialog(jEdit.getActiveView, "Prover process terminated", |
210 |
"Isabelle Syslog", GUI.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
|
211 |
} |
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
|
212 |
|
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
213 |
case Session.Ready => |
52084
573e80625c78
more explicit Session.update_options as source of Global_Options event;
wenzelm
parents:
51616
diff
changeset
|
214 |
PIDE.session.update_options(PIDE.options.value) |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
215 |
PIDE.init_models(JEdit_Lib.jedit_buffers().toList) |
49195 | 216 |
Swing_Thread.later { delay_load.invoke() } |
44573
51f8895b9ad9
some dialog for auto loading of required files (still inactive);
wenzelm
parents:
44434
diff
changeset
|
217 |
|
46740
852baa599351
explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents:
46204
diff
changeset
|
218 |
case Session.Shutdown => |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
219 |
PIDE.exit_models(JEdit_Lib.jedit_buffers().toList) |
49195 | 220 |
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
|
221 |
|
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
|
222 |
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
|
223 |
} |
49406 | 224 |
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
|
225 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
226 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
227 |
} |
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
228 |
|
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
229 |
|
51071
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
230 |
/* Mac OS X application hooks */ |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
231 |
|
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
232 |
def handle_quit(): Boolean = |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
233 |
{ |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
234 |
jEdit.exit(jEdit.getActiveView(), true) |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
235 |
false |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
236 |
} |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
237 |
|
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
238 |
|
34618 | 239 |
/* main plugin plumbing */ |
34433 | 240 |
|
34767 | 241 |
override def handleMessage(message: EBMessage) |
34618 | 242 |
{ |
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
|
243 |
Swing_Thread.assert() |
39630
44181423183a
explicit Session.Phase indication with associated event bus;
wenzelm
parents:
39628
diff
changeset
|
244 |
|
50205 | 245 |
if (PIDE.startup_failure.isDefined && !PIDE.startup_notified) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
246 |
message match { |
49100
e7aecf2a5fc4
prefer old startup dialog scheme (cf. 514bb82514df);
wenzelm
parents:
49099
diff
changeset
|
247 |
case msg: EditorStarted => |
51616 | 248 |
GUI.error_dialog(null, "Isabelle plugin startup failure", |
249 |
GUI.scrollable_text(Exn.message(PIDE.startup_failure.get)), |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
250 |
"Prover IDE inactive!") |
50205 | 251 |
PIDE.startup_notified = true |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
252 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
253 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
254 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
255 |
|
50205 | 256 |
if (PIDE.startup_failure.isEmpty) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
257 |
message match { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
258 |
case msg: EditorStarted => |
50408
1fac4ff86381
discontinued option jedit_auto_start, which is somewhat pointless as there is no manual session start within Isabelle/jEdit;
wenzelm
parents:
50363
diff
changeset
|
259 |
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
|
260 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
261 |
case msg: BufferUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
262 |
if msg.getWhat == BufferUpdate.LOADED || msg.getWhat == BufferUpdate.PROPERTIES_CHANGED => |
50205 | 263 |
if (PIDE.session.is_ready) { |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
264 |
val buffer = msg.getBuffer |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
265 |
if (buffer != null && !buffer.isLoading) delay_init.invoke() |
53074 | 266 |
load_theories() |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
267 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
268 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
269 |
case msg: EditPaneUpdate |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
270 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGING || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
271 |
msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
272 |
msg.getWhat == EditPaneUpdate.CREATED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
273 |
msg.getWhat == EditPaneUpdate.DESTROYED) => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
274 |
val edit_pane = msg.getEditPane |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
275 |
val buffer = edit_pane.getBuffer |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
276 |
val text_area = edit_pane.getTextArea |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
277 |
|
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
278 |
if (buffer != null && text_area != null) { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
279 |
if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGED || |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
280 |
msg.getWhat == EditPaneUpdate.CREATED) { |
50205 | 281 |
if (PIDE.session.is_ready) |
282 |
PIDE.init_view(buffer, text_area) |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
283 |
} |
52867
8d8cb75ab20a
more central Pretty_Tooltip.dismissed_all -- avoid spurious crash of Rich_Text_Area.robust_body in asynchronous mouse_motion_listener;
wenzelm
parents:
52816
diff
changeset
|
284 |
else { |
53244 | 285 |
PIDE.dismissed_popups(text_area.getView) |
52867
8d8cb75ab20a
more central Pretty_Tooltip.dismissed_all -- avoid spurious crash of Rich_Text_Area.robust_body in asynchronous mouse_motion_listener;
wenzelm
parents:
52816
diff
changeset
|
286 |
PIDE.exit_view(buffer, text_area) |
8d8cb75ab20a
more central Pretty_Tooltip.dismissed_all -- avoid spurious crash of Rich_Text_Area.robust_body in asynchronous mouse_motion_listener;
wenzelm
parents:
52816
diff
changeset
|
287 |
} |
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
|
288 |
} |
34784
02959dcea756
split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents:
34782
diff
changeset
|
289 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
290 |
case msg: PropertiesChanged => |
52084
573e80625c78
more explicit Session.update_options as source of Global_Options event;
wenzelm
parents:
51616
diff
changeset
|
291 |
PIDE.session.update_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
|
292 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
293 |
case _ => |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
294 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
295 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
296 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
297 |
|
34618 | 298 |
override def start() |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
299 |
{ |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
300 |
try { |
50709
985c081a4f11
disable search dialog pool on all platforms -- to prevent GUI synchronization problems seen on KDE (e.g. Kubuntu 12.10);
wenzelm
parents:
50566
diff
changeset
|
301 |
Debug.DISABLE_SEARCH_DIALOG_POOL = true |
985c081a4f11
disable search dialog pool on all platforms -- to prevent GUI synchronization problems seen on KDE (e.g. Kubuntu 12.10);
wenzelm
parents:
50566
diff
changeset
|
302 |
|
50205 | 303 |
PIDE.plugin = this |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
304 |
Isabelle_System.init() |
51614
22d1dd43f089
separate module Isabelle_Font, to keep this out of the way of generic Isabelle_System operations, notably for non-Isabelle/jEdit applications;
wenzelm
parents:
51294
diff
changeset
|
305 |
Isabelle_Font.install_fonts() |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
306 |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
307 |
val init_options = Options.init() |
50205 | 308 |
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
|
309 |
|
51071
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
310 |
if (Platform.is_macos && PIDE.options.bool("jedit_mac_adapter")) |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
311 |
OSX_Adapter.set_quit_handler(this, this.getClass.getDeclaredMethod("handle_quit")) |
b7e7557e80b5
some native Mac OS X support, notably quit_handler (important for dialog on unsaved changes);
wenzelm
parents:
50808
diff
changeset
|
312 |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
313 |
SyntaxUtilities.setStyleExtender(new Token_Markup.Style_Extender) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
314 |
if (ModeProvider.instance.isInstanceOf[ModeProvider]) |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
315 |
ModeProvider.instance = new Token_Markup.Mode_Provider(ModeProvider.instance) |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
316 |
|
49246 | 317 |
val content = Isabelle_Logic.session_content(false) |
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
318 |
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
|
319 |
|
50205 | 320 |
PIDE.session = new Session(thy_load) { |
50207 | 321 |
override def output_delay = PIDE.options.seconds("editor_output_delay") |
50205 | 322 |
override def reparse_limit = PIDE.options.int("editor_reparse_limit") |
49288 | 323 |
} |
48870
4accee106f0f
clarified initialization of Thy_Load, Thy_Info, Session;
wenzelm
parents:
48791
diff
changeset
|
324 |
|
50205 | 325 |
PIDE.session.phase_changed += session_manager |
326 |
PIDE.startup_failure = None |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
327 |
} |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
328 |
catch { |
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
329 |
case exn: Throwable => |
50205 | 330 |
PIDE.startup_failure = Some(exn) |
331 |
PIDE.startup_notified = false |
|
49099
10e899bb6530
more permissive handling of plugin startup failure;
wenzelm
parents:
49098
diff
changeset
|
332 |
} |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
333 |
} |
34618 | 334 |
|
39628
f6e82967b5cd
Plugin.stop: refrain from invalidating Isabelle.session -- some actors/dockables out there might still refer to it;
wenzelm
parents:
39518
diff
changeset
|
335 |
override def stop() |
34618 | 336 |
{ |
50205 | 337 |
if (PIDE.startup_failure.isEmpty) |
338 |
PIDE.options.value.save_prefs() |
|
49245
cb70157293c0
manage Isabelle/jEdit options as Isabelle/Scala options (with persistent preferences);
wenzelm
parents:
49195
diff
changeset
|
339 |
|
50205 | 340 |
PIDE.session.phase_changed -= session_manager |
50344
608265769ce0
emit bulk edits on initialization of multiple buffers, which greatly improves performance when starting big sessions (e.g. JinjaThreads);
wenzelm
parents:
50209
diff
changeset
|
341 |
PIDE.exit_models(JEdit_Lib.jedit_buffers().toList) |
50205 | 342 |
PIDE.session.stop() |
34318
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
343 |
} |
c13e168a8ae6
original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff
changeset
|
344 |
} |