~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to plugin/md5/md5udf.cc

  • Committer: Monty Taylor
  • Date: 2008-10-09 22:38:27 UTC
  • mto: This revision was merged to the branch mainline in revision 497.
  • Revision ID: monty@inaugust.com-20081009223827-bc9gvpiplsmvpwyq
Moved test() to its own file.
Made a new function to possibly replace int10_to_str.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* vim: expandtab:shiftwidth=2:tabstop=2:smarttab: 
2
 
   Copyright (C) 2006 MySQL AB
 
1
/* Copyright (C) 2006 MySQL AB
3
2
 
4
3
   This program is free software; you can redistribute it and/or modify
5
4
   it under the terms of the GNU General Public License as published by
14
13
   along with this program; if not, write to the Free Software
15
14
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA */
16
15
 
17
 
#include "config.h"
18
 
 
19
 
#include <cstdio>
20
 
#include <cstddef>
21
 
 
22
 
#include <gcrypt.h>
23
 
 
24
 
#include <drizzled/plugin/function.h>
25
 
#include <drizzled/item/func.h>
26
 
#include "drizzled/charset.h"
27
 
#include <drizzled/function/str/strfunc.h>
28
 
 
29
 
using namespace std;
30
 
using namespace drizzled;
31
 
 
32
 
class Md5Function : public Item_str_func
 
16
#include <drizzled/common_includes.h>
 
17
#include <drizzled/item_func.h>
 
18
#include <drizzled/item_strfunc.h>
 
19
 
 
20
#include <openssl/md5.h>
 
21
 
 
22
class Item_func_md5 : public Item_str_func
33
23
{
34
24
public:
35
 
  Md5Function() : Item_str_func() {}
 
25
  const char *func_name() const { return "md5"; }
36
26
  String *val_str(String*);
37
 
 
38
 
  void fix_length_and_dec() 
39
 
  {
40
 
    max_length= 32;
 
27
  void fix_length_and_dec() {
 
28
    max_length=32;
41
29
    args[0]->collation.set(
42
30
      get_charset_by_csname(args[0]->collation.collation->csname,
43
 
                            MY_CS_BINSORT), DERIVATION_COERCIBLE);
44
 
  }
45
 
 
46
 
  const char *func_name() const 
47
 
  { 
48
 
    return "md5"; 
49
 
  }
50
 
 
51
 
  bool check_argument_count(int n) 
52
 
  { 
53
 
    return (n == 1); 
54
 
  }
 
31
                            MY_CS_BINSORT,MYF(0)), DERIVATION_COERCIBLE);
 
32
  }
 
33
 
55
34
};
56
35
 
57
36
 
58
 
String *Md5Function::val_str(String *str)
 
37
String *Item_func_md5::val_str(String *str)
59
38
{
60
 
  assert(fixed == true);
61
 
 
62
 
  String *sptr= args[0]->val_str(str);
63
 
  if (sptr == NULL || str->alloc(32)) 
64
 
  {
65
 
    null_value= true;
66
 
    return 0;
67
 
  }
68
 
 
69
 
  null_value= false;
70
 
 
 
39
  assert(fixed == 1);
 
40
  String * sptr= args[0]->val_str(str);
71
41
  str->set_charset(&my_charset_bin);
72
 
 
73
 
  gcry_md_hd_t md5_context;
74
 
  gcry_md_open(&md5_context, GCRY_MD_MD5, 0);
75
 
  gcry_md_write(md5_context, sptr->ptr(), sptr->length());  
76
 
  unsigned char *digest= gcry_md_read(md5_context, 0);
77
 
 
78
 
  snprintf((char *) str->ptr(), 33,
79
 
    "%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x",
80
 
    digest[0], digest[1], digest[2], digest[3],
81
 
    digest[4], digest[5], digest[6], digest[7],
82
 
    digest[8], digest[9], digest[10], digest[11],
83
 
    digest[12], digest[13], digest[14], digest[15]);
84
 
  str->length((uint32_t) 32);
85
 
 
86
 
  gcry_md_close(md5_context);
87
 
 
88
 
  return str;
89
 
}
90
 
 
91
 
 
92
 
plugin::Create_function<Md5Function> *md5udf= NULL;
93
 
 
94
 
static int initialize(module::Context &context)
95
 
{
96
 
  /* Initialize libgcrypt */
97
 
  if (not gcry_check_version(GCRYPT_VERSION))
 
42
  if (sptr)
98
43
  {
99
 
    errmsg_printf(ERRMSG_LVL_ERROR, _("libgcrypt library version mismatch\n"));
100
 
    return 1;
 
44
    MD5_CTX context;
 
45
    unsigned char digest[16];
 
46
 
 
47
    null_value=0;
 
48
    MD5_Init (&context);
 
49
    MD5_Update (&context,(unsigned char *) sptr->ptr(), sptr->length());
 
50
    MD5_Final (digest, &context);
 
51
    if (str->alloc(32))                         // Ensure that memory is free
 
52
    {
 
53
      null_value=1;
 
54
      return 0;
 
55
    }
 
56
    snprintf((char *) str->ptr(), 33,
 
57
            "%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x",
 
58
            digest[0], digest[1], digest[2], digest[3],
 
59
            digest[4], digest[5], digest[6], digest[7],
 
60
            digest[8], digest[9], digest[10], digest[11],
 
61
            digest[12], digest[13], digest[14], digest[15]);
 
62
    str->length((uint) 32);
 
63
    return str;
101
64
  }
102
 
  /* Disable secure memory.  */
103
 
  gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
104
 
 
105
 
  /* Tell Libgcrypt that initialization has completed. */
106
 
  gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
107
 
 
108
 
  md5udf= new plugin::Create_function<Md5Function>("md5");
109
 
  context.add(md5udf);
110
 
  return 0;
111
 
}
112
 
 
113
 
DRIZZLE_DECLARE_PLUGIN
114
 
{
115
 
  DRIZZLE_VERSION_ID,
 
65
  null_value=1;
 
66
  return 0;
 
67
}
 
68
 
 
69
 
 
70
Item_func* create_md5udf_item(MEM_ROOT* m)
 
71
{
 
72
  return  new (m) Item_func_md5();
 
73
}
 
74
 
 
75
struct udf_func md5udf = {
 
76
  { C_STRING_WITH_LEN("md5") },
 
77
  create_md5udf_item
 
78
};
 
79
 
 
80
static int md5udf_plugin_init(void *p)
 
81
{
 
82
  udf_func **f = (udf_func**) p;
 
83
 
 
84
  *f= &md5udf;
 
85
 
 
86
  return 0;
 
87
}
 
88
 
 
89
static int md5udf_plugin_deinit(void *p)
 
90
{
 
91
  udf_func *udff = (udf_func *) p;
 
92
  (void)udff;
 
93
  return 0;
 
94
}
 
95
 
 
96
mysql_declare_plugin(md5)
 
97
{
 
98
  DRIZZLE_UDF_PLUGIN,
116
99
  "md5",
117
100
  "1.0",
118
101
  "Stewart Smith",
119
102
  "UDF for computing md5sum",
120
103
  PLUGIN_LICENSE_GPL,
121
 
  initialize, /* Plugin Init */
 
104
  md5udf_plugin_init, /* Plugin Init */
 
105
  md5udf_plugin_deinit, /* Plugin Deinit */
 
106
  NULL,   /* status variables */
122
107
  NULL,   /* system variables */
123
108
  NULL    /* config options */
124
109
}
125
 
DRIZZLE_DECLARE_PLUGIN_END;
 
110
mysql_declare_plugin_end;