shithub: femtolisp

ref: 4dc8cff4fd04e8536f5577522ecb95032064f295
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;
}