module Redis::Commands::Server

def bgrewriteaof
  send_command([:bgrewriteaof])
end

def bgsave
  send_command([:bgsave])
end

def client(subcommand = nil, *args)
  send_command([:client, subcommand] + args) do |reply|
    if subcommand.to_s == "list"
      reply.lines.map do |line|
        entries = line.chomp.split(/[ =]/)
        Hash[entries.each_slice(2).to_a]
      end
    else
      reply
    end
  end
end

def config(action, *args)
  send_command([:config, action] + args) do |reply|
    if reply.is_a?(Array) && action == :get
      Hashify.call(reply)
    else
      reply
    end
  end
end

def dbsize
  send_command([:dbsize])
end

def debug(*args)
  send_command([:debug] + args)
end

def flushall(options = nil)
  if options && options[:async]
    send_command(%i[flushall async])
  else
    send_command([:flushall])
  end
end

def flushdb(options = nil)
  if options && options[:async]
    send_command(%i[flushdb async])
  else
    send_command([:flushdb])
  end
end

def info(cmd = nil)
  send_command([:info, cmd].compact) do |reply|
    if reply.is_a?(String)
      reply = HashifyInfo.call(reply)
      if cmd && cmd.to_s == "commandstats"
        # Extract nested hashes for INFO COMMANDSTATS
        reply = Hash[reply.map do |k, v|
          v = v.split(",").map { |e| e.split("=") }
          [k[/^cmdstat_(.*)$/, 1], Hash[v]]
        end]
      end
    end
    reply
  end
end

def lastsave
  send_command([:lastsave])
end

def monitor(&block)
  synchronize do |client|
    client.call_loop([:monitor], &block)
  end
end

def save
  send_command([:save])
end

def shutdown
  synchronize do |client|
    client.with_reconnect(false) do
      begin
        client.call([:shutdown])
      rescue ConnectionError
        # This means Redis has probably exited.
        nil
      end
    end
  end
end

def slaveof(host, port)
  send_command([:slaveof, host, port])
end

def slowlog(subcommand, length = nil)
  synchronize do |client|
    args = [:slowlog, subcommand]
    args << length if length
    client.call args
  end
end

def sync
  send_command([:sync])
end

def time
  send_command([:time]) do |reply|
    reply&.map(&:to_i)
  end
end