Tcl字节码加密工具tbcload的解码

风行水上 @ 2015-01-21 14:18:43
标签:

关于用tbcload加密Tcl代码,参见:用TclPro中的tbcload加密Tcl代码

tbcload代码的解码

========= tbcfile =========
TclPro        : TclPro
ByteCode      : ByteCode
formatNumber  : 1
buildNumber   : 0
cmpVersion    : 1.3
tclVersion    : 8.3
-------- tbcblock --------
numCommands         = 3
numSrcBytes         = 0
numCodeBytes        = 33
numLitObjects       = 11
numExceptRange      = 0
numAuxDataItems     = 0
numCmdLocBytes      = 12
maxExceptDepth      = 0
maxStackDepth       = 6
codeDeltaSize       = 3
codeLengthSize      = 3
srcDeltaSize        = -1
srcLengthSize       = -1
-------- bytecode --------
010001010102010301040105060603010a01050107010806040301090101060200000000

literal 0 : 6 | button # 7YDEFTnw
literal 1 : 2 | .b # yIw
literal 2 : 5 | -text # Kt([email protected]
literal 3 : 12 | Hello TclPro # [email protected]
literal 4 : 8 | -command # 9oW/DmgY8A
literal 5 : 11 | cbk_clicked # [email protected]|+
literal 6 : 4 | proc # ,[email protected]
literal 7 : 4 | args # %N|(F
-------- proc --------
-------- tbcblock --------
numCommands         = 1
numSrcBytes         = 0
numCodeBytes        = 11
numLitObjects       = 2
numExceptRange      = 0
numAuxDataItems     = 0
numCmdLocBytes      = 4
maxExceptDepth      = 0
maxStackDepth       = 2
codeDeltaSize       = 1
codeLengthSize      = 1
srcDeltaSize        = -1
srcLengthSize       = -1
-------- bytecode --------
010001010a00050206020000

literal 0 : 4 | puts # DP)*F
literal 1 : 8 | Haha...  # ?(';@!9,>+
  arg 0 : args 0 0 257 # %N|(F
-------- proc end --------
literal 9 : 4 | pack # ld^LC
literal 10 : 15 | tbcload::bcproc # rpwhC;Z2b3<?<+EfqT+
标签:

分享到:
comments powered by Disqus

28/31ms