spectools 1.0.0

data/test/test_vnmsh.rb

@@ -0,0 +1,1537 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require 'tmpdir.rb'
+require 'fileutils'
+require 'vnmsh'
+
+module VNMSHTestHelpers
+
+  def tmp_specroot 
+	return Dir.tmpdir + '/test_spectools'
+  end
+
+  def create_temp_vnmsh(filelist)
+	Dir.mkdir(tmp_specroot) unless File.exists?(tmp_specroot)
+	Dir.mkdir(tmp_specroot + '/vnmsh') unless File.exists?(tmp_specroot + '/vnmsh')
+	copy_command(filelist[:showcmd], 'show')
+	copy_command(filelist[:ackcmd], 'ack')
+	copy_command(filelist[:connectcmd], 'connect')
+	copy_command(filelist[:createcmd], 'create')
+	copy_command(filelist[:destroycmd], 'destroy')
+	copy_command(filelist[:disconnectcmd], 'disconnect')
+	copy_command(filelist[:seekcmd], 'seek')
+	copy_command(filelist[:updatecmd], 'update')
+  end
+  def destroy_temp_vnmsh
+	Dir.glob(tmp_specroot + '/vnmsh/*').each { |file| File.delete(file) }
+	Dir.delete(tmp_specroot + '/vnmsh/')
+  end
+
+  def copy_command(src, dest)
+		FileUtils.copy(FileUtils.pwd + '/test/testcmds/' + src, tmp_specroot + '/vnmsh/' + dest) unless src == 'bogus'
+  end
+
+  def basecmds
+	return	{   :showcmd => 'show',
+			:ackcmd => 'ack',
+			:connectcmd => 'connect',
+			:createcmd => 'create',
+			:destroycmd => 'destroy',
+			:seekcmd => 'seek',
+			:updatecmd => 'update',
+			:disconnectcmd => 'disconnect'
+	}
+   end
+end
+
+
+class BasicVNMSHTests < Test::Unit::TestCase
+	include VNMSHTestHelpers
+
+  def setup
+
+	
+	@specroot = Dir.pwd + '/test'
+	ENV['TESTDATA'] = Dir.pwd + '/test/data/'
+	
+
+  end
+
+
+
+
+
+  def test_init_vnmsh
+	create_temp_vnmsh(basecmds)
+	ENV['SPECROOT'] = tmp_specroot
+	session = VNMSH.new
+	assert_not_nil session.session_id
+	destroy_temp_vnmsh
+	assert_equal 3, session.reconnect_retries
+  end
+
+  def test_init_vnmsh_args
+	session = VNMSH.new(@specroot)
+	assert_not_nil session.session_id
+	session.reconnect_retries = 50
+	assert_equal 50, session.reconnect_retries
+	assert_raise VNMSH::EnvironmentError do
+		VNMSH.new("bogus")
+	end
+	basecmds.keys.each do |cmd|
+		cmdlist = basecmds.clone
+		cmdlist[cmd] = 'bogus'
+		create_temp_vnmsh(cmdlist)
+		assert_raise VNMSH::EnvironmentError do
+			VNMSH.new(tmp_specroot)
+		end
+		destroy_temp_vnmsh
+	end
+  end
+
+  def test_vnmsh_default_session
+	create_temp_vnmsh(basecmds)
+	session = VNMSH.new(tmp_specroot)
+	assert_nil VNMSH.default_session
+	VNMSH.default_session = session
+	assert_same session, VNMSH.default_session
+	destroy_temp_vnmsh
+  end
+end
+
+class VNMSHConnectionTests < Test::Unit::TestCase
+
+  include VNMSHTestHelpers
+
+  def setup
+	create_temp_vnmsh(basecmds)
+	@session = VNMSH.new(tmp_specroot)
+  end
+
+  def teardown
+	destroy_temp_vnmsh
+  end
+
+  def test_vnmsh_connect
+	landscape = @session.connect
+	assert_instance_of SpecTools::Landscape, landscape
+  end
+
+  def test_vnmsh_connect_args
+	landscape = @session.connect("testhost")
+  	assert_instance_of SpecTools::Landscape, landscape
+	assert_equal 'testhost', landscape.ss
+	assert_equal '0x400000', landscape.handle
+	assert_same landscape, @session.current_landscape
+	landscape = @session.connect("connected")
+  	assert_instance_of SpecTools::Landscape, landscape
+	assert_equal 'testhost', landscape.ss
+	assert_equal '0x400000', landscape.handle
+	
+	(0..7).each do |i|
+		assert_raise VNMSH::ConnectError do
+			@session.connect("error" + i.to_s)
+		end
+	end
+  end
+
+  def test_vnmsh_disconnect
+	assert_equal false, @session.connected?
+	@session.connect
+	assert_equal true, @session.connected?
+	assert_nothing_raised do
+		@session.disconnect
+	end
+	assert_equal false, @session.connected?
+  end
+
+  def test_vnmsh_exec_cmd
+	assert_raise VNMSH::NotConnectedError do
+		@session.exec_cmd('show test')
+	end
+	@session.connect
+	assert_nothing_raised do
+		output = @session.exec_cmd('show test')
+		assert_equal 'Test Succeeded', output.readline.chomp
+	end
+	assert_nothing_raised do
+		output = @session.exec_cmd('show reconnect')
+		assert_equal 'Test Succeeded', output.readline.chomp
+	end
+	assert_raise VNMSH::NotConnectedError do
+		output = @session.exec_cmd('show noreconnect')
+	end
+  end
+end
+
+class VNMSHCommandTests < Test::Unit::TestCase
+
+  include VNMSHTestHelpers
+
+	
+  def setup
+	SpecTools::Config.default_access_method = :cli
+	@orig_default_access_method = SpecTools::Config.default_access_method
+	create_temp_vnmsh(basecmds)
+	@session = VNMSH.new(tmp_specroot)
+	@session.connect
+  end
+
+  def test_vnmsh_show_alarms
+	assert_nothing_raised do
+		assert_not_nil alarms = @session.show_alarms(:standard)
+	end
+	assert_nothing_raised do
+		maintalarms = 0
+		assert_instance_of StringIO, alarms = @session.show_alarms(:all)
+		alarms.each do |alarm|
+			if alarm =~ /MAINT/
+				maintalarms = maintalarms + 1
+			end
+		end
+		#assert(maintalarms > 0)
+	end
+	assert_nothing_raised do
+		noresponses = 0
+		assert_not_nil alarms = @session.show_alarms(:standard,nil,:probcause)
+		alarms.each do |alarm|
+			if alarm =~ /RESPONDING TO/
+				noresponses = noresponses + 1
+			end
+		end
+		assert(noresponses > 0)
+	end
+	assert_nothing_raised do
+		assert_not_nil alarms = @session.show_alarms(:model,'0x400005c7')
+		#assert_match( /0x400005c7/, alarms.readline )
+	end
+	
+	assert_nothing_raised do
+		assert_not_nil alarms = @session.show_alarms(:landscape,'0x400000')
+		assert_not_nil alarms.readline
+	end
+
+	assert_raise ArgumentError do
+		@session.show_alarms(:model,'bogus')
+	end
+	
+	assert_raise ArgumentError do
+		@session.show_alarms(:landscape,'bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_models
+	assert_nothing_raised do 
+		assert_not_nil @session.show_models
+	end
+	assert_nothing_raised do
+		assert_not_nil models = @session.show_models({:landscape,'0x400000'})
+		assert_match(/0x40000025/, models.readline)
+	end
+	assert_nothing_raised do
+		assert_not_nil models = @session.show_models({:type,'0x13d0018'})
+		assert_match(/0x13d0018/,models.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil models = @session.show_models({:name,'DTM'})
+		assert_match(/0x40000178/, models.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil models = @session.show_models({:range,'0x40000000-0x40000010'})
+		assert_match(/0x40000003/,models.readline)
+		assert_match(/0x4000000d/,models.readline)
+	end
+	
+	assert_nothing_raised do
+		assert_not_nil models = @session.show_models({:range,['0x40000000','0x40000010']})
+		assert_match(/0x40000003/,models.readline)
+		assert_match(/0x4000000d/,models.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_models({:mtype,'bogus'})
+	end
+	
+	assert_raise ArgumentError do
+		@session.show_models({:landscape,'bogus'})
+	end
+	
+  end
+
+  def test_vnmsh_seek
+	  assert_nothing_raised do
+		  assert_not_nil models = @session.seek('0x1006e','intspeclab01')
+		  assert_match(/0x408cac/,models.readline)
+	  end
+
+	  specattr = SpecTools::Attr.new
+	  specattr.id = '0x1006e'
+	  specattr.value = 'intspeclab01'
+	  assert_nothing_raised do
+		  assert_not_nil models = @session.seek(specattr,nil,true)
+		  assert_match(/0x408cb8/,models.readline)
+	  end
+
+	  assert_nothing_raised do 
+		  assert_not_nil models = @session.seek(specattr,nil,true,true)
+		  assert_match(/0x408cb8/,models.readline)
+	  end
+
+	  assert_raise ArgumentError do
+		  @session.seek('bogus')
+	  end
+
+  end
+
+
+  def test_vnmsh_show_devices
+
+	assert_nothing_raised do
+		assert_not_nil @session.show_devices
+	end
+
+	assert_nothing_raised do
+		assert_not_nil @session.show_devices('0x400000')
+	end
+
+	
+	assert_raise ArgumentError do
+		@session.show_devices('bogus')
+	end
+	
+  end
+
+  def test_vnmsh_show_types
+
+	assert_nothing_raised do
+		assert_not_nil @session.show_types
+	end
+	assert_nothing_raised do
+		assert_not_nil @session.show_types({:landscape, '0x400000'})
+	end
+	assert_nothing_raised do
+		assert_not_nil @session.show_types({:flag,'D'})
+	end
+	assert_nothing_raised do
+		assert_not_nil types = @session.show_types({:range,'0x13d0000-0x13d00ff'})
+		assert_match(/0x13d0005/, types.readline)
+		assert_match(/0x13d0008/, types.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil types = @session.show_types({:range,['0x13d0000','0x13d00ff']})
+		assert_match(/0x13d0005/, types.readline)
+		assert_match(/0x13d0008/, types.readline)
+	end
+
+
+	assert_nothing_raised do
+		assert_not_nil types = @session.show_types({:name,'IcsLicenseMgr'})
+		assert_match(/0x1ad0002/, types.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_types({:landscape,'bogus'})
+	end
+
+	assert_raise ArgumentError do
+		@session.show_types({:bogus,'bogus'})
+	end
+
+  end
+		
+  def test_vnmsh_show_relations	
+
+	assert_nothing_raised do
+		assert_not_nil @session.show_relations
+	end
+
+	assert_nothing_raised do
+		assert_not_nil @session.show_relations('0x400000')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_relations('bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_associations
+
+	assert_nothing_raised do
+		assert_not_nil associations = @session.show_associations('mh=0x400005c7')
+		assert_match(/^0x400005c7/, associations.readline)
+		assert_match(/^0x400005c7/,associations.readline)
+	end
+	assert_raise ArgumentError do
+		@session.show_associations
+	end
+	assert_raise VNMSH::CommandError do
+		@session.show_associations("mh=bogus")
+	end
+  end
+
+  def test_vnmsh_show_parents
+
+	assert_nothing_raised do
+		assert_not_nil parents = @session.show_parents('0x4000004b')
+		assert_match(/0x40000042/, parents.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil parents = @session.show_parents('0x4000004b','Collects')
+		assert_match(/0x40000042/, parents.readline)
+
+	end
+
+	assert_raise VNMSH::CommandError do
+		@session.show_parents('0x400007','bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_parents('bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_children
+
+	assert_nothing_raised do
+		assert_not_nil children = @session.show_children('0x400005cb')
+		assert_match(/0x40000cc0/, children.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil children = @session.show_children('0x400005cb','PossPrimApp')
+		assert_match(/0x400005d8/, children.readline)
+	end
+
+	assert_raise VNMSH::CommandError do
+		@session.show_children('0x400000','bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_children('bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_events
+
+	assert_nothing_raised do
+		assert_not_nil events = @session.show_events
+	end
+
+	assert_nothing_raised do
+		assert_not_nil events = @session.show_events(:model,'0x400000')
+		assert_match(/09\/21\/2007/, events.readline)
+	end
+
+	assert_nothing_raised do
+		eventcount = 0
+		assert_not_nil events = @session.show_events(:landscape,'0x400000')
+		events.each do 
+			eventcount = eventcount + 1
+		end
+		assert_equal 2000, eventcount
+	end
+
+	assert_nothing_raised do
+		eventcount = 0
+		assert_not_nil events = @session.show_events(:model,'0x400000',:all)
+		events.each do
+			eventcount = eventcount + 1
+		end
+		assert_equal 10000, eventcount
+	end
+
+	assert_nothing_raised do
+		noresponses = 0
+		assert_not_nil events = @session.show_events(:model,'0x400000',nil,true)
+                events.each do |event|
+                        if event =~ /SpectroSERVER has disconnected/
+                                noresponses = noresponses + 1
+                        end
+                end
+                assert(noresponses > 0)
+	end
+
+	assert_nothing_raised do
+		eventcount = 0
+		assert_not_nil events = @session.show_events(:model,'0x400000',5)
+		events.each do
+			eventcount = eventcount + 1
+		end
+		assert_equal 5, eventcount
+	end
+
+	assert_raise ArgumentError do
+		@session.show_events(:model,'bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_events(:landscape,'bogus')
+	end
+	
+  end	
+
+  def test_vnmsh_show_inheritence
+	
+	assert_nothing_raised do
+		assert_not_nil types = @session.show_inheritance('0x13d000d')
+		assert_match(/0x102dd/, types.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil types = @session.show_inheritance('0x13d000d', '0x400000')
+		assert_match(/0x102dd/, types.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_inheritance
+	end
+
+	assert_raise ArgumentError do
+		@session.show_inheritance('bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_inheritance('0x13d000d', 'bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_rules
+
+	assert_nothing_raised do
+		assert_not_nil rules = @session.show_rules('Collects')
+		assert_match(/0x3f50001/, rules.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil rules = @session.show_rules('Collects', '0x400000')
+		assert_match(/0x3f50001/, rules.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_rules
+	end
+
+	assert_raise VNMSH::CommandError do
+		@session.show_rules('bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_rules('Collects','bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_enumerations
+
+	assert_nothing_raised do
+		assert_not_nil enumerations = @session.show_enumerations
+		assert_match(/0x10004/, enumerations.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil enumerations = @session.show_enumerations(:landscape,'0x400000')
+		assert_match(/0x10004/, enumerations.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil enumerations = @session.show_enumerations(:attr,'0x13d031e')
+		assert_match(/0x13d031e/, enumerations.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil enumerations = @session.show_enumerations(:mtype,'0x13d0018')
+		assert_match(/0x10004/, enumerations.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_enumerations(:mtype,'bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_enumerations(:mtype,'bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_enumerations(:landscape,'bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_watch
+
+	assert_nothing_raised do
+		assert_not_nil watches = @session.show_watch('0x4000004b')
+		assert_match(/0x13d0190/, watches.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_watch('bogus')
+	end
+
+  end
+
+  def test_vnmsh_show_landscapes
+
+	assert_nothing_raised do
+		assert_not_nil landscapes = @session.show_landscapes
+		assert_match(/0x50000000/, landscapes.readline)
+	end
+  end
+	
+
+
+  def test_vnmsh_show_attributes
+
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7')
+		assert_match(/0x10000/, attrs.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:id,'0x10030'})
+		assert_match(/0x10030/, attrs.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:instance,['0x12a53','192.2.20.2']})
+		assert_match(/0x12a53/, attrs.readline)
+	end
+
+	specattr = Attr.new('0x12a53',nil,'192.2.20.2')
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:instance,[specattr,'192.2.20.2']})
+		assert_match(/0x12a53/, attrs.readline)
+	end
+
+
+	#assert_nothing_raised do
+	#	assert_not_nil attrs = @session.show_attributes('mth=0x13d0018','attrname=MAC_Address')
+	#	assert_match(/0x110df/, attrs.readline)
+	#end
+	
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:name,'Condition'})
+		assert_match(/0x1000a/, attrs.readline)
+	end
+		
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:range,'0x10000-0x10010'})
+		assert_match(/Modeltype_Name/, attrs.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x400005c7',{:range,['0x10000','0x10010']})
+		assert_match(/Modeltype_Name/, attrs.readline)
+	end
+		
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:model,'0x4000017b',{:id,'0x13d0315'},true)
+		assert_match(/0x13d0315/, attrs.readline)
+	end
+	
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:mtype,'0x13d0018',{:flag,'O'})
+		assert_match(/0x10009/, attrs.readline)
+	end
+
+	assert_nothing_raised do
+		assert_not_nil attrs = @session.show_attributes(:mtype,'0x13d0018')
+		assert_match(/0x10000/, attrs.readline)
+	end
+
+	assert_raise ArgumentError do
+		@session.show_attributes(:model,'bogus')
+	end
+		
+	assert_raise ArgumentError do
+		@session.show_attributes(:mtype,'bogus')
+	end
+
+	assert_raise ArgumentError do
+		@session.show_attributes(:model,'0x400005c7',{:id,'bogus'})
+	end
+		
+	assert_raise VNMSH::CommandError do
+		@session.show_attributes(:model,'0x400005c7',{:instance,['0x1000a','12345']})
+	end
+	
+	assert_raise ArgumentError do
+		@session.show_attributes(:model,'0x400005c7',{:instance,['0x12bfa','bogus']})
+	end
+	
+	assert_raise ArgumentError do
+		@session.show_attributes(:mtype,'0x13d0018',{:landscape,'bogus'})
+	end
+  end
+
+  def test_vnmsh_destroy_model
+	  assert_nothing_raised do
+		  assert @session.destroy_model('0x40b42b')
+	  end
+
+	  assert_raise ArgumentError do
+		  @session.destroy_model('bogus')
+	  end
+  end
+
+  def test_vnmsh_destroy_association
+	  assert_nothing_raised do
+		  assert @session.destroy_association('Connects_to','0x4065e8','0x40b63e')
+	  end
+
+	  assert_raise VNMSH::CommandError do
+		  @session.destroy_association('bogus','0x4065e8','0x40b63e')
+	  end
+  end
+
+  def test_vnmsh_destroy_alarm
+	  assert_nothing_raised do
+		  assert @session.destroy_alarm('7888881','0x4000000')
+	  end
+
+	  assert_raise ArgumentError do
+		  @session.destroy_alarm('bogus')
+	  end
+  end
+
+  def test_vnmsh_discover_device
+	  assert_nothing_raised do 
+		  assert model = @session.discover_device('192.168.1.1','public')
+		  assert_equal '0x40b8cf', model.handle
+	  end
+  end
+
+  def test_model_discover
+	  VNMSH.default_session = @session
+	  assert_nothing_raised do
+		  assert model = Model.discover('192.168.1.1','public')
+		  assert_equal '0x40b8cf', model.handle
+	  end
+  end
+
+  def test_vnmsh_create_model
+	 mtype = MType.new('0x3dc0001')
+	 newattrs = []
+	 newattrs.push Attr.new('0xfffff','test1','','testval1')
+	 newattrs.push Attr.new('0x4ffff','test2','','testval2')
+
+         assert_raise ArgumentError do
+		 model = @session.create_model('bogus',Attr.new('test','testval'))
+	 end
+
+	 assert_raise ArgumentError do
+		 model = @session.create_model('0x3dc0001','bogus')
+	 end
+
+	 assert_nothing_raised do
+		  assert model = @session.create_model('0x3dc0001',newattrs)
+		  assert_equal '0x40b95a', model.handle
+		  assert_equal newattrs, model.attrs
+		  assert_equal '0x3dc0001', model.type.handle
+	 end
+
+	 assert_nothing_raised do
+		  assert model = @session.create_model(mtype,newattrs)
+		  assert_equal '0x40b95a', model.handle
+		  assert_equal newattrs, model.attrs
+		  assert_equal '0x3dc0001', model.type.handle
+	 end
+  end
+
+  def test_create_model
+	 VNMSH.default_session = @session
+	 newattrs = []
+	 newattrs.push Attr.new('0xfffff','test1','','testval1')
+	 newattrs.push Attr.new('0x4ffff','test2','','testval2')
+	 mtype = MType.new('0x3dc0001')
+	 assert_nothing_raised do
+		 assert model = Model.create('0x3dc0001',newattrs)
+		 assert_equal '0x40b95a', model.handle
+		 assert_equal newattrs, model.attrs
+	 end
+	 assert_nothing_raised do
+		 assert model = Model.create(mtype,newattrs)
+		 assert_equal '0x40b95a', model.handle
+		 assert_equal newattrs, model.attrs
+		  assert_equal '0x3dc0001', model.type.handle
+	 end
+	 assert_nothing_raised do
+		 assert model = mtype.create_model(newattrs)
+		 assert_equal '0x40b95a', model.handle
+		 assert_equal newattrs, model.attrs
+		 assert_equal '0x3dc0001', model.type.handle
+	 end
+		 
+  end
+
+
+
+  def test_vnmsh_update_model
+	  newattrs = []
+	  newattrs.push Attr.new('0x12c06','SshPortNum','222')
+	  newattrs.push Attr.new('0x1006e','Model_Name','NewModel')
+
+	  assert_raise ArgumentError do
+		  @session.update_model('bogus',Attr.new('test','testname'))
+	  end
+
+	  assert_raise ArgumentError do
+		  @session.update_model('0x40b737','bogus')
+	  end
+
+	  assert_nothing_raised do
+		  assert attrs = @session.update_model('0x40b737',newattrs)
+	  end
+
+	  assert_nothing_raised do
+		  assert attrs = @session.update_model(Model.new('0x40b737'),newattrs)
+	  end
+  end
+
+  def test_model_save_attrs
+	  newattrs = []
+	  newattrs.push Attr.new('0x12c06','SshPortNum','222')
+	  newattrs.push Attr.new('0x1006e','Model_Name','NewModel')
+	  model = Model.new('0x40b737')
+	  assert_nothing_raised do
+		  assert model.update_attrs(newattrs)
+	  end
+	  assert_nothing_raised do
+		  assert model.update_attrs(newattrs,true)
+		  newattrs.each do |specattr|
+			  assert_equal specattr, model.attrs[specattr.id]
+		  end
+	  end
+  end
+
+
+
+  def test_vnmsh_update_alarm
+	  alarminfo = Hash.new
+	  alarminfo[:ticket] = '12345'
+	  alarminfo[:assign] = 'dpantke'
+	  alarminfo[:status] = 'Test'
+	  alarminfo[:ack] = true
+	  alarminfo[:url] = 'http://www.appriss.com'
+	  assert_nothing_raised do 
+		  assert @session.update_alarm('3699400',alarminfo)
+	  end
+	  assert_nothing_raised do
+		  assert @session.update_alarm(Alarm.new('3699400'),:status,'Test2',true)
+	  end
+	  assert_raise ArgumentError do
+		  @session.update_alarm('3699400',:bogus,'test')
+	  end
+	  assert_raise ArgumentError do
+		  @session.update_alarm('3699400',:status)
+	  end
+	  alarminfo[:bogus] = 'bogus'
+	  assert_raise ArgumentError do
+		  @session.update_alarm('3699400',alarminfo)
+	  end
+  end
+
+  def test_save_alarm
+	  VNMSH.default_session = @session
+	  alarm = Alarm.new('3699400')
+	  alarm.assignment = 'dpantke'
+	  alarm.status = 'Test'
+	  alarm.ack = true
+	  alarm.url = "http://www.test.com"
+	  alarm.ticket = 'ticket12345'
+	  assert_nothing_raised do
+		  assert alarm.save
+	  end
+	 
+  end
+
+  def test_vnmsh_create_association
+	assert_nothing_raised do
+		assert assoc = @session.create_association('Collects','0x40b736','0x40b7d3')
+		assert_instance_of SpecTools::Association, assoc
+	end
+
+	left_model = Model.new
+	right_model = Model.new
+	left_model.handle = '0x40b736'
+	right_model.handle = '0x40b7d3'
+	rel = Relation.new('Collects')
+	assert_nothing_raised do
+		assert  assoc = @session.create_association(rel,left_model,right_model)
+		assert_instance_of SpecTools::Association, assoc
+	end
+  end
+
+  def test_associate
+	  VNMSH.default_session = @session
+	  left_model = Model.new('0x40b736')
+	  right_model = Model.new('0x40b7d3')
+	  rel = Relation.new('Collects')
+	  assert_nothing_raised do
+		  assert assoc = left_model.associate(:left,right_model,rel)
+		  assert_instance_of SpecTools::Association, assoc
+		  assoc = nil
+		  assert assoc = right_model.associate(:right,left_model,rel)
+		  assert_instance_of SpecTools::Association, assoc
+		  assoc = nil
+		  assert assoc = Association.create(rel,left_model,right_model)
+		  assert_instance_of SpecTools::Association, assoc
+		  assoc = nil
+		  assert assoc = rel.associate(left_model,right_model)
+		  assert_instance_of SpecTools::Association, assoc
+	  end
+	  assert_raise ArgumentError do
+	  	  left_model = Model.new('0x40b736')
+	  	  right_model = Model.new('0x40b7d3')
+		  rel = Relation.new('Collects')
+		  left_model.associate(:bogus,right_model,rel)
+	  end
+		  	
+  end
+		  
+
+
+
+  def test_vnmsh_create_alarm
+	  assert_nothing_raised do
+		  assert alarm = @session.create_alarm('CRITICAL','0x48fffc5','0x40b7d3')
+		  assert_instance_of SpecTools::Alarm, alarm
+	  end
+
+	  srcalarm = Alarm.new
+	  srcalarm.causeid = '0x48fffc5'
+	  model = Model.new('0x40b7d3')
+
+	  assert_nothing_raised do
+		  assert alarm = @session.create_alarm('CRITICAL',srcalarm,model,true)
+		  assert_instance_of SpecTools::Alarm, alarm
+	  end
+
+	  assert_raise ArgumentError do
+		  @session.create_alarm('bogus',srcalarm,model)
+	  end
+  end
+
+  def test_vnmsh_create_event
+	  assert_nothing_raised do
+		  assert @session.create_event('0x40b737','0x04f0fff7','Test Event')
+	  end
+
+	  assert_nothing_raised do
+		  assert @session.create_event(Model.new('0x40b737'),Event.new(nil,'0x04f0fff7',Model.new,'Test Event'))
+	  end
+  end 
+	  
+
+  def test_mtype_parse
+	types_output = @session.show_types
+	mtype = SpecTools::MType.parse(types_output.readline)
+	assert_instance_of SpecTools::MType, mtype
+	assert_equal '0x10000', mtype.handle
+	assert_equal 'Root', mtype.name
+	assert_equal true, mtype.visible
+	assert_equal true, mtype.derivable
+  end
+
+  def test_association_parse
+	assoc_output = @session.show_associations('mh=0x400005c7')
+	association = SpecTools::Association.parse(assoc_output.readline)
+	assert_instance_of SpecTools::Association, association
+	assert_equal '0x400005c7', association.left_model.handle
+	assert_equal 'Ped20-BD6808i', association.left_model.name
+	assert_equal 'Contains', association.relation.name
+	assert_equal '0x40000c68', association.right_model.handle
+	assert_equal 'ExtrMod', association.right_model.name
+  end
+
+  def test_association_parse_child
+
+	assoc_output = @session.show_children('0x400005cb')
+	association = SpecTools::Association.parse_child(assoc_output.readline)
+	assert_equal '0x40000cc0', association.right_model.handle
+	assert_equal '0.20.E0-66.93.87', association.right_model.name
+	assert_equal '0x102c8', association.right_model.type.handle
+	assert_equal 'Physical_Addr', association.right_model.type.name
+	assert_equal 'Collects', association.relation.name
+
+  end	
+
+  def test_attribute_parse_mh
+
+	attr_output = @session.show_attributes(:model,'0x400005c7',{:instance,['0x12a53','192.2.20.2']})
+	specattr = SpecTools::Attr.parse_mh(attr_output.readline)
+	assert_instance_of SpecTools::Attr, specattr
+	assert_equal '0x12a53', specattr.id
+	assert_equal 'deviceIPAddressList', specattr.name
+	assert_equal specattr.value_table['192.2.20.2'], '20030'
+
+	attr_output = @session.show_attributes(:model,'0x400005c7')
+	specattr = SpecTools::Attr.parse_mh(attr_output.readline)
+	assert_instance_of SpecTools::Attr, specattr
+	assert_equal '0x10000', specattr.id
+	assert_equal 'Modeltype_Name', specattr.name
+	assert_equal 'ExtrDevice', specattr.value
+	
+  end
+
+  def test_attribute_parse_mth
+
+	attr_output = @session.show_attributes(:mtype,'0x13d0018')
+	specattr = SpecTools::Attr.parse_mth(attr_output.readline)
+	assert_instance_of SpecTools::Attr, specattr
+	assert_equal '0x10000', specattr.id
+	assert_equal 'Modeltype_Name', specattr.name
+	assert_equal 'Text String', specattr.type
+	assert_equal true, specattr.readable
+	assert_equal true, specattr.shared
+	assert_equal true, specattr.memory
+
+  end
+
+  def test_event_parse
+
+	event_output = @session.show_events
+	event = SpecTools::Event.parse(event_output.readline)
+	assert_instance_of SpecTools::Event, event
+	assert_equal Time.local(2007,9,21,11,15,43), event.time
+	assert_equal '0x10105', event.type
+	assert_equal '0x40000030', event.model.handle
+	assert_equal 'kloeber', event.model.name
+	assert_equal 'User', event.model.type.name
+	
+  end
+
+  def test_mtype_parse_inheritance
+
+	mtype_output = @session.show_inheritance('0x13d000d')
+	mtype = SpecTools::MType.parse_inheritance(mtype_output.readline)
+	assert_instance_of SpecTools::MType, mtype
+	assert_equal '0x102dd', mtype.handle
+	assert_equal 'ModelFragment', mtype.name
+	assert_equal true, mtype.visible
+	assert_equal true, mtype.derivable
+	assert_equal 'Base', mtype.inheritance
+
+  end
+
+  def test_landscape_parse
+
+	lscape_output = @session.show_landscapes
+	landscape = SpecTools::Landscape.parse(lscape_output.readline)
+	assert_instance_of SpecTools::Landscape, landscape
+	assert_equal 'S81-2', landscape.ss
+	assert_equal '10', landscape.precedence
+	assert_equal '0xbeef', landscape.port
+	assert_equal '0x10101', landscape.service
+	assert_equal '0x50000000', landscape.handle
+
+  end
+
+  def test_model_parse
+
+	model_output = @session.show_models
+	model = SpecTools::Model.parse(model_output.readline)
+	assert_instance_of SpecTools::Model, model
+	assert_equal '0x40000025', model.handle
+	assert_equal 'MgmtInventory', model.name
+	assert_equal '0x25e0000', model.type.handle
+	assert_equal 'MgmtInventory', model.type.name
+
+  end
+
+  def test_association_parse_parent
+
+	assoc_output = @session.show_parents('0x4000004b')
+	assoc = SpecTools::Association.parse_parent(assoc_output.readline)
+	assert_instance_of SpecTools::Association, assoc
+	assert_equal '0x40000042', assoc.left_model.handle
+	assert_equal 'TopService', assoc.left_model.name
+	assert_equal '0x13d0019', assoc.left_model.type.handle
+	assert_equal 'Top_Service', assoc.left_model.type.name
+	assert_equal 'Requires', assoc.relation.name
+
+  end
+
+  def test_relation_parse
+
+	rel_output = @session.show_relations
+	rel = SpecTools::Relation.parse(rel_output.readline)
+	assert_instance_of SpecTools::Relation, rel
+	assert_equal 'Contains', rel.name
+	assert_equal 'ONE_TO_MANY', rel.type
+
+  end
+
+  def test_rule_parse
+
+	rules_output = @session.show_rules('Collects')
+	rule = SpecTools::Rule.parse(rules_output.readline)
+	assert_instance_of SpecTools::Rule, rule
+	assert_equal '0x3f50001', rule.left_mtype.handle 
+	assert_equal 'BbSrvContainer', rule.left_mtype.name
+	assert_equal '0x3f50001', rule.right_mtype.handle
+	assert_equal 'BbSrvContainer', rule.right_mtype.name
+
+  end
+
+  def test_watch_parse
+
+	watch_output = @session.show_watch('0x4000004b')
+	watch = SpecTools::Watch.parse(watch_output.readline)
+	assert_instance_of SpecTools::Watch, watch
+	assert_equal '0x13d0190', watch.id
+	assert_equal 'TotalRedTime', watch.name
+	assert_equal 'PollLog/Calc', watch.type
+	assert_equal 'ACTIVE', watch.status
+
+  end
+
+  def test_alarm_parse
+
+	alarm_output = @session.show_alarms
+	alarm = SpecTools::Alarm.parse(alarm_output.readline)
+	assert_instance_of SpecTools::Alarm, alarm
+	assert_equal '98', alarm.id
+	assert_equal Time.local(2007,9,20,17,19,13), alarm.time
+	assert_equal '0x13df00c', alarm.causeid
+	assert_equal '0x40000175', alarm.model.handle
+	assert_equal 'Gold SLA', alarm.model.name
+	assert_equal 'SLA', alarm.model.type.name
+	assert_equal 'CRITICAL', alarm.severity
+	assert_equal false, alarm.ack
+	assert_equal false, alarm.stale
+
+  end
+
+  def test_model_cli_find_all
+	VNMSH.default_session = @session
+	
+	models = SpecTools::Model.cli_find
+	assert_equal 2251, models.size
+	assert_equal '0x40000028', models[1].handle
+	assert_equal 'Modeling Gateway', models[1].name
+	assert_equal '0x4040000', models[1].type.handle
+	assert_equal 'ModelingGatewy', models[1].type.name
+
+	assert_equal '0x40001240', models.last.handle
+	assert_equal '802.3_Segment', models.last.name
+	assert_equal '0x100ae', models.last.type.handle
+	assert_equal 'Fanout', models.last.type.name
+	
+	VNMSH.default_session = nil
+	models = nil
+	assert_raise ArgumentError do
+		SpecTools::Model.cli_find
+	end
+	models = SpecTools::Model.cli_find(nil,nil,@session)
+	assert_equal 2251, models.size
+
+
+  end
+
+  def test_type_cli_find_all
+	VNMSH.default_session = @session
+	
+	mtypes = SpecTools::MType.cli_find
+	assert_equal 4209, mtypes.size
+	assert_equal '0x10001', mtypes[1].handle
+	assert_equal 'CabletronFrags', mtypes[1].name
+	assert_equal true, mtypes[1].visible
+	assert_equal true, mtypes[1].derivable
+
+	assert_equal '0xfff00001', mtypes.last.handle
+	assert_equal 'IBUS-MIB', mtypes.last.name
+	assert_equal true, mtypes.last.visible
+	assert_equal true, mtypes.last.derivable
+	
+	VNMSH.default_session = nil
+	mtypes = nil
+	assert_raise ArgumentError do
+		SpecTools::MType.cli_find
+	end
+	mtypes = SpecTools::MType.cli_find(nil,@session)
+	assert_equal 4209, mtypes.size
+
+  end
+
+  def test_alarm_cli_find
+	VNMSH.default_session = @session
+
+	alarms = SpecTools::Alarm.cli_find
+	assert_equal 9, alarms.size
+	assert_equal '89', alarms[1].id
+	assert_equal Time.local(2007,9,20,17,19,13), alarms[1].time
+	assert_equal '0x13df00d', alarms[1].causeid
+	assert_equal '0x40000175', alarms[1].model.handle
+	assert_equal 'Gold SLA', alarms[1].model.name
+	assert_equal 'SLA', alarms[1].model.type.name
+	assert_equal 'CRITICAL', alarms[1].severity
+	
+	assert_equal '3784', alarms.last.id
+	assert_equal Time.local(2007,9,20,18,30,37), alarms.last.time
+	assert_equal '0x10519', alarms.last.causeid
+	assert_equal '0x400005ca', alarms.last.model.handle
+	assert_equal 'ped90-a3804', alarms.last.model.name
+	assert_equal 'ExtrDevice', alarms.last.model.type.name
+	assert_equal 'MINOR', alarms.last.severity
+
+	VNMSH.default_session = nil
+	alarms = nil
+	assert_raise ArgumentError do
+		SpecTools::Alarm.cli_find(:all)
+	end
+	assert_equal 10, SpecTools::Alarm.cli_find(:all,nil,nil,@session).size
+  end
+
+  def test_event_cli_find_all
+	VNMSH.default_session = @session
+
+	events = SpecTools::Event.cli_find
+	assert_equal 2000, events.size
+	assert_equal Time.local(2007,9,21,11,15,41), events[1].time
+	assert_equal '0x10103', events[1].type
+	assert_equal '0x40000030', events[1].model.handle
+	assert_equal 'kloeber', events[1].model.name
+	assert_equal 'User', events[1].model.type.name
+
+	assert_equal Time.local(2007,9,20,18,51,20), events.last.time
+
+	VNMSH.default_session = nil
+	events = nil
+	assert_raise ArgumentError do
+		SpecTools::Event.cli_find(:all)
+	end
+	events = SpecTools::Event.cli_find(:all,nil,nil,nil,@session)
+	assert_equal 2000,events.size
+
+  end
+
+  def test_landscape_cli_find_all
+	VNMSH.default_session = @session
+
+	landscapes = SpecTools::Landscape.get_landscapes
+	assert_equal 2, landscapes.size
+	assert_equal 'S81-2', landscapes.first.ss
+	assert_equal '10', landscapes.first.precedence
+	assert_equal '0xbeef', landscapes.first.port
+	assert_equal '0x10101', landscapes.first.service
+	assert_equal '0x50000000', landscapes.first.handle
+
+	VNMSH.default_session = nil
+	landscapes = nil
+	assert_raise ArgumentError do
+		SpecTools::Landscape.get_landscapes
+
+	end
+	landscapes = SpecTools::Landscape.get_landscapes(@session)
+	assert_equal 2, landscapes.size
+
+  end
+
+  def test_relation_cli_find_all
+	  VNMSH.default_session = @session
+	  
+	  relations = SpecTools::Relation.cli_find
+	  assert_equal 150, relations.size
+	  assert_equal 'Collects', relations[1].name
+	  assert_equal 'ONE_TO_MANY', relations[1].type
+
+	  assert_equal 'QosUsesApp', relations.last.name
+	  assert_equal 'MANY_TO_MANY', relations.last.type
+
+	  VNMSH.default_session = nil
+	  assert_raise ArgumentError do
+	  	relations = SpecTools::Relation.cli_find(:all)
+	  end
+
+	  relations = nil
+	  relations = SpecTools::Relation.cli_find(nil,@session)	
+	  assert_equal 150, relations.size
+
+  end
+
+  def test_model_find
+	  
+	  assert_equal 2251, SpecTools::Model.find(nil,nil,@session).size
+
+	  assert_equal 20, SpecTools::Model.find(nil,true,@session).size
+
+	  assert_equal 17, SpecTools::Model.find({:range,['0x40000000','0x40000010']},nil,@session).size
+	  assert_raise ArgumentError do
+		  SpecTools::Model.find({:range,['bogus','0x400020']},nil,@session)
+	  end
+
+	  assert_raise ArgumentError do
+		  SpecTools::Model.find({:range,['0x400000','bogus']},nil,@session)
+	  end
+
+	  assert_equal '0x40000178', SpecTools::Model.find({:name,'DTM'},false,@session).first.handle
+
+	  assert_equal 'S3', SpecTools::Model.find({:type,'0x13d0018'},nil,@session).first.name
+	  assert_equal 'S3', SpecTools::Model.find({:type,MType.new('0x13d0018')},nil,@session).first.name
+
+	  assert_raise ArgumentError do
+		  SpecTools::Model.find({:mtype,'bogus'})
+	  end
+
+	  assert_equal 1, SpecTools::Model.find_by_attr('0x1006e','intspeclab01',false,false,@session).size
+	  assert_equal 1, SpecTools::Model.find_by_attr(Attr.new('0x1006e',nil,'intspeclab01'),false,false,@session).size
+
+	  assert_equal 16,SpecTools::Model.find_by_attr('0x1006e','intspeclab01',true,false,@session).size
+	  assert_raise ArgumentError do
+		  SpecTools::Model.find_by_attr(Attr.new,false,false,@session)
+	  end
+	  assert_raise ArgumentError do
+		  SpecTools::Model.find_by_attr('bogus',nil,false,false,@session)
+	  end
+
+  end
+
+  def test_mtype_find
+	  assert_equal 4209, SpecTools::MType.find(nil,@session).size
+	  assert_equal 3136, SpecTools::MType.find({:flag,:derivable},@session).size
+	  assert_equal 54, SpecTools::MType.find({:range,['0x13d0000','0x13d00ff']},@session).size
+	  assert_raise ArgumentError do
+		  SpecTools::MType.find({:range,['bogus','0x3ccffff']},@session)
+	  end
+	  assert_raise ArgumentError do
+		  SpecTools::MType.find({:range,['0x3cc0000','bogus']},@session)
+	  end
+	  assert_equal 1, SpecTools::MType.find({:name,'IcsLicenseMgr'},@session).size
+  end
+
+  def test_alarm_find
+	  assert_equal 9, SpecTools::Alarm.find(:standard,nil,nil,@session).size
+	  #assert_equal '', SpecTools::Alarm.find('0x40313f',@session).first.model.name
+	  assert_match(/service has been unavailable/,SpecTools::Alarm.find(:standard,nil,true,@session)[1].message)
+  end
+
+  def test_event_find
+	  assert_equal 2000, SpecTools::Event.find(:all,nil,nil,nil,@session).size
+	  assert_equal 10000, SpecTools::Event.find(:all,nil,:all,nil,@session).size
+	  assert_equal 5, SpecTools::Event.find(:all,nil,5,nil,@session).size
+	  assert_equal 2000, SpecTools::Event.find(:model,'0x400000',nil,nil,@session).size
+	  assert_match(/SpectroSERVER has disconnected/,SpecTools::Event.find(:all,nil,nil,true,@session).first.message)
+	  assert_equal 2000, SpecTools::Event.find(:model,'0x400000',nil,nil,@session).size
+  end
+
+  def test_landscape_get
+	  assert_equal 2, SpecTools::Landscape.get_landscapes(@session).size
+  end
+
+  def test_relation_find_all
+	  assert_equal 150, SpecTools::Relation.find(nil,@session).size
+  end
+
+  def test_cli_attr_get
+	  VNMSH.default_session = @session
+	  model = SpecTools::Model.new('0x400005c7')
+	  attrs = model.cli_get_attrs
+	  model.cli_get_attrs!
+	  assert_equal attrs.size, model.attrs.size
+	  
+	  attrs = model.cli_get_attrs({:id,'0x10030'})
+	  assert_equal 1, attrs.size
+	  
+	  enummodel = Model.new('0x4000017b')
+	  sattrs = enummodel.cli_get_attrs({:id,'0x13d0315'},true)
+	  assert_equal 'Record/s', sattrs['0x13d0315'].value 
+
+	  sattrs = model.cli_get_attrs({:instance,['0x12a53','192.2.20.2']})
+	  assert_equal '20030', sattrs['0x12a53'].value
+	  assert_equal '20030', sattrs['0x12a53'].value_table['192.2.20.2']
+
+	  attrs = model.get_attrs({:id,'0x10030'})
+	  assert_equal 1, attrs.size
+
+
+	  model.get_attrs!({:id,'0x10030'})
+	  assert_instance_of Hash,model.attrs 
+	  assert_equal 1, model.attrs.size
+
+	  attrs = model.cli_get_attrs({:range, ['0x10000', '0x10010']})
+	  assert_equal 11, attrs.size
+
+	  assert_equal 11, model.cli_get_attrs({:range, '0x10000-0x10010'}).size
+
+	  model = SpecTools::Model.new('0x400005c7')
+	  model.get_attrs!
+	  assert_equal '0x36c001a', model.attrs['0x11fb4'].value_table['129']
+	  assert_equal 53, model.attrs['0x11fb4'].value_table.size
+	  assert_equal 780, model.attrs.size
+
+	  assert_raise ArgumentError do
+		  model.cli_get_attrs({:range,['bogus','0x1007c']})
+	  end
+
+	  assert_raise ArgumentError do
+		  model.cli_get_attrs({:range,['0x10010','bogus']})
+	  end
+
+	  attrs = model.cli_get_attrs({:name, 'Condition'})
+	  assert_equal '0', attrs[attrs.keys.first].value
+
+	  model.handle = 'bogus'
+	  assert_raise ArgumentError do
+		  model.cli_get_attrs
+	  end
+
+  end
+
+  def test_cli_attr_mtype_get
+	  VNMSH.default_session = @session
+	  mtype = SpecTools::MType.new('0x13d0018')
+	  attrs = mtype.cli_get_attrs
+	  mtype.cli_get_attrs!
+
+	  assert_equal attrs.size, mtype.attrs.size
+
+	  assert_equal 11, mtype.cli_get_attrs({:range,['0x10000','0x10010']}).size
+
+	  #assert_equal '', mtype.cli_get_attr(:name,'Condition').first.type
+
+	  attrs = mtype.cli_get_attrs({:flag, :global})
+	  assert_equal 'Security_String', attrs['0x10009'].name
+
+	  assert_raise ArgumentError do
+		  mtype.cli_get_attrs({:range,['bogus','0x1007c']})
+	  end
+
+	  assert_raise ArgumentError do
+		  mtype.cli_get_attrs({:range,['0x10010','bogus']})
+	  end
+
+	  assert_equal 241, mtype.get_attrs.size
+
+	  mtype.attrs = Hash.new
+	  mtype.get_attrs!
+	  assert_equal 241, mtype.attrs.size 
+
+	  
+
+	  mtype.handle = 'bogus'
+
+	  assert_raise ArgumentError do
+		  mtype.cli_get_attrs
+	  end
+
+  end
+
+  def test_cli_model_children
+	  VNMSH.default_session = @session
+	  model = SpecTools::Model.new('0x400005cb')
+
+	  assert_equal 46, model.cli_get_children.size
+
+	  assert_equal 46, model.get_children.size
+
+	  assert_equal 13, model.get_children('PossPrimApp').size
+
+	  rel = SpecTools::Relation.new('PossPrimApp')
+	  assert_equal 13, model.get_children(rel).size
+
+	  model.handle = 'bogus'
+
+	  assert_raise ArgumentError do
+		  model.cli_get_children
+	  end
+  end
+
+  def test_cli_model_parents
+	  VNMSH.default_session = @session
+	  model = SpecTools::Model.new('0x4000004b')
+
+	  assert_equal '0x40000042', model.cli_get_parents.first.handle
+
+	  assert_equal '0x40000042', model.get_parents.first.handle
+
+	  assert_equal '0x40000042', model.get_parents('Collects').first.handle
+
+	  rel = SpecTools::Relation.new('Collects')
+	  assert_equal '0x40000042', model.get_parents(rel).first.handle
+
+	  model.handle = 'bogus'
+	  assert_raise ArgumentError do
+		  model.cli_get_parents
+	  end
+  end
+
+  def test_cli_attr_enums
+	  VNMSH.default_session = @session
+	  
+	  sattr = SpecTools::Attr.new('0x13d031e')
+	 
+	  assert_equal 3, sattr.cli_get_enums.size
+	  
+	  assert_equal 3, sattr.get_enums.size
+	  sattr.value = '0'
+	  assert_equal 'Resource Faced', sattr.enumerate
+	  sattr.enumerate!
+	  assert_equal 'Resource Faced', sattr.value
+	  sattr.get_enums!
+	  assert_equal 3, sattr.enums.size
+
+  end
+
+  def test_cli_rules_find
+	  relation = SpecTools::Relation.new('Collects')
+	  assert_equal 5837, relation.cli_get_rules.size
+	  assert_equal 5837, relation.get_rules.size
+  end
+
+  def test_cli_watch_find
+	  model = SpecTools::Model.new('0x4000004b')
+	  assert_equal 8, model.cli_get_watches(@session).size
+	  assert_equal 8, model.get_watches(@session).size
+	  assert_raise ArgumentError do
+		  model.handle = 'bogus'
+		  model.cli_get_watches
+	  end
+
+  end
+
+  def test_model_cli_destroy
+	assert Model.cli_destroy('0x40b42b',@session)
+	assert Model.destroy('0x40b42b',@session)
+	model = Model.new('0x40b42b',@session)
+	assert model.cli_destroy(@session)
+	assert model.destroy(@session)
+	assert_raise ArgumentError do
+		model.handle = 'bogus'
+		model.destroy(@session)
+	end
+  end
+
+  def test_association_destroy
+	  assert Association.cli_destroy('0x4065e8','0x40b63e','Connects_to',@session)
+	  assert Association.destroy('0x4065e8','0x40b63e','Connects_to',@session)
+	  assoc = Association.new(Model.new('0x4065e8'),Model.new('0x40b63e'),Relation.new('Connects_to'))
+	  assert assoc.cli_destroy(@session)
+	  assert assoc.destroy(@session)
+	  assert_raise ArgumentError do
+		  assoc.left_model.handle = 'bogus'
+		  assoc.cli_destroy(@session)
+	  end
+  end
+
+  def test_alarm_destroy
+	  assert Alarm.cli_destroy('7888881',nil,@session)
+	  assert Alarm.destroy('7888881',Landscape.new('0x4000000'),@session)
+	  Alarm.new('7888881').destroy(nil,@session)
+  end
+
+  def teardown
+	@session = nil
+	SpecTools::Config.default_access_method = @orig_default_access_method
+	destroy_temp_vnmsh
+  end
+
+end