blob: cedf8a4b10391defec35d1acedbaf6b445b06620 (
plain)
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
|
#!/bin/sh
. ../../../prepare.inc.sh
. ../../../toolbox.inc.sh
# ---- do the actual testing ----
result=PASS
echo "++++ BEGINNING TEST" >$OUTPUTFILE
# create a keyring and attach it to the session keyring
marker "ADD KEYRING"
create_keyring wibble @s
expect_keyid keyringid
# stick a key in the keyring
marker "ADD KEY"
create_key user lizard gizzard $keyringid
expect_keyid keyid
# check that we can list it
marker "LIST KEYRING WITH ONE"
list_keyring $keyringid
expect_keyring_rlist rlist $keyid
# dispose of the key and make sure it gets destroyed
marker "UNLINK KEY FROM KEYRING"
unlink_key --wait $keyid $keyringid
# trying again should fail
marker "CHECK NO UNLINK KEY FROM KEYRING"
unlink_key --fail $keyid $keyringid
expect_error ENOKEY
# check that the keyring is now empty
marker "LIST KEYRING"
list_keyring $keyringid
expect_keyring_rlist rlist empty
# stick twenty keys and twenty keyrings in the keyring
marker "ADD TWENTY KEYS"
keys=""
for ((i=0; i<20; i++))
do
create_key user lizard$i gizzard$i $keyringid
expect_keyid x
keys="$keys $x"
list_keyring $keyringid
expect_keyring_rlist rlist $x
done
marker "ADD TWENTY KEYRINGS"
for ((i=0; i<20; i++))
do
create_keyring ring$i $keyringid
expect_keyid x
keys="$keys $x"
list_keyring $keyringid
expect_keyring_rlist rlist $x
done
marker "CHECK KEYRING CONTENTS"
list_keyring $keyringid
for i in $keys
do
expect_keyring_rlist rlist $i
done
marker "SHOW"
if ! keyctl show >>$OUTPUTFILE 2>&1
then
failed
fi
# delete all the keys from the keyring
marker "DELETE CONTENTS OF KEYRING"
for i in $keys
do
unlink_key --wait $i $keyringid
unlink_key --fail $i $keyringid
expect_error ENOKEY
done
keyctl show
# check that it's now empty
marker "LIST KEYRING"
list_keyring $keyringid
expect_keyring_rlist rlist empty
# remove the keyring we added
marker "UNLINK KEY"
unlink_key $keyringid @s
echo "++++ FINISHED TEST: $result" >>$OUTPUTFILE
# --- then report the results in the database ---
toolbox_report_result $TEST $result
|
