Renamed base class, added further unit test skeletons

Renamed TPadding to TPaddingBase. Added empty stubs for the still missing DUnit unit tests for the paddings and updated the documentation.

Author: MHumm

Docs/DEC65.pdf

@@ -37,7 +37,7 @@ interface
   ///   This abstract class defines the basic interfaces for adding, validating,
   ///   and removing padding.
   /// </remarks>
-  TPadding = class abstract
+  TPaddingBase = class abstract
     /// <summary>
     ///   Adds padding to the specified data to align it with the given block size.
     /// </summary>
@@ -186,7 +186,7 @@   TPadding = class abstract
   ///   Class type of the padding base class, relevant for the class registration
   ///   and simplified use in DECipherFormsts.
   /// </summary>
-  TDECPaddingClass = class of TPadding;
+  TDECPaddingClass = class of TPaddingBase;
 
   /// <summary>
   ///   Base class for the PKCS7 and ANSI X.923 algorithms, as they are quite similar.
@@ -195,7 +195,7 @@   TDECPaddingClass = class of TPadding;
   ///   PKCS7 padding is a standard algorithm used in symmetric cryptosystems like AES.
   ///   It appends the number of padding bytes as the value of the padding itself.
   /// </remarks>
-  TFixedBytePadding = class abstract(TPadding)
+  TFixedBytePadding = class abstract(TPaddingBase)
   strict protected
     /// <summary>
     ///   Check if block size is supported by the concerete padding algorithm.

Source/DECCipherPaddings.pas

@@ -71,16 +71,29 @@   TestTANSI_X9_23Padding = class(TestTPaddingBase)
   published
   end;
 
-  // Test methods for class TANSI_X9_23Padding_Legacy
+  // Test methods for class TPKCS5Padding
   {$IFDEF DUnitX} [TestFixture] {$ENDIF}
-  TestTANSI_X9_23Padding_Legacy = class(TestTPaddingBase)
+  TestTPKCS5Padding = class(TestTPaddingBase)
   strict private
   public
   published
   end;
 
+  // Test methods for class TISO10126Padding
+  {$IFDEF DUnitX} [TestFixture] {$ENDIF}
+  TestTISO10126Padding = class(TestTPaddingBase)
+  strict private
+  public
+  published
+  end;
 
-// {, pmISO10126, pmISO7816
+  // Test methods for class TISO7816Padding
+  {$IFDEF DUnitX} [TestFixture] {$ENDIF}
+  TestTISO7816Padding = class(TestTPaddingBase)
+  strict private
+  public
+  published
+  end;
 
 implementation
 
@@ -247,8 +260,14 @@ initialization
   {$IFDEF DUnitX}
   TDUnitX.RegisterTestFixture(TestTPKCS7Padding);
   TDUnitX.RegisterTestFixture(TestTANSI_X9_23Padding);
+  TDUnitX.RegisterTestFixture(TestTPKCS5Padding);
+  TDUnitX.RegisterTestFixture(TestTISO10126Padding);
+  TDUnitX.RegisterTestFixture(TestTISO7816Padding);
   {$ELSE}
   RegisterTests('DECCipherPaddings', [TestTPKCS7Padding.Suite,
-                                      TestTANSI_X9_23Padding.Suite]);
+                                      TestTANSI_X9_23Padding.Suite,
+                                      TestTPKCS5Padding.Suite,
+                                      TestTISO10126Padding.Suite,
+                                      TestTISO7816Padding.Suite]);
   {$ENDIF}
 end.