summaryrefslogtreecommitdiff
path: root/odb-tests/qt/oracle
diff options
context:
space:
mode:
Diffstat (limited to 'odb-tests/qt/oracle')
-rw-r--r--odb-tests/qt/oracle/basic/buildfile39
-rw-r--r--odb-tests/qt/oracle/basic/driver.cxx84
-rw-r--r--odb-tests/qt/oracle/basic/test.hxx51
-rw-r--r--odb-tests/qt/oracle/basic/testscript11
-rw-r--r--odb-tests/qt/oracle/date-time/buildfile39
-rw-r--r--odb-tests/qt/oracle/date-time/driver.cxx82
-rw-r--r--odb-tests/qt/oracle/date-time/test.hxx45
-rw-r--r--odb-tests/qt/oracle/date-time/testscript11
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
+:
+$*
generated by cgit v1.1 at 2024-06-01 07:33:01 +0000