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 */
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
16
#include <drizzled/common_includes.h>
17
#include <drizzled/item_func.h>
18
#include <drizzled/item_strfunc.h>
20
#include <openssl/md5.h>
22
class Item_func_md5 : public Item_str_func
35
Md5Function() : Item_str_func() {}
25
const char *func_name() const { return "md5"; }
36
26
String *val_str(String*);
38
void fix_length_and_dec()
27
void fix_length_and_dec() {
41
29
args[0]->collation.set(
42
30
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)
31
MY_CS_BINSORT,MYF(0)), DERIVATION_COERCIBLE);
58
String *Md5Function::val_str(String *str)
37
String *Item_func_md5::val_str(String *str)
60
assert(fixed == true);
62
String *sptr= args[0]->val_str(str);
63
if (sptr == NULL || str->alloc(32))
40
String * sptr= args[0]->val_str(str);
71
41
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"));
45
unsigned char digest[16];
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
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);
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
70
Item_func* create_md5udf_item(MEM_ROOT* m)
72
return new (m) Item_func_md5();
75
struct udf_func md5udf = {
76
{ C_STRING_WITH_LEN("md5") },
80
static int md5udf_plugin_init(void *p)
82
udf_func **f = (udf_func**) p;
89
static int md5udf_plugin_deinit(void *p)
91
udf_func *udff = (udf_func *) p;
96
mysql_declare_plugin(md5)
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 */
125
DRIZZLE_DECLARE_PLUGIN_END;
110
mysql_declare_plugin_end;