diff options
Diffstat (limited to 'nx-X11/programs/Xserver/hw/dmx/config/scanner.l')
| -rw-r--r-- | nx-X11/programs/Xserver/hw/dmx/config/scanner.l | 183 |
1 files changed, 183 insertions, 0 deletions
diff --git a/nx-X11/programs/Xserver/hw/dmx/config/scanner.l b/nx-X11/programs/Xserver/hw/dmx/config/scanner.l new file mode 100644 index 000000000..ec450243a --- /dev/null +++ b/nx-X11/programs/Xserver/hw/dmx/config/scanner.l @@ -0,0 +1,183 @@ +/* $XFree86$ */ +/* + * Copyright 2002 Red Hat Inc., Durham, North Carolina. + * + * All Rights Reserved. + * + * Permission is hereby granted, free of charge, to any person obtaining + * a copy of this software and associated documentation files (the + * "Software"), to deal in the Software without restriction, including + * without limitation on the rights to use, copy, modify, merge, + * publish, distribute, sublicense, and/or sell copies of the Software, + * and to permit persons to whom the Software is furnished to do so, + * subject to the following conditions: + * + * The above copyright notice and this permission notice (including the + * next paragraph) shall be included in all copies or substantial + * portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + * NON-INFRINGEMENT. IN NO EVENT SHALL RED HAT AND/OR THEIR SUPPLIERS + * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN + * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN + * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + */ + +/* + * Authors: + * Rickard E. (Rik) Faith <faith@redhat.com> + * + */ + +%{ +#ifdef HAVE_DMX_CONFIG_H +#include <dmx-config.h> +#endif + +#include "dmxparse.h" +#include "parser.h" +#include <string.h> +#include <ctype.h> +static int getdimension(int token, const char *text, int leng); +static int getstring(int token, const char *text, int leng); +static int gettoken(int token, const char *text, int leng); +static int getcomment(int token, const char *text, int leng); +static int lineno = 1; +%} +%s OTHER +comment #.* +word ([[:alpha:]_/:\-\+\.\*][[:alnum:]_/:\-\+\.\*]+) +string \"(([^\"\n])|\"\")*\" +badstring \"(([^\"\n])|\"\")* +number [[:digit:]x]+ +dimension [[:digit:]]+[[:blank:]]*x[[:blank:]]*[[:digit:]]+ +offset [+-][[:digit:]]+[[:blank:]]*[+-][[:blank:]]*[[:digit:]]+ +origin @[[:blank:]]*[[:digit:]]+[[:blank:]]*[[:blank:]]*x[[:digit:]]+ +NL \n +WS [[:blank:]]+ +%% +virtual return gettoken(T_VIRTUAL, yytext, yyleng); +display return gettoken(T_DISPLAY, yytext, yyleng); +wall return gettoken(T_WALL, yytext, yyleng); +option return gettoken(T_OPTION, yytext, yyleng); +param return gettoken(T_PARAM, yytext, yyleng); +{dimension} return getdimension(T_DIMENSION, yytext, yyleng); +{offset} return getdimension(T_OFFSET, yytext+1, yyleng-1); +{origin} return getdimension(T_ORIGIN, yytext+1, yyleng-1); +{word} return getstring(T_STRING, yytext, yyleng); +{string} return getstring(T_STRING, yytext+1, yyleng-2); +{NL} ++lineno; +{WS} +\{ return gettoken(yytext[0], yytext, yyleng); +\} return gettoken(yytext[0], yytext, yyleng); +\; return gettoken(yytext[0], yytext, yyleng); +\/ return gettoken(yytext[0], yytext, yyleng); +^{comment} return getcomment(T_LINE_COMMENT, yytext, yyleng); +{comment} return getcomment(T_COMMENT, yytext, yyleng); +. return getstring(T_STRING, yytext, yyleng); +<<EOF>> return 0; +%% +int yywrap(void) +{ + return 1; +} + +void yyerror(const char *message) +{ + const char *pt, *end; + struct _entry { + const char *from; + const char *to; + } *entry, list[] = { + { "T_VIRTUAL", "\"virtual\"" }, + { "T_DISPLAY", "\"display\"" }, + { "T_WALL", "\"wall\"" }, + { "T_OPTION", "\"option\"" }, + { "T_PARAM", "\"param\"" }, + { "T_DIMENSION", "dimension (e.g., 2x2 or 1024x768)" }, + { "T_OFFSET", "display offset (e.g., +10-10)" }, + { "T_ORIGIN", "tile origin (e.g., @1280x1024)" }, + { "T_STRING", "string" }, + { "T_COMMENT", "comment (e.g., #...)" }, + { "T_LINE_COMMENT", "comment (e.g., #...)" }, + { NULL, NULL } + }; + + fprintf(stderr, "parse error on line %d at token \"%*.*s\"\n", + lineno, yyleng, yyleng, yytext); + end = message + strlen(message); + for (pt = message; *pt; pt++) { + if (pt[0] == 'T' && pt[1] == '_') { + const char *next = strchr(pt, ' '); + if (!next || !*next) next = strchr(pt, '\0'); + if (!next) goto bail; + --next; + if (next-pt == 1 && next[1] + && next[2] == '\'' && next[3] == '\'') { + fprintf(stderr, "\"%c\"", next[1]); + pt += 4; + goto cnt; + } + for (entry = list; entry->from; ++entry) { + if (!strncmp(entry->from, pt, strlen(entry->from))) { + fprintf(stderr, "%s", entry->to); + pt = next; + goto cnt; + } + } + } else if (end-pt >= 5 && pt[0] == '\'' && pt[1] == '\'' && pt[3] + && pt[4] == '\'' && pt[5] == '\'') { + fprintf(stderr, "\"%c\"", pt[3]); + pt += 5; + } else if (end-pt >= 3 && pt[0] == '\'' && pt[1] && pt[2] == '\'') { + fprintf(stderr, "\"%c\"", pt[1]); + pt += 3; + } + bail: + putc(*pt, stderr); + cnt: + ; + } + fprintf(stderr, "\n"); + exit( 1 ); +} + +static int getdimension(int token, const char *text, int leng) +{ + char *endptr; + char *tmp = dmxConfigAlloc(leng+1); + int x, y; + + strncpy(tmp, text, leng); + x = strtol(tmp, &endptr, 10); + while (*endptr && !isdigit(*endptr)) ++endptr; + y = strtol(endptr, NULL, 10); + dmxConfigFree(tmp); + yylval.pair = dmxConfigCreatePair(token, lineno, NULL, x, y, 1, 1); + return token; +} + +static int getstring(int token, const char *text, int leng) +{ + yylval.string = dmxConfigCreateString(token, lineno, NULL, + dmxConfigCopyString(leng ? text : "", + leng)); + return token; +} + +static int gettoken(int token, const char *text, int leng) +{ + yylval.token = dmxConfigCreateToken(token, lineno, NULL); + return token; +} + +static int getcomment(int token, const char *text, int leng) +{ + yylval.comment = dmxConfigCreateComment(token, lineno, + dmxConfigCopyString(text + 1, + leng - 1)); + return token; +} |