/*programa que simula uma biqueira */

#include <stdio.h> /*I/O*/
#include <stdlib.h>/*malloc */
#include <stdbool.h>/*bool*/
#include <time.h>/*srand && rand */
#include <unistd.h> /*sleep */


typedef struct Queue
{
    int qtd_po,qtd_mac,qtd_crack,xlen,len,size;
    struct Queue *begin,*end;
}queue;


queue *queue_create(void)
{
    queue *q = (queue *) malloc(sizeof(queue));

    if (q!= NULL)
        q->begin =NULL;
        q->end = NULL;

    return q;
}

int len=0,size=0,_size1=0,lucro=0,lucro1=0,lucro2=0;

int random_id(void)
{
    srand(time(NULL));

    return rand() %1000;
}

queue *enfileirar(queue **q,int qtd,int qtd1,int qtd2)
{
    queue *novo = (queue *) malloc(sizeof(queue));
    int y,r,x,k;

    x= random_id();
    (*q)->xlen=0;

    (*q)->qtd_mac =qtd;
    (*q)->qtd_crack =qtd1;
    (*q)->qtd_po=qtd2;

    printf("-> %d \n",(*q)->xlen);

    srand(time(NULL));


    if (novo == NULL)
    {
        fprintf(stderr,"erro de alocacao\n");
        exit( 0 );
    }


    if (novo != NULL)
    {
        novo->begin = NULL;
        novo->end = (*q);

        if ((*q)->end == NULL)
        {
            printf("\nFILA VAZIA--\n");
            (*q)->begin = novo;
        }else
        {
            printf("\nTEM\n");
            (*q)->end = novo;
        }

        r = rand() %4;

        if (r == 1)
        {
            k = rand() % 10;
            printf("Cliente: %d Quer: %d maconha \n",x,k);
            printf("CONFERINDO...\n");
            sleep(2);

            if (k > (*q)->qtd_mac)
            {
                printf("\nn[!] NAO TEM ESSA QUANTIDADE NO MOMENTO \n");
                (*q)->xlen--;

            }else
            {
                sleep(1);
                printf("CLIENTE %d COMPROU: %d de Maconha \n",x,k);
                (*q)->qtd_mac = (*q)->qtd_mac -k;
                lucro= lucro+10*k;
                (*q)->xlen=(*q)->xlen+1*k;
            }

        }else if (r == 2)
        {
            k = rand() %10;
            printf("Cliente: %d Quer: %d cocaina \n",x,k);
            printf("CONFERINDO...\n");
            sleep(2);
            if (k > (*q)->qtd_po)
            {
                printf("\nnao tem essa quantidade no momento \n");
                (*q)->size--;

            }else
            {
                sleep(1);
                printf("\nCliente %d: Comprou %d de Cocaina \n",x,k);
                (*q)->qtd_po = (*q)->qtd_po -k;
                lucro1= lucro1=20*k;
                (*q)->size=(*q)->size+1*k;

            }

        }else if (r == 3)
        {
            k= rand() %10;
            printf("Cliente: %d Quer: %d Pedra \n",x,k);
            printf("CONFERINDO...\n");
            sleep(2);

            if (k > (*q)->qtd_crack)
            {
                printf("\n[!]nao tem essa quantidade no momento \n");
                (*q)->len--;

            }else
            {
                sleep(1);
                printf("\n[+] CLIENTE %d: COMPROU %d quantidade de Crack \n",x,k);
                (*q)->qtd_crack = (*q)->qtd_crack-k;
                lucro2= lucro2+5*k;
                (*q)->len=(*q)->len+1*k;
            }

        }else if (r ==0)
        {
            sleep(2);
            printf("....");
        }

    }
    printf("%d \n",(*q)->xlen);
    return novo;

}

void show(queue **q)
{

    printf("\n\t---------------------------");
    printf("\n\t|MACONHA | COCAINA | CRACK |");
    printf("\n\t|--------|---------|-------|");
    printf("\n\t|QUANTIDADE| QUANTIDADE | QUANTIDADE |");
    printf("\n\t|   %d   |    %d    |   %d   |",(*q)->xlen,(*q)->size,(*q)->len);
    printf("\n\t| LUCROS |  LUCROS  | LUCROS |");
    printf("\n\t|----------------------------");
    printf("\n\t|   %d   |    %d    |   %d   |",lucro,lucro1,lucro2);
    printf("\n\t|----------------------------|");

}


int main()
{
    queue *q = queue_create();
    int opc,po,mac,cra;

    if (q != NULL)
        for(;;){
            printf("\n\t_(0)--------- [ SAIR ]");
            printf("\n\t_(1)--------- [ Enfileirar ] ");
            printf("\n\t_(2)--------- [ TABELA DE LUCROS ] \n");
            printf("> "); scanf("%d",&opc);

            switch(opc){
                case 0:
                    exit( 0 );
                case 1:
                    printf("\nDIGITE A quantidade dos produtos a ser inseridos \n");
                    printf("PO: "); scanf("%d",&po);
                    printf("\n\tMACONHA: "); scanf("%d",&mac);
                    printf("\n\tCRACK: "); scanf("%d",&cra);
                    q=enfileirar(&q,po,mac,cra);
                    break;
                default:
                    break;
                case 2:
                    show(&q);
                    break;

            }

        }
        return 0;

}