Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
The Tor Project
Applications
tor-browser-bundle-testsuite
Commits
a5e8883a
Unverified
Commit
a5e8883a
authored
Aug 20, 2014
by
Gunes Acar
Committed by
boklm
Aug 21, 2014
Browse files
Remove "always" option. Check Tor process id before trying to stop it.
parent
63442ae2
Changes
3
Hide whitespace changes
Inline
Side-by-side
TBBTestSuite/BrowserBundleTests.pm
View file @
a5e8883a
...
...
@@ -156,7 +156,6 @@ our @tests = (
type
=>
'
tor_bootstrap
',
descr
=>
'
Check that we can bootstrap tor
',
fail_type
=>
'
fatal
',
always
=>
1
,
use_default_config
=>
1
,
no_kill
=>
1
,
},
...
...
TBBTestSuite/Tests.pm
View file @
a5e8883a
...
...
@@ -29,16 +29,15 @@ sub run_tests {
$test
->
{
fail_type
}
//
=
'
error
';
}
foreach
my
$test
(
@
{
$tbbinfos
->
{
tests
}})
{
print
"
\n
",
'
*
'
x
(
17
+
length
(
$test
->
{
name
})),
"
\n
";
print
"
* Running test
$test
->{name} *
\n
";
print
'
*
'
x
(
17
+
length
(
$test
->
{
name
})),
"
\n\n
";
if
(
@enable_tests
&&
!
$test
->
{
always
}
&&
!
grep
{
$test
->
{
name
}
eq
$_
}
@enable_tests
)
{
if
(
@enable_tests
&&
!
grep
{
$test
->
{
name
}
eq
$_
}
@enable_tests
)
{
next
;
}
if
(
$test
->
{
enable
}
&&
!
$test
->
{
enable
}
->
(
$tbbinfos
,
$test
))
{
next
;
}
print
"
\n
",
'
*
'
x
(
17
+
length
(
$test
->
{
name
})),
"
\n
";
print
"
* Running test
$test
->{name} *
\n
";
print
'
*
'
x
(
17
+
length
(
$test
->
{
name
})),
"
\n\n
";
$test
->
{
start_time
}
=
time
;
$test
->
{
pre
}
->
(
$tbbinfos
,
$test
)
if
$test
->
{
pre
};
$test_types
->
{
$test
->
{
type
}}
->
(
$tbbinfos
,
$test
)
...
...
TBBTestSuite/Tests/TorBootstrap.pm
View file @
a5e8883a
...
...
@@ -147,7 +147,7 @@ sub start_tor {
sub
stop_tor
{
my
(
$tbbinfos
,
$test
)
=
@_
;
return
unless
$options
->
{
starttor
};
return
unless
(
$options
->
{
starttor
}
&&
$tbbinfos
->
{
torpid
})
;
kill
15
,
$tbbinfos
->
{
torpid
};
my
(
$kid
,
$i
)
=
(
0
,
5
);
while
(
$kid
==
0
&&
$i
)
{
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment