/usr/lib/ocaml/obus/oBus_address.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 | (*
* oBus_address.mli
* ----------------
* Copyright : (c) 2008, Jeremie Dimino <jeremie@dimino.org>
* Licence : BSD3
*
* This file is a part of obus, an ocaml implementation of D-Bus.
*)
(** Manipulation of D-Bus addresses *)
(** {6 Types} *)
type guid = OBus_uuid.t
(** A unique address identifier. Each server listenning address'
has a unique one. *)
(** Type of an address *)
type t = {
name : string;
(** The transport name *)
args : (string * string) list;
(** Arguments of the address *)
}
val name : t -> string
(** [name] projection *)
val args : t -> (string * string) list
(** [args] Projection *)
val make : name : string -> args : (string * string) list -> t
(** Creates an address *)
val arg : string -> t -> string option
(** [arg key address] returns the value of argument [key], if any *)
val guid : t -> guid option
(** Returns the address guid, if any *)
(** {6 To/from string conversion} *)
exception Parse_failure of string * int * string
(** [Parse_failure(string, position, reason)] exception raised when
parsing a string failed. *)
val of_string : string -> t list
(** [of_string str] parse [str] and return the list of addresses
defined in it.
@raise Parse_failure if the string contains an invalid address
*)
val to_string : t list -> string
(** [to_string addresses] return a string representation of a list
of addresses *)
(** {6 Well-known addresses} *)
val system : t list Lwt.t Lazy.t
(** The list of addresses for system bus *)
val session : t list Lwt.t Lazy.t
(** The list of addresses for session bus *)
val default_system : t list
(** The default addresses for the system bus *)
val default_session : t list
(** The default addresses for the session bus *)
|