1 /*
2 * contrib/btree_gist/btree_int2.c
3 */
4 #include "postgres.h"
5
6 #include "btree_gist.h"
7 #include "btree_utils_num.h"
8 #include "common/int.h"
9
10 typedef struct int16key
11 {
12 int16 lower;
13 int16 upper;
14 } int16KEY;
15
16 /*
17 ** int16 ops
18 */
19 PG_FUNCTION_INFO_V1(gbt_int2_compress);
20 PG_FUNCTION_INFO_V1(gbt_int2_fetch);
21 PG_FUNCTION_INFO_V1(gbt_int2_union);
22 PG_FUNCTION_INFO_V1(gbt_int2_picksplit);
23 PG_FUNCTION_INFO_V1(gbt_int2_consistent);
24 PG_FUNCTION_INFO_V1(gbt_int2_distance);
25 PG_FUNCTION_INFO_V1(gbt_int2_penalty);
26 PG_FUNCTION_INFO_V1(gbt_int2_same);
27
28 static bool
gbt_int2gt(const void * a,const void * b,FmgrInfo * flinfo)29 gbt_int2gt(const void *a, const void *b, FmgrInfo *flinfo)
30 {
31 return (*((const int16 *) a) > *((const int16 *) b));
32 }
33 static bool
gbt_int2ge(const void * a,const void * b,FmgrInfo * flinfo)34 gbt_int2ge(const void *a, const void *b, FmgrInfo *flinfo)
35 {
36 return (*((const int16 *) a) >= *((const int16 *) b));
37 }
38 static bool
gbt_int2eq(const void * a,const void * b,FmgrInfo * flinfo)39 gbt_int2eq(const void *a, const void *b, FmgrInfo *flinfo)
40 {
41 return (*((const int16 *) a) == *((const int16 *) b));
42 }
43 static bool
gbt_int2le(const void * a,const void * b,FmgrInfo * flinfo)44 gbt_int2le(const void *a, const void *b, FmgrInfo *flinfo)
45 {
46 return (*((const int16 *) a) <= *((const int16 *) b));
47 }
48 static bool
gbt_int2lt(const void * a,const void * b,FmgrInfo * flinfo)49 gbt_int2lt(const void *a, const void *b, FmgrInfo *flinfo)
50 {
51 return (*((const int16 *) a) < *((const int16 *) b));
52 }
53
54 static int
gbt_int2key_cmp(const void * a,const void * b,FmgrInfo * flinfo)55 gbt_int2key_cmp(const void *a, const void *b, FmgrInfo *flinfo)
56 {
57 int16KEY *ia = (int16KEY *) (((const Nsrt *) a)->t);
58 int16KEY *ib = (int16KEY *) (((const Nsrt *) b)->t);
59
60 if (ia->lower == ib->lower)
61 {
62 if (ia->upper == ib->upper)
63 return 0;
64
65 return (ia->upper > ib->upper) ? 1 : -1;
66 }
67
68 return (ia->lower > ib->lower) ? 1 : -1;
69 }
70
71 static float8
gbt_int2_dist(const void * a,const void * b,FmgrInfo * flinfo)72 gbt_int2_dist(const void *a, const void *b, FmgrInfo *flinfo)
73 {
74 return GET_FLOAT_DISTANCE(int16, a, b);
75 }
76
77
78 static const gbtree_ninfo tinfo =
79 {
80 gbt_t_int2,
81 sizeof(int16),
82 4, /* sizeof(gbtreekey4) */
83 gbt_int2gt,
84 gbt_int2ge,
85 gbt_int2eq,
86 gbt_int2le,
87 gbt_int2lt,
88 gbt_int2key_cmp,
89 gbt_int2_dist
90 };
91
92
93 PG_FUNCTION_INFO_V1(int2_dist);
94 Datum
int2_dist(PG_FUNCTION_ARGS)95 int2_dist(PG_FUNCTION_ARGS)
96 {
97 int16 a = PG_GETARG_INT16(0);
98 int16 b = PG_GETARG_INT16(1);
99 int16 r;
100 int16 ra;
101
102 if (pg_sub_s16_overflow(a, b, &r) ||
103 r == PG_INT16_MIN)
104 ereport(ERROR,
105 (errcode(ERRCODE_NUMERIC_VALUE_OUT_OF_RANGE),
106 errmsg("smallint out of range")));
107
108 ra = Abs(r);
109
110 PG_RETURN_INT16(ra);
111 }
112
113
114 /**************************************************
115 * int16 ops
116 **************************************************/
117
118
119 Datum
gbt_int2_compress(PG_FUNCTION_ARGS)120 gbt_int2_compress(PG_FUNCTION_ARGS)
121 {
122 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
123
124 PG_RETURN_POINTER(gbt_num_compress(entry, &tinfo));
125 }
126
127 Datum
gbt_int2_fetch(PG_FUNCTION_ARGS)128 gbt_int2_fetch(PG_FUNCTION_ARGS)
129 {
130 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
131
132 PG_RETURN_POINTER(gbt_num_fetch(entry, &tinfo));
133 }
134
135 Datum
gbt_int2_consistent(PG_FUNCTION_ARGS)136 gbt_int2_consistent(PG_FUNCTION_ARGS)
137 {
138 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
139 int16 query = PG_GETARG_INT16(1);
140 StrategyNumber strategy = (StrategyNumber) PG_GETARG_UINT16(2);
141
142 /* Oid subtype = PG_GETARG_OID(3); */
143 bool *recheck = (bool *) PG_GETARG_POINTER(4);
144 int16KEY *kkk = (int16KEY *) DatumGetPointer(entry->key);
145 GBT_NUMKEY_R key;
146
147 /* All cases served by this function are exact */
148 *recheck = false;
149
150 key.lower = (GBT_NUMKEY *) &kkk->lower;
151 key.upper = (GBT_NUMKEY *) &kkk->upper;
152
153 PG_RETURN_BOOL(
154 gbt_num_consistent(&key, (void *) &query, &strategy, GIST_LEAF(entry), &tinfo, fcinfo->flinfo)
155 );
156 }
157
158
159 Datum
gbt_int2_distance(PG_FUNCTION_ARGS)160 gbt_int2_distance(PG_FUNCTION_ARGS)
161 {
162 GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
163 int16 query = PG_GETARG_INT16(1);
164
165 /* Oid subtype = PG_GETARG_OID(3); */
166 int16KEY *kkk = (int16KEY *) DatumGetPointer(entry->key);
167 GBT_NUMKEY_R key;
168
169 key.lower = (GBT_NUMKEY *) &kkk->lower;
170 key.upper = (GBT_NUMKEY *) &kkk->upper;
171
172 PG_RETURN_FLOAT8(
173 gbt_num_distance(&key, (void *) &query, GIST_LEAF(entry), &tinfo, fcinfo->flinfo)
174 );
175 }
176
177
178 Datum
gbt_int2_union(PG_FUNCTION_ARGS)179 gbt_int2_union(PG_FUNCTION_ARGS)
180 {
181 GistEntryVector *entryvec = (GistEntryVector *) PG_GETARG_POINTER(0);
182 void *out = palloc(sizeof(int16KEY));
183
184 *(int *) PG_GETARG_POINTER(1) = sizeof(int16KEY);
185 PG_RETURN_POINTER(gbt_num_union((void *) out, entryvec, &tinfo, fcinfo->flinfo));
186 }
187
188
189 Datum
gbt_int2_penalty(PG_FUNCTION_ARGS)190 gbt_int2_penalty(PG_FUNCTION_ARGS)
191 {
192 int16KEY *origentry = (int16KEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(0))->key);
193 int16KEY *newentry = (int16KEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(1))->key);
194 float *result = (float *) PG_GETARG_POINTER(2);
195
196 penalty_num(result, origentry->lower, origentry->upper, newentry->lower, newentry->upper);
197
198 PG_RETURN_POINTER(result);
199 }
200
201 Datum
gbt_int2_picksplit(PG_FUNCTION_ARGS)202 gbt_int2_picksplit(PG_FUNCTION_ARGS)
203 {
204 PG_RETURN_POINTER(gbt_num_picksplit(
205 (GistEntryVector *) PG_GETARG_POINTER(0),
206 (GIST_SPLITVEC *) PG_GETARG_POINTER(1),
207 &tinfo, fcinfo->flinfo
208 ));
209 }
210
211 Datum
gbt_int2_same(PG_FUNCTION_ARGS)212 gbt_int2_same(PG_FUNCTION_ARGS)
213 {
214 int16KEY *b1 = (int16KEY *) PG_GETARG_POINTER(0);
215 int16KEY *b2 = (int16KEY *) PG_GETARG_POINTER(1);
216 bool *result = (bool *) PG_GETARG_POINTER(2);
217
218 *result = gbt_num_same((void *) b1, (void *) b2, &tinfo, fcinfo->flinfo);
219 PG_RETURN_POINTER(result);
220 }
221