String debug_string_backtrace(bool skip, bool ignore_args /* = false */, int limit /* = 0 */) { if (RuntimeOption::InjectedStackTrace) { Array bt; StringBuffer buf; bt = g_context->debugBacktrace(skip, false, false, nullptr, ignore_args, limit); int i = 0; for (ArrayIter it = bt.begin(); !it.end(); it.next(), i++) { Array frame = it.second().toArray(); buf.append('#'); buf.append(i); if (i < 10) buf.append(' '); buf.append(' '); if (frame.exists(s_class)) { buf.append(frame->get(s_class).toString()); buf.append(frame->get(s_type).toString()); } buf.append(frame->get(s_function).toString()); buf.append("("); if (!ignore_args) { bool first = true; for (ArrayIter it = frame->get(s_args).begin(); !it.end(); it.next()) { if (!first) { buf.append(", "); } else { first = false; } try { buf.append(it.second().toString()); } catch (FatalErrorException& fe) { buf.append(fe.getMessage()); } } } buf.append(")"); if (frame.exists(s_file)) { buf.append(" called at ["); buf.append(frame->get(s_file).toString()); buf.append(':'); buf.append(frame->get(s_line).toString()); buf.append(']'); } buf.append('\n'); } return buf.detach(); } else { StackTrace st; return String(st.toString()); } }
void ForEachStatement::eval(VariableEnvironment &env) const { if (env.isGotoing()) return; ENTER_STMT; DECLARE_THREAD_INFO; LOOP_COUNTER(1); Variant map(m_source->eval(env)); if (m_key) { TempExpressionList *texp = m_key->cast<TempExpressionList>(); if (texp) { for (ArrayIter iter = map.begin(env.currentContext(), true); !iter.end(); iter.next()) { { LOOP_COUNTER_CHECK_INFO(1); const Variant &value = iter.second(); const Variant &key = iter.first(); TempExpressionHelper helper(texp, env); m_value->set(env, value); texp->setImpl(env, key); } if (!m_body) continue; EVAL_STMT_HANDLE_GOTO_BEGIN(restart1); EVAL_STMT_HANDLE_BREAK(m_body, env); EVAL_STMT_HANDLE_GOTO_END(restart1); } } else { for (ArrayIter iter = map.begin(env.currentContext(), true); !iter.end(); iter.next()) { LOOP_COUNTER_CHECK_INFO(1); const Variant &value = iter.second(); const Variant &key = iter.first(); m_value->set(env, value); m_key->set(env, key); if (!m_body) continue; EVAL_STMT_HANDLE_GOTO_BEGIN(restart2); EVAL_STMT_HANDLE_BREAK(m_body, env); EVAL_STMT_HANDLE_GOTO_END(restart2); } } } else { for (ArrayIter iter = map.begin(env.currentContext(), true); !iter.end(); iter.next()) { LOOP_COUNTER_CHECK_INFO(1); m_value->set(env, iter.second()); if (!m_body) continue; EVAL_STMT_HANDLE_GOTO_BEGIN(restart3); EVAL_STMT_HANDLE_BREAK(m_body, env); EVAL_STMT_HANDLE_GOTO_END(restart3); } } }
String debug_string_backtrace(bool skip, bool ignore_args /* = false */, int64_t limit /* = 0 */) { Array bt; StringBuffer buf; bt = createBacktrace(BacktraceArgs() .skipTop(skip) .ignoreArgs(ignore_args) .setLimit(limit)); int i = 0; for (ArrayIter it = bt.begin(); !it.end(); it.next(), i++) { Array frame = it.second().toArray(); buf.append('#'); buf.append(i); if (i < 10) buf.append(' '); buf.append(' '); if (frame.exists(s_class)) { buf.append(frame->get(s_class).toString()); buf.append(frame->get(s_type).toString()); } buf.append(frame->get(s_function).toString()); buf.append("("); if (!ignore_args) { bool first = true; for (ArrayIter it(frame->get(s_args).toArray()); !it.end(); it.next()) { if (!first) { buf.append(", "); } else { first = false; } try { buf.append(it.second().toString()); } catch (FatalErrorException& fe) { buf.append(fe.getMessage()); } } } buf.append(")"); if (frame.exists(s_file)) { buf.append(" called at ["); buf.append(frame->get(s_file).toString()); buf.append(':'); buf.append(frame->get(s_line).toString()); buf.append(']'); } buf.append('\n'); } return buf.detach(); }
void f_debug_print_backtrace() { if (RuntimeOption::InjectedStackTrace) { Array bt = FrameInjection::GetBacktrace(true); int i = 0; for (ArrayIter it = bt.begin(); !it.end(); it.next(), i++) { Array frame = it.second().toArray(); StringBuffer buf; buf.append('#'); buf.append(i); if (i < 10) buf.append(' '); buf.append(' '); if (frame.exists("class")) { buf.append(frame->get("class").toString()); buf.append(frame->get("type").toString()); } buf.append(frame->get("function").toString()); buf.append("()"); if (frame.exists("file")) { buf.append(" called at ["); buf.append(frame->get("file").toString()); buf.append(':'); buf.append(frame->get("line").toString()); buf.append(']'); } buf.append('\n'); echo(buf.detach()); } } else { StackTrace st; echo(String(st.toString())); } }
/** * iter_next will advance the iterator to point to the next element. * If the iterator reaches the end, iter_next will free the iterator * and will decRef the array. * This function has been split into hot and cold parts. The hot part has * been carefully crafted so that it's a leaf function (after all functions * it calls have been trivially inlined) that then tail calls a cold * version of itself (iter_next_array_cold). The hot part should cover the * common case, which occurs when the array parameter is an HphpArray. * If you make any changes to this function, please keep the hot/cold * splitting in mind, and disasemble the optimized version of the binary * to make sure the hot part is a good-looking leaf function; otherwise, * you're likely to get a performance regression. */ static NEVER_INLINE int64 iter_next_cold(Iter* iter, TypedValue* valOut, TypedValue* keyOut) { TRACE(2, "iter_next_cold: I %p\n", iter); ASSERT(iter->m_itype == Iter::TypeArray || iter->m_itype == Iter::TypeIterator); ArrayIter* ai = &iter->arr(); ai->next(); if (ai->end()) { // The ArrayIter destructor will decRef the array ai->~ArrayIter(); iter->m_itype = Iter::TypeUndefined; return 0; } if (iter->m_itype == Iter::TypeArray) { iter_value_cell_local_impl<true>(iter, valOut); if (keyOut) { iter_key_cell_local_impl<true>(iter, keyOut); } } else { iter_value_cell_local_impl<false>(iter, valOut); if (keyOut) { iter_key_cell_local_impl<false>(iter, keyOut); } } return 1; }
String debug_string_backtrace(bool skip) { if (RuntimeOption::InjectedStackTrace) { Array bt; StringBuffer buf; bt = g_vmContext->debugBacktrace(skip); int i = 0; for (ArrayIter it = bt.begin(); !it.end(); it.next(), i++) { Array frame = it.second().toArray(); buf.append('#'); buf.append(i); if (i < 10) buf.append(' '); buf.append(' '); if (frame.exists(s_class)) { buf.append(frame->get(s_class).toString()); buf.append(frame->get(s_type).toString()); } buf.append(frame->get(s_function).toString()); buf.append("()"); if (frame.exists(s_file)) { buf.append(" called at ["); buf.append(frame->get(s_file).toString()); buf.append(':'); buf.append(frame->get(s_line).toString()); buf.append(']'); } buf.append('\n'); } return buf.detach(); } else { StackTrace st; return String(st.toString()); } }
bool TestExtPdo::test_pdo_sqlite() { CreateSqliteTestTable(); try { string source = "sqlite:/tmp/foo.db"; p_PDO dbh(NEWOBJ(c_PDO)()); dbh->t___construct(source.c_str(), TEST_USERNAME, TEST_PASSWORD, CREATE_MAP1(q_PDO$$ATTR_PERSISTENT, false)); Variant vstmt = dbh->t_prepare("select * from foo"); c_PDOStatement *stmt = vstmt.toObject().getTyped<c_PDOStatement>(); VERIFY(stmt->t_execute()); Variant rs = stmt->t_fetch(q_PDO$$FETCH_ASSOC); VS(rs, CREATE_MAP1("bar", "ABC")); rs = stmt->t_fetch(q_PDO$$FETCH_ASSOC); VS(rs, CREATE_MAP1("bar", "DEF")); } catch (Object &e) { VS(e, null); } try { string source = "sqlite:/tmp/foo.db"; p_PDO dbh(NEWOBJ(c_PDO)()); dbh->t___construct(source.c_str(), TEST_USERNAME, TEST_PASSWORD, CREATE_MAP1(q_PDO$$ATTR_PERSISTENT, false)); Variant vstmt = dbh->t_query("select * from foo"); ArrayIter iter = vstmt.begin(); VERIFY(!iter.end()); VS(iter.first(), 0); VS(iter.second(), CREATE_MAP2("bar", "ABC", 0, "ABC")); iter.next(); VERIFY(!iter.end()); VS(iter.first(), 1); VS(iter.second(), CREATE_MAP2("bar", "DEF", 0, "DEF")); iter.next(); VERIFY(iter.end()); } catch (Object &e) { VS(e, null); } try { string source = "sqlite:/tmp/foo.db"; p_PDO dbh(NEWOBJ(c_PDO)()); dbh->t___construct(source.c_str(), TEST_USERNAME, TEST_PASSWORD, CREATE_MAP1(q_PDO$$ATTR_PERSISTENT, false)); dbh->t_query("CREATE TABLE IF NOT EXISTS foobar (id INT)"); dbh->t_query("INSERT INTO foobar (id) VALUES (1)"); Variant res = dbh->t_query("SELECT id FROM foobar LIMIT 1"); c_PDOStatement *stmt = res.toObject().getTyped<c_PDOStatement>(); Variant ret = stmt->t_fetch(); VS(ret["id"], "1"); } catch (Object &e) { VS(e, null); } CleanupSqliteTestTable(); return Count(true); }
static Variant yaf_route_rewrite_match(const Object& o, const char* req_uri, int req_uri_len) { char match[8192]; auto ptr_match = o->o_realProp(YAF_ROUTE_PROPETY_NAME_MATCH, ObjectData::RealPropUnchecked, "Yaf_Route_Rewrite"); snprintf(match, sizeof(match), "%s", ptr_match->toString().c_str()); std::string pattern; pattern.append(YAF_ROUTE_REGEX_DILIMITER_STR); pattern.append("^"); char* save_ptr; char* seg = strtok_r(match, YAF_ROUTER_URL_DELIMIETER, &save_ptr); while (seg != NULL) { int len = strlen(seg); if (len) { pattern.append(YAF_ROUTER_URL_DELIMIETER); if (*seg == '*') { pattern.append("(?P<__yaf_route_rest>.*)"); break; } if (*seg == ':') { pattern.append("(?P<"); pattern.append(std::string(seg+1)); pattern.append(std::string(">[^") + YAF_ROUTER_URL_DELIMIETER + "]+)"); } else { pattern.append(seg); } } seg = strtok_r(NULL, YAF_ROUTER_URL_DELIMIETER, &save_ptr); } pattern.append(YAF_ROUTE_REGEX_DILIMITER_STR); pattern.append("i"); Variant matches; Variant ret = preg_match_all(String(pattern), String(std::string(req_uri, req_uri_len)), matches); int match_count = 0; if (ret.isIntVal() ) { match_count = ret.toInt32(); } if (match_count <= 0) { return init_null_variant; } if (!matches.isArray()) { return init_null_variant; } Array args = Array::Create(); Array& arr_matches = matches.toArrRef(); ArrayIter iter = arr_matches.begin(); while (!iter.end()) { Variant key = iter.first(); Variant value = iter.second(); if (!key.isString()) { iter.next(); continue; } if (!strncmp(key.toString().c_str(), "__yaf_route_rest", key.toString().length())) { Variant retval = yaf_router_parse_parameters(value.toArrRef()[0].toString().c_str()); if (retval.isArray()) { args.merge(retval.toArray()); } } else { args.set(key, value.toArrRef()[0]); } iter.next(); } return args; }