Mercurial > hg > nginx-tests

annotate ssi_waited.t @ 289:cbd4f6eca676

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: check if started process is alive while starting nginx. This allows faster test execution in case of startup failures, e.g. due to configuration errors. Note that just adding waitpid() to waitforfile() causes hang on win32 in wait(). To fix this, wait() calls were changed to waitpid() with pid specified.
author Maxim Dounin <mdounin@mdounin.ru>
date Mon, 27 May 2013 17:15:17 +0400
parents 6a0d934950bc
children 6c0a5903d0ae
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
249
6a0d934950bc Tests: remove extra spaces in "daemon off".
Maxim Dounin <mdounin@mdounin.ru>
parents: 166
diff changeset
30 daemon off;
124
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
31
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
32 events {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
33 }
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 http {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
36 %%TEST_GLOBALS_HTTP%%
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
37
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
38 server {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
39 listen 127.0.0.1:8080;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
40 server_name localhost;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
41 location / {
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
42 ssi on;
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
43 }
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 EOF
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
48
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
49 $t->write_file('index.html', 'x<!--#include virtual="/first.html" -->' .
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
50 'x<!--#include virtual="/second.html" -->x');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
51 $t->write_file('first.html', 'FIRST');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
52 $t->write_file('second.html',
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
53 '<!--#include virtual="/waited.html" wait="yes"-->xSECOND');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
54 $t->write_file('waited.html', 'WAITED');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
55
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
56 $t->run();
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
57
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 like(http_get('/'), qr/^xFIRSTxWAITEDxSECONDx$/m, 'waited non-active');
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
61
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
62 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
63
6edd29865109 Tests: ssi waited subrequests test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
64 ###############################################################################