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

#define MAX_RAND_TRIES_PER_WORD 10
#define EMPTY_CHAR 0

//TODO: Spiellogik implementieren:
/* * Wörter aus der Wortliste zufällig horizontal oder vertikal platzieren
   * restliche Felder mit zufälligen Buchstaben füllen */

// Creates the word salad by placing words randomly and filling empty spaces
int createWordSalad(char salad[MAX_SEARCH_FIELD_LEN][MAX_SEARCH_FIELD_LEN], 
                   unsigned int searchFieldLen, 
                   const char words[][MAX_WORD_LEN], 
                   unsigned int wordCount)
{
    // Spielfeld vorbereiten
    for(unsigned int i = 0; i < searchFieldLen; i++) {
        for(unsigned int j = 0; j < searchFieldLen; j++) {
            salad[i][j] = EMPTY_CHAR;
        }
    }
    
    int placedWordsCount = 0;  // Zähler für platzierte Wörter
    
    // Jedes Wort versuchen zu platzieren
    for (unsigned int w = 0; w < wordCount; w++) {
        size_t len = strlen(words[w]);
        int placed = 0;
        
        for(int attempt = 0; attempt < MAX_RAND_TRIES_PER_WORD && !placed; attempt++) {
            int horizontal = rand() % 2;
            int row = rand() % searchFieldLen;
            int col = rand() % searchFieldLen;
            
            if(horizontal) {
                // Horizontal platzieren
                if(col + len > searchFieldLen) continue;
                
                int conflict = 0;
                for(size_t i = 0; i < len; i++) {
                    if(salad[row][col+i] != EMPTY_CHAR && salad[row][col+i] != words[w][i]) {
                        conflict = 1;
                        break;
                    }
                }
                
                if(conflict) continue;
                
                for(size_t i = 0; i < len; i++) {
                    salad[row][col+i] = words[w][i];
                }
                placed = 1;
            }
            else {
                // Vertikal platzieren
                if(row + len > searchFieldLen) continue;
                
                int conflict = 0;
                for(size_t i = 0; i < len; i++) {
                    if(salad[row+i][col] != EMPTY_CHAR && salad[row+i][col] != words[w][i]) {
                        conflict = 1;
                        break;
                    }
                }
                
                if(conflict) continue;
                
                for(size_t i = 0; i < len; i++) {
                    salad[row+i][col] = words[w][i];
                }
                placed = 1;
            }
        }
        
        if(placed) {
            placedWordsCount++;
        }
    }
    
    // Leere Felder mit zufälligen Buchstaben befüllen
    for(unsigned int i = 0; i < searchFieldLen; i++) {
        for(unsigned int j = 0; j < searchFieldLen; j++) {
            if (salad[i][j] == EMPTY_CHAR) {
                salad[i][j] = 'A' + rand() % 26;
            }
        }
    }
    
    return placedWordsCount;  // Rückgabewert wie viele Wörter eingefügt wurden
}

// Prints the word salad to console
void showWordSalad(const char salad[MAX_SEARCH_FIELD_LEN][MAX_SEARCH_FIELD_LEN], 
                  unsigned int searchFieldLen)
{
    for (int i = 0; i < searchFieldLen; i++) {
        for (int j = 0; j < searchFieldLen; j++) {
            printf("%c", salad[i][j]); 
            printf(" ");
        }
        printf("\n");
    }
}