home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 January / Chip_2001-01_cd1.bin / tema / mysql / mysql-3.23.28g-win-source.exe / sql / procedure.h < prev    next >
C/C++ Source or Header  |  2000-08-31  |  4KB  |  125 lines
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This program is free software; you can redistribute it and/or modify
  4.    it under the terms of the GNU General Public License as published by
  5.    the Free Software Foundation; either version 2 of the License, or
  6.    (at your option) any later version.
  7.    
  8.    This program is distributed in the hope that it will be useful,
  9.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11.    GNU General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU General Public License
  14.    along with this program; if not, write to the Free Software
  15.    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  16.  
  17.  
  18. /* When using sql procedures */
  19.  
  20. #ifdef __GNUC__
  21. #pragma interface                /* gcc class implementation */
  22. #endif
  23.  
  24. #define PROC_NO_SORT 1                /* Bits in flags */
  25. #define PROC_GROUP   2                /* proc must have group */
  26.  
  27. /* Procedure items used by procedures to store values for send_fields */
  28.  
  29. class Item_proc :public Item
  30. {
  31. public:
  32.   Item_proc(const char *name_par): Item()
  33.   {
  34.      this->name=(char*) name_par;
  35.   }
  36.   enum Type type() const { return Item::PROC_ITEM; }
  37.   virtual void set(double nr)=0;
  38.   virtual void set(const char *str,uint length)=0;
  39.   virtual void set(longlong nr)=0;
  40.   virtual enum_field_types field_type() const=0;
  41.   void set(const char *str) { set(str,(uint) strlen(str)); }
  42.   void make_field(Send_field *tmp_field)
  43.   {
  44.     init_make_field(tmp_field,field_type());
  45.   }
  46. };
  47.  
  48. class Item_proc_real :public Item_proc
  49. {
  50.   double value;
  51. public:
  52.   Item_proc_real(const char *name_par,uint dec) : Item_proc(name_par)
  53.   {
  54.      decimals=dec; max_length=float_length(dec);
  55.   }
  56.   enum Item_result result_type () const { return REAL_RESULT; }
  57.   enum_field_types field_type() const { return FIELD_TYPE_DOUBLE; }
  58.   void set(double nr) { value=nr; }
  59.   void set(longlong nr) { value=(double) nr; }
  60.   void set(const char *str,uint length __attribute__((unused)))
  61.   { value=atof(str); }
  62.   double val() { return value; }
  63.   longlong val_int() { return (longlong) value; }
  64.   String *val_str(String *s) { s->set(value,decimals); return s; }
  65. };
  66.  
  67. class Item_proc_int :public Item_proc
  68. {
  69.   longlong value;
  70. public:
  71.   Item_proc_int(const char *name_par) :Item_proc(name_par)
  72.   { max_length=11; }
  73.   enum Item_result result_type () const { return INT_RESULT; }
  74.   enum_field_types field_type() const { return FIELD_TYPE_LONG; }
  75.   void set(double nr) { value=(longlong) nr; }
  76.   void set(longlong nr) { value=nr; }
  77.   void set(const char *str,uint length __attribute__((unused)))
  78.   { value=strtoll(str,NULL,10); }
  79.   double val() { return (double) value; }
  80.   longlong val_int() { return value; }
  81.   String *val_str(String *s) { s->set(value); return s; }
  82. };
  83.  
  84.  
  85. class Item_proc_string :public Item_proc
  86. {
  87. public:
  88.   Item_proc_string(const char *name_par,uint length) :Item_proc(name_par)
  89.     { this->max_length=length; }
  90.   enum Item_result result_type () const { return STRING_RESULT; }
  91.   enum_field_types field_type() const { return FIELD_TYPE_STRING; }
  92.   void set(double nr) { str_value.set(nr); }
  93.   void set(longlong nr) { str_value.set(nr); }
  94.   void set(const char *str, uint length) { str_value.copy(str,length); }
  95.   double val() { return atof(str_value.ptr()); }
  96.   longlong val_int() { return strtoll(str_value.ptr(),NULL,10); }
  97.   String *val_str(String*)
  98.   {
  99.     return null_value ? (String*) 0 : (String*) &str_value;
  100.   }
  101. };
  102.  
  103. /* The procedure class definitions */
  104.  
  105. class Procedure {
  106. protected:
  107.   List<Item> *fields;
  108.   select_result *result;
  109. public:
  110.   const uint flags;
  111.   ORDER *group,*param_fields;
  112.   Procedure(select_result *res,uint flags_par) :result(res),flags(flags_par),
  113.     group(0),param_fields(0) {}
  114.   virtual ~Procedure() {group=param_fields=0; fields=0; }
  115.   virtual void add(void)=0;
  116.   virtual void end_group(void)=0;
  117.   virtual int send_row(List<Item> &fields)=0;
  118.   virtual bool change_columns(List<Item> &fields)=0;
  119.   virtual void update_refs(void) {}
  120.   virtual bool end_of_records() { return 0; }
  121. };
  122.  
  123. Procedure *setup_procedure(THD *thd,ORDER *proc_param,select_result *result,
  124.                List<Item> &field_list,int *error);
  125.