/* 
 * Campeonato entre 3 threads para acesso à região crítica.
 *
 * Mostra que a thread 2 pode levar vantagem.
 */

#include <pthread.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

/* Número de vezes que uma thread deve entrar na região crítica. */
#define N_VEZES 15

/* Variável compartilhada */
volatile int s = 0;

/* Variáveis de controle para a final. */
int vez_final = 0;
int interesse_final[2] = { 0, 0 };

/* Variáveis de controle para a partida
   entre a thread 0 e a thread 1.      */
int vez_01 = 0;
int interesse_01[2] = { 0, 0 };


/* Função para a thread 0 */
void* f_thread_0(void *v) {
  int i;
  
  for (i = 0; i < N_VEZES; i++) {

    interesse_01[0] = 1;
    vez_01 = 0;
    while (vez_01 == 0 && interesse_01[1]) ; 

    sleep(1); /* Sleep entre as partidas */
     
    interesse_final[0] = 1;
    vez_final = 0;
    
    while (vez_final == 0 && interesse_final[1]) ; 

    s = 0;
    sleep(1); /* Sleep entre a atribuição e a impressão */    
    printf("Thread 0, s = %d.\n", s); 

    interesse_final[0] = 0;    
    interesse_01[0] = 0;

    sleep(1); /* Sleep fora da região crítica */
  }

  return NULL;
}

/* Função para a thread 1 */
void* f_thread_1(void *v) {
  int i;
  
  for (i = 0; i < N_VEZES; i++) {

    interesse_01[1] = 1;
    vez_01 = 1;
    while (vez_01 == 1 && interesse_01[0]) ; 

    sleep(1); /* Sleep entre as partidas */
    
    interesse_final[0] = 1;
    vez_final = 1;
    
    while (vez_final == 1 && interesse_final[1]) ; 

    s = 1;
    sleep(1); /* Sleep entre a atribuição e a impressão */     
    printf("Thread 1, s = %d.\n", s); 

    interesse_final[0] = 0;    
    interesse_01[1] = 0;

    sleep(1); /* Sleep fora da região crítica */    
  }

  return NULL;
}

/* Função para a thread 2 */
void* f_thread_2(void *v) {
  int i;
  
  for (i = 0; i < N_VEZES; i++) {

    interesse_final[1] = 1;
    vez_final = 2;
    while (vez_final == 2 && interesse_final[0]) ; 

    s = 2;
    sleep(1); /* Sleep entre a atribuição e a impressão */        
    printf("Thread 2, s = %d.\n", s); 

    interesse_final[1] = 0;    

    sleep(1); /* Sleep fora da região crítica */    
  }

  return NULL;
}

int main() {

  pthread_t thr0, thr1, thr2;

  pthread_create(&thr0, NULL, f_thread_0, NULL);
  pthread_create(&thr1, NULL, f_thread_1, NULL);
  pthread_create(&thr2, NULL, f_thread_2, NULL);

  pthread_join(thr0, NULL); 
  pthread_join(thr1, NULL); 
  pthread_join(thr2, NULL); 

  return 0;
}