PostGIS  3.1.6dev-r@@SVN_REVISION@@

◆ LWGEOM_collect()

Datum LWGEOM_collect ( PG_FUNCTION_ARGS  )

Definition at line 1138 of file lwgeom_functions_basic.c.

1139 {
1140  GSERIALIZED *gser1, *gser2, *result;
1141  LWGEOM *lwgeoms[2], *outlwg;
1142  uint32 type1, type2;
1143  uint8_t outtype;
1144  int32_t srid;
1145 
1146  POSTGIS_DEBUG(2, "LWGEOM_collect called.");
1147 
1148  /* return null if both geoms are null */
1149  if (PG_ARGISNULL(0) && PG_ARGISNULL(1))
1150  PG_RETURN_NULL();
1151 
1152  /* Return the second geom if the first geom is null */
1153  if (PG_ARGISNULL(0))
1154  PG_RETURN_DATUM(PG_GETARG_DATUM(1));
1155 
1156  /* Return the first geom if the second geom is null */
1157  if (PG_ARGISNULL(1))
1158  PG_RETURN_DATUM(PG_GETARG_DATUM(0));
1159 
1160  gser1 = PG_GETARG_GSERIALIZED_P(0);
1161  gser2 = PG_GETARG_GSERIALIZED_P(1);
1162  gserialized_error_if_srid_mismatch(gser1, gser2, __func__);
1163 
1164  POSTGIS_DEBUGF(3,
1165  "LWGEOM_collect(%s, %s): call",
1168 
1169  if ((gserialized_has_z(gser1) != gserialized_has_z(gser2)) ||
1170  (gserialized_has_m(gser1) != gserialized_has_m(gser2)))
1171  {
1172  elog(ERROR, "Cannot ST_Collect geometries with differing dimensionality.");
1173  PG_RETURN_NULL();
1174  }
1175 
1176  srid = gserialized_get_srid(gser1);
1177 
1178  lwgeoms[0] = lwgeom_from_gserialized(gser1);
1179  lwgeoms[1] = lwgeom_from_gserialized(gser2);
1180 
1181  type1 = lwgeoms[0]->type;
1182  type2 = lwgeoms[1]->type;
1183 
1184  if ((type1 == type2) && (!lwgeom_is_collection(lwgeoms[0])))
1185  outtype = lwtype_get_collectiontype(type1);
1186  else
1187  outtype = COLLECTIONTYPE;
1188 
1189  POSTGIS_DEBUGF(3, " outtype = %d", outtype);
1190 
1191  /* Drop input geometries bbox and SRID */
1192  lwgeom_drop_bbox(lwgeoms[0]);
1193  lwgeom_drop_srid(lwgeoms[0]);
1194  lwgeom_drop_bbox(lwgeoms[1]);
1195  lwgeom_drop_srid(lwgeoms[1]);
1196 
1197  outlwg = (LWGEOM *)lwcollection_construct(outtype, srid, NULL, 2, lwgeoms);
1198  result = geometry_serialize(outlwg);
1199 
1200  lwgeom_free(lwgeoms[0]);
1201  lwgeom_free(lwgeoms[1]);
1202 
1203  PG_FREE_IF_COPY(gser1, 0);
1204  PG_FREE_IF_COPY(gser2, 1);
1205 
1206  PG_RETURN_POINTER(result);
1207 }
char result[OUT_DOUBLE_BUFFER_SIZE]
Definition: cu_print.c:267
void gserialized_error_if_srid_mismatch(const GSERIALIZED *g1, const GSERIALIZED *g2, const char *funcname)
Definition: gserialized.c:404
int32_t gserialized_get_srid(const GSERIALIZED *g)
Extract the SRID from the serialized form (it is packed into three bytes so this is a handy function)...
Definition: gserialized.c:126
int gserialized_has_m(const GSERIALIZED *g)
Check if a GSERIALIZED has an M ordinate.
Definition: gserialized.c:185
LWGEOM * lwgeom_from_gserialized(const GSERIALIZED *g)
Allocate a new LWGEOM from a GSERIALIZED.
Definition: gserialized.c:239
int gserialized_has_z(const GSERIALIZED *g)
Check if a GSERIALIZED has a Z ordinate.
Definition: gserialized.c:174
uint32_t gserialized_get_type(const GSERIALIZED *g)
Extract the geometry type from the serialized form (it hides in the anonymous data area,...
Definition: gserialized.c:89
uint32_t lwtype_get_collectiontype(uint8_t type)
Given an lwtype number, what homogeneous collection can hold it?
Definition: lwgeom.c:1114
#define COLLECTIONTYPE
Definition: liblwgeom.h:122
void lwgeom_free(LWGEOM *geom)
Definition: lwgeom.c:1138
void lwgeom_drop_bbox(LWGEOM *lwgeom)
Call this function to drop BBOX and SRID from LWGEOM.
Definition: lwgeom.c:665
int lwgeom_is_collection(const LWGEOM *lwgeom)
Determine whether a LWGEOM can contain sub-geometries or not.
Definition: lwgeom.c:1080
const char * lwtype_name(uint8_t type)
Return the type name string associated with a type number (e.g.
Definition: lwutil.c:216
LWCOLLECTION * lwcollection_construct(uint8_t type, int32_t srid, GBOX *bbox, uint32_t ngeoms, LWGEOM **geoms)
Definition: lwcollection.c:42
void lwgeom_drop_srid(LWGEOM *lwgeom)
Definition: lwgeom.c:748
uint8_t type
Definition: liblwgeom.h:476

References COLLECTIONTYPE, gserialized_error_if_srid_mismatch(), gserialized_get_srid(), gserialized_get_type(), gserialized_has_m(), gserialized_has_z(), lwcollection_construct(), lwgeom_drop_bbox(), lwgeom_drop_srid(), lwgeom_free(), lwgeom_from_gserialized(), lwgeom_is_collection(), lwtype_get_collectiontype(), lwtype_name(), result, and LWGEOM::type.

Here is the call graph for this function: