-- name = "Contacts menu"
-- name_id = "contacts"
-- description = "Shows phone contacts in the side menu"
-- type = "drawer"
-- aio_version = "4.7.99"
-- author = "Evgeny Zobnin"
-- version = "1.0"

local have_permission = false

function on_drawer_open()
    local raw_contacts = phone:contacts()

    if raw_contacts == "permission_error" then
        phone:request_permission()
        return
    end

    have_permission = true

    contacts = distinct_by_name(
        sort_by_name(phone:contacts())
    )

    if #contacts == #drawer:items() then
        return
    end

    names = map(contacts, function(it) return it.name end)
    keys = map(contacts, function(it) return it.lookup_key end)
    icons = map(contacts, function(it)
        if it.icon ~= nil then
            return it.icon
        else
            return it.name:sub(1,1) -- Backward compatibility
        end
    end)

    drawer:show_list(names, icons, nil, true)
end

function on_click(idx)
    if not have_permission then return end

    phone:show_contact_dialog(contacts[idx].lookup_key)
end

function map(tbl, f)
    local ret = {}
    for k,v in pairs(tbl) do
        ret[k] = f(v)
    end
    return ret
end

function sort_by_name(tbl)
    table.sort(tbl, function(a,b) return a.name:lower() < b.name:lower() end)
    return tbl
end

function distinct_by_name(tbl)
    local ret = {}
    local names = {}
    for _, contact in ipairs(tbl) do
        if not names[contact.name] then
            table.insert(ret, contact)
        end
        names[contact.name] = true
    end
    return ret
end