PostgreSQL C言語関数 FUNCTIONのOUT引数型の使い方について

Question

ご協力をお願いいたします。

☆頂きたい回答
１）OUT型引数に返却値を戻すＣ言語のサンプルプログラム
２）外部から当該関数を呼び出し返却値を確認する ＰＬ／ＳＱＬ サンプルプログラム

☆留意点
関数呼び出し時の３つのOUT引数は変えたくない、それ以外は変更可
PostgreSQL 9.2
RHLE7.1

■Ｃ言語関数宣言

DROP FUNCTION test_func(OUT INTEGER, OUT INTEGER, OUT INTEGER);
CREATE OR REPLACE FUNCTION test_func(
             OUT ret1       INTEGER,
             OUT ret2       INTEGER,
             OUT ret3       INTEGER
         )
         AS '/Work/9.2/Extender.so', 'test_func'
         LANGUAGE C IMMUTABLE STRICT;

■実行結果（空値が戻ります）

 -bash-4.2$ psql
 postgres=# select * FROM test_func();
 
  ret1 |   ret2    |  ret3  
 ------+-----------+------- 
       |           |        

■テンプレート

#include <postgres.h>
#include <string.h>
#include <funcapi.h>
#include <utils/acl.h>
#include <utils/geo_decls.h>
#include <utils/builtins.h>

#ifdef PG_MODULE_MAGIC
PG_MODULE_MAGIC;
#endif /* PG_MODULE_MAGIC */

PG_FUNCTION_INFO_V1(test_func);
test_func(PG_FUNCTION_ARGS){
  fcinfo->arg[0] = 1;
  fcinfo->arg[1] = 2;
  fcinfo->arg[2] = 3;

  PG_RETURN_NULL();
}

Answer 1

#include <postgres.h>
#include <string.h>
#include <funcapi.h>
#include <utils/acl.h>
#include <utils/geo_decls.h>
#include <utils/builtins.h>

#ifdef PG_MODULE_MAGIC
PG_MODULE_MAGIC;
#endif /* PG_MODULE_MAGIC */

PG_FUNCTION_INFO_V1(test_func);
test_func(PG_FUNCTION_ARGS){
    TupleDesc      tupdesc;
    AttInMetadata  *attinmeta;
    HeapTuple      tuple;
    Datum          result;

    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")));
    }

    attinmeta = TupleDescGetAttInMetadata(tupdesc);

    values = (char **) palloc(3 * sizeof(char *));
    values[0] = (char *) palloc(   16 * sizeof(char) + 1);
    values[1] = (char *) palloc(   16 * sizeof(char) + 1);
    values[2] = (char *) palloc(   16 * sizeof(char) + 1);
    snprintf(values[0], 16, "%d", 4);
    snprintf(values[1], 16, "%s", 5);
    snprintf(values[2], 16, "%d", 6);

    tuple = BuildTupleFromCStrings(attinmeta, values);
    result = HeapTupleGetDatum(tuple);
}

 test_func
------------
 (4,5,6)
(1行)