annotate ssi-waited.t @ 144:6e11354cae8a

Tests: rework stopping to make "open socket left" alerts visible. Use SIGQUIT to stop nginx to make sure relevant checks are executed. Use separate functions to stop nginx and daemons to make it possible to stop nginx before daemons.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 15 Dec 2010 19:22:39 +0300
parents 0d11b58d63bc
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
124
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
1 #!/usr/bin/perl
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
2
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
3 # (C) Maxim Dounin
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
4
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
5 # Tests for nginx ssi module, waited subrequests.
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
6
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
7 ###############################################################################
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
8
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
9 use warnings;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
10 use strict;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
11
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
12 use Test::More;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
13
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
14 BEGIN { use FindBin; chdir($FindBin::Bin); }
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
15
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
16 use lib 'lib';
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
17 use Test::Nginx;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
18
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
19 ###############################################################################
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
20
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
21 select STDERR; $| = 1;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
22 select STDOUT; $| = 1;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
23
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
24 my $t = Test::Nginx->new()->has(qw/http ssi/)->plan(2);
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
25
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
26 $t->write_file_expand('nginx.conf', <<'EOF');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
27
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
28 %%TEST_GLOBALS%%
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
29
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
30 master_process off;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
31 daemon off;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
32
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
33 events {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
34 }
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
35
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
36 http {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
37 %%TEST_GLOBALS_HTTP%%
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
38
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
39 server {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
40 listen 127.0.0.1:8080;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
41 server_name localhost;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
42 location / {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
43 ssi on;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
44 }
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
45 }
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
46 }
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
47
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
48 EOF
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
49
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
50 $t->write_file('index.html', 'x<!--#include virtual="/first.html" -->' .
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
51 'x<!--#include virtual="/second.html" -->x');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
52 $t->write_file('first.html', 'FIRST');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
53 $t->write_file('second.html',
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
54 '<!--#include virtual="/waited.html" wait="yes"-->xSECOND');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
55 $t->write_file('waited.html', 'WAITED');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
56
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
57 $t->run();
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
58
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
59 ###############################################################################
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
60
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
61 like(http_get('/'), qr/^xFIRSTxWAITEDxSECONDx$/m, 'waited non-active');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
62
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
63 like(`grep -F '[alert]' ${\($t->testdir())}/error.log`, qr/^$/s, 'no alerts');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
64
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
65 ###############################################################################