Программа Слоны

 #include <stdio.h>
  #include <stdlib.h>
  #include <unistd.h>
  #include <sys/types.h>
  #include <sys/wait.h>
  #include <sys/time.h>
  #include <time.h>
  #include <signal.h>
  #include <sys/resource.h>
 
  #include "elephant.h"
  #include "herd.h"
  #include "/home/metod/curtime.c"
 
/*               файл incl_dcl.c                 */
/* Структура, описывающая Слона в мониторе:
   содержит личные данные Слона и управляющую
   информацию о нем */
struct meleph {
  struct elephant *el; /* указатель на личные данные */
  pid_t chpid;         /* ID процесса */
  int prty;            /* приоритет процесса */
  char status;         /* состояние процесса */
  };
static int ne;  /* параметр циклов */
static struct meleph mel[NE]; /* управляющая информация о Слонах */
static int cnt; /* число запущенных Слонов */
 
static char chld_name[]="./elephant1";
  /********************************************************/
  main() {
/*               файл incl_dc2.c                 */
     int stat;  /* состояние процесса при завершении */
     /* строки для символьного представления параметров */  
     char t1[20], t2[20], t3[20], t4[20];
     pid_t pw;   /* идентификатор процесса */
     char eee[512];   /* текст сообщения об ошибке */
 
/*               файл incl_bgn.c                 */
    /* начало работы */          
    /* инициализация генератора случайных чисел */
    srand(time(NULL));
    printf("%s - Начало работы\n",curtime());
 
    *t3=*t4=0;
    /* цикл по массиву Слонов */
    for (ne=0; ne<NE; ne++) {
/*               файл incl_str.c                 */
       /* запись личных данных в управляющую информацию */
       mel[ne].el=&ee[ne];  
       /* представление нестроковых данных в строковом виде */
       sprintf(t1,"%d",mel[ne].el->age);
       sprintf(t2,"%lf",mel[ne].el->weight); 
 
/*               файл incl_cal.c                 */
       /* порождение процесса */
       pw=fork();
       if (pw==0) {
 
          /* для дочернего процесса - запуск программы-Слона */
          /* личные данные передаются через параметры */
          if (execl(chld_name, mel[ne].el->name, t1, t2, t3, t4, NULL)<0) {  
            /* если загрузка программы-Слона почему-либо не удалась,
               печатается сообщение об ошибке, и процесс завершается */ 
            perror(eee);
            printf("%s\n",eee); exit(0);
            }
          /* если вызов execl выполнился успешно, то далее в 
             дочернем процессе выполняется программа elephant1 */
        }
 
       /* эта часть - только для процесса - Ганеши */
       /* заполнение управляющей информации о процессе  */
       /* состояние процесса пока что - не запущен */
       mel[ne].status=-1;
       /* установка случайной добавки к приоритету */
       mel[ne].prty=(int)(10.* rand()/RAND_MAX);  
       setpriority(PRIO_PROCESS,pw,mel[ne].prty);
       /* запоминание ID процесса-Слона */
       mel[ne].chpid=pw;
 
       }
/*               файл incl_chk.c                 */
    /* пауза, чтобы процессы успели загрузить Слонов */
    sleep(1);
    /* перебор запущенных процессов */
    for (cnt=ne=0; ne<NE; ne++) {
      /* проверка - не закончился ли процесс */
      pw=waitpid(mel[ne].chpid,&stat,WNOHANG);
      if (pw==mel[ne].chpid) 
        /* если процесс закончился, значит, запуск Слона не удался */
        printf("Слон %s не запущен\n",mel[ne].el->name);
      else {
        /* состояние процесса - запущен */
        mel[ne].status=0;
        /* подсчет запущенных Слонов */
        cnt++;
       }
      }
    /* если счетчик запущенных 0 - завершение Ганеши */
    if (!cnt) exit(0);
 
    /* пауза монитора, Слоны в это время выполняются */
    sleep(25);
    printf("%s - ВРЕМЯ ОЖИДАНИЯ ИСТЕКЛО\n",curtime());
 
    /* перебор всех запущенных Слонов */
    for (ne=0; ne<NE; ne++) {
      /* если состояние процесса "не запущен", он не проверяется */
      if (mel[ne].status<0) continue;
      /* проверка завершения Слона с заданным ID, без ожидания завершения */
      pw=waitpid(mel[ne].chpid,&stat,WNOHANG);
      if (mel[ne].chpid==pw) {
        /* если Слон завершился - сообщение о его успешном завершении */
        printf("%s - Слон %s нормально завершился\n",
          curtime(),mel[ne].el->name);
         }
      else {
        /* если Слон не завершился, ему посылается сигнал KILL */
        kill(mel[ne].chpid,SIGKILL);
        /* ожидание завершения после сигнала */
        waitpid(mel[ne].chpid,&stat,0);
        /* сообщение о гибели */
        printf("%s - Слон %s погиб\n",
          curtime(),mel[ne].el->name,stat);
        }
      }
  }
Программный модуль, реализующий деятельность одного Слона
 
  /**********************************************/
  /* Пример для работы ╧1                       */
  /**********************************************/
  /* Дочерний процесс,
                моделирующий поведение Слона    */
  /**********************************************/
  #include <stdio.h>
  #include <string.h>
  #include <unistd.h>
  #include <stdlib.h>
  #include <sys/types.h>
  #include <sys/time.h>
  #include <time.h>
  #include <sys/resource.h>
 
  /* структура личных данных Слона */
  #include "elephant.h"
 
  #include "/home/metod/a0wait.c"
  #include "/home/metod/a1wait.c"
  #include "/home/metod/curtime.c"
 
static struct elephant this;  /* личные данные */
static int thisState;         /* состояние */
 
  /* параметры - имя, возраст, вес Слона */
  main(int an, char *av[]) {
   char msg[40];
/*               файл incl_e1.c                 */
    /* прием параметров */
    strcpy(this.name,av[0]);
    sscanf(av[1],"%d",&(this.age)); 
    sscanf(av[2],"%lf",&(this.weight));
 
    /* инициализация генератора случайных чисел */
    srand(time(NULL));
    /* состояние - 0 */
    thisState=0;
 
/*               файл incl_e2.c                 */
    /* сообщение о начале */
    printf("%s - Слон %s поиск начал, приоритет=%d\n",
        curtime(),this.name,getpriority(PRIO_PROCESS,getpid()));  
  
    /* время поиска воды - случайная величина, 
       отчасти зависящая от возраста  */
    a1wait(2*(60-this.age));
    /* поиск окончен, состояние - 1 */
    thisState=1;
 
/*               файл incl_e3.c                 */
    /* сообщение об окончании поиска */
    printf("%s - Слон %s нашел воду\n",curtime(),this.name);
 
    /* время насыщения зависит от веса Слона */
    a0wait((int)(this.weight*5));
 
    /* сообщение об окончании водопоя */
    printf("%s - Слон %s напился\n",curtime(),this.name);
 
    /* завершение процесса */
    exit(0);