Base64与BLOB 转换函数

Base64 介绍

Base64是一种基于64个可打印字符来表示二进制数据的表示方法。由于26次方等于64,所以每6位元为一个单元,对应某个可打印字符。三个字节24个位元,对应于4Base64单元,即3个字节需要用4个可打印字符来表示。它可用来作为电子邮件的传输编码。在Base64中的可打印字符包括字母A-Za-z、数字0-9,这样共有62个字符,此外两个可打印符号在不同的系统中而不同。一些如uuencode的其他编码方法,和之后binhex的版本使用不同的64字符集来代表6个二进制数字,但是它们不叫Base64

Base64常用于在通常处理文本数据的场合,表示、传输、存储一些二进制数据。包括MIMEemailemail via MIME,XML中存储复杂数据.

Base64BLOB

CREATE OR REPLACE FUNCTION base64encode(p_blob IN BLOB)

  RETURN CLOB

-- -----------------------------------------------------------------------------------

-- File Name    : http://www.oracle-base.com/dba/miscellaneous/base64encode.sql

-- Author       : Tim Hall

-- Description  : Encodes a BLOB into a Base64 CLOB.

-- Last Modified: 09/11/2011

-- -----------------------------------------------------------------------------------

IS

  l_clob CLOB;

  l_step PLS_INTEGER := 12000; -- make sure you set a multiple of 3 not higher than 24573

BEGIN

  FOR i IN 0 .. TRUNC((DBMS_LOB.getlength(p_blob) - 1 )/l_step) LOOP

    l_clob := l_clob || UTL_RAW.cast_to_varchar2(UTL_ENCODE.base64_encode(DBMS_LOB.substr(p_blob, l_step, i * l_step + 1)));

  END LOOP;

  RETURN l_clob;

END;

/

BLOBbase64

CREATE OR REPLACE FUNCTION base64decode(p_clob CLOB)

  RETURN BLOB

-- -----------------------------------------------------------------------------------

-- File Name    : http://www.oracle-base.com/dba/miscellaneous/base64decode.sql

-- Author       : Tim Hall

-- Description  : Decodes a Base64 CLOB into a BLOB

-- Last Modified: 09/11/2011

-- -----------------------------------------------------------------------------------

IS

  l_blob    BLOB;

  l_raw     RAW(32767);

  l_amt     NUMBER := 7700;

  l_offset  NUMBER := 1;

  l_temp    VARCHAR2(32767);

BEGIN

  BEGIN

    DBMS_LOB.createtemporary (l_blob, FALSE, DBMS_LOB.CALL);

    LOOP

      DBMS_LOB.read(p_clob, l_amt, l_offset, l_temp);

      l_offset := l_offset + l_amt;

      l_raw    := UTL_ENCODE.base64_decode(UTL_RAW.cast_to_raw(l_temp));

      DBMS_LOB.append (l_blob, TO_BLOB(l_raw));

    END LOOP;

  EXCEPTION

    WHEN NO_DATA_FOUND THEN

      NULL;

  END;

  RETURN l_blob;

END;

/

转自于:oracle-base

请使用浏览器的分享功能分享到微信等