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

/********************************************************************
*   El programa recibe una cadena de caracteres, una palabra        *
*   antigua y una palabra nueva. Devuelve la cadena con la palabra  *
*   nueva escrita en los lugares donde estaba la palabra vieja      *
********************************************************************/

int cuenta_cuantos(char *cadena, char *word){
    int i, j, kbuf, conta, NumVeces = 0;
    size_t tam1, tam2;

    // Calculamos tamaños //
    tam1 = strlen(cadena);
    tam2 = strlen(word);

    // Recorremos toda la cadena //
    for(i = 0; i < tam1; i++){
        // Si algun caracter de la cadena coincide con el primero de la palabra //
        if(cadena[i] == word[0]){
            // Guardamos la posicion en donde fue encontrada la coincidencia //
            // Para no afectar el recorrido del primer for //
            kbuf = i;
            conta = j = 0;
            // Recorremos todos los caracteres de la palabra //
            while(j < tam2){
                if(word[j++] == cadena[kbuf++])
                    conta++;
            }
            // Si los caracteres de cadena y palabra coincidieron el mismo numero //
            // de veces que lo que mide la palabra -> palabra se encuentra en cadena //
            if(conta == tam2)
                NumVeces++;
            // NumVeces indica cuantas "palabra" hay en "cadena" //
        }
    }
    return NumVeces;
}

void Convierte(size_t tam1, size_t tam2, size_t tam3, char *cad, char *old, char *nueva, char *cadena_new){
    int i, j, aux, kbuf, bandera, conta, k = 0;

    // Recorremos toda la cadena antigua en busca de coincidencias //
    for(i = 0; i < tam1;){
        // bandera sirve para saber si la coincidencia //
        // es completa o solo de unos cuentos caracteres //
        bandera = 0;
        if(cad[i] == old[0]){
            // Guardamos en kbuf la posicion en la que iva i //
            // para que el recorrido de la cadena no se altere //
            kbuf = i;
            aux = conta = j = 0;
            // Recorremos la palabra vieja para ver si //
            // la coincidencia es completa //
            while(j < tam2){
                if(old[j++] == cad[kbuf++])
                    conta++;
            }
            // bandera sera 0 a menos que entremos al siguiente if //
            bandera = 0;
            // al siguiente if entraremos solo cuando la //
            // palabra vieja se encuentre COMPLETA en la cadena //
            if(conta == tam2){
                while(aux < tam3){
                    // aqui escribimos la palabra nueva en la //
                    // nueva cadena //
                    cadena_new[k++] = nueva[aux++];
                }
                // Como se encontro que "vieja" esta en "cadena" //
                // hacemos que i se salte el tamaño de vieja //
                // para que vieja no se copie en la cadena nueva //
                i += tam2;
                // marcamos a bandera con 1 para que el //
                // programa sepa que entramos aqui  y no //
                // entre al siguiente else if //
                bandera = 1;
            }
        }else if(bandera == 0){
            // se entra aqui solo si entre los caracteres //
            // revisados no se encontro el patron de la palabra //
            // vieja, por lo que se copimos caracteres como si nada //
            cadena_new[k++] = cad[i++];
        }
    }
    cadena_new[k] = '\0';
}


int main(){
    size_t tam1, tam2, tam3;
    int aux;
    char cad[80];
    char old[20];
    char nueva[20];
    char *cadena_new;

    printf("Dame una cadena: ");
    gets(cad);
    printf("Palabra vieja: ");
    gets(old);
    printf("Palabra nueva: ");
    gets(nueva);

    tam1 = strlen(cad);
    tam2 = strlen(old);
    tam3 = strlen(nueva);

    aux = cuenta_cuantos(cad, old);
    if(aux == 0){
        printf("\nERROR! La palabra vieja no se encuentra en la cadena!");
        exit(1);
    }

    if(tam2 == tam3)
        cadena_new = (char *)malloc(tam1+1);
    else if(tam2 > tam3)
        cadena_new = (char *)malloc((tam1 - ((tam2 - tam3)*aux)+1));
    else if(tam2 < tam3)
        cadena_new = (char *)malloc((tam1 + ((tam3 - tam2)*aux)+1));

    Convierte(tam1, tam2, tam3, cad, old, nueva, cadena_new);
    printf("\nLa nueva cadena ahora es: \n%s\n", cadena_new);
    free(cadena_new);
    return 0;
}