#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <math.h>
#include "pthread.h"
#include <windows.h>
#include <stdbool.h>

pthread_mutex_t mutreta;

long int num = 5;
long int total = 2;
long int ultimo = 3;
clock_t tempo;
int tempofinal = 1;
int opcao = 1;

void entrada(void);

bool Primo(long int n){
    if (n%3 == 0){
        return false;
    }else if (n%2 == 0){
        return false;
    }

    int n2 = 5;

    while (n2*n2 <= n){
        if(n%n2 == 0 || n%(n2+2) ==0)
            return false;
        n2= n2+6;
    }
    return true;
}

void* Encontrar(void *encontro){
    while (clock() - tempo <= tempofinal){
        if(Primo(num) == true && num != ultimo){
            total++;
            ultimo = num;
        }
        num+=2;
    }
    pthread_exit(NULL);
}

void ciclos(){
    num = 5;
    total = 2;
    ultimo = 3;
    tempo = clock();
    pthread_t pthd8, pthd7, pthd6, pthd5, pthd4, pthd3, pthd2, pthd1;
    switch (opcao){
    case 1:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd1, NULL );
        break;
    case 2:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    case 3:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    case 4:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd4,NULL,Encontrar,NULL);
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd4, NULL );
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    case 5:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd5,NULL,Encontrar,NULL);
        pthread_create(&pthd4,NULL,Encontrar,NULL);
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd5, NULL );
        pthread_join( pthd4, NULL );
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    case 6:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd6,NULL,Encontrar,NULL);
        pthread_create(&pthd5,NULL,Encontrar,NULL);
        pthread_create(&pthd4,NULL,Encontrar,NULL);
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd6, NULL );
        pthread_join( pthd5, NULL );
        pthread_join( pthd4, NULL );
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    case 7:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd7,NULL,Encontrar,NULL);
        pthread_create(&pthd6,NULL,Encontrar,NULL);
        pthread_create(&pthd5,NULL,Encontrar,NULL);
        pthread_create(&pthd4,NULL,Encontrar,NULL);
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd7, NULL );
        pthread_join( pthd6, NULL );
        pthread_join( pthd5, NULL );
        pthread_join( pthd4, NULL );
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
     case 8:
        tempo = clock();
        pthread_mutex_init( &mutreta, NULL );
        pthread_create(&pthd8,NULL,Encontrar,NULL);
        pthread_create(&pthd7,NULL,Encontrar,NULL);
        pthread_create(&pthd6,NULL,Encontrar,NULL);
        pthread_create(&pthd5,NULL,Encontrar,NULL);
        pthread_create(&pthd4,NULL,Encontrar,NULL);
        pthread_create(&pthd3,NULL,Encontrar,NULL);
        pthread_create(&pthd2,NULL,Encontrar,NULL);
        pthread_create(&pthd1,NULL,Encontrar,NULL);
        pthread_join( pthd8, NULL );
        pthread_join( pthd7, NULL );
        pthread_join( pthd6, NULL );
        pthread_join( pthd5, NULL );
        pthread_join( pthd4, NULL );
        pthread_join( pthd3, NULL );
        pthread_join( pthd2, NULL );
        pthread_join( pthd1, NULL );
        break;
    }
    pthread_mutex_destroy( &mutreta );
    printf("\n Numero de threads %d", opcao);
    printf("\n Total de %ld com thread!", total);
    printf("\n ultimo: %ld \n", ultimo);
}

int main()
{
    printf("\n Programa Para encontrar primos \n");
        printf("\n Tempo 1 ou 2 minutos?");
        scanf("%d", &tempofinal);
    if (tempofinal == 1){
            tempofinal = 60000;
    }else{tempofinal = 120000;}
    printf("\n quantos nucleos?");
    scanf("%d", &opcao);
    ciclos();
    system("Pause");
    return 0;

}