tcpip 1.1.2 · OCaml Package

Parameters

module Console : V1_LWT.CONSOLE

module Time : V1_LWT.TIME

module Random : V1.RANDOM

module Ethif : V1_LWT.ETHIF

module Ipv4 : sig ... end

module Udp : sig ... end

Signature

type offer = {

ip_addr : Ipaddr.V4.t;
netmask : Ipaddr.V4.t option;
gateways : Ipaddr.V4.t list;
dns : Ipaddr.V4.t list;
lease : int32;
xid : int32;

}

type state =

| Disabled
| Request_sent of int32
| Offer_accepted of offer
| Lease_held of offer
| Shutting_down

type t = {

c : Console.t;
udp : Udp.t;
ip : Ipv4.t;
mutable state : state;
new_offer : offer -> unit Lwt.t;

}

val sizeof_dhcp : int

val get_dhcp_op : Cstruct.t -> Cstruct.uint8

val set_dhcp_op : Cstruct.t -> Cstruct.uint8 -> unit

val get_dhcp_htype : Cstruct.t -> Cstruct.uint8

val set_dhcp_htype : Cstruct.t -> Cstruct.uint8 -> unit

val get_dhcp_hlen : Cstruct.t -> Cstruct.uint8

val set_dhcp_hlen : Cstruct.t -> Cstruct.uint8 -> unit

val get_dhcp_hops : Cstruct.t -> Cstruct.uint8

val set_dhcp_hops : Cstruct.t -> Cstruct.uint8 -> unit

val get_dhcp_xid : Cstruct.t -> Cstruct.uint32

val set_dhcp_xid : Cstruct.t -> Cstruct.uint32 -> unit

val get_dhcp_secs : Cstruct.t -> Cstruct.uint16

val set_dhcp_secs : Cstruct.t -> Cstruct.uint16 -> unit

val get_dhcp_flags : Cstruct.t -> Cstruct.uint16

val set_dhcp_flags : Cstruct.t -> Cstruct.uint16 -> unit

val get_dhcp_ciaddr : Cstruct.t -> Cstruct.uint32

val set_dhcp_ciaddr : Cstruct.t -> Cstruct.uint32 -> unit

val get_dhcp_yiaddr : Cstruct.t -> Cstruct.uint32

val set_dhcp_yiaddr : Cstruct.t -> Cstruct.uint32 -> unit

val get_dhcp_siaddr : Cstruct.t -> Cstruct.uint32

val set_dhcp_siaddr : Cstruct.t -> Cstruct.uint32 -> unit

val get_dhcp_giaddr : Cstruct.t -> Cstruct.uint32

val set_dhcp_giaddr : Cstruct.t -> Cstruct.uint32 -> unit

val get_dhcp_chaddr : Cstruct.t -> Cstruct.t

val copy_dhcp_chaddr : Cstruct.t -> string

val set_dhcp_chaddr : string -> int -> Cstruct.t -> unit

val blit_dhcp_chaddr : Cstruct.t -> int -> Cstruct.t -> unit

val get_dhcp_sname : Cstruct.t -> Cstruct.t

val copy_dhcp_sname : Cstruct.t -> string

val set_dhcp_sname : string -> int -> Cstruct.t -> unit

val blit_dhcp_sname : Cstruct.t -> int -> Cstruct.t -> unit

val get_dhcp_file : Cstruct.t -> Cstruct.t

val copy_dhcp_file : Cstruct.t -> string

val set_dhcp_file : string -> int -> Cstruct.t -> unit

val blit_dhcp_file : Cstruct.t -> int -> Cstruct.t -> unit

val get_dhcp_cookie : Cstruct.t -> Cstruct.uint32

val set_dhcp_cookie : Cstruct.t -> Cstruct.uint32 -> unit

val hexdump_dhcp_to_buffer : Buffer.t -> Cstruct.t -> unit

val hexdump_dhcp : Cstruct.t -> unit

type mode =

| BootRequest
| BootReply

val int_to_mode : int -> mode option

val mode_to_int : mode -> int

val mode_to_string : mode -> string

val string_to_mode : string -> mode option

val output_broadcast : 
  t ->
  xid:Cstruct.uint32 ->
  yiaddr:Ipaddr.V4.t ->
  siaddr:Ipaddr.V4.t ->
  options:Dhcpv4_option.Packet.p ->
  unit Lwt.t

val input : t -> src:'a -> dst:'b -> src_port:'c -> Cstruct.t -> unit Lwt.t

val start_discovery : t -> unit Lwt.t

val dhcp_thread : t -> unit Console.io

val create : Console.t -> Ipv4.t -> Udp.t -> t * offer Lwt_stream.t

val listen : 
  t ->
  dst_port:int ->
  (src:'a -> dst:'b -> src_port:'c -> Cstruct.t -> unit Lwt.t) option

package tcpip

Parameters

Signature