varchar.c File Reference

#include "postgres.h"
#include "access/detoast.h"
#include "access/htup_details.h"
#include "catalog/pg_collation.h"
#include "catalog/pg_type.h"
#include "common/hashfn.h"
#include "libpq/pqformat.h"
#include "mb/pg_wchar.h"
#include "nodes/nodeFuncs.h"
#include "nodes/supportnodes.h"
#include "utils/array.h"
#include "utils/builtins.h"
#include "utils/pg_locale.h"
#include "utils/varlena.h"

Include dependency graph for varchar.c:

Go to the source code of this file.

Functions
static int32	anychar_typmodin (ArrayType *ta, const char *typename)
static char *	anychar_typmodout (int32 typmod)
static BpChar *	bpchar_input (const char *s, size_t len, int32 atttypmod, Node *escontext)
Datum	bpcharin (PG_FUNCTION_ARGS)
Datum	bpcharout (PG_FUNCTION_ARGS)
Datum	bpcharrecv (PG_FUNCTION_ARGS)
Datum	bpcharsend (PG_FUNCTION_ARGS)
Datum	bpchar (PG_FUNCTION_ARGS)
Datum	char_bpchar (PG_FUNCTION_ARGS)
Datum	bpchar_name (PG_FUNCTION_ARGS)
Datum	name_bpchar (PG_FUNCTION_ARGS)
Datum	bpchartypmodin (PG_FUNCTION_ARGS)
Datum	bpchartypmodout (PG_FUNCTION_ARGS)
static VarChar *	varchar_input (const char *s, size_t len, int32 atttypmod, Node *escontext)
Datum	varcharin (PG_FUNCTION_ARGS)
Datum	varcharout (PG_FUNCTION_ARGS)
Datum	varcharrecv (PG_FUNCTION_ARGS)
Datum	varcharsend (PG_FUNCTION_ARGS)
Datum	varchar_support (PG_FUNCTION_ARGS)
Datum	varchar (PG_FUNCTION_ARGS)
Datum	varchartypmodin (PG_FUNCTION_ARGS)
Datum	varchartypmodout (PG_FUNCTION_ARGS)
static int	bcTruelen (BpChar *arg)
int	bpchartruelen (char *s, int len)
Datum	bpcharlen (PG_FUNCTION_ARGS)
Datum	bpcharoctetlen (PG_FUNCTION_ARGS)
static void	check_collation_set (Oid collid)
Datum	bpchareq (PG_FUNCTION_ARGS)
Datum	bpcharne (PG_FUNCTION_ARGS)
Datum	bpcharlt (PG_FUNCTION_ARGS)
Datum	bpcharle (PG_FUNCTION_ARGS)
Datum	bpchargt (PG_FUNCTION_ARGS)
Datum	bpcharge (PG_FUNCTION_ARGS)
Datum	bpcharcmp (PG_FUNCTION_ARGS)
Datum	bpchar_sortsupport (PG_FUNCTION_ARGS)
Datum	bpchar_larger (PG_FUNCTION_ARGS)
Datum	bpchar_smaller (PG_FUNCTION_ARGS)
Datum	hashbpchar (PG_FUNCTION_ARGS)
Datum	hashbpcharextended (PG_FUNCTION_ARGS)
static int	internal_bpchar_pattern_compare (BpChar *arg1, BpChar *arg2)
Datum	bpchar_pattern_lt (PG_FUNCTION_ARGS)
Datum	bpchar_pattern_le (PG_FUNCTION_ARGS)
Datum	bpchar_pattern_ge (PG_FUNCTION_ARGS)
Datum	bpchar_pattern_gt (PG_FUNCTION_ARGS)
Datum	btbpchar_pattern_cmp (PG_FUNCTION_ARGS)
Datum	btbpchar_pattern_sortsupport (PG_FUNCTION_ARGS)

Function Documentation

anychar_typmodin()

static int32 anychar_typmodin ( ArrayType *  ta, const char *  typename  )

static

Definition at line 33 of file varchar.c.

{
    int32       typmod;
    int32      *tl;
    int         n;
 
    tl = ArrayGetIntegerTypmods(ta, &n);
 
    /*
     * we're not too tense about good error message here because grammar
     * shouldn't allow wrong number of modifiers for CHAR
     */
    if (n != 1)
        ereport(ERROR,
                (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
                 errmsg("invalid type modifier")));
 
    if (*tl < 1)
        ereport(ERROR,
                (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
                 errmsg("length for type %s must be at least 1", typename)));
    if (*tl > MaxAttrSize)
        ereport(ERROR,
                (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
                 errmsg("length for type %s cannot exceed %d",
                        typename, MaxAttrSize)));
 
    /*
     * For largely historical reasons, the typmod is VARHDRSZ plus the number
     * of characters; there is enough client-side code that knows about that
     * that we'd better not change it.
     */
    typmod = VARHDRSZ + *tl;
 
    return typmod;
}

References ArrayGetIntegerTypmods(), ereport, errcode(), errmsg, ERROR, fb(), MaxAttrSize, and VARHDRSZ.

Referenced by bpchartypmodin(), and varchartypmodin().

anychar_typmodout()

static char * anychar_typmodout ( int32  typmod )

static

Definition at line 72 of file varchar.c.

{
    char       *res = (char *) palloc(64);
 
    if (typmod > VARHDRSZ)
        snprintf(res, 64, "(%d)", (int) (typmod - VARHDRSZ));
    else
        *res = '\0';
 
    return res;
}

References palloc(), snprintf, and VARHDRSZ.

Referenced by bpchartypmodout(), and varchartypmodout().

bcTruelen()

static int bcTruelen ( BpChar *  arg )

inlinestatic

Definition at line 673 of file varchar.c.

{
    return bpchartruelen(VARDATA_ANY(arg), VARSIZE_ANY_EXHDR(arg));
}

References arg, bpchartruelen(), VARDATA_ANY(), and VARSIZE_ANY_EXHDR().

Referenced by bpchar_larger(), bpchar_smaller(), bpcharcmp(), bpchareq(), bpcharge(), bpchargt(), bpcharle(), bpcharlen(), bpcharlt(), bpcharne(), hashbpchar(), hashbpcharextended(), and internal_bpchar_pattern_compare().

bpchar()

Datum bpchar

(

PG_FUNCTION_ARGS

)

Definition at line 271 of file varchar.c.

{
    BpChar     *source = PG_GETARG_BPCHAR_PP(0);
    int32       maxlen = PG_GETARG_INT32(1);
    bool        isExplicit = PG_GETARG_BOOL(2);
    BpChar     *result;
    int32       len;
    char       *r;
    char       *s;
    int         i;
    int         charlen;        /* number of characters in the input string +
                                 * VARHDRSZ */
 
    /* No work if typmod is invalid */
    if (maxlen < (int32) VARHDRSZ)
        PG_RETURN_BPCHAR_P(source);
 
    maxlen -= VARHDRSZ;
 
    len = VARSIZE_ANY_EXHDR(source);
    s = VARDATA_ANY(source);
 
    charlen = pg_mbstrlen_with_len(s, len);
 
    /* No work if supplied data matches typmod already */
    if (charlen == maxlen)
        PG_RETURN_BPCHAR_P(source);
 
    if (charlen > maxlen)
    {
        /* Verify that extra characters are spaces, and clip them off */
        size_t      maxmblen;
 
        maxmblen = pg_mbcharcliplen(s, len, maxlen);
 
        if (!isExplicit)
        {
            for (i = maxmblen; i < len; i++)
                if (s[i] != ' ')
                    ereturn(fcinfo->context, (Datum) 0,
                            (errcode(ERRCODE_STRING_DATA_RIGHT_TRUNCATION),
                             errmsg("value too long for type character(%d)",
                                    maxlen)));
        }
 
        len = maxmblen;
 
        /*
         * At this point, maxlen is the necessary byte length, not the number
         * of CHARACTERS!
         */
        maxlen = len;
    }
    else
    {
        /*
         * At this point, maxlen is the necessary byte length, not the number
         * of CHARACTERS!
         */
        maxlen = len + (maxlen - charlen);
    }
 
    Assert(maxlen >= len);
 
    result = palloc(maxlen + VARHDRSZ);
    SET_VARSIZE(result, maxlen + VARHDRSZ);
    r = VARDATA(result);
 
    memcpy(r, s, len);
 
    /* blank pad the string if necessary */
    if (maxlen > len)
        memset(r + len, ' ', maxlen - len);
 
    PG_RETURN_BPCHAR_P(result);
}

References Assert, ereturn, errcode(), errmsg, fb(), i, len, memcpy(), palloc(), PG_GETARG_BOOL, PG_GETARG_BPCHAR_PP, PG_GETARG_INT32, pg_mbcharcliplen(), pg_mbstrlen_with_len(), PG_RETURN_BPCHAR_P, result, SET_VARSIZE(), source, VARDATA(), VARDATA_ANY(), VARHDRSZ, and VARSIZE_ANY_EXHDR().

bpchar_input()

static BpChar * bpchar_input ( const char *  s, size_t  len, int32  atttypmod, Node *  escontext  )

static

Definition at line 130 of file varchar.c.

{
    BpChar     *result;
    char       *r;
    size_t      maxlen;
 
    /* If typmod is -1 (or invalid), use the actual string length */
    if (atttypmod < (int32) VARHDRSZ)
        maxlen = len;
    else
    {
        size_t      charlen;    /* number of CHARACTERS in the input */
 
        maxlen = atttypmod - VARHDRSZ;
        charlen = pg_mbstrlen_with_len(s, len);
        if (charlen > maxlen)
        {
            /* Verify that extra characters are spaces, and clip them off */
            size_t      mbmaxlen = pg_mbcharcliplen(s, len, maxlen);
            size_t      j;
 
            /*
             * at this point, len is the actual BYTE length of the input
             * string, maxlen is the max number of CHARACTERS allowed for this
             * bpchar type, mbmaxlen is the length in BYTES of those chars.
             */
            for (j = mbmaxlen; j < len; j++)
            {
                if (s[j] != ' ')
                    ereturn(escontext, NULL,
                            (errcode(ERRCODE_STRING_DATA_RIGHT_TRUNCATION),
                             errmsg("value too long for type character(%zu)",
                                    maxlen)));
            }
 
            /*
             * Now we set maxlen to the necessary byte length, not the number
             * of CHARACTERS!
             */
            maxlen = len = mbmaxlen;
        }
        else
        {
            /*
             * Now we set maxlen to the necessary byte length, not the number
             * of CHARACTERS!
             */
            maxlen = len + (maxlen - charlen);
        }
    }
 
    result = (BpChar *) palloc(maxlen + VARHDRSZ);
    SET_VARSIZE(result, maxlen + VARHDRSZ);
    r = VARDATA(result);
    memcpy(r, s, len);
 
    /* blank pad the string if necessary */
    if (maxlen > len)
        memset(r + len, ' ', maxlen - len);
 
    return result;
}

References ereturn, errcode(), errmsg, fb(), j, len, memcpy(), palloc(), pg_mbcharcliplen(), pg_mbstrlen_with_len(), result, SET_VARSIZE(), VARDATA(), and VARHDRSZ.

Referenced by bpcharin(), and bpcharrecv().

bpchar_larger()

Datum bpchar_larger

(

PG_FUNCTION_ARGS

)

Definition at line 950 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_RETURN_BPCHAR_P((cmp >= 0) ? arg1 : arg2);
}

References bcTruelen(), cmp(), fb(), PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BPCHAR_P, VARDATA_ANY(), and varstr_cmp().

bpchar_name()

Datum bpchar_name

(

PG_FUNCTION_ARGS

)

Definition at line 373 of file varchar.c.

{
    BpChar     *s = PG_GETARG_BPCHAR_PP(0);
    char       *s_data;
    Name        result;
    int         len;
 
    len = VARSIZE_ANY_EXHDR(s);
    s_data = VARDATA_ANY(s);
 
    /* Truncate oversize input */
    if (len >= NAMEDATALEN)
        len = pg_mbcliplen(s_data, len, NAMEDATALEN - 1);
 
    /* Remove trailing blanks */
    while (len > 0)
    {
        if (s_data[len - 1] != ' ')
            break;
        len--;
    }
 
    /* We use palloc0 here to ensure result is zero-padded */
    result = (Name) palloc0(NAMEDATALEN);
    memcpy(NameStr(*result), s_data, len);
 
    PG_RETURN_NAME(result);
}

References fb(), len, memcpy(), NAMEDATALEN, NameStr, palloc0(), PG_GETARG_BPCHAR_PP, pg_mbcliplen(), PG_RETURN_NAME, result, VARDATA_ANY(), and VARSIZE_ANY_EXHDR().

bpchar_pattern_ge()

Datum bpchar_pattern_ge

(

PG_FUNCTION_ARGS

)

Definition at line 1166 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         result;
 
    result = internal_bpchar_pattern_compare(arg1, arg2);
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result >= 0);
}

References fb(), internal_bpchar_pattern_compare(), PG_FREE_IF_COPY, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, and result.

bpchar_pattern_gt()

Datum bpchar_pattern_gt

(

PG_FUNCTION_ARGS

)

Definition at line 1182 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         result;
 
    result = internal_bpchar_pattern_compare(arg1, arg2);
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result > 0);
}

References fb(), internal_bpchar_pattern_compare(), PG_FREE_IF_COPY, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, and result.

bpchar_pattern_le()

Datum bpchar_pattern_le

(

PG_FUNCTION_ARGS

)

Definition at line 1150 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         result;
 
    result = internal_bpchar_pattern_compare(arg1, arg2);
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result <= 0);
}

References fb(), internal_bpchar_pattern_compare(), PG_FREE_IF_COPY, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, and result.

bpchar_pattern_lt()

Datum bpchar_pattern_lt

(

PG_FUNCTION_ARGS

)

Definition at line 1134 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         result;
 
    result = internal_bpchar_pattern_compare(arg1, arg2);
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result < 0);
}

References fb(), internal_bpchar_pattern_compare(), PG_FREE_IF_COPY, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, and result.

bpchar_smaller()

Datum bpchar_smaller

(

PG_FUNCTION_ARGS

)

Definition at line 968 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_RETURN_BPCHAR_P((cmp <= 0) ? arg1 : arg2);
}

References bcTruelen(), cmp(), fb(), PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BPCHAR_P, VARDATA_ANY(), and varstr_cmp().

bpchar_sortsupport()

Datum bpchar_sortsupport

(

PG_FUNCTION_ARGS

)

Definition at line 933 of file varchar.c.

{
    SortSupport ssup = (SortSupport) PG_GETARG_POINTER(0);
    Oid         collid = ssup->ssup_collation;
    MemoryContext oldcontext;
 
    oldcontext = MemoryContextSwitchTo(ssup->ssup_cxt);
 
    /* Use generic string SortSupport */
    varstr_sortsupport(ssup, BPCHAROID, collid);
 
    MemoryContextSwitchTo(oldcontext);
 
    PG_RETURN_VOID();
}

References collid, fb(), MemoryContextSwitchTo(), PG_GETARG_POINTER, PG_RETURN_VOID, SortSupportData::ssup_collation, SortSupportData::ssup_cxt, and varstr_sortsupport().

bpcharcmp()

Datum bpcharcmp

(

PG_FUNCTION_ARGS

)

Definition at line 912 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_INT32(cmp);
}

References bcTruelen(), cmp(), fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_INT32, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpchar_ssup_cmp(), and gbt_bpcharcmp().

bpchareq()

Datum bpchareq

(

PG_FUNCTION_ARGS

)

Definition at line 746 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    bool        result;
    Oid         collid = PG_GET_COLLATION();
    pg_locale_t mylocale;
 
    check_collation_set(collid);
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    mylocale = pg_newlocale_from_collation(collid);
 
    if (mylocale->deterministic)
    {
        /*
         * Since we only care about equality or not-equality, we can avoid all
         * the expense of strcoll() here, and just do bitwise comparison.
         */
        if (len1 != len2)
            result = false;
        else
            result = (memcmp(VARDATA_ANY(arg1), VARDATA_ANY(arg2), len1) == 0);
    }
    else
    {
        result = (varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                             collid) == 0);
    }
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result);
}

References bcTruelen(), check_collation_set(), collid, fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, pg_newlocale_from_collation(), PG_RETURN_BOOL, result, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpchareq().

bpcharge()

Datum bpcharge

(

PG_FUNCTION_ARGS

)

Definition at line 891 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(cmp >= 0);
}

References bcTruelen(), cmp(), fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpcharge().

bpchargt()

Datum bpchargt

(

PG_FUNCTION_ARGS

)

Definition at line 870 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(cmp > 0);
}

References bcTruelen(), cmp(), fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpchargt().

bpcharin()

Datum bpcharin

(

PG_FUNCTION_ARGS

)

Definition at line 198 of file varchar.c.

{
    char       *s = PG_GETARG_CSTRING(0);
#ifdef NOT_USED
    Oid         typelem = PG_GETARG_OID(1);
#endif
    int32       atttypmod = PG_GETARG_INT32(2);
    BpChar     *result;
 
    result = bpchar_input(s, strlen(s), atttypmod, fcinfo->context);
    PG_RETURN_BPCHAR_P(result);
}

References bpchar_input(), fb(), PG_GETARG_CSTRING, PG_GETARG_INT32, PG_GETARG_OID, PG_RETURN_BPCHAR_P, and result.

bpcharle()

Datum bpcharle

(

PG_FUNCTION_ARGS

)

Definition at line 849 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(cmp <= 0);
}

References bcTruelen(), cmp(), fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpcharle().

bpcharlen()

Datum bpcharlen

(

PG_FUNCTION_ARGS

)

Definition at line 696 of file varchar.c.

{
    BpChar     *arg = PG_GETARG_BPCHAR_PP(0);
    int         len;
 
    /* get number of bytes, ignoring trailing spaces */
    len = bcTruelen(arg);
 
    /* in multibyte encoding, convert to number of characters */
    if (pg_database_encoding_max_length() != 1)
        len = pg_mbstrlen_with_len(VARDATA_ANY(arg), len);
 
    PG_RETURN_INT32(len);
}

References arg, bcTruelen(), len, pg_database_encoding_max_length(), PG_GETARG_BPCHAR_PP, pg_mbstrlen_with_len(), PG_RETURN_INT32, and VARDATA_ANY().

bpcharlt()

Datum bpcharlt

(

PG_FUNCTION_ARGS

)

Definition at line 828 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    int         cmp;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    cmp = varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                     PG_GET_COLLATION());
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(cmp < 0);
}

References bcTruelen(), cmp(), fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_RETURN_BOOL, VARDATA_ANY(), and varstr_cmp().

Referenced by gbt_bpcharlt().

bpcharne()

Datum bpcharne

(

PG_FUNCTION_ARGS

)

Definition at line 787 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         len1,
                len2;
    bool        result;
    Oid         collid = PG_GET_COLLATION();
    pg_locale_t mylocale;
 
    check_collation_set(collid);
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    mylocale = pg_newlocale_from_collation(collid);
 
    if (mylocale->deterministic)
    {
        /*
         * Since we only care about equality or not-equality, we can avoid all
         * the expense of strcoll() here, and just do bitwise comparison.
         */
        if (len1 != len2)
            result = true;
        else
            result = (memcmp(VARDATA_ANY(arg1), VARDATA_ANY(arg2), len1) != 0);
    }
    else
    {
        result = (varstr_cmp(VARDATA_ANY(arg1), len1, VARDATA_ANY(arg2), len2,
                             collid) != 0);
    }
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_BOOL(result);
}

References bcTruelen(), check_collation_set(), collid, fb(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, pg_newlocale_from_collation(), PG_RETURN_BOOL, result, VARDATA_ANY(), and varstr_cmp().

bpcharoctetlen()

Datum bpcharoctetlen

(

PG_FUNCTION_ARGS

)

Definition at line 712 of file varchar.c.

{
    Datum       arg = PG_GETARG_DATUM(0);
 
    /* We need not detoast the input at all */
    PG_RETURN_INT32(toast_raw_datum_size(arg) - VARHDRSZ);
}

References arg, PG_GETARG_DATUM, PG_RETURN_INT32, toast_raw_datum_size(), and VARHDRSZ.

bpcharout()

Datum bpcharout

(

PG_FUNCTION_ARGS

)

Definition at line 219 of file varchar.c.

{
    Datum       txt = PG_GETARG_DATUM(0);
 
    PG_RETURN_CSTRING(TextDatumGetCString(txt));
}

References fb(), PG_GETARG_DATUM, PG_RETURN_CSTRING, and TextDatumGetCString.

bpcharrecv()

Datum bpcharrecv

(

PG_FUNCTION_ARGS

)

Definition at line 230 of file varchar.c.

{
    StringInfo  buf = (StringInfo) PG_GETARG_POINTER(0);
#ifdef NOT_USED
    Oid         typelem = PG_GETARG_OID(1);
#endif
    int32       atttypmod = PG_GETARG_INT32(2);
    BpChar     *result;
    char       *str;
    int         nbytes;
 
    str = pq_getmsgtext(buf, buf->len - buf->cursor, &nbytes);
    result = bpchar_input(str, nbytes, atttypmod, NULL);
    pfree(str);
    PG_RETURN_BPCHAR_P(result);
}

References bpchar_input(), buf, fb(), pfree(), PG_GETARG_INT32, PG_GETARG_OID, PG_GETARG_POINTER, PG_RETURN_BPCHAR_P, pq_getmsgtext(), result, and str.

bpcharsend()

Datum bpcharsend

(

PG_FUNCTION_ARGS

)

Definition at line 251 of file varchar.c.

{
    /* Exactly the same as textsend, so share code */
    return textsend(fcinfo);
}

References textsend().

bpchartruelen()

int bpchartruelen	(	char *	s,
		int	len
	)

Definition at line 679 of file varchar.c.

{
    int         i;
 
    /*
     * Note that we rely on the assumption that ' ' is a singleton unit on
     * every supported multibyte server encoding.
     */
    for (i = len - 1; i >= 0; i--)
    {
        if (s[i] != ' ')
            break;
    }
    return i + 1;
}

References i, and len.

Referenced by bcTruelen(), bpcharfastcmp_c(), varstr_abbrev_convert(), and varstrfastcmp_locale().

bpchartypmodin()

Datum bpchartypmodin

(

PG_FUNCTION_ARGS

)

Definition at line 420 of file varchar.c.

{
    ArrayType  *ta = PG_GETARG_ARRAYTYPE_P(0);
 
    PG_RETURN_INT32(anychar_typmodin(ta, "char"));
}

References anychar_typmodin(), fb(), PG_GETARG_ARRAYTYPE_P, and PG_RETURN_INT32.

bpchartypmodout()

Datum bpchartypmodout

(

PG_FUNCTION_ARGS

)

Definition at line 428 of file varchar.c.

{
    int32       typmod = PG_GETARG_INT32(0);
 
    PG_RETURN_CSTRING(anychar_typmodout(typmod));
}

References anychar_typmodout(), PG_GETARG_INT32, and PG_RETURN_CSTRING.

btbpchar_pattern_cmp()

Datum btbpchar_pattern_cmp

(

PG_FUNCTION_ARGS

)

Definition at line 1198 of file varchar.c.

{
    BpChar     *arg1 = PG_GETARG_BPCHAR_PP(0);
    BpChar     *arg2 = PG_GETARG_BPCHAR_PP(1);
    int         result;
 
    result = internal_bpchar_pattern_compare(arg1, arg2);
 
    PG_FREE_IF_COPY(arg1, 0);
    PG_FREE_IF_COPY(arg2, 1);
 
    PG_RETURN_INT32(result);
}

References fb(), internal_bpchar_pattern_compare(), PG_FREE_IF_COPY, PG_GETARG_BPCHAR_PP, PG_RETURN_INT32, and result.

btbpchar_pattern_sortsupport()

Datum btbpchar_pattern_sortsupport

(

PG_FUNCTION_ARGS

)

Definition at line 1214 of file varchar.c.

{
    SortSupport ssup = (SortSupport) PG_GETARG_POINTER(0);
    MemoryContext oldcontext;
 
    oldcontext = MemoryContextSwitchTo(ssup->ssup_cxt);
 
    /* Use generic string SortSupport, forcing "C" collation */
    varstr_sortsupport(ssup, BPCHAROID, C_COLLATION_OID);
 
    MemoryContextSwitchTo(oldcontext);
 
    PG_RETURN_VOID();
}

References fb(), MemoryContextSwitchTo(), PG_GETARG_POINTER, PG_RETURN_VOID, SortSupportData::ssup_cxt, and varstr_sortsupport().

char_bpchar()

Datum char_bpchar

(

PG_FUNCTION_ARGS

)

Definition at line 354 of file varchar.c.

{
    char        c = PG_GETARG_CHAR(0);
    BpChar     *result;
 
    result = (BpChar *) palloc(VARHDRSZ + 1);
 
    SET_VARSIZE(result, VARHDRSZ + 1);
    *(VARDATA(result)) = c;
 
    PG_RETURN_BPCHAR_P(result);
}

References palloc(), PG_GETARG_CHAR, PG_RETURN_BPCHAR_P, result, SET_VARSIZE(), VARDATA(), and VARHDRSZ.

check_collation_set()

static void check_collation_set ( Oid  collid )

static

Definition at line 730 of file varchar.c.

{
    if (!OidIsValid(collid))
    {
        /*
         * This typically means that the parser could not resolve a conflict
         * of implicit collations, so report it that way.
         */
        ereport(ERROR,
                (errcode(ERRCODE_INDETERMINATE_COLLATION),
                 errmsg("could not determine which collation to use for string comparison"),
                 errhint("Use the COLLATE clause to set the collation explicitly.")));
    }
}

References collid, ereport, errcode(), errhint(), errmsg, ERROR, fb(), and OidIsValid.

Referenced by bpchareq(), and bpcharne().

hashbpchar()

Datum hashbpchar

(

PG_FUNCTION_ARGS

)

Definition at line 991 of file varchar.c.

{
    BpChar     *key = PG_GETARG_BPCHAR_PP(0);
    Oid         collid = PG_GET_COLLATION();
    char       *keydata;
    int         keylen;
    pg_locale_t mylocale;
    Datum       result;
 
    if (!collid)
        ereport(ERROR,
                (errcode(ERRCODE_INDETERMINATE_COLLATION),
                 errmsg("could not determine which collation to use for string hashing"),
                 errhint("Use the COLLATE clause to set the collation explicitly.")));
 
    keydata = VARDATA_ANY(key);
    keylen = bcTruelen(key);
 
    mylocale = pg_newlocale_from_collation(collid);
 
    if (mylocale->deterministic)
    {
        result = hash_any((unsigned char *) keydata, keylen);
    }
    else
    {
        Size        bsize,
                    rsize;
        char       *buf;
 
        bsize = pg_strnxfrm(NULL, 0, keydata, keylen, mylocale);
        buf = palloc(bsize + 1);
 
        rsize = pg_strnxfrm(buf, bsize + 1, keydata, keylen, mylocale);
 
        /* the second call may return a smaller value than the first */
        if (rsize > bsize)
            elog(ERROR, "pg_strnxfrm() returned unexpected result");
 
        /*
         * In principle, there's no reason to include the terminating NUL
         * character in the hash, but it was done before and the behavior must
         * be preserved.
         */
        result = hash_any((uint8_t *) buf, bsize + 1);
 
        pfree(buf);
    }
 
    /* Avoid leaking memory for toasted inputs */
    PG_FREE_IF_COPY(key, 0);
 
    return result;
}

References bcTruelen(), buf, collid, elog, ereport, errcode(), errhint(), errmsg, ERROR, fb(), hash_any(), palloc(), pfree(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, pg_newlocale_from_collation(), pg_strnxfrm(), result, and VARDATA_ANY().

hashbpcharextended()

Datum hashbpcharextended

(

PG_FUNCTION_ARGS

)

Definition at line 1047 of file varchar.c.

{
    BpChar     *key = PG_GETARG_BPCHAR_PP(0);
    Oid         collid = PG_GET_COLLATION();
    char       *keydata;
    int         keylen;
    pg_locale_t mylocale;
    Datum       result;
 
    if (!collid)
        ereport(ERROR,
                (errcode(ERRCODE_INDETERMINATE_COLLATION),
                 errmsg("could not determine which collation to use for string hashing"),
                 errhint("Use the COLLATE clause to set the collation explicitly.")));
 
    keydata = VARDATA_ANY(key);
    keylen = bcTruelen(key);
 
    mylocale = pg_newlocale_from_collation(collid);
 
    if (mylocale->deterministic)
    {
        result = hash_any_extended((unsigned char *) keydata, keylen,
                                   PG_GETARG_INT64(1));
    }
    else
    {
        Size        bsize,
                    rsize;
        char       *buf;
 
        bsize = pg_strnxfrm(NULL, 0, keydata, keylen, mylocale);
        buf = palloc(bsize + 1);
 
        rsize = pg_strnxfrm(buf, bsize + 1, keydata, keylen, mylocale);
 
        /* the second call may return a smaller value than the first */
        if (rsize > bsize)
            elog(ERROR, "pg_strnxfrm() returned unexpected result");
 
        /*
         * In principle, there's no reason to include the terminating NUL
         * character in the hash, but it was done before and the behavior must
         * be preserved.
         */
        result = hash_any_extended((uint8_t *) buf, bsize + 1,
                                   PG_GETARG_INT64(1));
 
        pfree(buf);
    }
 
    PG_FREE_IF_COPY(key, 0);
 
    return result;
}

References bcTruelen(), buf, collid, elog, ereport, errcode(), errhint(), errmsg, ERROR, fb(), hash_any_extended(), palloc(), pfree(), PG_FREE_IF_COPY, PG_GET_COLLATION, PG_GETARG_BPCHAR_PP, PG_GETARG_INT64, pg_newlocale_from_collation(), pg_strnxfrm(), result, and VARDATA_ANY().

internal_bpchar_pattern_compare()

static int internal_bpchar_pattern_compare ( BpChar *  arg1, BpChar *  arg2  )

static

Definition at line 1112 of file varchar.c.

{
    int         result;
    int         len1,
                len2;
 
    len1 = bcTruelen(arg1);
    len2 = bcTruelen(arg2);
 
    result = memcmp(VARDATA_ANY(arg1), VARDATA_ANY(arg2), Min(len1, len2));
    if (result != 0)
        return result;
    else if (len1 < len2)
        return -1;
    else if (len1 > len2)
        return 1;
    else
        return 0;
}

References bcTruelen(), fb(), Min, result, and VARDATA_ANY().

Referenced by bpchar_pattern_ge(), bpchar_pattern_gt(), bpchar_pattern_le(), bpchar_pattern_lt(), and btbpchar_pattern_cmp().

name_bpchar()

Datum name_bpchar

(

PG_FUNCTION_ARGS

)

Definition at line 410 of file varchar.c.

{
    Name        s = PG_GETARG_NAME(0);
    BpChar     *result;
 
    result = (BpChar *) cstring_to_text(NameStr(*s));
    PG_RETURN_BPCHAR_P(result);
}

References cstring_to_text(), NameStr, PG_GETARG_NAME, PG_RETURN_BPCHAR_P, and result.

varchar()

Datum varchar

(

PG_FUNCTION_ARGS

)

Definition at line 612 of file varchar.c.

{
    VarChar    *source = PG_GETARG_VARCHAR_PP(0);
    int32       typmod = PG_GETARG_INT32(1);
    bool        isExplicit = PG_GETARG_BOOL(2);
    int32       len,
                maxlen;
    size_t      maxmblen;
    int         i;
    char       *s_data;
 
    len = VARSIZE_ANY_EXHDR(source);
    s_data = VARDATA_ANY(source);
    maxlen = typmod - VARHDRSZ;
 
    /* No work if typmod is invalid or supplied data fits it already */
    if (maxlen < 0 || len <= maxlen)
        PG_RETURN_VARCHAR_P(source);
 
    /* only reach here if string is too long... */
 
    /* truncate multibyte string preserving multibyte boundary */
    maxmblen = pg_mbcharcliplen(s_data, len, maxlen);
 
    if (!isExplicit)
    {
        for (i = maxmblen; i < len; i++)
            if (s_data[i] != ' ')
                ereturn(fcinfo->context, (Datum) 0,
                        (errcode(ERRCODE_STRING_DATA_RIGHT_TRUNCATION),
                         errmsg("value too long for type character varying(%d)",
                                maxlen)));
    }
 
    PG_RETURN_VARCHAR_P((VarChar *) cstring_to_text_with_len(s_data,
                                                             maxmblen));
}

References cstring_to_text_with_len(), ereturn, errcode(), errmsg, fb(), i, len, PG_GETARG_BOOL, PG_GETARG_INT32, PG_GETARG_VARCHAR_PP, pg_mbcharcliplen(), PG_RETURN_VARCHAR_P, source, VARDATA_ANY(), VARHDRSZ, and VARSIZE_ANY_EXHDR().

Referenced by main().

varchar_input()

static VarChar * varchar_input ( const char *  s, size_t  len, int32  atttypmod, Node *  escontext  )

static

Definition at line 460 of file varchar.c.

{
    VarChar    *result;
    size_t      maxlen;
 
    maxlen = atttypmod - VARHDRSZ;
 
    if (atttypmod >= (int32) VARHDRSZ && len > maxlen)
    {
        /* Verify that extra characters are spaces, and clip them off */
        size_t      mbmaxlen = pg_mbcharcliplen(s, len, maxlen);
        size_t      j;
 
        for (j = mbmaxlen; j < len; j++)
        {
            if (s[j] != ' ')
                ereturn(escontext, NULL,
                        (errcode(ERRCODE_STRING_DATA_RIGHT_TRUNCATION),
                         errmsg("value too long for type character varying(%zu)",
                                maxlen)));
        }
 
        len = mbmaxlen;
    }
 
    /*
     * We can use cstring_to_text_with_len because VarChar and text are
     * binary-compatible types.
     */
    result = (VarChar *) cstring_to_text_with_len(s, len);
    return result;
}

References cstring_to_text_with_len(), ereturn, errcode(), errmsg, fb(), j, len, pg_mbcharcliplen(), result, and VARHDRSZ.

Referenced by varcharin(), and varcharrecv().

varchar_support()

Datum varchar_support

(

PG_FUNCTION_ARGS

)

Definition at line 568 of file varchar.c.

{
    Node       *rawreq = (Node *) PG_GETARG_POINTER(0);
    Node       *ret = NULL;
 
    if (IsA(rawreq, SupportRequestSimplify))
    {
        SupportRequestSimplify *req = (SupportRequestSimplify *) rawreq;
        FuncExpr   *expr = req->fcall;
        Node       *typmod;
 
        Assert(list_length(expr->args) >= 2);
 
        typmod = (Node *) lsecond(expr->args);
 
        if (IsA(typmod, Const) && !((Const *) typmod)->constisnull)
        {
            Node       *source = (Node *) linitial(expr->args);
            int32       old_typmod = exprTypmod(source);
            int32       new_typmod = DatumGetInt32(((Const *) typmod)->constvalue);
            int32       old_max = old_typmod - VARHDRSZ;
            int32       new_max = new_typmod - VARHDRSZ;
 
            if (new_typmod < 0 || (old_typmod >= 0 && old_max <= new_max))
                ret = relabel_to_typmod(source, new_typmod);
        }
    }
 
    PG_RETURN_POINTER(ret);
}

References FuncExpr::args, Assert, DatumGetInt32(), exprTypmod(), fb(), IsA, linitial, list_length(), lsecond, PG_GETARG_POINTER, PG_RETURN_POINTER, relabel_to_typmod(), source, and VARHDRSZ.

varcharin()

Datum varcharin

(

PG_FUNCTION_ARGS

)

Definition at line 498 of file varchar.c.

{
    char       *s = PG_GETARG_CSTRING(0);
#ifdef NOT_USED
    Oid         typelem = PG_GETARG_OID(1);
#endif
    int32       atttypmod = PG_GETARG_INT32(2);
    VarChar    *result;
 
    result = varchar_input(s, strlen(s), atttypmod, fcinfo->context);
    PG_RETURN_VARCHAR_P(result);
}

References fb(), PG_GETARG_CSTRING, PG_GETARG_INT32, PG_GETARG_OID, PG_RETURN_VARCHAR_P, result, and varchar_input().

varcharout()

Datum varcharout

(

PG_FUNCTION_ARGS

)

Definition at line 519 of file varchar.c.

{
    Datum       txt = PG_GETARG_DATUM(0);
 
    PG_RETURN_CSTRING(TextDatumGetCString(txt));
}

References fb(), PG_GETARG_DATUM, PG_RETURN_CSTRING, and TextDatumGetCString.

varcharrecv()

Datum varcharrecv

(

PG_FUNCTION_ARGS

)

Definition at line 530 of file varchar.c.

{
    StringInfo  buf = (StringInfo) PG_GETARG_POINTER(0);
#ifdef NOT_USED
    Oid         typelem = PG_GETARG_OID(1);
#endif
    int32       atttypmod = PG_GETARG_INT32(2);
    VarChar    *result;
    char       *str;
    int         nbytes;
 
    str = pq_getmsgtext(buf, buf->len - buf->cursor, &nbytes);
    result = varchar_input(str, nbytes, atttypmod, NULL);
    pfree(str);
    PG_RETURN_VARCHAR_P(result);
}

References buf, fb(), pfree(), PG_GETARG_INT32, PG_GETARG_OID, PG_GETARG_POINTER, PG_RETURN_VARCHAR_P, pq_getmsgtext(), result, str, and varchar_input().

varcharsend()

Datum varcharsend

(

PG_FUNCTION_ARGS

)

Definition at line 551 of file varchar.c.

{
    /* Exactly the same as textsend, so share code */
    return textsend(fcinfo);
}

References textsend().

varchartypmodin()

Datum varchartypmodin

(

PG_FUNCTION_ARGS

)

Definition at line 651 of file varchar.c.

{
    ArrayType  *ta = PG_GETARG_ARRAYTYPE_P(0);
 
    PG_RETURN_INT32(anychar_typmodin(ta, "varchar"));
}

References anychar_typmodin(), fb(), PG_GETARG_ARRAYTYPE_P, and PG_RETURN_INT32.

varchartypmodout()

Datum varchartypmodout

(

PG_FUNCTION_ARGS

)

Definition at line 659 of file varchar.c.

{
    int32       typmod = PG_GETARG_INT32(0);
 
    PG_RETURN_CSTRING(anychar_typmodout(typmod));
}

References anychar_typmodout(), PG_GETARG_INT32, and PG_RETURN_CSTRING.