mirror of
https://git.postgresql.org/git/postgresql.git
synced 2024-12-27 08:39:28 +08:00
220db7ccd8
strings. This patch introduces four support functions cstring_to_text, cstring_to_text_with_len, text_to_cstring, and text_to_cstring_buffer, and two macros CStringGetTextDatum and TextDatumGetCString. A number of existing macros that provided variants on these themes were removed. Most of the places that need to make such conversions now require just one function or macro call, in place of the multiple notational layers that used to be needed. There are no longer any direct calls of textout or textin, and we got most of the places that were using handmade conversions via memcpy (there may be a few still lurking, though). This commit doesn't make any serious effort to eliminate transient memory leaks caused by detoasting toasted text objects before they reach text_to_cstring. We changed PG_GETARG_TEXT_P to PG_GETARG_TEXT_PP in a few places where it was easy, but much more could be done. Brendan Jurd and Tom Lane
120 lines
3.2 KiB
C
120 lines
3.2 KiB
C
|
|
#include "executor/spi.h" /* this is what you need to work with SPI */
|
|
#include "commands/trigger.h" /* -"- and triggers */
|
|
#include "commands/sequence.h" /* for nextval() */
|
|
|
|
PG_MODULE_MAGIC;
|
|
|
|
extern Datum autoinc(PG_FUNCTION_ARGS);
|
|
|
|
PG_FUNCTION_INFO_V1(autoinc);
|
|
|
|
Datum
|
|
autoinc(PG_FUNCTION_ARGS)
|
|
{
|
|
TriggerData *trigdata = (TriggerData *) fcinfo->context;
|
|
Trigger *trigger; /* to get trigger name */
|
|
int nargs; /* # of arguments */
|
|
int *chattrs; /* attnums of attributes to change */
|
|
int chnattrs = 0; /* # of above */
|
|
Datum *newvals; /* vals of above */
|
|
char **args; /* arguments */
|
|
char *relname; /* triggered relation name */
|
|
Relation rel; /* triggered relation */
|
|
HeapTuple rettuple = NULL;
|
|
TupleDesc tupdesc; /* tuple description */
|
|
bool isnull;
|
|
int i;
|
|
|
|
if (!CALLED_AS_TRIGGER(fcinfo))
|
|
/* internal error */
|
|
elog(ERROR, "not fired by trigger manager");
|
|
if (TRIGGER_FIRED_FOR_STATEMENT(trigdata->tg_event))
|
|
/* internal error */
|
|
elog(ERROR, "cannot process STATEMENT events");
|
|
if (TRIGGER_FIRED_AFTER(trigdata->tg_event))
|
|
/* internal error */
|
|
elog(ERROR, "must be fired before event");
|
|
|
|
if (TRIGGER_FIRED_BY_INSERT(trigdata->tg_event))
|
|
rettuple = trigdata->tg_trigtuple;
|
|
else if (TRIGGER_FIRED_BY_UPDATE(trigdata->tg_event))
|
|
rettuple = trigdata->tg_newtuple;
|
|
else
|
|
/* internal error */
|
|
elog(ERROR, "cannot process DELETE events");
|
|
|
|
rel = trigdata->tg_relation;
|
|
relname = SPI_getrelname(rel);
|
|
|
|
trigger = trigdata->tg_trigger;
|
|
|
|
nargs = trigger->tgnargs;
|
|
if (nargs <= 0 || nargs % 2 != 0)
|
|
/* internal error */
|
|
elog(ERROR, "autoinc (%s): even number gt 0 of arguments was expected", relname);
|
|
|
|
args = trigger->tgargs;
|
|
tupdesc = rel->rd_att;
|
|
|
|
chattrs = (int *) palloc(nargs / 2 * sizeof(int));
|
|
newvals = (Datum *) palloc(nargs / 2 * sizeof(Datum));
|
|
|
|
for (i = 0; i < nargs;)
|
|
{
|
|
int attnum = SPI_fnumber(tupdesc, args[i]);
|
|
int32 val;
|
|
Datum seqname;
|
|
|
|
if (attnum < 0)
|
|
ereport(ERROR,
|
|
(errcode(ERRCODE_TRIGGERED_ACTION_EXCEPTION),
|
|
errmsg("\"%s\" has no attribute \"%s\"",
|
|
relname, args[i])));
|
|
|
|
if (SPI_gettypeid(tupdesc, attnum) != INT4OID)
|
|
ereport(ERROR,
|
|
(errcode(ERRCODE_TRIGGERED_ACTION_EXCEPTION),
|
|
errmsg("attribute \"%s\" of \"%s\" must be type INT4",
|
|
args[i], relname)));
|
|
|
|
val = DatumGetInt32(SPI_getbinval(rettuple, tupdesc, attnum, &isnull));
|
|
|
|
if (!isnull && val != 0)
|
|
{
|
|
i += 2;
|
|
continue;
|
|
}
|
|
|
|
i++;
|
|
chattrs[chnattrs] = attnum;
|
|
seqname = CStringGetTextDatum(args[i]);
|
|
newvals[chnattrs] = DirectFunctionCall1(nextval, seqname);
|
|
/* nextval now returns int64; coerce down to int32 */
|
|
newvals[chnattrs] = Int32GetDatum((int32) DatumGetInt64(newvals[chnattrs]));
|
|
if (DatumGetInt32(newvals[chnattrs]) == 0)
|
|
{
|
|
newvals[chnattrs] = DirectFunctionCall1(nextval, seqname);
|
|
newvals[chnattrs] = Int32GetDatum((int32) DatumGetInt64(newvals[chnattrs]));
|
|
}
|
|
pfree(DatumGetTextP(seqname));
|
|
chnattrs++;
|
|
i++;
|
|
}
|
|
|
|
if (chnattrs > 0)
|
|
{
|
|
rettuple = SPI_modifytuple(rel, rettuple, chnattrs, chattrs, newvals, NULL);
|
|
if (rettuple == NULL)
|
|
/* internal error */
|
|
elog(ERROR, "autoinc (%s): %d returned by SPI_modifytuple",
|
|
relname, SPI_result);
|
|
}
|
|
|
|
pfree(relname);
|
|
pfree(chattrs);
|
|
pfree(newvals);
|
|
|
|
return PointerGetDatum(rettuple);
|
|
}
|