2 +--------------------------------------------------------------------+
4 +--------------------------------------------------------------------+
5 | Redistribution and use in source and binary forms, with or without |
6 | modification, are permitted provided that the conditions mentioned |
7 | in the accompanying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2005, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
21 #include "php_http_api.h"
22 #include "php_http_std_defs.h"
23 #include "php_http_info_api.h"
27 ZEND_EXTERN_MODULE_GLOBALS(http
);
29 PHP_HTTP_API
void _http_info_default_callback(void **nothing
, HashTable
**headers
, http_info
*info TSRMLS_DC
)
33 INIT_ZARR(array
, *headers
);
38 add_assoc_string(&array
, "Request Method", HTTP_INFO(info
).request
.method
, 1);
39 add_assoc_string(&array
, "Request Uri", HTTP_INFO(info
).request
.URI
, 1);
42 case IS_HTTP_RESPONSE
:
43 add_assoc_long(&array
, "Response Code", (long) HTTP_INFO(info
).response
.code
);
44 add_assoc_string(&array
, "Response Status", HTTP_INFO(info
).response
.status
, 1);
49 PHP_HTTP_API
void _http_info_dtor(http_info
*info
)
51 http_info_t
*i
= (http_info_t
*) info
;
56 STR_SET(i
->request
.method
, NULL
);
57 STR_SET(i
->request
.URI
, NULL
);
60 case IS_HTTP_RESPONSE
:
61 STR_SET(i
->response
.status
, NULL
);
69 PHP_HTTP_API STATUS
_http_info_parse_ex(const char *pre_header
, http_info
*info
, zend_bool silent TSRMLS_DC
)
71 const char *end
, *http
;
74 if ((!pre_header
) || (!*pre_header
)) {
76 http_error(HE_WARNING
, HTTP_E_MALFORMED_HEADERS
, "Empty pre-header HTTP info");
81 /* where's the end of the line */
82 if (!(end
= http_locate_eol(pre_header
, NULL
))) {
83 end
= pre_header
+ strlen(pre_header
);
86 /* there must be HTTP/1.x in the line
87 * and nothing than SPACE or NUL after HTTP/1.x
89 if ( (!(http
= strstr(pre_header
, "HTTP/1."))) ||
91 (!isdigit(http
[lenof("HTTP/1.")])) ||
92 (http
[lenof("HTTP/1.1")] && (!isspace(http
[lenof("HTTP/1.1")])))) {
94 http_error(HE_WARNING
, HTTP_E_MALFORMED_HEADERS
, "Invalid or missing HTTP/1.x protocol identification");
101 char *line
= estrndup(pre_header
, end
- pre_header
);
102 fprintf(stderr
, "http_parse_info('%s')\n", line
);
107 info
->http
.version
= atof(http
+ lenof("HTTP/"));
110 if (pre_header
== http
) {
112 const char *code
= http
+ sizeof("HTTP/1.1");
114 info
->type
= IS_HTTP_RESPONSE
;
115 HTTP_INFO(info
).response
.code
= (code
&& (end
> code
)) ? strtol(code
, &status
, 10) : 0;
116 HTTP_INFO(info
).response
.status
= (status
&& (end
> ++status
)) ? estrndup(status
, end
- status
) : ecalloc(1,1);
122 else if (!http
[lenof("HTTP/1.x")] || http
[lenof("HTTP/1.x")] == '\r' || http
[lenof("HTTP/1.x")] == '\n') {
123 const char *url
= strchr(pre_header
, ' ');
125 info
->type
= IS_HTTP_REQUEST
;
126 if (url
&& http
> url
) {
127 HTTP_INFO(info
).request
.method
= estrndup(pre_header
, url
- pre_header
);
128 HTTP_INFO(info
).request
.URI
= estrndup(url
+ 1, http
- url
- 2);
130 HTTP_INFO(info
).request
.method
= ecalloc(1,1);
131 HTTP_INFO(info
).request
.URI
= ecalloc(1,1);
137 /* some darn header containing HTTP/1.x */
149 * vim600: noet sw=4 ts=4 fdm=marker
150 * vim<600: noet sw=4 ts=4