xstrcoll.c

Go to the documentation of this file.

#include "config.h"
#include "xstrcoll.h"

#include <string.h>

#include "len.h"

#ifndef MIN
# define MIN(a,b) (((a) < (b)) ? (a) : (b))
#endif

#ifndef NONZERO
# define NONZERO(x) ((x) != 0)
#endif

static char sortorder[] = "/\\~=-+!@#$%^&*()_{}[]|:;\"¨'?,.`0123456789AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz ";

int str_compare(void *a, void *b)
{
        return xstrcoll((char *)a, str_len(a), (char *)b, str_len(b));
}

int xstrcoll(const char *a, size_t alen, const char *b, size_t blen)
{
        if (alen == 0)
                return - NONZERO(blen);
        else if (blen == 0)
                return 1;

        if(alen == blen && memcmp(a, b, alen) == 0)
                return 0;

        char *s = (char *)sortorder;
        int slen = str_len(s);
        int j, aval, bval;
        size_t i;
        i = j = aval = bval = 0;

        while(i < MIN(alen, blen))
        {
                if(memcmp(a + i, b + i, 1) != 0)
                {
                        j = aval = bval = 0;
                        while(j < slen && (aval == 0 || bval == 0))
                        {
                                if(s[j] == a[i])
                                        aval = j;
                                if(s[j] == b[i])
                                        bval = j;
                                j++;
                        }
                        if(aval != bval)
                                return aval - bval;
                }
                i++;
        }

        if(i == MIN(alen, blen) && alen < blen)
          return -1;
        else if(i == MIN(alen, blen) && alen > blen)
          return 1;
        else
          return 0; /* or error? */
}