Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Further enhance the connection flag diagnostics. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
e06d302ebf5966a175735a68c384bca8 |
| User & Date: | mistachkin 2014-01-04 09:23:55.370 |
Context
|
2014-01-06
| ||
| 01:45 | More enhancements to the test suite infrastructure. check-in: ba3ecbf6c4 user: mistachkin tags: trunk | |
|
2014-01-04
| ||
| 09:23 | Further enhance the connection flag diagnostics. check-in: e06d302ebf user: mistachkin tags: trunk | |
| 02:32 | Make sure that all non-legacy tests honor the global connection flags. check-in: 14dd55b26b user: mistachkin tags: trunk | |
Changes
Changes to Tests/common.eagle.
| ︙ | ︙ | |||
1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 |
sql execute -execute $execute -format $format $db $sql]]
} finally {
cleanupDb $fileName db false false false
}
}
proc getConnectionFlags { flags {quiet false} } {
#
# NOTE: If there are any global (per test run) connection flags currently
# set, use them now (i.e. by combining them with the ones for this
# connection).
#
if {[info exists ::connection_flags] && \
[string length $::connection_flags] > 0} then {
#
| > > > > > > > > > > > > > > > > > > > | < < < < < | 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 |
sql execute -execute $execute -format $format $db $sql]]
} finally {
cleanupDb $fileName db false false false
}
}
proc getConnectionFlags { flags {quiet false} } {
#
# NOTE: Show (and log) the local connection flags and the associated
# data source or file name.
#
if {!$quiet} then {
if {[info exists ::dataSource] && ![array exists ::dataSource]} then {
set database [appendArgs "data source \"" $::dataSource \"]
} elseif {[info exists ::fileName] && ![array exists ::fileName]} then {
set database [appendArgs "file name \"" $::fileName \"]
} else {
set database <unknown>
}
tputs $::test_channel [appendArgs \
"---- local connection flags for " $database \
" are: " [expr {[string length $flags] > 0 ? \
[appendArgs \" $flags \"] : "<none>"}] \n]
}
#
# NOTE: If there are any global (per test run) connection flags currently
# set, use them now (i.e. by combining them with the ones for this
# connection).
#
if {[info exists ::connection_flags] && \
[string length $::connection_flags] > 0} then {
#
# NOTE: Show (and log) the detected global connection flags.
#
if {!$quiet} then {
tputs $::test_channel [appendArgs \
"---- global connection flags detected: " \
[expr {[info exists ::connection_flags] && \
[string length $::connection_flags] > 0 ? \
[appendArgs \" $::connection_flags \"] : "<none>"}] \n]
}
|
| ︙ | ︙ | |||
1418 1419 1420 1421 1422 1423 1424 |
[appendArgs \" $flags \"] : "<none>"}] \n]
}
}
return $flags
}
| | | | | 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 |
[appendArgs \" $flags \"] : "<none>"}] \n]
}
}
return $flags
}
proc getFlagsProperty { {flags ""} {quiet false} } {
#
# NOTE: Determine what the combined (global and local) connection
# flags should be, possibly quietly.
#
set flags [getConnectionFlags $flags $quiet]
#
# NOTE: If no global or local connection flags were specified, the
# default connection flags should be used; therefore, return
# an empty string in that case.
#
if {[string length $flags] == 0} then {
|
| ︙ | ︙ |
Changes to Tests/stress.eagle.
| ︙ | ︙ | |||
886 887 888 889 890 891 892 |
namespace _Dynamic${id}
{
public static class Test${id}
{
public static void BackupAndGetData()
{
using (SQLiteConnection source = new SQLiteConnection(
| | | | 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 |
namespace _Dynamic${id}
{
public static class Test${id}
{
public static void BackupAndGetData()
{
using (SQLiteConnection source = new SQLiteConnection(
"FullUri=${dstFileName};[getFlagsProperty {} true]"))
{
source.Open();
using (SQLiteConnection destination = new SQLiteConnection(
"FullUri=${srcFileName};[getFlagsProperty {} true]"))
{
destination.Open();
source.BackupDatabase(
destination, "main", "main", -1, null, 0);
}
}
|
| ︙ | ︙ | |||
968 969 970 971 972 973 974 |
namespace _Dynamic${id}
{
public static class Test${id}
{
public static void BackupAndGetData()
{
using (SQLiteConnection source = new SQLiteConnection(
| | | | 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 |
namespace _Dynamic${id}
{
public static class Test${id}
{
public static void BackupAndGetData()
{
using (SQLiteConnection source = new SQLiteConnection(
"FullUri=${srcFileName};[getFlagsProperty {} true]"))
{
source.Open();
using (SQLiteConnection destination = new SQLiteConnection(
"FullUri=${dstFileName};[getFlagsProperty {} true]"))
{
destination.Open();
source.BackupDatabase(
destination, "main", "main", -1, null, 0);
}
}
|
| ︙ | ︙ |