/*
 * Ejemplo de uso de la función strstr:
 * 0. Buscar una subcadena 
 * 1. Buscar y eliminar una subcadena
 * 2. Buscar y sustituir una subcadena por otra.
 */

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

main ()
{
char cadena [100];
char cadbuscada[50];
char cadnueva[50];

char *p1,*paux;
int i;
int tamano,tamano1,tamano2;

// BUSCAR 
puts("BUSCAR");
printf ("Introduzca una cadena :");
gets (cadena);
printf ("Introduzca la cadena a buscar:");
gets (cadbuscada);
puts(cadena);
p1 = strstr(cadena,cadbuscada);
paux = cadena;
while ( p1 != NULL)
   {
   for (i=0;i<p1-paux;i++) putchar(' ');
   putchar('^');
   paux = p1+1;
   p1 = p1 + strlen(cadbuscada);
   p1 = strstr(p1,cadbuscada);
   }
putchar('\n');
// ELIMINAR
puts("ELIMINAR");
printf ("Introduzca una cadena :");
gets (cadena);
printf ("Introduzca la cadena a eliminar:");
gets (cadbuscada);
tamano = strlen(cadbuscada);
p1 =strstr(cadena,cadbuscada);
while ( p1 != NULL)
   {
   // copio machacando
   strcpy(p1,p1+tamano);
   // Busco la siguiente ocurrencia
   p1 = strstr(p1,cadbuscada);
   }
puts("Cadena Resultante:");
puts(cadena);

// BUSCAR Y SUSTITUIR
puts("BUSCAR Y SUSTITUIR");
printf ("Introduzca una cadena :");
gets(cadena);
printf ("Introduzca la cadena a buscar:");
gets(cadbuscada);
printf ("Introduzca la cadena nueva:");
gets (cadnueva);
tamano1 = strlen(cadbuscada);
tamano2 = strlen(cadnueva);
if ( tamano1 == tamano2 )
   {	
   p1 =strstr(cadena,cadbuscada);
   while ( p1 != NULL)
      {
      strncpy(p1,cadnueva,tamano2);
      p1 = strstr(p1,cadbuscada);
      }
   }
else
  {
  puts(" Las cadena busca y la nueva deben ser del mismo tamaño");
 }
puts("Cadena Resultante:");
puts(cadena);

}