Navigation

Changeset 1591

Timestamp:

07/23/05 17:47:30 (3 years ago)

Author:

nahi

Message:

do not post the result.

Files:

r1520	r1591
11	11
12	12	$soapAction = 'http://soapinterop.org/'
13		# $testResultServer = 'http://rrr.jin.gr.jp/soapsrv'
	13	=begin
	14	$testResultServer = 'http://rrr.jin.gr.jp/soapsrv'
14	15	$testResultDrv = SOAP::RPC::Driver.new($testResultServer, SOAPBuildersInteropResult::InterfaceNS)
15	16
…	…
17	18	$testResultDrv.add_method(name, params)
18	19	end
	20	=end
19	21
20	22	client = SOAPBuildersInteropResult::Endpoint.new
…	…
47	49
48	50	def methodDefBase(drv)
49		~~drv.soapaction = $soapAction~~
50	51	SOAPBuildersInterop::MethodsBase.each do \|name, *params\|
51		drv.add_method(name, params)
	52	drv.add_rpc_operation(
	53	XSD::QName.new(InterfaceNS, name), $soapAction, name, params)
52	54	end
53	55	end
54	56
55	57	def methodDefGroupB(drv)
56		~~drv.soapaction = $soapAction~~
57	58	SOAPBuildersInterop::MethodsGroupB.each do \|name, *params\|
58		drv.add_method(name, params)
	59	drv.add_rpc_operation(
	60	XSD::QName.new(InterfaceNS, name), $soapAction, name, params)
59	61	end
60	62	end
…	…
142	144	resultStr,
143	145	$wireDumpDev.dup
144		)
145		)
	146	)
	147	)
146	148	$wireDumpLogFile << "Result: #{ resultStr \|\| 'OK' }\n\n"
147	149	$wireDumpLogFile << $wireDumpDev
…	…
151	153	end
152	154
	155	require 'yaml'
153	156	def submitTestResult
154		load 'soap/XMLSchemaDatatypes.rb'
155		$testResultDrv.addResults($testResults)
	157	#load 'soap/XMLSchemaDatatypes.rb'
	158	#$testResultDrv.addResults($testResults)
	159	filename = File.join(
	160	File.dirname($0),
	161	'result_' + File.basename($0).sub(/\.rb/, '.txt'))
	162	File.open(filename, 'w') do \|f\|
	163	f << YAML.dump($testResults)
	164	end
156	165	end
157	166