Mercurial > hg > nginx-tests

comparison lib/Test/Nginx.pm @ 1042:9339673bb454

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: check for known dynamic modules via TEST_NGINX_GLOBALS.
author Andrei Belov <defan@nginx.com>
date Mon, 26 Sep 2016 17:06:09 +0300
parents c0accd6fab6c
children 3667fe923239
comparison
equal deleted inserted replaced
1041:187524328926 1042:9339673bb454
191 $re = $feature if !defined $re; 191 $re = $feature if !defined $re;
192 192
193 $self->{_configure_args} = `$NGINX -V 2>&1` 193 $self->{_configure_args} = `$NGINX -V 2>&1`
194 if !defined $self->{_configure_args}; 194 if !defined $self->{_configure_args};
195 195
196 return ($self->{_configure_args} =~ $re) ? 1 : 0; 196 return 1 if $self->{_configure_args} =~ $re;
197
198 my %modules = (
199 image_filter
200 => 'ngx_http_image_filter_module.so',
201 perl => 'ngx_http_perl_module.so',
202 xslt => 'ngx_http_xslt_filter_module.so',
203 mail => 'ngx_mail_module.so',
204 stream => 'ngx_stream_module.so',
205 );
206
207 my $module = $modules{$feature};
208 if (defined $module && defined $ENV{TEST_NGINX_GLOBALS}) {
209 $re = qr/load_module\s+[^;]*\Q$module\E\s*;/;
210 return 1 if $ENV{TEST_NGINX_GLOBALS} =~ $re;
211 }
212
213 return 0;
197 } 214 }
198 215
199 sub has_feature($) { 216 sub has_feature($) {
200 my ($self, $feature) = @_; 217 my ($self, $feature) = @_;
201 218