Mikubot-2/otouto/plugins/time.lua

local time = {}

time.command = 'time <Ort>'

function time:init(config)
	time.triggers = utilities.triggers(self.info.username, config.cmd_pat):t('time', true).table
	time.inline_triggers = {
	  "^time (.+)",
	  "^time"
	}
	time.doc = [[*
]]..config.cmd_pat..[[time*: Aktuelle Zeit in Deutschland
*]]..config.cmd_pat..[[time* _<Ort>_: Gibt Zeit an diesem Ort aus]]
end

function time:localize(output)
  -- Days
  local output = string.gsub(output, "Monday", "Montag")
  local output = string.gsub(output, "Tuesday", "Dienstag")
  local output = string.gsub(output, "Wednesday", "Mittwoch")
  local output = string.gsub(output, "Thursday", "Donnerstag")
  local output = string.gsub(output, "Friday", "Freitag")
  local output = string.gsub(output, "Saturday", "Samstag")
  local output = string.gsub(output, "Sunday", "Sonntag")
	
	-- Months
  local output = string.gsub(output, "January", "Januar")
  local output = string.gsub(output, "February", "Februar")
  local output = string.gsub(output, "March", "März")
  local output = string.gsub(output, "April", "April")
  local output = string.gsub(output, "May", "Mai")
  local output = string.gsub(output, "June", "Juni")
  local output = string.gsub(output, "July", "Juli")
  local output = string.gsub(output, "August", "August")
  local output = string.gsub(output, "September", "September")
  local output = string.gsub(output, "October", "Oktober")
  local output = string.gsub(output, "November", "November")
  local output = string.gsub(output, "December", "Dezember")
	
	-- Timezones
  local output = string.gsub(output, "Africa", "Afrika")
  local output = string.gsub(output, "America", "Amerika")
  local output = string.gsub(output, "Asia", "Asien")
  local output = string.gsub(output, "Australia", "Australien")
  local output = string.gsub(output, "Europe", "Europa")
  local output = string.gsub(output, "Indian", "Indien")
  local output = string.gsub(output, "Pacific", "Pazifik")
  
  return output
end

function time:get_time(coords)
  local now = os.time()
  local utc = os.time(os.date("!*t", now))

  local url = 'https://maps.googleapis.com/maps/api/timezone/json?location=' .. coords.lat ..','.. coords.lon .. '&timestamp='..utc..'&language=de'
  local jstr, res = https.request(url)
  if res ~= 200 then return nil end
  
  local jdat = json.decode(jstr)
  local place = string.gsub(jdat.timeZoneId, '_', ' ' )
  local place = time:localize(place)
  local timezoneid = '*'..place..'*'
  local timestamp = now + jdat.rawOffset + jdat.dstOffset
  local utcoff = (jdat.rawOffset + jdat.dstOffset) / 3600
  if utcoff == math.abs(utcoff) then
    utcoff = '+'.. utilities.pretty_float(utcoff)
  else
    utcoff = utilities.pretty_float(utcoff)
  end
  -- "%A, %d. %B %Y, %H:%M:%S Uhr"
  local time_there =  time:localize(os.date('!%A, %d. %B %Y, %H:%M:%S Uhr',timestamp))
  local output = timezoneid..':\n'..time_there

  return output..'\n_'..jdat.timeZoneName .. ' (UTC' .. utcoff .. ')_', place, time_there
end

function time:inline_callback(inline_query, config, matches)
  if matches[1] == 'time' then
    local desc_time = os.date("%A, %d. %B %Y, %H:%M:%S Uhr")
    local cur_time = time:localize(os.date("%A, %d. %B %Y, *%H:%M:%S Uhr*"))
    results = '[{"type":"article","id":"'..math.random(100000000000000000)..'","title":"Europa/Berlin","description":"'..desc_time..'","thumb_url":"https://anditest.perseus.uberspace.de/inlineQuerys/time/clock.jpg","input_message_content":{"message_text":"'..cur_time..'","parse_mode":"Markdown"}}]'
  else
	local coords = utilities.get_coords(matches[1], config)
	if type(coords) == 'string' then utilities.answer_inline_query(self, inline_query) return end
	local output, place, desc_time = time:get_time(coords)
	if not output then utilities.answer_inline_query(self, inline_query) return end
    results = '[{"type":"article","id":"'..math.random(100000000000000000)..'","title":"'..place..'","description":"'..desc_time..'","thumb_url":"https://anditest.perseus.uberspace.de/inlineQuerys/time/clock.jpg","input_message_content":{"message_text":"'..output..'","parse_mode":"Markdown"}}]'
  end
  utilities.answer_inline_query(self, inline_query, results, 1)
end

function time:action(msg, config)
  local input = utilities.input(msg.text)
  if not input then
    local output = os.date("%A, %d. %B %Y, *%H:%M:%S Uhr*")
	utilities.send_reply(self, msg, time:localize(output), true)
	return
  end

  local coords = utilities.get_coords(input, config)
  if type(coords) == 'string' then
    utilities.send_reply(self, msg, coords)
    return
  end
  local output = time:get_time(coords)
  if not output then utilities.send_reply(self, msg, config.errors.connection) return end
	
  utilities.send_reply(self, msg, output, true)
end

return time