Files
libreoffice/connectivity/source/parse/sqlbison.y

3657 lines
89 KiB
Plaintext
Raw Normal View History

2000-09-18 15:18:56 +00:00
%{
//--------------------------------------------------------------------------
//
// $Header: /zpool/svn/migration/cvs_rep_09_09_08/code/connectivity/source/parse/sqlbison.y,v 1.54 2006-07-13 15:14:39 obo Exp $
2000-09-18 15:18:56 +00:00
//
// Copyright 2000 Sun Microsystems, Inc. All Rights Reserved.
//
// First creation:
2000-09-18 15:18:56 +00:00
// OJ
//
// Last change:
// $Author: obo $ $Date: 2006-07-13 15:14:39 $ $Revision: 1.54 $
2000-09-18 15:18:56 +00:00
//
// Description:
//
//
//--------------------------------------------------------------------------
#include <vector>
#ifndef _CONNECTIVITY_SQLNODE_HXX
#include <connectivity/sqlnode.hxx>
#endif
#ifndef _CONNECTIVITY_SQLPARSE_HXX
#include <connectivity/sqlparse.hxx>
#endif
#ifndef _CONNECTIVITY_SQLINTERNALNODE_HXX
#include <internalnode.hxx>
#endif
#ifndef _COM_SUN_STAR_LANG_LOCALE_HPP_
#include <com/sun/star/lang/Locale.hpp>
#endif
#ifndef _COM_SUN_STAR_SDBC_DATATYPE_HPP_
#include <com/sun/star/sdbc/DataType.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_DATE_HPP_
#include <com/sun/star/util/Date.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_DATETIME_HPP_
#include <com/sun/star/util/DateTime.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_TIME_HPP_
#include <com/sun/star/util/Time.hpp>
#endif
2000-09-18 15:18:56 +00:00
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATTER_HPP_
#include <com/sun/star/util/XNumberFormatter.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATSSUPPLIER_HPP_
#include <com/sun/star/util/XNumberFormatsSupplier.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATS_HPP_
#include <com/sun/star/util/XNumberFormats.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_NUMBERFORMAT_HPP_
#include <com/sun/star/util/NumberFormat.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_XNUMBERFORMATTYPES_HPP_
#include <com/sun/star/util/XNumberFormatTypes.hpp>
#endif
#ifndef _COM_SUN_STAR_BEANS_XPROPERTYSET_HPP_
#include <com/sun/star/beans/XPropertySet.hpp>
#endif
#ifndef _COM_SUN_STAR_I18N_KPARSETYPE_HPP_
#include <com/sun/star/i18n/KParseType.hpp>
#endif
#ifndef _COM_SUN_STAR_I18N_KPARSETOKENS_HPP_
#include <com/sun/star/i18n/KParseTokens.hpp>
#endif
2000-09-18 15:18:56 +00:00
#ifndef _CONNECTIVITY_SQLSCAN_HXX
#include "sqlscan.hxx"
#endif
#ifndef _OSL_DIAGNOSE_H_
#include <osl/diagnose.h>
#endif
#ifndef _DBHELPER_DBCONVERSION_HXX_
#include "connectivity/dbconversion.hxx"
#endif
2000-09-18 15:18:56 +00:00
#if defined __GNUC__
#pragma GCC system_header
#elif defined __SUNPRO_CC
#pragma disable_warn
#elif defined _MSC_VER
#pragma warning(push, 1)
#pragma warning(disable:4701)
#endif
2000-10-19 10:47:14 +00:00
static ::rtl::OUString aEmptyString;
2000-09-18 15:18:56 +00:00
static connectivity::OSQLInternalNode* newNode(const sal_Char* pNewValue,
const connectivity::SQLNodeType eNodeType,
const sal_uInt32 nNodeID = 0)
{
return new connectivity::OSQLInternalNode(pNewValue, eNodeType, nNodeID);
}
2000-09-18 15:18:56 +00:00
2000-10-19 10:47:14 +00:00
static connectivity::OSQLInternalNode* newNode(const ::rtl::OString& _NewValue,
2000-09-18 15:18:56 +00:00
const connectivity::SQLNodeType eNodeType,
const sal_uInt32 nNodeID = 0)
{
return new connectivity::OSQLInternalNode(_NewValue, eNodeType, nNodeID);
}
2000-09-18 15:18:56 +00:00
2000-10-19 10:47:14 +00:00
static connectivity::OSQLInternalNode* newNode(const ::rtl::OUString& _NewValue,
2000-09-18 15:18:56 +00:00
const connectivity::SQLNodeType eNodeType,
const sal_uInt32 nNodeID = 0)
{
return new connectivity::OSQLInternalNode(_NewValue, eNodeType, nNodeID);
}
2000-09-18 15:18:56 +00:00
// yyi ist die interne Nr. der Regel, die gerade reduziert wird.
// Ueber die Mapping-Tabelle yyrmap wird daraus eine externe Regel-Nr.
#define SQL_NEW_RULE newNode(aEmptyString, SQL_NODE_RULE, yyr1[yyn])
#define SQL_NEW_LISTRULE newNode(aEmptyString, SQL_NODE_LISTRULE, yyr1[yyn])
#define SQL_NEW_COMMALISTRULE newNode(aEmptyString, SQL_NODE_COMMALISTRULE, yyr1[yyn])
connectivity::OSQLParser* xxx_pGLOBAL_SQLPARSER;
#define YYERROR_VERBOSE
#define SQLyyerror(s) \
{ \
xxx_pGLOBAL_SQLPARSER->error(s); \
}
using namespace connectivity;
#define SQLyylex xxx_pGLOBAL_SQLPARSER->SQLlex
%}
/* symbolic tokens */
%union {
connectivity::OSQLParseNode * pParseNode;
}
%type <pParseNode> '(' ')' ',' ':' ';' '?' '[' ']' '{' '}' '.'
%token <pParseNode> SQL_TOKEN_STRING SQL_TOKEN_ACCESS_DATE SQL_TOKEN_INT SQL_TOKEN_REAL_NUM
%token <pParseNode> SQL_TOKEN_INTNUM SQL_TOKEN_APPROXNUM SQL_TOKEN_NOT SQL_TOKEN_NAME
%nonassoc <pParseNode> SQL_TOKEN_UMINUS
/* literal keyword tokens */
%token <pParseNode> SQL_TOKEN_ALL SQL_TOKEN_ALTER SQL_TOKEN_AMMSC SQL_TOKEN_ANY SQL_TOKEN_AS SQL_TOKEN_ASC SQL_TOKEN_AT SQL_TOKEN_AUTHORIZATION SQL_TOKEN_AVG
%token <pParseNode> SQL_TOKEN_BETWEEN SQL_TOKEN_BIT SQL_TOKEN_BOTH SQL_TOKEN_BY
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_CAST SQL_TOKEN_CHARACTER SQL_TOKEN_CHECK SQL_TOKEN_COLLATE SQL_TOKEN_COMMIT SQL_TOKEN_CONTINUE SQL_TOKEN_CONVERT SQL_TOKEN_COUNT SQL_TOKEN_CREATE SQL_TOKEN_CROSS
%token <pParseNode> SQL_TOKEN_CURRENT SQL_TOKEN_CURSOR
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_DATE SQL_TOKEN_DATEVALUE SQL_TOKEN_DAY SQL_TOKEN_DEC SQL_TOKEN_DECIMAL SQL_TOKEN_DECLARE SQL_TOKEN_DEFAULT SQL_TOKEN_DELETE SQL_TOKEN_DESC
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_DISTINCT SQL_TOKEN_DOUBLE SQL_TOKEN_DROP
%token <pParseNode> SQL_TOKEN_ESCAPE SQL_TOKEN_EXCEPT SQL_TOKEN_EXISTS SQL_TOKEN_FALSE SQL_TOKEN_FETCH SQL_TOKEN_FLOAT SQL_TOKEN_FOR SQL_TOKEN_FOREIGN SQL_TOKEN_FOUND SQL_TOKEN_FROM SQL_TOKEN_FULL
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_GRANT SQL_TOKEN_GROUP SQL_TOKEN_HAVING SQL_TOKEN_IN SQL_TOKEN_INDICATOR SQL_TOKEN_INNER SQL_TOKEN_INTEGER SQL_TOKEN_INTO SQL_TOKEN_IS SQL_TOKEN_INTERSECT
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_JOIN SQL_TOKEN_KEY SQL_TOKEN_LEADING SQL_TOKEN_LIKE SQL_TOKEN_LOCAL SQL_TOKEN_LOWER
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_MAX SQL_TOKEN_MIN SQL_TOKEN_NATURAL SQL_TOKEN_NCHAR SQL_TOKEN_NULL SQL_TOKEN_NUMERIC
%token <pParseNode> SQL_TOKEN_OCTET_LENGTH SQL_TOKEN_OF SQL_TOKEN_ON SQL_TOKEN_OPTION SQL_TOKEN_ORDER SQL_TOKEN_OUTER
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_PRECISION SQL_TOKEN_PRIMARY SQL_TOKEN_PRIVILEGES SQL_TOKEN_PROCEDURE SQL_TOKEN_PUBLIC
%token <pParseNode> SQL_TOKEN_REAL SQL_TOKEN_REFERENCES SQL_TOKEN_ROLLBACK
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_SCHEMA SQL_TOKEN_SELECT SQL_TOKEN_SET SQL_TOKEN_SIZE SQL_TOKEN_SMALLINT SQL_TOKEN_SOME SQL_TOKEN_SQLCODE SQL_TOKEN_SQLERROR SQL_TOKEN_SUM
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_TABLE SQL_TOKEN_TIME SQL_TOKEN_TIMESTAMP SQL_TOKEN_TIMEZONE_HOUR SQL_TOKEN_TIMEZONE_MINUTE SQL_TOKEN_TO SQL_TOKEN_TRAILING SQL_TOKEN_TRANSLATE SQL_TOKEN_TRIM SQL_TOKEN_TRUE SQL_TOKEN_UNION
%token <pParseNode> SQL_TOKEN_UNIQUE SQL_TOKEN_UNKNOWN SQL_TOKEN_UPDATE SQL_TOKEN_UPPER SQL_TOKEN_USAGE SQL_TOKEN_USER SQL_TOKEN_USING SQL_TOKEN_VALUES SQL_TOKEN_VIEW
%token <pParseNode> SQL_TOKEN_WHERE SQL_TOKEN_WITH SQL_TOKEN_WORK SQL_TOKEN_ZONE
2000-09-18 15:18:56 +00:00
/* ODBC KEYWORDS */
2001-09-28 08:25:10 +00:00
%token <pParseNode> SQL_TOKEN_CALL SQL_TOKEN_D SQL_TOKEN_FN SQL_TOKEN_T SQL_TOKEN_TS SQL_TOKEN_OJ
/* string functions */
%token <pParseNode> SQL_TOKEN_ASCII SQL_TOKEN_BIT_LENGTH SQL_TOKEN_CHAR SQL_TOKEN_CHAR_LENGTH SQL_TOKEN_CHARACTER_LENGTH
%token <pParseNode> SQL_TOKEN_CONCAT
%token <pParseNode> SQL_TOKEN_DIFFERENCE SQL_TOKEN_INSERT SQL_TOKEN_LCASE SQL_TOKEN_LEFT SQL_TOKEN_LENGTH SQL_TOKEN_LOCATE
%token <pParseNode> SQL_TOKEN_LOCATE_2 SQL_TOKEN_LTRIM SQL_TOKEN_POSITION SQL_TOKEN_REPEAT SQL_TOKEN_REPLACE
2001-09-28 08:25:10 +00:00
%token <pParseNode> SQL_TOKEN_RIGHT SQL_TOKEN_RTRIM SQL_TOKEN_SOUNDEX SQL_TOKEN_SPACE SQL_TOKEN_SUBSTRING SQL_TOKEN_UCASE
/* time and date functions */
%token <pParseNode> SQL_TOKEN_CURRENT_DATE SQL_TOKEN_CURRENT_TIME SQL_TOKEN_CURRENT_TIMESTAMP SQL_TOKEN_CURDATE SQL_TOKEN_CURTIME
%token <pParseNode> SQL_TOKEN_DAYNAME SQL_TOKEN_DAYOFMONTH SQL_TOKEN_DAYOFWEEK SQL_TOKEN_DAYOFYEAR SQL_TOKEN_EXTRACT
%token <pParseNode> SQL_TOKEN_HOUR SQL_TOKEN_MINUTE SQL_TOKEN_MONTH SQL_TOKEN_MONTHNAME SQL_TOKEN_NOW SQL_TOKEN_QUARTER
%token <pParseNode> SQL_TOKEN_SECOND SQL_TOKEN_TIMESTAMPADD SQL_TOKEN_TIMESTAMPDIFF SQL_TOKEN_TIMEVALUE SQL_TOKEN_WEEK SQL_TOKEN_YEAR
2001-09-28 08:25:10 +00:00
/* numeric functions */
%token <pParseNode> SQL_TOKEN_ABS SQL_TOKEN_ACOS SQL_TOKEN_ASIN SQL_TOKEN_ATAN SQL_TOKEN_ATAN2 SQL_TOKEN_CEILING
%token <pParseNode> SQL_TOKEN_COS SQL_TOKEN_COT SQL_TOKEN_DEGREES SQL_TOKEN_EXP SQL_TOKEN_DIV SQL_TOKEN_FLOOR SQL_TOKEN_LOGF SQL_TOKEN_LN
2001-09-28 08:25:10 +00:00
%token <pParseNode> SQL_TOKEN_LOG10 SQL_TOKEN_MOD SQL_TOKEN_PI SQL_TOKEN_POWER SQL_TOKEN_RADIANS SQL_TOKEN_RAND
%token <pParseNode> SQL_TOKEN_ROUND SQL_TOKEN_SIGN SQL_TOKEN_SIN SQL_TOKEN_SQRT SQL_TOKEN_TAN SQL_TOKEN_TRUNCATE
2000-09-18 15:18:56 +00:00
/* operators */
%left SQL_TOKEN_NAME
%left <pParseNode> SQL_TOKEN_OR
%left <pParseNode> SQL_TOKEN_AND
%left <pParseNode> SQL_LESSEQ SQL_GREATEQ SQL_NOTEQUAL SQL_LESS SQL_GREAT SQL_EQUAL /* '<' '>' = <> < > <= >= != */
%left <pParseNode> '+' '-'
%left <pParseNode> '*' '/'
%left SQL_TOKEN_NATURAL SQL_TOKEN_CROSS SQL_TOKEN_FULL SQL_TOKEN_LEFT SQL_TOKEN_RIGHT
%left ')'
%right '='
%right '.'
%right '('
2000-09-18 15:18:56 +00:00
%token <pParseNode> SQL_TOKEN_INVALIDSYMBOL
/*%type <pParseNode> sql_single_statement */
%type <pParseNode> sql /*schema */
%type <pParseNode> column_def_opt_list column_def_opt table_constraint_def column_commalist
%type <pParseNode> view_def opt_with_check_option opt_column_commalist privilege_def
%type <pParseNode> opt_with_grant_option privileges operation_commalist operation
%type <pParseNode> grantee_commalist grantee opt_order_by_clause ordering_spec_commalist
%type <pParseNode> ordering_spec opt_asc_desc manipulative_statement commit_statement
%type <pParseNode> /*delete_statement_positioned*/ delete_statement_searched fetch_statement
%type <pParseNode> insert_statement values_or_query_spec
%type <pParseNode> rollback_statement select_statement_into opt_all_distinct
%type <pParseNode> /*update_statement_positioned*/ assignment_commalist assignment
%type <pParseNode> update_statement_searched target_commalist target opt_where_clause
%type <pParseNode> select_statement selection table_exp from_clause table_ref_commalist table_ref
%type <pParseNode> where_clause opt_group_by_clause column_ref_commalist opt_having_clause
%type <pParseNode> search_condition predicate comparison_predicate between_predicate
%type <pParseNode> like_predicate opt_escape test_for_null in_predicate
%type <pParseNode> all_or_any_predicate any_all_some existence_test subquery
%type <pParseNode> scalar_exp_commalist parameter_ref literal
2000-09-18 15:18:56 +00:00
%type <pParseNode> column_ref data_type column cursor parameter range_variable user /*like_check*/
/* neue Regeln bei OJ */
%type <pParseNode> derived_column as_clause table_name num_primary term num_value_exp
%type <pParseNode> value_exp_primary num_value_fct unsigned_value_spec cast_spec set_fct_spec scalar_subquery
%type <pParseNode> position_exp extract_exp length_exp general_value_spec
%type <pParseNode> general_set_fct set_fct_type query_exp non_join_query_exp joined_table
%type <pParseNode> non_join_query_term non_join_query_primary simple_table
%type <pParseNode> table_value_const_list row_value_constructor row_value_const_list row_value_constructor_elem
%type <pParseNode> qualified_join value_exp query_term join_type outer_join_type join_condition boolean_term
%type <pParseNode> boolean_factor truth_value boolean_test boolean_primary named_columns_join join_spec
%type <pParseNode> cast_operand cast_target factor datetime_value_exp /*interval_value_exp*/ datetime_term datetime_factor
%type <pParseNode> datetime_primary datetime_value_fct time_zone time_zone_specifier /*interval_term*/ /*interval_qualifier*/
%type <pParseNode> /*start_field*/ non_second_datetime_field /*end_field*/ /*single_datetime_field*/ extract_field datetime_field time_zone_field
%type <pParseNode> extract_source char_length_exp octet_length_exp bit_length_exp select_sublist string_value_exp
%type <pParseNode> char_value_exp concatenation char_factor char_primary string_value_fct char_substring_fct fold
%type <pParseNode> form_conversion char_translation trim_fct trim_operands trim_spec bit_value_fct bit_substring_fct op_column_commalist
%type <pParseNode> /*bit_concatenation*/ bit_value_exp bit_factor bit_primary collate_clause char_value_fct unique_spec value_exp_commalist in_predicate_value unique_test update_source
%type <pParseNode> function_arg_commalist3 string_function_3Argument function_arg_commalist4 string_function_4Argument function_arg_commalist2 string_function_1Argument string_function_2Argument
%type <pParseNode> date_function_0Argument date_function_1Argument function_name12 function_name23 function_name1 function_name2 function_name3 function_name0 numeric_function_0Argument numeric_function_1Argument numeric_function_2Argument
%type <pParseNode> all query_primary as sql_not for_length upper_lower comparison column_val cross_union /*opt_schema_element_list*/
2000-09-18 15:18:56 +00:00
%type <pParseNode> /*op_authorization op_schema*/ nil_fkt schema_element base_table_def base_table_element base_table_element_commalist
%type <pParseNode> column_def odbc_fct_spec odbc_call_spec odbc_fct_type op_parameter union_statement
%type <pParseNode> op_odbc_call_parameter odbc_parameter_commalist odbc_parameter function_args_commalist function_arg
2001-09-27 05:12:35 +00:00
%type <pParseNode> catalog_name schema_name table_node numeric_function string_function function_name date_function
2000-09-18 15:18:56 +00:00
%%
/* Parse Tree an OSQLParser zurueckliefern
* (der Zugriff ueber yyval nach Aufruf des Parsers scheitert,
*
2000-09-18 15:18:56 +00:00
*/
sql_single_statement:
sql
{ xxx_pGLOBAL_SQLPARSER->setParseTree( $1 ); }
| sql ';'
{ xxx_pGLOBAL_SQLPARSER->setParseTree( $1 ); }
;
/*
sql_list:
sql_ ';'
{$$ = SQL_NEW_LISTRULE;
$$->append($1);
pSqlParseTreeRoot = $1; -- obsolete - Ergebnis in yyval! rdm }
| sql_list sql ';'
{$1->append($2);
$$ = $1;}
;
*/
/* schema definition language */
2000-10-19 10:47:14 +00:00
/* Note: other ``sql:sal_Unicode() rules appear later in the grammar */
2000-09-18 15:18:56 +00:00
/***
sql:
schema
;
op_authorization:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_AUTHORIZATION user
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
op_schema:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_NAME
| SQL_TOKEN_NAME '.' SQL_TOKEN_NAME
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
schema:
SQL_TOKEN_CREATE SQL_TOKEN_SCHEMA op_schema op_authorization opt_schema_element_list
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
}
;
opt_schema_element_list:
/* empty * / {$$ = SQL_NEW_RULE;}
| schema_glement_list
;
schema_element_list:
schema_element
{$$ = SQL_NEW_LISTRULE;
$$->append($1);}
| schema_element_list schema_element
{$1->append($2);
$$ = $1;}
;
*/
sql:
schema_element
{$$ = SQL_NEW_RULE;
$$->append($1);
}
;
schema_element:
base_table_def
| view_def
| privilege_def
;
base_table_def:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_CREATE SQL_TOKEN_TABLE table_node '(' base_table_element_commalist ')'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));}
;
base_table_element_commalist:
base_table_element
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| base_table_element_commalist ',' base_table_element
{$1->append($3);
$$ = $1;}
;
base_table_element:
column_def
| table_constraint_def
;
column_def:
column data_type column_def_opt_list
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
;
column_def_opt_list:
/* empty */ {$$ = SQL_NEW_LISTRULE;}
| column_def_opt_list column_def_opt
{$1->append($2);
$$ = $1;}
;
nil_fkt:
datetime_value_fct
;
unique_spec:
SQL_TOKEN_UNIQUE
| SQL_TOKEN_PRIMARY SQL_TOKEN_KEY
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
column_def_opt:
SQL_TOKEN_NOT SQL_TOKEN_NULL
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| unique_spec
| SQL_TOKEN_DEFAULT literal
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_DEFAULT SQL_TOKEN_NULL
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_DEFAULT SQL_TOKEN_USER
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_DEFAULT nil_fkt
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
| SQL_TOKEN_CHECK
| SQL_TOKEN_CHECK '(' search_condition ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
2001-01-09 12:11:07 +00:00
| SQL_TOKEN_REFERENCES table_node
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
2001-01-09 12:11:07 +00:00
| SQL_TOKEN_REFERENCES table_node '(' column_commalist ')'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));}
;
table_constraint_def:
unique_spec '(' column_commalist ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
2001-01-09 12:11:07 +00:00
| SQL_TOKEN_FOREIGN SQL_TOKEN_KEY '(' column_commalist ')' SQL_TOKEN_REFERENCES table_node
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));
$$->append($6);
$$->append($7);}
2001-01-09 12:11:07 +00:00
| SQL_TOKEN_FOREIGN SQL_TOKEN_KEY '(' column_commalist ')' SQL_TOKEN_REFERENCES table_node '(' column_commalist ')'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));
$$->append($6);
$$->append($7);
$$->append($8 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($9);
$$->append($10 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_CHECK '(' search_condition ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
;
op_column_commalist:
/* empty */ {$$ = SQL_NEW_RULE;}
| '(' column_commalist ')'
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
column_commalist:
column_commalist ',' column
{$1->append($3);
$$ = $1;}
| column
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
;
view_def:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_CREATE SQL_TOKEN_VIEW table_node opt_column_commalist SQL_TOKEN_AS select_statement opt_with_check_option
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7);}
;
opt_with_check_option:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_WITH SQL_TOKEN_CHECK SQL_TOKEN_OPTION
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);}
;
opt_column_commalist:
/* empty */ {$$ = SQL_NEW_RULE;}
| '(' column_commalist ')'
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));}
;
privilege_def:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_GRANT privileges SQL_TOKEN_ON table_node SQL_TOKEN_TO grantee_commalist
2000-09-18 15:18:56 +00:00
opt_with_grant_option
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7);}
;
opt_with_grant_option:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_WITH SQL_TOKEN_GRANT SQL_TOKEN_OPTION
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);}
;
privileges:
SQL_TOKEN_ALL SQL_TOKEN_PRIVILEGES
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| operation_commalist
;
operation_commalist:
operation
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| operation_commalist ',' operation
{$1->append($3);
$$ = $1;}
;
operation:
SQL_TOKEN_SELECT
| SQL_TOKEN_INSERT opt_column_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_DELETE
| SQL_TOKEN_UPDATE opt_column_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_REFERENCES opt_column_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| SQL_TOKEN_USAGE
;
grantee_commalist:
grantee
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| grantee_commalist ',' grantee
{$1->append($3);
$$ = $1;}
;
grantee:
SQL_TOKEN_PUBLIC
| user
;
/* module language */
opt_order_by_clause:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_ORDER SQL_TOKEN_BY ordering_spec_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);}
;
ordering_spec_commalist:
ordering_spec
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| ordering_spec_commalist ',' ordering_spec
{$1->append($3);
$$ = $1;}
;
ordering_spec:
/* SQL_TOKEN_INTNUM opt_asc_desc
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
*/
predicate opt_asc_desc
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| row_value_constructor_elem opt_asc_desc
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
opt_asc_desc:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_ASC
| SQL_TOKEN_DESC
;
/***
manipulative_statement_list:
manipulative_statement
{$$ = SQL_NEW_LISTRULE;
$$->append($1);}
| manipulative_statement_list manipulative_statement
{$1->append($2);
$$ = $1;}
;
***/
/*sql:
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_LISTRULE;}
2001-09-28 08:25:10 +00:00
;
*/
sql_not:
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_NOT
;
/* manipulative statements */
sql: manipulative_statement
;
manipulative_statement:
commit_statement
/* | delete_statement_positioned*/
| delete_statement_searched
| fetch_statement
| insert_statement
| rollback_statement
| select_statement_into
/* | update_statement_positioned*/
| update_statement_searched
| union_statement
2000-09-18 15:18:56 +00:00
| '{' odbc_call_spec '}'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("{", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode("}", SQL_NODE_PUNCTUATION));
}
;
union_statement:
select_statement
| union_statement SQL_TOKEN_UNION all select_statement
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
commit_statement:
SQL_TOKEN_COMMIT SQL_TOKEN_WORK
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
/*
delete_statement_positioned:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_DELETE SQL_TOKEN_FROM table_node SQL_TOKEN_WHERE SQL_TOKEN_CURRENT SQL_TOKEN_OF cursor
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7);}
;
*/
delete_statement_searched:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_DELETE SQL_TOKEN_FROM table_node opt_where_clause
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);}
;
fetch_statement:
SQL_TOKEN_FETCH cursor SQL_TOKEN_INTO target_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);}
;
insert_statement:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_INSERT SQL_TOKEN_INTO table_node opt_column_commalist values_or_query_spec
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);}
;
values_or_query_spec:
SQL_TOKEN_VALUES table_value_const_list
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
table_value_const_list:
row_value_constructor
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| table_value_const_list ',' row_value_constructor
{$1->append($3);
$$ = $1;}
;
row_value_const_list:
row_value_constructor_elem
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| row_value_const_list ',' row_value_constructor_elem
{$1->append($3);
$$ = $1;}
;
row_value_constructor:
row_value_constructor_elem
| '(' row_value_const_list ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
/* | subquery
{
$$ = SQL_NEW_RULE;
$$->append($1);
}*/
;
row_value_constructor_elem:
value_exp /*[^')']*/
2000-09-18 15:18:56 +00:00
| SQL_TOKEN_DEFAULT
;
rollback_statement:
SQL_TOKEN_ROLLBACK SQL_TOKEN_WORK
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
/* INTO target_commalist herausgenommen */
select_statement_into:
SQL_TOKEN_SELECT opt_all_distinct selection SQL_TOKEN_INTO target_commalist table_exp
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6); }
;
opt_all_distinct:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_ALL
| SQL_TOKEN_DISTINCT
;
/*
update_statement_positioned:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_UPDATE table_node SQL_TOKEN_SET assignment_commalist
2000-09-18 15:18:56 +00:00
SQL_TOKEN_WHERE SQL_TOKEN_CURRENT SQL_TOKEN_OF cursor
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7);
$$->append($8);}
;
*/
assignment_commalist:
assignment
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| assignment_commalist ',' assignment
{$1->append($3);
$$ = $1;}
;
assignment:
column SQL_EQUAL update_source
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);}
;
update_source:
value_exp
| SQL_TOKEN_DEFAULT
;
update_statement_searched:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_UPDATE table_node SQL_TOKEN_SET assignment_commalist opt_where_clause
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);}
;
target_commalist:
target
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| target_commalist ',' target
{$1->append($3);
$$ = $1;}
;
target:
parameter_ref
;
opt_where_clause:
/* empty */ {$$ = SQL_NEW_RULE;}
| where_clause
;
/* query expressions */
query_term:
non_join_query_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
/* | joined_table
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
*/ ;
/* SELECT STATEMENT */
select_statement:
SQL_TOKEN_SELECT opt_all_distinct selection table_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
selection:
'*'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("*", SQL_NODE_PUNCTUATION));
}
| scalar_exp_commalist
;
table_exp:
from_clause
opt_where_clause
opt_group_by_clause
opt_having_clause
opt_order_by_clause
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);}
;
from_clause:
SQL_TOKEN_FROM table_ref_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
table_ref_commalist:
table_ref
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| table_ref_commalist ',' table_ref
2000-09-18 15:18:56 +00:00
{$1->append($3);
$$ = $1;}
;
as:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_AS
{
$$ = SQL_NEW_RULE;
}
;
table_ref:
2001-01-09 12:11:07 +00:00
table_node
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
2001-01-09 12:11:07 +00:00
| table_node as range_variable op_column_commalist
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| '(' joined_table ')' as range_variable op_column_commalist
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
$$->append($4);
$$->append($5);
$$->append($6);
}
| joined_table
| '{' SQL_TOKEN_OJ joined_table '}'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("{", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3);
$$->append($4 = newNode("}", SQL_NODE_PUNCTUATION));
}
| subquery as range_variable
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
2000-09-18 15:18:56 +00:00
;
where_clause:
SQL_TOKEN_WHERE search_condition
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
opt_group_by_clause:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_GROUP SQL_TOKEN_BY column_ref_commalist
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);}
;
column_ref_commalist:
column_ref
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| column_ref_commalist ',' column_ref
{$1->append($3);
$$ = $1;}
;
opt_having_clause:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_HAVING search_condition
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
/* search conditions */
truth_value:
SQL_TOKEN_TRUE
| SQL_TOKEN_FALSE
| SQL_TOKEN_UNKNOWN
2000-09-18 15:18:56 +00:00
;
boolean_primary:
predicate
| '(' search_condition ')'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
2000-09-18 15:18:56 +00:00
boolean_test:
boolean_primary
| boolean_primary SQL_TOKEN_IS truth_value
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
| boolean_primary SQL_TOKEN_IS SQL_TOKEN_NOT truth_value %prec SQL_TOKEN_IS
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
/* | sql_not SQL_TOKEN_LIKE string_value_exp opt_escape
2000-09-18 15:18:56 +00:00
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
2000-09-18 15:18:56 +00:00
$$->append($2);
if (xxx_pGLOBAL_SQLPARSER->buildLikeRule($$,$3,$4))
$$->append($4);
2000-09-18 15:18:56 +00:00
else
{
delete $$;
YYABORT;
}
}
else
YYERROR;
}
*/
2000-09-18 15:18:56 +00:00
;
boolean_factor:
boolean_test
| SQL_TOKEN_NOT '(' boolean_test ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
2000-09-18 15:18:56 +00:00
}
;
boolean_term:
boolean_factor
| boolean_term SQL_TOKEN_AND boolean_factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
2001-02-23 13:53:08 +00:00
| row_value_constructor_elem /*[^')' ',']*/
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
2000-10-19 10:47:14 +00:00
sal_Int16 nErg = xxx_pGLOBAL_SQLPARSER->buildComparsionRule($$,$1);
2000-09-18 15:18:56 +00:00
if(nErg == 1)
{
OSQLParseNode* pTemp = $$;
2000-10-19 10:47:14 +00:00
$$ = pTemp->removeAt((sal_uInt32)0);
delete pTemp;
2000-09-18 15:18:56 +00:00
}
else
{
delete $$;
if(nErg)
YYERROR;
else
YYABORT;
}
}
| boolean_term SQL_TOKEN_AND literal
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
2000-10-19 10:47:14 +00:00
sal_Int16 nErg = xxx_pGLOBAL_SQLPARSER->buildComparsionRule($$,$3);
2000-09-18 15:18:56 +00:00
if(nErg < 1)
{
delete $$;
if(nErg)
YYERROR;
else
YYABORT;
}
2000-09-18 15:18:56 +00:00
}
| boolean_term SQL_TOKEN_AND SQL_TOKEN_STRING
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
2000-10-19 10:47:14 +00:00
sal_Int16 nErg = xxx_pGLOBAL_SQLPARSER->buildComparsionRule($$,$3);
2000-09-18 15:18:56 +00:00
if(nErg < 1)
{
delete $$;
if(nErg)
YYERROR;
else
YYABORT;
}
2000-09-18 15:18:56 +00:00
}
;
search_condition:
boolean_term
| search_condition SQL_TOKEN_OR boolean_term
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
;
predicate:
comparison_predicate
| between_predicate
| all_or_any_predicate
| existence_test
| unique_test
| test_for_null
| in_predicate
| like_predicate
;
comparison_predicate:
row_value_constructor comparison row_value_constructor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
| comparison row_value_constructor
2000-09-18 15:18:56 +00:00
{
if(xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
sal_Int16 nErg = xxx_pGLOBAL_SQLPARSER->buildPredicateRule($$,$2,$1);
if(nErg == 1)
{
OSQLParseNode* pTemp = $$;
$$ = pTemp->removeAt((sal_uInt32)0);
delete pTemp;
}
else
{
delete $$;
YYABORT;
}
2000-09-18 15:18:56 +00:00
}
else
{
YYERROR;
2000-09-18 15:18:56 +00:00
}
}
;
comparison:
SQL_LESS
| SQL_NOTEQUAL
| SQL_EQUAL
| SQL_GREAT
| SQL_LESSEQ
| SQL_GREATEQ
2000-09-18 15:18:56 +00:00
;
between_predicate:
row_value_constructor sql_not SQL_TOKEN_BETWEEN row_value_constructor SQL_TOKEN_AND row_value_constructor
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
}
| sql_not SQL_TOKEN_BETWEEN row_value_constructor SQL_TOKEN_AND row_value_constructor
2000-09-18 15:18:56 +00:00
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = SQL_NEW_RULE;
sal_Int16 nErg = xxx_pGLOBAL_SQLPARSER->buildPredicateRule($$,$3,$2,$5);
if(nErg == 1)
{
OSQLParseNode* pTemp = $$;
$$ = pTemp->removeAt((sal_uInt32)0);
$$->insert(1,$1);
delete pTemp;
delete $4;
}
else
{
delete $$;
YYABORT;
}
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
;
like_predicate:
row_value_constructor SQL_TOKEN_NOT SQL_TOKEN_LIKE string_value_exp opt_escape
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
}
| row_value_constructor SQL_TOKEN_LIKE string_value_exp opt_escape
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| row_value_constructor SQL_TOKEN_NOT SQL_TOKEN_LIKE value_exp_primary opt_escape
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
}
| row_value_constructor SQL_TOKEN_LIKE value_exp_primary opt_escape
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| sql_not SQL_TOKEN_LIKE string_value_exp opt_escape
2000-09-18 15:18:56 +00:00
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
$$->append($2);
if (xxx_pGLOBAL_SQLPARSER->buildLikeRule($$,$3,$4))
$$->append($4);
2000-09-18 15:18:56 +00:00
else
{
delete $$;
YYABORT;
}
}
else
YYERROR;
}
| sql_not SQL_TOKEN_LIKE value_exp_primary opt_escape
2000-09-18 15:18:56 +00:00
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
$$->append($2);
if (xxx_pGLOBAL_SQLPARSER->buildLikeRule($$,$3,$4))
$$->append($4);
2000-09-18 15:18:56 +00:00
else
{
delete $$;
YYABORT;
}
}
else
YYERROR;
}
;
opt_escape:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_ESCAPE string_value_exp
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
| '{' SQL_TOKEN_ESCAPE SQL_TOKEN_STRING '}'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("{", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3);
$$->append($4 = newNode("}", SQL_NODE_PUNCTUATION));
}
;
test_for_null:
row_value_constructor SQL_TOKEN_IS sql_not SQL_TOKEN_NULL
{
2000-09-18 15:18:56 +00:00
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| SQL_TOKEN_IS sql_not SQL_TOKEN_NULL
2000-09-18 15:18:56 +00:00
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
$$->append($2);
$$->append($3);
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
;
in_predicate_value:
subquery
{$$ = SQL_NEW_RULE;
$$->append($1);
}
| '(' value_exp_commalist ')'
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
in_predicate:
row_value_constructor sql_not SQL_TOKEN_IN in_predicate_value
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| sql_not SQL_TOKEN_IN in_predicate_value
2000-09-18 15:18:56 +00:00
{
if ( xxx_pGLOBAL_SQLPARSER->inPredicateCheck() )
2000-09-18 15:18:56 +00:00
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
2000-09-18 15:18:56 +00:00
$$->append($2);
$$->append($3);
}
else
YYERROR;
}
;
all_or_any_predicate:
row_value_constructor comparison any_all_some subquery
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| comparison any_all_some subquery
{
if(xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
OSQLParseNode* pColumnRef = newNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(newNode(xxx_pGLOBAL_SQLPARSER->getFieldName(),SQL_NODE_NAME));
$$ = SQL_NEW_RULE;
$$->append(pColumnRef);
$$->append($1);
$$->append($2);
$$->append($3);
}
else
YYERROR;
}
;
any_all_some:
SQL_TOKEN_ANY
| SQL_TOKEN_ALL
| SQL_TOKEN_SOME
;
existence_test:
SQL_TOKEN_EXISTS subquery
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
unique_test:
SQL_TOKEN_UNIQUE subquery
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
subquery:
'(' query_exp ')'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));}
;
/* scalar expressions */
scalar_exp_commalist:
select_sublist
{
$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);
}
| scalar_exp_commalist ',' select_sublist
{
$1->append($3);
$$ = $1;
}
;
select_sublist:
2001-01-09 12:11:07 +00:00
/* table_node '.' '*'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3 = newNode("*", SQL_NODE_PUNCTUATION));
}
*/
2001-01-09 12:11:07 +00:00
derived_column
2000-09-18 15:18:56 +00:00
;
parameter_ref:
parameter
;
/*
op_like:
'*'
2000-09-18 15:18:56 +00:00
{
$$ = newNode("*", SQL_NODE_PUNCTUATION);
}
2000-09-18 15:18:56 +00:00
| '?'
{
$$ = newNode("?", SQL_NODE_PUNCTUATION);
2000-09-18 15:18:56 +00:00
}
| op_like '*'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("*", SQL_NODE_PUNCTUATION));
2000-10-19 10:47:14 +00:00
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_False);
}
2000-09-18 15:18:56 +00:00
| op_like '?'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("?", SQL_NODE_PUNCTUATION));
2000-10-19 10:47:14 +00:00
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_False);
}
2000-09-18 15:18:56 +00:00
;
*/
literal:
2000-09-18 15:18:56 +00:00
/* SQL_TOKEN_STRING
| */SQL_TOKEN_INT
| SQL_TOKEN_REAL_NUM
| SQL_TOKEN_INTNUM
| SQL_TOKEN_APPROXNUM
| SQL_TOKEN_ACCESS_DATE
/* rules for predicate check */
2000-09-18 15:18:56 +00:00
| literal SQL_TOKEN_STRING
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = SQL_NEW_RULE;
2000-09-18 15:18:56 +00:00
$$->append($1);
$$->append($2);
2000-10-19 10:47:14 +00:00
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_True);
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
2000-09-18 15:18:56 +00:00
| literal SQL_TOKEN_INT
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = SQL_NEW_RULE;
2000-09-18 15:18:56 +00:00
$$->append($1);
$$->append($2);
2000-10-19 10:47:14 +00:00
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_True);
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
2000-09-18 15:18:56 +00:00
| literal SQL_TOKEN_REAL_NUM
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = SQL_NEW_RULE;
2000-09-18 15:18:56 +00:00
$$->append($1);
$$->append($2);
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_True);
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
| literal SQL_TOKEN_APPROXNUM
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = SQL_NEW_RULE;
2000-09-18 15:18:56 +00:00
$$->append($1);
$$->append($2);
2000-10-19 10:47:14 +00:00
xxx_pGLOBAL_SQLPARSER->reduceLiteral($$, sal_True);
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
}
2000-09-18 15:18:56 +00:00
;
/* miscellaneous */
as_clause:
/* empty */ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_AS column
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
| column
;
position_exp:
SQL_TOKEN_POSITION '(' value_exp SQL_TOKEN_IN value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_POSITION '(' value_exp_commalist ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
2000-09-18 15:18:56 +00:00
;
num_value_fct:
position_exp
| extract_exp
| length_exp
;
char_length_exp:
SQL_TOKEN_CHAR_LENGTH '(' value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_CHARACTER_LENGTH '(' value_exp ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
2000-09-18 15:18:56 +00:00
;
octet_length_exp:
SQL_TOKEN_OCTET_LENGTH '(' value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
bit_length_exp:
SQL_TOKEN_BIT_LENGTH '(' value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
length_exp:
char_length_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| octet_length_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| bit_length_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
datetime_field:
non_second_datetime_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_SECOND
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
extract_field:
time_zone_field
| value_exp
2000-09-18 15:18:56 +00:00
;
time_zone_field:
SQL_TOKEN_TIMEZONE_HOUR
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_TIMEZONE_MINUTE
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
extract_source:
datetime_value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
/* | interval_value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
} */
;
extract_exp:
SQL_TOKEN_EXTRACT '(' extract_field SQL_TOKEN_FROM value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
unsigned_value_spec:
2001-07-26 12:42:56 +00:00
general_value_spec
| literal
2000-09-18 15:18:56 +00:00
;
general_value_spec:
parameter
2002-05-14 08:30:32 +00:00
| SQL_TOKEN_USER
| SQL_TOKEN_NULL
2002-05-14 08:30:32 +00:00
| SQL_TOKEN_FALSE
2002-05-10 06:55:03 +00:00
| SQL_TOKEN_TRUE
2000-09-18 15:18:56 +00:00
;
set_fct_spec:
general_set_fct
| '{' odbc_fct_spec '}'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("{", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode("}", SQL_NODE_PUNCTUATION));
}
| function_name '(' ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name0 '(' ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name1 '(' function_arg ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name2 '(' function_arg_commalist2 ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name3 '(' function_arg_commalist3 ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| string_function_4Argument '(' function_arg_commalist4 ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name '(' function_args_commalist ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| function_name12 '(' function_args_commalist ')'
{
if ( $3->count() == 1 || $3->count() == 2 )
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
else
YYERROR;
}
| function_name23 '(' function_args_commalist ')'
{
if ( $3->count() == 2 || $3->count() == 3)
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
else
YYERROR;
}
;
function_name0:
date_function_0Argument
| numeric_function_0Argument
;
function_name1:
string_function_1Argument
| date_function_1Argument
| numeric_function_1Argument
;
function_name2:
string_function_2Argument
| numeric_function_2Argument
;
function_name12:
SQL_TOKEN_ROUND
| SQL_TOKEN_WEEK
| SQL_TOKEN_LOGF
;
function_name23:
SQL_TOKEN_LOCATE
;
function_name3:
string_function_3Argument
2001-09-28 08:25:10 +00:00
;
function_name:
string_function
| date_function
| numeric_function
| SQL_TOKEN_NAME
;
string_function_1Argument:
SQL_TOKEN_LENGTH
| SQL_TOKEN_ASCII
| SQL_TOKEN_LCASE
| SQL_TOKEN_LTRIM
| SQL_TOKEN_RTRIM
| SQL_TOKEN_SPACE
| SQL_TOKEN_UCASE
;
string_function_2Argument:
SQL_TOKEN_REPEAT
| SQL_TOKEN_LEFT
| SQL_TOKEN_RIGHT
;
string_function_3Argument:
SQL_TOKEN_REPLACE
;
string_function_4Argument:
SQL_TOKEN_INSERT
;
2001-09-28 08:25:10 +00:00
string_function:
SQL_TOKEN_CHAR
2001-09-28 08:25:10 +00:00
| SQL_TOKEN_CONCAT
| SQL_TOKEN_DIFFERENCE
| SQL_TOKEN_LOCATE_2
| SQL_TOKEN_SOUNDEX
;
date_function_0Argument:
SQL_TOKEN_CURDATE
2001-09-28 08:25:10 +00:00
| SQL_TOKEN_CURTIME
| SQL_TOKEN_NOW
;
date_function_1Argument:
SQL_TOKEN_DAYOFWEEK
2001-09-28 08:25:10 +00:00
| SQL_TOKEN_DAYOFMONTH
| SQL_TOKEN_DAYOFYEAR
| SQL_TOKEN_MONTH
| SQL_TOKEN_DAYNAME
2001-09-28 08:25:10 +00:00
| SQL_TOKEN_MONTHNAME
| SQL_TOKEN_QUARTER
| SQL_TOKEN_HOUR
| SQL_TOKEN_MINUTE
| SQL_TOKEN_SECOND
| SQL_TOKEN_YEAR
| SQL_TOKEN_TIMEVALUE
| SQL_TOKEN_DATEVALUE
2001-09-28 08:25:10 +00:00
;
date_function:
SQL_TOKEN_TIMESTAMPADD
| SQL_TOKEN_TIMESTAMPDIFF
;
numeric_function_0Argument:
SQL_TOKEN_PI
;
numeric_function_1Argument:
2001-09-28 08:25:10 +00:00
SQL_TOKEN_ABS
| SQL_TOKEN_ACOS
| SQL_TOKEN_ASIN
| SQL_TOKEN_ATAN
| SQL_TOKEN_CEILING
| SQL_TOKEN_COS
| SQL_TOKEN_COT
| SQL_TOKEN_DEGREES
| SQL_TOKEN_FLOOR
| SQL_TOKEN_SIGN
| SQL_TOKEN_SIN
| SQL_TOKEN_SQRT
| SQL_TOKEN_TAN
| SQL_TOKEN_EXP
| SQL_TOKEN_LOG10
| SQL_TOKEN_LN
| SQL_TOKEN_RADIANS
;
numeric_function_2Argument:
SQL_TOKEN_ATAN2
| SQL_TOKEN_MOD
| SQL_TOKEN_POWER
;
numeric_function:
SQL_TOKEN_RAND
2001-09-28 08:25:10 +00:00
| SQL_TOKEN_TRUNCATE
2000-09-18 15:18:56 +00:00
;
op_parameter:
{$$ = SQL_NEW_RULE;}
| '?' SQL_EQUAL
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("?", SQL_NODE_PUNCTUATION));
$$->append($2);
}
;
odbc_call_spec:
2001-01-09 12:11:07 +00:00
op_parameter SQL_TOKEN_CALL table_node op_odbc_call_parameter
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
op_odbc_call_parameter:
{$$ = SQL_NEW_RULE;}
| '(' odbc_parameter_commalist ')'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
odbc_parameter_commalist:
odbc_parameter
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| odbc_parameter_commalist ',' odbc_parameter
{
$1->append($3);
$$ = $1;
}
;
odbc_parameter:
/* empty */ {$$ = SQL_NEW_RULE;}
| literal
| parameter
;
odbc_fct_spec:
odbc_fct_type SQL_TOKEN_STRING
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
odbc_fct_type:
SQL_TOKEN_FN
| SQL_TOKEN_D
| SQL_TOKEN_T
| SQL_TOKEN_TS
;
general_set_fct:
set_fct_type '(' opt_all_distinct value_exp ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_COUNT '(' '*' ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3 = newNode("*", SQL_NODE_PUNCTUATION));
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_COUNT '(' opt_all_distinct value_exp ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
set_fct_type:
SQL_TOKEN_AVG
| SQL_TOKEN_MAX
| SQL_TOKEN_MIN
| SQL_TOKEN_SUM
;
outer_join_type:
SQL_TOKEN_LEFT %prec SQL_TOKEN_LEFT
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_RIGHT %prec SQL_TOKEN_RIGHT
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_FULL %prec SQL_TOKEN_FULL
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
join_condition:
SQL_TOKEN_ON search_condition
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
join_spec:
join_condition
| named_columns_join
;
join_type:
SQL_TOKEN_INNER
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| outer_join_type
| outer_join_type SQL_TOKEN_OUTER
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
cross_union:
2001-02-06 07:14:11 +00:00
table_ref /*[SQL_TOKEN_CROSS]*/ SQL_TOKEN_CROSS SQL_TOKEN_JOIN table_ref
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
qualified_join:
/* wenn SQL_TOKEN_NATURAL, dann keine join_spec */
2001-02-06 07:14:11 +00:00
table_ref /*[SQL_TOKEN_NATURAL]*/ SQL_TOKEN_NATURAL join_type SQL_TOKEN_JOIN table_ref
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
}
| table_ref join_type SQL_TOKEN_JOIN table_ref join_spec
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
$$->append($5);
}
| cross_union
;
joined_table:
qualified_join
/* | query_exp*/
| '(' joined_table ')'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
named_columns_join:
SQL_TOKEN_USING '(' column_commalist ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
simple_table:
select_statement
| values_or_query_spec
;
non_join_query_primary:
simple_table
| '(' non_join_query_exp ')'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
non_join_query_term:
non_join_query_primary
| query_term SQL_TOKEN_INTERSECT all query_primary
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
query_primary:
non_join_query_primary
/*| joined_table*/
;
non_join_query_exp:
non_join_query_term
| query_exp SQL_TOKEN_UNION all query_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| query_exp SQL_TOKEN_EXCEPT all query_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
;
all:
/* empty*/ {$$ = SQL_NEW_RULE;}
| SQL_TOKEN_ALL
;
query_exp:
non_join_query_exp /*[^')']*/
;
scalar_subquery:
subquery
;
cast_operand:
value_exp
;
cast_target:
2001-01-09 12:11:07 +00:00
table_node
2000-09-18 15:18:56 +00:00
| data_type
;
cast_spec:
SQL_TOKEN_CAST '(' cast_operand SQL_TOKEN_AS cast_target ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
value_exp_primary:
unsigned_value_spec
| column_ref
| set_fct_spec
| scalar_subquery
| '(' value_exp ')'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode(")", SQL_NODE_PUNCTUATION));
}
| cast_spec
;
num_primary:
value_exp_primary
| num_value_fct
;
factor:
num_primary
| '-' num_primary %prec SQL_TOKEN_UMINUS
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("-", SQL_NODE_PUNCTUATION));
$$->append($2);
}
| '+' num_primary %prec SQL_TOKEN_UMINUS
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($2);
}
;
term:
factor
| term '*' factor
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("*", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| term '/' factor
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("/", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
num_value_exp:
term
| num_value_exp '+' term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| num_value_exp '-' term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("-", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
datetime_primary:
/* value_exp_primary
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
|*/ datetime_value_fct
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
datetime_value_fct:
SQL_TOKEN_CURRENT_DATE
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_CURRENT_TIME
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_CURRENT_TIMESTAMP
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
time_zone:
SQL_TOKEN_AT time_zone_specifier
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
time_zone_specifier:
SQL_TOKEN_LOCAL
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
/* | SQL_TOKEN_TIME SQL_TOKEN_ZONE interval_value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}*/
;
datetime_factor:
datetime_primary
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| datetime_primary time_zone
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
datetime_term:
datetime_factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
/*
interval_term:
literal
| interval_term '*' factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("*", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| interval_term '/' factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("/", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
*/
datetime_value_exp:
datetime_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
/* | interval_value_exp '+' datetime_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| datetime_value_exp '+' interval_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| datetime_value_exp '-' interval_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("-", SQL_NODE_PUNCTUATION));
$$->append($3);
}
*/ ;
/*
interval_value_exp:
interval_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| interval_value_exp '+' interval_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| interval_value_exp '-' interval_term
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("-", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| '(' datetime_value_exp '-' datetime_term ')' interval_qualifier
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode("-", SQL_NODE_PUNCTUATION));
$$->append($4);
$$->append($5 = newNode(")", SQL_NODE_PUNCTUATION));
$$->append($6);
}
;
*/
non_second_datetime_field:
SQL_TOKEN_YEAR
| SQL_TOKEN_MONTH
| SQL_TOKEN_DAY
| SQL_TOKEN_HOUR
| SQL_TOKEN_MINUTE
;
/*start_field:
non_second_datetime_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| non_second_datetime_field '(' SQL_TOKEN_INTNUM ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
end_field:
non_second_datetime_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_SECOND
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_SECOND '(' SQL_TOKEN_INTNUM ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
*/
/*
single_datetime_field:
non_second_datetime_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| non_second_datetime_field '(' SQL_TOKEN_INTNUM ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_SECOND
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| SQL_TOKEN_SECOND '(' SQL_TOKEN_INTNUM ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_SECOND '(' SQL_TOKEN_INTNUM ',' SQL_TOKEN_INTNUM ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(",", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
*/
/*
interval_qualifier:
start_field SQL_TOKEN_TO end_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
| single_datetime_field
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
*/
function_arg_commalist2:
function_arg ',' function_arg
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);
$$->append($3);}
;
function_arg_commalist3:
function_arg ',' function_arg ',' function_arg
{
$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);
$$->append($3);
$$->append($5);
}
;
function_arg_commalist4:
function_arg ',' function_arg ',' function_arg ',' function_arg
{
$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);
$$->append($3);
$$->append($5);
$$->append($7);
}
;
2000-09-18 15:18:56 +00:00
value_exp_commalist:
value_exp
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| value_exp_commalist ',' value_exp
2000-09-18 15:18:56 +00:00
{$1->append($3);
$$ = $1;}
/* this rule is only valid if we check predicates */
| value_exp_commalist ';' value_exp
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$1->append($3);
$$ = $1;
}
else
YYERROR;
2000-09-18 15:18:56 +00:00
}
;
function_arg:
value_exp
| value_exp comparison value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
;
function_args_commalist:
function_arg
{$$ = SQL_NEW_COMMALISTRULE;
$$->append($1);}
| function_args_commalist ',' function_arg
{$1->append($3);
$$ = $1;}
/* this rule is only valid if we check predicates */
| function_args_commalist ';' function_arg
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$1->append($3);
$$ = $1;
}
else
YYERROR;
}
;
2000-09-18 15:18:56 +00:00
value_exp:
num_value_exp /*[^')']*/
2000-09-18 15:18:56 +00:00
| string_value_exp
| datetime_value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
string_value_exp:
char_value_exp
/* | bit_value_exp
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
*/ ;
char_value_exp:
char_factor
| concatenation
;
concatenation:
char_value_exp '+' char_factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
char_primary:
SQL_TOKEN_STRING
| string_value_fct
;
collate_clause:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_COLLATE table_node
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
char_factor:
char_primary
| char_primary collate_clause
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
string_value_fct:
char_value_fct
| bit_value_fct
;
bit_value_fct:
bit_substring_fct
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
bit_substring_fct:
SQL_TOKEN_SUBSTRING '(' bit_value_exp SQL_TOKEN_FROM string_value_exp for_length ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
bit_value_exp:
bit_factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
/*
bit_concatenation
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
|
bit_concatenation:
bit_value_exp '+' bit_factor
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("+", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
*/
bit_factor:
bit_primary
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
bit_primary:
{$$ = SQL_NEW_RULE;}
/* value_exp_primary
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| string_value_fct
{
$$ = SQL_NEW_RULE;
$$->append($1);
}*/
;
char_value_fct:
char_substring_fct
| fold
| form_conversion
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| char_translation
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
| trim_fct
{
$$ = SQL_NEW_RULE;
$$->append($1);
}
;
for_length:
{$$ = SQL_NEW_RULE;}
| SQL_TOKEN_FOR value_exp
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
char_substring_fct:
SQL_TOKEN_SUBSTRING '(' value_exp SQL_TOKEN_FROM value_exp for_length ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6);
$$->append($7 = newNode(")", SQL_NODE_PUNCTUATION));
}
| SQL_TOKEN_SUBSTRING '(' value_exp_commalist ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
2000-09-18 15:18:56 +00:00
;
upper_lower:
SQL_TOKEN_UPPER
| SQL_TOKEN_LOWER
;
fold:
upper_lower '(' value_exp ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
form_conversion:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_CONVERT '(' string_value_exp SQL_TOKEN_USING table_node ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
char_translation:
2001-01-09 12:11:07 +00:00
SQL_TOKEN_TRANSLATE '(' string_value_exp SQL_TOKEN_USING table_node ')'
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4);
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
trim_fct:
SQL_TOKEN_TRIM '(' trim_operands ')'
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));
}
;
trim_operands:
string_value_exp
| trim_spec value_exp SQL_TOKEN_FROM value_exp
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
$$->append($4);
}
| trim_spec SQL_TOKEN_FROM value_exp
2000-09-18 15:18:56 +00:00
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
$$->append($3);
}
;
trim_spec:
SQL_TOKEN_BOTH
| SQL_TOKEN_LEADING
| SQL_TOKEN_TRAILING
;
derived_column:
value_exp as_clause
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);
}
;
/* Tabellenname */
table_node:
table_name
| schema_name
2001-02-01 12:42:35 +00:00
| catalog_name
;
catalog_name:
SQL_TOKEN_NAME '.' schema_name
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
}
| SQL_TOKEN_NAME ':' schema_name
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(":", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
schema_name:
SQL_TOKEN_NAME '.' table_name
{
$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
}
;
2001-01-09 12:11:07 +00:00
2000-09-18 15:18:56 +00:00
table_name:
SQL_TOKEN_NAME
{$$ = SQL_NEW_RULE;
$$->append($1);}
;
2001-01-09 12:11:07 +00:00
/* Columns */
2000-09-18 15:18:56 +00:00
column_ref:
column
{$$ = SQL_NEW_RULE;
$$->append($1);}
2001-02-01 12:42:35 +00:00
/* | table_node '.' column_val %prec '.'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);}
*/
| SQL_TOKEN_NAME '.' column_val %prec '.'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
}
2001-02-01 12:42:35 +00:00
| SQL_TOKEN_NAME '.' SQL_TOKEN_NAME '.' column_val %prec '.'
2000-09-18 15:18:56 +00:00
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($5);}
| SQL_TOKEN_NAME '.' SQL_TOKEN_NAME '.' SQL_TOKEN_NAME '.' column_val %prec '.'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2= newNode(".", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($7);
}
| SQL_TOKEN_NAME ':' SQL_TOKEN_NAME '.' SQL_TOKEN_NAME '.' column_val %prec '.'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2= newNode(":", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($7);
}
/* | SQL_TOKEN_NAME ';' SQL_TOKEN_NAME '.' SQL_TOKEN_NAME '.' column_val
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2= newNode(";", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(".", SQL_NODE_PUNCTUATION));
$$->append($7);
}
*/ ;
/* data types */
column_val:
column
{$$ = SQL_NEW_RULE;
$$->append($1);}
| '*'
{
$$ = SQL_NEW_RULE;
$$->append($1 = newNode("*", SQL_NODE_PUNCTUATION));
}
;
data_type:
SQL_TOKEN_CHARACTER
| SQL_TOKEN_CHARACTER '(' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_NUMERIC
| SQL_TOKEN_NUMERIC '(' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_NUMERIC '(' SQL_TOKEN_INTNUM ',' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(",", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_DECIMAL
| SQL_TOKEN_DECIMAL '(' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_DECIMAL '(' SQL_TOKEN_INTNUM ',' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(",", SQL_NODE_PUNCTUATION));
$$->append($5);
$$->append($6 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_INTEGER
| SQL_TOKEN_SMALLINT
| SQL_TOKEN_FLOAT
| SQL_TOKEN_FLOAT '(' SQL_TOKEN_INTNUM ')'
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2 = newNode("(", SQL_NODE_PUNCTUATION));
$$->append($3);
$$->append($4 = newNode(")", SQL_NODE_PUNCTUATION));}
| SQL_TOKEN_REAL
| SQL_TOKEN_DOUBLE SQL_TOKEN_PRECISION
{$$ = SQL_NEW_RULE;
$$->append($1);
$$->append($2);}
;
/* the various things you can name */
column:
SQL_TOKEN_NAME
| SQL_TOKEN_POSITION
{
2001-04-04 06:28:58 +00:00
sal_uInt32 nNod = $$->getRuleID();
2000-09-18 15:18:56 +00:00
delete $$;
$$ = newNode(xxx_pGLOBAL_SQLPARSER->TokenIDToStr(nNod), SQL_NODE_NAME);
}
| SQL_TOKEN_CHAR_LENGTH
{
2001-04-04 06:28:58 +00:00
sal_uInt32 nNod = $$->getRuleID();
2000-09-18 15:18:56 +00:00
delete $$;
$$ = newNode(xxx_pGLOBAL_SQLPARSER->TokenIDToStr(nNod), SQL_NODE_NAME);
}
| SQL_TOKEN_EXTRACT
{
2001-04-04 06:28:58 +00:00
sal_uInt32 nNod = $$->getRuleID();
2000-09-18 15:18:56 +00:00
delete $$;
$$ = newNode(xxx_pGLOBAL_SQLPARSER->TokenIDToStr(nNod), SQL_NODE_NAME);
}
;
cursor: SQL_TOKEN_NAME
{$$ = SQL_NEW_RULE;
$$->append($1);}
;
/***
module: SQL_TOKEN_NAME
{$$ = SQL_NEW_RULE;
$$->append($1);}
;
***/
parameter:
':' SQL_TOKEN_NAME
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode(":", SQL_NODE_PUNCTUATION));
$$->append($2);}
2000-09-18 15:18:56 +00:00
| '?'
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("?", SQL_NODE_PUNCTUATION));}
| '[' SQL_TOKEN_NAME ']'
{$$ = SQL_NEW_RULE;
$$->append($1 = newNode("[", SQL_NODE_PUNCTUATION));
$$->append($2);
$$->append($3 = newNode("]", SQL_NODE_PUNCTUATION));}
;
/***
procedure: SQL_TOKEN_NAME
{$$ = SQL_NEW_RULE;
$$->append($1);}
;
***/
range_variable: SQL_TOKEN_NAME
;
user: SQL_TOKEN_NAME
;
/* PREDICATECHECK RULES */
sql:
search_condition /* checking predicats */
{
if (xxx_pGLOBAL_SQLPARSER->inPredicateCheck())
{
$$ = $1;
2000-09-18 15:18:56 +00:00
}
else
YYERROR;
};
2000-09-18 15:18:56 +00:00
%%
using namespace ::com::sun::star::sdbc;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::i18n;
using namespace ::com::sun::star::lang;
2000-10-19 10:47:14 +00:00
using namespace ::com::sun::star::util;
using namespace ::osl;
2000-10-19 10:47:14 +00:00
using namespace ::dbtools;
2000-09-18 15:18:56 +00:00
// using namespace connectivity;
//============================================================
//= a helper for static ascii pseudo-unicode strings
//============================================================
// string constants
struct _ConstAsciiString_
{
sal_Int32 length;
sal_Char const* str;
operator rtl::OUString () const { return rtl::OUString(str, length, RTL_TEXTENCODING_ASCII_US); }
2000-10-19 10:47:14 +00:00
// operator ::rtl::OUString () const { return ::rtl::OUString(str, length, RTL_TEXTENCODING_ASCII_US); }
operator const sal_Char * () const { return str; }
2000-10-19 10:47:14 +00:00
operator ::rtl::OString() const { return str; }
2000-09-18 15:18:56 +00:00
};
#define IMPLEMENT_CONSTASCII_STRING( name, string ) \
_ConstAsciiString_ const name = { sizeof(string)-1, string }
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_GENERAL, "Syntax error in SQL expression");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_GENERAL_HINT, "in front of \"#\" expression." );
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_VALUE_NO_LIKE, "The value # can not be used with LIKE.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_FIELD_NO_LIKE, "LIKE can not be used with this field.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_COMPARE, "The entered criterion can not be compared with this field.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_STRING_COMPARE, "The field can not be compared with a string.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_DATE_COMPARE, "The field can not be compared with a date.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_REAL_COMPARE, "The field can not be compared with a floating point number.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_INT_COMPARE, "The field can not be compared with a number.");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_TABLE, "The database does not contain a table named \"#\".");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_TABLE_OR_QUERY, "The database does contain neither a table nor a query named \"#\".");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_COLUMN, "The column \"#\" is unknown in the table \"#\".");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_TABLE_EXIST, "The database already contains a table or view with name \"#\".");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_INVALID_QUERY_EXIST, "The database already contains a query with name \"#\".");
IMPLEMENT_CONSTASCII_STRING(ERROR_STR_CYCLIC_SUB_QUERIES, "The statement contains a cyclic reference to one or more sub queries.");
2000-09-18 15:18:56 +00:00
IMPLEMENT_CONSTASCII_STRING(KEY_STR_LIKE, "LIKE");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_NOT, "NOT");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_NULL, "NULL");
2002-09-27 10:26:33 +00:00
IMPLEMENT_CONSTASCII_STRING(KEY_STR_TRUE, "True");
2002-05-10 06:55:03 +00:00
IMPLEMENT_CONSTASCII_STRING(KEY_STR_FALSE, "False");
2000-09-18 15:18:56 +00:00
IMPLEMENT_CONSTASCII_STRING(KEY_STR_IS, "IS");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_BETWEEN, "BETWEEN");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_OR, "OR");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_AND, "AND");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_AVG, "AVG");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_COUNT, "COUNT");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_MAX, "MAX");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_MIN, "MIN");
IMPLEMENT_CONSTASCII_STRING(KEY_STR_SUM, "SUM");
IMPLEMENT_CONSTASCII_STRING(FIELD_STR_NULLDATE, "NullDate");
IMPLEMENT_CONSTASCII_STRING(STR_SQL_TOKEN, "SQL_TOKEN_");
//==========================================================================
//= OParseContext
//==========================================================================
//-----------------------------------------------------------------------------
OParseContext::OParseContext()
{
}
//-----------------------------------------------------------------------------
OParseContext::~OParseContext()
{
}
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
::rtl::OUString OParseContext::getErrorMessage(ErrorCode _eCode) const
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
::rtl::OUString aMsg;
2000-09-18 15:18:56 +00:00
switch (_eCode)
{
2000-10-19 10:47:14 +00:00
case ERROR_GENERAL: aMsg = ERROR_STR_GENERAL; break;
case ERROR_GENERAL_HINT: aMsg = ERROR_STR_GENERAL_HINT; break;
case ERROR_VALUE_NO_LIKE: aMsg = ERROR_STR_VALUE_NO_LIKE; break;
case ERROR_FIELD_NO_LIKE: aMsg = ERROR_STR_FIELD_NO_LIKE; break;
case ERROR_INVALID_COMPARE: aMsg = ERROR_STR_INVALID_COMPARE; break;
case ERROR_INVALID_INT_COMPARE: aMsg = ERROR_STR_INVALID_INT_COMPARE; break;
2000-09-18 15:18:56 +00:00
case ERROR_INVALID_STRING_COMPARE: aMsg = ERROR_STR_INVALID_STRING_COMPARE; break;
case ERROR_INVALID_DATE_COMPARE: aMsg = ERROR_STR_INVALID_DATE_COMPARE; break;
2001-09-28 08:25:10 +00:00
case ERROR_INVALID_REAL_COMPARE: aMsg = ERROR_STR_INVALID_REAL_COMPARE; break;
case ERROR_INVALID_TABLE: aMsg = ERROR_STR_INVALID_TABLE; break;
case ERROR_INVALID_TABLE_OR_QUERY: aMsg = ERROR_STR_INVALID_TABLE_OR_QUERY; break;
2001-02-23 13:53:08 +00:00
case ERROR_INVALID_COLUMN: aMsg = ERROR_STR_INVALID_COLUMN; break;
case ERROR_INVALID_TABLE_EXIST: aMsg = ERROR_STR_INVALID_TABLE_EXIST; break;
case ERROR_INVALID_QUERY_EXIST: aMsg = ERROR_STR_INVALID_QUERY_EXIST; break;
case ERROR_CYCLIC_SUB_QUERIES: aMsg = ERROR_STR_CYCLIC_SUB_QUERIES; break;
default:
OSL_ENSURE( false, "OParseContext::getErrorMessage: unknown error code!" );
break;
2000-09-18 15:18:56 +00:00
}
return aMsg;
}
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
::rtl::OString OParseContext::getIntlKeywordAscii(InternationalKeyCode _eKey) const
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
::rtl::OString aKeyword;
2000-09-18 15:18:56 +00:00
switch (_eKey)
{
2000-10-19 10:47:14 +00:00
case KEY_LIKE: aKeyword = KEY_STR_LIKE; break;
case KEY_NOT: aKeyword = KEY_STR_NOT; break;
case KEY_NULL: aKeyword = KEY_STR_NULL; break;
case KEY_TRUE: aKeyword = KEY_STR_TRUE; break;
case KEY_FALSE: aKeyword = KEY_STR_FALSE; break;
case KEY_IS: aKeyword = KEY_STR_IS; break;
case KEY_BETWEEN: aKeyword = KEY_STR_BETWEEN; break;
case KEY_OR: aKeyword = KEY_STR_OR; break;
case KEY_AND: aKeyword = KEY_STR_AND; break;
case KEY_AVG: aKeyword = KEY_STR_AVG; break;
case KEY_COUNT: aKeyword = KEY_STR_COUNT; break;
case KEY_MAX: aKeyword = KEY_STR_MAX; break;
case KEY_MIN: aKeyword = KEY_STR_MIN; break;
case KEY_SUM: aKeyword = KEY_STR_SUM; break;
case KEY_NONE: break;
default:
OSL_ENSURE( false, "OParseContext::getIntlKeywordAscii: unknown key!" );
break;
2000-09-18 15:18:56 +00:00
}
return aKeyword;
}
2000-09-18 15:18:56 +00:00
//-----------------------------------------------------------------------------
2002-09-27 10:26:33 +00:00
IParseContext::InternationalKeyCode OParseContext::getIntlKeyCode(const ::rtl::OString& rToken) const
2000-09-18 15:18:56 +00:00
{
2002-09-27 10:26:33 +00:00
static IParseContext::InternationalKeyCode Intl_TokenID[] =
2000-09-18 15:18:56 +00:00
{
KEY_LIKE, KEY_NOT, KEY_NULL, KEY_TRUE,
KEY_FALSE, KEY_IS, KEY_BETWEEN, KEY_OR,
KEY_AND, KEY_AVG, KEY_COUNT, KEY_MAX,
KEY_MIN, KEY_SUM
};
2000-09-18 15:18:56 +00:00
sal_uInt32 nCount = sizeof Intl_TokenID / sizeof Intl_TokenID[0];
for (sal_uInt32 i = 0; i < nCount; i++)
{
2000-10-19 10:47:14 +00:00
::rtl::OString aKey = getIntlKeywordAscii(Intl_TokenID[i]);
2001-05-11 16:51:47 +00:00
if (rToken.equalsIgnoreAsciiCase(aKey))
return Intl_TokenID[i];
2000-09-18 15:18:56 +00:00
}
return KEY_NONE;
}
2002-09-27 10:26:33 +00:00
//------------------------------------------------------------------------------
static Locale& impl_getLocaleInstance( )
{
static Locale s_aLocale(
::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "en" ) ),
::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "US" ) ),
::rtl::OUString( )
);
return s_aLocale;
}
//------------------------------------------------------------------------------
void OParseContext::setDefaultLocale( const ::com::sun::star::lang::Locale& _rLocale )
{
impl_getLocaleInstance() = _rLocale;
}
//------------------------------------------------------------------------------
Locale OParseContext::getPreferredLocale( ) const
{
return getDefaultLocale();
}
//------------------------------------------------------------------------------
const Locale& OParseContext::getDefaultLocale()
{
return impl_getLocaleInstance();
}
2000-09-18 15:18:56 +00:00
//==========================================================================
//= misc
//==========================================================================
// Der (leider globale) yylval fuer die Uebergabe von
// Werten vom Scanner an den Parser. Die globale Variable
// wird nur kurzzeitig verwendet, der Parser liest die Variable
// sofort nach dem Scanner-Aufruf in eine gleichnamige eigene
// Member-Variable.
const double fMilliSecondsPerDay = 86400000.0;
//------------------------------------------------------------------------------
//------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
::rtl::OUString ConvertLikeToken(const OSQLParseNode* pTokenNode, const OSQLParseNode* pEscapeNode, sal_Bool bInternational)
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
::rtl::OUString aMatchStr;
2000-09-18 15:18:56 +00:00
if (pTokenNode->isToken())
{
2000-10-19 10:47:14 +00:00
sal_Char cEscape = 0;
2000-09-18 15:18:56 +00:00
if (pEscapeNode->count())
cEscape = static_cast<sal_Char>(pEscapeNode->getChild(1)->getTokenValue().toChar());
2000-09-18 15:18:56 +00:00
// Platzhalter austauschen
aMatchStr = pTokenNode->getTokenValue();
2001-04-04 06:28:58 +00:00
sal_Int32 nLen = aMatchStr.getLength();
2000-10-19 10:47:14 +00:00
const sal_Char* sSearch = bInternational ? "%_" : "*?";
const sal_Char* sReplace = bInternational ? "*?" : "%_";
2001-04-04 06:28:58 +00:00
for (sal_Int32 i = 0; i < nLen; i++)
2000-09-18 15:18:56 +00:00
{
sal_Char c = static_cast<sal_Char>(aMatchStr.getStr()[i]);
2000-09-18 15:18:56 +00:00
if (c == sSearch[0] || c == sSearch[1])
{
2000-10-19 10:47:14 +00:00
if (i > 0 && aMatchStr.getStr()[i-1] == cEscape)
2000-09-18 15:18:56 +00:00
continue;
2001-09-28 08:25:10 +00:00
else
{
sal_Unicode cCharacter = sReplace[(c == sSearch[0]) ? 0 : 1];
aMatchStr = aMatchStr.replaceAt(i , 1, ::rtl::OUString(&cCharacter, 1));
}
2000-09-18 15:18:56 +00:00
}
}
}
return aMatchStr;
}
//==========================================================================
//= OSQLParser
2000-09-18 15:18:56 +00:00
//==========================================================================
sal_uInt32 OSQLParser::s_nRuleIDs[OSQLParseNode::rule_count + 1];
OSQLParser::RuleIDMap OSQLParser::s_aReverseRuleIDLookup;
OParseContext OSQLParser::s_aDefaultContext;
2000-09-18 15:18:56 +00:00
sal_Int32 OSQLParser::s_nRefCount = 0;
// ::osl::Mutex OSQLParser::s_aMutex;
OSQLScanner* OSQLParser::s_pScanner = 0;
2000-09-18 15:18:56 +00:00
OSQLParseNodes* OSQLParser::s_pGarbageCollector = 0;
2001-04-04 06:28:58 +00:00
::com::sun::star::uno::Reference< ::com::sun::star::i18n::XLocaleData> OSQLParser::s_xLocaleData = NULL;
2001-09-28 08:25:10 +00:00
//-----------------------------------------------------------------------------
void setParser(OSQLParser* _pParser)
{
xxx_pGLOBAL_SQLPARSER = _pParser;
2000-09-18 15:18:56 +00:00
}
//-----------------------------------------------------------------------------
OSQLParser::~OSQLParser()
{
{
::osl::MutexGuard aGuard(getMutex());
2001-03-21 12:52:43 +00:00
OSL_ENSURE(s_nRefCount > 0, "OSQLParser::~OSQLParser() : suspicious call : have a refcount of 0 !");
2000-09-18 15:18:56 +00:00
if (!--s_nRefCount)
{
2000-09-18 15:18:56 +00:00
s_pScanner->setScanner(sal_True);
delete s_pScanner;
s_pScanner = NULL;
delete s_pGarbageCollector;
2001-09-28 08:25:10 +00:00
s_pGarbageCollector = NULL;
// is only set the first time so we should delete it only when there no more instances
2001-04-04 06:28:58 +00:00
s_xLocaleData = NULL;
RuleIDMap aEmpty;
s_aReverseRuleIDLookup.swap( aEmpty );
2001-09-28 08:25:10 +00:00
}
2001-04-12 11:34:59 +00:00
m_pParseTree = NULL;
2000-09-18 15:18:56 +00:00
}
}
2000-10-17 07:37:23 +00:00
// -------------------------------------------------------------------------
void OSQLParser::setParseTree(OSQLParseNode * pNewParseTree)
{
::osl::MutexGuard aGuard(getMutex());
m_pParseTree = pNewParseTree;
2000-10-17 07:37:23 +00:00
}
2000-09-18 15:18:56 +00:00
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
OSQLParseNode* OSQLParser::parseTree(::rtl::OUString& rErrorMessage,
const ::rtl::OUString& rStatement,
2000-09-18 15:18:56 +00:00
sal_Bool bInternational)
{
2000-09-18 15:18:56 +00:00
// Guard the parsing
::osl::MutexGuard aGuard(getMutex());
// must be reset
2001-05-25 12:11:19 +00:00
setParser(this);
2000-09-18 15:18:56 +00:00
// defines how to scan
s_pScanner->SetRule(s_pScanner->GetSQLRule()); // initial
s_pScanner->prepareScan(rStatement, m_pContext, bInternational);
SQLyylval.pParseNode = NULL;
// SQLyypvt = NULL;
m_pParseTree = NULL;
2000-10-19 10:47:14 +00:00
m_sErrorMessage = ::rtl::OUString();
2000-09-18 15:18:56 +00:00
// ... und den Parser anwerfen ...
if (SQLyyparse() != 0)
{
// only set the error message, if it's not already set
2000-10-19 10:47:14 +00:00
if (!m_sErrorMessage.getLength())
2000-09-18 15:18:56 +00:00
m_sErrorMessage = s_pScanner->getErrorMessage();
2000-10-19 10:47:14 +00:00
if (!m_sErrorMessage.getLength())
2002-09-27 10:26:33 +00:00
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_GENERAL);
2000-09-18 15:18:56 +00:00
rErrorMessage = m_sErrorMessage;
// clear the garbage collector
while (!s_pGarbageCollector->empty())
{
OSQLParseNode* pNode = *s_pGarbageCollector->begin();
while (pNode->getParent())
pNode = pNode->getParent();
delete pNode;
}
return NULL;
}
else
{
s_pGarbageCollector->clear();
// Das Ergebnis liefern (den Root Parse Node):
2001-03-21 12:52:43 +00:00
// OSL_ENSURE(Sdbyyval.pParseNode != NULL,"OSQLParser: Parser hat keinen ParseNode geliefert");
2000-09-18 15:18:56 +00:00
// return Sdbyyval.pParseNode;
// geht nicht wegen Bug in MKS YACC-erzeugtem Code (es wird ein falscher ParseNode
// geliefert).
// Stattdessen setzt die Parse-Routine jetzt den Member pParseTree
// - einfach diesen zurueckliefern:
2001-03-21 12:52:43 +00:00
OSL_ENSURE(m_pParseTree != NULL,"OSQLParser: Parser hat keinen ParseTree geliefert");
2000-09-18 15:18:56 +00:00
return m_pParseTree;
}
}
//-----------------------------------------------------------------------------
2002-09-27 10:26:33 +00:00
::rtl::OString OSQLParser::TokenIDToStr(sal_uInt32 nTokenID, const IParseContext* pContext)
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
::rtl::OString aStr;
2000-09-18 15:18:56 +00:00
if (pContext)
2002-09-27 10:26:33 +00:00
{
IParseContext::InternationalKeyCode eKeyCode = IParseContext::KEY_NONE;
switch( nTokenID )
{
case SQL_TOKEN_LIKE: eKeyCode = IParseContext::KEY_LIKE; break;
case SQL_TOKEN_NOT: eKeyCode = IParseContext::KEY_NOT; break;
case SQL_TOKEN_NULL: eKeyCode = IParseContext::KEY_NULL; break;
case SQL_TOKEN_TRUE: eKeyCode = IParseContext::KEY_TRUE; break;
case SQL_TOKEN_FALSE: eKeyCode = IParseContext::KEY_FALSE; break;
case SQL_TOKEN_IS: eKeyCode = IParseContext::KEY_IS; break;
case SQL_TOKEN_BETWEEN: eKeyCode = IParseContext::KEY_BETWEEN; break;
case SQL_TOKEN_OR: eKeyCode = IParseContext::KEY_OR; break;
case SQL_TOKEN_AND: eKeyCode = IParseContext::KEY_AND; break;
case SQL_TOKEN_AVG: eKeyCode = IParseContext::KEY_AVG; break;
case SQL_TOKEN_COUNT: eKeyCode = IParseContext::KEY_COUNT; break;
case SQL_TOKEN_MAX: eKeyCode = IParseContext::KEY_MAX; break;
case SQL_TOKEN_MIN: eKeyCode = IParseContext::KEY_MIN; break;
case SQL_TOKEN_SUM: eKeyCode = IParseContext::KEY_SUM; break;
}
aStr = pContext->getIntlKeywordAscii(eKeyCode);
}
2000-09-18 15:18:56 +00:00
2000-10-19 10:47:14 +00:00
if (!aStr.getLength())
2000-09-18 15:18:56 +00:00
{
aStr = yytname[YYTRANSLATE(nTokenID)];
2000-10-19 10:47:14 +00:00
if(!aStr.compareTo("SQL_TOKEN_",10))
aStr = aStr.copy(10);
2000-09-18 15:18:56 +00:00
}
return aStr;
}
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
/*sal_uInt32 OSQLParser::StrToTokenID(const ::rtl::OString & rName)
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
::rtl::OString aName;
2000-09-18 15:18:56 +00:00
if (rName.IsAlphaNumericAscii())
aName = rName;
2000-09-18 15:18:56 +00:00
else
{
aName = "'";
aName += rName;
aName += "'";
}
// Gewuenschten Token-Namen suchen:
for (sal_uInt32 i = 0; i < SQLyyntoken; i++)
{
if (aName == TokenTypes[i].name)
return TokenTypes[i].token;
}
// Nicht gefunden
return 0;
}*/
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
::rtl::OUString OSQLParser::RuleIDToStr(sal_uInt32 nRuleID)
2000-09-18 15:18:56 +00:00
{
2001-09-28 08:25:10 +00:00
OSL_ENSURE(nRuleID < (sizeof yytname/sizeof yytname[0]), "OSQLParser::RuleIDToStr: Invalid nRuleId!");
2000-10-19 10:47:14 +00:00
return ::rtl::OUString::createFromAscii(yytname[nRuleID]);
2000-09-18 15:18:56 +00:00
}
//-----------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
sal_uInt32 OSQLParser::StrToRuleID(const ::rtl::OString & rValue)
2000-09-18 15:18:56 +00:00
{
// In yysvar nach dem angegebenen Namen suchen, den Index zurueckliefern
2000-09-18 15:18:56 +00:00
// (oder 0, wenn nicht gefunden)
static sal_uInt32 nLen = sizeof(yytname)/sizeof(yytname[0]);
for (sal_uInt32 i = YYTRANSLATE(SQL_TOKEN_INVALIDSYMBOL); i < (nLen-1); i++)
2000-09-18 15:18:56 +00:00
{
if (yytname && rValue == yytname[i])
return i;
}
// Nicht gefunden
return 0;
}
//-----------------------------------------------------------------------------
OSQLParseNode::Rule OSQLParser::RuleIDToRule( sal_uInt32 _nRule )
{
return s_aReverseRuleIDLookup[ _nRule ];
}
2000-09-18 15:18:56 +00:00
//-----------------------------------------------------------------------------
sal_uInt32 OSQLParser::RuleID(OSQLParseNode::Rule eRule)
{
return s_nRuleIDs[(sal_uInt16)eRule];
}
// -------------------------------------------------------------------------
sal_Int16 OSQLParser::buildNode(OSQLParseNode*& pAppend,OSQLParseNode* pCompare,OSQLParseNode* pLiteral,OSQLParseNode* pLiteral2)
2000-09-18 15:18:56 +00:00
{
OSQLParseNode* pColumnRef = new OSQLInternalNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::column_ref));
pColumnRef->append(new OSQLInternalNode(m_sFieldName,SQL_NODE_NAME));
OSQLParseNode* pComp = NULL;
if ( SQL_ISTOKEN( pCompare, BETWEEN) && pLiteral2 )
pComp = new OSQLInternalNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::between_predicate));
else
pComp = new OSQLInternalNode(aEmptyString, SQL_NODE_RULE,OSQLParser::RuleID(OSQLParseNode::comparison_predicate));
2000-09-18 15:18:56 +00:00
pComp->append(pColumnRef);
pComp->append(pCompare);
pComp->append(pLiteral);
if ( pLiteral2 )
2000-09-18 15:18:56 +00:00
{
pComp->append(new OSQLInternalNode(aEmptyString, SQL_NODE_KEYWORD,SQL_TOKEN_AND));
pComp->append(pLiteral2);
2000-09-18 15:18:56 +00:00
}
pAppend->append(pComp);
return 1;
}
//-----------------------------------------------------------------------------
sal_Int16 OSQLParser::buildStringNodes(OSQLParseNode*& pLiteral)
{
if(!pLiteral)
return 1;
if(SQL_ISRULE(pLiteral,set_fct_spec) || SQL_ISRULE(pLiteral,general_set_fct) || SQL_ISRULE(pLiteral,column_ref)
|| SQL_ISRULE(pLiteral,subquery))
return 1; // here I have a function that I can't transform into a string
if(pLiteral->getNodeType() == SQL_NODE_INTNUM || pLiteral->getNodeType() == SQL_NODE_APPROXNUM || pLiteral->getNodeType() == SQL_NODE_ACCESS_DATE)
{
OSQLParseNode* pParent = pLiteral->getParent();
OSQLParseNode* pNewNode = new OSQLInternalNode(pLiteral->getTokenValue(), SQL_NODE_STRING);
pParent->replace(pLiteral, pNewNode);
delete pLiteral;
pLiteral = NULL;
return 1;
}
for(sal_uInt32 i=0;i<pLiteral->count();++i)
{
OSQLParseNode* pChild = pLiteral->getChild(i);
buildStringNodes(pChild);
}
if(SQL_ISRULE(pLiteral,term) || SQL_ISRULE(pLiteral,value_exp_primary))
{
2002-09-27 10:26:33 +00:00
m_sErrorMessage = m_pContext->getErrorMessage(IParseContext::ERROR_INVALID_COMPARE);
2000-09-18 15:18:56 +00:00
return 0;
}
return 1;
}
//-----------------------------------------------------------------------------
sal_Int16 OSQLParser::buildComparsionRule(OSQLParseNode*& pAppend,OSQLParseNode* pLiteral)
{
2000-10-19 10:47:14 +00:00
OSQLParseNode* pComp = new OSQLInternalNode(::rtl::OUString::createFromAscii("="), SQL_NODE_EQUAL);
return buildPredicateRule(pAppend,pLiteral,pComp);
2000-09-18 15:18:56 +00:00
}
//-----------------------------------------------------------------------------
void OSQLParser::reduceLiteral(OSQLParseNode*& pLiteral, sal_Bool bAppendBlank)
{
2001-03-21 12:52:43 +00:00
OSL_ENSURE(pLiteral->isRule(), "This is no ::com::sun::star::chaos::Rule");
OSL_ENSURE(pLiteral->count() == 2, "OSQLParser::ReduceLiteral() Invalid count");
2000-09-18 15:18:56 +00:00
OSQLParseNode* pTemp = pLiteral;
2000-10-19 10:47:14 +00:00
::rtl::OUString aValue;
2000-09-18 15:18:56 +00:00
if (bAppendBlank)
{
2000-10-19 10:47:14 +00:00
((aValue = pLiteral->getChild(0)->getTokenValue()) += ::rtl::OUString::createFromAscii(" ")) +=
2000-09-18 15:18:56 +00:00
pLiteral->getChild(1)->getTokenValue();
}
else
(aValue = pLiteral->getChild(0)->getTokenValue()) +=
pLiteral->getChild(1)->getTokenValue();
pLiteral = new OSQLInternalNode(aValue,SQL_NODE_STRING);
delete pTemp;
2001-09-28 08:25:10 +00:00
}
2001-05-25 12:11:19 +00:00
2000-09-18 15:18:56 +00:00
// -------------------------------------------------------------------------
2000-10-19 10:47:14 +00:00
void OSQLParser::error(sal_Char *fmt)
2000-09-18 15:18:56 +00:00
{
2000-10-19 10:47:14 +00:00
if(!m_sErrorMessage.getLength())
{
::rtl::OUString sStr(fmt,strlen(fmt),RTL_TEXTENCODING_UTF8);
::rtl::OUString sSQL_TOKEN(::rtl::OUString::createFromAscii("SQL_TOKEN_"));
sal_Int32 nPos1 = sStr.indexOf(sSQL_TOKEN);
if(nPos1 != -1)
{
::rtl::OUString sFirst = sStr.copy(0,nPos1);
sal_Int32 nPos2 = sStr.indexOf(sSQL_TOKEN,nPos1+1);
if(nPos2 != -1)
{
::rtl::OUString sSecond = sStr.copy(nPos1+sSQL_TOKEN.getLength(),nPos2-nPos1-sSQL_TOKEN.getLength());
sFirst += sSecond;
sFirst += sStr.copy(nPos2+sSQL_TOKEN.getLength());
2001-09-28 08:25:10 +00:00
}
else
2001-05-25 12:11:19 +00:00
sFirst += sStr.copy(nPos1+sSQL_TOKEN.getLength());
m_sErrorMessage = sFirst;
}
else
m_sErrorMessage = sStr;
::rtl::OUString aError = s_pScanner->getErrorMessage();
if(aError.getLength())
{
m_sErrorMessage += ::rtl::OUString::createFromAscii(", ");
m_sErrorMessage += aError;
}
2000-09-18 15:18:56 +00:00
}
}
// -------------------------------------------------------------------------
int OSQLParser::SQLlex()
{
return s_pScanner->SQLlex();
}
#if defined __SUNPRO_CC
#pragma enable_warn
#elif defined _MSC_VER
#pragma warning(pop)
#endif