each_sql 0.2.5 → 0.3.0

data/test/yml/default.yml

@@ -0,0 +1,21 @@
+---
+all: |
+  select * from dual;
+  DECLARE UDF1CUR CURSOR FOR SELECT UDF2();
+  select 
+    begin , begin.* from begin;
+  select b `begin` from dual;
+  commit;
+  rollback;
+  select b "begin" from dual
+
+each:
+- select * from dual
+- DECLARE UDF1CUR CURSOR FOR SELECT UDF2()
+- |
+  select 
+    begin , begin.* from begin
+- select b `begin` from dual
+- commit
+- rollback
+- select b "begin" from dual

data/test/yml/mysql.yml

@@ -0,0 +1,99 @@
+---
+all: |
+  delimiter //
+  drop procedure if exists proc //
+  create procedure proc(p1 int, p2 int)
+  begin
+    null;
+    /* end; // */
+    begin
+      null;
+    end;
+  end //
+  delimiter ;
+
+  delimiter $$
+  drop procedure if exists proc2 $$
+  create procedure proc(p1 int, p2 int)
+  begin
+      null;
+
+  end $$
+  delimiter ;
+  select * from dual;;;;;
+  select 
+    begin , begin.* from begin;
+  ;;;select b `begin` from dual;
+  select b \"begin\" from dual;
+  select 
+    begin , begin.* from begin;
+
+  drop table if exists `test1`.`test_table`;
+  CREATE  TABLE `test1`.`test_table` (
+    `id` INT NOT NULL AUTO_INCREMENT COMMENT 'Primary key' ,
+    `name` VARCHAR(45) NOT NULL COMMENT '\'Name\' of the record.' ,
+    `weight` FLOAT(23) NOT NULL ,
+    `price` DECIMAL(10, 2) NOT NULL COMMENT 'Price.' ,
+    `quantity` BIGINT NOT NULL DEFAULT 0 COMMENT 'Quantity.' ,
+    `summary` VARCHAR(5000) NULL COMMENT 'Summary.' ,
+    `description` TEXT NULL COMMENT 'Long description of the record.' ,
+    `updated_at` timestamp,
+    `created_at` DATETIME NOT NULL ,
+    `deleted_at` timestamp null,
+    
+    PRIMARY KEY (`id`) ,
+    INDEX `price_quantity_idx` (`price` ASC, `quantity` ASC),
+    UNIQUE INDEX `name_uidx` (`name`) )
+  ENGINE = InnoDB
+  COMMENT = 'Test escaping of \' single quote';
+  set autocommit on;
+  set autocommit off;
+
+each:
+  - drop procedure if exists proc
+  - |
+    create procedure proc(p1 int, p2 int)
+    begin
+      null;
+      /* end; // */
+      begin
+        null;
+      end;
+    end
+  - drop procedure if exists proc2
+  - |
+    create procedure proc(p1 int, p2 int)
+    begin
+        null;
+
+    end
+  - select * from dual
+  - |
+    select 
+      begin , begin.* from begin
+  - select b `begin` from dual
+  - select b \"begin\" from dual
+  - |
+    select 
+      begin , begin.* from begin
+  - drop table if exists `test1`.`test_table`
+  - |
+    CREATE  TABLE `test1`.`test_table` (
+      `id` INT NOT NULL AUTO_INCREMENT COMMENT 'Primary key' ,
+      `name` VARCHAR(45) NOT NULL COMMENT '\'Name\' of the record.' ,
+      `weight` FLOAT(23) NOT NULL ,
+      `price` DECIMAL(10, 2) NOT NULL COMMENT 'Price.' ,
+      `quantity` BIGINT NOT NULL DEFAULT 0 COMMENT 'Quantity.' ,
+      `summary` VARCHAR(5000) NULL COMMENT 'Summary.' ,
+      `description` TEXT NULL COMMENT 'Long description of the record.' ,
+      `updated_at` timestamp,
+      `created_at` DATETIME NOT NULL ,
+      `deleted_at` timestamp null,
+      
+      PRIMARY KEY (`id`) ,
+      INDEX `price_quantity_idx` (`price` ASC, `quantity` ASC),
+      UNIQUE INDEX `name_uidx` (`name`) )
+    ENGINE = InnoDB
+    COMMENT = 'Test escaping of \' single quote'
+  - set autocommit on
+  - set autocommit off

data/test/yml/oracle.yml

@@ -0,0 +1,200 @@
+---
+all: |
+  select *, q'[hello]' from dual1;
+  ;;;;;;;
+  ;;;
+  ;;
+
+  create /* procedure */ sequence a;
+  execute immediate 'create table "a" (a int)';
+  create package something as
+    procedure log;
+    procedure log;
+    procedure log;
+  end something;
+  /
+  /
+  /
+
+  /
+
+  Create or replace Procedure tmmp(p1 number default 'begin', p2 number) as
+      str number(8, 2) := 1 / 4;
+  begin
+    1 / 2;
+    begin
+      1 / 4;
+      null;
+    end;
+  exception
+      when others then
+          raise;
+  end;
+  /
+  -- declaration
+  declare
+    a int;
+  begin
+    1 / 2;
+    begin
+      1 / 4;
+      null;
+    end;
+  exception
+      when others then
+          raise;
+  end;
+  /
+  begin
+    null;
+  end;
+  /
+      begin
+          null;
+      end;
+      /
+  select * from dual2;
+  ;
+  ;
+  ;
+
+  delimiter $$
+  delimiter ;
+
+  -------------- begin-end block;
+  Declare
+    /* end; */
+    /* begin */
+    null;
+    null;
+    null;
+    a := 3 / 1;
+  begin
+    /* end */
+    null;
+  end;
+  /
+  ;;;;;;
+  Declare
+    /* end; */
+    /* begin */
+    null;
+    a NUMBER := 1;
+    null;
+  begin
+    -- begin-end block;
+    -- line comment
+    -- line comment
+    -- line comment
+    begin
+      null;
+      begin
+        null;
+      end;
+    end;
+    -- end
+    /* end */
+  end
+  ;
+  /
+
+  select begin, end, create, procedure, end, from dual3;
+  select * from dual4;
+
+          -- TMP_DB_TOOLS_CONV
+          begin
+              execute immediate 'DROP TABLE TMP_DB_TOOLS_CONV CASCADE CONSTRAINTS';
+          exception
+              when others then
+                  null;
+          end;
+          /
+each:
+  - select *, q'[hello]' from dual1
+  - create /* procedure */ sequence a
+  - execute immediate 'create table "a" (a int)'
+  - |
+    create package something as
+      procedure log;
+      procedure log;
+      procedure log;
+    end something;
+  - |
+    Create or replace Procedure tmmp(p1 number default 'begin', p2 number) as
+        str number(8, 2) := 1 / 4;
+    begin
+      1 / 2;
+      begin
+        1 / 4;
+        null;
+      end;
+    exception
+        when others then
+            raise;
+    end;
+
+  - |
+    declare
+      a int;
+    begin
+      1 / 2;
+      begin
+        1 / 4;
+        null;
+      end;
+    exception
+        when others then
+            raise;
+    end;
+  - |
+    begin
+      null;
+    end;
+  - |
+      begin
+              null;
+          end;
+  - select * from dual2
+  - |
+    Declare
+      /* end; */
+      /* begin */
+      null;
+      null;
+      null;
+      a := 3 / 1;
+    begin
+      /* end */
+      null;
+    end;
+  - |
+    Declare
+      /* end; */
+      /* begin */
+      null;
+      a NUMBER := 1;
+      null;
+    begin
+      -- begin-end block;
+      -- line comment
+      -- line comment
+      -- line comment
+      begin
+        null;
+        begin
+          null;
+        end;
+      end;
+      -- end
+      /* end */
+    end;
+
+  - select begin, end, create, procedure, end, from dual3
+  - select * from dual4
+  - |
+    begin
+                execute immediate 'DROP TABLE TMP_DB_TOOLS_CONV CASCADE CONSTRAINTS';
+            exception
+                when others then
+                    null;
+            end;

data/test/yml/postgres.yml

@@ -0,0 +1,234 @@
+---
+all: |
+  CREATE FUNCTION check_password(uname TEXT, pass TEXT)
+  RETURNS BOOLEAN AS $$
+  DECLARE passed BOOLEAN;
+          old_path TEXT;
+  BEGIN
+          -- Save old search_path; notice we must qualify current_setting
+          -- to ensure we invoke the right function
+          old_path := pg_catalog.current_setting('search_path');
+
+          -- Set a secure search_path: trusted schemas, then 'pg_temp'.
+          -- We set is_local = true so that the old value will be restored
+          -- in event of an error before we reach the function end.
+          PERFORM pg_catalog.set_config('search_path', 'admin, pg_temp', true);
+
+          -- Do whatever secure work we came for.
+          SELECT  (pwd = $2) INTO passed
+          FROM    pwds
+          WHERE   username = $1;
+
+          -- Restore caller's search_path
+          PERFORM pg_catalog.set_config('search_path', old_path, true);
+
+          RETURN passed;
+  END;
+  $$ LANGUAGE plpgsql SECURITY DEFINER;
+  select
+    $$Dianne's horse$$
+  from
+    dual;
+  commit;
+  CREATE OR REPLACE FUNCTION increment(i integer) RETURNS integer AS $$
+          BEGIN
+                  RETURN i + 1;
+          END;
+  $$ LANGUAGE plpgsql;
+  select $SomeTag$Dianne's horse$SomeTag$, 'hello' from dual;
+  CREATE OR REPLACE FUNCTION maint_sales_summary_bytime() RETURNS TRIGGER AS $maint_sales_summary_bytime$
+      DECLARE
+          delta_time_key          integer;
+          delta_amount_sold       numeric(15,2);
+          delta_units_sold        numeric(12);
+          delta_amount_cost       numeric(15,2);
+      BEGIN
+
+          -- Work out the increment/decrement amount(s).
+          IF (TG_OP = 'DELETE') THEN
+
+              delta_time_key = OLD.time_key;
+              delta_amount_sold = -1 * OLD.amount_sold;
+              delta_units_sold = -1 * OLD.units_sold;
+              delta_amount_cost = -1 * OLD.amount_cost;
+
+          ELSIF (TG_OP = 'UPDATE') THEN
+
+              -- forbid updates that change the time_key -
+              -- (probably not too onerous, as DELETE + INSERT is how most 
+              -- changes will be made).
+              IF ( OLD.time_key != NEW.time_key) THEN
+                  RAISE EXCEPTION 'Update of time_key : % -> % not allowed', OLD.time_key, NEW.time_key;
+              END IF;
+
+              delta_time_key = OLD.time_key;
+              delta_amount_sold = NEW.amount_sold - OLD.amount_sold;
+              delta_units_sold = NEW.units_sold - OLD.units_sold;
+              delta_amount_cost = NEW.amount_cost - OLD.amount_cost;
+
+          ELSIF (TG_OP = 'INSERT') THEN
+
+              delta_time_key = NEW.time_key;
+              delta_amount_sold = NEW.amount_sold;
+              delta_units_sold = NEW.units_sold;
+              delta_amount_cost = NEW.amount_cost;
+
+          END IF;
+
+
+          -- Insert or update the summary row with the new values.
+          <<insert_update>>
+          LOOP
+              UPDATE sales_summary_bytime
+                  SET amount_sold = amount_sold + delta_amount_sold,
+                      units_sold = units_sold + delta_units_sold,
+                      amount_cost = amount_cost + delta_amount_cost
+                  WHERE time_key = delta_time_key;
+
+              EXIT insert_update WHEN found;    
+
+              BEGIN
+                  INSERT INTO sales_summary_bytime (
+                              time_key, 
+                              amount_sold, 
+                              units_sold, 
+                              amount_cost)
+                      VALUES ( 
+                              delta_time_key,
+                              delta_amount_sold,
+                              delta_units_sold,
+                              delta_amount_cost
+                             );
+
+                  EXIT insert_update;
+
+              EXCEPTION
+                  WHEN UNIQUE_VIOLATION THEN
+                      -- do nothing
+              END;
+          END LOOP insert_update;
+
+          RETURN NULL;
+
+      END;
+  $maint_sales_summary_bytime$ LANGUAGE plpgsql;
+  rollback;
+
+each:
+- |
+  CREATE FUNCTION check_password(uname TEXT, pass TEXT)
+  RETURNS BOOLEAN AS $$
+  DECLARE passed BOOLEAN;
+          old_path TEXT;
+  BEGIN
+          -- Save old search_path; notice we must qualify current_setting
+          -- to ensure we invoke the right function
+          old_path := pg_catalog.current_setting('search_path');
+
+          -- Set a secure search_path: trusted schemas, then 'pg_temp'.
+          -- We set is_local = true so that the old value will be restored
+          -- in event of an error before we reach the function end.
+          PERFORM pg_catalog.set_config('search_path', 'admin, pg_temp', true);
+
+          -- Do whatever secure work we came for.
+          SELECT  (pwd = $2) INTO passed
+          FROM    pwds
+          WHERE   username = $1;
+
+          -- Restore caller's search_path
+          PERFORM pg_catalog.set_config('search_path', old_path, true);
+
+          RETURN passed;
+  END;
+  $$ LANGUAGE plpgsql SECURITY DEFINER
+- |
+  select
+    $$Dianne's horse$$
+  from
+    dual
+- commit
+- |
+  CREATE OR REPLACE FUNCTION increment(i integer) RETURNS integer AS $$
+          BEGIN
+                  RETURN i + 1;
+          END;
+  $$ LANGUAGE plpgsql
+- select $SomeTag$Dianne's horse$SomeTag$, 'hello' from dual
+- |
+  CREATE OR REPLACE FUNCTION maint_sales_summary_bytime() RETURNS TRIGGER AS $maint_sales_summary_bytime$
+      DECLARE
+          delta_time_key          integer;
+          delta_amount_sold       numeric(15,2);
+          delta_units_sold        numeric(12);
+          delta_amount_cost       numeric(15,2);
+      BEGIN
+
+          -- Work out the increment/decrement amount(s).
+          IF (TG_OP = 'DELETE') THEN
+
+              delta_time_key = OLD.time_key;
+              delta_amount_sold = -1 * OLD.amount_sold;
+              delta_units_sold = -1 * OLD.units_sold;
+              delta_amount_cost = -1 * OLD.amount_cost;
+
+          ELSIF (TG_OP = 'UPDATE') THEN
+
+              -- forbid updates that change the time_key -
+              -- (probably not too onerous, as DELETE + INSERT is how most 
+              -- changes will be made).
+              IF ( OLD.time_key != NEW.time_key) THEN
+                  RAISE EXCEPTION 'Update of time_key : % -> % not allowed', OLD.time_key, NEW.time_key;
+              END IF;
+
+              delta_time_key = OLD.time_key;
+              delta_amount_sold = NEW.amount_sold - OLD.amount_sold;
+              delta_units_sold = NEW.units_sold - OLD.units_sold;
+              delta_amount_cost = NEW.amount_cost - OLD.amount_cost;
+
+          ELSIF (TG_OP = 'INSERT') THEN
+
+              delta_time_key = NEW.time_key;
+              delta_amount_sold = NEW.amount_sold;
+              delta_units_sold = NEW.units_sold;
+              delta_amount_cost = NEW.amount_cost;
+
+          END IF;
+
+
+          -- Insert or update the summary row with the new values.
+          <<insert_update>>
+          LOOP
+              UPDATE sales_summary_bytime
+                  SET amount_sold = amount_sold + delta_amount_sold,
+                      units_sold = units_sold + delta_units_sold,
+                      amount_cost = amount_cost + delta_amount_cost
+                  WHERE time_key = delta_time_key;
+
+              EXIT insert_update WHEN found;    
+
+              BEGIN
+                  INSERT INTO sales_summary_bytime (
+                              time_key, 
+                              amount_sold, 
+                              units_sold, 
+                              amount_cost)
+                      VALUES ( 
+                              delta_time_key,
+                              delta_amount_sold,
+                              delta_units_sold,
+                              delta_amount_cost
+                             );
+
+                  EXIT insert_update;
+
+              EXCEPTION
+                  WHEN UNIQUE_VIOLATION THEN
+                      -- do nothing
+              END;
+          END LOOP insert_update;
+
+          RETURN NULL;
+
+      END;
+  $maint_sales_summary_bytime$ LANGUAGE plpgsql
+- rollback