sokol-luajit/engine/gui/ui/file_selector.lua

-- --------------------------------------------------------------------------------------

local ffi       = require("ffi")

local dirtools  = require("tools.vfs.dirtools")
local sapp      = require("sokol_app")
sg              = require("sokol_nuklear")
local nk        = sg
local slib      = require("sokol_libs") -- Warn - always after gfx!!

-- --------------------------------------------------------------------------------------

local settings  = require("engine.config.settings")
local wdgts     = require("engine.utils.widgets")
local fonts     = require("engine.utils.fonts")

-- --------------------------------------------------------------------------------------

local file_selector = {}

-- --------------------------------------------------------------------------------------

file_selector.create_file_list = function( name, rect, recent_files )

    local file_select = {
        popup_active = 0,
        popup_dim = rect,
        file_selected = "",
        recent_files = recent_files,
        hit = {0, "", 0},

        ui_func = function(ctx, dim, udata)

            nk.nk_layout_row_dynamic(ctx, dim.h-20, 1)
            local flags = bit.bor(nk.NK_WINDOW_BORDER, nk.NK_WINDOW_TITLE)
            flags = bit.bor(flags, nk.NK_WINDOW_NO_SCROLLBAR)

            if (nk.nk_group_begin(ctx, name, flags) == true) then
            
                nk.nk_layout_row_dynamic(ctx, dim.h-115, 1)

                local bhit = wdgts.widget_list_buttons(ctx, "recent_file", nil, udata.recent_files, dim.w -40 )
                if(bhit) then 
                    udata.file_selected = bhit[2]
                end

                nk.nk_layout_row_dynamic(ctx, 25, 1)
                nk.nk_label(ctx, string.format("Selected: %s",udata.file_selected), 1)

                nk.nk_layout_row_dynamic(ctx, 25, 2)
                if (nk.nk_button_label(ctx, "Cancel") == true) then
                    udata.popup_active = 0
                    if(udata.callback) then udata.callback(udata, false) end
                end
                if (nk.nk_button_label(ctx, "OK") == true) then
                    udata.popup_active = 0
                    if(udata.callback) then udata.callback(udata, true) end
                end
                nk.nk_group_end(ctx)                
            end

            if(udata.popup_active == 0) then nk.nk_popup_close(ctx) end
            return udata.popup_active            
        end,
    }
    return file_select
end

-- --------------------------------------------------------------------------------------

file_selector.create_file_selector = function( name, rect, start_folder, folders_only )

    local file_select = {
        popup_active = 0,
        prop = nil,
        drives = {},
        popup_dim = rect,
        fs_type = folders_only,
        folder_path = start_folder,
        file_selected = "",
        hit = {0, "", 0},

        ui_func = function(ctx, dim, udata)

            nk.nk_layout_row_dynamic(ctx, dim.h-20, 1)
            local flags = bit.bor(nk.NK_WINDOW_BORDER, nk.NK_WINDOW_TITLE)
            flags = bit.bor(flags, nk.NK_WINDOW_NO_SCROLLBAR)

            if (nk.nk_group_begin(ctx, name, flags) == true) then
            
                nk.nk_layout_row_begin(ctx, nk.NK_DYNAMIC, 25, 2)
                nk.nk_layout_row_push(ctx, 0.2)
                nk.nk_label(ctx, "Drives: ", 1)
                
                for k,v in ipairs(udata.drives) do
                    nk.nk_layout_row_push(ctx, 0.1)
                    if(nk.nk_button_label(ctx, v) == true) then 
                        udata.folder_path = v
                    end
                end
                nk.nk_layout_row_end(ctx)

                if(udata.fs_type) then
                    nk.nk_layout_row_dynamic(ctx, dim.h-135, 1)
                    local files = dirtools.get_folderslist(udata.folder_path)
                    local bhit = wdgts.widget_list_buttons(ctx, "folder_files", nil, files, dim.w -40 )
                    
                    if(bhit) then
                        udata.hit = bhit 
                        if(bhit[2] == "..") then 
                            udata.folder_path = dirtools.get_parent(udata.folder_path)
                        else
                            udata.folder_path = dirtools.change_folder(udata.folder_path, udata.hit[2])
                        end
                        local full_path = udata.file_selected
                        if(folders_only) then full_path = udata.folder_path end            
                        ffi.copy(udata.prop.ffi, ffi.string(full_path))
                        udata.prop.len_ffi[0] = #full_path
                    end
                else
                    nk.nk_layout_row_dynamic(ctx, dim.h-135, 1)
                    local files = dirtools.get_dirlist(udata.folder_path)
                    local bhit = wdgts.widget_list_buttons(ctx, "select_file", nil, files, dim.w -40 )
                    
                    if(bhit) then
                        local isfolder = nil 

                        udata.hit = bhit 
                        if(bhit[2] == "..") then 
                            udata.folder_path = dirtools.get_parent(udata.folder_path)
                        else
                            isfolder = files[udata.hit[1]].folder ~= nil
                            if(isfolder == true) then 
                                udata.folder_path = dirtools.change_folder(udata.folder_path, udata.hit[2])
                            else 
                                udata.file_selected = dirtools.change_folder(udata.folder_path, udata.hit[2])
                            end
                        end

                        local full_path = udata.file_selected
                        if(isfolder == true) then full_path = udata.folder_path end            
                        ffi.copy(udata.prop.ffi, ffi.string(full_path))
                        udata.prop.len_ffi[0] = #full_path
                    end
                end

                nk.nk_layout_row_dynamic(ctx, 25, 1)
                local edit_evt = nk.nk_edit_string(ctx, nk.NK_EDIT_SIMPLE, udata.prop.ffi, udata.prop.len_ffi, udata.prop.slen, nk.nk_filter_default)
                if(edit_evt == 1 or edit_evt == 10) then 
                    if(folders_only) then
                        udata.folder_path = ffi.string(udata.prop.ffi)
                    else
                        udata.file_selected = ffi.string(udata.prop.ffi)
                    end
                end

                nk.nk_layout_row_dynamic(ctx, 25, 2)
                if (nk.nk_button_label(ctx, "Cancel") == true) then
                    udata.popup_active = 0
                    if(udata.callback) then 
                        udata.callback(udata, false)
                    end
                end
                if (nk.nk_button_label(ctx, "OK") == true) then
                    udata.popup_active = 0
                    if(folders_only) then
                        udata.prop.value = udata.folder_path
                    else
                        udata.prop.value = udata.file_selected
                    end

                    if(udata.callback) then 
                        udata.callback(udata, true)
                    end
                end
                nk.nk_group_end(ctx)
            end
            if(udata.popup_active == 0) then nk.nk_popup_close(ctx) end
            return udata.popup_active
        end,
    }

    return file_select
end

-- --------------------------------------------------------------------------------------

file_selector.open = function(select_obj, initial_path, prop, callback)

    if(prop == nil) then 
        prop = { ffi = ffi.new("char[?]", 256 ), slen = 256, value = initial_path }
        ffi.fill(prop.ffi, #initial_path, 0)
        ffi.copy(prop.ffi, ffi.string(initial_path))
        prop.len_ffi = ffi.new("int[1]", {#initial_path})    
    end

    select_obj.popup_active = 1
    select_obj.prop = prop
    select_obj.folder_path = dirtools.get_folder(prop.value)
    select_obj.drives = dirtools.get_drives()
    if(callback) then select_obj.callback = callback end
end

-- --------------------------------------------------------------------------------------

file_selector.show = function(select_obj, callback)

    select_obj.popup_active = 1
    if(callback) then select_obj.callback = callback end
end


-- --------------------------------------------------------------------------------------

return file_selector

-- --------------------------------------------------------------------------------------