--local tblf = include("/../gamemodes/artery/gamemode/utility/mapfuncs.lua")
print("Hello from cl_ncpmap in core")
local drawmap = false
hook.Add( "ScoreboardShow", "ShowNPCMap", function()
    print("Showing npc map")
    drawmap = true
    return true
end )
hook.Add( "ScoreboardHide", "ShowNPCMap", function()
    print("Hiding npc map")
    drawmap = false
end )
local white = Color( 255, 255, 255, 255 )

local mapicons = --[[mapicons or]] {
    ["global"] = {
        ["isleaf"] = false,
        ["border"] = {  {-10000,-10000},
        {-10000,10000},
        {10000,10000},
        {10000,-10000}
    },
}
}

hook.Add( "HUDPaint", "paintsprites", function()
    local function drawsubarea(node)
        print("drawing")
        PrintTable(node)
        if node.isleaf then
            render.SetMaterial( node.material )
            render.DrawSprite( node.pos, 64, 64, white )
            print("Actually drawing")
            PrintTable(node)
        else
            if not node.icons then
                print("found area without any icons!")
                for k,v in pairs(node) do print(k,":",v) end
            end
            for k,v in pairs(node.icons or {}) do
                drawsubarea(v)
            end
        end
    end
    if drawmap then
        print("starting this draw")
        cam.Start3D()
        drawsubarea(mapicons["global"])
        cam.End3D()
        print("done with this draw")
    end
end )

--When the player loads in, load the npcmap for this map
hook.Add("Initialize","loadmapicons",function()
    LocalPlayer().MapIcons = LocalPlayer().MapIcons or {}
    local mapname = game.GetMap()
    if not file.Exists("artery/client/" .. mapname,"DATA") then
        file.CreateDir("artery/client/" .. mapname)
    end

    local mapiconstxt = file.Read("artery/client/" .. mapname .. "/known.txt")
    if not mapiconstxt then return end --File does not exist!
    for k,v in pairs(string.Explode("\r?\n",mapiconstxt,true)) do
        local isleaf = tobool(v[1])
        local ttbl = string.Explode(",",v)
        if not isleaf then
            --local name = v[2]
            local boundry = {}
            for i = 3, #ttbl, 3  do
                boundry[#boundry + 1] = ttbl[i],ttbl[i + 1],ttbl[i + 2]
            end
        end
        -- if isleaf then
        --     local subarea = ttbl[2]
        --     local material = ttbl[3]
        --     local pos = Vector(ttbl[4],ttbl[5],ttbl[6])
        -- else
        --     local name = v[2]
        --     local boundry = {}
        --     for i = 3, #ttbl, 3  do
        --         boundry[#boundry+1] = ttbl[i],ttbl[i + 1],ttbl[i + 2]
        --     end
        -- end
    end
end)


--When the player disconnects (or changes levels) save the npcmap

--Add an icon to the map
local function addmapicon(material, subarea, position)
    print("adding map icon, material:",material,"subarea:",subarea,"bordertbl:",bordertbl)
    print("mat",material,"subarea",subarea,"position",position)
    local parts = string.Explode(":",subarea)
    -- print("parts:",parts)
    -- PrintTable(parts)
    local cursor = mapicons
    for k,v in pairs(parts) do
        -- print("Traverseing down tree:",k,v)
        -- print("cursor was")
        -- PrintTable(cursor)
        if cursor[v] == nil then
            cursor[v] = {}
        end
        cursor = cursor[v]
        -- print("cursor is")
        -- PrintTable(cursor)
    end
    if cursor.isleaf and cursor.pos == position then return end
    cursor.icons = cursor.icons or {}
    for k,v in pairs(cursor.icons) do
        if v.pos == position then return end --This position already has an icon!
    end
    table.insert(cursor.icons,{
        ["isleaf"] = true,
        ["material"] = Material(material),
        ["pos"] = position,
    })
    assert(type(cursor) == "table","Attempted to add subarea that dosen't exist:" .. subarea)
end

-- local function addmaparea(material, subarea, bordertbl)
--     print("adding map area, material:",material,"subarea:",subarea,"bordertbl:",bordertbl)
--     local parts = string.Explode(":",subarea)
--     print("parts:",parts)
--     PrintTable(parts)
--     local cursor = mapicons
--     if #parts > 1 then
--         for k,v in pairs(parts) do
--             print("Traverseing down tree:",k,v)
--             cursor = cursor[v]
--         end
--     end
--     
--     print("Cursor is",cursor)
--     if cursor ~= nil then
--         cursor[subarea] = {
--             ["isleaf"] = false,
--             ["material"] = "",
--             ["border"] = bordertbl,
--             ["subparts"] = {}
--         }
--     else
--         print("Error, cursor was nil!")
--     end
-- end
--[[
addmaparea("","global",{
{-10000,-10000},
{-10000,10000},
{10000,10000},
{10000,-10000}
})
]]

net.Receive("addmapicon",function()
    print("got recieve for map icon")
    local matstr = net.ReadString()
    local subarea = net.ReadString()
    local matpos = net.ReadVector()
    addmapicon(matstr,subarea,matpos)
    print("MapIcons is now")
    PrintTable(mapicons)
end)

net.Receive("addmaparea",function()
    print("got receive for map area")
    -- local matstr = net.ReadString()
    -- local subarea = net.ReadString()
    -- local boarders = net.ReadTable()
end)