8112d91c441c08133c900a0682da4c1eb39d9d68
[musl] / src / locale / __mo_lookup.c
1 #include <stdint.h>
2 #include <string.h>
3
4 static inline uint32_t swapc(uint32_t x, int c)
5 {
6         return c ? x>>24 | x>>8&0xff00 | x<<8&0xff0000 | x<<24 : x;
7 }
8
9 const char *__mo_lookup(const void *p, size_t size, const char *s)
10 {
11         const uint32_t *mo = p;
12         int sw = *mo - 0x950412de;
13         uint32_t b = 0, n = swapc(mo[2], sw);
14         uint32_t o = swapc(mo[3], sw);
15         uint32_t t = swapc(mo[4], sw);
16         if (n>=size/4 || o>=size-4*n || t>=size-4*n || ((o|t)%4))
17                 return 0;
18         o/=4;
19         t/=4;
20         for (;;) {
21                 uint32_t os = swapc(mo[o+2*(b+n/2)+1], sw);
22                 if (os >= size) return 0;
23                 int sign = strcmp(s, (char *)p + os);
24                 if (!sign) {
25                         uint32_t ts = swapc(mo[t+2*(b+n/2)+1], sw);
26                         if (ts >= size) return 0;
27                         return (char *)p + ts;
28                 }
29                 else if (n == 1) return 0;
30                 else if (sign < 0)
31                         n /= 2;
32                 else {
33                         b += n/2;
34                         n -= n/2;
35                 }
36         }
37         return 0;
38 }