[Pkg-sks-commit] r71 - sks/trunk/sks/debian/patches
chrism at alioth.debian.org
chrism at alioth.debian.org
Thu Jun 19 14:49:58 UTC 2008
Author: chrism
Date: 2008-06-19 14:49:57 +0000 (Thu, 19 Jun 2008)
New Revision: 71
Added:
sks/trunk/sks/debian/patches/504_key_types
Log:
[project @ 72]
Add type (rsa, dsa, ..) to key output
Original author: weasel
Date: 2003-12-06 23:39:44.579602+00:00
Added: sks/trunk/sks/debian/patches/504_key_types
===================================================================
--- sks/trunk/sks/debian/patches/504_key_types (rev 0)
+++ sks/trunk/sks/debian/patches/504_key_types 2008-06-19 14:49:57 UTC (rev 71)
@@ -0,0 +1,23 @@
+--- sks-1.0.6/htmlTemplates.ml.orig Sun Dec 7 00:30:06 2003
++++ sks-1.0.6/htmlTemplates.ml Sun Dec 7 00:30:39 2003
+@@ -69,9 +69,18 @@
+
+ let keyinfo_pks pki ~keyid ~link ~userids =
+ let tm = gmtime (Int64.to_float pki.pk_ctime) in
++ let algo = match pki.pk_alg with
++ 1 -> "R" (* RSA sign and encrypt *)
++ | 2 -> "r" (* RSA encrypt *)
++ | 3 -> "s" (* RSA sign *)
++ | 16 -> "g" (* ElGamal encrypt *)
++ | 20 -> "G" (* ElGamal sign and encrypt *)
++ | 17 -> "D" (* DSA *)
++ | _ -> "?" (* NoClue *)
++ in
+ let base =
+- sprintf "pub %4d/<a href=\"%s\">%8s</a> %4d/%02d/%02d "
+- pki.pk_keylen link keyid
++ sprintf "pub %4d%s/<a href=\"%s\">%8s</a> %4d/%02d/%02d "
++ pki.pk_keylen algo link keyid
+ (1900 + tm.tm_year)
+ (tm.tm_mon + 1)
+ tm.tm_mday
More information about the Pkg-sks-commit
mailing list