Mercurial > hg > nginx-tests

comparison xslt.t @ 208:6bac00bba8d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: xslt filter tests.
author Maxim Dounin <mdounin@mdounin.ru>
date Thu, 01 Mar 2012 21:00:17 +0400
parents
children ee8fee3c4ae8
comparison
equal deleted inserted replaced
207:0a9e5d753fb8 208:6bac00bba8d4
1 #!/usr/bin/perl
2
3 # (C) Maxim Dounin
4
5 # Tests for nginx xslt filter module.
6
7 ###############################################################################
8
9 use warnings;
10 use strict;
11
12 use Test::More;
13
14 BEGIN { use FindBin; chdir($FindBin::Bin); }
15
16 use lib 'lib';
17 use Test::Nginx;
18
19 ###############################################################################
20
21 select STDERR; $| = 1;
22 select STDOUT; $| = 1;
23
24 my $t = Test::Nginx->new()->has(qw/http xslt/)->plan(5);
25
26 $t->write_file_expand('nginx.conf', <<'EOF');
27
28 %%TEST_GLOBALS%%
29
30 daemon off;
31
32 events {
33 }
34
35 http {
36 %%TEST_GLOBALS_HTTP%%
37
38 server {
39 listen 127.0.0.1:8080;
40 server_name localhost;
41
42 default_type text/xml;
43
44 location /x1 {
45 xslt_stylesheet %%TESTDIR%%/test.xslt;
46 }
47 location /x2 {
48 xslt_stylesheet %%TESTDIR%%/test.xslt
49 param1='value1':param2=root param3='value%33';
50 }
51 location /x3 {
52 xml_entities %%TESTDIR%%/entities.dtd;
53 xslt_stylesheet %%TESTDIR%%/test.xslt;
54 }
55 location /x4 {
56 xslt_stylesheet %%TESTDIR%%/first.xslt;
57 xslt_stylesheet %%TESTDIR%%/test.xslt;
58 }
59 }
60 }
61
62 EOF
63
64 $t->write_file('test.xslt', <<'EOF');
65
66 <xsl:stylesheet version="1.0"
67 xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
68
69 <xsl:output method="html"/>
70
71 <xsl:param name="param1"/>
72 <xsl:param name="param2"/>
73 <xsl:param name="param3"/>
74
75 <xsl:template match="/">
76 test xslt result
77 param1=<xsl:value-of select="$param1"/>
78 param2=<xsl:value-of select="$param2"/>
79 param3=<xsl:value-of select="$param3"/>
80 data=<xsl:value-of select="root"/>
81 </xsl:template>
82
83 </xsl:stylesheet>
84
85 EOF
86
87 $t->write_file('first.xslt', <<'EOF');
88
89 <xsl:stylesheet version="1.0"
90 xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
91
92 <xsl:template match="/">
93 <root>other <xsl:value-of select="root"/></root>
94 </xsl:template>
95
96 </xsl:stylesheet>
97
98 EOF
99
100 $t->write_file('entities.dtd', '<!ENTITY test "test entity">' . "\n");
101 $t->write_file('x1', '<empty/>');
102 $t->write_file('x2', '<root>data</root>');
103 $t->write_file('x3', '<!DOCTYPE root><root>&test;</root>');
104 $t->write_file('x4', '<root>data</root>');
105
106 $t->run();
107
108 ###############################################################################
109
110 like(http_get("/x1"), qr!200 OK.*test xslt result!ms, 'simple');
111 like(http_get("/x1"), qr!200 OK.*Content-Type: text/html!ms, 'content type');
112
113 TODO: {
114 local $TODO = 'broken in 0.7.44 (r2589)';
115
116 like(http_get("/x2"), qr!200 OK.*param1=value1.*param2=data.*param3=value3!ms,
117 'params');
118
119 }
120
121 like(http_get("/x3"), qr!200 OK.*data=test entity!ms, 'entities');
122 like(http_get("/x4"), qr!200 OK.*data=other data!ms, 'several stylesheets');
123
124 ###############################################################################