#include <errno.h>#include <stdio.h>#include <stdlib.h>/* * readString * * Lit (nbCar-1) caractères sur stdin et les stocke à l'adresse chaine * Le buffer de stdin est vide après l'appel de la fonction * * * Retour : * - si la lecture s'est passée correctement : 0 * - si la chaîne a été tronquée : 1 * - si erreur de lecture, si nbCar <= 1 ou si chaine == NULL : 2 */unsigned int readString (char chaine[], size_t nbCar){ unsigned int err; /* si la saisie est impossible */ if (nbCar <= 1 || chaine == NULL) { err = 2; } /* si elle est possible */ else { int carTemp; unsigned int i = 0; /* lecture de stdin et copie dans la chaîne */ while ( (carTemp = fgetc(stdin)) != '\n' && carTemp != EOF && i < nbCar-1 ) { chaine[i] = carTemp; ++i; } /* marquage de la fin de la chaîne */ chaine[i] = '\0'; /* si il y a eu une erreur de lecture */ if (carTemp == EOF) { err = 2; } /* si des caractères on été laissés dans le buffer */ else if (carTemp != '\n') { err = 1; while ( (carTemp = fgetc(stdin)) != '\n' && carTemp != EOF ) { } } /* si tout s'est passé normalement */ else { err = 0; } } return err;}/* * readInteger * * Lit 10 caractères maximum sur stdin et stocke le nombre entier correspondant * à l'adresse p_nb * Le buffer de stdin est vide après l'appel de la fonction * * * Retour : * - si la lecture s'est passée correctement : 0 * - si le nombre dépasse la capacité d'un long ou si plus * de 10 caractères sont lus : 1 * (dans le premier cas *p_nb est inchangé, * dans le deuxième *p_nb est borné à LONG_MIN ou LONG_MAX) * - si erreur de lecture ou si p_nb == NULL : 2 */unsigned int readLong (long *p_nb){ int err; if (p_nb == NULL) { err = 2; } else { char chaineTemp[11]; char *p_carInv; unsigned int resLecture; resLecture = readString (chaineTemp, sizeof chaineTemp); /* si lecture impossible */ if (resLecture == 1) { err = 1; } /* si chaîne tronquée */ else if (resLecture == 2) { err = 2; } else { long resConversion; errno = 0; resConversion = strtol (chaineTemp, &p_carInv, 10); /* si débordement pendant la conversion */ if (errno == ERANGE) { *p_nb = resConversion; err = 1; } /* si saisie réussie */ else if (*p_carInv == '\0') { *p_nb = resConversion; err = 0; } /* si conversion impossible */ else { err = 2; } } } return err;}/* * readDouble * * Lit 50 caractères maximum sur stdin et stocke le nombre flottant * correspondant à l'adresse p_nb * Le buffer de stdin est vide après l'appel de la fonction * * * Retour : * - si la lecture s'est passée correctement : 0 * - si le nombre dépasse la capacité d'un double ou si plus * de 50 caractères sont lus : 1 * (dans le premier cas *p_nb est inchangé, * dans le deuxième *p_nb est borné à +/- HUGE_VAL) * - si erreur de lecture ou si p_nb == NULL : 2 */unsigned int readDouble (double *p_nb){ int err; if (p_nb == NULL) { err = 2; } else { char chaineTemp[128]; char *p_carInv; unsigned int resLecture; resLecture = readString (chaineTemp, sizeof chaineTemp); /* si lecture impossible */ if (resLecture == 1) { err = 1; } /* si chaîne tronquée */ else if (resLecture == 2) { err = 2; } else { double resConversion; errno = 0; resConversion = strtod (chaineTemp, &p_carInv); /* si débordement pendant la conversion */ if (errno == ERANGE) { *p_nb = resConversion; err = 1; } /* si saisie réussie */ else if (*p_carInv == '\0') { *p_nb = resConversion; err = 0; } /* si conversion impossible */ else { err = 2; } } } return err;}