projects
/
monkeysphere.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
8a10ced
)
more portable perl-based simple_checksum; i think this is correct, but i welcome...
author
Daniel Kahn Gillmor
<dkg@fifthhorseman.net>
Tue, 7 Apr 2009 01:09:12 +0000
(21:09 -0400)
committer
Daniel Kahn Gillmor
<dkg@fifthhorseman.net>
Tue, 7 Apr 2009 01:09:12 +0000
(21:09 -0400)
src/share/keytrans
patch
|
blob
|
history
diff --git
a/src/share/keytrans
b/src/share/keytrans
index 8b2e2ea52b926a006896de9b1adee71eea6b1f32..e6777ffd4a35805d96cbd55ead27042cdbecd1f4 100755
(executable)
--- a/
src/share/keytrans
+++ b/
src/share/keytrans
@@
-195,11
+195,11
@@
my $keyserver_prefs = { nomodify => 0x80
########### Math/Utility Functions ##############
-# see the bottom of page 4
3 of RFC 4880
+# see the bottom of page 4
4 of RFC 4880 (http://tools.ietf.org/html/rfc4880#page-44)
sub simple_checksum {
my $bytes = shift;
- return unpack("%
32W*",$bytes) % 65536
;
+ return unpack("%
16C*",$bytes)
;
}
# calculate the multiplicative inverse of a mod b this is euclid's