oracle

关注公众号 jb51net

关闭
首页 > 数据库 > oracle > Oracle BLOB 字节数据

Oracle存储过程里操作BLOB的字节数据的办法

作者:lclc

该篇文章介绍了如何在Oracle存储过程中操作BLOB的字节数据,作者研究了如何获取BLOB的字节长度、如何使用DBMS_LOB包进行BLOB操作、如何进行字节级操作以及如何使用UTL_RAW包,感兴趣的朋友一起看看吧

一、缘由

BLOB是指二进制大对象,也就是英文Binary Large Object的缩写。
在很多时候,我们是通过其他编程语言(如Java)访问BLOB的字节数据,进行字节级的操作的。
但是有些时候工作量很小,感觉专门为BLOB字节级操作而专门开发个程序,是比较麻烦的。于是我研究了一下如何直接在Oracle存储过程里操作BLOB的字节数据。

二、办法

2.1 基本操作

使用 length 函数,可以获取blob的字节长度。如 v_len := length(i_blob); 。
与字符串(如 varchar2 等)一样,blob为 null 时,length的返回值是 null。故建议加上 nvl 做一下转换,如 v_len := nvl(length(i_blob), 0); 。

为了避免 null 问题,可使用 empty_blob 函数,它的作用是返回一个长度为0的blob。如 v_blob := empty_blob(); 。

empty_blob返回的blog只是一个初始化,它是不能修改字节数据的。于是需要使用 dbms_lob.createtemporary 来创建一个能进行字节数据操作的临时blob。如 dbms_lob.createtemporary(v_blob, TRUE); 。

2.2 DBMS_LOB包

为了便于BLOB类型的使用,Oracle官方提供了 DBMS_LOB 包,它提供了很多工具函数。例如先前我们使用了createtemporary函数。
DBMS_LOB所提供的过程有——

有了DBMS_LOB包后,对于(变量级的)BLOB操作就比较方便了。例如我们想将两个blob的内容,连续拼接到1个blob中,则可以这样做——

  function test_blob_join(i_blob1 in blob, i_blob2 in blob) return blob is
    v_rt blob := empty_blob();
  begin
    dbms_lob.createtemporary(v_rt, TRUE);  -- 分配临时的 blob .
    dbms_lob.append(v_rt, i_blob1);        -- 拼接 i_blob1 .
    dbms_lob.append(v_rt, i_blob2);        -- 拼接 i_blob2 .
    return v_rt;
  end;

可这样测试——

select PKG_FINGER.test_blob_join(hextoraw('0102'), hextoraw('A1A2')) from dual;

它返回blob的字节数据是 01 02 A1 A2。验证通过。

2.3 字节级操作与RAW数据类型

现在对实现BLOB的的变量级操作是没有问题了。那么,该怎样实现BLOB的字节级操作呢?
例如——怎么从blob中截取位置开始的一串字节?在blob中替换每个位置的字节?在blob的最后追加字节数据?
其实dbms_lob的 substr、write、writeappend 可分别解决这3个问题。
然后仔细一看,会发现这些过程使用了 RAW 类型。
对于RAW类型,很多资料是这样说的——

RAW类型是Oracle中用于保存位串的一种数据类型,类似于CHAR,使用RAW(L) 方式声明,最长可达32767字节。

RAW与BLOB的关系——

观察dbms_lob的帮助文档,会发现每个函数既有BLOB版,又有CLOB版。而且,CLOB版用VARCHAR2类型时,其BLOB版是RAW类型。即 RAW与VARCHAR2 是类似的,一个是字节串,一个是字符串。
许多常用的字符串函数也对 RAW 是有效的。例如 length 与 sustr 。

RAW 可用十六进制字符串来表示。所以一般使用 hextoraw 函数,将十六进制字符串转为RAW。例如 hextoraw('A1A2') 。
RAW 可看作十六进制字符串。所以对raw变量使用length函数时,其返回值是 字节长度的2倍(因为对于十六进制字符串,一个字节是用2个十六进制字符表示的)。substr 等函数也存在同样的情况。
还可以用 rawtohex,将 RAW类型的数据 转换为 十六进制字符串(VARCHAR2)。

2.4 UTL_RAW包

上面提到 RAW 的length结果是 字节长度的2倍,它是不太方便的。这时可以使用 UTL_RAW包。例如 utl_raw.length的结果就是 字节长度。
常见的UTL_RAW过程有——

三、使用心得

3.1 32位整数转换函数

最开始不知道 binary_integer就是32位整数。于是自己写了32位整数与 RAW 的转换函数。虽然现在用不上了,但觉得它们还是很适合作为应用示范的。

  -- 将数字转为 raw(4)类型的 大端方式32位整数 .
  function TO_INT32BE(i_src in number) return raw is
    v_src number;
    v_hexstr varchar2(20);
    v_rt raw(4);
  begin
    v_src := i_src;
    if (v_src<0) then
      v_src:=v_src + 4294967296;    -- 为了支持负数.
    end if;
    v_hexstr := '0000000' || trim(to_char(v_src,'XXXXXXXX'));
    v_hexstr := substr(v_hexstr, length(v_hexstr)-7, length(v_hexstr));
    v_rt := hextoraw(v_hexstr);
    return v_rt;
  end;
  -- 将数字转为 raw(4)类型的 小端方式32位整数 .
  function TO_INT32LE(i_src in number) return raw is
    v_src number;
    v_hexstr varchar2(20);
    v_rt raw(4);
  begin
    v_src := i_src;
    if (v_src<0) then
      v_src:=v_src + 4294967296;    -- 为了支持负数.
    end if;
    v_hexstr := '0000000' || trim(to_char(v_src,'XXXXXXXX'));
    v_hexstr := substr(v_hexstr, length(v_hexstr)-7, length(v_hexstr));
    v_hexstr := substr(v_hexstr, 7, 2)
      || substr(v_hexstr, 5, 2)
      || substr(v_hexstr, 3, 2)
      || substr(v_hexstr, 1, 2)
      ;
    v_rt := hextoraw(v_hexstr);
    return v_rt;
  end;
  -- 将 存储在raw(4)中的大端方式32位整数 转为数字. 值域为 0~4294967295 .
  function FROM_INT32BE(i_src in raw) return number is
    v_src raw(8);
    v_hexstr varchar2(20):='';
    v_rt number:=0;
  begin
    if ( (nvl(length(i_src), 0)<=0) ) then
      return v_rt;
    end if;
    if (length(i_src) >= 8) then    -- length、substr均把 raw 的1个字节看作 2个(十六进制)字符.
      v_src := substr(i_src, 1, 8);
      v_hexstr := rawtohex(v_src);
    else
      v_hexstr := '000000' || rawtohex(i_src);
      v_hexstr := substr(v_hexstr, length(v_hexstr)-7, length(v_hexstr));
    end if;
    v_rt := to_number(v_hexstr,'XXXXXXXX');
    return v_rt;
  end;
  -- 将 存储在raw(4)中的小端方式32位整数 转为数字. 值域为 0~4294967295 .
  function FROM_INT32LE(i_src in raw) return number is
    v_src raw(8);
    v_hexstr varchar2(20):='';
    v_rt number:=0;
  begin
    if ( (nvl(length(i_src), 0)<=0) ) then
      return v_rt;
    end if;
    if (length(i_src) >= 8) then    -- length、substr均把 raw 的1个字节看作 2个(十六进制)字符.
      v_src := substr(i_src, 1, 8);
      v_hexstr := rawtohex(v_src);
    else
      v_hexstr := rawtohex(i_src) || '000000';
      v_hexstr := substr(v_hexstr, 1, 8);
    end if;
    v_hexstr := substr(v_hexstr, 7, 2)
      || substr(v_hexstr, 5, 2)
      || substr(v_hexstr, 3, 2)
      || substr(v_hexstr, 1, 2)
      ;
    v_rt := to_number(v_hexstr,'XXXXXXXX');
    return v_rt;
  end;

3.2 将32位整数追加到blob

很多时候需要给blob追加一个 32位整数。现在利用上面的函数,可以这样做——

      v_tempraw := TO_INT32LE(nvl(i_int32, 0));
      dbms_lob.writeappend(v_blob, 4, v_tempraw);

(完)

参考文献

到此这篇关于Oracle存储过程里操作BLOB的字节数据的办法的文章就介绍到这了,更多相关Oracle BLOB 字节数据内容请搜索脚本之家以前的文章或继续浏览下面的相关文章希望大家以后多多支持脚本之家!

您可能感兴趣的文章:
阅读全文