#include <stdio.h>
#include <conio.h>
#include <malloc.h>
#include <string.h>

struct Produkt
{
    char * nazwa;
    float cena;
    Produkt * lewo;
    Produkt * prawo;
};

Produkt * DodajProdukt(Produkt * Drzewo, char * Nazwa, float Cena);
float Cena(Produkt * Drzewo, char * Nazwa);
void ZwolnijPamiec(Produkt * Drzewo);

Produkt * StworzElement(char * Napis, float Cena);

int main()
{
    // Tworze drzewo
    Produkt * Drzewo = NULL;

    Drzewo = DodajProdukt(Drzewo, "Truskawki", 9.99);
    DodajProdukt(Drzewo, "Jablka", 4.12);
    DodajProdukt(Drzewo, "Platki owsiane", 12.16);
    DodajProdukt(Drzewo, "Kawa rozpuszczalna", 1.88);
    DodajProdukt(Drzewo, "Herbata", 2.18);
    DodajProdukt(Drzewo, "Cytryna", 3.39);
    DodajProdukt(Drzewo, "Mleko", 1.99);
    DodajProdukt(Drzewo, "Jogurt", 0.99);
    DodajProdukt(Drzewo, "Woda mineralna", 1.10);
    DodajProdukt(Drzewo, "Kiwi", 2.49);

    printf("Cena produktu - Mleko: %.2lf\n", Cena(Drzewo, "Mleko"));
    printf("Cena produktu - Herbata: %.2lf\n", Cena(Drzewo, "Herbata"));
    printf("Cena produktu - Orzechy: %.2lf\n", Cena(Drzewo, "Orzechy"));
    printf("Cena produktu - Melon: %.2lf\n", Cena(Drzewo, "Melon"));

    // Usuwam drzewo
    ZwolnijPamiec(Drzewo);

    _getch();
    return 0;
}


Produkt * DodajProdukt(Produkt * Drzewo, char * Nazwa, float Cena)
{
    if (Drzewo != NULL)
    {
        Produkt * Kopia = Drzewo;
        while (true)
        {
            if (strcmp(Kopia->nazwa, Nazwa) < 0)
            {
                if (Kopia->prawo != NULL) Kopia = Kopia->prawo;
                else
                {
                    Kopia->prawo = StworzElement(Nazwa, Cena); // tworze nowy element
                    return Kopia->prawo; // zwracam wskaznik na nowy element
                }
            }
            else
            {
                if (Kopia->lewo != NULL) Kopia = Kopia->lewo;
                else
                {
                    Kopia->lewo = StworzElement(Nazwa, Cena); // tworze nowy element
                    return Kopia->lewo; // zwracam wskaznik na nowy element
                }
            }
        }
    }
    else Drzewo = StworzElement(Nazwa, Cena); // tworze nowy element
    return Drzewo; // zwracam wskaznik na nowy element
}

float Cena(Produkt * Drzewo, char * Nazwa)
{
    if (Drzewo != NULL)
    {
        while (true)
        {
            int rezultatPorownania = strcmp(Drzewo->nazwa, Nazwa);
            if (rezultatPorownania == 0) return Drzewo->cena; // znalazlem!!!!!!!!!!!!!!!!!
            else
            {
                if (rezultatPorownania < 0)
                {
                    if (Drzewo->prawo != NULL) Drzewo = Drzewo->prawo; // szukam dalej
                    else return 0.0; // nie znaleziono nic
                }
                else
                {
                    if (Drzewo->lewo != NULL) Drzewo = Drzewo->lewo; // szukam dalej
                    else return 0.0; // nie znaleziono nic
                }
            }
        }
    }
    return 0.0; // drzewo puste to zwracam 0
}

void ZwolnijPamiec(Produkt * Drzewo)
{
    if (Drzewo->lewo != NULL) ZwolnijPamiec(Drzewo->lewo);
    if (Drzewo->prawo != NULL) ZwolnijPamiec(Drzewo->prawo);

    if(Drzewo->nazwa != NULL)
        free(Drzewo->nazwa); // DODATKOWE UWAGA - zwalniam pamiec zaalokowanego NAPISU!!! produktu

    free(Drzewo);
    Drzewo = NULL;
}

Produkt * StworzElement(char * Napis, float Cena)
{
    Produkt * NowyElement = (Produkt*)malloc(sizeof(Produkt));

    // Alokuje pamiec na napis
    NowyElement->nazwa = (char*)malloc(sizeof(char) * (strlen(Napis) + 1));
    strcpy(NowyElement->nazwa, Napis);
    NowyElement->nazwa[strlen(Napis)] = '\0';

    // Podpinam cene
    NowyElement->cena = Cena;

    NowyElement->lewo = NULL;
    NowyElement->prawo = NULL;

    return NowyElement;
}