sp basic support

Author: tomas-villagesql

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_call_complex.result

@@ -0,0 +1,27 @@
+CREATE TABLE t1 (val COMPLEX);
+INSERT INTO t1 VALUES ('(1.0,2.0)');
+INSERT INTO t1 VALUES ('(3.0,4.0)');
+CREATE TABLE t2 (val COMPLEX);
+CREATE PROCEDURE p1()
+BEGIN
+DECLARE v COMPLEX;
+DECLARE done INT DEFAULT 0;
+DECLARE cur CURSOR FOR SELECT val FROM t1;
+DECLARE CONTINUE HANDLER FOR NOT FOUND SET done = 1;
+OPEN cur;
+fetch_loop: LOOP
+FETCH cur INTO v;
+IF done THEN
+LEAVE fetch_loop;
+END IF;
+INSERT INTO t2 VALUES (v);
+END LOOP;
+CLOSE cur;
+END//
+CALL p1();
+SELECT * FROM t2;
+val
+(1,2)
+(3,4)
+DROP PROCEDURE p1;
+DROP TABLE t1, t2;

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_cursor_complex.result

@@ -0,0 +1,39 @@
+CREATE TABLE t1 (val COMPLEX);
+CREATE PROCEDURE p1()
+BEGIN
+DECLARE v1 COMPLEX DEFAULT '(0.0,0.0)';
+DECLARE v2 COMPLEX;
+SET v2 = '(1.0,2.0)';
+INSERT INTO t1 VALUES (v1);
+INSERT INTO t1 VALUES (v2);
+END//
+CALL p1();
+SELECT * FROM t1;
+val
+(0,0)
+(1,2)
+DROP PROCEDURE p1;
+DROP TABLE t1;
+include/rpl/deprecated/show_binlog_events.inc
+Log_name	Pos	Event_type	Server_id	End_log_pos	Info
+#	#	Query	#	#	use `test`; CREATE TABLE `t1` (
+  `val` vsql_complex.COMPLEX DEFAULT NULL
+)
+#	#	Query	#	#	use `test`; CREATE DEFINER=`root`@`localhost` PROCEDURE `p1`()
+BEGIN
+DECLARE v1 COMPLEX DEFAULT '(0.0,0.0)';
+DECLARE v2 COMPLEX;
+SET v2 = '(1.0,2.0)';
+INSERT INTO t1 VALUES (v1);
+INSERT INTO t1 VALUES (v2);
+END
+#	#	Query	#	#	BEGIN
+#	#	Table_map	#	#	table_id: # (test.t1)
+#	#	Write_rows	#	#	table_id: # flags: STMT_END_F
+#	#	Xid	#	#	COMMIT /* XID */
+#	#	Query	#	#	BEGIN
+#	#	Table_map	#	#	table_id: # (test.t1)
+#	#	Write_rows	#	#	table_id: # flags: STMT_END_F
+#	#	Xid	#	#	COMMIT /* XID */
+#	#	Query	#	#	use `test`; DROP PROCEDURE p1
+#	#	Query	#	#	use `test`; DROP TABLE `t1` /* generated by server */

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_declare_complex.result

@@ -0,0 +1,23 @@
+CREATE TABLE t1 (val COMPLEX);
+CREATE PROCEDURE p1()
+BEGIN
+DECLARE v COMPLEX;
+DECLARE caught INT DEFAULT 0;
+DECLARE CONTINUE HANDLER FOR SQLEXCEPTION SET caught = 1;
+# Valid assignment - should succeed.
+SET v = '(1.0,2.0)';
+INSERT INTO t1 VALUES (v);
+# Invalid assignment - handler should catch the error.
+SET v = 'not_a_complex_value';
+INSERT INTO t1 VALUES (v);
+SELECT caught;
+END//
+CALL p1();
+caught
+1
+SELECT * FROM t1;
+val
+(1,2)
+NULL
+DROP PROCEDURE p1;
+DROP TABLE t1;

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_handler_complex.result

@@ -0,0 +1,26 @@
+CREATE TABLE t1 (val COMPLEX);
+CREATE PROCEDURE p1(IN input_val COMPLEX)
+BEGIN
+INSERT INTO t1 VALUES (input_val);
+END//
+CALL p1('(1.0,2.0)');
+SELECT * FROM t1;
+val
+(1,2)
+DROP PROCEDURE p1;
+DROP TABLE t1;
+include/rpl/deprecated/show_binlog_events.inc
+Log_name	Pos	Event_type	Server_id	End_log_pos	Info
+#	#	Query	#	#	use `test`; CREATE TABLE `t1` (
+  `val` vsql_complex.COMPLEX DEFAULT NULL
+)
+#	#	Query	#	#	use `test`; CREATE DEFINER=`root`@`localhost` PROCEDURE `p1`(IN input_val COMPLEX)
+BEGIN
+INSERT INTO t1 VALUES (input_val);
+END
+#	#	Query	#	#	BEGIN
+#	#	Table_map	#	#	table_id: # (test.t1)
+#	#	Write_rows	#	#	table_id: # flags: STMT_END_F
+#	#	Xid	#	#	COMMIT /* XID */
+#	#	Query	#	#	use `test`; DROP PROCEDURE p1
+#	#	Query	#	#	use `test`; DROP TABLE `t1` /* generated by server */

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_in_complex.result

@@ -0,0 +1,22 @@
+CREATE PROCEDURE p1(INOUT val COMPLEX)
+BEGIN
+# Simple pass-through logic for now, assuming string representation
+# Ideally this would do math if operations were supported
+SET val = '(9.0,9.0)';
+END//
+SET @my_val = '(1.0,2.0)';
+CALL p1(@my_val);
+SELECT @my_val;
+@my_val
+(9,9)
+SET @my_val = NULL;
+DROP PROCEDURE p1;
+include/rpl/deprecated/show_binlog_events.inc
+Log_name	Pos	Event_type	Server_id	End_log_pos	Info
+#	#	Query	#	#	use `test`; CREATE DEFINER=`root`@`localhost` PROCEDURE `p1`(INOUT val COMPLEX)
+BEGIN
+# Simple pass-through logic for now, assuming string representation
+# Ideally this would do math if operations were supported
+SET val = '(9.0,9.0)';
+END
+#	#	Query	#	#	use `test`; DROP PROCEDURE p1

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_inout_complex.result

@@ -0,0 +1,17 @@
+CREATE PROCEDURE p1(OUT output_val COMPLEX)
+BEGIN
+SET output_val = '(3.0,4.0)';
+END//
+CALL p1(@res);
+SELECT @res;
+@res
+(3,4)
+DROP PROCEDURE p1;
+SET @res = NULL;
+include/rpl/deprecated/show_binlog_events.inc
+Log_name	Pos	Event_type	Server_id	End_log_pos	Info
+#	#	Query	#	#	use `test`; CREATE DEFINER=`root`@`localhost` PROCEDURE `p1`(OUT output_val COMPLEX)
+BEGIN
+SET output_val = '(3.0,4.0)';
+END
+#	#	Query	#	#	use `test`; DROP PROCEDURE p1

mysql-test/suite/villagesql/stored_procedure/r/stored_procedure_out_complex.result

@@ -0,0 +1,37 @@
+# Test cursor FETCH into a COMPLEX variable in a Stored Procedure
+
+--source include/villagesql/install_complex_extension.inc
+
+CREATE TABLE t1 (val COMPLEX);
+INSERT INTO t1 VALUES ('(1.0,2.0)');
+INSERT INTO t1 VALUES ('(3.0,4.0)');
+
+CREATE TABLE t2 (val COMPLEX);
+
+delimiter //;
+CREATE PROCEDURE p1()
+BEGIN
+  DECLARE v COMPLEX;
+  DECLARE done INT DEFAULT 0;
+  DECLARE cur CURSOR FOR SELECT val FROM t1;
+  DECLARE CONTINUE HANDLER FOR NOT FOUND SET done = 1;
+
+  OPEN cur;
+  fetch_loop: LOOP
+    FETCH cur INTO v;
+    IF done THEN
+      LEAVE fetch_loop;
+    END IF;
+    INSERT INTO t2 VALUES (v);
+  END LOOP;
+  CLOSE cur;
+END//
+delimiter ;//
+
+CALL p1();
+SELECT * FROM t2;
+
+DROP PROCEDURE p1;
+DROP TABLE t1, t2;
+
+--source include/villagesql/uninstall_complex_extension.inc