#include <unistd.h>
#include <sys/wait.h>
#include <stdio.h>
#include <sys/types.h>
#include <fcntl.h>
#include <signal.h>


#define EXIT(s) {fprintf(stderr, "%s",s); exit(0);}
#define USAGE(s) {fprintf(stderr, "%s Datei zum lesen\n",s); exit(0);}
#define MAX 8192

enum {ERROR=-1,SUCCESS};

int main(int argc, char **argv)
{
  int fd[2];
  pid_t pid;
  FILE *pipe_writer, *file;
  char puffer[MAX];

  if(argc!=2)
     USAGE(argv[0]);

  if((file=fopen(argv[1], "r")) == NULL)
     EXIT("Fehler bei fopen.........\n");

  if(pipe(fd) == ERROR)
     EXIT("Fehler bei pipe.......\n");

  if((pid=fork()) == ERROR)
     EXIT("Fehler bei fork......\n");
  if(pid > 0) /*Elternprozess*/
   {
     close(fd[0]); /*Wir schließen die Leseseite*/
     if((pipe_writer = fdopen(fd[1], "w")) == NULL)
        EXIT("Fehler bei fdopen............\n");

     fread(&puffer, MAX, 1, file);
     fputs(puffer, pipe_writer); /*Wir schreiben in die Pipe*/

     fclose(pipe_writer);
     /*Mit dem schließen der Schreibseite */
     /*teilen wir dem Kindprozess das Ende*/
     /*des Schreiben in die Pipe mit*/
     if(waitpid(pid,NULL,0) == ERROR)
         EXIT("Fehler bei waitpid.........\n");
     exit(0);
   }
  else /*Kindprozess ließt aus der pipe mit less*/
   {
     sleep(1);
     close(fd[1]); /*Schließen der Schreibseite*/
     if(fd[0] != STDIN_FILENO) /*muss überprüft werden*/
       { /*duplizieren Standardeingabe*/
         if(dup2(fd[0], STDIN_FILENO) != STDIN_FILENO)
                EXIT("Fehler bei dup2......\n");
         close(fd[0]); /*Wird nicht mehr benötigt*/
       }
     if(execl("/usr/bin/less", "less", NULL) == ERROR) ;
       EXIT("Fehler bei execl.......\n");
   }
}