H.Tonguç YILMAZ Blog

“TNSNAMES.ORA” dosyasi içerdiği bilgiler nedeniyle her zaman saldırlara karşı bir giriş kapısı oldu.

Kahin 10g sürümü ile “SQLNET.ORA” dosyası içinde yapılacak basit bir tanım ile artık görünmesini istemediğiniz bağlantı bilgilerini saklı tutmanızı sağlayacak bir farklı seçim sunuyor.

kurulum örneği;

NAMES.DIRECTORY_PATH = (TNSNAMES, EZCONNECT)

örnek kullanım;

sqlplus username/password@ [//] hostname [:port] [/service_name]

Maltepe plaza zemin kat bilgisayarlı eğitim odasında iki haftalık birer günlük Kahin eğitimlerine bugün Gözde ile başladık.

İlk eğitim olması nedeniyle Gözde daha şanssız olacak bizlere göre, katılımcı sayısı da oldukça azdı bugün. İlk hafta eğitimleri giriş seviyesinde, “XE” sürümü belgeleri içerik olarak hafif ama yan kaynaklar ile bu açığı kapamaya çalışıyor bu haftaki anlatıcı arkadaşlarım.

Kahin üzerinden “.Net” uygulama geliştirme konusunda http://otn.oracle.com/dotnet bağlantısından birçok belge ve bilgi edinmek mümkün. Eğitimden aklımda kalan, bir süre “Jdbc” uygulamaları yazmamdan dolayı sanırım, derleyicinin ve ortam parçacıklarının tanıdık ve kullanışlı görünmesi oldu. Giriş seviyesi için bence bu hissi yaratmak çok tatmin edici idi, Gözde özenli çalışmış ve içeriğe hazırdı.

Yarın benim “Htmldb” eğitimim olacak. Normal koşullarda sekiz kişi ile katılımı sınırlandırmış olsamda çağrıda şu ana kadar on sekiz kabul döndü. Aklıma ilk gelen dokuz kişilik, başvuru sırasına göre öncelik vererek iki grup oluşturmak ve ilk fırsatta eğitimi tekrarlamak. Bakalım yarın sabah kaç kişi gelicek ama belli ki son bir sene içinde “Htmldb” de Turkcell de doğru pazarlanıyor

Kahin yıllardır “Microsoft” ile arasındaki rekabeti kızıştırmak için elinden geleni yapıyor, Linux ve Java başta olmak üzere her türlü alternatifin en önemli destekçisi. Fakat kendi deyimleri ile “Windows” işletim sistemi üzerinde ve “.Net” uygulama geliştirme ortamında ki en iyi veritabanı olma durumu cidden çok ender rastlanan bir pazarlama taktiği bence Bu konuda da çok yol aldıkları ortada, en büyük koz ise “.NET” için özel geliştirilen Kahin Veri Sağlayıcısı(ODP.NET).

Kahin(Oracle) yıllardır “Dbms” ve “Utl” paketlerini çeşitlendirmeye ve iyileştirmeye özen gösteriyor.

Tekerleği tekrar tekrar icat etmemek içinde bu paketleri yeni çıkan uyumlarla(versions) birlikte belgeleri(documentation) inceleyerek sınamak(testing) gerekli.

Sonuç olarak hangimizin hazırda var olan, parası ödenmiş ve Kahin gibi arkasında yılların deneyimi ve binlerce kişilik yazılım geliştirme ekibi tarafından sunulmuş bir yapıya seçenek yaratmaya zamanı, imkanı var ki..

Bu paketlerden biri dikkatimi çekti, geliştirme yaparken pek kullanmadığım, belki de kullanmayacağım bir tanesi “DBMS_UTILITY”.

Özellikle “comma_to_table” görevi(function) kullanışlı görünüyor ama

SQL> SET SERVEROUTPUT ON
SQL> DECLARE
  2    l_list1   VARCHAR2(50) := ‘A,B,C,D,E,F,G,H,I,J’;
  3    l_list2   VARCHAR2(50);
  4    l_tablen  BINARY_INTEGER;
  5    l_tab     DBMS_UTILITY.uncl_array;
  6  BEGIN
  7    DBMS_OUTPUT.put_line(‘l_list1 : ‘ || l_list1);
  8
  9    DBMS_UTILITY.comma_to_table (
 10       list   => l_list1,
 11       tablen => l_tablen,
 12       tab    => l_tab);
 13
 14    FOR i IN 1 .. l_tablen LOOP
 15      DBMS_OUTPUT.put_line(i || ‘ : ‘ || l_tab(i));
 16    END LOOP;
 17
 18    DBMS_UTILITY.table_to_comma (
 19       tab    => l_tab,
 20       tablen => l_tablen,
 21       list   => l_list2);
 22
 23    DBMS_OUTPUT.put_line(‘l_list2 : ‘ || l_list2);
 24  END;
 25  /
l_list1 : A,B,C,D,E,F,G,H,I,J
1 : A
2 : B
3 : C
4 : D
5 : E
6 : F
7 : G
8 : H
9 : I
10 : J
l_list2 : A,B,C,D,E,F,G,H,I,J

PL/SQL procedure successfully completed.

SQL> DECLARE
  2    l_instance_table  DBMS_UTILITY.instance_table;
  3    l_instance_count  NUMBER;
  4  BEGIN
  5    DBMS_UTILITY.active_instances (instance_table => l_instance_table,
  6                                   instance_count => l_instance_count);
  7
  8    IF l_instance_count > 0 THEN
  9      FOR i IN 1 .. l_instance_count LOOP
 10        DBMS_OUTPUT.put_line(l_instance_table(i).inst_number || ‘ = ‘ || l_instance_table(i).inst_name);
 11      END LOOP;
 12    END IF;
 13  END;
 14  /

PL/SQL procedure successfully completed.

SQL> SELECT DBMS_UTILITY.current_instance
  2  FROM   dual;

CURRENT_INSTANCE
—————-
               1

SQL> DECLARE
  2    l_version  VARCHAR2(100);
  3    l_compatibility  VARCHAR2(100);
  4  BEGIN
  5    DBMS_UTILITY.db_version (version       => l_version,
  6                             compatibility => l_compatibility);
  7    DBMS_OUTPUT.put_line(‘Version: ‘ || l_version || ‘  Compatibility: ‘ || l_compatibility);
  8  END;
  9  /
Version: 10.2.0.1.0  Compatibility: 10.2.0.1.0

PL/SQL procedure successfully completed.

SQL> SELECT DBMS_UTILITY.port_string
  2  FROM   dual;

PORT_STRING
——————————————————————————–

IBMPC/WIN_NT-8.1.0

SQL> BEGIN
  2    IF DBMS_UTILITY.is_cluster_database THEN
  3      DBMS_OUTPUT.put_line(‘Clustered’);
  4    ELSE
  5      DBMS_OUTPUT.put_line(‘Not Clustered’);
  6    END IF;
  7  END;
  8  /
Not Clustered

PL/SQL procedure successfully completed.

• Soru işareti otoritelere sorgusuz inanırdım (“ben denedim hocam, cok yavas o”, “yok abi o batirir hissediyorum”, “idda ediyorum bu daha hizli” vs.. gibi cumleleri dikkate alır ve onemli tasarım kararlarını bu yonde verirdim – test edip sayilarin konusmasina izin vermem, bunları yapanlara kulaklarımı kapar ve elestirilere, yeni dusuncelere kesinlikle kapali olurdum)
• Dokuman okumazdım, kolaylıkla erisilebilicek bilgiyi kesinlikle dikkate almazdım
  Şema tasarımı ve veri ile referans bütünlük (referential integrity) konularına zaman ayırmaz, özen göstermez, önemsemezdim(date veya number olmasi gereken alanları char tutma, foreign key kullanmama, normalize etmeme, her ihtiyaca karsi tek tablo ve index tipi kullanma gibi)
• Oracle veritabanı bağlama(Bind) değişkeni kullanmaz, paylaşılabilir kod geliştirmezdim
• Test ortamı hazırlamaz, elimden geldiğince testi atlatmaya calisirdim
• Biçim (configuration) ve uyum (version) yönetimi yapmazdım
• Veritabanı özgürlüğü ve kara-kutu sendromu pesinde “ben herseyin kendim en iyisini yazarım” der, tekerleği durmadan baştan icat ederdim (sequence’i, foreign key’i, audit’i, queue mantigini uygulama icinde yazmak gibi)

Alla allaaa bir yerlerde, birileri yoksa böyle şeyler mi yapıyorlar, çık çık çık..

DBMS_FILE_TRANSFER paketi 2 terabite kadar 512 bitin katlari büyüklükteki binary dosyaların veritabanı serverları arasında taşınması için bir API.

Aktarımlar işlemsel (transactional) değil, ve kopyalama V$SESSION_LONGOPS görüntüsünden takip edilebiliniyor.

Basit bir kopyalama örneği;

CREATE OR REPLACE DIRECTORY db_files_dir1 AS ‘/u01/oradata/DB10G/’;
CREATE OR REPLACE DIRECTORY db_files_dir2 AS ‘/u02/oradata/DB10G/’;

ALTER TABLESPACE users READ ONLY;

BEGIN
  DBMS_FILE_TRANSFER.COPY_FILE(
   source_directory_object      => ‘DB_FILES_DIR1′,
   source_file_name             => ‘USERS01.DBF’,
   destination_directory_object => ‘DB_FILES_DIR2′,
   destination_file_name        => ‘USERS01.DBF’);
END;
/

ALTER TABLESPACE users READ WRITE;

UTL_COMPRESS paketi binary data tiplerini(RAW, BLOB ve BFILE gibi) compression ve decompression yapiyor.

UTL_COMPRESS gzip gibi Lempel-Ziv compression algoritmasını kullanıyor.

Basit bir ornek script;

SQL> SET SERVEROUTPUT ON
SQL> DECLARE
  2    l_original_blob      BLOB;
  3    l_compressed_blob    BLOB;
  4    l_uncompressed_blob  BLOB;
  5  BEGIN
  6    — Initialize both BLOBs to something.
  7    l_original_blob     := TO_BLOB(UTL_RAW.CAST_TO_RAW(‘123456789012345678901
2345678901234567890′));
  8    l_compressed_blob   := TO_BLOB(‘1′);
  9    l_uncompressed_blob := TO_BLOB(‘1′);
 10
 11    — Compress the data.
 12    UTL_COMPRESS.lz_compress (src => l_original_blob,
 13                              dst => l_compressed_blob);
 14
 15    — Uncompress the data.
 16    UTL_COMPRESS.lz_uncompress (src => l_compressed_blob,
 17                                dst => l_uncompressed_blob);
 18
 19    — Display lengths.
 20    DBMS_OUTPUT.put_line(‘Original Length    : ‘ || LENGTH(l_original_blob));
 21    DBMS_OUTPUT.put_line(‘Compressed Length  : ‘ || LENGTH(l_compressed_blob));
 22    DBMS_OUTPUT.put_line(‘Uncompressed Length: ‘ || LENGTH(l_uncompressed_blob));
 23
 24    — Free temporary BLOBs.
 25    DBMS_LOB.FREETEMPORARY(l_original_blob);
 26    DBMS_LOB.FREETEMPORARY(l_compressed_blob);
 27    DBMS_LOB.FREETEMPORARY(l_uncompressed_blob);
 28  END;
 29  /

Original Length    : 40
Compressed Length  : 33
Uncompressed Length: 40

PL/SQL procedure successfully completed.