/* useful macros for accessing int4 arrays */
#define ARRPTR(x) ( (int4 *) ARR_DATA_PTR(x) )
-#define ARRNELEMS(x) ArrayGetNItems( ARR_NDIM(x), ARR_DIMS(x))
+#define ARRNELEMS(x) ArrayGetNItems(ARR_NDIM(x), ARR_DIMS(x))
-#define ARRISVOID(x) ( (x) ? ( ( ARR_NDIM(x) == NDIM ) ? ( ( ARRNELEMS( x ) ) ? 0 : 1 ) : ( ( ARR_NDIM(x) ) ? ( \
- ereport(ERROR, \
- (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR), \
- errmsg("array must be one-dimensional, not %d dimensions", ARRNELEMS( x )))) \
- ,1) : 0 ) ) : 0 )
+/* reject arrays we can't handle; but allow a NULL or empty array */
+#define CHECKARRVALID(x) \
+ do { \
+ if (x) { \
+ if (ARR_NDIM(x) != NDIM && ARR_NDIM(x) != 0) \
+ ereport(ERROR, \
+ (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR), \
+ errmsg("array must be one-dimensional"))); \
+ if (ARR_HASNULL(x)) \
+ ereport(ERROR, \
+ (errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED), \
+ errmsg("array must not contain nulls"))); \
+ } \
+ } while(0)
+
+#define ARRISVOID(x) ((x) == NULL || ARRNELEMS(x) == 0)
#define SORT(x) \
do { \
typedef char BITVEC[SIGLEN];
typedef char *BITVECP;
-#define SIGPTR(x) ( (BITVECP) ARR_DATA_PTR(x) )
-
-
#define LOOPBYTE(a) \
for(i=0;i<SIGLEN;i++) {\
a;\
{
CHKVAL chkval;
+ CHECKARRVALID(array);
chkval.arrb = ARRPTR(array);
chkval.arre = chkval.arrb + ARRNELEMS(array);
return execute(
CHKVAL chkval;
bool result;
+ CHECKARRVALID(val);
if (ARRISVOID(val))
{
pfree(val);
/* XXX are we sure it's safe to scribble on the query object here? */
/* XXX what about toasted input? */
/* sort query for fast search, key is already sorted */
+ CHECKARRVALID(query);
if (ARRISVOID(query))
PG_RETURN_BOOL(false);
PREPAREARR(query);
{
GistEntryVector *entryvec = (GistEntryVector *) PG_GETARG_POINTER(0);
int *size = (int *) PG_GETARG_POINTER(1);
- int4 i;
- ArrayType *res;
- int totlen = 0,
+ int4 i,
*ptr;
+ ArrayType *res;
+ int totlen = 0;
for (i = 0; i < entryvec->n; i++)
- totlen += ARRNELEMS(GETENTRY(entryvec, i));
+ {
+ ArrayType *ent = GETENTRY(entryvec, i);
+
+ CHECKARRVALID(ent);
+ totlen += ARRNELEMS(ent);
+ }
res = new_intArrayType(totlen);
ptr = ARRPTR(res);
for (i = 0; i < entryvec->n; i++)
{
- memcpy(ptr, ARRPTR(GETENTRY(entryvec, i)), ARRNELEMS(GETENTRY(entryvec, i)) * sizeof(int4));
- ptr += ARRNELEMS(GETENTRY(entryvec, i));
+ ArrayType *ent = GETENTRY(entryvec, i);
+ int nel;
+
+ nel = ARRNELEMS(ent);
+ memcpy(ptr, ARRPTR(ent), nel * sizeof(int4));
+ ptr += nel;
}
QSORT(res, 1);
if (entry->leafkey)
{
r = (ArrayType *) PG_DETOAST_DATUM_COPY(entry->key);
+ CHECKARRVALID(r);
PREPAREARR(r);
if (ARRNELEMS(r)>= 2 * MAXNUMRANGE)
so now we work only with internal keys */
r = (ArrayType *) PG_DETOAST_DATUM(entry->key);
+ CHECKARRVALID(r);
if (ARRISVOID(r))
{
if (r != (ArrayType *) DatumGetPointer(entry->key))
in = (ArrayType *) PG_DETOAST_DATUM(entry->key);
+ CHECKARRVALID(in);
if (ARRISVOID(in))
PG_RETURN_POINTER(entry);
int4 *da,
*db;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (n != ARRNELEMS(b))
{
*result = false;
ArrayType *b = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(1)));
bool res;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
if (ARRISVOID(a) || ARRISVOID(b))
return FALSE;
int *da,
*db;
bool result;
- bool avoid = ARRISVOID(a);
- bool bvoid = ARRISVOID(b);
+ bool avoid;
+ bool bvoid;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+ avoid = ARRISVOID(a);
+ bvoid = ARRISVOID(b);
if (avoid || bvoid)
return (avoid && bvoid) ? TRUE : FALSE;
ArrayType *b = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(1)));
bool result;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
if (ARRISVOID(a) || ARRISVOID(b))
return FALSE;
ArrayType *b = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(1)));
ArrayType *result;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (!ARRISVOID(a))
SORT(a);
if (!ARRISVOID(b))
ArrayType *b = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(1)));
ArrayType *result;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
if (ARRISVOID(a) || ARRISVOID(b))
PG_RETURN_POINTER(new_intArrayType(0));
Datum intset_union_elem(PG_FUNCTION_ARGS);
Datum intset_subtract(PG_FUNCTION_ARGS);
-#define QSORT(a, direction) \
-if (ARRNELEMS(a) > 1) \
- qsort((void*)ARRPTR(a), ARRNELEMS(a),sizeof(int4), \
- (direction) ? compASC : compDESC )
-
-
Datum
intset(PG_FUNCTION_ARGS)
{
icount(PG_FUNCTION_ARGS)
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM(PG_GETARG_DATUM(0)));
- int32 count = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
+ int32 count = ARRNELEMS(a);
PG_FREE_IF_COPY(a, 0);
PG_RETURN_INT32(count);
char *d = (dirstr) ? VARDATA(dirstr) : NULL;
int dir = -1;
+ CHECKARRVALID(a);
if (ARRISVOID(a) || ARRNELEMS(a) < 2)
PG_RETURN_POINTER(a);
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(0)));
+ CHECKARRVALID(a);
if (ARRISVOID(a))
PG_RETURN_POINTER(a);
QSORT(a, 1);
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(0)));
+ CHECKARRVALID(a);
if (ARRISVOID(a))
PG_RETURN_POINTER(a);
QSORT(a, 0);
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(0)));
+ CHECKARRVALID(a);
if (ARRISVOID(a) || ARRNELEMS(a) < 2)
PG_RETURN_POINTER(a);
a = _int_unique(a);
idx(PG_FUNCTION_ARGS)
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM(PG_GETARG_DATUM(0)));
- int32 result = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
+ int32 result;
+ CHECKARRVALID(a);
+ result = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
if (result)
result = intarray_match_first(a, PG_GETARG_INT32(1));
PG_FREE_IF_COPY(a, 0);
int32 end = 0;
int32 c;
+ CHECKARRVALID(a);
if (ARRISVOID(a))
{
PG_FREE_IF_COPY(a, 0);
intarray_del_elem(PG_FUNCTION_ARGS)
{
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(0)));
- int32 c = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
- int32 *aa = ARRPTR(a);
+ int32 elem = PG_GETARG_INT32(1);
+ int32 c;
+ int32 *aa;
int32 n = 0,
i;
- int32 elem = PG_GETARG_INT32(1);
- for (i = 0; i < c; i++)
- if (aa[i] != elem)
+ CHECKARRVALID(a);
+ if (!ARRISVOID(a))
+ {
+ c = ARRNELEMS(a);
+ aa = ARRPTR(a);
+ for (i = 0; i < c; i++)
{
- if (i > n)
- aa[n++] = aa[i];
- else
- n++;
+ if (aa[i] != elem)
+ {
+ if (i > n)
+ aa[n++] = aa[i];
+ else
+ n++;
+ }
}
- if (c > 0)
a = resize_intArrayType(a, n);
+ }
PG_RETURN_POINTER(a);
}
ArrayType *a = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(0)));
ArrayType *b = (ArrayType *) DatumGetPointer(PG_DETOAST_DATUM_COPY(PG_GETARG_DATUM(1)));
ArrayType *result;
- int32 ca = ARRISVOID(a);
- int32 cb = ARRISVOID(b);
+ int32 ca;
+ int32 cb;
int32 *aa,
*bb,
*r;
i = 0,
k = 0;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
QSORT(a, 1);
a = _int_unique(a);
ca = ARRNELEMS(a);
int *da,
*db;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (ARRISVOID(a) || ARRISVOID(b))
return FALSE;
int *da,
*db;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (ARRISVOID(a) || ARRISVOID(b))
return FALSE;
int i,
j;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (ARRISVOID(a) && ARRISVOID(b))
return new_intArrayType(0);
if (ARRISVOID(a))
int i,
j;
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
+
if (ARRISVOID(a) || ARRISVOID(b))
return new_intArrayType(0);
ArrayType *r;
r = new_intArrayType(ARRNELEMS(a));
- memmove(r, a, VARSIZE(a));
+ memmove(r, a, VARSIZE(r));
return r;
}
*data;
int num = ARRNELEMS(r);
+ CHECKARRVALID(r);
+
if (num < 2)
return r;
c,
i;
- c = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
+ CHECKARRVALID(a);
+ if (ARRISVOID(a))
+ return 0;
+ c = ARRNELEMS(a);
aa = ARRPTR(a);
for (i = 0; i < c; i++)
if (aa[i] == elem)
{
ArrayType *result;
int32 *r;
- int32 c = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
+ int32 c;
+ CHECKARRVALID(a);
+ c = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
result = new_intArrayType(c + 1);
r = ARRPTR(result);
if (c > 0)
int32 ac = (ARRISVOID(a)) ? 0 : ARRNELEMS(a);
int32 bc = (ARRISVOID(b)) ? 0 : ARRNELEMS(b);
+ CHECKARRVALID(a);
+ CHECKARRVALID(b);
result = new_intArrayType(ac + bc);
if (ac)
memcpy(ARRPTR(result), ARRPTR(a), ac * sizeof(int32));
int num = ARRNELEMS(b);
int4 *ptr = ARRPTR(b);
+ CHECKARRVALID(b);
+
while (num--)
{
if (GETBIT(GETSIGN(a), HASHVAL(*ptr)))
int num = ARRNELEMS(b);
int4 *ptr = ARRPTR(b);
+ CHECKARRVALID(b);
+
while (num--)
{
if (!GETBIT(GETSIGN(a), HASHVAL(*ptr)))
int num;
GISTTYPE *res = (GISTTYPE *) palloc(CALCGTSIZE(0));
- ARRISVOID(in);
-
- ptr = ARRPTR(in);
- num = ARRNELEMS(in);
+ CHECKARRVALID(in);
+ if (ARRISVOID(in))
+ {
+ ptr = NULL;
+ num = 0;
+ }
+ else
+ {
+ ptr = ARRPTR(in);
+ num = ARRNELEMS(in);
+ }
memset(res, 0, CALCGTSIZE(0));
res->len = CALCGTSIZE(0);
}
/* XXX what about toasted input? */
+ CHECKARRVALID(query);
if (ARRISVOID(query))
return FALSE;
BITVECP dq,
de;
+ CHECKARRVALID(query);
+
memset(qp, 0, sizeof(BITVEC));
while (num--)
BITVECP dq,
de;
+ CHECKARRVALID(query);
+
memset(qp, 0, sizeof(BITVEC));
while (num--)