1
/* vim: expandtab:shiftwidth=2:tabstop=2:smarttab:
2
Copyright (C) 2006 MySQL AB
4
This program is free software; you can redistribute it and/or modify
5
it under the terms of the GNU General Public License as published by
6
the Free Software Foundation; version 2 of the License.
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.
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA */
24
#include <drizzled/plugin/function.h>
25
#include <drizzled/item/func.h>
26
#include "drizzled/charset.h"
27
#include <drizzled/function/str/strfunc.h>
30
using namespace drizzled;
32
class Md5Function : public Item_str_func
35
Md5Function() : Item_str_func() {}
36
String *val_str(String*);
38
void fix_length_and_dec()
41
args[0]->collation.set(
42
get_charset_by_csname(args[0]->collation.collation->csname,
43
MY_CS_BINSORT), DERIVATION_COERCIBLE);
46
const char *func_name() const
51
bool check_argument_count(int n)
58
String *Md5Function::val_str(String *str)
60
assert(fixed == true);
62
String *sptr= args[0]->val_str(str);
63
if (sptr == NULL || str->alloc(32))
71
str->set_charset(&my_charset_bin);
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);
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);
86
gcry_md_close(md5_context);
92
plugin::Create_function<Md5Function> *md5udf= NULL;
94
static int initialize(module::Context &context)
96
/* Initialize libgcrypt */
97
if (not gcry_check_version(GCRYPT_VERSION))
99
errmsg_printf(ERRMSG_LVL_ERROR, _("libgcrypt library version mismatch\n"));
102
/* Disable secure memory. */
103
gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
105
/* Tell Libgcrypt that initialization has completed. */
106
gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
108
md5udf= new plugin::Create_function<Md5Function>("md5");
113
DRIZZLE_DECLARE_PLUGIN
119
"UDF for computing md5sum",
121
initialize, /* Plugin Init */
122
NULL, /* system variables */
123
NULL /* config options */
125
DRIZZLE_DECLARE_PLUGIN_END;