inputcntl.c

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <ctype.h>
#include "inputcntl.h"

char *get_input(FILE *fp, char * buf, int size) {
	int c;
	int i;

	for(i = 0; i < size - 1 && (c = getc(fp)) != EOF && c != '\n'; i++)
		buf[i] = c;

	buf[i] = '\0';

	if(i == size - 1)
		while((c = getc(fp)) != EOF && c != '\n')
			;

	return c == EOF ? NULL : buf;
}

char **split_by_word(char *str) {
	int word_cnt = 0;
	int arr_size = SBW_RES_ARR_DEFAULT;
	char **result;
	char *tmp;

	if(str == NULL)
		return NULL;

	result = (char**)malloc(arr_size * sizeof(char*));

	do {
		// 공백 제거
		while(*str == ' ') {
			*(str++) = '\0';
		}

		if(*str == '\0')
			break;

		// 단어 저장
		if(arr_size <= word_cnt + 1)
			result = (char**)realloc(result, (arr_size *= 2) * sizeof(char*));

		result[word_cnt++] = str;

		// 다음 공백 탐색
	} while((str = strchr(str, ' ')) != NULL);

	if(word_cnt)
		result[word_cnt] = NULL;
	else {
		free(result);
		result = NULL;
	}

	return result;
}

off_t strtosize(char *str) {
	off_t size;
	int i;
	off_t ipart = 0;
	int frpart = 0;
	int frpart_digit = 1; // frpart 보다 큰 10의 거듭제곱 수 중 가장 작은 수
	int size_unit = 1;

	if(strcmp(str, "~") == 0)
		return -1;
	
	if(str[0] == '0' && isdigit(str[1])) {
		return -2;
	}

	i = 0;
	while(1) {
		if(isdigit(str[i])) {
			ipart = ipart * 10 + str[i] - '0';
			if(ipart < 0)
				// overflow
				return -1;
		} else
			break;

		i++;
	}

	if(str[i] == '.') {
		if(!isdigit(str[i+1]))
			return -2;
		else {
			i++;
			while(1) {
				if(isdigit(str[i])) {
					frpart = frpart * 10 + str[i] - '0';
					frpart_digit *= 10;
					if(1000000000 <= frpart_digit) {
						// 소수점 아래 9자리 밑으로는 무시
						while(isdigit(str[i]))
							i++;
						
						break;
					}
				} else
					break;
				
				i++;
			}
		}
	}

	if(str[i] == '\0') {
		return ipart;
	} else {
		if(strcmp(str + i, "kb") == 0 || strcmp(str + i, "KB") == 0) {
			size_unit = 1000;
		} else if(strcmp(str + i, "mb") == 0 || strcmp(str + i, "MB") == 0) {
			size_unit = 1000000;
		} else if(strcmp(str + i, "gb") == 0 || strcmp(str + i, "GB") == 0) {
			size_unit = 1000000000;
		} else {
			return -2;
		}
	}

	// 단위에 맞게 정수부, 실수부 합성
	if(frpart_digit < size_unit) {
		frpart *= (size_unit / frpart_digit);
	} else {
		frpart /= (frpart_digit / size_unit);
	}

	size = ipart * size_unit;
	if(size / size_unit != ipart)
		// overflow
		return -1;

	return size + frpart;
}

int size_to_sep_str(char *buf, off_t size) {
	off_t tmp = size;
	int digit = 0;
	int i;
	int len;

	if(size == 0) {
		strcpy(buf, "0");
		return 0;
	} else if(size < 0) {
		buf[0] = '\0';
		return -1;
	}

	while(tmp) {
		tmp /= 10;
		digit++;
	}

	len = digit + (digit - 1) / 3; // 쉼표까지 포함한 문자열 길이

	tmp = size;
	buf[len--] = '\0';
	i = 0;
	while(0 <= len) {
		buf[len--] = '0' + tmp % 10;
		tmp /= 10;
		if(i % 3 == 2) {
			buf[len--] = ',';
		}
		i++;
	}

	return 0;
}

char *path_concat(char *path1, char *path2) {
	int path1_len = strlen(path1);
	int path2_len = strlen(path2);
	char *str;
	
	if(path1[path1_len-1] == '/') {
		// path1이 '/'로 끝나면 크기를 하나 적게 잡고, 중간에 '/'를 삽입하지 않는다.
		str = (char*)malloc(sizeof(char) * (path1_len + path2_len + 1));
		strcpy(str, path1);
		strcpy(str + path1_len, path2);
	} else {
		str = (char*)malloc(sizeof(char) * (path1_len + path2_len + 2));
		strcpy(str, path1);
		str[path1_len] = '/';
		strcpy(str + path1_len + 1, path2);
	}

	return str;
}

char *get_filename(char *path) {
	char *p = path;
	while((p = strchr(path, '/')) != NULL) {
		path = p + 1;
	}

	return path;
}