/* @TEMPLATE_DISCLAIMER@ */
#include <gperl.h>
#include <vpbs-db-@template@.h>
@XS_EXTRA_INCLUDES@#include "vpbs_db-autogen.h"

MODULE = Vpbs::Db::@Template@	PACKAGE = Vpbs::Db::@Template@	PREFIX = vpbs_db_@template@_

BOOT:
#include "build/register.xsh"

VpbsDb@Template@_noinc* vpbs_db_@template@_lookup(class, guint id)
	PREINIT:
		GError* err=NULL;
	CODE:
		RETVAL = vpbs_db_@template@_lookup(id, &err);
		if(!RETVAL) {
			gperl_croak_gerror(NULL, err);
		}
	OUTPUT:
		RETVAL

void vpbs_db_@template@_get_all(class)
	PREINIT:
		GArray* arr;
		GError* err=NULL;
		int i;
	PPCODE:
		arr = vpbs_db_@template@_get_all(&err);
		if(!arr) {
			gperl_croak_gerror(NULL, err);
		}
		for(i=0;i<arr->len;i++) {
			XPUSHs(sv_2mortal(newSVVpbsDb@Template@(VPBS_DB_@TEMPLATE@(g_array_index(arr, void*, i)))));
		}
		g_array_free(arr, TRUE);

void vpbs_db_@template@_get_all_ordered(class)
	PREINIT:
		GArray* arr;
		GError* err=NULL;
		int i;
	PPCODE:
		arr = vpbs_db_@template@_get_all_ordered(&err);
		if(!arr) {
			gperl_croak_gerror(NULL, err);
		}
		for(i=0;i<arr->len;i++) {
			XPUSHs(sv_2mortal(newSVVpbsDb@Template@(VPBS_DB_@TEMPLATE@(g_array_index(arr, void*, i)))));
		}
		g_array_free(arr, TRUE);

VpbsDb@Template@_noinc* vpbs_db_@template@_new(class, @NEWARGS_SHORT@)
	PREINIT:
@XS_DECLS@	CODE:
@XS_SHORT_TO_NEWARGS@		RETVAL = vpbs_db_@template@_new(@NEWARGS@);
	OUTPUT:
		RETVAL

gboolean vpbs_db_@template@_destroy(VpbsDb@Template@* self)
	PREINIT:
		GError* err=NULL;
	CODE:
		RETVAL = vpbs_db_@template@_destroy(self, &err);
		if(!RETVAL) {
			gperl_croak_gerror(NULL, err);
		}
	OUTPUT:
		RETVAL

@XS_EXTRA@