Модуль:RandomPageFromCategory: различия между версиями

Материал из Поле цифровой дидактики
Нет описания правки
Нет описания правки
 
(не показано 6 промежуточных версий этого же участника)
Строка 1: Строка 1:
-- Module:RandomPageFromCategory
local p = {}
local p = {}


-- Вспомогательная: случайный элемент массива
math.randomseed(os.time())
local function random_item(t)
 
  if not t or #t == 0 then
local function pickOne(t)
    return nil
    if not t or #t == 0 then
  end
        return nil
  local i = math.random(1, #t)
    end
  return t[i]
    return t[math.random(#t)]
end
end


-- Вернуть ссылку на случайную страницу из категории
function p.getRandomTitle(category)
function p.fromCategory(frame)
    if not mw.smw then
  -- имя категории без префикса "Category:"
        return nil, "Ошибка: mw.smw недоступен"
  local cat = frame.args[1] or "Book"
    end


  -- подстрахуемся: сбросить сид, чтобы random менялся
    if not category or category == "" then
  math.randomseed(os.time())
        category = "Book"
    end


  -- Вызов MediaWiki API module (если включён)
    local results = mw.smw.ask({
  local api = mw.ext and mw.ext.ApiFrame and mw.ext.ApiFrame.new
        string.format('[[Category:%s]]', category),
  if not api then
        '?#-=title',
     return "Lua: модуль API недоступен на этой вики."
        'limit=200'
  end
     })


  -- Базовый запрос к api.php?action=query&list=categorymembers
    if not results or #results == 0 then
  local req = api{
        return nil, "В категории нет страниц: " .. category
     action  = "query",
     end
     list    = "categorymembers",
 
     cmtitle = "Category:" .. cat,
     local item = pickOne(results)
     cmlimit = "500",
 
     cmnamespace = "0"  -- только статьи; можно убрать/изменить при желании
     if type(item) == "table" then
  }
        return item.title or item[1] or nil, nil
     end
 
     return item, nil
end


  local data = req and req.query and req.query.categorymembers
function p.main(frame)
  if not data or #data == 0 then
    local category = frame.args.category or frame.args[1] or "Book"
     return 'Нет страниц в категории "' .. cat .. '".'
     local title, err = p.getRandomTitle(category)
  end


  local row = random_item(data)
    if not title or title == "" then
  if not row or not row.title then
        return err or "Не удалось получить название страницы"
    return "Не удалось получить заголовок страницы."
    end
  end


  return "[[" .. row.title .. "]]"
    return title
end
end


return p
return p

Текущая версия от 07:48, 21 мая 2026


local p = {}

math.randomseed(os.time())

local function pickOne(t)
    if not t or #t == 0 then
        return nil
    end
    return t[math.random(#t)]
end

function p.getRandomTitle(category)
    if not mw.smw then
        return nil, "Ошибка: mw.smw недоступен"
    end

    if not category or category == "" then
        category = "Book"
    end

    local results = mw.smw.ask({
        string.format('[[Category:%s]]', category),
        '?#-=title',
        'limit=200'
    })

    if not results or #results == 0 then
        return nil, "В категории нет страниц: " .. category
    end

    local item = pickOne(results)

    if type(item) == "table" then
        return item.title or item[1] or nil, nil
    end

    return item, nil
end

function p.main(frame)
    local category = frame.args.category or frame.args[1] or "Book"
    local title, err = p.getRandomTitle(category)

    if not title or title == "" then
        return err or "Не удалось получить название страницы"
    end

    return title
end

return p