annotate random_index.t @ 223:f9325406df0b

Tests: skip tests not appropriate for win32. Skip tests which doesn't work on win32, notably ones using crypt(), symlinks and shared memory.
author Maxim Dounin <mdounin@mdounin.ru>
date Sun, 03 Jun 2012 05:20:39 +0400
parents c0ae29632905
children 6a0d934950bc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
109
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
1 #!/usr/bin/perl
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
2
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
3 # (C) Maxim Dounin
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
4
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
5 # Tests for random index module.
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
6
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
7 ###############################################################################
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
8
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
9 use warnings;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
10 use strict;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
11
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
12 use Test::More;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
13
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
14 BEGIN { use FindBin; chdir($FindBin::Bin); }
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
15
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
16 use lib 'lib';
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
17 use Test::Nginx;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
18
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
19 ###############################################################################
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
20
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
21 select STDERR; $| = 1;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
22 select STDOUT; $| = 1;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
23
223
f9325406df0b Tests: skip tests not appropriate for win32.
Maxim Dounin <mdounin@mdounin.ru>
parents: 166
diff changeset
24 plan(skip_all => 'no symlinks on win32') if $^O eq 'MSWin32';
f9325406df0b Tests: skip tests not appropriate for win32.
Maxim Dounin <mdounin@mdounin.ru>
parents: 166
diff changeset
25
121
8ac1faaddd2c Tests: better handle various configure arguments.
Maxim Dounin <mdounin@mdounin.ru>
parents: 110
diff changeset
26 my $t = Test::Nginx->new()->has(qw/http random_index/)->plan(1)
109
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
27 ->write_file_expand('nginx.conf', <<'EOF');
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
28
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
29 %%TEST_GLOBALS%%
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
30
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
31 daemon off;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
32
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
33 events {
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
34 }
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
35
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
36 http {
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
37 %%TEST_GLOBALS_HTTP%%
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
38
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
39 server {
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
40 listen 127.0.0.1:8080;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
41 server_name localhost;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
42
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
43 location / {
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
44 random_index on;
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
45 }
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
46 }
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
47 }
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
48
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
49 EOF
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
50
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
51 my $d = $t->testdir();
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
52
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
53 mkdir("$d/x");
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
54 mkdir("$d/x/test-dir");
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
55 symlink("$d/x/test-dir", "$d/x/test-dir-link");
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
56
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
57 $t->write_file('test-file', 'RIGHT');
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
58 symlink("$d/test-file", "$d/x/test-file-link");
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
59
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
60 $t->run();
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
61
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
62 ###############################################################################
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
63
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
64 like(http_get('/x/'), qr/RIGHT/s, 'file');
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
65
d125e51ea596 Tests: add random index module test for symlink issue.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
66 ###############################################################################