/**
* Returns the active version (string)
*
* @return string
*/
PHP_METHOD(Phalcon_Version, get){
zval *version, *major, *medium, *minor, *special, *special_number;
zval *result, *suffix = NULL, *final_version;
PHALCON_MM_GROW();
PHALCON_INIT_VAR(version);
PHALCON_CALL_SELF(version, this_ptr, "_getversion");
PHALCON_INIT_VAR(major);
phalcon_array_fetch_long(&major, version, 0, PH_NOISY_CC);
PHALCON_INIT_VAR(medium);
phalcon_array_fetch_long(&medium, version, 1, PH_NOISY_CC);
PHALCON_INIT_VAR(minor);
phalcon_array_fetch_long(&minor, version, 2, PH_NOISY_CC);
PHALCON_INIT_VAR(special);
phalcon_array_fetch_long(&special, version, 3, PH_NOISY_CC);
PHALCON_INIT_VAR(special_number);
phalcon_array_fetch_long(&special_number, version, 4, PH_NOISY_CC);
PHALCON_INIT_VAR(result);
PHALCON_CONCAT_VSVSVS(result, major, ".", medium, ".", minor, " ");
if (phalcon_compare_strict_long(special, 1 TSRMLS_CC)) {
PHALCON_INIT_VAR(suffix);
PHALCON_CONCAT_SV(suffix, "ALPHA ", special_number);
goto ph_end_0;
}
if (phalcon_compare_strict_long(special, 2 TSRMLS_CC)) {
PHALCON_INIT_NVAR(suffix);
PHALCON_CONCAT_SV(suffix, "BETA ", special_number);
goto ph_end_0;
}
if (phalcon_compare_strict_long(special, 1 TSRMLS_CC)) {
PHALCON_INIT_NVAR(suffix);
PHALCON_CONCAT_SV(suffix, "RC ", special_number);
goto ph_end_0;
}
PHALCON_INIT_NVAR(suffix);
ZVAL_STRING(suffix, "", 1);
goto ph_end_0;
ph_end_0:
phalcon_concat_self(result, suffix TSRMLS_CC);
PHALCON_INIT_VAR(final_version);
PHALCON_CALL_FUNC_PARAMS_1(final_version, "trim", result);
RETURN_CCTOR(final_version);
}
/**
* Returns the active version (string)
*
* <code>
* echo Phalcon\Version::get();
* </code>
*
* @return string
*/
PHP_METHOD(Phalcon_Version, get){
zval *version, *major, *medium, *minor, *special, *special_number;
zval *result, *suffix = NULL, *final_version;
PHALCON_MM_GROW();
PHALCON_INIT_VAR(version);
PHALCON_CALL_SELF(version, this_ptr, "_getversion");
PHALCON_OBS_VAR(major);
phalcon_array_fetch_long(&major, version, 0, PH_NOISY_CC);
PHALCON_OBS_VAR(medium);
phalcon_array_fetch_long(&medium, version, 1, PH_NOISY_CC);
PHALCON_OBS_VAR(minor);
phalcon_array_fetch_long(&minor, version, 2, PH_NOISY_CC);
PHALCON_OBS_VAR(special);
phalcon_array_fetch_long(&special, version, 3, PH_NOISY_CC);
PHALCON_OBS_VAR(special_number);
phalcon_array_fetch_long(&special_number, version, 4, PH_NOISY_CC);
PHALCON_INIT_VAR(result);
PHALCON_CONCAT_VSVSVS(result, major, ".", medium, ".", minor, " ");
switch (phalcon_get_intval(special)) {
case 1:
PHALCON_INIT_VAR(suffix);
PHALCON_CONCAT_SV(suffix, "ALPHA ", special_number);
break;
case 2:
PHALCON_INIT_NVAR(suffix);
PHALCON_CONCAT_SV(suffix, "BETA ", special_number);
break;
case 3:
PHALCON_INIT_NVAR(suffix);
PHALCON_CONCAT_SV(suffix, "RC ", special_number);
break;
default:
PHALCON_INIT_NVAR(suffix);
ZVAL_STRING(suffix, "", 1);
break;
}
phalcon_concat_self(&result, suffix TSRMLS_CC);
PHALCON_INIT_VAR(final_version);
PHALCON_CALL_FUNC_PARAMS_1(final_version, "trim", result);
RETURN_CCTOR(final_version);
}
/**
* Appends a NOT BETWEEN condition to the current conditions
*
*<code>
* $criteria->notBetweenWhere('price', 100.25, 200.50);
*</code>
*
* @param string $expr
* @param mixed $minimum
* @param mixed $maximum
* @return Phalcon\Mvc\Model\Query\Builder
*/
PHP_METHOD(Phalcon_Mvc_Model_Criteria, notBetweenWhere){
zval *expr, *minimum, *maximum, *hidden_param, *one;
zval *next_hidden_param, *minimum_key, *maximum_key;
zval *conditions, *bind_params;
PHALCON_MM_GROW();
phalcon_fetch_params(1, 3, 0, &expr, &minimum, &maximum);
PHALCON_OBS_VAR(hidden_param);
phalcon_read_property_this(&hidden_param, this_ptr, SL("_hiddenParamNumber"), PH_NOISY_CC);
PHALCON_INIT_VAR(one);
ZVAL_LONG(one, 1);
PHALCON_INIT_VAR(next_hidden_param);
phalcon_add_function(next_hidden_param, hidden_param, one TSRMLS_CC);
/**
* Minimum key with auto bind-params
*/
PHALCON_INIT_VAR(minimum_key);
PHALCON_CONCAT_SV(minimum_key, "phb", hidden_param);
/**
* Maximum key with auto bind-params
*/
PHALCON_INIT_VAR(maximum_key);
PHALCON_CONCAT_SV(maximum_key, "phb", next_hidden_param);
/**
* Create a standard BETWEEN condition with bind params
*/
PHALCON_INIT_VAR(conditions);
PHALCON_CONCAT_VSVSVS(conditions, expr, " NOT BETWEEN :", minimum_key, ": AND :", maximum_key, ":");
PHALCON_INIT_VAR(bind_params);
array_init_size(bind_params, 2);
phalcon_array_update_zval(&bind_params, minimum_key, &minimum, PH_COPY | PH_SEPARATE TSRMLS_CC);
phalcon_array_update_zval(&bind_params, maximum_key, &maximum, PH_COPY | PH_SEPARATE TSRMLS_CC);
/**
* Append the BETWEEN to the current conditions using and 'and'
*/
phalcon_call_method_p2_noret(this_ptr, "andwhere", conditions, bind_params);
PHALCON_SEPARATE(next_hidden_param);
phalcon_increment(next_hidden_param);
phalcon_update_property_this(this_ptr, SL("_hiddenParamNumber"), next_hidden_param TSRMLS_CC);
RETURN_THIS();
}
/**
* Returns the active version (string)
*
* <code>
* echo Phalcon\Version::get();
* </code>
*
* @return string
*/
PHP_METHOD(Phalcon_Version, get){
zval *version = NULL, *major, *medium, *minor, *special, *special_number;
zval *result, *suffix;
PHALCON_MM_GROW();
PHALCON_CALL_SELF(&version, "_getversion");
PHALCON_OBS_VAR(major);
phalcon_array_fetch_long(&major, version, 0, PH_NOISY);
PHALCON_OBS_VAR(medium);
phalcon_array_fetch_long(&medium, version, 1, PH_NOISY);
PHALCON_OBS_VAR(minor);
phalcon_array_fetch_long(&minor, version, 2, PH_NOISY);
PHALCON_OBS_VAR(special);
phalcon_array_fetch_long(&special, version, 3, PH_NOISY);
PHALCON_OBS_VAR(special_number);
phalcon_array_fetch_long(&special_number, version, 4, PH_NOISY);
PHALCON_INIT_VAR(result);
PHALCON_CONCAT_VSVSVS(result, major, ".", medium, ".", minor, " ");
PHALCON_INIT_VAR(suffix);
switch (phalcon_get_intval(special)) {
case PHALCON_VERSION_ALPHA:
PHALCON_CONCAT_SV(suffix, "ALPHA ", special_number);
break;
case PHALCON_VERSION_BETA:
PHALCON_CONCAT_SV(suffix, "BETA ", special_number);
break;
case PHALCON_VERSION_RC:
PHALCON_CONCAT_SV(suffix, "RC ", special_number);
break;
default:
ZVAL_STRING(suffix, "", 1);
break;
}
phalcon_concat_self(&result, suffix TSRMLS_CC);
phalcon_fast_trim(return_value, result, PHALCON_TRIM_BOTH TSRMLS_CC);
RETURN_MM();
}
/**
* Generates SQL to create a table in MySQL
*
* @param string $tableName
* @param string $schemaName
* @param array $definition
* @return string
*/
PHP_METHOD(Phalcon_Db_Dialect_Mysql, createTable){
zval *table_name = NULL, *schema_name = NULL, *definition = NULL;
zval *table = NULL, *temporary = NULL, *sql = NULL, *create_lines = NULL, *columns = NULL;
zval *column = NULL, *column_name = NULL, *column_definition = NULL;
zval *column_line = NULL, *attribute = NULL, *indexes = NULL, *index = NULL;
zval *index_name = NULL, *column_list = NULL, *index_sql = NULL, *references = NULL;
zval *reference = NULL, *name = NULL, *referenced_table = NULL, *referenced_columns = NULL;
zval *constaint_sql = NULL, *reference_sql = NULL, *joined_lines = NULL;
zval *options = NULL;
zval *r0 = NULL, *r1 = NULL, *r2 = NULL, *r3 = NULL, *r4 = NULL;
zval *t0 = NULL, *t1 = NULL;
zval *c0 = NULL;
HashTable *ah0, *ah1, *ah2;
HashPosition hp0, hp1, hp2;
zval **hd;
int eval_int;
PHALCON_MM_GROW();
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zzz", &table_name, &schema_name, &definition) == FAILURE) {
PHALCON_MM_RESTORE();
RETURN_NULL();
}
eval_int = phalcon_array_isset_string(definition, SL("columns")+1);
if (!eval_int) {
PHALCON_THROW_EXCEPTION_STR(phalcon_db_exception_ce, "The index 'columns' is required in the definition array");
return;
}
if (zend_is_true(schema_name)) {
PHALCON_INIT_VAR(table);
PHALCON_CONCAT_SVSVS(table, "`", schema_name, "`.`", table_name, "`");
} else {
PHALCON_INIT_VAR(table);
PHALCON_CONCAT_SVS(table, "`", table_name, "`");
}
PHALCON_INIT_VAR(temporary);
ZVAL_BOOL(temporary, 0);
eval_int = phalcon_array_isset_string(definition, SL("options")+1);
if (eval_int) {
PHALCON_ALLOC_ZVAL_MM(r0);
phalcon_array_fetch_string(&r0, definition, SL("options"), PH_NOISY_CC);
eval_int = phalcon_array_isset_string(r0, SL("temporary")+1);
if (eval_int) {
PHALCON_ALLOC_ZVAL_MM(r1);
phalcon_array_fetch_string(&r1, definition, SL("options"), PH_NOISY_CC);
PHALCON_ALLOC_ZVAL_MM(r2);
phalcon_array_fetch_string(&r2, r1, SL("temporary"), PH_NOISY_CC);
if (zend_is_true(r2)) {
PHALCON_INIT_VAR(temporary);
ZVAL_BOOL(temporary, 1);
}
}
}
if (Z_TYPE_P(temporary) == IS_BOOL && Z_BVAL_P(temporary)) {
PHALCON_INIT_VAR(sql);
PHALCON_CONCAT_SVS(sql, "CREATE TEMPORARY TABLE ", table, " (\n\t");
} else {
PHALCON_INIT_VAR(sql);
PHALCON_CONCAT_SVS(sql, "CREATE TABLE ", table, " (\n\t");
}
PHALCON_INIT_VAR(create_lines);
array_init(create_lines);
PHALCON_INIT_VAR(columns);
phalcon_array_fetch_string(&columns, definition, SL("columns"), PH_NOISY_CC);
if (!phalcon_valid_foreach(columns TSRMLS_CC)) {
return;
}
ah0 = Z_ARRVAL_P(columns);
zend_hash_internal_pointer_reset_ex(ah0, &hp0);
fes_52be_2:
if(zend_hash_get_current_data_ex(ah0, (void**) &hd, &hp0) != SUCCESS){
goto fee_52be_2;
}
PHALCON_INIT_VAR(column);
ZVAL_ZVAL(column, *hd, 1, 0);
PHALCON_INIT_VAR(column_name);
PHALCON_CALL_METHOD(column_name, column, "getname", PH_NO_CHECK);
PHALCON_INIT_VAR(column_definition);
PHALCON_CALL_METHOD_PARAMS_1(column_definition, this_ptr, "getcolumndefinition", column, PH_NO_CHECK);
PHALCON_INIT_VAR(column_line);
PHALCON_CONCAT_SVSV(column_line, "`", column_name, "` ", column_definition);
PHALCON_INIT_VAR(attribute);
PHALCON_CALL_METHOD(attribute, column, "isnotnull", PH_NO_CHECK);
if (zend_is_true(attribute)) {
PHALCON_INIT_VAR(t0);
ZVAL_STRING(t0, " NOT NULL", 1);
phalcon_concat_self(&column_line, t0 TSRMLS_CC);
}
PHALCON_INIT_VAR(attribute);
PHALCON_CALL_METHOD(attribute, column, "isautoincrement", PH_NO_CHECK);
if (zend_is_true(attribute)) {
PHALCON_INIT_VAR(t1);
ZVAL_STRING(t1, " AUTO_INCREMENT", 1);
phalcon_concat_self(&column_line, t1 TSRMLS_CC);
}
phalcon_array_append(&create_lines, column_line, PH_SEPARATE TSRMLS_CC);
zend_hash_move_forward_ex(ah0, &hp0);
goto fes_52be_2;
fee_52be_2:
eval_int = phalcon_array_isset_string(definition, SL("indexes")+1);
if (eval_int) {
PHALCON_INIT_VAR(indexes);
phalcon_array_fetch_string(&indexes, definition, SL("indexes"), PH_NOISY_CC);
if (!phalcon_valid_foreach(indexes TSRMLS_CC)) {
return;
}
ah1 = Z_ARRVAL_P(indexes);
zend_hash_internal_pointer_reset_ex(ah1, &hp1);
fes_52be_3:
if(zend_hash_get_current_data_ex(ah1, (void**) &hd, &hp1) != SUCCESS){
goto fee_52be_3;
}
PHALCON_INIT_VAR(index);
ZVAL_ZVAL(index, *hd, 1, 0);
PHALCON_INIT_VAR(index_name);
PHALCON_CALL_METHOD(index_name, index, "getname", PH_NO_CHECK);
PHALCON_INIT_VAR(columns);
PHALCON_CALL_METHOD(columns, index, "getcolumns", PH_NO_CHECK);
PHALCON_INIT_VAR(column_list);
PHALCON_CALL_METHOD_PARAMS_1(column_list, this_ptr, "getcolumnlist", columns, PH_NO_CHECK);
if (PHALCON_COMPARE_STRING(index_name, "PRIMARY")) {
PHALCON_INIT_VAR(index_sql);
PHALCON_CONCAT_SVS(index_sql, "PRIMARY KEY (", column_list, ")");
} else {
PHALCON_INIT_VAR(index_sql);
PHALCON_CONCAT_SVSVS(index_sql, "KEY `", index_name, "` (", column_list, ")");
}
phalcon_array_append(&create_lines, index_sql, PH_SEPARATE TSRMLS_CC);
zend_hash_move_forward_ex(ah1, &hp1);
goto fes_52be_3;
fee_52be_3:
if(0){}
}
eval_int = phalcon_array_isset_string(definition, SL("references")+1);
if (eval_int) {
PHALCON_INIT_VAR(references);
phalcon_array_fetch_string(&references, definition, SL("references"), PH_NOISY_CC);
if (!phalcon_valid_foreach(references TSRMLS_CC)) {
return;
}
ah2 = Z_ARRVAL_P(references);
zend_hash_internal_pointer_reset_ex(ah2, &hp2);
fes_52be_4:
if(zend_hash_get_current_data_ex(ah2, (void**) &hd, &hp2) != SUCCESS){
goto fee_52be_4;
}
PHALCON_INIT_VAR(reference);
ZVAL_ZVAL(reference, *hd, 1, 0);
PHALCON_INIT_VAR(name);
PHALCON_CALL_METHOD(name, reference, "getname", PH_NO_CHECK);
PHALCON_INIT_VAR(columns);
PHALCON_CALL_METHOD(columns, reference, "getcolumns", PH_NO_CHECK);
PHALCON_INIT_VAR(column_list);
PHALCON_CALL_METHOD_PARAMS_1(column_list, this_ptr, "getcolumnlist", columns, PH_NO_CHECK);
PHALCON_INIT_VAR(referenced_table);
PHALCON_CALL_METHOD(referenced_table, reference, "getreferencedtable", PH_NO_CHECK);
PHALCON_INIT_VAR(referenced_columns);
PHALCON_CALL_METHOD(referenced_columns, reference, "getreferencedcolumns", PH_NO_CHECK);
PHALCON_INIT_VAR(column_list);
PHALCON_CALL_METHOD_PARAMS_1(column_list, this_ptr, "getcolumnlist", referenced_columns, PH_NO_CHECK);
PHALCON_INIT_VAR(constaint_sql);
PHALCON_CONCAT_SVSVS(constaint_sql, "CONSTRAINT `", name, "` FOREIGN KEY (", column_list, ")");
PHALCON_INIT_VAR(reference_sql);
PHALCON_CONCAT_VSVSVS(reference_sql, constaint_sql, " REFERENCES `", referenced_table, "`(", column_list, ")");
phalcon_array_append(&create_lines, reference_sql, PH_SEPARATE TSRMLS_CC);
zend_hash_move_forward_ex(ah2, &hp2);
goto fes_52be_4;
fee_52be_4:
if(0){}
}
PHALCON_INIT_VAR(c0);
ZVAL_STRING(c0, ",\n\t", 1);
PHALCON_INIT_VAR(joined_lines);
phalcon_fast_join(joined_lines, c0, create_lines TSRMLS_CC);
PHALCON_ALLOC_ZVAL_MM(r3);
PHALCON_CONCAT_VS(r3, joined_lines, "\n)");
phalcon_concat_self(&sql, r3 TSRMLS_CC);
eval_int = phalcon_array_isset_string(definition, SL("options")+1);
if (eval_int) {
PHALCON_INIT_VAR(options);
PHALCON_CALL_METHOD_PARAMS_1(options, this_ptr, "_gettableoptions", definition, PH_NO_CHECK);
PHALCON_ALLOC_ZVAL_MM(r4);
PHALCON_CONCAT_SV(r4, " ", options);
phalcon_concat_self(&sql, r4 TSRMLS_CC);
}
RETURN_CTOR(sql);
}
PHP_METHOD(Phalcon_Http_Client_Adapter_Stream, buildBody){
zval *stream, *header, *data, *file, *username, *password, *authtype, *digest, *method, *entity_body;
zval *key = NULL, *value = NULL, *realm, *qop, *nonce, *nc, *cnonce, *qoc, *ha1 = NULL, *path = NULL, *md5_entity_body = NULL, *ha2 = NULL;
zval *http, *option = NULL, *body, *headers = NULL, *uniqid = NULL, *boundary;
zval *path_parts = NULL, *filename, *basename, *filedata = NULL, *tmp = NULL;
HashTable *ah0;
HashPosition hp0;
zval **hd;
PHALCON_MM_GROW();
stream = phalcon_fetch_nproperty_this(this_ptr, SL("_stream"), PH_NOISY TSRMLS_CC);
header = phalcon_fetch_nproperty_this(this_ptr, SL("_header"), PH_NOISY TSRMLS_CC);
data = phalcon_fetch_nproperty_this(this_ptr, SL("_data"), PH_NOISY TSRMLS_CC);
file = phalcon_fetch_nproperty_this(this_ptr, SL("_file"), PH_NOISY TSRMLS_CC);
username = phalcon_fetch_nproperty_this(this_ptr, SL("_username"), PH_NOISY TSRMLS_CC);
password = phalcon_fetch_nproperty_this(this_ptr, SL("_password"), PH_NOISY TSRMLS_CC);
authtype = phalcon_fetch_nproperty_this(this_ptr, SL("_authtype"), PH_NOISY TSRMLS_CC);
digest = phalcon_fetch_nproperty_this(this_ptr, SL("_digest"), PH_NOISY TSRMLS_CC);
method = phalcon_fetch_nproperty_this(this_ptr, SL("_method"), PH_NOISY TSRMLS_CC);
entity_body = phalcon_fetch_nproperty_this(this_ptr, SL("_entity_body"), PH_NOISY TSRMLS_CC);
if (PHALCON_IS_NOT_EMPTY(username)) {
if (PHALCON_IS_STRING(authtype, "basic")) {
PHALCON_INIT_NVAR(key);
ZVAL_STRING(key, "Authorization", 1);
PHALCON_INIT_NVAR(value);
PHALCON_CONCAT_SVSV(value, "Basic ", username, ":", password);
PHALCON_CALL_METHOD(NULL, header, "set", key, value);
} else if (PHALCON_IS_STRING(authtype, "digest") && PHALCON_IS_NOT_EMPTY(digest)) {
if (phalcon_array_isset_string_fetch(&realm, digest, SS("realm"))) {
PHALCON_INIT_VAR(realm);
ZVAL_NULL(realm);
}
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_VSVSV(tmp, username, ":", realm, ":", password);
PHALCON_CALL_FUNCTION(&ha1, "md5", tmp);
if (!phalcon_array_isset_string_fetch(&qop, digest, SS("qop"))) {
PHALCON_INIT_VAR(qop);
ZVAL_NULL(qop);
}
if (PHALCON_IS_EMPTY(qop) || phalcon_memnstr_str(qop, SL("auth"))) {
PHALCON_CALL_SELF(&path, "getpath");
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_VSV(tmp, method, ":", path);
PHALCON_CALL_FUNCTION(&ha2, "md5", tmp);
} else if (phalcon_memnstr_str(qop, SL("auth-int"))) {
PHALCON_CALL_SELF(&path, "getpath");
PHALCON_CALL_FUNCTION(&md5_entity_body, "md5", entity_body);
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_VSVSV(tmp, method, ":", path, ":", md5_entity_body);
PHALCON_CALL_FUNCTION(&ha2, "md5", tmp);
}
PHALCON_INIT_NVAR(key);
ZVAL_STRING(key, "Authorization", 1);
if (phalcon_array_isset_string_fetch(&nonce, digest, SS("nonce"))) {
PHALCON_INIT_VAR(nonce);
ZVAL_NULL(nonce);
}
if (PHALCON_IS_EMPTY(qop)) {
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_VSVSV(tmp, ha1, ":", nonce, ":", ha2);
PHALCON_CALL_FUNCTION(&value, "md5", tmp);
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_SV(tmp, "Digest ", value);
PHALCON_CALL_METHOD(NULL, header, "set", key, tmp);
} else {
if (phalcon_array_isset_string_fetch(&nc, digest, SS("nc"))) {
PHALCON_INIT_VAR(nc);
ZVAL_NULL(nc);
}
if (phalcon_array_isset_string_fetch(&cnonce, digest, SS("cnonce"))) {
PHALCON_INIT_VAR(cnonce);
ZVAL_NULL(cnonce);
}
if (phalcon_array_isset_string_fetch(&qoc, digest, SS("qoc"))) {
PHALCON_INIT_VAR(qoc);
ZVAL_NULL(qoc);
}
if (phalcon_array_isset_string_fetch(&qoc, digest, SS("qoc"))) {
PHALCON_INIT_VAR(qoc);
ZVAL_NULL(qoc);
}
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_VSVSVS(tmp, ha1, ":", nonce, ":", nc, ":");
PHALCON_SCONCAT_VSVSV(tmp, cnonce, ":", qoc, ":", ha2);
PHALCON_CALL_FUNCTION(&value, "md5", tmp);
PHALCON_INIT_NVAR(tmp);
PHALCON_CONCAT_SV(tmp, "Digest ", value);
PHALCON_CALL_METHOD(NULL, header, "set", key, tmp);
}
}
}
PHALCON_INIT_VAR(http);
ZVAL_STRING(http, "http", 1);
PHALCON_CALL_FUNCTION(&uniqid, "uniqid");
PHALCON_INIT_VAR(boundary);
PHALCON_CONCAT_SV(boundary, "--------------", uniqid);
PHALCON_INIT_VAR(body);
if (PHALCON_IS_NOT_EMPTY(data) && Z_TYPE_P(data) == IS_STRING){
PHALCON_INIT_NVAR(key);
ZVAL_STRING(key, "Content-Type", 1);
PHALCON_INIT_NVAR(value);
ZVAL_STRING(value, "application/x-www-form-urlencoded", 1);
PHALCON_CALL_METHOD(NULL, header, "set", key, value);
PHALCON_INIT_NVAR(option);
ZVAL_LONG(option, PHALCON_HTTP_CLIENT_HEADER_BUILD_FIELDS);
PHALCON_CALL_METHOD(&headers, header, "build", option);
PHALCON_INIT_NVAR(option);
ZVAL_STRING(option, "header", 1);
PHALCON_CALL_FUNCTION(NULL, "stream_context_set_option", stream, http, option, headers);
PHALCON_INIT_NVAR(option);
ZVAL_STRING(option, "content", 1);
PHALCON_CALL_FUNCTION(NULL, "stream_context_set_option", stream, http, option, data);
RETURN_MM();
}
if (Z_TYPE_P(data) == IS_ARRAY) {
phalcon_is_iterable(data, &ah0, &hp0, 0, 0);
while (zend_hash_get_current_data_ex(ah0, (void**) &hd, &hp0) == SUCCESS) {
PHALCON_GET_HKEY(key, ah0, hp0);
PHALCON_GET_HVALUE(value);
PHALCON_SCONCAT_SVS(body, "--", boundary, "\r\n");
PHALCON_SCONCAT_SVSVS(body, "Content-Disposition: form-data; name=\"", key, "\"\r\n\r\n", value, "\r\n");
zend_hash_move_forward_ex(ah0, &hp0);
}
}
if (PHALCON_IS_NOT_EMPTY(file)) {
PHALCON_CALL_FUNCTION(&path_parts, "pathinfo", file);
if (phalcon_array_isset_string_fetch(&filename, path_parts, SS("filename")) && phalcon_array_isset_string_fetch(&basename, path_parts, SS("basename"))) {
PHALCON_CALL_FUNCTION(&filedata, "file_get_contents", file);
PHALCON_SCONCAT_SVS(body, "--", boundary, "\r\n");
PHALCON_SCONCAT_SVSVS(body, "Content-Disposition: form-data; name=\"", filename, "\"; filename=\"", basename, "\"\r\n");
PHALCON_SCONCAT_SVS(body, "Content-Type: application/octet-stream\r\n\r\n", filedata, "\r\n");
}
}
if (!PHALCON_IS_EMPTY(body)) {
PHALCON_SCONCAT_SVS(body, "--", boundary, "--\r\n");
PHALCON_INIT_NVAR(key);
ZVAL_STRING(key, "Content-Type", 1);
PHALCON_INIT_NVAR(value);
PHALCON_CONCAT_SV(value, "multipart/form-data; boundary=", boundary);
PHALCON_CALL_METHOD(NULL, header, "set", key, value);
PHALCON_INIT_NVAR(key);
ZVAL_STRING(key, "Content-Length", 1);
PHALCON_INIT_NVAR(value);
ZVAL_LONG(value, Z_STRLEN_P(body));
PHALCON_CALL_METHOD(NULL, header, "set", key, value);
PHALCON_INIT_NVAR(option);
ZVAL_LONG(option, PHALCON_HTTP_CLIENT_HEADER_BUILD_FIELDS);
PHALCON_CALL_METHOD(&headers, header, "build", option);
PHALCON_INIT_NVAR(option);
ZVAL_STRING(option, "header", 1);
PHALCON_CALL_FUNCTION(NULL, "stream_context_set_option", stream, http, option, headers);
PHALCON_INIT_NVAR(option);
ZVAL_STRING(option, "content", 1);
PHALCON_CALL_FUNCTION(NULL, "stream_context_set_option", stream, http, option, body);
}
PHALCON_MM_RESTORE();
}
