Loading...
string/FreeBSD/strxfrm.c Libc-1082.20.4 Libc-320
--- Libc/Libc-1082.20.4/string/FreeBSD/strxfrm.c
+++ Libc/Libc-320/string/FreeBSD/strxfrm.c
@@ -26,120 +26,58 @@
  */
 
 #include <sys/cdefs.h>
-__FBSDID("$FreeBSD: src/lib/libc/string/strxfrm.c,v 1.17 2008/10/19 09:10:44 delphij Exp $");
-
-#include "xlocale_private.h"
+__FBSDID("$FreeBSD: src/lib/libc/string/strxfrm.c,v 1.15 2002/09/06 11:24:06 tjr Exp $");
 
 #include <stdlib.h>
 #include <string.h>
-#include <wchar.h>
-#include <errno.h>
 #include "collate.h"
 
-/*
- * In the non-POSIX case, we transform each character into a string of
- * characters representing the character's priority.  Since char is usually
- * signed, we are limited by 7 bits per byte.  To avoid zero, we need to add
- * XFRM_OFFSET, so we can't use a full 7 bits.  For simplicity, we choose 6
- * bits per byte.  We choose 4 bytes per character as a good compromise
- * between maximum coverage and minimum size.  This gives 24 bits, or 16M
- * priorities.  So we choose COLLATE_MAX_PRIORITY to be (2^24 - 1).  This
- * this can be increased if more is needed.
- */
+size_t
+strxfrm(char * __restrict dest, const char * __restrict src, size_t len)
+{
+	int prim, sec, l;
+	size_t slen;
+	char *s, *ss;
 
-#define	XFRM_BYTES	4
-#define	XFRM_OFFSET	('0')	/* make all printable characters */
-#define	XFRM_SHIFT	6
-#define	XFRM_MASK	((1 << XFRM_SHIFT) - 1)
-
-static void
-xfrm(unsigned char *p, int pri)
-{
-
-	p[3] = (pri & XFRM_MASK) + XFRM_OFFSET;
-	pri >>= XFRM_SHIFT;
-	p[2] = (pri & XFRM_MASK) + XFRM_OFFSET;
-	pri >>= XFRM_SHIFT;
-	p[1] = (pri & XFRM_MASK) + XFRM_OFFSET;
-	pri >>= XFRM_SHIFT;
-	p[0] = (pri & XFRM_MASK) + XFRM_OFFSET;
-}
-
-size_t
-strxfrm_l(char * __restrict dest, const char * __restrict src, size_t len,
-    locale_t loc)
-{
-	size_t slen;
-	wchar_t *wcs, *xf[2];
-	int sverrno;
-
-	if (!*src && dest) {
+	if (!*src) {
 		if (len > 0)
 			*dest = '\0';
 		return 0;
 	}
 
-	NORMALIZE_LOCALE(loc);
-	if (loc->__collate_load_error || (wcs = __collate_mbstowcs(src, loc)) == NULL)
-		return strlcpy(dest, src, len);
+	if (__collate_load_error) {
+		slen = strlen(src);
+		if (len > 0) {
+			if (slen < len)
+				strcpy(dest, src);
+			else {
+				strncpy(dest, src, len - 1);
+				dest[len - 1] = '\0';
+			}
+		}
+		return slen;
+	}
 
-	__collate_xfrm(wcs, xf, loc);
-
-	slen = wcslen(xf[0]) * XFRM_BYTES;
-	if (xf[1])
-		slen += (wcslen(xf[1]) + 1) * XFRM_BYTES;
-	if (len > 0) {
-		wchar_t *w = xf[0];
-		int b = 0;
-		unsigned char buf[XFRM_BYTES];
-		unsigned char *bp;
-		while (len > 1) {
-			if (!b) {
-				if (!*w)
-					break;
-				xfrm(bp = buf, *w++);
-				b = XFRM_BYTES;
-			}
-			*dest++ = *(char *)bp++;
-			b--;
-			len--;
+	slen = 0;
+	prim = sec = 0;
+	ss = s = __collate_substitute(src);
+	while (*s) {
+		while (*s && !prim) {
+			__collate_lookup(s, &l, &prim, &sec);
+			s += l;
 		}
-		if ((w = xf[1]) != NULL) {
-			xfrm(bp = buf, 0);
-			b = XFRM_BYTES;
-			while (len > 1) {
-				if (!b)
-					break;
-				*dest++ = *(char *)bp++;
-				b--;
+		if (prim) {
+			if (len > 1) {
+				*dest++ = (char)prim;
 				len--;
 			}
-			b = 0;
-			while (len > 1) {
-				if (!b) {
-					if (!*w)
-						break;
-					xfrm(bp = buf, *w++);
-					b = XFRM_BYTES;
-				}
-				*dest++ = *(char *)bp++;
-				b--;
-				len--;
-			}
+			slen++;
+			prim = 0;
 		}
-		*dest = 0;
- 	}
-	sverrno = errno;
-	free(wcs);
-	free(xf[0]);
-	free(xf[1]);
-	errno = sverrno;
+	}
+	free(ss);
+	if (len > 0)
+		*dest = '\0';
 
 	return slen;
 }
-
-size_t
-strxfrm(char * __restrict dest, const char * __restrict src, size_t len)
-{
-	return strxfrm_l(dest, src, len, __current_locale());
-}