从我管理的 oracle 10gR2 10.2.05 数据库中提取 BLOBS 时,我遇到性能问题。我有大约 400 个存储为 BLOBS 的文件,我需要将它们写入文件系统。下面是我的代码。当我执行这个过程时,前 8 个左右的文件会在几秒钟内写入,从那里开始,速度会呈指数级下降,在前 8 个文件之后,每 40 秒大约写入 1 个文件。对我来说,这没有任何意义,为什么会这样呢?前 8 个文件速度很快,但之后一切都会变慢。我尝试将其作为存储过程运行,将 UTL_FILE.fopen 更改为“wb”(写入二进制文件),并使用 NFS 安装的文件系统,以免妨碍数据库的性能。这些都没有产生任何影响。按照这个速度,我需要 6 个小时才能提取 400 个文件,每个文件平均大小约为 1.5MB。有谁发现我的代码有什么问题或者知道更好的方法来做到这一点?顺便说一句,我使用了这里找到的示例代码http://www.oracle-base.com/articles/9i/ExportBlob9i.php http://www.oracle-base.com/articles/9i/ExportBlob9i.php作为起点。
谢谢你的帮助!
DECLARE
TYPE comment_text IS TABLE OF documents.comment_text%TYPE;
TYPE localdata IS TABLE OF documents.localdata%TYPE;
l_file UTL_FILE.FILE_TYPE;
l_buffer RAW(32767);
l_amount BINARY_INTEGER := 32767;
l_pos INTEGER := 1;
l_blob localdata;
l_fname comment_text;
l_blob_len INTEGER;
l_x NUMBER := 1;
BEGIN
SELECT comment_text, localdata
BULK COLLECT INTO l_fname, l_blob
FROM documents
WHERE user_id='BILLYBOB';
IF SQL%ROWCOUNT =0 THEN
DBMS_OUTPUT.PUT_LINE('No records found!');
ELSE
FOR i IN l_fname.FIRST .. l_fname.LAST
LOOP
l_blob_len := DBMS_LOB.getlength(l_blob(i));
DBMS_OUTPUT.PUT_LINE(l_blob_len);
l_file := UTL_FILE.fopen('BLOBS',l_x || '_' || l_fname(i),'w', 32767);
l_pos := 1;
l_x := l_x + 1;
WHILE l_pos < l_blob_len
LOOP
DBMS_LOB.read(l_blob(i), l_amount, l_pos, l_buffer);
UTL_FILE.put_raw(l_file, l_buffer, TRUE);
l_pos := l_pos + l_amount;
END LOOP;
UTL_FILE.fclose(l_file);
END LOOP;
END IF;
END;
我很确定您不应该在过程开始时将所有 BLOB 提取到数组中。由于您读取 BLOB 数据并且从未真正关闭任何 lob 定位器,因此 Oracle 必须将所有这些信息保留在内存中。我猜这是内存溢出的情况。
试试这个:
CURSOR cc IS (SELECT ...)
BEGIN
OPEN cc;
LOOP
FETCH cc
INTO l_fname, l_blob;
EXIT WHEN cc%NOTFOUND;
l_blob_len := DBMS_LOB.getlength(l_blob);
DBMS_OUTPUT.PUT_LINE(l_blob_len);
l_file := UTL_FILE.fopen('BLOBS', l_x || '_' || l_fname, 'w', 32767);
l_pos := 1;
l_x := l_x + 1;
WHILE l_pos < l_blob_len LOOP
DBMS_LOB.READ(l_blob, l_amount, l_pos, l_buffer);
UTL_FILE.put_raw(l_file, l_buffer, TRUE);
l_pos := l_pos + l_amount;
END LOOP;
UTL_FILE.fclose(l_file);
END LOOP;
CLOSE cc;
END;
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)