database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-07-30 11:03:19 +03:00
Code Activity

GNUmakefile.in - remove backend/utils/Gen_fmgrtab.sh on distclean

Browse Source 
varlena.c - part of Thomas' most recent patch
This commit is contained in:
Marc G. Fournier
1997-04-09 08:29:35 +00:00
parent 75e2370cc8
commit aaeef4dae8
2 changed files with 83 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/GNUmakefile.in
View File

@ -7,7 +7,7 @@
# #
# #
# IDENTIFICATION # IDENTIFICATION
# $Header: /cvsroot/pgsql/src/Attic/GNUmakefile.in,v 1.10 1997/02/28 18:45:17 scrappy Exp $ # $Header: /cvsroot/pgsql/src/Attic/GNUmakefile.in,v 1.11 1997/04/09 08:29:17 scrappy Exp $
# #
#------------------------------------------------------------------------- #-------------------------------------------------------------------------
@ -79,6 +79,7 @@ distclean: clean
bin/psql/Makefile \ bin/psql/Makefile \
bin/pg_dump/Makefile \ bin/pg_dump/Makefile \
include/config.h \ include/config.h \
backend/utils/Gen_fmgrtab.sh \
include/os.h include/os.h

119
src/backend/utils/adt/varlena.c
View File

@ -7,7 +7,7 @@
* *
* *
* IDENTIFICATION * IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/utils/adt/varlena.c,v 1.12 1997/04/02 18:13:24 scrappy Exp $ * $Header: /cvsroot/pgsql/src/backend/utils/adt/varlena.c,v 1.13 1997/04/09 08:29:35 scrappy Exp $
* *
*------------------------------------------------------------------------- *-------------------------------------------------------------------------
*/ */
@ -285,9 +285,19 @@ textne(struct varlena *arg1, struct varlena *arg2)
return((bool) !texteq(arg1, arg2)); return((bool) !texteq(arg1, arg2));
} }
/* text_lt()
* Comparison function for text strings.
* Includes locale support, but must copy strings to temporary memory
* to allow null-termination for inputs to strcoll().
* XXX HACK code for textlen() indicates that there can be embedded nulls
* but it appears that most routines (incl. this one) assume not! - tgl 97/04/07
*/
bool bool
text_lt(struct varlena *arg1, struct varlena *arg2) text_lt(struct varlena *arg1, struct varlena *arg2)
{ {
bool result;
int cval;
int len; int len;
#ifdef UNSIGNED_CHAR_TEXT #ifdef UNSIGNED_CHAR_TEXT
unsigned unsigned
@ -295,34 +305,55 @@ text_lt(struct varlena *arg1, struct varlena *arg2)
char *a1p, *a2p; char *a1p, *a2p;
if (arg1 == NULL || arg2 == NULL) if (arg1 == NULL || arg2 == NULL)
return((bool) 0); return((bool) FALSE);
len = (((VARSIZE(arg1) <= VARSIZE(arg2))? VARSIZE(arg1): VARSIZE(arg2))-VARHDRSZ);
#ifdef USE_LOCALE
if (!PointerIsValid(a1p = PALLOC(len+1))
|| !PointerIsValid(a2p = PALLOC(len+1))) {
elog(WARN,"Unable to allocate memory for text comparison",NULL);
return(FALSE);
};
memcpy(a1p, VARDATA(arg1), len);
*(a1p+len) = '\0';
memcpy(a2p, VARDATA(arg2), len);
*(a2p+len) = '\0';
cval = strcoll(a1p,a2p);
result = ((cval < 0) || ((cval == 0) && (VARSIZE(arg1) < VARSIZE(arg2))));
PFREE(a1p);
PFREE(a2p);
return(result);
#else
a1p = (unsigned char *)VARDATA(arg1); a1p = (unsigned char *)VARDATA(arg1);
a2p = (unsigned char *)VARDATA(arg2); a2p = (unsigned char *)VARDATA(arg2);
if ((len = arg1->vl_len) > arg2->vl_len) while (len != 0 && *a1p == *a2p) {
len = arg2->vl_len; a1p++;
len -= sizeof(int32); a2p++;
len--;
while (len != 0 && *a1p == *a2p) };
{ return((bool) (len? (*a1p < *a2p): (VARSIZE(arg1) < VARSIZE(arg2))));
a1p++;
a2p++;
len--;
}
if (len)
#ifdef USE_LOCALE
return (bool) (strcoll(a2p,a1p));
#else
return (bool) (*a1p < *a2p);
#endif #endif
else } /* text_lt() */
return (bool) (arg1->vl_len < arg2->vl_len);
}
/* text_le()
* Comparison function for text strings.
* Includes locale support, but must copy strings to temporary memory
* to allow null-termination for inputs to strcoll().
* XXX HACK code for textlen() indicates that there can be embedded nulls
* but it appears that most routines (incl. this one) assume not! - tgl 97/04/07
*/
bool bool
text_le(struct varlena *arg1, struct varlena *arg2) text_le(struct varlena *arg1, struct varlena *arg2)
{ {
bool result;
int cval;
int len; int len;
#ifdef UNSIGNED_CHAR_TEXT #ifdef UNSIGNED_CHAR_TEXT
unsigned unsigned
@ -332,28 +363,40 @@ text_le(struct varlena *arg1, struct varlena *arg2)
if (arg1 == NULL || arg2 == NULL) if (arg1 == NULL || arg2 == NULL)
return((bool) 0); return((bool) 0);
len = (((VARSIZE(arg1) <= VARSIZE(arg2))? VARSIZE(arg1): VARSIZE(arg2))-VARHDRSZ);
#ifdef USE_LOCALE
if (!PointerIsValid(a1p = PALLOC(len+1))
|| !PointerIsValid(a2p = PALLOC(len+1))) {
elog(WARN,"Unable to allocate memory for text comparison",NULL);
return(FALSE);
};
memcpy(a1p, VARDATA(arg1), len);
*(a1p+len) = '\0';
memcpy(a2p, VARDATA(arg2), len);
*(a2p+len) = '\0';
cval = strcoll(a1p,a2p);
result = ((cval < 0) || ((cval == 0) && (VARSIZE(arg1) <= VARSIZE(arg2))));
PFREE(a1p);
PFREE(a2p);
return(result);
#else
a1p = (unsigned char *)VARDATA(arg1); a1p = (unsigned char *)VARDATA(arg1);
a2p = (unsigned char *)VARDATA(arg2); a2p = (unsigned char *)VARDATA(arg2);
if ((len = arg1->vl_len) > arg2->vl_len) while (len != 0 && *a1p == *a2p) {
len = arg2->vl_len; a1p++;
len -= sizeof(int32); /* varlena! */ a2p++;
len--;
while (len != 0 && *a1p == *a2p) };
{
a1p++; return((bool) (len? (*a1p <= *a2p): (VARSIZE(arg1) <= VARSIZE(arg2))));
a2p++;
len--;
}
if (len)
#ifdef USE_LOCALE
return (bool) (strcoll(a2p,a1p));
#else
return (bool) (*a1p < *a2p);
#endif #endif
else } /* text_le() */
return ((bool) VARSIZE(arg1) <= VARSIZE(arg2));
}
bool bool
text_gt(struct varlena *arg1, struct varlena *arg2) text_gt(struct varlena *arg1, struct varlena *arg2)