Scripts για Mikrotik (όλα μαζεμένα)

[deniSun]

Ανοίγω αυτό το θέμα μετά από σωστή παρότρυνση του @macro
ώστε να συγκεντρώσουμε όλα τα scripts που έχουμε φτιάξει/τροποποιήσει
για οποιοδήποτε λειτουργίες των ΜΤ.

[billy]

Αυτό που πάντα μου την έδινε με δαύτα ήταν οτι εαν είχες DHCP server πάνω του δεν κάνει entry στον DNS του...

Εχει comment σε κάθε entry της μορφής dhcp-server-MAC ADDRESS (ώστε να μπορώ να βρώ πιο μηχάνημα έχει πιθανόν λάθος όνομα)

Δεν θυμάμαι τι έχω αλλάξει απο το αρχικό source (μπορεί και τίποτα) αλλά παίζει μια χαρά εδώ και πολύ καιρό

# Source https://forum.mikrotik.com/viewtopic.php?t=119469
# DNS TTL to set for DNS entries
:local dnsttl "00:15:00";

###
# Script entry point
#
# Expected environment variables:
# leaseBound         1 = lease bound, 0 = lease removed
# leaseServerName    Name of DHCP server
# leaseActIP         IP address of DHCP client
# leaseActMAC      MAC address of DHCP client
###

# "a.b.c.d" -> "a-b-c-d" for IP addresses used as replacement for missing host names
:local ip2Host do=\
{
  :local outStr
  :for i from=0 to=([:len $inStr] - 1) do=\
  {
    :local tmp [:pick $inStr $i];
    :if ($tmp =".") do=\
    {
      :set tmp "-"
    }
    :set outStr ($outStr . $tmp)
  }
  :return $outStr
}

:local mapHostName do={
# param: name
# max length = 63
# allowed chars a-z,0-9,-
  :local allowedChars "abcdefghijklmnopqrstuvwxyz0123456789-";
  :local numChars [:len $name];
  :if ($numChars > 63) do={:set numChars 63};
  :local result "";

  :for i from=0 to=($numChars - 1) do={
    :local char [:pick $name $i];
    :if ([:find $allowedChars $char] < 0) do={:set char "-"};
    :set result ($result . $char);
  }
  :return $result;
}

:local lowerCase do={
# param: entry
  :local lower "abcdefghijklmnopqrstuvwxyz";
  :local upper "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
  :local result "";
  :for i from=0 to=([:len $entry] - 1) do={
    :local char [:pick $entry $i];
    :local pos [:find $upper $char];
    :if ($pos > -1) do={:set char [:pick $lower $pos]};
    :set result ($result . $char);
  }
  :return $result;
}

:local token "$leaseServerName-$leaseActMAC";
:local LogPrefix "DHCP2DNS ($leaseServerName)"

:if ( [ :len $leaseActIP ] <= 0 ) do=\
{
  :log error "$LogPrefix: empty lease address"
  :error "empty lease address"
}

:if ( $leaseBound = 1 ) do=\
{
  # new DHCP lease added
  /ip dhcp-server
  #:local dnsttl [ get [ find name=$leaseServerName ] lease-time ]
  network
  :local domain [ get [ find $leaseActIP in address ] domain ]
  #:log info "$LogPrefix: DNS domain is $domain"

  :local hostname [/ip dhcp-server lease get [:pick [find mac-address=$leaseActMAC and server=$leaseServerName] 0] value-name=host-name]
  #:log info "$LogPrefix: DHCP hostname is $hostname"

 #Hostname cleanup
  :if ( [ :len $hostname ] <= 0 ) do=\
  {
    :set hostname [ $ip2Host inStr=$leaseActIP ]
    :log info "$LogPrefix: Empty hostname for '$leaseActIP', using generated host name '$hostname'"
  }
  :set hostname [$lowerCase entry=$hostname]
  :set hostname [$mapHostName name=$hostname]
  #:log info "$LogPrefix: Clean hostname for FQDN is $hostname";

  :if ( [ :len $domain ] <= 0 ) do=\
  {
    :log warning "$LogPrefix: Empty domainname for '$leaseActIP', cannot create static DNS name"
    :error "Empty domainname for '$leaseActIP'"
  }

  :local fqdn ($hostname . "." .  $domain)
  #:log info "$LogPrefix: FQDN for DNS is $fqdn"

    :if ([/ip dhcp-server lease get [:pick [find mac-address=$leaseActMAC and server=$leaseServerName] 0] ]) do={
      # :log info message="$LogPrefix: $leaseActMAC -> $hostname"
      :do {
        /ip dns static add address=$leaseActIP name=$fqdn ttl=$dnsttl comment=$token;
      } on-error={:log error message="$LogPrefix: Failure during dns registration of $fqdn with $leaseActIP"}
    }

} else={
# DHCP lease removed
  /ip dns static remove [find comment=$token];
}

[nrevenides]

Αυτό που πάντα μου την έδινε με δαύτα ήταν οτι εαν είχες DHCP server πάνω του δεν κάνει entry στον DNS του...

Εχει comment σε κάθε entry της μορφής dhcp-server-MAC ADDRESS (ώστε να μπορώ να βρώ πιο μηχάνημα έχει πιθανόν λάθος όνομα)

Δεν θυμάμαι τι έχω αλλάξει απο το αρχικό source (μπορεί και τίποτα) αλλά παίζει μια χαρά εδώ και πολύ καιρό

Καλησπέρα, για ρίξε μια βοήθεια, τι ακριβώς βελτιώνει αυτό το script, δεν κατάλαβα. Επίσης πότε το τρέχω, μια φορά;

Διαβάζω αυτό "You need to put this script in the Lease Script of the DHCP Server, it will be called automatically by new leases." αλλά δεν το καταλαβαίνω.
Κάποια βοήθεια;

[billy]

To βάζεις στον dhcp server σου εδώ. Για κάθε IP που δίνει θα προσθέσει στον DNS server του mikrotik μια reverse εγγραφή (απο default δεν το κάνει)

[jkarabas]

To βάζεις στον dhcp server σου εδώ. Για κάθε IP που δίνει θα προσθέσει στον DNS server του mikrotik μια reverse εγγραφή (απο default δεν το κάνει)

Αν δεν το έχεις αυτό το script τι πρόβλημα δημιουργεί;

[BillyVan]

Την ιδια απορία ειχα κι εγω.

[nrevenides]

To βάζεις στον dhcp server σου εδώ.

Το που το βάζω, μάλλον το βρήκα, μπαίνει εδώ, σωστά;




Η απορία μου παραμένει...

Για κάθε IP που δίνει θα προσθέσει στον DNS server του mikrotik μια reverse εγγραφή (απο default δεν το κάνει)

Δηλαδή;

[billy]

Για αρχή δεν έχεις κανένα απολύτως πρόβλημα. Είναι θέμα προτίμησης.

Εαν τρέχω DNS στο mikrotik για το .example.com θέλω οταν θα δώσει την 172.16.0.1 στο PCA (μέσω DHCP) να φτάξει reverse dns ώστε εαν το ρωτήσω τι ξέρει για το PCA.example.com να μου την επιστρέψει

[BillyVan]

Βέβαια υπαρχει και το στατικ dns που κανει ακριβως το ιδιο (οχι ομως απο DHCP οπως το κανεις)

[billy]

Ακριβώς αυτή είναι και η διαφορά

[nrevenides]

Για αρχή δεν έχεις κανένα απολύτως πρόβλημα. Είναι θέμα προτίμησης.

Εαν τρέχω DNS στο mikrotik για το .example.com θέλω οταν θα δώσει την 172.16.0.1 στο PCA (μέσω DHCP) να φτάξει reverse dns ώστε εαν το ρωτήσω τι ξέρει για το PCA.example.com να μου την επιστρέψει

Μάλλον χάθηκα στην μετάφραση. Εάν απάντησες σε εμένα, σε έχασα πάλι. Η απορία μου είναι απλή, αλλά τα θέλω πενηνταράκια για να τα καταλάβω.
Τι ακριβώς βελτιώνει το script; Αν κατάλαβα καλά, για κάθε IP που θα δώσει το mikrotik (σαν dhcp server), ότι ζητήσει αυτή η IP π.χ. να πάει στην σελίδα example.com, εκτός από την dns εγγραφή (την IP του example.com), δημιουργεί μία 2η εγγραφή (το hostname της IP), δηλαδή το reverse, σωστά;

Δεν έχω καταλάβει, ποιος, πότε και γιατί χρειάζεται το reverse dns;
Τι πρόβλημα υπάρχει τώρα που έχω dhcp server στο mikrotik χωρίς reverse;

Thks

[macro]

Σε τιποτα δε βελτιωνει η reverse dns rec, μιας και οταν ρωτησεις καποιο host αυτοματως γινεται και cahce οποτε την ξαναεχεις οποτε την χρειαστεις.

Ετσι για να αγαπιομαστε ειναι αυτα ..................

[romankonis]

no-ip script ?

[deniSun]

no-ip script ?

Γιατί χρησιμοποιείτε άλλον DDNS από αυτόν της ΜΤ;

[Nikiforos]

no-ip script ?

https://blog.e-wireless.gr/update-dy...basics-part-6/