DynDNS ο τσάμπας πέθανε ;)
Posted: Wed Apr 09, 2014 1:08 pm
Τι άλλες free επιλογές υπάρχουν?
Patra's Wireless Metropolitan Network
https://forum.pwmn.net/
Code: Select all
:local hostname neoplan.pwmn.net
:global interfacename OTE
:global previousIP
# get the current IP address from the interface
:global currentipadd [/ip address get [/ip address find interface=$interfacename] address]
:global currentIP [:pick $currentipadd 0 [:find $currentipadd "/"]];
#:log info "CurrentIP: = $currentIP"
:if ($currentIP != $previousIP) do={
:set previousIP $currentIP
/tool fetch \
mode=http \
address="freedns.afraid.org" \
host="freedns.afraid.org" \
src-path="dynamic/update.php\?key_here" \
keep-result=no
:log info ("AfraidDNS: Updated")
} else={
#:log info ("AfraidDNS: No update needed")
}
Code: Select all
# Set needed variables
:local hostname neokal.pwmn.net
:global previousIP
:global currentIP
# get the current IP address from the internet (in case of double-nat)
/tool fetch mode=http address="checkip.dyndns.org" src-path="/" dst-path="/dyndns.checkip.html"
:local result [/file get dyndns.checkip.html contents]
# parse the current IP result
:local resultLen [:len $result]
:local startLoc [:find $result ": " -1]
:set startLoc ($startLoc + 2)
:local endLoc [:find $result "</body>" -1]
:set currentIP [:pick $result $startLoc $endLoc]
:log info "UpdateDynDNS: currentIP = $currentIP"
:if ($currentIP != $previousIP) do={
:set previousIP $currentIP
/tool fetch \
mode=http \
address="freedns.afraid.org" \
host="freedns.afraid.org" \
src-path="dynamic/update.php\?key_here" \
keep-result=no
:log info ("AfraidDNS: Updated")
} else={
:log info ("AfraidDNS: No update needed")
}