CC: ldb2 - LocalDataBase2

if not fs.exists('/data') then
    fs.makeDir('/data')
end

function set(db, name, data)
        if not fs.exists('/data/' .. db) then
                fs.makeDir('/data/' .. db)
        end
        local f = fs.open('/data/' .. db .. '/' .. name, 'w')
        f.write(textutils.serialize(data))
        f.close()
end

function get(db, name)
        if fs.exists('/data/' .. db .. '/' .. name) then
                local f = fs.open('/data/' .. db .. '/' .. name, 'r')
                data = textutils.unserialize(f.readAll())
                f.close()
        end
        return data
end

function is(db, name)
    if fs.exists('/data/' .. db .. '/' .. name) then
        return true
    end
    return false
end

function list(db)
    if not fs.exists('/data/' .. db) then
        return nil
    end
    return fs.list('/data/' .. db .. '/')
end

function del(db, name)
    fs.delete('/data/' .. db .. '/' .. name)
end

function clear(db)
    list = list(db)
    for i = 1, table.getn(list) do
        delete(db, list[i])
    end
end