procedure.h
上传用户:romrleung
上传日期:2022-05-23
资源大小:18897k
文件大小:5k
源码类别:

MySQL数据库

开发平台:

Visual C++

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