New ctype functions/macros to support many charsets at a time

strings/ctype-simple.c

@@ -0,0 +1,87 @@
+/* Copyright (C) 2000 MySQL AB
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
+
+#include <my_global.h>
+#include "m_ctype.h"
+#include "dbug.h"
+#include "assert.h"
+
+int my_strnxfrm_simple(CHARSET_INFO * cs, 
+                       char *dest, uint len,
+                       const char *src, uint srclen)
+{
+  DBUG_ASSERT(len >= srclen);
+  
+  for ( ; len > 0 ; len-- )
+    *dest++= (char) cs->sort_order[(uchar) *src++];
+  return srclen;
+}
+
+int my_strnncoll_simple(CHARSET_INFO * cs,const char *s, uint slen, 
+				const char *t, uint tlen)
+{
+  int len = ( slen > tlen ) ? tlen : slen;
+  while (len--)
+  {
+    if (cs->sort_order[(uchar) *s++] != cs->sort_order[(uchar) *t++])
+      return ((int) cs->sort_order[(uchar) s[-1]] -
+              (int) cs->sort_order[(uchar) t[-1]]);
+  }
+  return (int) (slen-tlen);
+}
+
+
+void my_caseup_str_8bit(CHARSET_INFO * cs,char *str)
+{
+  while ((*str = (char) my_toupper(cs,(uchar) *str)) != 0)
+    str++;
+}
+
+
+void my_casedn_str_8bit(CHARSET_INFO * cs,char *str)
+{
+  while ((*str = (char) my_tolower(cs,(uchar)*str)) != 0)
+    str++;
+}
+
+
+void my_caseup_8bit(CHARSET_INFO * cs, char *str, uint length)
+{
+  for ( ; length>0 ; length--, str++)
+    *str= (char) my_toupper(cs,(uchar)*str);
+}
+
+void my_casedn_8bit(CHARSET_INFO * cs, char *str, uint length)
+{
+  for ( ; length>0 ; length--, str++)
+    *str= (char)my_tolower(cs,(uchar) *str);
+}
+
+
+int my_strcasecmp_8bit(CHARSET_INFO * cs,const char *s, const char *t)
+{
+  while (my_toupper(cs,(uchar) *s) == my_toupper(cs,(uchar) *t++))
+    if (!*s++) return 0;
+  return ((int) my_toupper(cs,(uchar) s[0]) - (int) my_toupper(cs,(uchar) t[-1]));
+}
+
+
+int my_strncasecmp_8bit(CHARSET_INFO * cs,
+				const char *s, const char *t, uint len)
+{
+ while (len-- != 0 && my_toupper(cs,(uchar)*s++) == my_toupper(cs,(uchar)*t++)) ;
+   return (int) len+1;
+}