diff options
Diffstat (limited to 'odb-tests/qt/oracle')
-rw-r--r-- | odb-tests/qt/oracle/basic/buildfile | 39 | ||||
-rw-r--r-- | odb-tests/qt/oracle/basic/driver.cxx | 84 | ||||
-rw-r--r-- | odb-tests/qt/oracle/basic/test.hxx | 51 | ||||
-rw-r--r-- | odb-tests/qt/oracle/basic/testscript | 11 | ||||
-rw-r--r-- | odb-tests/qt/oracle/date-time/buildfile | 39 | ||||
-rw-r--r-- | odb-tests/qt/oracle/date-time/driver.cxx | 82 | ||||
-rw-r--r-- | odb-tests/qt/oracle/date-time/test.hxx | 45 | ||||
-rw-r--r-- | odb-tests/qt/oracle/date-time/testscript | 11 |
8 files changed, 362 insertions, 0 deletions
diff --git a/odb-tests/qt/oracle/basic/buildfile b/odb-tests/qt/oracle/basic/buildfile new file mode 100644 index 0000000..b284307 --- /dev/null +++ b/odb-tests/qt/oracle/basic/buildfile @@ -0,0 +1,39 @@ +# file : qt/oracle/basic/buildfile +# license : GNU GPL v2; see accompanying LICENSE file + +if ($build.meta_operation != 'dist') +{ + assert ($qt) \ + "Qt version should be configured for this test via config.odb_tests.qt variable" + + assert ($oracle) "oracle should be configured for this test" + assert (!$multi) "multi-database mode is not supported by this test" +} + +import meta_libs = libodb%lib{odb} +import meta_libs += libodb-qt%lib{odb-qt} +import meta_libs += "libQt$(qt_ver)Core"%lib{"Qt$(qt_ver)Core"} + +import libs = libodb-oracle%lib{odb-oracle} +import libs += lib{common} + +exe{driver}: {hxx cxx}{* -test-odb} {hxx ixx cxx}{test-odb} testscript + +# Introduce the metadata library target to make sure the libodb library is +# resolved for the odb_compile ad hoc rule (see build/root.build for details). +# +libue{test-meta}: $meta_libs + +<{hxx ixx cxx}{test-odb}>: hxx{test} libue{test-meta} + +exe{driver}: libue{test-meta} $libs + +# Specify the ODB custom options to be used by the odb_compile ad hoc rule +# (see build/root.build for details). +# +odb_options = --std ($qt_ver == 5 ? c++11 : c++17) \ + --table-prefix qt_oracle_basic_ \ + --profile qt/basic \ + --generate-schema + +cxx.poptions =+ "-I$out_base" "-I$src_base" diff --git a/odb-tests/qt/oracle/basic/driver.cxx b/odb-tests/qt/oracle/basic/driver.cxx new file mode 100644 index 0000000..ce67b2e --- /dev/null +++ b/odb-tests/qt/oracle/basic/driver.cxx @@ -0,0 +1,84 @@ +// file : qt/oracle/basic/driver.cxx +// license : GNU GPL v2; see accompanying LICENSE file + +// Test Qt basic type persistence. Oracle version. +// + +#include <memory> // std::unique_ptr +#include <cassert> +#include <iostream> +#include <string> + +#include <QtCore/QCoreApplication> + +#include <odb/oracle/database.hxx> +#include <odb/oracle/transaction.hxx> + +#include <libcommon/common.hxx> + +#include "test.hxx" +#include "test-odb.hxx" + +#undef NDEBUG +#include <cassert> + +using namespace std; +using namespace odb::core; + +int +main (int argc, char* argv[]) +{ + QCoreApplication app (argc, argv); + + try + { + unique_ptr<database> db (create_database (argc, argv)); + + string short_str (13, 's'); + string medium_str (150, 'm'); + string long_str (20000, 'v'); + // Oracle UTF-8 support is limited to 3-byte sequences. + // + string unicode_str ("a \xD5\x95 \xEA\xAA\xAA \xE2\x82\xAC bcdef"); + + object o; + + o.char_= QString::fromStdString (short_str); + o.varchar2 = QString::fromStdString (medium_str); + o.clob = QString::fromStdString (long_str); + + // fromStdString() assumes ASCII in Qt4 and UTF-8 in Qt5. + // + o.nchar= QString::fromUtf8 (unicode_str.c_str (), + static_cast<int> (unicode_str.size ())); + o.nvarchar2 = QString::fromUtf8 (unicode_str.c_str (), + static_cast<int> (unicode_str.size ())); + o.nclob = QString::fromStdString (long_str); + + o.raw = QByteArray ("\0x13\0xDE\0x00\0x00\0x00\0x54\0xF2\0x6A", 8); + o.blob = QByteArray (long_str.c_str (), + static_cast<int> (long_str.size ())); + + // Persist. + // + { + transaction t (db->begin ()); + db->persist (o); + t.commit (); + } + + // Load. + // + { + transaction t (db->begin ()); + unique_ptr<object> p (db->load<object> (o.varchar2)); + t.commit (); + assert (*p == o); + } + } + catch (const odb::exception& e) + { + cerr << e.what () << endl; + return 1; + } +} diff --git a/odb-tests/qt/oracle/basic/test.hxx b/odb-tests/qt/oracle/basic/test.hxx new file mode 100644 index 0000000..6781a97 --- /dev/null +++ b/odb-tests/qt/oracle/basic/test.hxx @@ -0,0 +1,51 @@ +// file : qt/oracle/basic/test.hxx +// license : GNU GPL v2; see accompanying LICENSE file + +#ifndef TEST_HXX +#define TEST_HXX + +#include <QtCore/QString> +#include <QtCore/QByteArray> + +#pragma db object +struct object +{ + bool + operator== (const object& x) const + { + return + varchar2 == x.varchar2 && + char_ == x.char_ && + nchar == x.nchar && + nvarchar2 == x.nvarchar2 && + clob == x.clob && + nclob == x.nclob && + blob == x.blob && + raw == x.raw; + } + + #pragma db id + QString varchar2; + + #pragma db type ("CHAR(13)") + QString char_; + + #pragma db type ("NCHAR(13)") + QString nchar; + + #pragma db type ("NVARCHAR2(512)") + QString nvarchar2; + + #pragma db type ("CLOB") + QString clob; + + #pragma db type ("NCLOB") + QString nclob; + + QByteArray blob; + + #pragma db type ("RAW(128)") + QByteArray raw; +}; + +#endif // TEST_HXX diff --git a/odb-tests/qt/oracle/basic/testscript b/odb-tests/qt/oracle/basic/testscript new file mode 100644 index 0000000..1e2d3a4 --- /dev/null +++ b/odb-tests/qt/oracle/basic/testscript @@ -0,0 +1,11 @@ +# file : qt/oracle/basic/testscript +# license : GNU GPL v2; see accompanying LICENSE file + +.include ../../../database-options.testscript +.include ../../../oracle.testscript + ++$create_schema + +: basics +: +$* diff --git a/odb-tests/qt/oracle/date-time/buildfile b/odb-tests/qt/oracle/date-time/buildfile new file mode 100644 index 0000000..0fe893c --- /dev/null +++ b/odb-tests/qt/oracle/date-time/buildfile @@ -0,0 +1,39 @@ +# file : qt/oracle/date-time/buildfile +# license : GNU GPL v2; see accompanying LICENSE file + +if ($build.meta_operation != 'dist') +{ + assert ($qt) \ + "Qt version should be configured for this test via config.odb_tests.qt variable" + + assert ($oracle) "oracle should be configured for this test" + assert (!$multi) "multi-database mode is not supported by this test" +} + +import meta_libs = libodb%lib{odb} +import meta_libs += libodb-qt%lib{odb-qt} +import meta_libs += "libQt$(qt_ver)Core"%lib{"Qt$(qt_ver)Core"} + +import libs = libodb-oracle%lib{odb-oracle} +import libs += lib{common} + +exe{driver}: {hxx cxx}{* -test-odb} {hxx ixx cxx}{test-odb} testscript + +# Introduce the metadata library target to make sure the libodb library is +# resolved for the odb_compile ad hoc rule (see build/root.build for details). +# +libue{test-meta}: $meta_libs + +<{hxx ixx cxx}{test-odb}>: hxx{test} libue{test-meta} + +exe{driver}: libue{test-meta} $libs + +# Specify the ODB custom options to be used by the odb_compile ad hoc rule +# (see build/root.build for details). +# +odb_options = --std ($qt_ver == 5 ? c++11 : c++17) \ + --table-prefix qt_oracle_dt_ \ + --profile qt/date-time \ + --generate-schema + +cxx.poptions =+ "-I$out_base" "-I$src_base" diff --git a/odb-tests/qt/oracle/date-time/driver.cxx b/odb-tests/qt/oracle/date-time/driver.cxx new file mode 100644 index 0000000..21788d6 --- /dev/null +++ b/odb-tests/qt/oracle/date-time/driver.cxx @@ -0,0 +1,82 @@ +// file : qt/oracle/date-time/driver.cxx +// license : GNU GPL v2; see accompanying LICENSE file + +// Test Qt date/time type persistence. Oracle version. +// + +#include <memory> // std::unique_ptr +#include <iostream> + +#include <QtCore/QDateTime> +#include <QtCore/QCoreApplication> + +#include <odb/oracle/database.hxx> +#include <odb/oracle/transaction.hxx> + +#include <libcommon/common.hxx> + +#include "test.hxx" +#include "test-odb.hxx" + +#undef NDEBUG +#include <cassert> + +using namespace std; +using namespace odb::core; + +int +main (int argc, char* argv[]) +{ + QCoreApplication app (argc, argv); + + try + { + unique_ptr<database> db (create_database (argc, argv)); + + object o; + + // Check persistence of null values. + // + { + transaction t (db->begin ()); + db->persist (o); + t.commit (); + } + + { + transaction t (db->begin ()); + unique_ptr<object> ol (db->load<object> (o.id)); + t.commit (); + + assert (ol->is_null ()); + } + + // Check persistence of valid dates and times. + // + QDateTime t (QDateTime::currentDateTime ()); + + o.date = t.date (); + o.date_time = t; + o.date_time_d = QDateTime (QDate (2012, 6, 27), QTime (14, 17, 05, 0)); + o.time = t.time (); + + { + transaction t (db->begin ()); + db->persist (o); + t.commit (); + } + + { + transaction t (db->begin ()); + unique_ptr<object> ol (db->load<object> (o.id)); + t.commit (); + + assert (*ol == o); + } + } + catch (const odb::exception& e) + { + cerr << e.what () << endl; + return 1; + } +} diff --git a/odb-tests/qt/oracle/date-time/test.hxx b/odb-tests/qt/oracle/date-time/test.hxx new file mode 100644 index 0000000..93bc5b7 --- /dev/null +++ b/odb-tests/qt/oracle/date-time/test.hxx @@ -0,0 +1,45 @@ +// file : qt/oracle/date-time/test.hxx +// license : GNU GPL v2; see accompanying LICENSE file + +#ifndef TEST_HXX +#define TEST_HXX + +#include <QtCore/QDateTime> + +#include <odb/core.hxx> + +#pragma db object +struct object +{ + bool + operator== (const object& x) const + { + return + id == x.id && + date == x.date && + date_time == x.date_time && + date_time_d == x.date_time_d && + time == x.time; + } + + bool + is_null () const + { + return + date.isNull () && + date_time.isNull () && + date_time_d.isNull () && + time.isNull (); + } + + #pragma db id auto + unsigned long id; + + QDate date; + QDateTime date_time; + #pragma db type("DATE") + QDateTime date_time_d; + QTime time; +}; + +#endif // TEST_HXX diff --git a/odb-tests/qt/oracle/date-time/testscript b/odb-tests/qt/oracle/date-time/testscript new file mode 100644 index 0000000..1e2d3a4 --- /dev/null +++ b/odb-tests/qt/oracle/date-time/testscript @@ -0,0 +1,11 @@ +# file : qt/oracle/basic/testscript +# license : GNU GPL v2; see accompanying LICENSE file + +.include ../../../database-options.testscript +.include ../../../oracle.testscript + ++$create_schema + +: basics +: +$* |