libchimara/schannel.c

   1 #include <config.h>
   2 #include <glib.h>
   3 #include <libchimara/glk.h>
   4 #ifdef GSTREAMER_SOUND
   5 #include <gst/gst.h>
   6 #endif
   7 #include "magic.h"
   8 #include "schannel.h"
   9 #include "chimara-glk-private.h"
  10 #include "gi_dispa.h"
  11
  12 extern GPrivate *glk_data_key;
  13
  14 /**
  15  * glk_schannel_create:
  16  * @rock: The rock value to give the new sound channel.
  17  *
  18  * This creates a sound channel, about as you'd expect.
  19  *
  20  * Remember that it is possible that the library will be unable to create a new
  21  * channel, in which case glk_schannel_create() will return %NULL.
  22  *
  23  * Returns: A new sound channel, or %NULL.
  24  */
  25 schanid_t
  26 glk_schannel_create(glui32 rock)
  27 {
  28 #ifdef GSTREAMER_SOUND
  29         ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
  30
  31         schanid_t s = g_new0(struct glk_schannel_struct, 1);
  32         s->magic = MAGIC_SCHANNEL;
  33         s->rock = rock;
  34         if(glk_data->register_obj)
  35                 s->disprock = (*glk_data->register_obj)(s, gidisp_Class_Schannel);
  36
  37         /* Add it to the global sound channel list */
  38         glk_data->schannel_list = g_list_prepend(glk_data->schannel_list, s);
  39         s->schannel_list = glk_data->schannel_list;
  40
  41         /* Create a GStreamer pipeline for the sound channel */
  42         gchar *pipeline_name = g_strdup_printf("pipeline-%p", s);
  43         s->pipeline = gst_pipeline_new(pipeline_name);
  44         g_free(pipeline_name);
  45
  46         /* Create GStreamer elements to put in the pipeline */
  47         s->source = gst_element_factory_make("filesrc", NULL);
  48         s->filter = gst_element_factory_make("identity", NULL);
  49         s->sink = gst_element_factory_make("autoaudiosink", NULL);
  50         if(!s->source || !s->filter || !s->sink) {
  51                 WARNING("Could not create one or more GStreamer elements");
  52                 goto fail;
  53         }
  54
  55         gst_bin_add_many(GST_BIN(s->pipeline), s->source, s->filter, s->sink, NULL);
  56         if(!gst_element_link_many(s->source, s->filter, s->sink, NULL)) {
  57                 WARNING("Could not link GStreamer elements");
  58                 goto fail;
  59         }
  60
  61         return s;
  62
  63 fail:
  64         glk_schannel_destroy(s);
  65         return NULL;
  66 #else
  67         return NULL;
  68 #endif /* GSTREAMER_SOUND */
  69 }
  70
  71 /**
  72  * glk_schannel_destroy:
  73  * @chan: The sound channel to destroy.
  74  *
  75  * Destroys the channel. If the channel is playing a sound, the sound stops
  76  * immediately (with no notification event).
  77  */
  78 void
  79 glk_schannel_destroy(schanid_t chan)
  80 {
  81         VALID_SCHANNEL(chan, return);
  82
  83 #ifdef GSTREAMER_SOUND
  84         ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
  85
  86         glk_data->schannel_list = g_list_delete_link(glk_data->schannel_list, chan->schannel_list);
  87
  88         if(glk_data->unregister_obj)
  89         {
  90                 (*glk_data->unregister_obj)(chan, gidisp_Class_Schannel, chan->disprock);
  91                 chan->disprock.ptr = NULL;
  92         }
  93
  94         if(chan->pipeline)
  95                 gst_object_unref(chan->pipeline);
  96
  97         chan->magic = MAGIC_FREE;
  98         g_free(chan);
  99 #endif
 100 }
 101
 102 /**
 103  * glk_schannel_iterate:
 104  * @chan: A sound channel, or %NULL.
 105  * @rockptr: Return location for the next sound channel's rock, or %NULL.
 106  *
 107  * This function can be used to iterate through the list of all open channels.
 108  * See <link linkend="chimara-Iterating-Through-Opaque-Objects">Iterating
 109  * Through Opaque Objects</link>.
 110  *
 111  * As that section describes, the order in which channels are returned is
 112  * arbitrary.
 113  *
 114  * Returns: the next sound channel, or %NULL if there are no more.
 115  */
 116 schanid_t
 117 glk_schannel_iterate(schanid_t chan, glui32 *rockptr)
 118 {
 119         VALID_SCHANNEL_OR_NULL(chan, return NULL);
 120
 121 #ifdef GSTREAMER_SOUND
 122         ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
 123         GList *retnode;
 124
 125         if(chan == NULL)
 126                 retnode = glk_data->schannel_list;
 127         else
 128                 retnode = chan->schannel_list->next;
 129         schanid_t retval = retnode? (schanid_t)retnode->data : NULL;
 130
 131         /* Store the sound channel's rock in rockptr */
 132         if(retval && rockptr)
 133                 *rockptr = glk_schannel_get_rock(retval);
 134
 135         return retval;
 136 #else
 137         return NULL;
 138 #endif /* GSTREAMER_SOUND */
 139 }
 140
 141 /**
 142  * glk_schannel_get_rock:
 143  * @chan: A sound channel.
 144  *
 145  * Retrieves the channel's rock value. See <link
 146  * linkend="chimara-Rocks">Rocks</link>.
 147  *
 148  * Returns: A rock value.
 149  */
 150 glui32
 151 glk_schannel_get_rock(schanid_t chan)
 152 {
 153         VALID_SCHANNEL(chan, return 0);
 154         return chan->rock;
 155 }
 156
 157 /**
 158  * glk_schannel_play:
 159  * @chan: Channel to play the sound in.
 160  * @snd: Resource number of the sound to play.
 161  *
 162  * Begins playing the given sound on the channel. If the channel was already
 163  * playing a sound (even the same one), the old sound is stopped (with no
 164  * notification event.
 165  *
 166  * This returns 1 if the sound actually started playing, and 0 if there was any
 167  * problem.
 168  * <note><para>
 169  *   The most obvious problem is if there is no sound resource with the given
 170  *   identifier. But other problems can occur. For example, the MOD-playing
 171  *   facility in a library might be unable to handle two MODs at the same time,
 172  *   in which case playing a MOD resource would fail if one was already playing.
 173  * </para></note>
 174  *
 175  * <warning><para>This function is not implemented yet.</para></warning>
 176  *
 177  * Returns: 1 on success, 0 on failure.
 178  */
 179 glui32
 180 glk_schannel_play(schanid_t chan, glui32 snd)
 181 {
 182         return glk_schannel_play_ext(chan, snd, 1, 0);
 183 }
 184
 185 /**
 186  * glk_schannel_play_ext:
 187  * @chan: Channel to play the sound in.
 188  * @snd: Resource number of the sound to play.
 189  * @repeats: Number of times to repeat the sound.
 190  * @notify: If nonzero, requests a notification when the sound is finished.
 191  *
 192  * This works the same as glk_schannel_play(), but lets you specify additional
 193  * options. <code>glk_schannel_play(chan, snd)</code> is exactly equivalent to
 194  * <code>glk_schannel_play_ext(chan, snd, 1, 0)</code>.
 195  *
 196  * The @repeats value is the number of times the sound should be repeated. A
 197  * repeat value of -1 (or rather 0xFFFFFFFF) means that the sound should repeat
 198  * forever. A repeat value of 0 means that the sound will not be played at all;
 199  * nothing happens. (Although a previous sound on the channel will be stopped,
 200  * and the function will return 1.)
 201  *
 202  * The @notify value should be nonzero in order to request a sound notification
 203  * event. If you do this, when the sound is completed, you will get an event
 204  * with type %evtype_SoundNotify. The @window will be %NULL, @val1 will be the
 205  * sound's resource id, and @val2 will be the nonzero value you passed as
 206  * @notify.
 207  *
 208  * If you request sound notification, and the repeat value is greater than one,
 209  * you will get the event only after the last repetition. If the repeat value is
 210  * 0 or -1, you will never get a notification event at all. Similarly, if the
 211  * sound is stopped or interrupted, or if the channel is destroyed while the
 212  * sound is playing, there will be no notification event.
 213  *
 214  * Not all libraries support sound notification. You should test the
 215  * %gestalt_SoundNotify selector before you rely on it; see <link
 216  * linkend="chimara-Testing-for-Sound-Capabilities">Testing for Sound
 217  * Capabilities</link>.
 218  *
 219  * <warning><para>This function is not implemented yet.</para></warning>
 220  *
 221  * Returns: 1 on success, 0 on failure.
 222  */
 223 glui32
 224 glk_schannel_play_ext(schanid_t chan, glui32 snd, glui32 repeats, glui32 notify)
 225 {
 226         VALID_SCHANNEL(chan, return 0);
 227         return 0;
 228 }
 229
 230 /**
 231  * glk_schannel_stop:
 232  * @chan: Channel to silence.
 233  *
 234  * Stops any sound playing in the channel. No notification event is generated,
 235  * even if you requested one. If no sound is playing, this has no effect.
 236  *
 237  * <warning><para>This function is not implemented yet.</para></warning>
 238  */
 239 void
 240 glk_schannel_stop(schanid_t chan)
 241 {
 242         VALID_SCHANNEL(chan, return);
 243 }
 244
 245 /**
 246  * glk_schannel_set_volume:
 247  * @chan: Channel to set the volume of.
 248  * @vol: Integer representing the volume; 0x10000 is 100&percnt;.
 249  *
 250  * Sets the volume in the channel. When you create a channel, it has full
 251  * volume, represented by the value 0x10000. Half volume would be 0x8000,
 252  * three-quarters volume would be 0xC000, and so on. A volume of zero represents
 253  * silence, although the sound is still considered to be playing.
 254  *
 255  * You can call this function between sounds, or while a sound is playing. The
 256  * effect is immediate.
 257  *
 258  * You can overdrive the volume of a channel by setting a volume greater than
 259  * 0x10000. However, this is not recommended; the library may be unable to
 260  * increase the volume past full, or the sound may become distorted. You should
 261  * always create sound resources with the maximum volume you will need, and then
 262  * call glk_schannel_set_volume() to reduce the volume when appropriate.
 263  *
 264  * Not all libraries support this function. You should test the
 265  * %gestalt_SoundVolume selector before you rely on it; see <link
 266  * linkend="chimara-Testing-for-Sound-Capabilities">Testing for Sound
 267  * Capabilities</link>.
 268  *
 269  * <warning><para>This function is not implemented yet.</para></warning>
 270  */
 271 void
 272 glk_schannel_set_volume(schanid_t chan, glui32 vol)
 273 {
 274         VALID_SCHANNEL(chan, return);
 275 }
 276
 277 /**
 278  * glk_sound_load_hint:
 279  * @snd: Resource number of a sound.
 280  * @flag: Nonzero to tell the library to load the sound, zero to tell the
 281  * library to unload it.
 282  *
 283  * This gives the library a hint about whether the given sound should be loaded
 284  * or not. If the @flag is nonzero, the library may preload the sound or do
 285  * other initialization, so that glk_schannel_play() will be faster. If the
 286  * @flag is zero, the library may release memory or other resources associated
 287  * with the sound. Calling this function is always optional, and it has no
 288  * effect on what the library actually plays.
 289  *
 290  * <warning><para>This function is not implemented yet.</para></warning>
 291  */
 292 void
 293 glk_sound_load_hint(glui32 snd, glui32 flag)
 294 {
 295 }