swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

refacto crypto: add eddsa.ml + rsa.ml

Browse source
This commit is contained in:
swrup 2026-03-20 22:47:58 +01:00 • committed by Swrup
parent 4e707b080a
commit 87f06339c8
16 changed files with 517 additions and 537 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/pg_type.ml
View file

@ -1,6 +1,5 @@
(* this module defines caqti encoding/decodings *)
open Caqti_type
open Crypto
open Api
let amount : Amount.t t =
@ -17,9 +16,9 @@ let ptime : unit t = Caqti_type.unit
let time = Time.Timestamp.caqti
let time_span = Time.TimeRelative.caqti
let age_mask : int t = Caqti_type.int
let rsa_pub = RsaPublicKey.caqti
let eddsa_pub = EddsaPublicKey.caqti
let eddsa_sig = EddsaSignature.caqti
let rsa_pub = Rsa.pub_caqti
let eddsa_pub = Eddsa.pub_caqti
let eddsa_sig = Eddsa.sig_caqti
(* todo: enum type for wire_method? *)
let wire_method = Caqti_type.string
@ -353,7 +352,7 @@ let exchange_partner_setup =
module Auditor = struct
type t = {
auditor_pub: Crypto.EddsaPublicKey.t;
auditor_pub: Eddsa.pub;
auditor_url: string;
auditor_name: string;
last_change: Time.Timestamp.t;