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

// Define constants for the maximum number of words and tries
#define MAX_WORDS 14
#define MAX_TRIES 6

// Array of words used in the game
const char *words[MAX_WORDS] = {
    "programmation", "ordinateur", "langage", "jeu", "algorithmique", 
    "fontainebleau", "koala", "anticonstitutionnellement", "code", 
    "canard", "gyroscope", "periclitation", "susurrer", "eclesiastique"
};

// Function to display the hangman figure based on the number of tries
void display_hangman(int tries) {
    switch (tries) {
        case 0: printf("  ----\n  |  |\n  |\n  |\n  |\n  |\n--------\n"); break;
        case 1: printf("  ----\n  |  |\n  |  O\n  |\n  |\n  |\n--------\n"); break;
        case 2: printf("  ----\n  |  |\n  |  O\n  |  |\n  |\n  |\n--------\n"); break;
        case 3: printf("  ----\n  |  |\n  |  O\n  | /|\n  |\n  |\n--------\n"); break;
        case 4: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  |\n  |\n--------\n"); break;
        case 5: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  | /\n  |\n--------\n"); break;
        case 6: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  | / \\\n  |\n--------\n"); break;
    }
}

// Function to randomly choose words and concatenate them to create a puzzle word
// Ensures that the maximum word length is respected by avoiding overflow with strncat
void choose_words(char *chosen_word, int max_length) {
    int total_length = 0, used[MAX_WORDS] = {0}, word_index;
    chosen_word[0] = '\0';

    // Select words until the maximum word length is reached or exceeded
    while (total_length < max_length) {
        word_index = rand() % MAX_WORDS;
        int word_length = strlen(words[word_index]);
        int additional_space = (total_length > 0 ? 1 : 0); // Space between words if needed

        // Ensure word fits within the remaining length
        if (!used[word_index] && total_length + word_length + additional_space <= max_length) {
            if (additional_space > 0) {
                strncat(chosen_word, " ", max_length - total_length - 1);
                total_length++;
            }
            strncat(chosen_word, words[word_index], max_length - total_length - 1);
            total_length += word_length;
            used[word_index] = 1;
        }

        // Break if no other words can fit in the remaining space
        int all_used = 1;
        for (int i = 0; i < MAX_WORDS; i++) {
            if (!used[i] && total_length + strlen(words[i]) + 1 <= max_length) {
                all_used = 0;
                break;
            }
        }
        if (all_used) break;
    }
}

// Function to play the hangman game
// Displays the game state and checks if each guess is correct or already revealed
void play_game(const char *chosen_word, int word_length, int letters_to_guess) {
    char guessed[word_length + 1];
    int tries = 0, guessed_correctly = 0;

    // Initialize guessed word display with underscores
    for (int i = 0; i < word_length; i++) guessed[i] = (chosen_word[i] == ' ') ? ' ' : '_';
    guessed[word_length] = '\0';

    // Main game loop, stops if max tries are reached or the word is guessed
    while (tries < MAX_TRIES && guessed_correctly < letters_to_guess) {
        printf("\nWord to guess: %s\n", guessed);
        display_hangman(tries);
        
        // Get a letter guess from the player
        char guess;
        printf("Enter a letter: ");
        scanf(" %c", &guess);
        
        int found = 0, already_revealed = 0;

        // Check if the letter is in the word and update guessed word display
        for (int i = 0; i < word_length; i++) {
            if (chosen_word[i] == guess) {
                if (guessed[i] == '_') {
                    guessed[i] = guess;
                    guessed_correctly++;
                    found = 1;
                } else {
                    already_revealed = 1;
                }
            }
        }

        // Increment tries if the letter was not found and not already revealed
        if (!found && !already_revealed) tries++;
    }

    // Display win or lose message based on game outcome
    if (guessed_correctly == letters_to_guess)
        printf("Congratulations! You've guessed the word: %s\n", chosen_word);
    else {
        printf("Sorry, you've lost. The word was: %s\n", chosen_word);
        display_hangman(MAX_TRIES);
    }
}

// Main function to start the game
int main() {
    srand(time(NULL));
    int max_word_length;

    // Prompt user for maximum word length for the puzzle
    printf("Enter the maximum word length to guess: ");
    scanf("%d", &max_word_length);

    // Select a word within the specified length
    char chosen_word[max_word_length];
    choose_words(chosen_word, max_word_length);

    // Calculate total letters to guess (excluding spaces)
    int word_length = strlen(chosen_word), letters_to_guess = 0;
    for (int i = 0; i < word_length; i++)
        if (chosen_word[i] != ' ') letters_to_guess++;

    // Start the game with the chosen word
    play_game(chosen_word, word_length, letters_to_guess);
    return 0;
}