/* ----------------------------------------------------*/
/*   Programme Principal de Lissage Moyen	       */
/*   Fichier: Moyen.c				       */
/*   Auteur: Patrick Bonnin			       */
/*   Date de Creation:		                       */
/* ----------------------------------------------------*/
#include <stdio.h>
#include "Structures.h"
#include "Utilitaires1.h"
#include "LibPavlidis.h"

main(int argc, char **argv)
{
  IMAGE	    *image = NULL,*imres = NULL,*imfinal = NULL;
  int	    nlig, ncol;
  unsigned char	prof = 2;
  FILE	    *fichier = NULL, *fichres = NULL;

  /* --- USAGE --- */
  if(argc != 3)
  {
fprintf(stderr,"USAGE :  PMoyen image immoy \n");
fprintf(stderr,"image : nom de l'image a lisser \n");
fprintf(stderr,"immoy : image moyennee \n");
fprintf(stderr,"Effectue le lissage moyen de l'image source \n");
    system ("PAUSE");
    exit(0);
  }
/* --- Image Source --- */

  if(!(fichier = fopen(*++argv,"rb")))
  {
fprintf(stderr,"ouverture du fichier Image %s impossible\n",*argv);
    system ("PAUSE");
    exit(0);
  }
/* --- Image Resultat --- */
  if(!(fichres = fopen(*++argv,"wb")))
  {
fprintf(stderr,"ouverture du fichier Image Resultat %s impossible\n",*argv);
    system ("PAUSE");
    exit(0);
  }
/* --- Recuperation de la Taille de l'Image --- */
   Lecture_EntetePGM(fichier, &ncol, &nlig);
   fprintf(stderr, "Taille de l'Image %d lignes x %d colonnes\n", nlig,ncol);

/* --- Creation des Images --- */
  if (crea_IMAGE(image) == NULL)	/* creation de la structure image */
  {
    fprintf(stderr,"Erreur d'Allocation Memoire Structure Image : Moyen \n");
    system ("PAUSE");
    exit (0);
  }
  Creation_Image (image, &nlig, &ncol, &prof);

  if (crea_IMAGE(imres) == NULL) /* creation de la structure image resultat */
  {
fprintf(stderr,"Erreur d'Allocation Memoire Structure Image Resultat: Moyen \n");
    system ("PAUSE");
    exit (0);
  }

  Creation_Image (imres, &nlig, &ncol, &prof);
  prof = 3;

  if (crea_IMAGE(imfinal) == NULL) /* creation de la structure image resultat */
  {
fprintf(stderr,"Erreur d'Allocation Memoire Structure Image Resultat: Moyen \n");
    system ("PAUSE");
    exit (0);
  }
  Creation_Image (imfinal, &nlig, &ncol, &prof);

/* --- Lecture du Fichier Image et
   Remplissage du champ de Donnees --- */
  Lecture_Image(fichier,image);

/* --- Lissage Moyen --- */
  Pavlidis (image, imres);

  Label_Conversion(imres, imfinal);

/* --- Enregistrement de l'Image Resultat --- */
  fprintf(fichres,"P6\n%d %d\n255\n",(int)ncol, (int)nlig);

  EnregistreImage(fichres, imfinal);

  fprintf(stderr,"Fin du Split de pavlidis\n");
  system("PAUSE");
}