forked from Bananymous/banan-os
				
			LibC: Implement getpw{nam,uid}_r
This commit is contained in:
		
							parent
							
								
									654e8bb7f6
								
							
						
					
					
						commit
						fda0ced72e
					
				|  | @ -1,118 +1,142 @@ | |||
| #include <BAN/Assert.h> | ||||
| 
 | ||||
| #include <ctype.h> | ||||
| #include <errno.h> | ||||
| #include <pwd.h> | ||||
| #include <stdio.h> | ||||
| #include <stdlib.h> | ||||
| #include <string.h> | ||||
| #include <unistd.h> | ||||
| 
 | ||||
| static FILE* s_pwent_fp = nullptr; | ||||
| static passwd s_pwent_struct; | ||||
| 
 | ||||
| static bool open_pwent() | ||||
| { | ||||
| 	if (s_pwent_fp) | ||||
| 		return true; | ||||
| 	s_pwent_fp = fopen("/etc/passwd", "r"); | ||||
| 	return s_pwent_fp; | ||||
| } | ||||
| 
 | ||||
| static void clear_pwent(passwd& passwd) | ||||
| { | ||||
| 	if (passwd.pw_name) | ||||
| 		free(passwd.pw_name); | ||||
| 	passwd.pw_name = nullptr; | ||||
| 	if (passwd.pw_dir) | ||||
| 		free(passwd.pw_dir); | ||||
| 	passwd.pw_dir = nullptr; | ||||
| 	if (passwd.pw_shell) | ||||
| 		free(passwd.pw_shell); | ||||
| 	passwd.pw_shell = nullptr; | ||||
| } | ||||
| static char* s_pwent_buffer = nullptr; | ||||
| static size_t s_pwent_buffer_size = 0; | ||||
| 
 | ||||
| void endpwent(void) | ||||
| { | ||||
| 	if (s_pwent_fp) | ||||
| 		fclose(s_pwent_fp); | ||||
| 	s_pwent_fp = nullptr; | ||||
| 
 | ||||
| 	if (s_pwent_buffer) | ||||
| 		free(s_pwent_buffer); | ||||
| 	s_pwent_buffer = nullptr; | ||||
| } | ||||
| 
 | ||||
| void setpwent(void) | ||||
| { | ||||
| 	if (!s_pwent_fp) | ||||
| 		return; | ||||
| 	fclose(s_pwent_fp); | ||||
| 	s_pwent_fp = nullptr; | ||||
| 	clear_pwent(s_pwent_struct); | ||||
| 	fseek(s_pwent_fp, 0, SEEK_SET); | ||||
| } | ||||
| 
 | ||||
| static int getpwent_impl(FILE* fp, struct passwd* pwd, char* buffer, size_t bufsize, struct passwd** result) | ||||
| { | ||||
| 	for (;;) | ||||
| 	{ | ||||
| 		if (fgets(buffer, bufsize, fp) == nullptr) | ||||
| 		{ | ||||
| 			if (ferror(fp)) | ||||
| 				return errno; | ||||
| 			*result = nullptr; | ||||
| 			return 0; | ||||
| 		} | ||||
| 
 | ||||
| 		const size_t line_len = strlen(buffer); | ||||
| 		if (line_len == 0) | ||||
| 			continue; | ||||
| 
 | ||||
| 		if (buffer[line_len - 1] == '\n') | ||||
| 			buffer[line_len - 1] = '\0'; | ||||
| 		else if (!feof(fp)) | ||||
| 			return (errno = ERANGE); | ||||
| 
 | ||||
| #define GET_STRING() ({ \ | ||||
| 			ptr = strchr(ptr, ':'); \ | ||||
| 			if (ptr == nullptr) \ | ||||
| 				continue; \ | ||||
| 			*ptr++ = '\0'; \ | ||||
| 		}) | ||||
| 
 | ||||
| #define GET_INT() ({ \ | ||||
| 				if (!isdigit(*ptr)) \ | ||||
| 					continue; \ | ||||
| 				long val = 0; \ | ||||
| 				while (isdigit(*ptr)) \ | ||||
| 					val = (val * 10) + (*ptr++ - '0'); \ | ||||
| 				if (*ptr != ':') \ | ||||
| 					continue; \ | ||||
| 				*ptr++ = '\0'; \ | ||||
| 				val; \ | ||||
| 			}) | ||||
| 
 | ||||
| 		char* ptr = buffer; | ||||
| 
 | ||||
| 		pwd->pw_name = ptr; | ||||
| 		GET_STRING(); | ||||
| 
 | ||||
| 		pwd->pw_passwd = ptr; | ||||
| 		GET_STRING(); | ||||
| 
 | ||||
| 		pwd->pw_uid = GET_INT(); | ||||
| 
 | ||||
| 		pwd->pw_gid = GET_INT(); | ||||
| 
 | ||||
| 		pwd->pw_gecos = ptr; | ||||
| 		GET_STRING(); | ||||
| 
 | ||||
| 		pwd->pw_dir = ptr; | ||||
| 		GET_STRING(); | ||||
| 
 | ||||
| 		pwd->pw_shell = ptr; | ||||
| 
 | ||||
| 		*result = pwd; | ||||
| 		return 0; | ||||
| 	} | ||||
| } | ||||
| 
 | ||||
| struct passwd* getpwent(void) | ||||
| { | ||||
| 	if (!s_pwent_fp) | ||||
| 		if (!open_pwent()) | ||||
| 			return nullptr; | ||||
| 	clear_pwent(s_pwent_struct); | ||||
| 
 | ||||
| 	static char buffer[4096]; | ||||
| 	if (!fgets(buffer, sizeof(buffer), s_pwent_fp)) | ||||
| 		return nullptr; | ||||
| 
 | ||||
| 	size_t buffer_len = strlen(buffer); | ||||
| 
 | ||||
| 	ASSERT(buffer[buffer_len - 1] == '\n'); | ||||
| 	buffer[buffer_len - 1] = '\0'; | ||||
| 	buffer_len--; | ||||
| 
 | ||||
| 	const char* ptr = buffer; | ||||
| 	for (int i = 0; i < 7; i++) | ||||
| 	if (s_pwent_fp == nullptr) | ||||
| 	{ | ||||
| 		char* end = strchr(ptr, ':'); | ||||
| 		ASSERT((i < 6) ? end != nullptr : end == nullptr); | ||||
| 		if (!end) | ||||
| 			end = buffer + buffer_len; | ||||
| 		*end = '\0'; | ||||
| 
 | ||||
| 		const size_t field_len = end - ptr; | ||||
| 
 | ||||
| 		switch (i) | ||||
| 		{ | ||||
| 			case 0: | ||||
| 				s_pwent_struct.pw_name = strndup(ptr, field_len + 1); | ||||
| 				if (!s_pwent_struct.pw_name) | ||||
| 					return nullptr; | ||||
| 				break; | ||||
| 			case 1: | ||||
| 				s_pwent_struct.pw_passwd = strndup(ptr, field_len + 1); | ||||
| 				if (!s_pwent_struct.pw_passwd) | ||||
| 					return nullptr; | ||||
| 				break; | ||||
| 			case 2: | ||||
| 				ASSERT(1 <= field_len && field_len <= 9); | ||||
| 				for (size_t j = 0; j < field_len; j++) | ||||
| 					ASSERT(isdigit(ptr[j])); | ||||
| 				s_pwent_struct.pw_uid = atoi(ptr); | ||||
| 				break; | ||||
| 			case 3: | ||||
| 				ASSERT(1 <= field_len && field_len <= 9); | ||||
| 				for (size_t j = 0; j < field_len; j++) | ||||
| 					ASSERT(isdigit(ptr[j])); | ||||
| 				s_pwent_struct.pw_gid = atoi(ptr); | ||||
| 				break; | ||||
| 			case 4: | ||||
| 				s_pwent_struct.pw_gecos = strndup(ptr, field_len + 1); | ||||
| 				if (!s_pwent_struct.pw_gecos) | ||||
| 					return nullptr; | ||||
| 				break; | ||||
| 			case 5: | ||||
| 				s_pwent_struct.pw_dir = strndup(ptr, field_len + 1); | ||||
| 				if (!s_pwent_struct.pw_dir) | ||||
| 					return nullptr; | ||||
| 				break; | ||||
| 			case 6: | ||||
| 				s_pwent_struct.pw_shell = strndup(ptr, field_len + 1); | ||||
| 				if (!s_pwent_struct.pw_shell) | ||||
| 					return nullptr; | ||||
| 				break; | ||||
| 		} | ||||
| 
 | ||||
| 		ptr = end + 1; | ||||
| 		s_pwent_fp = fopen("/etc/passwd", "r"); | ||||
| 		if (s_pwent_fp == nullptr) | ||||
| 			return nullptr; | ||||
| 	} | ||||
| 
 | ||||
| 	return &s_pwent_struct; | ||||
| 	if (s_pwent_buffer == nullptr) | ||||
| 	{ | ||||
| 		long size = sysconf(_SC_GETPW_R_SIZE_MAX); | ||||
| 		if (size == -1) | ||||
| 			size = 512; | ||||
| 
 | ||||
| 		s_pwent_buffer = static_cast<char*>(malloc(size)); | ||||
| 		if (s_pwent_buffer == nullptr) | ||||
| 			return nullptr; | ||||
| 		s_pwent_buffer_size = size; | ||||
| 	} | ||||
| 
 | ||||
| 	const off_t old_offset = ftello(s_pwent_fp); | ||||
| 
 | ||||
| 	passwd* result; | ||||
| 	for (;;) | ||||
| 	{ | ||||
| 		const int error = getpwent_impl(s_pwent_fp, &s_pwent_struct, s_pwent_buffer, s_pwent_buffer_size, &result); | ||||
| 		if (error == 0) | ||||
| 			break; | ||||
| 		fseeko(s_pwent_fp, old_offset, SEEK_SET); | ||||
| 		if (error != ERANGE) | ||||
| 			return nullptr; | ||||
| 
 | ||||
| 		const size_t new_size = s_pwent_buffer_size * 2; | ||||
| 		char* new_buffer = static_cast<char*>(realloc(s_pwent_buffer, new_size)); | ||||
| 		if (new_buffer == nullptr) | ||||
| 			return nullptr; | ||||
| 
 | ||||
| 		s_pwent_buffer = new_buffer; | ||||
| 		s_pwent_buffer_size = new_size; | ||||
| 	} | ||||
| 
 | ||||
| 	return result; | ||||
| } | ||||
| 
 | ||||
| struct passwd* getpwnam(const char* name) | ||||
|  | @ -135,9 +159,44 @@ struct passwd* getpwuid(uid_t uid) | |||
| 	return nullptr; | ||||
| } | ||||
| 
 | ||||
| void setpwent(void) | ||||
| int getpwuid_r(uid_t uid, struct passwd* pwd, char* buffer, size_t bufsize, struct passwd** result) | ||||
| { | ||||
| 	if (!s_pwent_fp) | ||||
| 		return; | ||||
| 	fseek(s_pwent_fp, 0, SEEK_SET); | ||||
| 	FILE* fp = fopen("/etc/passwd", "r"); | ||||
| 	if (fp == nullptr) | ||||
| 		return errno; | ||||
| 
 | ||||
| 	int ret = 0; | ||||
| 	for (;;) | ||||
| 	{ | ||||
| 		if ((ret = getpwent_impl(fp, pwd, buffer, bufsize, result))) | ||||
| 			break; | ||||
| 		if (*result == nullptr) | ||||
| 			break; | ||||
| 		if (pwd->pw_uid == uid) | ||||
| 			break; | ||||
| 	} | ||||
| 
 | ||||
| 	fclose(fp); | ||||
| 	return ret; | ||||
| } | ||||
| 
 | ||||
| int getpwnam_r(const char* name, struct passwd* pwd, char* buffer, size_t bufsize, struct passwd** result) | ||||
| { | ||||
| 	FILE* fp = fopen("/etc/passwd", "r"); | ||||
| 	if (fp == nullptr) | ||||
| 		return errno; | ||||
| 
 | ||||
| 	int ret = 0; | ||||
| 	for (;;) | ||||
| 	{ | ||||
| 		if ((ret = getpwent_impl(fp, pwd, buffer, bufsize, result))) | ||||
| 			break; | ||||
| 		if (*result == nullptr) | ||||
| 			break; | ||||
| 		if (strcmp(pwd->pw_name, name) == 0) | ||||
| 			break; | ||||
| 	} | ||||
| 
 | ||||
| 	fclose(fp); | ||||
| 	return ret; | ||||
| } | ||||
|  |  | |||
		Loading…
	
		Reference in New Issue