【发布时间】：2012-11-10 15:43:10
【问题描述】：
我需要一段代码来定义可以加密和解密一段字符串的函数。我基本上想要的是字符串不应该对第三方用户可见，因此当字符串源自一个文件时，它会使用加密函数转换为整数值，然后作为参数传递给另一个文件。然后 decrpyt 函数将其解密回来并使用该字符串对其执行操作。
任何建议或已经可用的代码都可以！
请帮帮我。谢谢！
【问题讨论】：
标签： encryption tcl
【发布时间】：2012-11-10 15:43:10
【问题描述】：
安装tcllib。 tcllib 中实现了几种标准的加密算法。
以下加密算法可用：
【讨论】：
-
为了简单的混淆，有yencodetcllib.sourceforge.net/doc/yencode.html
des package in Tcllib 应该做你想做的事。它非常易于使用：
package require des
set key "12345678"; # Must be 8 bytes long
set msg "abcde"
##### ENCRYPTION
set encryptedMsg [DES::des -dir encrypt -key $key $msg]
# $encryptedMsg is a bunch of bytes; you'll want to send this around...
##### DECRYPTION
set decryptedMsg [DES::des -dir decrypt -key $key $encryptedMsg]
puts "I got '$decryptedMsg'"
请注意，DES 会将消息填充为 8 字节的倍数。
【讨论】：
请访问 TCL/TK 主页，例如 这里：http://wiki.tcl.tk/900
这只是一种方法。我敢肯定，还会有更多。
【讨论】：