/**
* Replaces placeholders from pattern returning a valid PCRE regular expression
*/
PHP_METHOD(Phalcon_Cli_Router_Route, compilePattern) {
zval *pattern_param = NULL, *idPattern = NULL, *part = NULL, *_0$$3, *_4$$3, *_6$$3, *_8$$3, *_10$$3, *_12$$3, *_16$$3, *_1$$4, *_2$$4, _3$$4, *_5$$5, *_7$$6, *_9$$7, *_11$$8, *_13$$9, *_14$$9, *_15$$9, *_17$$10, *_18$$10, *_19$$10;
zval *pattern = NULL;
ZEPHIR_MM_GROW();
zephir_fetch_params(1, 1, 0, &pattern_param);
if (UNEXPECTED(Z_TYPE_P(pattern_param) != IS_STRING && Z_TYPE_P(pattern_param) != IS_NULL)) {
zephir_throw_exception_string(spl_ce_InvalidArgumentException, SL("Parameter 'pattern' must be a string") TSRMLS_CC);
RETURN_MM_NULL();
}
if (EXPECTED(Z_TYPE_P(pattern_param) == IS_STRING)) {
zephir_get_strval(pattern, pattern_param);
} else {
ZEPHIR_INIT_VAR(pattern);
ZVAL_EMPTY_STRING(pattern);
}
if (zephir_memnstr_str(pattern, SL(":"), "phalcon/cli/router/route.zep", 94)) {
_0$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_VAR(idPattern);
ZEPHIR_CONCAT_VS(idPattern, _0$$3, "([a-zA-Z0-9\\_\\-]+)");
if (zephir_memnstr_str(pattern, SL(":delimiter"), "phalcon/cli/router/route.zep", 100)) {
ZEPHIR_INIT_VAR(_1$$4);
_2$$4 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_SINIT_VAR(_3$$4);
ZVAL_STRING(&_3$$4, ":delimiter", 0);
zephir_fast_str_replace(&_1$$4, &_3$$4, _2$$4, pattern TSRMLS_CC);
zephir_get_strval(pattern, _1$$4);
}
_4$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_VAR(part);
ZEPHIR_CONCAT_VS(part, _4$$3, ":module");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 106)) {
ZEPHIR_INIT_VAR(_5$$5);
zephir_fast_str_replace(&_5$$5, part, idPattern, pattern TSRMLS_CC);
zephir_get_strval(pattern, _5$$5);
}
_6$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_NVAR(part);
ZEPHIR_CONCAT_VS(part, _6$$3, ":task");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 112)) {
ZEPHIR_INIT_VAR(_7$$6);
zephir_fast_str_replace(&_7$$6, part, idPattern, pattern TSRMLS_CC);
zephir_get_strval(pattern, _7$$6);
}
_8$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_NVAR(part);
ZEPHIR_CONCAT_VS(part, _8$$3, ":namespace");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 118)) {
ZEPHIR_INIT_VAR(_9$$7);
zephir_fast_str_replace(&_9$$7, part, idPattern, pattern TSRMLS_CC);
zephir_get_strval(pattern, _9$$7);
}
_10$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_NVAR(part);
ZEPHIR_CONCAT_VS(part, _10$$3, ":action");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 124)) {
ZEPHIR_INIT_VAR(_11$$8);
zephir_fast_str_replace(&_11$$8, part, idPattern, pattern TSRMLS_CC);
zephir_get_strval(pattern, _11$$8);
}
_12$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_NVAR(part);
ZEPHIR_CONCAT_VS(part, _12$$3, ":params");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 130)) {
ZEPHIR_INIT_VAR(_13$$9);
_14$$9 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_VAR(_15$$9);
ZEPHIR_CONCAT_SVS(_15$$9, "(", _14$$9, ".*)*");
zephir_fast_str_replace(&_13$$9, part, _15$$9, pattern TSRMLS_CC);
zephir_get_strval(pattern, _13$$9);
}
_16$$3 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_NVAR(part);
ZEPHIR_CONCAT_VS(part, _16$$3, ":int");
if (zephir_memnstr(pattern, part, "phalcon/cli/router/route.zep", 136)) {
ZEPHIR_INIT_VAR(_17$$10);
_18$$10 = zephir_fetch_nproperty_this(this_ptr, SL("_delimiter"), PH_NOISY_CC);
ZEPHIR_INIT_VAR(_19$$10);
ZEPHIR_CONCAT_VS(_19$$10, _18$$10, "([0-9]+)");
zephir_fast_str_replace(&_17$$10, part, _19$$10, pattern TSRMLS_CC);
zephir_get_strval(pattern, _17$$10);
}
}
if (zephir_memnstr_str(pattern, SL("("), "phalcon/cli/router/route.zep", 142)) {
ZEPHIR_CONCAT_SVS(return_value, "#^", pattern, "$#");
RETURN_MM();
}
if (zephir_memnstr_str(pattern, SL("["), "phalcon/cli/router/route.zep", 147)) {
ZEPHIR_CONCAT_SVS(return_value, "#^", pattern, "$#");
RETURN_MM();
}
RETURN_CTOR(pattern);
}
/**
* Generates random text in accordance with the template
*
* <code>
* echo Phalcon\Text::dynamic("{Hi|Hello}, my name is a {Bob|Mark|Jon}!"); // Hi my name is a Bob
* echo Phalcon\Text::dynamic("{Hi|Hello}, my name is a {Bob|Mark|Jon}!"); // Hi my name is a Jon
* echo Phalcon\Text::dynamic("{Hi|Hello}, my name is a {Bob|Mark|Jon}!"); // Hello my name is a Bob
* </code>
*/
PHP_METHOD(Phalcon_Text, dynamic) {
int ZEPHIR_LAST_CALL_STATUS;
zephir_fcall_cache_entry *_1 = NULL, *_5 = NULL, *_8 = NULL;
zval *text_param = NULL, *leftDelimiter_param = NULL, *rightDelimiter_param = NULL, *separator_param = NULL, *ldS = NULL, *rdS = NULL, *result = NULL, *pattern = NULL, *_0 = NULL, *_2 = NULL, *_3$$3, *_6$$4 = NULL, *_7$$4 = NULL;
zval *text = NULL, *leftDelimiter = NULL, *rightDelimiter = NULL, *separator = NULL, *_4$$3;
ZEPHIR_MM_GROW();
zephir_fetch_params(1, 1, 3, &text_param, &leftDelimiter_param, &rightDelimiter_param, &separator_param);
if (unlikely(Z_TYPE_P(text_param) != IS_STRING && Z_TYPE_P(text_param) != IS_NULL)) {
zephir_throw_exception_string(spl_ce_InvalidArgumentException, SL("Parameter 'text' must be a string") TSRMLS_CC);
RETURN_MM_NULL();
}
if (likely(Z_TYPE_P(text_param) == IS_STRING)) {
zephir_get_strval(text, text_param);
} else {
ZEPHIR_INIT_VAR(text);
ZVAL_EMPTY_STRING(text);
}
if (!leftDelimiter_param) {
ZEPHIR_INIT_VAR(leftDelimiter);
ZVAL_STRING(leftDelimiter, "{", 1);
} else {
if (unlikely(Z_TYPE_P(leftDelimiter_param) != IS_STRING && Z_TYPE_P(leftDelimiter_param) != IS_NULL)) {
zephir_throw_exception_string(spl_ce_InvalidArgumentException, SL("Parameter 'leftDelimiter' must be a string") TSRMLS_CC);
RETURN_MM_NULL();
}
if (likely(Z_TYPE_P(leftDelimiter_param) == IS_STRING)) {
zephir_get_strval(leftDelimiter, leftDelimiter_param);
} else {
ZEPHIR_INIT_VAR(leftDelimiter);
ZVAL_EMPTY_STRING(leftDelimiter);
}
}
if (!rightDelimiter_param) {
ZEPHIR_INIT_VAR(rightDelimiter);
ZVAL_STRING(rightDelimiter, "}", 1);
} else {
if (unlikely(Z_TYPE_P(rightDelimiter_param) != IS_STRING && Z_TYPE_P(rightDelimiter_param) != IS_NULL)) {
zephir_throw_exception_string(spl_ce_InvalidArgumentException, SL("Parameter 'rightDelimiter' must be a string") TSRMLS_CC);
RETURN_MM_NULL();
}
if (likely(Z_TYPE_P(rightDelimiter_param) == IS_STRING)) {
zephir_get_strval(rightDelimiter, rightDelimiter_param);
} else {
ZEPHIR_INIT_VAR(rightDelimiter);
ZVAL_EMPTY_STRING(rightDelimiter);
}
}
if (!separator_param) {
ZEPHIR_INIT_VAR(separator);
ZVAL_STRING(separator, "|", 1);
} else {
if (unlikely(Z_TYPE_P(separator_param) != IS_STRING && Z_TYPE_P(separator_param) != IS_NULL)) {
zephir_throw_exception_string(spl_ce_InvalidArgumentException, SL("Parameter 'separator' must be a string") TSRMLS_CC);
RETURN_MM_NULL();
}
if (likely(Z_TYPE_P(separator_param) == IS_STRING)) {
zephir_get_strval(separator, separator_param);
} else {
ZEPHIR_INIT_VAR(separator);
ZVAL_EMPTY_STRING(separator);
}
}
ZEPHIR_CALL_FUNCTION(&_0, "substr_count", &_1, 420, text, leftDelimiter);
zephir_check_call_status();
ZEPHIR_CALL_FUNCTION(&_2, "substr_count", &_1, 420, text, rightDelimiter);
zephir_check_call_status();
if (!ZEPHIR_IS_IDENTICAL(_0, _2)) {
ZEPHIR_INIT_VAR(_3$$3);
object_init_ex(_3$$3, spl_ce_RuntimeException);
ZEPHIR_INIT_VAR(_4$$3);
ZEPHIR_CONCAT_SVS(_4$$3, "Syntax error in string \"", text, "\"");
ZEPHIR_CALL_METHOD(NULL, _3$$3, "__construct", NULL, 421, _4$$3);
zephir_check_call_status();
zephir_throw_exception_debug(_3$$3, "phalcon/text.zep", 261 TSRMLS_CC);
ZEPHIR_MM_RESTORE();
return;
}
ZEPHIR_CALL_FUNCTION(&ldS, "preg_quote", &_5, 422, leftDelimiter);
zephir_check_call_status();
ZEPHIR_CALL_FUNCTION(&rdS, "preg_quote", &_5, 422, rightDelimiter);
zephir_check_call_status();
ZEPHIR_INIT_VAR(pattern);
ZEPHIR_CONCAT_SVSVVSVS(pattern, "/", ldS, "([^", ldS, rdS, "]+)", rdS, "/");
ZEPHIR_CPY_WRT(result, text);
while (1) {
if (!(zephir_memnstr(result, leftDelimiter, "phalcon/text.zep", 269))) {
break;
}
ZEPHIR_INIT_NVAR(_6$$4);
ZEPHIR_INIT_NVAR(_6$$4);
zephir_create_closure_ex(_6$$4, NULL, phalcon_0__closure_ce, SS("__invoke") TSRMLS_CC);
ZEPHIR_CALL_FUNCTION(&_7$$4, "preg_replace_callback", &_8, 423, pattern, _6$$4, result);
zephir_check_call_status();
ZEPHIR_CPY_WRT(result, _7$$4);
}
RETURN_CCTOR(result);
}
