Piszę proste narzędzie do szyfrowania/deszyfrowania rc4 jako pierwszy projekt. Utknąłem na próbie przekształcenia podanego ciągu w tablicę bajtów, którą następnie można manipulować za pomocą algorytmu rdzenia. Jak przekonwertować ciąg znaków na tablicę bajtów w funkcjonalnym f #?F #: Konwertowanie ciągu znaków na tablicę bajtów
//From another thread
let private replace find (repl : string) (str : string) = str.Replace(find, repl)
//let private algorithm bytes = blah blah blah
let Encrypt (decrypted : string) =
decrypted.Chars
|> Array.map(fun c -> byte.Parse(c)) // This line is clearly not working
// |> algorithm
|> BitConverter.ToString
|> replace "-" ""
FYI w C# to wygląda:
public static string Encrypt(string decrypted)
{
byte[] bytes = new byte[decrypted.Length];
for (int i = 0; i < decrypted.Length; ++i)
bytes[i] = (byte)decrypted[i];
Algorithm(ref bytes);
return BitConverter.ToString(bytes).Replace("-", "").ToLower();
}
To była pierwsza, że muszę. Text.Encoding.ASCII.GetBytes (deszyfrowany) – telesphore4