s/IF_RETVAL_USED/if (return_value_used)/
[m6w6/ext-http] / php_http_url_api.h
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-2006, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 /* $Id$ */
14
15 #ifndef PHP_HTTP_URL_API_H
16 #define PHP_HTTP_URL_API_H
17
18 #include "ext/standard/url.h"
19
20 extern PHP_MINIT_FUNCTION(http_url);
21
22 #define http_absolute_url(u) _http_absolute_url((u) TSRMLS_CC)
23 PHP_HTTP_API char *_http_absolute_url(const char *url TSRMLS_DC);
24
25 #define HTTP_URL_REPLACE 0x000
26 #define HTTP_URL_JOIN_PATH 0x001
27 #define HTTP_URL_JOIN_QUERY 0x002
28 #define HTTP_URL_STRIP_USER 0x004
29 #define HTTP_URL_STRIP_PASS 0x008
30 #define HTTP_URL_STRIP_AUTH 0x010
31 #define HTTP_URL_STRIP_PORT 0x020
32 #define HTTP_URL_STRIP_PATH 0x040
33 #define HTTP_URL_STRIP_QUERY 0x080
34 #define HTTP_URL_STRIP_FRAGMENT 0x100
35
36 #define http_build_url(f, o, n, p, s, l) _http_build_url((f), (o), (n), (p), (s), (l) TSRMLS_CC)
37 PHP_HTTP_API void _http_build_url(int flags, const php_url *old_url, const php_url *new_url, php_url **url_ptr, char **url_str, size_t *url_len TSRMLS_DC);
38
39 #define http_urlencode_hash(h, q) _http_urlencode_hash_ex((h), 1, NULL, 0, (q), NULL TSRMLS_CC)
40 #define http_urlencode_hash_ex(h, o, p, pl, q, ql) _http_urlencode_hash_ex((h), (o), (p), (pl), (q), (ql) TSRMLS_CC)
41 PHP_HTTP_API STATUS _http_urlencode_hash_ex(HashTable *hash, zend_bool override_argsep, char *pre_encoded_data, size_t pre_encoded_len, char **encoded_data, size_t *encoded_len TSRMLS_DC);
42
43 #define http_urlencode_hash_recursive(ht, s, as, al, pr, pl) _http_urlencode_hash_recursive((ht), (s), (as), (al), (pr), (pl) TSRMLS_CC)
44 PHP_HTTP_API STATUS _http_urlencode_hash_recursive(HashTable *ht, phpstr *str, const char *arg_sep, size_t arg_sep_len, const char *prefix, size_t prefix_len TSRMLS_DC);
45
46 #define http_url_from_struct(u, ht) _http_url_from_struct((u), (ht) TSRMLS_CC)
47 static inline php_url *_http_url_from_struct(php_url *url, HashTable *ht TSRMLS_DC)
48 {
49 zval **e;
50
51 if (!url) {
52 url = ecalloc(1, sizeof(php_url));
53 }
54
55 if ((SUCCESS == zend_hash_find(ht, "scheme", sizeof("scheme"), (void *) &e))
56 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
57 url->scheme = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
58 }
59 if ((SUCCESS == zend_hash_find(ht, "user", sizeof("user"), (void *) &e))
60 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
61 url->user = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
62 }
63 if ((SUCCESS == zend_hash_find(ht, "pass", sizeof("pass"), (void *) &e))
64 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
65 url->pass = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
66 }
67 if ((SUCCESS == zend_hash_find(ht, "host", sizeof("host"), (void *) &e))
68 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
69 url->host = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
70 }
71 if ((SUCCESS == zend_hash_find(ht, "path", sizeof("path"), (void *) &e))
72 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
73 url->path = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
74 }
75 if ((SUCCESS == zend_hash_find(ht, "query", sizeof("query"), (void *) &e))
76 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
77 url->query = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
78 }
79 if ((SUCCESS == zend_hash_find(ht, "fragment", sizeof("fragment"), (void *) &e))
80 && (Z_TYPE_PP(e) == IS_STRING) && Z_STRLEN_PP(e)) {
81 url->fragment = estrndup(Z_STRVAL_PP(e), Z_STRLEN_PP(e));
82 }
83 if (SUCCESS == zend_hash_find(ht, "port", sizeof("port"), (void *) &e)) {
84 if (Z_TYPE_PP(e) == IS_LONG) {
85 url->port = (unsigned short) Z_LVAL_PP(e);
86 } else {
87 zval *o = *e;
88
89 convert_to_long_ex(e);
90 url->port = (unsigned short) Z_LVAL_PP(e);
91 if (o != *e) zval_ptr_dtor(e);
92 }
93 }
94
95 return url;
96 }
97
98 #define http_url_tostruct(u, strct) _http_url_tostruct((u), (strct) TSRMLS_CC)
99 static inline HashTable *_http_url_tostruct(php_url *url, zval *strct TSRMLS_DC)
100 {
101 zval arr;
102
103 if (strct) {
104 switch (Z_TYPE_P(strct))
105 {
106 default:
107 zval_dtor(strct);
108 array_init(strct);
109 case IS_ARRAY:
110 case IS_OBJECT:
111 INIT_ZARR(arr, HASH_OF(strct));
112 }
113 } else {
114 INIT_PZVAL(&arr);
115 array_init(&arr);
116 }
117
118 if (url) {
119 if (url->scheme) {
120 add_assoc_string(&arr, "scheme", url->scheme, 1);
121 }
122 if (url->user) {
123 add_assoc_string(&arr, "user", url->user, 1);
124 }
125 if (url->pass) {
126 add_assoc_string(&arr, "pass", url->pass, 1);
127 }
128 if (url->host) {
129 add_assoc_string(&arr, "host", url->host, 1);
130 }
131 if (url->port) {
132 add_assoc_long(&arr, "port", (long) url->port);
133 }
134 if (url->path) {
135 add_assoc_string(&arr, "path", url->path, 1);
136 }
137 if (url->query) {
138 add_assoc_string(&arr, "query", url->query, 1);
139 }
140 if (url->fragment) {
141 add_assoc_string(&arr, "fragment", url->fragment, 1);
142 }
143 }
144
145 return Z_ARRVAL(arr);
146 }
147
148 #endif
149
150 /*
151 * Local variables:
152 * tab-width: 4
153 * c-basic-offset: 4
154 * End:
155 * vim600: noet sw=4 ts=4 fdm=marker
156 * vim<600: noet sw=4 ts=4
157 */
158