Module Icmpv4_wire

type ty =
  1. | Echo_reply
  2. | Destination_unreachable
  3. | Source_quench
  4. | Redirect
  5. | Echo_request
  6. | Time_exceeded
  7. | Parameter_problem
  8. | Timestamp_request
  9. | Timestamp_reply
  10. | Information_request
  11. | Information_reply
val ty_to_string : ty -> string
val int_to_ty : int -> ty option
val ty_to_int : ty -> int
type unreachable_reason =
  1. | Network_unreachable
  2. | Host_unreachable
  3. | Protocol_unreachable
  4. | Port_unreachable
  5. | Would_fragment
  6. | Source_route_failed
  7. | Destination_network_unknown
  8. | Destination_host_unknown
  9. | Source_host_isolated
  10. | Destination_net_prohibited
  11. | Destination_host_prohibited
  12. | TOS_network_unreachable
  13. | TOS_host_unreachable
  14. | Communication_prohibited
  15. | Host_precedence_violation
  16. | Precedence_insufficient
val unreachable_reason_to_int : unreachable_reason -> int
val sizeof_icmpv4 : int
val get_ty : Cstruct.t -> int
val set_ty : Cstruct.t -> int -> unit
val get_code : Cstruct.t -> int
val set_code : Cstruct.t -> int -> unit
val get_checksum : Cstruct.t -> int
val set_checksum : Cstruct.t -> int -> unit