moje zdrojovy kody.... pokud chces unitu z pascalu tak napis
Kód:public static void EncryptData(String inName, String outName, byte[] rijnKey, byte[] rijnIV) { //Create the file streams to handle the input and output files. FileStream fin = new FileStream(inName, FileMode.Open, FileAccess.Read); FileStream fout = new FileStream(outName, FileMode.OpenOrCreate, FileAccess.Write); fout.SetLength(0); //Create variables to help with read and write. byte[] bin = new byte[100]; //This is intermediate storage for the encryption. long rdlen = 0; //This is the total number of bytes written. long totlen = fin.Length; //This is the total length of the input file. int len; //This is the number of bytes to be written at a time. //SymmetricAlgorithm tdes = SymmetricAlgorithm.Create("TDES"); //Creates the default implementation, which is RijndaelManaged. TripleDESCryptoServiceProvider tdes = new TripleDESCryptoServiceProvider(); tdes.Mode = System.Security.Cryptography.CipherMode.ECB; tdes.Padding = System.Security.Cryptography.PaddingMode.Zeros; CryptoStream encStream = new CryptoStream(fout, tdes.CreateEncryptor(rijnKey, rijnIV), CryptoStreamMode.Write); Console.WriteLine("Encrypting..."); //Read from the input file, then encrypt and write to the output file. while(rdlen < totlen) { len = fin.Read(bin, 0, 100); encStream.Write(bin, 0, len); rdlen = rdlen + len; Console.WriteLine("{0} bytes processed", rdlen); } encStream.Close(); fout.Close(); fin.Close(); } public static void DescryptData(String inName, String outName, byte[] rijnKey, byte[] rijnIV) { //Create the file streams to handle the input and output files. FileStream fin = new FileStream(inName, FileMode.Open, FileAccess.Read); FileStream fout = new FileStream(outName, FileMode.OpenOrCreate, FileAccess.Write); fout.SetLength(0); //Create variables to help with read and write. byte[] bin = new byte[100]; //This is intermediate storage for the encryption. long rdlen = 0; //This is the total number of bytes written. long totlen = fin.Length; //This is the total length of the input file. int len; //This is the number of bytes to be written at a time. //SymmetricAlgorithm tdes = SymmetricAlgorithm.Create(); //Creates the default implementation, which is RijndaelManaged. System.Security.Cryptography.TripleDESCryptoServiceProvider tdes = new TripleDESCryptoServiceProvider(); tdes.Mode = System.Security.Cryptography.CipherMode.ECB; tdes.Padding = System.Security.Cryptography.PaddingMode.Zeros; CryptoStream encStream = new CryptoStream(fout, tdes.CreateDecryptor(rijnKey, rijnIV), CryptoStreamMode.Write); Console.WriteLine("Descrypting..."); //Read from the input file, then encrypt and write to the output file. while(rdlen < totlen) { len = fin.Read(bin, 0, 100); encStream.Write(bin, 0, len); rdlen = rdlen + len; Console.WriteLine("{0} bytes processed", rdlen); } encStream.Close(); fout.Close(); fin.Close(); }





Odpověď s citací