Mercurial > hg > nginx-vendor-0-8
diff src/http/modules/perl/ngx_http_perl_module.h @ 148:ea622d8acb38 NGINX_0_3_21
nginx 0.3.21
*) Feature: the ngx_http_perl_module.
*) Change: the "valid_referers" directive allows the referreres without
URI part.
author | Igor Sysoev <http://sysoev.ru> |
---|---|
date | Mon, 16 Jan 2006 00:00:00 +0300 |
parents | |
children | fef68f68bcfd |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/src/http/modules/perl/ngx_http_perl_module.h @@ -0,0 +1,49 @@ + +/* + * Copyright (C) Igor Sysoev + */ + + +#ifndef _NGX_HTTP_PERL_MODULE_H_INCLUDED_ +#define _NGX_HTTP_PERL_MODULE_H_INCLUDED_ + + +#include <ngx_config.h> +#include <ngx_core.h> +#include <ngx_http.h> + +#include <EXTERN.h> +#include <perl.h> + + +typedef ngx_http_request_t *nginx; + +typedef struct { + PerlInterpreter *perl; + + char *filename; + + ngx_str_t redirect_uri; + ngx_str_t redirect_args; + + ngx_http_ssi_ctx_t *ssi; +} ngx_http_perl_ctx_t; + + +extern ngx_module_t ngx_http_perl_module; + + +/* + * workaround for "unused variable `Perl___notused'" warning + * when building with perl 5.6.1 + */ +#ifndef PERL_IMPLICIT_CONTEXT +#undef dTHXa +#define dTHXa(a) +#endif + + +extern void boot_DynaLoader (pTHX_ CV* cv); + + +#endif /* _NGX_HTTP_PERL_MODULE_H_INCLUDED_ */