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

#define A 26

struct node {
  char lettre;
  struct cell* listeFils;
};

struct cell {
  struct node* arbre;
  struct cell* arbreSuivant;
};

void initialisation_tab_arbre(struct node tab[]) {
  
  for(int i = 0; i < A; i++) {
    tab[i].lettre = 97+i; //ajout lettres minuscules
    tab[i].listeFils = NULL;
  }
  
  tab[A].lettre = 39;
  tab[A].listeFils = NULL;
  
}

void ajout_tete(char elem, struct cell** pL) {
  struct cell* p;

  p = malloc(sizeof(struct cell));
  //p->arbre = malloc(sizeof(struct node));
  p->arbre->lettre = elem;
  p->arbreSuivant = *pL;
  *pL = p;
}

void lien_listeFils(struct cell** pL) {
  struct cell* p;
  p = malloc(sizeof(struct cell));
 
  (*pL)->arbre->listeFils = p;
}

struct cell* insertion(char elem, struct cell** pL) {
  printf("insert\n");
  printf("*pL : %p\n", *pL);  
  printf("(*pL)->arbre : %p\n", &(*pL)->arbre);
  if((*pL == NULL)||((*pL)->arbre->lettre > elem)) {
    printf("condition1\n");
    //lien_listeFils(pL); 
    ajout_tete(elem, pL);
    printf("return insertion : %p\n", (*pL)->arbre->listeFils);
    return (*pL)->arbre->listeFils;
  }
  else if((*pL)->arbre->lettre == elem) { printf("condition2\n"); return (*pL)->arbre->listeFils;}
  else {printf("esle\n"); insertion(elem, &(*pL)->arbreSuivant); }
  
}

/*void affiche_tab(struct node tab[]) {
  for(int i = 0; i < 32; i++) {
    printf("%c\n", tab[i].lettre);
  }
  }*/

void lire_fichier(FILE* fd, struct node tab_arbre_prcp[]) {
  printf("entrer lire_fichier\n");
  struct cell* localisationArbre;
  char motLu[50];
  int i = 0;
  printf("addressentré fd: %p\n", fd );
  if(fd!=NULL)
    {
      printf("fd!=NULL\n" );
      while(fscanf(fd, "%s", motLu)==1)
	{
    printf("entrer while\n");
	  if((motLu[i] >= 'a') && (motLu[i] <= 'z')) localisationArbre = tab_arbre_prcp[motLu[0]-97].listeFils;
	  
	  if(motLu[i] == 39) localisationArbre = tab_arbre_prcp[A].listeFils; //A = derniere case du tab

	  printf("avant while : localisation : %p\n", localisationArbre);
	  while(motLu[i] != '\0')
	    {
	      i += 1;
	      printf("lettre lue : %c address : %p\n", motLu[i], localisationArbre);
	      localisationArbre = insertion(motLu[i], &localisationArbre);
	      printf("localisation apres : %p\n", localisationArbre);
	      printf("\n");
	    }
	  printf("\n");
	}
      fclose(fd);
      printf("fin lire fichier\n");
    }
}


int main(int argc, char* argv[]) {
  FILE* fd;
  fd=NULL;
  
  struct node tab_arbre[A+1];
  //struct node Arbre;
  //char lettre;
 printf("etape1\n");
 
  if(argc>1) fd = fopen(argv[1], "r");  
  
  printf("etape2\n");
  initialisation_tab_arbre(tab_arbre);
  
  printf("tab_arbre[0].listeFils: %p \n", tab_arbre[0].listeFils);
  

  lire_fichier(fd, tab_arbre);
  printf("tab_arbre[0].listeFils->arbre->lettre : %c\n", tab_arbre[0].listeFils->arbre->lettre);
  //scanf("%c", &lettre);
  //insertion(lettre, &(Arbre.listeFils));
  //printf("lettre : %c\n", Arbre.listeFils->arbre->lettre);
  return 0;
}