Age Owner Branch data TLA Line data Source code
1 : : /*
2 : : * contrib/btree_gist/btree_date.c
3 : : */
4 : : #include "postgres.h"
5 : :
6 : : #include "btree_gist.h"
7 : : #include "btree_utils_num.h"
8 : : #include "utils/fmgrprotos.h"
9 : : #include "utils/date.h"
10 : : #include "utils/rel.h"
11 : : #include "utils/sortsupport.h"
12 : :
13 : : typedef struct
14 : : {
15 : : DateADT lower;
16 : : DateADT upper;
17 : : } dateKEY;
18 : :
19 : : /* GiST support functions */
7771 teodor@sigaev.ru 20 :CBC 4 : PG_FUNCTION_INFO_V1(gbt_date_compress);
3816 heikki.linnakangas@i 21 : 4 : PG_FUNCTION_INFO_V1(gbt_date_fetch);
7771 teodor@sigaev.ru 22 : 4 : PG_FUNCTION_INFO_V1(gbt_date_union);
23 : 4 : PG_FUNCTION_INFO_V1(gbt_date_picksplit);
24 : 4 : PG_FUNCTION_INFO_V1(gbt_date_consistent);
5302 tgl@sss.pgh.pa.us 25 : 4 : PG_FUNCTION_INFO_V1(gbt_date_distance);
7771 teodor@sigaev.ru 26 : 4 : PG_FUNCTION_INFO_V1(gbt_date_penalty);
27 : 4 : PG_FUNCTION_INFO_V1(gbt_date_same);
156 heikki.linnakangas@i 28 : 4 : PG_FUNCTION_INFO_V1(gbt_date_sortsupport);
29 : :
30 : : static bool
3091 andrew@dunslane.net 31 : 1357 : gbt_dategt(const void *a, const void *b, FmgrInfo *flinfo)
32 : : {
2046 alvherre@alvh.no-ip. 33 : 1357 : return DatumGetBool(DirectFunctionCall2(date_gt,
34 : : DateADTGetDatum(*((const DateADT *) a)),
35 : : DateADTGetDatum(*((const DateADT *) b))));
36 : : }
37 : :
38 : : static bool
3091 andrew@dunslane.net 39 : 507 : gbt_datege(const void *a, const void *b, FmgrInfo *flinfo)
40 : : {
2046 alvherre@alvh.no-ip. 41 : 507 : return DatumGetBool(DirectFunctionCall2(date_ge,
42 : : DateADTGetDatum(*((const DateADT *) a)),
43 : : DateADTGetDatum(*((const DateADT *) b))));
44 : : }
45 : :
46 : : static bool
3091 andrew@dunslane.net 47 : 272 : gbt_dateeq(const void *a, const void *b, FmgrInfo *flinfo)
48 : : {
2046 alvherre@alvh.no-ip. 49 : 272 : return DatumGetBool(DirectFunctionCall2(date_eq,
50 : : DateADTGetDatum(*((const DateADT *) a)),
51 : : DateADTGetDatum(*((const DateADT *) b)))
52 : : );
53 : : }
54 : :
55 : : static bool
3091 andrew@dunslane.net 56 : 825 : gbt_datele(const void *a, const void *b, FmgrInfo *flinfo)
57 : : {
2046 alvherre@alvh.no-ip. 58 : 825 : return DatumGetBool(DirectFunctionCall2(date_le,
59 : : DateADTGetDatum(*((const DateADT *) a)),
60 : : DateADTGetDatum(*((const DateADT *) b))));
61 : : }
62 : :
63 : : static bool
3091 andrew@dunslane.net 64 : 1629 : gbt_datelt(const void *a, const void *b, FmgrInfo *flinfo)
65 : : {
2046 alvherre@alvh.no-ip. 66 : 1629 : return DatumGetBool(DirectFunctionCall2(date_lt,
67 : : DateADTGetDatum(*((const DateADT *) a)),
68 : : DateADTGetDatum(*((const DateADT *) b))));
69 : : }
70 : :
71 : :
72 : :
73 : : static int
3091 andrew@dunslane.net 74 : 543 : gbt_datekey_cmp(const void *a, const void *b, FmgrInfo *flinfo)
75 : : {
5109 peter_e@gmx.net 76 : 543 : dateKEY *ia = (dateKEY *) (((const Nsrt *) a)->t);
77 : 543 : dateKEY *ib = (dateKEY *) (((const Nsrt *) b)->t);
78 : : int res;
79 : :
2046 alvherre@alvh.no-ip. 80 : 543 : res = DatumGetInt32(DirectFunctionCall2(date_cmp,
81 : : DateADTGetDatum(ia->lower),
82 : : DateADTGetDatum(ib->lower)));
5757 teodor@sigaev.ru 83 [ + + ]: 543 : if (res == 0)
2046 alvherre@alvh.no-ip. 84 : 5 : return DatumGetInt32(DirectFunctionCall2(date_cmp,
85 : : DateADTGetDatum(ia->upper),
86 : : DateADTGetDatum(ib->upper)));
87 : :
5757 teodor@sigaev.ru 88 : 538 : return res;
89 : : }
90 : :
91 : : static float8
3091 andrew@dunslane.net 92 : 273 : gdb_date_dist(const void *a, const void *b, FmgrInfo *flinfo)
93 : : {
94 : : /* we assume the difference can't overflow */
5263 bruce@momjian.us 95 : 273 : Datum diff = DirectFunctionCall2(date_mi,
96 : : DateADTGetDatum(*((const DateADT *) a)),
97 : : DateADTGetDatum(*((const DateADT *) b)));
98 : :
1065 peter@eisentraut.org 99 : 273 : return (float8) abs(DatumGetInt32(diff));
100 : : }
101 : :
102 : :
103 : : static const gbtree_ninfo tinfo =
104 : : {
105 : : gbt_t_date,
106 : : sizeof(DateADT),
107 : : 8, /* sizeof(gbtreekey8) */
108 : : gbt_dategt,
109 : : gbt_datege,
110 : : gbt_dateeq,
111 : : gbt_datele,
112 : : gbt_datelt,
113 : : gbt_datekey_cmp,
114 : : gdb_date_dist
115 : : };
116 : :
117 : :
5302 tgl@sss.pgh.pa.us 118 : 4 : PG_FUNCTION_INFO_V1(date_dist);
119 : : Datum
120 : 547 : date_dist(PG_FUNCTION_ARGS)
121 : : {
122 : : /* we assume the difference can't overflow */
5263 bruce@momjian.us 123 : 547 : Datum diff = DirectFunctionCall2(date_mi,
124 : : PG_GETARG_DATUM(0),
125 : : PG_GETARG_DATUM(1));
126 : :
1065 peter@eisentraut.org 127 : 547 : PG_RETURN_INT32(abs(DatumGetInt32(diff)));
128 : : }
129 : :
130 : :
131 : : /**************************************************
132 : : * GiST support functions
133 : : **************************************************/
134 : :
135 : : Datum
7771 teodor@sigaev.ru 136 : 546 : gbt_date_compress(PG_FUNCTION_ARGS)
137 : : {
7678 bruce@momjian.us 138 : 546 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
139 : :
3817 heikki.linnakangas@i 140 : 546 : PG_RETURN_POINTER(gbt_num_compress(entry, &tinfo));
141 : : }
142 : :
143 : : Datum
3816 144 : 272 : gbt_date_fetch(PG_FUNCTION_ARGS)
145 : : {
146 : 272 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
147 : :
148 : 272 : PG_RETURN_POINTER(gbt_num_fetch(entry, &tinfo));
149 : : }
150 : :
151 : : Datum
7771 teodor@sigaev.ru 152 : 1914 : gbt_date_consistent(PG_FUNCTION_ARGS)
153 : : {
7678 bruce@momjian.us 154 : 1914 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
155 : 1914 : DateADT query = PG_GETARG_DATEADT(1);
6354 tgl@sss.pgh.pa.us 156 : 1914 : StrategyNumber strategy = (StrategyNumber) PG_GETARG_UINT16(2);
157 : :
158 : : /* Oid subtype = PG_GETARG_OID(3); */
159 : 1914 : bool *recheck = (bool *) PG_GETARG_POINTER(4);
7678 bruce@momjian.us 160 : 1914 : dateKEY *kkk = (dateKEY *) DatumGetPointer(entry->key);
161 : : GBT_NUMKEY_R key;
162 : :
163 : : /* All cases served by this function are exact */
6354 tgl@sss.pgh.pa.us 164 : 1914 : *recheck = false;
165 : :
5931 bruce@momjian.us 166 : 1914 : key.lower = (GBT_NUMKEY *) &kkk->lower;
167 : 1914 : key.upper = (GBT_NUMKEY *) &kkk->upper;
168 : :
282 peter@eisentraut.org 169 : 1914 : PG_RETURN_BOOL(gbt_num_consistent(&key, &query, &strategy,
170 : : GIST_LEAF(entry), &tinfo,
171 : : fcinfo->flinfo));
172 : : }
173 : :
174 : : Datum
5302 tgl@sss.pgh.pa.us 175 : 274 : gbt_date_distance(PG_FUNCTION_ARGS)
176 : : {
177 : 274 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
178 : 274 : DateADT query = PG_GETARG_DATEADT(1);
179 : :
180 : : /* Oid subtype = PG_GETARG_OID(3); */
181 : 274 : dateKEY *kkk = (dateKEY *) DatumGetPointer(entry->key);
182 : : GBT_NUMKEY_R key;
183 : :
184 : 274 : key.lower = (GBT_NUMKEY *) &kkk->lower;
185 : 274 : key.upper = (GBT_NUMKEY *) &kkk->upper;
186 : :
282 peter@eisentraut.org 187 : 274 : PG_RETURN_FLOAT8(gbt_num_distance(&key, &query, GIST_LEAF(entry),
188 : : &tinfo, fcinfo->flinfo));
189 : : }
190 : :
191 : : Datum
7771 teodor@sigaev.ru 192 : 1 : gbt_date_union(PG_FUNCTION_ARGS)
193 : : {
7678 bruce@momjian.us 194 : 1 : GistEntryVector *entryvec = (GistEntryVector *) PG_GETARG_POINTER(0);
195 : 1 : void *out = palloc(sizeof(dateKEY));
196 : :
197 : 1 : *(int *) PG_GETARG_POINTER(1) = sizeof(dateKEY);
282 peter@eisentraut.org 198 : 1 : PG_RETURN_POINTER(gbt_num_union(out, entryvec, &tinfo, fcinfo->flinfo));
199 : : }
200 : :
201 : : Datum
7771 teodor@sigaev.ru 202 :UBC 0 : gbt_date_penalty(PG_FUNCTION_ARGS)
203 : : {
7678 bruce@momjian.us 204 : 0 : dateKEY *origentry = (dateKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(0))->key);
205 : 0 : dateKEY *newentry = (dateKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(1))->key);
206 : 0 : float *result = (float *) PG_GETARG_POINTER(2);
207 : : int32 diff,
208 : : res;
209 : :
2046 alvherre@alvh.no-ip. 210 : 0 : diff = DatumGetInt32(DirectFunctionCall2(date_mi,
211 : : DateADTGetDatum(newentry->upper),
212 : : DateADTGetDatum(origentry->upper)));
213 : :
7678 bruce@momjian.us 214 : 0 : res = Max(diff, 0);
215 : :
2046 alvherre@alvh.no-ip. 216 : 0 : diff = DatumGetInt32(DirectFunctionCall2(date_mi,
217 : : DateADTGetDatum(origentry->lower),
218 : : DateADTGetDatum(newentry->lower)));
219 : :
7678 bruce@momjian.us 220 : 0 : res += Max(diff, 0);
221 : :
222 : 0 : *result = 0.0;
223 : :
224 [ # # ]: 0 : if (res > 0)
225 : : {
2046 alvherre@alvh.no-ip. 226 : 0 : diff = DatumGetInt32(DirectFunctionCall2(date_mi,
227 : : DateADTGetDatum(origentry->upper),
228 : : DateADTGetDatum(origentry->lower)));
7678 bruce@momjian.us 229 : 0 : *result += FLT_MIN;
230 : 0 : *result += (float) (res / ((double) (res + diff)));
231 : 0 : *result *= (FLT_MAX / (((GISTENTRY *) PG_GETARG_POINTER(0))->rel->rd_att->natts + 1));
232 : : }
233 : :
234 : 0 : PG_RETURN_POINTER(result);
235 : : }
236 : :
237 : : Datum
7771 teodor@sigaev.ru 238 :CBC 1 : gbt_date_picksplit(PG_FUNCTION_ARGS)
239 : : {
2046 alvherre@alvh.no-ip. 240 : 1 : PG_RETURN_POINTER(gbt_num_picksplit((GistEntryVector *) PG_GETARG_POINTER(0),
241 : : (GIST_SPLITVEC *) PG_GETARG_POINTER(1),
242 : : &tinfo, fcinfo->flinfo));
243 : : }
244 : :
245 : : Datum
7771 teodor@sigaev.ru 246 :UBC 0 : gbt_date_same(PG_FUNCTION_ARGS)
247 : : {
7678 bruce@momjian.us 248 : 0 : dateKEY *b1 = (dateKEY *) PG_GETARG_POINTER(0);
249 : 0 : dateKEY *b2 = (dateKEY *) PG_GETARG_POINTER(1);
250 : 0 : bool *result = (bool *) PG_GETARG_POINTER(2);
251 : :
3091 andrew@dunslane.net 252 : 0 : *result = gbt_num_same((void *) b1, (void *) b2, &tinfo, fcinfo->flinfo);
7678 bruce@momjian.us 253 : 0 : PG_RETURN_POINTER(result);
254 : : }
255 : :
256 : : static int
156 heikki.linnakangas@i 257 :CBC 5364 : gbt_date_ssup_cmp(Datum x, Datum y, SortSupport ssup)
258 : : {
259 : 5364 : dateKEY *akey = (dateKEY *) DatumGetPointer(x);
260 : 5364 : dateKEY *bkey = (dateKEY *) DatumGetPointer(y);
261 : :
262 : : /* for leaf items we expect lower == upper, so only compare lower */
263 : 5364 : return DatumGetInt32(DirectFunctionCall2(date_cmp,
264 : : DateADTGetDatum(akey->lower),
265 : : DateADTGetDatum(bkey->lower)));
266 : : }
267 : :
268 : : Datum
269 : 1 : gbt_date_sortsupport(PG_FUNCTION_ARGS)
270 : : {
271 : 1 : SortSupport ssup = (SortSupport) PG_GETARG_POINTER(0);
272 : :
273 : 1 : ssup->comparator = gbt_date_ssup_cmp;
274 : 1 : ssup->ssup_extra = NULL;
275 : :
276 : 1 : PG_RETURN_VOID();
277 : : }
|
