diff options
Diffstat (limited to 'src/xine-utils/xmllexer.c')
| -rw-r--r-- | src/xine-utils/xmllexer.c | 405 |
1 files changed, 405 insertions, 0 deletions
diff --git a/src/xine-utils/xmllexer.c b/src/xine-utils/xmllexer.c new file mode 100644 index 000000000..4a150a0b0 --- /dev/null +++ b/src/xine-utils/xmllexer.c @@ -0,0 +1,405 @@ +/* + * Copyright (C) 2002 the xine project + * + * This file is part of xine, a free video player. + * + * xine is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * xine is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA + * + * $Id: xmllexer.c,v 1.1 2002/05/01 19:41:55 guenter Exp $ + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "xmllexer.h" +#include <stdio.h> +#include <ctype.h> +#include <string.h> + +/* private constants*/ +#define NORMAL 0 /* normal lex mode */ +#define DATA 1 /* data lex mode */ + +/* +#define LOG +*/ + +/* private global variables */ +char * lexbuf; +int lexbuf_size = 0; +int lexbuf_pos = 0; +int lex_mode = NORMAL; + +void lexer_init(char * buf, int size) { + lexbuf = buf; + lexbuf_size = size; + lexbuf_pos = 0; + lex_mode = NORMAL; +#ifdef LOG + printf("xmllexer: buffer length %d\n", size); +#endif +} + +int lexer_get_token(char * tok, int tok_size) { + int tok_pos = 0; + int state = 0; + char c; + + if (tok) { + while ((tok_pos < tok_size) && (lexbuf_pos < lexbuf_size)) { + c = lexbuf[lexbuf_pos]; +#ifdef LOG + printf("xmllexer: c=%c, state=%d\n", c, state); +#endif + if (lex_mode == NORMAL) { + /* normal mode */ + switch (state) { + /* init state */ + case 0: + switch (c) { + case '\n': + case '\r': + state = 1; + tok[tok_pos] = c; + tok_pos++; + break; + + case ' ': + case '\t': + state = 2; + tok[tok_pos] = c; + tok_pos++; + break; + + case '<': + state = 3; + tok[tok_pos] = c; + tok_pos++; + break; + + case '>': + state = 4; + tok[tok_pos] = c; + tok_pos++; + break; + + case '/': + state = 5; + tok[tok_pos] = c; + tok_pos++; + break; + + case '=': + state = 6; + tok[tok_pos] = c; + tok_pos++; + break; + + case '\"': + state = 7; + break; + + case '-': + state = 10; + tok[tok_pos] = c; + tok_pos++; + break; + + case '?': + state = 9; + tok[tok_pos] = c; + tok_pos++; + break; + + default: + state = 100; + tok[tok_pos] = c; + tok_pos++; + break; + } + lexbuf_pos++; + break; + + /* end of line */ + case 1: + if (c == '\n' || (c == '\r')) { + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; + } else { + tok[tok_pos] = '\0'; + return T_EOL; + } + break; + + /* T_SEPAR */ + case 2: + if (c == ' ' || (c == '\t')) { + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; + } else { + tok[tok_pos] = '\0'; + return T_SEPAR; + } + break; + + /* T_M_START < or </ or <! or <? */ + case 3: + switch (c) { + case '/': + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; /* FIXME */ + tok[tok_pos] = '\0'; + return T_M_START_2; + break; + case '!': + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; + state = 8; + break; + case '?': + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; /* FIXME */ + tok[tok_pos] = '\0'; + return T_TI_START; + break; + default: + tok[tok_pos] = '\0'; + return T_M_START_1; + } + break; + + /* T_M_STOP_1 */ + case 4: + tok[tok_pos] = '\0'; + lex_mode = DATA; + return T_M_STOP_1; + break; + + /* T_M_STOP_2 */ + case 5: + if (c == '>') { + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; /* FIXME */ + tok[tok_pos] = '\0'; + lex_mode = DATA; + return T_M_STOP_2; + } else { + tok[tok_pos] = '\0'; + return T_ERROR; + } + break; + + /* T_EQUAL */ + case 6: + tok[tok_pos] = '\0'; + return T_EQUAL; + break; + + /* T_STRING */ + case 7: + tok[tok_pos] = c; + lexbuf_pos++; + if (c == '\"') { + tok[tok_pos] = '\0'; /* FIXME */ + return T_STRING; + } + tok_pos++; + break; + + /* T_C_START or T_DOCTYPE_START */ + case 8: + switch (c) { + case '-': + lexbuf_pos++; + if (lexbuf[lexbuf_pos] == '-') + { + lexbuf_pos++; + tok[tok_pos++] = '-'; /* FIXME */ + tok[tok_pos++] = '-'; + tok[tok_pos] = '\0'; + return T_C_START; + } + break; + case 'D': + lexbuf_pos++; + if (strncmp(lexbuf + lexbuf_pos, "OCTYPE", 6) == 0) { + strncpy(tok + tok_pos, "DOCTYPE", 7); /* FIXME */ + lexbuf_pos += 6; + return T_DOCTYPE_START; + } else { + return T_ERROR; + } + break; + default: + /* error */ + return T_ERROR; + } + break; + + /* T_TI_STOP */ + case 9: + if (c == '>') { + tok[tok_pos] = c; + lexbuf_pos++; + tok_pos++; /* FIXME */ + tok[tok_pos] = '\0'; + return T_TI_STOP; + } else { + tok[tok_pos] = '\0'; + return T_ERROR; + } + break; + + /* -- */ + case 10: + switch (c) { + case '-': + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + state = 11; + break; + default: + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + state = 100; + } + break; + + /* --> */ + case 11: + switch (c) { + case '>': + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + tok[tok_pos] = '\0'; /* FIX ME */ + if (strlen(tok) != 3) { + tok[tok_pos - 3] = '\0'; + lexbuf_pos -= 3; + return T_IDENT; + } else { + return T_C_STOP; + } + break; + default: + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + state = 100; + } + break; + + /* IDENT */ + case 100: + switch (c) { + case '<': + case '>': + case '\\': + case '\"': + case ' ': + case '\t': + case '=': + tok[tok_pos] = '\0'; + return T_IDENT; + break; + case '?': + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + state = 9; + break; + case '-': + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + state = 10; + break; + default: + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + } + break; + default: + printf("xmllexer: expected char \'%c\'\n", tok[tok_pos - 1]); /* FIX ME */ + return T_ERROR; + } + } else { + /* data mode, stop if char equal '<' */ + if (c == '<') { + tok[tok_pos] = '\0'; + lex_mode = NORMAL; + return T_DATA; + } else { + tok[tok_pos] = c; + tok_pos++; + lexbuf_pos++; + } + } + } + /* pb */ + if (tok_pos >= tok_size) { + printf("xmllexer: token buffer is too little\n"); + } else { + if (lexbuf_pos >= lexbuf_size) { + /* Terminate the current token */ + tok[tok_pos] = '\0'; + switch (state) { + case 0: + case 1: + case 2: + return T_EOF; + break; + case 3: + return T_M_START_1; + break; + case 4: + return T_M_STOP_1; + break; + case 5: + return T_ERROR; + break; + case 6: + return T_EQUAL; + break; + case 7: + return T_STRING; + break; + case 100: + return T_DATA; + break; + default: + printf("xmllexer: unknown state, state=%d\n", state); + } + } else { + printf("xmllexer: abnormal end of buffer, state=%d\n", state); + } + } + return T_ERROR; + } + /* tok == null */ + printf("xmllexer: token buffer is null\n"); + return T_ERROR; +} |