class ProgressBar

# File lib/tapsoob/progress_bar.rb, line 15
def initialize (title, total, out = STDOUT)
  @title = title
  @total = total
  @out = out
  @terminal_width = 80
  @bar_mark = "="
  @current = 0
  @previous = 0
  @finished_p = false
  @start_time = ::Time.now
  @previous_time = @start_time
  @title_width = 14
  @format = "%-#{@title_width}s %3d%% %s %s"
  @format_arguments = [:title, :percentage, :bar, :stat]
  clear
  show
end

# File lib/tapsoob/progress_bar.rb, line 177
def clear
  @out.print "\r"
  @out.print(" " * (get_width - 1))
  @out.print "\r"
end

# File lib/tapsoob/progress_bar.rb, line 193
def file_transfer_mode
  @format_arguments = [:title, :percentage, :bar, :stat_for_file_transfer]
end

# File lib/tapsoob/progress_bar.rb, line 183
def finish
  @current = @total
  @finished_p = true
  show
end

# File lib/tapsoob/progress_bar.rb, line 189
def finished?
  @finished_p
end

# File lib/tapsoob/progress_bar.rb, line 197
def format= (format)
  @format = format
end

# File lib/tapsoob/progress_bar.rb, line 201
def format_arguments= (arguments)
  @format_arguments = arguments
end

# File lib/tapsoob/progress_bar.rb, line 205
def halt
  @finished_p = true
  show
end

# File lib/tapsoob/progress_bar.rb, line 210
def inc (step = 1)
  @current += step
  @current = @total if @current > @total
  show_if_needed
  @previous = @current
end

# File lib/tapsoob/progress_bar.rb, line 226
def inspect
  "#<ProgressBar:#{@current}/#{@total}>"
end

# File lib/tapsoob/progress_bar.rb, line 217
def set (count)
  if count < 0 || count > @total
    raise "invalid count: #{count} (total: #{@total})"
  end
  @current = count
  show_if_needed
  @previous = @current
end

# File lib/tapsoob/progress_bar.rb, line 82
def bytes
  convert_bytes(@current)
end

# File lib/tapsoob/progress_bar.rb, line 65
def convert_bytes (bytes)
  if bytes < 1024
    sprintf("%6dB", bytes)
  elsif bytes < 1024 * 1000 # 1000kb
    sprintf("%5.1fKB", bytes.to_f / 1024)
  elsif bytes < 1024 * 1024 * 1000  # 1000mb
    sprintf("%5.1fMB", bytes.to_f / 1024 / 1024)
  else
    sprintf("%5.1fGB", bytes.to_f / 1024 / 1024 / 1024)
  end
end

# File lib/tapsoob/progress_bar.rb, line 114
def do_percentage
  if @total.zero?
    100
  else
    @current  * 100 / @total
  end
end

# File lib/tapsoob/progress_bar.rb, line 105
def elapsed
  elapsed = ::Time.now - @start_time
  sprintf("Time: %s", format_time(elapsed))
end

# File lib/tapsoob/progress_bar.rb, line 110
def eol
  if @finished_p then "\n" else "\r" end
end

# File lib/tapsoob/progress_bar.rb, line 95
def eta
  if @current == 0
    "ETA:  --:--:--"
  else
    elapsed = ::Time.now - @start_time
    eta = elapsed * @total / @current - elapsed;
    sprintf("ETA:  %s", format_time(eta))
  end
end

# File lib/tapsoob/progress_bar.rb, line 38
def fmt_bar
  bar_width = do_percentage * @terminal_width / 100
  sprintf("|%s%s|",
          @bar_mark * bar_width,
          " " *  (@terminal_width - bar_width))
end

# File lib/tapsoob/progress_bar.rb, line 45
def fmt_percentage
  do_percentage
end

# File lib/tapsoob/progress_bar.rb, line 49
def fmt_stat
  if @finished_p then elapsed else eta end
end

# File lib/tapsoob/progress_bar.rb, line 53
def fmt_stat_for_file_transfer
  if @finished_p then
    sprintf("%s %s %s", bytes, transfer_rate, elapsed)
  else
    sprintf("%s %s %s", bytes, transfer_rate, eta)
  end
end

# File lib/tapsoob/progress_bar.rb, line 61
def fmt_title
  @title[0,(@title_width - 1)] + ":"
end

# File lib/tapsoob/progress_bar.rb, line 86
def format_time (t)
  t = t.to_i
  sec = t % 60
  min  = (t / 60) % 60
  hour = t / 3600
  sprintf("%02d:%02d:%02d", hour, min, sec);
end

# File lib/tapsoob/progress_bar.rb, line 122
def get_width
  # FIXME: I don't know how portable it is.
  default_width = 80
  begin
    tiocgwinsz = 0x5413
    data = [0, 0, 0, 0].pack("SSSS")
    if @out.ioctl(tiocgwinsz, data) >= 0 then
      rows, cols, xpixels, ypixels = data.unpack("SSSS")
      if cols > 0 then cols else default_width end
    else
      default_width
    end
  rescue Exception
    default_width
  end
end

# File lib/tapsoob/progress_bar.rb, line 139
def show
  arguments = @format_arguments.map {|method|
    method = sprintf("fmt_%s", method)
    send(method)
  }
  line = sprintf(@format, *arguments)

  width = get_width
  if line.length == width - 1
    @out.print(line + eol)
    @out.flush
  elsif line.length >= width
    @terminal_width = [@terminal_width - (line.length - width + 1), 0].max
    if @terminal_width == 0 then @out.print(line + eol) else show end
  else # line.length < width - 1
    @terminal_width += width - line.length + 1
    show
  end
  @previous_time = ::Time.now
end

# File lib/tapsoob/progress_bar.rb, line 160
def show_if_needed
  if @total.zero?
    cur_percentage = 100
    prev_percentage = 0
  else
    cur_percentage  = (@current  * 100 / @total).to_i
    prev_percentage = (@previous * 100 / @total).to_i
  end

  # Use "!=" instead of ">" to support negative changes
  if cur_percentage != prev_percentage ||
      ::Time.now - @previous_time >= 1 || @finished_p
    show
  end
end

# File lib/tapsoob/progress_bar.rb, line 77
def transfer_rate
  bytes_per_second = @current.to_f / (::Time.now - @start_time)
  sprintf("%s/s", convert_bytes(bytes_per_second))
end