RDS Oracle 雑多なメモ#14 - おまけ / FAQ Tweet

ということで、done ってしておきながら、おまけ（得意技w）です。

RDS Oracle限定というわけではなくなってきましたがw 勢いでさらに追加。

手作りのcpっぽいスクリプトなので、バグってないか少し不安w ということで、オリジナルファイルと同じなのか確認できるようにメッセージダイジェストを取得するスクリプトも作成しましたw

21:14:43 rdsora121@BILL> @list_dir

DIRECTORY_NAME                           DIRECTORY_PATH
---------------------------------------- ----------------------------------------------------------------------
ADUMP                                    /rdsdbdata/log/audit
BDUMP                                    /rdsdbdata/log/trace
DATA_PUMP_DIR                            /rdsdbdata/datapump
HOGE_DIR                                 /rdsdbdata/userdirs/02
OPATCH_INST_DIR                          /rdsdbbin/oracle/OPatch
OPATCH_LOG_DIR                           /rdsdbbin/oracle/QOpatch
OPATCH_SCRIPT_DIR                        /rdsdbbin/oracle/QOpatch
TEST_DIR                                 /rdsdbdata/userdirs/01

8行が選択されました。

21:14:48 rdsora121@BILL> @ls_dir test_dir

FILENAME                                                               TYPE         FILESIZE MTIME
---------------------------------------------------------------------- ---------- ---------- --------
hoge.dmp.gz                                                            file          2603349 18-09-24
hoge.log.gz                                                            file              512 18-09-24
hoge.dmp.bak                                                           file       1083412480 18-09-24
hoge.dmp.gz.bak                                                        file          2603349 18-09-24
hoge.log.bak                                                           file             1202 18-09-24
hoge.log.gz.bak                                                        file              512 18-09-24
01/                                                                    directory        4096 18-09-24
hoge.dmp                                                               file       1083412480 18-09-24
hoge.log                                                               file              904 18-09-24

9行が選択されました。

ダンプファイルを圧縮ファイル、ログファイル、ダンプファイルなどなど、MD5が取得できるようになりました。ファイルが壊れてないか確認しやすい:)

21:14:55 rdsora121@BILL> @check_md5 test_dir hoge.dmp.gz
TEST_DIR/hoge.dmp.gz MD5 : D2CB26A7E75C9725F00C30A9280C1599

PL/SQLプロシージャが正常に完了しました。

21:15:32 rdsora121@BILL> @check_md5 test_dir hoge.dmp.gz.bak
TEST_DIR/hoge.dmp.gz.bak MD5 : D2CB26A7E75C9725F00C30A9280C1599

PL/SQLプロシージャが正常に完了しました。

21:15:50 rdsora121@BILL> @check_md5 test_dir hoge.log
TEST_DIR/hoge.log MD5 : 6DA2D7C6150A9C8ACD60D95D6A61C1B5

PL/SQLプロシージャが正常に完了しました。

21:16:26 rdsora121@BILL> @check_md5 test_dir hoge.dmp
TEST_DIR/hoge.dmp MD5 : 1B84C9E09F13A4FDC6EF2F03137C0338

PL/SQLプロシージャが正常に完了しました。

21:18:02 rdsora121@BILL> @check_md5 test_dir hoge.dmp.bak
TEST_DIR/hoge.dmp.bak MD5 : 1B84C9E09F13A4FDC6EF2F03137C0338

PL/SQLプロシージャが正常に完了しました。

ざっくり作ったスクリプトは以下の通り。BFILEからファイルを読み込み、一時BLOBとしてBFILEからロード、MD5取得というながれです。
(オンプレでもそのまま使える内容にはなっちゃいましたが、勢いで作ったので：）

21:18:50 rdsora121@BILL> !cat check_md5.sql
SET VERIFY OFF
SET SERVEROUTPUT ON FORMAT WRAPPED
DECLARE
  vSrcfile           BFILE;
  vSrcBlob           BLOB;
  vSrcDirectoryName  VARCHAR2(30);
  vSrcFileName       VARCHAR2(60);
  vSrcFileSize       PLS_INTEGER;
  vSrcFileMd5        RAW(16);

  PROCEDURE close_bfile
  (
    iBfile IN OUT NOCOPY BFILE
  ) 
  IS
  BEGIN
    IF DBMS_LOB.ISOPEN(iBfile) = 1 THEN
      DBMS_LOB.CLOSE(iBfile);
    END IF;
  END close_bfile;

BEGIN
  vSrcDirectoryName := UPPER('&1');
  vSrcFileName   := '&2';
  
  vSrcFile 
    := BFILENAME(UPPER(vSrcDirectoryName), vSrcFileName);

  DBMS_LOB.OPEN(vSrcFile);
  vSrcFileSize := DBMS_LOB.GETLENGTH(vSrcFile);


  DBMS_LOB.CREATETEMPORARY (
    lob_loc => vSrcBlob
    , cache   => false
    , dur     => DBMS_LOB.SESSION
  );
   
  DBMS_LOB.LOADFROMFILE (
    dest_lob => vSrcBlob
    , src_lob => vSrcFile
    , amount   => vSrcFileSize
    , dest_offset => 1
    , src_offset => 1
  );
  
  vSrcFileMd5 := DBMS_CRYPTO.HASH(vSrcBlob, DBMS_CRYPTO.HASH_MD5);

  DBMS_LOB.FREETEMPORARY(vSrcBlob);
  close_bfile(vSrcFile);

  DBMS_OUTPUT.PUT_LINE(
    vSrcDirectoryName
    ||'/'||vSrcFileName
    ||' MD5 : '||vSrcFileMd5
  );
EXCEPTION
  WHEN OTHERS THEN
    DBMS_LOB.FREETEMPORARY(vSrcBlob);
    close_bfile(vSrcFile);
    RAISE;
END;
/

UNDEFINE 1
UNDEFINE 2
SET SERVEROUTPUT OFF
SET VERIFY ON

ということで、done... これを元にまたまにか作るかもしれない、作らないかもしれないw

---

Previously on Mac De Oracle

・RDS Oracle 雑多なメモ#1 / FAQ
・RDS Oracle 雑多なメモ#2 / FAQ
・RDS Oracle 雑多なメモ#3 / FAQ
・RDS Oracle 雑多なメモ#4 / FAQ
・RDS Oracle 雑多なメモ#5 / FAQ
・RDS Oracle 雑多なメモ#6 / FAQ
・RDS Oracle 雑多なメモ#7 / FAQ
・RDS Oracle 雑多なメモ#8 / FAQ
・RDS Oracle 雑多なメモ#9 / FAQ
・RDS Oracle 雑多なメモ#10 / FAQ
・RDS Oracle 雑多なメモ#11 / FAQ
・RDS Oracle 雑多なメモ#12 / FAQ
・RDS Oracle 雑多なメモ#13 / FAQ