-
Notifications
You must be signed in to change notification settings - Fork 28
/
murmur_drv.c
80 lines (71 loc) · 2.33 KB
/
murmur_drv.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
#include "murmur.h"
#include <erl_driver.h>
#include <ei.h>
#include <stdio.h>
static ErlDrvData init(ErlDrvPort port, char *cmd);
static void stop(ErlDrvData handle);
static void outputv(ErlDrvData handle, ErlIOVec *ev);
static void send_hash(ErlDrvPort port, unsigned long hash);
static ErlDrvData init(ErlDrvPort port, char *cmd) {
return (ErlDrvData) port;
}
static void stop(ErlDrvData handle) {
//noop
}
static void outputv(ErlDrvData handle, ErlIOVec *ev) {
ErlDrvPort port = (ErlDrvPort) handle;
SysIOVec *bin;
int i, n, index = 0;
unsigned long hash;
unsigned long seed;
//first piece of the iovec is the seed
// printf("ev->size %d\n", ev->size);
// printf("ev-vsize %d\n", ev->vsize);
//apparently we start counting at 1 round here?
bin = &ev->iov[1];
// printf("bin->orig_size %d\n", bin->iov_len);
// printf("bin->iov_base %s\n", bin->iov_base);
ei_decode_version(bin->iov_base, &index, NULL);
ei_decode_ulong(bin->iov_base, &index, &seed);
hash = (unsigned int) seed;
if (index < bin->iov_len) {
hash = MurmurHash2(&bin->iov_base[index], bin->iov_len - index, hash);
}
// printf("hash %d\n", hash);
for (i=2; i<ev->vsize; i++) {
bin = &ev->iov[i];
// printf("bin->orig_size %d\n", bin->iov_len);
hash = MurmurHash2(bin->iov_base, bin->iov_len, hash);
// printf("hashed %d\n", i);
}
send_hash(port, hash);
}
static void send_hash(ErlDrvPort port, unsigned long hash) {
ei_x_buff x;
ei_x_new_with_version(&x);
ei_x_encode_ulong(&x, hash);
driver_output(port, x.buff, x.index);
// printf("sent hash %d\n", hash);
ei_x_free(&x);
}
static ErlDrvEntry murmur_driver_entry = {
NULL, /* init */
init,
stop,
NULL, /* output */
NULL, /* ready_input */
NULL, /* ready_output */
"murmur_drv", /* the name of the driver */
NULL, /* finish */
NULL, /* handle */
NULL, /* control */
NULL, /* timeout */
outputv, /* outputv */
NULL, /* ready_async */
NULL, /* flush */
NULL, /* call */
NULL /* event */
};
DRIVER_INIT(murmur_driver) {
return &murmur_driver_entry;
}