#! /bin/bash

run_test ./drive_sql "select json_contains('4', 4)"

check_output "json_contains does not work" <<EOF
Row 0:
  Column json_contains('4', 4): 1
EOF

run_test ./drive_sql "select json_contains('4', 2)"

check_output "json_contains does not work" <<EOF
Row 0:
  Column json_contains('4', 2): 0
EOF

run_test ./drive_sql <<EOF
select json_contains('"hi"', 'hi')
EOF

check_output "json_contains does not work" <<EOF
Row 0:
  Column json_contains('"hi"', 'hi'): 1
EOF

run_test ./drive_sql <<EOF
select json_contains('["hi", "bye"]', 'hola') as res
EOF

check_output "json_contains does not work" <<EOF
Row 0:
  Column res: 0
EOF

run_test ./drive_sql <<EOF
select json_contains('["hi", "bye", "solong"]', 'bye') as res
EOF

check_output "json_contains does not work" <<EOF
Row 0:
  Column res: 1
EOF

run_test ./drive_sql <<EOF
select json_contains('["hi", "bye", "solong]', 'bye') as res
EOF

check_error_output "json_contains does not work" <<EOF
error: sqlite3_exec failed -- parse error: premature EOF
                                       ["hi", "bye", "solong]
                     (right here) ------^

EOF

run_test ./drive_sql "select jget('4', '')"

check_output "jget root does not work" <<EOF
Row 0:
  Column jget('4', ''): 4
EOF

run_test ./drive_sql "select jget('4', null)"

check_output "jget null does not work" <<EOF
Row 0:
  Column jget('4', null): 4
EOF

run_test ./drive_sql "select jget('[null, true, 20, 30, 40]', '/3')"

check_error_output "" <<EOF
EOF

check_output "jget null does not work" <<EOF
Row 0:
  Column jget('[null, true, 20, 30, 40]', '/3'): 30
EOF

run_test ./drive_sql "select jget('[null, true, 20, 30, 40, {\"msg\": \"Hello\"}]', '/5/msg')"

check_error_output "" <<EOF
EOF

check_output "jget null does not work" <<EOF
Row 0:
  Column jget('[null, true, 20, 30, 40, {"msg": "Hello"}]', '/5/msg'): Hello
EOF

run_test ./drive_sql "select jget('[null, true, 20, 30, 40]', '/abc')"

check_error_output "" <<EOF
EOF

check_output "jget for array does not work" <<EOF
Row 0:
  Column jget('[null, true, 20, 30, 40]', '/abc'): (null)
EOF

run_test ./drive_sql "select jget('[null, true, 20, 30, 40]', '/abc', 1)"

check_error_output "" <<EOF
EOF

check_output "jget for array does not work" <<EOF
Row 0:
  Column jget('[null, true, 20, 30, 40]', '/abc', 1): 1
EOF

run_test ./drive_sql "select jget('[null, true, 20, 30, 40]', '/0/foo')"

check_error_output "" <<EOF
EOF

check_output "jget for array does not work" <<EOF
Row 0:
  Column jget('[null, true, 20, 30, 40]', '/0/foo'): (null)
EOF


run_test ./drive_sql "select json_group_object(key) from (select 1 as key)"

check_error_output "" <<EOF
error: sqlite3_exec failed -- Uneven number of arguments to json_group_object(), expecting key and value pairs
EOF

GROUP_SELECT_1=$(cat <<EOF
SELECT id, json_group_object(key, value) as stack FROM (
              SELECT 1 as id, 'key1' as key, 10 as value
    UNION ALL SELECT 1 as id, 'key2' as key, 20 as value
    UNION ALL SELECT 1 as id, 'key3' as key, 30 as value)
EOF
)

run_test ./drive_sql "$GROUP_SELECT_1"

check_error_output "" <<EOF
EOF

check_output "json_group_object does not work" <<EOF
Row 0:
  Column         id: 1
  Column      stack: {"key1":10,"key2":20,"key3":30}
EOF

GROUP_SELECT_2=$(cat <<EOF
SELECT id, json_group_object(key, value) as stack FROM (
              SELECT 1 as id, 1 as key, 10 as value
    UNION ALL SELECT 1 as id, 2 as key, null as value
    UNION ALL SELECT 1 as id, 3 as key, 30.5 as value)
EOF
)

run_test ./drive_sql "$GROUP_SELECT_2"

check_error_output "" <<EOF
EOF


check_output "json_group_object with number keys does not work" <<EOF
Row 0:
  Column         id: 1
  Column      stack: {"1":10,"2":null,"3":30.5}
EOF

if test x"$HAVE_SQLITE3_VALUE_SUBTYPE" != x""; then
    GROUP_SELECT_3=$(cat <<EOF
SELECT id, json_group_object(key, value) as stack FROM (
              SELECT 1 as id, 1 as key, 10 as value
    UNION ALL SELECT 1 as id, 2 as key, json_array(1, 2, 3) as value
    UNION ALL SELECT 1 as id, 3 as key, 30.5 as value)
EOF
)

    run_test ./drive_sql "$GROUP_SELECT_3"

    check_error_output "" <<EOF
EOF

    check_output "json_group_object with number keys does not work" <<EOF
Row 0:
  Column         id: 1
  Column      stack: {"1":10,"2":[1,2,3],"3":30.5}
EOF
fi


GROUP_ARRAY_SELECT_1=$(cat <<EOF
SELECT json_group_array(value) as stack FROM (
              SELECT 10 as value
    UNION ALL SELECT null as value
    UNION ALL SELECT 'hello' as value)
EOF
)

run_test ./drive_sql "$GROUP_ARRAY_SELECT_1"

check_error_output "" <<EOF
EOF

check_output "json_group_array does not work" <<EOF
Row 0:
  Column      stack: [10,null,"hello"]
EOF

GROUP_ARRAY_SELECT_2=$(cat <<EOF
SELECT json_group_array(value, value * 10) as stack FROM (
              SELECT 10 as value
    UNION ALL SELECT 20 as value
    UNION ALL SELECT 30 as value)
EOF
)

run_test ./drive_sql "$GROUP_ARRAY_SELECT_2"

check_error_output "" <<EOF
EOF

check_output "json_group_array does not work" <<EOF
Row 0:
  Column      stack: [10,100,20,200,30,300]
EOF