I have developed some custom composite and base types in PostgreSQL 9 which you can find in the code I provide below.
I compile my C library using GCC 4.5 under Linux and Visual Studio 2010 under Windows.
The problem is when I run this command: SELECT to_composite('((1, 2), (3, 4))'::m_segment_base).
This is the result I get in Windows and Linux respectively: Windows: "("(1,2)","(3,4)")" Linux: "("(1,)",)"
Probably the composite type is not created well in function "to_composite", but I guess the code should be OK since it works under MSVC...So my question is why this doesn't work under Linux? And how can I fix it of course.
Here is my code in SQL and C:***SQL code***
CREATE TYPE m_point_composite AS
(
x double precision,
y double precision
);
CREATE TYPE m_segment_composite AS
(
i m_point_composite,
e m_point_composite
);
CREATE TYPE m_point_base
(
INTERNALLENGTH = 16,
INPUT = m_point_base_in,
OUTPUT = m_point_base_out,
RECEIVE = m_point_base_recv,
SEND = m_point_base_send,
ALIGNMENT = double
);
CREATE TYPE m_segment_base
(
INTERNALLENGTH = 32,
INPUT = m_segment_base_in,
OUTPUT = m_segment_base_out,
RECEIVE = m_segment_base_recv,
SEND = m_segment_base_send,
ALIGNMENT = double
);
CREATE OR REPLACE FUNCTION to_composite(m_segment_base)
RETURNS m_segment_composite AS
'$libdir/myLib','to_composite'
LANGUAGE 'C' IMMUTABLE STRICT;
***C code***
struct m_point_base {
float8 x;
float8 y;
};
struct m_segment_base {
m_point_base i;
m_point_base e;
};
PGDLLEXPORT Datum to_composite(PG_FUNCTION_ARGS) {
m_segment_base *in = (m_segment_base *) PG_GETARG_POINTER(0);
TupleDesc tupdesc;
bool isnull;
Datum vi[2];
HeapTuple i;
Datum ve[2];
HeapTuple e;
Datum vout[2];
HeapTuple out;
TupleDesc tupdesc_m_point_composite = RelationNameGetTupleDesc("m_point_composite");
vi[0] = Float8GetDatum(in->i.x);
vi[1] = Float8GetDatum(in->i.y);
i = heap_form_tuple(tupdesc_m_point_composite, vi, &isnull);
ve[0] = Float8GetDatum(in->e.x);
ve[1] = Float8GetDatum(in->e.y);
e = heap_form_tuple(tupdesc_m_point_composite, ve, &isnull);
vout[0] = HeapTupleGetDatum(i);
vout[1] = HeapTupleGetDatum(e);
if (get_call_result_type(fcinfo, NULL, &tupdesc) != TYPEFUNC_COMPOSITE) {
ereport(ERROR, (errcode(ERRCODE_FEATURE_NOT_SUPPORTED), errmsg("function returning record called in context that cannot accept type record")));
}
BlessTupleDesc(tupdesc);
out = heap_form_tuple(tupdesc, vout, &isnull);
PG_RETURN_DATUM(HeapTupleGetDatum(out));
}
PG_FUNCTION_INFO_V1(to_composite)
;
