diff options
| author | Ruslan Ermilov <ru@nginx.com> | 2012-12-13 15:05:19 +0000 |
|---|---|---|
| committer | Ruslan Ermilov <ru@nginx.com> | 2012-12-13 15:05:19 +0000 |
| commit | ba290091cf2c369ae36c6c3845f770f85f1172e6 (patch) | |
| tree | e9ab602ead9bc74a47760533e85f2eaed97c789d /src/http/modules/perl | |
| parent | b3430993f1ededfd1aa5544abbf75064d8589566 (diff) | |
| download | nginx-ba290091cf2c369ae36c6c3845f770f85f1172e6.tar.gz nginx-ba290091cf2c369ae36c6c3845f770f85f1172e6.zip | |
Fixed variable syntax checking in "set", "geo", "limit_conn_zone",
and "perl_set" directives.
Diffstat (limited to 'src/http/modules/perl')
| -rw-r--r-- | src/http/modules/perl/ngx_http_perl_module.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/http/modules/perl/ngx_http_perl_module.c b/src/http/modules/perl/ngx_http_perl_module.c index 90e32e80e..028b9f199 100644 --- a/src/http/modules/perl/ngx_http_perl_module.c +++ b/src/http/modules/perl/ngx_http_perl_module.c @@ -968,7 +968,7 @@ ngx_http_perl_set(ngx_conf_t *cf, ngx_command_t *cmd, void *conf) value = cf->args->elts; - if (value[1].data[0] != '$') { + if (value[1].len < 2 || value[1].data[0] != '$') { ngx_conf_log_error(NGX_LOG_EMERG, cf, 0, "invalid variable name \"%V\"", &value[1]); return NGX_CONF_ERROR; |