mirror of
git://git.code.sf.net/p/sbcl/sbcl
synced 2026-09-10 07:26:40 -04:00
Incorporate latest code from MD5 github repo
This commit is contained in:
parent
92424e4082
commit
1d44b0f080
4
NEWS
4
NEWS
|
|
@ -9,6 +9,10 @@ changes relative to sbcl-1.3.16:
|
|||
for page faults outside of dynamic space by changing the C symbol
|
||||
"sbcl_fallback_sigsegv_handler".
|
||||
* bug fix: sb-cover does not lose source positions for AND/OR/COND.
|
||||
* The bundled sb-md5 contrib has been updated to release 2.0.4
|
||||
which is licensed under Creative Commons CC0 per author's statement
|
||||
https://github.com/pmai/md5/commit/fd134e71b71a10ab78905833a7cb9d4d6817c589
|
||||
(Refer to NEWS and COPYING in the contrib/sb-md5 subdirectory)
|
||||
|
||||
changes in sbcl-1.3.16 relative to sbcl-1.3.15:
|
||||
* optimization: various small tweaks give around 5% faster garbage
|
||||
|
|
|
|||
130
contrib/sb-md5/COPYING
Normal file
130
contrib/sb-md5/COPYING
Normal file
|
|
@ -0,0 +1,130 @@
|
|||
This software has been placed into the public domain.
|
||||
|
||||
This software is "as is", and has no warranty of any kind. The
|
||||
authors assume no responsibility for the consequences of any use of
|
||||
this software.
|
||||
|
||||
Additionally for all parts of this software ("The Work" below) authored
|
||||
by Pierre R. Mai copyright is waived under the CC0 as affirmed below:
|
||||
|
||||
Creative Commons Legal Code
|
||||
|
||||
CC0 1.0 Universal
|
||||
|
||||
CREATIVE COMMONS CORPORATION IS NOT A LAW FIRM AND DOES NOT PROVIDE
|
||||
LEGAL SERVICES. DISTRIBUTION OF THIS DOCUMENT DOES NOT CREATE AN
|
||||
ATTORNEY-CLIENT RELATIONSHIP. CREATIVE COMMONS PROVIDES THIS
|
||||
INFORMATION ON AN "AS-IS" BASIS. CREATIVE COMMONS MAKES NO WARRANTIES
|
||||
REGARDING THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS
|
||||
PROVIDED HEREUNDER, AND DISCLAIMS LIABILITY FOR DAMAGES RESULTING FROM
|
||||
THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS PROVIDED
|
||||
HEREUNDER.
|
||||
|
||||
Statement of Purpose
|
||||
|
||||
The laws of most jurisdictions throughout the world automatically confer
|
||||
exclusive Copyright and Related Rights (defined below) upon the creator
|
||||
and subsequent owner(s) (each and all, an "owner") of an original work of
|
||||
authorship and/or a database (each, a "Work").
|
||||
|
||||
Certain owners wish to permanently relinquish those rights to a Work for
|
||||
the purpose of contributing to a commons of creative, cultural and
|
||||
scientific works ("Commons") that the public can reliably and without fear
|
||||
of later claims of infringement build upon, modify, incorporate in other
|
||||
works, reuse and redistribute as freely as possible in any form whatsoever
|
||||
and for any purposes, including without limitation commercial purposes.
|
||||
These owners may contribute to the Commons to promote the ideal of a free
|
||||
culture and the further production of creative, cultural and scientific
|
||||
works, or to gain reputation or greater distribution for their Work in
|
||||
part through the use and efforts of others.
|
||||
|
||||
For these and/or other purposes and motivations, and without any
|
||||
expectation of additional consideration or compensation, the person
|
||||
associating CC0 with a Work (the "Affirmer"), to the extent that he or she
|
||||
is an owner of Copyright and Related Rights in the Work, voluntarily
|
||||
elects to apply CC0 to the Work and publicly distribute the Work under its
|
||||
terms, with knowledge of his or her Copyright and Related Rights in the
|
||||
Work and the meaning and intended legal effect of CC0 on those rights.
|
||||
|
||||
1. Copyright and Related Rights. A Work made available under CC0 may be
|
||||
protected by copyright and related or neighboring rights ("Copyright and
|
||||
Related Rights"). Copyright and Related Rights include, but are not
|
||||
limited to, the following:
|
||||
|
||||
i. the right to reproduce, adapt, distribute, perform, display,
|
||||
communicate, and translate a Work;
|
||||
ii. moral rights retained by the original author(s) and/or performer(s);
|
||||
iii. publicity and privacy rights pertaining to a person's image or
|
||||
likeness depicted in a Work;
|
||||
iv. rights protecting against unfair competition in regards to a Work,
|
||||
subject to the limitations in paragraph 4(a), below;
|
||||
v. rights protecting the extraction, dissemination, use and reuse of data
|
||||
in a Work;
|
||||
vi. database rights (such as those arising under Directive 96/9/EC of the
|
||||
European Parliament and of the Council of 11 March 1996 on the legal
|
||||
protection of databases, and under any national implementation
|
||||
thereof, including any amended or successor version of such
|
||||
directive); and
|
||||
vii. other similar, equivalent or corresponding rights throughout the
|
||||
world based on applicable law or treaty, and any national
|
||||
implementations thereof.
|
||||
|
||||
2. Waiver. To the greatest extent permitted by, but not in contravention
|
||||
of, applicable law, Affirmer hereby overtly, fully, permanently,
|
||||
irrevocably and unconditionally waives, abandons, and surrenders all of
|
||||
Affirmer's Copyright and Related Rights and associated claims and causes
|
||||
of action, whether now known or unknown (including existing as well as
|
||||
future claims and causes of action), in the Work (i) in all territories
|
||||
worldwide, (ii) for the maximum duration provided by applicable law or
|
||||
treaty (including future time extensions), (iii) in any current or future
|
||||
medium and for any number of copies, and (iv) for any purpose whatsoever,
|
||||
including without limitation commercial, advertising or promotional
|
||||
purposes (the "Waiver"). Affirmer makes the Waiver for the benefit of each
|
||||
member of the public at large and to the detriment of Affirmer's heirs and
|
||||
successors, fully intending that such Waiver shall not be subject to
|
||||
revocation, rescission, cancellation, termination, or any other legal or
|
||||
equitable action to disrupt the quiet enjoyment of the Work by the public
|
||||
as contemplated by Affirmer's express Statement of Purpose.
|
||||
|
||||
3. Public License Fallback. Should any part of the Waiver for any reason
|
||||
be judged legally invalid or ineffective under applicable law, then the
|
||||
Waiver shall be preserved to the maximum extent permitted taking into
|
||||
account Affirmer's express Statement of Purpose. In addition, to the
|
||||
extent the Waiver is so judged Affirmer hereby grants to each affected
|
||||
person a royalty-free, non transferable, non sublicensable, non exclusive,
|
||||
irrevocable and unconditional license to exercise Affirmer's Copyright and
|
||||
Related Rights in the Work (i) in all territories worldwide, (ii) for the
|
||||
maximum duration provided by applicable law or treaty (including future
|
||||
time extensions), (iii) in any current or future medium and for any number
|
||||
of copies, and (iv) for any purpose whatsoever, including without
|
||||
limitation commercial, advertising or promotional purposes (the
|
||||
"License"). The License shall be deemed effective as of the date CC0 was
|
||||
applied by Affirmer to the Work. Should any part of the License for any
|
||||
reason be judged legally invalid or ineffective under applicable law, such
|
||||
partial invalidity or ineffectiveness shall not invalidate the remainder
|
||||
of the License, and in such case Affirmer hereby affirms that he or she
|
||||
will not (i) exercise any of his or her remaining Copyright and Related
|
||||
Rights in the Work or (ii) assert any associated claims and causes of
|
||||
action with respect to the Work, in either case contrary to Affirmer's
|
||||
express Statement of Purpose.
|
||||
|
||||
4. Limitations and Disclaimers.
|
||||
|
||||
a. No trademark or patent rights held by Affirmer are waived, abandoned,
|
||||
surrendered, licensed or otherwise affected by this document.
|
||||
b. Affirmer offers the Work as-is and makes no representations or
|
||||
warranties of any kind concerning the Work, express, implied,
|
||||
statutory or otherwise, including without limitation warranties of
|
||||
title, merchantability, fitness for a particular purpose, non
|
||||
infringement, or the absence of latent or other defects, accuracy, or
|
||||
the present or absence of errors, whether or not discoverable, all to
|
||||
the greatest extent permissible under applicable law.
|
||||
c. Affirmer disclaims responsibility for clearing rights of other persons
|
||||
that may apply to the Work or any use thereof, including without
|
||||
limitation any person's Copyright and Related Rights in the Work.
|
||||
Further, Affirmer disclaims responsibility for obtaining any necessary
|
||||
consents, permissions or other rights required for any use of the
|
||||
Work.
|
||||
d. Affirmer understands and acknowledges that Creative Commons is not a
|
||||
party to this document and has no duty or obligation with respect to
|
||||
this CC0 or use of the Work.
|
||||
57
contrib/sb-md5/NEWS
Normal file
57
contrib/sb-md5/NEWS
Normal file
|
|
@ -0,0 +1,57 @@
|
|||
Release 2.0.4
|
||||
=============
|
||||
|
||||
* Clarified public domain status for code authored by Pierre R. Mai
|
||||
through additional CC0 waiver.
|
||||
|
||||
Release 2.0.3
|
||||
=============
|
||||
|
||||
* Add support for md5sum-string for other implementations through
|
||||
through flexi-streams. Patch supplied by Daniel Kochmanski.
|
||||
|
||||
|
||||
Release 2.0.2
|
||||
=============
|
||||
|
||||
* This release adds support for LispWorks 7.0, reworking the fixes
|
||||
for 64-bit implementations of Lispworks in 2.0.1 and incorrect
|
||||
use of the sys:simple-int32-vector type. Patch supplied by
|
||||
Martin Simmons from LispWorks.
|
||||
|
||||
* Minor fix to prevent style-warnings for implementations with no
|
||||
support for md5sum-string.
|
||||
|
||||
|
||||
Release 2.0.1
|
||||
=============
|
||||
|
||||
* This release fixes problems on 64-bit implementations of Lispworks,
|
||||
where sys:int32 arithmetic can overflow 32-bit values and hence
|
||||
yield wrong results.
|
||||
|
||||
|
||||
Release 2.0.0
|
||||
=============
|
||||
|
||||
* This release consolidates the various versions of md5 that have
|
||||
been floating around, including versions with Lispworks
|
||||
optimizations, the version maintained by Kevin M. Rosenberg, the
|
||||
SBCL-optimized version, and various patches and fixes.
|
||||
|
||||
* This release tries to separate out string-handling from actual
|
||||
byte-based MD5 hash generation. Hence users who want to generate
|
||||
hashes from strings should use the new md5sum-string function,
|
||||
which will go through your implementation's external-format
|
||||
handling to generate the actual byte-array that is hashed. Usage
|
||||
of md5sum-sequence for strings and md5sum-stream for character
|
||||
streams is deprecated, since it only ever worked correctly for 8bit
|
||||
characters in most implementations.
|
||||
|
||||
* This release should work correctly on at least recentish versions
|
||||
of CMUCL, SBCL, ECL, CCL, Lispworks, AllegroCL and ABCL and
|
||||
generally most other conforming implementations. It has been
|
||||
optimized for CMUCL, SBCL and Lispworks, and should work with
|
||||
adequate performance on most 64bit implementations. Performance on
|
||||
other 32bit implementations is still sub-optimal if they don't
|
||||
support unboxed bit-operations on (unsigned-byte 32).
|
||||
File diff suppressed because it is too large
Load diff
|
|
@ -1,13 +1,27 @@
|
|||
;;; -*- Lisp -*-
|
||||
;;;; MD5 --- RFC 1321 The MD5 Message-Digest Algorithm
|
||||
|
||||
(defpackage #:sb-md5-system
|
||||
(:use #:cl #:asdf))
|
||||
|
||||
(in-package #:sb-md5-system)
|
||||
|
||||
;;;; %File Description:
|
||||
;;;;
|
||||
;;;; This file contains the system definition form for the MD5
|
||||
;;;; Library. System definitions use the ASDF system definition
|
||||
;;;; facility.
|
||||
;;;;
|
||||
|
||||
(defsystem sb-md5
|
||||
:depends-on (sb-rotate-byte)
|
||||
:version "1.8"
|
||||
:description "The MD5 Message-Digest Algorithm RFC 1321"
|
||||
:author "Pierre R. Mai <pmai@pmsf.de>"
|
||||
:maintainer "Pierre R. Mai <pmai@pmsf.de>"
|
||||
:licence "CC0"
|
||||
:version "2.0.4"
|
||||
:depends-on (#+sbcl "sb-rotate-byte"
|
||||
#-(or :cmu :sbcl
|
||||
(and :lispworks (not :lispworks4))
|
||||
:ccl :allegro)
|
||||
"flexi-streams")
|
||||
#+sb-building-contrib :pathname
|
||||
#+sb-building-contrib #p"SYS:CONTRIB;SB-MD5;"
|
||||
:components ((:file "md5")))
|
||||
|
|
@ -21,7 +35,7 @@
|
|||
|
||||
(defsystem sb-md5-tests
|
||||
:depends-on (sb-md5 sb-rt)
|
||||
:version "1.8"
|
||||
:version "2.0.4"
|
||||
:components ((:file "md5-tests")))
|
||||
|
||||
(defmethod perform ((o test-op) (c (eql (find-system :sb-md5-tests))))
|
||||
|
|
|
|||
Loading…
Reference in a new issue