2 +----------------------------------------------------------------------+
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.0 of the PHP license, that |
6 | is bundled with this package in the file LICENSE, and is available |
7 | through the world-wide-web at http://www.php.net/license/3_0.txt. |
8 | If you did not receive a copy of the PHP license and are unable to |
9 | obtain it through the world-wide-web, please send a note to |
10 | license@php.net so we can mail you a copy immediately. |
11 +----------------------------------------------------------------------+
12 | Copyright (c) 2004-2005 Michael Wallner <mike@php.net> |
13 +----------------------------------------------------------------------+
24 #include "php_streams.h"
25 #include "php_output.h"
26 #include "ext/standard/md5.h"
27 #include "ext/standard/sha1.h"
30 #include "php_http_std_defs.h"
31 #include "php_http_api.h"
32 #include "php_http_cache_api.h"
33 #include "php_http_send_api.h"
34 #include "php_http_date_api.h"
36 #ifdef HTTP_HAVE_MHASH
40 ZEND_EXTERN_MODULE_GLOBALS(http
);
42 STATUS
_http_cache_global_init(INIT_FUNC_ARGS
)
44 HTTP_LONG_CONSTANT("HTTP_ETAG_MD5", HTTP_ETAG_MD5
);
45 HTTP_LONG_CONSTANT("HTTP_ETAG_SHA1", HTTP_ETAG_SHA1
);
46 HTTP_LONG_CONSTANT("HTTP_ETAG_CRC32", HTTP_ETAG_CRC32
);
48 #ifdef HTTP_HAVE_MHASH
50 int l
, i
, c
= mhash_count();
52 for (i
= 0; i
<= c
; ++i
) {
53 char const_name
[256] = {0};
54 const char *hash_name
= mhash_get_hash_name_static(i
);
57 l
= snprintf(const_name
, 255, "HTTP_ETAG_MHASH_%s", hash_name
);
58 zend_register_long_constant(const_name
, l
+ 1, i
, CONST_CS
|CONST_PERSISTENT
, module_number TSRMLS_CC
);
67 /* {{{ char *http_etag(void *, size_t, http_send_mode) */
68 PHP_HTTP_API
char *_http_etag(const void *data_ptr
, size_t data_len
, http_send_mode data_mode TSRMLS_DC
)
70 php_stream_statbuf ssb
;
71 char ssb_buf
[128] = {0};
73 void *ctx
= http_etag_init();
78 http_etag_update(ctx
, data_ptr
, data_len
);
83 if (php_stream_stat((php_stream
*) data_ptr
, &ssb
)) {
87 ssb_len
= snprintf(ssb_buf
, 127, "%ld=%ld=%ld", ssb
.sb
.st_mtime
, ssb
.sb
.st_ino
, ssb
.sb
.st_size
);
88 http_etag_update(ctx
, ssb_buf
, ssb_len
);
94 if (php_stream_stat_path((char *) data_ptr
, &ssb
)) {
98 ssb_len
= snprintf(ssb_buf
, 127, "%ld=%ld=%ld", ssb
.sb
.st_mtime
, ssb
.sb
.st_ino
, ssb
.sb
.st_size
);
99 http_etag_update(ctx
, ssb_buf
, ssb_len
);
104 return http_etag_finish(ctx
);
108 /* {{{ time_t http_last_modified(void *, http_send_mode) */
109 PHP_HTTP_API
time_t _http_last_modified(const void *data_ptr
, http_send_mode data_mode TSRMLS_DC
)
111 php_stream_statbuf ssb
;
115 case SEND_DATA
: return time(NULL
);
116 case SEND_RSRC
: return php_stream_stat((php_stream
*) data_ptr
, &ssb
) ? 0 : ssb
.sb
.st_mtime
;
117 default: return php_stream_stat_path((char *) data_ptr
, &ssb
) ? 0 : ssb
.sb
.st_mtime
;
122 /* {{{ zend_bool http_match_last_modified(char *, time_t) */
123 PHP_HTTP_API zend_bool
_http_match_last_modified_ex(const char *entry
, time_t t
, zend_bool enforce_presence TSRMLS_DC
)
127 char *modified
, *chr_ptr
;
129 HTTP_GSC(zmodified
, entry
, !enforce_presence
);
131 modified
= estrndup(Z_STRVAL_P(zmodified
), Z_STRLEN_P(zmodified
));
132 if (chr_ptr
= strrchr(modified
, ';')) {
135 retval
= (t
<= http_parse_date(modified
));
141 /* {{{ zend_bool http_match_etag(char *, char *) */
142 PHP_HTTP_API zend_bool
_http_match_etag_ex(const char *entry
, const char *etag
, zend_bool enforce_presence TSRMLS_DC
)
148 HTTP_GSC(zetag
, entry
, !enforce_presence
);
150 if (NULL
!= strchr(Z_STRVAL_P(zetag
), '*')) {
154 quoted_etag
= (char *) emalloc(strlen(etag
) + 3);
155 sprintf(quoted_etag
, "\"%s\"", etag
);
157 if (!strchr(Z_STRVAL_P(zetag
), ',')) {
158 result
= !strcmp(Z_STRVAL_P(zetag
), quoted_etag
);
160 result
= (NULL
!= strstr(Z_STRVAL_P(zetag
), quoted_etag
));
167 /* {{{ STATUS http_cache_last_modified(time_t, time_t, char *, size_t) */
168 PHP_HTTP_API STATUS
_http_cache_last_modified(time_t last_modified
,
169 time_t send_modified
, const char *cache_control
, size_t cc_len TSRMLS_DC
)
171 char *sent_header
= NULL
;
173 if (cc_len
&& (SUCCESS
!= http_send_cache_control(cache_control
, cc_len
))) {
177 if (SUCCESS
!= http_send_last_modified_ex(send_modified
, &sent_header
)) {
181 if (http_match_last_modified("HTTP_IF_MODIFIED_SINCE", last_modified
)) {
182 http_exit_ex(304, sent_header
, NULL
, 0);
184 STR_FREE(sent_header
);
191 /* {{{ STATUS http_cache_etag(char *, size_t, char *, size_t) */
192 PHP_HTTP_API STATUS
_http_cache_etag(const char *etag
, size_t etag_len
,
193 const char *cache_control
, size_t cc_len TSRMLS_DC
)
195 char *sent_header
= NULL
;
197 if (cc_len
&& (SUCCESS
!= http_send_cache_control(cache_control
, cc_len
))) {
202 if (SUCCESS
!= http_send_etag_ex(etag
, etag_len
, &sent_header
)) {
205 if (http_match_etag("HTTP_IF_NONE_MATCH", etag
)) {
206 http_exit_ex(304, sent_header
, NULL
, 0);
208 STR_FREE(sent_header
);
213 /* already running? */
214 if (php_ob_handler_used("ob_etaghandler" TSRMLS_CC
)) {
215 http_error(HE_WARNING
, HTTP_E_RUNTIME
, "ob_etaghandler can only be used once");
219 /* we want the etag handler to run */
220 HTTP_G(etag
).started
= 1;
221 return php_start_ob_buffer_named("ob_etaghandler", HTTP_G(send
).buffer_size
, 1 TSRMLS_CC
);
225 /* {{{ void http_ob_etaghandler(char *, uint, char **, uint *, int) */
226 PHP_HTTP_API
void _http_ob_etaghandler(char *output
, uint output_len
,
227 char **handled_output
, uint
*handled_output_len
, int mode TSRMLS_DC
)
230 *handled_output_len
= output_len
;
231 *handled_output
= estrndup(output
, output_len
);
233 /* are we supposed to run? */
234 if (HTTP_G(etag
).started
) {
235 /* initialize the etag context */
236 if (mode
& PHP_OUTPUT_HANDLER_START
) {
237 HTTP_G(etag
).ctx
= http_etag_init();
241 http_etag_update(HTTP_G(etag
).ctx
, output
, output_len
);
244 if (mode
& PHP_OUTPUT_HANDLER_END
) {
245 char *sent_header
= NULL
;
246 char *etag
= http_etag_finish(HTTP_G(etag
).ctx
);
248 http_send_cache_control(HTTP_DEFAULT_CACHECONTROL
, lenof(HTTP_DEFAULT_CACHECONTROL
));
249 http_send_etag_ex(etag
, strlen(etag
), &sent_header
);
251 if (http_match_etag("HTTP_IF_NONE_MATCH", etag
)) {
252 http_exit_ex(304, sent_header
, etag
, 0);
255 STR_FREE(sent_header
);
267 * vim600: sw=4 ts=4 fdm=marker