X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/64e8827c5d5def0325ab7181fe939623c77e807c..98c2e7d95bda262ef23e8f0838e5b86d08ed4e4f:/sbr/uprf.c

diff --git a/sbr/uprf.c b/sbr/uprf.c
index 500b036d..90562e84 100644
--- a/sbr/uprf.c
+++ b/sbr/uprf.c
@@ -10,24 +10,22 @@
 #include <h/mh.h>
 
 
+/* uprf returns true if s starts with prefix, ignoring case.
+ * Otherwise false.  If s or prefix are NULL then false results. */
 int
-uprf (char *c1, char *c2)
+uprf(const char *s, const char *prefix)
 {
-    int c, mask;
+    unsigned char *us, *up;
 
-    if (!(c1 && c2))
+    if (!s || !prefix)
 	return 0;
+    us = (unsigned char *)s;
+    up = (unsigned char *)prefix;
 
-    while ((c = *c2++))
-    {
-	c &= 0xff;
-	mask = *c1 & 0xff;
-	c = (isalpha(c) && isupper(c)) ? tolower(c) : c;
-	mask = (isalpha(mask) && isupper(mask)) ? tolower(mask) : mask;
-	if (c != mask)
-	    return 0;
-	else
-	    c1++;
+    while (*us && tolower(*us) == tolower(*up)) {
+        us++;
+        up++;
     }
-    return 1;
+
+    return *up == '\0';
 }