C > palindrome fichier 2

#include <stdio.h>
#include <string.h>
#include <conio.h>
#include <stdlib.h>

/* Procedure creation fichier */
void Creer(FILE **fp)
{
char f[30];
printf("Fichier:");
scanf("%s",f);
*fp=fopen(f,"r") ;

if (*fp==NULL )
{printf("probleme ouverture!!!");exit(EXIT_FAILURE); }

}
/* fonction palindrome */
int palindrome (char *s)
{int i,j,l;
l=strlen(s);

for(i=0,j=l-1;i<j;i++,j--)
{if(s[i]!=s[j])
return 0;}
return 1;

}

int  main(char *argv,int argc)
{
    FILE  *fp=NULL;
    char *s;
int L,p;int c;

Creer(&fp) ;
L=1;

while((c=fgetc(fp))!=EOF)
{  

   if (c == '\n') {L=L+1;}

   fscanf(fp,"%s",s);
     
      p=palindrome(s);

      /* Affichage du résultat */
      if(p==1)
      {
       printf("La chaine %s est un palindrome ,elle est dans la ligne %d\n",s, L);}
      else
      { printf("");}

}
getch();
fclose(fp);
return(0);

}