re_detail_vc6.inl

正则表达式。利用模板完成

// re_detail_vc6.inl
// 
// 正则表达式解析库
// 
// 与2004年在北京写于创意鹰翔公司
// 版权申明:
// 作者放弃除著作署名权之外的任何权益。你可以在保留此申明的前提下，自由的，无限制的
// 分发、修改和使用本函数库。
// 如果你有任何建议和BUG汇报，欢迎你联系原始作者:[e-mail]
//
// 原始作者 : lanzhengpeng(兰征鹏)
// Modify time : 2004-6-15 22:57
// 历史: 参看re_history.txt
//-----------------------------------------------------------------------------

//template<class TRAITS>
re_error /*re_pattern<TRAITS>::*/parse(const typename TRAITS::re_char * szStart,
									   const typename TRAITS::re_char * szEnd = NULL,
									   re_flags flags = rf_zero)
{
	clear();
	_push_syntex(new rp_array);

	if(szEnd == NULL)
		szEnd = reinterpret_cast<const re_char *>(reinterpret_cast<const char *>(szStart) + traits::ByteLen(szStart));

	assert(szEnd >= szStart);
	if(szEnd < szStart)
		return ree_address;

	m_eFlags = flags;
	if(flags & rf_nocase)
	{
		size_t nByteLen = reinterpret_cast<const char *>(szEnd) - reinterpret_cast<const char *>(szStart);
		re_char * sz = reinterpret_cast<re_char *>(new char[nByteLen]);

		ToLower(szStart,szEnd,sz);
		szStart = sz;
		szEnd = reinterpret_cast<const re_char *>(reinterpret_cast<const char *>(szStart) + nByteLen);

		m_eError = _parse(szStart,szEnd);
		m_Syntexes.clear();
		delete [] reinterpret_cast<char *>(sz);
		if(m_eError == ree_ok)
		{
			if(flags & rt_optimize)
				_optimize();
		}
		else
		{
			re_error Err = m_eError;
			clear();
			return Err;
		}
	}
	else
	{
		m_eError = _parse(szStart,szEnd);
		m_Syntexes.clear();
		if(m_eError == ree_ok)
		{
			if(flags & rt_optimize)
				_optimize();
		}
		else
		{
			re_error Err = m_eError;
			clear();
			return Err;
		}
	}

	return ree_ok;
}

//template<class TRAITS>
re_error /*re_pattern<TRAITS>::*/match(const typename TRAITS::re_char * szStart,
									   re_result<TRAITS> & result,
									   const typename TRAITS::re_char * szEnd = NULL) const
{
	if(m_Syntex == NULL)
		return ree_noparse;
	if(szEnd == NULL)
		szEnd = reinterpret_cast<const re_char *>(reinterpret_cast<const char *>(szStart) + traits::ByteLen(szStart));

	assert(szEnd >= szStart);
	if(szEnd < szStart)
		return ree_address;

	result.m_Groups.clear();
	if(option() & rf_nocase)
	{
		size_t nByteLen = reinterpret_cast<const char *>(szEnd) - reinterpret_cast<const char *>(szStart);
		re_char * szNew = reinterpret_cast<re_char *>(new char[nByteLen]);
		ToLower(szStart,szEnd,szNew);
		szEnd = reinterpret_cast<const re_char *>(reinterpret_cast<char *>(szNew) + nByteLen);

		re_error e = _match(re_match_temp(szNew,szEnd,option()),szNew,result);
		if(e == ree_ok)
			result._repair(reinterpret_cast<const char *>(szStart) - reinterpret_cast<const char *>(szNew));
		delete [] reinterpret_cast<char *>(szNew);

		return e;
	}
	else
	{
		return _match(re_match_temp(szStart,szEnd,option()),szStart,result);
	}
}

//template<class TRAITS>
void /*re_pattern<TRAITS>::*/clear()
{
	m_eError = ree_ok;
	m_eFlags = rf_zero;
	m_nGroupId = 0;
	if(m_Syntex != NULL)
	{
		delete m_Syntex;
		m_Syntex = NULL;
	}
}

//替换函数
//szFind:条件表达式,正则表达式.为NULL表示使用之前调用parse的结果
//szReplaceWith:替换内容表达式。
//				\0表示替换成查找到的内容,
//				\1,\2,...表示替换成条件表达式中第0个，第1个，...组
//				其余部分原封不动的替换
//szReplace:将要被替换的文本
//strResult:替换的结果文本.模板参数STRING类型。要求支持STRING(CharT *,size_t)形式构造一个String，和
//			支持+=操作符号。似乎一个完善的String类都应该支持

//template<class TRAITS>
template<class STRING>
re_error /*re_pattern<TRAITS>::*/replace(const typename TRAITS::re_char * szFind,
										 const typename TRAITS::re_char * szReplaceWith,
										 const typename TRAITS::re_char * szReplace,
										 STRING & strResult,
										 re_flags flags/* = rf_zero*/)
{
	if(NULL != szFind)
		parse(szFind,NULL,flags);
	if(m_Syntex == NULL)
		return ree_noparse;

	const this_type & rpf = *this;
	result_type rrw;
	{
		this_type	rpw;
		rpw.parse((re_char *)ReplaceRegular());
		rpw.match(szReplaceWith,rrw);
	}

	const re_char * pend = reinterpret_cast<const re_char *>(reinterpret_cast<const char *>(szReplace) + ByteLen((re_char *)szReplace));
	result_type	rr;
	for(const re_char * p = szReplace; p < pend; )
	{
		if(ree_ok == rpf.match(p,rr,pend))
		{
			//匹配到表达式
			//输出被跳过的字符
			strResult += STRING((re_char *)p,rr.m_Match.begin - p);
			//			strResult.append((re_char *)p,rr.m_Match.begin - p);
			for(size_t i=0; i<rrw.GroupCount(); ++i)
			{
				match_type mch = rrw[i];
				if(mch.id == 0)
				{
					strResult += STRING((re_char *)mch.begin,mch.end - mch.begin);
					//					strResult.append((CharT *)mch.begin,mch.end - mch.begin);
				}
				else 
				{
					size_t nGroup = _ttoi((re_char *)mch.begin + 1);
					if(nGroup == 0)
					{
						strResult += STRING((re_char *)rr.m_Match.begin,rr.m_Match.end - rr.m_Match.begin);
						//						strResult.append((CharT *)rr.m_Match.begin,rr.m_Match.end - rr.m_Match.begin);
					}
					else if(nGroup <= rr.GroupCount())
					{
						mch = rr[nGroup - 1];
						strResult += STRING((re_char *)mch.begin,mch.end - mch.begin);
						//						strResult.append((CharT *)mch.begin,mch.end - mch.begin);
					}
				}
			}
			//移动指针
			p = (re_char *)rr.m_Match.end;
		}
		else
		{
			strResult += STRING((re_char *)p,pend - p);
			//			strResult.append((CharT *)p,pend - p);
			//结束
			p = pend;
		}
	}

	return ree_ok;
}