summaryrefslogtreecommitdiff
path: root/module/spki.m
diff options
context:
space:
mode:
authorforsyth <forsyth@vitanuova.com>2011-01-17 10:45:22 +0000
committerforsyth <forsyth@vitanuova.com>2011-01-17 10:45:22 +0000
commit9e6910dc0c747c8f30b87f6482f4eadb48ad6654 (patch)
tree4f835b35913acfb115b15ea4f1c6af40fd77ab54 /module/spki.m
parent16501eaf1cb642b80d7fa0236407a27aecb35b02 (diff)
emu/Nt/ipif.c
Diffstat (limited to 'module/spki.m')
-rw-r--r--module/spki.m12
1 files changed, 6 insertions, 6 deletions
diff --git a/module/spki.m b/module/spki.m
index fbb82ba7..3ddeb661 100644
--- a/module/spki.m
+++ b/module/spki.m
@@ -37,8 +37,8 @@ SPKI: module
};
Key: adt {
- pk: ref Keyring->PK; # either pk/sk or hash might be nil
- sk: ref Keyring->SK;
+ pk: ref Crypt->PK; # either pk/sk or hash might be nil
+ sk: ref Crypt->SK;
nbits: int;
halg: string; # basic signature hash algorithm
henc: string; # pre-signature encoding
@@ -49,9 +49,9 @@ SPKI: module
ishash: fn(k: self ref Key): int;
public: fn(k: self ref Key): ref Key;
sigalg: fn(k: self ref Key): string;
- text: fn(k: self ref Key): string;
+ text: fn(k: self ref Key): string;
sexp: fn(k: self ref Key): ref Sexprs->Sexp;
- eq: fn(k1: self ref Key, k2: ref Key): int;
+ eq: fn(k1: self ref Key, k2: ref Key): int;
};
Name: adt {
@@ -120,7 +120,7 @@ SPKI: module
hash: ref Hash;
key: ref Key; # find by hash if necessary
sa: string; # alg[-[encoding-]hash]
- sig: list of (string, array of byte);
+ params: array of (string, array of byte);
algs: fn(s: self ref Signature): (string, string, string);
sexp: fn(s: self ref Signature): ref Sexprs->Sexp;
@@ -197,7 +197,7 @@ SPKI: module
# signature checking
checksig: fn(c: ref Cert, sig: ref Signature): string;
- sig2icert: fn(sig: ref Signature, signer: string, exp: int): ref Keyring->Certificate;
+ #sig2icert: fn(sig: ref Signature, signer: string, exp: int): ref Oldauth->Certificate;
# signature making
signcert: fn(c: ref Cert, sigalg: string, key: ref Key): (ref Signature, string);