server.lua

local function getResourceInfo()
	local info = {}

	for i = 0, GetNumResources() - 1 do
		local resourceName = GetResourceByFindIndex(i)

		if resourceName ~= GetCurrentResourceName() and GetResourceState(resourceName) == "started" then
			local resourceInfo = {}

			resourceInfo.resourceName = resourceName

			for _, metadataName in ipairs(Config.metadataNames) do
				local values = {}

				for i = 0, GetNumResourceMetadata(resourceName, metadataName) - 1 do
					table.insert(values, GetResourceMetadata(resourceName, metadataName, i))
				end

				if #values < 2 then
					resourceInfo[metadataName] = values[1]
				else
					resourceInfo[metadataName] = values
				end
			end

			table.insert(info, resourceInfo)
		end
	end

	table.sort(info, function(a, b)
		local name1 = string.lower(a.name or a.resourceName)
		local name2 = string.lower(b.name or b.resourceName)

		return name1 < name2
	end)

	return info
end

local function printToConsole(resources)
	print("Resources:")
	for _, resource in ipairs(resources) do
		local name = resource.name or resource.resourceName

		local info = "- " .. name

		if resource.version then
			info = info .. " v." .. resource.version
		end

		if resource.author then
			if type(resource.author) == "table" then
				info = info .. " by " .. table.concat(resource.author, ", ")
			else
				info = info .. " by " .. resource.author
			end
		end

		print(info)
	end
end

exports("getResourceInfo", getResourceInfo)

RegisterCommand("credits", function(source)
	local resources = getResourceInfo()

	if source == 0 then
		printToConsole(resources)
	else
		TriggerClientEvent("credits", source, resources)
	end
end, true)

SetHttpHandler(exports.httpmanager:createHttpHandler{
	routes = {
		["^/data%.json$"] = function(req, res, helpers)
			res.sendJson {
				serverName = GetConvar("sv_projectName", GetConvar("sv_hostname", "Server")),
				resourceInfo = getResourceInfo()
			}
		end
	}
})