COPIE DE FICHIERS AVEC REMPLACEMENT OU SUPPRESSION DE CHAÎNES DE CARACTÈRES

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

/*****************************************************************************/
/* int Remplacer(FILE *fdep, FILE *farr, char *dep, char *arr)               */
/* Remplace la chaîne dep dans le texte du fichier fdep par la chaîne arr et */
/* écrit le texte ainsi modifié dans le fichier farr ; fdep doit être ouvert */
/* en lecture et farr en écriture.                                           */
/* Le nombre de remplacements effectués est renvoyé par la fonction.         */
/* Attention, le nombre de caractères par ligne dans le fichier ne peut pas  */ 
/* dépasser 999 !                                                            */
/*****************************************************************************/
int Remplacer(FILE*, FILE*, char*, char*);
/*****************************************************************************/

void FC(FILE *D, FILE *A);

/*****************************************************************************/
/* int Remplacer2(FILE *fdep, FILE *farr, char *depd, char *depf, char *arr) */
/* Remplace les chaînes commançant par depd et finissant par depf dans le    */
/* texte du fichier fdep par la chaîne arr et écrit le texte ainsi modifié   */
/* dans le fichier farr ; fdep doit être ouvert en lecture et farr en        */
/* écriture.                                                                 */
/* Le nombre de remplacements effectués est renvoyé par la fonction.         */
/* Attention, le nombre de caractères par ligne dans le fichier ne peut pas  */ 
/* dépasser 999 !                                                            */
/*****************************************************************************/
int Remplacer2(FILE*, FILE*, char*, char*, char*);
/*****************************************************************************/


char fDepart[240],
     fArrivee[240],
     chaine_tempo[240],
     ch[240],
     che1[240],
     che2[240],
     chs[240],
     *chtmp,
     ctrExit[240];

int ctr = 0,
    ctr2 = 0,
    compteur;

FILE *FDEPART,
     *FARRIVEE,
     *tmp;

int main(int argc, char *argv[])
{   
    /* Fichier dans lequel il faut chercher/modifier */
    printf("Taper le nom avec extension du fichier dans lequel vous ");
    printf("d\202sirez travailler.\n");
    printf("(ce fichier doit se trouver dans le r\202pertoire de ");
    printf("l'ex\202cutable)\n");
    printf("Pour quitter maintenant faite <enter>\n");
    gets(chaine_tempo);
    if (strlen(chaine_tempo) == 0)
        exit(0);
    strcpy(fDepart,".\\");
    strcat(fDepart,chaine_tempo);
    /* Fichier de sortie */
    strcpy(fArrivee,".\\");
    strcat(fArrivee,"fcopy");
    strcat(fArrivee,chaine_tempo);
    /* Ouverture des fichiers */
    FDEPART = fopen(fDepart,"r");
    if (!FDEPART)
    {
        printf("Le fichier que vous essayez d'ouvrir n'existe pas !");
        getchar();
        return -3;
    }    
    FARRIVEE = fopen(fArrivee,"w");
    FC(FDEPART,FARRIVEE);
    fclose(FDEPART);
    fclose(FARRIVEE);
    do
    {
        ctrExit[0] = '\0';
        /* Saisie la chaine à rechercher */
        printf(">Cha\214ne recherch\202e< ou >Ch<>ch\202e< : ");
        gets(ch);  
        if (ch[0] == '>' && ch[strlen(ch)-1] == '<')
        {
            chtmp = ch + 1;
            strncpy(che1,chtmp,strlen(ch)-2);
        }    
        else
        {
            printf("Erreur de format : >Cha\214ne recherch\202e< ou ");
            printf(">Ch<>ch\202e<\n");
            printf("Appuiez sur une enter pour fermer la fen\210tre dos...");
            getchar();
            return -1;
        }    
        if (strstr(che1,"<>"))
        {
            chtmp = strstr(che1,"<>") + 2;
            strcpy(che2,chtmp);
            che1[chtmp - che1 - 2] = '\0';
            ctr = 2;
        }    
        else
            ctr = 1;
        /* Saisie de la chaine de remplacement */
        printf(">Nouvelle cha\214ne< : ");
        gets(ch);  
        if (ch[0] == '>' && ch[strlen(ch)-1] == '<')
        {
            chtmp = ch + 1;
            strncpy(chs,chtmp,strlen(ch)-2);
        }    
        else
        {
            printf("Erreur de format : >Nouvelle cha\214ne<\n");
            printf("Appuiez sur une enter pour fermer la fen\210tre dos...");
            getchar();
            return -2;
        }    
        
        tmp = tmpfile();
        FARRIVEE = fopen(fArrivee,"r");
        FC(FARRIVEE,tmp);
        rewind(tmp);
        if (!FARRIVEE)printf("problème avec arrivee1");
        fclose(FARRIVEE);
        FARRIVEE = fopen(fArrivee,"w");
        if (!FARRIVEE)printf("problème avec arrivee2");
        if (!tmp)printf("problème avec tmp");
        /* Traitement et confirmation du remplacement */
        if (ctr == 1)
        {
            printf("Remplacer la cha\214ne \"%s\" par la cha\214ne \"%s\" (o/n)\n",
                   che1, chs);
            gets(chaine_tempo);
            if (chaine_tempo[0] == 'o' || chaine_tempo[0] == 'O')
            {
                printf("La cha\214ne \"%s\" a \202t\202 replac\202e %d fois ",
                       che1,
                       Remplacer(tmp, FARRIVEE, che1, chs));
                printf("par la cha\214ne \"%s\"\n", chs);
            }    
            else
                printf("Op\202ration annul\202e\n");
        }
        if (ctr == 2)
        {    
            printf("Remplacer les cha\214nes comman\207ant par \"%s\" et ", che1);
            printf("finissant par \"%s\" par la cha\214ne %s (o/n)\n", che2, chs);
            gets(chaine_tempo);
            if (chaine_tempo[0] == 'o' || chaine_tempo[0] == 'O')
            {
                printf("%d cha\214nes comman\207ant par %s et ", 
                       Remplacer2(tmp, FARRIVEE, che1, che2, chs), che1);
                printf("finissant par %s ont \202t\202 replac\202es", che2);
                printf("par la cha\214ne \"%s\"\n", chs);
            }    
            else
                printf("Op\202ration annul\202e\n");
        }
    fclose(FARRIVEE);
    fclose(tmp);
    for (compteur = 0; compteur < 240; compteur++)
    {
        ch[compteur] = '\0';
        che1[compteur] = '\0';
        che2[compteur] = '\0';
        chs[compteur] = '\0';
    }
    printf("Voulez-vous encore modifier? (o/n)");
    gets(ctrExit);
    }while(ctrExit[0] == 'O' || ctrExit[0] == 'o');
    
    printf("Une copie du fichier de d\202part %s\n",fDepart);
    printf("a \202t\202 cr\202\202e sous le nom de %s\n",fArrivee);

    /* Appuiez sur une touche pour fermer la fenêtre dos */
    printf("Appuiez sur une enter pour fermer la fen\210tre dos...");
    getchar();
    return 0;
}
void FC(FILE *D, FILE *A)
{
    int i;
    unsigned char ch;
    do
    {
        i = fread(&ch,1,1,D);
        if (i > 0) 
            fwrite(&ch,1,1,A);
    }while (i > 0);
}

int Remplacer(FILE *fdep, FILE *farr, char *dep, char *arr)
{
    char c1[1000], c2[1000], *tmp1, *tmp2;
    int nbr = 0;
    while (fgets(c1,999,fdep))
    {
        strcpy(c2,"");
        tmp1 = c1;
        while(strlen(tmp1))
        {
            tmp2 = strstr(tmp1, dep);
            if (tmp2)
            {
                strncat(c2, tmp1, tmp2 - tmp1);
                strcat(c2, arr);
                tmp1 += ((tmp2 - tmp1) + strlen(dep));
                nbr++;
            }    
            else
            {
                strcat(c2, tmp1);
                tmp1 += strlen(tmp1);
            }    
        }    
        fputs(c2,farr);
    }    
    return nbr;
}

int Remplacer2(FILE *fdep, FILE *farr, char *depd, char *depf, char *arr)
{
    char c1[1000], c2[1000], *tmp1, *tmp2, *tmp3;
    int nbr = 0;
    while (fgets(c1,999,fdep))
    {
        strcpy(c2,"");
        tmp1 = c1;
        while(strlen(tmp1))
        {
            tmp2 = strstr(tmp1, depd);
            if(tmp2)
                tmp3 = strstr(tmp2 + strlen(depd), depf);
            if (tmp2 && tmp3 && tmp3 > tmp2)
            {
                strncat(c2, tmp1, tmp2 - tmp1);
                strcat(c2, arr);
                tmp1 += ((tmp3 - tmp1) + strlen(depf));
                nbr++;
            }    
            else
            {
                strcat(c2, tmp1);
                tmp1 += strlen(tmp1);
            }    
        }    
        fputs(c2,farr);
    }    
    return nbr;
}