--- Module which builds the index.html page to be used in rocks servers. module("luarocks.index", package.seeall) local util = require("luarocks.util") local fs = require("luarocks.fs") local deps = require("luarocks.deps") local persist = require("luarocks.persist") local dir = require("luarocks.dir") local manif = require("luarocks.manif") local ext_url_target = ' target="_blank"' local index_header = [[ Available rocks

Available rocks

Lua modules available from this location for use with LuaRocks:

]] local index_package_start = [[ ]] local index_footer = [[

$package - $summary

$detailed
$externaldependencies latest sources $homepage | License: $license

 ]] local index_package_end = [[

manifest file

]] function format_external_dependencies(rockspec) if rockspec.external_dependencies then local deplist = {} local listed_set = {} local plats = nil for name, desc in util.sortedpairs(rockspec.external_dependencies) do if name ~= "platforms" then table.insert(deplist, name:lower()) listed_set[name] = true else plats = desc end end if plats then for plat, entries in util.sortedpairs(plats) do for name, desc in util.sortedpairs(entries) do if not listed_set[name] then table.insert(deplist, name:lower() .. " (on "..plat..")") end end end end return '

External dependencies: ' .. table.concat(deplist, ', ').. '

' else return "" end end function make_index(repo) if not fs.is_dir(repo) then return nil, "Cannot access repository at "..repo end local manifest = manif.load_manifest(repo) local out = io.open(dir.path(repo, "index.html"), "w") out:write(index_header) for package, version_list in util.sortedpairs(manifest.repository) do local latest_rockspec = nil local output = index_package_start for version, data in util.sortedpairs(version_list, deps.compare_versions) do local versions = {} output = output..version..': ' table.sort(data, function(a,b) return a.arch < b.arch end) for _, item in ipairs(data) do local link = ''..item.arch..'' if item.arch == 'rockspec' then local rs = ("%s-%s.rockspec"):format(package, version) if not latest_rockspec then latest_rockspec = rs end link = link:gsub("$url", rs) else link = link:gsub("$url", ("%s-%s.%s.rock"):format(package, version, item.arch)) end table.insert(versions, link) end output = output .. table.concat(versions, ', ') .. '
' end output = output .. index_package_end if latest_rockspec then local rockspec = persist.load_into_table(dir.path(repo, latest_rockspec)) local descript = rockspec.description or {} local vars = { anchor = package, package = rockspec.package, original = rockspec.source.url, summary = descript.summary or "", detailed = descript.detailed or "", license = descript.license or "N/A", homepage = descript.homepage and ('| project homepage') or "", externaldependencies = format_external_dependencies(rockspec) } vars.detailed = vars.detailed:gsub("\n\n", "

"):gsub("%s+", " ") vars.detailed = vars.detailed:gsub("(https?://[a-zA-Z0-9%.%%-_%+%[%]=%?&/$@;:]+)", '%1') output = output:gsub("$(%w+)", vars) else output = output:gsub("$anchor", package) output = output:gsub("$package", package) output = output:gsub("$(%w+)", "") end out:write(output) end out:write(index_footer) out:close() end