[Antiright-devel] antiright/gtkshell guidl.lex guidl.y

[Jeffrey Bedard]

CVSROOT:        /sources/antiright
Module name:    antiright
Changes by:     Jeffrey Bedard <jefbed> 07/04/09 15:27:47

Modified files:
        gtkshell       : guidl.lex guidl.y 

Log message:
        Added grammar definition for dialog support.  

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/antiright/gtkshell/guidl.lex?cvsroot=antiright&r1=1.6&r2=1.7
http://cvs.savannah.gnu.org/viewcvs/antiright/gtkshell/guidl.y?cvsroot=antiright&r1=1.9&r2=1.10

Patches:
Index: guidl.lex
===================================================================
RCS file: /sources/antiright/antiright/gtkshell/guidl.lex,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- guidl.lex   8 Apr 2007 23:44:03 -0000       1.6
+++ guidl.lex   9 Apr 2007 15:27:47 -0000       1.7
@@ -29,6 +29,7 @@
 echo           return TOKEN_ECHO;
 text           return TEXT;
 separator      return SEPARATOR;
+dialog         return DIALOG;
 
 [ \t\n]                /* ignore */;
 "//".*$                /* comment */;

Index: guidl.y
===================================================================
RCS file: /sources/antiright/antiright/gtkshell/guidl.y,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -b -r1.9 -r1.10
--- guidl.y     9 Apr 2007 15:12:59 -0000       1.9
+++ guidl.y     9 Apr 2007 15:27:47 -0000       1.10
@@ -59,7 +59,7 @@
 %token IFS SC COMMA OPTION PROMPT VIEWER LABEL
 %token BUTTON END ADD UPDATING PROGRESS BUTTONS
 %token TERMINAL WINDOW TOKEN_ECHO TEXT SEPARATOR
-%token ROW
+%token ROW DIALOG
 %token <string> STRING
 %token <number> NUM
 %%
@@ -74,6 +74,8 @@
 |
 add
 |
+dialog
+|
 TOKEN_ECHO STRING
 {
        puts($2);
@@ -81,6 +83,50 @@
 }
 ;
 
+dialog:
+DIALOG STRING
+{
+       gchar * option_string=NULL;
+       if(!strcmp($2, "file"))
+               option_string=g_strdup("-df");
+       else if(!strcmp($2, "font"))
+               option_string=g_strdup("-dF");
+       else if(!strcmp($2, "about"))
+               option_string=g_strdup("-da");
+       else if(!strcmp($2, "folder"))
+               option_string=g_strdup("-dd");
+       else if(!strcmp($2, "create folder"))
+               option_string=g_strdup("-dD");
+       else if(!strcmp($2, "save"))
+               option_string=g_strdup("-ds");
+       else if(!strcmp($2, "color"))
+               option_string=g_strdup("-dc");
+       else
+               ARERR("unknown dialog type");
+
+       ARPASSERT(option_string);
+       gsh_append_arg(option_string);
+}
+|
+DIALOG STRING STRING
+{
+       gchar * option_string=NULL;
+
+       if(!strcmp($2, "info"))
+               option_string=g_strdup("-di");
+       else if(!strcmp($2, "warning"))
+               option_string=g_strdup("-dw");
+       else if(!strcmp($2, "error"))
+               option_string=g_strdup("-de");
+       else
+               ARERR("unknown dialog type");
+
+       ARPASSERT(option_string);
+       gsh_guidl_add(option_string, $3);
+       g_free(option_string);
+}
+;
+
 option:
 OPTION STRING
 {