Function AR_MATCHREGEX

src/arithmetic/string_funcs/string_funcs.c:320–367

given a string and a regular expression, return an array of all matches and matching regions string.matchRegEx(str, regex) -> array(array(string))

// return an array of all matches and matching regions
// string.matchRegEx(str, regex) -> array(array(string))
SIValue AR_MATCHREGEX(SIValue *argv, int argc, void *private_data) {
	SIValue list = SIArray_New(0);
	if(SI_TYPE(argv[0]) == T_NULL || SI_TYPE(argv[1]) == T_NULL) {
		return list;
	}

	regex_t *regex;
	OnigErrorInfo einfo;
	OnigRegion *region    = onig_region_new();
	const char *str       = argv[0].stringval;
	const char *regex_str = argv[1].stringval;

	int rv = onig_new(&regex, (const UChar *)regex_str, 
		(const UChar *)(regex_str + strlen(regex_str)), ONIG_OPTION_DEFAULT,
		ONIG_ENCODING_UTF8, ONIG_SYNTAX_JAVA, &einfo);
	if(rv != ONIG_NORMAL) {
		char s[ONIG_MAX_ERROR_MESSAGE_LEN];
		onig_error_code_to_str((UChar* )s, rv, &einfo);
		ErrorCtx_SetError("Invalid regex, err=%s", s);
		onig_free(regex);
		onig_region_free(region, 1);
		SIValue_Free(list);
		return SI_NullVal();
	}

	match_regex_scan_cb_args args = {
		.list = &list,
		.str = str
	};

	rv = onig_scan(regex, (const UChar *)str,
		(const UChar *)(str + strlen(str)), region, ONIG_OPTION_DEFAULT,
		match_regex_scan_cb, &args);
	if(rv < 0) {
		char s[ONIG_MAX_ERROR_MESSAGE_LEN];
		onig_error_code_to_str((OnigUChar* )s, rv);
		ErrorCtx_SetError("Invalid regex, err=%s", s);
		onig_free(regex);
		onig_region_free(region, 1);
		SIValue_Free(list);
		return SI_NullVal();
	}

	onig_free(regex);
	onig_region_free(region, 1);

	return list;
}

typedef struct {
	char *res;