Crypt-SecretBuffer
view release on metacpan or search on metacpan
secret_buffer_parse_match_str.c view on Meta::CPAN
}
#if 0
if (consttime) {
warn(" @%2d matched=%d parse->pos=%d real_search_pos=%d ret_pos=%d ret_lim=%d anchor_fail=%d",
(int)(search_pos-orig), (int)matched, (int)(parse->pos-orig), (int)(real_search_pos-orig),
(int)(ret_pos? ret_pos-orig : -1), (int)(ret_lim? ret_lim-orig : -1), (int)anchor_fail);
}
#endif
#undef SB_HANDLE_ENCODING_ERROR
/* Code below does not set return values unless `search_pos >= real_search_pos`
* so that the consttime busywork iterations don't change any return-value state.
*/
/* Found the goal? (match, or negated match) */
if (matched != negate) {
/* The desired (multi?)match begins here, unless it already began */
if (!ret_pos && search_pos >= real_search_pos) {
ret_pos= search_pos;
ret_pos_bit= search_pos_bit;
}
/* It also ends here if multi is false, unless already set */
if (!multi && !ret_lim && search_pos >= real_search_pos) {
secret_buffer_parse_match_str.c view on Meta::CPAN
}
#if 0
if (!anchored && !multi) {
warn(" @%2d matched=%d parse->lim=%d real_search_lim=%d ret_pos=%d ret_lim=%d anchor_fail=%d",
(int)(search_lim-orig-1), (int)matched, (int)(parse->lim-orig), (int)(real_search_lim-orig),
(int)(ret_pos? ret_pos-orig : -1), (int)(ret_lim? ret_lim-orig : -1), (int)anchor_fail);
}
#endif
#undef SB_HANDLE_ENCODING_ERROR
/* Code below does not set return values unless `search_pos >= real_search_pos`
* so that the consttime busywork iterations don't change any return-value state.
*/
/* Found the goal? (match, or negated match) */
if (matched != negate) {
/* The desired (multi?)match begins here, unless it already began */
if (!ret_lim && search_lim <= real_search_lim) {
ret_lim= search_lim;
ret_lim_bit= search_lim_bit;
}
/* It also ends here if multi is false, unless already set */
if (!multi && !ret_pos && search_lim <= real_search_lim) {
( run in 0.727 second using v1.01-cache-2.11-cpan-96521ef73a4 )