Comment servir des pintes de Guinness "over Internet" ;) Reprise/Fork d'un très ancien code d'un pilier de f.m.b.l : http://tnemeth.free.fr/projets/guinness-server.html
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

126 lines
3.3 KiB

/*
* drinks
* architecture clients/serveur guinness
* Thomas Nemeth -- le 15 juin 2001
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>
#include <dirent.h>
#include <unistd.h>
#include <sys/stat.h>
#include "defines.h"
#include "xmem.h"
#include "printlog.h"
#include "lists.h"
#include "drinks.h"
#include "pint.h"
extern char *pinte;
extern char *chemin;
extern Elt *drinks_list;
extern FILE *logfile;
extern FILE *outerr;
char *drinks_get_from_file (const char *nom) {
struct stat fileinfos;
char filename[MAXSTRLEN + 1];
char *datas;
FILE *fichier;
snprintf (filename, MAXSTRLEN, "%s/%s", chemin, nom);
if (stat (filename, &fileinfos) == -1) {
printlog (LOG_ERROR, "Acces impossible au fichier [%s]\n",
filename);
perror ("stat ");
return NULL;
}
if ( (fichier = fopen (filename, "r")) == NULL) return NULL;
datas = xmalloc ((fileinfos.st_size + 3) * sizeof (char));
memset (datas, 0, fileinfos.st_size + 3);
fread (datas, sizeof (char), fileinfos.st_size, fichier);
fclose (fichier);
return datas;
}
char *drinks_get (const char *nom) {
char *breuvage = NULL;
int i;
if (nom == NULL) return NULL;
/* Element 0 (Guinness) disponible par defaut */
if (strcmp (nom, "guinness") == 0) breuvage = xstrdup (pinte);
/* Sinon on cherche dans la liste des fichiers :
* on commence a 1 pour eviter la pinte de Guinness qui est traitee
* juste avant.
*/
if (! breuvage) {
for (i = 1 ; i < get_nb_elts (drinks_list) ; i++)
if (strcmp (nom, elt_number (drinks_list, i)) == 0)
breuvage = drinks_get_from_file (nom);
}
/* Dernier cas : on n'a rien trouve => pinte par defaut */
if (! breuvage) breuvage = xstrdup (pinte);
return breuvage;
}
void drinks_list_files (const char *path) {
DIR *rep;
struct dirent *dirinfos;
struct stat fileinfos;
int nbfiles = 0;
char filename[MAXSTRLEN + 1];
if ( (rep = opendir (path)) == NULL) {
printlog (LOG_ERROR, "Impossible d'ouvrir le repertoire [%s]\n", path);
#ifdef DEBUG
perror ("opendir ");
#endif
return;
}
printlog (LOG_NOTIFY, "Liste des fichiers a integrer :\n");
while ((dirinfos = readdir (rep)) != NULL) {
snprintf (filename, MAXSTRLEN, "%s/%s", path, dirinfos->d_name);
if (stat (filename, &fileinfos) == -1) {
printlog (LOG_ERROR, "Acces impossible au fichier [%s]\n",
filename);
#ifdef DEBUG
perror ("stat ");
#endif
}
if ( (dirinfos->d_name[0] != '.') &&
( (fileinfos.st_mode & S_IFMT) == S_IFREG) ) {
printlog (LOG_NOTIFY, " fichier : [%s]\n",
dirinfos->d_name);
add_elt (&drinks_list, dirinfos->d_name);
nbfiles++;
}
}
printlog (LOG_NOTIFY, "Fin de la liste : %d fichier%s.\n",
nbfiles, nbfiles > 1 ? "s" : "");
closedir (rep);
}
void drinks_display_list () {
int i;
char *breuvage;
printlog (LOG_NOTIFY, "Boissons disponibles :\n");
for (i = 0 ; i < get_nb_elts (drinks_list) ; i++) {
breuvage = elt_number (drinks_list, i);
printlog (LOG_NOTIFY, "%d\t: %s\n", i, breuvage);
}
}