Create a real prototype function for describe.

This commit is contained in:
Michael Meskes 2003-05-30 13:22:02 +00:00
parent a0fed291dc
commit 776d530924
5 changed files with 32 additions and 18 deletions

View File

@ -1464,6 +1464,10 @@ Fri May 30 10:29:49 CEST 2003
- Synced parser.
- Added a dummy rule for EXEC SQL DESCRIBE that throws an error
message.
Fri May 30 15:19:39 CEST 2003
- Implemented prototype describe function.
- Some minor cleanup/bug fixing.
- Set ecpg version to 2.12.0.
- Set ecpg library to 3.4.2.

View File

@ -1,6 +1,6 @@
/* dynamic SQL support routines
*
* $Header: /cvsroot/pgsql/src/interfaces/ecpg/ecpglib/descriptor.c,v 1.1 2003/03/16 10:42:53 meskes Exp $
* $Header: /cvsroot/pgsql/src/interfaces/ecpg/ecpglib/descriptor.c,v 1.2 2003/05/30 13:22:02 meskes Exp $
*/
#include "postgres_fe.h"
@ -447,3 +447,10 @@ ECPGdescriptor_lvalue(int line, const char *descriptor)
ECPGraise(line, ECPG_UNKNOWN_DESCRIPTOR, (char *) descriptor);
return NULL;
}
bool
ECPGdescribe(int line, bool input, const char *statement, ...)
{
ECPGlog("ECPGdescribe called on line %d for %s in %s\n", line, (input) ? "input" : "output", statement);
return false;
}

View File

@ -72,6 +72,8 @@ void ECPGraise(int line, int code, const char *str);
bool ECPGget_desc_header(int, char *, int *);
bool ECPGget_desc(int, char *, int,...);
bool ECPGdescribe(int, bool, const char *, ...);
/* dynamic result allocation */
void ECPGfree_auto_mem(void);

View File

@ -15,7 +15,7 @@ output_simple_statement(char *cmd)
int i,
j = strlen(cmd);;
/* do this char by char as we have to filter '\"' */
/* output this char by char as we have to filter '\"' */
for (i = 0; i < j; i++)
{
if (cmd[i] != '"')
@ -111,7 +111,7 @@ output_statement(char *stmt, int mode, char *con)
fprintf(yyout, "{ ECPGdo(__LINE__, %s, \"", con ? con : "NULL");
/* do this char by char as we have to filter '\"' */
/* output this char by char as we have to filter '\"' */
for (i = 0; i < j; i++)
{
if (stmt[i] != '"')

View File

@ -1,4 +1,4 @@
/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.226 2003/05/30 08:39:01 meskes Exp $ */
/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.227 2003/05/30 13:22:02 meskes Exp $ */
/* Copyright comment */
%{
@ -438,18 +438,17 @@ create_questionmarks(char *name, bool array)
%type <str> ECPGFree ECPGDeclare ECPGVar opt_at enum_definition
%type <str> struct_union_type s_struct_union vt_declarations
%type <str> var_declaration type_declaration single_vt_declaration
%type <str> ECPGSetAutocommit on_off variable_declarations
%type <str> ECPGSetAutocommit on_off variable_declarations ECPGDescribe
%type <str> ECPGAllocateDescr ECPGDeallocateDescr symbol opt_output
%type <str> ECPGGetDescriptorHeader ECPGColLabel single_var_declaration
%type <str> reserved_keyword unreserved_keyword ecpg_interval
%type <str> col_name_keyword func_name_keyword precision opt_scale
%type <str> ECPGTypeName variablelist ECPGColLabelCommon c_variable
%type <str> inf_val_list inf_col_list using_descriptor ECPGDescribe
%type <str> into_descriptor
%type <str> inf_val_list inf_col_list using_descriptor into_descriptor
%type <struct_union> s_struct_union_symbol
%type <descriptor> ECPGGetDescriptor
%type <descriptor> ECPGGetDescriptor
%type <type_enum> simple_type signed_type unsigned_type
@ -617,10 +616,12 @@ stmt: AlterDatabaseSetStmt { output_statement($1, 0, connection); }
}
| ECPGDescribe
{
if (connection)
mmerror(PARSE_ERROR, ET_ERROR, "no at option for describe statement.\n");
fprintf(yyout, "{ /* ECPGdescribe(__LINE__, %s) */;", $1);
fprintf(yyout, "{ ECPGdescribe(__LINE__, %s,", $1);
dump_variables(argsresult, 1);
fputs("ECPGt_EORT);", yyout);
fprintf(yyout, "}");
output_line_number();
/* whenever_action(2); */
free($1);
}
@ -5186,18 +5187,18 @@ ECPGPrepare: PREPARE name FROM execstring
*/
ECPGDescribe: SQL_DESCRIBE INPUT_P name using_descriptor
{
mmerror(PARSE_ERROR, ET_ERROR, "using unsupported describe statement.\n");
$$ = cat_str(3, make_str("input"), $3, $4);
mmerror(PARSE_ERROR, ET_WARNING, "using unsupported describe statement.\n");
$$ = cat_str(3, make_str("1, ECPGprepared_statement(\""), $3, make_str("\")"));
}
| SQL_DESCRIBE opt_output name using_descriptor
{
mmerror(PARSE_ERROR, ET_ERROR, "using unsupported describe statement.\n");
$$ = cat_str(3, $2, $3, $4);
mmerror(PARSE_ERROR, ET_WARNING, "using unsupported describe statement.\n");
$$ = cat_str(3, make_str("0, ECPGprepared_statement(\""), $3, make_str("\")"));
}
| SQL_DESCRIBE opt_output name into_descriptor
{
mmerror(PARSE_ERROR, ET_ERROR, "using unsupported describe statement.\n");
$$ = cat_str(3, $2, $3, $4);
mmerror(PARSE_ERROR, ET_WARNING, "using unsupported describe statement.\n");
$$ = cat_str(3, make_str("0, ECPGprepared_statement(\""), $3, make_str("\")"));
}
;