Fixed persistency layer.

Now we have ODBC .. that accepts various connection string (including SQLite, MySQL,...)
  And EiffelStore+MySQL.
Updated sql scripts to work with MySQL, and SQLite.
Added a sql_statement (s: STRING): STRING that converts ROC sql statement to fit the underlying database engine.
 mostly to adapt incompatibilities such as AUTO_INCREMENT for MySQL and AUTOINCREMENT for SQLite
 by default SQL script should be written following MySQL SQL syntax.
Warning: to use ODBC persistence driver, it has to be installed on the target machine.

library/persistence/store_mysql/tests/application.e

@@ -0,0 +1,73 @@
+note
+	description : "tests application root class"
+	date        : "$Date: 2015-01-27 19:15:02 +0100 (mar., 27 janv. 2015) $"
+	revision    : "$Revision: 96542 $"
+
+class
+	APPLICATION
+
+inherit
+	ARGUMENTS
+
+create
+	make
+
+feature {NONE} -- Initialization
+
+	make
+			-- Run application.
+		local
+			storage: CMS_STORAGE
+			l_node: CMS_NODE
+		do
+			create connection.login_with_schema ("cms_dev", "root", "")
+
+			(create {CLEAN_DB}).clean_db(connection)
+
+			create {CMS_STORAGE_MYSQL} storage.make (connection)
+			l_node := custom_node ("Content", "Summary", "Title")
+			storage.new_user (default_user)
+			storage.new_user (custom_user ("u2", "p2", "e2"))
+			l_node.set_author (storage.user_by_email (default_user.email))
+--			storage.new_node (l_node)
+--			if attached {CMS_NODE} storage.node_by_id (1) as ll_node then
+--				storage.update_node_title (2,ll_node.id, "New Title")
+--				check
+--					attached {CMS_NODE} storage.node_by_id (1) as u_node and then not (u_node.title ~ ll_node.title) and then u_node.content ~ ll_node.content and then u_node.summary ~ ll_node.summary
+--				end
+--			end
+		end
+
+
+feature {NONE} -- Fixture Factory: Users
+
+	default_user: CMS_USER
+		do
+			Result := custom_user ("test", "password", "test@test.com")
+		end
+
+	custom_user (a_name, a_password, a_email: READABLE_STRING_32): CMS_USER
+		do
+			create Result.make (a_name)
+			Result.set_password (a_password)
+			Result.set_email (a_email)
+		end
+
+feature {NONE} -- Implementation
+
+
+	connection: DATABASE_CONNECTION_MYSQL
+
+
+	default_node: CMS_NODE
+		do
+			Result := custom_node ("Default content", "default summary", "Default")
+		end
+
+	custom_node (a_content, a_summary, a_title: READABLE_STRING_32): CMS_PAGE
+		do
+			create Result.make (a_title)
+			Result.set_content (a_content, a_summary, Void)
+		end
+
+end