monotonic.cr

#!/usr/bin/env cashrun

# usage: 
#      $ monotonic foo
#      > 0
#      $ monotonic foo
#      > 1
#      $ monotonic foo
#      > 2
#      $ monotonic bar
#      > 0
#      $ monotonic foo
#      > 3
#      $ monotonic bar
#      > 1

the_path : Path? = nil

Path["~/.config/monotonic-counter/"]
  .expand(home: true)
  .tap { |path| the_path = path }
  .try { |path| Dir.mkdir_p(path) }

begin
  the_path = the_path.not_nil!

  key = ARGV[0]? || ""

  this_counter_file = the_path.join(key)

  value = 0

  if File.exists?(this_counter_file) && File.readable?(this_counter_file)
    value = File.read(this_counter_file).to_i32? || 0
  end

  new_value = value += 1
  File.write(this_counter_file, new_value)

  STDOUT.puts(value)
rescue
  STDERR.puts("a problem occured")
end