ORACLE数据加密(转)
ops$tkyte@DEV816> variable x varchar2(25)
ops$tkyte@DEV816>
ops$tkyte@DEV816> exec :x := 'How Now Brown Cow';
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> declare
2 l_data varchar2(255);
3 begin
4 l_data := rpad( :x, (trunc(length(:x)/8)+1)*8, chr(0) );
5
6 dbms_obfuscation_toolkit.DESEncrypt
7 ( input_string => l_data,
8 key_string => 'MagicKey',
9 encrypted_string=> :x );
10 end;
11 /
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> print x
X
-------------------------
òr?=eYw]e‘SW?:YD?ê?T?
ops$tkyte@DEV816>
ops$tkyte@DEV816> declare
2 l_data varchar2(255);
3 begin
4 dbms_obfuscation_toolkit.DESDecrypt
5 ( input_string => :x,
6 key_string => 'MagicKey',
7 decrypted_string=> l_data );
8
9 :x := rtrim( l_data, chr(0) );
10 end;
11 /
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> print x
X
-------------------------
How Now Brown Cow
ops$tkyte@DEV816>
ops$tkyte@DEV816> exec :x := 'How Now Brown Cow';
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> declare
2 l_data varchar2(255);
3 begin
4 l_data := rpad( :x, (trunc(length(:x)/8)+1)*8, chr(0) );
5
6 dbms_obfuscation_toolkit.DESEncrypt
7 ( input_string => l_data,
8 key_string => 'MagicKey',
9 encrypted_string=> :x );
10 end;
11 /
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> print x
X
-------------------------
òr?=eYw]e‘SW?:YD?ê?T?
ops$tkyte@DEV816>
ops$tkyte@DEV816> declare
2 l_data varchar2(255);
3 begin
4 dbms_obfuscation_toolkit.DESDecrypt
5 ( input_string => :x,
6 key_string => 'MagicKey',
7 decrypted_string=> l_data );
8
9 :x := rtrim( l_data, chr(0) );
10 end;
11 /
PL/SQL procedure successfully completed.
ops$tkyte@DEV816>
ops$tkyte@DEV816> print x
X
-------------------------
How Now Brown Cow
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/756652/viewspace-242352/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
一个简单的oracle函数返回数组的例子
下一篇：
当前日志损坏的案例(转)
请登录后发表评论
登录
全部评论
