unicode/unicode_wcwidth.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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66

#include "unicode_config.h"
#include "courier-unicode.h"

#include "eastasianwidth.h"
#include "linebreaktab_internal.h"

#include <stdlib.h>

unicode_eastasia_t unicode_eastasia(char32_t c)
{
	size_t b=0;
	size_t e=sizeof(unicode_eastasia_tab)/sizeof(unicode_eastasia_tab[0]);

	while (b < e)
	{
		size_t n=b + (e-b)/2;

		if (c >= unicode_eastasia_tab[n][0])
		{
			if (c <= unicode_eastasia_tab[n][1])
				return unicode_eastasia_v[n];
			b=n+1;
		}
		else
		{
			e=n;
		}
	}

	return UNICODE_EASTASIA_N;
}

int unicode_wcwidth(char32_t c)
{
	switch (unicode_lb_lookup(c)) {
	case UNICODE_LB_BK:
	case UNICODE_LB_CR:
	case UNICODE_LB_LF:
	case UNICODE_LB_CM:
	case UNICODE_LB_NL:
	case UNICODE_LB_WJ:
	case UNICODE_LB_ZW:
		return 0;
	default:
		break;
	}

	switch (unicode_eastasia(c)) {
	case UNICODE_EASTASIA_F:
	case UNICODE_EASTASIA_W:
		return 2;
	}

	return 1;
}

size_t unicode_wcwidth_str(const char32_t *c)
{
	size_t w=0;

	while (*c)
		w += unicode_wcwidth(*c++);


	return w;
}