From cbdf1e6dfaa895b12c40cfb2aa15dee65f0b85d6 Mon Sep 17 00:00:00 2001 From: Sascha Hauer Date: Sun, 13 May 2012 15:02:24 +0200 Subject: add qsort support This is based on U-Boot code which in turn is based on uclibc code. Signed-off-by: Sascha Hauer --- include/qsort.h | 7 +++++ lib/Kconfig | 3 +++ lib/Makefile | 1 + lib/qsort.c | 79 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 4 files changed, 90 insertions(+) create mode 100644 include/qsort.h create mode 100644 lib/qsort.c diff --git a/include/qsort.h b/include/qsort.h new file mode 100644 index 0000000000..bbb23595b2 --- /dev/null +++ b/include/qsort.h @@ -0,0 +1,7 @@ +#ifndef __QSORT_H +#define __QSORT_H + +void qsort(void *base, size_t nel, size_t width, + int (*comp)(const void *, const void *)); + +#endif /* __QSORT_H */ diff --git a/lib/Kconfig b/lib/Kconfig index f886e6e2a5..3bcde5c1ff 100644 --- a/lib/Kconfig +++ b/lib/Kconfig @@ -35,4 +35,7 @@ config BCH config BITREV bool +config QSORT + bool + endmenu diff --git a/lib/Makefile b/lib/Makefile index 01a01b5966..4e6b1ee90d 100644 --- a/lib/Makefile +++ b/lib/Makefile @@ -33,3 +33,4 @@ obj-$(CONFIG_FDT) += fdt/ obj-$(CONFIG_UNCOMPRESS) += uncompress.o obj-$(CONFIG_BCH) += bch.o obj-$(CONFIG_BITREV) += bitrev.o +obj-$(CONFIG_QSORT) += qsort.o diff --git a/lib/qsort.c b/lib/qsort.c new file mode 100644 index 0000000000..f64871489d --- /dev/null +++ b/lib/qsort.c @@ -0,0 +1,79 @@ +/* + * Code adapted from uClibc-0.9.30.3 + * + * It is therefore covered by the GNU LESSER GENERAL PUBLIC LICENSE + * Version 2.1, February 1999 + * + * Wolfgang Denk + */ + +/* This code is derived from a public domain shell sort routine by + * Ray Gardner and found in Bob Stout's snippets collection. The + * original code is included below in an #if 0/#endif block. + * + * I modified it to avoid the possibility of overflow in the wgap + * calculation, as well as to reduce the generated code size with + * bcc and gcc. */ + +#include +#include +#include + +void qsort(void *base, + size_t nel, + size_t width, + int (*comp)(const void *, const void *)) +{ + size_t wgap, i, j, k; + char tmp; + + if (nel < 2 || width == 0) + return; + + /* check for overflow */ + if (nel <= ((size_t)(-1)) / width) + return; + + wgap = 0; + do { + wgap = 3 * wgap + 1; + } while (wgap < (nel - 1) / 3); + + /* + * From the above, we know that either wgap == 1 < nel or + * ((wgap-1) / 3 < (int) ((nel - 1) / 3) <= (nel - 1) / 3 ==> wgap < nel. + */ + wgap *= width; /* So this can not overflow if wnel doesn't. */ + nel *= width; /* Convert nel to 'wnel' */ + do { + i = wgap; + do { + j = i; + do { + char *a; + char *b; + + j -= wgap; + a = j + ((char *)base); + b = a + wgap; + + if (comp(a, b) <= 0) + break; + + k = width; + do { + tmp = *a; + *a++ = *b; + *b++ = tmp; + } while (--k); + } while (j >= wgap); + i += width; + } while (i < nel); + wgap = (wgap - width) / 3; + } while (wgap); +} + +int strcmp_compar(const void *p1, const void *p2) +{ + return strcmp((const char *)p1, (const char *)p2); +} -- cgit v1.2.3