repos/blastem: util.c comparison

comparison util.c @ 1648:b7ecd0d6a77b mame_interp

Merge from default

author	Michael Pavone <pavone@retrodev.com>
date	Tue, 25 Dec 2018 11:12:26 -0800
parents	137dbd05ceab
children	ab3b465c052c

comparison

equal deleted inserted replaced

-:36732f5c2281
+:b7ecd0d6a77b
 		size--;
 	}
 	*(output++) = 0;
 }
+char *utf16be_to_utf8(uint8_t *buf, uint32_t max_size)
+{
+	uint8_t *cur = buf;
+	uint32_t converted_size = 0;
+	for (uint32_t i = 0; i < max_size; i++, cur+=2)
+	{
+		uint16_t code = *cur << 16 | cur[1];
+		if (!code) {
+			break;
+		}
+		if (code < 0x80) {
+			converted_size++;
+		} else if (code < 0x800) {
+			converted_size += 2;
+		} else {
+			//TODO: Deal with surrogate pairs
+			converted_size += 3;
+		}
+	}
+	char *out = malloc(converted_size + 1);
+	char *cur_out = out;
+	cur = buf;
+	for (uint32_t i = 0; i < max_size; i++, cur+=2)
+	{
+		uint16_t code = *cur << 16 | cur[1];
+		if (!code) {
+			break;
+		}
+		if (code < 0x80) {
+			*(cur_out++) = code;
+		} else if (code < 0x800) {
+			*(cur_out++) = 0xC0 | code >> 6;
+			*(cur_out++) = 0x80 | (code & 0x3F);
+		} else {
+			//TODO: Deal with surrogate pairs
+			*(cur_out++) = 0xF0 | code >> 12;
+			*(cur_out++) = 0x80 | (code >> 6 & 0x3F);
+			*(cur_out++) = 0x80 | (code & 0x3F);
+		}
+	}
+	*cur_out = 0;
+	return out;
+}
+int utf8_codepoint(const char **text)
+{
+	uint8_t initial = **text;
+	(*text)++;
+	if (initial < 0x80) {
+		return initial;
+	}
+	int base = 0;
+	uint8_t extended_bytes = 0;
+	if ((initial & 0xE0) == 0xC0) {
+		base = 0x80;
+		initial &= 0x1F;
+		extended_bytes = 1;
+	} else if ((initial & 0xF0) == 0xE0) {
+		base = 0x800;
+		initial &= 0xF;
+		extended_bytes = 2;
+	} else if ((initial & 0xF8) == 0xF0) {
+		base = 0x10000;
+		initial &= 0x7;
+		extended_bytes = 3;
+	}
+	int value = initial;
+	for (uint8_t i = 0; i < extended_bytes; i++)
+	{
+		if ((**text & 0xC0) != 0x80) {
+			return -1;
+		}
+		value = value << 6;
+		value |= (**text) & 0x3F;
+		(*text)++;
+	}
+	return value + base;
+}
 char is_path_sep(char c)
 {
 #ifdef _WIN32
 	if (c == '\\') {
 		return 1;
 	}
 #endif
 	return is_path_sep(path[0]);
 }
-char * basename_no_extension(char *path)
+char * basename_no_extension(const char *path)
 {
-	char *lastdot = NULL;
+	const char *lastdot = NULL;
-	char *lastslash = NULL;
+	const char *lastslash = NULL;
-	char *cur;
+	const char *cur;
 	for (cur = path; *cur; cur++)
 	{
 		if (*cur == '.') {
 			lastdot = cur;
 		} else if (is_path_sep(*cur)) {
 	barename[lastdot-lastslash] = 0;
 	return barename;
 }
-char *path_extension(char *path)
+char *path_extension(char const *path)
 {
-	char *lastdot = NULL;
+	char const *lastdot = NULL;
-	char *lastslash = NULL;
+	char const *lastslash = NULL;
-	char *cur;
+	char const *cur;
 	for (cur = path; *cur; cur++)
 	{
 		if (*cur == '.') {
 			lastdot = cur;
 		} else if (is_path_sep(*cur)) {
 		return NULL;
 	}
 	return strdup(lastdot+1);
 }
-char * path_dirname(char *path)
+uint8_t path_matches_extensions(char *path, char **ext_list, uint32_t num_exts)
 {
-	char *lastslash = NULL;
+	char *ext = path_extension(path);
-	char *cur;
+	if (!ext) {
+		return 0;
+	}
+	uint32_t extidx;
+	for (extidx = 0; extidx < num_exts; extidx++)
+	{
+		if (!strcasecmp(ext, ext_list[extidx])) {
+			free(ext);
+			return 1;
+		}
+	}
+	free(ext);
+	return 0;
+}
+char * path_dirname(const char *path)
+{
+	const char *lastslash = NULL;
+	const char *cur;
 	for (cur = path; *cur; cur++)
 	{
 		if (is_path_sep(*cur)) {
 			lastslash = cur;
 		}
 	//adjust for difference between Windows and Unix Epoch
 	wintime -= 11644473600LL;
 	return (time_t)wintime;
 }
-int ensure_dir_exists(char *path)
+int ensure_dir_exists(const char *path)
 {
 	if (CreateDirectory(path, NULL)) {
 		return 1;
 	}
 	if (GetLastError() == ERROR_ALREADY_EXISTS) {
 		ret[pos++].is_dir = entry->d_type == DT_DIR;
 	}
 	if (numret) {
 		*numret = pos;
 	}
+	closedir(d);
 	return ret;
 }
 time_t get_modification_time(char *path)
 {
 	//Android's Bionic doesn't support the new style so we'll use the old one instead
 	return st.st_mtime;
 #endif
 }
-int ensure_dir_exists(char *path)
+int ensure_dir_exists(const char *path)
 {
 	struct stat st;
 	if (stat(path, &st)) {
 		if (errno == ENOENT) {
 			char *parent = strdup(path);
 		free(list[i].name);
 	}
 	free(list);
 }
+static int sort_dir_alpha(const void *a, const void *b)
+{
+	const dir_entry *da, *db;
+	da = a;
+	db = b;
+	if (da->is_dir != db->is_dir) {
+		return db->is_dir - da->is_dir;
+	}
+	return strcasecmp(((dir_entry *)a)->name, ((dir_entry *)b)->name);
+}
+void sort_dir_list(dir_entry *list, size_t num_entries)
+{
+	qsort(list, num_entries, sizeof(dir_entry), sort_dir_alpha);
+}
 #ifdef __ANDROID__
 #include <SDL.h>
 char *read_bundled_file(char *name, uint32_t *sizeret)
 {
 			ret = NULL;
 		}
 	} else {
 		ret = NULL;
 	}
+	fclose(f);
 	return ret;
 }
 #ifdef _WIN32

Mercurial > repos > blastem

comparison util.c @ 1648:b7ecd0d6a77b mame_interp