solutious-rudy 0.8.5 → 0.9.0

data/tryouts/30_metadata/64_backup_disk_tryouts.rb

@@ -0,0 +1,65 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+Gibbler.enable_debug if Tryouts.verbose > 3
+  
+tryout "Disk Backups" do
+  
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.update_config          # Read config files
+    global = Rudy::Huxtable.global
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+    Rudy::Disk.new( 1, '/any/path').save
+  end
+  
+  clean do
+    Rudy::Disk.new( 1, '/any/path').destroy
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+  
+  drill "no previous backups", false do
+    Rudy::Backups.any?
+  end
+  
+  dream :class, Array
+  dream :size, 10
+  drill "create 10 backups" do
+    10.times do |i|
+      seconds = i.to_s.rjust(2, '0')
+      now = Time.parse("2009-01-01 00:00:#{seconds}")
+      Rudy::Backup.new(1, '/any/path', :created => now).save
+    end
+    sleep 1 # eventual consistency
+    Rudy::Backups.list
+  end
+  
+  dream true
+  drill "listed backups are in chronological order" do
+    backups = Rudy::Backups.list
+    stash :backups, backups
+    prev = backups.shift
+    success = false
+    Rudy::Backups.list.each do |back|
+      success = (prev.created <= back.created)
+      break unless success
+    end
+    success
+  end
+  
+  drill "destroy all backups", false do
+    Rudy::Backups.list.each { |b| b.destroy }
+    Rudy::Backups.any?
+  end
+  
+end
+
+
+

data/tryouts/30_metadata/66_backup_snapshot_tryouts.rb

@@ -0,0 +1,76 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+tryout "Backup Snapshot API" do
+  
+  set :sample_time, Time.now.utc
+  set :test_domain, Rudy::DOMAIN #'test_' << Rudy::Utils.strand(4)
+  set :test_env, :stage #'env_' << Rudy::Utils.strand(4)
+  
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.global.offline = true
+    Rudy::Huxtable.update_config          # Read config files
+    global  =  Rudy::Huxtable.global
+    global.environment = test_env
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+  end
+  
+  clean do
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+  
+  dream :class, Rudy::Disk
+  drill "Creates disk object with volume" do
+    b = Rudy::Backup.new(1, '/any/path', :created => sample_time)
+    b.disk.create
+  end
+  
+  dream :class, String
+  dream :empty?, false
+  drill "refreshes associated disk object" do
+    b = Rudy::Backup.new(1, '/any/path', :created => sample_time)
+    b.disk.volid
+  end
+  
+  dream :class, String
+  dream :empty?, false
+  drill "create backups with snapshot" do
+    b = Rudy::Backup.new(1, '/any/path', :created => sample_time)
+    b.create
+    b.snapid
+  end
+  
+  dream :any?, true
+  drill "knows when there's at least one backup" do
+    Rudy::Backup.new(1, '/any/path')
+  end
+  
+  dream :any?, false
+  drill "knows when there are no backups" do
+    Rudy::Backup.new(1, '/no/such/path')
+  end
+  
+  drill "destroy disk", true do
+    back = Rudy::Backup.new(1, '/any/path', :created => sample_time)
+    back.disk.destroy
+  end
+  
+  xdrill "destroy backup", true do
+    back = Rudy::Backup.new(1, '/any/path', :created => sample_time)
+    back.destroy
+  end
+  
+  drill "destroy all backups", false do
+    Rudy::Backups.list.each { |b| b.destroy }
+    Rudy::Backups.any?
+  end
+  
+end

data/tryouts/30_metadata/70_machine_tryouts.rb

@@ -0,0 +1,85 @@
+
+library :rudy, 'lib'
+group "Metadata"
+
+tryout "Rudy::Machine API" do
+  
+  set :test_domain, Rudy::DOMAIN #'test_' << Rudy::Utils.strand(4)
+  set :test_env, 'stage' #'env_' << Rudy::Utils.strand(4)
+
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.global.offline = true
+    Rudy::Huxtable.update_config          # Read config files
+    global = Rudy::Huxtable.global
+    global.environment = test_env
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+  end
+  
+  clean do
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+  
+  dream :class, Rudy::Machine
+  dream :position, '02'
+  drill "create new machine instance" do
+    Rudy::Machine.new '02'
+  end
+  
+  dream :class, Rudy::Machine
+  dream :position, '04'
+  drill "create new machine instance with integer position" do
+    Rudy::Machine.new 4
+  end
+  
+  drill "save machine metadata", true do
+    Rudy::Machine.new.save
+  end
+  
+  drill "knows when an object exists", true do
+    sleep 1  # eventual consistency 
+    Rudy::Machine.new.exists?
+  end
+  
+  drill "knows when an object doesn't exist", false do
+    Rudy::Machine.new('99').exists?
+  end
+  
+  dream :exception, Rudy::Metadata::DuplicateRecord
+  drill "won't save over a machine with the same name" do
+    Rudy::Machine.new.save
+  end
+  
+  drill "will save over a disk with the same name if forced", true do
+    Rudy::Machine.new.save :replace
+  end
+  
+  dream :class, Rudy::Machine
+  dream :size, 'm1.small'
+  drill "refresh machine metadata" do
+    m = Rudy::Machine.new
+    m.save :replace
+    m.size = :nothing
+    m.refresh!
+    m
+  end
+  
+  ##dream :class, Rudy::Machine
+  ##dream :zone, 'zone9000'
+  ##xdrill "correctly saves zone" do
+  ##  Rudy::Machine.new(9, :zone => 'zone9000').save
+  ##  Rudy::Machine.new(9, :zone => 'zone9000').refresh!
+  ##end
+  
+  drill "destroy machine metadata", true do
+    Rudy::Machine.new.destroy
+  end
+  
+  
+end

data/tryouts/30_metadata/73_machine_list_tryouts.rb

@@ -0,0 +1,58 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+Gibbler.enable_debug if Tryouts.verbose > 3
+  
+tryout "List Machines" do
+  
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.update_config          # Read config files
+    global = Rudy::Huxtable.global
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+    ('01'..'03').each { |i| Rudy::Machine.new(i).save }
+    ('04'..'05').each { |i| Rudy::Machine.new(i, :environment => :test).save }
+    sleep 1 # SimpleDB, eventual consistency
+  end
+  
+  clean do
+    ('01'..'03').each { |i| Rudy::Machine.new(i).destroy }
+    ('04'..'05').each { |i| Rudy::Machine.new(i, :environment => :test).destroy }
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+  
+    
+  dream :class, Array
+  dream :empty?, false
+  dream :size, 3
+  drill "list available disks in default environment" do
+    ret = Rudy::Machines.list
+    #puts ret.to_json
+    ret
+  end
+  
+  dream :size, 2
+  drill "list available disks in 'test' environment" do
+    ret = Rudy::Machines.list({:environment => :test})
+    #puts ret.to_json
+    ret
+  end
+  
+  dream :size, 5
+  drill "list all available disks" do
+    ret = Rudy::Machines.list({}, [:environment])
+    #puts ret.to_json
+    ret
+  end
+  
+end
+
+
+

data/tryouts/30_metadata/76_machine_instance_tryouts.rb

@@ -0,0 +1,64 @@
+
+library :rudy, 'lib'
+group "Metadata"
+
+tryout "Rudy::Machine Instance API" do
+  
+  set :test_domain, Rudy::DOMAIN #'test_' << Rudy::Utils.strand(4)
+  set :test_env, 'stage' #'env_' << Rudy::Utils.strand(4)
+
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.global.offline = true
+    Rudy::Huxtable.update_config          # Read config files
+    global = Rudy::Huxtable.global
+    global.environment = test_env
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+  end
+  
+  clean do
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+
+  dream :instid, nil
+  drill "machine instid is nil by default" do
+    Rudy::Machine.new '02'
+  end
+  
+  dream :nil?, false
+  dream :class, String
+  drill "create machine with instance" do
+    mach = Rudy::Machine.new '02'
+    mach.create
+    mach.instid
+  end
+  
+  dream :nil?, false
+  drill "refresh machine" do
+    mach = Rudy::Machine.new '02'
+    mach.refresh!
+    mach.instid
+  end
+  
+  dream [true, true]
+  drill "knows about the state of the instance" do
+    mach = Rudy::Machine.new '02'
+    mach.refresh!
+    [mach.instance_exists?, mach.instance_running?]
+  end
+  
+  dream true
+  drill "destroy machine with instance" do
+    mach = Rudy::Machine.new '02'
+    mach.refresh!
+    mach.destroy
+  end
+  
+  
+end

data/tryouts/30_metadata/77_machines_tryouts.rb

@@ -0,0 +1,45 @@
+
+
+library :rudy, 'lib'
+group "Metadata"
+
+tryout "Rudy::Machines API" do
+  
+  set :test_domain, Rudy::DOMAIN #'test_' << Rudy::Utils.strand(4)
+  set :test_env, 'stage' #'env_' << Rudy::Utils.strand(4)
+
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.global.offline = true
+    Rudy::Huxtable.update_config          # Read config files
+    global = Rudy::Huxtable.global
+    global.environment = test_env
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+    Rudy::Machine.new('07').save
+    Rudy::Machine.new('08').save
+    Rudy::Machine.new('09').save
+  end
+  
+  clean do
+    Rudy::Machine.new('07').destroy
+    Rudy::Machine.new('08').destroy
+    Rudy::Machine.new('09').destroy
+    if Rudy.debug?
+      puts $/, "Rudy Debugging:"
+      Rudy::Huxtable.logger.rewind
+      puts Rudy::Huxtable.logger.read unless Rudy::Huxtable.logger.closed_read?
+    end
+  end
+  
+  dream :class, Rudy::Machine
+  drill "get machine metadata" do
+    Rudy::Machines.get '07'
+  end
+  
+  drill "knows when the current group is not running", false do
+    Rudy::Machines.running?
+  end
+
+end

data/tryouts/40_routines/10_keypair_handler_tryouts.rb

@@ -0,0 +1,52 @@
+group "Routines"
+library :rudy, 'lib'
+  
+tryout "Keypair Handler" do
+  set :user, Rudy::Utils.strand(4)
+  set :keydir, '/tmp'
+  set :global, Rudy::Huxtable.global
+  set :config, Rudy::Huxtable.config
+  set :test_env, 'env_' << Rudy::Utils.strand
+  setup do
+    Rudy.enable_debug
+    Rudy::Huxtable.update_config          # Read config files
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+    Rudy::AWS::EC2.connect akey, skey, region
+    global.environment = test_env
+    config.defaults[:keydir] = keydir
+  end
+  
+  drill "has new temporary ssh key directory", keydir do
+    config.defaults[:keydir]
+  end
+  
+  drill "knows when a keypair isn't registered", false do
+    Rudy::Routines::Handlers::Keypair.registered? user
+  end
+  
+  drill "knows when a private key file doesn't exist", false do
+    Rudy::Routines::Handlers::Keypair.pkey? '/path/2/' << user
+  end
+  
+  dream "#{keydir}/key-us-east-1b-#{test_env}-app-#{user}"
+  drill "determine keypair path (#{user})" do
+    Rudy::Routines::Handlers::Keypair.pkey user
+  end
+  
+  dream "#{keydir}/key-us-east-1b-#{test_env}-app"
+  drill "determine root keypair path" do
+    Rudy::Routines::Handlers::Keypair.pkey :root
+  end
+  
+  dream :class, Rudy::AWS::EC2::Keypair
+  drill "create a new keypair" do
+    Rudy::Routines::Handlers::Keypair.create user
+  end
+  
+  dream :class, Rudy::AWS::EC2::Keypair
+  drill "create a new root keypair" do
+    Rudy::Routines::Handlers::Keypair.create :root
+  end
+  
+end