view src/ur/openidFfi.urs @ 13:de04a3fc6b72

Stateless verification worked
author Adam Chlipala <adam@chlipala.net>
date Sun, 02 Jan 2011 10:11:38 -0500
parents c778455fe570
children f129ddee75f3
line wrap: on
line source
val init : transaction {}

type discovery
val discover : string -> transaction (option discovery)
val endpoint : discovery -> string
val localId : discovery -> option string

type inputs
val createInputs : transaction inputs
val addInput : inputs -> string -> string -> transaction {}

type outputs
val getOutput : outputs -> string -> option string

val direct : string -> inputs -> transaction outputs
val indirect : queryString -> transaction outputs

val sha1 : string -> string
val sha256 : string -> string

val hmac_sha1 : string -> string -> string
val hmac_sha256 : string -> string -> string

type dh
val modulus : dh -> string
val generator: dh -> string
val public : dh -> string

val generate : transaction dh
val compute : dh -> string -> transaction string
val xor : string -> string -> string

val remode : outputs -> string -> inputs