Oracle中提取和存储数据库对象的DDL

2020-03-09 22:54:06

字体：大中小

来源：转载

供稿：网友

注册会员，创建你的web开发资料库，从对象（例如数据库表、索引、约束、触发器等）中提取ddl命令的普通方法涉及到的操作包括从这些对象中提取元数据（metadata），并把这些数据存储在内存中。尽管目前有很多脚本可以实现这样的功能，但是它们通常都是不完整的或者过时的。幸运的是，oracle 9.2提供了一个实现这样的功能的api：dbms_metadata程序包。

　　在很多情况下，数据库中数据的维护操作要求我们提取多种对象（例如数据库表、索引、约束、触发器等）的ddl（data definition language，数据定义语言）。

　　最近我承担了一个任务，我需要编写一组数据库程序包来执行高性能的大量的数据删除（delete）操作。这样的操作要求我拥有提取和存储数据库对象ddl的相关技术。

　　提取和存储数据库对象的ddl的方法如下：

　　· 建立与源表结构相同的数据表，但是它不带主键、备用键和外部键约束。

　　· 例如，使用mytable_x，其中mytable是要被删除的目标数据表。

　　· 把需要保存的数据插入新建立的数据表（mytable_x）中。

　　· 使用nologging parallel选项在新数据表上建立索引。

　　· 在新数据表上建立约束。

　　· mytable和mytable_x数据表进行交换。把主表改名为mytable_t，把mytable_x改名为mytable。

　　· 验证结果并删除mytable_t表。

　　很明显，为了编写实现上面目标的代码，你必须提取数据库对象的元数据（定义和被选中的属性），并把它存储在内存中，这样在执行上面的操作的时候才能够使用它。

　　在网上存在大量的脚本，它们可以从多种oracle数据字典（user_tables、user_indexes、user_ind_columns、user_constraints、user_cons_columns等）中提取数据库对象的元数据，接着为特定的对象构造ddl命令。这些脚本的一个问题是，它们通常是sql*plus脚本，它会生成客户端文本文件，而这个文件不能被服务器端代码访问。它们的主要问题有：

　　· 不完整：不能提取所有的选项，并组合进ddl语句中。

　　· 过时了：这些脚本通常不支持oracle最新的数据库特性--分区（partitioning）、基于函数的索引、自动段空间管理（assm）等。这些脚本可能崩溃或生成错误的ddl语句。

　　问题总结：尽管有大量的从oracle数据字典中提取数据库对象元数据的脚本，但是它们中的大多数要么不完整，要么过期了。

　　解决方案：使用dbms_metadata程序包，学习如何用最佳的、没有错误的和易于维护的方式执行上面的事务。

　　使用oracle的本地api：dbms_metadata程序包

　　oracle数据库采用补充pl/sql程序包的形式提供了丰富的预先包装好的api。oracle 9.2版本中引入的dbms_metadata程序包可能正好适合你的需求。它包含了用于检索数据库对象定义的api。

　　我们将使用的api主要是dbms_metadata.get_ddl函数。这个函数返回的对象定义sql字符串是clob。它拥有下面一些输入参数：

　　· object_type varchar2

　　· name varchar2

　　· schema varchar2 default null

　　· version varchar2 default ’compatible’

　　· model varchar2 default ’oracle’,

　　· transform varchar2 default ’ddl’

　　下面建立了一个用于测试的emptest数据表，它带有索引和约束：

create table emptest
(
empno integer not null,
lastname varchar2(30) not null,
firstname varchar2(20) not null,
job varchar2(9) ’
hiredate date ’
isactive number(1)
constraint emptest_ck1
check (isactive in (0,1)) ,
salary number(9,2) ,
commision number(9,2) ,
deptno number(2) ,
constraint emptest_pk
primary key (empno),
constraint emptest_ak1
unique (lastname, firstname)
);

create index emptest_hiredate_salary
on emptest
(
salary,
hiredate
);
　　运行上面的脚本之后，就建立了一个带有三个索引（两个唯一的和一个不唯一的索引）的emptest表：

select index_name, index_type, uniqueness
from user_indexes
where table_name = ’emptest’;
索引名称索引类型唯一性emptest_ak1normaluniqueemptest_hiredate_salarynormalnonuniqueemptest_pknormalunique
　　emptest表还包括六个约束：

　　· 一个主键-emptest_pk

　　· 一个备用键-emptest_ak

　　· 一个检查约束-emptest_ck1

　　· 系统生成的（sys_*）三个非空的约束，名称如下：

约束名称约束类型索引名称sys_c002144065c sys_c002144066c sys_c002144067c emptest_ck1c emptest_pkp emptest_pkemptest_ak1u emptest_ak1
　　现在我们执行匿名的pl/sql代码块来调用dbms_metadata.get_ddl函数，检索数据表的定义。

　　dbms_output程序包只能输出最长为255个字符的字符串，由于在处理数据表的ddl字符串的时候太容易超过这个限制，所以这是一个问题。为了解决这个问题，我们使用了本地过程show()（列表1所示）。

　　列表1：调用dbms_metadata.get_ddl()函数的pl/sql代码块

declare
vclob clob;
vlongstring varchar2(32767);
voffset pls_integer := 0;
vlength pls_integer := 0;
vtable varchar2(30) := ’emptest’;

procedure show (pvariable varchar2, plinesize pls_integer := 80)
is
begin
dbms_output.enable(1000000);
if (length(pvariable) > plinesize)
then
dbms_output.put_line(substr(pvariable, 1, plinesize));
show(substr(pvariable, plinesize + 1), plinesize);
else
dbms_output.put_line(pvariable);
end if;
end show;
begin
-- 获取 ddl
vclob := dbms_metadata.get_ddl(’table’, upper(vtable));

-- 获取 clob 长度
vlength := dbms_lob.getlength(vclob);
dbms_output.put_line(’ddl length: ’ || to_char(vlength));

voffset := 1;
dbms_lob.read(vclob, vlength, voffset, vlongstring);
-- 关闭 clob
if (dbms_lob.isopen(vclob) > 0)
then
dbms_lob.close(vclob);
end if;
show(vlongstring, 80);
end;
　　列表1生成下面的输出信息：

ddl length: 461
create table "boris"."emptest"
( "empno" number(*,0) not null enable,
"lastname" varchar2(30) not null enable,
"firstname" varchar2(20) not null enable,
"job" varchar2(9),
"hiredate" date,
"isactive" number(1,0),
"salary" number(9,2),
"commision" number(9,2),
"deptno" number(2,0),
constraint "emptest_ck1" check (isactive in (0,1)) enable,
constraint "emptest_pk" primary key ("empno")
using index pctfree 10 initrans 2 maxtrans 255
storage(initial 65536 next 1048576 minextents 1 maxextents 2147483645
pctincrease 0 freelists 1 freelist groups 1 buffer_pool default)
tablespace "tools" enable, constraint "emptest_ak1" unique ("lastname", "firstname")
using index pctfree 10 initrans 2 maxtrans 255
storage(initial 65536 next 1048576 minextents 1 maxextents 2147483645
pctincrease 0 freelists 1 freelist groups 1 buffer_pool default)
tablespace "tools" enable) pctfree 10 pctused 40 initrans 1
maxtrans 255 nocompress logging
storage(initial 65536 next 1048576 minextents 1 maxextents 2147483645
pctincrease 0 freelists 1 freelist groups 1 buffer_pool default)
tablespace "tools"

　　它运行的情况太好了，返回的数据表的ddl字符串带有主键emptest_pk、备用键emptest_ak1和检查约束emptest_ck1。它建立了两个唯一的索引来支持主键和备用键约束。这不是你需要的结果：你需要一个表，但是为了加快数据载入速度，它不要包含约束和索引。只有在数据载入工作完成以后，你才建立索引和约束。

　　保证对象的定义独立的另外一个原因在于灵活性：你可能需要改变对象建立的次序。

　　现在可以设计一个数据结构来存储对象的元数据了。

上一篇：Oracle数据库的备份及恢复策略研究

下一篇：Oracle数据库密码文件的使用与维护