From b1b13a049199938b045c40f51354ed32803de34e Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Fri, 24 Mar 2017 11:20:17 -0700 Subject: [PATCH] sample plugins: Increment versions; note upstream Unicode changes. --- src/blowfish/NEWS | 12 ++++++++++++ src/blowfish/blowfish-check.scm | 4 ++-- src/blowfish/blowfish.scm | 17 +++++++---------- src/blowfish/configure.ac | 2 +- src/blowfish/debian/changelog | 8 ++++++++ src/gdbm/NEWS | 7 +++++++ src/gdbm/configure.ac | 2 +- src/gdbm/debian/changelog | 6 ++++++ src/mcrypt/NEWS | 16 ++++++++++++++++ src/mcrypt/configure.ac | 2 +- src/mcrypt/debian/changelog | 6 ++++++ src/md5/NEWS | 10 ++++++++++ src/md5/configure.ac | 2 +- src/md5/debian/changelog | 6 ++++++ src/mhash/NEWS | 18 ++++++++++++++++++ src/mhash/configure.ac | 2 +- src/mhash/debian/changelog | 6 ++++++ src/x11/NEWS | 8 ++++++++ src/x11/configure.ac | 2 +- src/x11/debian/changelog | 7 +++++++ 20 files changed, 125 insertions(+), 18 deletions(-) diff --git a/src/blowfish/NEWS b/src/blowfish/NEWS index 37c3d5d82..171519bd2 100644 --- a/src/blowfish/NEWS +++ b/src/blowfish/NEWS @@ -26,6 +26,18 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-blowfish 0.2.1 - Matt Birkholz, 2017-03-18 +============================================================ + +* Changed *everything* except perhaps compute-blowfish-init-vector; + you weren't supposed to care whether the init vector was a string or + soemthing else, like a bytevector. Every procedure that previously + accepted/returned strings now requires/produces bytevectors. If it + accepted/returned generic ports it now requires/produces binary + ports. If you are using the md5 plugin to produce a digest for + blowfish-set-key, you're winning, with blowfish-set-key at least; + the md5 plugin produces bytevectors instead of strings. + mit-scheme-pucked-blowfish 0.1.1 - Matt Birkholz, 2017-03-01 ============================================================ diff --git a/src/blowfish/blowfish-check.scm b/src/blowfish/blowfish-check.scm index f1bae2a10..ae2ca5f5b 100644 --- a/src/blowfish/blowfish-check.scm +++ b/src/blowfish/blowfish-check.scm @@ -31,7 +31,7 @@ USA. (lambda (output) (blowfish-encrypt-port (open-input-bytevector sample) output - "secret" + (string->utf8 "secret") (write-blowfish-file-header output) #t))) (let ((read-back @@ -39,7 +39,7 @@ USA. (lambda (input) (call-with-output-bytevector (lambda (output) - (blowfish-encrypt-port input output "secret" + (blowfish-encrypt-port input output (string->utf8 "secret") (read-blowfish-file-header input) #f))))))) (if (not (bytevector=? sample read-back)) diff --git a/src/blowfish/blowfish.scm b/src/blowfish/blowfish.scm index 8a042a8ce..13449bb09 100644 --- a/src/blowfish/blowfish.scm +++ b/src/blowfish/blowfish.scm @@ -31,19 +31,16 @@ USA. (C-include "blowfish") -(define (blowfish-set-key string) - ;; Generate a Blowfish key from STRING. - ;; STRING must be 72 bytes or less in length. +(define (blowfish-set-key bytes) + ;; Generate a Blowfish key from BYTES. + ;; BYTES must be a bytevector 72 bytes or less in length. ;; For text-string keys, use MD5 on the text, and pass the digest here. - (guarantee string? string 'blowfish-set-key) - (let* ((data (string->utf8 string)) - (len (bytevector-length data))) + (guarantee bytevector? bytes 'blowfish-set-key) + (let ((len (bytevector-length bytes))) (if (> len 72) - (error:bad-range-argument - string "a string encodable in UTF8 with fewer than 72 bytes" - 'blowfish-set-key)) + (error:bad-range-argument bytes "72 or fewer bytes" 'blowfish-set-key)) (let ((key (make-bytevector (C-sizeof "BF_KEY")))) - (C-call "BF_set_key" key len data) + (C-call "BF_set_key" key len bytes) key))) (define (blowfish-ecb input output key encrypt?) diff --git a/src/blowfish/configure.ac b/src/blowfish/configure.ac index da0653dc0..c474f6f28 100644 --- a/src/blowfish/configure.ac +++ b/src/blowfish/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked blowfish plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-blowfish]) AC_CONFIG_SRCDIR([blowfish.pkg]) diff --git a/src/blowfish/debian/changelog b/src/blowfish/debian/changelog index 80b313d86..d5c1fc50b 100644 --- a/src/blowfish/debian/changelog +++ b/src/blowfish/debian/changelog @@ -1,3 +1,11 @@ +mit-scheme-pucked-blowfish (0.2.1-1) experimental; urgency=low + + * New upstream; now using bytevectors. Patched so that even + blowfish-set-key requires a bytevector (a digest from the md5 + plugin). + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-blowfish (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. diff --git a/src/gdbm/NEWS b/src/gdbm/NEWS index 1715ae239..1e2d24fed 100644 --- a/src/gdbm/NEWS +++ b/src/gdbm/NEWS @@ -26,6 +26,13 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-gdbm 0.2.1 - Matt Birkholz, 2017-03-18 +======================================================== + +* New upstream converts Unicode strings (keys and data) to UTF8 + bytevectors. This assumes any other program adding keys or data is + using the same encoding. + mit-scheme-pucked-gdbm 0.1.1 - Matt Birkholz, 2017-03-01 ======================================================== diff --git a/src/gdbm/configure.ac b/src/gdbm/configure.ac index bc9d63807..19b3b6447 100644 --- a/src/gdbm/configure.ac +++ b/src/gdbm/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked gdbm plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-gdbm]) AC_CONFIG_SRCDIR([gdbm.pkg]) diff --git a/src/gdbm/debian/changelog b/src/gdbm/debian/changelog index 2bf554592..1d62b74b8 100644 --- a/src/gdbm/debian/changelog +++ b/src/gdbm/debian/changelog @@ -1,3 +1,9 @@ +mit-scheme-pucked-gdbm (0.2.1-1) experimental; urgency=low + + * New upstream; now using utf8 encoding. + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-gdbm (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. diff --git a/src/mcrypt/NEWS b/src/mcrypt/NEWS index 029e13d32..81c1032be 100644 --- a/src/mcrypt/NEWS +++ b/src/mcrypt/NEWS @@ -26,6 +26,22 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-mcrypt 0.2.1 - Matt Birkholz, 2017-03-18 +========================================================== + +New upstream with significant changes per the move to Unicode strings. + +* mcrypt-init: The key and init vector must be byte vectors of the + appropriate length (per mcrypt-supported-key-sizes and + mcrypt-init-vector-size respectively). + +* mcrypt-encrypt: The input and output strings must now be + bytevectors. + +* mcrypt-encrypt-port: The input and output ports must now be binary + ports. The key and init vector must be byte vectors of the + appropriate length. + mit-scheme-pucked-mcrypt 0.1.1 - Matt Birkholz, 2017-03-01 ========================================================== diff --git a/src/mcrypt/configure.ac b/src/mcrypt/configure.ac index 9d578042f..4c5d3e83a 100644 --- a/src/mcrypt/configure.ac +++ b/src/mcrypt/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked mcrypt plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-mcrypt]) AC_CONFIG_SRCDIR([mcrypt.pkg]) diff --git a/src/mcrypt/debian/changelog b/src/mcrypt/debian/changelog index 6ebcf146e..a0bd3fc91 100644 --- a/src/mcrypt/debian/changelog +++ b/src/mcrypt/debian/changelog @@ -1,3 +1,9 @@ +mit-scheme-pucked-mcrypt (0.2.1-1) experimental; urgency=low + + * New upstream; now using bytevectors. + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-mcrypt (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. diff --git a/src/md5/NEWS b/src/md5/NEWS index 96dd4bf98..fcb9e96a2 100644 --- a/src/md5/NEWS +++ b/src/md5/NEWS @@ -26,6 +26,16 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-md5 0.2.1 - Matt Birkholz, 2017-03-18 +======================================================= + +New upstream with significant changes per the move to Unicode strings. + +* The returned digests are now bytevectors, and md5-sum->number and + md5-sum->hexadecimal now require bytevectors. If you treated the + digests as opaque objects except for those converters, then you + continue to win. + mit-scheme-pucked-md5 0.1.1 - Matt Birkholz, 2017-03-01 ======================================================= diff --git a/src/md5/configure.ac b/src/md5/configure.ac index 348fc2206..ff26c2d57 100644 --- a/src/md5/configure.ac +++ b/src/md5/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked md5 plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-md5]) AC_CONFIG_SRCDIR([md5.pkg]) diff --git a/src/md5/debian/changelog b/src/md5/debian/changelog index 3d4b3f485..f4cd65709 100644 --- a/src/md5/debian/changelog +++ b/src/md5/debian/changelog @@ -1,3 +1,9 @@ +mit-scheme-pucked-md5 (0.2.1-1) experimental; urgency=low + + * New upstream; now using bytevectors. + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-md5 (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. diff --git a/src/mhash/NEWS b/src/mhash/NEWS index 0c11bc834..17b4cc198 100644 --- a/src/mhash/NEWS +++ b/src/mhash/NEWS @@ -26,6 +26,24 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-mhash 0.2.1 - Matt Birkholz, 2017-03-18 +========================================================= + +New upstream with significant changes per the move to Unicode strings. + +* All digests and salts are now bytevectors, not strings. Affected + procedures: mhash-end, mhash-file, mhash-hmac-end, mhash-keygen, + mhash-string and mhash-substring. + +* The -update procedures must be fed with (sub)bytevectors, not + (sub)strings. Affected procedures: mhash-update and mhash-hmac- + update. + +* mhash-sum->hexadecimal and mhash-sum->number now require + bytevectors. If you treated the digests as opaque objects except + for those converters (and did not use salt nor an -update + procedure), then you continue to win. + mit-scheme-pucked-mhash 0.1.1 - Matt Birkholz, 2017-03-01 ========================================================= diff --git a/src/mhash/configure.ac b/src/mhash/configure.ac index 0a28356b6..5d711ed87 100644 --- a/src/mhash/configure.ac +++ b/src/mhash/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked mhash plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-mhash]) AC_CONFIG_SRCDIR([mhash.pkg]) diff --git a/src/mhash/debian/changelog b/src/mhash/debian/changelog index 330db4164..b82a7f06d 100644 --- a/src/mhash/debian/changelog +++ b/src/mhash/debian/changelog @@ -1,3 +1,9 @@ +mit-scheme-pucked-mhash (0.2.1-1) experimental; urgency=low + + * New upstream; now using bytevectors. + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-mhash (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. diff --git a/src/x11/NEWS b/src/x11/NEWS index a0611bfd4..eb82f8687 100644 --- a/src/x11/NEWS +++ b/src/x11/NEWS @@ -26,6 +26,14 @@ along with MIT/GNU Scheme; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. +mit-scheme-pucked-x11 0.2.1 - Matt Birkholz, 2017-03-18 +======================================================= + +* New upstream converts strings (atom names and xterm content) to UTF8 + bytes for the foreign library. This should be transparent if you + were using standard ASCII property names and writing only ASCII + graphical characters to your xterms. + mit-scheme-pucked-x11 0.1.1 - Matt Birkholz, 2017-03-01 ======================================================= diff --git a/src/x11/configure.ac b/src/x11/configure.ac index 325dd6477..fb30e5226 100644 --- a/src/x11/configure.ac +++ b/src/x11/configure.ac @@ -2,7 +2,7 @@ dnl Process this file with autoconf to produce a configure script. AC_PREREQ([2.69]) AC_INIT([MIT/GNU Scheme Pucked x11 plugin], - [0.1.1], + [0.2.1], [matt@birchwood-abbey.net], [mit-scheme-pucked-x11]) AC_CONFIG_SRCDIR([x11.pkg]) diff --git a/src/x11/debian/changelog b/src/x11/debian/changelog index e39fa1a9c..4aac5de6b 100644 --- a/src/x11/debian/changelog +++ b/src/x11/debian/changelog @@ -1,3 +1,10 @@ +mit-scheme-pucked-x11 (0.2.1-1) experimental; urgency=low + + * New upstream converts strings (e.g. atom names, xterm content) to + UTF8 bytes for the foreign library. + + -- Matt Birkholz Sat, 18 Mar 2017 00:00:00 -0700 + mit-scheme-pucked-x11 (0.1.1-1) experimental; urgency=low * Stolen from MIT/GNU Scheme. -- 2.25.1