Mikrotiki arutelu :: Hinnavaatluse Foorumid

:log info "Checking if partitions have same versions..."

# Step 1: Detect running and active partitions
:local runningPart ""
:local activePart ""
:foreach i in=[/partitions find] do={
:local name [/partitions get $i name]
:local running [/partitions get $i running]
:local active [/partitions get $i active]
:log info ("Detected partition: " . $name . ": running=" . $running . ", active=" . $active)
:if ($running) do={ :set runningPart $name }
:if ($active) do={ :set activePart $name }
}

# Step 2: Declare version variables early
:local raw0 ""
:local raw1 ""
:local v0 ""
:local v1 ""

# Step 3: Abort if not running from part0
:if ($runningPart != "part0") do={
:log error ("Operation aborted: system is running from backup partition (" . $runningPart . ").")
} else={

# Step 4: Extract full version strings
:set raw0 [/partitions get [find name="part0"] version]
:set raw1 [/partitions get [find name="part1"] version]

# Step 5: Extract semantic version between "v" and first space AFTER the "v"
:local vpos0 [:find $raw0 "v"]
:local vpos1 [:find $raw1 "v"]
:local start0 ($vpos0 + 1)
:local start1 ($vpos1 + 1)

# Find the first space after start (not the first space in the whole string)
:local end0 [:find $raw0 " " $start0]
:local end1 [:find $raw1 " " $start1]

# If no trailing space found, use string end
:if ($end0 = -1) do={ :set end0 [:len $raw0] }
:if ($end1 = -1) do={ :set end1 [:len $raw1] }

# Validate indices; if "v" not found, fallback to raw string
:if ($vpos0 >= 0 && $start0 < $end0) do={
:set v0 [:pick $raw0 $start0 $end0]
} else={
:set v0 $raw0
}

:if ($vpos1 >= 0 && $start1 < $end1) do={
:set v1 [:pick $raw1 $start1 $end1]
} else={
:set v1 $raw1
}

# Step 6: Safely parse major.minor.patch without :split
# Find positions of first and second dots in v0
:local dot0a [:find $v0 "."]
:local dot0b -1
:if ($dot0a >= 0) do={ :set dot0b [:find $v0 "." ($dot0a + 1)] }

# Extract m0, p0, x0
:local m0 0
:local p0 0
:local x0 0
:if ($dot0a >= 0) do={
:set m0 [:tonum [:pick $v0 0 $dot0a]]
:if ($dot0b >= 0) do={
:set p0 [:tonum [:pick $v0 ($dot0a + 1) $dot0b]]
:set x0 [:tonum [:pick $v0 ($dot0b + 1) [:len $v0]]]
} else={
:set p0 [:tonum [:pick $v0 ($dot0a + 1) [:len $v0]]]
:set x0 0
}
} else={
:set m0 [:tonum $v0]
:set p0 0
:set x0 0
}

# Find positions of first and second dots in v1
:local dot1a [:find $v1 "."]
:local dot1b -1
:if ($dot1a >= 0) do={ :set dot1b [:find $v1 "." ($dot1a + 1)] }

# Extract m1, p1, x1
:local m1 0
:local p1 0
:local x1 0
:if ($dot1a >= 0) do={
:set m1 [:tonum [:pick $v1 0 $dot1a]]
:if ($dot1b >= 0) do={
:set p1 [:tonum [:pick $v1 ($dot1a + 1) $dot1b]]
:set x1 [:tonum [:pick $v1 ($dot1b + 1) [:len $v1]]]
} else={
:set p1 [:tonum [:pick $v1 ($dot1a + 1) [:len $v1]]]
:set x1 0
}
} else={
:set m1 [:tonum $v1]
:set p1 0
:set x1 0
}

# Step 7: Compare and sync if needed
# Strict inequality guard: if the extracted semantic strings differ, treat as different
:local versionsEqual ($v0 = $v1)

:if ((!$versionsEqual) && ( ($m0 > $m1) || \
($m0 = $m1 && $p0 > $p1) || \
($m0 = $m1 && $p0 = $p1 && $x0 > $x1) )) do={

:log warning ("Partitions have different versions: part0 has " . $v0 . ", part1 has " . $v1 . "")
:log info "Copying contents from part0 to part1..."
/partitions/copy-to part1

# Recheck part1 version after copy
:set raw1 [/partitions get [find name="part1"] version]
:set vpos1 [:find $raw1 "v"]
:set start1 ($vpos1 + 1)
:set end1 [:find $raw1 " " $start1]
:if ($end1 = -1) do={ :set end1 [:len $raw1] }
:if ($vpos1 >= 0 && $start1 < $end1) do={
:set v1 [:pick $raw1 $start1 $end1]
} else={
:set v1 $raw1
}

:log info ("Copy operation completed: part0 has " . $v0 . ", part1 has " . $v1 . "")

} else={
:log info ("Partitions have same version: part0 has " . $v0 . ", part1 has " . $v1 . "")
:log info "Syncing configuration from (part0) to (part1)..."
/partitions/save-config-to part1
:log info "Syncing configuration completed."
}
}

:log info "Checking for RouterOS upgrades..."
# Step 1: Get update status
/system package update check-for-updates
:local updateStatus [/system package update get status]

# Step 1.1: Proceed only if new version is available
:if ($updateStatus = "New version is available") do={

:log info ("Upgrade required: " . $updateStatus . ".")

# Step 2: Detect running partition
:local runningPart ""
:foreach i in=[/partitions find] do={
:if ([/partitions get $i running]) do={
:set runningPart [/partitions get $i name]
}
}

# Step 2.1: Abort if not running from part0
:if ($runningPart != "part0") do={
:log error ("Upgrade aborted: running from backup partition (" . $runningPart . ").")
:return
}

# Step 3: Sync part0 and part1
:log info "Performing config backup..."
/system backup save name=auto-backup
:log info "Config backup completed."

# Step 5: Sync partitions
/system/script/run sync-partitions

# Step 6: Install update (auto-download + reboot)
:log info "Installing RouterOS update..."
/system package update install

} else={

# Log status and sync partitions
:log info ("No upgrade required: " . $updateStatus . ".")
/system/script/run sync-partitions
}