File

+
−print("Getting all the available modules")
+
−if os.execute '[ -e "./downloaded_modules" ]' then
+
−	os.execute("rm -rf downloaded_modules")
+
−end
+
−os.execute("hg clone https://hg.prosody.im/prosody-modules/ downloaded_modules")
+
−local i, popen = 0, io.popen
+
−local flag = "mod_"
+
−if os.execute '[ -e "./repository" ]' then
+
−	os.execute("mkdir repository")
+
−end
+
−local pfile = popen('ls -a "downloaded_modules"')
+
−for filename in pfile:lines() do
+
−	i = i + 1
+
−	if filename:sub(1, #flag) == flag then
+
−		local file = io.open("repository/"..filename.."-scm-1.rockspec", "w")
+
−		file:write('package = "'..filename..'"', '\n')
+
−		file:write('version = "scm-1"', '\n')
+
−		file:write('source = {', '\n')
+
−		file:write('\turl = "hg+https://hg.prosody.im/prosody-modules",', '\n')
+
−		file:write('\tdir = "prosody-modules"', '\n')
+
−		file:write('}', '\n')
+
−		file:write('description = {', '\n')
+
−		file:write('\thomepage = "https://prosody.im/",', '\n')
+
−		file:write('\tlicense = "MIT"', '\n')
+
−		file:write('}', '\n')
+
−		file:write('dependencies = {', '\n')
+
−		file:write('\t"lua >= 5.1"', '\n')
+
−		file:write('}', '\n')
+
−		file:write('build = {', '\n')
+
−		file:write('\ttype = "builtin",', '\n')
+
−		file:write('\tmodules = {', '\n')
+
−		file:write('\t\t["'..filename..'.'..filename..'"] = "'..filename..'/'..filename..'.lua"', '\n')
+
−		file:write('\t}', '\n')
+
−		file:write('}', '\n')
+
−		file:close()
+
−	end
+
−end
+
−pfile:close()
+
−os.execute("cd repository/ && luarocks-admin make_manifest ./ && chmod -R 644 ./*")
+
−print("")
+
−print("Done!. Modules' sources are locally available at ./downloaded_modules")
+
−print("Repository is available at ./repository")
+
−print("The repository contains all of prosody modules' respective rockspecs, as well as manifest files and an html Index")
+
−print("You can now either point your server to this folder, or copy its contents to another configured folder.")