Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
ChangeLog	709 B	-rw-r--r--
Makefile	15.25 KB	-rw-r--r--
Makefile.am	1.39 KB	-rw-r--r--
Makefile.examples	1.86 KB	-rw-r--r--
Makefile.in	14.65 KB	-rw-r--r--
README	349 B	-rw-r--r--
cat.lex	849 B	-rw-r--r--
dates.lex	2.8 KB	-rw-r--r--
datetest.dat	343 B	-rw-r--r--
eof_rules.lex	1.3 KB	-rw-r--r--
eof_test01.txt	367 B	-rw-r--r--
eof_test02.txt	104 B	-rw-r--r--
eof_test03.txt	87 B	-rw-r--r--
expr.lex	619 B	-rw-r--r--
expr.y	988 B	-rw-r--r--
front.lex	1.21 KB	-rw-r--r--
front.y	2.58 KB	-rw-r--r--
j2t.lex	12.06 KB	-rw-r--r--
myname.lex	287 B	-rw-r--r--
myname.txt	170 B	-rw-r--r--
myname2.lex	443 B	-rw-r--r--
numbers.lex	4.96 KB	-rw-r--r--
pas_include.lex	1.63 KB	-rw-r--r--
pascal.lex	3.12 KB	-rw-r--r--
reject.lex	245 B	-rw-r--r--
replace.lex	529 B	-rw-r--r--
string1.lex	2.5 KB	-rw-r--r--
string2.lex	3 KB	-rw-r--r--
strtest.dat	733 B	-rw-r--r--
unput.lex	429 B	-rw-r--r--
user_act.lex	303 B	-rw-r--r--
userinit.lex	514 B	-rw-r--r--
wc.lex	2.67 KB	-rw-r--r--
yymore.lex	566 B	-rw-r--r--
yymore2.lex	720 B	-rw-r--r--
yymoretest.dat	115 B	-rw-r--r--

Code Editor : string2.lex

/*
 * string2.lex: An example of using scanning strings
 *              by using start states.
 */

%{
#include <ctype.h>
#include <malloc.h>

#define isodigit(x) ((x) >= '0' && (x) <= '7') 
#define hextoint(x) (isdigit((x)) ? (x) - '0' : ((x) - 'A') + 10)

char *buffer      = NULL;
int  buffer_size  = 0;

void yyerror(char *message)
{
  printf("\nError: %s\n",message);
}

%x STRING

hex (x|X)[0-9a-fA-F]{1,2}
oct [0-7]{1,3}

\"                 { 
                     buffer      = malloc(1); 
                     buffer_size = 1; strcpy(buffer,"");
                     BEGIN(STRING);
                   }
<STRING>\n         {
                      yyerror("Unterminated string");       
                      free(buffer);
                      BEGIN(INITIAL);
                   }
<STRING><<EOF>>    {
                      yyerror("EOF in string");       
                      free(buffer);
                      BEGIN(INITIAL);
                   }
<STRING>[^\\\n"]   {
                     buffer = realloc(buffer,buffer_size+yyleng+1);
                     buffer_size += yyleng;
                     strcat(buffer,yytext);
                   }
<STRING>\\\n       /* ignore this */
<STRING>\\{hex}    {
                     int temp =0,loop = 0;
                     for(loop=yyleng-2; loop>0; loop--){
                       temp  <<= 4;
                       temp  += hextoint(toupper(yytext[yyleng-loop]));
                     } 
                     buffer = realloc(buffer,buffer_size+1);
                     buffer[buffer_size-1] = temp;
                     buffer[buffer_size]   = '\0';
                     buffer_size += 1;
                   }
<STRING>\\{oct}    {
                     int temp =0,loop = 0;
                     for(loop=yyleng-1; loop>0; loop--){
                       temp  <<= 3;
                       temp  += (yytext[yyleng-loop] - '0');
                     } 
                     buffer = realloc(buffer,buffer_size+1);
                     buffer[buffer_size-1] = temp;
                     buffer[buffer_size]   = '\0';
                     buffer_size += 1;
                   }
<STRING>\\[^\n]    {
                     buffer = realloc(buffer,buffer_size+1);
                     switch(yytext[yyleng-1]){
                     case 'b' : buffer[buffer_size-1] = '\b';  break;
                     case 't' : buffer[buffer_size-1] = '\t';  break;
                     case 'n' : buffer[buffer_size-1] = '\n';  break;
                     case 'v' : buffer[buffer_size-1] = '\v';  break;
                     case 'f' : buffer[buffer_size-1] = '\f';  break;
                     case 'r' : buffer[buffer_size-1] = '\r';  break;
                     default  : buffer[buffer_size-1] = yytext[yyleng-1];
                     }
                     buffer[buffer_size] = '\0';
                     buffer_size += 1;
                   }
<STRING>\"         {
                     printf("string = \"%s\"",buffer); 
                     free(buffer);
                     BEGIN(INITIAL);
                   }
%%

${this.title}

Code Editor : string2.lex