src/Tools/jEdit/src/jedit/plugin.scala
author wenzelm
Sun, 29 Aug 2010 22:47:36 +0200
changeset 38854 eb6a35be18ca
parent 38843 d95522496593
child 39043 a0d7e9b580ec
permissions -rw-r--r--
Isabelle/jEdit property for global tooltip dismiss delay;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
36760
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     1
/*  Title:      Tools/jEdit/src/jedit/plugin.scala
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     2
    Author:     Makarius
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     3
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     4
Main Isabelle/jEdit plugin setup.
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     5
*/
34407
aad6834ba380 added some headers and comments;
wenzelm
parents: 34406
diff changeset
     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
wenzelm
parents: 34422
diff changeset
     9
36015
6111de7c916a adapted to Scala 2.8.0 Beta 1;
wenzelm
parents: 34871
diff changeset
    10
import isabelle._
6111de7c916a adapted to Scala 2.8.0 Beta 1;
wenzelm
parents: 34871
diff changeset
    11
34429
wenzelm
parents: 34422
diff changeset
    12
import java.io.{FileInputStream, IOException}
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    13
import java.awt.Font
34822
8c31275868cc tuned dialog;
wenzelm
parents: 34821
diff changeset
    14
import javax.swing.JTextArea
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    15
34497
184fda8cce04 more explicit indication of mutable collections;
wenzelm
parents: 34487
diff changeset
    16
import scala.collection.mutable
34406
f81cd75ae331 restructured: independent provers in different buffers
immler@in.tum.de
parents: 34337
diff changeset
    17
34429
wenzelm
parents: 34422
diff changeset
    18
import org.gjt.sp.jedit.{jEdit, EBMessage, EBPlugin, Buffer, EditPane, ServiceManager, View}
34406
f81cd75ae331 restructured: independent provers in different buffers
immler@in.tum.de
parents: 34337
diff changeset
    19
import org.gjt.sp.jedit.buffer.JEditBuffer
f81cd75ae331 restructured: independent provers in different buffers
immler@in.tum.de
parents: 34337
diff changeset
    20
import org.gjt.sp.jedit.textarea.JEditTextArea
37557
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
    21
import org.gjt.sp.jedit.msg.{BufferUpdate, EditPaneUpdate, PropertiesChanged}
37068
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
    22
import org.gjt.sp.jedit.gui.DockableWindowManager
34429
wenzelm
parents: 34422
diff changeset
    23
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    24
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    25
object Isabelle
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    26
{
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    27
  /* plugin instance */
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    28
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    29
  var system: Isabelle_System = null
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    30
  var session: Session = null
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    31
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
    32
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    33
  /* properties */
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    34
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    35
  val OPTION_PREFIX = "options.isabelle."
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    36
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    37
  object Property
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    38
  {
36814
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    39
    def apply(name: String): String =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    40
      jEdit.getProperty(OPTION_PREFIX + name)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    41
    def apply(name: String, default: String): String =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    42
      jEdit.getProperty(OPTION_PREFIX + name, default)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    43
    def update(name: String, value: String) =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    44
      jEdit.setProperty(OPTION_PREFIX + name, value)
34468
9d4b4f290676 maintain Isabelle properties via object Isabelle.Property with apply/update methods;
wenzelm
parents: 34463
diff changeset
    45
  }
34433
3da749b53842 renamed Plugin.plugin to Plugin.self;
wenzelm
parents: 34429
diff changeset
    46
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    47
  object Boolean_Property
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    48
  {
36814
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    49
    def apply(name: String): Boolean =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    50
      jEdit.getBooleanProperty(OPTION_PREFIX + name)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    51
    def apply(name: String, default: Boolean): Boolean =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    52
      jEdit.getBooleanProperty(OPTION_PREFIX + name, default)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    53
    def update(name: String, value: Boolean) =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    54
      jEdit.setBooleanProperty(OPTION_PREFIX + name, value)
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    55
  }
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    56
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    57
  object Int_Property
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    58
  {
36814
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    59
    def apply(name: String): Int =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    60
      jEdit.getIntegerProperty(OPTION_PREFIX + name)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    61
    def apply(name: String, default: Int): Int =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    62
      jEdit.getIntegerProperty(OPTION_PREFIX + name, default)
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    63
    def update(name: String, value: Int) =
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    64
      jEdit.setIntegerProperty(OPTION_PREFIX + name, value)
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    65
  }
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    66
37164
8b4617ad1593 reuse main view.font from jEdit;
wenzelm
parents: 37068
diff changeset
    67
8b4617ad1593 reuse main view.font from jEdit;
wenzelm
parents: 37068
diff changeset
    68
  /* font */
8b4617ad1593 reuse main view.font from jEdit;
wenzelm
parents: 37068
diff changeset
    69
8b4617ad1593 reuse main view.font from jEdit;
wenzelm
parents: 37068
diff changeset
    70
  def font_family(): String = jEdit.getProperty("view.font")
8b4617ad1593 reuse main view.font from jEdit;
wenzelm
parents: 37068
diff changeset
    71
37019
8f747cee4e27 zoom font size;
wenzelm
parents: 36814
diff changeset
    72
  def font_size(): Float =
8f747cee4e27 zoom font size;
wenzelm
parents: 36814
diff changeset
    73
    (jEdit.getIntegerProperty("view.fontsize", 16) *
8f747cee4e27 zoom font size;
wenzelm
parents: 36814
diff changeset
    74
      Int_Property("relative-font-size", 100)).toFloat / 100
36814
dc85664dbf6d support Isabelle plugin properties with defaults;
wenzelm
parents: 36760
diff changeset
    75
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    76
37201
8517a650cfdc control tooltip font via Swing HTML, with tooltip-font-size property;
wenzelm
parents: 37177
diff changeset
    77
  /* tooltip markup */
8517a650cfdc control tooltip font via Swing HTML, with tooltip-font-size property;
wenzelm
parents: 37177
diff changeset
    78
8517a650cfdc control tooltip font via Swing HTML, with tooltip-font-size property;
wenzelm
parents: 37177
diff changeset
    79
  def tooltip(text: String): String =
37203
c4261f3bbdd7 more flexibile font size via CSS <style> instead of old <font> element;
wenzelm
parents: 37201
diff changeset
    80
    "<html><pre style=\"font-family: " + font_family() + "; font-size: " +
c4261f3bbdd7 more flexibile font size via CSS <style> instead of old <font> element;
wenzelm
parents: 37201
diff changeset
    81
        Int_Property("tooltip-font-size", 10).toString + "px; \">" +  // FIXME proper scaling (!?)
c4261f3bbdd7 more flexibile font size via CSS <style> instead of old <font> element;
wenzelm
parents: 37201
diff changeset
    82
      HTML.encode(text) + "</pre></html>"
37201
8517a650cfdc control tooltip font via Swing HTML, with tooltip-font-size property;
wenzelm
parents: 37177
diff changeset
    83
38854
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    84
  def tooltip_dismiss_delay(): Int =
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    85
    Int_Property("tooltip-dismiss-delay", 8000) max 500
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    86
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    87
  def setup_tooltips()
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    88
  {
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    89
    Swing_Thread.now {
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    90
      val manager = javax.swing.ToolTipManager.sharedInstance
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    91
      manager.setDismissDelay(tooltip_dismiss_delay())
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    92
    }
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    93
  }
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
    94
37201
8517a650cfdc control tooltip font via Swing HTML, with tooltip-font-size property;
wenzelm
parents: 37177
diff changeset
    95
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    96
  /* settings */
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
    97
34782
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
    98
  def default_logic(): String =
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
    99
  {
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   100
    val logic = system.getenv("JEDIT_LOGIC")
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   101
    if (logic != "") logic
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   102
    else system.getenv_strict("ISABELLE_LOGIC")
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   103
  }
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   104
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   105
  def isabelle_args(): List[String] =
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   106
  {
34780
d0ff1c3a91ea more serious command line handling;
wenzelm
parents: 34779
diff changeset
   107
    val modes = system.getenv("JEDIT_PRINT_MODE").split(",").toList.map("-m" + _)
d0ff1c3a91ea more serious command line handling;
wenzelm
parents: 34779
diff changeset
   108
    val logic = {
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   109
      val logic = Property("logic")
34782
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   110
      if (logic != null && logic != "") logic
fcd6a41326a6 refined treatment of default logic concerning property and GUI;
wenzelm
parents: 34781
diff changeset
   111
      else default_logic()
34780
d0ff1c3a91ea more serious command line handling;
wenzelm
parents: 34779
diff changeset
   112
    }
d0ff1c3a91ea more serious command line handling;
wenzelm
parents: 34779
diff changeset
   113
    modes ++ List(logic)
34502
7d1d13750890 added Isabelle.default_logic;
wenzelm
parents: 34497
diff changeset
   114
  }
7d1d13750890 added Isabelle.default_logic;
wenzelm
parents: 34497
diff changeset
   115
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   116
38221
e0f00f0945b4 misc tuning and clarification;
wenzelm
parents: 37557
diff changeset
   117
  /* main jEdit components */
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   118
37177
17331ca75044 avoid deprecated Iterator.fromArray;
wenzelm
parents: 37164
diff changeset
   119
  def jedit_buffers(): Iterator[Buffer] = jEdit.getBuffers().iterator
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   120
37177
17331ca75044 avoid deprecated Iterator.fromArray;
wenzelm
parents: 37164
diff changeset
   121
  def jedit_views(): Iterator[View] = jEdit.getViews().iterator
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   122
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   123
  def jedit_text_areas(view: View): Iterator[JEditTextArea] =
37177
17331ca75044 avoid deprecated Iterator.fromArray;
wenzelm
parents: 37164
diff changeset
   124
    view.getEditPanes().iterator.map(_.getTextArea)
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   125
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   126
  def jedit_text_areas(): Iterator[JEditTextArea] =
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   127
    jedit_views().flatMap(jedit_text_areas(_))
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   128
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   129
  def jedit_text_areas(buffer: JEditBuffer): Iterator[JEditTextArea] =
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   130
    jedit_text_areas().filter(_.getBuffer == buffer)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   131
38843
d95522496593 more careful locking of jEdit buffer;
wenzelm
parents: 38640
diff changeset
   132
  def buffer_lock[A](buffer: JEditBuffer)(body: => A): A =
38640
105d1f112da5 sporadic locking of jEdit buffer;
wenzelm
parents: 38222
diff changeset
   133
  {
105d1f112da5 sporadic locking of jEdit buffer;
wenzelm
parents: 38222
diff changeset
   134
    try { buffer.readLock(); body }
105d1f112da5 sporadic locking of jEdit buffer;
wenzelm
parents: 38222
diff changeset
   135
    finally { buffer.readUnlock() }
105d1f112da5 sporadic locking of jEdit buffer;
wenzelm
parents: 38222
diff changeset
   136
  }
105d1f112da5 sporadic locking of jEdit buffer;
wenzelm
parents: 38222
diff changeset
   137
38843
d95522496593 more careful locking of jEdit buffer;
wenzelm
parents: 38640
diff changeset
   138
  def swing_buffer_lock[A](buffer: JEditBuffer)(body: => A): A =
d95522496593 more careful locking of jEdit buffer;
wenzelm
parents: 38640
diff changeset
   139
    Swing_Thread.now { buffer_lock(buffer) { body } }
d95522496593 more careful locking of jEdit buffer;
wenzelm
parents: 38640
diff changeset
   140
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   141
37068
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   142
  /* dockable windows */
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   143
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   144
  private def wm(view: View): DockableWindowManager = view.getDockableWindowManager
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   145
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   146
  def docked_output(view: View): Option[Output_Dockable] =
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   147
    wm(view).getDockableWindow("isabelle-output") match {
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   148
      case dockable: Output_Dockable => Some(dockable)
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   149
      case _ => None
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   150
    }
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   151
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   152
  def docked_raw_output(view: View): Option[Raw_Output_Dockable] =
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   153
    wm(view).getDockableWindow("isabelle-raw-output") match {
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   154
      case dockable: Raw_Output_Dockable => Some(dockable)
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   155
      case _ => None
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   156
    }
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   157
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   158
  def docked_protocol(view: View): Option[Protocol_Dockable] =
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   159
    wm(view).getDockableWindow("isabelle-protocol") match {
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   160
      case dockable: Protocol_Dockable => Some(dockable)
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   161
      case _ => None
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   162
    }
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   163
07936a4efe93 access statically typed dockable windows;
wenzelm
parents: 37019
diff changeset
   164
38221
e0f00f0945b4 misc tuning and clarification;
wenzelm
parents: 37557
diff changeset
   165
  /* manage prover */  // FIXME async!?
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   166
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   167
  private def prover_started(view: View): Boolean =
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   168
  {
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   169
    val timeout = Int_Property("startup-timeout") max 1000
38221
e0f00f0945b4 misc tuning and clarification;
wenzelm
parents: 37557
diff changeset
   170
    session.started(timeout, Isabelle.isabelle_args()) match {
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   171
      case Some(err) =>
34822
8c31275868cc tuned dialog;
wenzelm
parents: 34821
diff changeset
   172
        val text = new JTextArea(err); text.setEditable(false)
8c31275868cc tuned dialog;
wenzelm
parents: 34821
diff changeset
   173
        Library.error_dialog(view, null, "Failed to start Isabelle process", text)
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   174
        false
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   175
      case None => true
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   176
    }
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   177
  }
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   178
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   179
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   180
  /* activation */
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   181
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   182
  def activate_buffer(view: View, buffer: Buffer)
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   183
  {
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   184
    if (prover_started(view)) {
38222
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38221
diff changeset
   185
      // FIXME proper error handling
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38221
diff changeset
   186
      val (_, thy_name) = Thy_Header.split_thy_path(Isabelle.system.posix_path(buffer.getPath))
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38221
diff changeset
   187
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38221
diff changeset
   188
      val model = Document_Model.init(session, buffer, thy_name)
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   189
      for (text_area <- jedit_text_areas(buffer))
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   190
        Document_View.init(model, text_area)
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   191
    }
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   192
  }
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   193
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   194
  def deactivate_buffer(buffer: Buffer)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   195
  {
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   196
    session.stop()  // FIXME not yet
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   197
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   198
    for (text_area <- jedit_text_areas(buffer))
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   199
      Document_View.exit(text_area)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   200
    Document_Model.exit(buffer)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   201
  }
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   202
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   203
  def switch_active(view: View) =
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   204
  {
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   205
    val buffer = view.getBuffer
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34787
diff changeset
   206
    if (Document_Model(buffer).isDefined) deactivate_buffer(buffer)
34820
a8ba6cde13e9 basic setup for synchronous / modal (!) prover startup;
wenzelm
parents: 34808
diff changeset
   207
    else activate_buffer(view, buffer)
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   208
  }
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   209
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   210
  def is_active(view: View): Boolean =
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34787
diff changeset
   211
    Document_Model(view.getBuffer).isDefined
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   212
}
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   213
34429
wenzelm
parents: 34422
diff changeset
   214
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   215
class Plugin extends EBPlugin
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   216
{
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   217
  /* main plugin plumbing */
34433
3da749b53842 renamed Plugin.plugin to Plugin.self;
wenzelm
parents: 34429
diff changeset
   218
34767
8dd19c5f8c56 added properties_changed event bus;
wenzelm
parents: 34764
diff changeset
   219
  override def handleMessage(message: EBMessage)
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   220
  {
34767
8dd19c5f8c56 added properties_changed event bus;
wenzelm
parents: 34764
diff changeset
   221
    message match {
37557
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   222
      case msg: BufferUpdate
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   223
        if msg.getWhat == BufferUpdate.PROPERTIES_CHANGED =>
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   224
        Document_Model(msg.getBuffer) match {
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   225
          case Some(model) => model.refresh()
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   226
          case _ =>
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   227
        }
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37241
diff changeset
   228
34767
8dd19c5f8c56 added properties_changed event bus;
wenzelm
parents: 34764
diff changeset
   229
      case msg: EditPaneUpdate =>
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   230
        val edit_pane = msg.getEditPane
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   231
        val buffer = edit_pane.getBuffer
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   232
        val text_area = edit_pane.getTextArea
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   233
34787
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   234
        def init_view()
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   235
        {
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34787
diff changeset
   236
          Document_Model(buffer) match {
34787
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   237
            case Some(model) => Document_View.init(model, text_area)
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   238
            case None =>
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   239
          }
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   240
        }
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   241
        def exit_view()
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   242
        {
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34787
diff changeset
   243
          if (Document_View(text_area).isDefined)
34787
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   244
            Document_View.exit(text_area)
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   245
        }
34767
8dd19c5f8c56 added properties_changed event bus;
wenzelm
parents: 34764
diff changeset
   246
        msg.getWhat match {
34787
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   247
          case EditPaneUpdate.BUFFER_CHANGED => exit_view(); init_view()
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   248
          case EditPaneUpdate.CREATED => init_view()
0feac35069c6 need to handle EditPaneUpdate.CREATED explicitly, not included in EditPaneUpdate.BUFFER_CHANGED;
wenzelm
parents: 34784
diff changeset
   249
          case EditPaneUpdate.DESTROYED => exit_view()
34671
d179fcb04cbc output_info specific to prover
immler@in.tum.de
parents: 34670
diff changeset
   250
          case _ =>
d179fcb04cbc output_info specific to prover
immler@in.tum.de
parents: 34670
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
34777
91d6089cef88 class Session models full session, with or without prover process (cf. heaps, browser_info);
wenzelm
parents: 34774
diff changeset
   253
      case msg: PropertiesChanged =>
37241
04d2521e79b0 basic support for sub/superscript token markup -- NB: need to maintain extended token types eagerly, since jEdit occasionally reinstalls a style array that is too short;
wenzelm
parents: 37203
diff changeset
   254
        Swing_Thread.now {
04d2521e79b0 basic support for sub/superscript token markup -- NB: need to maintain extended token types eagerly, since jEdit occasionally reinstalls a style array that is too short;
wenzelm
parents: 37203
diff changeset
   255
          for (text_area <- Isabelle.jedit_text_areas if Document_View(text_area).isDefined)
04d2521e79b0 basic support for sub/superscript token markup -- NB: need to maintain extended token types eagerly, since jEdit occasionally reinstalls a style array that is too short;
wenzelm
parents: 37203
diff changeset
   256
            Document_View(text_area).get.extend_styles()
38854
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
   257
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
   258
          Isabelle.setup_tooltips()
37241
04d2521e79b0 basic support for sub/superscript token markup -- NB: need to maintain extended token types eagerly, since jEdit occasionally reinstalls a style array that is too short;
wenzelm
parents: 37203
diff changeset
   259
        }
04d2521e79b0 basic support for sub/superscript token markup -- NB: need to maintain extended token types eagerly, since jEdit occasionally reinstalls a style array that is too short;
wenzelm
parents: 37203
diff changeset
   260
34791
b97d5b38dea4 explicit object Session.Global_Settings;
wenzelm
parents: 34788
diff changeset
   261
        Isabelle.session.global_settings.event(Session.Global_Settings)
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34782
diff changeset
   262
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   263
      case _ =>
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   264
    }
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   265
  }
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   266
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   267
  override def start()
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   268
  {
34615
5e61055bf35b renamed IsabelleProcess to Isabelle_Process;
wenzelm
parents: 34612
diff changeset
   269
    Isabelle.system = new Isabelle_System
34774
1fa466333361 install_fonts;
wenzelm
parents: 34772
diff changeset
   270
    Isabelle.system.install_fonts()
34777
91d6089cef88 class Session models full session, with or without prover process (cf. heaps, browser_info);
wenzelm
parents: 34774
diff changeset
   271
    Isabelle.session = new Session(Isabelle.system)  // FIXME dialog!?
38854
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
   272
eb6a35be18ca Isabelle/jEdit property for global tooltip dismiss delay;
wenzelm
parents: 38843
diff changeset
   273
    Isabelle.setup_tooltips()
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   274
  }
34618
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   275
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   276
  override def stop()
e45052ff7233 added Boolean_Property, Int_Property;
wenzelm
parents: 34615
diff changeset
   277
  {
34777
91d6089cef88 class Session models full session, with or without prover process (cf. heaps, browser_info);
wenzelm
parents: 34774
diff changeset
   278
    Isabelle.session.stop()  // FIXME dialog!?
91d6089cef88 class Session models full session, with or without prover process (cf. heaps, browser_info);
wenzelm
parents: 34774
diff changeset
   279
    Isabelle.session = null
34441
ff3b7ae2b12a replaced static IsabelleSystem by Isabelle.system;
wenzelm
parents: 34440
diff changeset
   280
    Isabelle.system = null
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   281
  }
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
   282
}