shithub: femtolisp

ref: 7fcae265252c0a29cf2a4b0c1474b35e7ad39619
dir: /3rd/utf/utfnlen.c/

View raw version 
#include "platform.h"

int
utfnlen(const char *s, long m)
{
	int c;
	long n;
	Rune rune;
	const char *es;

	es = s + m;
	for(n = 0; s < es; n++) {
		c = *(uint8_t*)s;
		if(c < Runeself){
			if(c == '\0')
				break;
			s++;
			continue;
		}
		if(!fullrune(s, es-s))
			break;
		s += chartorune(&rune, s);
	}
	return n;
}