+ if (!retval)
+ unload_alsyms();
+
+ return retval;
+}
+#else
+#define lookup_all_alsyms(x) (true)
+#define unload_alsyms()
+#endif
+
+typedef struct
+{
+ ALuint sid;
+ OPENAL_SAMPLE *sample;
+ bool startpaused;
+ float position[3];
+} OPENAL_Channels;
+
+typedef struct OPENAL_SAMPLE
+{
+ char *name;
+ ALuint bid; // buffer id.
+ int mode;
+ int is2d;
+} OPENAL_SAMPLE;
+
+static size_t num_channels = 0;
+static OPENAL_Channels *impl_channels = NULL;
+static bool initialized = false;
+static float listener_position[3];
+
+static void set_channel_position(const int channel, const float x,
+ const float y, const float z)
+{
+ OPENAL_Channels *chan = &impl_channels[channel];
+
+ chan->position[0] = x;
+ chan->position[1] = y;
+ chan->position[2] = z;
+
+ OPENAL_SAMPLE *sptr = chan->sample;
+ if (sptr == NULL)
+ return;
+
+ const ALuint sid = chan->sid;
+ const bool no_attenuate = sptr->is2d;
+
+ if (no_attenuate)
+ {
+ alSourcei(sid, AL_SOURCE_RELATIVE, AL_TRUE);
+ alSource3f(sid, AL_POSITION, 0.0f, 0.0f, 0.0f);
+ }
+ else
+ {
+ alSourcei(sid, AL_SOURCE_RELATIVE, AL_FALSE);
+ alSource3f(sid, AL_POSITION, x, y, z);
+ }
+}
+
+
+AL_API void OPENAL_3D_Listener_SetAttributes(const float *pos, const float *vel, float fx, float fy, float fz, float tx, float ty, float tz)
+{
+ if (!initialized) return;
+ if (pos != NULL)
+ {
+ alListener3f(AL_POSITION, pos[0], pos[1], -pos[2]);
+ listener_position[0] = pos[0];
+ listener_position[1] = pos[1];
+ listener_position[2] = -pos[2];
+ }
+
+ ALfloat vec[6] = { fx, fy, -fz, tz, ty, -tz };
+ alListenerfv(AL_ORIENTATION, vec);
+
+ // we ignore velocity, since doppler's broken in the Linux AL at the moment...
+
+ // adjust existing positions...
+ for (int i = 0; i < num_channels; i++)
+ {
+ const float *p = impl_channels[i].position;
+ set_channel_position(i, p[0], p[1], p[2]);
+ }
+}