From b31d20a0ceb07eec113f03a14769fbd162fb8cf1 Mon Sep 17 00:00:00 2001
From: "Glenn Y. Rolland" <glenux@glenux.net>
Date: Thu, 9 Apr 2009 16:47:28 +0000
Subject: [PATCH] sshfs-mapper: updated lexer/parser and demo file.

git-svn-id: https://websvn.glenux.net/svn/Upoc/sshfs-mapper/trunk@1330 eaee96b3-f302-0410-b096-c6cfd47f7835
---
 demo.map    | 12 ++++-------
 mapparser.y | 62 ++++++++++++++++++++++++++++++++---------------------
 2 files changed, 41 insertions(+), 33 deletions(-)

diff --git a/demo.map b/demo.map
index 724f0fb..0c614db 100644
--- a/demo.map
+++ b/demo.map
@@ -2,31 +2,27 @@
 server "daneel.glenux.net" {
 	user "glenux";
 	port 22;
-	automount true; // default
-	compress true; // default
+	automount true;
+	compress true;
 
 	map "Media" { 
-		user "glenux";
 		remote "/opt/media";
 	};
 
 	map "MediaSafe" {
-		user $USER;
 		remote "/home/media";
 	};
 
 	map "Documents" {
-		user $USER;
 		remote "/home/$USER";
 	};
 
 	map "Extra" {
-		user $USER;
-		remote "/opt
+		remote "/opt";
 	};
 
 	map "DocumentsPapa" {
-		user papa;
+		user "papa";
 		remote "/home/papa"
 	};
 
diff --git a/mapparser.y b/mapparser.y
index e3687a6..a720af0 100644
--- a/mapparser.y
+++ b/mapparser.y
@@ -3,49 +3,63 @@ class MapParser
 rule
 
 commands 
-	: commands command SEMICOLON { puts "GOT A COMMAND" }
-	| /* none */ { result =  0 }
+	: commands command_blk SEMICOLON { puts "GOT A COMMAND" }
+	| /* none */ { puts "no command found" }
 
-command 
+command_blk
 	: global_blk
 	| server_blk
 
 server_blk
-	: SERVER SEP STRING SEP OBRACE server_opts EBRACE
-	: SERVER SEP STRING OBRACE server_opts EBRACE
+	: SERVER STRING OBRACE server_opts EBRACE { puts "[server #{val[1]}]" }
 
 global_blk
 	: GLOBAL OBRACE global_opts EBRACE
 
 server_opts 
 	: server_opts server_opt SEMICOLON
-	| /* none */ { result = 0 }
+	| /* none */
 
 server_opt 
-	: user_opt 
-	|	port_opt
-	|	automount_opt
-	|	compress_opt
-	|	reconnect_opt
+	: user_opt { puts "=> user opt" }
+	| port_opt { puts "=> port opt" }
+	| automount_opt { puts "=> automount opt" }
+	| compress_opt { puts "=> compress opt" }
+	| reconnect_opt { puts "=> reconnect opt" }
+	| server_map_blk { puts "=> server_map blk" }
+
+server_map_blk
+	: MAP STRING OBRACE server_map_opts EBRACE
+
+server_map_opts
+	: server_map_opts server_map_opt SEMICOLON
+	| /* none */
+	
+server_map_opt
+	: remote_opt
+	| local_opt
+	| user_opt
+	| port_opt
+	| compress_opt
 
 user_opt 
-	: USER QUOTE STRING QUOTE
+	: USER STRING { puts "* user = #{val[1]}" }
 
 port_opt 
-	: PORT INTEGER
+	: PORT NUMBER { puts "* port = #{val[1]}" }
 
 automount_opt 
-	: AUTOMOUNT boolean { puts ( "AUTOMOUNT => " + val[1] ) }
+	: AUTOMOUNT boolean { puts "* automount = #{@bool_result}" }
 
 compress_opt 
-	: COMPRESS boolean { puts ( "COMPRESS => " + val[1] ) }
+	: COMPRESS boolean { puts "* compress = #{@bool_result}" }
 
 reconnect_opt 
-	: RECONNECT boolean { puts ( "RECONNECT => " + val[1] ) }
+	: RECONNECT boolean { puts ( "* reconnect = #{@bool_result}" ) }
 
 boolean
-	: BOOL_TRUE { result = true }
-	| BOOL_FALSE { result = false }
+	: BOOL_TRUE { @bool_result = true }
+	| BOOL_FALSE { @bool_result = false }
 
 end
 
@@ -61,27 +75,25 @@ require 'strscan'
 	def parse( str )
 		puts "parse start..."
 		tokens = []
+
 		scanner = StringScanner.new( str )
 		puts ( "scanner?" + scanner.string )
-
 		
 		until scanner.eos?
 			puts "scanning.. at #{scanner.pos}"
 			case
 				when m = scanner.scan( /\/\/.*$/ )
 					# comments
-					tokens.push [:SEP, m]
 				when m = scanner.scan( /(\s+|\n)/ )
 					# whitespace and newlines
-					tokens.push [:SEP, m]
-				when m = scanner.scan( /;/ )
-					 tokens.push [:SEMICOLON, m]
-				when m = scanner.scan( /\d+/ )
-					 tokens.push [:NUMBER, m]
 				when m = scanner.scan( /\{/ )
 					tokens.push [:OBRACE, m]
 				when m = scanner.scan( /\}/ )
 					tokens.push [:EBRACE, m]
+				when m = scanner.scan( /;/ )
+					tokens.push [:SEMICOLON, m]
+				when m = scanner.scan( /\d+/ )
+					tokens.push [:NUMBER, m]
 				when m = scanner.scan( /user/i )
 					tokens.push [:USER, m]
 				when m = scanner.scan( /automount/i )