local MemoryStoreService = game:GetService("MemoryStoreService")

local testHashMap = MemoryStoreService:GetHashMap("HashMap1")

local EXPIRATION = 600
local NUM_TEST_ITEMS = 32

local function populateHashMap(hashMap: MemoryStoreHashMap, numItems: number): { [string]: any }
	print("HashMap 데이터를 설정하는 중...")
	local createdItems = {}

	for index = 1, numItems do
		local key = tostring(index) -- HashMap 키는 문자열이어야 합니다.
		local value = `{key}_test_value`
		local success, result = pcall(hashMap.SetAsync, hashMap, key, value, EXPIRATION)

		if success then
			createdItems[key] = value
		else
			warn(`키 {key} 설정 중 오류 발생: {result}`)
		end
	end

	print("HashMap 데이터 설정 완료.")
	return createdItems
end

local function getItemsFromAllPages(pages: MemoryStoreHashMapPages): { [string]: any }
	-- 순전히 로깅 목적을 위해 현재 페이지 번호를 추적합니다.
	local currentPageNumber = 1
	local retrievedItems = {}

	while not pages.IsFinished do
		print(`페이지 {currentPageNumber}에서 아이템 가져오는 중...`)
		local items = pages:GetCurrentPage()

		for _, entry in pairs(items) do
			print(`	{entry.key}: {entry.value}`)
			retrievedItems[entry.key] = entry.value
		end

		-- 읽을 페이지가 더 있는 경우 페이지를 이동합니다.
		if not pages.IsFinished then
			pages:AdvanceToNextPageAsync()
			currentPageNumber += 1
		end
	end

	print("모든 페이지 읽기 완료")
	return retrievedItems
end

local function compareAllItems(retrievedItems: { [string]: any }, expectedItems: { [string]: any }): number
	print("가져온 아이템과 예상 아이템 비교 중...")
	local numMatchingItems = 0

	for key, expectedValue in pairs(expectedItems) do
		if retrievedItems[key] == expectedValue then
			numMatchingItems += 1
		else
			warn(`키 {key}에 대한 가져온 값 불일치: 예상 {expectedValue}, 가져온 {retrievedItems[key]}`)
		end
	end

	print("비교 완료!")
	return numMatchingItems
end

-- 해시맵에 추가된 키는 이 expectedItems 테이블에도 추가됩니다.
-- 나중에 가져온 해시맵 아이템이 예상 아이템 테이블과 비교됩니다.
local expectedItems = populateHashMap(testHashMap, NUM_TEST_ITEMS)

-- 페이지 가져오기에서 오류가 발생할 수 있습니다. 이 경우, 오류를 발생시켜 프로그램 실행을 중지합니다,
-- 하지만 pcall을 사용하여 다르게 처리할 수 있습니다.
print(`ListItemsAsync로 HashMap 페이지 가져오는 중...`)
local pages = testHashMap:ListItemsAsync(NUM_TEST_ITEMS)

local retrievedItems = getItemsFromAllPages(pages)
local numMatchingItems = compareAllItems(retrievedItems, expectedItems)

-- 아이템 설정이나 가져오는 중 오류가 없었다면, 모든 아이템이 일치해야 합니다.
print(`프로그램 완료. {numMatchingItems}/{NUM_TEST_ITEMS} 가져온 아이템이 예상 값과 일치합니다.`)