如何使用Ora2PG将Oracle的CLOB列导入为PostgreSQL大对象

Ora2PG的--lo_import参数确实主打处理BLOB，但可以通过自定义类型映射+导出钩子脚本的组合，实现把Oracle CLOB列的数据转存为PostgreSQL的大对象（以oid类型存储引用），具体操作如下：

• 修改DDL类型映射
  打开Ora2PG的配置文件（默认是ora2pg.conf），找到TYPE_MAP配置项，添加CLOB到oid的映射规则：

  TYPE_MAP = (
      CLOB => oid
  )
  

  这样生成的PostgreSQL表结构里，原CLOB列会被定义为oid类型，用来存储大对象的引用ID。

• 用钩子脚本处理CLOB数据转大对象
  Ora2PG没有直接针对CLOB的LO导入参数，但可以借助--user_post_export钩子脚本，在数据导出阶段把CLOB内容转换成PostgreSQL的lo_from_bytea()函数调用（直接从内存导入大对象，避免临时文件）。
  编写一个Perl脚本（比如命名为clob_to_lo.pl），示例代码：

  sub user_post_export {
      my ($table, $cols, $rows) = @_;
      foreach my $row (@$rows) {
          foreach my $col (@$cols) {
              if ($col->{type} eq 'CLOB') {
                  my $clob_content = $row->{$col->{name}};
                  # 转义特殊字符，避免SQL语法错误
                  $clob_content =~ s/'/''/g;
                  $row->{$col->{name}} = qq{lo_from_bytea(0, '$clob_content')};
              }
          }
      }
      return $rows;
  }
  

  然后在Ora2PG配置里指定这个钩子脚本：

  USER_POST_EXPORT = clob_to_lo.pl
  

• 导入后的权限与维护
  数据导入完成后，要确保操作PostgreSQL的用户拥有大对象相关权限：

  GRANT SELECT, INSERT, UPDATE, DELETE ON pg_largeobject TO your_db_user;
  

  另外，PostgreSQL的大对象不会随表中oid记录的删除自动清理，后续如果删除了表数据，需要手动调用lo_unlink(oid)释放对应大对象空间，或者用pg_clean工具定期清理孤立的大对象。

内容的提问来源于stack exchange，提问作者user3750853