Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
/* -*- C++ -*- */
|
|
|
|
/* Copyright (C) 2002 MySQL AB
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
|
|
|
|
|
|
|
|
#ifndef _SP_PCONTEXT_H_
|
|
|
|
#define _SP_PCONTEXT_H_
|
|
|
|
|
|
|
|
#ifdef __GNUC__
|
|
|
|
#pragma interface /* gcc class implementation */
|
|
|
|
#endif
|
|
|
|
|
|
|
|
typedef enum
|
|
|
|
{
|
|
|
|
sp_param_in,
|
|
|
|
sp_param_out,
|
|
|
|
sp_param_inout
|
|
|
|
} sp_param_mode_t;
|
|
|
|
|
2003-10-10 16:57:21 +02:00
|
|
|
typedef struct sp_pvar
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
{
|
2003-03-26 12:29:58 +01:00
|
|
|
LEX_STRING name;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
enum enum_field_types type;
|
|
|
|
sp_param_mode_t mode;
|
|
|
|
uint offset; // Offset in current frame
|
|
|
|
my_bool isset;
|
2004-04-06 15:48:58 +02:00
|
|
|
Item *dflt;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
} sp_pvar_t;
|
|
|
|
|
2002-12-16 15:40:44 +01:00
|
|
|
typedef struct sp_label
|
2002-12-11 14:24:29 +01:00
|
|
|
{
|
|
|
|
char *name;
|
|
|
|
uint ip; // Instruction index
|
2003-11-13 19:34:56 +01:00
|
|
|
my_bool isbegin; // For ITERATE error checking
|
2002-12-11 14:24:29 +01:00
|
|
|
} sp_label_t;
|
|
|
|
|
2003-09-16 14:26:08 +02:00
|
|
|
typedef struct sp_cond_type
|
|
|
|
{
|
|
|
|
enum { number, state, warning, notfound, exception } type;
|
|
|
|
char sqlstate[6];
|
|
|
|
uint mysqlerr;
|
|
|
|
} sp_cond_type_t;
|
|
|
|
|
|
|
|
typedef struct sp_cond
|
|
|
|
{
|
|
|
|
LEX_STRING name;
|
|
|
|
sp_cond_type_t *val;
|
|
|
|
} sp_cond_t;
|
|
|
|
|
2003-11-13 19:34:56 +01:00
|
|
|
typedef struct sp_scope
|
|
|
|
{
|
|
|
|
uint vars, conds, curs;
|
|
|
|
} sp_scope_t;
|
|
|
|
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
class sp_pcontext : public Sql_alloc
|
|
|
|
{
|
|
|
|
sp_pcontext(const sp_pcontext &); /* Prevent use of these */
|
|
|
|
void operator=(sp_pcontext &);
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
|
|
|
sp_pcontext();
|
|
|
|
|
2003-04-02 20:42:28 +02:00
|
|
|
// Free memory
|
|
|
|
void
|
|
|
|
destroy();
|
|
|
|
|
2003-11-13 19:34:56 +01:00
|
|
|
// For error checking of duplicate things
|
|
|
|
void
|
|
|
|
push_scope();
|
|
|
|
|
|
|
|
void
|
|
|
|
pop_scope();
|
|
|
|
|
2003-09-16 14:26:08 +02:00
|
|
|
//
|
|
|
|
// Parameters and variables
|
|
|
|
//
|
|
|
|
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
inline uint
|
|
|
|
max_framesize()
|
|
|
|
{
|
|
|
|
return m_framesize;
|
|
|
|
}
|
|
|
|
|
|
|
|
inline uint
|
|
|
|
current_framesize()
|
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
return m_pvar.elements;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
inline uint
|
|
|
|
params()
|
|
|
|
{
|
|
|
|
return m_params;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Set the number of parameters to the current esize
|
|
|
|
inline void
|
|
|
|
set_params()
|
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
m_params= m_pvar.elements;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
inline void
|
|
|
|
set_type(uint i, enum enum_field_types type)
|
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
sp_pvar_t *p= find_pvar(i);
|
|
|
|
|
|
|
|
if (p)
|
|
|
|
p->type= type;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
inline void
|
|
|
|
set_isset(uint i, my_bool val)
|
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
sp_pvar_t *p= find_pvar(i);
|
|
|
|
|
|
|
|
if (p)
|
|
|
|
p->isset= val;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
2004-04-06 15:48:58 +02:00
|
|
|
inline void
|
|
|
|
set_default(uint i, Item *it)
|
|
|
|
{
|
|
|
|
sp_pvar_t *p= find_pvar(i);
|
|
|
|
|
|
|
|
if (p)
|
|
|
|
p->dflt= it;
|
|
|
|
}
|
|
|
|
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
void
|
2003-09-16 14:26:08 +02:00
|
|
|
push_pvar(LEX_STRING *name, enum enum_field_types type, sp_param_mode_t mode);
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
|
2002-12-11 14:24:29 +01:00
|
|
|
// Pop the last 'num' slots of the frame
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
inline void
|
2003-09-16 14:26:08 +02:00
|
|
|
pop_pvar(uint num = 1)
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
while (num--)
|
|
|
|
pop_dynamic(&m_pvar);
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
// Find by name
|
|
|
|
sp_pvar_t *
|
2003-11-13 19:34:56 +01:00
|
|
|
find_pvar(LEX_STRING *name, my_bool scoped=0);
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
|
|
|
|
// Find by index
|
|
|
|
sp_pvar_t *
|
|
|
|
find_pvar(uint i)
|
|
|
|
{
|
2003-04-02 20:42:28 +02:00
|
|
|
sp_pvar_t *p;
|
|
|
|
|
|
|
|
if (i < m_pvar.elements)
|
|
|
|
get_dynamic(&m_pvar, (gptr)&p, i);
|
|
|
|
else
|
|
|
|
p= NULL;
|
|
|
|
return p;
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}
|
|
|
|
|
2003-09-16 14:26:08 +02:00
|
|
|
//
|
|
|
|
// Labels
|
|
|
|
//
|
|
|
|
|
2002-12-16 15:40:44 +01:00
|
|
|
sp_label_t *
|
2002-12-11 14:24:29 +01:00
|
|
|
push_label(char *name, uint ip);
|
|
|
|
|
|
|
|
sp_label_t *
|
|
|
|
find_label(char *name);
|
|
|
|
|
2002-12-12 13:14:23 +01:00
|
|
|
inline sp_label_t *
|
|
|
|
last_label()
|
|
|
|
{
|
|
|
|
return m_label.head();
|
|
|
|
}
|
|
|
|
|
2002-12-16 15:40:44 +01:00
|
|
|
inline sp_label_t *
|
2002-12-11 14:24:29 +01:00
|
|
|
pop_label()
|
|
|
|
{
|
2002-12-16 15:40:44 +01:00
|
|
|
return m_label.pop();
|
2002-12-11 14:24:29 +01:00
|
|
|
}
|
|
|
|
|
2003-09-16 14:26:08 +02:00
|
|
|
//
|
|
|
|
// Conditions
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
|
|
|
push_cond(LEX_STRING *name, sp_cond_type_t *val);
|
|
|
|
|
|
|
|
inline void
|
|
|
|
pop_cond(uint num)
|
|
|
|
{
|
|
|
|
while (num--)
|
|
|
|
pop_dynamic(&m_cond);
|
|
|
|
}
|
|
|
|
|
|
|
|
sp_cond_type_t *
|
2003-11-13 19:34:56 +01:00
|
|
|
find_cond(LEX_STRING *name, my_bool scoped=0);
|
2003-09-16 14:26:08 +02:00
|
|
|
|
|
|
|
//
|
|
|
|
// Handlers
|
|
|
|
//
|
|
|
|
|
|
|
|
inline void
|
|
|
|
add_handler()
|
|
|
|
{
|
|
|
|
m_handlers+= 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
inline uint
|
|
|
|
handlers()
|
|
|
|
{
|
|
|
|
return m_handlers;
|
|
|
|
}
|
|
|
|
|
2003-10-10 16:57:21 +02:00
|
|
|
//
|
|
|
|
// Cursors
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
|
|
|
push_cursor(LEX_STRING *name);
|
|
|
|
|
|
|
|
my_bool
|
2003-11-13 19:34:56 +01:00
|
|
|
find_cursor(LEX_STRING *name, uint *poff, my_bool scoped=0);
|
2003-10-10 16:57:21 +02:00
|
|
|
|
|
|
|
inline void
|
|
|
|
pop_cursor(uint num)
|
|
|
|
{
|
|
|
|
while (num--)
|
|
|
|
pop_dynamic(&m_cursor);
|
|
|
|
}
|
|
|
|
|
|
|
|
inline uint
|
|
|
|
cursors()
|
|
|
|
{
|
|
|
|
return m_cursmax;
|
|
|
|
}
|
|
|
|
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
private:
|
|
|
|
|
|
|
|
uint m_params; // The number of parameters
|
|
|
|
uint m_framesize; // The maximum framesize
|
2003-09-16 14:26:08 +02:00
|
|
|
uint m_handlers; // The total number of handlers
|
2003-10-10 16:57:21 +02:00
|
|
|
uint m_cursmax; // The maximum number of cursors
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
|
2003-09-16 14:26:08 +02:00
|
|
|
DYNAMIC_ARRAY m_pvar; // Parameters/variables
|
|
|
|
DYNAMIC_ARRAY m_cond; // Conditions
|
2003-10-10 16:57:21 +02:00
|
|
|
DYNAMIC_ARRAY m_cursor; // Cursors
|
2003-11-13 19:34:56 +01:00
|
|
|
DYNAMIC_ARRAY m_scopes; // For error checking
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
|
2002-12-11 14:24:29 +01:00
|
|
|
List<sp_label_t> m_label; // The label list
|
|
|
|
|
Simplistic, experimental framework for Stored Procedures (SPs).
Implements creation and dropping of PROCEDUREs, IN, OUT, and INOUT parameters,
single-statement procedures, rudimentary multi-statement (begin-end) prodedures
(when the client can handle it), and local variables.
Missing most of the embedded SQL language, all attributes, FUNCTIONs, error handling,
reparses procedures at each call (no caching), etc, etc.
Certainly buggy too, but procedures can actually be created and called....
2002-12-08 19:59:22 +01:00
|
|
|
}; // class sp_pcontext : public Sql_alloc
|
|
|
|
|
|
|
|
|
|
|
|
#endif /* _SP_PCONTEXT_H_ */
|