/****************************************************************
 *
 * Purpose: Basic example of pipe. 
 *          Read and write variable length records across a pipe.
 *
 * Author:  M J Leslie
 *
 * Date:    17 Apr 96
 *
 ****************************************************************/

#include <sys/types.h>
#include <unistd.h>			/* pipe.			*/
#include <signal.h>

void Child  (pid_t Handle);
void Parent (pid_t Handle);

main()
{

    pid_t		Pid;
    int 		fd[2];

    pipe(fd);				/* Create two file descriptors  */

    Pid = fork();

    if ( Pid == 0)			/* Child                        */
    {
        close(fd[0]);
        Child(fd[1]);
        puts("Child end");
    }
    else					/* Parent			*/
    {
        close(fd[1]);
        Parent(fd[0]);
        puts("Parent end");
    }
}

/****************************************************************
 *
 *	The Child sends data to the parent.
 *
 ****************************************************************/

void Child(pid_t Handle)
{
    int Len;

    char Buff[50]="Bass Beer";

    Len = strlen(Buff)+1;
    
    write(Handle, &Len, sizeof(Len));
    write(Handle, Buff, Len);

    strcpy(Buff, "Wild times.");
  
    Len = strlen(Buff)+1;
  
    write(Handle, &Len, sizeof(Len));
    write(Handle, Buff, Len);

    strcpy(Buff, "Alex was ere.");
  
    Len = strlen(Buff)+1;
  
    write(Handle, &Len, sizeof(Len));
    write(Handle, Buff, Len);

    strcpy(Buff, "Bon Jovi rules the world.");
  
    Len = strlen(Buff)+1;
  
    write(Handle, &Len, sizeof(Len));
    write(Handle, Buff, Len);  
  
    close(Handle);
}

/****************************************************************
 *
 *	Read the data sent by the child.
 *
 ****************************************************************/

void Parent(pid_t Handle)
{

    int		Len;
    char 	Buff[50];

    /* ...	Perform two reads. THe first gets the length of the data
       ...	the second gets the actual data.			*/

    while (read(Handle, &Len, sizeof(Len)) > 0)
    {
        read(Handle,Buff, Len);
        printf("%s\n", Buff);
    }
      
}