local insert, concat
do
  local _obj_0 = table
  insert, concat = _obj_0.insert, _obj_0.concat
end
local escape_pattern
do
  local _obj_0 = require("lapis.util")
  escape_pattern = _obj_0.escape_pattern
end
local split
split = function(str, delim)
  str = str .. delim
  local _accum_0 = { }
  local _len_0 = 1
  for part in str:gmatch("(.-)" .. escape_pattern(delim)) do
    _accum_0[_len_0] = part
    _len_0 = _len_0 + 1
  end
  return _accum_0
end
local wrap_text
wrap_text = function(text, indent, max_width)
  if indent == nil then
    indent = 0
  end
  if max_width == nil then
    max_width = 80
  end
  local width = max_width - indent
  local words = split(text, " ")
  local pos = 1
  local lines = { }
  while pos <= #words do
    local line_len = 0
    local line = { }
    while true do
      local word = words[pos]
      if word == nil then
        break
      end
      if #word > width then
        error("can't wrap text, words too long")
      end
      if line_len + #word > width then
        break
      end
      pos = pos + 1
      insert(line, word)
      line_len = line_len + #word + 1
    end
    insert(lines, concat(line, " "))
  end
  return concat(lines, "\n" .. (" "):rep(indent))
end
local columnize
columnize = function(rows, indent, padding, wrap)
  if indent == nil then
    indent = 2
  end
  if padding == nil then
    padding = 4
  end
  if wrap == nil then
    wrap = true
  end
  local max = 0
  for _index_0 = 1, #rows do
    local row = rows[_index_0]
    max = math.max(max, #row[1])
  end
  local left_width = indent + padding + max
  local formatted
  do
    local _accum_0 = { }
    local _len_0 = 1
    for _index_0 = 1, #rows do
      local row = rows[_index_0]
      local padd = (max - #row[1]) + padding
      local _value_0 = concat({
        (" "):rep(indent),
        row[1],
        (" "):rep(padd),
        wrap and wrap_text(row[2], left_width) or row[2]
      })
      _accum_0[_len_0] = _value_0
      _len_0 = _len_0 + 1
    end
    formatted = _accum_0
  end
  return concat(formatted, "\n")
end
local random_string
do
  math.randomseed(os.time())
  local random
  do
    local _obj_0 = math
    random = _obj_0.random
  end
  local random_char
  random_char = function()
    local _exp_0 = random(1, 3)
    if 1 == _exp_0 then
      return random(65, 90)
    elseif 2 == _exp_0 then
      return random(97, 122)
    elseif 3 == _exp_0 then
      return random(48, 57)
    end
  end
  random_string = function(length)
    return string.char(unpack((function()
      local _accum_0 = { }
      local _len_0 = 1
      for i = 1, length do
        _accum_0[_len_0] = random_char()
        _len_0 = _len_0 + 1
      end
      return _accum_0
    end)()))
  end
end
local get_free_port
get_free_port = function()
  local socket = require("socket")
  local sock = socket.bind("*", 0)
  local _, port = sock:getsockname()
  sock:close()
  return port
end
if ... == "test" then
  print(columnize({
    {
      "hello",
      "here is some info"
    },
    {
      "what is going on",
      "this is going to be a lot of text so it wraps around the end"
    },
    {
      "this is something",
      "not so much here"
    },
    {
      "else",
      "yeah yeah yeah not so much okay goodbye"
    }
  }))
end
return {
  columnize = columnize,
  split = split,
  random_string = random_string,
  get_free_port = get_free_port
}