1#define _BSD_SOURCE
 2#include <nl_types.h>
 3#include <endian.h>
 4#include <stdlib.h>
 5#include <stdint.h>
 6#include <errno.h>
 7
 8#define V(p) be32toh(*(uint32_t *)(p))
 9
10#ifdef __wasilibc_unmodified_upstream // wasi-libc doesn't support catgets yet
11static int cmp(const void *a, const void *b)
12{
13	uint32_t x = V(a), y = V(b);
14	return x<y ? -1 : x>y ? 1 : 0;
15}
16#endif
17
18char *catgets (nl_catd catd, int set_id, int msg_id, const char *s)
19{
20#ifdef __wasilibc_unmodified_upstream // wasi-libc doesn't support catgets yet
21	const char *map = (const char *)catd;
22	uint32_t nsets = V(map+4);
23	const char *sets = map+20;
24	const char *msgs = map+20+V(map+12);
25	const char *strings = map+20+V(map+16);
26	uint32_t set_id_be = htobe32(set_id);
27	uint32_t msg_id_be = htobe32(msg_id);
28	const char *set = bsearch(&set_id_be, sets, nsets, 12, cmp);
29	if (!set) {
30		errno = ENOMSG;
31		return (char *)s;
32	}
33	uint32_t nmsgs = V(set+4);
34	msgs += 12*V(set+8);
35	const char *msg = bsearch(&msg_id_be, msgs, nmsgs, 12, cmp);
36	if (!msg) {
37		errno = ENOMSG;
38		return (char *)s;
39	}
40	return (char *)(strings + V(msg+8));
41#else
42	return (char *)s;
43#endif
44}