# test harness

	
require 'test/unit/testcase'
require 'test/unit/assertions'
include Test::Unit::Assertions
include Test::Unit  
def rwdtinker_all_tests 
	print "in rwdtinker all tests\n"
  $testrwdtinkertestcase = TestSuite.new
	test_runrwdtinkerbackwindow
end

def test_runrwdtinkerbackwindow


	begin
  testasserts = 0
  print "Starting rwdtinker tests!\n"
		runrwdtinkerbackwindow
    
    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
     runselectiontab
     assert_equal("selectiontab",@rwd_tab) ; testasserts += 1
    showjumplinkoptions
    @a_jumplinkinput = "returntomain"
   runjumplinkcommand
    assert_equal("main",@rwd_window) ; testasserts += 1 
		@a_jumplinkinput = "helpscreen"
    runjumplinkcommand 
    
     assert_equal("rwdtinkerhelpwindow",@rwd_window)  ; testasserts += 1
     returntomain
     assert_equal("main",@rwd_window)  ; testasserts += 1
     runtinkerdocuments
     assert_equal("documentsrwdtinkerone",@rwd_tab)  ; testasserts += 1
     	runrwdtinkerbackwindow
    
    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
    @a_installapplet="/usr/src/rwdapplets/rwdtinker/zips/rwdahelloworld-0.5"
    viewgemappletcontents
    assert_not_nil(@appletcontentstext)  ; testasserts += 1
    runrwdtinkerwin2version
      assert_equal("applicationversion",@rwd_window) ; testasserts += 1 
        returntomain
     assert_equal("main",@rwd_window)  ; testasserts += 1
      	runrwdtinkerbackwindow
    
    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
    runremotezipsinstall
     assert_equal("superantcomremotezipsinstall",@rwd_tab) ; testasserts += 1
    runeditconfiguration   
    assert_equal("editconfigurationfile",@rwd_tab) ; testasserts += 1    
    
     
 $stderr.print "tests completed succesfully!\n"
 $stderr.print testasserts, " asserts performed\n"

	rescue  NotImplementedError, Exception
		$stderr.print $!

	end
  
end



def teststobedown
 runtinkerhelpabout
          assert_equal("rwdtinkerhelpwindow",@rwd_tab)  ; testasserts += 1
	raise NotImplementedError, 'Need to write test_choosenewhelptopic'
	raise NotImplementedError, 'Need to write test_listinstalledfiles'
	raise NotImplementedError, 'Need to write test_listzipfilestoinstall'
	raise NotImplementedError, 'Need to write test_loadconfigurationrecord'
	raise NotImplementedError, 'Need to write test_loadconfigurationvariables'

	raise NotImplementedError, 'Need to write test_main'

	raise NotImplementedError, 'Need to write test_network_demon'

	raise NotImplementedError, 'Need to write test_network_start'

	raise NotImplementedError, 'Need to write test_openappletname'

	raise NotImplementedError, 'Need to write test_removeapplet'

	raise NotImplementedError, 'Need to write test_returntomain'

	raise NotImplementedError, 'Need to write test_runcontrolcommand'

	raise NotImplementedError, 'Need to write test_runhelpwindow'

	raise NotImplementedError, 'Need to write test_runrwdtinkerversion'

	raise NotImplementedError, 'Need to write test_runrwdtinkerwin2version'

	raise NotImplementedError, 'Need to write test_runviewplatform'

	raise NotImplementedError, 'Need to write test_rwdtinkerversiondiagnostic'

	raise NotImplementedError, 'Need to write test_rwdwindowreturn'
	raise NotImplementedError, 'Need to write test_saveconfigurationrecord'

	raise NotImplementedError, 'Need to write test_viewappletcontents'
end