#include "postgres.h"
#include <ctype.h>
#include "ltree.h"
#include "utils/array.h"

Include dependency graph for _ltree_op.c:

Macros
#define	NEXTVAL(x) ( (ltree)( (char)(x) + INTALIGN( VARSIZE(x) ) ) )

Typedefs
typedef Datum(*	PGCALL2) (PG_FUNCTION_ARGS)

Functions
	PG_FUNCTION_INFO_V1 (_ltree_isparent)

	PG_FUNCTION_INFO_V1 (_ltree_r_isparent)

	PG_FUNCTION_INFO_V1 (_ltree_risparent)

	PG_FUNCTION_INFO_V1 (_ltree_r_risparent)

	PG_FUNCTION_INFO_V1 (_ltq_regex)

	PG_FUNCTION_INFO_V1 (_ltq_rregex)

	PG_FUNCTION_INFO_V1 (_lt_q_regex)

	PG_FUNCTION_INFO_V1 (_lt_q_rregex)

	PG_FUNCTION_INFO_V1 (_ltxtq_exec)

	PG_FUNCTION_INFO_V1 (_ltxtq_rexec)

	PG_FUNCTION_INFO_V1 (_ltree_extract_isparent)

	PG_FUNCTION_INFO_V1 (_ltree_extract_risparent)

	PG_FUNCTION_INFO_V1 (_ltq_extract_regex)

	PG_FUNCTION_INFO_V1 (_ltxtq_extract_exec)

	PG_FUNCTION_INFO_V1 (_lca)

static bool	array_iterator (ArrayType la, PGCALL2 callback, void param, ltree **found)

Datum	_ltree_isparent (PG_FUNCTION_ARGS)

Datum	_ltree_r_isparent (PG_FUNCTION_ARGS)

Datum	_ltree_risparent (PG_FUNCTION_ARGS)

Datum	_ltree_r_risparent (PG_FUNCTION_ARGS)

Datum	_ltq_regex (PG_FUNCTION_ARGS)

Datum	_ltq_rregex (PG_FUNCTION_ARGS)

Datum	_lt_q_regex (PG_FUNCTION_ARGS)

Datum	_lt_q_rregex (PG_FUNCTION_ARGS)

Datum	_ltxtq_exec (PG_FUNCTION_ARGS)

Datum	_ltxtq_rexec (PG_FUNCTION_ARGS)

Datum	_ltree_extract_isparent (PG_FUNCTION_ARGS)

Datum	_ltree_extract_risparent (PG_FUNCTION_ARGS)

Datum	_ltq_extract_regex (PG_FUNCTION_ARGS)

Datum	_ltxtq_extract_exec (PG_FUNCTION_ARGS)

Datum	_lca (PG_FUNCTION_ARGS)

Macro Definition Documentation

◆ NEXTVAL

#define NEXTVAL ( x ) ( (ltree*)( (char*)(x) + INTALIGN( VARSIZE(x) ) ) )

Definition at line 35 of file _ltree_op.c.

Typedef Documentation

◆ PGCALL2

typedef Datum(* PGCALL2) (PG_FUNCTION_ARGS)

Definition at line 33 of file _ltree_op.c.

Function Documentation

◆ _lca()

Datum _lca ( PG_FUNCTION_ARGS )

Definition at line 293 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    int         num = ArrayGetNItems(ARR_NDIM(la), ARR_DIMS(la));
    ltree      *item = (ltree *) ARR_DATA_PTR(la);
    ltree     **a,
               *res;
 
    if (ARR_NDIM(la) > 1)
        ereport(ERROR,
                (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR),
                 errmsg("array must be one-dimensional")));
    if (array_contains_nulls(la))
        ereport(ERROR,
                (errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
                 errmsg("array must not contain nulls")));
 
    a = (ltree **) palloc(sizeof(ltree *) * num);
    while (num > 0)
    {
        num--;
        a[num] = item;
        item = NEXTVAL(item);
    }
    res = lca_inner(a, ArrayGetNItems(ARR_NDIM(la), ARR_DIMS(la)));
    pfree(a);
 
    PG_FREE_IF_COPY(la, 0);
 
    if (res)
        PG_RETURN_POINTER(res);
    else
        PG_RETURN_NULL();
}

References a, ARR_DATA_PTR, ARR_DIMS, ARR_NDIM, array_contains_nulls(), ArrayGetNItems(), ereport, errcode(), errmsg(), ERROR, lca_inner(), NEXTVAL, palloc(), pfree(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_RETURN_NULL, PG_RETURN_POINTER, and res.

◆ _lt_q_regex()

Datum _lt_q_regex ( PG_FUNCTION_ARGS )

Definition at line 135 of file _ltree_op.c.

{
    ArrayType  *_tree = PG_GETARG_ARRAYTYPE_P(0);
    ArrayType  *_query = PG_GETARG_ARRAYTYPE_P(1);
    lquery     *query = (lquery *) ARR_DATA_PTR(_query);
    bool        res = false;
    int         num = ArrayGetNItems(ARR_NDIM(_query), ARR_DIMS(_query));
 
    if (ARR_NDIM(_query) > 1)
        ereport(ERROR,
                (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR),
                 errmsg("array must be one-dimensional")));
    if (array_contains_nulls(_query))
        ereport(ERROR,
                (errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
                 errmsg("array must not contain nulls")));
 
    while (num > 0)
    {
        if (array_iterator(_tree, ltq_regex, query, NULL))
        {
            res = true;
            break;
        }
        num--;
        query = (lquery *) NEXTVAL(query);
    }
 
    PG_FREE_IF_COPY(_tree, 0);
    PG_FREE_IF_COPY(_query, 1);
    PG_RETURN_BOOL(res);
}

References ARR_DATA_PTR, ARR_DIMS, ARR_NDIM, array_contains_nulls(), array_iterator(), ArrayGetNItems(), ereport, errcode(), errmsg(), ERROR, ltq_regex(), NEXTVAL, PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_RETURN_BOOL, and res.

Referenced by _lt_q_rregex().

◆ _lt_q_rregex()

Datum _lt_q_rregex ( PG_FUNCTION_ARGS )

Definition at line 169 of file _ltree_op.c.

{
    PG_RETURN_DATUM(DirectFunctionCall2(_lt_q_regex,
                                        PG_GETARG_DATUM(1),
                                        PG_GETARG_DATUM(0)
                                        ));
}

References _lt_q_regex(), DirectFunctionCall2, PG_GETARG_DATUM, and PG_RETURN_DATUM.

◆ _ltq_extract_regex()

Datum _ltq_extract_regex ( PG_FUNCTION_ARGS )

Definition at line 247 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    lquery     *query = PG_GETARG_LQUERY_P(1);
    ltree      *found,
               *item;
 
    if (!array_iterator(la, ltq_regex, query, &found))
    {
        PG_FREE_IF_COPY(la, 0);
        PG_FREE_IF_COPY(query, 1);
        PG_RETURN_NULL();
    }
 
    item = (ltree *) palloc0(VARSIZE(found));
    memcpy(item, found, VARSIZE(found));
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_POINTER(item);
}

References array_iterator(), ltq_regex(), palloc0(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LQUERY_P, PG_RETURN_NULL, PG_RETURN_POINTER, and VARSIZE.

◆ _ltq_regex()

Datum _ltq_regex ( PG_FUNCTION_ARGS )

Definition at line 114 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    lquery     *query = PG_GETARG_LQUERY_P(1);
    bool        res = array_iterator(la, ltq_regex, query, NULL);
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_BOOL(res);
}

References array_iterator(), ltq_regex(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LQUERY_P, PG_RETURN_BOOL, and res.

Referenced by _ltq_rregex().

◆ _ltq_rregex()

Datum _ltq_rregex ( PG_FUNCTION_ARGS )

Definition at line 126 of file _ltree_op.c.

{
    PG_RETURN_DATUM(DirectFunctionCall2(_ltq_regex,
                                        PG_GETARG_DATUM(1),
                                        PG_GETARG_DATUM(0)
                                        ));
}

References _ltq_regex(), DirectFunctionCall2, PG_GETARG_DATUM, and PG_RETURN_DATUM.

◆ _ltree_extract_isparent()

Datum _ltree_extract_isparent ( PG_FUNCTION_ARGS )

Definition at line 201 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltree      *query = PG_GETARG_LTREE_P(1);
    ltree      *found,
               *item;
 
    if (!array_iterator(la, ltree_isparent, query, &found))
    {
        PG_FREE_IF_COPY(la, 0);
        PG_FREE_IF_COPY(query, 1);
        PG_RETURN_NULL();
    }
 
    item = (ltree *) palloc0(VARSIZE(found));
    memcpy(item, found, VARSIZE(found));
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_POINTER(item);
}

References array_iterator(), ltree_isparent(), palloc0(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTREE_P, PG_RETURN_NULL, PG_RETURN_POINTER, and VARSIZE.

◆ _ltree_extract_risparent()

Datum _ltree_extract_risparent ( PG_FUNCTION_ARGS )

Definition at line 224 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltree      *query = PG_GETARG_LTREE_P(1);
    ltree      *found,
               *item;
 
    if (!array_iterator(la, ltree_risparent, query, &found))
    {
        PG_FREE_IF_COPY(la, 0);
        PG_FREE_IF_COPY(query, 1);
        PG_RETURN_NULL();
    }
 
    item = (ltree *) palloc0(VARSIZE(found));
    memcpy(item, found, VARSIZE(found));
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_POINTER(item);
}

References array_iterator(), ltree_risparent(), palloc0(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTREE_P, PG_RETURN_NULL, PG_RETURN_POINTER, and VARSIZE.

◆ _ltree_isparent()

Datum _ltree_isparent ( PG_FUNCTION_ARGS )

Definition at line 72 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltree      *query = PG_GETARG_LTREE_P(1);
    bool        res = array_iterator(la, ltree_isparent, query, NULL);
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_BOOL(res);
}

References array_iterator(), ltree_isparent(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTREE_P, PG_RETURN_BOOL, and res.

Referenced by _ltree_r_isparent().

◆ _ltree_r_isparent()

Datum _ltree_r_isparent ( PG_FUNCTION_ARGS )

Definition at line 84 of file _ltree_op.c.

{
    PG_RETURN_DATUM(DirectFunctionCall2(_ltree_isparent,
                                        PG_GETARG_DATUM(1),
                                        PG_GETARG_DATUM(0)
                                        ));
}

References _ltree_isparent(), DirectFunctionCall2, PG_GETARG_DATUM, and PG_RETURN_DATUM.

◆ _ltree_r_risparent()

Datum _ltree_r_risparent ( PG_FUNCTION_ARGS )

Definition at line 105 of file _ltree_op.c.

{
    PG_RETURN_DATUM(DirectFunctionCall2(_ltree_risparent,
                                        PG_GETARG_DATUM(1),
                                        PG_GETARG_DATUM(0)
                                        ));
}

References _ltree_risparent(), DirectFunctionCall2, PG_GETARG_DATUM, and PG_RETURN_DATUM.

◆ _ltree_risparent()

Datum _ltree_risparent ( PG_FUNCTION_ARGS )

Definition at line 93 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltree      *query = PG_GETARG_LTREE_P(1);
    bool        res = array_iterator(la, ltree_risparent, query, NULL);
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_BOOL(res);
}

References array_iterator(), ltree_risparent(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTREE_P, PG_RETURN_BOOL, and res.

Referenced by _ltree_r_risparent().

◆ _ltxtq_exec()

Datum _ltxtq_exec ( PG_FUNCTION_ARGS )

Definition at line 179 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltxtquery  *query = PG_GETARG_LTXTQUERY_P(1);
    bool        res = array_iterator(la, ltxtq_exec, query, NULL);
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_BOOL(res);
}

References array_iterator(), ltxtq_exec(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTXTQUERY_P, PG_RETURN_BOOL, and res.

Referenced by _ltxtq_rexec().

◆ _ltxtq_extract_exec()

Datum _ltxtq_extract_exec ( PG_FUNCTION_ARGS )

Definition at line 270 of file _ltree_op.c.

{
    ArrayType  *la = PG_GETARG_ARRAYTYPE_P(0);
    ltxtquery  *query = PG_GETARG_LTXTQUERY_P(1);
    ltree      *found,
               *item;
 
    if (!array_iterator(la, ltxtq_exec, query, &found))
    {
        PG_FREE_IF_COPY(la, 0);
        PG_FREE_IF_COPY(query, 1);
        PG_RETURN_NULL();
    }
 
    item = (ltree *) palloc0(VARSIZE(found));
    memcpy(item, found, VARSIZE(found));
 
    PG_FREE_IF_COPY(la, 0);
    PG_FREE_IF_COPY(query, 1);
    PG_RETURN_POINTER(item);
}

References array_iterator(), ltxtq_exec(), palloc0(), PG_FREE_IF_COPY, PG_GETARG_ARRAYTYPE_P, PG_GETARG_LTXTQUERY_P, PG_RETURN_NULL, PG_RETURN_POINTER, and VARSIZE.

◆ _ltxtq_rexec()

Datum _ltxtq_rexec ( PG_FUNCTION_ARGS )

Definition at line 191 of file _ltree_op.c.

{
    PG_RETURN_DATUM(DirectFunctionCall2(_ltxtq_exec,
                                        PG_GETARG_DATUM(1),
                                        PG_GETARG_DATUM(0)
                                        ));
}

References _ltxtq_exec(), DirectFunctionCall2, PG_GETARG_DATUM, and PG_RETURN_DATUM.

◆ array_iterator()

static bool array_iterator	(	ArrayType *	la,
		PGCALL2	callback,
		void *	param,
		ltree **	found
	)

static

Definition at line 38 of file _ltree_op.c.

{
    int         num = ArrayGetNItems(ARR_NDIM(la), ARR_DIMS(la));
    ltree      *item = (ltree *) ARR_DATA_PTR(la);
 
    if (ARR_NDIM(la) > 1)
        ereport(ERROR,
                (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR),
                 errmsg("array must be one-dimensional")));
    if (array_contains_nulls(la))
        ereport(ERROR,
                (errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
                 errmsg("array must not contain nulls")));
 
    if (found)
        *found = NULL;
    while (num > 0)
    {
        if (DatumGetBool(DirectFunctionCall2(callback,
                                             PointerGetDatum(item), PointerGetDatum(param))))
        {
 
            if (found)
                *found = item;
            return true;
        }
        num--;
        item = NEXTVAL(item);
    }
 
    return false;
}

References ARR_DATA_PTR, ARR_DIMS, ARR_NDIM, array_contains_nulls(), ArrayGetNItems(), callback(), DatumGetBool(), DirectFunctionCall2, ereport, errcode(), errmsg(), ERROR, NEXTVAL, and PointerGetDatum().

Referenced by _lt_q_regex(), _ltq_extract_regex(), _ltq_regex(), _ltree_extract_isparent(), _ltree_extract_risparent(), _ltree_isparent(), _ltree_risparent(), _ltxtq_exec(), _ltxtq_extract_exec(), array_position_common(), array_positions(), and exec_stmt_foreach_a().

◆ PG_FUNCTION_INFO_V1() [1/15]

PG_FUNCTION_INFO_V1 ( _lca )

◆ PG_FUNCTION_INFO_V1() [2/15]

PG_FUNCTION_INFO_V1 ( _lt_q_regex )

◆ PG_FUNCTION_INFO_V1() [3/15]

PG_FUNCTION_INFO_V1 ( _lt_q_rregex )

◆ PG_FUNCTION_INFO_V1() [4/15]

PG_FUNCTION_INFO_V1 ( _ltq_extract_regex )

◆ PG_FUNCTION_INFO_V1() [5/15]

PG_FUNCTION_INFO_V1 ( _ltq_regex )

◆ PG_FUNCTION_INFO_V1() [6/15]

PG_FUNCTION_INFO_V1 ( _ltq_rregex )

◆ PG_FUNCTION_INFO_V1() [7/15]

PG_FUNCTION_INFO_V1 ( _ltree_extract_isparent )

◆ PG_FUNCTION_INFO_V1() [8/15]

PG_FUNCTION_INFO_V1 ( _ltree_extract_risparent )

◆ PG_FUNCTION_INFO_V1() [9/15]

PG_FUNCTION_INFO_V1 ( _ltree_isparent )

◆ PG_FUNCTION_INFO_V1() [10/15]

PG_FUNCTION_INFO_V1 ( _ltree_r_isparent )

◆ PG_FUNCTION_INFO_V1() [11/15]

PG_FUNCTION_INFO_V1 ( _ltree_r_risparent )

◆ PG_FUNCTION_INFO_V1() [12/15]

PG_FUNCTION_INFO_V1 ( _ltree_risparent )

◆ PG_FUNCTION_INFO_V1() [13/15]

PG_FUNCTION_INFO_V1 ( _ltxtq_exec )

◆ PG_FUNCTION_INFO_V1() [14/15]

PG_FUNCTION_INFO_V1 ( _ltxtq_extract_exec )

◆ PG_FUNCTION_INFO_V1() [15/15]

PG_FUNCTION_INFO_V1 ( _ltxtq_rexec )

Macros

Typedefs

Functions