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-2014, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
13 #include "php_http_api.h"
15 #ifdef PHP_HTTP_HAVE_IDN
19 #ifdef PHP_HTTP_HAVE_WCHAR
24 #ifdef HAVE_ARPA_INET_H
25 # include <arpa/inet.h>
28 #include "php_http_utf8.h"
30 static inline char *localhostname(void)
32 char hostname
[1024] = {0};
35 if (SUCCESS
== gethostname(hostname
, lenof(hostname
))) {
36 return estrdup(hostname
);
38 #elif defined(HAVE_GETHOSTNAME)
39 if (SUCCESS
== gethostname(hostname
, lenof(hostname
))) {
40 # if defined(HAVE_GETDOMAINNAME)
41 size_t hlen
= strlen(hostname
);
42 if (hlen
<= lenof(hostname
) - lenof("(none)")) {
43 hostname
[hlen
++] = '.';
44 if (SUCCESS
== getdomainname(&hostname
[hlen
], lenof(hostname
) - hlen
)) {
45 if (!strcmp(&hostname
[hlen
], "(none)")) {
46 hostname
[hlen
- 1] = '\0';
48 return estrdup(hostname
);
52 if (strcmp(hostname
, "(none)")) {
53 return estrdup(hostname
);
57 return estrndup("localhost", lenof("localhost"));
60 #define url(buf) ((php_http_url_t *) (buf).data)
62 static php_http_url_t
*php_http_url_from_env(TSRMLS_D
)
64 zval
*https
, *zhost
, *zport
;
66 php_http_buffer_t buf
;
68 php_http_buffer_init_ex(&buf
, MAX(PHP_HTTP_BUFFER_DEFAULT_SIZE
, sizeof(php_http_url_t
)<<2), PHP_HTTP_BUFFER_INIT_PREALLOC
);
69 php_http_buffer_account(&buf
, sizeof(php_http_url_t
));
70 memset(buf
.data
, 0, buf
.used
);
73 url(buf
)->scheme
= &buf
.data
[buf
.used
];
74 https
= php_http_env_get_server_var(ZEND_STRL("HTTPS"), 1 TSRMLS_CC
);
75 if (https
&& !strcasecmp(Z_STRVAL_P(https
), "ON")) {
76 php_http_buffer_append(&buf
, "https", sizeof("https"));
78 php_http_buffer_append(&buf
, "http", sizeof("http"));
82 url(buf
)->host
= &buf
.data
[buf
.used
];
83 if ((((zhost
= php_http_env_get_server_var(ZEND_STRL("HTTP_HOST"), 1 TSRMLS_CC
)) ||
84 (zhost
= php_http_env_get_server_var(ZEND_STRL("SERVER_NAME"), 1 TSRMLS_CC
)) ||
85 (zhost
= php_http_env_get_server_var(ZEND_STRL("SERVER_ADDR"), 1 TSRMLS_CC
)))) && Z_STRLEN_P(zhost
)) {
86 size_t stop_at
= strspn(Z_STRVAL_P(zhost
), "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-.");
88 php_http_buffer_append(&buf
, Z_STRVAL_P(zhost
), stop_at
);
89 php_http_buffer_append(&buf
, "", 1);
91 char *host_str
= localhostname();
93 php_http_buffer_append(&buf
, host_str
, strlen(host_str
) + 1);
98 zport
= php_http_env_get_server_var(ZEND_STRL("SERVER_PORT"), 1 TSRMLS_CC
);
99 if (zport
&& IS_LONG
== is_numeric_string(Z_STRVAL_P(zport
), Z_STRLEN_P(zport
), &port
, NULL
, 0)) {
100 url(buf
)->port
= port
;
104 if (SG(request_info
).request_uri
&& SG(request_info
).request_uri
[0]) {
105 const char *q
= strchr(SG(request_info
).request_uri
, '?');
107 url(buf
)->path
= &buf
.data
[buf
.used
];
110 php_http_buffer_append(&buf
, SG(request_info
).request_uri
, q
- SG(request_info
).request_uri
);
111 php_http_buffer_append(&buf
, "", 1);
113 php_http_buffer_append(&buf
, SG(request_info
).request_uri
, strlen(SG(request_info
).request_uri
) + 1);
118 if (SG(request_info
).query_string
&& SG(request_info
).query_string
[0]) {
119 url(buf
)->query
= &buf
.data
[buf
.used
];
120 php_http_buffer_append(&buf
, SG(request_info
).query_string
, strlen(SG(request_info
).query_string
) + 1);
126 #define url_isset(u,n) \
128 #define url_append(buf, append) do { \
129 char *_ptr = (buf)->data; \
130 php_http_url_t *_url = (php_http_url_t *) _ptr, _mem = *_url; \
133 if (_ptr != (buf)->data) { \
134 ptrdiff_t diff = (buf)->data - _ptr; \
135 _url = (php_http_url_t *) (buf)->data; \
136 if (_mem.scheme) _url->scheme += diff; \
137 if (_mem.user) _url->user += diff; \
138 if (_mem.pass) _url->pass += diff; \
139 if (_mem.host) _url->host += diff; \
140 if (_mem.path) _url->path += diff; \
141 if (_mem.query) _url->query += diff; \
142 if (_mem.fragment) _url->fragment += diff; \
145 #define url_copy(n) do { \
146 if (url_isset(new_url, n)) { \
147 url(buf)->n = &buf.data[buf.used]; \
148 url_append(&buf, php_http_buffer_append(&buf, new_url->n, strlen(new_url->n) + 1)); \
149 } else if (url_isset(old_url, n)) { \
150 url(buf)->n = &buf.data[buf.used]; \
151 url_append(&buf, php_http_buffer_append(&buf, old_url->n, strlen(old_url->n) + 1)); \
155 php_http_url_t
*php_http_url_mod(const php_http_url_t
*old_url
, const php_http_url_t
*new_url
, unsigned flags TSRMLS_DC
)
157 php_http_url_t
*tmp_url
= NULL
;
158 php_http_buffer_t buf
;
160 php_http_buffer_init_ex(&buf
, MAX(PHP_HTTP_BUFFER_DEFAULT_SIZE
, sizeof(php_http_url_t
)<<2), PHP_HTTP_BUFFER_INIT_PREALLOC
);
161 php_http_buffer_account(&buf
, sizeof(php_http_url_t
));
162 memset(buf
.data
, 0, buf
.used
);
164 /* set from env if requested */
165 if (flags
& PHP_HTTP_URL_FROM_ENV
) {
166 php_http_url_t
*env_url
= php_http_url_from_env(TSRMLS_C
);
168 old_url
= tmp_url
= php_http_url_mod(env_url
, old_url
, flags
^ PHP_HTTP_URL_FROM_ENV TSRMLS_CC
);
169 php_http_url_free(&env_url
);
174 if (!(flags
& PHP_HTTP_URL_STRIP_USER
)) {
178 if (!(flags
& PHP_HTTP_URL_STRIP_PASS
)) {
184 if (!(flags
& PHP_HTTP_URL_STRIP_PORT
)) {
185 url(buf
)->port
= url_isset(new_url
, port
) ? new_url
->port
: ((old_url
) ? old_url
->port
: 0);
188 if (!(flags
& PHP_HTTP_URL_STRIP_PATH
)) {
189 if ((flags
& PHP_HTTP_URL_JOIN_PATH
) && url_isset(old_url
, path
) && url_isset(new_url
, path
) && *new_url
->path
!= '/') {
190 size_t old_path_len
= strlen(old_url
->path
), new_path_len
= strlen(new_url
->path
);
191 char *path
= ecalloc(1, old_path_len
+ new_path_len
+ 1 + 1);
193 strcat(path
, old_url
->path
);
194 if (path
[old_path_len
- 1] != '/') {
195 php_dirname(path
, old_path_len
);
198 strcat(path
, new_url
->path
);
200 url(buf
)->path
= &buf
.data
[buf
.used
];
201 if (path
[0] != '/') {
202 url_append(&buf
, php_http_buffer_append(&buf
, "/", 1));
204 url_append(&buf
, php_http_buffer_append(&buf
, path
, strlen(path
) + 1));
207 const char *path
= NULL
;
209 if (url_isset(new_url
, path
)) {
210 path
= new_url
->path
;
211 } else if (url_isset(old_url
, path
)) {
212 path
= old_url
->path
;
216 url(buf
)->path
= &buf
.data
[buf
.used
];
218 url_append(&buf
, php_http_buffer_append(&buf
, path
, strlen(path
) + 1));
225 if (!(flags
& PHP_HTTP_URL_STRIP_QUERY
)) {
226 if ((flags
& PHP_HTTP_URL_JOIN_QUERY
) && url_isset(new_url
, query
) && url_isset(old_url
, query
)) {
233 ZVAL_STRING(&qstr
, old_url
->query
, 0);
234 php_http_querystring_update(&qarr
, &qstr
, NULL TSRMLS_CC
);
235 ZVAL_STRING(&qstr
, new_url
->query
, 0);
236 php_http_querystring_update(&qarr
, &qstr
, NULL TSRMLS_CC
);
239 php_http_querystring_update(&qarr
, NULL
, &qstr TSRMLS_CC
);
241 url(buf
)->query
= &buf
.data
[buf
.used
];
242 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL(qstr
), Z_STRLEN(qstr
) + 1));
251 if (!(flags
& PHP_HTTP_URL_STRIP_FRAGMENT
)) {
255 /* done with copy & combine & strip */
257 if (flags
& PHP_HTTP_URL_FROM_ENV
) {
258 /* free old_url we tainted above */
259 php_http_url_free(&tmp_url
);
262 /* replace directory references if path is not a single slash */
263 if ((flags
& PHP_HTTP_URL_SANITIZE_PATH
)
264 && url(buf
)->path
[0] && url(buf
)->path
[1]) {
265 char *ptr
, *end
= url(buf
)->path
+ strlen(url(buf
)->path
) + 1;
267 for (ptr
= strchr(url(buf
)->path
, '/'); ptr
; ptr
= strchr(ptr
, '/')) {
270 memmove(&ptr
[1], &ptr
[2], end
- &ptr
[2]);
280 memmove(&ptr
[1], &ptr
[3], end
- &ptr
[3]);
286 while (ptr
!= url(buf
)->path
) {
291 memmove(&ptr
[1], pos
, end
- pos
);
293 } else if (!ptr
[3]) {
312 /* unset default ports */
313 if (url(buf
)->port
) {
314 if ( ((url(buf
)->port
== 80) && url(buf
)->scheme
&& !strcmp(url(buf
)->scheme
, "http"))
315 || ((url(buf
)->port
==443) && url(buf
)->scheme
&& !strcmp(url(buf
)->scheme
, "https"))
324 char *php_http_url_to_string(const php_http_url_t
*url
, char **url_str
, size_t *url_len
, zend_bool persistent
)
326 php_http_buffer_t buf
;
328 php_http_buffer_init_ex(&buf
, PHP_HTTP_BUFFER_DEFAULT_SIZE
, persistent
?
329 PHP_HTTP_BUFFER_INIT_PERSISTENT
: 0);
331 if (url
->scheme
&& *url
->scheme
) {
332 php_http_buffer_appendl(&buf
, url
->scheme
);
333 php_http_buffer_appends(&buf
, "://");
334 } else if ((url
->user
&& *url
->user
) || (url
->host
&& *url
->host
)) {
335 php_http_buffer_appends(&buf
, "//");
338 if (url
->user
&& *url
->user
) {
339 php_http_buffer_appendl(&buf
, url
->user
);
340 if (url
->pass
&& *url
->pass
) {
341 php_http_buffer_appends(&buf
, ":");
342 php_http_buffer_appendl(&buf
, url
->pass
);
344 php_http_buffer_appends(&buf
, "@");
347 if (url
->host
&& *url
->host
) {
348 php_http_buffer_appendl(&buf
, url
->host
);
350 php_http_buffer_appendf(&buf
, ":%hu", url
->port
);
354 if (url
->path
&& *url
->path
) {
355 if (*url
->path
!= '/') {
356 php_http_buffer_appends(&buf
, "/");
358 php_http_buffer_appendl(&buf
, url
->path
);
359 } else if (buf
.used
) {
360 php_http_buffer_appends(&buf
, "/");
363 if (url
->query
&& *url
->query
) {
364 php_http_buffer_appends(&buf
, "?");
365 php_http_buffer_appendl(&buf
, url
->query
);
368 if (url
->fragment
&& *url
->fragment
) {
369 php_http_buffer_appends(&buf
, "#");
370 php_http_buffer_appendl(&buf
, url
->fragment
);
373 php_http_buffer_shrink(&buf
);
374 php_http_buffer_fix(&buf
);
387 char *php_http_url_authority_to_string(const php_http_url_t
*url
, char **url_str
, size_t *url_len
)
389 php_http_buffer_t buf
;
391 php_http_buffer_init(&buf
);
393 if (url
->user
&& *url
->user
) {
394 php_http_buffer_appendl(&buf
, url
->user
);
395 if (url
->pass
&& *url
->pass
) {
396 php_http_buffer_appends(&buf
, ":");
397 php_http_buffer_appendl(&buf
, url
->pass
);
399 php_http_buffer_appends(&buf
, "@");
402 if (url
->host
&& *url
->host
) {
403 php_http_buffer_appendl(&buf
, url
->host
);
405 php_http_buffer_appendf(&buf
, ":%hu", url
->port
);
409 php_http_buffer_shrink(&buf
);
410 php_http_buffer_fix(&buf
);
423 php_http_url_t
*php_http_url_from_zval(zval
*value
, unsigned flags TSRMLS_DC
)
426 php_http_url_t
*purl
;
428 switch (Z_TYPE_P(value
)) {
431 purl
= php_http_url_from_struct(HASH_OF(value
));
435 zcpy
= php_http_ztyp(IS_STRING
, value
);
436 purl
= php_http_url_parse(Z_STRVAL_P(zcpy
), Z_STRLEN_P(zcpy
), flags TSRMLS_CC
);
437 zval_ptr_dtor(&zcpy
);
443 php_http_url_t
*php_http_url_from_struct(HashTable
*ht
)
446 php_http_buffer_t buf
;
448 php_http_buffer_init_ex(&buf
, MAX(PHP_HTTP_BUFFER_DEFAULT_SIZE
, sizeof(php_http_url_t
)<<2), PHP_HTTP_BUFFER_INIT_PREALLOC
);
449 php_http_buffer_account(&buf
, sizeof(php_http_url_t
));
450 memset(buf
.data
, 0, buf
.used
);
452 if (SUCCESS
== zend_hash_find(ht
, "scheme", sizeof("scheme"), (void *) &e
)) {
453 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
454 url(buf
)->scheme
= &buf
.data
[buf
.used
];
455 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
458 if (SUCCESS
== zend_hash_find(ht
, "user", sizeof("user"), (void *) &e
)) {
459 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
460 url(buf
)->user
= &buf
.data
[buf
.used
];
461 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
464 if (SUCCESS
== zend_hash_find(ht
, "pass", sizeof("pass"), (void *) &e
)) {
465 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
466 url(buf
)->pass
= &buf
.data
[buf
.used
];
467 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
470 if (SUCCESS
== zend_hash_find(ht
, "host", sizeof("host"), (void *) &e
)) {
471 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
472 url(buf
)->host
= &buf
.data
[buf
.used
];
473 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
476 if (SUCCESS
== zend_hash_find(ht
, "port", sizeof("port"), (void *) &e
)) {
477 zval
*cpy
= php_http_ztyp(IS_LONG
, *e
);
478 url(buf
)->port
= (unsigned short) Z_LVAL_P(cpy
);
481 if (SUCCESS
== zend_hash_find(ht
, "path", sizeof("path"), (void *) &e
)) {
482 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
483 url(buf
)->path
= &buf
.data
[buf
.used
];
484 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
487 if (SUCCESS
== zend_hash_find(ht
, "query", sizeof("query"), (void *) &e
)) {
488 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
489 url(buf
)->query
= &buf
.data
[buf
.used
];
490 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
493 if (SUCCESS
== zend_hash_find(ht
, "fragment", sizeof("fragment"), (void *) &e
)) {
494 zval
*cpy
= php_http_ztyp(IS_STRING
, *e
);
495 url(buf
)->fragment
= &buf
.data
[buf
.used
];
496 url_append(&buf
, php_http_buffer_append(&buf
, Z_STRVAL_P(cpy
), Z_STRLEN_P(cpy
) + 1));
503 HashTable
*php_http_url_to_struct(const php_http_url_t
*url
, zval
*strct TSRMLS_DC
)
508 switch (Z_TYPE_P(strct
)) {
515 INIT_PZVAL_ARRAY((&arr
), HASH_OF(strct
));
525 add_assoc_string(&arr
, "scheme", url
->scheme
, 1);
528 add_assoc_string(&arr
, "user", url
->user
, 1);
531 add_assoc_string(&arr
, "pass", url
->pass
, 1);
534 add_assoc_string(&arr
, "host", url
->host
, 1);
537 add_assoc_long(&arr
, "port", (long) url
->port
);
540 add_assoc_string(&arr
, "path", url
->path
, 1);
543 add_assoc_string(&arr
, "query", url
->query
, 1);
546 add_assoc_string(&arr
, "fragment", url
->fragment
, 1);
550 return Z_ARRVAL(arr
);
553 STATUS
php_http_url_encode_hash(HashTable
*hash
, const char *pre_encoded_str
, size_t pre_encoded_len
, char **encoded_str
, size_t *encoded_len TSRMLS_DC
)
555 const char *arg_sep_str
;
557 php_http_buffer_t
*qstr
= php_http_buffer_new();
559 php_http_url_argsep(&arg_sep_str
, &arg_sep_len TSRMLS_CC
);
561 if (SUCCESS
!= php_http_url_encode_hash_ex(hash
, qstr
, arg_sep_str
, arg_sep_len
, "=", 1, pre_encoded_str
, pre_encoded_len TSRMLS_CC
)) {
562 php_http_buffer_free(&qstr
);
566 php_http_buffer_data(qstr
, encoded_str
, encoded_len
);
567 php_http_buffer_free(&qstr
);
572 STATUS
php_http_url_encode_hash_ex(HashTable
*hash
, php_http_buffer_t
*qstr
, const char *arg_sep_str
, size_t arg_sep_len
, const char *val_sep_str
, size_t val_sep_len
, const char *pre_encoded_str
, size_t pre_encoded_len TSRMLS_DC
)
574 if (pre_encoded_len
&& pre_encoded_str
) {
575 php_http_buffer_append(qstr
, pre_encoded_str
, pre_encoded_len
);
578 if (!php_http_params_to_string(qstr
, hash
, arg_sep_str
, arg_sep_len
, "", 0, val_sep_str
, val_sep_len
, PHP_HTTP_PARAMS_QUERY TSRMLS_CC
)) {
595 char buffer
[1]; /* last member */
598 void php_http_url_free(php_http_url_t
**url
)
606 php_http_url_t
*php_http_url_copy(const php_http_url_t
*url
, zend_bool persistent
)
609 const char *end
= NULL
, *url_ptr
= (const char *) url
;
612 end
= MAX(url
->scheme
, end
);
613 end
= MAX(url
->pass
, end
);
614 end
= MAX(url
->user
, end
);
615 end
= MAX(url
->host
, end
);
616 end
= MAX(url
->path
, end
);
617 end
= MAX(url
->query
, end
);
618 end
= MAX(url
->fragment
, end
);
621 end
+= strlen(end
) + 1;
622 cpy_ptr
= pecalloc(1, end
- url_ptr
, persistent
);
623 cpy
= (php_http_url_t
*) cpy_ptr
;
625 memcpy(cpy_ptr
+ sizeof(*cpy
), url_ptr
+ sizeof(*url
), end
- url_ptr
- sizeof(*url
));
627 cpy
->scheme
= url
->scheme
? cpy_ptr
+ (url
->scheme
- url_ptr
) : NULL
;
628 cpy
->pass
= url
->pass
? cpy_ptr
+ (url
->pass
- url_ptr
) : NULL
;
629 cpy
->user
= url
->user
? cpy_ptr
+ (url
->user
- url_ptr
) : NULL
;
630 cpy
->host
= url
->host
? cpy_ptr
+ (url
->host
- url_ptr
) : NULL
;
631 cpy
->path
= url
->path
? cpy_ptr
+ (url
->path
- url_ptr
) : NULL
;
632 cpy
->query
= url
->query
? cpy_ptr
+ (url
->query
- url_ptr
) : NULL
;
633 cpy
->fragment
= url
->fragment
? cpy_ptr
+ (url
->fragment
- url_ptr
) : NULL
;
635 cpy
= ecalloc(1, sizeof(*url
));
638 cpy
->port
= url
->port
;
643 static size_t parse_mb_utf8(unsigned *wc
, const char *ptr
, const char *end
)
646 size_t consumed
= utf8towc(&wchar
, (const unsigned char *) ptr
, end
- ptr
);
648 if (!consumed
|| consumed
== (size_t) -1) {
658 #ifdef PHP_HTTP_HAVE_WCHAR
659 static size_t parse_mb_loc(unsigned *wc
, const char *ptr
, const char *end
)
663 #if defined(HAVE_MBRTOWC)
666 memset(&ps
, 0, sizeof(ps
));
667 consumed
= mbrtowc(&wchar
, ptr
, end
- ptr
, &ps
);
668 #elif defined(HAVE_MBTOWC)
669 consumed
= mbtowc(&wchar
, ptr
, end
- ptr
);
672 if (!consumed
|| consumed
== (size_t) -1) {
683 typedef enum parse_mb_what
{
692 static const char * const parse_what
[] = {
701 static const char parse_xdigits
[] = "0123456789ABCDEF";
703 static size_t parse_mb(struct parse_state
*state
, parse_mb_what_t what
, const char *ptr
, const char *end
, const char *begin
, zend_bool silent
)
708 if (state
->flags
& PHP_HTTP_URL_PARSE_MBUTF8
) {
709 consumed
= parse_mb_utf8(&wchar
, ptr
, end
);
711 #ifdef PHP_HTTP_HAVE_WCHAR
712 else if (state
->flags
& PHP_HTTP_URL_PARSE_MBLOC
) {
713 consumed
= parse_mb_loc(&wchar
, ptr
, end
);
718 if (!(state
->flags
& PHP_HTTP_URL_PARSE_TOPCT
) || what
== PARSE_HOSTINFO
|| what
== PARSE_SCHEME
) {
719 if (what
== PARSE_HOSTINFO
&& (state
->flags
& PHP_HTTP_URL_PARSE_TOIDN
)) {
721 } else if (state
->flags
& PHP_HTTP_URL_PARSE_MBUTF8
) {
722 if (!isualnum(wchar
)) {
725 #ifdef PHP_HTTP_HAVE_WCHAR
726 } else if (state
->flags
& PHP_HTTP_URL_PARSE_MBLOC
) {
727 if (!iswalnum(wchar
)) {
732 PHP_HTTP_DUFF(consumed
, state
->buffer
[state
->offset
++] = *ptr
++);
736 PHP_HTTP_DUFF(consumed
,
737 state
->buffer
[state
->offset
++] = '%';
738 state
->buffer
[state
->offset
++] = parse_xdigits
[((unsigned char) ptr
[i
]) >> 4];
739 state
->buffer
[state
->offset
++] = parse_xdigits
[((unsigned char) ptr
[i
]) & 0xf];
748 TSRMLS_FETCH_FROM_CTX(state
->ts
);
749 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
750 "Failed to parse %s; unexpected byte 0x%02x at pos %u in '%s'",
751 parse_what
[what
], (unsigned char) *ptr
, (unsigned) (ptr
- begin
), begin
);
757 static STATUS
parse_userinfo(struct parse_state
*state
, const char *ptr
)
760 const char *password
= NULL
, *end
= state
->ptr
, *tmp
= ptr
;
761 TSRMLS_FETCH_FROM_CTX(state
->ts
);
763 state
->url
.user
= &state
->buffer
[state
->offset
];
769 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
770 "Failed to parse password; duplicate ':' at pos %u in '%s'",
771 (unsigned) (ptr
- tmp
), tmp
);
775 state
->buffer
[state
->offset
++] = 0;
776 state
->url
.pass
= &state
->buffer
[state
->offset
];
780 if (ptr
[1] != '%' && (end
- ptr
<= 2 || !isxdigit(*(ptr
+1)) || !isxdigit(*(ptr
+2)))) {
781 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
782 "Failed to parse userinfo; invalid percent encoding at pos %u in '%s'",
783 (unsigned) (ptr
- tmp
), tmp
);
786 state
->buffer
[state
->offset
++] = *ptr
++;
787 state
->buffer
[state
->offset
++] = *ptr
++;
788 state
->buffer
[state
->offset
++] = *ptr
;
791 case '!': case '$': case '&': case '\'': case '(': case ')': case '*':
792 case '+': case ',': case ';': case '=': /* sub-delims */
793 case '-': case '.': case '_': case '~': /* unreserved */
794 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
795 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
796 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
797 case 'V': case 'W': case 'X': case 'Y': case 'Z':
798 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
799 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
800 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
801 case 'v': case 'w': case 'x': case 'y': case 'z':
802 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
803 case '7': case '8': case '9':
805 state
->buffer
[state
->offset
++] = *ptr
;
809 if (!(mb
= parse_mb(state
, PARSE_USERINFO
, ptr
, end
, tmp
, 0))) {
814 } while(++ptr
!= end
);
817 state
->buffer
[state
->offset
++] = 0;
822 #ifdef PHP_HTTP_HAVE_IDN
823 static STATUS
parse_idn(struct parse_state
*state
)
828 if (state
->flags
& PHP_HTTP_URL_PARSE_MBUTF8
) {
829 rv
= idna_to_ascii_8z(state
->url
.host
, &idn
, IDNA_ALLOW_UNASSIGNED
|IDNA_USE_STD3_ASCII_RULES
);
831 # ifdef PHP_HTTP_HAVE_WCHAR
832 else if (state
->flags
& PHP_HTTP_URL_PARSE_MBLOC
) {
833 rv
= idna_to_ascii_lz(state
->url
.host
, &idn
, IDNA_ALLOW_UNASSIGNED
|IDNA_USE_STD3_ASCII_RULES
);
836 if (rv
!= IDNA_SUCCESS
) {
837 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse IDN; %s", idna_strerror(rv
));
840 size_t idnlen
= strlen(idn
);
841 memcpy(state
->url
.host
, idn
, idnlen
+ 1);
843 state
->offset
+= idnlen
- len
;
849 #ifdef HAVE_UIDNA_IDNTOASCII
850 # if HAVE_UNICODE_UIDNA_H
851 # include <unicode/uidna.h>
853 typedef uint16_t UChar
;
854 typedef enum { U_ZERO_ERROR
= 0 } UErrorCode
;
855 int32_t uidna_IDNToASCII(const UChar
*src
, int32_t srcLength
, UChar
*dest
, int32_t destCapacity
, int32_t options
, void *parseError
, UErrorCode
*status
);
857 typedef size_t (*parse_mb_func
)(unsigned *wc
, const char *ptr
, const char *end
);
858 static STATUS
toutf16(parse_mb_func fn
, const char *u8
, uint16_t **u16
, size_t *len
)
860 size_t offset
= 0, u8_len
= strlen(u8
);
862 *u16
= ecalloc(4 * sizeof(uint16_t), u8_len
+ 1);
865 while (offset
< u8_len
) {
867 uint16_t buf
[2], *ptr
= buf
;
868 size_t consumed
= fn(&wc
, &u8
[offset
], &u8
[u8_len
]);
877 switch (wctoutf16(buf
, wc
)) {
879 (*u16
)[(*len
)++] = *ptr
++;
882 (*u16
)[(*len
)++] = *ptr
++;
893 static STATUS
parse_uidn(struct parse_state
*state
)
896 uint16_t *uhost_str
= NULL
, *ahost_str
, *ahost_ptr
;
897 size_t uhost_len
, ahost_len
;
898 UErrorCode error
= U_ZERO_ERROR
;
900 if (state
->flags
& PHP_HTTP_URL_PARSE_MBUTF8
) {
901 if (SUCCESS
!= toutf16(parse_mb_utf8
, state
->url
.host
, &uhost_str
, &uhost_len
)) {
902 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse IDN");
905 #ifdef PHP_HTTP_HAVE_WCHAR
906 } else if (state
->flags
& PHP_HTTP_URL_PARSE_MBLOC
) {
907 if (SUCCESS
!= toutf16(parse_mb_loc
, state
->url
.host
, &uhost_str
, &uhost_len
)) {
908 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse IDN");
913 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse IDN");
917 ahost_len
= uhost_len
* 3;
918 ahost_str
= ecalloc(sizeof(uint16_t), ahost_len
);
920 ahost_len
= uidna_IDNToASCII(uhost_str
, uhost_len
, ahost_str
, ahost_len
, 3, NULL
, &error
);
923 if (error
!= U_ZERO_ERROR
) {
924 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse IDN");
928 host_ptr
= state
->url
.host
;
929 ahost_ptr
= ahost_str
;
930 PHP_HTTP_DUFF(ahost_len
, *host_ptr
++ = *ahost_ptr
++);
934 state
->offset
+= host_ptr
- state
->url
.host
;
940 static STATUS
parse_hostinfo(struct parse_state
*state
, const char *ptr
)
943 const char *end
= state
->ptr
, *tmp
= ptr
, *port
= NULL
;
944 TSRMLS_FETCH_FROM_CTX(state
->ts
);
947 #ifdef HAVE_INET_PTON
949 char *error
= NULL
, *tmp
= memchr(ptr
, ']', end
- ptr
);
952 size_t addrlen
= tmp
- ptr
+ 1;
953 char buf
[16], *addr
= estrndup(ptr
+ 1, addrlen
- 2);
954 int rv
= inet_pton(AF_INET6
, addr
, buf
);
958 state
->buffer
[state
->offset
] = '[';
959 state
->url
.host
= &state
->buffer
[state
->offset
];
960 inet_ntop(AF_INET6
, buf
, state
->url
.host
+ 1, state
->maxlen
- state
->offset
);
961 state
->offset
+= strlen(state
->url
.host
);
962 state
->buffer
[state
->offset
++] = ']';
963 state
->buffer
[state
->offset
++] = 0;
965 } else if (rv
== -1) {
966 error
= strerror(errno
);
968 error
= "unexpected '['";
971 error
= "expected ']'";
975 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse hostinfo; %s", error
);
984 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
985 "Failed to parse port; unexpected ':' at pos %u in '%s'",
986 (unsigned) (ptr
- tmp
), tmp
);
993 if (ptr
[1] != '%' && (end
- ptr
<= 2 || !isxdigit(*(ptr
+1)) || !isxdigit(*(ptr
+2)))) {
994 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
995 "Failed to parse hostinfo; invalid percent encoding at pos %u in '%s'",
996 (unsigned) (ptr
- tmp
), tmp
);
999 state
->buffer
[state
->offset
++] = *ptr
++;
1000 state
->buffer
[state
->offset
++] = *ptr
++;
1001 state
->buffer
[state
->offset
++] = *ptr
;
1004 case '!': case '$': case '&': case '\'': case '(': case ')': case '*':
1005 case '+': case ',': case ';': case '=': /* sub-delims */
1006 case '-': case '.': case '_': case '~': /* unreserved */
1007 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
1008 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
1009 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
1010 case 'V': case 'W': case 'X': case 'Y': case 'Z':
1011 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
1012 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
1013 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
1014 case 'v': case 'w': case 'x': case 'y': case 'z':
1016 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1017 "Failed to parse port; unexpected char '%c' at pos %u in '%s'",
1018 (unsigned char) *ptr
, (unsigned) (ptr
- tmp
), tmp
);
1022 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
1023 case '7': case '8': case '9':
1026 state
->url
.port
*= 10;
1027 state
->url
.port
+= *ptr
- '0';
1029 state
->buffer
[state
->offset
++] = *ptr
;
1037 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1038 "Failed to parse port; unexpected byte 0x%02x at pos %u in '%s'",
1039 (unsigned char) *ptr
, (unsigned) (ptr
- tmp
), tmp
);
1041 } else if (!(mb
= parse_mb(state
, PARSE_HOSTINFO
, ptr
, end
, tmp
, 0))) {
1046 } while (++ptr
!= end
);
1048 if (!state
->url
.host
) {
1049 len
= (port
? port
- tmp
- 1 : end
- tmp
);
1050 state
->url
.host
= &state
->buffer
[state
->offset
- len
];
1051 state
->buffer
[state
->offset
++] = 0;
1054 if (state
->flags
& PHP_HTTP_URL_PARSE_TOIDN
) {
1055 #ifdef PHP_HTTP_HAVE_IDN
1056 return parse_idn(state
);
1058 #ifdef HAVE_UIDNA_IDNTOASCII
1059 return parse_uidn(state
);
1066 static const char *parse_authority(struct parse_state
*state
)
1068 const char *tmp
= state
->ptr
, *host
= NULL
;
1071 switch (*state
->ptr
) {
1073 /* userinfo delimiter */
1075 TSRMLS_FETCH_FROM_CTX(state
->ts
);
1076 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1077 "Failed to parse userinfo; unexpected '@'");
1080 host
= state
->ptr
+ 1;
1081 if (tmp
!= state
->ptr
&& SUCCESS
!= parse_userinfo(state
, tmp
)) {
1084 tmp
= state
->ptr
+ 1;
1092 /* host delimiter */
1093 if (tmp
!= state
->ptr
&& SUCCESS
!= parse_hostinfo(state
, tmp
)) {
1098 } while (++state
->ptr
<= state
->end
);
1104 static const char *parse_path(struct parse_state
*state
)
1108 TSRMLS_FETCH_FROM_CTX(state
->ts
);
1110 /* is there actually a path to parse? */
1115 state
->url
.path
= &state
->buffer
[state
->offset
];
1118 switch (*state
->ptr
) {
1124 if (state
->ptr
[1] != '%' && (state
->end
- state
->ptr
<= 2 || !isxdigit(*(state
->ptr
+1)) || !isxdigit(*(state
->ptr
+2)))) {
1125 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1126 "Failed to parse path; invalid percent encoding at pos %u in '%s'",
1127 (unsigned) (state
->ptr
- tmp
), tmp
);
1130 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1131 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1132 state
->buffer
[state
->offset
++] = *state
->ptr
;
1135 case '/': /* yeah, well */
1136 case '!': case '$': case '&': case '\'': case '(': case ')': case '*':
1137 case '+': case ',': case ';': case '=': /* sub-delims */
1138 case '-': case '.': case '_': case '~': /* unreserved */
1139 case ':': case '@': /* pchar */
1140 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
1141 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
1142 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
1143 case 'V': case 'W': case 'X': case 'Y': case 'Z':
1144 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
1145 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
1146 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
1147 case 'v': case 'w': case 'x': case 'y': case 'z':
1148 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
1149 case '7': case '8': case '9':
1151 state
->buffer
[state
->offset
++] = *state
->ptr
;
1155 if (!(mb
= parse_mb(state
, PARSE_PATH
, state
->ptr
, state
->end
, tmp
, 0))) {
1158 state
->ptr
+= mb
- 1;
1160 } while (++state
->ptr
< state
->end
);
1163 /* did we have any path component ? */
1164 if (tmp
!= state
->ptr
) {
1165 state
->buffer
[state
->offset
++] = 0;
1167 state
->url
.path
= NULL
;
1172 static const char *parse_query(struct parse_state
*state
)
1175 const char *tmp
= state
->ptr
+ !!*state
->ptr
;
1176 TSRMLS_FETCH_FROM_CTX(state
->ts
);
1178 /* is there actually a query to parse? */
1179 if (*state
->ptr
!= '?') {
1183 /* skip initial '?' */
1185 state
->url
.query
= &state
->buffer
[state
->offset
];
1188 switch (*state
->ptr
) {
1193 if (state
->ptr
[1] != '%' && (state
->end
- state
->ptr
<= 2 || !isxdigit(*(state
->ptr
+1)) || !isxdigit(*(state
->ptr
+2)))) {
1194 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1195 "Failed to parse query; invalid percent encoding at pos %u in '%s'",
1196 (unsigned) (state
->ptr
- tmp
), tmp
);
1199 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1200 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1201 state
->buffer
[state
->offset
++] = *state
->ptr
;
1206 if (state
->flags
& PHP_HTTP_URL_PARSE_TOPCT
) {
1207 state
->buffer
[state
->offset
++] = '%';
1208 state
->buffer
[state
->offset
++] = parse_xdigits
[((unsigned char) *state
->ptr
) >> 4];
1209 state
->buffer
[state
->offset
++] = parse_xdigits
[((unsigned char) *state
->ptr
) & 0xf];
1214 case '?': case '/': /* yeah, well */
1215 case '!': case '$': case '&': case '\'': case '(': case ')': case '*':
1216 case '+': case ',': case ';': case '=': /* sub-delims */
1217 case '-': case '.': case '_': case '~': /* unreserved */
1218 case ':': case '@': /* pchar */
1219 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
1220 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
1221 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
1222 case 'V': case 'W': case 'X': case 'Y': case 'Z':
1223 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
1224 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
1225 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
1226 case 'v': case 'w': case 'x': case 'y': case 'z':
1227 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
1228 case '7': case '8': case '9':
1230 state
->buffer
[state
->offset
++] = *state
->ptr
;
1234 if (!(mb
= parse_mb(state
, PARSE_QUERY
, state
->ptr
, state
->end
, tmp
, 0))) {
1237 state
->ptr
+= mb
- 1;
1239 } while (++state
->ptr
< state
->end
);
1242 state
->buffer
[state
->offset
++] = 0;
1246 static const char *parse_fragment(struct parse_state
*state
)
1250 TSRMLS_FETCH_FROM_CTX(state
->ts
);
1252 /* is there actually a fragment to parse? */
1253 if (*state
->ptr
!= '#') {
1257 /* skip initial '#' */
1259 state
->url
.fragment
= &state
->buffer
[state
->offset
];
1262 switch (*state
->ptr
) {
1264 if (state
->ptr
[1] != '%' && (state
->end
- state
->ptr
<= 2 || !isxdigit(*(state
->ptr
+1)) || !isxdigit(*(state
->ptr
+2)))) {
1265 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1266 "Failed to parse fragment; invalid percent encoding at pos %u in '%s'",
1267 (unsigned) (state
->ptr
- tmp
), tmp
);
1270 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1271 state
->buffer
[state
->offset
++] = *state
->ptr
++;
1272 state
->buffer
[state
->offset
++] = *state
->ptr
;
1276 case '!': case '$': case '&': case '\'': case '(': case ')': case '*':
1277 case '+': case ',': case ';': case '=': /* sub-delims */
1278 case '-': case '.': case '_': case '~': /* unreserved */
1279 case ':': case '@': /* pchar */
1280 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
1281 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
1282 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
1283 case 'V': case 'W': case 'X': case 'Y': case 'Z':
1284 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
1285 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
1286 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
1287 case 'v': case 'w': case 'x': case 'y': case 'z':
1288 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
1289 case '7': case '8': case '9':
1291 state
->buffer
[state
->offset
++] = *state
->ptr
;
1295 if (!(mb
= parse_mb(state
, PARSE_FRAGMENT
, state
->ptr
, state
->end
, tmp
, 0))) {
1298 state
->ptr
+= mb
- 1;
1300 } while (++state
->ptr
< state
->end
);
1302 state
->buffer
[state
->offset
++] = 0;
1306 static const char *parse_hier(struct parse_state
*state
)
1308 if (*state
->ptr
== '/') {
1309 if (state
->end
- state
->ptr
> 1) {
1310 if (*(state
->ptr
+ 1) == '/') {
1312 if (!(state
->ptr
= parse_authority(state
))) {
1318 return parse_path(state
);
1321 static const char *parse_scheme(struct parse_state
*state
)
1324 const char *tmp
= state
->ptr
;
1327 switch (*state
->ptr
) {
1329 /* scheme delimiter */
1330 state
->url
.scheme
= &state
->buffer
[0];
1331 state
->buffer
[state
->offset
++] = 0;
1332 return ++state
->ptr
;
1334 case '0': case '1': case '2': case '3': case '4': case '5': case '6':
1335 case '7': case '8': case '9':
1336 case '+': case '-': case '.':
1337 if (state
->ptr
== tmp
) {
1341 case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
1342 case 'H': case 'I': case 'J': case 'K': case 'L': case 'M': case 'N':
1343 case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T': case 'U':
1344 case 'V': case 'W': case 'X': case 'Y': case 'Z':
1345 case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': case 'g':
1346 case 'h': case 'i': case 'j': case 'k': case 'l': case 'm': case 'n':
1347 case 'o': case 'p': case 'q': case 'r': case 's': case 't': case 'u':
1348 case 'v': case 'w': case 'x': case 'y': case 'z':
1350 state
->buffer
[state
->offset
++] = *state
->ptr
;
1354 if (!(mb
= parse_mb(state
, PARSE_SCHEME
, state
->ptr
, state
->end
, tmp
, 1))) {
1355 /* soft fail; parse path next */
1358 state
->ptr
+= mb
- 1;
1360 } while (++state
->ptr
!= state
->end
);
1362 return state
->ptr
= tmp
;
1365 php_http_url_t
*php_http_url_parse(const char *str
, size_t len
, unsigned flags TSRMLS_DC
)
1367 size_t maxlen
= 3 * len
;
1368 struct parse_state
*state
= ecalloc(1, sizeof(*state
) + maxlen
);
1370 state
->end
= str
+ len
;
1372 state
->flags
= flags
;
1373 state
->maxlen
= maxlen
;
1374 TSRMLS_SET_CTX(state
->ts
);
1376 if (!parse_scheme(state
)) {
1377 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse URL scheme: '%s'", state
->ptr
);
1382 if (!parse_hier(state
)) {
1387 if (!parse_query(state
)) {
1388 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse URL query: '%s'", state
->ptr
);
1393 if (!parse_fragment(state
)) {
1394 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to parse URL fragment: '%s'", state
->ptr
);
1399 return (php_http_url_t
*) state
;
1402 php_http_url_t
*php_http_url_parse_authority(const char *str
, size_t len
, unsigned flags TSRMLS_DC
)
1404 size_t maxlen
= 3 * len
;
1405 struct parse_state
*state
= ecalloc(1, sizeof(*state
) + maxlen
);
1407 state
->end
= str
+ len
;
1409 state
->flags
= flags
;
1410 state
->maxlen
= maxlen
;
1411 TSRMLS_SET_CTX(state
->ts
);
1413 if (!(state
->ptr
= parse_authority(state
))) {
1418 if (state
->ptr
!= state
->end
) {
1419 php_error_docref(NULL TSRMLS_CC
, E_WARNING
,
1420 "Failed to parse URL authority, unexpected character at pos %u in '%s'",
1421 (unsigned) (state
->ptr
- str
), str
);
1426 return (php_http_url_t
*) state
;
1429 ZEND_BEGIN_ARG_INFO_EX(ai_HttpUrl___construct
, 0, 0, 0)
1430 ZEND_ARG_INFO(0, old_url
)
1431 ZEND_ARG_INFO(0, new_url
)
1432 ZEND_ARG_INFO(0, flags
)
1433 ZEND_END_ARG_INFO();
1434 PHP_METHOD(HttpUrl
, __construct
)
1436 zval
*new_url
= NULL
, *old_url
= NULL
;
1437 long flags
= PHP_HTTP_URL_FROM_ENV
;
1438 zend_error_handling zeh
;
1440 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|z!z!l", &old_url
, &new_url
, &flags
), invalid_arg
, return);
1442 zend_replace_error_handling(EH_THROW
, php_http_exception_bad_url_class_entry
, &zeh TSRMLS_CC
);
1444 php_http_url_t
*res_purl
, *new_purl
= NULL
, *old_purl
= NULL
;
1447 new_purl
= php_http_url_from_zval(new_url
, flags TSRMLS_CC
);
1449 zend_restore_error_handling(&zeh TSRMLS_CC
);
1454 old_purl
= php_http_url_from_zval(old_url
, flags TSRMLS_CC
);
1457 php_http_url_free(&new_purl
);
1459 zend_restore_error_handling(&zeh TSRMLS_CC
);
1464 res_purl
= php_http_url_mod(old_purl
, new_purl
, flags TSRMLS_CC
);
1465 php_http_url_to_struct(res_purl
, getThis() TSRMLS_CC
);
1467 php_http_url_free(&res_purl
);
1469 php_http_url_free(&old_purl
);
1472 php_http_url_free(&new_purl
);
1475 zend_restore_error_handling(&zeh TSRMLS_CC
);
1478 ZEND_BEGIN_ARG_INFO_EX(ai_HttpUrl_mod
, 0, 0, 1)
1479 ZEND_ARG_INFO(0, more_url_parts
)
1480 ZEND_ARG_INFO(0, flags
)
1481 ZEND_END_ARG_INFO();
1482 PHP_METHOD(HttpUrl
, mod
)
1484 zval
*new_url
= NULL
;
1485 long flags
= PHP_HTTP_URL_JOIN_PATH
| PHP_HTTP_URL_JOIN_QUERY
;
1486 zend_error_handling zeh
;
1488 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z!|l", &new_url
, &flags
), invalid_arg
, return);
1490 zend_replace_error_handling(EH_THROW
, php_http_exception_bad_url_class_entry
, &zeh TSRMLS_CC
);
1492 php_http_url_t
*new_purl
= NULL
, *old_purl
= NULL
;
1495 new_purl
= php_http_url_from_zval(new_url
, flags TSRMLS_CC
);
1497 zend_restore_error_handling(&zeh TSRMLS_CC
);
1502 if ((old_purl
= php_http_url_from_struct(HASH_OF(getThis())))) {
1503 php_http_url_t
*res_purl
;
1505 ZVAL_OBJVAL(return_value
, zend_objects_clone_obj(getThis() TSRMLS_CC
), 0);
1507 res_purl
= php_http_url_mod(old_purl
, new_purl
, flags TSRMLS_CC
);
1508 php_http_url_to_struct(res_purl
, return_value TSRMLS_CC
);
1510 php_http_url_free(&res_purl
);
1511 php_http_url_free(&old_purl
);
1514 php_http_url_free(&new_purl
);
1517 zend_restore_error_handling(&zeh TSRMLS_CC
);
1520 ZEND_BEGIN_ARG_INFO_EX(ai_HttpUrl_toString
, 0, 0, 0)
1521 ZEND_END_ARG_INFO();
1522 PHP_METHOD(HttpUrl
, toString
)
1524 if (SUCCESS
== zend_parse_parameters_none()) {
1525 php_http_url_t
*purl
;
1527 if ((purl
= php_http_url_from_struct(HASH_OF(getThis())))) {
1531 php_http_url_to_string(purl
, &str
, &len
, 0);
1532 php_http_url_free(&purl
);
1533 RETURN_STRINGL(str
, len
, 0);
1536 RETURN_EMPTY_STRING();
1539 ZEND_BEGIN_ARG_INFO_EX(ai_HttpUrl_toArray
, 0, 0, 0)
1540 ZEND_END_ARG_INFO();
1541 PHP_METHOD(HttpUrl
, toArray
)
1543 php_http_url_t
*purl
;
1545 if (SUCCESS
!= zend_parse_parameters_none()) {
1549 /* strip any non-URL properties */
1550 purl
= php_http_url_from_struct(HASH_OF(getThis()));
1551 php_http_url_to_struct(purl
, return_value TSRMLS_CC
);
1552 php_http_url_free(&purl
);
1555 static zend_function_entry php_http_url_methods
[] = {
1556 PHP_ME(HttpUrl
, __construct
, ai_HttpUrl___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
1557 PHP_ME(HttpUrl
, mod
, ai_HttpUrl_mod
, ZEND_ACC_PUBLIC
)
1558 PHP_ME(HttpUrl
, toString
, ai_HttpUrl_toString
, ZEND_ACC_PUBLIC
)
1559 ZEND_MALIAS(HttpUrl
, __toString
, toString
, ai_HttpUrl_toString
, ZEND_ACC_PUBLIC
)
1560 PHP_ME(HttpUrl
, toArray
, ai_HttpUrl_toArray
, ZEND_ACC_PUBLIC
)
1561 EMPTY_FUNCTION_ENTRY
1564 zend_class_entry
*php_http_url_class_entry
;
1566 PHP_MINIT_FUNCTION(http_url
)
1568 zend_class_entry ce
= {0};
1570 INIT_NS_CLASS_ENTRY(ce
, "http", "Url", php_http_url_methods
);
1571 php_http_url_class_entry
= zend_register_internal_class(&ce TSRMLS_CC
);
1573 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("scheme"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1574 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("user"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1575 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("pass"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1576 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("host"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1577 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("port"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1578 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("path"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1579 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("query"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1580 zend_declare_property_null(php_http_url_class_entry
, ZEND_STRL("fragment"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1582 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("REPLACE"), PHP_HTTP_URL_REPLACE TSRMLS_CC
);
1583 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("JOIN_PATH"), PHP_HTTP_URL_JOIN_PATH TSRMLS_CC
);
1584 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("JOIN_QUERY"), PHP_HTTP_URL_JOIN_QUERY TSRMLS_CC
);
1585 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_USER"), PHP_HTTP_URL_STRIP_USER TSRMLS_CC
);
1586 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_PASS"), PHP_HTTP_URL_STRIP_PASS TSRMLS_CC
);
1587 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_AUTH"), PHP_HTTP_URL_STRIP_AUTH TSRMLS_CC
);
1588 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_PORT"), PHP_HTTP_URL_STRIP_PORT TSRMLS_CC
);
1589 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_PATH"), PHP_HTTP_URL_STRIP_PATH TSRMLS_CC
);
1590 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_QUERY"), PHP_HTTP_URL_STRIP_QUERY TSRMLS_CC
);
1591 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_FRAGMENT"), PHP_HTTP_URL_STRIP_FRAGMENT TSRMLS_CC
);
1592 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("STRIP_ALL"), PHP_HTTP_URL_STRIP_ALL TSRMLS_CC
);
1593 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("FROM_ENV"), PHP_HTTP_URL_FROM_ENV TSRMLS_CC
);
1594 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("SANITIZE_PATH"), PHP_HTTP_URL_SANITIZE_PATH TSRMLS_CC
);
1596 #ifdef PHP_HTTP_HAVE_WCHAR
1597 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("PARSE_MBLOC"), PHP_HTTP_URL_PARSE_MBLOC TSRMLS_CC
);
1599 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("PARSE_MBUTF8"), PHP_HTTP_URL_PARSE_MBUTF8 TSRMLS_CC
);
1600 #if defined(PHP_HTTP_HAVE_IDN) || defined(HAVE_UIDNA_IDNTOASCII)
1601 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("PARSE_TOIDN"), PHP_HTTP_URL_PARSE_TOIDN TSRMLS_CC
);
1603 zend_declare_class_constant_long(php_http_url_class_entry
, ZEND_STRL("PARSE_TOPCT"), PHP_HTTP_URL_PARSE_TOPCT TSRMLS_CC
);
1614 * vim600: noet sw=4 ts=4 fdm=marker
1615 * vim<600: noet sw=4 ts=4