/usr/lib/ocaml/obus/oBus_name.mli is in libobus-ocaml-dev 1.1.5-3build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 | (*
* oBus_name.mli
* -------------
* Copyright : (c) 2008, Jeremie Dimino <jeremie@dimino.org>
* Licence : BSD3
*
* This file is a part of obus, an ocaml implementation of D-Bus.
*)
(** D-Bus names *)
(** For specific restrictions on D-Bus names, see
@see <http://dbus.freedesktop.org/doc/dbus-specification.html#message-protocol-names> the specification
General restrisction include:
- names must not be empty
- names must contains only ascii characters *)
type bus = OBus_string.t
(** Bus names
example: "org.freedesktop.DBus", ":1.1" *)
val validate_bus : OBus_string.validator
val is_unique : bus -> bool
(** Tell wether a bus name is a unique connection name or not. *)
type interface = OBus_string.t
(** Interface names
example: "org.freedesktop.DBus.Introspectable" *)
val validate_interface : OBus_string.validator
type member = OBus_string.t
(** Methods/signals/properties names
example: "StartServiceByName" *)
val validate_member : OBus_string.validator
type error = OBus_string.t
(** Error names
example: "org.freedesktop.Error.UnknownMethod" *)
val validate_error : OBus_string.validator
(** {6 D-Bus name translation} *)
val split : string -> string list
(** Split a name into longest blocks matched by the regular
expression "[A-Z]*[^A-Z.]*":
[split "SetCPUFreqGovernor" = ["Set"; "CPUFreq"; "Governor"]],
[split "org.freedesktop.DBus" = ["org"; "freedesktop"; "DBus"]] *)
val ocaml_lid : string -> string
(** Translate a D-Bus name into an ocaml-style lower-identifier:
[caml_lid "SetCPUFreqGovernor" = "set_cpufreq_governor"] *)
val ocaml_uid : string -> string
(** Translate a D-Bus name into an ocaml-style upper-identifier:
[caml_uid "org.freedesktop.DBus" = "Org_freedesktop_dbus"] *)
val haskell_lid : string -> string
(** Translate a D-Bus name into an haskell-style lower-identifier:
[haskell_lid "SetCPUFreqGovernor" = "setCPUFreqGovernor"] *)
val haskell_uid : string -> string
(** Translate a D-Bus name into an haskell-style upper-identifier:
[haskell_uid "org.freedesktop.DBus" = "OrgFreedesktopDBus"] *)
|