1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
* Equivalence Classes
[[https://en.wikipedia.org/wiki/Equivalence_partitioning][Equivalence classes]] for Guile-SSH.
Implemented test cases marked with "[x]".
** =(ssh auth)=
*** =userauth-agent!=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-----------+-------------------------+-----------------------------|
*** =userauth-none!=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-----------+-------------------------+-----------------------------|
*** =userauth-password!=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-----------+-------------------------+-----------------------------|
| password | - [x] string | - [x] non-string object |
|-----------+-------------------------+-----------------------------|
*** =userauth-public-key!=
| Parameter | Valid | Non-Valid |
|-------------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-------------+-------------------------+-----------------------------|
| private-key | - [x] private key | - [x] non-key object |
| | | - [x] public key |
| | | - [ ] invalid key |
|-------------+-------------------------+-----------------------------|
*** =userauth-public-key/auto!=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-----------+-------------------------+-----------------------------|
*** =userauth-public-key/try=
| Parameter | Valid | Non-Valid |
|------------+-------------------------+-----------------------------|
| session | - [ ] connected session | - [ ] non-session object |
| | | - [ ] non-connected session |
|------------+-------------------------+-----------------------------|
| public-key | - [ ] public key | - [ ] non-key object |
| | | - [ ] invalid key |
|------------+-------------------------+-----------------------------|
*** =userauth-get-list=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] connected session | - [x] non-session object |
| | | - [x] non-connected session |
|-----------+-------------------------+-----------------------------|
** =(ssh channel)=
** =(ssh dist)=
** =(ssh key)=
** =(ssh message)=
** =(ssh popen)=
** =(ssh server)=
** =(ssh session)=
*** =session?=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------+-----------------------------|
| session | - [x] session object | - [x] non-session object |
|-----------+-------------------------+-----------------------------|
*** =session-set!=
| Parameter | Valid | Non-Valid |
|-----------+----------------------+--------------------------|
| session | - [x] session object | - [x] non-session object |
|-----------+----------------------+--------------------------|
| option | - [x] valid option | - [x] non-valid option |
| | | - [x] non-symbol object |
|-----------+----------------------+--------------------------|
| value | - [x] valid value | - [x] non-valid value |
|-----------+----------------------+--------------------------|
*** =session-get=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------------------+-------------------------------------------------------------|
| session | - [x] session object: "session-get" | - [x] non-session object: "session-get, non-session object" |
|-----------+-------------------------------------+-------------------------------------------------------------|
| option | - [x] valid option: "session-get" | - [x] invalid option: "session-get, invalid option" |
|-----------+-------------------------------------+-------------------------------------------------------------|
*** =make-session=
| Parameter | Valid | Non-Valid |
|------------+--------------------------------------------------------------------------------------------------+-------------------------------------------------------------------------------------|
| =#:config= | - [x] =#:config= and =#:host= is specified: "make-session, '#:config' and '#:host' is specified" | - [x] only =#:config= is specified: "make-session, only '#:config' is specified" |
| | - [x] =#:config= is a boolean value: "make-session, '#:config' as a boolean value" | - [x] =#:config= is of non-string type: "make-session, wrong '#:config' value type" |
|------------+--------------------------------------------------------------------------------------------------+-------------------------------------------------------------------------------------|
*** =session-parse-config!=
| Parameter | Valid | Non-Valid |
|-----------+-------------------------------------------------------+-------------------------------------------------------------------------|
| session | - [x] valid session: "session-parse-config!" | - [x] non-session object: "session-parse-config!, non-session object" |
|-----------+-------------------------------------------------------+-------------------------------------------------------------------------|
| config | - [x] valid config file name: "session-parse-config!" | - [x] non-valid config file: "session-parse-config!, wrong config file" |
|-----------+-------------------------------------------------------+-------------------------------------------------------------------------|
*** =connected?=
| Parameter | Valid | Non-Valid |
|-----------+--------------------------------------------------------------------+------------------------------------------------------------|
| session | - [x] valid session: "connected?, check that we are not connected" | - [x] non-session object: "connected?, non-session object" |
|-----------+--------------------------------------------------------------------+------------------------------------------------------------|
** =(ssh sftp)=
** =(ssh tunnel)=
|
