-- S.MG, 2018

with Test_Serpent;
with Test_Packing;
with Test_RSA_OAEP;
with Messages.Test_Serializing;
with Raw_Types;

procedure testall is
begin
  Test_Serpent.Selftest;
  Test_RSA_OAEP.test_char_array;
  Test_RSA_OAEP.test_oaep;
  Test_RSA_OAEP.test_rsa( Raw_Types.RSA_KEY_OCTETS, 
                            Raw_Types.RSA_KEY_OCTETS*2, "keys_rsa.txt" );
  Test_RSA_OAEP.test_rsa( Raw_Types.E_LENGTH_OCTETS*2, 
                          Raw_Types.RSA_KEY_OCTETS*2 - 1, "8_keys.txt" );
  Test_RSA_OAEP.test_rsa_oaep;
  Test_Packing.Test_Pack_Unpack_Serpent;
  Test_Packing.Test_Pack_Unpack_RSA;
  Messages.Test_Serializing.Serialize_Keyset_SS;
  Messages.Test_Serializing.Serialize_Keyset_RSA;
  Messages.Test_Serializing.Serialize_Keys_Mgm;
  Messages.Test_Serializing.Serialize_File_Chunk;
  Messages.Test_Serializing.Serialize_File_Request(5);
  Messages.Test_Serializing.Serialize_Action;
  Messages.Test_Serializing.Converter_String_Octets;
  Messages.Test_Serializing.Test_Padding;
end testall;