forked from
anil.recoil.org/ocaml-imap
IMAP in OCaml
1(*---------------------------------------------------------------------------
2 Copyright (c) 2025 Anil Madhavapeddy <anil@recoil.org>. All rights reserved.
3 SPDX-License-Identifier: ISC
4 ---------------------------------------------------------------------------*)
5
6(** Email Addresses and Envelopes
7
8 Message envelope structure as specified in RFC 9051 Section 7.4.2. *)
9
10(** {1 Addresses} *)
11
12type address = {
13 name : string option;
14 adl : string option; (** Source route (obsolete) *)
15 mailbox : string option; (** Local part *)
16 host : string option; (** Domain *)
17}
18
19val pp_address : Format.formatter -> address -> unit
20val address : ?name:string -> ?adl:string -> ?mailbox:string -> ?host:string -> unit -> address
21
22(** {1 Envelope} *)
23
24type t = {
25 date : string option;
26 subject : string option;
27 from : address list;
28 sender : address list;
29 reply_to : address list;
30 to_ : address list;
31 cc : address list;
32 bcc : address list;
33 in_reply_to : string option;
34 message_id : string option;
35}
36
37val pp : Format.formatter -> t -> unit
38val empty : t