Re[4]: Модуль для nginx

[Igor Sysoev <is@xxxxxxxxxxxxx>]

On Wed, 25 Oct 2006, Konstantin Petrenko wrote:

> Monday, October 23, 2006, 4:39:03 PM, you wrote:
>
> $r->>sendfile(имя [, смещение [, длина]])  метод передаёт клиенту
> > содержимое указанного файла. Необязательные параметры указывают
> > начальное смещение и длину передаваемых данных. Собственно передача
> > данных происходит уже после завершения perl'ового обрабочтика.
> > Необходимо учитывать, что при использовании sendfile on содержимое
> > файла не будет проходить через gzip, SSI и charset фильтры.
> > insert - через post_action.
> Я правильно понял, что заголовки на докачку нужно самому
> обрабатывать/отдавать?

С прилагаемым патчем можно сделать так:

$r->allow_ranges;
$r->send_http_header;
$r->sendfile(...);


Игорь Сысоев
http://sysoev.ru

Index: src/http/modules/perl/nginx.xs
===================================================================
--- src/http/modules/perl/nginx.xs      (revision 130)
+++ src/http/modules/perl/nginx.xs      (working copy)
@@ -719,6 +719,19 @@
 
 
 void
+allow_ranges(r)
+    CODE:
+
+    ngx_http_request_t  *r;
+
+    ngx_http_perl_set_request(r);
+
+    r->allow_ranges = 1;
+
+    XSRETURN_EMPTY;
+
+
+void
 unescape(r, text, type = 0)
     CODE: