1 /*
2 * contrib/btree_gist/btree_macaddr.c
3 */
4 #include "postgres.h"
5
6 #include "btree_gist.h"
7 #include "btree_utils_num.h"
8 #include "utils/builtins.h"
9 #include "utils/inet.h"
10
11 typedef struct
12 {
13 macaddr lower;
14 macaddr upper;
15 char pad[4]; /* make struct size = sizeof(gbtreekey16) */
16 } macKEY;
17
18 /*
19 ** OID ops
20 */
21 PG_FUNCTION_INFO_V1(gbt_macad_compress);
22 PG_FUNCTION_INFO_V1(gbt_macad_fetch);
23 PG_FUNCTION_INFO_V1(gbt_macad_union);
24 PG_FUNCTION_INFO_V1(gbt_macad_picksplit);
25 PG_FUNCTION_INFO_V1(gbt_macad_consistent);
26 PG_FUNCTION_INFO_V1(gbt_macad_penalty);
27 PG_FUNCTION_INFO_V1(gbt_macad_same);
28
29
30 static bool
gbt_macadgt(const void * a,const void * b,FmgrInfo * flinfo)31 gbt_macadgt(const void *a, const void *b, FmgrInfo *flinfo)
32 {
33 return DatumGetBool(DirectFunctionCall2(macaddr_gt, PointerGetDatum(a), PointerGetDatum(b)));
34 }
35 static bool
gbt_macadge(const void * a,const void * b,FmgrInfo * flinfo)36 gbt_macadge(const void *a, const void *b, FmgrInfo *flinfo)
37 {
38 return DatumGetBool(DirectFunctionCall2(macaddr_ge, PointerGetDatum(a), PointerGetDatum(b)));
39 }
40
41 static bool
gbt_macadeq(const void * a,const void * b,FmgrInfo * flinfo)42 gbt_macadeq(const void *a, const void *b, FmgrInfo *flinfo)
43 {
44 return DatumGetBool(DirectFunctionCall2(macaddr_eq, PointerGetDatum(a), PointerGetDatum(b)));
45 }
46
47 static bool
gbt_macadle(const void * a,const void * b,FmgrInfo * flinfo)48 gbt_macadle(const void *a, const void *b, FmgrInfo *flinfo)
49 {
50 return DatumGetBool(DirectFunctionCall2(macaddr_le, PointerGetDatum(a), PointerGetDatum(b)));
51 }
52
53 static bool
gbt_macadlt(const void * a,const void * b,FmgrInfo * flinfo)54 gbt_macadlt(const void *a, const void *b, FmgrInfo *flinfo)
55 {
56 return DatumGetBool(DirectFunctionCall2(macaddr_lt, PointerGetDatum(a), PointerGetDatum(b)));
57 }
58
59
60 static int
gbt_macadkey_cmp(const void * a,const void * b,FmgrInfo * flinfo)61 gbt_macadkey_cmp(const void *a, const void *b, FmgrInfo *flinfo)
62 {
63 macKEY *ia = (macKEY *) (((const Nsrt *) a)->t);
64 macKEY *ib = (macKEY *) (((const Nsrt *) b)->t);
65 int res;
66
67 res = DatumGetInt32(DirectFunctionCall2(macaddr_cmp, MacaddrPGetDatum(&ia->lower), MacaddrPGetDatum(&ib->lower)));
68 if (res == 0)
69 return DatumGetInt32(DirectFunctionCall2(macaddr_cmp, MacaddrPGetDatum(&ia->upper), MacaddrPGetDatum(&ib->upper)));
70
71 return res;
72 }
73
74
75 static const gbtree_ninfo tinfo =
76 {
77 gbt_t_macad,
78 sizeof(macaddr),
79 16, /* sizeof(gbtreekey16) */
80 gbt_macadgt,
81 gbt_macadge,
82 gbt_macadeq,
83 gbt_macadle,
84 gbt_macadlt,
85 gbt_macadkey_cmp,
86 NULL
87 };
88
89
90 /**************************************************
91 * macaddr ops
92 **************************************************/
93
94
95
96 static uint64
mac_2_uint64(macaddr * m)97 mac_2_uint64(macaddr *m)
98 {
99 unsigned char *mi = (unsigned char *) m;
100 uint64 res = 0;
101 int i;
102
103 for (i = 0; i < 6; i++)
104 res += (((uint64) mi[i]) << ((uint64) ((5 - i) * 8)));
105 return res;
106 }
107
108
109
110 Datum
gbt_macad_compress(PG_FUNCTION_ARGS)111 gbt_macad_compress(PG_FUNCTION_ARGS)
112 {
113 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
114
115 PG_RETURN_POINTER(gbt_num_compress(entry, &tinfo));
116 }
117
118 Datum
gbt_macad_fetch(PG_FUNCTION_ARGS)119 gbt_macad_fetch(PG_FUNCTION_ARGS)
120 {
121 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
122
123 PG_RETURN_POINTER(gbt_num_fetch(entry, &tinfo));
124 }
125
126 Datum
gbt_macad_consistent(PG_FUNCTION_ARGS)127 gbt_macad_consistent(PG_FUNCTION_ARGS)
128 {
129 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
130 macaddr *query = (macaddr *) PG_GETARG_POINTER(1);
131 StrategyNumber strategy = (StrategyNumber) PG_GETARG_UINT16(2);
132
133 /* Oid subtype = PG_GETARG_OID(3); */
134 bool *recheck = (bool *) PG_GETARG_POINTER(4);
135 macKEY *kkk = (macKEY *) DatumGetPointer(entry->key);
136 GBT_NUMKEY_R key;
137
138 /* All cases served by this function are exact */
139 *recheck = false;
140
141 key.lower = (GBT_NUMKEY *) &kkk->lower;
142 key.upper = (GBT_NUMKEY *) &kkk->upper;
143
144 PG_RETURN_BOOL(
145 gbt_num_consistent(&key, (void *) query, &strategy, GIST_LEAF(entry), &tinfo, fcinfo->flinfo)
146 );
147 }
148
149
150 Datum
gbt_macad_union(PG_FUNCTION_ARGS)151 gbt_macad_union(PG_FUNCTION_ARGS)
152 {
153 GistEntryVector *entryvec = (GistEntryVector *) PG_GETARG_POINTER(0);
154 void *out = palloc0(sizeof(macKEY));
155
156 *(int *) PG_GETARG_POINTER(1) = sizeof(macKEY);
157 PG_RETURN_POINTER(gbt_num_union((void *) out, entryvec, &tinfo, fcinfo->flinfo));
158 }
159
160
161 Datum
gbt_macad_penalty(PG_FUNCTION_ARGS)162 gbt_macad_penalty(PG_FUNCTION_ARGS)
163 {
164 macKEY *origentry = (macKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(0))->key);
165 macKEY *newentry = (macKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(1))->key);
166 float *result = (float *) PG_GETARG_POINTER(2);
167 uint64 iorg[2],
168 inew[2];
169
170 iorg[0] = mac_2_uint64(&origentry->lower);
171 iorg[1] = mac_2_uint64(&origentry->upper);
172 inew[0] = mac_2_uint64(&newentry->lower);
173 inew[1] = mac_2_uint64(&newentry->upper);
174
175 penalty_num(result, iorg[0], iorg[1], inew[0], inew[1]);
176
177 PG_RETURN_POINTER(result);
178
179 }
180
181 Datum
gbt_macad_picksplit(PG_FUNCTION_ARGS)182 gbt_macad_picksplit(PG_FUNCTION_ARGS)
183 {
184 PG_RETURN_POINTER(gbt_num_picksplit(
185 (GistEntryVector *) PG_GETARG_POINTER(0),
186 (GIST_SPLITVEC *) PG_GETARG_POINTER(1),
187 &tinfo, fcinfo->flinfo
188 ));
189 }
190
191 Datum
gbt_macad_same(PG_FUNCTION_ARGS)192 gbt_macad_same(PG_FUNCTION_ARGS)
193 {
194 macKEY *b1 = (macKEY *) PG_GETARG_POINTER(0);
195 macKEY *b2 = (macKEY *) PG_GETARG_POINTER(1);
196 bool *result = (bool *) PG_GETARG_POINTER(2);
197
198 *result = gbt_num_same((void *) b1, (void *) b2, &tinfo, fcinfo->flinfo);
199 PG_RETURN_POINTER(result);
200 }
201