Mercurial > hg > nginx-tests
comparison stream_js_send.t @ 1811:520fb74cce4c
Tests: improved njs version check to account multi digit versions.
author | Dmitry Volyntsev <xeioex@nginx.com> |
---|---|
date | Fri, 02 Dec 2022 17:46:22 -0800 |
parents | 261967d85363 |
children |
comparison
equal
deleted
inserted
replaced
1810:7cf848422b28 | 1811:520fb74cce4c |
---|---|
126 $t->try_run('no stream njs available')->plan(2); | 126 $t->try_run('no stream njs available')->plan(2); |
127 $t->waitforsocket('127.0.0.1:' . port(8090)); | 127 $t->waitforsocket('127.0.0.1:' . port(8090)); |
128 | 128 |
129 ############################################################################### | 129 ############################################################################### |
130 | 130 |
131 TODO: { | |
132 local $TODO = 'not yet' | |
133 unless http_get('/njs') =~ /^([.0-9]+)$/m && $1 ge '0.7.8'; | |
134 | |
135 is(stream('127.0.0.1:' . port(8081))->io('abc'), 'ABC', | 131 is(stream('127.0.0.1:' . port(8081))->io('abc'), 'ABC', |
136 'async filter');; | 132 'async filter');; |
137 is(stream('127.0.0.1:' . port(8082))->io('abc'), 'xxxABC', | 133 is(stream('127.0.0.1:' . port(8082))->io('abc'), 'xxxABC', |
138 'async filter direct'); | 134 'async filter direct'); |
139 | 135 |
140 } | |
141 | |
142 $t->stop(); | 136 $t->stop(); |
137 | |
138 ############################################################################### | |
139 | |
140 sub has_version { | |
141 my $need = shift; | |
142 | |
143 http_get('/njs') =~ /^([.0-9]+)$/m; | |
144 | |
145 my @v = split(/\./, $1); | |
146 my ($n, $v); | |
147 | |
148 for $n (split(/\./, $need)) { | |
149 $v = shift @v || 0; | |
150 return 0 if $n > $v; | |
151 return 1 if $v > $n; | |
152 } | |
153 | |
154 return 1; | |
155 } | |
143 | 156 |
144 ############################################################################### | 157 ############################################################################### |
145 | 158 |
146 sub stream_daemon { | 159 sub stream_daemon { |
147 my $server = IO::Socket::INET->new( | 160 my $server = IO::Socket::INET->new( |