Branch data Line data Source code
1 : : /*
2 : : * contrib/btree_gist/btree_inet.c
3 : : */
4 : : #include "postgres.h"
5 : :
6 : : #include "btree_gist.h"
7 : : #include "btree_utils_num.h"
8 : : #include "catalog/pg_type.h"
9 : : #include "utils/builtins.h"
10 : : #include "utils/rel.h"
11 : : #include "utils/sortsupport.h"
12 : :
13 : : typedef struct inetkey
14 : : {
15 : : double lower;
16 : : double upper;
17 : : } inetKEY;
18 : :
19 : : /* GiST support functions */
20 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_compress);
21 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_union);
22 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_picksplit);
23 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_consistent);
24 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_penalty);
25 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_same);
26 : 5 : PG_FUNCTION_INFO_V1(gbt_inet_sortsupport);
27 : :
28 : :
29 : : static bool
30 : 6297 : gbt_inetgt(const void *a, const void *b, FmgrInfo *flinfo)
31 : : {
32 : 6297 : return (*((const double *) a) > *((const double *) b));
33 : : }
34 : : static bool
35 : 924 : gbt_inetge(const void *a, const void *b, FmgrInfo *flinfo)
36 : : {
37 : 924 : return (*((const double *) a) >= *((const double *) b));
38 : : }
39 : : static bool
40 : 1422 : gbt_ineteq(const void *a, const void *b, FmgrInfo *flinfo)
41 : : {
42 : 1422 : return (*((const double *) a) == *((const double *) b));
43 : : }
44 : : static bool
45 : 632 : gbt_inetle(const void *a, const void *b, FmgrInfo *flinfo)
46 : : {
47 : 632 : return (*((const double *) a) <= *((const double *) b));
48 : : }
49 : : static bool
50 : 5997 : gbt_inetlt(const void *a, const void *b, FmgrInfo *flinfo)
51 : : {
52 : 5997 : return (*((const double *) a) < *((const double *) b));
53 : : }
54 : :
55 : : static int
56 : 7408 : gbt_inetkey_cmp(const void *a, const void *b, FmgrInfo *flinfo)
57 : : {
58 : 7408 : inetKEY *ia = (inetKEY *) (((const Nsrt *) a)->t);
59 : 7408 : inetKEY *ib = (inetKEY *) (((const Nsrt *) b)->t);
60 : :
61 [ - + ]: 7408 : if (ia->lower == ib->lower)
62 : : {
63 [ # # ]: 0 : if (ia->upper == ib->upper)
64 : 0 : return 0;
65 : :
66 [ # # ]: 0 : return (ia->upper > ib->upper) ? 1 : -1;
67 : : }
68 : :
69 [ + + ]: 7408 : return (ia->lower > ib->lower) ? 1 : -1;
70 : : }
71 : :
72 : :
73 : : static const gbtree_ninfo tinfo =
74 : : {
75 : : gbt_t_inet,
76 : : sizeof(double),
77 : : 16, /* sizeof(gbtreekey16) */
78 : : gbt_inetgt,
79 : : gbt_inetge,
80 : : gbt_ineteq,
81 : : gbt_inetle,
82 : : gbt_inetlt,
83 : : gbt_inetkey_cmp,
84 : : NULL
85 : : };
86 : :
87 : :
88 : : /**************************************************
89 : : * GiST support functions
90 : : **************************************************/
91 : :
92 : : Datum
93 : 1819 : gbt_inet_compress(PG_FUNCTION_ARGS)
94 : : {
95 : 1819 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
96 : : GISTENTRY *retval;
97 : :
98 [ + + ]: 1819 : if (entry->leafkey)
99 : : {
100 : 1800 : inetKEY *r = palloc_object(inetKEY);
101 : 1800 : bool failure = false;
102 : :
103 : 1800 : retval = palloc_object(GISTENTRY);
104 : 1800 : r->lower = convert_network_to_scalar(entry->key, INETOID, &failure);
105 : : Assert(!failure);
106 : 1800 : r->upper = r->lower;
107 : 1800 : gistentryinit(*retval, PointerGetDatum(r),
108 : : entry->rel, entry->page,
109 : : entry->offset, false);
110 : : }
111 : : else
112 : 19 : retval = entry;
113 : :
114 : 1819 : PG_RETURN_POINTER(retval);
115 : : }
116 : :
117 : : Datum
118 : 3654 : gbt_inet_consistent(PG_FUNCTION_ARGS)
119 : : {
120 : 3654 : GISTENTRY *entry = (GISTENTRY *) PG_GETARG_POINTER(0);
121 : 3654 : Datum dquery = PG_GETARG_DATUM(1);
122 : 3654 : StrategyNumber strategy = (StrategyNumber) PG_GETARG_UINT16(2);
123 : : #ifdef NOT_USED
124 : : Oid subtype = PG_GETARG_OID(3);
125 : : #endif
126 : 3654 : bool *recheck = (bool *) PG_GETARG_POINTER(4);
127 : 3654 : inetKEY *kkk = (inetKEY *) DatumGetPointer(entry->key);
128 : : GBT_NUMKEY_R key;
129 : : double query;
130 : 3654 : bool failure = false;
131 : :
132 : 3654 : query = convert_network_to_scalar(dquery, INETOID, &failure);
133 : : Assert(!failure);
134 : :
135 : : /* All cases served by this function are inexact */
136 : 3654 : *recheck = true;
137 : :
138 : 3654 : key.lower = (GBT_NUMKEY *) &kkk->lower;
139 : 3654 : key.upper = (GBT_NUMKEY *) &kkk->upper;
140 : :
141 : 3654 : PG_RETURN_BOOL(gbt_num_consistent(&key, &query, strategy,
142 : : GIST_LEAF(entry), &tinfo, fcinfo->flinfo));
143 : : }
144 : :
145 : : Datum
146 : 417 : gbt_inet_union(PG_FUNCTION_ARGS)
147 : : {
148 : 417 : GistEntryVector *entryvec = (GistEntryVector *) PG_GETARG_POINTER(0);
149 : 417 : void *out = palloc(sizeof(inetKEY));
150 : :
151 : 417 : *(int *) PG_GETARG_POINTER(1) = sizeof(inetKEY);
152 : 417 : PG_RETURN_POINTER(gbt_num_union(out, entryvec, &tinfo, fcinfo->flinfo));
153 : : }
154 : :
155 : : Datum
156 : 1774 : gbt_inet_penalty(PG_FUNCTION_ARGS)
157 : : {
158 : 1774 : inetKEY *origentry = (inetKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(0))->key);
159 : 1774 : inetKEY *newentry = (inetKEY *) DatumGetPointer(((GISTENTRY *) PG_GETARG_POINTER(1))->key);
160 : 1774 : float *result = (float *) PG_GETARG_POINTER(2);
161 : :
162 : 1774 : penalty_num(result, origentry->lower, origentry->upper, newentry->lower, newentry->upper);
163 : :
164 : 1774 : PG_RETURN_POINTER(result);
165 : : }
166 : :
167 : : Datum
168 : 9 : gbt_inet_picksplit(PG_FUNCTION_ARGS)
169 : : {
170 : 9 : PG_RETURN_POINTER(gbt_num_picksplit((GistEntryVector *) PG_GETARG_POINTER(0),
171 : : (GIST_SPLITVEC *) PG_GETARG_POINTER(1),
172 : : &tinfo, fcinfo->flinfo));
173 : : }
174 : :
175 : : Datum
176 : 411 : gbt_inet_same(PG_FUNCTION_ARGS)
177 : : {
178 : 411 : inetKEY *b1 = (inetKEY *) PG_GETARG_POINTER(0);
179 : 411 : inetKEY *b2 = (inetKEY *) PG_GETARG_POINTER(1);
180 : 411 : bool *result = (bool *) PG_GETARG_POINTER(2);
181 : :
182 : 411 : *result = gbt_num_same((void *) b1, (void *) b2, &tinfo, fcinfo->flinfo);
183 : 411 : PG_RETURN_POINTER(result);
184 : : }
185 : :
186 : : static int
187 : 12054 : gbt_inet_ssup_cmp(Datum x, Datum y, SortSupport ssup)
188 : : {
189 : 12054 : inetKEY *arg1 = (inetKEY *) DatumGetPointer(x);
190 : 12054 : inetKEY *arg2 = (inetKEY *) DatumGetPointer(y);
191 : :
192 : : /* for leaf items we expect lower == upper, so only compare lower */
193 [ + + ]: 12054 : if (arg1->lower < arg2->lower)
194 : 6584 : return -1;
195 [ + - ]: 5470 : else if (arg1->lower > arg2->lower)
196 : 5470 : return 1;
197 : : else
198 : 0 : return 0;
199 : : }
200 : :
201 : : Datum
202 : 2 : gbt_inet_sortsupport(PG_FUNCTION_ARGS)
203 : : {
204 : 2 : SortSupport ssup = (SortSupport) PG_GETARG_POINTER(0);
205 : :
206 : 2 : ssup->comparator = gbt_inet_ssup_cmp;
207 : 2 : ssup->ssup_extra = NULL;
208 : :
209 : 2 : PG_RETURN_VOID();
210 : : }
|
