//This model corresponds to the incorrect solution to the infinite-buffer
//Producer/Consumer Problem Using Binary Semaphores discussed by Stallings
//in Figure 5.9 (Operating Systems, Fifth edition).
//Model constructed by Frits Vaandrager on 15/3/06
//Ideas from Martijn Hendriks, Koen Vermeer, Justus Freijzer, and Bart Kerkhoff
//have been used in this model.
const int M = 2; //Number of semaphores
const int N = 2; //Number of processes
//Names of semaphores
const int s = 0;
const int delay = 1;
//Names of processes
const int producer = 0;
const int consumer = 1;
chan semWait[M][N];
chan semSignal[M][N];
chan semGo[M][N];
//The integer variable from the program, which intends to denote the number of products
//that are produced but not consumed
int n = 0;Consumer
void take(){}
void consume(){}Producer//Insert local declarations of clocks, variables and constants.
void produce(){}
void append(){}
Semaphoreconst int id, const int queue_size, const int init_val//The value of the semaphore
bool value = init_val;
//The queue of the semaphore
// -1 denotes an empty array entry
int[-1,N-1] queue[queue_size];
//An auxiliary variable used to temporarily store process id
meta int[0,N-1] q;
void initialize ()
{
for (i : int[0,queue_size-1])
{queue[i] = -1;}
}
void deQueue ()
{
for (i : int[1,queue_size-1])
queue[i-1] = queue[i];
queue[queue_size-1] = -1;
}
void enQueue (int p)
{
int i = 0;
while (queue[i]>=0){i++;};
queue[i]=p;
}
int[0,N-1] headQueue ( )
{
return queue[0];
}
bool fullQueue ( )
{
for (i : int[0,queue_size-1])
{
if (queue[i]==-1) {return false;}
}
return true;
}
bool emptyQueue ( )
{
return (queue[0]==-1);
}overflow//Insert process assignments.
Sem_s = Semaphore(s,1,1);
Sem_delay = Semaphore(delay,1,0);
//Edit system definition.
system Consumer,Producer,Sem_s,Sem_delay;