Chinaunix首页 | 论坛 | 博客
  • 博客访问: 249526
  • 博文数量: 91
  • 博客积分: 2016
  • 博客等级: 大尉
  • 技术积分: 820
  • 用 户 组: 普通用户
  • 注册时间: 2008-07-08 23:25
文章分类

全部博文(91)

文章存档

2011年(6)

2010年(6)

2009年(34)

2008年(45)

我的朋友

分类:

2008-07-08 23:57:12

create or replace function encrypt_data(p_text varchar2, p_key varchar2) return varchar2 is
v_text varchar2(4000);
v_enc varchar2(4000);
begin
if p_text is null then
return null;
else
v_text := rpad(p_text, (trunc(lengthb(p_text)/8)+1)*8, chr(0));

sys.dbms_obfuscation_toolkit.desencrypt(
input_string => v_text,
key_string => p_key,
encrypted_string=>v_enc);

return v_enc;
end if;
end;
/

create or replace function decrypt_data(p_text varchar2, p_key varchar2) return varchar2 is
v_text varchar2(4000);
begin
if p_text is null then
return null;
else
sys.dbms_obfuscation_toolkit.desdecrypt(
input_string => p_text,
key_string => p_key,
decrypted_string=> v_text);

return rtrim(v_text,chr(0));
end if;
end;
阅读(582) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~