summaryrefslogtreecommitdiff
path: root/src/interfaces/ecpg/test
diff options
context:
space:
mode:
authorMichael Meskes <meskes@postgresql.org>2003-03-20 15:56:50 +0000
committerMichael Meskes <meskes@postgresql.org>2003-03-20 15:56:50 +0000
commit2e6f97560a837f692a143d74c0255b4c92c1bbdb (patch)
tree29103e353c5fd2ddd5795c40566bab2641d19ec8 /src/interfaces/ecpg/test
parent26a6378e842db462114b267a0a94c7723e6583c2 (diff)
downloadpostgresql-2e6f97560a837f692a143d74c0255b4c92c1bbdb.tar.gz
Started adding date and timestamp.
Diffstat (limited to 'src/interfaces/ecpg/test')
-rw-r--r--src/interfaces/ecpg/test/Makefile4
-rw-r--r--src/interfaces/ecpg/test/dt_test.pgc51
-rw-r--r--src/interfaces/ecpg/test/num_test.pgc8
3 files changed, 61 insertions, 2 deletions
diff --git a/src/interfaces/ecpg/test/Makefile b/src/interfaces/ecpg/test/Makefile
index 7c9c0d1edc..c6424910ab 100644
--- a/src/interfaces/ecpg/test/Makefile
+++ b/src/interfaces/ecpg/test/Makefile
@@ -1,4 +1,4 @@
-# $Header: /cvsroot/pgsql/src/interfaces/ecpg/test/Makefile,v 1.34 2003/03/16 10:42:54 meskes Exp $
+# $Header: /cvsroot/pgsql/src/interfaces/ecpg/test/Makefile,v 1.35 2003/03/20 15:56:50 meskes Exp $
subdir = src/interfaces/ecpg/test
top_builddir = ../../../..
@@ -8,7 +8,7 @@ override CPPFLAGS := -I$(srcdir)/../include $(CPPFLAGS) -g
ECPG = ../preproc/ecpg -I$(srcdir)/../include
-TESTS = test1 test2 test3 test4 perftest dyntest dyntest2 test_notice test_code100 test_init testdynalloc num_test
+TESTS = test1 test2 test3 test4 perftest dyntest dyntest2 test_notice test_code100 test_init testdynalloc num_test dt_test
all: $(TESTS)
diff --git a/src/interfaces/ecpg/test/dt_test.pgc b/src/interfaces/ecpg/test/dt_test.pgc
new file mode 100644
index 0000000000..34f520f891
--- /dev/null
+++ b/src/interfaces/ecpg/test/dt_test.pgc
@@ -0,0 +1,51 @@
+#include <stdio.h>
+#include <pgtypes_date.h>
+#include <pgtypes_timestamp.h>
+
+int
+main()
+{
+ exec sql begin declare section;
+ date date1;
+ timestamp ts1;
+ char *text;
+ exec sql end declare section;
+#if 0
+ Date date2;
+ short int mdy[3] = { 4, 19, 1998 };
+#endif
+ FILE *dbgs;
+
+ if ((dbgs = fopen("log", "w")) != NULL)
+ ECPGdebug(1, dbgs);
+ exec sql whenever sqlerror do sqlprint();
+ exec sql connect to mm;
+ exec sql create table date_test (d date, ts timestamp);
+
+ exec sql insert into date_test(d, ts) values ('Mon Jan 17 1966', '2000-7-12 17:34:29');
+
+ exec sql select * into :date1, :ts1 from date_test;
+
+ text = PGTYPESdate_dtoa(date1);
+ printf ("Date: %s\n", text);
+ ts1 = PGTYPEStimestamp_atot("2000-7-12 17:34:29", NULL);
+ text = PGTYPEStimestamp_ttoa(ts1);
+ printf ("timestamp: %s\n", text);
+#if 0
+ PGTYPESdate_mdyjul(mdy, &date2);
+ printf("m: %d, d: %d, y: %d\n", mdy[0], mdy[1], mdy[2]);
+ /* reset */
+ mdy[0] = mdy[1] = mdy[2] = 0;
+
+ PGTYPESdate_julmdy(date2, mdy);
+ printf("m: %d, d: %d, y: %d\n", mdy[0], mdy[1], mdy[2]);
+#endif
+ exec sql rollback;
+ exec sql disconnect;
+
+ if (dbgs != NULL)
+ fclose(dbgs);
+
+ return (0);
+}
+
diff --git a/src/interfaces/ecpg/test/num_test.pgc b/src/interfaces/ecpg/test/num_test.pgc
index f81b81b915..f534df5da2 100644
--- a/src/interfaces/ecpg/test/num_test.pgc
+++ b/src/interfaces/ecpg/test/num_test.pgc
@@ -8,6 +8,7 @@ main()
NumericVar *value1, *value2, *res;
exec sql begin declare section;
decimal(14,7) des = {0, 0, 0, 0, 0, NULL, NULL} ;
+ numeric num;
exec sql end declare section;
double d;
FILE *dbgs;
@@ -52,6 +53,13 @@ main()
text = PGTYPESnumeric_ntoa(res);
PGTYPESnumeric_ntod(res, &d);
printf("div = %s %e\n", text, d);
+
+ exec sql rollback;
+ exec sql disconnect;
+
+ if (dbgs != NULL)
+ fclose(dbgs);
+
return (0);
}