Update of /cvsroot/monetdb/sql/src/backends/monet4
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv14477/src/backends/monet4
Modified Files:
Tag: SQL_2-22
sql_gencode.mx sql_result.mx sql_server.mx
Log Message:
fixed bug in copy into, we now properly pass the schema(name) to the mil/mal
level.
Index: sql_result.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet4/sql_result.mx,v
retrieving revision 1.80.2.1
retrieving revision 1.80.2.2
diff -u -d -r1.80.2.1 -r1.80.2.2
--- sql_result.mx 15 Feb 2008 14:24:44 -0000 1.80.2.1
+++ sql_result.mx 21 Mar 2008 08:38:57 -0000 1.80.2.2
@@ -34,7 +34,7 @@
extern int mvc_export_prepare(mvc *c, stream *s, cq *q, str w);
extern int mvc_export_chunk(mvc *m, stream *s, int res_id, size_t offset,
size_t nr);
-extern BAT *mvc_import_table(mvc *c, bstream *s, char *tname, char *sep, char
*rsep, char *ssep, int nr, int offset);
+extern BAT *mvc_import_table(mvc *c, bstream *s, char *sname, char *tname,
char *sep, char *rsep, char *ssep, int nr, int offset);
extern int mvc_result_table(mvc *m, int nr_cols, int type, BAT *order);
extern int mvc_result_column(mvc *m, char *tn, char *name, char *typename, int
digits, int scale, BAT *b);
@@ -454,10 +454,11 @@
BAT *
-mvc_import_table(mvc *m, bstream *bs, char *tname, char *sep, char *rsep, char
*ssep, int sz, int offset)
+mvc_import_table(mvc *m, bstream *bs, char *sname, char *tname, char *sep,
char *rsep, char *ssep, int sz, int offset)
{
int i = 0;
- sql_table *t = mvc_bind_table(m, m->session->schema, tname);
+ sql_schema *s = mvc_bind_schema(m, sname);
+ sql_table *t = mvc_bind_table(m, s, tname);
node *n;
BAT *bats = NULL;
ascii as;
Index: sql_server.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet4/sql_server.mx,v
retrieving revision 1.189.2.6
retrieving revision 1.189.2.7
diff -u -d -r1.189.2.6 -r1.189.2.7
--- sql_server.mx 6 Mar 2008 21:28:39 -0000 1.189.2.6
+++ sql_server.mx 21 Mar 2008 08:38:57 -0000 1.189.2.7
@@ -150,7 +150,7 @@
.COMMAND mvc_export_value(mvc m, Stream s, int qtype, str tname, str
name, str typename, int digits, int scale, int eclass, any val, str w) =
mvc_export_value_wrap; "export a single value onto the stream s"
- .COMMAND mvc_import_table( mvc c, Bstream s, str tname, str sep, str
rsep, str ssep, int nr, int offset) : BAT[str,BAT] = mvc_import_table_wrap;
+ .COMMAND mvc_import_table( mvc c, Bstream s, str sname, str tname, str
sep, str rsep, str ssep, int nr, int offset) : BAT[str,BAT] =
mvc_import_table_wrap;
"import a table from stream s with the given tuple and record
seperators (sep/rsep)"
@= mel_round
@@ -798,9 +798,9 @@
}
int
-mvc_import_table_wrap(BAT **res, mvc *c, Bstream *s, str tname, str sep, str
rsep, str ssep, int *sz, int *offset)
+mvc_import_table_wrap(BAT **res, mvc *c, Bstream *s, str sname, str tname, str
sep, str rsep, str ssep, int *sz, int *offset)
{
- *res = mvc_import_table(*(mvc **) c, *(bstream **) s, tname, sep, rsep,
ssep, *sz, *offset);
+ *res = mvc_import_table(*(mvc **) c, *(bstream **) s, sname, tname,
sep, rsep, ssep, *sz, *offset);
if (*res == NULL) {
GDKerror("importTable: failed to import table");
return GDK_FAIL;
Index: sql_gencode.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet4/sql_gencode.mx,v
retrieving revision 1.168.2.1
retrieving revision 1.168.2.2
diff -u -d -r1.168.2.1 -r1.168.2.2
--- sql_gencode.mx 15 Feb 2008 14:24:44 -0000 1.168.2.1
+++ sql_gencode.mx 21 Mar 2008 08:38:56 -0000 1.168.2.2
@@ -1185,6 +1185,7 @@
dump_2(sql, s, "find", nr);
break;
case st_import:{
+ char *sname = s->op1.stval->op1.tval->s->base.name;
char *tname = s->op1.stval->op1.tval->base.name;
node *n = s->op2.lval->h;
char *sep = n->data;
@@ -1203,14 +1204,14 @@
assert(len <= buflen);
len += snprintf(buf + len, buflen - len, "var
f%d := bstream_create(f%ds, 1024*1024);\n", file, file);
assert(len <= buflen);
- len += snprintf(buf + len, buflen - len, "var
s%d := mvc_import_table( myc, f%d, \"%s\", \"%s\", \"%s\", \"%s\", %d, %d);\n",
-s->nr, file, tname, sep, rsep, ssep, nr_rec, offset);
+ len += snprintf(buf + len, buflen - len, "var
s%d := mvc_import_table( myc, f%d, \"%s\", \"%s\", \"%s\", \"%s\", \"%s\", %d,
%d);\n", -s->nr, file, sname, tname, sep, rsep, ssep, nr_rec, offset);
assert(len <= buflen);
len += snprintf(buf + len, buflen - len,
"bstream_destroy(f%d);\n", file);
assert(len <= buflen);
len += snprintf(buf + len, buflen - len,
"stream_close(f%ds);\n", file);
assert(len <= buflen);
} else {
- len += snprintf(buf + len, buflen - len, "var
s%d := mvc_import_table( myc, Input, \"%s\", \"%s\", \"%s\", \"%s\", %d,
%d);\n", -s->nr, tname, sep, rsep, ssep, nr_rec, offset);
+ len += snprintf(buf + len, buflen - len, "var
s%d := mvc_import_table( myc, Input, \"%s\", \"%s\", \"%s\", \"%s\", \"%s\",
%d, %d);\n", -s->nr, sname, tname, sep, rsep, ssep, nr_rec, offset);
assert(len <= buflen);
}
dump(sql, buf, len, -s->nr);
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins
