*** empty log message ***

diff --git a/src/interfaces/ecpg/TODO b/src/interfaces/ecpg/TODO
index 114500850c66f3a19f07042016fbe9d17a1eee56..f6e425b958a5800217acee99d8568c38633e2316 100644 (file)
--- a/src/interfaces/ecpg/TODO
+++ b/src/interfaces/ecpg/TODO
@@ -13,6 +13,8 @@ support for dynamic SQL with unknown number of variables with DESCRIPTORS
 
 The line numbering is not exact.
 
+Inside an SQL statement quoting only works with SQL92 style double quotes: ''. 
+
 Missing statements:
  - exec sql allocate
  - exec sql deallocate

diff --git a/src/interfaces/ecpg/lib/ecpglib.c b/src/interfaces/ecpg/lib/ecpglib.c
index b74febcd1cce7b8f95cda8c345781390119c63c4..0643571a0180785fabcd12bfeb3459555c56dc0a 100644 (file)
--- a/src/interfaces/ecpg/lib/ecpglib.c
+++ b/src/interfaces/ecpg/lib/ecpglib.c
@@ -241,41 +241,6 @@ quote_postgres(char *arg, int lineno)
    return res;
 }
 
-/* This function returns a newly malloced string that has the \
-   in the strings inside the argument quoted with another \.
- */
-static
-char *
-quote_strings(char *arg, int lineno)
-{
-   char       *res = (char *) ecpg_alloc(2 * strlen(arg) + 1, lineno);
-   int         i,
-               ri;
-   bool        string = false;
-
-   if (!res)
-       return (res);
-
-   for (i = 0, ri = 0; arg[i]; i++, ri++)
-   {
-       switch (arg[i])
-       {
-           case '\'':
-               string = string ? false : true;
-               break;
-           case '\\':
-               res[ri++] = '\\';
-           default:
-               ;
-       }
-
-       res[ri] = arg[i];
-   }
-   res[ri] = '\0';
-
-   return res;
-}
-
 /*
  * create a list of variables
  * The variables are listed with input variables preceeding outputvariables
@@ -544,17 +509,8 @@ ECPGexecute(struct statement * stmt)
 
                        strncpy(newcopy, (char *) var->value, slen);
                        newcopy[slen] = '\0';
-                       if (!(mallocedval = (char *) ecpg_alloc(2 * strlen(newcopy) + 1, stmt->lineno)))
-                           return false;
-
-                       tmp = quote_strings(newcopy, stmt->lineno);
-                       if (!tmp)
-                           return false;
 
-                       strcat(mallocedval, tmp);
-                       free(newcopy);
-
-                       tobeinserted = mallocedval;
+                       tobeinserted = newcopy;
                    }
                    break;
                case ECPGt_varchar:

diff --git a/src/interfaces/ecpg/preproc/Makefile b/src/interfaces/ecpg/preproc/Makefile
index 80ac7444b2ecb682e3cd38c1d40d8f898b7239de..26e1cf3f9024ae44c1ac23b2996eb4d4e6890e4e 100644 (file)
--- a/src/interfaces/ecpg/preproc/Makefile
+++ b/src/interfaces/ecpg/preproc/Makefile
@@ -9,8 +9,9 @@ CFLAGS+=-I../include -DMAJOR_VERSION=$(MAJOR_VERSION) \
    -DMINOR_VERSION=$(MINOR_VERSION) -DPATCHLEVEL=$(PATCHLEVEL) \
    -DINCLUDE_PATH=\"$(HEADERDIR)\"
 
-OBJ=preproc.o pgc.o type.o ecpg.o ecpg_keywords.o ../../../backend/parser/scansup.o \
+OBJ=preproc.o pgc.o type.o ecpg.o ecpg_keywords.o \
     keywords.o c_keywords.o ../lib/typename.o
+#../../../backend/parser/scansup.o
 
 all:: ecpg
 

diff --git a/src/interfaces/ecpg/preproc/pgc.l b/src/interfaces/ecpg/preproc/pgc.l
index 071dc4731d0fd731a2dd2098b0ce1cab98a2696b..1585e395b0cb729932a717df41c4866775115080 100644 (file)
--- a/src/interfaces/ecpg/preproc/pgc.l
+++ b/src/interfaces/ecpg/preproc/pgc.l
@@ -248,7 +248,8 @@ cppline     {space}*#.*(\\{space}*\n)*\n*
                }
 {xqstop}   {
                    BEGIN(SQL);
-                   yylval.str = mm_strdup(scanstr(literal));
+                   /* yylval.str = mm_strdup(scanstr(literal));*/
+                   yylval.str = mm_strdup(literal);
                    return SCONST;
                }
 {xqdouble} |
@@ -609,7 +610,8 @@ cppline     {space}*#.*(\\{space}*\n)*\n*
                                      if (strcmp(old, ptr->old) == 0)
                                      {
                    free(ptr->new);
-                   ptr->new = mm_strdup(scanstr(literal));
+                   /* ptr->new = mm_strdup(scanstr(literal));*/
+                   ptr->new = mm_strdup(literal);
                                      }
                                 }
                if (ptr == NULL)
@@ -618,7 +620,8 @@ cppline     {space}*#.*(\\{space}*\n)*\n*
 
                                         /* initial definition */
                                         this->old = old;
-                                        this->new = mm_strdup(scanstr(literal));
+                                        /* this->new = mm_strdup(scanstr(literal));*/
+                                        this->new = mm_strdup(literal);
                    this->next = defines;
                    defines = this;
                }

diff --git a/src/interfaces/ecpg/test/test1.pgc b/src/interfaces/ecpg/test/test1.pgc
index bed83f96380de3ba2564fca5d8c0ac22905ca9ad..9f7e2de52e8c28d6d1c121d4f221b1667d555281 100644 (file)
--- a/src/interfaces/ecpg/test/test1.pgc
+++ b/src/interfaces/ecpg/test/test1.pgc
@@ -6,7 +6,7 @@ exec sql include sqlca;
 exec sql define AMOUNT 4;
 
 exec sql type intarray is int[AMOUNT];
-exec sql type string is char(6); 
+exec sql type string is char(8); 
 
 typedef int intarray[AMOUNT];
 
@@ -16,7 +16,7 @@ main ()
 exec sql begin declare section;
         intarray amount;
    int increment=100;
-        char name[AMOUNT][6];
+        char name[AMOUNT][8];
    char letter[AMOUNT][1];
    char command[128];
 exec sql end declare section;
@@ -35,8 +35,8 @@ exec sql end declare section;
         exec sql connect to pm;
 
    strcpy(msg, "create");
-   exec sql at main create table test(name char(6), amount int, letter char(1));
-   exec sql create table test(name char(6), amount int, letter char(1));
+   exec sql at main create table test(name char(8), amount int, letter char(1));
+   exec sql create table test(name char(8), amount int, letter char(1));
 
    strcpy(msg, "commit");
    exec sql at main commit;
@@ -46,13 +46,13 @@ exec sql end declare section;
    exec sql set connection to main;
 
    strcpy(msg, "execute insert 1");
-        sprintf(command, "insert into test(name, amount, letter) values ('db: mm', 1, 'f')");
+        sprintf(command, "insert into test(name, amount, letter) values ('db: ''mm''', 1, 'f')");
         exec sql execute immediate :command;
-        sprintf(command, "insert into test(name, amount, letter) values ('db: mm', 2, 't')");
+        sprintf(command, "insert into test(name, amount, letter) values ('db: ''mm''', 2, 't')");
         exec sql execute immediate :command;
 
         strcpy(msg, "execute insert 2");
-        sprintf(command, "insert into test(name, amount, letter) values ('db: pm', 1, 'f')");
+        sprintf(command, "insert into test(name, amount, letter) values ('db: ''pm''', 1, 'f')");
         exec sql at pm execute immediate :command;
 
         strcpy(msg, "execute insert 3");
@@ -78,12 +78,12 @@ exec sql end declare section;
         exec sql select name, amount, letter into :name, :amount, :letter from test;
 
         for (i=0, j=sqlca.sqlerrd[2]; i
-            printf("name[%d]=%6.6s\tamount[%d]=%d\tletter[%d]=%c\n", i, name[i], i, amount[i],i, letter[i][0]);
+            printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, name[i], i, amount[i],i, letter[i][0]);
 
         exec sql at pm select name, amount, letter into :name, :amount, :letter from test;
 
         for (i=0, j=sqlca.sqlerrd[2]; i
-            printf("name[%d]=%6.6s\tamount[%d]=%d\tletter[%d]=%c\n", i, name[i], i, amount[i],i, letter[i][0]);
+            printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, name[i], i, amount[i],i, letter[i][0]);
         
    strcpy(msg, "drop");
    exec sql drop table test;


diff --git a/src/interfaces/ecpg/test/test3.pgc b/src/interfaces/ecpg/test/test3.pgc

index 03341221431a6dfb3d90c67014acf243dbc2fa4e..13786518f05e5b162936d66a78ef4d0bb6713fe5 100644 (file)

--- a/src/interfaces/ecpg/test/test3.pgc
+++ b/src/interfaces/ecpg/test/test3.pgc
@@ -18,7 +18,7 @@ exec sql begin declare section;
    int children;
    int ind_children;
    str *married = NULL;
-   char *testname="Petra";
+   char *wifesname="Petra";
    char *query="select name, born, age, married, children from meskes where name = :var1";
 exec sql end declare section;
 
@@ -32,13 +32,13 @@ exec sql end declare section;
                 ECPGdebug(1, dbgs);
 
    strcpy(msg, "connect");
-   exec sql connect to unix:postgresql://localhost:5432/mm; 
+   exec sql connect to unix:postgresql://localhost:5432/mm;
 
    strcpy(msg, "create");
    exec sql create table meskes(name char(8), born integer, age smallint, married date, children integer);
 
    strcpy(msg, "insert");
-   exec sql insert into meskes(name, married, children) values ('Petra', '19900404', 3);
+   exec sql insert into meskes(name, married, children) values (:wifesname, '19900404', 3);
    exec sql insert into meskes(name, born, age, married, children) values ('Michael', 19660117, 33, '19900404', 3);
    exec sql insert into meskes(name, born, age) values ('Carsten', 19910103, 8);
    exec sql insert into meskes(name, born, age) values ('Marc', 19930907, 5);
@@ -78,7 +78,7 @@ exec sql end declare section;
    exec sql declare prep cursor for MM;
 
    strcpy(msg, "open");
-   exec sql open prep using :testname;
+   exec sql open prep using :wifesname;
 
    exec sql whenever not found do break;
 

diff --git a/src/interfaces/ecpg/test/test3.pgc b/src/interfaces/ecpg/test/test3.pgc
index 03341221431a6dfb3d90c67014acf243dbc2fa4e..13786518f05e5b162936d66a78ef4d0bb6713fe5 100644 (file)
--- a/src/interfaces/ecpg/test/test3.pgc
+++ b/src/interfaces/ecpg/test/test3.pgc
@@ -18,7 +18,7 @@ exec sql begin declare section;
    int children;
    int ind_children;
    str *married = NULL;
-   char *testname="Petra";
+   char *wifesname="Petra";
    char *query="select name, born, age, married, children from meskes where name = :var1";
 exec sql end declare section;
 
@@ -32,13 +32,13 @@ exec sql end declare section;
                 ECPGdebug(1, dbgs);
 
    strcpy(msg, "connect");
-   exec sql connect to unix:postgresql://localhost:5432/mm; 
+   exec sql connect to unix:postgresql://localhost:5432/mm;
 
    strcpy(msg, "create");
    exec sql create table meskes(name char(8), born integer, age smallint, married date, children integer);
 
    strcpy(msg, "insert");
-   exec sql insert into meskes(name, married, children) values ('Petra', '19900404', 3);
+   exec sql insert into meskes(name, married, children) values (:wifesname, '19900404', 3);
    exec sql insert into meskes(name, born, age, married, children) values ('Michael', 19660117, 33, '19900404', 3);
    exec sql insert into meskes(name, born, age) values ('Carsten', 19910103, 8);
    exec sql insert into meskes(name, born, age) values ('Marc', 19930907, 5);
@@ -78,7 +78,7 @@ exec sql end declare section;
    exec sql declare prep cursor for MM;
 
    strcpy(msg, "open");
-   exec sql open prep using :testname;
+   exec sql open prep using :wifesname;
 
    exec sql whenever not found do break;