#include <config.h>
#include <glib.h>
+#include <glib/gi18n.h>
#include <libchimara/glk.h>
#ifdef GSTREAMER_SOUND
#include <gst/gst.h>
#include "schannel.h"
#include "chimara-glk-private.h"
#include "gi_dispa.h"
+#include "gi_blorb.h"
+#include "resource.h"
extern GPrivate *glk_data_key;
+static void
+on_new_decoded_pad(GstTypeFindElement *typefind, guint probability, GstCaps *caps)
+{
+
+
/**
* glk_schannel_create:
* @rock: The rock value to give the new sound channel.
g_free(pipeline_name);
/* Create GStreamer elements to put in the pipeline */
- s->source = gst_element_factory_make("filesrc", NULL);
- s->filter = gst_element_factory_make("identity", NULL);
+ s->source = gst_element_factory_make("giostreamsrc", NULL);
+ s->decode = gst_element_factory_make("decodebin2", NULL);
+ s->filter = gst_element_factory_make("volume", NULL);
s->sink = gst_element_factory_make("autoaudiosink", NULL);
- if(!s->source || !s->filter || !s->sink) {
- WARNING("Could not create one or more GStreamer elements");
+ if(!s->source || !s->decode || !s->filter || !s->sink) {
+ WARNING(_("Could not create one or more GStreamer elements"));
goto fail;
}
- gst_bin_add_many(GST_BIN(s->pipeline), s->source, s->filter, s->sink, NULL);
- if(!gst_element_link_many(s->source, s->filter, s->sink, NULL)) {
- WARNING("Could not link GStreamer elements");
+ gst_bin_add_many(GST_BIN(s->pipeline), s->source, s->decode, s->filter, s->sink, NULL);
+ if(!gst_element_link(s->source, s->decode)) {
+ WARNING(_("Could not link GStreamer elements"));
goto fail;
}
+ if(!gst_element_link(s->filter, s->sink)) {
+ WARNING(_("Could not link GStreamer elements"));
+ goto fail;
+ }
+ g_signal_connect(s->decode, "new-decoded-pad", G_CALLBACK(on_new_decoded_pad), s);
return s;
#ifdef GSTREAMER_SOUND
ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
+
+ if(!gst_element_set_state(chan->pipeline, GST_STATE_NULL))
+ WARNING_S(_("Could not set GstElement state to"), "NULL");
glk_data->schannel_list = g_list_delete_link(glk_data->schannel_list, chan->schannel_list);
}
if(chan->pipeline)
- g_object_unref(chan->pipeline);
+ gst_object_unref(chan->pipeline);
chan->magic = MAGIC_FREE;
g_free(chan);
* in which case playing a MOD resource would fail if one was already playing.
* </para></note>
*
- * <warning><para>This function is not implemented yet.</para></warning>
- *
* Returns: 1 on success, 0 on failure.
*/
glui32
* %gestalt_SoundNotify selector before you rely on it; see <link
* linkend="chimara-Testing-for-Sound-Capabilities">Testing for Sound
* Capabilities</link>.
- *
- * <warning><para>This function is not implemented yet.</para></warning>
*
* Returns: 1 on success, 0 on failure.
*/
glk_schannel_play_ext(schanid_t chan, glui32 snd, glui32 repeats, glui32 notify)
{
VALID_SCHANNEL(chan, return 0);
+#ifdef GSTREAMER_SOUND
+ ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
+
+ if(!glk_data->resource_map) {
+ if(!glk_data->resource_load_callback) {
+ WARNING(_("No resource map has been loaded yet."));
+ return 0;
+ }
+ WARNING(_("Loading sound resources from alternative location not yet supported."));
+ return 0;
+ }
+
+ giblorb_result_t resource;
+ giblorb_err_t result = giblorb_load_resource(glk_data->resource_map, giblorb_method_Memory, &resource, giblorb_ID_Snd, snd);
+ if(result != giblorb_err_None) {
+ WARNING_S( _("Error loading resource"), giblorb_get_error_message(result) );
+ return 0;
+ }
+ g_printerr("playing sound resource %d at %p, length %x\n", snd, resource.data.ptr, resource.length);
+ GInputStream *stream = g_memory_input_stream_new_from_data(resource.data.ptr, resource.length, NULL);
+ g_object_set(chan->source, "stream", stream, NULL);
+
+ if(!gst_element_set_state(chan->pipeline, GST_STATE_PLAYING)) {
+ WARNING_S(_("Could not set GstElement state to"), "PLAYING");
+ return 0;
+ }
+ return 1;
+#else
return 0;
+#endif
}
/**
*
* Stops any sound playing in the channel. No notification event is generated,
* even if you requested one. If no sound is playing, this has no effect.
- *
- * <warning><para>This function is not implemented yet.</para></warning>
*/
void
glk_schannel_stop(schanid_t chan)
{
VALID_SCHANNEL(chan, return);
+#ifdef GSTREAMER_SOUND
+ if(!gst_element_set_state(chan->pipeline, GST_STATE_READY))
+ WARNING_S(_("Could not set GstElement state to"), "READY");
+#endif
}
/**
* linkend="chimara-Testing-for-Sound-Capabilities">Testing for Sound
* Capabilities</link>.
*
- * <warning><para>This function is not implemented yet.</para></warning>
+ * <note><title>Chimara</title>
+ * <para>Chimara supports volumes from 0 to 1000%, that is, values of
+ * @vol up to 0xA0000.</para>
+ * </note>
*/
void
glk_schannel_set_volume(schanid_t chan, glui32 vol)
{
VALID_SCHANNEL(chan, return);
+#ifdef GSTREAMER_SOUND
+ gdouble volume_gst = (gdouble)vol / 0x10000;
+ g_printerr("Volume set to: %f\n", volume_gst);
+ g_object_set(chan->filter, "volume", CLAMP(volume_gst, 0.0, 10.0), NULL);
+#endif
}
/**
projects / projects / chimara / chimara.git / blobdiff