#include <stdio.h>
#define n 500
#define q 20
int calcul_mot(char x[n])
{
        int i,nbm=0, l=strlen(x);   //strlen calcule la langueur de texte
    for(i=0;i<l;i++)
             if(x[i]==' ')          // les mots sont s�par� par des espaces
                     nbm++;
     return nbm+1;
}
int calcul_phrase(char x[n])
{
    int i,nbph=0;
    int l=strlen(x);
    for(i=0;i<l;i++)
        if(x[i]=='.')           // les phrases sont s�par�es par des points
            nbph++;
    return nbph;
}
int  estPalindrome(char text[n], int start, int last)       // tester si un mot est palindrome
{
    int i=start;
    while(i<=(start+last)/2)
    {if(text[i]!=text[last])
            return 0;
                    i++; last--;
    }
   return 1;
}
int nombrePal2(char x[n])
{
    int start=0,k,m;
    int l=strlen(x),i,last, nmp=0;
    for(i=0;i<l;i++)
            if(x[i]==' '|| x[i]=='.')
            {
                m=0;
                last=i-1-start;

                //printf("j=%d\ti=%d\tk=%d\n",j,i,i-1-j);
                for(k=0;k<=(i-1-start);k++)
                    if(x[start+k]==x[i-k-1])
                            m++;
                if(m==k && k!=1)
                    nmp++;
                start=i+1;

            }
    return nmp;
}
int nombrePal (char text[n])        //calculer le nombre de mots palindrome dans le texte
{
    int start =0,i=0,nbP=0;

    while(text[i]!='\0')        // \0 fin de texte
    {
        if(text[i]==' '||text[i]=='.')
        {
            if(estPalindrome(text, start,i-1)==1) nbP++ ;

            start=i+1;
        }
        i++;
    }
    return nbP;
}
void supprime_blanc(char text[n])
{
    int i=0, j=0,  l=strlen(text);

    while(i<l)
    {
        text[j]=text[i];
        if(text[i]!=' ')
        {
                j=j+1;
            printf("%c",text[i]);
        }
        i++;
    }
}
int occurance_mot(char x[n], char mot[q])
{

    int t=0,i=0,j=0,k=0,m=0, l=strlen(x);
    for(i=0;i<l;i++)
    {
               m=0;
            if(x[i]==' ' || x[i]=='.')
            {

                for(k=0;k<=(i-1-j);k++)
                    if(x[j+k]==mot[k])
                    {
                        m++;
                    }


                if(m==i-j && m!=0)
                    {
                            t++;
                    }
                j=i+1;
            }
    }


        return t;
}

int main()
{
    char a[n], mot[q];

    int x1,x2, x3, x4,ch;

    printf("Entrez votre texte\n");
    gets (a);

    printf("******************* BIENVENUE ******************\n\n");
    printf("1:  Calcule le nombre de mots dans le texte\n");
    printf("2:  Calcule le nombre de phrase dans le texte\n");
    printf("3:  Calcule le nombre de mots palindromes dans le texte\n");
    printf("4:  supprime les blancs dans le texte\n");
    printf("5:  recherche d'occurance d'un mot\n");
    printf("**************************************************\n\n");

    printf("Donnez votre choix SVP\n");
    scanf("%d",&ch);
    switch(ch)
    {
        case 1:     x1=calcul_mot(a);
                    printf(" il y a %d mots \n",x1); break;
        case 2:     x2=calcul_phrase(a);
                    printf(" il y a %d  phrase \n",x2); break;
        case 3:     x3 = nombrePal2 (a);
                    printf("le nombre de mots palindrome %d\n",x3); break;
        case 4:     supprime_blanc(a);   break;
        case 5:         printf("donnez le mot : ");
                    scanf("%s",mot);
                    x4=occurance_mot(a, mot);
                        printf("%s existe %d fois dans le texte", mot, x4);
                    break;
    }
    return 0;
}