updated eel and eapml from more recent versions.
This commit is contained in:
@@ -1 +0,0 @@
|
||||
EIFGENs/
|
||||
4
contrib/ise_library/text/encryption/eel/README.txt
Normal file
4
contrib/ise_library/text/encryption/eel/README.txt
Normal file
@@ -0,0 +1,4 @@
|
||||
An encryption library in Eiffel
|
||||
|
||||
Contribution from Colin LeMahieu
|
||||
see original source: https://github.com/clemahieu/eel
|
||||
@@ -13,13 +13,12 @@
|
||||
</option>
|
||||
<library name="base" location="$ISE_LIBRARY\library\base\base-safe.ecf"/>
|
||||
<library name="eapml" location="..\..\..\math\eapml\eapml-safe.ecf"/>
|
||||
<cluster name="eel" location=".\" recursive="true">
|
||||
<cluster name="eel" location=".\src" recursive="true">
|
||||
<option syntax="standard">
|
||||
<assertions precondition="true" postcondition="true" check="true" loop="true" supplier_precondition="true"/>
|
||||
</option>
|
||||
<file_rule>
|
||||
<exclude>/x509$</exclude>
|
||||
<exclude>/tests$</exclude>
|
||||
</file_rule>
|
||||
</cluster>
|
||||
</target>
|
||||
|
||||
@@ -13,12 +13,12 @@
|
||||
</option>
|
||||
<library name="base" location="$ISE_LIBRARY\library\base\base.ecf"/>
|
||||
<library name="eapml" location="..\..\..\math\eapml\eapml.ecf"/>
|
||||
<cluster name="eel" location=".\" recursive="true">
|
||||
<cluster name="eel" location=".\src" recursive="true">
|
||||
<option syntax="standard">
|
||||
<assertions precondition="true" postcondition="true" check="true" loop="true" supplier_precondition="true"/>
|
||||
</option>
|
||||
<file_rule>
|
||||
<exclude>/tests</exclude>
|
||||
<exclude>/x509$</exclude>
|
||||
</file_rule>
|
||||
</cluster>
|
||||
</target>
|
||||
|
||||
@@ -1,23 +0,0 @@
|
||||
<?xml version="1.0" encoding="ISO-8859-1"?>
|
||||
<system xmlns="http://www.eiffel.com/developers/xml/configuration-1-6-0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.eiffel.com/developers/xml/configuration-1-6-0 http://www.eiffel.com/developers/xml/configuration-1-6-0.xsd" name="eel" uuid="2A5F116C-6A76-4AB7-81A0-A73DF516F4F3" library_target="eel">
|
||||
<target name="eel">
|
||||
<root all_classes="true"/>
|
||||
<option profile="false" warning="true" full_class_checking="true" is_attached_by_default="true" void_safety="none" syntax="standard">
|
||||
<assertions precondition="true" postcondition="true" check="true" loop="true" supplier_precondition="true"/>
|
||||
</option>
|
||||
<library name="base" location="$ISE_LIBRARY\library\base\base.ecf"/>
|
||||
<library name="eapml" location="..\eapml\eapml.ecf"/>
|
||||
<cluster name="eel" location=".\" recursive="true">
|
||||
<option syntax="standard">
|
||||
<assertions precondition="true" postcondition="true" check="true" loop="true" supplier_precondition="true"/>
|
||||
</option>
|
||||
<file_rule>
|
||||
<exclude>/EIFGENs$</exclude>
|
||||
<exclude>/CVS$</exclude>
|
||||
<exclude>/.svn$</exclude>
|
||||
<exclude>/tests</exclude>
|
||||
<exclude>/.hg$</exclude>
|
||||
</file_rule>
|
||||
</cluster>
|
||||
</target>
|
||||
</system>
|
||||
@@ -1 +0,0 @@
|
||||
Favorites()
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {RSA_KEY_PAIR}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "If you think health care is expensive now, wait until you see what it costs when it's free. - P.J. O'Rourke (1993)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {RSA_PRIVATE_KEY}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "If you have ten thousand regulations, you destroy all respect for the law. - Winston Churchill"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {RSA_KEY}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Tyranny is always better organized than freedom. - Charles Peguy"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Reader, suppose you were an idiot. And suppose you were a member of Congress. But I repeat myself. - Mark Twain"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tagging class for various size/speed tradeoffs of AES"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Talk is cheap - except when Congress does it. - Cullen Hightower"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The single most exciting thing you encounter in government is competence, because it's so rare. - Daniel Patrick Moynihan (1976)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {ARRAY_FACILITIES}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2012-01-17 09:03:25 +0100 (mar., 17 janv. 2012) $"
|
||||
revision: "$Revision: 88192 $"
|
||||
quote: "The human race divides politically into those who want people to be controlled and those who have no such desire. - Robert A. Heinlein"
|
||||
|
||||
deferred class
|
||||
@@ -54,15 +54,15 @@ feature {ARRAY_FACILITIES} -- Big endian NATURAL_32
|
||||
valid_start: source.valid_index (offset)
|
||||
valid_end: source.valid_index (offset + 3)
|
||||
do
|
||||
result := source [offset].to_natural_32 |<< 24
|
||||
result := result | (source [offset + 1].to_natural_32 |<< 16)
|
||||
result := result | (source [offset + 2].to_natural_32 |<< 8)
|
||||
result := result | source [offset + 3].to_natural_32
|
||||
Result := source [offset].to_natural_32 |<< 24
|
||||
Result := Result | (source [offset + 1].to_natural_32 |<< 16)
|
||||
Result := Result | (source [offset + 2].to_natural_32 |<< 8)
|
||||
Result := Result | source [offset + 3].to_natural_32
|
||||
ensure
|
||||
byte_0: source [offset] = (result |>> 24).to_natural_8
|
||||
byte_1: source [offset + 1] = (result |>> 16).to_natural_8
|
||||
byte_2: source [offset + 2] = (result |>> 8).to_natural_8
|
||||
byte_3: source [offset + 3] = result.to_natural_8
|
||||
byte_0: source [offset] = (Result |>> 24).to_natural_8
|
||||
byte_1: source [offset + 1] = (Result |>> 16).to_natural_8
|
||||
byte_2: source [offset + 2] = (Result |>> 8).to_natural_8
|
||||
byte_3: source [offset + 3] = Result.to_natural_8
|
||||
end
|
||||
|
||||
from_natural_32_le (source: NATURAL_32 target: SPECIAL [NATURAL_8] offset: INTEGER_32)
|
||||
@@ -86,15 +86,15 @@ feature {ARRAY_FACILITIES} -- Big endian NATURAL_32
|
||||
valid_start: source.valid_index (offset)
|
||||
valid_end: source.valid_index (offset + 3)
|
||||
do
|
||||
result := source [offset].to_natural_32
|
||||
result := result | (source [offset + 1].to_natural_32 |<< 8)
|
||||
result := result | (source [offset + 2].to_natural_32 |<< 16)
|
||||
result := result | (source [offset + 3].to_natural_32 |<< 24)
|
||||
Result := source [offset].to_natural_32
|
||||
Result := Result | (source [offset + 1].to_natural_32 |<< 8)
|
||||
Result := Result | (source [offset + 2].to_natural_32 |<< 16)
|
||||
Result := Result | (source [offset + 3].to_natural_32 |<< 24)
|
||||
ensure
|
||||
byte_0: source [offset] = result.to_natural_8
|
||||
byte_1: source [offset + 1] = (result |>> 8).to_natural_8
|
||||
byte_2: source [offset + 2] = (result |>> 16).to_natural_8
|
||||
byte_3: source [offset + 3] = (result |>> 24).to_natural_8
|
||||
byte_0: source [offset] = Result.to_natural_8
|
||||
byte_1: source [offset + 1] = (Result |>> 8).to_natural_8
|
||||
byte_2: source [offset + 2] = (Result |>> 16).to_natural_8
|
||||
byte_3: source [offset + 3] = (Result |>> 24).to_natural_8
|
||||
end
|
||||
|
||||
feature {ARRAY_FACILITIES} -- Big endian NATURAL_64
|
||||
@@ -127,22 +127,22 @@ feature {ARRAY_FACILITIES} -- Big endian NATURAL_64
|
||||
valid_start: source.valid_index (offset)
|
||||
valid_end: source.valid_index (offset + 7)
|
||||
do
|
||||
result := source [offset].to_natural_32 |<< 56
|
||||
result := result | (source [offset + 1].to_natural_32 |<< 48)
|
||||
result := result | (source [offset + 2].to_natural_32 |<< 40)
|
||||
result := result | (source [offset + 3].to_natural_32 |<< 32)
|
||||
result := result | (source [offset + 4].to_natural_32 |<< 24)
|
||||
result := result | (source [offset + 5].to_natural_32 |<< 16)
|
||||
result := result | (source [offset + 6].to_natural_32 |<< 8)
|
||||
result := result | source [offset + 7].to_natural_32
|
||||
Result := source [offset].to_natural_64 |<< 56
|
||||
Result := Result | (source [offset + 1].to_natural_64 |<< 48)
|
||||
Result := Result | (source [offset + 2].to_natural_64 |<< 40)
|
||||
Result := Result | (source [offset + 3].to_natural_64 |<< 32)
|
||||
Result := Result | (source [offset + 4].to_natural_64 |<< 24)
|
||||
Result := Result | (source [offset + 5].to_natural_64 |<< 16)
|
||||
Result := Result | (source [offset + 6].to_natural_64 |<< 8)
|
||||
Result := Result | source [offset + 7].to_natural_64
|
||||
ensure
|
||||
byte_0: source [offset] = (result |>> 56).to_natural_8
|
||||
byte_1: source [offset + 1] = (result |>> 48).to_natural_8
|
||||
byte_2: source [offset + 2] = (result |>> 40).to_natural_8
|
||||
byte_3: source [offset + 3] = (result |>> 32).to_natural_8
|
||||
byte_4: source [offset + 4] = (result |>> 24).to_natural_8
|
||||
byte_5: source [offset + 5] = (result |>> 16).to_natural_8
|
||||
byte_6: source [offset + 6] = (result |>> 8).to_natural_8
|
||||
byte_7: source [offset + 7] = result.to_natural_8
|
||||
byte_0: source [offset] = (Result |>> 56).to_natural_8
|
||||
byte_1: source [offset + 1] = (Result |>> 48).to_natural_8
|
||||
byte_2: source [offset + 2] = (Result |>> 40).to_natural_8
|
||||
byte_3: source [offset + 3] = (Result |>> 32).to_natural_8
|
||||
byte_4: source [offset + 4] = (Result |>> 24).to_natural_8
|
||||
byte_5: source [offset + 5] = (Result |>> 16).to_natural_8
|
||||
byte_6: source [offset + 6] = (Result |>> 8).to_natural_8
|
||||
byte_7: source [offset + 7] = Result.to_natural_8
|
||||
end
|
||||
end
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Facilities to use a stream of bytes as blocks of bytes"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Democracy must be something more than two wolves and a sheep voting on what to have for dinner. - James Bovard (1994)"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {BYTE_64_BIT_BLOCK_FACILITIES}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The evils of tyranny are rarely seen but by him who resists it. - John Hay (1872)"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {ARRAY_FACILITIES}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2012-05-24 12:02:28 +0200 (jeu., 24 mai 2012) $"
|
||||
revision: "$Revision: 88775 $"
|
||||
quote: "The triumph of persuasion over force is the sign of a civilized society. - Mark Skousen"
|
||||
|
||||
deferred class
|
||||
@@ -27,7 +27,7 @@ feature -- Byte sinks
|
||||
byte_sink (in [index])
|
||||
index := index - 1
|
||||
variant
|
||||
index
|
||||
index + 1
|
||||
end
|
||||
end
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Facilities for INTEGER_X constants"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "There is no worse tyranny than to force a man to pay for what he does not want merely because you think it would be good for him. - Robert Heinlein "
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {ARRAY_DER_SINK}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
ARRAY_DER_SINK
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {ARRAY_DER_SOURCE}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
ARRAY_DER_SOURCE
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "An object that is DER encodable"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "I think the terror most people are concerned with is the IRS. - Malcolm Forbes, when asked if he was afraid of terrorism"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {DER_ENCODING}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
DER_ENCODING
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {DER_FACILITIES}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
deferred class
|
||||
DER_FACILITIES
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A sink for DER octets"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The illegal we do immediately. The unconstitutional takes a bit longer. - Henry Kissinger"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "DER octet source"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Our forefathers made one mistake. What they should have fought for was representation without taxation. - Fletcher Knebel, historian"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "ASN.1 universal class tag assignments X.680 8.4"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The usual road to slavery is that first they take away your guns, then they take away your property, then last of all they tell you to shut up and say you are enjoying it. - James A. Donald"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Blessed are the young, for they shall inherit the national debt. - Herbert Hoover"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "There's never been a good government. - Emma Goldman"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Useless laws weaken the necessary laws. - Montesquieu"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {SHA_FUNCTIONS}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The war for freedom will never really be won because the price of our freedom is constant vigilance over ourselves and over our Government. - Eleanor Roosevelt"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The natural progress of things is for liberty to yield and government to gain ground. - Thomas Jefferson"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "None are more hopelessly enslaved than those who falsely believe they are free. - Goethe"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "When the government's boot is on your throat, whether it is a left boot or a right boot is of no consequence. - Gary Lloyd"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Every decent man is ashamed of the government he lives under. - H.L. Mencken"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The urge to save humanity is almost always a false front for the urge to rule. - H.L. Mencken"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Where morality is present, laws are unnecessary. Without morality, laws are unenforceable. - Anonymous"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Extremism in the defense of liberty is no vice. Moderation in the pursuit of justice is no virtue. - Barry Goldwater (1964)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Liberty is not a means to a political end. It is itself the highest political end. - Lord Acton"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The power to tax is the power to destroy. - John Marshall"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Liberty lies in the hearts of men and women. When it dies there, no constitution, no law, no court can save it. - Justice Learned Hand"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "A nation of sheep will beget a government of wolves. - Edward R. Murrow"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "It is not the responsibility of the government or the legal system to protect a citizen from himself. - Justice Casey Percell"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The government was set to protect man from criminals - and the Constitution was written to protect man from the government. - Ayn Rand"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "What this country needs are more unemployed politicians. - Edward Langley"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Those who expect to reap the benefits of freedom, must, like men, undergo the fatigue of supporting it. - Thomas Paine"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Liberty is always dangerous, but it is the safest thing we have. - Harry Emerson Fosdick"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "It is much more important to kill bad bills than to pass good ones. - Calvin Coolidge"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {F2M_REPRESENTATIONS}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "To compel a man to furnish contributions of money for the propagation of opinions which he disbelieves and abhors, is sinful and tyrannical. - Thomas Jefferson"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "It is dangerous to be right when the government is wrong. - Voltaire"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {HMAC_SHA256}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The bureaucracy is expanding to meet the needs of an expanding bureaucracy."
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Cipher Block Chaining mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Just because you do not take an interest in politics doesn't mean politics won't take an interest in you. - Pericles (430 BC)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Cipher Block Chaining mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Nothing is so permanent as a temporary government program. - Milton Friedman"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A block cipher that can be the target of CBC mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "I don't make jokes. I just watch the government and report the facts. - Will Rogers"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Cipher Feedback decryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The strongest reason for the people to retain the right to bear arms is, as a last resort, to protect themselves against tyranny in government. - Thomas Jefferson"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {CFB_ENCRYPTION}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The era of resisting big government is never over. - Paul Gigot (1998)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A block cipher that can be the target of CFB mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The ultimate result of shielding men from the effects of folly is to fill the world with fools. - Herbert Spencer (1891)"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Counter decryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "If you have been voting for politicians who promise to give you goodies at someone else's expense, then you have no right to complain when they take your money and give it to someone else, including themselves. - Thomas Sowell (1992)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Counter encryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "There never was a good war or a bad peace. - Benjamin Franklin (1773) "
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A block cipher that can be the target of CTR mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Everything that is really great and inspiring is created by the individual who can labor in freedom. - Albert Einstein"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Electronic Codebook decryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "There are just two rules of governance in a free society: Mind your own business. Keep your hands to yourself. - P.J. O'Rourke (1993)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Electronic Codebook encryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Necessity is the plea for every infringement of human freedom. It is the argument of tyrants; it is the creed of slaves. - William Pitt (1783)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A block cipher that can be the target of ECB mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "A government that is big enough to give you all you want is big enough to take it all away. - Barry Goldwater (1964)"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {MODE_TEST_DATA}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The only thing necessary for evil to triumph is for good men to do nothing. - Edmund Burke"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Output Feedback decryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Sometimes it is said that man cannot be trusted with the government of himself. Can he, then, be trusted with the government of others? - Thomas Jefferson (1801)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Output Feedback encryption mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Power tends to corrupt, and absolute power corrupts absolutely. - Lord Acton (1887)"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "A block cipher that can be the target of OFB mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Political power grows out of the barrel of a gun. - Mao Zedong (1938)"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Provides facilities to rotate integers"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The more corrupt the state, the more it legislates. - Tacitus"
|
||||
|
||||
deferred class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 AlgorithmIdentifier sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "When you subsidize poverty and failure, you get more of both. - James Dale Davidson, National Taxpayers Union"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {ALGORITHM_PARAMETERS}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "If we have to kill 12 people to save 1 human life it will have been worth it. - Unknown"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 AttributeTypeAndValue sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Truth and news are not the same thing. - Katharine Graham, owner of The Washington Post"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 Certificate sequence."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Everyone thinks about changing the world, but no one thinks about changing himself. - Leo Tolstoy"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 extension sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The Constitution is not an instrument for the government to restrain the people, it is an instrument for the people to restrain the government - lest it come to dominate our lives and interests. - Patrick Henry"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 Name choice"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "When goods don't cross borders, soldiers will. - Fredric Bastiat, early French economists"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "ASN.1 OIDs"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote:
|
||||
"[
|
||||
Virtually all reasonable laws are obeyed, not because they are the law, but because reasonable people would do that anyway.
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 SubjectPublicKeyInfo sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "One of the penalties for refusing to participate in politics is that you end up being governed by your inferiors. - Plato"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 TBSCertificate sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Democracy is a pathetic belief in the collective wisdom of individual ignorance. - H.L. Mencken"
|
||||
|
||||
class
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "x509v3 Validity sequence"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "If we don't believe in freedom of expression for people we despise, we don't believe in it at all. - Noam Chomsky"
|
||||
|
||||
class
|
||||
@@ -12,12 +12,12 @@ create
|
||||
make
|
||||
|
||||
feature
|
||||
make (not_before_a: TIME not_after_a: TIME)
|
||||
make (not_before_a: TIME; not_after_a: TIME)
|
||||
do
|
||||
not_before := not_before_a
|
||||
not_after := not_after_a
|
||||
end
|
||||
|
||||
|
||||
feature
|
||||
not_before: TIME
|
||||
not_after: TIME
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Objects that ..."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "The best government is the one that charges you the least blackmail for leaving you alone. - Thomas Rudmose-Brown (1996)"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests Cipher Block Chaining mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Government is the great fiction, through which everybody endeavors to live at the expense of everybody else. - Frederic Bastiat"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests Cipher Feedback mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Liberty is the only thing you cannot have unless you are willing to give it to others. - William Allen White"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests Counter mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "We contend that for a nation to try to tax itself into prosperity is like a man standing in a bucket and trying to lift himself up by the handle. - Winston Churchill (1903)"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests DER encoding facilities"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Nothing can destroy a government more quickly than its failure to observe its own laws, or worse, its disregard of the charter of its own existence - U.S. Supreme Court Justice Tom C. Clark - Mapp vs. Ohio"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description : "Tests basic Elliptical Curve library functionality"
|
||||
author : "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Giving money and power to government is like giving whiskey and car keys to teenage boys. - P.J. O'Rourke"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests Electronic Codebook mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Ask not what you can do for your country; ask what your government is doing to you. - Joseph Sobran (1990)"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {HMAC_SHA256_TEST}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
HMAC_SHA256_TEST
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {MD5_TEST}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Give me liberty or give me death! - Patrick Henry"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Tests Output Feedback mode"
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "Government is actually the worst failure of civilized man. There has never been a really good one, and even those that are most tolerable are arbitrary, cruel, grasping, and unintelligent. - H. L. Mencken"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {RSA_TEST}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "When buying and selling are controlled by legislation, the first things to be bought and sold are legislators. - P.J. O'Rourke"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {SHA1_TEST}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "We must have government, but we must watch them like a hawk. - Millicent Fenwick (1983)"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {SHA256_TEST}."
|
||||
author: "Colin LeMahieu"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
quote: "A little government and a little luck are necessary in life, but only a fool trusts either of them. - P. J. O'Rourke"
|
||||
|
||||
class
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
note
|
||||
description : "tests application root class"
|
||||
date : "$Date: 2008-12-29 15:41:59 -0800 (Mon, 29 Dec 2008) $"
|
||||
revision : "$Revision: 76432 $"
|
||||
date : "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision : "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
TEST
|
||||
|
||||
@@ -1,194 +0,0 @@
|
||||
<<<<<<< local
|
||||
note
|
||||
description : "tests application root class"
|
||||
date : "$Date: 2008-12-29 15:41:59 -0800 (Mon, 29 Dec 2008) $"
|
||||
revision : "$Revision: 76432 $"
|
||||
|
||||
class
|
||||
TEST
|
||||
|
||||
inherit
|
||||
ARGUMENTS
|
||||
|
||||
create
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make
|
||||
local
|
||||
key_pair: RSA_KEY_PAIR
|
||||
message: INTEGER_X
|
||||
cipher: INTEGER_X
|
||||
plain: INTEGER_X
|
||||
signature: INTEGER_X
|
||||
correct: BOOLEAN
|
||||
i: INTEGER
|
||||
do
|
||||
i := +1
|
||||
io.put_string ("Creating keypair%N")
|
||||
create key_pair.make (1024)
|
||||
io.put_string ("Created keypair%N")
|
||||
create message.make_random (128)
|
||||
cipher := key_pair.public.encrypt (message)
|
||||
plain := key_pair.private.decrypt (cipher)
|
||||
io.put_string ("Checked encryption%N")
|
||||
signature := key_pair.private.sign (message)
|
||||
correct := key_pair.public.verify (message, signature)
|
||||
io.put_string ("Checked signing%N")
|
||||
end
|
||||
|
||||
make_2
|
||||
local
|
||||
key: EC_KEY_PAIR
|
||||
message: INTEGER_X
|
||||
signature: TUPLE [r: INTEGER_X s: INTEGER_X]
|
||||
correct: BOOLEAN
|
||||
i: INTEGER
|
||||
do
|
||||
create key.make_sec_t113r1
|
||||
create message.make_random_max (key.private.params.n)
|
||||
from
|
||||
i := 0
|
||||
until
|
||||
i > 100
|
||||
loop
|
||||
signature := key.private.sign (message)
|
||||
correct := key.public.verify (message, signature)
|
||||
i := i + 1
|
||||
end
|
||||
end
|
||||
|
||||
test_sec_t_multiply
|
||||
local
|
||||
d: INTEGER_X
|
||||
g: EC_POINT_F2M
|
||||
curve: EC_CURVE_F2M
|
||||
q: EC_POINT_F2M
|
||||
q_x_solution: INTEGER_X
|
||||
q_y_solution: INTEGER_X
|
||||
q_solution: EC_POINT_F2M
|
||||
correct: BOOLEAN
|
||||
do
|
||||
create d.make_from_hex_string ("00000003 A41434AA 99C2EF40 C8495B2E D9739CB2 155A1E0D")
|
||||
create g.make_sec_t163k1
|
||||
create curve.make_sec_t163k1
|
||||
create q_x_solution.make_from_hex_string ("00000003 7D529FA3 7E42195F 10111127 FFB2BB38 644806BC")
|
||||
create q_y_solution.make_from_hex_string ("00000004 47026EEE 8B34157F 3EB51BE5 185D2BE0 249ED776")
|
||||
create q_solution.make_curve_x_y (create {EC_FIELD_ELEMENT_F2M}.make (q_x_solution), create {EC_FIELD_ELEMENT_F2M}.make (q_y_solution))
|
||||
q := g.product_value (d, curve)
|
||||
correct := q ~ q_solution
|
||||
end
|
||||
|
||||
test1: detachable AES_TEST
|
||||
test2: detachable CBC_TEST
|
||||
test3: detachable CFB_TEST
|
||||
test4: detachable CTR_TEST
|
||||
test5: detachable DER_TEST
|
||||
test6: detachable ECB_TEST
|
||||
test7: detachable EC_TEST
|
||||
test8: detachable MD5_TEST
|
||||
test9: detachable OFB_TEST
|
||||
test10: detachable RSA_TEST
|
||||
test11: detachable SHA1_TEST
|
||||
test12: detachable SHA256_TEST
|
||||
test13: detachable TEST_EC_BINARY
|
||||
|
||||
end
|
||||
=======
|
||||
note
|
||||
description : "tests application root class"
|
||||
date : "$Date: 2008-12-29 15:41:59 -0800 (Mon, 29 Dec 2008) $"
|
||||
revision : "$Revision: 76432 $"
|
||||
|
||||
class
|
||||
TEST
|
||||
|
||||
inherit
|
||||
ARGUMENTS
|
||||
|
||||
create
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make
|
||||
local
|
||||
key_pair: RSA_KEY_PAIR
|
||||
message: INTEGER_X
|
||||
cipher: INTEGER_X
|
||||
plain: INTEGER_X
|
||||
signature: INTEGER_X
|
||||
correct: BOOLEAN
|
||||
do
|
||||
io.put_string ("Creating keypair%N")
|
||||
create key_pair.make (1024)
|
||||
io.put_string ("Created keypair%N")
|
||||
create message.make_random (128)
|
||||
cipher := key_pair.public.encrypt (message)
|
||||
plain := key_pair.private.decrypt (cipher)
|
||||
io.put_string ("Checked encryption%N")
|
||||
signature := key_pair.private.sign (message)
|
||||
correct := key_pair.public.verify (message, signature)
|
||||
io.put_string ("Checked signing%N")
|
||||
end
|
||||
|
||||
make_2
|
||||
local
|
||||
key: EC_KEY_PAIR
|
||||
message: INTEGER_X
|
||||
signature: TUPLE [r: INTEGER_X s: INTEGER_X]
|
||||
correct: BOOLEAN
|
||||
i: INTEGER
|
||||
do
|
||||
create key.make_sec_t113r1
|
||||
create message.make_random_max (key.private.params.n)
|
||||
from
|
||||
i := 0
|
||||
until
|
||||
i > 100
|
||||
loop
|
||||
signature := key.private.sign (message)
|
||||
correct := key.public.verify (message, signature)
|
||||
i := i + 1
|
||||
end
|
||||
end
|
||||
|
||||
test_sec_t_multiply
|
||||
local
|
||||
d: INTEGER_X
|
||||
g: EC_POINT_F2M
|
||||
curve: EC_CURVE_F2M
|
||||
q: EC_POINT_F2M
|
||||
q_x_solution: INTEGER_X
|
||||
q_y_solution: INTEGER_X
|
||||
q_solution: EC_POINT_F2M
|
||||
correct: BOOLEAN
|
||||
do
|
||||
create d.make_from_hex_string ("00000003 A41434AA 99C2EF40 C8495B2E D9739CB2 155A1E0D")
|
||||
create g.make_sec_t163k1
|
||||
create curve.make_sec_t163k1
|
||||
create q_x_solution.make_from_hex_string ("00000003 7D529FA3 7E42195F 10111127 FFB2BB38 644806BC")
|
||||
create q_y_solution.make_from_hex_string ("00000004 47026EEE 8B34157F 3EB51BE5 185D2BE0 249ED776")
|
||||
create q_solution.make_curve_x_y (create {EC_FIELD_ELEMENT_F2M}.make (q_x_solution), create {EC_FIELD_ELEMENT_F2M}.make (q_y_solution))
|
||||
q := g.product_value (d, curve)
|
||||
correct := q ~ q_solution
|
||||
end
|
||||
|
||||
test1: detachable AES_TEST
|
||||
test2: detachable CBC_TEST
|
||||
test3: detachable CFB_TEST
|
||||
test4: detachable CTR_TEST
|
||||
test5: detachable DER_TEST
|
||||
test6: detachable ECB_TEST
|
||||
test7: detachable EC_TEST
|
||||
test8: detachable MD5_TEST
|
||||
test9: detachable OFB_TEST
|
||||
test10: detachable RSA_TEST
|
||||
test11: detachable SHA1_TEST
|
||||
test12: detachable SHA256_TEST
|
||||
test13: detachable TEST_EC_BINARY
|
||||
test14: detachable HMAC_SHA256_TEST
|
||||
|
||||
end
|
||||
>>>>>>> other
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {TEST_EC_BINARY}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
TEST_EC_BINARY
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
note
|
||||
description: "Summary description for {TEST_EC_FIELD_ELEMENT_F2M}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
date: "$Date: 2011-11-11 18:13:16 +0100 (ven., 11 nov. 2011) $"
|
||||
revision: "$Revision: 87787 $"
|
||||
|
||||
class
|
||||
TEST_EC_FIELD_ELEMENT_F2M
|
||||
|
||||
@@ -8,7 +8,7 @@
|
||||
<variable name="eapml_scan_type" value="vc"/>
|
||||
<variable name="eapml_limb_type" value="natural_32"/>
|
||||
<library name="base" location="$ISE_LIBRARY\library\base\base-safe.ecf"/>
|
||||
<library name="eapml" location="..\..\eapml\eapml-safe.ecf"/>
|
||||
<library name="eapml" location="$ISE_LIBRARY\contrib\library\math\eapml\eapml-safe.ecf"/>
|
||||
<library name="eel" location="..\eel-safe.ecf" readonly="false">
|
||||
<option>
|
||||
<assertions precondition="true"/>
|
||||
|
||||
@@ -8,7 +8,7 @@
|
||||
<variable name="eapml_scan_type" value="gcc"/>
|
||||
<variable name="eapml_limb_type" value="natural_32"/>
|
||||
<library name="base" location="$ISE_LIBRARY\library\base\base.ecf"/>
|
||||
<library name="eapml" location="..\..\eapml\eapml.ecf"/>
|
||||
<library name="eapml" location="$ISE_LIBRARY\contrib\library\math\eapml\eapml.ecf"/>
|
||||
<library name="eel" location="..\eel.ecf" readonly="false">
|
||||
<option>
|
||||
<assertions precondition="true"/>
|
||||
|
||||
@@ -1 +0,0 @@
|
||||
|
||||
Reference in New Issue
Block a user