Mercurial > hg > nginx-tests

annotate js_buffer.t @ 1625:a140cab489e8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: added js buffer tests.
author Dmitry Volyntsev <xeioex@nginx.com>
date Wed, 25 Nov 2020 12:25:24 +0000
parents
children a35445ae8de7
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1625
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
1 #!/usr/bin/perl
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
2
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
3 # (C) Dmitry Volyntsev
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
4 # (C) Nginx, Inc.
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
5
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
6 # Tests for http njs module, buffer properties.
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
7
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
8 ###############################################################################
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
9
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
10 use warnings;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
11 use strict;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
12
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
13 use Test::More;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
14
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
15 use Socket qw/ CRLF /;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
16
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
17 BEGIN { use FindBin; chdir($FindBin::Bin); }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
18
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
19 use lib 'lib';
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
20 use Test::Nginx;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
21
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
22 ###############################################################################
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
23
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
24 select STDERR; $| = 1;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
25 select STDOUT; $| = 1;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
26
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
27 eval { require JSON::PP; };
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
28 plan(skip_all => "JSON::PP not installed") if $@;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
29
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
30 my $t = Test::Nginx->new()->has(qw/http rewrite proxy/)
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
31 ->write_file_expand('nginx.conf', <<'EOF');
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
32
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
33 %%TEST_GLOBALS%%
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
34
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
35 daemon off;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
36
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
37 events {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
38 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
39
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
40 http {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
41 %%TEST_GLOBALS_HTTP%%
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
42
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
43 js_import test.js;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
44
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
45 server {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
46 listen 127.0.0.1:8080;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
47 server_name localhost;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
48
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
49 location /njs {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
50 js_content test.njs;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
51 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
52
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
53 location /return {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
54 js_content test.return;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
55 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
56
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
57 location /req_body {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
58 js_content test.req_body;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
59 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
60
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
61 location /res_body {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
62 js_content test.res_body;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
63 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
64
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
65 location /binary_var {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
66 js_content test.binary_var;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
67 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
68
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
69 location /p/ {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
70 proxy_pass http://127.0.0.1:8081/;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
71 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
72 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
73
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
74 server {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
75 listen 127.0.0.1:8081;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
76 server_name localhost;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
77
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
78 location /sub1 {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
79 return 200 '{"a": {"b": 1}}';
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
80 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
81 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
82 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
83
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
84 EOF
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
85
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
86 $t->write_file('test.js', <<EOF);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
87 function test_njs(r) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
88 r.return(200, njs.version);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
89 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
90
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
91 function test_return(r) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
92 var body = Buffer.from("body: ");
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
93 body = Buffer.concat([body, Buffer.from(r.args.text)]);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
94 r.return(200, body);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
95 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
96
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
97 function req_body(r) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
98 var body = r.reqBody;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
99 var view = new DataView(body.buffer);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
100 view.setInt8(2, 'c'.charCodeAt(0));
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
101 r.return(200, JSON.parse(body).c.b);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
102 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
103
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
104 function res_body(r) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
105 r.subrequest('/p/sub1')
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
106 .then(reply => {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
107 var body = reply.resBody;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
108 var view = new DataView(body.buffer);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
109 view.setInt8(2, 'c'.charCodeAt(0));
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
110 r.return(200, JSON.stringify(JSON.parse(body)));
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
111 })
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
112 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
113
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
114 function binary_var(r) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
115 var test = r.vars.binary_remote_addr.equals(Buffer.from([127,0,0,1]));
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
116 r.return(200, test);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
117 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
118
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
119 export default {njs: test_njs, return: test_return, req_body, res_body,
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
120 binary_var};
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
121
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
122 EOF
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
123
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
124 $t->try_run('no njs buffer')->plan(4);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
125
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
126 ###############################################################################
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
127
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
128 TODO: {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
129 local $TODO = 'not yet'
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
130 unless http_get('/njs') =~ /^([.0-9]+)$/m && $1 ge '0.5.0';
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
131
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
132 like(http_get('/return?text=FOO'), qr/200 OK.*body: FOO$/s,
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
133 'return buffer');
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
134 like(http_post('/req_body'), qr/200 OK.*BAR$/s, 'req body');
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
135 is(get_json('/res_body'), '{"c":{"b":1}}', 'res body');
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
136 like(http_get('/binary_var'), qr/200 OK.*true$/s,
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
137 'binary var');
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
138
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
139 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
140
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
141 ###############################################################################
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
142
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
143 sub recode {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
144 my $json;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
145 eval { $json = JSON::PP::decode_json(shift) };
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
146
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
147 if ($@) {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
148 return "<failed to parse JSON>";
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
149 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
150
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
151 JSON::PP->new()->canonical()->encode($json);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
152 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
153
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
154 sub get_json {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
155 http_get(shift) =~ /\x0d\x0a?\x0d\x0a?(.*)/ms;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
156 recode($1);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
157 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
158
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
159 sub http_post {
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
160 my ($url, %extra) = @_;
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
161
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
162 my $p = "POST $url HTTP/1.0" . CRLF .
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
163 "Host: localhost" . CRLF .
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
164 "Content-Length: 17" . CRLF .
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
165 CRLF .
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
166 "{\"a\":{\"b\":\"BAR\"}}";
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
167
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
168 return http($p, %extra);
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
169 }
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
170
a140cab489e8 Tests: added js buffer tests.
Dmitry Volyntsev <xeioex@nginx.com>
parents:
diff changeset
171 ###############################################################################