src/Pure/Tools/flarum.scala
author paulson <lp15@cam.ac.uk>
Wed, 16 Mar 2022 16:14:22 +0000
changeset 75287 7add2d5322a7
parent 74962 2c9c4ad4c816
child 75393 87ebf5a50283
permissions -rw-r--r--
Tidied several ugly proofs in some elderly examples
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
74945
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     1
/*  Title:      Pure/General/flarum.scala
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     2
    Author:     Makarius
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     3
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     4
Support for Flarum forum server: https://flarum.org
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     5
*/
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     6
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     7
package isabelle
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     8
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
     9
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    10
import java.net.URL
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    11
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    12
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    13
object Flarum
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    14
{
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    15
  // see RFC3339 in https://www.php.net/manual/en/class.datetimeinterface.php
74961
bb0858cc574e tuned signature;
wenzelm
parents: 74946
diff changeset
    16
  val Date_Format: Date.Format = Date.Format("uuuu-MM-dd'T'HH:mm:ssxxx")
74945
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    17
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    18
  def server(url: URL): Server = new Server(url)
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    19
74962
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    20
  class Server private[Flarum](url: URL) extends JSON_API.Service(url)
74945
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    21
  {
74962
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    22
    def get_api(route: String): JSON_API.Root =
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    23
      get_root("api" + (if (route.isEmpty) "" else "/" + route))
74945
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    24
74962
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    25
    val root: JSON_API.Root = get_api("")
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    26
    def users: JSON_API.Root = get_api("users")
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    27
    def groups: JSON_API.Root = get_api("groups")
2c9c4ad4c816 clarified signature;
wenzelm
parents: 74961
diff changeset
    28
    def discussions: JSON_API.Root = get_api("discussions")
74945
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    29
  }
4dc90b43ba94 support for Flarum server;
wenzelm
parents:
diff changeset
    30
}