Fix PHP5 config.w32
[m6w6/ext-http] / src / php_http_info.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-2014, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 #include "php_http_api.h"
14
15 php_http_info_t *php_http_info_init(php_http_info_t *i TSRMLS_DC)
16 {
17 if (!i) {
18 i = emalloc(sizeof(*i));
19 }
20
21 memset(i, 0, sizeof(*i));
22
23 return i;
24 }
25
26 void php_http_info_dtor(php_http_info_t *i)
27 {
28 switch (i->type) {
29 case PHP_HTTP_REQUEST:
30 PTR_SET(PHP_HTTP_INFO(i).request.method, NULL);
31 PTR_SET(PHP_HTTP_INFO(i).request.url, NULL);
32 break;
33
34 case PHP_HTTP_RESPONSE:
35 PTR_SET(PHP_HTTP_INFO(i).response.status, NULL);
36 break;
37
38 default:
39 break;
40 }
41 }
42
43 void php_http_info_free(php_http_info_t **i)
44 {
45 if (*i) {
46 php_http_info_dtor(*i);
47 efree(*i);
48 *i = NULL;
49 }
50 }
51
52 php_http_info_t *php_http_info_parse(php_http_info_t *info, const char *pre_header TSRMLS_DC)
53 {
54 const char *end, *http;
55 zend_bool free_info = !info;
56
57 /* sane parameter */
58 if ((!pre_header) || (!*pre_header)) {
59 return NULL;
60 }
61
62 /* where's the end of the line */
63 if (!(end = php_http_locate_eol(pre_header, NULL))) {
64 end = pre_header + strlen(pre_header);
65 }
66
67 /* there must be HTTP/1.x in the line */
68 if (!(http = php_http_locate_str(pre_header, end - pre_header, "HTTP/", lenof("HTTP/")))) {
69 return NULL;
70 }
71
72 info = php_http_info_init(info TSRMLS_CC);
73
74 /* and nothing than SPACE or NUL after HTTP/X.x */
75 if (!php_http_version_parse(&info->http.version, http TSRMLS_CC)
76 || (http[lenof("HTTP/X.x")] && (!PHP_HTTP_IS_CTYPE(space, http[lenof("HTTP/X.x")])))) {
77 if (free_info) {
78 php_http_info_free(&info);
79 }
80 return NULL;
81 }
82
83 #if 0
84 {
85 char *line = estrndup(pre_header, end - pre_header);
86 fprintf(stderr, "http_parse_info('%s')\n", line);
87 efree(line);
88 }
89 #endif
90
91 /* is response */
92 if (pre_header == http) {
93 const char *status = NULL, *code = http + sizeof("HTTP/X.x");
94
95 info->type = PHP_HTTP_RESPONSE;
96 while (' ' == *code) ++code;
97 if (code && end > code) {
98 /* rfc7230#3.1.2 The status-code element is a 3-digit integer code */
99 PHP_HTTP_INFO(info).response.code = 100*(*code++ - '0');
100 PHP_HTTP_INFO(info).response.code += 10*(*code++ - '0');
101 PHP_HTTP_INFO(info).response.code += *code++ - '0';
102 if (PHP_HTTP_INFO(info).response.code < 100 || PHP_HTTP_INFO(info).response.code > 599) {
103 if (free_info) {
104 php_http_info_free(&info);
105 }
106 return NULL;
107 }
108 status = code;
109 } else {
110 PHP_HTTP_INFO(info).response.code = 0;
111 }
112 if (status && end > status) {
113 while (' ' == *status) ++status;
114 PHP_HTTP_INFO(info).response.status = estrndup(status, end - status);
115 } else {
116 PHP_HTTP_INFO(info).response.status = NULL;
117 }
118
119 return info;
120 }
121
122 /* is request */
123 else if (*(http - 1) == ' ' && (!http[lenof("HTTP/X.x")] || http[lenof("HTTP/X.x")] == '\r' || http[lenof("HTTP/X.x")] == '\n')) {
124 const char *url = strchr(pre_header, ' ');
125
126 info->type = PHP_HTTP_REQUEST;
127 if (url && http > url) {
128 size_t url_len = url - pre_header;
129
130 PHP_HTTP_INFO(info).request.method = estrndup(pre_header, url_len);
131
132 while (' ' == *url) ++url;
133 while (' ' == *(http-1)) --http;
134
135 if (http > url) {
136 /* CONNECT presents an authority only */
137 if (strcasecmp(PHP_HTTP_INFO(info).request.method, "CONNECT")) {
138 PHP_HTTP_INFO(info).request.url = php_http_url_parse(url, http - url, ~0 TSRMLS_CC);
139 } else {
140 PHP_HTTP_INFO(info).request.url = php_http_url_parse_authority(url, http - url, ~0 TSRMLS_CC);
141 }
142 if (!PHP_HTTP_INFO(info).request.url) {
143 PTR_SET(PHP_HTTP_INFO(info).request.method, NULL);
144 return NULL;
145 }
146 } else {
147 PTR_SET(PHP_HTTP_INFO(info).request.method, NULL);
148 return NULL;
149 }
150 } else {
151 PHP_HTTP_INFO(info).request.method = NULL;
152 PHP_HTTP_INFO(info).request.url = NULL;
153 }
154
155 return info;
156 }
157
158 /* some darn header containing HTTP/X.x */
159 else {
160 if (free_info) {
161 php_http_info_free(&info);
162 }
163 return NULL;
164 }
165 }
166
167 /*
168 * Local variables:
169 * tab-width: 4
170 * c-basic-offset: 4
171 * End:
172 * vim600: noet sw=4 ts=4 fdm=marker
173 * vim<600: noet sw=4 ts=4
174 */
175