Mikubot/plugins/giphy.lua

-- Idea by https://github.com/asdofindia/telegram-bot/
-- See http://api.giphy.com/

do

local BASE_URL = 'http://api.giphy.com/v1'
local API_KEY = 'dc6zaTOxFJmzC' -- public beta key

function get_random_top()
  local res, code = http.request(BASE_URL.."/gifs/trending?api_key="..API_KEY)
  if code ~= 200 then return nil end
  local images = json:decode(res).data
  local i = math.random(0,#images)
  return images[i].images.downsized.url
end

function search(text)
  text = URL.escape(text)
  local url = BASE_URL.."/gifs/search?q="..text.."&api_key="..API_KEY
  print(url)
  local res, code = http.request(url)
  if code ~= 200 then return nil end
  local images = json:decode(res).data
  if #images == 0 then return nil end -- No images
  local i = math.random(0,#images)
  return images[i].images.downsized.url
end

function run(msg, matches)
  local gif_url = ''
  
  -- If no search data, a random trending GIF will be sended
  if matches[1] == "!gif" or matches[1] == "!giphy" then
    gif_url = get_random_top()
  else
    gif_url = search(matches[1])
  end

  if not gif_url then 
    return "Error: GIF not found"
  end

  local receiver = get_receiver(msg)
  send_document_from_url(receiver, gif_url)
  return "Preparing to make you laugh"
end

return {
  description = "GIFs from telegram with Giphy API",
  usage = {
    "!gif (term): Search and sends GIF from Giphy. If no param, sends a trending GIF.",
    "!giphy (term): Search and sends GIF from Giphy. If no param, sends a trending GIF."
    },
  patterns = {
    "^!gif$",
    "^!gif (.*)",
    "^!giphy (.*)",
    "^!giphy$"
  },
  run = run
}

end