Data commit

Task/Base64-decode-data/FutureBasic/base64-decode-data.basic

@@ -0,0 +1,28 @@
+include "NSlog.incl"
+
+local fn EncodeStringAsBase64( stringToEncode as CFStringRef ) as CFStringRef
+  CFStringRef encodedBase64Str = NULL
+  CFDataRef dataToEncode = fn StringData( stringToEncode, NSUTF8StringEncoding )
+  encodedBase64Str = fn DataBase64EncodedString( dataToEncode, 0 )
+end fn = encodedBase64Str
+
+
+local fn DecodeBase64String( base64String as CFStringRef ) as CFStringRef
+  CFStringRef decodedString = NULL
+  CFDataRef encodedData  = fn DataWithBase64EncodedString( base64String, NSDataBase64DecodingIgnoreUnknownCharacters )
+  decodedString = fn StringWithData( encodedData, NSUTF8StringEncoding )
+end fn = decodedString
+
+
+CFStringRef originalString, encodedBase64String, decodedBase64String
+
+originalString = @"This is a test string to be encoded as Base64 and then decoded."
+NSLog( @"This is the original string:\n\t%@\n", originalString )
+
+encodedBase64String = fn EncodeStringAsBase64( originalString )
+NSLog( @"This is the original string encoded as Base84:\n\t%@\n", encodedBase64String )
+
+decodedBase64String = fn DecodeBase64String( encodedBase64String )
+NSLog( @"This is the Base64 string decoded:\n\t%@", decodedBase64String )
+
+HandleEvents