Changeset 9 for trunk/zoo-kernel/service_conf.l
- Timestamp:
- Sep 14, 2010, 2:04:55 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/zoo-kernel/service_conf.l
r1 r9 124 124 /*====================================================*/ 125 125 attname [a-zA-Z0-9_\-]+ 126 attvalue1 [ a-zA-Z0-9_\-.:" "\"\'/\\\(\)]+126 attvalue1 [\*\+,;@a-zA-Z0-9_\-::.:" "\"\'/\\\(\)]+ 127 127 128 128 … … 159 159 {newline}+{whitesp}* { if (affichetrace==1) fprintf (stderr,"\n\nNEWLINE 1\n") ; return NEWLINE;} 160 160 161 <INITIAL,HORSBALISE>"["{attname}"]" { if (affichetrace==1){ fprintf (stderr,"\n\nANID:%s\n",yytext); fprintf(stderr,"[ZOO: service_conf.l line 161 srlval.chaine=strdup(%s), srlval.chaine=%s]\n",yytext,srlval.chaine);fflush(stderr);}srlval.chaine=strdup(yytext);srlval.chaine[strlen(srlval.chaine)-1]=0;srlval.chaine+=1;if (affichetrace==1){fprintf(stderr,"[ZOO: service_conf.l line 161 srlval.chaine=strdup(%s) done]\n",yytext);fflush(stderr);}return ANID; }162 163 <INITIAL,HORSBALISE>{attname} { if (affichetrace==1){fprintf (stderr,"\n\nATT_NAME:%s\n",yytext); fprintf(stderr,"[ZOO: service_conf.l line 163 srlval.chaine=strdup(%s)]\n",yytext);fflush(stderr);}srlval.chaine=strdup(yytext); if (affichetrace==1){fprintf(stderr,"[ZOO: service_conf.l line 163 srlval.chaine=strdup(%s) done]\n",yytext);fflush(stderr);}return SPAIR; }164 165 <PAIRSTART,HORSBALISE>{attvalue1} { if (affichetrace==1){ fprintf (stderr,"\n\nATT_VALUE:%s\n",yytext);fprintf(stderr,"[ZOO: service_conf.l line 165 srlval.chaine=strdup(%s)]\n",yytext);fflush(stderr);}srlval.chaine=strdup(yytext);if (affichetrace==1){fprintf(stderr,"[ZOO: service_conf.l line 165 srlval.chaine=strdup(%s)]\n",yytext);fflush(stderr);BEGIN(INITIAL);}return EPAIR;}161 <INITIAL,HORSBALISE>"["{attname}"]" { srlval.chaine=yytext;return ANID; } 162 163 <INITIAL,HORSBALISE>{attname} { srlval.chaine=yytext; return SPAIR; } 164 165 <PAIRSTART,HORSBALISE>{attvalue1} { srlval.chaine=yytext;/*BEGIN(INITIAL);*/ return EPAIR;} 166 166 167 167 <PAIRSTART,INITIAL,HORSBALISE>{whitesp}*"="{whitesp}* { BEGIN(PAIRSTART);} 168 168 169 <PAIRSTART,INITIAL,HORSBALISE,DANSBALISE>{newline}+{whitesp}* { if (affichetrace==1) fprintf (stderr,"\n\nNEWLINE 2\n") ;BEGIN(INITIAL); return NEWLINE;}170 171 <INITIAL>"<?"[Xx][Mm][Ll] { if (attentionImpossibleDeTrouverXMLDeclapres == 1 || attentionImpossibleDeTrouverPIapres == 1) {/* il y a eut un commentaire ou une balise applicative avant la declaration xml */ fprintf(stderr,"\nerror : a la ligne %d : il y a eut un commentaire ou un PI avant la declaration xml\n",srlineno); exit (10) ; } ; if (affichetrace==1) fprintf (stderr,"\n\nSTARTXMLDECL:%s\n",srtext) ;return STARTXMLDECL;}172 173 <INITIAL>"version"{egalevolue}\"1.0\"|"version"{egalevolue}\'1.0\' { if (affichetrace==1) fprintf (stderr,"\n\nVERSIONDECL:%s\n",srtext) ;return VERSIONDECL; }169 <PAIRSTART,INITIAL,HORSBALISE,DANSBALISE>{newline}+{whitesp}* { BEGIN(INITIAL); return NEWLINE;} 170 171 <INITIAL>"<?"[Xx][Mm][Ll] { if (attentionImpossibleDeTrouverXMLDeclapres == 1 || attentionImpossibleDeTrouverPIapres == 1) {/* il y a eut un commentaire ou une balise applicative avant la declaration xml */ fprintf(stderr,"\nerror : a la ligne %d : il y a eut un commentaire ou un PI avant la declaration xml\n",srlineno); exit (10) ; } ; return STARTXMLDECL;} 172 173 <INITIAL>"version"{egalevolue}\"1.0\"|"version"{egalevolue}\'1.0\' { return VERSIONDECL; } 174 174 <INITIAL>"version"{egalevolue}\"[^"]*\"|"version"{egalevolue}\'[^']*\' {/* erreur de version encoding */ fprintf(stderr,"\nerror : a la ligne %d : la version xml n est pas reconnue : %s\n",srlineno,yytext); exit (9) ; } 175 175 176 176 177 <INITIAL>"encoding"{egalevolue}\"[Ii][Ss][Oo]"-8859-1"\"|"encoding"{egalevolue}\'[Ii][Ss][Oo]"-8859-1"\' { if (affichetrace==1) fprintf (stderr,"\n\nENCODINGDECL:%s\n",yytext) ;return ENCODINGDECL;}177 <INITIAL>"encoding"{egalevolue}\"[Ii][Ss][Oo]"-8859-1"\"|"encoding"{egalevolue}\'[Ii][Ss][Oo]"-8859-1"\' { return ENCODINGDECL;} 178 178 <INITIAL>"encoding"{egalevolue}\"[^"]*\"|"encoding"{egalevolue}\'[^']*\' {/* erreur de version encoding */ fprintf(stderr,"\nerror : a la ligne %d : la version d encodage n est pas reconnue : %s\n",srlineno,yytext); exit (8) ; } 179 179 180 180 181 <INITIAL>"standalone"{egalevolue}\"yes\"|"standalone"{egalevolue}\'yes\'|"standalone"{egalevolue}\"no\"|"standalone"{egalevolue}\'no\' { if (affichetrace==1) fprintf (stderr,"\n\nSDDECL:%s\n",yytext) ;return SDDECL;}181 <INITIAL>"standalone"{egalevolue}\"yes\"|"standalone"{egalevolue}\'yes\'|"standalone"{egalevolue}\"no\"|"standalone"{egalevolue}\'no\' { return SDDECL;} 182 182 183 183 <INITIAL>"standalone"{egalevolue}\"[^"]*\"|"standalone"{egalevolue}\'[^']*\'|"standalone"{egalevolue}\"[^"]*\"|"standalone"{egalevolue}\'[^']*\' { /* erreur de version encoding */ fprintf(stderr,"\nerror : a la ligne %d : la version standalone n est pas reconnue : %s\n",srlineno,yytext); exit (7) ; } 184 184 185 185 186 <INITIAL>"?>" { if (affichetrace==1) fprintf (stderr,"\n\nENDXMLDECL:%s\n",yytext) ;BEGIN(HORSBALISE); return ENDXMLDECL;}187 188 189 <DANSBALISE,INITIAL,HORSBALISE>{S} { if (affichetrace==1) fprintf (stderr,"\n\nS:'%s'\n",yytext) ;}190 191 192 <HORSBALISE>"<?"[Xx][Mm][Ll]{S}({S}|{chardata})*"?>"|"<?"[Xx][Mm][Ll]"?>" { if (affichetrace==1) fprintf (stderr,"\n\nPIERROR:%s\n",yytext) ;return PIERROR;}193 <INITIAL,HORSBALISE>"<?"([^xX]|([xX][^mM])|([xX][mM][^lL]))({S}|([^?]|("?"[^>])))*"?>" { attentionImpossibleDeTrouverPIapres=1 ; if (affichetrace==1) fprintf (stderr,"\n\nPI:%s\n",yytext) ;return PI;}194 195 196 <INITIAL,HORSBALISE>{newline}*"<" { if (affichetrace==1) fprintf (stderr,"\n\nINFCAR:%s\n",yytext) ;BEGIN(DANSBALISE); return INFCAR;}197 198 199 <DANSBALISE>">" { if (affichetrace==1) fprintf (stderr,"\n\nSUPCAR:%s\n",yytext) ;BEGIN(HORSBALISE);return SUPCAR;}200 201 202 <DANSBALISE>"/" { if (affichetrace==1) fprintf (stderr,"\n\nSLASH:%s\n",yytext) ;return SLASH;}203 204 205 <DANSBALISE>{egalevolue} { if (affichetrace==1) fprintf (stderr,"\n\nEq:'%s'\n",yytext) ;return Eq;}206 207 208 <DANSBALISE>{Name} { if (affichetrace==1){fprintf (stderr,"\n\nID:%s\n",yytext) ; fprintf(stderr,"[ZOO: service_conf.l line 208 srlval.chaine=strdup(%s)]\n",yytext);fflush(stderr);}srlval.s=strdup(yytext);if (affichetrace==1){fprintf(stderr,"[ZOO: service_conf.l line 208 srlval.chaine=strdup(%s)]\n",yytext);fflush(stderr);}return ID;}209 210 211 <DANSBALISE>{attvalue} { if (affichetrace==1) fprintf (stderr,"\n\nATTVALUE:%s\n",yytext) ;return ATTVALUE;}186 <INITIAL>"?>" { BEGIN(HORSBALISE); return ENDXMLDECL;} 187 188 189 <DANSBALISE,INITIAL,HORSBALISE>{S} { } 190 191 192 <HORSBALISE>"<?"[Xx][Mm][Ll]{S}({S}|{chardata})*"?>"|"<?"[Xx][Mm][Ll]"?>" { return PIERROR;} 193 <INITIAL,HORSBALISE>"<?"([^xX]|([xX][^mM])|([xX][mM][^lL]))({S}|([^?]|("?"[^>])))*"?>" { attentionImpossibleDeTrouverPIapres=1 ; return PI;} 194 195 196 <INITIAL,HORSBALISE>{newline}*"<" { BEGIN(DANSBALISE); return INFCAR;} 197 198 199 <DANSBALISE>">" { BEGIN(HORSBALISE);return SUPCAR;} 200 201 202 <DANSBALISE>"/" {return SLASH;} 203 204 205 <DANSBALISE>{egalevolue} {return Eq;} 206 207 208 <DANSBALISE>{Name} {srlval.chaine=strdup(yytext);return ID;} 209 210 211 <DANSBALISE>{attvalue} {return ATTVALUE;} 212 212 213 213 … … 215 215 216 216 217 <INITIAL,DANSBALISE,HORSBALISE>.|\n { if (affichetrace==1)fprintf(stderr,"error : ligne %d : caractere non reconnu '%s'\n",srlineno,yytext);}217 <INITIAL,DANSBALISE,HORSBALISE>.|\n {fprintf(stderr,"error : ligne %d : caractere non reconnu '%s'\n",srlineno,yytext);} 218 218 219 219 %%
Note: See TracChangeset
for help on using the changeset viewer.