src/Pure/PIDE/editor.scala
author wenzelm
Mon, 30 Jan 2023 16:20:17 +0100
changeset 77142 139a0119ae3c
parent 77029 1046a69fabaa
child 77144 42c3970e1ac1
permissions -rw-r--r--
clarified operation (without change of signature!);
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
52971
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     1
/*  Title:      Pure/PIDE/editor.scala
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     2
    Author:     Makarius
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     3
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     4
General editor operations.
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     5
*/
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     6
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     7
package isabelle
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     8
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
     9
75393
87ebf5a50283 clarified formatting, for the sake of scala3;
wenzelm
parents: 73340
diff changeset
    10
abstract class Editor[Context] {
76794
941d4f527091 clarified modules: avoid duplication;
wenzelm
parents: 76739
diff changeset
    11
  /* PIDE session and document model */
66082
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
    12
52971
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
    13
  def session: Session
66084
7f8eeff20f7a tuned signature;
wenzelm
parents: 66082
diff changeset
    14
  def flush(): Unit
54461
6c360a6ade0e centralized management of pending buffer edits;
wenzelm
parents: 53844
diff changeset
    15
  def invoke(): Unit
66101
0f0f294e314f maintain overlays within main state of document models;
wenzelm
parents: 66094
diff changeset
    16
76794
941d4f527091 clarified modules: avoid duplication;
wenzelm
parents: 76739
diff changeset
    17
  def get_models(): Iterable[Document.Model]
941d4f527091 clarified modules: avoid duplication;
wenzelm
parents: 76739
diff changeset
    18
941d4f527091 clarified modules: avoid duplication;
wenzelm
parents: 76739
diff changeset
    19
76609
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    20
  /* document editor */
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    21
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    22
  protected val document_editor: Synchronized[Document_Editor.State] =
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    23
    Synchronized(Document_Editor.State())
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    24
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    25
  protected def document_state(): Document_Editor.State = document_editor.value
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    26
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    27
  protected def document_state_changed(): Unit = {}
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    28
  private def document_state_change(f: Document_Editor.State => Document_Editor.State): Unit = {
76705
ddf5764684dd proper state change, e.g. on open/close of "Document" panel;
wenzelm
parents: 76701
diff changeset
    29
    val changed =
ddf5764684dd proper state change, e.g. on open/close of "Document" panel;
wenzelm
parents: 76701
diff changeset
    30
      document_editor.change_result { st =>
ddf5764684dd proper state change, e.g. on open/close of "Document" panel;
wenzelm
parents: 76701
diff changeset
    31
        val st1 = f(st)
76725
c8d5cc19270a more thorough GUI updates, notably for multiple Document dockables;
wenzelm
parents: 76720
diff changeset
    32
        val changed =
c8d5cc19270a more thorough GUI updates, notably for multiple Document dockables;
wenzelm
parents: 76720
diff changeset
    33
          st.active_document_theories != st1.active_document_theories ||
76739
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    34
          st.selection != st1.selection
76725
c8d5cc19270a more thorough GUI updates, notably for multiple Document dockables;
wenzelm
parents: 76720
diff changeset
    35
        (changed, st1)
76705
ddf5764684dd proper state change, e.g. on open/close of "Document" panel;
wenzelm
parents: 76701
diff changeset
    36
      }
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    37
    if (changed) document_state_changed()
76705
ddf5764684dd proper state change, e.g. on open/close of "Document" panel;
wenzelm
parents: 76701
diff changeset
    38
  }
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    39
77142
139a0119ae3c clarified operation (without change of signature!);
wenzelm
parents: 77029
diff changeset
    40
  def document_session(): Option[Sessions.Background] =
139a0119ae3c clarified operation (without change of signature!);
wenzelm
parents: 77029
diff changeset
    41
    document_state().session_background.filter(_.info.documents.nonEmpty)
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    42
76739
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    43
  def document_required(): List[Document.Node.Name] = {
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    44
    val st = document_state()
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    45
    if (st.is_active) {
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    46
      for {
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    47
        a <- st.all_document_theories
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    48
        b = session.resources.migrate_name(a)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    49
        if st.selection(b)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    50
      } yield b
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    51
    }
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    52
    else Nil
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    53
  }
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    54
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    55
  def document_node_required(name: Document.Node.Name): Boolean = {
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    56
    val st = document_state()
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    57
    st.is_active &&
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    58
    st.selection.contains(name) &&
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    59
    st.all_document_theories.exists(a => session.resources.migrate_name(a) == name)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    60
  }
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    61
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    62
  def document_theories(): List[Document.Node.Name] =
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    63
    document_state().active_document_theories.map(session.resources.migrate_name)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    64
76732
0ba6f360d38a actually build document;
wenzelm
parents: 76725
diff changeset
    65
  def document_selection(): Set[Document.Node.Name] = document_state().selection
76716
a7602257a825 clarified state document nodes for Theories_Status / Document_Dockable;
wenzelm
parents: 76715
diff changeset
    66
76701
3543ecb4c97d tuned signature;
wenzelm
parents: 76678
diff changeset
    67
  def document_setup(background: Option[Sessions.Background]): Unit =
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    68
    document_state_change(_.copy(session_background = background))
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    69
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    70
  def document_select(
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    71
    names: Iterable[Document.Node.Name],
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    72
    set: Boolean = false,
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    73
    toggle: Boolean = false
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    74
  ): Unit = document_state_change(_.select(names, set = set, toggle = toggle))
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    75
76720
37f7b2965e02 more GUI operations;
wenzelm
parents: 76716
diff changeset
    76
  def document_select_all(set: Boolean = false): Unit =
76739
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    77
    document_state_change { st =>
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    78
      val domain = st.active_document_theories.map(session.resources.migrate_name)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    79
      st.select(domain, set = set)
cb72b5996520 proper migrate_name between different kinds of Resources, notably for Windows;
wenzelm
parents: 76732
diff changeset
    80
    }
76720
37f7b2965e02 more GUI operations;
wenzelm
parents: 76716
diff changeset
    81
76715
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    82
  def document_init(id: AnyRef): Unit = document_state_change(_.register_view(id))
bf5ff407f32f clarified state of document model vs. document editor selection (again, see also a9d52d02bd83);
wenzelm
parents: 76705
diff changeset
    83
  def document_exit(id: AnyRef): Unit = document_state_change(_.unregister_view(id))
76609
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    84
cc9ddf373bd2 maintain global state of document editor views, notably for is_active operation;
wenzelm
parents: 75393
diff changeset
    85
66101
0f0f294e314f maintain overlays within main state of document models;
wenzelm
parents: 66094
diff changeset
    86
  /* current situation */
0f0f294e314f maintain overlays within main state of document models;
wenzelm
parents: 66094
diff changeset
    87
52971
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
    88
  def current_node(context: Context): Option[Document.Node.Name]
52978
37fbb3fde380 prefer PIDE editor operations;
wenzelm
parents: 52977
diff changeset
    89
  def current_node_snapshot(context: Context): Option[Document.Snapshot]
52974
908e8a36e975 tuned signature;
wenzelm
parents: 52971
diff changeset
    90
  def node_snapshot(name: Document.Node.Name): Document.Snapshot
53844
71f103629327 skip ignored commands, similar to former proper_command_at (see d68ea01d5084) -- relevant to Output, Query_Operation etc.;
wenzelm
parents: 52980
diff changeset
    91
  def current_command(context: Context, snapshot: Document.Snapshot): Option[Command]
52977
15254e32d299 central management of Document.Overlays, independent of Document_Model;
wenzelm
parents: 52974
diff changeset
    92
66082
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
    93
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
    94
  /* overlays */
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
    95
66101
0f0f294e314f maintain overlays within main state of document models;
wenzelm
parents: 66094
diff changeset
    96
  def node_overlays(name: Document.Node.Name): Document.Node.Overlays
73340
0ffcad1f6130 tuned --- fewer warnings;
wenzelm
parents: 66101
diff changeset
    97
  def insert_overlay(command: Command, fn: String, args: List[String]): Unit
0ffcad1f6130 tuned --- fewer warnings;
wenzelm
parents: 66101
diff changeset
    98
  def remove_overlay(command: Command, fn: String, args: List[String]): Unit
66082
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
    99
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
   100
2d12a730a380 clarified modules;
wenzelm
parents: 64867
diff changeset
   101
  /* hyperlinks */
52980
28f59ca8ce78 manage hyperlinks via PIDE editor interface;
wenzelm
parents: 52978
diff changeset
   102
75393
87ebf5a50283 clarified formatting, for the sake of scala3;
wenzelm
parents: 73340
diff changeset
   103
  abstract class Hyperlink {
64663
wenzelm
parents: 64524
diff changeset
   104
    def external: Boolean = false
56494
1b74abf064e1 avoid confusion about pointless cursor movement with external links;
wenzelm
parents: 55884
diff changeset
   105
    def follow(context: Context): Unit
1b74abf064e1 avoid confusion about pointless cursor movement with external links;
wenzelm
parents: 55884
diff changeset
   106
  }
66084
7f8eeff20f7a tuned signature;
wenzelm
parents: 66082
diff changeset
   107
52980
28f59ca8ce78 manage hyperlinks via PIDE editor interface;
wenzelm
parents: 52978
diff changeset
   108
  def hyperlink_command(
64664
wenzelm
parents: 64663
diff changeset
   109
    focus: Boolean, snapshot: Document.Snapshot, id: Document_ID.Generic, offset: Symbol.Offset = 0)
60893
3c8b9b4b577c support hyperlinks with optional focus change;
wenzelm
parents: 56494
diff changeset
   110
      : Option[Hyperlink]
66094
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   111
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   112
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   113
  /* dispatcher thread */
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   114
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   115
  def assert_dispatcher[A](body: => A): A
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   116
  def require_dispatcher[A](body: => A): A
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   117
  def send_dispatcher(body: => Unit): Unit
24658c9d7c78 more general dispatcher operations;
wenzelm
parents: 66084
diff changeset
   118
  def send_wait_dispatcher(body: => Unit): Unit
52971
31926d2c04ee tuned signature -- more abstract PIDE editor operations;
wenzelm
parents:
diff changeset
   119
}