document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. ############### para abajo ######################
  2.  
  3. # Define User Variables
  4. :global ddnsuser "usuario"
  5. :global ddnspass "pass"
  6. :global ddnshost "tuhost.dyndns.com"
  7.  
  8. # Defino el nombre de mi pppoe-client de ADSL
  9. :global ddnsinterface "Internet Arnet"
  10.  
  11. # Define Global Variables
  12. :global ddnsip
  13. :global ddnslastip
  14. :if ([ :typeof $ddnslastip ] = nil ) do={ :global ddnslastip "0" }
  15.  
  16. :global ddnsip [ /ip address get [/ip address find interface=$ddnsinterface] address ]
  17.  
  18. #Estas lineas las descomentaba para ir viendo en los logs si envia bien los datos
  19. #:log info "Valor es $ddnsuser $ddnspass $ddnsinterface $ddnsip"
  20. #:if ( $ddnsip = $ddnslastip ) do={ :log info " las IP es la misma $ddnsip , no UPDATE"}
  21.  
  22. # Did we get an IP address to compare?
  23. :if ([ :typeof $ddnsip ] = nil ) do={
  24. :log info ("DynDNS: No ip address present on " . $ddnsinterface . ", please check.")
  25. } else={
  26. :if ($ddnsip != $ddnslastip) do={
  27. :log info "DynDNS: Sending UPDATE!"
  28. :local str "/nic/update?hostname=$ddnshost&myip=$ddnsip&wildcard=NOCHG&mx=NOCHG&backmx=NOCHG"
  29. :log info "$str + $ddnsuser + $ddnspass"
  30. /tool fetch address=204.13.248.112 src-path=$str mode=http user=$ddnsuser password=$ddnspass dst-path=("/dynDNS.".$ddnshost)
  31. :delay 1
  32. :local str [/file find name="dynDNS.$ddnshost"];
  33. /file remove $str
  34. :global ddnslastip $ddnsip
  35. }
  36. }
  37.  
  38. ############### para arriba ####################
');