mirror of
https://github.com/AdaCore/aws.git
synced 2026-02-12 12:29:46 -08:00
MA16-046 * src/core/aws-translator.ads: (Base64_Mode): New type. (Base64_Encode): Add Mode parameter. * src/core/aws-translator.adb: (Base64_Encode_Array): New type. (Encoding_State): New field To_Char. (Flush): New routine to detect anf flush not padded coding. (Base64): Change type to keep charsets for both encoding modes. (Base64_Values): Add translation for URL coding characters - and _. (Add): Use Encoding_State.To_Char field. (Add): Decoding one. Do not need to Unsigned_8 convertion. (Base64_Decode): Use new Flush routine. (Base64_Encode): Initialize State.To_Char to the appropriate pointer. (Flush): Encoding one. '=' padding only for MIME variant. * regtests/0194_base64/test_base64.adb: Test Base64_Mode coding variants.