/* Generated by re2c */
#line 1 "strip_001.re"
// re2c $INPUT -o $OUTPUT -s
/* re2c lesson 002_strip_comments, strip_001, (c) M. Boerger 2006 - 2007 */
#line 32 "strip_001.re"


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

#line 13 "strip_001.c"
#define YYMAXFILL 2
#line 38 "strip_001.re"

#define	BSIZE	128

#if BSIZE < YYMAXFILL
# error BSIZE must be greater YYMAXFILL
#endif

#define	YYCTYPE		unsigned char
#define	YYCURSOR	s.cur
#define	YYLIMIT		s.lim
#define	YYFILL(n)	{ if ((res = fill(&s, n)) >= 0) break; }

typedef struct Scanner
{
	FILE			*fp;
	unsigned char	*cur, *tok, *lim, *eof;
	unsigned char 	buffer[BSIZE];
} Scanner;

int fill(Scanner *s, int len)
{
	if (!len)
	{
		s->cur = s->tok = s->lim = s->buffer;
		s->eof = 0;
	}
	if (!s->eof)
	{
		int got, cnt = s->tok - s->buffer;

		if (cnt > 0)
		{
			memcpy(s->buffer, s->tok, s->lim - s->tok);
			s->tok -= cnt;
			s->cur -= cnt;
			s->lim -= cnt;
		}
		cnt = BSIZE - cnt;
		if ((got = fread(s->lim, 1, cnt, s->fp)) != cnt)
		{
			s->eof = &s->lim[got];
		}
		s->lim += got;
	}
	else if (s->cur + len > s->eof)
	{
		return 0; /* not enough input data */
	}
	return -1;
}

int scan(FILE *fp)
{
	int  res = 0;
    Scanner s;

	if (!fp)
	{
		return 1; /* no file was opened */
	}

    s.fp = fp;
	
	fill(&s, 0);

	for(;;)
	{
		s.tok = s.cur;

#line 85 "strip_001.c"
		{
			YYCTYPE yych;
			if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
			yych = *YYCURSOR;
			if (yych == '/') goto yy2;
			++YYCURSOR;
yy1:
#line 114 "strip_001.re"
			{ fputc(*s.tok, stdout); continue; }
#line 95 "strip_001.c"
yy2:
			yych = *++YYCURSOR;
			if (yych == '*') goto yy3;
			if (yych == '/') goto yy4;
			goto yy1;
yy3:
			++YYCURSOR;
#line 113 "strip_001.re"
			{ goto comment; }
#line 105 "strip_001.c"
yy4:
			++YYCURSOR;
#line 112 "strip_001.re"
			{ goto cppcomment; }
#line 110 "strip_001.c"
		}
#line 115 "strip_001.re"

comment:
		s.tok = s.cur;

#line 117 "strip_001.c"
		{
			YYCTYPE yych;
			if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
			yych = *YYCURSOR;
			if (yych == '*') goto yy7;
			++YYCURSOR;
yy6:
#line 120 "strip_001.re"
			{ goto comment; }
#line 127 "strip_001.c"
yy7:
			yych = *++YYCURSOR;
			if (yych != '/') goto yy6;
			++YYCURSOR;
#line 119 "strip_001.re"
			{ continue; }
#line 134 "strip_001.c"
		}
#line 121 "strip_001.re"

cppcomment:
		s.tok = s.cur;

#line 141 "strip_001.c"
		{
			YYCTYPE yych;
			if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
			yych = *YYCURSOR;
			if (yych == '\n') goto yy10;
			if (yych == '\r') goto yy11;
			++YYCURSOR;
yy9:
#line 126 "strip_001.re"
			{ goto cppcomment; }
#line 152 "strip_001.c"
yy10:
			++YYCURSOR;
#line 125 "strip_001.re"
			{ fwrite(s.tok, 1, s.cur - s.tok, stdout); continue; }
#line 157 "strip_001.c"
yy11:
			yych = *++YYCURSOR;
			if (yych == '\n') goto yy10;
			goto yy9;
		}
#line 127 "strip_001.re"

	}

	if (fp != stdin)
	{
		fclose(fp); /* close only if not stdin */
	}
	return res; /* return result */
}

int main(int argc, char **argv)
{
	if (argc > 1)
	{
		return scan(!strcmp(argv[1], "-") ? stdin : fopen(argv[1], "r"));
	}
	else
	{
		fprintf(stderr, "%s <expr>\n", argv[0]);
		return 1;
	}
}
