// Carga en el arreglo 'country_codes' los codigos de los paises de el archivo 
// de nombre "COUNTRY_CODES_FILE_NAME" (definido en macros.h) ubicado en el 
// directorio desde el que se ejecuta el programa;


#include "load_country_codes.h"


status_t load_country_codes(char **country_codes)
{
	FILE *fp;

	empty_country_codes(country_codes);

	char *buff;
	char buff2[INITIAL_SIZE];
	buff2[INITIAL_SIZE] = '\0';

	clean(buff2, INITIAL_SIZE);

	int country_code = 0;
	char country_name[INITIAL_SIZE];
	country_name[INITIAL_SIZE - 1] = '\0';

	size_t i, j;
	part_t part;
		
	buff = (char *)malloc(INITIAL_SIZE * sizeof(char));
	
	if((fp = fopen(COUNTRY_CODES_FILE_NAME, "r")) == NULL) {
		free(buff);
		return ERROR_LOADING_COUNTRY_CODES;
	}

	while(fgets(buff, INITIAL_SIZE, fp) != NULL) {
		clean(country_name, INITIAL_SIZE);
		for(i = 0, j = 0, part = CODE; buff[i] != '\0'; i++) {
			if(buff[i] == ',') {
				part = NAME;
				i++;
			} else if (buff[i] == '\n') {
				part = CODE;
				j = 0;
			}

			switch(part)
			{
				case CODE: buff2[i] = *(buff + i); break;
				case NAME: country_name[j] = *(buff + i); j++; break;
			}
		}
		country_code = atoi(buff2);
		clean(buff2, INITIAL_SIZE);
		strcpy(country_codes[country_code], country_name);
	}

//	Cierra el archivo que contiene el codigo de los paises de acuerdo al estandar;
	fclose(fp);
	free(buff);
	return OK;
}


status_t clean (char *buffer, size_t size)
{
	size_t i;
    i = 0;

	if(buffer == NULL)
		return ERROR_NULL_POINTER;

    while(i < size) {
        buffer[i] = '\0';
        i++;
    }
    return OK;
}

//	Inicializa el arreglo alocando el caracter '\0' en todas las posiciones;
status_t empty_country_codes(char **country_codes) 
{
	size_t i, j;
	for(i = 0; i < COUNTRIES_NUMBER; i++)
		for(j = 0; j < (ARRAYS_LENGTH - 1); j++) {
			country_codes[i][j] = 'a';
		
		country_codes[i][ARRAYS_LENGTH - 1] = '\n';
		}

	return OK;
}