Dobrodošli, Gost. Molim vas prijavite se ili se registrujte.
Da niste izgubili svoj aktivacioni e-mail?
Oreska - Užice
Užice na Internetu
Prijavite se sa korisničkim imenom, lozinkom i dužinom sesije
 
ARHIVA
   Početna   Pomoć Pravila Pretraga Gallery Prijavljivanje Registracija  
IZBORI: NAJFORUMAŠ I NAJFORUMAŠICA GODINE
AKCIJA: SVI UŽIČANI NA JEDNOM MESTU!
Za užičke nekomercijalne organizacije i ustanove besplatno...
Stranice: [1]
  Štampaj  
This topic has not yet been rated!
You have not rated this topic. Select a rating:
Autor Tema: Skripta za provjeru promjene DHCP adrese od ISP-a !  (Pročitano 1325 puta)
drasko
provereni korisnici
odomaceni korisnik
***
Pol: Muškarac
Ime i prezime:
Dražan Ramljak
Mesto: Mostar
Država: BiH
Poruke: 68


« poslato: 21.04.2009. 06:06:55 »

Postavio sam skriptu za provjeru promjene DHCP adrese od ISP-a. ondosi se na stranicu

http://www.changeip.com/
promjene koje sam unio su crvene obojene. Jeli ovo uredu ??



:log info "DDNS Begin"
:global ddns-user drazenram
:global ddns-pass Forma123
:global ddns-interface wan
:global ddns-host "*1"
:global ddns-ip [/ip address get [/ip address find interface=$ddns-interface] address]
:if {[ :typeof $ddns-lastip] = nil } do={ :global ddns-lastip 0.0.0.0/0 }
:if {[ :typeof $ddns-ip] = nil} do={
:log info "DDNS: No addres present on your interface, plesae check."
} else={
# :if ($ddns-ip != $ddns-lastip) do={
:log info "DDNS: Sending update!"
:log info [/tool dns-update name=$ddns-host address=[:pick $ddns-ip 0 [:find $ddns-ip "/"] ] key-name=$ddns-user key=$ddns-pass ]
# :global ddns-lastip $ddns-ip
# } else={
# :log info ("DDNS: No change.")
# }
}
:log info ("DDNS: End.")

Sačuvana
drasko
provereni korisnici
odomaceni korisnik
***
Pol: Muškarac
Ime i prezime:
Dražan Ramljak
Mesto: Mostar
Država: BiH
Poruke: 68


« Odgovor #1 poslato: 21.04.2009. 07:57:57 »

Zaboravio sam reći da imam instaliran MikroTik v2.9.26   !
Sačuvana
maler
provereni korisnici
iskusan korisnik
****
Pol: Muškarac
Ime i prezime:
Duško
Mesto: Užice
Lokacija: Vozdovac-Kameno Korito
Država: Srbija
Horoskop: Vaga
Poruke: 243



« Odgovor #2 poslato: 21.04.2009. 08:51:59 »

Nije u redu. Ovaj skript će pri svakom izvršavanju slati zahtev za izmenu adrese na changeip.com. Obriši komentare.
Ps: nadam se da nisi u postu naveo stvarni user i pass...
Sačuvana
drasko
provereni korisnici
odomaceni korisnik
***
Pol: Muškarac
Ime i prezime:
Dražan Ramljak
Mesto: Mostar
Država: BiH
Poruke: 68


« Odgovor #3 poslato: 21.04.2009. 15:56:06 »

Nisam !
Sačuvana
drasko
provereni korisnici
odomaceni korisnik
***
Pol: Muškarac
Ime i prezime:
Dražan Ramljak
Mesto: Mostar
Država: BiH
Poruke: 68


« Odgovor #4 poslato: 21.04.2009. 15:59:24 »

koju skriptu bi onda bilo najpametnije staviti da sve bude ok !
Sačuvana
drasko
provereni korisnici
odomaceni korisnik
***
Pol: Muškarac
Ime i prezime:
Dražan Ramljak
Mesto: Mostar
Država: BiH
Poruke: 68


« Odgovor #5 poslato: 21.04.2009. 16:10:15 »

Jeli uredu ova i hoće li mi ovako MikroTik updejtovati javnu IP adresu na ChangeIP  ? Crveno su moje generalije i izmjena koje sam unio u skriptu.
Puno hvala unaprijed.




:global ddnsuser "MOJUSERID"
:global ddnspass "MOJPASSWORD"
:global ddnshost "*1"
#:global ddnsinterface "wan"

:global ddnssystem ("mt-" . [/system package get [/system package find name=system] version] )

:foreach int in=[/ip route find dst-address=0.0.0.0/0 active=yes ] do={
:if ([:typeof [/ip route get $int routing-mark ]] = nothing ) do={
:global ddnsinterface [/ip route get $int interface]
}
}

:global ddnsip [ /ip address get [/ip address find interface=$ddnsinterface] address ]

:if ([ :typeof $ddnslastip ] = nil ) do={ :global ddnslastip 0.0.0.0/0 }

:if ([ :typeof $ddnsip ] = nil ) do={

:log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")

} else={

:if ($ddnsip != $ddnslastip) do={

:log info "DDNS: Sending UPDATE!"
:log info [ :put [/tool dns-update name=$ddnshost address=[:pick $ddnsip 0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass ] ]
:global ddnslastip $ddnsip

} else={

}

}
Sačuvana
Stranice: [1]
  Štampaj  
 
Prebaci se na:  



Užice na Internetu
Pokreće MySQL Pokreće PHP Powered by SMF 1.1 RC3 | SMF © 2001-2006, Lewis Media | Imprint Ispravan XHTML 1.0! Ispravan CSS!
Stranica je napravljena za 5.789 sekundi sa 35 upita.