Commit 0e8560ea authored by gerd's avatar gerd

SVN fixups


git-svn-id: https://godirepo.camlcity.org/svn/lib-cryptgps/trunk@25 b101cce4-44db-0310-b718-db4b2d8d2e05
parent cf3db218
(* $Id: crypt_3des.ml,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -128,15 +128,3 @@ module Cryptmodes = Cryptmodes_64.Make_modes(Cryptsystem)
;;
(* ======================================================================
* History:
*
* $Log: crypt_3des.ml,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/18 00:23:58 gerd
* First release.
*
*
*)
(* $Id: crypt_3des.mli,v 1.1 1999/06/18 00:23:58 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -45,11 +45,3 @@ val set_parity : string -> string
* - There are very few weak keys.
*)
(* ======================================================================
* History:
*
* $Log: crypt_3des.mli,v $
* Revision 1.1 1999/06/18 00:23:58 gerd
* First release.
*
*)
(* $Id: crypt_blowfish.ml,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -763,15 +763,3 @@ module Cryptmodes = Cryptmodes_64.Make_modes(Cryptsystem)
;;
(* ======================================================================
* History:
*
* $Log: crypt_blowfish.ml,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/04 20:42:00 gerd
* Initial revision.
*
*
*)
(* $Id: crypt_blowfish.mli,v 1.1 1999/06/04 20:42:01 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -21,12 +21,3 @@ module Cryptmodes : Cryptmodes_64.T with type key = Cryptsystem.key;;
* - Blowfish is public domain, i.e. free from patents.
*)
(* ======================================================================
* History:
*
* $Log: crypt_blowfish.mli,v $
* Revision 1.1 1999/06/04 20:42:01 gerd
* Initial revision.
*
*
*)
(* $Id: crypt_blowfish32.ml,v 1.1 2001/03/10 16:43:00 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -747,11 +747,3 @@ module Cryptmodes = Cryptmodes_64.Make_modes_int32(Cryptsystem)
;;
(* ======================================================================
* History:
*
* $Log: crypt_blowfish32.ml,v $
* Revision 1.1 2001/03/10 16:43:00 gerd
* Initial revision.
*
*)
(* $Id: crypt_blowfish32.mli,v 1.1 2001/03/10 16:43:00 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -24,11 +24,3 @@ module Cryptmodes : Cryptmodes_64.T with type key = Cryptsystem.key;;
(* THIS VERSION OF BLOWFISH USES INT32 ARITHMETIC, AND IS EXPERIMENTAL. *)
(* ======================================================================
* History:
*
* $Log: crypt_blowfish32.mli,v $
* Revision 1.1 2001/03/10 16:43:00 gerd
* Initial revision.
*
*)
(* $Id: crypt_des.ml,v 1.10 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -835,52 +835,3 @@ module Cryptmodes = Cryptmodes_64.Make_modes(Cryptsystem)
;;
(* ======================================================================
* history:
*
* $Log: crypt_des.ml,v $
* Revision 1.10 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.9 1999/06/18 00:23:58 gerd
* First release.
*
* Revision 1.8 1999/06/17 21:00:31 gerd
* Some additions have been turned into lor operations (faster).
* The Lazy.force calls in the 'des' functions have been avoided.
*
* Revision 1.7 1999/06/17 20:39:46 gerd
* The initial iperm and xperm permutations have been combined
* such that only one table lookup is necessary.
*
* Revision 1.6 1999/06/17 20:26:35 gerd
* In previous revisions, in every 'do_rounds' loop cycle the 'xperm'
* permutation was applied again to convert 32 bit numbers to 48 bit numbers.
* Now the 'do_rounds' directly works with 48 bit numbers, and 32 bit
* entites are converted on entry and on exit. Effectively, we have now
* two 'xperm's and two inverse 'xperm's instead of 16 'xperm's before.
*
* Revision 1.5 1999/06/17 19:41:10 gerd
* Logical operations differ in their speed because of Ocaml's
* integer representation. lor and land are a bit faster than lxor.
* Because of this I reduced the number of lxor operations.
*
* Revision 1.4 1999/06/17 16:51:33 gerd
* The 'xperm' permutation is done by bit-shifting instead of
* an array lookup.
*
* Revision 1.3 1999/06/17 15:57:02 gerd
* Invocations of 'do_perm32', 'do_perm48', and 'do_perm64' have
* been manually inlined. This speeds the algorithm up from 55 sec per
* 1MB CBC-encryption to 38 sec.
*
* Revision 1.2 1999/06/17 15:24:24 gerd
* Instead of calling 'f' sequently, there is now a loop. This
* prevents the compiler from inlining the 16 invocations of 'f', which
* leads to shorter code and MUCH better cache performance.
*
* Revision 1.1 1999/06/17 14:55:04 gerd
* Added module for DES.
*
*
*)
(* $Id: crypt_des.mli,v 1.1 1999/06/17 14:55:04 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -36,11 +36,3 @@ val set_parity : string -> string
* - There are very few weak keys.
*)
(* ======================================================================
* History:
*
* $Log: crypt_des.mli,v $
* Revision 1.1 1999/06/17 14:55:04 gerd
* Added module for DES.
*
*)
(* $Id: cryptmodes_64.ml,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -567,15 +567,3 @@ module Make_modes_int32 (M : Cryptsystem_64.T) =
;;
(* ======================================================================
* History:
*
* $Log: cryptmodes_64.ml,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/04 20:42:01 gerd
* Initial revision.
*
*
*)
(* $Id: cryptmodes_64.mli,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -213,15 +213,3 @@ module Make_modes_int32 (M : Cryptsystem_64.T) : T with type key = M.key
(* ======================================================================
* History:
*
* $Log: cryptmodes_64.mli,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/04 20:42:01 gerd
* Initial revision.
*
*
*)
(* $Id: cryptsystem_64.ml,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -46,15 +46,3 @@ module type T =
(* ======================================================================
* History:
*
* $Log: cryptsystem_64.ml,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/04 20:42:01 gerd
* Initial revision.
*
*
*)
(* $Id: cryptsystem_64.mli,v 1.2 2001/03/10 16:43:21 gerd Exp $
(* $Id$
* ----------------------------------------------------------------------
* This module is part of the cryptgps package by Gerd Stolpmann.
*)
......@@ -73,15 +73,3 @@ module type T =
(* ======================================================================
* History:
*
* $Log: cryptsystem_64.mli,v $
* Revision 1.2 2001/03/10 16:43:21 gerd
* int32 experiments
*
* Revision 1.1 1999/06/04 20:42:01 gerd
* Initial revision.
*
*
*)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment