Bunun yerine otomatik olarak Mikrotik’lere “Åžu kadar günde bir yedek al! Aldığın yedekleri bana mail at!” diyebilme seçeneÄŸiniz mevcut.

Bu iÅŸlem için öncelikle bir SMTP sunucuya sahip olmalı, Mikrotik cihazlarının bu SMTP server’a eriÅŸebilmesi, SMTP server’ın da Mikrotik için kullanıcı doÄŸrulaması gerektirmeden mailleri kabul edebilmesi gerekmektedir.

Tüm bu ÅŸartların saÄŸlanmış olduÄŸunu düşünürsek, Mikrotik üzerinden yapılacak iÅŸ iki adımdan oluÅŸmakta. Birinci adım olarak kayıtlı bir script yaratma, ikinci adım olarak kayıtlı olan bu script’i belirli zaman aralıklarında çalıştırmak.


/system script add name="Oto-Yedek" \
policy=ftp, read, write, policy, test \
source="/system backup save=oto_yedek \
/tool e-mail send body=\"yedek\" to=\"alici@domain.com\" file=\"oto_yedek\" \
server=\"xxx.xxx.xxx.xxx\" from=\"gonderen@domain.com\" \
subject=\"XXX Mikrotik Yedegi\""


Ä°le yeni Oto-Yedek adından bir yedekleme script’i oluÅŸturduk ve;


/system scheduler add comment="Otomatik yedekleme scriptini zamanlar"\
name="Oto-Yedek-Zamanla" on-event=Oto-Yedek \
start-date="Jun/11/2009" start-time="01:00:00" interval="1d" \
disabled=no

zamanlaması ile hergün saat gece 1′de yedekleme scriptinin çalışmasını saÄŸlayabiliriz. Bu iÅŸlem sonucunda artık Mikrotik’e login olmaya gerek kalmadan otomatik olarak yedekler belirttiÄŸiniz e-mail adresine gelecek ve yedek alma zamanını sıfıra indirecektir.

Kabuk üzerinde koşul dizilimi şu şekildedir.


[admin@Mikrotik] > :global deger1 "degerli"
[admin@Mikrotik] > :global deger2 "degersiz"
[admin@Mikrotik] > :if ($deger1 = $deger2) do={:put "Eslesiyor"}\
[admin@Mikrotik] > else={:put "Eslesmiyor"}


Bu şekilde şartlara göre seçimimizi yapabilir ve işlemlerimizi gerçekleştirebiliriz.

Döngüler; belirtmiş olduğumuz durum sağlanıncaya kadar işlem tekrarıdır.
Kabuk içerisindeki söz dizimi ise şu şekildedir;


[admin@Mikrotik] > :for i from=1 to=10 do={:put $i}


ile 1′den 10′a kadar sayıları ekrana bastırabiliriz.

Daha reel bir uygulama yapacak olursak kuyruk listemizde ekli olan tüm kuralların maksimum download ve upload’ını 1Mb ile limitlendirelim;


[admin@Mikrotik] > :local queueLen [ :len [ /queue simple find ]]; \
:for i from=0 to=$queueLen do={ /queue simple set $i max-limit=1000000/1000000}


Bu örnekte öncelikle :len ile tüm kuyrukta yer alan kuralların sayısı aldık. Bu deÄŸeri daha sonra kullanabilmek için lokal bir deÄŸiÅŸken olan queueLen’e atadık. Bir sonraki komut dizesinde ise tüm kuyruk boyunca max-limit deÄŸerini 1Mb olarak atamış olduk.

Yine diğer programlama dillerinden aşina olduğumuz diziler üzerinde çalışabilmeyi mümkün kılan foreach döngüsünü de kabuk üzerinde kullanabilmekteyiz.

[admin@Mikrotik] > :local toplamIP [/ip address find interface="ether1"];\
:foreach idIP in=$toplamIP do={\
:local durum [/ip address get $idIP disabled];\
:local IPadresi [/ip address get $idIP address];\
:if ($durum="false") do={:put ($IPadresi . " Kapali\n")}\
else={:put ($IPadresi . " Acik\n")}}


Burdaki örnekle beraber ether1 üzerindeki IP adreslerinin Kapalı ya da Açık olması durumuna dair bir listesi alınabilir.

Sadece belli sayıdaki iÅŸlemler için deÄŸil belirli bir koÅŸula göre iÅŸleyebilecek bir döngümüz de var. Bu döngümüz do..while ya da while…do döngüsü. Bu döngüye ait söz dizilimi de ÅŸu ÅŸekildedir.

[admin@Mikrotik] > :global ethernetCount [:len [/interface find type=ether]]; :global $i 0;
[admin@Mikrotik] > :while ($i < $ethernetCount) do={\
:put [/interface ethernet $i name]; :set i ($i+1);}



[admin@Mikrotik] > :global i 11;
[admin@Mikrotik] > :do {:put $i; :set i ($i - 1);} while=($i > 0)
[admin@Mikrotik] > :unset i;


• global – Tüm aktif kullanıcılar ve betikler tarafından eriÅŸilebilen deÄŸiÅŸken tipidir. global deyimi ile tanımlanır.
• local – Sadece tanımlandığı blok içerisinden eriÅŸilebilen deÄŸiÅŸken tipidir, yine local deyimi ile tanımlanır.


[admin@Mikrotik] > :local testDegiskeni; :set testDegiskeni "Test ediyoruz"; :put $testDegiskeni

Aynı kod bloğu içerisinde öncelikle local bir testDegiskeni adında bir değişken oluşturduk, değerini Test ediyoruz olarak atadık, daha sonrada değişkenimizin değerini ekrana bastırdık.

Peki bu değişkeni daha birden fazla satırı ve/veya kod bloğu olan bir betik içerisinde kullanma ihtiyacımız olsa idi?

[admin@Mikrotik] > :global testDegiskeni
[admin@Mikrotik] > :set testDegiskeni "Mikrotik dunyasina hosgeldin\n"
[admin@Mikrotik] > :for i from=1 to=3 do={:put $testDegiskeni}

Bu örnekte de görülebileceği gibi testDegiskeni adında bir global değişken tanımladık ve daha sonraki kod bloklarımızdan değişkenimize ulaşarak gerekli işlemleri yaptık.

Bu kadar kolaylık arasında ya kendimize/duruma özel işlemler yapmak istersek? Ya aynı işlemi defalarca yapmak zorunda isek? Ya da bir işlemi sayısız kere belirli aralıklarla yapmak zorunda isek?

Bu kadar esnek bir sistem tabi ki de buna da imkan tanıyacaktır. Mikrotik güçlü kabuğu sayesinde tüm işlerinizi otomatik hale getirmenize ya da durumlara özel çareler üretmenize yardımcı olacaktır.  Kabuk üzerinden (Telnet/SSH/Winbox/Serial) işinize uygun bir betik yazarak dilediğiniz gibi tüm işlemlerinizi gerçekleştirebilirsiniz.

Genel anlamda kullanacağımız kabuk *nix üzerinde yer alan kabuklardan pek te farklı deÄŸildir. Bash ya da sh’ta kullanmış olduÄŸumuz “\”, “;” ,”#”,”{}”,”[]“  sınırlayıcılar pek fark olmadan yine bu kabuk üzerinde kullanılabilir.

Veri tipleri

Betik yazımı sırasında sık sık kullanacağımız değişkenler için önceden belirlenmiş tipler mevcuttur. Bunlar;

• number – 64 bitlik Integer tipi deÄŸiÅŸken türü (iÅŸaretli +/-), aynı zamanda hexadecimal veri giriÅŸi de mümkündür.
• boolean – doÄŸru/yanlış veri tipi, true ya da false deÄŸerlerini alabilmektedir.
• string – karakter dizisidir. “test verisi” gibi bir deÄŸer alabilir.
• IP – IP adresi barındırabilen veri tipidir.
• time – tarih ve zaman tutan veri tipidir.
• array – dizi verileri tutabilen veri tipidir.
• nil – öntanımlı veri tipidir, deÄŸiÅŸken deÄŸer verilmediÄŸi sürece deÄŸeri nil’dir.

Ayrımlama işaretleri

• \”       -  çift tırnak
• \\     – ters bölü
• \n     – yeni satır
• \r     – satır başı
• \t     – yatay sekme
• \$
• \?
• \_     – boÅŸluk
• \a     – zil
• \b     – gerisilme
• \f     – sayfa ileri
• \v     – yatay sekme
• \xx     – onaltılık düzende deÄŸer

Operatörler

Aritmetiksel Operatörler

• +  toplama
• -   çıkarna
• /  bölme
• *  çarpma
• -  negatif

Karşılaştırma Operatörleri

• < küçükse
• > büyükse
• <= küçük ve eÅŸitse
• >= büyük ve eÅŸitse
• = eÅŸitse
• != eÅŸit deÄŸilse

Mantıksal Operatörler

• “!” / “not”  deÄŸilse
• “&&” / “and” ve
• “||” / “or” veya

Bitsel Operatörler

Bitsel operatörler yanlızca number ve IP veritiplerindeki değişkenler/değerler için kullanılabilmektedir.

• “~”  deÄŸil, bitin tersini alma
• “&” ve (1 ve iÅŸleminde etkisiz, 0 biti ise yutan elemandır)
• “|” veya (0 ve iÅŸleminde etkisiz, 1 biti ise yutan elemandır)
• “^” özel veya (aynı bitler için 0, farklı bitler için 1 elde eder)
• “<<” sola kaydırma  (belirtilen deÄŸer kadar bitleri sola kaydırır)
• “>>” saÄŸa kaydırma (belirtilen deÄŸer kadar bitleri saÄŸa kaydırır)

Birleştirme operatörleri

• “.” Ä°ki karakter dizisini birbirine baÄŸlar.
• “,” Dizi elemanlarını birbiri ardına sıralar/Diziye yeni deÄŸer ekler.