y2k2mt / aws-credentials.cr Goto Github PK

require "./aws"
require "json"  # As you can see I have to require "json" too to get the providers working well.
require "aws-credentials"

module GScaler
  VERSION = "0.2.2"
  include Aws::Credentials

  def self.provider
    @@provider = Providers.new ([
      EnvProvider.new,
      SharedCredentialFileProvider.new,
      InstanceMetadataProvider.new
    ] of Provider)
  end

  def self.client
    @@client ||= Aws::Autoscaling::Client.new(ENV["AWS_REGION"],
      provider.credentials.access_key_id, provider.credentials.secret_access_key)
  end

  def self.watch(name, value)
    start_time = Time.now
    interval = 5
    checks = 0
    loop do
      if (Time.now - start_time).total_minutes > 2
        puts "We can't reach the the desired state..."
        exit
      end
      activities = GScaler.client.describe_scaling_activities(name)
      activities.each do |a|
        puts "#{a.id}: #{a.status} => #{a.description}"
      end
      group = GScaler.client.describe_autoscaling_group(name)
      if group.pool_state == "InService" && group.instances.size == value
        puts "check: The instance pool reached an InService state of #{group.instances.size} (#{checks})"
        checks += 1
        interval *= 2
        exit if checks == 5
      else
        interval = 5
        checks = 0
      end
      sleep interval
    end
  end

......