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

一、缘由

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所提供的过程有——

append：将源lob中的内容加到目的lob中。
close：关闭已经打开的lob。
createtemporary：在用户的临时表空间中，建立临时lob。
fileclose：关闭打开的bfile定位符所指向的os文件。
filecloseall：关闭当前会话已经打开的所有bfile文件。
fileexists：确定file_loc对应的os文件是否存在，1：存在。0：不存在。
filegetname：获取bfile定位符所对应的目录别名和文件名。
fileisopen：确定bfile对应的os文件是否打开。
freetemporary：释放在默认临时表空间中的临时lob。
fileopen：打开文件。
getchunksize：当建立包含clob/blob列的表时，通过指定chunk参数可以指定操纵lob需要分配的字节数（数据库尺寸的整数倍）默认为数据块的尺寸。
copy：从源lob中复制数据到目的lob。
erase：删除lob中全部或部分内容。
trim：将lob值减少到指定的长度。
write：向lob中写入数据。
instr：返回特定样式数据从lob某偏移位置开始出现n次的具体位置。
idopen：确定lob是否打开，打开：1，未打开：0。
istemporary：确定定位符是否为临时lob。
loadfromfile：将bfile的部分或全部内容复制到目标lob变量。
loadblobfromfile：将bfile数据装载到blob中，并且在装载后取得最新的偏移位置。
open：打开lob，open_mode（只读：dbms_lob.lob_readonly，写：dbms_lob.lob_readwrite）。
compare：比较两个同种数据类型的lob的部分或全部值是否相同。
getlength：获取lob的长度。
read：从lob中读出数据。
substr：与字符处理函数substr使用方法一样。
writeappend：将缓冲区数据写到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的关系——

blob中的一段字节数据，就是raw类型的。例如通过 dbms_lob.substr 截取得到的数据。
其次可根据 raw数据去替换blob中的某段字节数据。即使用 dbms_lob.write 。
可在blob的最后追加 raw数据。即使用 dbms_lob.writeappend 。
oracle支持 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过程有——

length：长度计算函数，得到一个raw类型变量的长度，单位为字节
concat：拼接函数，用于拼接两个raw类型变量
substr：获取子串函数
bit_and：位与函数
bit_or：位或函数
bit_xor：位异或函数
overlay：给指定字节赋值
cast_to_raw：字符串转 raw
cast_to_varchar2：raw 转 varchar2
cast_to_nvarchar2：raw 转 nvarchar2
cast_to_number：raw 转 number
cast_from_number：number 转 raw
cast_to_binary_integer：raw 转 binary_integer
cast_from_binary_integer：binary_integer 转 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 database online documentation / dbms_lob . https://docs.oracle.com/cd/e11882_01/timesten.112/e21645/d_lob.htm#ttplp600
oracle database online documentation / utl_raw . https://docs.oracle.com/cd/e11882_01/timesten.112/e21645/u_raw.htm#ttplp072
旺仔丶小馒头《dbms_lob》 . https://www.cnblogs.com/wang-chen/p/5756475.html
hornsey《oracle raw类型基本操作函数及使用示例》 . https://blog.csdn.net/nalw2012/article/details/72466256
jimeper《oracle十进制与十六进制的转换》 . https://www.cnblogs.com/jimeper/archive/2013/01/24/2875245.html

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

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

2025年03月22日 • Oracle •我要评论