//gcc yrcmt.c -Wall -o yrcmt

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

#define BUFSIZE       2048

FILE    *fpin, *fpout;
char    buffer[BUFSIZE+1];
char    *pstr1, *pstr2, *pstr3, *pstr4;
short   in_cmt_star, end;
short   in_string;
int     nbenrlus=0;

//==========================================================
int main(int argc, char *argv[])
{   //pour virer les commentaires

	/* debut : verif arg, ouverture fichier ... */
	if (argc<2 || argc>3)
	{		printf ("syntaxe error: yrcmy file_in [file_out]}\n");
		  exit(-9);
	}
	if ((fpin = fopen(argv[1], "r")) <= 0)
	{		printf ("problem when opening %s \n", argv[1]);
			exit(-9);
	}
	if (argc==3)
	{  if ((fpout = fopen(argv[2], "w")) <= 0)
	   {  printf ("problem when opening %s \n", argv[2]);
			  exit(-9);
	   }
	}
	else fpout = stdout;

	while (  (fgets(buffer, BUFSIZE+1, fpin)) != NULL)
  {    ++nbenrlus;
       pstr1 = buffer;
			 end = 0;
       while (!end)
       {
           if (in_cmt_star)
           {  //si on est dans un commentaire, on regarde
              //si on en trouve la fin
              pstr1 = strstr(pstr1, "*/");
              if (pstr1 != NULL)
              {  pstr1+=2;
                 in_cmt_star = 0;
              }
							else
							   end=1;
           }

           if (!in_cmt_star)
           {  //si on est pas (ou plus) dans commentaire, on regarde si
              //y'en a
              pstr2 = pstr3 = pstr1;
              pstr2 = strstr(pstr1, "/*");
              pstr3 = strstr(pstr1, "//");
							pstr4 = strstr(pstr1, "\"");

							if (pstr4!=NULL)
							{  //if ( (pstr4<pstr2 && pstr2!=NULL) && (pstr4<pstr3 && pstr3!=NULL) ) //"
							   in_string=1;
								 if (pstr2<pstr4 && pstr2!=NULL) in_string=0;
								 if (pstr3<pstr4 && pstr3!=NULL) in_string=0;
								 if (in_string) //on a detected le debut d'une chaine de carateres
							   {              //on doit en trouver la fin sur la meme ligne !!!
										++pstr4;
										pstr4 = strstr(pstr4, "\"");
										if (pstr4==NULL)
										{  printf(" > yrcmt error a line %i: a string must end on the same line !!!?\n", nbenrlus);
										   exit(-9);
										}
										//on va ecrire y compris jusqu'a la fin de la chaine de carateres
										pstr4[0]='\0';
										printf("%s", pstr1);
										printf("\"");
										pstr1=pstr4+1;
										if (pstr1[0]=='\0')
										   end=1;
										continue;
								 }
							}

							if (pstr2!=NULL && pstr3!=NULL)
							{  //c'est l'inf qui compte
							   if (pstr2<pstr3) //commentaire star (/*)
								 {  in_cmt_star=1;
										//il faut écrire ce qu'il y a avant
								    pstr2[0]='\0';
                 		printf("%s", pstr1);
								    pstr1=pstr2+2; //pour avancer
								 }
								 if (pstr3<pstr2) //commentaire slash (//)
								 {  //il faut écrire ce qu'il y a avant
									  pstr3[0]='\0';
                 		printf("%s", pstr1);
										end=1;
								 }
							}
							else if (pstr2!=NULL) //commentaire star (/*)
						  {  in_cmt_star=1;
								 //il faut écrire ce qu'il y a avant
							   pstr2[0]='\0';
                 printf("%s", pstr1);
								 pstr1=pstr2+2; //pour avancer
							}
							else if (pstr3!=NULL) //commentaire slash (//)
						  {  //il faut écrire ce qu'il y a avant
							   pstr3[0]='\0';
                 printf("%s", pstr1);
								 end=1;
							}
							else //pas de commentaire, on reconduit
							{  printf("%s", pstr1);
								 end=1;
							}
					 }
       }
  }

   return(0);
}
//=========================================================