From e5888a1ffdae813d7575f5fb02275c6bb07e5199 Mon Sep 17 00:00:00 2001
From: Taru Karttunen <taruti@taruti.net>
Date: Wed, 30 Mar 2011 15:46:40 +0300
Subject: Import sources from 2011-03-30 iso image

---
 sys/src/libregexp/rregsub.c | 64 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 64 insertions(+)
 create mode 100755 sys/src/libregexp/rregsub.c

(limited to 'sys/src/libregexp/rregsub.c')

diff --git a/sys/src/libregexp/rregsub.c b/sys/src/libregexp/rregsub.c
new file mode 100755
index 000000000..c395583d0
--- /dev/null
+++ b/sys/src/libregexp/rregsub.c
@@ -0,0 +1,64 @@
+#include <u.h>
+#include <libc.h>
+#include "regexp.h"
+
+/* substitute into one string using the matches from the last regexec() */
+extern	void
+rregsub(Rune *sp,	/* source string */
+	Rune *dp,	/* destination string */
+	int dlen,
+	Resub *mp,	/* subexpression elements */
+	int ms)		/* number of elements pointed to by mp */
+{
+	Rune *ssp, *ep;
+	int i;
+
+	ep = dp+(dlen/sizeof(Rune))-1;
+	while(*sp != '\0'){
+		if(*sp == '\\'){
+			switch(*++sp){
+			case '0':
+			case '1':
+			case '2':
+			case '3':
+			case '4':
+			case '5':
+			case '6':
+			case '7':
+			case '8':
+			case '9':
+				i = *sp-'0';
+				if(mp[i].rsp != 0 && mp!=0 && ms>i)
+					for(ssp = mp[i].rsp;
+					     ssp < mp[i].rep;
+					     ssp++)
+						if(dp < ep)
+							*dp++ = *ssp;
+				break;
+			case '\\':
+				if(dp < ep)
+					*dp++ = '\\';
+				break;
+			case '\0':
+				sp--;
+				break;
+			default:
+				if(dp < ep)
+					*dp++ = *sp;
+				break;
+			}
+		}else if(*sp == '&'){				
+			if(mp[0].rsp != 0 && mp!=0 && ms>0)
+			if(mp[0].rsp != 0)
+				for(ssp = mp[0].rsp;
+				     ssp < mp[0].rep; ssp++)
+					if(dp < ep)
+						*dp++ = *ssp;
+		}else{
+			if(dp < ep)
+				*dp++ = *sp;
+		}
+		sp++;
+	}
+	*dp = '\0';
+}
-- 
cgit v1.2.3