1 /* Licensed to the Apache Software Foundation (ASF) under one or more
2 * contributor license agreements. See the NOTICE file distributed with
3 * this work for additional information regarding copyright ownership.
4 * The ASF licenses this file to You under the Apache License, Version 2.0
5 * (the "License"); you may not use this file except in compliance with
6 * the License. You may obtain a copy of the License at
8 * http://www.apache.org/licenses/LICENSE-2.0
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
18 * @file core_filters.c
19 * @brief Core input/output network filters.
23 #include "apr_strings.h"
25 #include "apr_fnmatch.h"
27 #include "apr_thread_proc.h" /* for RLIMIT stuff */
29 #define APR_WANT_IOVEC
30 #define APR_WANT_STRFUNC
31 #define APR_WANT_MEMFUNC
34 #include "ap_config.h"
36 #include "http_config.h"
37 #include "http_core.h"
38 #include "http_protocol.h" /* For index_of_response(). Grump. */
39 #include "http_request.h"
40 #include "http_vhost.h"
41 #include "http_main.h" /* For the default_handler below... */
44 #include "http_connection.h"
45 #include "apr_buckets.h"
46 #include "util_filter.h"
47 #include "util_ebcdic.h"
48 #include "mpm_common.h"
49 #include "scoreboard.h"
51 #include "mod_proxy.h"
52 #include "ap_listen.h"
54 #include "mod_so.h" /* for ap_find_loaded_module_symbol */
56 #define AP_MIN_SENDFILE_BYTES (256)
59 * Remove all zero length buckets from the brigade.
61 #define BRIGADE_NORMALIZE(b) \
63 apr_bucket *e = APR_BRIGADE_FIRST(b); \
65 if (e->length == 0 && !APR_BUCKET_IS_METADATA(e)) { \
67 d = APR_BUCKET_NEXT(e); \
68 apr_bucket_delete(e); \
72 e = APR_BUCKET_NEXT(e); \
74 } while (!APR_BRIGADE_EMPTY(b) && (e != APR_BRIGADE_SENTINEL(b))); \
77 /* we know core's module_index is 0 */
78 #undef APLOG_MODULE_INDEX
79 #define APLOG_MODULE_INDEX AP_CORE_MODULE_INDEX
81 int ap_core_input_filter(ap_filter_t *f, apr_bucket_brigade *b,
82 ap_input_mode_t mode, apr_read_type_e block,
87 core_net_rec *net = f->ctx;
88 core_ctx_t *ctx = net->in_ctx;
92 if (mode == AP_MODE_INIT) {
94 * this mode is for filters that might need to 'initialize'
95 * a connection before reading request data from a client.
96 * NNTP over SSL for example needs to handshake before the
97 * server sends the welcome message.
98 * such filters would have changed the mode before this point
99 * is reached. however, protocol modules such as NNTP should
100 * not need to know anything about SSL. given the example, if
101 * SSL is not in the filter chain, AP_MODE_INIT is a noop.
108 ctx = apr_pcalloc(f->c->pool, sizeof(*ctx));
109 ctx->b = apr_brigade_create(f->c->pool, f->c->bucket_alloc);
110 ctx->tmpbb = apr_brigade_create(ctx->b->p, ctx->b->bucket_alloc);
111 /* seed the brigade with the client socket. */
112 e = apr_bucket_socket_create(net->client_socket, f->c->bucket_alloc);
113 APR_BRIGADE_INSERT_TAIL(ctx->b, e);
116 else if (APR_BRIGADE_EMPTY(ctx->b)) {
120 /* ### This is bad. */
121 BRIGADE_NORMALIZE(ctx->b);
123 /* check for empty brigade again *AFTER* BRIGADE_NORMALIZE()
124 * If we have lost our socket bucket (see above), we are EOF.
126 * Ideally, this should be returning SUCCESS with EOS bucket, but
127 * some higher-up APIs (spec. read_request_line via ap_rgetline)
128 * want an error code. */
129 if (APR_BRIGADE_EMPTY(ctx->b)) {
133 if (mode == AP_MODE_GETLINE) {
134 /* we are reading a single LF line, e.g. the HTTP headers */
135 rv = apr_brigade_split_line(b, ctx->b, block, HUGE_STRING_LEN);
136 /* We should treat EAGAIN here the same as we do for EOF (brigade is
137 * empty). We do this by returning whatever we have read. This may
138 * or may not be bogus, but is consistent (for now) with EOF logic.
140 if (APR_STATUS_IS_EAGAIN(rv) && block == APR_NONBLOCK_READ) {
146 /* ### AP_MODE_PEEK is a horrific name for this mode because we also
147 * eat any CRLFs that we see. That's not the obvious intention of
148 * this mode. Determine whether anyone actually uses this or not. */
149 if (mode == AP_MODE_EATCRLF) {
153 /* The purpose of this loop is to ignore any CRLF (or LF) at the end
154 * of a request. Many browsers send extra lines at the end of POST
155 * requests. We use the PEEK method to determine if there is more
156 * data on the socket, so that we know if we should delay sending the
157 * end of one request until we have served the second request in a
158 * pipelined situation. We don't want to actually delay sending a
159 * response if the server finds a CRLF (or LF), becuause that doesn't
160 * mean that there is another request, just a blank line.
163 if (APR_BRIGADE_EMPTY(ctx->b))
166 e = APR_BRIGADE_FIRST(ctx->b);
168 rv = apr_bucket_read(e, &str, &len, APR_NONBLOCK_READ);
170 if (rv != APR_SUCCESS)
174 while (c < str + len) {
175 if (*c == APR_ASCII_LF)
177 else if (*c == APR_ASCII_CR && *(c + 1) == APR_ASCII_LF)
183 /* If we reach here, we were a bucket just full of CRLFs, so
184 * just toss the bucket. */
185 /* FIXME: Is this the right thing to do in the core? */
186 apr_bucket_delete(e);
191 /* If mode is EXHAUSTIVE, we want to just read everything until the end
192 * of the brigade, which in this case means the end of the socket.
193 * To do this, we attach the brigade that has currently been setaside to
194 * the brigade that was passed down, and send that brigade back.
196 * NOTE: This is VERY dangerous to use, and should only be done with
197 * extreme caution. FWLIW, this would be needed by an MPM like Perchild;
198 * such an MPM can easily request the socket and all data that has been
199 * read, which means that it can pass it to the correct child process.
201 if (mode == AP_MODE_EXHAUSTIVE) {
204 /* Tack on any buckets that were set aside. */
205 APR_BRIGADE_CONCAT(b, ctx->b);
207 /* Since we've just added all potential buckets (which will most
208 * likely simply be the socket bucket) we know this is the end,
209 * so tack on an EOS too. */
210 /* We have read until the brigade was empty, so we know that we
212 e = apr_bucket_eos_create(f->c->bucket_alloc);
213 APR_BRIGADE_INSERT_TAIL(b, e);
217 /* read up to the amount they specified. */
218 if (mode == AP_MODE_READBYTES || mode == AP_MODE_SPECULATIVE) {
221 AP_DEBUG_ASSERT(readbytes > 0);
223 e = APR_BRIGADE_FIRST(ctx->b);
224 rv = apr_bucket_read(e, &str, &len, block);
226 if (APR_STATUS_IS_EAGAIN(rv) && block == APR_NONBLOCK_READ) {
227 /* getting EAGAIN for a blocking read is an error; for a
228 * non-blocking read, return an empty brigade. */
231 else if (rv != APR_SUCCESS) {
234 else if (block == APR_BLOCK_READ && len == 0) {
235 /* We wanted to read some bytes in blocking mode. We read
236 * 0 bytes. Hence, we now assume we are EOS.
238 * When we are in normal mode, return an EOS bucket to the
240 * When we are in speculative mode, leave ctx->b empty, so
241 * that the next call returns an EOS bucket.
243 apr_bucket_delete(e);
245 if (mode == AP_MODE_READBYTES) {
246 e = apr_bucket_eos_create(f->c->bucket_alloc);
247 APR_BRIGADE_INSERT_TAIL(b, e);
252 /* Have we read as much data as we wanted (be greedy)? */
253 if (len < readbytes) {
254 apr_size_t bucket_len;
257 /* We already registered the data in e in len */
258 e = APR_BUCKET_NEXT(e);
259 while ((len < readbytes) && (rv == APR_SUCCESS)
260 && (e != APR_BRIGADE_SENTINEL(ctx->b))) {
261 /* Check for the availability of buckets with known length */
262 if (e->length != -1) {
264 e = APR_BUCKET_NEXT(e);
268 * Read from bucket, but non blocking. If there isn't any
269 * more data, well than this is fine as well, we will
270 * not wait for more since we already got some and we are
271 * only checking if there isn't more.
273 rv = apr_bucket_read(e, &str, &bucket_len,
275 if (rv == APR_SUCCESS) {
277 e = APR_BUCKET_NEXT(e);
283 /* We can only return at most what we read. */
284 if (len < readbytes) {
288 rv = apr_brigade_partition(ctx->b, readbytes, &e);
289 if (rv != APR_SUCCESS) {
293 /* Must do move before CONCAT */
294 ctx->tmpbb = apr_brigade_split_ex(ctx->b, e, ctx->tmpbb);
296 if (mode == AP_MODE_READBYTES) {
297 APR_BRIGADE_CONCAT(b, ctx->b);
299 else if (mode == AP_MODE_SPECULATIVE) {
300 apr_bucket *copy_bucket;
302 for (e = APR_BRIGADE_FIRST(ctx->b);
303 e != APR_BRIGADE_SENTINEL(ctx->b);
304 e = APR_BUCKET_NEXT(e))
306 rv = apr_bucket_copy(e, ©_bucket);
307 if (rv != APR_SUCCESS) {
310 APR_BRIGADE_INSERT_TAIL(b, copy_bucket);
314 /* Take what was originally there and place it back on ctx->b */
315 APR_BRIGADE_CONCAT(ctx->b, ctx->tmpbb);
320 static void setaside_remaining_output(ap_filter_t *f,
321 core_output_filter_ctx_t *ctx,
322 apr_bucket_brigade *bb,
325 static apr_status_t send_brigade_nonblocking(apr_socket_t *s,
326 apr_bucket_brigade *bb,
327 apr_size_t *bytes_written,
330 static void remove_empty_buckets(apr_bucket_brigade *bb);
332 static apr_status_t send_brigade_blocking(apr_socket_t *s,
333 apr_bucket_brigade *bb,
334 apr_size_t *bytes_written,
337 static apr_status_t writev_nonblocking(apr_socket_t *s,
338 struct iovec *vec, apr_size_t nvec,
339 apr_bucket_brigade *bb,
340 apr_size_t *cumulative_bytes_written,
344 static apr_status_t sendfile_nonblocking(apr_socket_t *s,
346 apr_size_t *cumulative_bytes_written,
350 /* XXX: Should these be configurable parameters? */
351 #define THRESHOLD_MIN_WRITE 4096
352 #define THRESHOLD_MAX_BUFFER 65536
353 #define MAX_REQUESTS_IN_PIPELINE 5
355 /* Optional function coming from mod_logio, used for logging of output
358 extern APR_OPTIONAL_FN_TYPE(ap_logio_add_bytes_out) *ap__logio_add_bytes_out;
360 apr_status_t ap_core_output_filter(ap_filter_t *f, apr_bucket_brigade *new_bb)
363 core_net_rec *net = f->ctx;
364 core_output_filter_ctx_t *ctx = net->out_ctx;
365 apr_bucket_brigade *bb = NULL;
366 apr_bucket *bucket, *next, *flush_upto = NULL;
367 apr_size_t bytes_in_brigade, non_file_bytes_in_brigade;
368 int eor_buckets_in_brigade;
371 /* Fail quickly if the connection has already been aborted. */
373 if (new_bb != NULL) {
374 apr_brigade_cleanup(new_bb);
376 return APR_ECONNABORTED;
380 ctx = apr_pcalloc(c->pool, sizeof(*ctx));
381 net->out_ctx = (core_output_filter_ctx_t *)ctx;
382 rv = apr_socket_opt_set(net->client_socket, APR_SO_NONBLOCK, 1);
383 if (rv != APR_SUCCESS) {
387 * Need to create tmp brigade with correct lifetime. Passing
388 * NULL to apr_brigade_split_ex would result in a brigade
389 * allocated from bb->pool which might be wrong.
391 ctx->tmp_flush_bb = apr_brigade_create(c->pool, c->bucket_alloc);
392 /* same for buffered_bb and ap_save_brigade */
393 ctx->buffered_bb = apr_brigade_create(c->pool, c->bucket_alloc);
396 if (new_bb != NULL) {
397 for (bucket = APR_BRIGADE_FIRST(new_bb); bucket != APR_BRIGADE_SENTINEL(new_bb); bucket = APR_BUCKET_NEXT(bucket)) {
398 if (bucket->length > 0) {
399 ctx->bytes_in += bucket->length;
405 if ((ctx->buffered_bb != NULL) &&
406 !APR_BRIGADE_EMPTY(ctx->buffered_bb)) {
407 if (new_bb != NULL) {
408 APR_BRIGADE_PREPEND(bb, ctx->buffered_bb);
411 bb = ctx->buffered_bb;
413 c->data_in_output_filters = 0;
415 else if (new_bb == NULL) {
419 /* Scan through the brigade and decide whether to attempt a write,
420 * based on the following rules:
422 * 1) The new_bb is null: Do a nonblocking write of as much as
423 * possible: do a nonblocking write of as much data as possible,
424 * then save the rest in ctx->buffered_bb. (If new_bb == NULL,
425 * it probably means that the MPM is doing asynchronous write
426 * completion and has just determined that this connection
429 * 2) The brigade contains a flush bucket: Do a blocking write
430 * of everything up that point.
432 * 3) The request is in CONN_STATE_HANDLER state, and the brigade
433 * contains at least THRESHOLD_MAX_BUFFER bytes in non-file
434 * buckets: Do blocking writes until the amount of data in the
435 * buffer is less than THRESHOLD_MAX_BUFFER. (The point of this
436 * rule is to provide flow control, in case a handler is
437 * streaming out lots of data faster than the data can be
438 * sent to the client.)
440 * 4) The request is in CONN_STATE_HANDLER state, and the brigade
441 * contains at least MAX_REQUESTS_IN_PIPELINE EOR buckets:
442 * Do blocking writes until less than MAX_REQUESTS_IN_PIPELINE EOR
443 * buckets are left. (The point of this rule is to prevent too many
444 * FDs being kept open by pipelined requests, possibly allowing a
447 * 5) The brigade contains at least THRESHOLD_MIN_WRITE
448 * bytes: Do a nonblocking write of as much data as possible,
449 * then save the rest in ctx->buffered_bb.
452 if (new_bb == NULL) {
453 rv = send_brigade_nonblocking(net->client_socket, bb,
454 &(ctx->bytes_written), c);
455 if (APR_STATUS_IS_EAGAIN(rv)) {
458 else if (rv != APR_SUCCESS) {
459 /* The client has aborted the connection */
462 setaside_remaining_output(f, ctx, bb, c);
466 bytes_in_brigade = 0;
467 non_file_bytes_in_brigade = 0;
468 eor_buckets_in_brigade = 0;
469 for (bucket = APR_BRIGADE_FIRST(bb); bucket != APR_BRIGADE_SENTINEL(bb);
471 next = APR_BUCKET_NEXT(bucket);
473 if (!APR_BUCKET_IS_METADATA(bucket)) {
474 if (bucket->length == (apr_size_t)-1) {
477 /* XXX support nonblocking read here? */
478 rv = apr_bucket_read(bucket, &data, &length, APR_BLOCK_READ);
479 if (rv != APR_SUCCESS) {
482 /* reading may have split the bucket, so recompute next: */
483 next = APR_BUCKET_NEXT(bucket);
485 bytes_in_brigade += bucket->length;
486 if (!APR_BUCKET_IS_FILE(bucket)) {
487 non_file_bytes_in_brigade += bucket->length;
490 else if (AP_BUCKET_IS_EOR(bucket)) {
491 eor_buckets_in_brigade++;
494 if (APR_BUCKET_IS_FLUSH(bucket) ||
495 (non_file_bytes_in_brigade >= THRESHOLD_MAX_BUFFER) ||
496 (eor_buckets_in_brigade > MAX_REQUESTS_IN_PIPELINE) )
498 if (APLOGctrace6(c)) {
499 char *reason = APR_BUCKET_IS_FLUSH(bucket) ?
501 (non_file_bytes_in_brigade >= THRESHOLD_MAX_BUFFER) ?
502 "THRESHOLD_MAX_BUFFER" :
503 "MAX_REQUESTS_IN_PIPELINE";
504 ap_log_cerror(APLOG_MARK, APLOG_TRACE6, 0, c,
505 "core_output_filter: flushing because of %s",
509 * Defer the actual blocking write to avoid doing many writes.
513 bytes_in_brigade = 0;
514 non_file_bytes_in_brigade = 0;
515 eor_buckets_in_brigade = 0;
519 if (flush_upto != NULL) {
520 ctx->tmp_flush_bb = apr_brigade_split_ex(bb, flush_upto,
522 rv = send_brigade_blocking(net->client_socket, bb,
523 &(ctx->bytes_written), c);
524 if (rv != APR_SUCCESS) {
525 /* The client has aborted the connection */
529 APR_BRIGADE_CONCAT(bb, ctx->tmp_flush_bb);
532 if (bytes_in_brigade >= THRESHOLD_MIN_WRITE) {
533 rv = send_brigade_nonblocking(net->client_socket, bb,
534 &(ctx->bytes_written), c);
535 if ((rv != APR_SUCCESS) && (!APR_STATUS_IS_EAGAIN(rv))) {
536 /* The client has aborted the connection */
542 setaside_remaining_output(f, ctx, bb, c);
547 * This function assumes that either ctx->buffered_bb == NULL, or
548 * ctx->buffered_bb is empty, or ctx->buffered_bb == bb
550 static void setaside_remaining_output(ap_filter_t *f,
551 core_output_filter_ctx_t *ctx,
552 apr_bucket_brigade *bb,
558 remove_empty_buckets(bb);
559 if (!APR_BRIGADE_EMPTY(bb)) {
560 c->data_in_output_filters = 1;
561 if (bb != ctx->buffered_bb) {
562 if (!ctx->deferred_write_pool) {
563 apr_pool_create(&ctx->deferred_write_pool, c->pool);
564 apr_pool_tag(ctx->deferred_write_pool, "deferred_write");
566 ap_save_brigade(f, &(ctx->buffered_bb), &bb,
567 ctx->deferred_write_pool);
568 apr_brigade_cleanup(bb);
571 else if (ctx->deferred_write_pool) {
573 * There are no more requests in the pipeline. We can just clear the
576 apr_pool_clear(ctx->deferred_write_pool);
580 #ifndef APR_MAX_IOVEC_SIZE
581 #define MAX_IOVEC_TO_WRITE 16
583 #if APR_MAX_IOVEC_SIZE > 16
584 #define MAX_IOVEC_TO_WRITE 16
586 #define MAX_IOVEC_TO_WRITE APR_MAX_IOVEC_SIZE
590 static apr_status_t send_brigade_nonblocking(apr_socket_t *s,
591 apr_bucket_brigade *bb,
592 apr_size_t *bytes_written,
595 apr_bucket *bucket, *next;
597 struct iovec vec[MAX_IOVEC_TO_WRITE];
600 remove_empty_buckets(bb);
602 for (bucket = APR_BRIGADE_FIRST(bb);
603 bucket != APR_BRIGADE_SENTINEL(bb);
605 next = APR_BUCKET_NEXT(bucket);
607 if (APR_BUCKET_IS_FILE(bucket)) {
608 apr_bucket_file *file_bucket = (apr_bucket_file *)(bucket->data);
609 apr_file_t *fd = file_bucket->fd;
610 /* Use sendfile to send this file unless:
611 * - the platform doesn't support sendfile,
612 * - the file is too small for sendfile to be useful, or
613 * - sendfile is disabled in the httpd config via "EnableSendfile off"
616 if ((apr_file_flags_get(fd) & APR_SENDFILE_ENABLED) &&
617 (bucket->length >= AP_MIN_SENDFILE_BYTES)) {
619 (void)apr_socket_opt_set(s, APR_TCP_NOPUSH, 1);
620 rv = writev_nonblocking(s, vec, nvec, bb, bytes_written, c);
622 if (rv != APR_SUCCESS) {
623 (void)apr_socket_opt_set(s, APR_TCP_NOPUSH, 0);
627 rv = sendfile_nonblocking(s, bucket, bytes_written, c);
629 (void)apr_socket_opt_set(s, APR_TCP_NOPUSH, 0);
631 if (rv != APR_SUCCESS) {
637 #endif /* APR_HAS_SENDFILE */
638 /* didn't sendfile */
639 if (!APR_BUCKET_IS_METADATA(bucket)) {
642 rv = apr_bucket_read(bucket, &data, &length, APR_BLOCK_READ);
643 if (rv != APR_SUCCESS) {
646 /* reading may have split the bucket, so recompute next: */
647 next = APR_BUCKET_NEXT(bucket);
648 vec[nvec].iov_base = (char *)data;
649 vec[nvec].iov_len = length;
651 if (nvec == MAX_IOVEC_TO_WRITE) {
652 rv = writev_nonblocking(s, vec, nvec, bb, bytes_written, c);
654 if (rv != APR_SUCCESS) {
663 rv = writev_nonblocking(s, vec, nvec, bb, bytes_written, c);
664 if (rv != APR_SUCCESS) {
669 remove_empty_buckets(bb);
674 static void remove_empty_buckets(apr_bucket_brigade *bb)
677 while (((bucket = APR_BRIGADE_FIRST(bb)) != APR_BRIGADE_SENTINEL(bb)) &&
678 (APR_BUCKET_IS_METADATA(bucket) || (bucket->length == 0))) {
679 APR_BUCKET_REMOVE(bucket);
680 apr_bucket_destroy(bucket);
684 static apr_status_t send_brigade_blocking(apr_socket_t *s,
685 apr_bucket_brigade *bb,
686 apr_size_t *bytes_written,
692 while (!APR_BRIGADE_EMPTY(bb)) {
693 rv = send_brigade_nonblocking(s, bb, bytes_written, c);
694 if (rv != APR_SUCCESS) {
695 if (APR_STATUS_IS_EAGAIN(rv)) {
696 /* Wait until we can send more data */
698 apr_interval_time_t timeout;
699 apr_pollfd_t pollset;
702 pollset.desc_type = APR_POLL_SOCKET;
703 pollset.reqevents = APR_POLLOUT;
705 apr_socket_timeout_get(s, &timeout);
706 rv = apr_poll(&pollset, 1, &nsds, timeout);
707 if (rv != APR_SUCCESS) {
719 static apr_status_t writev_nonblocking(apr_socket_t *s,
720 struct iovec *vec, apr_size_t nvec,
721 apr_bucket_brigade *bb,
722 apr_size_t *cumulative_bytes_written,
725 apr_status_t rv = APR_SUCCESS, arv;
726 apr_size_t bytes_written = 0, bytes_to_write = 0;
727 apr_size_t i, offset;
728 apr_interval_time_t old_timeout;
730 arv = apr_socket_timeout_get(s, &old_timeout);
731 if (arv != APR_SUCCESS) {
734 arv = apr_socket_timeout_set(s, 0);
735 if (arv != APR_SUCCESS) {
739 for (i = 0; i < nvec; i++) {
740 bytes_to_write += vec[i].iov_len;
743 while (bytes_written < bytes_to_write) {
745 rv = apr_socket_sendv(s, vec + offset, nvec - offset, &n);
748 for (i = offset; i < nvec; ) {
749 apr_bucket *bucket = APR_BRIGADE_FIRST(bb);
750 if (APR_BUCKET_IS_METADATA(bucket)) {
751 APR_BUCKET_REMOVE(bucket);
752 apr_bucket_destroy(bucket);
754 else if (n >= vec[i].iov_len) {
755 APR_BUCKET_REMOVE(bucket);
756 apr_bucket_destroy(bucket);
758 n -= vec[i++].iov_len;
761 apr_bucket_split(bucket, n);
762 APR_BUCKET_REMOVE(bucket);
763 apr_bucket_destroy(bucket);
765 vec[i].iov_base = (char *) vec[i].iov_base + n;
770 if (rv != APR_SUCCESS) {
774 if ((ap__logio_add_bytes_out != NULL) && (bytes_written > 0)) {
775 ap__logio_add_bytes_out(c, bytes_written);
777 *cumulative_bytes_written += bytes_written;
779 arv = apr_socket_timeout_set(s, old_timeout);
780 if ((arv != APR_SUCCESS) && (rv == APR_SUCCESS)) {
790 static apr_status_t sendfile_nonblocking(apr_socket_t *s,
792 apr_size_t *cumulative_bytes_written,
795 apr_status_t rv = APR_SUCCESS;
796 apr_bucket_file *file_bucket;
798 apr_size_t file_length;
799 apr_off_t file_offset;
800 apr_size_t bytes_written = 0;
802 if (!APR_BUCKET_IS_FILE(bucket)) {
803 ap_log_error(APLOG_MARK, APLOG_ERR, rv, c->base_server, APLOGNO(00006)
804 "core_filter: sendfile_nonblocking: "
805 "this should never happen");
808 file_bucket = (apr_bucket_file *)(bucket->data);
809 fd = file_bucket->fd;
810 file_length = bucket->length;
811 file_offset = bucket->start;
813 if (bytes_written < file_length) {
814 apr_size_t n = file_length - bytes_written;
816 apr_interval_time_t old_timeout;
818 arv = apr_socket_timeout_get(s, &old_timeout);
819 if (arv != APR_SUCCESS) {
822 arv = apr_socket_timeout_set(s, 0);
823 if (arv != APR_SUCCESS) {
826 rv = apr_socket_sendfile(s, fd, NULL, &file_offset, &n, 0);
827 if (rv == APR_SUCCESS) {
831 arv = apr_socket_timeout_set(s, old_timeout);
832 if ((arv != APR_SUCCESS) && (rv == APR_SUCCESS)) {
836 if ((ap__logio_add_bytes_out != NULL) && (bytes_written > 0)) {
837 ap__logio_add_bytes_out(c, bytes_written);
839 *cumulative_bytes_written += bytes_written;
840 if ((bytes_written < file_length) && (bytes_written > 0)) {
841 apr_bucket_split(bucket, bytes_written);
842 APR_BUCKET_REMOVE(bucket);
843 apr_bucket_destroy(bucket);
845 else if (bytes_written == file_length) {
846 APR_BUCKET_REMOVE(bucket);
847 apr_bucket_destroy(bucket);