Annotation of embedaddon/libxml2/testAutomata.c, revision 1.1.1.2

1.1       misho       1: /*
                      2:  * testRegexp.c: simple module for testing regular expressions
                      3:  *
                      4:  * See Copyright for the status of this software.
                      5:  *
                      6:  * Daniel Veillard <veillard@redhat.com>
                      7:  */
                      8: 
                      9: #include "libxml.h"
                     10: #ifdef LIBXML_AUTOMATA_ENABLED
                     11: #include <string.h>
                     12: 
                     13: #include <libxml/tree.h>
                     14: #include <libxml/xmlautomata.h>
                     15: 
                     16: static int scanNumber(char **ptr) {
                     17:     int ret = 0;
                     18:     char *cur;
                     19: 
                     20:     cur = *ptr;
                     21:     while ((*cur >= '0') && (*cur <= '9')) {
                     22:        ret = ret * 10 + (*cur - '0');
                     23:        cur++;
                     24:     }
                     25:     *ptr = cur;
                     26:     return(ret);
                     27: }
                     28: 
                     29: static void
                     30: testRegexpFile(const char *filename) {
                     31:     FILE *input;
                     32:     char expr[5000];
                     33:     int len;
                     34:     int ret;
                     35:     int i;
                     36:     xmlAutomataPtr am;
                     37:     xmlAutomataStatePtr states[1000];
                     38:     xmlRegexpPtr regexp = NULL;
                     39:     xmlRegExecCtxtPtr exec = NULL;
                     40: 
                     41:     for (i = 0;i<1000;i++)
                     42:        states[i] = NULL;
                     43: 
                     44:     input = fopen(filename, "r");
                     45:     if (input == NULL) {
                     46:         xmlGenericError(xmlGenericErrorContext,
                     47:                "Cannot open %s for reading\n", filename);
                     48:        return;
                     49:     }
                     50: 
                     51:     am = xmlNewAutomata();
                     52:     if (am == NULL) {
                     53:         xmlGenericError(xmlGenericErrorContext,
                     54:                "Cannot create automata\n");
                     55:        fclose(input);
                     56:        return;
                     57:     }
                     58:     states[0] = xmlAutomataGetInitState(am);
                     59:     if (states[0] == NULL) {
                     60:         xmlGenericError(xmlGenericErrorContext,
                     61:                "Cannot get start state\n");
                     62:        xmlFreeAutomata(am);
                     63:        fclose(input);
                     64:        return;
                     65:     }
                     66:     ret = 0;
                     67: 
                     68:     while (fgets(expr, 4500, input) != NULL) {
                     69:        if (expr[0] == '#')
                     70:            continue;
                     71:        len = strlen(expr);
                     72:        len--;
1.1.1.2 ! misho      73:        while ((len >= 0) &&
1.1       misho      74:               ((expr[len] == '\n') || (expr[len] == '\t') ||
                     75:                (expr[len] == '\r') || (expr[len] == ' '))) len--;
1.1.1.2 ! misho      76:        expr[len + 1] = 0;
1.1       misho      77:        if (len >= 0) {
                     78:            if ((am != NULL) && (expr[0] == 't') && (expr[1] == ' ')) {
                     79:                char *ptr = &expr[2];
                     80:                int from, to;
                     81: 
                     82:                from = scanNumber(&ptr);
                     83:                if (*ptr != ' ') {
                     84:                    xmlGenericError(xmlGenericErrorContext,
                     85:                            "Bad line %s\n", expr);
                     86:                    break;
                     87:                }
                     88:                if (states[from] == NULL)
                     89:                    states[from] = xmlAutomataNewState(am);
                     90:                ptr++;
                     91:                to = scanNumber(&ptr);
                     92:                if (*ptr != ' ') {
                     93:                    xmlGenericError(xmlGenericErrorContext,
                     94:                            "Bad line %s\n", expr);
                     95:                    break;
                     96:                }
                     97:                if (states[to] == NULL)
                     98:                    states[to] = xmlAutomataNewState(am);
                     99:                ptr++;
                    100:                xmlAutomataNewTransition(am, states[from], states[to],
                    101:                                         BAD_CAST ptr, NULL);
                    102:            } else if ((am != NULL) && (expr[0] == 'e') && (expr[1] == ' ')) {
                    103:                char *ptr = &expr[2];
                    104:                int from, to;
                    105: 
                    106:                from = scanNumber(&ptr);
                    107:                if (*ptr != ' ') {
                    108:                    xmlGenericError(xmlGenericErrorContext,
                    109:                            "Bad line %s\n", expr);
                    110:                    break;
                    111:                }
                    112:                if (states[from] == NULL)
                    113:                    states[from] = xmlAutomataNewState(am);
                    114:                ptr++;
                    115:                to = scanNumber(&ptr);
                    116:                if (states[to] == NULL)
                    117:                    states[to] = xmlAutomataNewState(am);
                    118:                xmlAutomataNewEpsilon(am, states[from], states[to]);
                    119:            } else if ((am != NULL) && (expr[0] == 'f') && (expr[1] == ' ')) {
                    120:                char *ptr = &expr[2];
                    121:                int state;
                    122: 
                    123:                state = scanNumber(&ptr);
                    124:                if (states[state] == NULL) {
                    125:                    xmlGenericError(xmlGenericErrorContext,
                    126:                            "Bad state %d : %s\n", state, expr);
                    127:                    break;
                    128:                }
                    129:                xmlAutomataSetFinalState(am, states[state]);
                    130:            } else if ((am != NULL) && (expr[0] == 'c') && (expr[1] == ' ')) {
                    131:                char *ptr = &expr[2];
                    132:                int from, to;
                    133:                int min, max;
                    134: 
                    135:                from = scanNumber(&ptr);
                    136:                if (*ptr != ' ') {
                    137:                    xmlGenericError(xmlGenericErrorContext,
                    138:                            "Bad line %s\n", expr);
                    139:                    break;
                    140:                }
                    141:                if (states[from] == NULL)
                    142:                    states[from] = xmlAutomataNewState(am);
                    143:                ptr++;
                    144:                to = scanNumber(&ptr);
                    145:                if (*ptr != ' ') {
                    146:                    xmlGenericError(xmlGenericErrorContext,
                    147:                            "Bad line %s\n", expr);
                    148:                    break;
                    149:                }
                    150:                if (states[to] == NULL)
                    151:                    states[to] = xmlAutomataNewState(am);
                    152:                ptr++;
                    153:                min = scanNumber(&ptr);
                    154:                if (*ptr != ' ') {
                    155:                    xmlGenericError(xmlGenericErrorContext,
                    156:                            "Bad line %s\n", expr);
                    157:                    break;
                    158:                }
                    159:                ptr++;
                    160:                max = scanNumber(&ptr);
                    161:                if (*ptr != ' ') {
                    162:                    xmlGenericError(xmlGenericErrorContext,
                    163:                            "Bad line %s\n", expr);
                    164:                    break;
                    165:                }
                    166:                ptr++;
                    167:                xmlAutomataNewCountTrans(am, states[from], states[to],
                    168:                                         BAD_CAST ptr, min, max, NULL);
                    169:            } else if ((am != NULL) && (expr[0] == '-') && (expr[1] == '-')) {
                    170:                /* end of the automata */
                    171:                regexp = xmlAutomataCompile(am);
                    172:                xmlFreeAutomata(am);
                    173:                am = NULL;
                    174:                if (regexp == NULL) {
                    175:                    xmlGenericError(xmlGenericErrorContext,
                    176:                            "Failed to compile the automata");
                    177:                    break;
                    178:                }
                    179:            } else if ((expr[0] == '=') && (expr[1] == '>')) {
                    180:                if (regexp == NULL) {
                    181:                    printf("=> failed not compiled\n");
                    182:                } else {
                    183:                    if (exec == NULL)
                    184:                        exec = xmlRegNewExecCtxt(regexp, NULL, NULL);
                    185:                    if (ret == 0) {
                    186:                        ret = xmlRegExecPushString(exec, NULL, NULL);
                    187:                    }
                    188:                    if (ret == 1)
                    189:                        printf("=> Passed\n");
                    190:                    else if ((ret == 0) || (ret == -1))
                    191:                        printf("=> Failed\n");
                    192:                    else if (ret < 0)
                    193:                        printf("=> Error\n");
                    194:                    xmlRegFreeExecCtxt(exec);
                    195:                    exec = NULL;
                    196:                }
                    197:                ret = 0;
                    198:            } else if (regexp != NULL) {
                    199:                if (exec == NULL)
                    200:                    exec = xmlRegNewExecCtxt(regexp, NULL, NULL);
                    201:                ret = xmlRegExecPushString(exec, BAD_CAST expr, NULL);
                    202:            } else {
                    203:                xmlGenericError(xmlGenericErrorContext,
                    204:                        "Unexpected line %s\n", expr);
                    205:            }
                    206:        }
                    207:     }
                    208:     fclose(input);
                    209:     if (regexp != NULL)
                    210:        xmlRegFreeRegexp(regexp);
                    211:     if (exec != NULL)
                    212:        xmlRegFreeExecCtxt(exec);
                    213:     if (am != NULL)
                    214:        xmlFreeAutomata(am);
                    215: }
                    216: 
                    217: int main(int argc, char **argv) {
                    218: 
                    219:     xmlInitMemory();
                    220: 
                    221:     if (argc == 1) {
                    222:        int ret;
                    223:        xmlAutomataPtr am;
                    224:        xmlAutomataStatePtr start, cur;
                    225:        xmlRegexpPtr regexp;
                    226:        xmlRegExecCtxtPtr exec;
                    227: 
                    228:        am = xmlNewAutomata();
                    229:        start = xmlAutomataGetInitState(am);
                    230: 
                    231:        /* generate a[ba]*a */
                    232:        cur = xmlAutomataNewTransition(am, start, NULL, BAD_CAST"a", NULL);
                    233:        xmlAutomataNewTransition(am, cur, cur, BAD_CAST"b", NULL);
                    234:        xmlAutomataNewTransition(am, cur, cur, BAD_CAST"a", NULL);
                    235:        cur = xmlAutomataNewCountTrans(am, cur, NULL, BAD_CAST"a", 2, 3, NULL);
                    236:        xmlAutomataSetFinalState(am, cur);
                    237: 
                    238:        /* compile it in a regexp and free the automata */
                    239:        regexp = xmlAutomataCompile(am);
                    240:        xmlFreeAutomata(am);
                    241: 
                    242:        /* test the regexp */
                    243:        xmlRegexpPrint(stdout, regexp);
                    244:        exec = xmlRegNewExecCtxt(regexp, NULL, NULL);
                    245:        ret = xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    246:        if (ret == 1)
                    247:            printf("final\n");
                    248:        else if (ret < 0)
                    249:            printf("error\n");
                    250:        ret =xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    251:        if (ret == 1)
                    252:            printf("final\n");
                    253:        else if (ret < 0)
                    254:            printf("error\n");
                    255:        ret =xmlRegExecPushString(exec, BAD_CAST"b", NULL);
                    256:        if (ret == 1)
                    257:            printf("final\n");
                    258:        else if (ret < 0)
                    259:            printf("error\n");
                    260:        ret =xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    261:        if (ret == 1)
                    262:            printf("final\n");
                    263:        else if (ret < 0)
                    264:            printf("error\n");
                    265:        ret =xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    266:        if (ret == 1)
                    267:            printf("final\n");
                    268:        else if (ret < 0)
                    269:            printf("error\n");
                    270:        ret =xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    271:        if (ret == 1)
                    272:            printf("final\n");
                    273:        else if (ret < 0)
                    274:            printf("error\n");
                    275:        ret =xmlRegExecPushString(exec, BAD_CAST"a", NULL);
                    276:        if (ret == 1)
                    277:            printf("final\n");
                    278:        else if (ret < 0)
                    279:            printf("error\n");
                    280:        if (ret == 0) {
                    281:            ret = xmlRegExecPushString(exec, NULL, NULL);
                    282:            if (ret == 1)
                    283:                printf("final\n");
                    284:            else if (ret < 0)
                    285:                printf("error\n");
                    286:        }
                    287:        xmlRegFreeExecCtxt(exec);
                    288: 
                    289:        /* free the regexp */
                    290:        xmlRegFreeRegexp(regexp);
                    291:     } else {
                    292:        int i;
                    293: 
                    294:        for (i = 1;i < argc;i++)
                    295:            testRegexpFile(argv[i]);
                    296:     }
                    297: 
                    298:     xmlCleanupParser();
                    299:     xmlMemoryDump();
                    300:     return(0);
                    301: }
                    302: 
                    303: #else
                    304: #include <stdio.h>
                    305: int main(int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) {
                    306:     printf("%s : Automata support not compiled in\n", argv[0]);
                    307:     return(0);
                    308: }
                    309: #endif /* LIBXML_AUTOMATA_ENABLED */

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>