Merge pull request #30 from jasonlyle88/dbcl_filename_directory_sep_test

Add test for databasechangelog.filename directory separator

Author: jasonlyle88

source/sqlcl_direct_unit_tests/sqlcl-liquibase-databasechangelog-filename-directory-seperator.sql

@@ -0,0 +1,59 @@
+-- Make sure the liquibase changelog table exists
+prompt "Run liquibase validate"
+liquibase validate -database-changelog-table-name &1._changelog -changelog-file sqlcl-liquibase-databasechangelog-filename-directory-seperator/changelog.xml
+
+-- Call to see if functionality works
+prompt "Run liquibase update"
+liquibase update -database-changelog-table-name &1._changelog -changelog-file sqlcl-liquibase-databasechangelog-filename-directory-seperator/changelog.xml
+
+-- See if any changesets were run
+prompt "Check changesets ran"
+declare
+    c_table_name    constant    varchar2(255 char)  :=  '&1._changelog';
+    l_count                     number;
+begin
+    execute immediate 'select count(1) from ' || c_table_name
+    into l_count;
+
+    if l_count = 0 then
+        raise_application_error(-20001, 'Liquibase update did not run');
+    end if;
+end;
+/
+
+-- Check filename directory separator directions
+prompt "Check changesets ran"
+declare
+    c_root          constant    varchar2(255 char)  :=  'sqlcl-liquibase-databasechangelog-filename-directory-seperator';
+    c_table_name    constant    varchar2(255 char)  :=  '&1._changelog';
+    l_id                        varchar2(255 char);
+    l_filename                  varchar2(255 char);
+begin
+    l_id := 'opensouce_liquibase_change';
+    execute immediate 'select filename from ' || c_table_name || ' where id = :1'
+    into l_filename
+    using in l_id;
+
+    if l_filename != c_root || '/a/b/c/child.sql' then
+        raise_application_error(-20002, 'Open source liquibase change did not match expected filename ("' || l_filename || '"")');
+    end if;
+
+    l_id := 'sqlcl_liquibase_runoraclescript_change';
+    execute immediate 'select filename from ' || c_table_name || ' where id = :1'
+    into l_filename
+    using in l_id;
+
+    if l_filename != c_root || '/a/b/c/child.xml' then
+        raise_application_error(-20003, 'runOracleScript change did not match expected filename ("' || l_filename || '"")');
+    end if;
+
+    l_id := 'sqlcl_liquibase_runapexscript_change';
+    execute immediate 'select filename from ' || c_table_name || ' where id = :1'
+    into l_filename
+    using in l_id;
+
+    if l_filename != c_root || '/a/b/c/child.xml' then
+        raise_application_error(-20004, 'runApexScript change did not match expected filename ("' || l_filename || '"")');
+    end if;
+end;
+/

source/sqlcl_direct_unit_tests/sqlcl-liquibase-databasechangelog-filename-directory-seperator/a/b/c/child.sql

@@ -0,0 +1,5 @@
+--liquibase formatted sql
+
+--changeset jlyle:opensouce_liquibase_change stripComments:false runOnChange:true runAlways:false
+select 1 from sys.dual;
+--rollback not required

source/sqlcl_direct_unit_tests/sqlcl-liquibase-databasechangelog-filename-directory-seperator/a/b/c/child.xml

@@ -0,0 +1,35 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<databaseChangeLog
+    xmlns="http://www.liquibase.org/xml/ns/dbchangelog"
+    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+    xmlns:ora="http://www.oracle.com/xml/ns/dbchangelog-ext"
+    xsi:schemaLocation="http://www.liquibase.org/xml/ns/dbchangelog http://www.liquibase.org/xml/ns/dbchangelog/dbchangelog-4.17.xsd"
+>
+    <include relativeToChangelogFile="true" file="child.sql" />
+
+    <changeSet
+        author="jlyle"
+        id="sqlcl_liquibase_runoraclescript_change"
+        runOnChange="true"
+        runAlways="false"
+    >
+        <ora:runOracleScript ownerName="jlyle" sourceType="FILE" objectType="SCRIPT" objectName="demo" relativeToChangelogFile="true" >
+            <ora:source>
+                child.sql
+            </ora:source>
+        </ora:runOracleScript>
+    </changeSet>
+
+    <changeSet
+        author="jlyle"
+        id="sqlcl_liquibase_runapexscript_change"
+        runOnChange="true"
+        runAlways="false"
+    >
+        <ora:runApexScript ownerName="jlyle" sourceType="FILE" objectType="SCRIPT" objectName="demo" relativeToChangelogFile="true" >
+            <ora:source>
+                child.sql
+            </ora:source>
+        </ora:runApexScript>
+    </changeSet>
+</databaseChangeLog>

source/sqlcl_direct_unit_tests/sqlcl-liquibase-databasechangelog-filename-directory-seperator/changelog.xml

@@ -0,0 +1,9 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<databaseChangeLog
+    xmlns="http://www.liquibase.org/xml/ns/dbchangelog"
+    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+    xmlns:ora="http://www.oracle.com/xml/ns/dbchangelog-ext"
+    xsi:schemaLocation="http://www.liquibase.org/xml/ns/dbchangelog http://www.liquibase.org/xml/ns/dbchangelog/dbchangelog-4.17.xsd"
+>
+    <include relativeToChangelogFile="true" file="a/b/c/child.xml" />
+</databaseChangeLog>