~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to plugin/md5/md5udf.cc

  • Committer: Mark Atwood
  • Date: 2008-10-03 01:39:40 UTC
  • mto: This revision was merged to the branch mainline in revision 437.
  • Revision ID: mark@fallenpegasus.com-20081003013940-mvefjo725dltz41h
rename logging_noop to logging_query

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
33
 
{
34
 
public:
35
 
  Md5Function() : Item_str_func() {}
36
 
  String *val_str(String*);
37
 
 
38
 
  void fix_length_and_dec() 
39
 
  {
40
 
    max_length= 32;
41
 
    args[0]->collation.set(
42
 
      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
 
  }
55
 
};
56
 
 
57
 
 
58
 
String *Md5Function::val_str(String *str)
59
 
{
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
 
 
71
 
  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))
98
 
  {
99
 
    errmsg_printf(ERRMSG_LVL_ERROR, _("libgcrypt library version mismatch\n"));
100
 
    return 1;
101
 
  }
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,
 
16
#include <drizzled/common_includes.h>
 
17
#include <openssl/md5.h>
 
18
 
 
19
bool udf_init_md5udf(UDF_INIT *initid, UDF_ARGS *args, char *message)
 
20
{
 
21
  /* initid->ptr keeps state for between udf_init_foo and udf_deinit_foo */
 
22
  initid->ptr= NULL;
 
23
 
 
24
  if (args->arg_count != 1)
 
25
   {
 
26
      strcpy(message,"MD5() requires one arguments");
 
27
      return 1;
 
28
   }
 
29
 
 
30
   if (args->arg_type[0] != STRING_RESULT)
 
31
   {
 
32
      strcpy(message,"MD5() requires a string");
 
33
      return 1;
 
34
   }
 
35
 
 
36
  return 0;
 
37
}
 
38
 
 
39
char *udf_doit_md5(UDF_INIT *initid, UDF_ARGS *args, char *result,
 
40
                           unsigned long *length, char *is_null, char *error)
 
41
{
 
42
  MD5_CTX context;
 
43
  uchar digest[16];
 
44
 
 
45
  (void)initid;
 
46
 
 
47
  MD5_Init(&context);
 
48
 
 
49
  MD5_Update(&context, args->args[0], args->lengths[0]);
 
50
 
 
51
  MD5_Final(digest, &context);
 
52
 
 
53
  sprintf(result,
 
54
          "%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x",
 
55
          digest[0], digest[1], digest[2], digest[3],
 
56
          digest[4], digest[5], digest[6], digest[7],
 
57
          digest[8], digest[9], digest[10], digest[11],
 
58
          digest[12], digest[13], digest[14], digest[15]);
 
59
 
 
60
  *length= 32;
 
61
 
 
62
  /* is_null is already zero, this is a demonstration */
 
63
  *is_null= 0;
 
64
 
 
65
  /* error is already zero, this is a demonstration */
 
66
  *error= 0;
 
67
 
 
68
  return result;
 
69
}
 
70
 
 
71
void udf_deinit_md5udf(UDF_INIT *initid)
 
72
{
 
73
  (void)initid;
 
74
  /* if we allocated initid->ptr, free it here */
 
75
  return;
 
76
}
 
77
 
 
78
 
 
79
static int md5udf_plugin_init(void *p)
 
80
{
 
81
  udf_func *udff= (udf_func *) p;
 
82
  static char md5str[4];
 
83
 
 
84
  strcpy(md5str, "md5");
 
85
 
 
86
  udff->name.str= md5str;
 
87
  udff->name.length= strlen("md5");
 
88
  udff->type= UDFTYPE_FUNCTION;
 
89
  udff->returns= STRING_RESULT;
 
90
  udff->func_init= udf_init_md5udf;
 
91
  udff->func_deinit= udf_deinit_md5udf;
 
92
  udff->func= (Udf_func_any) udf_doit_md5;
 
93
 
 
94
  return 0;
 
95
}
 
96
 
 
97
static int md5udf_plugin_deinit(void *p)
 
98
{
 
99
  udf_func *udff = (udf_func *) p;
 
100
  (void)udff;
 
101
  return 0;
 
102
}
 
103
 
 
104
mysql_declare_plugin(md5)
 
105
{
 
106
  DRIZZLE_UDF_PLUGIN,
116
107
  "md5",
117
108
  "1.0",
118
109
  "Stewart Smith",
119
110
  "UDF for computing md5sum",
120
111
  PLUGIN_LICENSE_GPL,
121
 
  initialize, /* Plugin Init */
 
112
  md5udf_plugin_init, /* Plugin Init */
 
113
  md5udf_plugin_deinit, /* Plugin Deinit */
 
114
  NULL,   /* status variables */
122
115
  NULL,   /* system variables */
123
116
  NULL    /* config options */
124
117
}
125
 
DRIZZLE_DECLARE_PLUGIN_END;
 
118
mysql_declare_plugin_end;