Function tok822_comment

lib_acl_cpp/src/mime/internal/tok822_parse.cpp:592–622

/* tok822_comment - tokenize comment */

static const char *tok822_comment(TOK822 *tp, const char *str)
{
	int     level = 1;
	int     ch;

	/*
	 * XXX We cheat by storing comments in their external form. Otherwise it
	 * would be a royal pain to preserve \ before (. That would require a
	 * recursive parser; the easy to implement stack-based recursion would be
	 * too expensive.
	 */
	ACL_VSTRING_ADDCH(tp->vstr, '(');

	while ((ch = *(const unsigned char *) str) != 0) {
		ACL_VSTRING_ADDCH(tp->vstr, ch);
		str++;
		if (ch == '(') {			/* comments can nest! */
			level++;
		} else if (ch == ')') {
			if (--level == 0)
				break;
		} else if (ch == '\\') {
			if ((ch = *(unsigned char *) str) == 0)
				break;
			ACL_VSTRING_ADDCH(tp->vstr, ch);
			str++;
		}
	}
	ACL_VSTRING_TERMINATE(tp->vstr);
	return (str);
}

/* tok822_group - cluster a group of tokens */