# frozen_string_literal: true

require 'optparse'

options, input_sources = parse_options
input_stream_sources(input_sources, options)

def parse_options
  options = {}
  OptionParser.new do |opts|
    opts.on('-l') { options[:lines] = true }
    opts.on('-w') { options[:words] = true }
    opts.on('-c') { options[:bytes] = true }
  end.parse!
  options = { bytes: true, lines: true, words: true } if options.empty?
  [options, ARGV.empty? ? ['-'] : ARGV]
end

def input_stream_sources(input_sources, options)
  total_stats = [0, 0, 0]
  max_widths = [0, 0, 0]

  input_sources.each do |source|
    stats = input_stream(source)
    total_stats = update_totals(total_stats, stats)
    max_widths = update_max_widths(max_widths, stats)
    result = format_result(stats, max_widths, options)
    print_result(result, source)
  end

  print_total(total_stats, max_widths, options) if input_sources.size > 1
end

def input_stream(source)
  if source == '-'
    count_file_stats(ARGF)
  else
    count_file_stats(File.read(source))
  end
end

def count_file_stats(input)
  lines = words = bytes = 0
  input.each_line do |line|
    lines += 1
    words += line.split.size
    bytes += line.bytesize
  end
  [lines, words, bytes]
end

def update_totals(totals, stats)
  totals.zip(stats).map { |total, stat| total + stat }
end

def update_max_widths(max_widths, stats)
  max_widths.zip(stats).map { |max, stat| [max, stat.to_s.length].max }
end

def format_result(stats, max_widths, options)
  result = []
  %i[lines words bytes].each_with_index do |key, index|
    result << stats[index].to_s.rjust(max_widths[index]) if options[key]
  end
  result.join(' ')
end

def print_result(result, source)
  puts "#{result} #{source == '-' ? '' : source}"
end

def print_total(total_stats, max_widths, options)
  total_result = format_result(total_stats, max_widths, options)
  puts "#{total_result} 合計"
end