package.path = package.path .. ';.luarocks/share/lua/5.2/?.lua'
  .. ';.luarocks/share/lua/5.2/?/init.lua'
package.cpath = package.cpath .. ';.luarocks/lib/lua/5.2/?.so'

serpent = require "serpent"

function vardump(value)
  print(serpent.block(value, {comment=false}))
end

chats = {}

function dl_cb (arg, data)
end

function tdcli_update_callback (data)
  vardump(data)
  if (data.ID == "UpdateNewMessage") then
    local msg = data.message_
    local d = data.disable_notification_
    local chat = chats[msg.chat_id_]
    if msg.content_.ID == "MessageText" and msg.content_.text_ == 'forwardthis' then
      tdcli_function ({
        ID="SendMessage",
        chat_id_=msg.chat_id_,
        reply_to_message_id_=msg.id_,
        disable_notification_=0,
        from_background_=1,
        reply_markup_=nil,
        input_message_content_={
          ID="InputMessageText",
          text_="pong",
          disable_web_page_preview_=1,
          clear_draft_=0,
          entities_={}
        }
      }, dl_cb, nil)
    end
  elseif (data.ID == "UpdateChat") then
    chat = data.chat_
    chats[chat.id_] = chat
  elseif (data.ID == "UpdateOption" and data.name_ == "my_id") then
    tdcli_function ({ID="GetChats", offset_order_="9223372036854775807", offset_chat_id_=0, limit_=20}, dl_cb, nil)
  end
end