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

#include <string.h>
#include <ctype.h>
#include <time.h>

#define VERS        "1.3"
#define TAILLE_MAX  30

int main(int argc, char *argv[])
{
  char *position_lettre = NULL,
       place_lettre = 0,
       mot_secret[TAILLE_MAX] = {0},
       mot_code[TAILLE_MAX] = {0},
       chaine_temp[TAILLE_MAX] = {0};
  int  lettre_choisie;
  long tentatives,
       i,
       nb_de_ligne,
       ligne_mot_secret;
  FILE *dico = NULL;
  srand(time(NULL));

  do
  {
    dico = fopen("dico.txt", "r");      // ouverture de dico.txt en lecture seul
    if (dico == NULL)                     // test de l'ouverture -> si échoué
    {
             printf("Le dictionnaire n'est pas dans le meme dossier que ce programme\n");
             printf("veuiller telecharger \"dico.txt\",\n");
             printf("et/ou le deplacer dans le meme repertoire que \"Pendu V ");
             printf(VERS);
             printf(".exe\"\n\n");
             system("PAUSE");         // pause
             exit(0);                 // quitte le programme
    }
   
   
    for (nb_de_ligne=0; fgets(chaine_temp, TAILLE_MAX, dico) != NULL; nb_de_ligne++) ;// on calcul le nb de mot dans le dico
    rewind(dico);                // pointeur remi au début du fichier
    ligne_mot_secret = (rand() % (nb_de_ligne + 1));  // ligne du mot choisi au hasard
    for (i=0 ; i<=ligne_mot_secret ; i++)    // on avance le pointeur jusque au mot ...
        fgets(mot_secret , TAILLE_MAX , dico);   // ... que l'on enregistre
   
    fclose(dico);                              // on ferme le dico
   
    i = 0;
    while (i != TAILLE_MAX-1)
    {
          if (mot_secret[i] == '\n')
          mot_secret[i] = '\0';
          i++;
    }
   
    i = 0;
    while (mot_secret[i] != '\0')
    {
          mot_code[i] = '*';
          i++;
    }
   
    for (i=0 ; mot_secret[i] == '\0' ; i++)                      // on fait le mot codé (bon nb d'*)
    mot_code[i] = '*';
   
   
    printf("Bienvenue dans le Pendu !\n\n");
 
    for (tentatives=10 ; tentatives>0 ; tentatives--)  // compte jusque a 10 tentatives perdu
    {
        i = 0;
        place_lettre = -1;
        position_lettre = NULL;
        printf ("\nIl vous reste %ld coups a jouer\n", tentatives);
        printf ("Quel est le mot secret ? %s\n", mot_code);
        printf ("Proposez une lettre : ");
        lettre_choisie = lireCaractere();  // on demande une lettre + en maj + buffer vidé
        while (mot_secret[i] != 0)   // cherche toute les recurrences de lettre_choisie
        {
             position_lettre = strchr(mot_secret+place_lettre+1, lettre_choisie);//recherche de la lettre, pointeur dans mot_secret
             place_lettre = position_lettre - mot_secret; // place de la lettre ds le mot
             mot_code[place_lettre] = lettre_choisie;  // remplace la lettre dans mot_code
             i++;
        }
        if (strchr(mot_secret, lettre_choisie) != NULL)   
        tentatives++;     // si on a trouver 1 lettre, on incrémente les tetatives
       
        if (!strcmp(mot_secret,mot_code)) // si on a trouver le mot, on sort de la boucle
        break;
    }
   
    if (i != 0) // si le joujeur a gagné
    {
        printf ("\n\nGagne ! Le mot secret etait bien : %s\n", mot_secret);
        printf ("Ton score est de %ld points", i);
    }
    else      // sinon
    {
        printf ("\n\nTu a perdu\n");
        //printf ("Le mot etait : %s", mot_secret);
    }
   
    printf ("\n\nVeux tu rejouer une partie ??\n");
    printf ("1 : oui\n");
    printf ("2 : non\n");
    scanf("%ld", &i);
   
  }while (i == 1);   // boucle si "oui"
 
  return 0;
}

char lireCaractere()
{
    char caractere = 0;

    caractere = getchar(); // On lit le premier caractère
    caractere = toupper(caractere); // On met la lettre en majuscule si elle ne l'est pas déjà

    // On lit les autres caractères mémorisés un à un jusqu'à l'\n (pour les effacer)
    while (getchar() != '\n') ;

    return caractere; // On retourne le premier caractère qu'on a lu
}