- release 1.5.0RC2
[m6w6/ext-http] / http_info_api.c
1 /*
2 +--------------------------------------------------------------------+
3 | PECL :: http |
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-2007, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 /* $Id$ */
14
15 #include "php_http.h"
16
17 #include "php_http_api.h"
18 #include "php_http_info_api.h"
19
20 PHP_HTTP_API void _http_info_default_callback(void **nothing, HashTable **headers, http_info *info TSRMLS_DC)
21 {
22 zval array;
23
24 INIT_ZARR(array, *headers);
25
26 switch (info->type) {
27 case IS_HTTP_REQUEST:
28 add_assoc_string(&array, "Request Method", HTTP_INFO(info).request.method, 1);
29 add_assoc_string(&array, "Request Url", HTTP_INFO(info).request.url, 1);
30 break;
31
32 case IS_HTTP_RESPONSE:
33 add_assoc_long(&array, "Response Code", (long) HTTP_INFO(info).response.code);
34 add_assoc_string(&array, "Response Status", HTTP_INFO(info).response.status, 1);
35 break;
36 }
37 }
38
39 PHP_HTTP_API void _http_info_dtor(http_info *i)
40 {
41 switch (i->type) {
42 case IS_HTTP_REQUEST:
43 STR_SET(HTTP_INFO(i).request.method, NULL);
44 STR_SET(HTTP_INFO(i).request.url, NULL);
45 break;
46
47 case IS_HTTP_RESPONSE:
48 STR_SET(HTTP_INFO(i).response.status, NULL);
49 break;
50
51 default:
52 break;
53 }
54 }
55
56 PHP_HTTP_API STATUS _http_info_parse_ex(const char *pre_header, http_info *info, zend_bool silent TSRMLS_DC)
57 {
58 const char *end, *http;
59
60 /* sane parameter */
61 if ((!pre_header) || (!*pre_header)) {
62 return FAILURE;
63 }
64
65 /* where's the end of the line */
66 if (!(end = http_locate_eol(pre_header, NULL))) {
67 end = pre_header + strlen(pre_header);
68 }
69
70 /* there must be HTTP/1.x in the line */
71 if (!(http = http_locate_str(pre_header, end - pre_header, "HTTP/1.", lenof("HTTP/1.")))) {
72 return FAILURE;
73 }
74
75 /* and nothing than SPACE or NUL after HTTP/1.x */
76 if ( (!HTTP_IS_CTYPE(digit, http[lenof("HTTP/1.")])) ||
77 (http[lenof("HTTP/1.1")] && (!HTTP_IS_CTYPE(space, http[lenof("HTTP/1.1")])))) {
78 if (!silent) {
79 http_error(HE_WARNING, HTTP_E_MALFORMED_HEADERS, "Invalid HTTP/1.x protocol identification");
80 }
81 return FAILURE;
82 }
83
84 #if 0
85 {
86 char *line = estrndup(pre_header, end - pre_header);
87 fprintf(stderr, "http_parse_info('%s')\n", line);
88 efree(line);
89 }
90 #endif
91
92 info->http.version = atof(http + lenof("HTTP/"));
93
94 /* is response */
95 if (pre_header == http) {
96 char *status = NULL;
97 const char *code = http + sizeof("HTTP/1.1");
98
99 info->type = IS_HTTP_RESPONSE;
100 while (' ' == *code) ++code;
101 if (code && end > code) {
102 HTTP_INFO(info).response.code = strtol(code, &status, 10);
103 } else {
104 HTTP_INFO(info).response.code = 0;
105 }
106 if (status && end > status) {
107 while (' ' == *status) ++status;
108 HTTP_INFO(info).response.status = estrndup(status, end - status);
109 } else {
110 HTTP_INFO(info).response.status = NULL;
111 }
112
113 return SUCCESS;
114 }
115
116 /* is request */
117 else if (!http[lenof("HTTP/1.x")] || http[lenof("HTTP/1.x")] == '\r' || http[lenof("HTTP/1.x")] == '\n') {
118 const char *url = strchr(pre_header, ' ');
119
120 info->type = IS_HTTP_REQUEST;
121 if (url && http > url) {
122 HTTP_INFO(info).request.method = estrndup(pre_header, url - pre_header);
123 while (' ' == *url) ++url;
124 while (' ' == *(http-1)) --http;
125 if (http > url) {
126 HTTP_INFO(info).request.url = estrndup(url, http - url);
127 } else {
128 efree(HTTP_INFO(info).request.method);
129 return FAILURE;
130 }
131 } else {
132 HTTP_INFO(info).request.method = NULL;
133 HTTP_INFO(info).request.url = NULL;
134 }
135
136 return SUCCESS;
137 }
138
139 /* some darn header containing HTTP/1.x */
140 else {
141 return FAILURE;
142 }
143 }
144
145 /*
146 * Local variables:
147 * tab-width: 4
148 * c-basic-offset: 4
149 * End:
150 * vim600: noet sw=4 ts=4 fdm=marker
151 * vim<600: noet sw=4 ts=4
152 */
153