@@ -4,42 +4,50 @@ local inspect = require("inspect")
44
55local node = " chef.itv.restr.im"
66
7- local http_client = http .client ({insecure_ssl = true , timeout = 20 })
7+ local http_client = http .client ({ insecure_ssl = true , timeout = 20 })
88local client = chef .client (
9- " lualibs" ,
10- " ./test/client.pem" ,
11- " https://chef.itv.restr.im/organizations/restream/" ,
12- http_client
9+ " lualibs" ,
10+ " ./test/client.pem" ,
11+ " https://chef.itv.restr.im/organizations/restream/" ,
12+ http_client
1313)
1414
15- -- nodes
16- local result , err = client :request (" GET" , " nodes" )
17- if err then error (err ) end
18- local found = false
19- for k ,v in pairs (result ) do if k == node then found = true end end
20- if not found then error (" nodes" ) end
21- print (" done: nodes" )
15+ function TestNodes (t )
16+ -- nodes
17+ local result , err = client :request (" GET" , " nodes" )
18+ assert (not err , err )
19+ local found = false
20+ for k , v in pairs (result ) do
21+ if k == node then
22+ found = true
23+ end
24+ end
25+ assert (found , " nodes don't contain " .. node )
26+ end
2227
23- -- node
24- local result , err = client :request (" GET" , " nodes/" .. node )
25- if err then error (err ) end
26- if not (result .name == node ) then error (" get node" ) end
27- print (result .default )
28- print (result .automatic )
29- print (result .normal )
30- print (result .override )
31- print (" done: get node" )
28+ function TestNodes (t )
29+ -- node
30+ local result , err = client :request (" GET" , " nodes/" .. node )
31+ assert (not err , err )
32+ t :Log (result .default )
33+ t :Log (result .automatic )
34+ t :Log (result .normal )
35+ t :Log (result .override )
36+ assert (result .name == node , " get node: " .. result .name )
37+ end
3238
33- -- search 1
34- local result , err = client :search (" node" , " fqdn:" .. node )
35- if err then error (err ) end
36- if not (result .rows [1 ].name == node ) then error (" search node 1" ) end
37- print (" done: search 1" )
38-
39- -- search 2
40- local result , err = client :search (" node" , " fqdn:" .. node , {fqdn_name = {" name" }})
41- if err then error (err ) end
42- print (inspect (result .rows [1 ].data ))
43- if not (result .rows [1 ].data .fqdn_name == node ) then error (" search node 2: " .. tostring (result .rows [1 ].data .fqdn_name )) end
44- print (" done: search 2" )
39+ function TestSearch (t )
40+ t :Run (" 1" , function (t )
41+ local result , err = client :search (" node" , " fqdn:" .. node )
42+ assert (not err , err )
43+ assert (result .rows [1 ].name == node , " search node 1: " .. result .rows [1 ].name )
44+ end )
4545
46+ t :Run (" 2" , function (t )
47+ -- search 2
48+ local result , err = client :search (" node" , " fqdn:" .. node , { fqdn_name = { " name" } })
49+ assert (not err , err )
50+ t :Log (inspect (result .rows [1 ].data ))
51+ assert (result .rows [1 ].data .fqdn_name == node , " search node 2: " .. tostring (result .rows [1 ].data .fqdn_name ))
52+ end )
53+ end
0 commit comments