#!/bin/ksh

if [ $# -ne 5 ]
then
 echo “penggunaan awrsimple.sh <jumlah hari> <lokasi directory awr> <nomor instance> <username> <tns alias>”
 exit
fi

num_days=$1
awrloc=$2
instnum=$3
username=$4
tns=$5

exec 4>/dev/tty

function getpass
{
        typeset prompt=$1
        typeset backspace=$(echo  \\b\\c)
        typeset enter=$(echo \\r\\c)
        typeset savesetting=$(stty -g)
        typeset keystroke password n i reading result
        n=0
        echo “${prompt}”\\c >&4
        stty -echo -icrnl -icanon min 1 time 0
        reading=1
        while ((reading)) ; do
                keystroke=$(dd bs=1 count=1 2>/dev/null)
                case $keystroke in
                $enter)
                        reading=0
                        ;;
                $backspace)
                        if ((n)) ; then
                                echo “${backspace} ${backspace}”\\c >&4
                                ((n=n-1))
                        fi
                        ;;
                *)
                        echo \*\\c >&4
                        data[n]=$keystroke
                        ((n=n+1))
                esac
        done
        stty “$savesetting”
        echo >&4
        result=”"
        i=0
        while  ((i<n)) ; do
                result=”${result}${data[i]}”
                ((i=i+1))
        done
        echo $result
        return 0
}
passwd=$(getpass “password : “)

sqlplus -s $username/$passwd@$tns as sysdba <<EOF > log1.txt

set serveroutput on
set lines 125
set pages 1000
set feedback off
set echo off
set ver off
col report_name form a40
col betime form a5
col edtime form a5
col instart_fmt form a20
col snapdat form a20

spool awrsimple.sql

DECLARE
 CURSOR c1 IS
select to_char(s.startup_time,’dd Mon “at” HH24:mi:ss’)  instart_fmt
     , di.instance_name                                  inst_name
     , di.db_name                                        db_name
     , s.snap_id                                         snap_id
     , to_char(s.end_interval_time,’dd Mon YYYY HH24:mi’) snapdat
     , to_char(s.end_interval_time,’DDmonRR’) repdate
     , to_char(s.end_interval_time,’HH24′) snaphour
     , s.snap_level                                      lvl
  from dba_hist_snapshot s
     , dba_hist_database_instance di
     , v\$database da
     , v\$instance ins
 where s.dbid              = da.dbid
   and di.dbid             = da.dbid
   and s.instance_number   = ins.instance_number
   and di.instance_number  = ins.instance_number
   and ins.instance_number = $instnum
   and di.dbid             = s.dbid
   and di.instance_number  = s.instance_number
   and di.startup_time     = s.startup_time
   and s.end_interval_time >= decode( $num_days
                                   , 0   , to_date(’31-JAN-9999′,’DD-MON-YYYY’)
                                   , 3.14, s.end_interval_time
                                   , to_date((select to_char(max(end_interval_time),’dd/mm/yyyy’)
       from dba_hist_snapshot),’dd/mm/yyyy’) - ($num_days-1))
 order by di.db_name, di.instance_name, s.snap_id;

    v_report_name varchar2(100);
    v_db_name     varchar2(30);
    v_beid        varchar2(3);
    v_snap_begin  number(8);
    v_snapdate    varchar2(8);
    v number(3) := 1;
BEGIN
    select name into v_db_name from v\$database;
    FOR I IN C1 LOOP

      if v > 1 then

        dbms_output.enable(1000000);
        dbms_output.put_line(’define num_days=’||$num_days);
        dbms_output.put_line(’define report_type=html’);
        dbms_output.put_line(’define begin_snap=’||v_snap_begin);
        dbms_output.put_line(’define end_snap=’||i.snap_id);
        v_report_name:=’awr_’||lower(v_db_name)||’$instnum\_’||v_snapdate||’_'||v_beid||’-'||i.snaphour||’.html’;
        dbms_output.put_line(’define report_name=$awrloc’||v_report_name);
        dbms_output.put_line(‘@?/rdbms/admin/awrrpt.sql’);

      end if;
      v := v + 1;
      v_beid := i.snaphour;
      v_snap_begin := i.snap_id;
      v_snapdate := i.repdate;
    END LOOP;
END;
/
spool off

@awrsimple.sql

set echo on
set feed on
set ver on
exit;
EOF

- replikasi data dari satu database ke database lain (Single Master, Satu Arah)

- replikasi data dari satu database ke database lain juga sebaliknya (Multi Master, dua Arah).

namun demikian karena menurut dokumen oracle dan karena kebutuhan, dengan sedikit experiment, bisa dikembangkan untuk keperluan:

- Archiving data

- boos performance untuk menghindari locking dan contention

dua hal tersebut sudah dilakukan konfigurasi dan sedang ditest (load test), apakah janji manis advanced queueing tersebut benar ataukah cuma basa-basi

Untuk aplikasi transaksional, ada 1 table yang super sibuk, dan ada banyak proses yang hit table tersebut danprosesnya concurrent, parallel dan simultan, malah ada 1 proses yg membutuhkan response time <20 detik dari keseluruhan system, dari database harus respon <5 detik saja….

akhirnya konfigurasi streams/AQ dilakukan, dimana table tersebut dipecah kedalam 3 table, process yg membutuhkan response time <5 detik khusu pada table tersendiri (table OL), proces lainnya dipecah kedalam 2 table yang berbeda, 1 table untuk kebutuhan process transaksional, 1 table untuk kebutuhan selain transaksional juga sebagai data archiving.

pengalaman ini ketka migrasi database server RAC dari 2node mesin lama menjadi 3 node mesin baru dari rhel4.4 ke rhel5.4.

konfigurasi nic bonding:

- baca bonding.txt (bonding kernel documentation)

- cek dependensi (kernel loadable module dah tersedia apa blm, di rhel5.4 semua sudah tinggal konfig aja)

- karena di rhel untuk oracle RAC, maka kemungkinan 3.2 dan 3.3 saja yg berlaku

- setelah kerasan dgn tmpxxxx ethernet pada konfigurasi 3.2, akhirnya saya pilih konfigurasi 3.3 “Configuring Bonding Manually with Ifenslave”

- entry pada /etc/rc.local

modprobe bonding mode=balance-alb miimon=100
modprobe e100
ifconfig bond0 11.11.11.x netmask 255.255.255.0 up
ifenslave bond0 eth2
ifenslave bond0 eth3

- that’s it, dan skr ndak pernah ngalami lagi itu device tmpxxxx ethernet eth… ….

- and then akhire, semua konfig ocfs2, ocr, voting disk dan bonding saya taro di /etc/rc.local, dimana lengkapnya spt ini:

touch /var/lock/subsys/local

insmod /lib/modules/2.6.18-164.el5/kernel/drivers/char/hangcheck-timer.ko hangcheck_tick=30 hangcheck_margin=180

/sbin/ifconfig bond0 down
/sbin/rmmod bonding

modprobe bonding mode=balance-alb miimon=100
ifconfig bond0 11.11.11.7 netmask 255.255.255.0 up
ifenslave bond0 eth2
ifenslave bond0 eth3

/etc/init.d/o2cb start
/etc/init.d/ocfs2 start

chown root:dba /dev/emcpowera1
chown root:dba /dev/emcpowera2
chown oracle:dba /dev/emcpowera3
chown oracle:dba /dev/emcpowera5
chown oracle:dba /dev/emcpowera6
chown oracle:dba /dev/emcpowera7
chown oracle:dba /dev/emcpowera8

oracle:dbs247.com

Mulai oracle 10.2 oracle sudah menyertakan perl 5 secara default, bisa dicek pada $ORACLE_HOME/perl, malah konektor ke database oracle sudah tersedia.

Jika kita melihat standard OS perl yang disertakan dimana lokasi perl interpreternya sendiri ada di /usr/bin/perl, ada sedikit masalah sewaktu kita akan menginstall konektor-konektor database.

untuk itu hal-hal ini perlu dilakukan:

- install perl dari source

- environment variable PERL5LIB dan PATH set ke lokasi perl yg barusan diinstall

- install DBI

- install DBD::Oracle

- install DBD::mysql

contoh script:

#!/home/oracle/localperl/bin/perl

use DBI;

# MYSQL CONFIG VARIABLES
$host = “localhost”;
$database = “mydb”;
$user = “root”;
$pw = “passwd”;

# PERL CONNECT()
#$connect = mysql->connect($host, $database, $user, $pw);
$dbm = DBI->connect(”dbi:mysql:$database:$host”, $user, $pw);
$dbo = DBI->connect(”dbi:Oracle:”,”mydb”,”mydb”, { ora_session_mode =>
2 })||die “%ERROR opening DB: $DBI::errstr”;

$lim1=0;
for($i = 2000; $i < 29827026; ) {
$lim2=$i;
$str_src = qq{select timestamp,…
from audit_table order by timestamp limit $lim1,$lim2};
$out1 = $dbm->prepare($str_src);
$out1->execute;

$lim1=$lim2+1;

       while(my($timestamp,…)=$out1->fetchrow_array) {

       $ins_ora1 = qq{insert into mydb.AUDIT_TABLE(TIMESTAMP…)
VALUES(to_date(’$timestamp’,'yyyy-mm-dd hh24:mi:ss’),….)};
       $out2 = $dbo->prepare($ins_ora1);
       $out2->execute;

       }

$ins_ora4 = “commit”;
$out3 = $dbo->prepare($ins_ora4);
$out3->execute;

$i=$i+2000;
}

undef $dbm;
undef $dbo;

set environment variable sebelum mengeksekusi script tsb:

export PERL5LIB=/home/oracle/localperl/lib:/home/oracle/localperl/lib/site_perl/5.10.0/i86pc-solaris:/home/oracle/localperl/lib/site_perl/5.10.0

export PATH=/home/oracle/localperl/bin:$PATH

export LD_LIBRARY_PATH=/apps/oracle/product/10.2/lib32:/apps/oracle/product/10.2/lib:/opt/mysql/mysql32/lib:/opt/mysql/mysql/lib

export ORACLE_HOME=ORACLE_HOME=/apps/oracle/product/10.2

salam,

oracle@dbs247.com

mysql@dbs247.com

Dikarenakan oracle secara arsitektur ACID compliance dan ful MVCC, dimana mau tidak mau harus melakukan write ahead logging, maka performance INSERT pun dipengaruhi oleh keadaan tersebut:

Issue yang bakal muncul secara wait event adalah sebagai berikut:

- log file sync issue, dimana frekuensi commit melebihi kapasitas IOPS

- log buffer space issue, ini berhubungan dengan parameter log_buffer

- free buffer waits, wait event ini bisa disebabkan karena IO bottleneck, ataupun oracle buffer cache yang terlalu kecil. sehingga dbwr tidak cukup waktu untuk menulis dirty buffer dari SGA ke disk

- buffer busy waits, wait event ini berelasi dengan konkurensi dan terjadinya transaksi pada level table even block yang sama. misalnya setelah INSERT dilakukan, aplikasi langsung SELECT pada data-data atau row-row yang barusan diinsert. fakta lain wait event ini bisa timbul karena ada masalah dengan index

Jika dilakukan dengan metode “direct path insert”, beberapa wait event diatas bisa dihindari khusunya yang berhubungan dgn buffer cache nya oracle, misalnya; free buffer waits, buffer busy waits. Tapi wait event yang berhubungan dengan konsep “write ahead logging” masih tetep ada.

Pada oracle 10.2 ada feature “asynchronous commit”,  dimana ketergantungan penulisan log terlebih dahulu akan diabaikan dan oracle secara asynchronously menulis redo data dari log_buffer ke redo log files.

ada beberapa trik, agar insert performance ini bisa di-enhance lagi.

oracle@dbs247.com