rudy 0.8.5 → 0.9.0

data/tryouts/26_ec2_instances/50_images_tryouts.rb

@@ -0,0 +1,7 @@
+
+group "EC2 Instances"
+library :rudy, 'lib'
+
+tryouts "Images" do
+  xdrill "TODO"
+end

data/tryouts/30_metadata/10_include_tryouts.rb

@@ -0,0 +1,45 @@
+
+group "Metadata"
+library :rudy, 'lib'
+tryouts "include Rudy::Metadata" do
+  set :test_domain, 'test_' #<< Rudy::Utils.strand
+  
+  setup do
+    Rudy::Huxtable.global.offline = true
+    Rudy::Huxtable.update_config          # Read config files
+  end
+  clean do
+    Rudy::Huxtable.global.offline = false
+  end
+  
+  drill "has default domain", Rudy::DOMAIN do
+    Rudy::Metadata.domain
+  end
+  
+  drill "can set domain", test_domain do
+    Rudy::Metadata.domain = test_domain
+  end
+  
+  drill "can open simpledb connection", true do
+    global = Rudy::Huxtable.global
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+    Rudy::Metadata.connect akey, skey, region
+  end
+  
+  dream test_domain
+  drill "can create test domain (automatically sets new internal domain)" do
+    Rudy::Metadata.domain = Rudy::DOMAIN
+    Rudy::Metadata.create_domain test_domain
+  end
+  
+  dream [:environment, :region, :role, :zone]
+  drill "can build a default criteria" do
+    Rudy::Metadata.build_criteria(Rudy::Machines::RTYPE).keys.sort
+  end
+  
+  dream true
+  drill "can destroy domain (automatically returns to default)" do
+    Rudy::Metadata.destroy_domain test_domain
+  end
+  
+end

data/tryouts/30_metadata/13_object_tryouts.rb

@@ -0,0 +1,19 @@
+
+
+group "Metadata"
+library :rudy, 'lib'
+tryouts "Rudy::Metadata objects" do
+  set :test_domain, 'test_' #<< Rudy::Utils.strand
+  
+  setup do
+    Rudy::Huxtable.update_config
+    global = Rudy::Huxtable.global
+    akey, skey, region = global.accesskey, global.secretkey, global.region
+  end
+
+  dream [:region, :zone, :environment, :role, :position]
+  drill "sets up common fields on include" do
+    Anything.field_names
+  end
+  
+end

data/tryouts/30_metadata/50_disk_tryouts.rb

@@ -0,0 +1,115 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+tryout "Disk 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
+  
+  xdrill "can create test domain", test_domain do
+    Rudy::Metadata.create_domain test_domain
+  end
+  
+  
+  dream :class, Rudy::Disk
+  dream :name do
+    tmp  = [Rudy::Huxtable.global.zone, Rudy::Huxtable.global.environment]
+    tmp += [Rudy::Huxtable.global.role, '01']
+      # disk-us-east-1b-env_xxxxxx-app-01-rudy-disk
+    ['disk', tmp].join(Rudy::DELIM)
+  end
+  drill "can create disk object for root path" do
+    Rudy::Disk.new('/')
+  end
+  
+  dream :name do
+    tmp  = [Rudy::Huxtable.global.zone, Rudy::Huxtable.global.environment]
+    tmp += [Rudy::Huxtable.global.role, '01']
+      # disk-us-east-1b-env_xxxxxx-app-01-any-path
+    ['disk', tmp, 'any', 'path'].join(Rudy::DELIM)
+  end
+  drill "can create disk object for an arbitrary path" do
+    Rudy::Disk.new('/any/path')
+  end
+  
+  dream :size, 1
+  dream :device, '/dev/sdh'
+  dream :path, '/'
+  drill "has a default size and device" do
+    Rudy::Disk.new('/')
+  end
+  
+  dream :path, '/anything'
+  dream :position, '09'
+  drill "can specify a position" do
+    Rudy::Disk.new '09', '/anything' 
+  end
+  
+  drill "save disk metadata", true do
+    Rudy::Disk.new('/any/path').save
+  end
+  
+  drill "knows when an object exists", true do
+    Rudy::Disk.new('/any/path').exists?
+  end
+  
+  drill "knows when an object doesn't exist", false do
+    Rudy::Disk.new('/no/such/disk').exists?
+  end
+  
+  dream :exception, Rudy::Metadata::DuplicateRecord
+  drill "won't save over a disk with the same name" do
+    Rudy::Disk.new('/any/path').save
+  end
+  
+  drill "will save over a disk with the same name if forced", true do
+    Rudy::Disk.new('/any/path').save(:replace)
+  end
+  
+  dream :class, Rudy::Disk
+  drill "get disk metadata" do
+    Rudy::Disks.get '/any/path'
+  end
+  
+  dream :class, Rudy::Disk
+  dream :mounted, false
+  drill "refresh disk metadata" do
+    d = Rudy::Disk.new('/any/path')
+    d.mounted = true
+    d.refresh!
+    d
+  end
+  
+  dream true
+  drill "destroy disk metadata" do
+    d = Rudy::Disk.new('/any/path')
+    d.destroy
+  end
+  
+  xdrill "destroy a domain (#{test_domain})" do
+    Rudy::Metadata.destroy_domain test_domain
+  end
+  
+end
+
+

data/tryouts/30_metadata/51_disk_digest_tryouts.rb

@@ -0,0 +1,24 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+Gibbler.enable_debug if Tryouts.verbose > 3
+  
+tryout "Disk API" 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
+  end
+  
+  dream :class, Gibbler::Digest
+  drill "has gibbler digest" do
+    Rudy::Disk.new('/any/path').gibbler
+  end
+  
+  
+end

data/tryouts/30_metadata/53_disk_list_tryouts.rb

@@ -0,0 +1,35 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+Gibbler.enable_debug if Tryouts.verbose > 3
+  
+tryout "List Disks" 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('/any/path1').save :replace
+    Rudy::Disk.new('/any/path2').save :replace
+  end
+  
+  clean do
+    Rudy::Disk.new('/any/path1').destroy
+    Rudy::Disk.new('/any/path2').destroy
+  end
+  
+  dream :class, Array
+  dream :empty?, false
+  drill "can list available disks" do
+    Rudy::Disks.list
+  end
+  
+  
+end
+
+
+

data/tryouts/30_metadata/56_disk_volume_tryouts.rb

@@ -0,0 +1,68 @@
+group "Metadata"
+library :rudy, 'lib'
+
+tryout "Disk Volume API" do
+  
+  set :test_domain, 'test_' #<< Rudy::Utils.strand(4)
+  set :test_env, 'stage' << 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 :volid, nil
+  drill "disk volid is nil by default" do
+    Rudy::Disk.new '/any/path'
+  end
+  
+  dream :nil?, false
+  dream :class, String
+  drill "create disk instance with volume" do
+    disk = Rudy::Disk.new '/sergeant/disk'
+    disk.create
+    disk.volid
+  end
+  
+  dream :nil?, false
+  drill "refresh disk" do
+    disk = Rudy::Disk.new '/sergeant/disk'
+    disk.refresh!
+    disk.volid
+  end
+  
+  xdrill "can attach volume to instance"
+  xdrill "can mount volume"
+  xdrill "can detach volume from instance"
+  
+  dream [true, false, false]
+  drill "knows about the state of the volume" do
+    disk = Rudy::Disk.new '/sergeant/disk'
+    disk.refresh!
+    [disk.volume_exists?, disk.volume_attached?, disk.volume_in_use?]
+  end
+  
+  dream true
+  drill "destroy disk with volume" do
+    disk = Rudy::Disk.new '/sergeant/disk'
+    disk.refresh!
+    disk.destroy
+  end
+  
+  
+  
+end

data/tryouts/30_metadata/60_backup_tryouts.rb

@@ -0,0 +1,101 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+tryout "Backup 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
+  
+  xdrill "can create test domain", test_domain do
+    Rudy::Metadata.create_domain test_domain
+  end
+  
+  dream :class, Rudy::Backup
+  drill "can create an instance" do
+    Rudy::Backup.new
+  end
+  
+  dream :class, Rudy::Backup
+  dream :name do
+    global = Rudy::Huxtable.global
+    tmp  = [global.zone, global.environment, global.role, '01']
+    tmp += ['20090201', '0000', '00']
+    ['back', tmp].join(Rudy::DELIM) 
+  end
+  drill "can create backup object for root path" do
+    Rudy::Backup.new(1, '/', :created => Time.parse('2009-02-01'))
+  end
+  
+  dream :class, Rudy::Backup
+  dream :name do
+    global = Rudy::Huxtable.global
+    tmp  = [global.zone, global.environment, global.role, '01']
+    tmp += ['any', 'path', '20090201', '0000', '00']
+    ['back', tmp].join(Rudy::DELIM) 
+  end
+  drill "can create backup object for an arbitrary path" do
+    Rudy::Backup.new(1, '/any/path', :created => Time.parse('2009-02-01'))
+  end
+  
+  dream :user, Rudy.sysinfo.user
+  drill "has a default user" do
+    Rudy::Backup.new(1, '/')
+  end
+  
+  dream :class, Time
+  drill "has a default created time" do
+    Rudy::Backup.new(1, '/').created
+  end
+  
+  drill "save metadata", true do
+    Rudy::Backup.new(1, '/any/path', :created => sample_time).save
+  end
+  
+  drill "knows when an object exists", true do
+    Rudy::Backup.new(1, '/any/path', :created => sample_time).exists?
+  end
+  
+  drill "knows when an object doesn't exist", false do
+    Rudy::Backup.new(1, '/no/such/disk', :created => sample_time).exists?
+  end
+  
+  dream :class, Rudy::Disk
+  drill "creates associated disk object" do
+    Rudy::Backup.new(1, '/any/path', :created => sample_time).disk
+  end
+  
+  dream :exception, Rudy::Backups::NoDisk
+  drill "raises exception when disk doesn't exist" do
+    Rudy::Backup.new(1, '/no/such/disk').create
+  end
+  
+  drill "destroy all backups", false do
+    Rudy::Backups.list.each { |b| b.destroy }
+    Rudy::Backups.any?
+  end
+  
+  xdrill "destroy a domain (#{test_domain})", true do
+    Rudy::Metadata.destroy_domain test_domain
+  end
+end

data/tryouts/30_metadata/63_backup_list_tryouts.rb

@@ -0,0 +1,38 @@
+
+group "Metadata"
+library :rudy, 'lib'
+
+Gibbler.enable_debug if Tryouts.verbose > 3
+  
+tryout "List Backups" do
+  
+  set :sample_time, Time.now.utc
+  
+  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::Backup.new(1, '/any/path1', :created => sample_time).save :replace
+    Rudy::Backup.new(2, '/any/path2', :created => sample_time).save :replace
+  end
+  
+  clean do
+    Rudy::Backup.new(1, '/any/path1', :created => sample_time).destroy
+    Rudy::Backup.new(2, '/any/path2', :created => sample_time).destroy
+  end
+  
+  dream :class, Array
+  dream :empty?, false
+  dream :size, 2
+  drill "can list available backups" do
+    Rudy::Backups.list
+  end
+  
+  
+end
+
+
+