#include "game.h"
#include "input.h"
#include <time.h>
#include <stdlib.h>
#include <string.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) {
   /*srand(time(NULL));
   char bustaben[] = "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z";
   char zufall = bustaben[rand() % 26];

   printf("Zufaelliger Bustabe: %c\n", zufall);

   const char words[15][MAX_WORD_LEN] = "Yeti,Nessie,Werwolf,Vampir,Monster,Hydra,Frankenstein,Dracula,KingKong,Gremlin,Kobold,Hexe,Poltergeist,Gespenst,Oge";



   return 0; */

   srand(time(NULL));

   for (unsigned int r=0; r < searchFieldLen; r++) {
      for (int c =0; c <searchFieldLen; c++) {
         salad[r][c] = EMPTY_CHAR;
      }
   }

   //Wörter plazieren
   for (unsigned int w = 0; w< wordCount; w++) {
      int wordLen = strlen(words[w]);
      int placed = 0;
      int tries = 0;
      while (!placed && tries < MAX_RAND_TRIES_PER_WORD) {
         int direction = rand() % 2;
         int row;
         int col;
         int fits = 1;
         if (direction == 0) {
            row = rand() % searchFieldLen;
            col = rand() % (searchFieldLen - wordLen +1);
            for (int i = 0; i< wordLen; i++) {
               if (salad[row][col +i] != EMPTY_CHAR) {
                  fits = 0;
                  break;
               }
            }
            if (fits) {
               for (int i=0; i < wordLen; i++) {
                  salad[row][col +i] = words[w][i];
               }
               placed = 1;
            }
         }
         else {
            row = rand() % (searchFieldLen - wordLen +1);
            col = rand() % searchFieldLen;
            for (int i = 0; i< wordLen; i++) {
               if (salad[row+i][col] != EMPTY_CHAR) {
                  fits = 0;
                  break;
               }
            }
            if (fits) {
               for (int i = 0; i<wordLen; i++) {
                  salad[row+i][col] = words[w][i];
               }
               placed =1;
            }
         }
         tries++;
      }
   }
   //Rest mit Zufallsbustaben füllen
   for (unsigned int r=0; r < searchFieldLen; r++) {
      for (int c=0; c < searchFieldLen; c++) {
         if (salad[r][c] == EMPTY_CHAR) {
            salad[r][c]='A' + rand() % 26;
         }
      }
   }
   return 0;
}