/***************************************

      Riindirizzamento dell'Output
           last update 10/07/87
      AMIGA-Version by Frank Kremser
PC-Original-Version by Dr. Edgar Huckert
       (C) 1987  by Markt & Technik

****************************************

Riindirizzamento dell'output con Comandi in C
Chiamat: redirect [-o file]

***************************************/

#include <stdio.h>

void main(argc,argv)
int argc;
char *argv[];
{
  FILE *fpoi;
  char zeile[80];

  /* Pre-occupazione per fpoi su output standard */
  fpoi = stdout;
  if (argc > 2)
    {
     if (strcmp(argv[1],"-o") == 0)
       {
        /* Valutazione dell'Opzione -o nomefile */
        /* fpoi viene trasformato           */
        fpoi = fopen(argv[2],"w");
        if (fpoi == NULL) exit(1);
       }
    }
  /* Lettura riga dal Terminale e output */
  /* sullo schermo o nel file indicato   */
  /* Fine dell'Input: CTRL-\ (AMIGA!)    */
  while (1)
    {
     if (fgets(zeile,80,stdin) == NULL) break;
     fprintf(fpoi,"%s",zeile);
    }

  if (fpoi != stdout) fclose(fpoi);
  printf ("\n\n");
}   /* end main */