fix: stack overflow in bug report (opentibiabr#1704)

fix the FS.mkdir_p(path) function that was causing stackoverflow
exception

I made a change so that the code works as follows: The path is divided
into parts, then the function goes through the components, creating the
directory if it does not exist. The process repeats until all components
of the path have been successfully completed, avoiding stackoverflow
exception. At the end, the function returns true to indicate that the
operation was successful.

data/libs/functions/fs.lua

@@ -24,9 +24,27 @@ function FS.mkdir_p(path)
 	if path == "" then
 		return true
 	end
-	if FS.exists(path) then
-		return true
+
+	local components = {}
+	for component in path:gmatch("[^/\\]+") do
+		table.insert(components, component)
 	end
-	FS.mkdir_p(path:match("(.*[/\\])"))
-	return FS.mkdir(path)
+
+	local currentPath = ""
+	for i, component in ipairs(components) do
+		currentPath = currentPath .. component
+
+		if not FS.exists(currentPath) then
+			local success, err = FS.mkdir(currentPath)
+			if not success then
+				return false, err
+			end
+		end
+
+		if i < #components then
+			currentPath = currentPath .. "/"
+		end
+	end
+
+	return true
 end