libcharconv_yijing_monograms.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

/* See LICENSE file for copyright and license details. */
#include "lib-common.h"


enum libcharconv_result
libcharconv_yijing_monograms(const char *s, size_t slen, size_t *n, uint_least32_t *cp, size_t *ncp)
{
	uint_least32_t c;
	*n = 0;
	for (; slen--; s++) {
		switch (*s) {
		case '1': c = UINT32_C(0x268A); goto conv;
		case '2': c = UINT32_C(0x268B); goto conv;
		case '3': c = UINT32_C(0x1D300); goto conv;
		default:
			*n += 1u;
			break;
		}
	}
no_conv:
	return LIBCHARCONV_NO_CONVERT;

conv:
	if (*n)
		goto no_conv;
	if (*ncp)
		*cp = c;
	*n += 1u;
	*ncp = 1u;
	return LIBCHARCONV_CONVERTED;
}