table.c

Go to the documentation of this file.

#include"table.h"
#include<stdlib.h>
#include<stdio.h>
#include<string.h>
#include"erreur.h"

/*Implementation de la table par liste chainee,
 la liste chainee a une cellule vide en tete.
*/

/* La structure pour chaque cellule de la liste */
struct TABLE{
  /* Le nom du symbole */
  const char* symbole;
  int valeur;
  /* Pointeur sur la cellule suivante */
  table_t suivant;
};

/* Insere une nouvelle cellule en tete de la liste next et
   retourne l'adresse de la nouvelle cellule de tete */

static table_t nouvelle_cellule(table_t next, const char* s, int val){
  table_t n=(table_t) malloc(sizeof(struct TABLE));
  n->symbole=s;
  n->valeur=val;
  n->suivant=next;
  return n;
}

table_t init_table(){
  /* On cree la cellule de tete */
  return nouvelle_cellule(NULL, NULL, 0);
}

void free_table(table_t t){
  table_t tmp;
  if(!t) return;
  while( (tmp=t->suivant) ){
    if(tmp->symbole) free((char*)tmp->symbole);
    t->suivant=tmp->suivant;
    free(tmp);
  }
  free(t);
}

int find(const table_t t, const char* s, int *val){
  table_t tmp;
  /* On part de la deuxieme cellule */
  for(tmp=t->suivant; tmp!=NULL; tmp=tmp->suivant)
    if(strcmp(tmp->symbole,s)==0){
      *val = tmp->valeur;
      return 1;
    }
  num_erreur=E_NOT_FOUND;
  return 0;
}

int add_symbole(table_t t, const char* s, int val){
  int x;
  char *symb;
  /* Si s existe deja dans la table, il y a erreur */
  if( find(t, s, &x)){
    num_erreur= E_EXISTS;
    return 0;
  }
  /* Sinon, on en fait une copie pour le stocker*/
  symb=(char*) malloc(1+strlen(s));
  strcpy(symb,s);
  /* On insere en tete de la table, c'est-a-dire juste apres la cellule de tete */
  t->suivant= nouvelle_cellule(t->suivant, symb, val);
  return 1;
}

void print_table(const table_t t){
  table_t tmp;
  printf("_______________\n");
  /* On part de la deuxieme cellule */
  for(tmp=t->suivant; tmp!=NULL; tmp=tmp->suivant)
    printf("|  %s  |%7d|\n",tmp->symbole, tmp->valeur);
  printf("¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯\n");
}

---