module Byebug::InfoFunctions

def info_args(*args)
  locals = @state.context.frame_locals
  args = @state.context.frame_args
  return if args == [[:rest]]
  args.map do |_, name|
    s = "#{name} = #{locals[name].inspect}"
    s[Setting[:width] - 3..-1] = '...' if s.size > Setting[:width]
    puts s
  end
end

def info_breakpoint(brkpt)
  expr = brkpt.expr.nil? ? '' : " if #{brkpt.expr}"
  y_n = brkpt.enabled? ? 'y' : 'n'
  interp = format('%-3d %-3s at %s:%s%s',
                  brkpt.id, y_n, brkpt.source, brkpt.pos, expr)
  puts interp
  hits = brkpt.hit_count
  return unless hits > 0
  s = (hits > 1) ? 's' : ''
  puts "\tbreakpoint already hit #{hits} time#{s}"
end

def info_breakpoints(*args)
  return puts('No breakpoints.') if Byebug.breakpoints.empty?
  brkpts = Byebug.breakpoints.sort_by(&:id)
  unless args.empty?
    indices = args.map(&:to_i)
    brkpts = brkpts.select { |b| indices.member?(b.id) }
    return errmsg('No breakpoints found among list given') if brkpts.empty?
  end
  puts 'Num Enb What'
  brkpts.each { |b| info_breakpoint(b) }
end

def info_catch(*_args)
  return puts('No frame selected.') unless @state.context
  if Byebug.catchpoints && !Byebug.catchpoints.empty?
    Byebug.catchpoints.each do |exception, _hits|
      puts("#{exception}: #{exception.is_a?(Class)}")
    end
  else
    puts 'No exceptions set to be caught.'
  end
end

def info_display(*_args)
  return puts('There are no auto-display expressions now.') unless
    @state.display.find { |d| d[0] }
  puts 'Auto-display expressions now in effect:'
  puts 'Num Enb Expression'
  n = 1
  @state.display.each do |d|
    puts(format('%3d: %s  %s', n, d[0] ? 'y' : 'n', d[1]))
    n += 1
  end
end

def info_file_basic(file)
  path = File.expand_path(file)
  return unless File.exist?(path)
  s = n_lines(path) == 1 ? '' : 's'
  "#{path} (#{n_lines(path)} line#{s})"
end

def info_file_breakpoints(file)
  breakpoints = Breakpoint.potential_lines(file)
  return unless breakpoints
  breakpoints.to_a.sort.columnize(line_prefix: '  ',
                                  displaywidth: Setting[:width])
end

def info_file_mtime(file)
  File.stat(file).mtime
end

def info_file_sha1(file)
  require 'digest/sha1'
  Digest::SHA1.hexdigest(file)
end

def info_line(*_args)
  puts "Line #{@state.line} of \"#{@state.file}\""
end

def info_program(*_args)
  if @state.context.dead?
    puts 'The program crashed.'
    excpt = Byebug.last_exception
    return puts("Exception: #{excpt.inspect}") if excpt
  end
  puts 'Program stopped. '
  info_stop_reason @state.context.stop_reason
end

def info_stop_reason(stop_reason)
  case stop_reason
  when :step
    puts "It stopped after stepping, next'ing or initial start."
  when :breakpoint
    puts 'It stopped at a breakpoint.'
  when :catchpoint
    puts 'It stopped at a catchpoint.'
  end
end