TP-systeme-exploitation-cen.../TP3/api_systeme/pf_calmaxtab_fichier.c

116 lines
3.6 KiB
C
Raw Permalink Normal View History

2023-06-20 18:57:09 +00:00
/* Exemple d'illustration des primitives Unix : Un père et ses fils */
/* Calcul distribué du maximum d'un tableau : communication par fichier */
#include <stdio.h> /* entrées sorties */
#include <unistd.h> /* pimitives de base : fork, ...*/
#include <stdlib.h> /* exit */
#include <sys/wait.h> /* wait */
#include <string.h> /* opérations sur les chaines */
#include <fcntl.h> /* opérations sur les fichiers */
#define NB_FILS 3 /* nombre de fils */
#define NB_FLEM_FILS 100000
#define NB_ELEM NB_FILS*NB_FLEM_FILS
/* calcul du max d'un sous-tableau */
int cal_max_tab(int tab[], int i1, int i2) {
int i, max;
max = tab[i1];
for (i = i1 + 1; i < i2; i++) {
if (tab[i]>max) {
max = tab[i];
}
}
return max;
}
int main()
{
int fils, retour, desc_fic, fils_termine, wstatus, max, max_lu;
int tab[NB_ELEM];
char fichier[] = "fic_3f_maxtab";
/* initialiser le tableau */
for (int i=0; i < NB_ELEM; i++) {
tab[i] = i+1;
}
/* ouvrir le fichier en écriture */
desc_fic = open(fichier, O_WRONLY | O_CREAT | O_TRUNC, 0640);
/* traiter systématiquement les retours d'erreur des appels */
if (desc_fic < 0) {
printf("Erreur ouverture %s\n", fichier);
exit(1);
}
printf("\nJe suis le processus principal de pid %d\n", getpid());
for (fils = 1; fils <= NB_FILS; fils++) {
retour = fork();
/* Bonne pratique : tester systématiquement le retour des appels système */
if (retour < 0) { /* échec du fork */
printf("Erreur fork\n");
/* Convention : s'arrêter avec une valeur > 0 en cas d'erreur */
exit(1);
}
/* fils */
if (retour == 0) {
/* calculer le max du sous-tableau */
max = cal_max_tab(tab, (fils-1)*NB_FLEM_FILS, fils*NB_FLEM_FILS);
/* enregistrer le max en binaire */
write(desc_fic, &max, sizeof(int));
/* Important : terminer un processus par exit */
exit(EXIT_SUCCESS); /* Terminaison normale (0 = sans erreur) */
}
/* pere */
else {
printf("\nProcessus de pid %d a cree un fils numero %d, de pid %d \n",
getpid(), fils, retour);
}
}
/* fermer le fichier ouvert en ecriture */
close(desc_fic);
/* ouvrir le fichier en lecture */
desc_fic = open(fichier, O_RDONLY);
/* traiter systématiquement les retours d'erreur des appels */
if (desc_fic < 0) {
printf("Erreur ouverture %s\n", fichier);
exit(1);
}
max = 0;
/* attendre la fin des fils */
for (fils = 1; fils <= NB_FILS; fils++) {
/* attendre la fin d'un fils */
fils_termine = wait(&wstatus);
if WIFEXITED(wstatus) { /* fils terminé avec exit */
printf("\nMon fils de pid %d a termine avec exit %d\n",
fils_termine, WEXITSTATUS(wstatus));
}
else if WIFSIGNALED(wstatus) { /* fils tué par un signal */
printf("\nMon fils de pid %d a ete tue par le signal %d\n",
fils_termine, WTERMSIG(wstatus));
}
/* lire les nouvelles valeurs communiquées par les fils */
/* et calculer le max intermédiaire */
while (read(desc_fic, &max_lu, sizeof(int))>0) {
if (max_lu > max) {
max = max_lu;
}
}
}
close(desc_fic);
printf("\nProcessus Principal termine. Max = %d\n", max);
return EXIT_SUCCESS;
}