package mirage-nat

  1. Overview
  2. Docs

A TCP channel is identified by the source and destination ports.

type transport_channel = Mirage_nat.port * Mirage_nat.port
val lookup : t -> channel -> channel option

lookup t channel is Some (expiry, translated_channel) - the new endpoints that should be applied to a packet using channel - or None if no entry for channel exists. expiry is an absolute time-stamp.

val insert : t -> (channel * channel) list -> (unit, [> `Overlap ]) result

insert t ~expiry translations adds the given translations to the table. Each translation is a pair input, target - packets with channel input should be rewritten to have channel output. It returns an error if the new entries would overlap with existing entries. expiry is the absolute time-stamp of the desired expiry time.

val delete : t -> channel list -> unit

delete t sources removes the entries mapping sources, if they exist.

OCaml

Innovation. Community. Security.