← Back to branch summary

~ubuntu-branches/ubuntu/utopic/gitolite3/utopic-proposed

« back to all changes in this revision

Viewing changes to t/listers.t

  • Committer: Package Import Robot
  • Author(s): David Bremner
  • Date: 2013-05-18 17:59:21 UTC
  • Revision ID: package-import@ubuntu.com-20130518175921-ac4xe6vd0jtxvjot
Tags: upstream-3.5.1+4
Import upstream version 3.5.1+4

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/listers.t
 
1
#!/usr/bin/perl
 
2
use strict;
 
3
use warnings;
 
4
 
 
5
# this is hardcoded; change it if needed
 
6
use lib "src/lib";
 
7
use Gitolite::Test;
 
8
 
 
9
# the various list-* commands
 
10
# ----------------------------------------------------------------------
 
11
 
 
12
try 'plan 30';
 
13
 
 
14
try "## info";
 
15
 
 
16
confreset;confadd '
 
17
    @oss = git gitolite gitolite3
 
18
    @prop = cc p4
 
19
    @crypto = alice bob carol
 
20
    @dilbert = alice wally ashok
 
21
 
 
22
    repo    @oss
 
23
        RW              =   u1 @crypto
 
24
        R               =   u2 @dilbert
 
25
    repo    @prop
 
26
        RW  =               u2 @dilbert
 
27
        R   =               u1
 
28
    repo    t3
 
29
                    RW  =   u3
 
30
                    R   =   u4
 
31
';
 
32
 
 
33
try "ADMIN_PUSH info; !/FATAL/" or die text();
 
34
try "
 
35
                                        /Initialized.*empty.*cc.git/
 
36
                                        /Initialized.*empty.*p4.git/
 
37
                                        /Initialized.*empty.*git.git/
 
38
                                        /Initialized.*empty.*gitolite.git/
 
39
                                        /Initialized.*empty.*gitolite3.git/
 
40
                                        /Initialized.*empty.*t3.git/
 
41
";
 
42
 
 
43
try "gitolite list-groups"; cmp
 
44
'@crypto
 
45
@dilbert
 
46
@oss
 
47
@prop
 
48
';
 
49
 
 
50
try "gitolite list-users"; cmp
 
51
'@all
 
52
@crypto
 
53
@dilbert
 
54
admin
 
55
u1
 
56
u2
 
57
u3
 
58
u4
 
59
';
 
60
try "gitolite list-repos"; cmp
 
61
'@oss
 
62
@prop
 
63
gitolite-admin
 
64
t3
 
65
testing
 
66
';
 
67
 
 
68
try "gitolite list-phy-repos"; cmp
 
69
'cc
 
70
git
 
71
gitolite
 
72
gitolite-admin
 
73
gitolite3
 
74
p4
 
75
t3
 
76
testing
 
77
';
 
78
 
 
79
try "gitolite list-memberships -u alice"; cmp
 
80
'@crypto
 
81
@dilbert
 
82
';
 
83
 
 
84
try "gitolite list-memberships -u ashok"; cmp
 
85
'@dilbert
 
86
';
 
87
 
 
88
try "gitolite list-memberships -u carol"; cmp
 
89
'@crypto
 
90
';
 
91
 
 
92
try "gitolite list-memberships -r git"; cmp
 
93
'@oss
 
94
';
 
95
 
 
96
try "gitolite list-memberships -r gitolite"; cmp
 
97
'@oss
 
98
';
 
99
 
 
100
try "gitolite list-memberships -r gitolite3"; cmp
 
101
'@oss
 
102
';
 
103
 
 
104
try "gitolite list-memberships -r cc"; cmp
 
105
'@prop
 
106
';
 
107
 
 
108
try "gitolite list-memberships -r p4"; cmp
 
109
'@prop
 
110
';
 
111
 
 
112
try "gitolite list-members \@crypto"; cmp
 
113
'alice
 
114
bob
 
115
carol
 
116
';
 
117
 
 
118
try "gitolite list-members \@dilbert"; cmp
 
119
'alice
 
120
ashok
 
121
wally
 
122
';
 
123
 
 
124
try "gitolite list-members \@oss"; cmp
 
125
'git
 
126
gitolite
 
127
gitolite3
 
128
';
 
129
 
 
130
try "gitolite list-members \@prop"; cmp
 
131
'cc
 
132
p4
 
133
';
 
134