files_finder.c

/*  Proyecto 2. Pide Cola
    Participantes:
        Sandibel Soares
        Carlo Herrera
        Juan Cuevas

    Archivo: files_finder.c 
    Contiene las funciones para:
        - Encontrar y devolver las materias inscritas por un estudiante dado su carnet 
        - Encontrar y devolver los estudiantes que inscribieron una materia dado el codigo
*/

# include <string.h>   /* funciones strlen, strcmp, strncmp, strcat, strncat, strcpy */
# include <stdlib.h>
# include <stdio.h>    /* funcion printf */
# include <dirent.h>   /* DIR; funciones opendir, readdir, closedir */

# include "files_finder.h"

/*  
    Dado un carnet y la ruta a la carpeta principal con los archivos de DACE se busca 
    el comprobante del estudiante en los directorios de comprobantes de Sartenejas y Litoral.
    Retorna una cola con apuntadores a los string que contienen los codigos de las materias 
    que el estudiante inscribio. Si ocurrio un error se duevuelve NULL.
*/
Queue * find_asignatures(char* root_name, char* carnet){

    /* cola donde guardaremos los codigos de las asignaturas que esta viendp el estudiante*/
    Queue * asignatures = new_queue();

    int file_found = 0;

    /* Vamos a abir cuatro directorios:
        el directorio raiz con todos los archivos (DACE o el dado por el usuario)
        cada directorio de las sedes, ya que no sabemos a cual pertenece el estudiante
        sus directorios de comprobantes correspondientes y el dir de la cohorte
    */
    DIR * root_dir, *sede_dir, *comp_dir, *cohorte_dir;
    struct dirent *ent_root_dir, * ent_sede_dir, *ent_comp_dir, *ent_coh_dir;

    /* buffers donde guardaremos las rutas */
    char sede_path[ strlen(root_name) + 20 ];
    char comp_path[ strlen(root_name) + 30 ];
    char coh_path[ strlen(root_name)  + 35 ];
    char carnet_path[ strlen(root_name) + 50 ];

    /* Comprobamos poder abrir el directorio raiz */
    if ((root_dir = opendir(root_name)) == NULL )
    {
        printf("No se pudo abrir el directorio: %s \n", root_name);
        return NULL;
    }

    /* Iteramos sobre los directorios de las sedes */
    while ((ent_root_dir = readdir(root_dir)) != NULL && file_found == 0)
    {   
        /* Ignoramos los directorios . y .. */
        if(strcmp(ent_root_dir->d_name, ".") == 0 || strcmp(ent_root_dir->d_name, "..") == 0){
            continue;
        }
        
        strcpy(sede_path, root_name);
        strcat(sede_path, "/");
        strcat(sede_path, ent_root_dir->d_name);

        if ((sede_dir = opendir(sede_path)) == NULL)
        {
            printf("No se pudo abrir el directorio: %s \n", sede_path);
            return NULL;
        }

        /* Iteramos sobre los directorios de cada sede */
        while ((ent_sede_dir = readdir(sede_dir)) != NULL)
        {   
            /* Si el directorio no es comprobantes, lo ignoramos */
            if (strcmp(ent_sede_dir->d_name, "comprobantes") != 0)
            {
                continue;
            }

            strcpy(comp_path, sede_path);
            strcat(comp_path, "/");
            strcat(comp_path, ent_sede_dir->d_name);

            if ((comp_dir = opendir(comp_path)) == NULL)
            {
                printf("No se pudo abrir el directorio: %s \n", comp_path);
                return NULL;
            }

            /* Iteramos sobre los directorios de comprobantes */
            while ((ent_comp_dir = readdir(comp_dir)) != NULL)
            {   
                /* Si el directorio no es la cohorte del estudiante, lo ignoramos */
                if(strncmp(ent_comp_dir->d_name, carnet, 2) != 0){
                    continue;
                }

                strcpy(coh_path, comp_path);
                strcat(coh_path, "/");
                strcat(coh_path, ent_comp_dir->d_name);

                if ((cohorte_dir = opendir(coh_path)) == NULL)
                {
                    printf("No se pudo abrir el directorio: %s \n", coh_path);
                    return NULL;
                }

                /* Iteramos sobre los archivos de la cohorte */
                while ((ent_coh_dir = readdir(cohorte_dir)) != NULL)
                {
                    /* Si el archivo no es el del estudiante, lo ignoramos */
                    if(strncmp(ent_coh_dir->d_name, carnet, 7) != 0){
                        continue;
                    }

                    /* Esto debe ir en otra funcion */
                    FILE *carnet_file;

                    strcpy(carnet_path, coh_path);
                    strcat(carnet_path, "/");
                    strcat(carnet_path, ent_coh_dir->d_name);

                    carnet_file = fopen(carnet_path, "r");
                    if (carnet_file == NULL) {
                        perror("No se pudo abrir el archivo");
                        return NULL;
                    }
                    char* line = NULL;
                    int j = 0;
                    size_t len = 0;
                    /* Leemos el archivo linea por linea */
                    while (getline(&line, &len, carnet_file) != -1) {
                        /* Ignoramos la primera linea */
                        if (j == 0){
                            j++;
                            continue;
                        }
                        char* token = strtok(line, " - ");
                        if (token != NULL){
                            /* Guardamos el codigo de la asignatura en la cola */
                            char * code_asig = (char*)malloc(10*sizeof(char));
                            if (code_asig == NULL)
                            {
                                perror("No se pudo reservar memoria. asignatures[i] en find_asignatures");
                                return NULL;
                            }
                            strcpy(code_asig, token);
                            enqueue(asignatures, (void *) code_asig);
                        }
                    }
                    fclose(carnet_file);
                    free(line);
                    file_found = 1;

                }
                     
                closedir(cohorte_dir);
            }

            closedir(comp_dir);
        }    

        closedir(sede_dir);
    }
    
    closedir(root_dir);
    return asignatures;
}


/*
    Dado el codigo de una materia y la ruta a la carpeta principal con los archivos 
    de DACE se busca los estudiantes inscritos en la materia sin importar la seccion.
    Se devuelve una cola con los carnets de los estudiantes inscritos.
*/
Queue * find_students(char* root_name, char* course_code){
    /* cola donde guardaremos los carnets de los estudiantes que inscribieron la materia*/
    Queue * students = new_queue();

    char sede_path[ strlen(root_name) + 20 ];
    char list_path[ strlen(root_name) + 30 ];
    char apt_path[ strlen(root_name)  + 35 ];
    char course_path[ strlen(root_name) + 60 ];

    DIR * root_dir, *sede_dir, *list_dir, *apt_dir;
    struct dirent *ent_root_dir, * ent_sede_dir, *ent_list_dir, *ent_apt_dir;

    if ((root_dir = opendir(root_name)) == NULL )
    {
        printf("No se pudo abrir el directorio: %s \n", root_name);
        return NULL;
    }
    /* Iteramos sobre los directorios de la carpeta principal */
    while ((ent_root_dir = readdir(root_dir)) != NULL)
    {
        /* Ignoramos los directorios . y .. */
        if(strcmp(ent_root_dir->d_name, ".") == 0 || strcmp(ent_root_dir->d_name, "..") == 0){
            continue;
        }
        
        strcpy(sede_path, root_name);
        strcat(sede_path, "/");
        strcat(sede_path, ent_root_dir->d_name);

        if ((sede_dir = opendir(sede_path)) == NULL)
        {
            printf("No se pudo abrir el directorio: %s \n", sede_path);
            return NULL;
        }
        /* Iteramos sobre los directorios de las sedes */
        while ((ent_sede_dir = readdir(sede_dir)) != NULL)
        {
            /* Si el directorio no es listas, lo ignoramos */
            if (strcmp(ent_sede_dir->d_name, "listas") != 0)
            {
                continue;
            }

            strcpy(list_path, sede_path);
            strcat(list_path, "/");
            strcat(list_path, ent_sede_dir->d_name);

            if ((list_dir = opendir(list_path)) == NULL)
            {
                printf("No se pudo abrir el directorio: %s \n", list_path);
                return NULL;
            }

            /* Iteramos sobre los directorios de listas */
            while ((ent_list_dir = readdir(list_dir)) != NULL)
            {
                /* Si el directorio no el departamento de la materia, lo ignoramos */
                if(strncmp(ent_list_dir->d_name, course_code, 2) != 0){
                    continue;
                }

                strcpy(apt_path, list_path);
                strcat(apt_path, "/");
                strcat(apt_path, ent_list_dir->d_name);

                if ((apt_dir = opendir(apt_path)) == NULL)
                {
                    printf("No se pudo abrir el directorio: %s \n", apt_path);
                    return NULL;
                }
                /* Iteramos sobre los directorios del departamento */
                while ((ent_apt_dir = readdir(apt_dir)) != NULL)
                {
                    /* Si el archivo no es la materia, lo ignoramos */
                    if(strncmp(ent_apt_dir->d_name, course_code, 6) != 0){
                        continue;
                    }

                    /* Esto debe ir en otra funcion */
                    FILE *course_file;

                    strcpy(course_path, apt_path);
                    strcat(course_path, "/");
                    strcat(course_path, ent_apt_dir->d_name);

                    course_file = fopen(course_path, "r");
                    if (course_file == NULL) {
                        perror("No se pudo abrir el archivo");
                        return NULL;
                    }
                    char* line = NULL;
                    int j = 0;
                    size_t len = 0;
                    /* Leemos el archivo linea por linea */
                    while (getline(&line, &len, course_file) != -1) {
                        /* Ignoramos la primera linea */
                        if (j == 0){
                            j++;
                            continue;
                        }
                        char* token = strtok(line, "\n");
                        if (token != NULL){
                            /* Guardamos el carnet del estudiante en la cola */
                            char * carnet_i = (char*)malloc(10*sizeof(char));
                            if (carnet_i == NULL)
                            {
                                perror("No se pudo reservar memoria. asignatures[i] en find_students");
                                return NULL;
                            }
                            strcpy(carnet_i, token);
                            enqueue(students, (void *) carnet_i);
                        }
                    }
                    fclose(course_file);
                    free(line);
                }
                     
                closedir(apt_dir);
            }

            closedir(list_dir);
        }    

        closedir(sede_dir);
    }
    
    closedir(root_dir);
    return students;

}