本文主要介紹oracle數據庫中dbms_lob包的使用以及使用dbms_lob包來維護lob數據庫類型的基本方法。隨着社會的發展，在現代信息系統的開發中，需要存儲的已不僅僅是簡單的文字信息，同時還包括一些圖片和音像資料或者是超長的文本。比如開發一套旅游信息系統，每一個景點都有豐富的圖片、音像資料和大量的文字介紹。這就要求后台數據庫要有存儲這些數據的能力。ORACLE公司在其Oracle8i中通過提供LOB字段實現了該功能。
在ORACLE數據庫中，LOB大對象類型是用來存儲大量的二進制和文本數據的一種數據類型（一個LOB字段可存儲可多達4GB的數據）。目前，它又分為兩種類型：內部LOB和外部LOB。內部LOB將數據以字節流的形式存儲在數據庫的內部。因而，內部LOB的許多操作都可以參與事務，也可以像處理普通數據一樣對其進行備份和恢復操作。Oracle8i支持三種類型的內部LOB：BLOB（二進制數據）、CLOB（單字節字符數據）、NCLOB（多字節國家字符數據）。其中CLOB和NCLOB類型適用於存儲超長的文本數據，BLOB字段適用於存儲大量的二進制數據，如圖像、視頻、音頻等。目前，Oracle8i只支持一種外部LOB類型，即BFILE類型。在數據庫內，該類型僅存儲數據在操作系統中的位置信息，而數據的實體以外部文件的形式存在於操作系統的文件系統中。因而，該類型所表示的數據是只讀的，不參與事務。該類型可幫助用戶管理大量的由外部程序訪問的文件。
為了方便下文的敘述，我們假定使用如下語句在數據庫中創建了一張表。
|
1
2
3
4
5
6
|
CREATE
TABLE
view_sites_info(
site_id NUMBER(3),
audio BLOB
DEFAULT
empty_blob(),
DOCUMENT CLOB
DEFAULT
empty_clob(),
video_file BFILE
DEFAULT
NULL
,
CONSTRAINT
PK_TAB_view_sites_info
PRIMARY
KEY
(site_id));
|
ORACL提供了多種使用和維護LOB的方式，如使用PL/SQL DBMS_LOB包、調用OCI（Oracle Call Interface）、使用Proc*C/C++、使用JDBC等。其中最為方便有效的是使用PL/SQL調用DBMS_LOB包，本文就將介紹該方法。在Oracle中，存儲在LOB中數據稱為LOB的值，如使用Select對某一LOB字段進行選擇，則返回的不是LOB的值，而是該LOB字段的定位器（可以理解為指向LOB值的指針）。如執行如下的SQL語句：
|
1
2
3
4
5
6
7
8
|
DECLARE
audio_info BLOB;
BEGIN
SELECT
audio
INTO
audio_info
FROM
view_sites_info
WHERE
site_id = 100;
END
;
|
存儲在AUDIO_INFO變量中的就是LOB定位器，而不是LOB的值。而要對某一LOB的值進行訪問和維護操作，必需通過其定位器來進行。DBMS_LOB包中提供的所有函數和過程都以LOB定位器作為參數。
DBMS_LOB包中主要提供了以下幾個過程供用戶對內部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尾部。
下面我們以最為常用的讀和寫為例詳細介紹這些過程的用法。首先介紹一下寫過程。該過程的語法為：
|
1
2
3
4
5
6
7
8
|
PROCEDURE
WRITE(lob_loc
IN
OUT
BLOB,
amount
IN
BINARY_INTEGER,
offset
IN
INTEGER
,
buffer
IN
RAW);
PROCEDURE
WRITE(lob_loc
IN
OUT
CLOB
CHARACTER
SET
any_cs,
amount
IN
BINARY_INTEGER,
offset
IN
INTEGER
,
buffer
IN
VARCHAR2
CHARACTER
SET
lob_loc%charset);
|
各參數的含義為：
lob_loc：要寫入的LOB定位器。
amount：寫入LOB中的字節數。
offset：指定開始操作的偏移量。
buffer：指定寫操作的緩沖區。
下面的代碼就是運用該過程向LOB字段寫入數據的示例：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
DECLARE
lobloc CLOB;
buffer VARCHAR2(2000);
amount NUMBER := 20;
offset NUMBER := 1;
BEGIN
--初始化要寫入的數據
buffer :=
'This is a writing example'
;
amount := length(buffer);
SELECT
document
FROM
view_sites_info
WHERE
site_id = 100
FOR
UPDATE
;
dbms_lob.write(lobloc,
amount,
1,
buffer);
COMMIT
;
END
;
|
需要特別指出的是：
（1）在調用寫過程前一定要使用SELECT語句檢索到定位器且用FOR UPDATE子句鎖定行，否則不能更新LOB。
（2）寫過程從offset指定的位置開始，向LOB中寫入長度為amount的數據，原LOB中在這個范圍內的任何數據都將被覆蓋。
（3）緩沖區的最大容量為32767字節，因此在寫入大量數據時需多次調用該過程。
下面再來介紹一下讀過程，該過程的語法為：
|
1
2
3
4
5
6
7
8
|
PROCEDURE
READ
(lob_loc
IN
BLOB,
amount
IN
OUT
BINARY_INTEGER,
offset
IN
INTEGER
,
buffer
OUT
RAW);
PROCEDURE
READ
(lob_loc
IN
CLOB
CHARACTER
SET
any_cs,
amount
IN
OUT
BINARY_INTEGER,
offset
IN
INTEGER
,
buffer
OUT
VARCHAR2
CHARACTER
SET
lob_loc%charset);
|
各參數的含義為：
lob_loc：要讀取的LOB定位器。
amount：要讀取的字節數。
offset：開始讀取操作的偏移量。
buffer：存儲讀操作結果的緩沖區。
下面的代碼演示了如何使用該過程讀取LOB字段中的數據：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
append存儲過程用於將一個大對象添加到另一個大對象中，此時是將源大對象的內容全部添加過去。append存儲過程的語法如下：
|
1
2
3
4
|
PROCEDURE
append(dest_lob
IN
OUT
NOCOPY BLOB,
src_lob
IN
BLOB);
PROCEDURE
append(dest_lob
IN
OUT
NOCOPY CLOB
CHARACTER
SET
any_cs,
src_lob
IN
CLOB
CHARACTER
SET
dest_lob%charset);
|
其中，各個參數的含義如下：
dest_lob是被源lob添加到的目標lob的定位器。
src_lob是源lob的定位器。
any_cs用來指定字符集。