sqlite/test/joinI.test

# 2025-08-22
#
# The author disclaims copyright to this source code.  In place of
# a legal notice, here is a blessing:
#
#    May you do good and not evil.
#    May you find forgiveness for yourself and forgive others.
#    May you share freely, never taking more than you give.
#
#***********************************************************************
# This file implements regression tests for SQLite library.
# 
# Tests arising from https://sqlite.org/forum/forumpost/ccfb3b5052

set testdir [file dirname $argv0]
source $testdir/tester.tcl
set testprefix joinI

do_execsql_test 1.0 {
  CREATE TABLE t1(a INT);
  CREATE TABLE t2(b INT);
  CREATE TABLE t3(c INT);
}

foreach {tn sql} {
  1 "SELECT * FROM t1 RIGHT JOIN t2 ON t2.b=t3.c CROSS JOIN t3"
  2 "SELECT * FROM t1 RIGHT JOIN t2 ON t2.b=(SELECT t3.c) CROSS JOIN t3"
  3 "SELECT * FROM t1 RIGHT JOIN t2 ON CASE WHEN t2.b THEN t3.c ELSE 1 END CROSS JOIN t3"
} {
  do_catchsql_test 1.1.$tn $sql {1 {ON clause references tables to its right}}
}


#-------------------------------------------------------------------------
reset_db

do_execsql_test 2.0 {
  CREATE TABLE t0(c0 INT, c1 INT);
  CREATE TABLE t1 (c0 INT);

  CREATE VIEW v1(c0) AS SELECT t0.c0 FROM t0 NATURAL RIGHT JOIN t1;
  CREATE VIEW v2(c0) AS SELECT 0 FROM v1;

  INSERT INTO t0(c0, c1) VALUES (-1, 0);
  INSERT INTO t1(c0) VALUES (NULL);

  SELECT * FROM v1 INNER JOIN (v2 CROSS JOIN t0) ON (t0.c0 < t0.c1);
} {{} 0 -1 0}

#-------------------------------------------------------------------------
reset_db
do_execsql_test 3.0 {
  CREATE TABLE t0(c0, c1);
  CREATE TABLE t1(v);
  CREATE TABLE t2(w);
  CREATE TABLE t3(x);
  CREATE TABLE t4(y);
  CREATE TABLE t5(z);
}

do_execsql_test 3.1 {
  SELECT 1234 FROM t4 
  RIGHT JOIN t5 
  CROSS JOIN (t2 CROSS JOIN t0) AS a1 ON (a1.c0 < a1.c1);
}

do_execsql_test 3.2 {
  SELECT 1234 FROM t4 
  RIGHT JOIN t5 
  CROSS JOIN (t2 CROSS JOIN t1 CROSS JOIN t0) AS a1 ON (a1.c0 < a1.c1);
}

do_execsql_test 3.3 {
  SELECT 5678 FROM t0 RIGHT JOIN t1 ON (
    SELECT 1 FROM t2 RIGHT JOIN t3 ON t2.w
  ) CROSS JOIN t4;
}

do_catchsql_test 3.4 {
  SELECT 5678 FROM t0 RIGHT JOIN t1 ON (
    SELECT 1 FROM t2 RIGHT JOIN t3 ON t4.y
  ) CROSS JOIN t4;
} {1 {ON clause references tables to its right}}

do_execsql_test 3.5 {
  SELECT 5678 FROM t0 RIGHT JOIN t1 ON (
    SELECT 1 FROM t2 RIGHT JOIN t3 ON 0=t1.v
  ) CROSS JOIN t4;
}

do_catchsql_test 3.6 {
  SELECT 5678 FROM t0 RIGHT JOIN t1 ON (
    SELECT 1 FROM t2 RIGHT JOIN t3 ON max(0,t5.z) CROSS JOIN t5
  ) CROSS JOIN t4;
} {1 {ON clause references tables to its right}}

finish_test