+++ /dev/null
-/*
- +--------------------------------------------------------------------+
- | PECL :: http |
- +--------------------------------------------------------------------+
- | Redistribution and use in source and binary forms, with or without |
- | modification, are permitted provided that the conditions mentioned |
- | in the accompanying LICENSE file are met. |
- +--------------------------------------------------------------------+
- | Copyright (c) 2004-2010, Michael Wallner <mike@php.net> |
- +--------------------------------------------------------------------+
-*/
-
-/* $Id$ */
-
-#include "php_http.h"
-
-#include "php_http_api.h"
-#include "php_http_info_api.h"
-
-PHP_HTTP_API void _http_info_default_callback(void **nothing, HashTable **headers, http_info *info TSRMLS_DC)
-{
- zval array;
-
- INIT_ZARR(array, *headers);
-
- switch (info->type) {
- case IS_HTTP_REQUEST:
- add_assoc_string(&array, "Request Method", HTTP_INFO(info).request.method, 1);
- add_assoc_string(&array, "Request Url", HTTP_INFO(info).request.url, 1);
- break;
-
- case IS_HTTP_RESPONSE:
- add_assoc_long(&array, "Response Code", (long) HTTP_INFO(info).response.code);
- if (HTTP_INFO(info).response.status) {
- add_assoc_string(&array, "Response Status", HTTP_INFO(info).response.status, 1);
- }
- break;
- }
-}
-
-PHP_HTTP_API void _http_info_dtor(http_info *i)
-{
- switch (i->type) {
- case IS_HTTP_REQUEST:
- STR_SET(HTTP_INFO(i).request.method, NULL);
- STR_SET(HTTP_INFO(i).request.url, NULL);
- break;
-
- case IS_HTTP_RESPONSE:
- STR_SET(HTTP_INFO(i).response.status, NULL);
- break;
-
- default:
- break;
- }
-}
-
-PHP_HTTP_API STATUS _http_info_parse_ex(const char *pre_header, http_info *info, zend_bool silent TSRMLS_DC)
-{
- const char *end, *http;
-
- /* sane parameter */
- if ((!pre_header) || (!*pre_header)) {
- return FAILURE;
- }
-
- /* where's the end of the line */
- if (!(end = http_locate_eol(pre_header, NULL))) {
- end = pre_header + strlen(pre_header);
- }
-
- /* there must be HTTP/1.x in the line */
- if (!(http = http_locate_str(pre_header, end - pre_header, "HTTP/1.", lenof("HTTP/1.")))) {
- return FAILURE;
- }
-
- /* and nothing than SPACE or NUL after HTTP/1.x */
- if ( (!HTTP_IS_CTYPE(digit, http[lenof("HTTP/1.")])) ||
- (http[lenof("HTTP/1.1")] && (!HTTP_IS_CTYPE(space, http[lenof("HTTP/1.1")])))) {
- if (!silent) {
- http_error(HE_WARNING, HTTP_E_MALFORMED_HEADERS, "Invalid HTTP/1.x protocol identification");
- }
- return FAILURE;
- }
-
-#if 0
- {
- char *line = estrndup(pre_header, end - pre_header);
- fprintf(stderr, "http_parse_info('%s')\n", line);
- efree(line);
- }
-#endif
-
- info->http.version = zend_strtod(http + lenof("HTTP/"), NULL);
-
- /* is response */
- if (pre_header == http) {
- char *status = NULL;
- const char *code = http + sizeof("HTTP/1.1");
-
- info->type = IS_HTTP_RESPONSE;
- while (' ' == *code) ++code;
- if (code && end > code) {
- HTTP_INFO(info).response.code = strtol(code, &status, 10);
- } else {
- HTTP_INFO(info).response.code = 0;
- }
- if (status && end > status) {
- while (' ' == *status) ++status;
- HTTP_INFO(info).response.status = estrndup(status, end - status);
- } else {
- HTTP_INFO(info).response.status = NULL;
- }
-
- return SUCCESS;
- }
-
- /* is request */
- else if (!http[lenof("HTTP/1.x")] || http[lenof("HTTP/1.x")] == '\r' || http[lenof("HTTP/1.x")] == '\n') {
- const char *url = strchr(pre_header, ' ');
-
- info->type = IS_HTTP_REQUEST;
- if (url && http > url) {
- HTTP_INFO(info).request.method = estrndup(pre_header, url - pre_header);
- while (' ' == *url) ++url;
- while (' ' == *(http-1)) --http;
- if (http > url) {
- HTTP_INFO(info).request.url = estrndup(url, http - url);
- } else {
- efree(HTTP_INFO(info).request.method);
- return FAILURE;
- }
- } else {
- HTTP_INFO(info).request.method = NULL;
- HTTP_INFO(info).request.url = NULL;
- }
-
- return SUCCESS;
- }
-
- /* some darn header containing HTTP/1.x */
- else {
- return FAILURE;
- }
-}
-
-/*
- * Local variables:
- * tab-width: 4
- * c-basic-offset: 4
- * End:
- * vim600: noet sw=4 ts=4 fdm=marker
- * vim<600: noet sw=4 ts=4
- */
-