improve output and checking of lb_move_records command

lb_store.lua

@@ -241,7 +241,7 @@ function parseScore(str)
 		splits,
 		flags,
 		stats,
-		checksum
+		checksum:lower()
 	)
 end
 rawset(_G, "lb_parse_score", parseScore)
@@ -275,8 +275,6 @@ local function moveRecords(from, to, modeSep)
 			return 0
 		end
 
-		local moveCount = #store[from.id][from.checksum]
-
 		store[to.id] = $ or {}
 		store[to.id][to.checksum] = $ or {}
 		for i, score in ipairs(store[from.id][from.checksum]) do
@@ -287,24 +285,21 @@ local function moveRecords(from, to, modeSep)
 
 		-- Destroy the original table
 		store[from.id][from.checksum] = nil
-
-		return moveCount
 	end
 
 	-- move livestore records and write to disk
-	local moveCount = moveRecordsInStore(LiveStore)
-	dumpStoreToFile(LEADERBOARD_FILE, LiveStore)
+	moveRecordsInStore(LiveStore)
 
-	-- move coldstore records
 	if isserver then
+		dumpStoreToFile(LEADERBOARD_FILE, LiveStore)
+
+		-- move coldstore records
 		local ok, coldstore = pcall(loadStoreFile, COLDSTORE_FILE)
 		if ok and coldstore then
 			moveRecordsInStore(coldstore)
 			dumpStoreToFile(COLDSTORE_FILE, coldstore)
 		end
 	end
-
-	return moveCount
 end
 rawset(_G, "lb_move_records", moveRecords)
 

leaderboard.lua

@@ -661,7 +661,7 @@ local function moveRecords(player, from_map, from_checksum, to_map, to_checksum)
 
 	local from = {
 		["id"] = mapnumFromExtended(from_map),
-		["checksum"] = from_checksum
+		["checksum"] = from_checksum:lower()
 	}
 
 	local to = {
@@ -670,15 +670,29 @@ local function moveRecords(player, from_map, from_checksum, to_map, to_checksum)
 	to.checksum = to_checksum or mapChecksum(to.id)
 
 	if not to.checksum then
-		CONS_Printf(player, string.format("error: '%s' is missing; provide to_checksum to continue", to.id))
+		CONS_Printf(player, string.format("error: %s is not loaded; provide to_checksum to continue", to_map:upper()))
 		return
 	end
+	if #to.checksum != 4 or to.checksum:match("[^a-f0-9]") then
+		CONS_Printf(player, string.format("error: %s is an invalid checksum; checksums are of length 4 and can contain only 0-9a-f", to.checksum))
+		return
+	end
+
+	to.checksum = $:lower()
+
+	local mapRecords = GetMapRecords(from.id, from.checksum, F_SPBATK | F_SPBBIG | F_SPBEXP)
+	local recordCount = 0
+	for mode, records in pairs(mapRecords) do
+		recordCount = $ + #records
+	end
+
+	MoveRecords(from, to, ST_SEP)
 
 	CONS_Printf(
 		player,
 		string.format(
-			"%d records have been moved from %s %s to %s %s",
-			MoveRecords(from, to, ST_SEP),
+			"%d records have been moved from\x82 %s %s\x80 to\x88 %s %s",
+			recordCount,
 			from_map, from.checksum,
 			to_map, to.checksum
 		)