Oreska - Užice

WWW.UZICE.NET - Užičani, hajde da se družimo => Mikrotik => Temu započeo: drasko 21.04.2009. 06:06:55



Naslov: Skripta za provjeru promjene DHCP adrese od ISP-a !
Poruka od: drasko 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.")



Naslov: MikroTik v2.9.26
Poruka od: drasko 21.04.2009. 07:57:57
Zaboravio sam reći da imam instaliran MikroTik v2.9.26   !


Naslov: Odg: Skripta za provjeru promjene DHCP adrese od ISP-a !
Poruka od: maler 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...


Naslov: Odg: Skripta za provjeru promjene DHCP adrese od ISP-a !
Poruka od: drasko 21.04.2009. 15:56:06
Nisam !


Naslov: Odg: Skripta za provjeru promjene DHCP adrese od ISP-a !
Poruka od: drasko 21.04.2009. 15:59:24
koju skriptu bi onda bilo najpametnije staviti da sve bude ok !


Naslov: Ljudi pomozite !
Poruka od: drasko 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={

}

}