t(Num) ->
Key = <<Num:64>>,
B = <<116,101,115,116,0,0,0,0>>,
Dest = crypto:block_encrypt(des_cbc,Key,<<0:64>>,B),
Src = crypto:block_decrypt(des_cbc,Key,<<0:64>>,Dest),
Key = <<Num:64>>,
B = <<116,101,115,116,0,0,0,0>>,
Dest = crypto:block_encrypt(des_cbc,Key,<<0:64>>,B),
Src = crypto:block_decrypt(des_cbc,Key,<<0:64>>,Dest),
io:format("B:~ts;Dest:~ts;src:~ts;src==b:~p;",[B,Dest,Src,B==Src]).
1> tt:t(123456).
B:test ;Dest:T?瑲<;src:test
;src==b:true;ok
2> tt:t(123).
B:test ;Dest:餾.眉w;src:test ;src==b:true;ok
本文介绍了一个使用DES_CBC模式进行数据加密和解密的示例代码,演示了如何利用crypto模块实现加密过程,并验证了解密结果的正确性。
2372

被折叠的 条评论
为什么被折叠?



