utils.lua

-- function UUID()
--   local f = function(x)
--     local r = love.math.random(16) - 1
--     r = (x == 'x') and (r + 1) or (r % 4) + 9
--     return ('0123456789abcdef'):gsub(r, r)
--   end
--   return (('xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'):gsub('[xy]', f))
-- end

function UUID()
  local template = 'xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'
  return string.gsub(template, '[xy]', function(c)
    local v = (c == 'x') and love.math.random(0, 0xf) or love.math.random(8, 0xb)
    return string.format('%x', v)
  end)
end

function human_time(t) -- (second)
  local _minutes = math.floor(t / 60)
  local _seconds = math.floor(t % 60)
  local _millis = math.floor(t % 1 / 0.01)
  return string.format('%02d', _minutes) .. ':' .. string.format('%02d', _seconds) .. ':' .. string.format('%02d', _millis)
end

-- Table Utilities --
function table.random(t)
  return t[love.math.random(1, #t)]
end

function table.full(t)
  for i = 1, #t do
    if t[i] == 0 then return false end
  end
  return true
end

function table.shift(t)
  return table.remove(t, 1)
end

function table.empty(t)
  for i = 1, #t do
    if t[i] ~= 0 then return false end
  end
  return true
end

function table.zeros(l) -- generate a table with l number of zeros
  local _t = {}
  for i = 1, l do _t[i] = 0 end
  return _t
end

function table.onezero(l)
  local _t = {}
  for i = 1, l do _t[i] = 1 end
  _t[love.math.random(1, l)] = 0
  return _t
end

function table.shuffle(t)
  local _shuffled = {}
  for index, value in ipairs(t) do
    local randPos = math.floor(love.math.random() * index)+1
    _shuffled[index] = _shuffled[randPos]
    _shuffled[randPos] = value
  end
  return _shuffled
end

function table.copy(t)
  local copy
  if type(t) == 'table' then
    copy = {}
    for k, v in next, t, nil do copy[table.copy(k)] = table.copy(v) end
    setmetatable(copy, table.copy(getmetatable(t)))
  else
    copy = t
  end
  return copy
end

function table.scale(t, s)
  local g = function(v) return v * s end
  return fn.mapi(t, g)
end