一、技術點

1、 DBMS_OBFUSCATION_TOOLKIT.MD5

DBMS_OBFUSCATION_TOOLKIT.MD5是MD5編碼的數據包函數，但偶在使用select DBMS_OBFUSCATION_TOOLKIT.MD5(input_string =>'abc') a from Dual時，卻有錯誤提示，看來該函數只能直接在程序包中調用，不能直接應用于SELECT語句。

2、Utl_Raw.Cast_To_Raw

DBMS_OBFUSCATION_TOOLKIT.MD5返回的字串，是RAW類型，要正確顯示，需要經過Utl_Raw.Cast_To_Raw轉換

二、應用

1、直接調用

代碼如下:

declare

v2 varchar2(32); begin

v2 := Utl_Raw.Cast_To_Raw(sys.dbms_obfuscation_toolkit.md5(input_string => '111'));

dbms_output.put_line(v2); end;

注意：可以在存儲過程中直接調用，如果要嵌套調用md5時，記得每次調用后都用Utl_Raw.Cast_To_Raw進行轉換，否則最后出來的結果是錯誤的。

2、構造函數后，再調用

代碼如下:

CREATE OR REPLACE FUNCTION MD5(

passwd IN VARCHAR2) RETURN VARCHAR2 IS

retval varchar2(32); BEGIN

retval := utl_raw.cast_to_raw(DBMS_OBFUSCATION_TOOLKIT.MD5(INPUT_STRING => passwd)); RETURN retval; END;

調用md5函數示例:

代碼如下:

select md5(1) from dual

另附：Oracle中MD5函數語句

代碼如下:

--Oracle中MD5函數語句

create or replace FUNCTION "MD5HASH" (str IN VARCHAR2)

RETURN VARCHAR2

IS v_checksum VARCHAR2(32);

BEGIN

v_checksum := LOWER( RAWTOHEX( UTL_RAW.CAST_TO_RAW( sys.dbms_obfuscation_toolkit.md5(input_string => str) ) ) );

RETURN v_checksum;

EXCEPTION

WHEN NO_DATA_FOUND THEN

NULL;

WHEN OTHERS THEN

-- Consider logging the error and then re-raise RAISE;

END md5hash;

更多信息請查看IT技術專欄