#include <stdio.h>
#include <stdlib.h>
#include <string.h>

enum dzien_tyg{pn=1, wt, sr, czw, pt, sb, nd};

struct Nauczyciel
{
    char nazwisko[30];
    struct Nauczyciel* nast;
    struct Zajecia* zajecia;
};

struct Zajecia
{
    int godz_start;
    int min_start;
    char dzien_tyg[10];
    char grupa[10];
    char przedmiot[30];
    struct Zajecia* pop;
    struct Zajecia* nast;
};

int nr_dnia_tyg(char *dzien_tyg)
{
    if (strcmp(dzien_tyg, 'pn')==0)
        return 1;
    if (strcmp(dzien_tyg, 'wt')==0)
        return 2;
    if (strcmp(dzien_tyg, 'sr')==0)
        return 3;
    if (strcmp(dzien_tyg, 'czw')==0)
        return 4;
    if (strcmp(dzien_tyg, 'pt')==0)
        return 5;
    if (strcmp(dzien_tyg, 'sb')==0)
        return 6;
    if (strcmp(dzien_tyg, 'nd')==0)
        return 7;
    return 0;
}

int main()
{
    int godz_start,godz_stop, min_start, min_stop;
    char dzien_tyg[10];
    char grupa[10];
    char nazwisko[30];
    char przedmiot[30];
    int i;
    FILE *plik;
    if((plik = fopen("test.txt", "r"))==NULL)
    {
        printf("Nie udalo sie otworzyc pliku\n");
    }


    //struct Nauczyciel * nauczyciel1 = (struct Nauczyciel *)malloc(sizeof(struct Nauczyciel));
    //struct Zajecia * zajecia1 = (struct Zajecia *)malloc(sizeof(struct Zajecia));
    struct Nauczyciel * nauczyciel = NULL;
    struct Nauczyciel *pierwszy_nauczyciel= NULL;
    struct Zajecia *zajecia = NULL;
    struct Zajecia *ostatnie_zajecia = NULL;




   while(!feof(plik))
    {
        nauczyciel=NULL;
        fscanf(plik,"%d:%d-%d:%d %s %s %s %s",&godz_start,&min_start,&godz_stop,&min_stop, dzien_tyg, grupa, nazwisko, przedmiot );

        struct Nauczyciel * wsk = pierwszy_nauczyciel;
        // 1. sprawdzanie czy nauczyciel ju¿ istnieje
        while(wsk != NULL)
        {
            if (strcmp(wsk->nazwisko, nazwisko) == 0)
            {
                nauczyciel = wsk;
                break;
            }
            wsk = wsk->nast;
        }


        // 2. je¿eli nauczyciela nie znale¿liœmy to tworzymy i dodajemy do listy nauczycieli
        if (nauczyciel == NULL)
        {
            nauczyciel = (struct Nauczyciel*)malloc(sizeof(struct Nauczyciel));
            strcpy(nauczyciel->nazwisko, nazwisko);
            nauczyciel->zajecia = NULL;
            nauczyciel->nast = pierwszy_nauczyciel;
            pierwszy_nauczyciel = nauczyciel;
        }

        // 3. Tworzymy zajecia
            zajecia = (struct Zajecia *)malloc(sizeof(struct Zajecia));
            zajecia->godz_start=godz_start;
            zajecia->min_start=min_start;
            strcpy(zajecia->dzien_tyg, dzien_tyg);
            strcpy(zajecia->grupa, grupa);
            strcpy(zajecia->przedmiot, przedmiot);
            zajecia->pop = NULL;
            zajecia->nast = NULL;

            // 4. Dodajemy zajecia na poczatek listy zajec nauczyciela
            ostatnie_zajecia = nauczyciel->zajecia;
            if(ostatnie_zajecia == NULL)
            {
                 if (nauczyciel->zajecia != NULL)
                {
                    nauczyciel->zajecia->pop = zajecia;
                    zajecia->nast = nauczyciel->zajecia;
                }
                nauczyciel->zajecia = zajecia;
            }
            else
            {
                if(nr_dnia_tyg(ostatnie_zajecia->dzien_tyg)>nr_dnia_tyg(nauczyciel->zajecia->dzien_tyg) && ostatnie_zajecia->godz_start>nauczyciel->zajecia->godz_start && ostatnie_zajecia->min_start>nauczyciel->zajecia->min_start)
                {
                    if (nauczyciel->zajecia != NULL)
                    {
                        nauczyciel->zajecia->pop = zajecia;
                        zajecia->nast = nauczyciel->zajecia;
                    }
                    nauczyciel->zajecia = zajecia;
                }
                else
                {
                    while(ostatnie_zajecia->nast != NULL && nr_dnia_tyg(ostatnie_zajecia->dzien_tyg)>nr_dnia_tyg(nauczyciel->zajecia->dzien_tyg) && ostatnie_zajecia->godz_start>nauczyciel->zajecia->godz_start && ostatnie_zajecia->min_start>nauczyciel->zajecia->min_start)
                    {
                        ostatnie_zajecia=ostatnie_zajecia->nast;
                    }
                    nauczyciel->zajecia->pop = zajecia;
                    zajecia->nast = nauczyciel->zajecia;
                    ostatnie_zajecia->pop->nast = zajecia;
                    zajecia->pop = ostatnie_zajecia->pop;
                    ostatnie_zajecia->pop = zajecia;
                }
            }


            //---------------------------------------------------


            //5. Sortowanie zajęć

    }

        int liczba_elementow = 0;
        nauczyciel = pierwszy_nauczyciel;

        struct Zajecia *wsk1 = nauczyciel->zajecia;
            while(wsk1)
            {
                if (wsk1->godz_start != NULL)
                {
                    liczba_elementow++;
                }
                wsk1 = wsk1->nast;
            }
        printf("Liczba elementow = %d\n", liczba_elementow);
        liczba_elementow = 0;

        char tekst[] = "Kowalski";
        if(strcmp(nauczyciel->nazwisko, tekst) == 0)
        {
            struct Zajecia *temp = nauczyciel->zajecia;
            while(temp)
            {
                printf("%s - %d:%d %s %s\n", temp->dzien_tyg, temp->godz_start, temp->min_start, temp->grupa, temp->przedmiot);
                temp=temp->nast;
            }

        }
        //printf("%s - %d:%d %s %s\n", nauczyciel1->nazwisko, nauczyciel1->zajecia->godz_start, nauczyciel1->zajecia->min_start, nauczyciel1->zajecia->grupa, nauczyciel1->zajecia->przedmiot);


    fclose(plik);
    return 0;
}