void al_getlisteneri( int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[] ) {
if (NULL == alGetListeneri) mogl_glunsupported("alGetListeneri");
alGetListeneri((ALenum)mxGetScalar(prhs[0]),
(ALint*)mxGetData(prhs[1]));
}
value lime_al_get_listeneri (value param) {
int data;
alGetListeneri (val_int (param), &data);
return alloc_int (data);
}
int lime_al_get_listeneri (int param) {
ALint data;
alGetListeneri (param, &data);
return data;
}
ALvoid CDECL wine_alGetListeneri(ALenum param, ALint* value)
{
alGetListeneri(param, value);
}
static int lua_alGetListener(lua_State* lua_state)
{
ALenum enum_parameter;
int openal_primitive_type;
enum_parameter = lua_tointeger(lua_state, 1);
openal_primitive_type = lua_getTypeForEnum(enum_parameter);
switch(openal_primitive_type)
{
case LUAOPENAL_BOOL_TYPE:
{
ALint ret_val;
alGetListeneri(enum_parameter, &ret_val);
lua_pushboolean(lua_state, ret_val);
return 1;
break;
}
case LUAOPENAL_INT_TYPE:
{
ALint ret_val;
alGetListeneri(enum_parameter, &ret_val);
lua_pushinteger(lua_state, ret_val);
return 1;
break;
}
case LUAOPENAL_FLOAT_TYPE:
{
ALfloat ret_val;
alGetListenerf(enum_parameter, &ret_val);
lua_pushnumber(lua_state, ret_val);
return 1;
break;
}
case LUAOPENAL_INT_3_TYPE:
{
ALint ret_val[3];
alGetListeneriv(enum_parameter, ret_val);
lua_pushinteger(lua_state, ret_val[0]);
lua_pushinteger(lua_state, ret_val[1]);
lua_pushinteger(lua_state, ret_val[2]);
return 3;
break;
}
case LUAOPENAL_FLOAT_3_TYPE:
{
ALfloat ret_val[3];
alGetListenerfv(enum_parameter, ret_val);
lua_pushnumber(lua_state, ret_val[0]);
lua_pushnumber(lua_state, ret_val[1]);
lua_pushnumber(lua_state, ret_val[2]);
return 3;
break;
}
case LUAOPENAL_FLOAT_6_TYPE:
{
ALfloat ret_val[6];
alGetListenerfv(enum_parameter, ret_val);
lua_pushnumber(lua_state, ret_val[0]);
lua_pushnumber(lua_state, ret_val[1]);
lua_pushnumber(lua_state, ret_val[2]);
lua_pushnumber(lua_state, ret_val[3]);
lua_pushnumber(lua_state, ret_val[4]);
lua_pushnumber(lua_state, ret_val[5]);
return 6;
break;
}
default:
{
/* TODO: Figure out how to handle OpenAL extensions. */
luaL_error(lua_state, "Unhandled parameter type for alGetSource*");
}
}
return 0;
}
JNIEXPORT void JNICALL Java_org_lwjgl_openal_AL10_nalGetListeneri(JNIEnv *__env, jclass clazz, jint paramName, jlong valueAddress, jlong __functionAddress) {
ALint *value = (ALint *)(intptr_t)valueAddress;
alGetListeneriPROC alGetListeneri = (alGetListeneriPROC)(intptr_t)__functionAddress;
UNUSED_PARAMS(__env, clazz)
alGetListeneri(paramName, value);
}
//*****************************************************************************
// alGetListeneri
//*****************************************************************************
//
ALAPI ALvoid ALAPIENTRY alGetListeneri(ALenum param, ALint* value)
{
AL_VOID_FXN(alGetListeneri(param, value));
}
