dns 0.9.0 · OCaml Package

type db = {

trie : Trie.dnstrie;
mutable names : (Name.key, RR.dnsnode) Hashtbl.t;

}

val new_db : unit -> db

val no_more_updates : db -> unit

val add_generic_rr : int -> string -> int32 -> Name.domain_name -> db -> unit

val add_a_rr : Ipaddr.V4.t -> int32 -> Name.domain_name -> db -> unit

val add_aaaa_rr : Ipaddr.V6.t -> int32 -> Name.domain_name -> db -> unit

val add_ns_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_cname_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_soa_rr : 
  Name.domain_name ->
  Name.domain_name ->
  RR.serial ->
  int32 ->
  int32 ->
  int32 ->
  int32 ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_mb_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_mg_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_mr_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_wks_rr : 
  Ipaddr.V4.t ->
  Cstruct.byte ->
  string ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_ptr_rr : Name.domain_name -> int32 -> Name.domain_name -> db -> unit

val add_hinfo_rr : string -> string -> int32 -> Name.domain_name -> db -> unit

val add_minfo_rr : 
  Name.domain_name ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_mx_rr : 
  int ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_rp_rr : 
  Name.domain_name ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_afsdb_rr : 
  int ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_x25_rr : string -> int32 -> Name.domain_name -> db -> unit

val add_isdn_rr : 
  string ->
  string option ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_rt_rr : 
  int ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_srv_rr : 
  int ->
  int ->
  int ->
  Name.domain_name ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_txt_rr : string list -> int32 -> Name.domain_name -> db -> unit

val add_dnskey_rr : 
  int ->
  int ->
  string ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_ds_rr : 
  int ->
  int ->
  int ->
  string ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

val add_rrsig_rr : 
  string ->
  int ->
  int ->
  int32 ->
  int32 ->
  int32 ->
  int ->
  Name.domain_name ->
  string ->
  int32 ->
  Name.domain_name ->
  db ->
  unit

exception TTLMismatch

type parserstate = {

mutable db : db;
mutable paren : int;
mutable filename : string;
mutable lineno : int;
mutable origin : string list;
mutable ttl : int32;
mutable owner : string list;

}

val state : parserstate

package dns